[BAT/EXE] bPair-v2 Jeu Memorie

par **Delmar Grande** Sam 29 Juin 2013, 16:44

Code:: @echo off setlocal enableextensions enabledelayedexpansion call:Arquivohex ::Creation de l exe TITLE bPair - v2 MODE CON COLS=29 LINES=13 COLOR 04 :: Créé par SmartGenius :: :: Edité et amelioré par WilliamPigmeu :: :: colous.exe inclut dans le batch par Delmar Grande :: ::Traduction francaise par SachaDee COLOUS CURSOROFF SETLOCAL ENABLEDELAYEDEXPANSION :MENU CLS ECHO. COLOUS writesec "[3] $178$178$178$178$178$178$178$178$178$178$178$178$178$178$178$178$178$178$178$178$178$178$178$178$178$178$178" COLOUS writesec "[3] $178 $178" COLOUS writesec "[3] $178 [4]$178$178$178$178$178 v2 [3]$178" COLOUS writesec "[3] $178 [4]$178 $178 $178 $178$178$178 $178 $178$178$178 [3]$178" COLOUS writesec "[3] $178 [4]$178$178$178 $178$178$178$178$178 $178 $178 $178 $178 $178 [3]$178" COLOUS writesec "[3] $178 [4]$178 $178 $178 $178$178$178 $178 $178$178$178 [3]$178" COLOUS writesec "[3] $178 [4]$178$178$178 $178 $178 $178 $178 $178 $178 [3]$178" COLOUS writesec "[3] $178 $178" COLOUS writesec "[3] $178$178$178$178$178$178$178$178$178$178$178$178$178$178$178$178$178$178$178$178$178$178$178$178$178$178$178" ECHO. ECHO. -Appuyez ENTER- PAUSE>NUL GOTO:LOAD :LOAD CALL:SYMBOLS CALL:VARS :GAME CLS ECHO. ECHO. ÚÄÂÄÂÄÂÄÂÄÂÄ¿ ECHO. ³°³°³°³°³°³°³ TENTATIVES: ECHO. ÃÄÅÄÅÄÅÄÅÄÅÄ´ PAIRES: ECHO. ³°³°³°³°³°³°³ ECHO. ÃÄÅÄÅÄÅÄÅÄÅÄ´ ECHO. ³°³°³°³°³°³°³ edité par ECHO. ÃÄÅÄÅÄÅÄÅÄÅÄ´ WilliamPigmeu ECHO. ³°³°³°³°³°³°³ ECHO. ÀÄÁÄÁÄÁÄÁÄÁÄÙ ECHO. COLOUS 3 8 28,3 "0" COLOUS 3 8 23,4 "0" :COORD SET /a "R+=1" FOR /f "tokens=*" %%a IN ('COLOUS MOUSE') DO (CALL:CHECK %%a) COLOUS 3 8 28,3 "!TTN!" COLOUS 3 8 23,4 "!PRS!" IF "%PRS%"=="12" ( COLOUS 3 8 16,6 "Gagneee!!! " COLOUS 3 8 16,7 " Appuyez " COLOUS 3 8 16,8 " ENTER " PAUSE>NUL GOTO:MENU ) GOTO:COORD :CHECK FOR /l %%X IN (3,2,13) DO ( FOR /l %%Y IN (3,2,9) DO ( IF DEFINED O_%~2_%~3 (GOTO:EOF) IF "%~2 %~3"=="%%X %%Y" ( COLOUS 3 8 %2,%3 !V_%~2_%~3! IF NOT DEFINED Sel_1 ( SET "Sel_1=!V_%~2_%~3!" SET "Pos_1=%~2,%~3" GOTO:EOF ) IF NOT DEFINED Sel_2 ( :: Double card bug fix IF "%~2,%~3"=="%Pos_1%" (GOTO:EOF) :: END SET "Sel_2=!V_%~2_%~3!" SET "Pos_2=%~2,%~3" ) IF NOT "!Sel_1!"=="!Sel_2!" ( SET /a "TTN+=1" PING -n 2 localhost>NUL COLOUS 4 8 !Pos_1! $176 COLOUS 4 8 !Pos_2! $176 SET "Sel_1=" SET "Sel_2=" GOTO:EOF ) ELSE ( SET /a "TTN+=1" SET /a "PRS+=1" PING -n 2 localhost>NUL COLOUS 0 8 !Pos_1! $219 COLOUS 0 8 !Pos_2! $219 SET "Sel_1=" SET "Sel_2=" CALL:DEF !Pos_1! !Pos_2! GOTO:EOF )))) GOTO:EOF :DEF IF "%~1"=="" GOTO:EOF SET "O_%~1_%~2=NUL" SHIFT&SHIFT GOTO:DEF :SYMBOLS SET "Symbols=$001,$002,$003,$004,$005,$006,$011,$012,$014,$015,$020,$021" FOR %%S IN (%Symbols%) DO ( SET /a "S+=1" SET "Symbol_!S!=%%S" ) GOTO:EOF :VARS FOR /l %%X IN (3,2,13) DO ( FOR /l %%Y IN (3,2,9) DO ( CALL:GENERATE "%%X" "%%Y" SET "O_%%X_%%Y=" ) ) SET /a "TTN=0","PRS=0" GOTO:EOF :GENERATE SET /a "RX=(!Random! %% 12)+1" IF DEFINED Sym_%RX% (GOTO:GENERATE) IF NOT DEFINED S1_%RX% ( SET "V_%~1_%~2=!Symbol_%RX%!" SET "S1_%RX%=NUL" GOTO:EOF ) IF NOT DEFINED S2_%RX% ( SET "V_%~1_%~2=!Symbol_%RX%!" SET "S2_%RX%=NUL" GOTO:EOF ) SET "Sym_%RX%=Nul" GOTO:GENERATE :Arquivohex ::pushd "!temp!" ( echo On Error Resume Next echo Set ReBin = CreateObject^("Scripting.FileSystemObject"^).OpenTextFile^("colous.exe", 2, True^) echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("4D5A90000300000004000000504500004C010300000000000000000000000000E0000F010B010237004000000010000000A00400D0E3040000B004000C0000000000400000100000000200000400000001000000040000000000000000000500000200000000000003000000000000020010000000001000001000000000000010000000000000000000000000F00400E0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000",x,2^)^)^) : Next echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("00000000555058300000000000A00400001000000000000000020000000000000000000000000000800000E055505831000000000040000000B004005C35000000020000000000000000000000000000400000E055505832000000000010000000F00400E100000000380000000000000000000000000000400000C00000000000A00400001000000000000000020000000000000000000000000000800000E055505831000000000040000000B004000036000000020000000000000000000000000000400000E055505832000000000010000000F004000002000000380000000000000000000000000000400000C0332E303500555058210D0902087ECC25",x,2^)^)^) : Next echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("99F043BA209EC50400B2330000008C00002605005B3F72F6FFC605D096400001E8050030B40B005589E583ECFFEFAFFB08C745FC00006A1F31045005845085C00F859401ED73B76F15FF3524902E68300418B40F6BBE67730A2B2CF4245BE90C9D30F37D01CB6808281C234850DEFDDDAC58100E3254508D7DFC5709333458894BD8BFDF77FF75FC6A040D845F89073635410679987433C43B162443F67441680C6B3BB61BC9C351753E1834744EBE276C41BA0FB63D5957DD7CC3E907088321848D3DE0897DF83B37F6B7372C7175F86A70A409073574FF0376EC6890113F35948D83F8030F8D96FEFFFF770DBF648721D4581005093644C94618ECF0C38DB4",x,2^)^)^) : Next echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("26CA0690DF04C8F79C429E002CB9247E5FC2EEA3100BEB7D0B6A03A11240509D6C95F026062E682CDFE7C386FF093674A18B15208A175BD9BF1D61885C10FF7E419DCBD889EC76FFE97426DF8102D8672BB700AC06832C0836F4F0DB5EB24375534E08B9087DF8B03B766C809D3784C768FF3ABDFCCE1DEC67612538240B68852417017BD993FD1DB40B1F04521B082FB008AAC2048FA98D5C090B93A48EFDD87ECE719F857409B81735E425E6385DE19F5B31224728722153C8A548BABE65B301222E28D10036194A40EE7124CC3A89F65F9CF8F57F79818DC9018B45088A003C5B0F84ACE320989F55066E6820AE6A5D2663CC961E83E8026202A38EF8A625",x,2^)^)^) : Next echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("CB24F8F873665A76902022243F9FBD87FC961DC4158299007B47D8ACD9752E60046B68009BA4EFAC1540A703D2FC36DF4CB234F0FCFC3904686315DEDFB2213FA5686216619BF51DE6AA9831B35BEF9BCA5672224B1639CBBE56B69E8FFF9E8A2D84654247B56995F47CB849FEF816BFF0CBA03C0C01A03974C705C924DB7B710009282C36824C32303452F4073B8575E7380B152F64B60C4E59BC6834D90A3E760D6EC506B89500A33E3B91AE61DF0C7F3C909028C8349E81D618987CC2DA05BF5BB0FFBBC45A8802A133F7FF050AEBC63B0D3B4B53E95E5693F6B3776ED25E0C16E468001617140FB705FE7D78ACFB7EEB68026AFFC339F46828CE22D0C50C",x,2^)^)^) : Next echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("1E025C142C12D6924304DFB6D719D976FF24E21DF4DEE19943F455DF1A07D877C83811811AF4352C31FE2C202202D4683B22698E9C92DB1784EA15814A01224436C92194B483F4F46D43D82FC92E2F742B2641B0872D2156BCEB032A9041A00D24CAF4923D1B19F43C983A840978741DDC2B1319ED6404E9E0121122979B3C9061904EB7057B3B2407362C27E81DF2ACEB0401952C5004743C1FB61DB2236484CDB0683D14682DB0209F7C3B22E642C086D1BB2C916262D32B591E047454880119E40E32C90814681808580223EC8B6C2C899F5C6EAE227484841C23F4A2388EBFF72DDE547902740BFF5F830B49DDF7B11BF1053816087571A16B8537E481BC",x,2^)^)^) : Next echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("2C0E72D86C81BDF60E39691A0D3827058E84250F662810283B66381F004D1B15703B05D96960D9FB7473FFEA76F138865C72D8783DE038D86BC95E732B0E3E2459241BB21CF4921C162673B30C7FFC0D77C72C2FE1395427A002D480B210E3917505FFBA9A04F6C453849B06F09E3219B992E52434B768BB04C2A1292BB8EED196922D3FD1D0B7BC92E59BAC7A74D5ED054E1653F2D90B6C3E541E7202D91FEE21E403827CAFD1483AEF1B1BD91EC2940A5B24941E3386B08C2917ACFE2C99B2C14A4B2B466473E125C67510C26482501D0D6B841122F0CD4853B25A7C294008C9DFB0919D0493C49895EC4C32653D588BA558259F21AF3B223925F0C08DB382",x,2^)^)^) : Next echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("916602BD2A81333F531E09BCAC205977EB3C467CD80172287333833D28C03B52EB5ED640A305C1BAE4804AAF1EAC6A74096BFD790383C003C1922B87DB12B302878B6B7BC41CD67D72180F8F560E9098F0E4C92083F0F00C1FD10B18101029A12CC984560C4E43C989905B24B4AAC31AAC2174249483900C6537E2621C4A760B410014242074300883A14E7D101834070C9E0F08E461203697013186654F0196104659975C38140221030246C82D12581742B782C836424E84752ACB0B19C24E744E26E07642869027F37557B659B04A22FB27422F8B53B8218E3E740E04968C142778C9621023118028D20D4B121E4C0928C924934C2C3034127C29A9FAAA94",x,2^)^)^) : Next echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("C1B5639BE076000F8092251CE411393976EC0FE012E406132464267B3639A41B142439F42C160C0BF7EF186AAC6E3D1D04082083F88B5EE1D15B8D890BBA4B0860AF26FB426429148E3F72C8801C3030302103720540400CC815C84050502057208750605C811C326060704472C8807070BD1B7EF71CA0801F8845FF8B450CF306FE0D0F68A533B20C0805AB1DF0B383858F33DD80830175279DB9E41A024CEDE092018DDBFDBDED05282509500A6124A3F018EB4E3ACFBA60DF2F453B463A3A0166AA0336F1C745E80106E45798E87B869EEDACA0849E346AA53F0C0276BBEC440A54B6080000E7F6EE038FD408575653E93716CA6653EF614444A06521857B",x,2^)^)^) : Next echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("DB5C6209241A2CFF6A0A08D9D465673431649A84441FFB3DF78530196155AE8B0E6BC01466B6DDDBEF8B840533663D240F82E21F664831B8DB259EC1078E2DAA746205047156AD2C33ACF6837B32738B4B0C84CF4D8DBC05809C6CDF3B151D69A82850A69C5C728150607D3EDB6F811DEB642520745B91E519C0212042306479069039302070B1180164176116170B87671C3B855A19CB7BBB87B00C6B87845E1631C07E78BC04C75B5E5F80BFA0009378EDB9FD1C751B671293065608707D8D2661C4281D0169B063EC49EF803D1026254F50931D7F1D4F7D0BAB502FF4EB457E086F64FB600E3FD4EB36543620137EA6DD6B580C098B385C0A7804F612B6D9",x,2^)^)^) : Next echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("0864EB0D379B6F39A48B5C009F1616273D900B0068906C18B92543B4A4152F1670225B39982B0C040A009438507367EF3B75688976C32F9EDFADFDEF152D8B3A89388B7AA0A383050F082AD695663E44673B11E0950256A45CB551BABFFDB65E623B550809520239C275121164E41A944904CE61D41DF2BD794006042C601219180EDB08D69B0B1DDFEB28027724241032BF1524B1773F428D9B89C6FCB90CA4F3A566A52569E3AC6500AF8D0050748B10DF2E7438FC83C810DD16E081102E843868109418985BC19384682B92BE911DBE10349A7F185483941CC084E0EFDD0B60930560F44FF660EDAF505C711D948A086F81F7351B3D7AA0BC69EF27309911",x,2^)^)^) : Next echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("14597F096A320E1184B1ECA4EBD32C09816CC2B2CCEDFFC2007649B319DDC60AD62669EF01EB05528A0D55BC83D95B4F4282107D3DA1E481E47811BE2A0094648C258F009443FE4C08135E56BF7266DA744B74E16641FA0706FC668D0D740FFF05FE674008246DB452AB01FA2E13B20139E47BAD1E06C615040465E790030202FD77A4D7DE3F15FE8C7A752E105AAC7B48FE5206111CDC855273D8E689D7020CFC04990B094FA0AD1C747BCF196FC896A61E088F2B39644B1F222213255C025F3F5CEBDE64648113793E0A0CF66F90321E3B25BCB1440090900F0CC9905CC8C0C4900DC990CCF04FE4420EC9FC08B2E086644886ACB4B012256448001FE0C816",x,2^)^)^) : Next echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("2EE55A00750CC71A369C99A1401408C60A20C4C2FC35F18985F4FD33BD0589BDF89125786FD41EDEFFB50AC6FC960533DD6CE447FE124BC86CDFC1176A3D0D544EFCB067939DDF2FFB4240A40B9B057B595541240BA42C1CBEEC2D190B847543BA1D3BF66DB485522B62508B064050A7ECB18597678B0424A6EB28B37DEF66D20C6D9403850A40FBF89B1BA1B1058A9E058527F413421327207D084F5C08DC188102EF44F4BC57EEE04885A58BBC7493EC013F38DDF69BA20090A4847801DDCE6763BFE419C684050785A49E6CCDD6602D06A520350CA6FDDF5F40460C1983C00238FD06DF773376AC577A6A84201B7463C1E8D083EF505006FEAAAF89CFB9E4",x,2^)^)^) : Next echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("3F1308F4B76DBA757209A36010EB4CA80508DBD86AAE3F4A51A814B01E5BCFD6E814AB09A824CCFF617BB0DB740E63A4571034EB07DBA415CE2C35D81014CFA444CD96900E1CAF5B8094BA7DCF413B082D44132095A41E39847D95A19094B890DB86FB0CA18C09380315730ADE27977802752C39E1832154A33EBD76B6A6FD1714F1F410D881C5FB1A64A34FEFA12B69025C360B2474DF6F64C886E4282C0F18B830388714B23F661B92EF65C93B2F24200F211B92211C347F92211992383C30020D3431A008B14B9C05BA52DD40DE2B8105429F32B234DD7C3A180C3260703BBBFD0E21A122480036A170080C2A253C23D3485E26F4C3206082B1DF0CB2D160",x,2^)^)^) : Next echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("86EFED2744EBF42B053840651F6D58B24CF8501B258F20F69BCD4A868083E27009C2880A385978CBDF3B9D906CC385050B5E1514D3D2F089B32F2481A0A0D68479B6EBC409949C23EA2F2099D600EF3B2413DF99BBE0192B47070334CAE068F901E86A7304017DE4A4C2A7EEFE5FE2F010030F9745DF807DEA107206051372164BB3746F14F9740F06900891016878EE122982C8317A35EE406FB7EB5D0A3D25024F764211373A50D75E1967EA6713B095B6D95F3306B30DEB2F0F3AB73B42D7D44D51F007EC3B64A2205DAC0DF6EB0F2F8A47108E601B6CB7236A7279735208DFB56C775BC20E0357373822127532B289E71220C09529CED095B2BDD83B1EA0",x,2^)^)^) : Next echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("084CB337C009B73272D0204B751A3FAE0B6508C78487BA3C1502C617E3C3EF516CCFA0180B6174F071B0E8E0968D0D94C5A181100BF64B9E44EF48C3233E8B3DE09594F801F7183042EFB7A67F0B782B89AE1FB0252DFB252529743E2F3C63A1D0C10EEA709181E280D4C0789D948F7658F97A6C44796C96640FB56CC00CF03F009603C25C9227F5109609E726F97B5F1089ED2916682020731F4042F4A27E252CD53D9B0303680DC0F710D76292EE878494E20AB643DCEA7531DB609B5A4C840F7916601042549335B2161D26BE35745C2007B64450D83AB7FB900FBF052446A340040B26F06CB37B5004A028A2805B2A04C0209F6D68960934A3706488D535",x,2^)^)^) : Next echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("D8D50F941C0EC72F6421C876FA09702C60D78C6C66400B7060A116DC8D0AFF4889FA4AC1E208B46D15900F6183BD30D068E0629409DE90E8C24261A736CBF1666FC6D74C1A68ED290917B9AC89F5D129F01A8947B2821FFFEC805D936504FCDF4866120CCF5697070CFE2A5438BC08EFA41D1C1E192F48B090204F21169B6CEE428910240B50276F66EC2C37141699FE090CBA969A91FD10FCBDFEC1E7FE176E2F7014106625007226662D69007720971EAC131601076BC00A3B5510A57B8EAD834C01EC112F08DB66D88802298E72330D098696EDF98894230F1905510666DB1AE91F6E09DD6D0F038CFC96915E02470574413BF69691ED1B42042B050FA1A6",x,2^)^)^) : Next echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("CBC8320126E98F5E15964126BB08A4000AA68150B9E4924B342D76E926CD36F0FD93C00F6C63DDACCDB617730926945593EF9D8D4784AD15C04F77CE96B19D0F0C151F8DA4E185AFC827646637803984257C5BDFA589EB70AB96D5680795B33DDBB7608F32075823175070B66DCB94489CFC742C983BB76DCBB6893854441405130B2C606CF996EF772631301E0719162BE05996ED571F0C58062E1D2BD96A2E08DF0C0F18EB8AD615972097B0959F8C8E9118EAC9036B898D83DC4DE2F2E309F0A140F4C04D36C8A160F61DEC7B030B75ADFD09EEC1F082E057983605F4FDEC75ECC0802C70888CF0B4B00C74801F1C2148ABA91AB809CA50B60714222B8D74",x,2^)^)^) : Next echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("45E41DFC422F520939E419E65FEA51BAE29800F0689CDC52DFD9146839C4A4780B650818F128DFB3F453AF7A18556F15C83A302D30D8C6501C2FCF8E99F8270D043DB2D7000631383B96EE017B200B24EB2226C7B1BE0332E62523A8D83D0B248FB04746E82831C06F0C687C87CEAFA07BB096317E10ED6D5734BAF47BF83B077F249000CFF4127C165593BC103C41F0716BF5B92EA91E7D9007EBDFA159041A06C148B763C3DE98A010677C6F0832166C25260914F66FEF0E89C2853B42147E09D08B7A10897814602CF1005246D2FB9F6DD70156B1352C08079E0574D02D9EED3D2C060B92069CFEC8D3C5A6AE9703644B2D718F96EE37C1D89CE718B15214",x,2^)^)^) : Next echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("C604101A7DCD8EFD95FF23A56A0DDE6A0AE5D31DD885280D0F42390AB2C5624B83023AB9AF141B31B2FB10EB06553F2F1414B5F01D8BCD76212BCD140AC03C47C1D9762CEF0C372C47B1998012ED4B6B2C0274380375B830603B94EB1C7010803C103B2074437CAF10297CD754D8DD0316110F8DB3408B4218389B70C3022B29DF8E8A166BB17B2818481033251FB2872D1B112C7FE93B6F67FB6D50F8EA023B50103F4A088A5DFBD9DB2CC6889C2165757DFB574F23252C61EBCCA0B66CD2000F190F18993963F8B03359F85D339FAB3C0772482C074FB4BE7F4383F90A4F302C03741EEB32A1703BEE7D5B24E1B495880D119DE82FB2C42ECD615010EB7CFF",x,2^)^)^) : Next echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("5D73C4D7280774D1CF05FA38649E23F400F6BAAC37609D6AF9FE5ECA24937DEFA13D09EE13F0A04FC1D6F273EC8375F8D86B9375587DD4752DA5830D6C33407E2196940D7C9BA317EF4DBCA02DA02471D88C607FE611CF61CC9E3040B77E370C1D106607E17527D86A2006E65931EC10F608A7D58324284F7571A9B8DC3E037C5F89A09D7D57093F5C733DEB031ED012C104906F894A5D458A3402E8FDB2EE7516B7434AA12E1260C03AE8366350375000B316BF6FEB0BEE21013A0138CB780E48410AB32D3944DF811BB241D5300F9AC0A1216B40FF85E63A37652880B0029ED7EDA10CA7743B077F5CF7F7E00DCAF4004490049F1ECCC883C0E817E87F30EC",x,2^)^)^) : Next echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("A0158A85FE042B2260F63BD84A8B60C2FF328D7804A3FE624F4623E8D38B560CFCEBA60FCE50AC7F14E1FB43FC5534B6F4D9640959E0A3B0EE77DD1D365531ED09D01F668CD5892DE008AEEE9AFBDBE3D92DC01A193106945D92709FC09244CF60A1F02962BFD76E901C6A0CDB0B89446416ACB91196390894201BF1184E6CC5DEE227B40871DBB213C70B6A186F3818F80D8736D88938090828B02489FB5740FA44241C61909F7D188970044A40E74A170514566B0CE025A4D6118B14B22F876389074413F50C6B0133AAE55C09100C3A5E58D53D0CD2873E38CC8A56245BEF3530189C33D5F4B42517DFFEF19B0C6D4410FF3A43750789D74C04E3C060EB14",x,2^)^)^) : Next echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("B5DDCC1219297B315EEF3D186501139BE4FF4D0C5611D98EC97D07100C30C3B6EE6D69107C161A03075013AD1DF61B1F5839C27D0E0E2B1DB2E1C89E4C6DA245451081AD730DEE84D225280EBC504E60709396080C0F0F2EB9C36EB2921066C600ABE958584C241D0C6FAFB9BA8E922F488D1E1E0EE1D06BDD7C2027FF190D128E4084AF064461C71D0C863281AF81839260DDC8826DE0500FB291D1B3F94504528F140A0274FF306D3260687F389D147F0B480142183AD75EECE3B3F8F5E91F3BAF6027DCA77F63435CAA41080DEED810031A7E0AC76740683B3B7C878C2F23B5175050551305D768002503ACBD09AF96065F1FB8528C52361B43B2AF332B60",x,2^)^)^) : Next echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("DD190052089989217A21D4DFE98422009521A4107BF9C88DD42B9EC470AF0EB16782FFBB7C5A2D06740548740DEB4EE7233ECD285069322702FC394FB31DD87D7EBAB5FC0C46840634B8B48618250C22B01FE67E75068D05103A204744EB094D5860406F6799D1BA298373AC5F24240761AFD18BB874EEEF6EE64E7660CC741AA0681DCBDA347D78F414FC48044582C31A497FCE2CD205EDB02E680E0EF85FF0881CF87207EB966BC3AC2AD08189F875D226FDFD605089C7DC48345813376C21E509AF6CF31F6256E148649CF1BC48945957D292C93F5FC4C0615C8ACB74549FFF0CC306A909C0FC12CC7348333E6EFC72C5FC8C5AA883E712500C3E953C1756",x,2^)^)^) : Next echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("FFFC04BA68F1FF505351528B5D0C8A032C09A9EA625DD3748F3A070E0A060302F816D1E2EB5443A3550501C38BDC97FB176AC3044A7C43FF3307480307F6BAEF912DF4EBE82540230B1B28B002FC721A89C80FAFC2CD25E9C03F69EBBD48B45A595B58340F4E5D932108DE0CF2C9C9762404EB77140C08176C0477620A390913EB561248D20C3B2ED60C93E6A6850345F810F10E4938C43B4341551E4160E613281EB4A6EFB412AF02A6C6AE782426B8320E95F30C7E06B009F53D6C7DFC1D75BD5B3C54218A0A881054261B06974F1002AEF48BAFBD0C91F0390D51F05EAAC3C89620F01A76DC5DEBE5DE6F6B081229D02A680A060E8F9A4BF00E861D6B16D7",x,2^)^)^) : Next echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("06751959403BB8D8900C311F80DFD66159213B1E3B7FC9804C3A2E2C6A026820499AE54C4E2A0AD1AC585690121B8F5E64A1030C3F2CBDE490D802F77D85FC1BB5175E1434833CD07A0814A1F770BCD00ECCDE1F0A2D0E043ADBCF805FB8C8ECA06160087B0D99BA400D4F20BAEB06DA96C10CC007E46FC0E841098F57956359F59A4A1560BD9AB50C06E48EEDFBCB62A78F2415496458FFB50C90C06CC6B0181C28D52722DF683C802C1167902D3F65850BB165B538B709B701B8019E01E88D923089501831A9CE2F1EB85972A106528D833C720F64770903EC107AB1D72C46089C4A844FF2028774B8051A2C433F74484F6E0D43FC5A4BD3EF57CB17D1BEF8",x,2^)^)^) : Next echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("3D1F7DC719298CC7B0327E7FC532DE06CAD950834244FEB8623DB28A1A2DB2EB0D3018AD125C68833C60C064B0720D67DDF181753C2289D08D20120F8B4240828EF7A87619A76E28EF88017F8A1C10885DFF85303C0A744FDF2017604D2820350DA2B54AD875AB54B848590861563D555FFF8438907F7404B001EB681FD5BA80946C0BF35B2B3CF6ADE4C0A1174F188F295BD2471A0F94128F85840C088C7A85C0889191647E58740DF88244CA7A8B57D2DC3605DD74170740850F848CC1CE502328D411B21642C73A3FBCC784AF6A6972181D3DB05DD67220674BA24058346AC250557E00D15E30B01B3C1040412B087C06966784430CFF0C5D1C49A70887EC",x,2^)^)^) : Next echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("A99D9F0BC492D001CADED00C5038182B09400DCD358A942F4DEE05F60E569970924C54CC1F807D2F568E1CC33FA13701BE1184A50F789FD97E6620454DA4E07000A0B1CFD4010484C317B41D60FE5AEEE4A3801C3B05893D90371F71D33A50A3A09EFF4D4E546A0CB30FBFF60674A3A56AF50BA9915B39D90BF4505ED09687FD33D434684F178468B09E0980071B2C72219A3A0E209908448B203ADE5AD464AF5A164E4CBCB277F86368BB3A14B09EC1B02493507DB9908C36B84F340807F0A0823049309DB63F4B99682A9A8AD6A983FFBFD5FFF9077C2388C489C3C1E0ECCA6689D889F9F7D983E10329CA48B4F6FFF3AA89D183E203C1E902F3AB090D9F76",x,2^)^)^) : Next echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("81E61E5051413EF731C0436D8D2DFE08AC39C87602CFAA4D4B15AD8DFC873FC8F3A489C183E0A5090D263020C059581F0C89058F0B035D226B4A8630E0C95ADE22028C542F14DF746F8FB3E710D82F4D10EB1310C16EC09B6E377D09258BAFBE1731132BB6149D198B32590D899314B54BB245AE14981042A584B664C17C109F4BE2B037228A1A8818D9F8B1385613E8F87F2BEB3E89D3E911AAAD3718FC88C358519574F2C4B7F8D72F8943C1F0FC31DB696EB6AE3C347C6B1FBA464739D873D872267543F89309C9F3A67521760DA7DDED4F1B04B85329C629C71609C01E02B5195AD939DA5F9C5D088BDB5F32D4DE29F0745972045D72215E20379770FB0F",x,2^)^)^) : Next echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("CFCBD983E377FB85CAD9E3FD01DE01DF1F4E4F28DBA54ED91F2683EE05EF032C83582778B7C607C7033221AFC8240B5D624C0C4C230B970C403EBC100837B03AC37D1101CAF8B21B1260C2A3A4A67A905849900FDFC00D403E0168B2599927986CEE8EBBBD166DA0E6193D448489FE43B59AC02E5992B10C7C063891ECB2C46230FD53979D24937E380D403110B08DC808F10E1795B28A0069E62C412C64D21BA2C64B845B12D14BB31B826583005509343C8119C978154FB86149C4049E53A4789F1E0AA7085FA648A1430E81C129B4101407F6BDC93D140921D42EE47A1096153F48FF159047D23B1CD3498D5F832B0E06C0C00D7553F4DA3D13CFF67429F0",x,2^)^)^) : Next echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("08F82E2BADBD4F8E090801C6400C0636FB08CB2056045F06C813E2771855280C85541482158306FF77527541B662F48AEF39CBC51EC6EE735434B8190709BAD1957D3B978DE9BCFF8B671D46A73E8B125A30724B2C39768B75FBFF332C0872432C0576172C1B723B077737361ED9B0DD42AC57ADEB2F3113AE7321CF371B30DF6EA2A9CEF810D3F04BEF89C7D733702B79F7E7590D55D5B05063764C775E1700BFEF7F3B35887F3E1955EE01C23B55F4723024AD9D41761F7411FF3519817EF99E16BA1189D031D2F7F76470D9A1553807D5F45823E70A7269F4C5F95835C14D0B374A6DD8118DC280282EF7F7D8B08E46E0F8F527497BF7A583C58A7C38F81E",x,2^)^)^) : Next echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("48753225FDD5865A3DA744283D7E7F210DDE3A03AE04851AC4FC287F7E0F1491A5D9180008FF0F2D2C987C3FE1082574EAEF2B4210393E6A2061E50CCBC1888C54F42958D8127A049D015010A63F90EFA4080BBA450CC80AD3853F0CF192E192C1EF473E916C0DCB5CC44954F892A2E08A229F3142BAC3EDF8A410016AA7F8B60F4C10BF6DAF5010C848974AAF100C4A58035C89C9BDBF6906B9C5B30814502408212510E844DF5F586196DE13A4D594E012B123521FC085EB55888F3DA110A1080EFF7008E5FA5E7DADF73C1A68F26F84E1271713EF740B198B71E77B37966D790A69618061148C7FC441A20915017C0B8090B5613B0E81B0130FF8EF005EF0",x,2^)^)^) : Next echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("DA7BC1C3E0C4750C7DAC0B3320B2817C0CD2BC61147725562458851351189651765D2F127C83A15229540B0FCB781173652244AF491D621635224C8061B86261B9030246F1545952918C94D460FF57CBC924572A1A0E962DD10CC41B8300581DACDC2CF30810DD082AC01362396675AB403CCE0FE060B456A4FBB8683B6067AC8F246A750E2222C71E19D820EB310D0869F130B824741AD25944020CD8065A0C24246FE767B004CCB01C2DB052D46DB520C93010CE7F797807E66063BE39335A200131F50A04980C683C1C540A72580748943F18F711F29220862601464C063B4C460D67E10B2432609D49B9A0E9926623CB04E8F03A39620CFE0306FA896200",x,2^)^)^) : Next echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("3BD87E14926712F0586B2B2025E8EB1256D553CC021336ECBF548E703FE945730A80380ABA947B6BAF040D75EB1101EC89AA0098C166F44F1B16674D9443EC731BCF1A2745581057470F836EC17CA631014B091F230DC342E050339E4FB100B4A044E43D96E766780BA30870851060B4B04365E92F20267CA29FD3EB1F408AD79CFB39D0295A1008A3E32DF029BDA10B5FD85A9C8E80F764A15563CB0CA4835E89E5E08587995D91F0851159A4AB29063CB086206A0886BA89827D67F822F40B2B95B06429653306A430B7C3105234EC74D94328295A44AA808484064890905E29B955AF88B188B3EF5CA80E20A158E40D31926E643E3F648BE8801BF4880099",x,2^)^)^) : Next echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("A2BC7805F7373FF4A3B00E790523633F5BA9C01A5B04A3D015D0E06681727F05F803051D35A2035AD6CA186B01782FC818F0C0E700A59D0E23992C8F8C0949F1420AEF886CD015769EA82E422F84B5AC8F5C3811C65B9C9CC00C24321D8028F5C01A58B59CEB15C4D9F184DD076A66AB5CC4D24D1A092FDDDFB0E905670B10E48BC0160508964FF079064602CCF0BDF07424C07D0DE75557E40BA9374C72E6F8277C765D34A3ED32F4CE208605F850517402359726D1CC017221E6157F41EE72ED0FDE84B40124348976CAEB2034C42DFA6DEC5066223C33742C207664DFD77D7BA3328C75688A2A3C2274221B401CDDEFAF4427C81027750642EB4D0527E4EB",x,2^)^)^) : Next echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("80DDEB476EEB42B03D2D276E06399922221F22EB195FA9E779140F207A0B039CAD377304B5A532700682792A38B4F30C76121ECDBCE4133C90F937F760CFEC5EC30F829A35C70F86E6B6B2BD7C07CB4054860BCF01CFC844756F6A9237137C78F0C6D9ECEB5B0BF946263D37373209BBB0B323E32C150D0E33317260F73CECCA15C1099C64F82FFE403D09AF140DF96A0E070DF471F8DFA10A40C1E00250680D114468558F965F6F8C0107EA339C8B80C824F5D0C176E8751113B8B4E87D0024AC663FD7B2D054C2B04A4B8083874D7359B60A05C072010674B167ECEF753D1D066E3D8C18448D0A1179469E248E0490469E91CDF50A91C492A4EFEF19799381",x,2^)^)^) : Next echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("9453623D9506E086E7E7433D960C3DFD1DE153926A1C7C6374080655ECE4A2902164C017CAD790E74A86C801CE72F64086CFEB7C14CD9C1D601367295214C84DC8C9843DD828C8CE849D98C9141329B0ACCA4479BBBD6A24272F942CB6C0B50078301DE010C03B00067D6A33C9B62498DFDA3F5CA9A124588F04D99012E22D882F042AC856A70104BA78D155987C8F4B802CB8E45E0974E60523E08BA89BFE4F31F83C2B72182C2B7406BD07EBC11B6B8A0EF2092101477FD9650D870A4D41352472342C2436F68DFD740FFEC8752C250239210A108155F7B2077E0D333074E8F804BCA094FF3FBC6194A1AE007024772960211FB7028BFB6A82E9B20F03590C",x,2^)^)^) : Next echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("0A3072CADF40860F9742AF10A92D3A12078392BD088119ED042C0BD96F277A590498DF8D0B245003843721323B8F7617DC7DCA3D0C807513AF685086728344242A201931FFFF9BFBC931DBBE0A24CB7907F7D8C647012D4199F7FE80C2308854F4BFB5F51DF44383287599441DF388440F01414B279AC56E17880FA6FFF249A25ED16A20650065C5B2A254676F2FBEFD36FB2D0F31C08D7C4EF7D981C1B006B59A414AD74B981280449F185F355B613C0F6325CA759E9303AB38341D241190FAB07A0C826404EBA58965D5E76658A35C271AD40C07A1602D7F5513B6888DEC4B9760CD3E8265B00D172020A9011959066B2A153030021B7419E414404075A8FC",x,2^)^)^) : Next echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("DED1689303D5C63B2C4874168039AB2D793785B3F224679F97C0EB2412B240EB11CE8D4D72B180F410E06F1F9C7491F462F40C4C758BD701AB64A90F8C90EEEECC66383F110FB8087E21488B3CBC0D75AC3502407E65B3252C1C190F35A012E7A08447B214AAB3D0134109F019243A0A026A4F80CF3089AD543A2250D63463B19EB064245EC001149360D924973479CE459FAE0053350F74A30903A4CFDC0984BFDC21110161CC4F7E675F3050611826E4845014CA3A25032943EF8CE0215B311065247BC1A0AEE040F3746C27CD02D86500423FD9656065234511C05F6B2E1424EF141C8B48703B53FC9B60500442837CD004390AFF54608130BCD015C6B7DA",x,2^)^)^) : Next echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("56705970BCBF01DE2A200103299E829D8086E2109D102C2167BD006842EF85A92C8DD210D08645A630009EC38E0B5D0A1A83E3C78B70D2D60076D5880C0EC1E8D014F0A243B5BD76C3A6A84C08BF141E1604A911A35403A960C44F8845F7EB6E591A90094C84350280005BCB2370B3EC432D72C8C8ECECEC532DA0C175FD80228E7DE6FAE08AADF7002347177F19B96044244AC5A91BBC9AC28A278A48FF6086603821A164885C2684F70144B0A7101F14C68A8666E965259B08576857A0A27D7F1EA507AAA932BBCA65E4543F647B1C59A59008EBD328A041962119A016A01F8FDE840B9F1A25F72F96A82F60120F1F918675011C200417010638F93E9E5C76",x,2^)^)^) : Next echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("0A00A17E0ABAA240B209F01CF90ED0688E19612B05665F3603AB4BF80C7C66A10C1A0A6C2A7483CA80D2F8EF7CDD46F41D217E4B001F0338E016803C951646BDDD19C5ECF88B283C85168558AB1613AB097366AF398AECAE19081CCC8201AF7C229067B6077C05012D05B0BF194B2ADB02058B218FE4241FA28E287628761042F49C1877668F786790881408237429AE8C5FE4EA7F23D9F6C608C7831783E2F852E4192B5C0BA968ACDB5DC404A84047DE9064091EB15719F58F909E2B78A471754F5A42E50B947B43090D46B57D54147B7859345A468A6764116E911ACC423B21A485C1720585652D6C616A16928F22F468A1784C3E23F4FD6F236040261064",x,2^)^)^) : Next echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("E2E61E3172C086583E022489B2E1C1BA29CD30A3F162CD32F69070081480FE32598241821C04297962D0606F9033140003EB235CE4655817107FFC5D660224E51585C07D0A68CC3A1B9CC06959081A25B68F0B04020F3D50668C7736402914B2EC697804E30F8F97AF78187DCBB9AA525FD637CD3CCEC6879510E801D318C6CC451B29C69A31C35CA05902CAE5044DD17D3C6158300321E8E209D99ECFEB1E66E80789C776AE6C9B601FFF23FF1D907F11DA217DD907E4087CD2EB4D832CD21624B6A35B2406DC475CF50E363D46EB30A2F2E8D6762D19047E182D20740C13B4BA2736DC1702E30C6CCC95DEDC1189314ECA054580605D1ADC117E70B586E22A",x,2^)^)^) : Next echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("B383292EDBA4AD8994FAF1089D1308564D382C0E9B06250F8CA584148B2B91E041EE505F2D79F70DAC872F3DC31228020B55E04AF40E0D41C69AE03DE8BB60B00EACB14BBBE83DE8331CF64606F4E8087BFCC26447707EABEB120C8B107D84ADFDE30209D38906110497C645F30037EB8765D8397C408B6CFA5F8156B9AF077B217217B0E6B00D54030B614DB7C15FAC9137EB5A833EA39E508A41EC3C8B0842786DE8162D2266503266B5176654E86E0BB60A0375257D01F1CB1EC6873C1668CBB1EB0A0B624613B48A24D652F9600CE9C21F10FFED700DB328B248F007871D83FCEAF801F0BEE2FE73C4804092F0B10A81AE3A42816A4447F0B402668C21F0",x,2^)^)^) : Next echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("0609A225D479C8F0F089A6093710802F9FB5D9429A260C961C347411B6218962E8C90C25EC8980C993743626830290E7A10875088484AF54FC7095091C908ABF3353420C0FBF04E05D09B998DD07DFA124260BE0EEDF08840EE29026FCF8F889DE57A1A7F8F8FC4847FC0ED05B969EE0F8DAF8E2782CA45B092F5FB0A7C88C54E76B780382D017EE22BFFC2C510FA22F90685C81C480117BDF3F8635D46C4CAD75582567D00B4B7F800DE600786A02D82CA49A3040CA80BB466F488E0C8F58A131B92A6E6F40137C19041F7FF35153D5EA100ED0A3C32006FBF3EB232220EDF40A056804D857160202E15C6A11112C80230BAF6A9299E32541856BB4C4B100D8",x,2^)^)^) : Next echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("2C58303F4DB605C8C4EF84835553568F0855D0EEC92A13575A506A086552312C721B9167AA57255B15715348D1C896EF08117C8E8068DBB8D48173C48B670A72C62C988CF5B4FFB7F45FA59E44AD0F570309E7BB2B94A371267E11A10BBF01EEF7C129C7D7092778100A31AA7BAC0C1C8DB8A00557A88EC592515D4420C6802AF687770BE0037E2E8D10558332C749F4012F1C4639AA738CC70BACD11E1DFB04D1703B8DE2AF2F96C5BC8B3D047521EAB5B2232FE1860651F05E8311276BC57BD942427509CD662F65ABCCC556EE4409025B0AA39F4F280906B9044231D8F4E0C75C24C5E610020F9545E70E02C186A80C751D69CC09327CACD5F40F8E5D1517",x,2^)^)^) : Next echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("3113CB3634D8E09045B2C183B501140A027406B3E7AB8976D8381A0307DE3B907001AB11C49D33050F8C9D78250102F0267B9F75D6AD070F8CDD64A4F0B42F65CB6F54E22B21017B80495C91F06631646C17587D71926B3DB2187340B0E84C6898687146C022DD0C7C4B06E4B0CDE0E03A4B02B3E80DFAB957B6E8DAAEAD7DE72F21D801F064256265FBBE0F12823CB80C5D008A0BCD78C2688D994C1A0C2C4BD32CEC7ED80CDC241F0CB2D8ECBEDC20E41ED9ECCD69661E1A32C92103DCDCD896D02CC90C0C1AE231A9116EF81C22EAB4A4AFCD08AF4157A0784CE5C771091C4C6AB0108BE27F1DCC9DDA1080E3F41A80B808550B4EEA9235D94991297879F4",x,2^)^)^) : Next echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("0746D647F06DF8E91AC31F982C1124FA720833E054CD8840779049E210AEC108DBC5DC1908051D5F6B624036C8F23164FCFC0E23B9804332E00174897608EC506C61EB675E129C011C89EAF4102103C600FC85FCBBC9C8C8FC11FC8C6A5B58326654F48814D00DB0886F86B91A88DF3A6E2FFCF2AEB8FE95C85B4206246F780F7C24433224747032244332686CA043322443D0ECD80E603124E40FB8F540761302C51F04B264C82E19F6D44FF886E4B203FF2FB8E848866CC80FDC4FF4FA074BC55AB94985F689F0BF74438C90818D5603BFFC4729F274E0BF51F01D8A0646866C47FEC1FECA88470B2DABDAB9EFEE531EFE85DEFE83C7048D83FFFE0089DA83",x,2^)^)^) : Next echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("51F7D221D083C104EA5277851500895FFC0781F9F27DE37F3A7719EBD583E9044508722341051DB9BBAE3F1741EB1484C98306610A8807138C26BADB6675F28080C1FF62081F60C9DC28000700FFFF031546504320312E302E36205B323030322F30C77FFBFF342F32335D20666F7220693338152D2057494E333290622D47EECE0607A84E40184028DDB3CDF20330A8E8341798220F22CD02452EB827720402FF8F57967C0803B72F63206563686F2E9E2BD5FE0007436F6D53700BBF2165F6B9FFF703217B646F776E7D00B516420416F623DB1E757014CA2B6C65667416EE8734CDE107077269676817C407699AF905054D4F55536C9066BB1D0F81150101",x,2^)^)^) : Next echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("2011F7F617762581A857524954452D43003E188EECC35E02CAC14600511266DFBEB0AD0081824745543E5854007CDB0ED2741703030820609013EC7F90A60909435552534F524F4646196383856CAE881D4E18CB7EB1BFB081D1534C4545501503E981AC55B7103384583414DB5ED8AF59001382AE564564496385C687AC2B1744454C4C0B33B0DB1FB24317524541444B45475B82ACC84A0CB617242530D685E47F5B656E7465725D008C2C50341692A6FB535300A51809094AFE85F06184C7824A302C3000DB820BE1DDC2DC133B00F0829EB70B6BD56C6E76124CEA090AAA046EFC616E736973742B6E674C6166BB3DD8289E582903A800B297AD1DC81B03",x,2^)^)^) : Next echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("2A182B40AEB0D20B87086B696E656CC10F90FFDF7E1347657444E96B467265655370616365457841DBFF853D928451204E6F207761792074066761BBF0CB6574686520636F2B6F6C0768331636646D64066F282F61FBDDC32B73636F6E20627566668F2065C8FF0F72666F778D848E738F744E759176929304C2A5C6437A9A542486FDB123393213D6C10F07544F424A0861082DB25478E242E1B7761E41A49864206F6620090DBEBCF0F6707469B14164641D7353746B000D0A4785C4C25D6F78CD72DB826E0371030872F84899A633B76D0728730358A814B61F84000E52756ED36D817FCA0C2C7672D37F062061742030B28BEC9278755F016FE46BFF870B",x,2^)^)^) : Next echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("2D3231343734383336031F02D6FF068730315E343536373839414243511D49A5EC4608412910C0C04E84EF0420CDA800A1D71C45F720055080113AC8A822199051001520A3002A40460154818C02A80219055005320AA00A64144015C828802A9051005420A300A840460150818C02A00219054005320A800A64140015C828002A9051015420A302A840460550818C0AA002191440053228800A64510015C8A3002A903C5005611374B7049203C89438B8B639612BB9CC1F44B2A6699A6E5403647C90A09AA6699AB0BCC8D8ECFCB24DB36C0CB3203044B35BA66B06EC640B748803ACCDB2699AC0DCF810B42840344DD334506888A8B869964DD3CCE000B518",x,2^)^)^) : Next echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("30B6699AA64858707888B567344DD75D980BA803BCD4ECA6E9BAD7FC3BF334034454B014959564EF0392722A02B0044336648300141328910D0A730F03000884C0DC3C13032A002915015F1149A22AE0FFCD506014A20400014765744C617374F61FA1202E01437265617465500B1BF68FFD63657373411D45786974436F641413EEFFDB76576110462C53696E676C654F626A65637438F62A08F86C6F73654819358280BF7D6E7669306E6D656E74532A0878A77B4D63FF14E67C184C6962726172793D5641DEB5F2657273697A1B4C6F61645410F0669088C0C9A78DAA73C7ACA14331375641744DAC0F7D9BECF64E756D62484F661775A2427574745E1692",x,2^)^)^) : Next echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("CD0E2F530F437537D7DAD67CDE50CFE68319496E5BEBB67708616C697A197209630A2B634C59DB661ACC7460154CB2ED952D43762B44655A7416D8EB9EB07154680664B5850107765B7B666F155310010F104F42B695CD0E4E1BE71770372534DCE4457660734C5265B905363026126581BD00B60D6C721BA1030B593757D6654513B13D9BB54F1114EE466912411DEF368449530A6570B81F64632C8C19515EBB5825E39192A1A8A4EC3DB6C11AD7756C6A4E616D6E132D6C6F96481156628B4160DB61ADEB350C4C0A6BBB16F626BC3A1F0984D963E31D0715266903D846B09F0D471C54797065C9BD1146F6F07475702B41DADCD8DD6BDD6D6D0D4C4A3C59",x,2^)^)^) : Next echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("556E681D1B0644C0649B4EBBA7D99C66FB6DA04DE6616772240C1BCF6FD63750459AFF13F24C0105E0000F010B010237006E1AEC3BB9EC03180410008021400B0FE99AED020604013C04D004E4FBDE640C0304251033106ED5B2D90900E181076229B842C09908B6F9AB40D62E74657874C86D905C08C00BEB6C2082ED1676342E649F610BF006FB5E9B0BFB8B72A5402E6257BE0BACEBCE174490738027692063EFCD50F3FB4F7AEEECD108185EFBC0277F6F4A9A0A82521B00D2C304000000800000400200FF00000000000000000060BE15B044008DBEEB5FFBFF57EB0B908A064688074701DB75078B1E83EEFC11DB72EDB80100000001DB75078B1E83EE",x,2^)^)^) : Next echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("FC11DB11C001DB73EF75098B1E83EEFC11DB73E431C983E803720DC1E0088A064683F0FF747489C501DB75078B1E83EEFC11DB11C901DB75078B1E83EEFC11DB11C975204101DB75078B1E83EEFC11DB11C901DB73EF75098B1E83EEFC11DB73E483C10281FD00F3FFFF83D1018D142F83FDFC760F8A02428807474975F7E963FFFFFF908B0283C204890783C70483E90477F101CFE94CFFFFFF5E89F7B92E0300008A07472CE83C0177F7803F0575F28B078A5F0466C1E808C1C01086C429F880EBE801F0890783C70588D8E2D98DBE00C004008B0709C0743C8B5F048D843000E0040001F35083C708FF963CE00400958A074708C074DC89F95748F2AE55FF",x,2^)^)^) : Next echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("9640E0040009C07407890383C304EBE1FF9650E004008BAE44E004008DBE00F0FFFFBB0010000050546A045357FFD58D879F01000080207F8060287F585054505357FFD558618D4424806A0039C475FA83EC80E9A82AFBFF000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000",x,2^)^)^) : Next echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("00000000000000000000000060F004003CF004000000000000000000000000006DF0040058F00400000000000000000000000000000000000000000078F0040086F0040096F00400A6F00400B4F00400C2F0040000000000D0F00400000000004B45524E454C33322E444C4C007573657233322E646C6C0000004C6F61644C69627261727941000047657450726F634164647265737300005669727475616C50726F7465637400005669727475616C416C6C6F6300005669727475616C467265650000004578697450726F636573730000004D657373616765426F784100000000",x,2^)^)^) : Next echo ReBin.Close )>"%tmp%\Arquivotemp.vbs" CScript "%tmp%\Arquivotemp.vbs" //nologo Del "%tmp%\Arquivotemp.vbs" 2>&1 popd Exit/b

créditos -> SmartGenius