Sign in to follow this  
Followers 0
Chimp

Question on _GUIImageList usage

12 posts in this topic

I would use _GUIImageList_Create() and _GUIImageList_Add() to load a strip of images like this one:

muybridge12-hp-f.jpg

and then I would use each single photogram (I think by using  _GUIImageList_Draw()).

Examples that I found uses to load a colored square into the ImageList, but I would like to load an image from disk instead (like the above for example) .
Having not idea how correctly achieve this result, I just tried this "wild attempt" (just modified the _GUIImageList_Draw example) of course without sucess.

#include <GUIConstantsEx.au3>
#include <GuiImageList.au3>
#include <WinAPI.au3>
#include <GDIPlus.au3>

Example()

Func Example()
    Local $hImage, $hGUI, $hDC
    Local $hHBITMAP = _GDIPlus_BitmapCreateFromFile(".\muybridge12-hp-f.bmp") ; 804 x 54 pixels

    ; Create a Bitmap object from the bitmap handle
    $hImage = _GDIPlus_BitmapCreateFromHBITMAP($hHBITMAP)

    ; Dispose of the original capture since we now have a bitmap image we can use with GDIPlus.
    _WinAPI_DeleteObject($hHBITMAP)

    ; Get the graphics context of the bitmap image.
    $hGraphic = _GDIPlus_ImageGetGraphicsContext($hImage)

    $hGUI = GUICreate("ImageList Draw", 400, 300)
    GUISetState(@SW_SHOW)

    ; Load images
    $hImages = _GUIImageList_Create(804, 54)
    _GUIImageList_Add($hImages, $hGraphic)
    ; _GUIImageList_Add($hImage, _WinAPI_CreateSolidBitmap($hGUI, 0x00FF00, 32, 24))
    ; _GUIImageList_Add($hImage, _WinAPI_CreateSolidBitmap($hGUI, 0x0000FF, 32, 24))

    ; Draw images
    $hDC = _WinAPI_GetDC($hGUI)
    _GUIImageList_Draw($hImages, 0, $hDC, 4, 4)
    ; _GUIImageList_Draw($hImage, 1, $hDC, 40, 4)
    ; _GUIImageList_Draw($hImage, 2, $hDC, 76, 4)

    _WinAPI_ReleaseDC($hGUI, $hDC)

    ; Loop until the user exits.
    Do
    Until GUIGetMsg() = $GUI_EVENT_CLOSE
    GUIDelete()
EndFunc   ;==>Example

Could someone show me the right way to go?
Thanks


small minds discuss people average minds discuss events great minds discuss ideas.... and use AutoIt....

Share this post


Link to post
Share on other sites



What do you want to do exactly?

Your example will not work!

Br,

UEZ


Please don't send me any personal message and ask for support! I will not reply!

Selection of finest graphical examples at Codepen.io

The own fart smells best!
Her 'sikim hıyar' diyene bir avuç tuz alıp koşma!
¯\_(ツ)_/¯

Share this post


Link to post
Share on other sites

#3 ·  Posted (edited)

I would like to load one or more images into the _GUIImageList() (or even a single strip image like the above example ?) (not just colored squares), and then use those images to draw them on a picture control for example
I don't  even know if this is a possible use of the _GUIImageList(), but according to the _GUIImageList_Draw example in the help, I think it should be feasible.

Edited by Chimp

small minds discuss people average minds discuss events great minds discuss ideas.... and use AutoIt....

Share this post


Link to post
Share on other sites

Then try this:
 

#include <GUIConstantsEx.au3>
#include <GuiImageList.au3>
#include <WinAPI.au3>
#include <GDIPlus.au3>

Example()

Func Example()
    Local $hImage, $hGUI, $hDC, $iX, $iY, $iIndex = 0
    _GDIPlus_Startup()
    Local $hBitmap = _GDIPlus_BitmapCreateFromFile(@ScriptDir & "\muybridge12-hp-f.jpg") ; 12 frames a 67x54 px -> 804x54 px in sum
    Local $hBmp_tmp = _GDIPlus_BitmapCreateFromScan0(67, 54)
    Local $hCtxt_tmp = _GDIPlus_ImageGetGraphicsContext($hBmp_tmp)

    $hGUI = GUICreate("ImageList Draw", 400, 300)
    GUISetState(@SW_SHOW)

    ; Load images
    $hImages = _GUIImageList_Create(67, 54)

    For $i = 0 To 11
        _GDIPlus_GraphicsDrawImageRectRect($hCtxt_tmp, $hBitmap, $i * 67, 0, 67, 54, 0, 0, 67, 54)
        $hGDIBitmap = _GDIPlus_BitmapCreateHBITMAPFromBitmap($hBmp_tmp)
        _GUIImageList_Add($hImages, $hGDIBitmap)
        _WinAPI_DeleteObject($hGDIBitmap)
    Next
    _GDIPlus_GraphicsDispose($hCtxt_tmp)
    _GDIPlus_BitmapDispose($hBmp_tmp)
    _GDIPlus_BitmapDispose($hBitmap)

    ; Draw images
    $hDC = _WinAPI_GetDC($hGUI)

    For $iY = 0 To 2
        For $iX = 0 to 3
            _GUIImageList_Draw($hImages, $iIndex, $hDC, 4 + $iX * 67, 4 + $iY * 54)
        Next
    Next

    _WinAPI_ReleaseDC($hGUI, $hDC)

    ; Loop until the user exits.
    Do
    Until GUIGetMsg() = $GUI_EVENT_CLOSE
    GUIDelete()
    _GDIPlus_Shutdown()
EndFunc   ;==>Example

Br,

UEZ

1 person likes this

Please don't send me any personal message and ask for support! I will not reply!

Selection of finest graphical examples at Codepen.io

The own fart smells best!
Her 'sikim hıyar' diyene bir avuç tuz alıp koşma!
¯\_(ツ)_/¯

Share this post


Link to post
Share on other sites

thanks UEZ, at least I begin to see some horses drawn... :)
but looking the help for the _GUIImageList_Add() command about the "$hImage" parameter I read:

"Handle to the bitmap that contains the image or images. The number of images is inferred from the width of the bitmap.",
I think that I should be able to load more images or just a strip of images in a single picture, and then simply use _GUIImageList_Draw() with the appropriate $iIndex parameter to just peek the indexed frame. I think in a way similar to how you read elements from an array. I may have misunderstood the meaning of the help?


small minds discuss people average minds discuss events great minds discuss ideas.... and use AutoIt....

Share this post


Link to post
Share on other sites

#6 ·  Posted (edited)

Then try this:

 

....

Br,

UEZ

 

Thanks UEZ for your example

better studing your instructive example, I have seen that it's necessary to use the _GDIPlus_BitmapCreateHBITMAPFromBitmap() function on the loaded image before it can be used by the _GUIImageList_Add() function.

furthermore, by making test on it, I have seen that it's not necessary to split the source image in single frames, it can be loaded as is, and as written in the help, "The number of images is inferred from the width of the bitmap"

#include <GUIConstantsEx.au3>
#include <GuiImageList.au3>
#include <WinAPI.au3>
#include <GDIPlus.au3>
HotKeySet("{esc}", "Quit")

Example()

Func Example()
    Local $hImage, $hGUI, $hDC, $iX, $iY, $iIndex = 0
    _GDIPlus_Startup()
    ; Load Image
    Local $hBitmap = _GDIPlus_BitmapCreateFromFile(@ScriptDir & "\muybridge12-hp-f.jpg") ; 12 frames a 67x54 px -> 804x54 px in sum
    Local $hGDIBitmap = _GDIPlus_BitmapCreateHBITMAPFromBitmap($hBitmap) ; "Create a handle to a bitmap from a bitmap object" (?)
    _GDIPlus_BitmapDispose($hBitmap) ; free memory

    $hImages = _GUIImageList_Create(67, 54) ; dimension of the single frame
    _GUIImageList_Add($hImages, $hGDIBitmap) ; add the whole strip to the ImageList

    ; Create the example GUI
    $hGUI = GUICreate("ImageList Draw", 400, 300)
    GUISetState(@SW_SHOW)

    $hDC = _WinAPI_GetDC($hGUI) ; Retrieves a handle of a display device context for the client area a window
    Do
        For $i = 0 To 11; loop all frames
            _GUIImageList_Draw($hImages, $i, $hDC, 4, 4) ; Draws an image list item in the specified device context
            Sleep(50)
        Next
    Until GUIGetMsg() = $GUI_EVENT_CLOSE

; free memory
    _GDIPlus_Shutdown()
    _WinAPI_ReleaseDC($hGUI, $hDC)
    GUIDelete()
EndFunc   ;==>Example

Func Quit()
    Exit
EndFunc   ;==>Quit

Thanks a lot :)

One more question please,

do you know if in this example there is a way to "Delete" the drawn image from the "stage"? (preserving the background)

#include <GUIConstantsEx.au3>
#include <GuiImageList.au3>
#include <WinAPI.au3>
#include <GDIPlus.au3>
HotKeySet("{esc}", "Quit")

Example()

Func Example()
    Local $hImage, $hGUI, $hDC, $iX
    _GDIPlus_Startup()
    ; Load Image
    Local $hBitmap = _GDIPlus_BitmapCreateFromFile(@ScriptDir & "\muybridge12-hp-f.jpg") ; 12 frames a 67x54 px -> 804x54 px in sum
    Local $hGDIBitmap = _GDIPlus_BitmapCreateHBITMAPFromBitmap($hBitmap) ; "Create a handle to a bitmap from a bitmap object" (?)
    _GDIPlus_BitmapDispose($hBitmap) ; free memory

    $hImages = _GUIImageList_Create(67, 54) ; dimension of the single frame
    _GUIImageList_Add($hImages, $hGDIBitmap) ; add the whole strip to the ImageList

    ; Create the example GUI
    $hGUI = GUICreate("ImageList Draw", 400, 300)
    GUISetState(@SW_SHOW)

    $hDC = _WinAPI_GetDC($hGUI) ; Retrieves a handle of a display device context for the client area a window
    Do
        For $i = 0 To 11; loop all frames
            $iX += 10
            $iX = Mod($iX, 410)
            _GUIImageList_Draw($hImages, $i, $hDC, $iX, 4) ; Draws an image list item in the specified device context
            Sleep(50)
        Next
    Until GUIGetMsg() = $GUI_EVENT_CLOSE

    ; free memory
    _GDIPlus_Shutdown()
    _WinAPI_ReleaseDC($hGUI, $hDC)
    GUIDelete()
EndFunc   ;==>Example

Func Quit()
    Exit
EndFunc   ;==>Quit

edit:

removed previous post content

Edited by Chimp

small minds discuss people average minds discuss events great minds discuss ideas.... and use AutoIt....

Share this post


Link to post
Share on other sites

#7 ·  Posted (edited)

I didn't know that _GUIImageList_Create() can handle an image this way using sub frames (nice to know).

 

You can use WinAPI_RedrawWindow() to erase the gfx.

 

#include <GUIConstantsEx.au3>
#include <GuiImageList.au3>
#include <WinAPI.au3>
#include <GDIPlus.au3>
HotKeySet("{esc}", "Quit")

Example()

Func Example()
    Global $hImage, $hGUI, $hDC, $iX
    _GDIPlus_Startup()
    ; Load Image
    Local $hBitmap = _GDIPlus_BitmapCreateFromFile(@ScriptDir & "\muybridge12-hp-f.jpg") ; 12 frames a 67x54 px -> 804x54 px in sum -> this is a GDIPlus image
    Local $hGDIBitmap = _GDIPlus_BitmapCreateHBITMAPFromBitmap($hBitmap) ; convert GDIPlus bitmap to GDI format which is usable for _GUIImageList* functions
    _GDIPlus_BitmapDispose($hBitmap) ; release GDIPlus bitmap because not needed anymore

    $hImages = _GUIImageList_Create(67, 54) ; dimension of the single frame
    _GUIImageList_Add($hImages, $hGDIBitmap) ; add the whole strip to the ImageList

    ; Create the example GUI
    $hGUI = GUICreate("ImageList Draw", 400, 300)
    GUISetState(@SW_SHOW)

    $hDC = _WinAPI_GetDC($hGUI) ; Retrieves a handle of a display device context for the client area a window
    Do
        For $i = 0 To 11; loop all frames
            $iX += 10
            $iX = Mod($iX, 410)
            _WinAPI_RedrawWindow($hGui) ;redraw means erase graphical content in the GUI
            _GUIImageList_Draw($hImages, $i, $hDC, $iX, 4) ; Draws an image list item in the specified device context
            Sleep(50)
        Next
    Until False

EndFunc   ;==>Example

Func Quit()
    ; free memory
    _GDIPlus_Shutdown()
    _WinAPI_ReleaseDC($hGUI, $hDC)
    GUIDelete()
    Exit
EndFunc   ;==>Quit
I added some more comments to the source.

You can draw a retangle to erase also the background of the drawn images.

Br,

UEZ

Edited by UEZ
1 person likes this

Please don't send me any personal message and ask for support! I will not reply!

Selection of finest graphical examples at Codepen.io

The own fart smells best!
Her 'sikim hıyar' diyene bir avuç tuz alıp koşma!
¯\_(ツ)_/¯

Share this post


Link to post
Share on other sites

#8 ·  Posted (edited)

<...snip...>

I added some more comments to the source.

Br,

UEZ

 

Thanks a lot again UEZ for the useful and well commented help

(I'm been lucky! getting your help It's always a pleasure)

if I'm not too boring, I would have one last...(?) question, may it be easy to define a transparent color in the picture or is it a complicated thing?

for example if I edit the source image and I paint around the horse with an uniform color (example green), is then possible to set that color transparent in some way, so that when I use _GUIImageList_Draw() only the horse is drawn but not the green around that should be transparent?

You can draw a retangle to erase also the background of the drawn images.

 

 

.... ?? what does this means ?

maybe is it a way for transparent background ?

Edited by Chimp

small minds discuss people average minds discuss events great minds discuss ideas.... and use AutoIt....

Share this post


Link to post
Share on other sites

#9 ·  Posted (edited)

While posting #7 I had in mind that you probably will ask the transparency stuff but I didn't want to forestall.

This should answer you questions:

#include <GUIConstantsEx.au3>
#include <GuiImageList.au3>
#include <WinAPI.au3>
#include <GDIPlus.au3>
HotKeySet("{ESC}", "Quit")

Example()

Func Example()
    Global $hImage, $hGUI, $hDC, $iX, $hBrush, $tRect
    _GDIPlus_Startup()
    ; Load Image
    Local $hBitmap = _GDIPlus_BitmapCreateFromFile(@ScriptDir & "\RunSpriteSheetCOLORED.png") ; 8 frames a 40x64 px -> 320x64 px in sum -> this is a GDIPlus image
    Local $hGDIBitmap = _GDIPlus_BitmapCreateHBITMAPFromBitmap($hBitmap) ; convert GDIPlus bitmap to GDI format which is usable for _GUIImageList* functions
    _GDIPlus_BitmapDispose($hBitmap) ; release GDIPlus bitmap because not needed anymore

    $hImages = _GUIImageList_Create(40, 64, 5) ; create image list in 32-bit which supports transparency
    _GUIImageList_Add($hImages, $hGDIBitmap) ; add the whole strip to the ImageList

    ; Create the example GUI
    $hGUI = GUICreate("ImageList Draw", 400, 300)
    GUISetState(@SW_SHOW)

    $hDC = _WinAPI_GetDC($hGUI) ; Retrieves a handle of a display device context for the client area a window
    $hBrush = _WinAPI_CreateSolidBrush(0xFFFFFF)

    $tRect = DllStructCreate($tagRECT) ;create struct to define rectangle coordinate
    $tRect.Left = 0
    $tRect.Top = 20
    $tRect.Right = 400
    $tRect.Bottom = 84

    Do
        For $i = 0 To 7; loop all frames
            $iX = Mod($iX + 10, 440)
;~          _WinAPI_RedrawWindow($hGui) ;redraw means erase graphical content in the GUI
            _WinAPI_FillRect($hDC, $tRect, $hBrush) ;this will erase the background instead of the whole graphic content
            _GUIImageList_Draw($hImages, $i, $hDC, -40 + $iX, 20) ; Draws an image list item in the specified device context
            Sleep(150)
        Next
    Until False

EndFunc   ;==>Example

Func Quit()
    ; free memory
    _GDIPlus_Shutdown()
    _WinAPI_DeleteObject($hBrush)
    _WinAPI_ReleaseDC($hGUI, $hDC)
    GUIDelete()
    Exit
EndFunc   ;==>Quit

;Code below was generated by: 'File to Base64 String' Code Generator v1.18 Build 2014-08-02

Func _RunMan_Anim($bSaveBinary = False, $sSavePath = @ScriptDir)
    Local $RunMan_Anim
    $RunMan_Anim &= 'iVBORw0KGgoAAAANSUhEUgAAAUAAAABACAYAAAEc4J6IAAAACXBIWXMAAA7DAAAOwwHHb6hkAAAgAElEQVR42u1db2gd15X/XTnO84cXunY2yGvRMTbpZqnbjcElJq63GofWrIuyTYq7LBXI2KG1YygE0g8RuDwJG14/bNmYBTvu0hiLvnyoRdtNxbpxQjTaONE6YLDiqJC1kfAUUYls5S16H/LsTe5+mDnzztx3Z+bOn/ee0uiCkDRv3pkz5577u+ece+85wKepyesvS/WabdtJ1yQAOXUBsiB6ACBbrk1dgKwcfUqq19SHaK7JwQGPSSnlupTfjb4mZfNatVqVgwMtXEvdm1SOQ1qWFbqvWq1Kx3GSpCBNrlFP2LYtpZSihz6oTQD9Kw7YwwUA8Ze3nRZVeGydy//tef/tYdi2LdT7HCf0XeH/qNc4s+g/1LwmhJA9ADA8PCwAiMUDQ3BdN0TkwcGhEMXRMxDKNfmnz+0nPeLSEUdPDLW83CN7LfWS0FzDI3stHD0x5NErlUpyYHC/BNC8CMiD26A+NOgWfmFgcL8sl8vBtXK5LIkOp6f7rnIPNN8JN0W/ACD0cN3nccjAv6ujp/k8uCalFJ8uGKxVj8Xim+u6EoCsHA9LTYdtGhyMwkv1mvY+CUB+ffeO0HAnfFMgoAWzblw8KZXukOq9Uxf011S91F2D67qEbaE32bhxY+ia4ziSpEjXDvoSLZVKoe86jtOCecpI5/dIDS4G35WWZcnKLn82WJwJEb1x8WRIYv7IhgreupGuA2/e7fwl6Lrumnao0zWCHw4p6jXdjOPTa7mmg5SYaxKWZVH3hB7sD/UWZlRYYJ9L+py+yx+suxYnGB38wLKslg9M/9dhFmPWmF4SrmY10ZKISp3plZFWO/hL9R78XXoipllp27bUDM4WmBs5+yq+vnuH9qapC01MHzn7qrb3HMcxoqWaARrbBFEwLK+/rL3JBxnJhIgEevGNY71vz8qoh9Ico4H3oA0OePdZliWllFJjZgT3EfxbliUZrmj5I3s7ZHMr/NF7RAha8vts2466D47jSOpk3X093KnoP+SZs7ZtY9OmTTiowQ7btgEAb71nwbIs1bQOtdqEZxo/++yz2LBhA5aWlrS9+9Z7FoaPWxgcAFzXheu6otFotGBW/6Hm76mpKQjRaooRf3Kro5rz2sbNd9u2oZl3Q8/m1pG8/nJYOKVSSTYaDVHZBTm7DIzPe8RvXDwpv/ydH4koK/jcqTFofI1AQAOD+wEAE7XLUff0HD0x9PHC/GLSfSHTznGc2PsM+QvNZOdOjcXyqN7Xw7Gl0Wjg6IkhuXhgCOPzgG/cQBGetCxLHtwGuTC/CHrpqGZZFja8cxl92zZDY1/QC3y8ML+IidplTNQu6+4LsPnoiSH5yF4r7E9pvAk+e+r8tgSc1fJInXHu1Fj42WRjmJgNOjzR4RXXaq1NEvEM+p9DRxR/OjNEx1/c84mGyT3q/586d26trTVlbCzOtDh7UfepIcestNIa0aYGfJH3mbxMYpyKt9OnT8cavWloKS+Siybz1gu5z/RGSR5G5ehTkZrlum5gzMbcZ0RLx59t21HeQdPYTtYYqXPPogz4RHePv0ySm1Q5Hu2tUIwmuO/6y5HCYe6e1oCN8pSSOpitDsS+R5r7kkaIjHgZ6MJ15KLFuHIhdy8qrkn3VKvVgFYUTYMXkTzmGeOiSS4Yuk+3KsJlo7uvh90o+g8Bt1zPpbEsqyVEzt2Zt96zcHjAjcWq738nGM6Ym5vT3vPwH7zP92wZxpUrV2BZFi1+aF25/kMef1LKyGAzAFTO24mGcv8hiJj7MHUhuD/yvh5/uAU3LtRtzMzMYGVlBYddVx2WACCq1SoA4Mc/K5EvrDUo37zqCadUKkUyef5DC/OTFt68Ci682JcaGRmBECLK1xWO42BkZAQjIyPBNQ2eIkaLQQrlOA4FFGI9ltBwpPh0XKSlsstbefKXKiJxkO6LE0plVwg6'
    $RunMan_Anim &= 'TMJZkqIkcf4yOfxRgqKIDB+Wugkl6j4A2mACDm4Dxue9XpDXX5Zi55GWXiRf0PdhI7WG+7W6+6SU4tiPDn3ywRUX5b77MVG7HOv4+y+CpGCCYYAAvn8dex/xyOgFPIYCqo1GQxw9MYQHB4cCB1zsPKLFo3OnxsQHV9xEm7Jv22YSinbICCG8tYC++yngEBl0oMAABRPiWoLQQizErS9wHjkPdG8QjaFh+8EVFxRloWhMhPMvy333J3J3acwxjoacOzUm6gt3Y4cu0wDtC/NFGZNnUpCAaJrwqI2IVI57K0h8lUinCYw5vuoUG22Jw0DLsgIalmWR6aMVirJEJqMEqIa/EoSZeA/bLaCP3ESFcuJW5pNCTSSchHBSi7aYrJQVxZ/J50k89gBAvV7X4sWmTZtaGFLv9e+J9B7K5XIkfQBi06ZNUOmvrKz0xD0zTmC6e+P4Y58nYmQcj2stY1uLqK61tkY8k3StJwPBojYPBFGkGxdPxq3hG8d2iZ6hU9MRvtoow4BPef1ls3X/9tOTCj0K32q3pmUhKOHv2MrQybJarYYCRESPeavG9BRaUGikoSWVDR65+IoNN2TnsS18KtGEvPSkwqORQosk4VWrVQwPDwea/P7NBXzpC30Y+ekRjJ4xnsKlH1gLxblGvv8yvnH0J8G1N67OGtFTX+bNq8DoGYR2Jb1xddbUxAjxFkFLZFW+qQtBEFXwEI8fncnEI7WvPRreCeUHLZBFhpXzNiZfHMpKr4W//kOevrD31L7rfckEh1E57nUKAHz5Oz9K3RGO46DftikYC8CLem/9hxHcvn0bALBhwwZjgm9eDf9/y20qnZRSu+HIhN4tFlh6/b/eBwBs3bqVu6RYWlrCRx991KNGZyIi2aGottIZqeWndvK+58YwOTnp/b1vn/GgcBwHuG23BJf3PQeVnowZIJIFpVvoEX8sNksxVaHVyKkLkG9eBZ55wUWtVsNHvx8OdXBtIoi2U4fQ3yJh2sWeLcN48yqw4fNVnD17Nvhw+/btIQGkQQTHcYJdbNWqR3f79u2YnJwMlCZpZcCPk64bEeL/nnG99x4ZGcHNmzcxNzeHp59+Gnfu3IFleWFH2pmn23WXhDCECrZtY3JyMlCYhM1l0nEcCL9z5VaHr1C0KFCM/CQAMXXB273I7ycZ0m9Oz1caEYfuxFccrTh6ghMkhHrmBW/9jAhZloXt27ejr+xgoW5jbm4OrusSMiZN46JyHPKWC1TPeJ1MUzoAbNy4EQBw586dNF65bg8phoaaU8jS0pKRoti2LftXHMwuAz8Yad1CSUtnL7zwQiLqxQ0S+pt3jq8EifIjZVY7mv+dQCtEh0wCLoMYhdHRJSST7N5YegptoVPAgKDrurAsK7ipsgty6oHmS8/NzQV7et/9OHkNsnIc0p/CBbyNhOjt7cXS0hKe3NLA+DxQqx7D4PBLqWwYf1+uBICD27zr4/NAqVRCo9FIpdCWZeHwQy5GrzVpMYXMZQNSp+vWX3VHDGMGnCDFpjYyMgLHccjeMp49VAXWIKBgW4C5PadbG5Ym9OCvBHJbU8twqVSSvb29NI2REgIA/D3TgTAsy8LtV0fwyqV3AcBIiSoMwZ7wjfQbF09Ct/86DS0AwHEAZ4DRdEojAEiVr59eBH7+G5kW+SKROiX6pZoBUiigVqnj4sTkPEUpoAl/uhkXgJm1XgHkrP/3juOBTSgiXiaxHT0xJGkp+ZG9Fl9JzIQ0tFpKa/LUkjb56/jy940HtOoLdwOaBmv9WTsEaflUryUdQDCVoYauKIK/KF5FWoIL84vo27YZmy+NYfRaeputsgsYvdZEhAI6F/DOhWN83tsrwA9cpFBCWdnlITxN5YQOpJBZkYsrdsbOjd2fkUdZdH2s8pqSrlS+G5Kjej0Iw/ANgI+tc/HbD8v4yle+EigdUxLPRhocwtEDkAYjT1qWheVlv2d314FrAB1ZijBuUymft2eugcGBFl5Fig7ANX5SaP6yIKX8'
    $RunMan_Anim &= 'yYu/hP2tPbE0dSv7g899O0Sf7UMJKWaS/NTF6nq9DrYLiiuLLAKhOe0Mg01r3pTLZdRe/CUGn/u2ni5tFCqXyzzLROKmbINoedLpn6wrAwFtzntayfPvavb2yFKpJEulkjy4zcvoEnUiSTnl9GmRX0A/dPQ+Q+Pvr6Ej+edaOabZBaZ2HPKta/IjwamW0Oh7eXhQaLSMTCmlUN41DgFllg7LKz+N4qf+bl4+NMcMW+So3COAHLth+JRN02u9Xs9CU1KgN5imEb8HS+Uj5/ODd1leXjZ+bt6mQ7Ss8tPtJ0vzHpyXrDLU0FnbabXW1tpaW2uxbQ0m11o7W+KG1G4qoJSLM8DiNbxy6d1Uy3BaYoszEovX8P7NBdqxI/LyNXL2VYye+/VqHaSSJ6ZKuQrSdnrq6cKoVZSu7YimTgaA//79S8jrCRItAKFtX3n4wrpfA8WmjitOfkxZ/nPmSC4+pZSiCHpSelluKcQidh4JflCAwgS7W+POA0c1PxNbiOTp06eD4/cpt763xJnAsrKl2f4dlRA5I19JCBP6SfPlJD4zbKFvkWEeepqz2nn5C2t0zu3kcByHtuRziM68Pb2o7f2q4PK+Z5IC0u+0ZyTawGdoi38R/ct5VAZaJD0Rh1j+nkDBNJoeZrIXMETLsixMXWjuPh49A1SOPhXcM3ru16Z2W2ibE22h57Tevn7TaBu9nx044It2fWfkS4tYXH7+/3AcJ7RVPw2f1GjLe5KNFaN8LVumctAD2C562lOZZ0s+AGB6ehrValUODw8LOg8CAF92nKCzTNr8pBUI74ndTSV8+/rNTFCibk0fHABGnv2H0PkSk2bbdrBJ84nd3rVbbna+NPTBdyE3O3iI7CyjDha3W7fj5w5/MJrqJtwM/aEmYkf/IRjZfpFOiGVZ2LNlmLbmS7HzCMbfuJblTEjLGQ5qr597Hq+fex6Hn/q7/B75o4fx+rnn8cbVWTqQlLn9yw//Ca+fex5f3fkFzleqaYl3sKo8YueRlgNFnQypqfy0KPejh1OhadTgo2TKmqTK8UxHnTrL8tKu68qoMybEHDtEZDQFq17uLddL2UUHnPbt25eYyJd5zNKAL1iWRdv8TfiMPMWWNCVFTeVCOfQToKq5/Pj2+Ralq5z3TAOiF3MexJgegMTzLz1JGk3oZVmWkUartPwzIOKZF1zccpsnz/wccC1/m4z00TMIaHGl2bdvH/bt20f54IyY5LRqE55A6RyIyldvb29surRExnceSSM7bjcKOg/CEYZvf9cdBFLoCH5wiU+79LdmO33cDhzB7+X8xUzpMs4GDDRad4SSOlhKia1bt4ZOyMV4qhgeHqaaUEGnUuOn4lKGdIITbK+99hpqE3ZmWhUAo77i1SbswEmgpDV0Ko6diMtlExJaRR1T1DkKUxcg+2NOnBkosQAgxW0b/YcgCFUz0ow8YefXCpCcXNJx0Z4ojd73j04IGdQO9jskdjgPDw8LOlM8OBD+jDJcGp5nbbFPh4eH8cIzjdCpsL6yw7NhmkzBArs8JWQnwDD5Cxt37tzBzMwMHMcJpl7/lJ0RXbnVCbJq0o8hWqlOkldgIcIJMZUfoyNZPwuVl7T9MXUheCfBldG09UA5skdEpqenUZuAoMoWMzMz6Cs7AYNPbmkEp8eSprjBgeb0Rgg2egaYmZnBzMxMUOUizQjkiu26LqrVKt56z0o0jpX2ydQDNmb995j8hWfLEN25uTlMT0+nPWHH7TckdEoiTVI+OlVHp+A4Tf9/YUrHV5ZEhYkZKHQiEappECcHn57UTsFk6w0ONEcHKQsx8h9vzwCYwZ07d/AYgB0AxuO9MglA+DaanJ6eDk3Drut6CUXvpPb2JFfs7/1wLjiwTcc909B692MLgBt0FNGtTdipPUweMyXUErftloPgprwxe03qOtSAXnDqzStDE47pRikMswelcg5GPdkWStnrK3dc9lpMvjgUJI7tIa+Xgsrf+2GrRveveNe++dU7eOCB'
    $RunMan_Anim &= 'B7yL2+AdgYxHGmJGVo57U7LrulhaWgopSa16zNhp4K02ATF1Afi3f7bx5JYGntzS4HSFIUoJdUppzIKje9bwkIjqXIZg0lB5gs7VKY4fX0zqB8HPIDMeRBxqEX3N0qHQTeFxcubITTzfRyOMwhHT09OEUHRIXQCQ/V90gKtAY50L1xfM+QkLlgXcfvc3Umx+NOplBE3F1MiQp5NsTyM4F5wWHSQhlkI7ldLQO+Iq0M/4lFL2pM0zw/mjg/NfGwqHdFLaSSJqamzarUO6VYdIuzIuvzZ/bnOQxB56EoSSadCY/tfm/eCZC6iIF3YDuBocTA/BcK16DN898JjR8o3uIPlff/4YBodfyoQ2usPkypnl1HSIrwwH3CPDDppD6VnRNepQelp6UjedahQ/2KaVJltWwkAKzo3oluJEo9GQLOgatNllvUZ/98BjlBkhkcFRvzN4nvFr789lnuoW2SHya5cBfA4ALqc+njiK5pHChflF4E8ABoEBQOY4s0yRBWmCbKZNPfp4bNzJQk9E0QOAc6fGSIYi5XaqqEPu/AiqiAtEkxIGN85eA2bPAJgHdhzwahqHYHTnEUIwo5aU5D5te2Svhb5tm1FfuIv6wl06c5zapqRzu0SLWlLyfhMvULH9cjXTnPR5mq9EhewE4ueh1awJJhtS5f/YNh48MYQHTwxh6ne2zvMVKUagIIaoqIGPMDLryy3ML7Z0SsTB90Shc1oaRcx07tYXfOgnRxMRSiiLUmj1AH1e5VPpcCVMtSN6YX4RjuOkHR3BfjCqpkGMERJmURbeNrxzOY0torcBdwGbL41hwzuXMTgAOI7TE6WIBbXU8kOx+xNNp3iZ47sA0BOH2D0JiiLJXqOUFwOD+/HH2hgvURXbaD21XC5jdtmriTAwuB+2bScWzTXpHL60p5najY3mxQNDuPY3+/HRnv340+eCKVzQu7NCRGkUJTLpj+kgLpfLLT+EogVNxSahoDy0WuxxzncP70jLslAqlQJng5IH8ZLShDaLm9JPJTsOMMEqdYIyoqAAvByFlePeiynJjjK1idplSClFZRfk5ktjnFbkuq2qJDo0UJP85J3i+Pdz0BKapEGF2JrnTo0FGRFqL/5SmwUt5AVTEHfHAWD8DLSpzsbnIQYG90vKkgWDhDh+xgHMXvJO3qvKkXcKXl5exk/Gyji4rY7x9B5rULYt5FgJIUulEp7c4iU9+vnPX+sRNZGnM8h2E4ohbuSx+xkLWhSjCDstwiYUBSCpEEIEmRvK5TJeOnlBOyWH8rMYJCcytkkM8o5ktm14LauMuU1CuWW4k0E5YTS5Z9ZFIKAuMdGqlh/R902FPMmJQu/PB5gmJ4zUBhtJSw1zeshyuYx79+4lrjyUy2UZl29Eye2SCrlom9T69es5Sog0Cry8vIx79+5h/fr1uueHUsvF0M8kPxOek+SXMx+LNvVbWvQzqJcWeg5/hnFRNrUpRd5kzNSRJkSTJjsXAHDlE0i/BId79+61THF8gLquq74rEt61UEegXfKjKTHHs7TmQZQcI64HCiiyCK+3t5cb3bnDAz4taao8BcTBRG9vL9avX887Q51ixe3bt3v86oSRVRezKl+35BehLFl5EBqlbpHjyspKixxzl3wkdEgoOZkGTU0FEUKnrM9XEE4C+FhjScscicozoVGHYowhZMrDg6LMXZPjWltra22trbW1ttbW2lpb9e2znJ9SrmKZrEbe5JoOfabkuarHB09jFGIu5b7sz6LyevlPAfCUlu/fXMB7t7zUS1kPB7STt/E3vP+z5urKxowUQohPVhNPfxb6dz0+K1CGwxWfCf4CfYzgz0/3lae8aKEDWfKUqjcunsyUVrXg2Ys6WM2aKG9cPMnTobaTz9XI22qWV56BrP3pAK+p5Un/s6ylsv14IntUgFkl/IUyp2pkG6RD5il4ib80mV9FwRJtWgzMWggshknvzC8rXF244FzXDdJp+FXZRZRy6o5JUkKmNvC4GnnTFa5e'
    $RunMan_Anim &= 'LfJqixXTZishtzyVhKGiTeASx2O3+UvikR8Rbn5BfyY+kb/78gxmfzdUMzGiv8bsJ0jA6dOn8atf/UorwNEzmauKJjblcL72DDeBMrUvvTgUCLCdg5l481NSS5YsQnSLtxh5iW7LK26ARABMaHBEDWI/R1NbdNBU/8KtKc9OuHCUUIMSX3BZdpE/GZM+KchjIHYekX6mGK1c07joIi+jGmumUIROy1dcGu+EHPgAgK/v3kHZpTvCG8+c3QXeZFRyXeKLMkN2QV5pB4rQWYAd1kGZlEa+NVV9JI9ts664IaLjrYv8xcrPTyroJZGOiVO2EwAl5cX1QS+KpuQDhje/eEdXwI8DjUEaKdFp3ghsVgtvKl+dDKekBeykQZxnkBQFfpzHDvexMX8xxV1WF39SAjPnQ/2ZBZxTu8Dzkxb2bIHWYhg9450wc103U8GYvPE1y7KCmBQVnFHBjxKt80z1lLOPlToofDCrNVKIP13tlG7wFsWPWrIijieKAavJ3P38ioUEzZOK9RRVdCcLMPfb5oWEOtzHqWRv23YSf4XyEyS3N5SfbdtUgoVV7DgclBVhHkIis5lKgMUNcHLjdAhdqx4reotJ1MKCtoYN4A1mnkbGdd2gY9XrRfIZVTn2lnKmj/PHeSNXb25urmjeWvjjsiIFZfKNk1dLmRelqkXuUsaprKyCrAQTV5y54yKOT3Lj+OBX+5iBgigKXIg/Exe9jfxJ7iVGyS7ORdcl31VqIIUKZiTxeF9SnKD/kKfcc3NzQdmaJOvKsixs3bo1GMAcoSnrdM5BLKk4Q61WAwDukkt1wPKmDlCeZZnAJUWtJmPDZfRMaOGopVEpH/p8+/btQUUW4q2NTfiLUqFWKpXQaDQCPqhulAp+UbJNUaOgLS3OSkgoDZTaouI1pRzHgYR+sKrX1JpUhhm2k8AlxCMHFyqmoQNDHcBE8ZdShi28TV0A4JVL4oAo+ReieClU8RX3QfqurIizroBmOvqHrbCrxAewitAEMJT5PCsIMj4DtycoFhzeltEyKFdWVmJpUz2udlhZGnlqLayNGzfG8lcUX+SyVti1UTQnPOKJgJADHVl8ruti7969URYfPWedEOKTIt25pBigOli4lVC0lcXdbtUFTztoCWBS8hayrFR+qLKRBkwEEgrFRPGXUn4t/PEQhcqjuu2lnfzdxwGFSi4Rkz/7scW3OEiqnA5Aa2ER2KysrGBmZia4rqbbeHJLAzsOuJi95NUGyQngUmeF0uDkhREJlPu/6GDqd02h0jsF1ZrmiwU/ki/xMnUBVGUeleNeWbDRM2HgOXv2bFIByNyTXxCX29W8eHA57II//vjjgbXg15DBLddFzW3yOzY2hunpaYyMjFDM7z4hxMfsQYUyThYWDRa+pcNx2mMpxOmfyWA04Skj+JnoX1CMUmP4CMdxZFaZ+ZNomhij6D8UDhGwyUJbWygrfyZWqtBZfjQ4qfH6grptLzrm+soOFuoRIAOvtJxvcWR2Q/xB2WLycyABgLNnz2oJqC5pG6w+RMmXrFSypGsTzcqzUfyShVVQPK2l73gf8RbFL7nEbCLsyEowBwvdQDIBnwJAJtLlNK2+oZb3K8gijeQnZt+kTAPQGWUpI76X5OaKvPxpniXiABAAJK+4xrZACJOBBHjFV7/5Va/wJRVOJQsL8DJPz17y/mbFvjLHAnklXT4QeE3z3t7eFiAhfsbn0Y5Fmii3PWQ5VHYB2B2edHT8UysIAL2YEFu5VSaCwHr415GwpU4y+8FIEHro1B7AVK6UCQAVBIKxg9IEAGlvWwELNNL0+Wld4bgar3xvXsp3kAZFgtPwp71X3TtIPIo4MKEZ/vHHHwcADA0N6dwyz6phbhRVMqRGdR7G50N1T+EV5oXO6mjLNgAOJjrwA4C/fbgPAKhUZ+EDu3LcO/2hArbnWvq8zYa/o4QJiuRpA4CPeDwwBMpoArNugvH1pdPH37TxLrIA09Q+KwAAU1utceAX6uRi9ylG'
    $RunMan_Anim &= 'gkxGgAneKW5jchFAmIO/kOyj+DMKYNKiRZQb2QKCtEp8NQx+XHjq4oTrupCLM3jl/FnjUq+pLEWft1t/pQcYDoDtAr8svGlk13GeHv5Da2XU8XkUur+vSJdPZ6WohSE7CH6JLmaUddIOPuLO2GYEGG/+LA7AZcRknyrOaMpfqn2ACe5YCwCSi5swiAOEfuXSu2ClhgtzRyuAnI34bIcf31JOO3QMbJJ4C6zCCWC8Q3yZ8KQ5GdKV9GEGMaQi435tc5VXoyxT8ifb+A7rAdxthwwLQ+hKhACfuMD2CkYXvJc3Lp4EgHbl5AvNbrry2OdOjWFgcD9y1ELPzBuv7vbBFQ/xyn33o75wt6WEY4f409b0pDr0ALS8Mf66MYjzDuAsK5q55KlrGavydZTHLvAps1ZA1JXDbBdKy6MnhvDBFVcLMF3u3BB/KghSiXYq0dktEKTOooLMKuh0EAQDhWPl61v4IqBWAZH+7rAcjQZJtwFGVy7+0wKCKu8d5FOayCyLXHuKYtC27WBQ0G8aQPS/aUXwNjVx7tSYcBwHj+y1QjwCCKw/Kr7djTYwuB8Dg/uDguAEiPWFu6gv3A3d10Y5ysouYPOlMWy+NIYN71zGwW1o4YtiSX3bNlON6IBHAsI28xk5gcS1LuqgYPWh8efQOiRLaQhsmfgtbC+ZavXxYuMTtcsBOn/3C2NQtoPkfn7U8bLDD3kgd/5D7+QCt1A5ACpF4DvtwgX8P7bO42l8vln0nPhVire30xIMFO6PtaZi7TgQiv2JKOu6m9ZqXmsg6/NN6jnW6/UW6ymKxy5ZgJKBRCoLq838JlqlUfpocr8oCkzotwom5FaSZbVjE7B4oFAzOsQz1TEHgL9/yCsW+tsPy6jX6wEvUfErznOnYm2qvFUQ1AFfJ8BPncR0z6zs8gYN6QTJNwePmcCkaLeoEwC4ykBQlsvlWLlG8brKwC/oiyh5q7wKEzC5d+8entzSaAGThEB4QPvgNm+gfLRnf+A2FV+uNT8AAAHsSURBVCjEgGcOfgDwLdsDwH93wgAYAyjdiAMG/NM52oPf8GTdmPWAkAFyR5TNwNoMeD78kBtskfnth2XY39qTR3aFAKBuYGSwIjrCc5eAJRXYcB6TFhW6BH6RfTD43LdjZSniwOTevXtYv359LJiwgWkiGKmCUN+2zYUroF8m3ngDpg4YO2kB0pE8DuAp36EwK9TQkosF7Ytzof2BfwHgf9sFJpr4j0g7qLqtf6sAACPd324AMZenoSUXqTf1el3drxrSRy0AtnEghugTwOZ8RovA0rpdbeDJ6JlLS0vBBFOv15FzIOWynOm9lfePe37LO2gUL5QUoQNgkglgu61/beApr7xBi0rkGneDFx1fcfqY9H2dPoqCO9N44PNWwNlWmcMsbxdPxjFLDeh0ws0I8aGCscmz1XPEaggiAwi2Xf/aBDa59K9LAGgKOB3zROKsuDT6mGANhjMVFdyZqeNdAEIWRAddv27xFLlo04X3j+QlDR/qOWJ2vQdoVgvsAJjkdrG7oX9d4skEADu+Ep0XBNPqY8dfULfKrIJAN2NgOl7aDYSr9f27NAi6CjbdkH+XeVptQFgICJq21XzmsAed27AquygvuUr6Rq4S/VjTv+6MV7mKMOKzpI9rba2ttbW21tbaWltra62j7f8Bp0HwicSheUwAAAAASUVORK5CYII='
    Local $bString = Binary(_WinAPI_Base64Decode($RunMan_Anim))
    If $bSaveBinary Then
        Local $hFile = FileOpen($sSavePath & "\RunSpriteSheetCOLORED.png", 18)
        FileWrite($hFile, $bString)
        FileClose($hFile)
    EndIf
    Return  $bString
EndFunc   ;==>_RunMan_Anim

Func _WinAPI_Base64Decode($sB64String)
    Local $aCrypt = DllCall("Crypt32.dll", "bool", "CryptStringToBinaryA", "str", $sB64String, "dword", 0, "dword", 1, "ptr", 0, "dword*", 0, "ptr", 0, "ptr", 0)
    If @error Or Not $aCrypt[0] Then Return SetError(1, 0, "")
    Local $bBuffer = DllStructCreate("byte[" & $aCrypt[5] & "]")
    $aCrypt = DllCall("Crypt32.dll", "bool", "CryptStringToBinaryA", "str", $sB64String, "dword", 0, "dword", 1, "struct*", $bBuffer, "dword*", $aCrypt[5], "ptr", 0, "ptr", 0)
    If @error Or Not $aCrypt[0] Then Return SetError(2, 0, "")
    Return DllStructGetData($bBuffer, 1)
EndFunc   ;==>_WinAPI_Base64Decode

It's a pleasure to help you.

 

Br,

UEZ

Edited by UEZ

Please don't send me any personal message and ask for support! I will not reply!

Selection of finest graphical examples at Codepen.io

The own fart smells best!
Her 'sikim hıyar' diyene bir avuç tuz alıp koşma!
¯\_(ツ)_/¯

Share this post


Link to post
Share on other sites

#10 ·  Posted (edited)

thanks UEZ for the example,

Using the example as is, I get a running man on a white strip, but controls that I have inserted on the windows remains hidden behind the white strip.
It seems that that white strip vanify the transparency.

I have modified your script by removing the white strip, and using again the _WinAPI_RedrawWindow function instead of _WinAPI_FillRect and in this way I got it working. The man is running in the foreground with transparency.

this is your script that I modified and that works for me:

#include <GUIConstantsEx.au3>
#include <GuiImageList.au3>
#include <WinAPI.au3>
#include <GDIPlus.au3>
HotKeySet("{ESC}", "Quit")

_RunMan_Anim(True) ; create the running man file on disk

Example()

Func Example()
    Global $hImage, $hGUI, $hDC, $iX, $hBrush, $tRect
    _GDIPlus_Startup()
    ; Load Image
    Local $hBitmap = _GDIPlus_BitmapCreateFromFile(@ScriptDir & "\RunSpriteSheetCOLORED.png") ; 8 frames a 40x64 px -> 320x64 px in sum -> this is a GDIPlus image
    Local $hGDIBitmap = _GDIPlus_BitmapCreateHBITMAPFromBitmap($hBitmap) ; convert GDIPlus bitmap to GDI format which is usable for _GUIImageList* functions
    _GDIPlus_BitmapDispose($hBitmap) ; release GDIPlus bitmap because not needed anymore

    $hImages = _GUIImageList_Create(40, 64, 5) ; create image list in 32-bit which supports transparency
    _GUIImageList_Add($hImages, $hGDIBitmap) ; add the whole strip to the ImageList

    ; Create the example GUI
    $hGUI = GUICreate("ImageList Draw", 400, 300)
    ; add 2 controls just to test transparency
    GUICtrlCreateButton("dummy Button", 40, 30)
    GUICtrlCreateLabel("Label on background", 130, 50)
    GUISetState(@SW_SHOW)

    $hDC = _WinAPI_GetDC($hGUI) ; Retrieves a handle of a display device context for the client area a window

    Do
        For $i = 0 To 7; loop all frames
            $iX = Mod($iX + 10, 440)
            _WinAPI_RedrawWindow($hGUI) ;redraw means erase graphical content in the GUI
            ;  _WinAPI_FillRect($hDC, $tRect, $hBrush) ;this will erase the background instead of the whole graphic content
            _GUIImageList_Draw($hImages, $i, $hDC, -40 + $iX, 20) ; Draws an image list item in the specified device context
            Sleep(150)
        Next
    Until False

EndFunc   ;==>Example

Func Quit()
    ; free memory
    _GDIPlus_Shutdown()
    _WinAPI_DeleteObject($hBrush)
    _WinAPI_ReleaseDC($hGUI, $hDC)
    GUIDelete()
    Exit
EndFunc   ;==>Quit

;Code below was generated by: 'File to Base64 String' Code Generator v1.18 Build 2014-08-02

Func _RunMan_Anim($bSaveBinary = False, $sSavePath = @ScriptDir)
    Local $RunMan_Anim
    $RunMan_Anim &= 'iVBORw0KGgoAAAANSUhEUgAAAUAAAABACAYAAAEc4J6IAAAACXBIWXMAAA7DAAAOwwHHb6hkAAAgAElEQVR42u1db2gd15X/XTnO84cXunY2yGvRMTbpZqnbjcElJq63GofWrIuyTYq7LBXI2KG1YygE0g8RuDwJG14/bNmYBTvu0hiLvnyoRdtNxbpxQjTaONE6YLDiqJC1kfAUUYls5S16H/LsTe5+mDnzztx3Z+bOn/ee0uiCkDRv3pkz5577u+ece+85wKepyesvS/WabdtJ1yQAOXUBsiB6ACBbrk1dgKwcfUqq19SHaK7JwQGPSSnlupTfjb4mZfNatVqVgwMtXEvdm1SOQ1qWFbqvWq1Kx3GSpCBNrlFP2LYtpZSihz6oTQD9Kw7YwwUA8Ze3nRZVeGydy//tef/tYdi2LdT7HCf0XeH/qNc4s+g/1LwmhJA9ADA8PCwAiMUDQ3BdN0TkwcGhEMXRMxDKNfmnz+0nPeLSEUdPDLW83CN7LfWS0FzDI3stHD0x5NErlUpyYHC/BNC8CMiD26A+NOgWfmFgcL8sl8vBtXK5LIkOp6f7rnIPNN8JN0W/ACD0cN3nccjAv6ujp/k8uCalFJ8uGKxVj8Xim+u6EoCsHA9LTYdtGhyMwkv1mvY+CUB+ffeO0HAnfFMgoAWzblw8KZXukOq9Uxf011S91F2D67qEbaE32bhxY+ia4ziSpEjXDvoSLZVKoe86jtOCecpI5/dIDS4G35WWZcnKLn82WJwJEb1x8WRIYv7IhgreupGuA2/e7fwl6Lrumnao0zWCHw4p6jXdjOPTa7mmg5SYaxKWZVH3hB7sD/UWZlRYYJ9L+py+yx+suxYnGB38wLKslg9M/9dhFmPWmF4SrmY10ZKISp3plZFWO/hL9R78XXoipllp27bUDM4WmBs5+yq+vnuH9qapC01MHzn7qrb3HMcxoqWaARrbBFEwLK+/rL3JBxnJhIgEevGNY71vz8qoh9Ico4H3oA0OePdZliWllFJjZgT3EfxbliUZrmj5I3s7ZHMr/NF7RAha8vts2466D47jSOpk3X093KnoP+SZs7ZtY9OmTTiowQ7btgEAb71nwbIs1bQOtdqEZxo/++yz2LBhA5aWlrS9+9Z7FoaPWxgcAFzXheu6otFotGBW/6Hm76mpKQjRaooRf3Kro5rz2sbNd9u2oZl3Q8/m1pG8/nJYOKVSSTYaDVHZBTm7DIzPe8RvXDwpv/ydH4koK/jcqTFofI1AQAOD+wEAE7XLUff0HD0x9PHC/GLSfSHTznGc2PsM+QvNZOdOjcXyqN7Xw7Gl0Wjg6IkhuXhgCOPzgG/cQBGetCxLHtwGuTC/CHrpqGZZFja8cxl92zZDY1/QC3y8ML+IidplTNQu6+4LsPnoiSH5yF4r7E9pvAk+e+r8tgSc1fJInXHu1Fj42WRjmJgNOjzR4RXXaq1NEvEM+p9DRxR/OjNEx1/c84mGyT3q/586d26trTVlbCzOtDh7UfepIcestNIa0aYGfJH3mbxMYpyKt9OnT8cavWloKS+Siybz1gu5z/RGSR5G5ehTkZrlum5gzMbcZ0RLx59t21HeQdPYTtYYqXPPogz4RHePv0ySm1Q5Hu2tUIwmuO/6y5HCYe6e1oCN8pSSOpitDsS+R5r7kkaIjHgZ6MJ15KLFuHIhdy8qrkn3VKvVgFYUTYMXkTzmGeOiSS4Yuk+3KsJlo7uvh90o+g8Bt1zPpbEsqyVEzt2Zt96zcHjAjcWq738nGM6Ym5vT3vPwH7zP92wZxpUrV2BZFi1+aF25/kMef1LKyGAzAFTO24mGcv8hiJj7MHUhuD/yvh5/uAU3LtRtzMzMYGVlBYddVx2WACCq1SoA4Mc/K5EvrDUo37zqCadUKkUyef5DC/OTFt68Ci682JcaGRmBECLK1xWO42BkZAQjIyPBNQ2eIkaLQQrlOA4FFGI9ltBwpPh0XKSlsstbefKXKiJxkO6LE0plVwg6'
    $RunMan_Anim &= 'TMJZkqIkcf4yOfxRgqKIDB+Wugkl6j4A2mACDm4Dxue9XpDXX5Zi55GWXiRf0PdhI7WG+7W6+6SU4tiPDn3ywRUX5b77MVG7HOv4+y+CpGCCYYAAvn8dex/xyOgFPIYCqo1GQxw9MYQHB4cCB1zsPKLFo3OnxsQHV9xEm7Jv22YSinbICCG8tYC++yngEBl0oMAABRPiWoLQQizErS9wHjkPdG8QjaFh+8EVFxRloWhMhPMvy333J3J3acwxjoacOzUm6gt3Y4cu0wDtC/NFGZNnUpCAaJrwqI2IVI57K0h8lUinCYw5vuoUG22Jw0DLsgIalmWR6aMVirJEJqMEqIa/EoSZeA/bLaCP3ESFcuJW5pNCTSSchHBSi7aYrJQVxZ/J50k89gBAvV7X4sWmTZtaGFLv9e+J9B7K5XIkfQBi06ZNUOmvrKz0xD0zTmC6e+P4Y58nYmQcj2stY1uLqK61tkY8k3StJwPBojYPBFGkGxdPxq3hG8d2iZ6hU9MRvtoow4BPef1ls3X/9tOTCj0K32q3pmUhKOHv2MrQybJarYYCRESPeavG9BRaUGikoSWVDR65+IoNN2TnsS18KtGEvPSkwqORQosk4VWrVQwPDwea/P7NBXzpC30Y+ekRjJ4xnsKlH1gLxblGvv8yvnH0J8G1N67OGtFTX+bNq8DoGYR2Jb1xddbUxAjxFkFLZFW+qQtBEFXwEI8fncnEI7WvPRreCeUHLZBFhpXzNiZfHMpKr4W//kOevrD31L7rfckEh1E57nUKAHz5Oz9K3RGO46DftikYC8CLem/9hxHcvn0bALBhwwZjgm9eDf9/y20qnZRSu+HIhN4tFlh6/b/eBwBs3bqVu6RYWlrCRx991KNGZyIi2aGottIZqeWndvK+58YwOTnp/b1vn/GgcBwHuG23BJf3PQeVnowZIJIFpVvoEX8sNksxVaHVyKkLkG9eBZ55wUWtVsNHvx8OdXBtIoi2U4fQ3yJh2sWeLcN48yqw4fNVnD17Nvhw+/btIQGkQQTHcYJdbNWqR3f79u2YnJwMlCZpZcCPk64bEeL/nnG99x4ZGcHNmzcxNzeHp59+Gnfu3IFleWFH2pmn23WXhDCECrZtY3JyMlCYhM1l0nEcCL9z5VaHr1C0KFCM/CQAMXXB273I7ycZ0m9Oz1caEYfuxFccrTh6ghMkhHrmBW/9jAhZloXt27ejr+xgoW5jbm4OrusSMiZN46JyHPKWC1TPeJ1MUzoAbNy4EQBw586dNF65bg8phoaaU8jS0pKRoti2LftXHMwuAz8Yad1CSUtnL7zwQiLqxQ0S+pt3jq8EifIjZVY7mv+dQCtEh0wCLoMYhdHRJSST7N5YegptoVPAgKDrurAsK7ipsgty6oHmS8/NzQV7et/9OHkNsnIc0p/CBbyNhOjt7cXS0hKe3NLA+DxQqx7D4PBLqWwYf1+uBICD27zr4/NAqVRCo9FIpdCWZeHwQy5GrzVpMYXMZQNSp+vWX3VHDGMGnCDFpjYyMgLHccjeMp49VAXWIKBgW4C5PadbG5Ym9OCvBHJbU8twqVSSvb29NI2REgIA/D3TgTAsy8LtV0fwyqV3AcBIiSoMwZ7wjfQbF09Ct/86DS0AwHEAZ4DRdEojAEiVr59eBH7+G5kW+SKROiX6pZoBUiigVqnj4sTkPEUpoAl/uhkXgJm1XgHkrP/3juOBTSgiXiaxHT0xJGkp+ZG9Fl9JzIQ0tFpKa/LUkjb56/jy940HtOoLdwOaBmv9WTsEaflUryUdQDCVoYauKIK/KF5FWoIL84vo27YZmy+NYfRaeputsgsYvdZEhAI6F/DOhWN83tsrwA9cpFBCWdnlITxN5YQOpJBZkYsrdsbOjd2fkUdZdH2s8pqSrlS+G5Kjej0Iw/ANgI+tc/HbD8v4yle+EigdUxLPRhocwtEDkAYjT1qWheVlv2d314FrAB1ZijBuUymft2eugcGBFl5Fig7ANX5SaP6yIKX8'
    $RunMan_Anim &= 'yYu/hP2tPbE0dSv7g899O0Sf7UMJKWaS/NTF6nq9DrYLiiuLLAKhOe0Mg01r3pTLZdRe/CUGn/u2ni5tFCqXyzzLROKmbINoedLpn6wrAwFtzntayfPvavb2yFKpJEulkjy4zcvoEnUiSTnl9GmRX0A/dPQ+Q+Pvr6Ej+edaOabZBaZ2HPKta/IjwamW0Oh7eXhQaLSMTCmlUN41DgFllg7LKz+N4qf+bl4+NMcMW+So3COAHLth+JRN02u9Xs9CU1KgN5imEb8HS+Uj5/ODd1leXjZ+bt6mQ7Ss8tPtJ0vzHpyXrDLU0FnbabXW1tpaW2uxbQ0m11o7W+KG1G4qoJSLM8DiNbxy6d1Uy3BaYoszEovX8P7NBdqxI/LyNXL2VYye+/VqHaSSJ6ZKuQrSdnrq6cKoVZSu7YimTgaA//79S8jrCRItAKFtX3n4wrpfA8WmjitOfkxZ/nPmSC4+pZSiCHpSelluKcQidh4JflCAwgS7W+POA0c1PxNbiOTp06eD4/cpt763xJnAsrKl2f4dlRA5I19JCBP6SfPlJD4zbKFvkWEeepqz2nn5C2t0zu3kcByHtuRziM68Pb2o7f2q4PK+Z5IC0u+0ZyTawGdoi38R/ct5VAZaJD0Rh1j+nkDBNJoeZrIXMETLsixMXWjuPh49A1SOPhXcM3ru16Z2W2ibE22h57Tevn7TaBu9nx044It2fWfkS4tYXH7+/3AcJ7RVPw2f1GjLe5KNFaN8LVumctAD2C562lOZZ0s+AGB6ehrValUODw8LOg8CAF92nKCzTNr8pBUI74ndTSV8+/rNTFCibk0fHABGnv2H0PkSk2bbdrBJ84nd3rVbbna+NPTBdyE3O3iI7CyjDha3W7fj5w5/MJrqJtwM/aEmYkf/IRjZfpFOiGVZ2LNlmLbmS7HzCMbfuJblTEjLGQ5qr597Hq+fex6Hn/q7/B75o4fx+rnn8cbVWTqQlLn9yw//Ca+fex5f3fkFzleqaYl3sKo8YueRlgNFnQypqfy0KPejh1OhadTgo2TKmqTK8UxHnTrL8tKu68qoMybEHDtEZDQFq17uLddL2UUHnPbt25eYyJd5zNKAL1iWRdv8TfiMPMWWNCVFTeVCOfQToKq5/Pj2+Ralq5z3TAOiF3MexJgegMTzLz1JGk3oZVmWkUartPwzIOKZF1zccpsnz/wccC1/m4z00TMIaHGl2bdvH/bt20f54IyY5LRqE55A6RyIyldvb29surRExnceSSM7bjcKOg/CEYZvf9cdBFLoCH5wiU+79LdmO33cDhzB7+X8xUzpMs4GDDRad4SSOlhKia1bt4ZOyMV4qhgeHqaaUEGnUuOn4lKGdIITbK+99hpqE3ZmWhUAo77i1SbswEmgpDV0Ko6diMtlExJaRR1T1DkKUxcg+2NOnBkosQAgxW0b/YcgCFUz0ow8YefXCpCcXNJx0Z4ojd73j04IGdQO9jskdjgPDw8LOlM8OBD+jDJcGp5nbbFPh4eH8cIzjdCpsL6yw7NhmkzBArs8JWQnwDD5Cxt37tzBzMwMHMcJpl7/lJ0RXbnVCbJq0o8hWqlOkldgIcIJMZUfoyNZPwuVl7T9MXUheCfBldG09UA5skdEpqenUZuAoMoWMzMz6Cs7AYNPbmkEp8eSprjBgeb0Rgg2egaYmZnBzMxMUOUizQjkiu26LqrVKt56z0o0jpX2ydQDNmb995j8hWfLEN25uTlMT0+nPWHH7TckdEoiTVI+OlVHp+A4Tf9/YUrHV5ZEhYkZKHQiEappECcHn57UTsFk6w0ONEcHKQsx8h9vzwCYwZ07d/AYgB0AxuO9MglA+DaanJ6eDk3Drut6CUXvpPb2JFfs7/1wLjiwTcc909B692MLgBt0FNGtTdipPUweMyXUErftloPgprwxe03qOtSAXnDqzStDE47pRikMswelcg5GPdkWStnrK3dc9lpMvjgUJI7tIa+Xgsrf+2GrRveveNe++dU7eOCB'
    $RunMan_Anim &= 'B7yL2+AdgYxHGmJGVo57U7LrulhaWgopSa16zNhp4K02ATF1Afi3f7bx5JYGntzS4HSFIUoJdUppzIKje9bwkIjqXIZg0lB5gs7VKY4fX0zqB8HPIDMeRBxqEX3N0qHQTeFxcubITTzfRyOMwhHT09OEUHRIXQCQ/V90gKtAY50L1xfM+QkLlgXcfvc3Umx+NOplBE3F1MiQp5NsTyM4F5wWHSQhlkI7ldLQO+Iq0M/4lFL2pM0zw/mjg/NfGwqHdFLaSSJqamzarUO6VYdIuzIuvzZ/bnOQxB56EoSSadCY/tfm/eCZC6iIF3YDuBocTA/BcK16DN898JjR8o3uIPlff/4YBodfyoQ2usPkypnl1HSIrwwH3CPDDppD6VnRNepQelp6UjedahQ/2KaVJltWwkAKzo3oluJEo9GQLOgatNllvUZ/98BjlBkhkcFRvzN4nvFr789lnuoW2SHya5cBfA4ALqc+njiK5pHChflF4E8ABoEBQOY4s0yRBWmCbKZNPfp4bNzJQk9E0QOAc6fGSIYi5XaqqEPu/AiqiAtEkxIGN85eA2bPAJgHdhzwahqHYHTnEUIwo5aU5D5te2Svhb5tm1FfuIv6wl06c5zapqRzu0SLWlLyfhMvULH9cjXTnPR5mq9EhewE4ueh1awJJhtS5f/YNh48MYQHTwxh6ne2zvMVKUagIIaoqIGPMDLryy3ML7Z0SsTB90Shc1oaRcx07tYXfOgnRxMRSiiLUmj1AH1e5VPpcCVMtSN6YX4RjuOkHR3BfjCqpkGMERJmURbeNrxzOY0torcBdwGbL41hwzuXMTgAOI7TE6WIBbXU8kOx+xNNp3iZ47sA0BOH2D0JiiLJXqOUFwOD+/HH2hgvURXbaD21XC5jdtmriTAwuB+2bScWzTXpHL60p5najY3mxQNDuPY3+/HRnv340+eCKVzQu7NCRGkUJTLpj+kgLpfLLT+EogVNxSahoDy0WuxxzncP70jLslAqlQJng5IH8ZLShDaLm9JPJTsOMMEqdYIyoqAAvByFlePeiynJjjK1idplSClFZRfk5ktjnFbkuq2qJDo0UJP85J3i+Pdz0BKapEGF2JrnTo0FGRFqL/5SmwUt5AVTEHfHAWD8DLSpzsbnIQYG90vKkgWDhDh+xgHMXvJO3qvKkXcKXl5exk/Gyji4rY7x9B5rULYt5FgJIUulEp7c4iU9+vnPX+sRNZGnM8h2E4ohbuSx+xkLWhSjCDstwiYUBSCpEEIEmRvK5TJeOnlBOyWH8rMYJCcytkkM8o5ktm14LauMuU1CuWW4k0E5YTS5Z9ZFIKAuMdGqlh/R902FPMmJQu/PB5gmJ4zUBhtJSw1zeshyuYx79+4lrjyUy2UZl29Eye2SCrlom9T69es5Sog0Cry8vIx79+5h/fr1uueHUsvF0M8kPxOek+SXMx+LNvVbWvQzqJcWeg5/hnFRNrUpRd5kzNSRJkSTJjsXAHDlE0i/BId79+61THF8gLquq74rEt61UEegXfKjKTHHs7TmQZQcI64HCiiyCK+3t5cb3bnDAz4taao8BcTBRG9vL9avX887Q51ixe3bt3v86oSRVRezKl+35BehLFl5EBqlbpHjyspKixxzl3wkdEgoOZkGTU0FEUKnrM9XEE4C+FhjScscicozoVGHYowhZMrDg6LMXZPjWltra22trbW1ttbW2lpb9e2znJ9SrmKZrEbe5JoOfabkuarHB09jFGIu5b7sz6LyevlPAfCUlu/fXMB7t7zUS1kPB7STt/E3vP+z5urKxowUQohPVhNPfxb6dz0+K1CGwxWfCf4CfYzgz0/3lae8aKEDWfKUqjcunsyUVrXg2Ys6WM2aKG9cPMnTobaTz9XI22qWV56BrP3pAK+p5Un/s6ylsv14IntUgFkl/IUyp2pkG6RD5il4ib80mV9FwRJtWgzMWggshknvzC8rXF244FzXDdJp+FXZRZRy6o5JUkKmNvC4GnnTFa5e'
    $RunMan_Anim &= 'LfJqixXTZishtzyVhKGiTeASx2O3+UvikR8Rbn5BfyY+kb/78gxmfzdUMzGiv8bsJ0jA6dOn8atf/UorwNEzmauKJjblcL72DDeBMrUvvTgUCLCdg5l481NSS5YsQnSLtxh5iW7LK26ARABMaHBEDWI/R1NbdNBU/8KtKc9OuHCUUIMSX3BZdpE/GZM+KchjIHYekX6mGK1c07joIi+jGmumUIROy1dcGu+EHPgAgK/v3kHZpTvCG8+c3QXeZFRyXeKLMkN2QV5pB4rQWYAd1kGZlEa+NVV9JI9ts664IaLjrYv8xcrPTyroJZGOiVO2EwAl5cX1QS+KpuQDhje/eEdXwI8DjUEaKdFp3ghsVgtvKl+dDKekBeykQZxnkBQFfpzHDvexMX8xxV1WF39SAjPnQ/2ZBZxTu8Dzkxb2bIHWYhg9450wc103U8GYvPE1y7KCmBQVnFHBjxKt80z1lLOPlToofDCrNVKIP13tlG7wFsWPWrIijieKAavJ3P38ioUEzZOK9RRVdCcLMPfb5oWEOtzHqWRv23YSf4XyEyS3N5SfbdtUgoVV7DgclBVhHkIis5lKgMUNcHLjdAhdqx4reotJ1MKCtoYN4A1mnkbGdd2gY9XrRfIZVTn2lnKmj/PHeSNXb25urmjeWvjjsiIFZfKNk1dLmRelqkXuUsaprKyCrAQTV5y54yKOT3Lj+OBX+5iBgigKXIg/Exe9jfxJ7iVGyS7ORdcl31VqIIUKZiTxeF9SnKD/kKfcc3NzQdmaJOvKsixs3bo1GMAcoSnrdM5BLKk4Q61WAwDukkt1wPKmDlCeZZnAJUWtJmPDZfRMaOGopVEpH/p8+/btQUUW4q2NTfiLUqFWKpXQaDQCPqhulAp+UbJNUaOgLS3OSkgoDZTaouI1pRzHgYR+sKrX1JpUhhm2k8AlxCMHFyqmoQNDHcBE8ZdShi28TV0A4JVL4oAo+ReieClU8RX3QfqurIizroBmOvqHrbCrxAewitAEMJT5PCsIMj4DtycoFhzeltEyKFdWVmJpUz2udlhZGnlqLayNGzfG8lcUX+SyVti1UTQnPOKJgJADHVl8ruti7969URYfPWedEOKTIt25pBigOli4lVC0lcXdbtUFTztoCWBS8hayrFR+qLKRBkwEEgrFRPGXUn4t/PEQhcqjuu2lnfzdxwGFSi4Rkz/7scW3OEiqnA5Aa2ER2KysrGBmZia4rqbbeHJLAzsOuJi95NUGyQngUmeF0uDkhREJlPu/6GDqd02h0jsF1ZrmiwU/ki/xMnUBVGUeleNeWbDRM2HgOXv2bFIByNyTXxCX29W8eHA57II//vjjgbXg15DBLddFzW3yOzY2hunpaYyMjFDM7z4hxMfsQYUyThYWDRa+pcNx2mMpxOmfyWA04Skj+JnoX1CMUmP4CMdxZFaZ+ZNomhij6D8UDhGwyUJbWygrfyZWqtBZfjQ4qfH6grptLzrm+soOFuoRIAOvtJxvcWR2Q/xB2WLycyABgLNnz2oJqC5pG6w+RMmXrFSypGsTzcqzUfyShVVQPK2l73gf8RbFL7nEbCLsyEowBwvdQDIBnwJAJtLlNK2+oZb3K8gijeQnZt+kTAPQGWUpI76X5OaKvPxpniXiABAAJK+4xrZACJOBBHjFV7/5Va/wJRVOJQsL8DJPz17y/mbFvjLHAnklXT4QeE3z3t7eFiAhfsbn0Y5Fmii3PWQ5VHYB2B2edHT8UysIAL2YEFu5VSaCwHr415GwpU4y+8FIEHro1B7AVK6UCQAVBIKxg9IEAGlvWwELNNL0+Wld4bgar3xvXsp3kAZFgtPwp71X3TtIPIo4MKEZ/vHHHwcADA0N6dwyz6phbhRVMqRGdR7G50N1T+EV5oXO6mjLNgAOJjrwA4C/fbgPAKhUZ+EDu3LcO/2hArbnWvq8zYa/o4QJiuRpA4CPeDwwBMpoArNugvH1pdPH37TxLrIA09Q+KwAAU1utceAX6uRi9ylG'
    $RunMan_Anim &= 'gkxGgAneKW5jchFAmIO/kOyj+DMKYNKiRZQb2QKCtEp8NQx+XHjq4oTrupCLM3jl/FnjUq+pLEWft1t/pQcYDoDtAr8svGlk13GeHv5Da2XU8XkUur+vSJdPZ6WohSE7CH6JLmaUddIOPuLO2GYEGG/+LA7AZcRknyrOaMpfqn2ACe5YCwCSi5swiAOEfuXSu2ClhgtzRyuAnI34bIcf31JOO3QMbJJ4C6zCCWC8Q3yZ8KQ5GdKV9GEGMaQi435tc5VXoyxT8ifb+A7rAdxthwwLQ+hKhACfuMD2CkYXvJc3Lp4EgHbl5AvNbrry2OdOjWFgcD9y1ELPzBuv7vbBFQ/xyn33o75wt6WEY4f409b0pDr0ALS8Mf66MYjzDuAsK5q55KlrGavydZTHLvAps1ZA1JXDbBdKy6MnhvDBFVcLMF3u3BB/KghSiXYq0dktEKTOooLMKuh0EAQDhWPl61v4IqBWAZH+7rAcjQZJtwFGVy7+0wKCKu8d5FOayCyLXHuKYtC27WBQ0G8aQPS/aUXwNjVx7tSYcBwHj+y1QjwCCKw/Kr7djTYwuB8Dg/uDguAEiPWFu6gv3A3d10Y5ysouYPOlMWy+NIYN71zGwW1o4YtiSX3bNlON6IBHAsI28xk5gcS1LuqgYPWh8efQOiRLaQhsmfgtbC+ZavXxYuMTtcsBOn/3C2NQtoPkfn7U8bLDD3kgd/5D7+QCt1A5ACpF4DvtwgX8P7bO42l8vln0nPhVire30xIMFO6PtaZi7TgQiv2JKOu6m9ZqXmsg6/NN6jnW6/UW6ymKxy5ZgJKBRCoLq838JlqlUfpocr8oCkzotwom5FaSZbVjE7B4oFAzOsQz1TEHgL9/yCsW+tsPy6jX6wEvUfErznOnYm2qvFUQ1AFfJ8BPncR0z6zs8gYN6QTJNwePmcCkaLeoEwC4ykBQlsvlWLlG8brKwC/oiyh5q7wKEzC5d+8entzSaAGThEB4QPvgNm+gfLRnf+A2FV+uNT8AAAHsSURBVCjEgGcOfgDwLdsDwH93wgAYAyjdiAMG/NM52oPf8GTdmPWAkAFyR5TNwNoMeD78kBtskfnth2XY39qTR3aFAKBuYGSwIjrCc5eAJRXYcB6TFhW6BH6RfTD43LdjZSniwOTevXtYv359LJiwgWkiGKmCUN+2zYUroF8m3ngDpg4YO2kB0pE8DuAp36EwK9TQkosF7Ytzof2BfwHgf9sFJpr4j0g7qLqtf6sAACPd324AMZenoSUXqTf1el3drxrSRy0AtnEghugTwOZ8RovA0rpdbeDJ6JlLS0vBBFOv15FzIOWynOm9lfePe37LO2gUL5QUoQNgkglgu61/beApr7xBi0rkGneDFx1fcfqY9H2dPoqCO9N44PNWwNlWmcMsbxdPxjFLDeh0ws0I8aGCscmz1XPEaggiAwi2Xf/aBDa59K9LAGgKOB3zROKsuDT6mGANhjMVFdyZqeNdAEIWRAddv27xFLlo04X3j+QlDR/qOWJ2vQdoVgvsAJjkdrG7oX9d4skEADu+Ep0XBNPqY8dfULfKrIJAN2NgOl7aDYSr9f27NAi6CjbdkH+XeVptQFgICJq21XzmsAed27AquygvuUr6Rq4S/VjTv+6MV7mKMOKzpI9rba2ttbW21tbaWltra62j7f8Bp0HwicSheUwAAAAASUVORK5CYII='
    Local $bString = Binary(_WinAPI_Base64Decode($RunMan_Anim))
    If $bSaveBinary Then
        Local $hFile = FileOpen($sSavePath & "\RunSpriteSheetCOLORED.png", 18)
        FileWrite($hFile, $bString)
        FileClose($hFile)
    EndIf
    Return $bString
EndFunc   ;==>_RunMan_Anim

Func _WinAPI_Base64Decode($sB64String)
    Local $aCrypt = DllCall("Crypt32.dll", "bool", "CryptStringToBinaryA", "str", $sB64String, "dword", 0, "dword", 1, "ptr", 0, "dword*", 0, "ptr", 0, "ptr", 0)
    If @error Or Not $aCrypt[0] Then Return SetError(1, 0, "")
    Local $bBuffer = DllStructCreate("byte[" & $aCrypt[5] & "]")
    $aCrypt = DllCall("Crypt32.dll", "bool", "CryptStringToBinaryA", "str", $sB64String, "dword", 0, "dword", 1, "struct*", $bBuffer, "dword*", $aCrypt[5], "ptr", 0, "ptr", 0)
    If @error Or Not $aCrypt[0] Then Return SetError(2, 0, "")
    Return DllStructGetData($bBuffer, 1)
EndFunc   ;==>_WinAPI_Base64Decode

I tryed to modify the file (the png image on the disk) with mspaint, and saved it back again, but doing so, the transparency was lost.

what I do not understand is:
Can I choose any color as the transparency color? and if so how?
The running man works well (it seems that the transparent color is the white?), but if I modify also a single bit, then I loose transparency. why?

many thanks

Edited by Chimp

small minds discuss people average minds discuss events great minds discuss ideas.... and use AutoIt....

Share this post


Link to post
Share on other sites

Use e.g. Gimp or any other gfx editor with supports 32 bit images to modify the image.

Making one color transparent is more complicated using GDI+.

Br,

UEZ


Please don't send me any personal message and ask for support! I will not reply!

Selection of finest graphical examples at Codepen.io

The own fart smells best!
Her 'sikim hıyar' diyene bir avuç tuz alıp koşma!
¯\_(ツ)_/¯

Share this post


Link to post
Share on other sites

OK, thanks UEZ

so the problem of the lost transparency is due to the imaging editing program that it must be compatible with such kind of images.

The transparency must be already setted within the image itself and not decided by the drawing function.

Well, now I have clearer ideas about this stuff.

Thanks a lot again for your help

bye

here another example of using ImageList to show a walking guy

#include <GUIConstantsEx.au3>
#include <GuiImageList.au3>
#include <WinAPI.au3>
#include <GDIPlus.au3>

Opt("GUIOnEventMode", 1)
HotKeySet("{ESC}", "Quit")

_Walkerpng(True); create the png file on disk

Example()

Func Example()
    Global $hImage, $hGUI, $hDC, $iX = 440, $hBrush, $tRect
    _GDIPlus_Startup()
    ; Load Image
    Local $hBitmap = _GDIPlus_BitmapCreateFromFile(@ScriptDir & ".\walker.png") ; 12 frames a 95x143 px -> this is a GDIPlus image
    Local $hGDIBitmap = _GDIPlus_BitmapCreateHBITMAPFromBitmap($hBitmap) ; convert GDIPlus bitmap to GDI format which is usable for _GUIImageList* functions
    _GDIPlus_BitmapDispose($hBitmap) ; release GDIPlus bitmap because not needed anymore

    $hImages = _GUIImageList_Create(95, 153, 5) ; create image list in 32-bit which supports transparency
    _GUIImageList_Add($hImages, $hGDIBitmap) ; add the whole strip to the ImageList

    ; Create the example GUI
    $hGUI = GUICreate("ImageList Draw", 400, 175)
    ; add controls just to test transparency
    GUICtrlCreateButton("Quit Button", 30, 30, 90)
    GUICtrlSetOnEvent(-1, "Quit")
    GUICtrlCreateLabel("Label on background", 200, 50)
    GUICtrlCreateLabel("<===== EXIT =====", 15, 100, 400, 100)
    GUICtrlSetFont(-1, 30)
    GUISetState(@SW_SHOW)

    $hDC = _WinAPI_GetDC($hGUI) ; Retrieves a handle of a display device context for the client area a window

    Do
        For $i = 0 To 11 ; loop all frames
            If $iX < -80 Then $iX = 440
            _WinAPI_RedrawWindow($hGUI) ;redraw means erase graphical content in the GUI
            _GUIImageList_Draw($hImages, $i, $hDC, $iX, 20) ; Draws an image list item in the specified device context
            $iX -= 10
            Sleep(100)
        Next
    Until False

EndFunc   ;==>Example

Func Quit()
    ; free memory
    _GDIPlus_Shutdown()
    _WinAPI_DeleteObject($hBrush)
    _WinAPI_ReleaseDC($hGUI, $hDC)
    GUIDelete()
    Exit
EndFunc   ;==>Quit

Func _Walkerpng($bSaveBinary = False)
    Local $sFileBin = "iVBORw0KGgoAAAANSUhEUgAABHYAAACZCAMAAAB9sk32AAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8YQUAAAMAUExURQAAAAQJGA8SDwoRGhcKAhIPERsSCRgYGAcXLxwgHREjNSMOASgVBCccFDQcAjMdEywbJi0hDCoiGTgiBTgnFj0wHSgoKCcrNC0wLiwxNjYrJTUsMzgyKjc3NwYdQhAsTRozayw5TCM6aj1APh9BaDxCSixIb0QdNEIoCEMsFkYxDkgzGFI6HEQsIUYnOkc2J0U8NlIuIlAlPVU7JVQ+M2E8LGE+ME03R2k4WHU6Y0pBLUlCOVtBJ1ZGOFtRPGNCH2VHK2hKNGZTPXBOLnBOM3dUN0ZGRkZMVE5QTUtSWFRMRlRLUllSSllZWVNaZF5gX1tiamVNQWZFV2dWR2NbWHBMX3ZYSHVcU2tUaGxhSGliWXZlTHZoV39wTXxxWGVlZWZrdG1wbWtyd3NraHNtcXlyaXd2dx46hiM9hSlFky1LpH5Sg3Z6hn2AfXuCiIE9aIJbPIJdS4pKc4RjS4dnVYFyToZ2WZNsW5VzXIdsZodleYZ4aIJ7eJJscph3ZJV+caB7X6J6ZaR6doxZiYl1h5xloaNVh6VnmrBzr799w8B8wZOCXI2BaYiCeZiGaJWId5+Qa5yRe6GAXqaGaaaLd6aTa6eWeLKKbbSNcrOZbrWYd7ejesabe8ehfYeGh4WJlY2QjouTl5KMiZSNkZmSiJeWl5WZpJqgnpujqKKMhKeYhaKcm7WahradkqWZoqyhiqiimbeniLmplb+wir2xmKemqKars6ywrqqzuLKsq7StsLixqLe2uLW7wrrAvbzEx8KdgcanhsSqlcSyi8e3mNSoh9KukNmwjNa3mMWsocm5o8K8vNO5p9e9seCvjua5lc2HzMS+wNLBnM3CqMnCt9bHqdjKs97Qr93SturCnvDDnefIp+LKuOTQrObWt/PJpffRrffat+/gvvvgvcrMztnb49/g39vi5unMwejaxOPd3fHZxeTe4Ovjxebh3O/w0vrpyPbr1P3xzv321enl5enr8u/w7+3x8/Lr6/Xv8Pv35/r5+gAAAAAAAAAAAAAAAH6xhU0AAAEAdFJOU////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////wBT9wclAAAACXBIWXMAAA7DAAAOwwHHb6hkAAAAGnRFWHRTb2Z0d2FyZQBQYWludC5ORVQgdjMuNS4xMDD0cqEAAJ0QSURBVHhe7f1/XFvXmS8K4xNqqVgkNqgiyGxj2VXGVLhSjzxDWlAuSswmCLYiFx2iYE42RbDrpIpquxzbHXSY6xPayTsJpnkd0x673RRsqSqkjvFEVCSimiTkvalJT4+TkGZuOkxzuxgmjJOXBPmgWn/wPs/WxvEvQEjL7+ece/t1bOMtZe2113rW9/k+z/qxsxb/jD/jz/gz/v+KP9MOLQjy33/Gn/FnrII/0w4taIvkH24Tst3yD3/G/81wf4P8w/9z8GfaoQVOpfbJP94OCCqVSf7xNqB+wwaV8TbymmqDSm2Tf74NsKhUKsPtpOWO21l4ff6dxvrbdwPfnXfmG5tuo2129Mg/pI7/mWiHkf/+XxFgOvl3qlT18j9pw21Q5UP56ttlnEaV6k6ovkX+J2203SkVfzurD9hwu6rfJBWv0t6m6lvyofA7VRvK5X9ThhGbHnGbqq+G8tVGW5v8z5TwPxPt5N2mdpfBZMs/0Ef9nfkSoH8b5Us00Q3F78DioYPlS1RhuXMHlr/jNvFmd7JxJN6UL1GFBZoHWgZHV518iSaw+snib0vrG6WWkaDqlq9RhE9qnGTxRvkaVQCrQcMjs63B9P9nop161W1Nywqq9beDEwAWtBzEDhhZ9H2KGzlBIjYghlz5IkUYJUrD8qH6TvkiPbQliwYgr8kXKQLGLd4BQgmoPn3alKsPgwuKp9/6RTvAaKBlpNrTb52lxr/zTrjF7VCzkj/ExofiUw+j10g7t5EXGuuM+aq8IvpmL6HNUGRSQ7+a1qQFU0M5igWpX/Pv3EDfdNogvsIQDn/BE1B3WUZp0CZ/bVBtoO1x21RImjuweW5T9ZdIWao+7RyGT4XORCoeeWGnfJkWsPGl/9BjbdiglS/Tgg/MMlk+2M6GDRuoW7/EOvINVKqUi18j7VhuV/hcpALWB6hU2Zx8iSaKVNix0rClPuFUj+VKLQ9/QdfStkzZF6JYyAfL3EBZToFUk6oPpUvVpx0HSc2CjSM3z22qvkRr0Dy0q4+jCqoutQ5Wv0m+TgdoOxC+SaaJxdMWm1h7MH1sH6l1aPtEtVQwNA/eZw3Fr4F2GtXllhLghduhR9RLrLkDeIe+pNJiu0D5UuvkyRdpAUxStQF5ATpWMh26A8uCZAOmkyye/sBS7YA647CSBgAMLLr9C2IEqo9tD5R/G6qP5WYnWUEqnjKtgRq5M1sauHLr0w2zYNhuyMbWgbvchs7Fxs+GzsW+TbYO7fKxWT4z/Q2patnUaUd95w4UJPCbfmYKhCx6LAQ8gEK+Sg3lMLSwa7F3QYjTzVyXQ5HZYDMgSjZkS11LVSn7oD+zwTIxiAP7h/JVVB1u0VL171yq/l3yJ1TQrcpXQfWxeLn6dHlBrj42D1QfLZ9q9SHEuqH1qVa/XIW1l1pHBX9B6VSLb9wAlCwVjzYk1Z4qbTql1tmQbB2JNVO1/VRppwtIB4pPDl7aqV9gNCQdMB6IsjaosinPpPukMEW6h2SYqYegKaBtg2pDdq762q69U/6ICtQg/7KTxS9ZJs0orunm6lMV4moVFKuVisfqY/k0q2+5ufob5I+o4IbqY/G75I8ooEOlUmVpcYIbyTM5bmlmMXLRdjClia0DFIHVz6aYdAcFBa1/Xetkp6ZJUqUdSQjKv6Gx5Kt04ARWgCdIah1se8phlgFTRhKnYQNB29CUIyawe3WTMRviIGh6aBwYtxSrb0HLqavHMAtuBA8B1afpsKAvs7VNRqj0Z9Wn6HCdWP099SqIQqH6UjxHs/rQOhuyNU0lULRUfSn3RXG60gmlftb6yepTVFNm9YbsvGPWZO3lzqUZStwFUqr+0F3ZEj3ACMDWoVi+CTg/y4RLNSXWlIpPcWylSDtGlDqfEQPdvCx2J0g1DP+xA4B2qMqdNmgVkJrwBKBkpdpTVWs7s/N6OrM35MEIyNogmQ5NUvY5wT8Nm7OheLBMaCloHprJKffO7NznjmWrsPpg+TugeJqtk6z+rmzwu8mBRbn6i1qs/gYVaMJkrAWGTzM31YTVt1xXfZq9W5+d2/tcbrZxqfaqbKq0U78h2za+J1utxdpnS7XPphihO8Hid/VastcnW0ci5RRbJzXaqQNOAL5EYkjmjrIpuhQLhv+5KASl7B1GWevlj6gAJHi2LAXl7AVlJdszqc52o0fPzpW6NpeXP6IBW7ZxsjPL1IHBlkoSytlUs5rl2T2TWqn60EhS9ddTTb7I1d8pVV8yHaq0o84+htV3rl+qfjZNtbPolquPA3d9svo0aceY3fT7XVnu3jy1KtsIwRAUTzPn25Sd+2ZvtvZ8vUqdnWeUWodqoLIze+d4Z7a6Xo2siVIZxIP80SpIjXbUyDrrceACQ4BiU6no6ZFuKDtLbVFDuRK1QdursikOXA6Kgz6VpKBM+TTz+XVZ6vGOrLopt9aWbekxQ/F3"
    $sFileBin &= "Ul0BkJXVdEGddf5NrUWbfawdgtEN6jqaOWWb9lWsfpvWAtWvgOIpb/1SNL2Zm3X+AlR/fUc7dm4eTVroyNVC69umOtTY+lj9Dbk0y7fkNr2dmzU8qbVoVMnq51K0nfp6W/exLO3UubymXOOrnWiaWvXaNzgtC0u2cdiY1TFXbqnP7nxVah2VmqKWVWd3TGqzBgfztLmqeovEminGQanRjhGYQSvt28HEHXA+zVn0JtA6PfVAl+hwk2EEzeSLDUqFABSoEsvPRymYTbF8RxZTp1b0TJXvPaYY/qABupbqVMqiQlFuyS5/7wVtb3n5v72qBs6kPJHIW6TqN0H1/4jVV1FecFdnySqfPKMeLC+fe8WwAVhTvk4JfH2u4hmp+s9/sBfTmjaK4xbAWdabJgfznjeZoPrQPFq66wvK1dqmdxvrxos65o6j5Vtotn69kdXmlp9/saj3GWbyDzAGNtDdPaIClZxVNHVG25lneb/3LizfmJpgSI12LKos4yGjzAzSbBPNxgfWGdZk1xuzIVYEZgPFRnUKfUO25VhJllFKPyanC+jmjjjt3t63B8svjNf9/o0SHLfydUoQ8so7Xpx0Nn3U9NwHoHYozxAD8h7pfXfQdOF8/T+9geOK9jJlxoLVb5xr6vmjVH3aqym19b1vvwDVr5t63QjF016mzFgOYfWnmrqTrU+Z9E0d41OT5cNz7vE3zao7s1VW+TolsHWD737UVv/R+Y4pEFOgxOXrdGDhGXV9z2Rd0yTbM3cEbSfV1kmRdrJNz3dk5ZpU6+XEHU0lzmVZJ+uzGi+Ua9XZ5fdL2YssmnFKluq5zizN+Z48Y3ZuvVGiHZpqapF/4ZP5+Y62+XcHx+/H+Vzay6Dd781febvu7fnB8724iDub8kJx7oV5qfpvy9WnfLyG2HR99XMp0wL3wqfz8880zU/2vnH/BozS5euUIDTK1X/hfK8aw3W6m76g8a9ceaHpo7nz43vRLVJd2wFo+2j+ykeNL16ZPN9rhNrTJs3Fuhc/mr9gefmTjvF/kJKPqYb/qdGOSXt+UpPdcSxXvV6lxdQXzcNTbIq6tmzF+Ultk0Xx6hvosXJZVv6MAoSs3CZjlm2uzXhIUf/+IZQjeTRZrW0chu1Uz+T81NSgGlNr8nVK6O6Yg/JfGJyfm5qsB8ZMcWFEymg8L1X/7WT16aY0AULHR1D++WeT1QfDp5qvTlb/ylT3u0utT/nMoxurT5nzG1/8dO7TT4cn5+fmJu+H2m8okT+ghI6pubn5ycGPPp37aPDObLBNuls7FhvfuzI/fwZa50LSZalSDXBTo51G4Z2mrPIPu4uaVJZXmpB2qK6s4Yosh97uKRpucv7xFTXQAl29wHEaY/0Lk8zeV03npeQL3e2IPe+ff39+6j3o3/m31dC1dFfPL/IXxsfBKKfm5+Y/OZSdlZ1N+bSsnslhqP67n0L1L6ihfMpip/FNqfpg+CCpsrOyaB8+AtX//adTv/t0bu7K20ZoHcpnp8jVn8PehepnU65+9/mO4bmpqU+g+Ln6rOysDR3yB3QgvtDbMzU3NQfcNn8+FxrfIH9ACY2TU+9/Oj8+BZ07VQ+ts6FC/mBVpEY7QPtqTcd7dfXPM4NzPUg78mU6aOx595MPy+s/GhyctKJQphoDQefWjX8094Jm+P9qe79XWphFVzAMNF5478Kn4LDmexW52gdpb/k65+yYGwfWga61bMjT5NI+Y9Bnm5y8AGY/Nz+oys1V0M2YLi4O1XVMLVU/W52rkS9Tg880OfkmVP/T+UGoPeUYaHHRb+v4MFn9D2wbNLSlLPjEM++e/wCLfzVPW0Q9Pl8U6ibHx7H4uaYNxtz1lAPcMz31g3OTH2L5H1rA46ZOyqnSTt2x8Q/P5z076Z4cN98JYZB8mQrE8/NX5t+2vDg/Od6BealsyrbZPQVSsK1p7qPx82bU+dR798V3YdwC8TSpO2/HSWXi78HwQe28qa3fSzH6vIrzSDufSNVnqKrYJHxT55eq33R7qj+Ocehck/ZI0W04oNI3mWz9SW19O9UVWUl0/w7GLQZyluMN1DkZcP7d95KtU/+clv7ZDkLPJHQu3GA411yuSL38FGlHfBGYobt86sPhVyHEpbzSdPiPU3Pz4y+gx+3BVVnZdI2zbWoKWmYQAuj5d8woBSmXD4IEuhXx5vDrtLWIhPErWP781PAbnZSFoITu+XkIUubmLgy/nuL859rwttQ8UP3/o/M20MJiNxoOlH/hldeN9AfWoji5VP03Om8DL3RPXpn/YGpqbu79f2zSivJFiuiZvzL3wftzc1Pvv1J0G1rH995H6HHnL3Se3LuGzk2Nds5cgDH70TPD86AYLBvUudlUp/9Hu3umpt6d+wRI81hWNuOiHKYMnWkal5Ij4LGKsnMZutPzEibn3/+HQQy0XjdpnfQFQ/f8B6+ffB6e4A+dubtug8ua/PT9Hz+H1f9vJq2NPvF0fPLB/+fk8NT8Jx8cyTXRP8i9EVr/x4NvYvUtRfX0q++Tqz//h6NaG/3q+6beON45CIrntw1qI0P9WFNu/J9OHvnu+fn5P57cWWKkrjaFF6/Mvf/GJDD/P7drnSnXPjXaGTo/+Pan72Fm7cq7ls+5F2mHEmfeHZ8Ejzv/nvGu+ttAyaDDz0vhf896q03gaacvwKWcdA8M9MzN//aI8StfUVO3fN9znY0+fnL+gx9bdpp3Uk8ALLp7m9yNyerv/Iqaege0Pdfp9HW/LVefvuDpeK7B3X1mbv4f241f2Ul3sgPR9lyH0+e7MP/Byft3lqipy82BTnBUbe9i7XfeRb/4xY7vNjrKe+bnnrPu3Kmmb5tN4yfbbU3gEl+pV+9MeQV6qrmdxRelkTs3P7jeeBsOmn77I5yonJ/q7Dl+O7Ijox+BFAQMd/yY/mG7MvieefDm6p3wiz5zigJf/+7866bcnSV37bwNgZZbYOXq37VTfVsCRef5T1/flWe+ayft1Y5JNLbNfbA3d6f6rhL6egQgNL44/8quPHXuXZQnKpNgG6eg8XOBdW5L8Tbj+Y86jXft3HnXXfRNs62tlTFNzfXsAtu5K9UoNGXaGZ0CJQXotRynO8snYRAC3DfeAF77w3O35bUgUygFfz8398FvLabbwJpAOlbjq3PHc9eX3KW+6zZEcYLN2PTH963Zd5VsLLkzi35its5iHIfqw7i9LdVfXDQVDf6hXftXO81fuR0JjMW2op65wwqjeaPxNgwsgNb5AcRAd91l3Hk7OLlu5+D7x43qncALmmb5GkUIdzVM9pj+yrzLrL4NWWWwfUX528e0d32lamfKq0dSpp3Fj658+sEHH306NflbymuOEOKrr3QOnLkw/+lvj5jNO+m/dqTnjed6MAr64GS9+SsmyvOIAG5nyZ6pV3JVd2mB8svo8wLIhMEPGrJz79pZsmGz5nO0pXLdzp3Wf/yH3A13gRjJNenkqxThVJle+bFlT/0u61ec9LMvi776Xb0nc40HdlnNG7nbMHCbdnW80a5V32XZVTIQkq/Rg2Cx9hyx7vqrXV/J1Yo++l63aNd3Ourbj7Zbv1Lr4W8D77BGU1v9rt2HG3IVBSkWnzrtDP7xjecGMdB6/eFde+grBijxzIvz73c2WL+iVdPPvpwBH9s2B3VvMKtL6Asq01131Q/bsrW7dv+Viic+2rzjWV+S29OpyDXuaijZ+FLElHqvpYbNd+VafrTrczuNDX+1gSdD9E1zp7b8ZHvD4fr2v1IPkVbqeufhI+U2o6mzvb3BxL8Uos9rew43NO36itm6R+Uks/TVmuU7DQcOAyuU5AqzIZ569bmH260Hjh893GALkQEX/dYxNVjNB6y7rFqbwLOp2U7qBjz0XBuM3rn5Nzof/sudO2+DyxIap+Z+1N5gzr2r5HZEuI2W5z59/0jDX4FHV1MvnzfW20zGPQ3th3fZL8YSfg3lkavdYzVpdzU0dDaYTpMEYSnHQY1GLH9PPVTfNRGPi9R7d5e1vqn96JH2"
    $sFileBin &= "5x42XUy85PqpfJkWui0WY/3Ro+0NaoHEr0QG5MvUoG34jtVs3rVnJxNKxBOj8lVqcLa3H25v+IrRYg1NCG4X5aS4yIlDPZ3t9R2d9RPxUCtHnTY1pianibFoyyKki6tNyXbW6DcH5/75eEPVzrvUlDePAKF1th/74Mft7X8FYcpOG/3pjvoG8/n3263Wr+z8iztzldTHlfFwg/bhzqaGBlNkVvQTP0O3c8ush42mI+0ND5v52KhICEd3BYmgPbxb29DZ3lBvepn4Rgl1y7S1NzS0t3c+/3wT8ELsLPXmdzkbvtNQX5/LkMSlWCLuly/TAuNssN6l1tqMbhKPg1eRL9NC3+jPO/Y8/N2ehxsiEdALlKUyV3Y2RiZ42+B3bSQ+5KJd/CLHD4RE5rs9loHErMBxtlRYcy20c6aj6QLokXazWnunzX9avkoJ7cc7nz8JKnmX8c67/oZw1HlnzwF1Y512927rX+7Y6Ra0tKdZ2fp6UwPA6JyNhThuwE9X7rAWiGzb6+utptFEhHV9HKMrxd25QDgNUP5O58cXubLTL1FuHkEc7Rlw1v/6QrstEo8nZn20eSdy7m/qGKclLxS/NDs7S12PCBGfxfawu2HXUHx2wu+nLKeEcwnCu39x4fk9wGohF8PSzQFwzFAiEeEGfmHlZ+MTAsdS7lyWJGKi+/l2J8hwP8+WpUJra6GdzqPPTQIz1H955507/fEQXWbw7d7VXt/e2WAuKflrkpjYTNswTftzs/IOdB74qxJu9BLhaa839Y26LfXtfwNiJx6fjfAmXqSqGLjQGc7S0NlpdMfiZIAVPo5RtR03H/HZ9jQc2GMKJUgXqxEoJ915sMiQe+jN/2IRL8UJiUcox6ADiThpdX93lxiLzcaJfyhEV4+I/kTor0fffd7aBJbZyrOn6Q5c50uJgO0Xv/l1518OxOKzfpbm+QsArgg61en7dbtpNBa/NMTXueQPKIEjiYjz5527xI/jcSI69aYUOncttHPgwGBPw+F2i/nOXafjCeKi2jqN6rvqO3/0w3az8+xsLB7z0+YFjXWnsfNog1lbezERj43W0i2fn4h1+Z5/9Tm1AKwDtnOaae2SP6ICdyLU9twvXq03XoxE4rNCWWuCyJ9QQeNEgm8bbG+w+GOx2KjAaE7TZX1f7E+jA6/+5jmzE0Is4J/Z03R5R0wkQr7nG3yzsdnZGGnlfXRpcyBEBs7/65sHrDBuyQDvbKXbOhwhbMeFC79oeHgiFgM9UstSdVksA0G5+9X/slNAUo5AHESXNd0xwvmet5YTsHwwHq6sYPXqr4V2du10tx/5Yaf1K3tGZ8ks5fyF1txw5HhnZ/t3J4AVCInwdMUUJzzc0N5uMZlto/FY7KLgTjHlniL40XM//83vn99pg5qD5cdjbrqbKn2RgV//65sP5w4RN9R/iGNeTtCcyOUm/M5f/0ODlkPTmR3gNCJdyxwiAx2jv3neahqKxz4OudgIoetxhxIRsdMCnAYRVpx0OXmeqtwZDfn/5je/6dzlm41j8W6eblq2LuRrOvvmr9vrh2KXoPn9Lo6qbULI3+h+tVPNROKoBU+nOtuUKk6/49rzi85cE7Y+yB2+NoX5lLXRTsPR48ePNn2X/ImMTsQn3BSZgW9s73yu/eGGh4dgzM7OEiicqksRYm6j1WJp2DMkUb5WR7Py4FH4wTd/89zOookrIt4gFh+iW33Wd/43rx7IdceHeNALxM2KcZq0wzrdv3i1wVQmglCbBTmy2T3gkT+iAkF0v/r75w8YfZegbYiP8RGRqum/RLo7revRm0P1Z0Wec1PVmouC783fD+60XMTWiYdaXXV0eYHv+PWbv/65tfwlLD8W4ulmNlmW873aqVWwyAvAam4X5fQIXz74vFUjsRrUvtXFrL6kMnXaCUXcDUef6+xo90UghovAM/gpJqf4l9zfPd/TYP0uSYCSmo1f5JjN8kc0IPpjjUaQO1YflA+czClsHE1eYN2/ebXTXD6aIDyokdlLsQjVAF1kXn3z5w07hdmEayAOQr+rViAvy5/RAMf9+tcNRp84BLQwG4u01nJ+qmlN989//ZvnD2g1L0Hjx2J+1kZ5bZA42t7g5nzosFCt8axAVa0JTa/+6/MNuXZsHTAewcVSHbi2pl/85tfP7TEyfnyAeKSV7mQTU//zX/9NCcuXhZK8wAtUxdoZ1jYALouvxeI/jo8KfAqtkzrtkMRgw88Hv9uwZ4AA66DcnGil1zyi3/3rd49a3ZFYxD8a+zg+K2xmKFqmIA70PP+L5/c4J2Yn0PJfYhRU+5Y//+qBElPkT/GLPMGRG7to01DMvogdb/4X613AOoSPYPFDzmYSkT+jAeH8q+1GgYjngBZAjggujm7W9Pzvof6WXJ3kb2Mh5+aLF3mKpi90tFt8s37Qatg4s6d5E921L75f//4XDU63IAVxoBf4srvlT6jANgSsYzXW2kIJ8CkJ4qOafRHcF97sLGEiA2WhKzEoPuLmqHpcn3vw1fa7Ws86xXgCip9obU1BrKVMO/5YAh7g1+27cOnCqB9aH6NQWkOXd/KDv//FHsvonyZ45ygaZ4TVUMz6sjbfr//11wdMZxOjglT1Ls1mlmLjd/zigNoGdB8bdSPtwNB1aYbkzyjAPficWSuQP8XEbgiD4C68c4Ji8YutzzfYBmYJ40skEiBlBd7ppzpuh97sNNtcmxtJAt15iNdGSBfF1nd3ooqNCCECxHMpdppnOKrLO34OWsc4NBHCEBTN3slSTfrW/frXzzXs8nW7Xo4TwKhYltLal1ThfvPnZu1oTOQmoPXJbEQoY2lm1twDr7arbWSC4yJkllyKCL4U0rKp004ixJ3/1+d3OSdA57yMtDMbuyjQ4k3W8vPfv9pgBH91lmWlEJr4NAp6lsk4L/z+N5073bGEaAOfFYtFahUaenKHf7h9pw1i24/jIcklxmJ0p+jZTqtWnI3HZ50uHLmxCRcbOSN/RgN1u5xDELs5mdbQxGzi4y6eC1FNjnz3cIkz5GNsfnBZ4G9bNWLMT5F2eMsATh8KnG90Nv6n2YFmppbqFLr7+Xazb3ZiNIakHMOkLE+TF7jBzoZdQ+Q0x/sEt9vna2WoLq2xHbWahv4UO80NTESGBgYGfCxL8w2GQnv7V2yRxASn4aDwAZ/LlcJa1pRpJ3LR9je/f7Pe9jJmTEf9UigxO9RK6VArrvP3vzlwV8dsYlYs47DseCxUlkUvgmZ/8W+/ed5iI4mPWxnkBfDomxX0iufVuH5VipxFJOTZWVA78mc0oN1pAVqA4oUiAXghTnhThOpMFguePBYfUq5T6uziUBvHjoqNfyN/SAGWXbiXidEwraMEPErXZj4eopncqR3FjF2oTGPrgiB0wM1wEZq0YztgxmmUgTZPhEAkcdrJdLXKH1GAWN9uLfHFY6dZjbKgoGCzTldAdYrbYtEOAFue5RiWq7XXVtcyPE21I+7ciQHQxVZTgVbHaDQ5OcrVX0qUMu2EOOeb//qfd57G2YJ4yCeFuXHi4+lIBu4X/9aZ6wSyIT42OQ8KeoEiL9T9+s2/MZow196qmYh/jIzJ0qQdG/cSxg+zcQiyJLUTcdIrfXGx3CbEMO0SJ4yCxbYXyt6hmdsRMdMe+1jYskW5bp1yo0bBTIiWEnrvbGLdJEF8m6FohnP7RB/HkYs8vbU1kTOY8boS0QFtlguim2ecNPd3CBYzB04lHlKuK2D50KiP0QxQ5AVxl2WnE9p/wF6slLBFWeumWL4xV3KJIadmXbJ8Jd0JehPudwFfwudA+dItslbdOpUq7fj5ul/86y9MgjTVIQ+u+GxIoJTd4S784i6MfuJErHUmsyOz4kZ6UZDtucO5igFondkuhQ/+/PhSyKWht5+SF8UI0k4sNop5zZi0OEX+jAa4vgFobaSdgnXKz7HiEM9EaNJOaAJit/hLuq37tm7dAnazrpYI9V8yUCMGfjSRmHDmIKmBXWp0rHuWCPQOqPCPTiTil+KerVul"
    $sFileBin &= "gVug28xT3Sdu2jMKvXvlbDG0DehBnZIZpbkekeMgeAAX7tq2FZ4AqF/JuYz0Dn+pRc6MXRq1F0DbbCmGJqpx0XznsQ8DoDgZcGmUW7Zs3frN4nVZqtUO00uVdgT2F//6G5s09Q/WH+FHQfKTITeno0Oczud2mkgC16oNsVwMbCgWj48y9ASDyWpipQU1Mb+CjUOEDlEWxW3cnJPjhAks/qxArsSvJBLnbBxFmc/ynBOqH0t0FwMtZClNmxlCc5ky739nlHzs3LLv8cce27ZFuWWd553W+koDtRf7mPgB/wBTLJOaUqmbiF0aoJfcEcQQmYjPVhc/vi85bI1ijGYMavNJa8/Fqw/AEZoJfXEITD9Gvlv92OOP7Xvs8W9uWVfbaNhE7UWAYivuX42N1iq37nvsscf2bVGW8dZ8emfLiJFLqHaGnMzWb8INgHY05epn5Q+XQaq0w/f86++dWsyFS06XDyUSmIdRKvXyFzKDyaRlReD8S7EQxwzF41euAO1QzPna6uq6hkBFxWIhRjFAZuOJWZq0wwo8f0ZKSRFnWXOz4O+z5/AU5QgrOIVR4GR/wVYcWSBjnaAL5Q8pgKvlnadDzbqt33z8cRxYipde4m0PGAy0DnRjWI6r1QGp7dv3TSyfg3B6iKNm+RzDmPj4KDQO0OZjW5U5tqHEBEW1WcO6QK+R6q04akHybGyNvUyxeH5glJDYRbeu+JuPP/bNfduKc1jOUqqmxTutHBQ/Gztry9m675v7Hn98yzrWfb85n9rhrwMg1UCL+/my4m1bt+gANewXVnkRYMpq58K/ubM0UiYZAyC3m0yQUe4OpbJY/kJmMPl8bFZuBFgzwrMFtUJfn5uvXkcvBOVb+W84cDVWLOJUKE325lZXoZKi2on4cdYfoyweo9sc+D1AT47wYgQz1fEImwWCBIlh3UCCJu2IQ4I/xPtDdh2o5C3FygISchkrrYavyZ9nCo4XOG3ONhRTMG6Vylbc+mXbROtcax/P8eKsW7ltH4iFx4qVG12RK8SkprbikRd8bCjhU6JYeAxop0CMj2npvaGScQrcQHyitbpAt20bjNrqmmpnVVWl+hH58wzBsT7RPTF7mud0umJgBmD9RmtV5SZa6SNhwC+KJDYAoY9Ox+jKagRHtdmw8utfUqWd06/6tJzJJK9KiYksy5RBrAgmKn8hI3ADZMjP8wSCq4lWZzIvpVTeQc2jiIIoCnVIO3HSmisXT5F2BDIkh5+kegu68y1KxVCIWlqQi0xIezpCDKtcV/wY3EAxlCAUj2AEdxiftbeQSF+zDhpmHR8f4ov+sqq0hM5M62kIggRNmU63TWIFpRI4Ok4aDbTOug8NDc3OEp6proZxu2/LOoa/+CfC5KuoDawhMjFLTMptjz/+OLDmujIxHjEZqL1rQPD7/RPxCb66uozV6Vh7s50F2qmqyKdzhifHiaP+CTLANQt2KF+nK6jlrFVVZlq8CT5F8JG4n6vhebujuSUQbNZX/G8rN0/KaqdcK4zyfHIGKxZ7ycUg56Bilr+QCQQ2QkQyO/sxjNuJVp6BkVuMMTq13I4giIREkDJjZECrlIgBfsufZg6RjCYbJjG6cetj+7bu26rcHHGX7JU/zhQcmRjFCG6U7T9nUyBjfu5sYlRrTfVF96siEoHw383iYrX+aqAdIeZ3GSuqKr5EJ7sjCucuucta7Hpd8b590PAF0FixmLOycpP8hcwQCg3gfh3R47VX66q36QqrW0mcMKWreNzU4fRD2D+h0+iKt27dBnaj881GrJWltFJffoyBYhOcTuxvbvb4+1qqdZaqyooHDHSIgeNOg7gkXRo2HO4TeIHXsSaz1Wo1UCJ9XhyaILGP/QzjDwdD4TEy4igzVpbuWCkpnirtcJvFWMgH1CAB57mLMX9Eh3ZYN1gOScQuYcldrs3Fj+/b9zj0LzXa4QUoHrQOlH/JbwKx/M19qPXlTzOGOEoGkHYgxm3DtCy4xHWMWJ5vaJC/kCEEEhqSlBrbPx3t4wqU6wpCfxJVBgOlxGaIhC7GrojVYyRKSKi5ugBohzNUVlUavkRlQoVznSUsGw7y1eBrYdgyoN3ixFJZZaDyzq8BAXRynAh+EhKb7ZzdzvnIFaKtrMynI0j8XAga/x2XvRa1gq6AqeVJBGpP66VToYnRj4F22LuDJByORvscbI6xqspQUZEvfyEzCDYhBs3TmlsQItFIdITXMerSyoqKilXyL6kCF4fjRNxmTf80GhAJ2MsNBqNhpffFp0g7/pcisfhpQZrFTdKOTYeBLgzezCMhQejyj0rjFkse4JmtMHJRjdOjHZ8cBIFXOcsqpRwDiGVaYYqfvNMF5X8ciwhsDjj0xx/bqtQa1cYdlKagxdjAEFQ/PsGAaCNkpF/HnJ21qQ35lLKOIYwR4z4+SqJgNmMtOmF2wGkwV4FlUjHNWj4SMjmiZKSlhquurrZX40qPc+aqqt1qGmuDRN5FPvkTcYJqiIaD/R47K87+aUJbWVVKRy74+QjuQOSDYQ9XDaxWY+cmRs27KympkcXI6NClWGzUpItg70Zb7NXKkt37jYYKKq2zKNbCuMWpms1eLD/s0GnVZuhZMyXa8YVwg+ZFnmEEqD3YkNfO5FeY1fnfkL9wC6RIOyLItNiQL5lRxhTGQPU2aTauWJmTMef7iO9sSNpuASXP+mt1W/ZB2fu2rsuRv5Axmt1DyeLhzwEb0s7jEAety6W0SHyIRAagaXDxsA6iZ5DixTl6rbrSkE9Hhw/NDoQgLPmTLyc4jcQQcVSHRtWGih1qOlNN5yFGvEI4sMooFB90aHyx01x+RZW1wkBlwoNzkhDaJAkHPPZmh6MaOjvuM1dVWktpyB0fL0B552rCkq8lfXr27CzEoLurKgxUHIvofic2m4g8GCTRoB8eQPegy++v2G1Vq+l4FdCyoJOHbJxE+8Fmu05hrtpfmWc2UJltErkuoJ2ztSzzDehgKJ/JNZSqQY5QirKEc0g7oVqWhR6AG0Q9DgtIZfVKppMi7YRiZDY+lNyCi4P3Y5HZtu9xkCRblBmv3OFnCX/On1wPB7Tg50CI67YUb9uSU0MrJ+hm8YQmqXzig/K3bcUpAz2TS0cm+2dH/VB+zF/G6Tg7x5bp7dXVRWoYVfn3yV/JCKHZAfS3hGEikjvx2KtfGsg1wrBSU8k6hsjEpcRpDjS4VLpe44+fZYF2qqx01u7YODJUBoMWpVR4xKPXTcRjxAoxlrFyE4VjiQW3eCk2e9oLtcf6NzP2CFC0erfZTCf9InAvxS79aZQBNQVaxGHX2Pgu0bq7qkRN573QEwN+CFK6hD6oPCH9DntBrrWqqiqXUvVFzMjG/DaO4bH8oKMwz1CxyWA2UkpOdYdwEfSAiatlpD6OOvTlpQ8cMG5aQQymRjvdsdmJ2djZZEIZBy+MMGCGLcW6Yp09Q24QRxNDfGRI3ssUu3TWWc1V68t0umq7wyt/J1O0MF1X1Y7IsdUsamW7g82n8+YakYyCmooTjvNxzQ67wwFl1xjV4M5LacRB/hCmjmKx04oW9Cak366vJT612oq8Q+MVrREyESeNUuFRKF3DvhQPMfmVVVWVlaVfkL+TAfycjwgQY0msAJG/xkZi8VHj7ipDSSWN1SkCj8NWQNaE+gcLGTc8DmusMqgNVCbRnSzQZHygBipPAg6HTuESBB6IwZhPJSUuRsRQPDYqiqL0AB67vTAP2r5KDZpE/kpG4Dk3HrLOOXVSDwcdjLoUCrdWUIpBxRDwAXHreA5oB24QduiNpRX7K9QrpKZSo52hBNBO/Nxnamd2yOPQbdZBnG63Z3gOnYAvEpjwL9FObNTF2AN9fS2Ct7maUs5ukWPOxJK0E4cgq9oD4Tkwg91k2EQlZQq0Mwrl+8tEsSUAtIPEU2vMN1bdbzbkZ744RYyQIQI9yzEwskg07KgpFEi7Sl0JtFOiHpS/lT7IxNBQYpQLIC+A2RcW8CTuB9rZX2W1Vnwp8+kyvlUMLZECGGWh"
    $sFileBin &= "Alfru81VVaVfqKSQVPaLtUPx+CiPShBu0ZLD+kjiJWNlVWW+mkrOmuMln+LFxvc4qhWMMCBwlt37zWoq41YMDYzGZyORNjs2ULjFbi9QV1WZS/PVdHLKzlqOJD5s5XjTktpRVd6vUkPfUnnrlH8gBDFchLMJzs3YRHCDamtpRdVuwwohbkq0g3QDQVboam5nNjbkH2nG/BoMsMwkiRBJTPCtRMSdUlLJETfDQvtHo5FmasuUWQaPPpOKnz1by0VG+rx9XhAklOZY/bHRCBimmyMD/aQPKM1h1xlL80tBjpgN6ozDiAEizc+PasHfwsDqt+uYLnJIZTBXWc2lhszlAhkVhxIiuELJaGo0MGxjoim/Ehx6ZSWFtCbPc0I/FI6sEGrWFWqdJH7JibRTAnJN/lL6CAls5ErM34KDlkT79JraIXKlT7t7v9VQQmVxCqiFeHzoIUwdgVNR5nL+UJe08sVAJbcmjA5MgHES7iHsgBGHo0azs6rKYFCrKww0cspCrZMkInxrqw6bKBpwMJsqq4B2KiuppL7Es6NAO36by8dpJDnVb6+2VkLvGg3LK+WUaEeMA+2Q+LmrQdZs/CwPD+Dt8zfb7Zlt6RNiiVF+YHYAj9kFgFMXMEYEhO0aOioQDIebuBoehjh2RBpfDjtTYsinkVYLxSVacA1JSt8LaqdaU2HMN0ummTkviLMEepaIGpwpwImCQlYk31EZKoAWoPyM85pk1HeROFHio7Mt1HCnIRQ1gdFbq8wVhszVGu/k+qXCpUYvdJXbobWcEEfgbErmXSzyZZEEcSJtkmCLQ8Pwo7GEAFqwqlRtppH8AutJEB7aBzM7eoWNH53oqsMgq4QC56PjFaE9rhBOFiOgp4xQONS9gsqSRLGWm00MuYcEE2b1o/32gvzKCtUXrJQSd2IkAsbZWtslcppmyT4d1fWVpZVg+suLtVRoh3snAWRMYueWEiQ4lcX1wSNEidduz+hN/bw/EfPXijG/+HGy7Djp4hgpyu3XafIpRVkcvhJBwiUI4raD64X+tbNadT4VuROJAe0QUZglPI6tPmgTpt6wCdROlRW8VqYPIcYnIrHZlzg9+FsghuZqxjlAQCZX7pZoLWPbiUSGZs8lp1Ginmo82yE228XsqNhRgbST+cjilubIov1A9azA8uQKsT0AMrzESIF2eJYliVAB5hWA8Tkl647EY06knQqVkcbABT5IiFLPAmsqmVaeRASTuWq/Qb2CP08d/gkRoogEYQUctP12hz4XCjfnVxppkDLQGgSJhD9NBCkGAq/FqA3G/JLdldZSCrkpjo8Mkfgo/HW6dvM3oJFwwsO621BaVWHIXzazlgrtiFKAEo+Jcv4FEJvlpQwbKCo7k8k0tHsiMTvAirOfBVnE52Q8UtGFRQZKZ2Xx8tZ5VDsTfBk0P+hlu86gVhk2Zc5sIiEDZHZ0IPKnIQEHL1AxY2sqyTcALQAvfClTyx+ID4ViZJRPrqsJOnSMy0+q8jHnK9FapkocFzu6W7Bs8CI1TC1mZEWToRKiOHMFhekOBisOHRpugSGlcQk2bvZPpF5SOwZz5kGcwHGxOFAPSp1mB3AyiPIhU765suqBTYYKCm7FxMUIF8Qh2wIy1uluJROtJhhXpXlUYriQFEJDjA5Wj34c7mGtqjTkVwLn00ju+FzdZAjapHWJdgoNFepN6iqzmUJOmWV4FGuizU8GahluTKLmamuVepPVusK6shRox40vWwC1M9u1pEiQdoTkbFkAPLtW/mI6wPdFDrBDxJV824ikdvhyBxQd9erKzevpTKF/RjtAawKLy6ai3mrGbF5fQiHpOEAi0KsgB2NdEEyQsRZ7tcbVZMjHqaZKaHx1hueP+mfFc3EyKyKnoTNhWH5otiFfXQoxVpV5xfURKWHiJSHCeXFFUNAO3cnhw/hsQDuGKnNlqSHjxU2spNJQ6jjsGlYQam3kT8S2o7QS1E5F5iuJBa7risiEZwIOr7fZoeP4LvJxlxYilEqcKqNAOww/K3JoMiBjGbaV95FIs82cb65QmWlkR0ZJCMbTUs66D2hHW7nboAbaAV6gMBMn8OIErpZ1M6jyw57qwi9Yjfnq3Ra1OePcEedj+dEBQviuS0TgWOhppB29Zb9RVWE1qJedKE6BdoYSMdQgfiK9AkoevLMi8wSSc7jZzqgyiJ/5+BWgHT/hu6FsLD5GIFYHxQ+upZA1q+isjGBAhi/VnPjYb0isX81UWlWbDJnvxBVnz+Gqozg4LPSJYWh3ptm54wtfqqgyQJxiUGc4cCME3xEUd0upnXBLDePiQ7OW/HwD+MTdIHcyVfokJA5wEanmNXa9yYUP02XaUWkAj1hhzngJABcCaydBD2baCzVcqwBOIBEqKc2vKP2SocKQidOSwHP+SHk/hLZ9gWZHDevmQZSLRWpkTXgCCkvuWF+EwxXQQYejRudsdXWRCbfNqi6pUFXQmClLrtC/MsFKS9BB7eg1lgfUanVFhbqURvmCE6eEgNZQKKD95OTvNoNWtgLtZMj5YuSsyTkqTgz4QD38NVeLS5uAdnTG/ZWq0kq1YdkgbnXa8UOdP45PON3v+M9eVTugwlEz4FPYmfXpV57Ht1d31YaIgK+vnr0ErD97mn8Q1A6JOAoZY/56+YsZQVCweJIpIBaLA2Fiwj3qqWHAHapK1Rm7W/8lP26Zmo2/3IKzHSAZ9LauphKDodRqLpXCIPmLaYIQ0B+g8zEvC6XX1Lj5CWL5ksFQWQke3WzIz4zWzpEBnu//F+hLT3V1NcPxoY+hT0w7rAZVpbUCRm9mOevkJJYXGM1hZ1nG2XpaYCKJszutakNFCVh+xkKf59p4L4jAYKgFQkSX4Bq4RFqLDJUVwDxqqznzgcuJmNmJ9gNv6thWwS3ORngbUFrFJhphymLXEK7QT5xlpNi/396sU1ih1fMN0EIrbmxKEV0cPxuPxV9i9BjpBiCGU1ea8/IrqtQZr9wRY0MMNypGXpoAn8tzLrZ/BuUa0I51k8FqVOcv59JXpx08rTM+6ysQyJA/qXZQl5ABk9RK0Ra7flP6QhZXcBAfuNoudLGRUVwg4edZVDthu4415udSmGkSOCb55jOcjkOdhlMGUY+ese6vWP+F0oxl+FBMlE7biUd+ih3rtdtZl99nKMHciMG622xQZTZwyQS+NSKEq4gxa6pj+VYyW/8lQ2mltaSiqsKc4WJZYXYAsy/QIjX6akbnck/EQHIav/CAGWjHXFWx4lbi1YHTJ8EWIB3wghzHuoSIyIQSIeMDBqQFiLIyXSXhrmXFSIsjDMK7ptAmtPL+GHExht2VwGmbjA9kGuLCDQQevDguyKphnG5BPE0ibqc0TWauoEA73X6gHQjQNZJbCbc4CoF21IY8oB0jjeSOYEPaiQ1tlmbK+u0so66sVG8yV6mtpZkVb2dJCE/LR2ESm3BxPAeCzetw6I1VVWp1JdCO/MWbsCrt4OR5LB4qg84M4cYjHLxwYfa0pBkwyKo2qNIOETk8XrTLORrz4zpcMjCAR1m7WeTlIKdjK76gyliDL3o4N6PA1BFQ2kAoHhMZh6R2dNoH9lvzVBXp116Gn5yR5udjoSDwQrTZbtfxoZD5S6WVVRWgZQ3mzJbiDpFR4PvY1dSOhuV9ZNa9A8QOKClgtlJVRkv6hHiXlH3xVutrqos4PPYoToSiHfdXqsxW3Aqd0ZbB5ug06oQWjzSJZS/jTpPTzEBiyLhbop2Kyi9kOnIFpiXs9YRD0O762tZWt2soTlrLDZXWHcbSTRBlrf5q3FUgPgHRCTgTh0NX7Xb5R4fIS6B2KjeZ1YZKQ+brTcVQN4nFIuVMckeT116gsVrz1ZsMVblqgzrz7dCt1T4wn4+7CqUlAB57NdJOXn5plRFYMxPLceWs44dqefIy0A48AOfiayACwqm4ot371fmVhi8sW/xqtAN+Foqc4HhcnILbrEHovDxK/hT3g2ZA2mmxVxvz024bzWgCPKswEX8J1y5gOnkCX95e"
    $sFileBin &= "EwFNW6Mv323Iy1iLDAhCK6Nxw3MAJb/kOhc7bcIYDmgnb/f+KsP60oznWAfIWalhZgXctQMxVo3ePfGOtaS0qqpCXWHdac5MUImRCK6BFpJr51uqFTZ+IBbzle54ACjhC5VmbWVmi48iBDMXBNqbA4HZ6uRxRTRvNMDA+kKVwQrPkMGiOP5XOJAcgX6HvZB1C07Q5NABIqidqlJVpSHfDNSTaYKBi44FokEHtDvX2sq3QhcTHwytKkNJRX7u7szVrAjNg4ux7HrQmXyEDJCIy1RVmQ8BIo1V1qEhYTYx69sIvhY72KPXmawPqHOz1VXq9YYvZTzHHRKdITyYgmcwxxZ01LAs0g6wWsXOCnUGR0I58KBCt4snEwQjoJBTEFiQIkA71Yy1Sp1vNZYsG/6vTDt+sEAMe2rBrkPxEPhBdOqzZ1tHL4VM0rLQCKidL6TdNsy62o8TRBQvxkFJQdnxWbHW3dpqw8n5/ppqdrd5U8bBLSGjgkYDOhOrHg/ZfSKLtDMm6NSVpdbKTWpzphuzhkgIZGAsPqFHmewBti9rJcRmANqx5hsqjeYHMkm640TZaBzPXUCrDLfoclxuCBl7DMAIVUbMDFozI85ZER1IoNrhdbCMq5V34WsMavMNIJTzdxvN+x8wVMjfXDt+Gp6Ohj39ZMxTXVjWiu+pdZG4v0yIj1ZUGddXVqjNVYYvZZgS53H6EDOZ9loexI7AnwX3hVvKStUVBlVlVaYZ/UVhDJizpcVRXcAJLh8hID95IwwsY4XKnPlEH4mI4NuJ+27JjUf7QBRyFVUGVdamyqrcfENJpjGov6uVxD+OEw6nmVDsAO2UVqpxecfOCoNZ/tba4VY+9nixUsc6JybQ+mdFIdKFEVAAaKcIWkddZVEvewLDyrRDEh+D5xuoRTVzLh7i3pGCrFky5BYHaj1IO3g6iPpL6jSF7JYt63yJuM8Wig+0SrwQj40KLnctzv+DMtdBjKvKMLkj+hOzrYxWnp8Hbmh1sdJsqKdQDdE/NE+pKsOlOyFM+ULRIsrkMM5BlwskYoQACDemVBqNmVk+xHD+eHxISu2QfgfD8PjeDr7EUFlVZc6vqFRbKzMZuKEIL1XbEfTWFLAuYYCfACNl1SVAO5vAI1ZVlRrSZk1wsNI6QW9NIcMLQDubhdl4iBXiflA76ysq841VIHcyWwjtgGaRpuc5vtXNt4a6/DhtsKkCpWYp3CBTQRIJQKv3B5vthUyr4ARVfnE2xDNAZ4YH8rXmL2Usd0K+oVg84mT86FaCkpplKivXZ6kr9pfkZTwfsegX8H2XEDZjNwcdDr3OBkrWCAHifnMGCX2x5E7lvn1blLmodj65BDHLKLT6N8CSmh32gvsfwHlWs3o5PbIi7Yj4eqBIV/JV6mcTZ7kJTMzGZkFAtHKsF8wJXBnSTnoJd1732D7lxiHSqhiI+3GSL0aAOUMCz+HEQZ/dzlaY1aoMg1ud5p14K8tKE2WzHxOcg8MTp0CVFELcb9hvzjdmqPJDkQmp8rFGLLcPxDjDucnFItQLVqAdM3j0TM5C9xMRaCe55yjcbC9g3Xwkfqk5X9ocoS61GjPbOOWH0DBKAnwoAOOK53wRPgRqh1VD7Us27baq4SYl6a5OkVcngwfUMy4BAiCBEaFwDmhHtbtyvfl+lGwV+emrKQDulUquOHK1tja7BmZFfyw2sAtXNakrKvLV8Jf8zTQRikaDI6TPXg2PwLuTByuJJojhcIKewqaykA/E7EssK53tCGJH42pmKyDAyi+tsuaaM8z6Li6OCiy+P5x0iVLxDj3rNBp2VxhKKnFLX7q1F+qrvrJBuXVLjs5NXpKaJDJLBAZHgMdeU92ADgUXDMpfvxEr0g7LziYmfJxGmogJJfy1+PJFABntEt3J3A7IT73aUJHWYdzZxXgMX46zlvEnhkAJ4vxYrQ18Vi1OrHjtNTpjpXF9hlPoynVsRLBxEu2gcguRkA1qTn7VUqCuMmNO35DhBgk/SdIOwTx+VMoBcCDFbfmlIEeMJbutFZkdczdwaWAo8XEytdPv0Gl4pJ3YgBqDOBhZVZXW3Zlsc8dZGhALQQjfNFwr55vggeQitcaS+0Hp318FUVbae3ekhQpIlpjYAdZx+V/iBqAjJibieOaoylhVkl9x4AGDIYOlUxBioRm22GtqUOzwE7HQaCwhmpB2DOZKgwrkYEZr7vz4BORXzTW6WoHnT4fAtUP7sMb9BnUVLhhUZ7pikIgTuGRWWsod9YAs5LjW8irr+k1A/CpLZcarvgRcKwtqBxuqBRc8NhvzH0B/CNZZmZ/eJCu39+RJ6w4VngsMISeUD4FKPAKcEP0XYAS7Yy/I8KoqiHGX0ckr0U6zUskNdfFlyehyNOG3jUrT0CAaBsTTrKQZgD8L15dWpXNKHKfa+E3gnXWM6Aslkq83jpGQfygEpAkjod9ew1oqzarMFirrtio/Z+I4biBZ89mJgdZWTAZERxw69X4ctQZDhWqF4xdXxwCZwMrHJx4KEuKHNq9hXV2xmFgEMrbKbKjabbZW5mciR2K+oUQECof2brFrTK0wtqCPuXwzqimIJeAZMlD6OK1Hgn5cPmnjz/KCtJaBtBrzK6uMqr/cby7Zn+5cloA6BHnHa2d0QJa8OEuc+Dbr2Mezcd5cpQK5CWEukHL6I5eXjniBO9RUY2LHhSnCOISgGq25ardafb8BbpLRbJA/eZ5G0FF9t0tw+S6S2T/FP/7lX7t24VrEynxzxiv6zpEhMiG6kquy+h3Vms2ug6d54371ekPV/SpDRqYDEM668e3e8ZATWgoTYAUcbwLaUYPOrFQb09PJHcdfOfmT45U7VEANF/BUFhhZsdhFQdoGA7RjrzeoMfNoVC3D+CvQjqYYtYhOIzfrO4kBLgIGI91h9hIRBGwnULea9Yb9lWlIQcv/BtHhY1vw5FJ/YlSindlYPBaf7ZIYLdxSbaoAMaLKYIqyu2YbviBF4RJCUpCFyaOzzmqMKoJAO5jxlYRyRmk7/+wo5trjozzIZI/d4aiuxYWyfhtumgLaqSyxZnSaVWjW7Ze2ImKlIViBWAVX1gh5mLIGqWyAIC4/7dO+eDwIJxqO4NlhfBcZCoGWnYBAyJ0HNc83VO4G+yk1pLX2BXeXwi+sdYFLcLeehlYaGI1dwmmKhGjArKMxX11ZZU5/xy8fQNbBNZQ6J2gdF38xEY+Tc3xZ2UYMEnN3VwL17MiEGEALInP22XUmwe2OxK/MkpDg6vp+WYU5DwMtq0Gd2TJ3MSL6eK4O1zDgkC3c/ORT3+9a1BrN6zeZK1XqzOa4gXYmBGE2niC+loi0BNquqy3Lw8iztOqBfFVJmtsjDv3k5KlXvlOaLy6KFyG8wqGL80EsLtLqt9v1RozRwaeolpFqy9NObvbntgHvKGWTgIHk4ybil6TBi8/B/xQ7JNpfzcDArVr7+oWOk0d23Kksls5LPpN4KUk7wDsJ4i6XNkd49Sbw5eoMFiMuGjZ/U3qxET+EJ5pI9Z4VNBrck4W0s79Cbd5vNlRmFmWFEhP4SviYCMUGcVVcNcefjsdEtsQKUZwB16c8kMmBUBcTvqFYmzRd0w++ClMkF0HtOMFwwOaBmEuqzJvS1gty+iXs0Ot5Hy4/il8hJP4x8Zl2wKiCQFFbCc2UhnG6ulhUIgBPdQ4rhiIknkiAV4nHwXeRiz5TVQVEKep8/CPdgesN/YtECi12Pc6TCeJLH5PIGVfZvd/+8mYkBZUVbL8yk+WUfkmxYfDDcAJIQTIqulxP/t1TX2UsFQZjVWmesTIzp7Uo+Gprv2wqr0OGBjWysexJV5lzsSXbasw35K/PeBW3QHxiPEaGWoE/x8Ap2pmyr37ZUKkGn1ihUpu/lB7tFDW98srxBzC258kohPzQq/ErHw840EoDDoc+bxMUvynXsGkZd7gs7fRYS1WKrVuVZfK/xfisi8XBC74K338h/vsubKioR2cy50P7r7Vr3aDT/lNp/nopKSQmRltxATEU"
    $sFileBin &= "/PFoI1OA56zhMmLgTIMq/ZULQskOfHvvFqXgn0hIPjYWadT8RRmumwLageGaX/GdCoPZnNHiCOhPfiKRkI5A9zo8DjvL82cTMYHFMAVCXEN+hTU/g630oZgohppxzxQEQhqumXe1kkRitFFbKskR+G0tXZ9uAkA6+Qm7saaQhVF1BUgBc3fiX3cdhMY35+XjhtbKdKayXP/9SUnuAFcWbvy64CezZAJfjfBO5Fzo7FN/e7DMjFLNathkrkj7UBzXzyQtEnQkSWHgnF/kXa5v/a3rL1yLddKWLGkxcQZBFteCmS/yq5YaPcex7tNdroNdTz71pK5s0Q09iynrygxnJO798pfLNm7MlfYJ9sODaD73OVwiy5RAsxuKKjOlHduoWyRDX/+6J0pmwrjQWvnvD/57NcSeVqtBZSlNb30Ko8g7dLJqB253E2cH8BXl0EoTL/01noaD3FmTl19RYdikXjanuSztHDn1v1eWfE5ZI/9z0R8nrIn8CX0VIRdf6jr4VVxIAvcoZMDnVq11py9/DKLDk1V3JhchD4BgiCDnEH9z2Zfv/TqmlMMevTbfDJS8Ke2cWtuB0jsL9u0rzuHbCNBOnES62bJvf/8gcrKc2zGD3AS7z2iCu8tt8n9MRPaXM0GH12uvYZ2uMy8PCNymB4DXKu8HrWlNf0Hl4mKXyHHJxGm4uZCxlTE25xDxCy1FpVX3AzVUqI2VFdlp6gX2ZzMS63jtui8fdLnEs5GXXnrp7OmDTz711L0mdYXVrAY9WFWZzkQc/+RTOscY9KNDn1t28N6uv+1yuVzu1i7X111PPfXU37rKbBC8lVZUbCqtTFft2Lt4L+piD3BCM2dztcIdnux66qkyLbK8sRJaH9yWuSR9XjhdlgPEDDqhWc+Ulf1F2VeB1FxlmxUocCr2G9Wlm9T352e2DLp2s0nHrFcGZwiJtNirGUbDSK64qApRmZ/ZAYb8xq9/2Xnw3rIyR384GrTbm6s1Wq1GsV5tMBjyjZXqtN6Mq2BYhda8Q5rHmCDi6EuiD5q+66mDLtC3MLLs9qL8LxnyzctP8y1HO0L9K//HyaprZq8j8bMMj/NkQ6dPd3U9efDgvQwe9BUAL/mdyvyKyjWeW1PX+/rJk/+1Ul6p10YiPkF4J+LvckHJB12YyAi36PMkoZy+Rm76yf4dO7TFW4prnf7QkNjNc2VPPnnw3i9jBBp2FAJZSkGKMbP3uP1111c3tp524Um13n4YwNX3wgB2lbk4VSXwGvTuF6yVmaw+6npy40bcfI7yNWfXwXvvdX3bdbDs6648KXxG66kyfF7+7hrhKpPeYYJbzzVfvleqt+tJBNRfsziQX1pVgUckprUc8ZDtya9udoSj/XqN2nTvV6HQrie7vv/UU08++f2nnqzVadlFiEFVm/Lzdlfkp/k6d+fBb+mEKJC9Tuty3VuGde+CuuvuZvRQYhtEz+pKQ641g3ceu7q+qtF7w/8SdRRuvLds42bNxo0aTQHDYIXLcT3lenWVKuM97jZWc3dLmMCD2HUMy7JSfevNSDtpypHPsHmjoqxs45c1Gr2jpdnhcLCMnuEFhbqitLQyzeyCRmHTKZi6JB/+7WnnQdfBJ8FP/fenDjb/MhqdwZdrMGqInq2Va16lzGU3nTpSteNqh50j/6OL4SNDwDjgTp76PrBODqYFvLpCtqFKbagsWRvtMJZXXgFak1MStV0+3qZr7frbv/u7rm/fW4aLHcG1s4qSA5V5K2yfXwXi8Vd6q3YYdioLamtrpRH1t3/3t/d+WaHATaxhBwPDFdtGVVJZkonltLqevNf15Fe/HiThAOaU2W9//9tPfv/JgzzygjofJ2sqMlkFUPbtjTnBf5E0SfXGe78POHgQOsB0B/hyMxQPoUpemmLq6126n4GXhUrrcrWazZvLJGzeXKDRaAoXF+8zSKafzrIgoeP1o1/+9n/QOfqadRoGyiuAgl3fAtZ31ZZpFBow/kVnVZVZvckMokH+n9aIvzne7irTOcL91Yq/uPfevygrqy0r0zHM9u0wcrFB8iqqjCqVoWrZfdCrwwUB1c4cezBo36zdmMuwD7J6PZTOSiVW7LeqVTTeqLydLautfqgl4HXoNVj55KhTW/eD/WSSDpfAbNzMMIzryTKNvqbGYS+4m2W9i7yqEjo2vQCOXWcqz1pSSV0bN278KhDCU099z1W2sdDh8AaDHofeWFGxEwKJZTlzOdpR5JiMO6450FIYDTkZ7q+Bcv77f/+7p7pcZdu3axy4Vp/RlVftLwWvsiaXwivyml75f5csyVPXU181Ma6ngHRcm7WbGQ3ulR1xVGtKQOxUPJBulCUefw3iuC+VOBfLnvx/Yct0PenaqGHuvltaqeLQmCvz1cb9ZpWlMv9B+X9JC12trlqIIKR3I4SbawrK7nUdPFhWJixuMlitlffvBuNJS8sugWM0zdI8R4tOUea6995//+Wye79etrnVpK6sqrRaq/ZXZqfpzxnXVxkIU/rteobVg3FqCjaDjRYyTHly4BoMFVX7rWks22l8Ye63rx+59+C9uhosm2W3F90NVKbRKHI0GqUGr9wNYdD+qvsrwPrTWxYkPPd//nhP2b1lDocmd7MWysaqFwHtIC9g7W3qSqtafX8GJ30Nvn4EiOer2kK7PqeI5cVgKChA07Cs5GP33F8FrZ/5ni8doylzPQkMytoLNVj3ZG/6SqxVhswPfhEYVviZy/V3T7nu1Wn01dD22/0wAC0Wkzat6VVBodAoshRLFsd9buOXwVOVbd64Dj7YXFhYqLdX56jvr6rav79y2dovQzuaorqc63gWArevsy6Jc578Vpco6BmgHUJCDmB/K8YSpWsR4i0agV9//wNXZ927gG7KIOR3bb6b5bntmhYYZEGgHVVJrhoqn6a3chcdf+2V7+wAShekbi3brLmb4x9k7sbdTWNAOxWqTeYH1HmVhkx3YCyKY6KUA8DspmYz6/+luP1uYZFfj+cd799fkZVR+aKgUbZIx0UyuVomV/H5vBwFcAS4c5URQqD9u/PSZDX+4YchmHIEPXrmpxG/8CAUKgEHFns3DC0BeAcilTXTPv/i/Pz7v/1tU+3Be+0Cx/n9P/PyXA1XU8M+WMdxvPANKF8Dxm+urNxfVfmFtGhn4Pz8B7/9ya57D5YVQtSTxHaWczzBMyBIpDCoCJfEVeWnzflDcx+8fuDrT/7twc1Aarx0Whnxs0Br26X+FEEL7q/K+N2abYzYvHEjGOi995blYNszcuBwpt5qyfh8/sUHBah4AAbA95/89rfLNmPjyJ+kB1ah+HdZWRy/VAqj0eSBL9HcDXy2GZ7CXnvvV8u0u/FtR+Y1nqUMKrjw+s7q6jpYxnb996e6AP4QEZm7t+PaIIhGHUA7VSXqNZ25q2AETsPXf7a2VmQ2F2wuq9XUiJERDkJnaQDbNdl5JSCl0t2qmZOVd+h4pQpJi1MUajQ63huK+FkNI0sHc5VaZcBN0OpMHZZIps95guEo+RcMz/GYuF8+iMbDZKkg/jRn+PJR1vXkxjscYRK0FzD67dL4Aperh0+y1ueXVKQ9Qewb/O2PH/4qyoUcBueY/MJDPA/0wHNIOwzaVRuEocY1sw737vz83NzrxxcX//pe4C5MpYV+FQlJ+GUoEiEijF0khm5onar8tM7tGJiaB2r7cVPrt+8FnnyIc/AtvCD6QxES4raXy8Sgrti/vyQr3RgLbjH3h98eN5Ud/PZGBnc0IcI1EitLX7CBSzFnmnzBE+IDjUeOdh4su/deSQemGTEvA3YEwmh/05F2F2jwe7UMy2S0OBZoJk/ZxjGhbrmaDMdKJgmcr7+77Mknv/f9J79/cGOJWZ27QjL8lrSjUTD/7vM3kbjIubqe9PhD6NX90NUM+Pd+ewvSzn7DprUcralRQE3ln5PQahxo67zfT36mL8JXJKDaQaP8TiUuhUwHjQpFlsZolP5vnhOeEIM4tgSGwddNkahHX1FZocZNQaWZ7vvCo6y+"
    $sFileBin &= "kWP3egPhgKNmOwvuJfSgJJU5Ji/jXWWc6PrWk6Yce7Cv8PNdPxN/Kgq84K3TlyOXsdpNqrw0SW1gEuTCya9/9WAZo5EORSDRCCD0cpDbjnpBargzjWksRPQBI8z9dsmpCEFoddyPchURDkZXMpQwGdR5aUyfnzn/6fynwGydwGy1DNM4AhWfAEEo4WcoSKT3mQjqior16S5pOvMecOfcP7ZrCk1lZd8A24nAr2Td5ezLYr3VXJRmOvwz1P3Uz734xz/8nz8xKTZrMUKk9N4CGZzkUZ7/x//2wx+2mzYDr2G6PQNAoAx+iGNFTnqNHc9H/E/wkr8qZ3Ua03eBPQ92tXLMitHPrWiHweiNuYWP6Op7CZ9B7lnGDrRT42mxl5sfqMxXr2EWNAsiWPnHJHhWCEVCwRB4Kp5nNfpfwS3CzXpNadV3Hkh71YVCoVAu9WDyPF+AHwgPvS+J9lcX4fwtvjwy4wBanA65NjOM3uFocVTfjR0t0w7iCfnvdCHM/HSz61tlG/UODYMNQ6K/IiOfSfG0d4dPAjd88PrezQfLNAy+gmtp1BJeSo8k9UI6EHo+Gp96/8hSxYQIOS3zGt4DvBaP5TMo16Bn0tlONnBh7iOghNc7P4J/cHqGk9pFKhsNFMuXraYp/X0X3R8B7XzQCcFDIXsaqj9GLkLpF/nP1A4deEceOvbJ/Nz8VBvEK9TVDkpAEvW/PPfBH/7wD+UQjrIZ5TGhuaXVA4vc5xmIifhF9LEE3VVUZMv12ztf/2F7eZf0xZVwS7WDI4bnb0GKfkLeAZ9ISB/cgW0ZI0FPv6eGVe+o/EL+GjbWZGm46/tNYmQJ34AAInmoLCgpTa7RqE1vGSVgXV6RZokKpRu8A795PXN3/wzaZ6A6J3tTvsFg2JSVWQy0uNgXIgP2b7nKysrYar2mXDqg/yotZAp+NMo1HMYJpgKNdMg34mdLaiF9cP9fGFV/fL1OA/H+gxr2IpmAQYXUA3pQX47zNfIX1wy+Y7xn8Pio/K9FEDpPaKDq0Ymxi+QduEO3HtVUJqOrZ3IciO31IwR+FlDkQ8NA7CaRDtxABOPMfOyeR812EjNdDJoPcg6UHZGkIE1BEgl3EGCd+fdEv8BzUDglw0lCAE8OLTIIzzI/5URWy7R4+f8XFLlKTe4deIhMEv3b2ULm/Ae//e3x1aPyZVLKgOQk4fVAnYCWSc7otzPSafrRYHNNnbQ4ZQ2vg1IAqcs/JoESHBwJ/slDP/v7Pd7+YL/j6lrFtJAFbSz/uIjrD9FqQqyezXuwv98bCHrtLFuuXb8+Ky9tYluC4CdjrWWuJ7/61YMHNyokihPZW8nFdMCT5vL3f3t0z7//i1w8hgiUPjzLaYbd/pD8hTRhe2PuU1A7TXoIsdhCjeTOsW9F5m5BBOtMf+A+d+z5wWN75H9InStu/3wyysK6g+CE0mF4yZ+ngZ4L5y9MPnf4HfiRA9ZhC8H4RVYYwTvALyntm2nwI05+OPXRH5qkqSU9tE70Hal5BGwamoJEIP62/2tuaur9C2cg9P8GtI1f/oQK+giPHXD+o/n5K3NtjJ6aO8SoKE+RBYQ/Bk0OclNgWEYz+OncP/+3BvkLy2N52tnuuGncSMlBKcKFjt3OSsfdBe3c/bjwyLCGNWVCluL6foOGiV4EKegHqwSz1+txGq6mpk/+OC0IWfqkjEfwUGdkA4Ep1zMuF6vX62tqpOej0QkYwp1++Oh/+c9fdx38skQ7Ia78s5tnhuaIc3j+g3/+oXbd53BbDQi1CWykjM2n6cjz8/Mf/LjHux39OaiRX0l6xw9BaDSZfJG/uGZ0Huo81v5Z7cBoMI8/QiIT0L3wsx7UOE5Dy5+ngZ7BnldPNkj7UyEg5EHujJCHFJ9nRexj6GmsfqYdKxxv6uz5B2shkgyqKWh5kMsSo2VU9xvBR/wdJ1/pfe7Qcah9BOND+QMqgAiLB28ldp58f+qfnke1I83x0UGLIotBOpD8ldToirqp+bl//uGqcwTL007jDYoEIKCWxVtIZi/NN0EoxDfgkjKD4T75WylAI2WjPkNSRV1s3g4KKshqNAchYLFtzqz9GcU1YYgcxYXAM25ncc2aq8xVRo32ofSLvlf++fWfHNqs26xBZYUJAPnDDCEKfhDI8x8c1yhwWTi0P+7OAs+S6bjqtna+MfX+jwfCUrJCg2oEe9aP5++MoQmlvVCtsf340WscHtQaBE5ONxQOetaPRYPUgf+88hfWjsHO4z85mlziyfECFAm2KLLQQjjLDV3dDE+UYQy62Nhgqv/O0XIGa3o3rl+V1DLUXopA5S9RAC94n2vvbP9OQ3tPhIS57WyGKvZ6iCEignmKTZ0nT578jg2GbYapnevBSiL2HfSEAsM5WIX2As4m/HhQ/nw5LE87EArJP1wFWiTmAJLDF08OxgWufMN+wJrWWXMa7tpBE4JykRdCnGb7Qxyr2fzUU09+++BXl3ahpoesqyspAdDyOIHL341W5P76V10HDx68l1IUJLGm2Dg1/2//fBwnEuFhxO3sg5RKb+sXpRmVzlwYU+9A82OOgQgUnKLxR8ePHT85QCIPARFosIXgV1TqiKTaSZvXutvrP3OpbcAET2wvV7CoxYm/Bpf6ypC/sXb0tLcfSa4JEcVIhHB3M1yUhFoYhQaPWks2T6bt09ZgqW/v5HkUZhoOjB44E9olKXYoSgbhG9xzR460tx9v+JsR4GeKQRACGt8PUt/ffvxHR3+4t5zV43IpegAxldQhIEQ4fwtTZBxEY/3tZ5m9W2Ml2lHc2AAsBM9ol2PSXAfz0xnczWMX3FXfqapY08EXvOI6uSO9ceEiGCV4XrD3Qu3X//rg113/IaP2FxS43m0JKKd4MBceBDn74x8f6fwv/yEzUrsOHkK8PZ/Oz80PQvVREeKolT/LFLy/+9NP/23uj0c0emAG3LeJvIBqR/5C+nj40A+PNgUICYACLExONSWZB5SDNLbk72UGTEiBoNJosJPBsbDfACWCpWeSlhWWpsn6sDV4jUT2UG2wK+xqTMBkXHvGWL+3XewHbaO/m5UG1xhaD/8g2P52atwg+v2sreE7e60NFh8uaGILqXlDBKq/EFCy+3//8Y+O2xj9dqqly2FKxB8SGSZI+MIiS+/8/Cegd56Tv7AMVlQ7N1o2NL5k9H6Ga4EO8Pwq6nU47IuLA2vdJSvkcddqYBZsBnsVSpcWkjFHfvLDH/74SEa8zGiuuQMu1CQhiFdApxWyv5/74P0/PJ+pCP8M3QPTEd8FYPn5M0V69LbSqib5w0zBi/Xjk5Nzv69XuB3YycnMO6/PdCIL4e7ocEJ/RjEZCON27J0olo3DV/LpdFoIKo2JfEYh/XA36w/zoHe2a/BAzMzxU6yvoNmOR+wiq31eg+sjBJ5jt8vfSB+sWl3uD4Ohw39oQJFvYGbBL9FOi/ydjCGGxgS+sdHna/NDV9BQsddCyooAomL70SP1jJ7JvFWuA6Zd4BYcy6DhC2xBbtMHn87Nz72+ymqvFWnnxqHDITVcBONhQxBm1Xad7eqy24F21g6NcK27YEMxrDyGb+gYC8snP/jnP/xxPKPXOWZdK1Y5Tk42knCdpnFufn7+yttpr3e5CYJ/OtiDi2bnny1EZiYh3iEtIqYBQTC2/+j5yTfrssXQg0DPSBN+4UFatAYKCgUyuz2ZqZMCIRFHWsYT9DKQ8aF8lv08EyGhJ0T4J2iRQoVSmeORv5IJoNZRIhZuTxIDiXgZDTyJIAqsnoJf17BQeZA76MqhV+FvPill6U1yYx45EglHcI5PUuTUSkZwfgJDK4KCpKe7Gisuf0AJDkU12mRbjfBLbH2+UGH90XNvvNJ5XP58OayFdnAiC6wSuC1EfsXrysq+9dTfff/b6QQrwvW083lHJCjxAvwWWOaOeuDLufn3MrEb9vM114TfPiVEnngDFOQcBJ//9scX6UXnfEhaF/H78fePaWpC+BDkZVr9K/hFa+fx4yd76xUi+RlGEmj+"
    $sFileBin &= "yAryFzIEjCukBT2La4Iu4qo7KF7PsuU50rGPmQNUyIg0UBl4AAkixyjWKZVbttBgZgF9Vf/dzPa7wTgxyRACvxUSwC2aaNAmVBlTXxIphziGwcXKUgqemlYWJLqRAATE6WmpZBn6JYcLgRa3XV/XSM/sETqlUqmzs3ebhFCE/EpgNPWPGrV7242rreFbMbdzQ/QtL/UNoccCObjd5Or62//8n78uf7oW8Br+Gk7h1ikZU7m81U7UM3lnUDnMT2VywFHWdREir7xDoSnnBDEYEQvrxp8/efJk2ocP3wxQDE+cmZvsrP/xEY2kdkjoG7SshwuJ9UeO//CHnVaFMCM1kL9co2EYDSWniLFJBAcSvh1OgiDtpARzkr+RIfplscOyiuTKMoHV3HEHss6WYvkrmUAiYlHDQPQGLY9yOSqy/eB7OT0N4gcuwzyaRDsj3N24DkNKfFEpXAIPdUaNib9IAIqWr1NCgVJZwKLinCX927cz3LP0RD5AWLcFDEWCpoBllQrLD07srT/09KHVMr0rqp0baAep/6KUcpRMtdD5yk9+9A+vrGHe/Crqcq6tl0K5RXlHDvMgj8Qsbi8sH5//4P03XvltBrTDXJ8Ph8ZXKu9QaoqYBznGdvLoD4//cC+93BoMWNHW1NBw/0/aNTVDkZ/xzEYljQACwY6IDUd+ePxku1GhqeN5rlqXg4NWScvb4rAN4iIsUAshESBwQDp5SmXx0iHamQFcFUQl0pyzBvebgpbSIukUb4E7ZN4FGKIg7UCdNU/g0MXsVCgMyhbIQf5OJkDakaIs7GN5WZAUZWW2kvUasBKVyYBKU5NRSUA7Awp0zaEID+zZ9tYx+QMqYKH4LfAf3gOwznLitfHh3hO9p46tsohvDbQjLRYEYOfi8gtN/eTc3B9+lM6RjkzetTah3LavGCqtKWc5IQhBFtP7ytHjh46/fiRts+SvV2oCNAz+ygHqKchRHz/+w+M/aqIXQ2Psacq1Hm1oYHJAh2iwB9Jfk3I9WOK2HD9+/McNOVJksgRpoyMNoCvhgRZYhkPCgeHLaHIUwAtKZVpJuxsBGkSU8tN69m6NGBI4zCUrt2x9DA1Ws/rmnVUA1QfwuJUpKTQvSl4RfmopZyhQA7Iy1h+TPCMQRwBCQg0uAZC/kDFYJXsm5Bf9flxizW+/1d6ADNC8DxsakVNQUMA4X/wniip/cTFn39atWDxIV4By3d7XJicnx99+67VMaOeGIMuptMub/wEiw9TVD89NTXamQzvXTZKx2x577DGp9tJGOLD89pNHjh85+vqP0xaECsXVY4gQ1du+WYzEBo2Pfxw++aMf/bg946MolyCi7fNGq0XimyQ3FNNSOzwRcxteP9luYvRZkmOB2KS4WHrLDw34QX77t9/9kJ/TMFqlAgkHn2BrMdyHyshqJn6We5DlYUDpNWwdg7lkZfFW6HBQO0pNppkGzGeSiDMHiAAXWmO0chFXYmDa+uqGvAyAXIBRJ8O9Q0iMRPwCDzcqKKA1YYAuEVQ4s13P2ji/nyKdJWGHofVNiXjwNzf+QtOj8ic0UL3t8cceA+aRBteWLevyeicn3wbiee3QaqfgrEA7Ytb1CQqdch30bETwh8FWhYLyY4c6Xnz2uSPp7CC+Nltdp8TKPyYJHqUGJA+o8eM/+tHR46+clL+xdjDXMybyWrJ1YNBuUVp+ePT4cQu13B0e7EDcRiMM12K8Cf5BK8jimmOE1XynXqNhNFlbH9u3bx8+yhZqtANCLQRjKkT6WUaKRAFQ/8egpZKvEsoUIdLGCdsfDOFCI9BRWP6WrcmHQDcjfyttSKmdyIMahufZ5CwiJgFw7x2VPXHSnhrcr7C9sJC1C8KDmhzpEZT02MEOBpl0VQqNXq/PeH/gdRCkofXYN9GNAPEI5+8ronmDHCwcgaIHHsMisc74a/+paLWOXYF2bkAzFL1O2SxoiljOK3JM+Yljj5451tkuf7wmgBpZMgpeU7BPapvHYLBKyCkqqu88fvxo+jEWPNa1IVSzVDxAkoRblIwt/dMQbgHJ2kWgBXk87UMKpaSV28DYWY0GdELHISVohCSKlbRoh4dRxffjA/ySLwKqAcqBu+C7xYAVaBBzhIRDwt0C7mXSl5tgzBZLjSTdoojZLH8rXQjSvGGI1dwt4Ikm0vuapXUYoElo5KYwCZ6cMC9M2qYEcF3UgtxFHVilLMUB9FQUQmTAZqTBte8xNP3uQ187RjGlXHvVIFG8blFmPQpK58Jrp/bmrbqqJnXa0e17fJvUPAoFwz7IFD566uQzjfVH0ooVNZ+d8skzTLFkiMgKxVvgDsyxE4+Wl9dTmQCVYE/SGgJ87JZ1lLN2DJkOCUDDFl2yi+HPrcoC+cPMIHaMP9pYx3LPjl+Y6sm52stbqUwCIfxkLLlgBBeIK1EVStiHulyz8klNqaC7DoRxhMMN3NJ0lm6pq4F18CTSG+Ys1oo2adUR8TOFQgTCKjzoCCgHrgEHgaHK38oAmM1Mbv7UFUOjQ3QLxLwPW0f+QuaQ2hxULNg+jFx6CUcEeCylbts2mXm25HQ83bvaZqmUgTlAuTMRIKfWKZ6dmnzt1LGvMfaAxyV/bRmkSDscb5c8eVKRZCkKH2rrfebp3qaG+kzHcCNr0iz5cXSyW5TlJ06eOnHsRDozZLeEvViWUwDMKKyjpESW0BYSaxim/Pih4m8u3WWL8rrcUvqoA9n69jjGy79rUl59jK3ACfIXMoLojkiHEEWCosAyFstV2sE7aIEWMo0l2holDsDk1xM4L18g0w6QDhafKe00stJWEb+UTcZlNSL8cwyUm6PoDhjD8rfSRmPby1BxEY/rLGdkepCqD4NA/krG0CXDIADqhSK6tMNxNpzhAH/1+GOPb1XqT/R207oBpyjaWHx1WEl+Kks7PDl87L7cAk8g0LdKOj812hGYgiVm+yZQvlJZf358b90LrzzdxNszzGLgUazajVvk/sR8uOXEa5PjvacOpfm+iJvAAOUv1R5jXCoj9hpwNXfnME29p/6j7ptSPyA133igULooOgWMA3h7sqdcsWXbvm2YotLlKBTpnmR6HZ7FbZoEt9jpGcZy4hC71EzblNoi3OCRaZjV1ib4/ZEADl5pDSKjg9H7OBaPnAblZ0bO3Y3STJZ4N/4FwZAmuTLoHKe5A4K5LZkqTr7xHCEXhRq2BoKsYrlpEPTUDr+5UKdDp4vvrt2itNFN7bAcD6OrSKtVKrc9vnWL+xjv6aO0XJBVgBNJxssInBHSHDt1yFKkt3sCY4HVNi+kRjtPmJRbZWqD6m9R6l5861Dj8FsnmkBOZaYdeEwGMkyuEvwgxvswZP/T8OSLTb3jh2glYLRsgUKh3CoZPIo1enF5EjWKPNuzIC4tYJmPo1bO0VAQCkmUnzgxPPzi+OT4qb1altkIAa4CXxAH5VOhHY5h+WbMxhZZ9h7DB8BO3qdT5gLplHO6jGmnY5gplPbGCvLLqzwwxLYBKQOqG6HfM7vBMy/WIaXxUqyFu0yfgB8iGFoot2x9vDhTbvD32DBGjES+wZQz1+QxYAhQox1oAs1GNM5vomk+ms78zPLAA46BeEwMBBRK5TonEMIIpbkO5x0cb4MwJTnJgbSzzvgIhFce7/cC02MuXfPKDiU12sGzTJbaHWmndnDvM5PjT1uaA32ezJ4DCRkpWbsRiAd05hal9vjw+KG9b732KKVYSGCA14o0wDzF26DuWyjOQiRRvvfEqafvP1SfpylQAukoNCYTGBOVIIvvGe890Tv8FqidY/gqH1DNOFYBBTTK75gc7Gisq297puPpE72nHtEot20t3qbT4WsvgY+4ciaz1+wuLja916ZgWOGJ5NZS3NCh26LcKLEyx/MgsTKb5O6e6pGOyw9BZBUVMGSDoJEHqYMLgx7bl2mmRHir50FJDor6a2ln32Nbc2i5Ll6H/Vmk0eiKlTpl+XAjVeNkJdqBPxgto83myaXLFwOUaEdQYLksoy9QomJA2lHk2PsC"
    $sFileBin &= "Z8fIzLRHVx3oqpa/eUukGmQB7yTjclAkSmXjM72T4ycetfd5AhmqNhA7UsMAM+QlJxL3nvr7jvoX3jrG2+nwDuopXHnLaDWaAmB9+ypEvFYM/OAnx+4rf+TYI3AHbZ6UskBQCaIbn52SQqy3JyeHjYXQVPAoD3FObC0aD9ENpf9ucmpq8tTeQydOPaLQ4Lt28QlM1ZKxMpmOrrqpC+W4ghjPE0TeWfRt1ICQkkiH45CdM4l4u5/93WRHNa4li2IGCRcBiTXSlFMyy1bcLH8xTQgXpnptOEUf4rZv1m3bpisuLi4oKNBotFRaH9EI7A5qhNnMaAtMj/QO2mnMHl4FtDLu36uG8BOIbezy9BjIBPmzTKGRCI1vtBVpNdAoOcDxzYGxaURfmc4zNrLi8E1V7YAN5im3QSCEYocZfv9346cgUgx4vpfhcyQJWRI8wPraAqXx2HCvpWNy+P6aPirLZBc5BprHhUfuIjRsX8DeKn9EB48+Wt42Pn6ivgZuAXGJDPnDDFE3nlyABVHW/fAcIHegqx0QnhTQoLUXoODfTZ7vecT4tUeOnThRpEQiANJh7VKvQIfIX0wTguXUW9134BSWxDq4J/zzGmZ7knR4TnoPaQbPUX7stcnfdUCENTYh7SvDa7g3sXhrknU0tdLX0saZ4cn32vCdGkRk7tZokW+0sluhJUqwPx0PSV6xoKijw+GhY/NJCNDGuLoR3AmIfeFP0wFQCbRoh2V5dIC8PLCKtLg09DKyTkDH2QMkoFtpyWBqtAPsIMmFAp00ldXx3uTbw/+xDEKsPm9mzyEA2yNrSoYo1b/82N8/UvfW5NM2z5iLimLA9nnoIbiBC2+gtXcFPFRdymJd0/h7k6/9wKjneSc8BPovanaps9+3t3d4+NSJQ3vLwb+g2klyNI2toPyLwz2Dz1iK1EX3NT0KcmdvngajIbyNZE/QG8kvpgvfM4+eGrcA7yTVDpYmojjn8RmQ1hDSN9PBmcbyY8DKHdKmJhA70kVRuTWZ6NymVDKZnQHo773/0PhkLyttK4PAM8nJ0LXQ+rQsCHMM2BbQGApFtWdkjCbvJEcVRFhAOgoFOxb9nscToOVyORtv5x9yONFDQaMUQIu0Tl8C1hmxu06PTAdqD620QSLFIAtFCTY5PIFm490dv5ucPMHUIHn29Xky2VjDXVU7+AuGq8Z46lnL8Hsn6hxj080rhoepgsFbNDq4h3gH8hpwZcCjo3myI+bWn360XsHwjfZGiRmwpeQPM0RzoFpheqTOVm33eDDdgt4RngUMn0IE2jb5dkcd87X7HnnmhfHxvz91opEpdEj15zhHowMdTYZP0di798Rr44wimdlJLvznUbRhpy/RTtoEfWaqqeIHS7wjLJ0lWZ2cXcG8tcmUEfl3Tz77tb2vTU121wlRkWEetEt71tCaYBjL38kUsuVDW4AgKei7PB2gSTvYzNKgwklJhc4fCAZo5Xaw5o1Q+kONqL3hFja438hlEujyYKgVKDv02rEVtHJqtIOkvGQmAP7C1PlyXV/fyPRYHwRa8pfSQbJgqXmSdnjHfae6n50a/0+6wPQ0HVWiAUMBVgbqwR7QeYB1Ah42IH9KAXWP7K13Nnuq4VkecsCQxceg5A7FsyCMEV2BQJ8O82A8Mg/cgcYqgEGM3ibfHoeh+/cnThxrkynaDpYE+lmincxyGPyhY0+fGB9n8NVByRgLIA1ceIbGJXuSrqaB7vHJuvtOjL872dGMs+fy1eT6u22YQuIye51V3QtvHbuv/tjk1NvPuHk9owULlQCsA1GL/KUMgWWi5ePmF0VWLbk8RjHxyCdNJZlJA0/lmb48TU1OQbXtkjvn7WgohSgs7RIfQKjlKT/01gt765dX5KnRDmZlseoYg6ItttWV1wQCY5emA4BM5rIw7wJtk2QdLHw72/Hue28dszWPTF+0b0x+KTMA7cAgguaRRivXFziLVNlMaf0CQM8290EzNNfCUzjBjPAxKB2Hw4cTZOzsSGBsbJoECky8HYIfECR4B/kbGcAPdAMYHz516sTxE8eQFHjNQ2hKTmCeZHdkdhuO7wU6Gx4sylLcrS8vlK9KxgTPAd0h3SJdScI3TY5b7j8BT9Hd79dfHa7VEutocbDBHeSLacF2/O97H71/b+/k1PgzdVoFY28EQ+VZhQK8CqMQcGtGpiQhWz6jYRngMiXTRVPtYAYDmhdtEkeXlvFcvDTmGKCzUBnqDWrHDu7chp0oNTTnmZ6+CHFWs+3YW8OPHDq1/LbTFNUO1hvaRxq60h6701D6pekRz9ilMU8G6R3ZBHlsfiwaTLB7/LVjFjuInYBOQWOLgZRMeAiaB0arVun43sjY9zyBLiAe+fOMUQ2sQKA8bCD5MTLMKlyFOCYl6abBTV3sA5WJbOCU7kCB1s6dR9I5AcTw9NOPumUpAnTwkNPRaJfGbIaiSiR9z4yfenrvC+Ntd2cpNOVym0jtBCMYbiDRTrrUINqe/t14XT3yTg//WSGebfu24Psf8S7stQdqrxn2uh8MDw8fug+JZ+rFNslFQq2BInAJgCZLQRKRzHgZs7681BCstBgrS8FkmAa/DlA4yzog9pfGLqupBv9oH39R/jQzcA8h50gRhATpYi3a65h778nJ1/bu7T2x/OLHlGgHU+LYPuChlhytH0YCSKoAcE/ge950kzBSzihZeNK7gvGfO3TIZg+QSyP2zdX2zVrpexnAjzN9khiE3tUwEHmCEOxDwUPptZ3CyJ+kRvBUwy0ccuiQ8YkOSYgXZdoB9BVshvbHJ4HyM0paLKG855nG+vpH2traxBEiZ7sY3ul0OLnGpKS67hz8NcOfIK4zk6eeLq87/3ZPR8+FpbOxMbtj5/m6QpOUbUszkvNfDtT94HdvP/LIieHJyfPJ19dIwNWOZdJwBgmRlX5H+Mfstqeh7NeefqSpd/zCOfFBHMVJisCZXUbBxxL+DPkfmgIME4pTQExYzmi01PYEAZDUgBkcD6EwAdrhw81s91RGR5RfBQgGcB04GZmEdFHgu/qF+qfHJ089snf4tUPLc3JKtIO15yV6wBtIViL54cD3YMDNgKfvOIfX1g4sE+mMxx+WKs+z9sDY5TFPcyDQxx+6L0NyENBJ8UhscAOFva+PEKSdQMBuonPAoETA0wGvnQVKaJQCXWq0sxhYop2xgKdAwzfyDyUzeFRohxvp93jFvjCZvnyZyOeSQWuB2uFB7SQfZHnLWRXVI5cvR7jByeFDX3vkBdALby21CWZ3YBywjF56ljSlIbT7SPmx30127AXemfpsYzWfq2H02N0gSjALk3ZPBC6PVRf9p1Mgpl7rPfQ0DFYYaSzKKPgDzBWK304SCS6zg7k4nCeQbBM9sE5T3k3HGSZhrwN5jALZDn+xGg8J8Cdfo3LQl8BgGA4KLZl3YZJb5888Yyp/9q2pyY68r7341qk65brlSDkV2sGaY9vIRpK8KF6G8GpsBoeEhz90PnlxrZAZQWp4KHxpeoYjl6cD3xq5fNbTdurkNW96SwcsmgjoNJSDGoW9KzBN+gBjI3bnifoHKcQqIVytANRrB7txJt03PIn8YabgxqYJtDAU7/mWggG1wzuv7YTMMJK4nLh8GWo/BqQmx5xg/RBlgdpBL4Bdkn7rC1DxyyPOFyZfO1S+99iJayQ3gx0CtCMty4D/0pI7zeTypT7m0Tcmn30G4qzPdhUIyfgKHTHSTvpdIcYuj1Rr6o+dwjNkep+VIlAW1xdAxdFwwZ4iiUS4/3JGBioVha2NeUEuT+OP9suf0ABvg0L5pNphNN2xYPOxk4fS1AjXAQqEEYUOBO1Rk50cuS9OAd4b7ygqgl5/Wl+87GruVGgHqgx+nMMIC5patpE+tFYknYuB5kPH0jyzDAkN2wX/RjOXL3MXLwe80cvAZ8fGXzuUmWdH2nkICN+OYifL3jc2He3zeAJkzPXIyWOHDmW+9y6EiuSiRDv2q7MzVGgBofMEAmMjwDoeTiMtDE2yDpXc"
    $sFileBin &= "kQe7jwQCcIuARyZgAcWz4yEHspvkyNJufbsHzePyCNc7Of7o1w794H75OoBnMNkGpUteHm6SDvvzQPeJMFveO/ni4Pj4NcwFA/khdGJgq5iHSZt3PNOXLhGPjnnk2Knx1/CcGr46aaswBrAnIDDyJxKxsRiR/4f0ILldGFmoS5xKliyEafTtEvjtUGFM1fGchhldGGvpees1GkfuJJtCIl+mSJklt3HPhcm3J4f3PmI59u74qUfuuad4OYeSAu1gle1OO4Zy13Yi9grabcDedOLUsfQCRuw8qdmxMz+b/vGMkO/hUm67e3jyVHlxRq9CQ8+EzhWlmkaz2Q7lBvo8I9OB6qZTJ06dOpR5H4tSbsdjB3d1lXWoBEEIrkyaQPd8q3mQVcCT4Cus8AYUZNoiJ3UgGQM9NeZZ8ktScyXFDnZ32gTa1uY5i+ZxOdLS8/bksaZj1x4ogDeBW0gzLVLkLl9fC3gCtU9MO4oaXxgff+Ha4/4lF4yxEDSVxD/y9TVCjGEqH1qm/JGnTxzCsdotSRNJ7KDFmhShRCIxFl3IrLcxC1AHEToWmVcXWwinJf6WQyv4EVwSAWR5JpGItnC+QRrb3KHrUHtLjJAF7iN5tbvjQu+hukOPPALk8zR7z9ac5c6/WJV2RKmNJbUjUcPV0LM1OcsyJjT91+FTab7kAXtRok1ktGvWQniD4CmJx3nirfF6ZfE9mVADeibUmElG4GrBxQeAdaa7bE+f6H17/NTTGfNOAOKUsUBXNVq7NFAR8meZw1Pd/D2Px942eb4I1A4OItQHGaV6l4BR0DQ6D4ixOKMvebEbHuMhaeqA49NWIsA64247zjfAyCV93Remhq87x0TEgLQaaQeIQWI4+YM1wJUs/XKYf8j3zKEe+SpCYKWAJckOaLPpPcKInFcbA4/yqFx7mSmxXN6p0/wykViIRhOZdQbPwNCC+jq4RoeGT8xEa2imdxZ5FheY8qxGTCQuh71er4PC0fZsnh6nVKVRq2DD00st3Pjso/cf6216YfLv/2ud7p7inOUIeRXaEaN+SY3YnfLOkWvK4aXJrK5DxwZfO5ST3nIDsD5J7aCRgCBOXgQI/AiwTnPvu5MnGGVxcXEG/QBMDNVPhqA4hvg+GGVgsc38K4eenZocflTnSH4xfZyW1E4BK0kq8LJ4I/kjGuCr7fbBqUm3RsfbJK0j3UH+MAN4uLGLYxjCQdDpch5fipP10qCCnoZ2S/9O7sm2ak9AGraXpyPiC70W+YMkUDZwRZIsScaN8vXUIepHpMQiuXR5ZqzZfp3zELZLnizp0tCy0rKfUJJ2krS8NK+NfSuNCDRZzO2A2kl4M9OeLOvEHL5ElSJEbd5+mmGWNF0MJQtQ11igj8xEMzZ40AuaLGkRgUYD0WF4Oni1AfjJqcnxyffGTx0qhHFbvNwhravQTigxInVfMsC63nG4xqA/BkDpHDrxoDInrWM2UapJBgJdqLnOOHSBvrpePIM+B2ufwdHBcAMIGdD4sPrAjq0B9JJj9t7x/zj43lu9bPGySjBVtDSfPespUKATlBLYeCf5IyrQNk1OjZ855zDxNdIaD+kO8mcZAHfySvGbx8U1/dcfyFdxngmYAFOnOLSg19MZA/wLr41zzd8LYD4ceKeP/4b8gQweSU0Ht8CNuvhMayUGf2N1svCxAIbNN8bhyZ1lSJySmLrpbf6r40x5H3gTKB109yUSuLrKC5w7FCwZLaMhSbUTKhT4FjHtDTdteyUWRknCRkDteMllWu87kiCZPwd1TRBvYIZEKSyV9ffhDlMwxRCJ9PdHP2v+thffm5ycfOvU03pdMQzdNFPKoUQQzTDpkQDXdl/b0ID7zORkW+OJR1citpUgdR/+weCUw7WmJ5T3DPf2Tp68L6dYD7ST/u4sqUflYD+50pEfu3zpUqD2fO8j598bP1aoLM6hcHC2HdOjMJbQ2FGRyJepoOOtf5p8RkxEcJsHn2wuGlNlXLPHDqzj4h55dPi1U1djIAyA8DHQWKVbpRNCcD848dazOo+3LzlobzqCMiSyjA1zSNJtoL3WygsvDwoezFmjzjwLN5AvX4VEZ/gAaLj4e628JrzYDaIYdA7m9Mf6PltcCpYElU42DaidBVA7pDk4EvT3t6RJPI0nHkGSh8ZghBionSBJ0JzNgsbgbAKyTiLoJYnpaH9m4gwhxEgoFMEyI96W4GdiZ3GxB1hn8rWny4sf0wHtLKcXVqEdf4JUMxCH41hCv3GtCZ6ZHB+ffKu7/sQJXfEXi4vTCLOk/edoHaB1bhxJHX98sb73tfqc4nvwHTA5a7Waq8jRSKaN5LlkfCj+PY1vHXrk7cnxxhwI4mjwjhAmPC4jSxpkgZ6Ckl3Co73j44fEhYQAjvZqe8mfZQCtrsxUe2bw6ROn3ho/dezqersQbs9FJG/FprO9LEfJnjg1XqfHOcOLt9oHJJBQDfKBFMmBYa39JucHgTOhcOSdQODmE8Ol9VpYf7wF8M6a7zA46LmICXc8yc7TdS1v4rQxto6kdi4j7YSjUTI2Fk5zONcdO1EHvGOXxE5iZmxsIdGf2ezYjWDFK8g6xBtcSMyQa1kiTTwksVgiFm5pGZmOXtu9T7ww3jt84sHie76YkwntzHih//DcCHRK1x9M/sLU5PmeY72nuOIv3lNcvGZdyLfwSb+BVnfTOnZ3d9MzrzUB69xzDx6vlG6YJfIaFvPh0m2WfJ7QHLB3v/FIx3uTw3XIOsU5FF4A451JvMNLIwlpB0qlkLlLQrzvB/91L3Y0r2DgWaSeyJx2zrQ98+yzw1P/NP7acO/TP7i6fyaSAOtHKmDrcCM6qIW134ovVq5rOvHoYKPd8z3gBE+ZfP0acCQq4ttxmTLptFMNI0Yi8kep4cxkU/W3PIERnIa79b5qWeci4GlYR/PaxEjja2f6AmMXIdAawe3D8lUJYLdYNsNAn8wEo4nLUTIzE/RG09xvI3zt6d5yrC3Dx4AbgmOxhZG03ewtgTNuABQ7cIN063kNuBCJERLxe4KXF66nMUFfzT7CwrAtxqTscoe/rkw7QiixMFLN4KBFtXrjfv8zk4MvvnWKB2bYmgYv8NOiZBXQfSzPam7cfyWwzz5dWPyYTDvFaYZZwlgLxibSVAE8gXwVDGd8+P7BqckfYOoImSdz3rGHp6FLR0WuHIcRMj0FDZUEX37iFBcAi/EzGJrwdhpBVs/4i+PvTb74g2cOPfrIo72vHZIv+xMxvx2YAKlA4p80AkauuHidpre+Y5y34z6U6/O9SfCOmQQJ+f0iMhwvCP2R0NpouvHFybZqh8fzPZRT18RA1wD1jsPJ1dXUOVqE4PRMZE28wx/6xyGXvW8E9NRIIHA9DUi8w2lYGMXBwDQIFPjB74l60yQLNvfYcCPH12mQHsIeEo1GW6hmlcNIOomoww9/Ak1kNvMGEMWwGAqFCLJYNHidytMXQ3SyDVkHvHmaakeEehIvxA4S62iuvlNPRvfk1NR4ow6Y4Z7inDXvB+WJF9OjmHaRdv7Llz+DWyexTpJ30jxfk4+O6fNYPH9LUjvy1cXFtqlj9W9PvvaIshiqjhyhzLSf2ZYw9kIiFnKwrAapjN5bj7i6Fxt5yVO1YJLqWgJNG93jzz7T03Ps0aZDx4bHx6+uIRbhNv+C79wF3sGJCtAj8iepQw8Ke11br2V4HPRO4NYHMoUcY9haiRgA/oBHW1MHnHnk6fGpXg6TU6BJbn2aA76J1Ibt5QhGZ6Sb9cmfpATLqd89y1XDA4CgulFO8ahpNQ9Btbn+hcRCMAjDxEv60xzPDjwmGF9DD+UlQv0z/YHoDTyXIXw45UZavoEmtBD0NmecsSYJgnXF1Ja3b+xa0pfYAPggiZxlcg0r004okojNRKsVoHfACv/dTU3x4tR4N3IDDLG153YcJKjRoAAGSkDXmrx6LWTWAcATpBeziOGZIKuUshXwCJ/dY3Dq0WemJntzcrBsqD88wZp583oIBZ5w0rgTEQ+TlQMC"
    $sFileBin &= "kNrblBafaGMLRxYS0NVhXsqDUaCdyanJF8+/OD75u99Njh9b2h4OLSY9whVyRuC5GuC3NFLKOqAdZeH4o5bxC4LLMyZfvQF+fXBBupWMtcVYPf/x0ePDU+Nuzt78LU/f0hrrG8DoQK8194+Q5I0WYmvKajz4yKl/GvfV2l0Qyt0cxbEcmwUxEakB9oy1+BPhQD8J1qSXVNbjkZ05isJzUEnSF5wJjsz0U0jAXAOsaUuL5BbHHN4gnympSSUlILrsb/GGr6uqHscsTmLdo8dRu4ziX5F2/OFYxEtmUO6AVLjFqqvuDl7/RbgPCoY1yxE+QhwKBglBEjs3W3eLzJz3bNODcEsvDPJFFqLhmlwpv3gt7Qw8W39+apzPKb7ni8X3IG9mzjsc1xyUeWfGm6P8IraK/BENMC0zC9EQDKAQtNZNIWkaaBx8EWcd3ho/dfyRQuVVryHNeaArI2PhcNDfJwblD1KH7p5tOTnK7rfu2zs5Obhsq27XB2XrlbDGEdv07Ikf9E5ODvd2Nzd77Lc+4bI56A+TaalPYjMkGh4LrWEsix31T5+a+uDt3h6h2eXx3HQYKMhBiIn6BCh+2kFIJOydDoPnlz9dGzBLoVS6sdVH+gnpDycCI+EW75rE2YoQIsTzhNQQxCNEokFHhqSW7DgS9Hj6o9evA9LDeEWdA3/iZNAynndF2inHA0WAyGsUOAd5i5oKEKMg8D5rXrjjHVkY4aXNvCh2brWUFB9BAuiR9GboIQpNTEOkjPuZMJqTrwKEB58dFHTYOl+U7qAEksjIBwi/7GcdwWnJsc5E9dAyX0yzzsuACQKdYXSeOCfwacac10BQ5ui5xsamprr79DnKrZ+pVbzFiJ8kFmZmpmdmyPSaJ1Uc2J7FSmZy+L5Db00uuxS/ha/pi85I7RUDM16b2llsm3xr+MShnvGp98cHB5ZRwpwcWwHljI0Fw1Gy8E7qw0149oVjh46NT01NTY6fe3H4mpM1kvD1QeRCnsABGOFnIjPBPhIGhOSP1wSpxZRBKIoIY4lQ81iChEl/JCxQy/B8Q5TSyguk30EWolGS0YajRX8oFiMk6BVC0LR917UpD1oBSeeex3Q6tAL58g1YkXZ4MIgadmamn1HcWmvbr7KOrrh4zQTanZge43O0mHXRsLdchF+zpHfwFsVpqREOnFE0GtBrykGw3fAM9q1boeTkDXQg2JSZzHqLJNLCcd4oEs9M2KEsllqdIu/wNdFExC7xTiLxq4yjLEyYobbPwXctfPGLxVefXQADjTqk5WWJhYWF2Ix8PWVIzVmcs65xavDQscZlaUec8T7YEiYzZCRGQr9KrJHduGFQar2Hnnm29+//aTlqEx1+QmLQG+ExGGkSBUVSN6K68fH/aKl/dnxy6vf/NHXNyRpL8IdITPglFur1EogJgtPwMNGw/OnaYAc7zCnuj8WEvoWEYCcwMpDHSN8NyyzTRnLdzmUSdEDvzkRvkChrheD5BgdiLDQDYVbwBs6/OmQlsZBz61mzFWkHw3wvE7wcFZiCW9KCQxqzEKYgLax5rolbuBwN84U4jwUh3C2lhkOXTO9IcWJaHp6NJhaiYyTswOzojc8glZ3EY6B2cjJiCRHov5nzoFOdiTqUXwQpBc2+5pTX8sjxziRCDn8yUcFnmjhyQGz5xS9+cWvxVozEi6958hoYqSN6nKaREJMvpwxJpAKnKZ6dHD+0/DneYmJGrGkJjgV4fyQSWuNddMU1bR3Pvjg+3Hvo0InxDvnqTeAFzu4Per3BsSgwA5mOxdagRhp/99ajRUVNz0qx6IB88RoIAgyOCEnEHMFwIuoNT4+RBAmkJXcEbDGlslnsB3JsaYkl/P0LUS+JTYczoodrIPXmTLjZ/z/g72g4GspkFt1PRJbhvGESAx15Qw057H0JxfovLjedu3JuB2oYquaBw/u33/rglWpZK+Bk01oTGUI19BiJ9rMaiXfkqzfAIZPntm0wNNLpAs6P6z6B3r1wjxupzX41jEMA79yRlX6gxUUu93u93xDQxMN6JcRuOgxu6fFO0YNAOYTHuaYEqVEunU2cJlDYJ6HHuU75KgLiahD5HBtKTlZcli+nimapy8AglJqOU4eW18BCaGEmALwTBVoArpavpgg7Jg4KqtsGBl94trd3pXNXFDWco6VF8CL6IdJKPZgrePaPU8N7v/a1R555YfjUrY9YYFmIRiOOEEkEPRB1TCcuB9PLKmObFRevU45Cg/PexAzjWZhpGUtcngmtdf32MvBL6TrPE/jXdLB/LDqWwU4y0CMk1MLV1LT0B6P91w8Z4TO5gynZW3vHFWkHg82o4AiDKrvmsNrrsHSPbbpi5RrjRRanhBemyYhdg6kj+eqN0Eup8fTlTgs/nZiWRHbYy94UKHr04POX8EWgTmVW+t3sWIj19we9/mh0rD+5zlGKs6jxDu9w4CpTEQVzCJhi7VNM10L2SiB3cKH2tU5JYCOoEFvYpDJfa5CVNAmUekpl00rJCb6fTAdb+sLTJBwMr5F2WvAeYNXFOnv3syvSDhfob06Sjre/PxBI/UZ2JdM7iZuFLV+7/9hyJ7vYSGJBgHYCpbtAwjMkMpLmZJbUZkplTQRi9UjiHX1/4rIXxh+hsXETIYJZRkQRxNRM2MsHSTB4ddv42sHjhDwwj6fF6xm5ca6/EB9FAm5eSIN2pNl+0SuShbHlRIA3R74FeLc1TnHr+yVvOjMT9eAaEfnqTShIlr8Vg980RrDoAGqOgl3Dfby3GKhAPEvACS3gnRtXJ6UMpmUh1tcfxgjfodyKJW6lGWfxET/fMgIhll+IEF6ZzgrNa6GX6EGawoMg6zqXwfrDseloNMjz/igZWWtKOUk78Gdx8SqCjG0JR8PefjIzQ9aqdjz3gPyVugz+4lZyFXws5m8GcoMg61/wvcVR+fqqaN6q/Hz9s8NvvTX8zN5jp649WeNaiKFQSxQszAtx1hgJ+slamysJqc3A8SmLdXoYdkg9C94R+CFK7fgdAYLZhf8RHenv84YSM97+aAard6T8NA5eGFg38qJjW/Jh0O2C9d8yylqVdmJ+fyA8/dkO3BtRmJwJQtpZY2LkavJgJhpsWX79W4uc3kExsvZt7kJ0jMPsTl//DPxxy5tcK3iKlRBorZM/WCsUiv7ETJ93LDoT1ctsLOWV19owy4CLEcHrCQNXk1CEyVl9VK8MWZQAcLWkfDEJNtTvh6CdkJAQ9DpSHqdJSDoEaWf19QNPCLjqoz9Ipi8Dm8oXU4OgQ3NA09MVb11RBqNnjngdLcHk6p2F1HkBrGGdpvyRY729p06cWDZ9JLA4BqPizAIE1/7g9OU1TsklkWw0aDPlOiVUOAS/F/oiMRKiJncgzgonEsH+QBi3cEa9waXjs9PBEu2Ac+q/SW1cdeRf1EMf3VLurEQ7UhIhEQlFw+Hl4yceFDreAnMv8qUUYV+iHVCS0eDyGS75KaQBvOa0NU8WWlr+B7CyJwga5NZe0Z68gQQcg3ekqT45vmYEaNobnCbFW5JkfI9uG1Q7gw3018BBEv6f9ntxD0aCCJjGz2j7RXWyggBo1+u7jhuJevvDY+EoyJBwaI3uO1nmNsxrrTZghFhUaOkPBoJjUSBT+WKKQHMApQbcthqt8+RKYiGMxIPPE0t9QQA8Rg5O9RU9WPdQ+UPyxZsh0Q6J4oRZJBKaWdtq6yXgVBaOIxynwlgkFIN6BmFYkEQ0870MSxCBx3B1cWwBWCeaCe0sDd1oOHpzjHONZWEn3conrEA7gpSFSqAwDazQlCBzpIACGmxtzyH4oWyp8jPR6AoHyHqX5A4+g3wtdfgTYQew/EywJRx+UL52I3BSRwbKncI00zt9CbEGlFXYO0Y4DLKkQtGOitPPF10DLpy4JIaBd7DRwhILZ7L94qpx6KEHrzcNAadRwDDDuOx6YW20g3MyAKjc6kcwCTACQl4v0A4MgjXSDtwD9Q7mpVaL7oXQLyPAn2JLIBoUvYGU1Qj4O7jFFiUu"
    $sFileBin &= "M1CuMPYFv4hKigRDJBIkQ2md75tc6yQBl3FEElEk40DocmIm7T0XN0PaYAPDLdDin5mJpsWPEkRJOKJtjEU9NxWTnFNAJI1UvnwtlqedwFUxAjYoX7sVeEnsoNhda+qFXwgkk5YJMuZdIROnS2aV8Q5rzyozM4k+LwYmfX3Ld5/uqi6EVtKkeWIo/7NErMUTXQDPR4SsZKtIWqfgs1dWZgLOMZOI+AkEJdGZBIG2yFHekcGqr6u2gaZxg16AwCQagGgRLB+MVL6YGq6J3Vb1QgL0ywKJhILBsbGxtEQVRLFfTOFGfo4/F4pGIXDEyXT54qq4+ihIbSsbHg8PEu6HqDQ6Mvi8fG1NwNBUajT4DbRDEgsRfzDQ/y8wOKLeZRMQawVO6xJ8TVEErTSYbvgm+nE1AiAGWmzsZhv8jHbQ/pW30ArL087HGAZLpJCIrphkrZFvseYchhALOjx4i4XomHeFl5JjQJEEdMsa/btT2ZcgXkxShR2O5R8DN0gAtuYoc7Tr0+xlAacVYQTNJBZi4h1oqTk6pByhm8aZ2QDGezkRCs2MBcNjMYJL/RSZ2ONntKO7OVpjpxeigQCI0DD8lq+lhGSJUuizuocQImQmimqakOm1LoZO3gj8KQgS+dJKYPwhEYOshdhMyjNz8i3A6lZNK+LxXKBCI9Gxc8OPyNfWBDkjhtSD2ycx0JghmISZjrTUUBHLCJ4n4X4xKG3jxLRMmmKZxKKRd34ViUZIDKT9zaHQkmk9ppeirFtwzLK044/FSH9yrikRXNGdeJL3WHtyB4IsoIJwDMTOimHcNewJDyFfSxHVXQ9FE+EAPEdsJadhT6aAc5SF5WqVfG2t4JkxdN5hDIL8HNd2pruto+PY4PlX6bx0Gm5Q078Q64NoH2KSMUa9y1qeiYq62qjYcffIF6+CB1/QH8ZdBWta7p9UjXjoQQoaBO4S9o+Fg8BtyDzytRQh3QgMAjotJQUsJsaEluQmMPnKqkjm/OBJoIFWs+0QGBgoiVjwQltuOu8z8CSnf6R1ItAZYnLgQQw60GG65UrdtNDMiv4xVFCImWlyc4CUEsCLkxngh3BwBOzjZrVTfdW2JNq5xRTNMrTjD40kIv0jYhRJl6zICZ/p3ZQs7SocoORj/Q5vS380Oja24qnVS2uVpXusifpFf8zhXcCjmKClVvo/dTgXq1yn7bgvXbGzWJ7D4W2mx8Jkwb8oTs29Nf7GG6/2dlDSOouL/X5H/wKJJhamo8Eaa/vh9j3yB2nhOrVzk9xWBHByFLQ+Ca7GB6LFKf/kl2QpymqQB6mQAS/29/dLi2oCwRH5WmpYSiGh2klJZOsJ6JEgBBfp0c5qiSo8IB1YIvLyoFZ9zRvBUsbS4k28EzyPtFJzYTrEN7btNdrk72QOMSIHMMnczEyaa6AFsjCNAWtfiCRmvDcPK+5qeCKJ0TtujjKWoR2UYWFPMDgCvrWleZUMgtxkIEVucprLQ+THpqGfxJb+lpZAsGXlrODS4iDsljVJKpEk/I5oYlo6kmKlUBGeAViH6e1QrJevrBm87iEv8A4B9RoVF8988uGrwz1NFmd6bxC7FfyJEUf/TAyaDfq6ob1pabSnh+sk5E3mp+FD0GpBuNf0gnxpOYj1DTbforgoDnHAAvdImy2gn1I6DtgR6OeFcMQvtLQ8IV9KDfLsIz5EailF3pOAEReD8bba81xF8hYgp/QwdlZR2Tye9LXg737RZjSXyNfWgqWQAfOXSKPBKAl4eeehJkuJOvkNGkjOTSMWYhDchtNcUi36o2OB/n4I1sAr3YL0+avjVdoglDLtSPsNibc/HB6bifLsKiIvOdUEgdxaXh+RTKonSIsn2O/tvwVlXovrJnvXspnkp3jOCCjWMeCD2IqaLad4nZK/MKzJSj9w4aL9ATIdBo8yxi22jQ42WYtUJvkzGuATiSgeOrUAXnXUfYtNQmvBZ7ts0cPefJxMsCWSmA4G8Cwu+dKycLd3NjRYTb4Pz+mlSWCJdVKbXhBaogHeSxYI+RVZ064seQ4Ab5fiFmFuxg++OTZDUj6bYmmeAW6yqrcT2hyJRKRnsNFsNaTDE97krZDgpFuJnPsh97Hepi+oVTftfU8fLby/3x+MAEIhkRfE9KI3PyGhCATGZJqEvYW3KuMa20LrutkWbkU7fj/uikjM9Alj0TBJ4WBq+S638prLogVvASBPeKPhsfDKaoe/uvARe2XFBPf1AP6M9XsiCdIfTMRWDAG9DNP90WR51g3ntq4F+ijB5RAkEvDoOFu7Ra3O18ofUQEe8A0PIu1xX/P+zBshL/4GoNq5aeSGZoItBDwPLj6QLy0PZ3tn+4GddeOTTqSd5G/5o1XgD/1sJuhoiV5GU5CvpQS57nCrbSlm+7gF9AcBb3/Ke9CXBo/0PKvehSfk/PluS4M5v06+siYs3QsgzTh3v/vueE+9ukRN03GJ5871NDo7un3dgrsOj6mUr68FghCNJmKxK7Hp6Fg0UHjL3QWf7cvSbYOmu3lZ62e0092U3NvvBx0CGgHkdcgRnCHRwOp108uZxLXIHX9COoggOZDGVlE74HiSM03FOXomJ/Xki5SZC3uDMwsBjpBV6Kr7k3l3lsoo/ysN6L0k0hckC7FQnUJR37CjxFBCLRmI4GqiC4mZsXA4OrOQ1j7na1AAY0mGLucWSTkQVv3iQiLqbQmnsBW0aY/ZYFCZhl/RKYsxy3uPFCikgFAihFspW4CtF9ZCO3JqR9rknKLNCYnpaJDLKeSufT3pipDvgZFcUoKsjBA512FrP2xQy+9XXRvke+F6VWQ48b2PL3SY8ktKlt/Bv2aIbR/Oz02+Mjx47NF6W0Wp2pSWdWpE4o+SaDjQj7uAuFuXsUQ7j+lx6c7NK3c+o52HOx9u6Bh6+eUL/hAoHX9wAaMsCO29qysYQU755uSkfGINRy73J5cjAvFMB1Zb5o8b0XH/TY6+3KhKvbWkRB8JBsFvt7SEbn6ryXXwvS1qVIY1ZayvAx8e8c5E4WYLifAduYcrSwyG61+FmSk41hvFZMtYcCz9d8HJUCiTizwBaOg30g4u5BuTtiIGvKms2+lR32UoybYM9+RIYVbKZyP5pQOVo6IXZ7Pka6lgKbWD2d4UGa55esyrv0OhyK+QL6yGvuQ9kNvA8FLJkDv3tB9uKFGvQY1/hqW1aWjkMIjazrQ9bCkpSStgWw4DH37y4cTzPR0Wo/oLhpKStBzs0LnGwgAI+n6P0EcSl6PeW2cucpB3JAtDqXjzqpfPaMd9tPNwe8d7V+YugNyZ6ccFNWH/TGrHzC9F2inbAB+G4KdmaZpw+lZ7NK+Hx47JtmL2PqN6Dc0lbftaCOGMTNjBbZevLgOWMe2qLEk/teOAMC64AMQDJKexHigpKaVpM9BmD3pQFcRwkj59ckTwvne7lfKmFug1+En+4DOI0Cvhfmi+mXBKq3oHjWpDyXpTb6O09T5VBQL2KS0YjY1BnL2W9UFJg9uKa8pT3TBTE6zRaMq1d5aY5QuroVm6B0CyvFT8qeXwYaCd9AJrSSQmaQcnAbnyPQ3m0jSV063BvfxyT0d9uRFif+SztQVvQr17YIDjzn145cNGPMx1mszA4J2J3notnF9/By6xxE1z0pqnmyKxa3I7DUeh0dwfz70rtsYSUQ+4uv9Bgi36VIgkGQLdk3pSGU+TJgGHvEh5OpXXc9QxlsZD9WqV6eZz3pYFI4zhlBxOyMz0r/bmSWb9nnbzjrQTeIwe6MYTXlgYC06PmBrMwDopy/mUUBMMi0I4iLMRsb60PCqYXkN7w8MPm2wDLzfiij7J1DHIkj/+DLwfREhwBHMu0/KlVVBvBL1jbGKUUGTqi8k1Gn4EjWBhDXullhghuXc+1bXxPMvYmowqQ6kxRQOqltaQQhPh9rKcVNaDN4Dj3p2fVlh0jsPzgeVdRtAd9e0ol9XU0smCrb6+aY9aXVKyAzjHYMhfY8rIdvjIgQZrfc+5C7MfdktH1iBit9iRBRDf"
    $sFileBin &= "PcPmrLsD95TkSLiJs6+hHXfD4cPte3o+/mSyrW9hwevFsRpkslIIafhiPPkk2WKpRVm8FypNgs18BAVPKie7+i9MPt9zn1q7pniUdfSHZzDKmoFBZF/lf2V3HT1Qql5T+deCyWLJQtAbXYi19AdrD5SWlNBlncXqYDgg9oe9+I61WJq0s/hw+9HOI4f3mJqajNKglUbvrVhC059YQOEG95KvrArBUqIq0t4BZaZ8Bgrf8/JAoxAISmcqy9dSQDIzBdaGvjTVpig//4IpO7/UkKJaFrhqVCBg2BJSIDd3w5H2A2ZVOnr5zIdTbny3mjyKlKb2o7vBb6VtjDfgTJP1QOeRA1aZc0pKS9aaqHY2dILhtFuNtqZz755hND/FXWggu2/R0eWm+o4ety0vS6H4vEJxR46u4ObhfQ3tLIpgk+2W7qmp822hhBTZJ6ItKYgdf7dDOpB3K/ZRSn5O5GwYxM1EW2pEiBpmVp8T91+4cgF81ZrmmXzubr7ZGySXR+z9M4nLq70CxHbg6G7DnWkHWSKTVRieGQlGL5NmL/ewpTxdZlgGfl9NfzDoD0W93khs5cUAK4F/+HDnkaMHdqmN6vXgj8DO0djlD6/i3HkfI87MRKVtp/K1FNCk3qFW4DszUkzxud+9Mj/1Sq+vkfeOkRTX0/Bsna9DBwoEByiOUfn6ahC6X7Zl5xsNqY1lrrz7wvk6jBiR3IAQUpgvM7V3Ht59Zxrxr3hufv6TD3vKdbixFR9LuedIg6GEjtYZaHq4vuFwJ/zabZQ4x1BqyN8lf5g6+IYDUIS5pOROY313kyKLCV6OkWj0pgjX3dDe3t6wxwz3kaBiHrxFi1xLO/j/VBnU9YOT50Uy04+Zl4XVp8/956c+eW+wsaYQNFVqViA2dr/7ciOeg7JA+u2cOLbyni+E+PLUkHPnnevXMpT5C5988rLDjnPa/cA7C2SVF4Bw7YfN6jz5H2uEX7zw4btuRWEwGg1HYxOrrH5MB/53P2yq8QYihJBA/78sZJBSBlV7BO3HYMhT3CGFKTf6CmFwdv6j8xyPZ8GCV5CvpgS1mikECZJKSCIWaYUL714YPv/q8GAPX+NZdTk0/C/dTq226dyH73azUGtUPF9MNZ4TTG029Y7SUnUKa35F2y7LHl/PoSaLAngAlTxgdSbdCTHWzjVndoQ6pu7ldy9ceOONVwc5DfQH3I/rBLWsTj/NeC0ePnq4vR3imAPW0h2oc0oNJdq0UoO+PQ0NpWA1IJmMakVWNRhHNHzDrLLzQOfRo0fbd8NNStRGo8VitC3eykNeTzuLgrGkJL+8o7f3DMHz0hKrv9Cs+8KVTz6Z+3ByfJBHrl5lqboo8gx//sP5Tz55112ACZ6FMW9LS3C1iZk2d0/THmupKsUwflHgnUYtK7784dz4o5x3TOIdMhPmV8xa1leZ70xv1Y6b7f7wk/krH/ZolMJYFN/FT8dirsLnHiTzH77Rybf0R2cuk+hM+moHILofdlrqnLZyg1otEc/153EJRtvgux9+Ep9qYgUknhRzOzIYDSst718NPpv1QMOe+jqbyVJX33iokanhVqVSCw6fPbZ6Z31deZ4CCXNbipMYvvqGPQ2VMOjUq08uupvaD0NEccBwZ4lJnadQJJk5hSjLcvTwrjUHL5aGht1Wa7nFVu/uOPZsBxBdTk5h+3fMJbsoZZOd1j2VlVYr+BnM7BgBaW+2cNcb1SVAKOCyjIySBfHtuEHt1H+3qaHhYas632hzrlT/G2gHQg1DSb7a0tDWHw17Q2SVvfFNDfXC4NC5c4PPDw+PD/MoElc6wrOx4UCDRdv2zrvvgFlPNmlY3AsLoyi88l4u4eGGhxvaD1tzUyVpGwq9dmuRydk92NvxkDcYjvY7AlEiruSEeatRldZ2rB6LZU/H0IWJd38/2au5wwEjlcz4aUXlCHd9g7Nt8Pzg4PneNt4bJpcvL6y2Bik1iE6LZbteX6y7xnh80NTt9fW+wZcnXz3GMC39gTWeapraGydNDUeOHu1stxryVZtUKrU6Vyfc6lXp18PXhM70sDVflZ+fr1YppHRlSsKyHojksHlHibpcvrACGtoPAL0dtuLoMsB9Nn3+jpwc5R3ypyvAdnjPmt2NE25kNuxQ529SMSzbNjgoPOTg9hwoUae15vCWEJx1RlWettzS5Otew3TMrdHhNOFMmNpYp89iWvhbPW+rr3tVG7iJdsAWUfEYOU84yDk8K+oDN1jOAWg1g/Zr1nqLxVJexztWYhDL0SPgrhqcTe6O7sHB55oYjcMfhgBxlR1p2oZOnJnMTZUU6o8che+D4t2jztWWm4zlLNsc8PKB6Io76X2WtLwADlO4k3VPk7Opo6epjmEhqktljWWqEKH8IxAtW4qMdXsPNdVxzeEF6nJqCbYGHNegyBvqLSZLkyU3S6OvcaS0vWptaHoYfEn7bhjYpSBBVLmqIo5LQcH5nHsOWFHAo4LXahhFiufYn2kHH6w11qW0LVd01jmbam0Wi81WbwN1kF9UoytMRWi70xAooCAgFjGVX2t8Ax0UN0TQx4DgQ/rKhMJuph2AAI2tr2kZC6ysQhY72g+jEajB84AdmOpWq8guJIMjYNTtDVaT8WsWYy4f8TvsgmNloSzY9jibnKaUR5oVSAf47fDhKjO4kfz8PNX69XpHzUNeKhLhBuw6ipyIA9WqVhcZLeUafUt/mM/wbTLXwAKiQIrNzeB51cb7yjU1IwuXaaqpayB+t37PgcOHj3YebTfn36VS52bncMsfc50RfM46mxZ1jkpbXscJi9Wp9a/AcU5nHS+ZGsemnqQYkv9OAxnufvszbsYtaQchOoTgqgu4RLe7o0f0dZ/xp9Y1bpQGh4GsKiHUBKiqQyJ9vy06nfX1e8xmM4aharVapVIxDMtpcjJJiCwHFsXIkSPADX9ZcifcSZ3H8rxdl2oWanVYkhza2VkFDwMEqtYyNd4VDrfOFILz4QaAVW0sr2t01nGpbyZIA+AIhNvhDP6M/7mxLO0sLqb56o2V0eUGTrAa1eoStcFoLGLY22d0PFdXXm7jBNHXdlv9lW/PnocPNDQYiiwQPbrdAm5ToffS/MXv2qwNIHfaG4xGrm1RFMDFsyxHf6rsWvjc/P/UMv/P+F8cK9DOn5EyfF2302eLtTanc8WJgT/jz/hfCIuL/z9XjhivI1f3rAAAAABJRU5ErkJggg=="
    $sFileBin = Binary( _Base64Decode($sFileBin))
    If $bSaveBinary Then
        Local $hFile = FileOpen(".\walker.png", 18)
        FileWrite($hFile, $sFileBin)
        FileClose($hFile)
    EndIf
    Return SetError(0, 0, $sFileBin)
EndFunc   ;==>_Walkerpng

Func _Base64Decode($input_string) ; by trancexx
    Local $struct = DllStructCreate('int')
    Local $a_Call = DllCall('Crypt32.dll', 'int', 'CryptStringToBinary', 'str', $input_string, 'int', 0, 'int', 1, 'ptr', 0, 'ptr', DllStructGetPtr($struct, 1), 'ptr', 0, 'ptr', 0)
    If @error Or Not $a_Call[0] Then Return SetError(1, 0, '')
    Local $a = DllStructCreate('byte[' & DllStructGetData($struct, 1) & ']')
    $a_Call = DllCall('Crypt32.dll', 'int', 'CryptStringToBinary', 'str', $input_string, 'int', 0, 'int', 1, 'ptr', DllStructGetPtr($a), 'ptr', DllStructGetPtr($struct, 1), 'ptr', 0, 'ptr', 0)
    If @error Or Not $a_Call[0] Then Return SetError(2, 0, '')
    Return DllStructGetData($a, 1)
EndFunc   ;==>_Base64Decode

small minds discuss people average minds discuss events great minds discuss ideas.... and use AutoIt....

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!


Register a new account

Sign in

Already have an account? Sign in here.


Sign In Now
Sign in to follow this  
Followers 0