Jump to content

Tray menu icon from memory


nend
 Share

Recommended Posts

Is it possible to show a tray menu icon from memory?

This is what I already tried.

#NoTrayIcon
#include <TrayConstants.au3> ; Required for the $TRAY_ICONSTATE_SHOW constant.

Opt("TrayMenuMode", 3) ; The default tray menu items will not be shown and items are not checked when selected. These are options 1 and 2 for TrayMenuMode.


Example()

Func Example()
    Local $idExit = TrayCreateItem("Exit")

    TraySetState($TRAY_ICONSTATE_SHOW) ; Show the tray menu.

    Local $hTimer = TimerInit() ; Begin the timer and store the handle in a variable.
    Local $fDiff = 0, $iIndex = 0

    TraySetIcon(_GDIPlus_BitmapCreateFromMemory(_Icon()))

    While 1
             ; Set the tray menu icon using the shell32.dll and the random index number.
        Sleep(20)
    WEnd
EndFunc   ;==>Example

Func _Icon()
    Local $sFileBin = 'EbsAAAABAAkAMDACEABwBABoBgAAQJYAAAAgIAN46JACAAD+AEwQEAM8gCgBAADmCQAAvAEB3AgAqA4AAA4GCwFeBB4IAAC2GQMBXgMeaAUAAF4iAQVeIACoJQAAxk4nBV4AHgBObk0FLyAAAGgEAAAWXgDMACgAgwAyAGAAAwF3LQEAgAMGEACAAgIAgB6AAwYBAQESAATAwMDFABH/AgIA//8DBgEBRwESAQQGAAiIiAEeAGgAB3iJCncCAIAMiaiZmZcGC4eACQeAAAB3eAeZeXl5kAEIC4j/j/iHcHfAGZeYmJeZAwuAExB/j/j4gDf4d5dAmHiJiXlwhC2PCP/3dIAY///3mSB5iYiJiQIkh3eAf//4dlZGSIALgPl5iIiIh5eBC4gIcHgACHRlZYAaJP/5AC+Id4Ijh3chASx0dlZHgiOJ+IiImJmAFwhwf4AHoP+HR2dngBf4gBcoeHmJgBcHARf//9CIh3dXgAv/gDvAI03AN3dBF0ES+HbBBYnQl5eXmcAvCAAjgQsCeMAuj4eI//iZDJeZgR2DEfh2d49M+HxBAUAemZfABYcBghGHZWWP/3eIZEdHQQOPh0BUghf4iGV3Z8AMiHdlwSQY//d3wAUBAodWdNMAQcAXd8eCCXdAL0MXAmhAAYSP+Hd2eAkBMXeAgh34dWWPI4ADgA6IR1aBG3CAAgfBDYdneI+Ij0D4ho//+IbCG4cCcMMFfHj3d3iPsofADIdWgTPABQ+AAdkAa4d8wADAHofAB8EFAYIvd2ePhnd2j0aMgRwCJId4h4AN+GB3x4+IVsALwAWIC8AIADAPwwt3//iIWojCF/jEEcEd+MF3/zb3QU3AAsjHI4FL/4iMj/fCCwE0d3AHgAQ0+IfCBf/CCwE8+Hd+cIJfwB3CC8MpxE3AAYdZQR+I+MERwgV3wFkHXQAMiAADACSBkYdAl/fed4GJwQRBp8CsiEAIgBoWd4ARAAxwwCt3iI8f4EwAV8AXwwUCBojIaPGBU/j4d2ASwwUiDAAGEHh4iPigCHeP91Z2wwUABnfhCoeBYIe+iCAwhWVgG4ARIQOHpwv5AQB2WMBQ4QVgCccFAAbyNyA7iHgAEmQXBQDCQe74wSPJBQAGdaFIIkrJBfgAAHMABgEYywWjJNAFG2EYgTJ2zAVCeIiHdvPOBeBddDbgF3CSIB7RAiMMAIANH/4/4QCAAVTwD+AA/GCjB+AA8JWAAwPgAOACoAD/YZN34QCBBuAA/uQAwAXiAPjv7ADBB+EHwQcA4AnlAKGh/+EC7QBCn+AG/QASAP0G6Azv5RDiE+Ad4hUf5BjgIOIabn/kHGG0AAgB4QAACAPb4QAACAfhAAAID+EAAAi2H+EAAAg/4QAACH9iu0llAIAB4wDAA+MA8J8gf2K/wr/hzEDRAEDozB4AYN7/zP/M78wIiHid4AUI5cghZaBqmXkDAuNATGFqeXmH4begA+ChYYCAeXh4h+G5YAF2glagfJmJiJiYwAPZIFhHR2DEIMSJAKbhiASHZeBdiZd3mJAkAAcBXPj44AWJl1iYmXDirIC4aICUmQyZeYANYoz4eHdHB6BC4APhRHVo/3iM1QJGgOEDdjACd7Aw8AAUcAeACHUQRHj/9wpWoABwYAT3Z4h3LI94wEPwAHjwAId3aPd2fyACdmECQAOH4HiIZ3iHcQBgBHEA9sgwTHAAjGBJ8gLBSyA+eXAA+HDwBnEA8QGgOffqcPAI96BljwBn8ADwd89BR/FJYWjxTwd4oFZATmb4MEXzTY+IkXSwT/d5cjcHeBE4IADjAQICeD9hS+MBEgRBRuUBomiPj76P5QElbjg/4lxIPQeASxkqQYd3xlB9Pvgfj+sgKCEsAaAqAXEvMTDgLP4BMQDhLTEA4S41AF8EtwH/sQKhMGEwITDhL6YvIS/hLvTgB+AuH5IucS4glrIu//aU/wV/Ln8ufy57LtB+8YQBMF2JeJgAh/9lIH/5iJcAcB5/9wiYmAfwcHePiXACCNB7eGj/gIj4ARAYhY/3f/h4aESI93AA94j4gHH36Aj4f3EAcBAz8I+QmX9AAKAAITRwJVEJsB5zHn/Kh4MMCGEA/DFzFVEK3TEAgDFInBQ1AcDxSLFI+3FIMEj+cEd7p8CsAQDwrgO5TpUZeUY3AHpIADkAe0o8AHxLAD0AfUw+AF5eAF4AfU5AAFRUAHoAYWFhAGVlAGUAaWlpAG5uAG4AcXFxAHR0BHQAAKMAfHx8AACCUUIAgldKAACBWEsAgVlNAACHWkwAglxQAACEXVEAhF9UAAKJcACFYVYAiWAAVACOZFcAhmQAWgCJY1gAimUAWQCNZloAiGaAXACHaF4AiDAAAI5pXQCRZVgAApFwAIpsYwCQawBgAJZtYQCNcwBrAJRyZwCYchBmAJN0sAB4bwAQmXhuAFEvjnhxBACScACRe3QAmwB+dQCTfngAkwCBfACbgnsAoACAdwCgg3sAqACHfQCpiX8ANQA1lABAQLAAHAAcxwAVFc8AEgAS0QAWFtEAGQAZ0gAdHdIAHwAf1AA3N80AIgAi1AAlJdUAKAAo1gAtLdcAMSAx1gA6OnEA2AAINjbZsADZAD09ANsARkbaAEFBANwARETcAEhIAN0ATEzeAFFRCt9wE90wFNsAW1sA3gBoaNYAUlIC4DAB4ABZWeEAKFxc4jAV4zAA5AAAZmbkAG1t4QAIamrlcADmAHJyoOcAdnbkcADocAAC6DAW6QB9feoAAIGBgQCGhoYAAIqKigCNjY0AAJSFgQCZh4EAAJWJhQCaiYQAAJaLiACZjYoAAJmQjQCIiJAAAJGRkQCWlpYAIJ2UkQCZ8K+dnQidAKHwJquLggAAqY+HAK2PhgAAo46IAKWSjAAAqpSMAKOXkwAApZmWAKyalQAApp6bAK2emgAAsJiSALeakQAAspqUALOclQAAuJ+XALSfmAAAqqGeALKhnAAAuaSdAL2lngAAoqKiAKukogAAraakAK2trQAAtKWhALqmoAAAtKmlALqppAAAtq6rAL2tqAAAvLCtALKysgAAtbW1AL2zsAAAubm5AL29vQAAwa2nAMStpgAAwrGsAMiyrAAAwrWxAMq4sgAgyrq1AMwwAMW+ALwAyr25AM3AAL0A0cK+AIODoOYAhYXmMBHrcAAC7DAR7QCMjO4ACJKS6XAP7wCVlQDwAJub8QCcnADyAKGh7ACsrADuAKOj8wCmpgD0AKur9QCurgD2ALOz9wC4uAD4AMLCwgDFxQDFAMzDwADIyADIAMrKzgDNzQDNANLFwQDUyADEANjLxgDVzADJANnNygDczgDKANnPzADX0ADPANvRzgDc0ADMANHR0QDV1QDVANzU0QDf2ADVAN3d3QDg1QDRAOHX1ADi2QDWAOLa2ADk24DYAOPc2gDlMAAA5t7cAOjf3ACA5+DeAOnh3vAHgvPwBvUAxsb8cAQA9gDa2vcA4eEA4QDm5uYA6uIA4ADr5OIA7OUA4wDr5eQA7eYA5ADu6OYA6OgA6ADv6egA7u4A7gDw6ugA8ewA6gDy7uwA9O8A7gD08O4A7e0A+wDx8fEA9fIA8QD39PMA9fUA9QD49vUA+fgC93AB/AD6+fkAmPz7+nzjCADFwQAAYsUZAWVhrW8CAgCdAHYPDAoKBgYKIAoMD3afIgGtREBEREhEREvPAsEIbQwGoAIMDAwNAgxSAwx2wQBXRABIT1FRUU9ERAHdAmsKBgoNep8A0eb2+vr65tEIn3oNAAE9RExRgFteX15VUUoKAw68AAB2DAYKbcX6APrz39bW5/r7Av8AAO/BbQg/SABTXmFoaGhhXhBPRFMABgDBDwYABm3R///63IjAJQURKaLnAbwAAABZRE9bY7C1t0C1aGFbTEQGXJ0QCgYNwQE+5zsFIgEAAAWQ+gNeUUQAUV9otb6/vLUGZgBgBS6UCgpr5kEBHvvcFQUBAQEsCQRgS0gAL7e/4r4hCS+dCgp2BE/cHBIF'
    $sFileBin &= 'AgAm3AMPVURRAF5mtbu8u7JmEQaPwQoGBS7/86QGFQQvgwizRExTYYBosrWxaF9ThRcQDwZt9gQX//vzAMuLO3x8FSDWAYMH9URET1RfZYBjY15TT0RhAhdYegYNgl0BAPqAp/MA8+7PHCDW+voC9oGquUFET1FUQFtUUUxESoRGCgOCjIIW36aPy/b/APrWICDW7qyPBKzsAEq4RERITCBMTEhERYNGawYCbQRe+vPIOBcSACvW//rdKRrLQMcgEhx81gAN4QBXREFBQT48dQcFLwDTAxenKBUUFQAXx/r/5ysgywCiEhUUFy/I8wEBYuHg5MUKCsUFwQt2hhfvpiAXFwAWFivd+v/zL4HAFyQWFxcXK4AnkUMTawZ5wQsNBkMvAPv2yCkWFhcaAoGBIPM4GsjuyDQ0GgAMNMEDAQCgBkINgAufCgzvww/fgDgaGhokmueBB2DzfBrI+oCSQAQaRotBJIEfDArBAVNtYwVqwAYnpO9AVAADhxIaQDH65wAMICjIoQMY+m0GesFqnUMDAN40IiIah+fugNbP3PP685bBCxUAq28ABYSEkpQGawmALwrFwwusKCciADLR3YwyKzKWIOfzpCKqQRX6qgNBBYSGwQYPAAAMBArUQyeMJycniADnpCgoJycoqhDvpienAQn752/GKIADwwvUCgxAX4M7APrngScnKsbzAppADScqmvOrKFKlgjnzmsAPl0M85hFAasUGDAMP5zQqgCcq1vrcgCoAACDH88cqpMIF+qoFgAWHQ1D1CQrRwQQKDULq/9wyKioENd7AGcyrz4DPkPrLMZsCFfrLgA9UgO7EFwzALwvCpvpA5zUqKjTmwUT6gOeH3PrPNZrjBSbR4QXjC8UJADYPBkKg4xFvMDEyY2rcIIfm+tY05AXHMgQwMOMR+5EGbQAQAJEGa6IB54AxCDE1zGIoz5Xz+wTfcYMc86UwMTEBQwfmDAqdAADRiA0GlOIpmjE1AwMA+sia9v/nf4yB4Uz654QyNTXiKTDvdQZqRIMhPPPGEDU2MXQhM++pqiDz89+AjWIHy24QNTFw0cEaegkMQsACYHYKCp9BP3QgNTU1nu9gWZqq4KqXh26E4AXAC4ACgpUgAfN6BgqUpIkEbQYBBvOlbm5ulHHHYEeV4AB0dGATyPrvnmACcMwgAcAFBpGGmwIG+t6Cbm4ANXTG7+fLzMyQz9bc3wArpXBAAgyZ7swFBAb2y3RwgHBudJvc5++AWiD28+7RlcAFcIUc3PrNBQAGYBj786sBAAZwcIKezNHckNbWxpejAdH0zwUBJAzuxnh0cXJyIHB0dH94wABwdGBwdILR89EFJAzvoM+NeHJ0AAByogBhgB7c+vaR0QVlGOcIxpF4QwV0dHiVDMzv1gWlJPPn0akAmY2FjY2ewdEO7GB51gXlMP/28/PA7+fz7+/zojrXBf9jGAWvY4baBSYMhrXcBSIMMp0lx//v3gUCBnjlsaJg+sxq3wXgnQqg8ACUn5+NagYGDYPgYx4AoGsKBgZAADAGDHbQvwUBAMWR4G1ra3aUvwUPAA4AQP//+B/+P3EAgAQB8OBR//wAACCqB3AA8MABA3AA4HAAugFwAIB0AEEDcAD+dAB74AJyAPh8AOED8QPhAwD/8AR1ACI9cAF9AOEFcQN/AP97AA8AfwJ+AHgGdQjyCfAO3fIKH3QMcBByDX90DkAAbXEPAXEAAAQDcQAABAfbcQAABA9xAAAEH3EAAAQ2P3EAAAR/cQA2AIAByXMAwANzAPAPcwABAKgAAChgBiAwAEDiChoI8wwEuw11D3lGNwAAekc4AHtKPAAAX19fAH1PQQAAV1d6AGFhYQAAZWVlAGlpaQAAcXFxAHZ2dgAAeXl5AH5+fgAAgVNFAIJURwAAhldJAIZZSwAAgllNAIVbToAAg1xRAIRdMAAAX1QAhGBVAIoAYFMAiWFVAIYAY1kAhmRaAIcAZ10AimZbAIkAaF4AjWleAJIAaFwAiWtiAIoAbGMAj2xhAIsAb2YAjG1kAIwAcGcAjHJqAI4AdW4AknFmAJEAdWwAm3RoAJYAeG8AmXhuAI8AeXIAkHpzAJYCenAAfHYAl3x0AACZenEAm310AACdfnUAkoB7AACTgXwAl4J8AACUhH8AmIV/AACdhHwAooR7AAChhn0Aq4l/AABFRb8AHh7SAAAhIdQAJSXVAAApKdUALCzXAAAvL9gAMzPXAAA1NdcAMTHYAAA2NtgAOTnZAAA8PNoAR0fEAXAD3QBJSd0ATgBO3wBTU9wAVUBV3QBaWt6wAOAAAFZW4ABeXuMBsBPjAGNj5ABmAGbkAG1t5gByBHLjMBTnAHh45AXwE+WwFOkAenrpAACCgoIAiIiIAACMjIwAlIWBAACXiIMAlomFAACbiYMAmIqGAACXi4gAl4yIAACZjYoAnY6JAACYj4wAmZCNAACeko8AkJCQAACUlJQAmpqaAACdnZ0ApIqCAACrj4YAqZGKAACuk4oAq5WOAACtlo8AsZKJAACllZAAqZeRAACvl5AApZqWAACtmJIArZqUAACunJcAo5uZAACnnJkAsJqTAACxnZcAtJ+ZAACpoJ0Ar6CcAAC1oZsAtqKdAAC6pJ4AgYGqAACioqIApqamAACqo6AAraShAACvpqQAqampAACtra0AsKWiAAC8p6AAtqmlAAC+qaIAvqulAAC5rakAva6qAACxsbEAtbW1AAC5srAAvba0AAC5ubkAvb29AADDr6kAxbCqAADBsq0Ax7SuAADAtbEAxbaxAADEuLQAy7mzAADLurYAzby3AADGu7gAyby5AADPvrgAysC9AADNwb0A0cO/QADRxL8A1TAAhkCG7ACKiuiwFO0FsBTusBHpAJGR7wFwCfUAt7fwALMEs/dwAPgAwMDAAADGxsYAzcPAAADPxsMAycnJAADMzMwA0cXBAADVycYA1czJAADVzswA2c3JAADczsoA2M/MAADY0M4A3dHOAADR0dEA1tbWAADa09EA3tPQAADd1NIA3tbUAADa2toA3NvaAADg1dIA4NfVAADh2NUA5dvXQADi29kA5DAA5gDc2gDm390A6AExAODeANXV9gAA4ODgAOXl5QAA6+LgAOvk4gAA7eblAOnp6QAA7unoAOzs7AAA8OvpAPHs6gAA8u7sAPTv7gAg8/DuAPQwAOjoAPoA8vLyAPXyAPEA9/TzAPb1APUA+Pb1APr4APcA+vn4APz7APsA/Pz7APr68P4A/v5SRw8ANlrSSEEHAL2akZGaw5EACF1RUssBjQsHB4AHCQkJBwcM0GpAQUVLS0RG1wFyAAcJb73R5/DzAPDRvWIHBkFLQFRYWFRJSYUFCwAHkefz1XkrPgLGUM/z50xJVF8Qt7VeVHTUmgdgAN7z8+ogAgEBBBDbAQJLS1i3uyC6tVhJWuMBcvBRQAHmEQMAALH0AbUQuLi0VfIBwAdyATEB8/OhGA4OBQKskQBfQU9etLTIWU5B4QMLYNEDAABA8OLVxhGokQDsAEVFTlRUTkRRB5ILsAfhBZZ22/PiABij1Xaj5vPdIEtAREFAcFsAAAQJjeIB1i0REpYA8+YfoXYRET0A4vPzurO3iwkR4AGRB+fiASkUFAAfxvPvKZapHAgUFDUAAvPz4wcKmnC1YqIHPBcXPQLWAIs1lvDONRQoF3zvUQFicLcHnwGRAKgcGjzi8O8A8/JzivLz1jCkGh5yEp4JwA3RgAAA7zweH86xdXYQxOZ8iZADsR8ahITyYAHRBMuf4gcA4iQffNYuHyIQMOKJiYAB8DgfhDDmcRYEn5EJgQQAxCYmpuZ/JycQOOKWhPAD8okmgibACPPwB5+a8gEAsSYmsfPwzs4Qiuqmf4EFpiYwAtBgAO0EvMAHUroA0fPz88QuLr6BAGDnmfCpf+8AQBCiLi7WADDABwAIAAtvACDVLi6ZAQAY1qnzxHzw80Dz74AuOOIAPGAADQAAnwef8/MA5msw'
    $sFileBin &= 'aubz884QxPDEegB+4jgwAnoATI0HwAAAAAJyAUCZNjim7/MQvpiAagA+8JU4JDatADwEkgA8AAACbwAg2mo5Zb7wAMSkqr7J7/Cm0DhjeucAPZECHgIgAPC+ZWVrmNXnAObw5M6TOWVsEM7wjQQFHgAAcQEAIK1qbGVqgoqAk4FsZWxtxAoeQQNBxIZtamwAAGoYapPWDB4CEPLmxACkjYJyhqTO7QMODwNS8/Dw5urwvwFsDg8EEAMAEQ8BEJoDDwJyEg8AAI0HYJ9Ay8uRCwebEg8AAADAYQcHBwlvA5QOEwD/+B+P/8CAAwP/AAAB/IAB6viACfCAAeCABYEBgND6A8EAgMACxQCQEcYGwQpVwA0HwBAPwBIfwBQ/EP4AAH/AF///gAQB/8Aa///gB/9Q//Af/wEAKAAPEOXAACABEQAIRBNJFscDAHpIOQCDVUcAAIllWgCIZ10ABItowABuZQCagAB5AKeIfwA8PAC5AFNTqQA6OgDZAEdH2wBKSgDeAE5O3wBRUQDdAFxc3wBVVQDhAFlZ4QBoaADhAG1t4gBubgDnAHZ25AB6eiDlAHV16MAB6QAAhISEAI2NjQAAloaBAJmFgAAAmIuHAJ+MhwAAkZGRAJeXlwAAn5eUAJqamgAAnZ2dAKKJggBAp4yDAKiLwAGSAIwAqpCIAK+RAcAAlY0AsJOLAACgl5UArpuWAACvnJcAsZmRAAC2nZYAt5+YAAC1opwAoqKiAACmpaUAr6ShAACpqakAra2tAAC3p6IAsailAAC7q6YAuq6qAAC/ragAv7GtAACysbEAtbW1AAC9vb0Aw7KtAADAtbIAxreyAADKtrEAy7q1AADNurQAyL25AADOv7sAycG+AADOwr4A0sO/AACDg+YAiYnnAACxsfcAzsbEAADSxMAA0cnHAATXy8AAzcoA39YA0wDb1dQA39oA2QDe3t4A49wA2gDk3dwA5eAA3gDh4eEA5eUA5QDr5OMA6+cA5gDu6egA7e0A7QDw7OoA7esA8wD18vEA9/SA8wD29vYA+GAAAPn49wD6+fkAwPz6+gD+/iA+HwD/HwAfAB8AHwAfAB8AHwAfAP8fAB8AHwAfAB8AHwAfAB8ADWeU/6CHAgA0Gxs0IAAAEwwWogEaQABLRWJfQAkSGQARFwAAQSRnZQACASprawsZTwAYDwAAJGtrawBHLAhraxMPFQANTgAaZ2tnKgAyZwgqMmNNEAAKAABAa2sIBSBMZSpHA0AGQAAANF1rUgRJS18AL2tMBFVrXTQAIGtrMyVEBkIAM2tlBz1rZyAAIGdrLi5rXlQAO2hrKDlrXzQAADdrPh9lX1lAPmtnB0hrgBI3AEBbHElZPTxnID4eXjdAoBM3QABKHjpQSzYeUgPCAQECVTYkLTpXAjTDAQAANUBrZwxoa6QDIgQ0XVcjy8cBIQI/BAH8MeOyIeY9YQCAYKJhAAkAZQLAAwvgt0Dz8KAg+B8AAFD+fwAA4awwYABgd8Kpoa1gBSV/Lx8ACwDHAMfHCMnJyRrBAMHBPbi4uFexALGxd6SkpIueAJ6elJubm5icAJycmJ+fn5OlgKWlibKysnQwAgJSsAI6wsLCFsSAxMQIysrKAj0FAA8PzxcODs9iAA8P0JESEtCeAXAAgxAQ0EYREXzQBh8IDwAPAAsA8AoDUM3NzRhwCENwWHoAkJCQqXh4eM8BACTkZWVl72FhAGH2Xl5e+l1dBF37cAD7X19f+RUwAfWwAe4Ag+N7ewB7y5KSkqawsACwdsbGxkPHxwDIE5ycxAJISADLBRERz4ITEwDR8h4e0/8jI0DV/igo1v5wAP8AHBzT/hMT0NSdMAxFHwkPAA8AAACwEgADzMzMGMDAwIJPMGmZd3d30vEKVTAK/LAK/nAA/vAA/gFwDP9vb2/+cXHecTEAsgAwAbEB/zECtAIW/LEDcA/RsG2UqKgAu1QjI866HR0A0/4sLNf+OTkA2v9BQdz+RUUA3f5AQNz/NzcA2f4pKdb+GRl00vowDGTfCQ8ACQDQKNDQFTAfTTEhcnJActlgYGD4cQhigGJi/3R0dP9wIgD/v7+//9bV1QD/5+bm//Hx8JD/9/f2MAD3/zCSAP/o6Oj/1tbW8TICmZmZMgMwGbIMsAQg9zQ0q++wC/8yADLY/0RE3P9UQFTg/11d4zAC5AD/XFzi/1JS4MHxDP8vL9f/MQxwJS4+XwoPAPAtA3AqI66Arq55fHx8y3EgITEHZ2dn/jCC/8sAy8v+8fHx/vcA9vX/8u3s/ugA39z+4tbT/+MA2NT+6+Lg/vWxcAz8+/sgcgIA/0EAAPz8/P7w8PD/gMjIyP6Pj4+wCgB6/hUVz/4tLazX//EW8Ar+sIr/8IkA/n9/6/55eekA/2pq5v5YWOH3shgxJfALyDAAvjMJALAJCgRwLjyxImpqaucNcAv98BYxB/7X19cQ/vr6+vII+ff2AP7p4N3/t5qRAP6RZVj+f00+AP+CUUL+lm1hAP7Erab/7ujm8P77+fn2C4IAAACyAwD5+f9oaNb+H4Af1P47O9r/MJcBsQv+hYXs/5aWAPD+nJzy/pSUAPD/gYHr/mpqAOX+UVHf/zU1QNn+GhrS/nAkLhdfCwMAcC4F8C5Ajo5AjqxjY2PyMRdzAHNz/8PDw//4DPj4sQfypP39/f8A8Ovp/6iHff+Ae0k6/3pGNzIAAnk0AH5MPv+/phyf/3EYNQMNAEdH2gD/JCTV/0JC3BXwMeNwF+qxC/+vrwD2/7i4+P+rq0D1/5GR7/8wo/9B8KT/PDzb//AO/x/wC+FVfxdwF7ELi4uLCrHwFvUxN4iIiP444+Pj8QolFMII+/sA+v7m3Nn+h1oyTPEL/nowAHIMSDkC/jQA/5hyZv7tHObjcSP+F3EAOzvYAP4nJ9X+RETdAfAu4/5+fur+mwSb8bEL/sbG/P6Is7P3shh4eOmxJQD/Pz/b/iEh1NUxJG7/LsexUTxxF7ELwbBP/paWlv/wKvofA7UHsS3q4t/+jmQAV/97Sjz+e0vAPP58Sz3/MACwAOI9sgCSal5yMbAC/wsBAABUVN3+IiLUAP4+Ptv/WlriEP53d+mwNe//pgCm9P6urvb+owCj8/+MjO7+cqhy5/7wJf+wSf7xVO0wYVH9CzBGI/EuMSNxFw8wvPJDvx8DAP7+/f8A9PDv/8iyrP8AiV1R/35PQf+AfU5A/31NP3IAwnxwAJBoXP8wGrAORvoPBAAAkpLpMUX/ADMz2f9MTN7/gGZm5P98fOoxC2FyI4qK7f8xPLAZ/whISN0ySBQU0fev8AtwjAcA8GgKMGV0cWjx8S6JiYlxQnYXNRM9FAExGPLt6//czsoA/rifl/6piX8A/6uLgv6tj4YA/oNXSv+PaFzA/uPZ1v779D79F0jt7fswatT+MTA7ADtWuwDa/k9P3/5hYQDj/25u5v5ycgDo/mxs5v9dXQDi/kxM3v43NwDZ/yAg1P4PDwjQmQAIAMbGxgMAwsLCRn19fcgAXV1d/HJycv8A4uLi//7+/v8DFQABNvz7+//49gD1//by8f/08ADv//Pv7v/x6gDp//Dq6P/d0ADM/4phVf+OZwBb/+LX1P/6+CL4Aiv39PMCB/z8AvwGX6ys7v8UFADR/yYm1f82NgDZ/0VF3f9NTUDf/1JS4P8At/8AQ0Pc/zMz2P8AIyPU/xER0NwQJCTQFAm/ycnJABicnJyWYWFhAPViYmL+w8PD8P/9/f0ALwMwiQMBAAWAPf6BQ+vj4f7KALiy/rylnv/cAM/L/vXx8P79AYBL+/n5/uPX1AD+jGZa/41mWkD+4NTQ/vCAa9MAw7/+u6Sd/tIAwr7/7+jn/vkM9vaAKYMzoaHs/wAXF9H+Hh7T/gAqKtb/MDDY/hA1Ndn+gAP/KCgA1v4cHNP+JiZAyep5ec8yiV3IAMjIA76+vk9zCHNz2YC9/o2NjTD+9/f3hlWNX/z7APr+8+7t/tnMAMj/oIB3/oRc'
    $sFileBin &= 'AFD+gVdL/5VyAGj+5dvY/vv6APn/+/r6/ujfANz+kGtg/4pkAFj+3dDN/tXGAML/i2VZ/oFYAEv+iGBU/6yR4Ij+49jVwW7BPIIYANXV9v5bW97+ABkZ0v8TE9H+ABcX0v4SEtH/CBwcx8AylP5xcQB71cfHx0+xsQTEAsUvzMzMGJsAm5uXYGBg92bAZmb+1NTUwhLNLwHDi/r+8uzr/s0Qu7b+j8AmglpOEP6BWU3BAP+EXABR/tbHw/759wL2wZX+7ebk/pSAcmf/iWNY/sFmaL+po8ILgsALwAH/AINbT/6ZeG7/oNrNyv70wW39wpMBAgDx8fz/zc31AP7CwvP+2tr3YP/Kys7+wYXBh5+An5+OxMTEEMUvAMDAwEJ5eXnOYcRe//n5+dK7wYXzAO7s/8y6tf+LUcC0g1xQwgCCxAGXWHZs/8BfwY7/ACP/AcA5/5l5b/+HYgJXwCjJ/9bIw/9IjWpfww1dUcIAhAHAAJVzaf/bzstQ//bz8tbb9sCZiWSJicDxXf3B6MC7OQXAAAHAYgiwsLBz0GdnZ+zAX/7ANW0uEWQB/f734AvYy8YA/o9tY/6DXVKQ/oNeUmAQUv7gEwD+rJKK/+DV0hz+9WBBYRfhBvLu7AD+oYN7/4ZhVlD+2cvH4F/oYBjEAP6fgXn+hWBVQP+EXlP+hGAIhEBfVP6cfXVhT/8DYDf0D/7+v7+//gBfX1//aWlp6QC4uLhoxcXFBAHgFxmTk5OjXl4AXvtvb2//7e0W7e4HwQH64HHp4t9A/6CDe/6F4BWFA2ASYAD/imhd/sGEradhRf/49fVAF4dicWIHYWSpj4f/YQUY18nF4kpgLP7n3oDc/rCYkf+G4EoOhOAYYglgCrOclf8Y8evqYoPxF+rq6glgqWz/YBj5mJiYApngGRDKysozfwh/f8RhR5CQkP8G++Ch8aT08O7/xACyrf+IZlz/hUBiWP+FY1lgF17dYAKsYqVgF+Cj9+F2YTUBYgbz7+3/spqUweAUWf/UxcJhK+ICAvlgg+vk4f+xmaCT/4ZkWuIDh+AAqI1tY+A7x2AJ9PJIDvjgr+FbYUiBgYHCUMHBwSzgMEfgLt9x4Re1tbVupgEAYRLqAOLf/pt/dv+GEGVb/odhAGZc/giwmZLip+/p5/4A49rX/9zRzf6A5t3a/vLt7GG9Qv5gHv66pqBiBtE4wr7+YRxlCuGm5twY2v6e4UvkCYdlXOD/rZeP/mEw4BDuL1FhE66uruEX/mGlvQi9vUVgFmpoaGjC6+B6/s3NzXGO4A4A9P/SxMD+i2wAY/+IaV/+iGgAXv6SdWz+39UE0f9hQbWgmf6UAHdv/5Byav6VAHhw/rqnof/sAOXj/vPt7P7DiLGr/+EFzr+64sUDaVJhZc/BvP+LbBhi/odgBGAA/5R4wG/+4tnW/uBVchEFYL3/4XRqamrnvAC8vGSsrKx9YwhjY/JgGP/g4OAHb47gIOBY/7iknv+AiWph/4lrYmIAALSfmP/t5eP/4MOxrf+K4BriAuADAorgAIxuZf/Lu4C2//Dr6f/JsEo9sQHKcAD9RXEd8Bv/oQSIgPYDjG1l/8wcvbkwej8kAQDd3d0C//AK/2RkZPCvgK+veqCgoJHwMAD4bW1t/u7u7gM/GzAb7ufl/6aPQIj+im1k/zAA/mCNcWj+0fAYcS+/JK6ocQH+i7QBi25CZTEA/8KxrHAg6QT+z3B2i25m/sY4trH+MYb9BXE1vKoOpHID8QVxALupo/6DcYj/F/7+6enpsQuhcmCrq6uAsGCT8Ty4cHBwP3fxC7BA6jASAJuCev6Lb2b/gItvZ/6QdW3xLgD+9vPz/+Tb2QD+qpWO/o1yagT/inAKjnNr/pIwd3D/0XCCsGL+1RDIxP+OcCXDsq4PsYX+BTElMA7+jHBoBfAFZ/IFrpmT/vGM7Or/CwAA7+/v+gvF8BeS8RdxcXF/azRrAOnh3/+UfHT/BowwCjEAln53/+jM4N62m7Au/9nwZzAZAP/az8z/qJOMEP/e1NAyndnPywD/knlx/8CxrPD/9fHvOiGySDBLMQOIjnRs9gWnkoyyJ8H/I///6Ojo8QsxJGrysC9+MAx/sQDwMP445ubm/xfwF/ELlX4Ad/6OdG3/jXQAbf6YgXr+6OE233Ka85D7tl2wJv6pMJaP/+WwRXA//t4A1NH/ln94/r0craiwIvIL+gX6+fgA/9vRzv6Pdm8E/o0xDHNs/qaSDIz+9Av+F9HR0f+DsUYwbOi7u7tmMEjgXGtra+UxPXCE/wsB9COahX/+jXVuBP+OcAaUfXb+5Q9wUnKC+EQxp+bd2/5orpyX8F3iMQ1yVZrAhH7+uqql/wu0TYLTMHmQeHH+j3AnYTAA/q2blf8jNK+kBKSk8lN2dnbUugC6uj7Ly8svgwiDg74xYYKCgv8s8vI7QvFH7fE7lI4A/495cv+QenMA/5J8dv/XzMkHMmu5AvFr3dPQ/7UYpaD/8QexFeff3AD/nIiC/7enokcycP0jMQ3CtLCyBY7EeHHyBbuspzJPvQK04+MxzW7yd7B2pzCzghzwdxGpqamC9Y9wra2t/jB4NoDxR/IA7ev/uKml/pFAe3X/kXx2cQD+OLyuqvGB9m5zdfb+ANPIxf6+sKz/CPTx73Il6+Tj/4CgjYj+s6OfPkUD8QGxTaualf6QeiB0/pB7dPIFzMAOvbBBchTmAvPz8/5wkZGR/rEX8XZwa15Qt7e3A/CPAfCzMBCKioq0cA36ZWU58Eu7uzEM9gMxQs7DAMD+k4B6/5F+AHj+kH13/p+OYIj+5t7c8Tc2BvbA8vL+yb268QfxFwXwCu2yJ6ORjP6wHKGc8QA6CXAF/tnPgM3/loN9/pEwBQEwAP+Zh4H+4Nfs1f6x2oUC9XAecFKxm4L+sDrzmpqal7CPFh31s3CcBrCEV3x8fHzKcZwxDLBtspB0Lf8C5/BGn46K/5KAAnswAHr/k4F8/+i/sq5wQupySDIS8BiCvbAXyL26/8swDAC4qqf/qZmV/4CWhH//rZ6aNiGD9KAwMuP/rZ+bNgUxMQCwop2yR/SD//S3cGwwUjEj/vHJcBazsAugN7a2tgH84w2wkOBld3d30jEMccwwDAOyJDR4/sK2s/+UgIN+/pOCff5xAICaiYT/0MbD8Y4FMpLxcM2ypKD+lgiFgP8wAP6ZiIQA/pyMh/+fj4s8/rfxO/Qjsawwk//AMLSw/pWwDbEEkoEAfP6Xh4L/1czayXC68/IZsAv+sAtyF6GxC4SEhLww+k+wFg4IuQsFALAkDre3nLcAt2l1dXXVXl4AXvxmZmb+vb0Avf/7+/v/+vkA+P/n4N7/pZcAk/+UhID/lYUAgf+UhYD/nI4Aif/PxcL/8OsC6QIM183K/9TKAMf/187L/9zTANH/4NjW/+TcANr/6+Ti//f0APP/9/X0/+zmAOT/wLay/5eIoIT/k4R/Ao6UAA4Atqqm/+/q6P8C/ABv9fX1/6CgAKD/X19f/mBgAGD4hISEvMLCgMJPwcHBCAAYAADIyMgOt7e3aCEEw/tlZWUCw/r6APr+9fLw/9bNAMr+nI+L/pWHAoMBA/+UhoL+mgCNif69s7D/4gDa2P7u5+b+8ajs6/+AFf6AV/6BVwD28/H+9O/u/gGBTdzU0v6ypqOw/peJhYIdgAH/gSUAp5qX/uXd2/8A+fb2/vT09P6woaGh/4A/gV33hF0wTsPDw5pdBQDGxjbGgWGBw9SBYYHDvLwAvP75+Pj/8u0A6/7LwsD+m5AAjP6Wiob/lokGhYEDggWil5P+uwCxrv7Ty8j/3wDY1f7j3Nr+4gDb2f/e19T+zgDFwv6zqaX/nLCQjf6VgBmAAf+BA0GAH/+kmJX+gWv1gPLx//Pz8/7AXXb+yV3ALU/AL+IuBQDFbMXFxTDFkv/BYcEw8QDs6v/MxMH/n0CUkf+YjInCAJfAjIj/louIwgHBAwCZjov/npOQ/wCckY7/mI2K/+KX'
    $sFileBin &= 'wAaWiofDCMECwAARwQmnnJnBZP/08DrvwS7/wV3tjNhhDbYEtrbNkv749/f+APLu7P7Z0tD/AKuin/6akY7+EJmPjP/AAP6YjuqLwQD/wQGXwQDALsECDcQG/8ADwgickpD/YLeuq/7kwIzAXf7Y8/PyzozAXU71LskwJ82SwTDAYf72wHvp4wDh/svDwf6poYCe/52Vkv6YwIfAmZCN/5mQYBpgAQ/gAWABYAJgHJqRj/8AnpaT/rCopf4A1M3L/+7p5/4I+Pb2bUb3hYWF//8uHwBqeuAwZkngMGJJYHoQ//v5+WA/7v/rAOXk/9fQz//FAL68/7WurP+rQKSi/6afnWIArQCmpP+4sa//yQTCwGBh1f/u6Ofw//by8uaMcUZ/dR8Ag/Aw8pL+/f3++2AZMPj29f5gGeCP6v8g8Oro/u/gK+/psujhqv7x4H7hc/lgT/XgFv4AAP/hjGGkZEZldb9/Rh8A9pLkMGVJ4TD+4MO8/v8AAIESBABgAf3iGv9gAGMB5gIDAGAX4btmRn91/x8AHwDjkmlJ5ZJh3OETHQD/YQRx02GkfxcfAB8AakniMMFhSbm5uf/4YHqCLANoMe0y7+/v/pyc+pztLk7/uw8ADwAPAA8AATY9Dbi4uGd4eAR4zzAM+mJiYv8Ampqa/uDg4P4bcAw6C/1wJDAX/tDQFND/8Ar+8S5hYWH69nBGu786DwAPAA8ADwADDwANAMfHxw2+vkC+XYGBgcKxFF0AXV3+aGho/42AjY3/rq6u/7ABAP+7u7v/pqamgv8wAv9jY2P+MAKC/TAn7Y+Pj6mwKPBJwMDAvwsPAA8ADwBHDwAPAH8YyMgMcCtBAJmZmZpxcXHb+3EVMAr8sQwxIjEAsQCxMgHwC/F5eXnOpaXUpYZwCyzwGwIfBQ8APw8ADwAPAA8ADwADAL+/QL8Cy8vLH/AWWzCfn5+OcSHxPXJyQHLac3Nz2TALzwCLi4uxo6OjhvWwIkswDxlfBA8ADwAPAB8PAA8ADwAPAAEAxMTEKgOwGA8wLSswSjixWLGxOzEAsAA2sCIh+/ANsRoDnwMPAA8ADwABAED//wAAeA9wAPg1wAAHcADgcAAQBv/ArXAAAXAAdAL+dAD8dAD74QIBAPB8AOEDcQPhA3YA/fAEgPQAegAPAA8ADwAPAP8PAA8A/Ad1CfIKcA/yC3AQ1XINH3QOP3QPf3QQQADa/wAEAXEAAAQDcQAABLYHcQAABA9xAAAEH3EAbQAEP3EAAAR/cQA2AIBSA3MA4AdxAChgBSDdMABAYgmRADAKEK8LDwCDDwDwUQHJyckOsDkANaurq2mdnZ0AlI6Ojq6IiIhWuDEAsACt8DGRsAFlQfDEMczMzBG1Aw8AD88hEBDQiRUAFdG5FBTRshFoEdB08AANXwYPAM8Iz88BMDUYtLS0AGWGhoa6aWlpCuhwQ/qwRP5nZ2fw/mpqajIAsQAxAbABAvnwAOeHh4e4sQCxs2BNTcdlGwAb0/cvL9j/OwA72v86Otr/LQAt1/8ZGdLiErgS0CwfBwcA8A4LsG8OXDFYsUvxrZGRkf8AwcDA/9zb2v8A7Orp//Xz8v8A9/f3//Hx8f8F8GX/8BH/kJCQ/wGxAlFRdvYeHtEA/Tw82/9XV+EBMAHl/2Vl5P9UQFTg/zg42jEI36WwEAmfBwAAMEcesHQGkPFcsQSnp6f/6gDq6v/7+vn/5QDb1/+xkon/mwB0aP+riX//3HDOyv/6c20yADBt/wDp6en/R0fE/wgxMdiyB3p66f8IkpLvsAnv/3Z2AOn/U1Pg/ywstNf/8AdlvQewGyAwDAKqcGf5g4OD/uEM4eG2BbDJ/5JoXAD/ekc4/3lGN8EyAIZXSf/nsMY9jhA3N9j/sQ9nZ+UBsge3t166APj/s7P3/4yMAO7/YWHj/zY2gNn/FBTRmAAIAADLy8sekJCQqgBgYGD6mpqa/wD29vb//v7+/wMBAAEc7ufl/4ZZAEv/e0o8/3tLBwAGAQ4ABtXEv//9DPz8Ak4FADw82P8AOTna/2Nj5P8AjY3u/6+v9v8ArKz1/4iI7f8AXl7j/zMz2P8QEhLQkQV7xcXFoAqcnJyPAHv5AXtY+fn5Ck8Bf/kAj8YAsKr/imBT/4EAU0X/glRH/30AT0H/z764//wBDH94eOT/KSnWAP9OTt//cXHnAP+Hh+3/hYXsAP9tbeb/SkreAP8lJdX/Dw/QAk2BPczMzAG2tgC2U2dnZ+yCghyC/oF7DQCBP/r5+BD/9fHwgoPj2NUA/9zPy/+FW05A/8u5s//7gFf6QPj3//v6+YIV6ATo+oA/1f8wMNgA/0hI3f9XV+EA/1VV4f9FRd0A/y0t1/8XF9BCvIV9xsbGGIA7wYBlZWX+4eHhhrlBhTv7+vr/7YA5vQCnoP+uk4r/6QTg3oK36+Lg/4kAYVX/x7Su/+AA1NH/q4+G/8VAsav/8ezrgg/VBNX2gMHY/yEh1AD/KyvW/yoq1gD/Hh7T/zQ0uSDpjY3MJcEez88AzwGzs7NkYWFgYfalpaXPHsA14QDW0/+ZeG7/ghBZTf+BwAC+qaIBwgXw6+r/jWleUP/Dr6nAJYvCB4MAWk7/ooR7/+gBwCj8+/v/+vr+AP+3t/D/ioroAP+QkOn/gYGqAP9iYmLzsrKzAlvBH8jIyA2IiESItsE+6Ojoylz8APz7/+PZ1v+SAHFm/4NdUf+DAFxR/49sYf/aBM3Jwnv28vH/kwBxZ/+/q6T/zUC8t/+KZlvACVIE/4TACp1+df/rQOTi//39/coU5QTl5cCkY/6NjY0Ars3NzQy/v78ANGxsbOWMjIwHygrBPsFRoYV9/4QEYFXCAKKHfv/mFNzawHn4wgf28/IA/5t9dP+8p6EBwgLe09D/mXpxEP+EX1TCC6+XkAfCBclUwS2JiYn/boBubuG9vb0pwF7CXsC8+Lq6usoJwZEAy7q2/4dlW/9YhmNZwiHBM/XAPPcM9PPCVsEBpIqC/xi6pJ7CpsGJ5d3aAP+WeG//hmRaAP+KaF7/2c3KEc7mtbW1YIBh97AAsLBXn5+fh19AX1/+2traah/0APDv/6GHf/+IAWAIjG1k/93RzgT/0eB8qJCJ/6oAkov/1snG//QA7+7/rZaP/7dAopz/+ff35kXRAMO//4lpX/+HAGdd/7Cak//4hPX06g/W1tb/YA4A/aenp4STk5MipmE/7e3t6g/n3wDd/41wZ/+Ka4Bi/6uVjv/o4AEIknZt4gGKbGP/AJd8dP/r4+H/gLWhm/+0n5ngDwNjdmEH8u3s/56EiHz/iWAFlnpy4Dgi6mor6urq4R/+lwCXl6CLi4uzaXBpaf74YDoFAOFA1hDKx/+M4A+Lb2YQ/8a2smAK6/+tFJiS4AFn4AJo/50ghH3/7eZgcqumAP+xnZf/+Pb1I+eUYBG2o55iB5B0IGz/5NvZ6g/z84LzYWD+lJSUpeBQAq/xD8/Cvv+Mc4hr/41gANDEwOI9gvPgLeDX1f/g4HECteAL9PDu/8W2YLH/r5uVaizhQMEEsq1iB491bf/eRNTS6g/s7OziH5mAmZmcoqKii2ABMP3b29tmBOEP0scgw/+Odm9iAM3BDr1iceEDYQPt5+b/CL6uqmJbzcC8/2CsmZT/9+gPYVG/BK+rYgeRenP/4CNgpenIycnJ4T/7qQCpqXC+vr5JZoBmZu2VlZX+ZbgC/mAM39bU/5F8iHX/kOAHvK2p4ktF5Qfj4CnJvLnirdRx4FCpl5FiYeUD4RKuAJyX/495cv+XwIJ8/+vl4+YP4SwBYbxtbW3it7e3qjPgjxDgMKNgcPzgAQPiG2EF8Ovp/5uJAIP/kX13/5+NIIj/7+no5h/Zz6DM/9bMyeKP2GABWKaVkOYP4QPmYFWYAIV//5B8dv+nHJaRYnbix+AyoKCgAv9h3J6enou8vAS8BeS/Ln5+fsax4TC5ubliCOFJu2AsAJKAe/+TgXz/KMS4tGAM9GI7zMEAvv+5'
    $sFileBin &= 'rKj/r6AAnP+ejon/pJRH4w/iduDTtqmlYAZ7HWIHy+AzYYlhD6Ojo0FxF/yKioqycBccAbl/wsLCOHp6ei7NNQjxJnEMm7APlIQAgP+XiIP/zcMKwDI/1bAPwLSw/4jGu7gyAdnQzvIfAPPv7f/Bt7P/CJSFgDADf/+klmCS/+/q6LJ8tAf7YbFexMTEKbkHOAg5AzkIMRDPxsP/l4qAhv+ViIT/mHAAgLmuq//h2ddyBaj08e/weO+yAN3wIiCwpaL/lnAClIcAg/+cj4v/3dX40//3sHy5B3CGvwcIAAjBwcE6CPXy8v8AysG//5uPjP8Al4yI/5eLiP8AmY6K/6ecmf8Cr/AGrqSh/6WaApayAZaKh/+WiwCH/56Sj//Xz/jN//VwKL8HDwA/CDsIAvbwQtjRz/+poICd/5qQjf+YsAipMgCOizIAmfQAmbABoK+mpP/i8DH1MAO/PxcPAA8AvxgxCDFv8PBwANTOzP+5srD/gKqjoP+jm5kyAACspKL/vba0/6Da09H/8zBJ+LA6/38PDwAPAH8QOinwQXEpsU7/cZgxajEA8TUxVzFKeC5/D/8PAA8APwg6CP2ECQC9B38PDw8ADwAPALEYe3t7zPExCLGxsb+xcD8xZfCzP78HDwAPAA8ADgBwFDaDWIODv/EFsEr/8LL/ANHR0f/Ozs7/AK2trf9zc3P+ATGFj4+PqsPDwz+/Bw8ADwAPAAoAcAUjoaihoYuwBtjwc/WxTAPxCPCc83h4eNCq6KqqejBVFJ8DDwAPAAcPAA8A8qoGwMDAJlCysrJUsHNm8B5k1fCUS3CkIjAXBB8DDwABCQD/gAMD/gAAVAH8sAD4MADwMADg9TAAwDAAgHABMQCgADEArw8ADwAyA7ADAzAEB7AEKg8wBR+wBT8wBn//AeAG/4AB///AAwD//+AH///wD9T/KDADEDAAIEIGUQC4AABAXwwOALCrHzBsqnmwdL3wMdkwANjwIQK7MAF4iYnFMRqAGtKoKCjW2nAAYJgJCZULdQMwGgdBMBx5fHx87fB2/qDNwr//yjCM8DCaCOfn57DCt/46OgC5/FlZ4f97ezbqMtMwBJO1A/Cim50wnZ399zBGMW+DVQBH/3pIOf+vkQKINn46Otn/enoA6f+xsff/dXXA6P8kJNXK8QOwrh52MDIgPDM8sUTNurRE/7Cwy6eIf/AA+keyh6CBcuNubuey4hioGNGCcCUfMDjtcQcDcQYxR7GYkP+2nQKWskioi4L/r5QAjP+3n5j/7esBcAmD5v9cXN//AE1NpvagoMQgLbAHd3AiAgr68DunjICD/4toXf/SsLIRcYyqkIjwvrX/ifBlWv+vMLWxCQEA8MEC/vAScYSEhLfkBOTksgfXy8f/iLGwtc6/u3Ki8W+xcLZtsYHSsKKxAd8wogEA4gDi4v+Ghoa0ewB747EAe9X4+Pj//v4A/v+1opz/ookAgv/Gt7L/i26AZf/Dsq3/tgCYIPz6+v/6AIyagCB5/7+tqAKs9/cA9/97e3vQfn4gfs309PQCJq+cAJf/rpuW//r5APn/6+Tj/9fNAMr/u6um//v6APn//fz8/6eSIIz/t6eiAlbt7QDt/4GBgcGgoCCgeqqqqgAS/v8Av7Gt/5+Mh/8C+QBb7uno/+PcCtoCE/sAT/bz8/8AmYWA/8i8uP8A/f39/56env0BADtpt7e3C4eHAIeytLS0/uXgCN7/lQEjvrv/5ADd3P+7r6v/ugCtqv/49fT/wAC1sv+Xh4L/6wDn5v+oqKj+jQCNjaOtra0HAAEAALm5uQ6GhoYAtLOysv7Jwb4A/5iLh/+yqKUA/87Hxf/OxsQQ/6+koYIJ0cnHUP+np6eBHaSAGQojgR0FALi4uIIhsrGAsf7b1dT/sIAfAJ+XlP+gl5X/ALKqp//f2tn/+KempoIdgBWKHY0hgWUI/Pv7goP5+Pf/HvuABYRZlh2JIYmJiQCwoqKi/uHh4QD/3t7e/5mZmWD8jo6OoY1ZFQCwCLCwCMA5ZIWFhYKrwFanqampXMAfqgXRCvDAAMDAAIDEAAkZAIABwAoDAADgAUBd8A8AAPgfAAAA'

    $sFileBin = Binary ( _Base64Decode ( $sFileBin ) )
    Return $sFileBin
EndFunc ;==> _Folderpng()


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()

 

Link to comment
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
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...