Connexion
Qui est en ligne ?
Il y a en tout 2 utilisateurs en ligne :: 0 Enregistré, 0 Invisible et 2 Invités Aucun
Le record du nombre d'utilisateurs en ligne est de 76 le Ven 22 Nov 2024, 12:39
Sujets les plus vus
Derniers sujets
[BAT/EXE] Mascor couleurs dans le batch
Page 1 sur 1
[BAT/EXE] Mascor couleurs dans le batch
exemple
Mascor 10 25 "hello"
Mascor 10 25 "hello"
- Code:
@echo off
setlocal enableextensions enabledelayedexpansion
call:Arquivohex
Rem Votre script ici, le fichier generé va dans le repertoire temp
Mascor.exe 28 22
echo Delmar Grande
Mascor.exe 21 25
echo forum BBat --^> www.bbat.forumeiros.com
Mascor.exe 10 25
pause
::Creation de l'exe
:Arquivohex
pushd "!temp!"
(
echo On Error Resume Next
echo Set ReBin = CreateObject^("Scripting.FileSystemObject"^).OpenTextFile^("Mascor.exe", 2, True^)
echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("4D5A90000300000004000000FFFF0000B800000000000000400000000000000000000000000000000000000000000000000000000000000000000000800000000E1FBA0E00B409CD21B8014CCD21546869732070726F6772616D2063616E6E6F742062652072756E20696E20444F53206D6F64652E0D0D0A2400000000000000504500004C010500BBDCC95000180000FC010000E00007030B010238000C0000001400000002000020120000001000000020000000004000001000000002000004000000010000000400000000000000006000000004000076E70000030000000000200000100000000010000010000000000000100000000000000000000000",x,2^)^)^) : Next
echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("0050000030030000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000002E74657874000000B40A000000100000000C000000040000000000000000000000000000600000602E6461746100000040000000002000000002000000100000000000000000000000000000400000C02E7264617461000040010000003000000002000000120000000000000000000000000000400000402E62737300000000B000000000400000",x,2^)^)^) : Next
echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("0000000000000000000000000000000000000000800000C02E6964617461000030030000005000000004000000140000000000000000000000000000400000C0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000",x,2^)^)^) : Next
echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000",x,2^)^)^) : Next
echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("5589E583EC18895DF88B550831DB8975FC8B0231F68B003D910000C077433D8D0000C0725BBE01000000C704240800000031C089442404E80409000083F801746C85C0742AC7042408000000FFD0BBFFFFFFFF89D88B75FC8B5DF889EC5DC204003D930000C074BD3D940000C074BB89D88B75FC8B5DF889EC5DC204008D76003D050000C075E8C704240B00000031F689742404E8A708000083F801743485C074CDC704240B000000FFD0EBA1C7042408000000BB01000000895C2404E87E08000085F67488E8B5030000BBFFFFFFFFEB81C704240B000000B901000000BBFFFFFFFF894C2404E854080000E962FFFFFFEB0D90909090909090909090909090",x,2^)^)^) : Next
echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("5589E55383EC248D5DF8C7042400104000E80A09000083EC04E862030000C745F800000000B8004040008D55F4895C24108B0D002040008944240489542408894C240CC7042404404000E821080000A11040400085C07458A3102040008B15F450400085D20F858B00000083FAE07420A110404000894424048B1DF45040008B4B30890C24E8D60700008B15F450400083FAC0741B8B1D10404000895C24048B0DF45040008B5150891424E8B0070000E89B0700008B1D102040008918E88E02000083E4F0E8660700008B08894C24088B150040400089542404A104404000890424E8A900000089C3E832070000891C24E83A080000894424048B15F4504000",x,2^)^)^) : Next
echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("8B4210890424E8550700008B15F4504000E955FFFFFF8D76008DBC27000000005589E583EC08C7042401000000FF15EC504000E8C8FEFFFF908DB426000000005589E583EC08C7042402000000FF15EC504000E8A8FEFFFF908DB42600000000558B0D0451400089E55DFFE18D742600558B0DF850400089E55DFFE1909090905589E55DE9C7030000909090909090905589E583EC2883E4F0B80000000083C00F83C00FC1E804C1E0048945E08B45E0E8DB050000E8760200008B450C83C0048B00890424E8F60600008945F88B450C83C0088B00890424E8E30600008945F4C70424F5FFFFFFE85407000083EC048945F0837D0803757E8B450C83C004C744",x,2^)^)^) : Next
echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("2404003040008B00890424E8A006000085C074628B45F88B55F489C189D009C80FB7C0894424048B45F0890424E81E07000083EC08C745EC000000008B450C83C0048B00890424E87406000085C0741B8B450C83C0088B00890424E86006000085C07407C745EC010000008B55EC891424E82A060000C7042403304000E80E060000C745FC00000000817DFCFE0000007F698B45FC0FB7C0894424048B45F0890424E8A906000083EC088B45FC89442404C7042407304000E8C30500008B45FC8945E88B55E88955E4837DE40079048345E40F8B45E4C1F804C1E0048B55E829C289D083F80F750CC704240B304000E88C0500008D45FCFF00EB8EC74424040F",x,2^)^)^) : Next
echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("0000008B45F0890424E84206000083EC08C704240B304000E863050000C7042410304000E857050000C7042434304000E84B050000C7042400000000E85F05000090909090909090909090909090909055B94031400089E5EB148DB6000000008B51048B0183C10801820000400081F94031400072EA5DC390909090909090905589E5DBE35DC39090909090909090905589E583EC08A1202040008B0885C97426EB0D90909090909090909090909090FF108B0D202040008B51048D4104A32020400085D275E9C9C38DB426000000005589E55383EC04A1A01A400083F8FF742985C089C3741389F68DBC2700000000FF149DA01A40004B75F6C70424901440",x,2^)^)^) : Next
echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("00E85AFDFFFF5B5B5DC38B0DA41A400031C085C9EB0A408B1485A41A400085D275F4EBBD8DB6000000008DBF000000005589E55383EC04A12040400085C07536A1A01A4000BB01000000891D2040400083F8FF742585C089C3740F908D742600FF149DA01A40004B75F6C7042490144000E8EAFCFFFF5B5B5DC38B0DA41A400031C085C9EB0A408B1485A41A400085D275F4EBC190909090909090909090909055A17040400089E55D8B4804FFE189F655BA4200000089E5530FB7C083EC64895424088D55A831DB89542404890424FF15C8504000BA1F000000B90100000083EC0C85C07507EB4601C94A780E807C2AA84175F409CB01C94A79F2833B3C7507",x,2^)^)^) : Next
echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("89D88B5DFCC9C3B984304000BAEA000000894C240C89542408C70424B1304000B8D030400089442404E892020000B8FC304000BBE40000008944240C895C2408EBD78DB426000000008DBC27000000005589E557565381ECCC0000008B0D7040400085C974088D65F45B5E5F5DC3C7459841414141A1603040008D7598C7459C41414141C745A0414141418945B8A164304000C745A441414141C745A8414141418945BCA168304000C745AC41414141C745B0414141418945C0A16C304000C745B4414141418945C4A1703040008945C8A1743040008945CCA1783040008945D0A17C3040008945D40FB70580304000668945D8893424FF15C45040000FB7C0",x,2^)^)^) : Next
echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("83EC0485C0898544FFFFFF0F853B010000C704243C000000E8C302000085C089C30F8459010000FC89C78B8544FFFFFFB90F000000F3ABC74304F0194000B901000000C74308A0154000A140404000C7033C0000008B1544404000C7432800000000894314A1302040008953188B153420400089431CA150404000895320C74330FFFFFFFF89432C8B153C204000A138204000895338BA1F00000089433489F689D821C883F80119C0242001C9044188842A48FFFFFF4A79E7A160304000898568FFFFFFA16430400089856CFFFFFFA168304000898570FFFFFFA16C304000898574FFFFFFA170304000898578FFFFFFA17430400089857CFFFFFFA178304000",x,2^)^)^) : Next
echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("894580A17C3040008945840FB70580304000668945888D8548FFFFFF890424FF15BC5040000FB7F883EC0485FF754231D285D2751E891C24E893010000893424FF15C450400083EC040FB7C0E85FFDFFFF89C3891D704040008D4304A3604040008D4308A3804040008D65F45B5E5F5DC389F8E838FDFFFF39D889FA75B1EBB1E86B01000090909090909090909090905189E183C1083D00100000721081E9001000008309002D00100000EBE929C183090089E089CC8B088B4004FFE09090905589E583EC188B4514894424108B45108944240C8B450C894424088B450889442404A1F450400083C040890424E81E010000A1F450400083C040890424E8FE00",x,2^)^)^) : Next
echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("0000E8E9000000909090909090909090FF25EC50400090900000000000000000FF25F050400090900000000000000000FF25E450400090900000000000000000FF252451400090900000000000000000FF25E850400090900000000000000000FF25FC50400090900000000000000000FF25E050400090900000000000000000FF252051400090900000000000000000FF252C51400090900000000000000000FF250C51400090900000000000000000FF252851400090900000000000000000FF250851400090900000000000000000FF251851400090900000000000000000FF251C51400090900000000000000000FF250051400090900000000000000000",x,2^)^)^) : Next
echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("FF251051400090900000000000000000FF251451400090900000000000000000FF25D450400090900000000000000000FF25C050400090900000000000000000FF25CC50400090900000000000000000FF25D050400090900000000000000000FF25C850400090900000000000000000FF25C450400090900000000000000000FF25BC504000909000000000000000005589E55DE9E7F7FFFF90909090909090FFFFFFFF901A400000000000FFFFFFFF0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000",x,2^)^)^) : Next
echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000",x,2^)^)^) : Next
echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("FFFFFFFF00000000000000000000000000400000000000000000000000000000B01A400000000000000000000000000000000000FFFFFFFF00000000FFFFFFFF000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000",x,2^)^)^) : Next
echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000",x,2^)^)^) : Next
echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("2F3F00636C7300256420000A000000000A446967697465204D6173636F72205B6E756D65726F5D205B6E756D65726F5D200A00002025254552524F524C4556454C2525203D205B6E756D65726F206465203020617465203235355D0A000000002D4C49424743435733322D45482D322D534A4C4A2D475448522D4D494E475733320000007733325F7368617265647074722D3E73697A65203D3D2073697A656F66285733325F45485F534841524544290025733A25753A206661696C656420617373657274696F6E20602573270A00002E2E2F2E2E2F6763632F6763632F636F6E6669672F693338362F7733322D7368617265642D7074722E63000047657441",x,2^)^)^) : Next
echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("746F6D4E616D6541202861746F6D2C20732C2073697A656F662873292920213D2030000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000",x,2^)^)^) : Next
echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("405000000000000000000000C4520000BC50000064500000000000000000000024530000E05000000000000000000000000000000000000000000000000000003451000040510000505100005C5100006C5100007C510000985100000000000000000000B8510000C8510000D8510000E8510000FC51000008520000105200001C52000028520000305200003C520000445200004C52000058520000645200006C5200007852000084520000905200009C52000000000000000000003451000040510000505100005C5100006C5100007C510000985100000000000000000000B8510000C8510000D8510000E8510000FC51000008520000105200001C520000",x,2^)^)^) : Next
echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("28520000305200003C520000445200004C52000058520000645200006C5200007852000084520000905200009C52000000000000010041646441746F6D4100009B004578697450726F63657373000000AF0046696E6441746F6D4100DC0047657441746F6D4E616D65410000820147657453746448616E646C650000A702536574436F6E736F6C6554657874417474726962757465000000DF02536574556E68616E646C6564457863657074696F6E46696C74657200000027005F5F6765746D61696E61726773003C005F5F705F5F656E7669726F6E00003E005F5F705F5F666D6F64650000000050005F5F7365745F6170705F747970650000000079005F63",x,2^)^)^) : Next
echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("6578697400000000E9005F696F6200005E015F6F6E6578697400000084015F7365746D6F64650000150261626F7274001C02617465786974000000001E0261746F6900002A02657869740000300266666C757368000000003902667072696E74660000003F0266726565000072026D616C6C6F63000000007F027072696E74660000000090027369676E616C000000009902737472636D7000000000AE0273797374656D00000000005000000050000000500000005000000050000000500000005000004B45524E454C33322E646C6C000000001450000014500000145000001450000014500000145000001450000014500000145000001450000014500000",x,2^)^)^) : Next
echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("1450000014500000145000001450000014500000145000001450000014500000145000006D73766372742E646C6C000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000",x,2^)^)^) : Next
echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("2E66696C650000000F000000FEFF00006701637274312E63000000000000000000000000000000000400000000000000010020000301000000000000000000000000000000000000000000001E000000000100000100200003000000000032000000200200000100200002000000000042000000400200000100200002005F61746578697400600200000100200002005F5F6F6E65786974700200000100200002002E74657874000000000000000100000003017C02000026000000000000000000000000002E64617461000000000000000200000003010000000000000000000000000000000000002E627373000000000000000004000000030108000000",x,2^)^)^) : Next
echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("00000000000000000000000000002E66696C6500000019000000FEFF0000670163727473747566662E6300000000000000000000000055000000800200000100200002010000000000000000000000000000000000002E74657874000000800200000100000003010900000001000000000000000000000000002E64617461000000000000000200000003010000000000000000000000000000000000002E62737300000000100000000400000003010000000000000000000000000000000000002E66696C6500000024000000FEFF000067016D61696E2E630000000000000000000000005F6D61696E000000900200000100200002002E74657874000000",x,2^)^)^) : Next
echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("90020000010000000301B10100001A000000000000000000000000002E64617461000000000000000200000003010000000000000000000000000000000000002E62737300000000100000000400000003010000000000000000000000000000000000002E72646174610000000000000300000003015D00000000000000000000000000000000002E66696C650000002C000000FEFF00006701435254676C6F622E630000000000000000002E74657874000000500400000100000003010000000000000000000000000000000000002E64617461000000000000000200000003010400000000000000000000000000000000002E6273730000000010000000",x,2^)^)^) : Next
echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("0400000003010000000000000000000000000000000000002E66696C6500000034000000FEFF00006701435254666D6F64652E6300000000000000002E74657874000000500400000100000003010000000000000000000000000000000000002E64617461000000100000000200000003010000000000000000000000000000000000002E62737300000000100000000400000003010400000000000000000000000000000000002E66696C650000003C000000FEFF000067017478746D6F64652E630000000000000000002E74657874000000500400000100000003010000000000000000000000000000000000002E646174610000001000000002000000",x,2^)^)^) : Next
echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("03010400000000000000000000000000000000002E62737300000000200000000400000003010000000000000000000000000000000000002E66696C6500000046000000FEFF0000670170736575646F2D72656C6F632E63000000000000000065000000500400000100200002010000000000000000000000000000000000002E74657874000000500400000100000003012800000003000000000000000000000000002E64617461000000200000000200000003010000000000000000000000000000000000002E62737300000000200000000400000003010000000000000000000000000000000000002E66696C6500000051000000FEFF000067014352",x,2^)^)^) : Next
echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("545F667031302E6300000000000000005F66707265736574800400000100200002010000000000000000000000000000000000000000000080000000800400000100200002002E74657874000000800400000100000003010700000000000000000000000000000000002E64617461000000200000000200000003010000000000000000000000000000000000002E62737300000000200000000400000003010000000000000000000000000000000000002E66696C650000005F000000FEFF000067016763636D61696E2E63000000000000000000000000008A00000020000000040000000300702E30000000000020000000020000000300000000009700",x,2^)^)^) : Next
echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("00009004000001002000020100000000000000000000000000000000000000000000AA000000D00400000100200002005F5F5F6D61696E00300500000100200002002E74657874000000900400000100000003010401000011000000000000000000000000002E64617461000000200000000200000003010400000001000000000000000000000000002E62737300000000200000000400000003011000000000000000000000000000000000002E66696C650000001A010000FEFF0000670100000000BD000000000000000000000000002E74657874000000A00500000100000003010000000000000000000000000000000000002E646174610000003000",x,2^)^)^) : Next
echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("00000200000003010000000000000000000000000000000000002E627373000000003000000004000000030102000000000000000000000000000000000000000000D10000006000000003000000030000000000E2000000A00500000100200003010000000000000000000000000000000000000000000006010000B0050000010020000300000000001B01000040000000040000000300000000002E010000300000000200000003000000000039010000500000000400000003000000000046010000380000000200000003000000000051010000500600000100200002002E74657874000000A0050000010000000301E50200002C000000000000000000",x,2^)^)^) : Next
echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("000000002E64617461000000300000000200000003011000000000000000000000000000000000002E62737300000000400000000400000003012000000000000000000000000000000000002E7264617461000060000000030000000301C3000000000000000000000000000000000070726F626500000096080000010000000600646F6E6500000000AD0800000100000006002E74657874000000900800000100000003012D00000000000000000000000000000000002E64617461000000400000000200000003010000000000000000000000000000000000002E6273730000000060000000040000000301000000000000000000000000000000000000",x,2^)^)^) : Next
echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("2E74657874000000C00800000100000003010000000000000000000000000000000000002E64617461000000400000000200000003010000000000000000000000000000000000002E6273730000000060000000040000000301000000000000000000000000000000000000000000006D010000C00800000100200002010000000000000000000000000000000000002E74657874000000C00800000100000003014700000005000000000000000000000000002E64617461000000400000000200000003010000000000000000000000000000000000002E62737300000000600000000400000003010000000000000000000000000000000000002E746578",x,2^)^)^) : Next
echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("74000000100900000100000003002E64617461000000400000000200000003002E62737300000000600000000400000003002E69646174612437E80200000500000003002E69646174612435F40000000500000003002E69646174612434780000000500000003002E69646174612436080200000500000003002E74657874000000100900000100000003002E64617461000000400000000200000003002E62737300000000600000000400000003002E69646174612437E00200000500000003002E69646174612435EC0000000500000003002E69646174612434700000000500000003002E69646174612436E80100000500000003002E74657874000000",x,2^)^)^) : Next
echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("200900000100000003002E64617461000000400000000200000003002E62737300000000600000000400000003002E69646174612437F80200000500000003002E69646174612435040100000500000003002E69646174612434880000000500000003002E69646174612436300200000500000003002E74657874000000200900000100000003002E64617461000000400000000200000003002E62737300000000600000000400000003002E69646174612437EC0200000500000003002E69646174612435F80000000500000003002E696461746124347C0000000500000003002E69646174612436100200000500000003002E7465787400000020090000",x,2^)^)^) : Next
echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("0100000003002E64617461000000400000000200000003002E62737300000000600000000400000003002E69646174612437E40200000500000003002E69646174612435F00000000500000003002E69646174612434740000000500000003002E69646174612436FC0100000500000003002E74657874000000300900000100000003002E64617461000000400000000200000003002E62737300000000600000000400000003002E69646174612437D80200000500000003002E69646174612435E40000000500000003002E69646174612434680000000500000003002E69646174612436C80100000500000003002E746578740000004009000001000000",x,2^)^)^) : Next
echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("03002E64617461000000400000000200000003002E62737300000000600000000400000003002E69646174612437180300000500000003002E69646174612435240100000500000003002E69646174612434A80000000500000003002E69646174612436840200000500000003002E74657874000000500900000100000003002E64617461000000400000000200000003002E62737300000000600000000400000003002E69646174612437DC0200000500000003002E69646174612435E80000000500000003002E696461746124346C0000000500000003002E69646174612436D80100000500000003002E74657874000000600900000100000003002E64",x,2^)^)^) : Next
echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("617461000000400000000200000003002E62737300000000600000000400000003002E69646174612437F00200000500000003002E69646174612435FC0000000500000003002E69646174612434800000000500000003002E696461746124361C0200000500000003002E74657874000000700900000100000003002E64617461000000400000000200000003002E62737300000000600000000400000003002E69646174612437D40200000500000003002E69646174612435E00000000500000003002E69646174612434640000000500000003002E69646174612436B80100000500000003002E74657874000000800900000100000003002E6461746100",x,2^)^)^) : Next
echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("0000400000000200000003002E62737300000000600000000400000003002E69646174612437140300000500000003002E69646174612435200100000500000003002E69646174612434A40000000500000003002E69646174612436780200000500000003002E74657874000000900900000100000003002E64617461000000400000000200000003002E62737300000000600000000400000003002E69646174612437200300000500000003002E696461746124352C0100000500000003002E69646174612434B00000000500000003002E696461746124369C0200000500000003002E74657874000000A00900000100000003002E646174610000004000",x,2^)^)^) : Next
echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("00000200000003002E62737300000000600000000400000003002E69646174612437000300000500000003002E696461746124350C0100000500000003002E69646174612434900000000500000003002E69646174612436440200000500000003002E74657874000000B00900000100000003002E64617461000000400000000200000003002E62737300000000600000000400000003002E696461746124371C0300000500000003002E69646174612435280100000500000003002E69646174612434AC0000000500000003002E69646174612436900200000500000003002E74657874000000C00900000100000003002E64617461000000400000000200",x,2^)^)^) : Next
echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("000003002E62737300000000600000000400000003002E69646174612437FC0200000500000003002E69646174612435080100000500000003002E696461746124348C0000000500000003002E696461746124363C0200000500000003002E74657874000000D00900000100000003002E64617461000000400000000200000003002E62737300000000600000000400000003002E696461746124370C0300000500000003002E69646174612435180100000500000003002E696461746124349C0000000500000003002E69646174612436640200000500000003002E74657874000000E00900000100000003002E6461746100000040000000020000000300",x,2^)^)^) : Next
echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("2E62737300000000600000000400000003002E69646174612437100300000500000003002E696461746124351C0100000500000003002E69646174612434A00000000500000003002E696461746124366C0200000500000003002E74657874000000F00900000100000003002E64617461000000400000000200000003002E62737300000000600000000400000003002E69646174612437F40200000500000003002E69646174612435000100000500000003002E69646174612434840000000500000003002E69646174612436280200000500000003002E74657874000000000A00000100000003002E64617461000000400000000200000003002E627373",x,2^)^)^) : Next
echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("00000000600000000400000003002E69646174612437040300000500000003002E69646174612435100100000500000003002E69646174612434940000000500000003002E696461746124364C0200000500000003002E74657874000000100A00000100000003002E64617461000000400000000200000003002E62737300000000600000000400000003002E69646174612437080300000500000003002E69646174612435140100000500000003002E69646174612434980000000500000003002E69646174612436580200000500000003002E66696C650000002A010000FEFF0000670166616B650000000000000000000000000000686E616D65000000",x,2^)^)^) : Next
echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("64000000050000000300667468756E6B0000E00000000500000003002E74657874000000200A00000100000003010000000000000000000000000000000000002E64617461000000400000000200000003010000000000000000000000000000000000002E62737300000000600000000400000003010000000000000000000000000000000000002E69646174612432140000000500000003011400000003000000000000000000000000002E69646174612435DC0000000500000003010400000000000000000000000000000000002E69646174612434600000000500000003010400000000000000000000000000000000002E66696C6500000069010000",x,2^)^)^) : Next
echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("FEFF0000670166616B6500000000000000000000000000002E74657874000000200A00000100000003010000000000000000000000000000000000002E64617461000000400000000200000003010000000000000000000000000000000000002E62737300000000600000000400000003010000000000000000000000000000000000002E69646174612434B40000000500000003010400000000000000000000000000000000002E69646174612435300100000500000003010400000000000000000000000000000000002E69646174612437240300000500000003010B00000000000000000000000000000000002E74657874000000200A000001000000",x,2^)^)^) : Next
echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("03002E64617461000000400000000200000003002E62737300000000600000000400000003002E69646174612437C00200000500000003002E69646174612435D40000000500000003002E69646174612434580000000500000003002E69646174612436980100000500000003002E74657874000000300A00000100000003002E64617461000000400000000200000003002E62737300000000600000000400000003002E69646174612437AC0200000500000003002E69646174612435C00000000500000003002E69646174612434440000000500000003002E69646174612436400100000500000003002E74657874000000400A00000100000003002E64",x,2^)^)^) : Next
echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("617461000000400000000200000003002E62737300000000600000000400000003002E69646174612437B80200000500000003002E69646174612435CC0000000500000003002E69646174612434500000000500000003002E696461746124366C0100000500000003002E74657874000000500A00000100000003002E64617461000000400000000200000003002E62737300000000600000000400000003002E69646174612437BC0200000500000003002E69646174612435D00000000500000003002E69646174612434540000000500000003002E696461746124367C0100000500000003002E74657874000000600A00000100000003002E6461746100",x,2^)^)^) : Next
echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("0000400000000200000003002E62737300000000600000000400000003002E69646174612437B40200000500000003002E69646174612435C80000000500000003002E696461746124344C0000000500000003002E696461746124365C0100000500000003002E74657874000000700A00000100000003002E64617461000000400000000200000003002E62737300000000600000000400000003002E69646174612437B00200000500000003002E69646174612435C40000000500000003002E69646174612434480000000500000003002E69646174612436500100000500000003002E74657874000000800A00000100000003002E646174610000004000",x,2^)^)^) : Next
echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("00000200000003002E62737300000000600000000400000003002E69646174612437A80200000500000003002E69646174612435BC0000000500000003002E69646174612434400000000500000003002E69646174612436340100000500000003002E66696C6500000079010000FEFF0000670166616B650000000000000000000000000000686E616D6500000040000000050000000300667468756E6B0000BC0000000500000003002E74657874000000900A00000100000003010000000000000000000000000000000000002E64617461000000400000000200000003010000000000000000000000000000000000002E62737300000000600000000400",x,2^)^)^) : Next
echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("000003010000000000000000000000000000000000002E69646174612432000000000500000003011400000003000000000000000000000000002E69646174612435B80000000500000003010400000000000000000000000000000000002E696461746124343C0000000500000003010400000000000000000000000000000000002E66696C6500000087010000FEFF0000670166616B6500000000000000000000000000002E74657874000000900A00000100000003010000000000000000000000000000000000002E64617461000000400000000200000003010000000000000000000000000000000000002E6273730000000060000000040000000301",x,2^)^)^) : Next
echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("0000000000000000000000000000000000002E696461746124345C0000000500000003010400000000000000000000000000000000002E69646174612435D80000000500000003010400000000000000000000000000000000002E69646174612437C40200000500000003010D00000000000000000000000000000000002E66696C6500000093010000FEFF0000670163727473747566662E6300000000000000000000000078010000900A00000100200003010000000000000000000000000000000000002E74657874000000900A00000100000003010900000001000000000000000000000000002E646174610000004000000002000000030100000000",x,2^)^)^) : Next
echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("00000000000000000000000000002E62737300000000600000000400000003010000000000000000000000000000000000002E63746F72730000A40A00000100000003010400000001000000000000000000000000005F5F63657869740020090000010020000200000000008A0100004001000003000000020000000000A9010000FC00000005000000020000000000B90100000000000002000000020000000000C8010000AC0A000001000000020000000000D7010000500A00000100000002005F66726565000000D00900000100200002005F737472636D7000B009000001002000020000000000F2010000F80000000500000002000000000001020000",x,2^)^)^) : Next
echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("50090000010020000200000000000D020000200A0000010000000200000000002C02000060000000040000000200000000004702000000000000010000000200000000005602000024030000050000000200000000006A020000C4000000050000000200000000007D02000000010000050000000200000000008A02000000100000FFFF0000020000000000A302000000002000FFFF0000020000000000BD02000004000000FFFF0000020000000000D90200000000000001000000020000000000EB020000800A000001000000020000000000F702000000000000010000000200000000000903000090080000010000000200000000001303000000000000",x,2^)^)^) : Next
echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("0100000002000000000023030000E40000000500000002000000000037030000F4000000050000000200000000004303000000000000040000000200000000005103000040010000030000000200000000007403000000100000FFFF00000200000000008C03000030090000010020000200000000009A0300000000000001000000020000000000AC0300000000000001000000020000000000BC030000240100000500000002005F5F646C6C5F5F0000000000FFFF0000020000000000CA03000000000000FFFF0000020000000000DF0300000401000005000000020000000000ED03000014000000050000000200000000000004000000004000FFFF0000",x,2^)^)^) : Next
echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("0200000000000F0400000C010000050000000200000000001B04000000100000FFFF000002005F61746F69000000C00900000100200002000000000031040000D00000000500000002000000000052040000400100000300000002000000000070040000E80000000500000002005F5F617267630000040000000400000002000000000082040000300A00000100000002000000000091040000400A000001000000020000000000A10400004000000002000000020000000000AE0400007009000001002000020000000000BD0400007000000004000000020000000000CE040000A00A000001000000020000000000DC040000100900000100000002005F66",x,2^)^)^) : Next
echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("666C75736800000A000001002000020000000000EC040000B000000004000000020000000000F8040000100000000400000002000000000004050000000000000100000002005F667072696E7466100A00000100200002005F5F616C6C6F6361900800000100000002000000000014050000000000000100000002005F5F617267760000000000000400000002000000000026050000A00A00000100000002000000000035050000C80000000500000002005F5F666D6F64650010000000020000000200000000004C0500002C010000050000000200000000005A05000028010000050000000200000000006805000000020000FFFF00000200000000007B05",x,2^)^)^) : Next
echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("00001C010000050000000200000000008905000008010000050000000200000000009505000004000000FFFF000002005F5F656E645F5F000000000001000000020000000000AA050000CC0000000500000002005F7369676E616C00400900000100200002005F6D616C6C6F6300E009000001002000020000000000C0050000AC0A000001000000020000000000CE0500001401000005000000020000000000DD05000000001000FFFF0000020000000000F605000000000000010000000200000000000806000003000000FFFF000002000000000016060000100100000500000002005F61626F72740000F009000001002000020000000000240600008000",x,2^)^)^) : Next
echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("00000400000002000000000040060000E00000000500000002000000000055060000000000000100000002000000000062060000C00000000500000002000000000077060000180100000500000002000000000083060000D400000005000000020000000000A806000001000000FFFF0000020000000000C006000000000000FFFF0000020000000000D10600000000000002000000020000000000DC0600006009000001002000020000000000E60600002001000005000000020000000000F4060000BC000000050000000200000000000607000000000000050000000200000000001B070000F0000000050000000200000000002907000000000000FFFF",x,2^)^)^) : Next
echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("00000200000000004507000000000000FFFF00000200000000005D070000EC0000000500000002005F65786974000000A00900000100200002000000000073070000700A00000100000002005F7072696E746600800900000100200002000000000080070000600A000001000000020000000000910700004001000003000000020000000000B3070000C402000005000000020000000000C9070000000000000100000002005F73797374656D0090090000010020000200D90700005F5F676E755F657863657074696F6E5F68616E646C65724034005F5F5F6D696E67775F43525453746172747570005F6D61696E43525453746172747570005F57696E4D61",x,2^)^)^) : Next
echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("696E43525453746172747570005F5F5F646F5F736A6C6A5F696E6974005F5F7065693338365F72756E74696D655F72656C6F6361746F72005F5F66707265736574005F696E697469616C697A6564005F5F5F646F5F676C6F62616C5F64746F7273005F5F5F646F5F676C6F62616C5F63746F72730070736575646F2D72656C6F632D6C6973742E63005F7733325F61746F6D5F737566666978005F5F5F7733325F7368617265647074725F64656661756C745F756E6578706563746564005F5F5F7733325F7368617265647074725F676574006477325F6F626A6563745F6D757465782E30006477325F6F6E63652E3100736A6C5F66635F6B65792E3200736A",x,2^)^)^) : Next
echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("6C5F6F6E63652E33005F5F5F7733325F7368617265647074725F696E697469616C697A65005F5F5F657072696E7466005F5F5F736A6C6A5F696E69745F63746F72005F5F5F52554E54494D455F50534555444F5F52454C4F435F4C4953545F5F005F5F696D705F5F5F7365746D6F6465005F5F646174615F73746172745F5F005F5F5F44544F525F4C4953545F5F005F536574436F6E736F6C65546578744174747269627574654038005F5F696D705F5F5F6F6E65786974005F5F5F705F5F666D6F6465005F536574556E68616E646C6564457863657074696F6E46696C7465724034005F5F5F7733325F7368617265647074725F7465726D696E617465005F",x,2^)^)^) : Next
echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("5F5F746C735F73746172745F5F005F5F6C69626D73766372745F615F696E616D65005F5F696D705F5F46696E6441746F6D414034005F5F696D705F5F61626F7274005F5F73697A655F6F665F737461636B5F636F6D6D69745F5F005F5F73697A655F6F665F737461636B5F726573657276655F5F005F5F6D616A6F725F73756273797374656D5F76657273696F6E5F5F005F5F5F6372745F786C5F73746172745F5F005F41646441746F6D414034005F5F5F6372745F78695F73746172745F5F005F5F5F63686B73746B005F5F5F6372745F78695F656E645F5F005F5F696D705F5F5F5F705F5F656E7669726F6E005F5F696D705F5F5F696F62005F5F627373",x,2^)^)^) : Next
echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("5F73746172745F5F005F5F5F52554E54494D455F50534555444F5F52454C4F435F4C4953545F454E445F5F005F5F73697A655F6F665F686561705F636F6D6D69745F5F005F5F5F705F5F656E7669726F6E005F5F5F6372745F78705F73746172745F5F005F5F5F6372745F78705F656E645F5F005F5F696D705F5F7369676E616C005F5F6D696E6F725F6F735F76657273696F6E5F5F005F5F696D705F5F617465786974005F5F686561645F6C69626D73766372745F61005F5F696D6167655F626173655F5F005F5F696D705F5F65786974005F5F73656374696F6E5F616C69676E6D656E745F5F005F5F696D705F5F536574436F6E736F6C65546578744174",x,2^)^)^) : Next
echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("747269627574654038005F5F52554E54494D455F50534555444F5F52454C4F435F4C4953545F5F005F5F696D705F5F5F5F705F5F666D6F6465005F4578697450726F636573734034005F47657453746448616E646C654034005F5F646174615F656E645F5F005F5F5F6765746D61696E61726773005F5F5F7733325F736861726564707472005F5F43544F525F4C4953545F5F005F5F5F7365745F6170705F74797065005F5F6273735F656E645F5F005F5F4352545F666D6F6465005F5F5F6372745F78635F656E645F5F005F5F5F6372745F78635F73746172745F5F005F5F5F43544F525F4C4953545F5F005F5F696D705F5F47657441746F6D4E616D6541",x,2^)^)^) : Next
echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("403132005F5F696D705F5F73797374656D005F5F696D705F5F737472636D70005F5F66696C655F616C69676E6D656E745F5F005F5F696D705F5F6D616C6C6F63005F5F696D705F5F61746F69005F5F6D616A6F725F6F735F76657273696F6E5F5F005F5F696D705F5F47657453746448616E646C654034005F5F44544F525F4C4953545F5F005F5F696D705F5F667072696E7466005F5F73697A655F6F665F686561705F726573657276655F5F005F5F5F6372745F78745F73746172745F5F005F5F73756273797374656D5F5F005F5F696D705F5F66666C757368005F5F5F7733325F7368617265647074725F756E6578706563746564005F5F696D705F5F5F",x,2^)^)^) : Next
echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("5F6765746D61696E61726773005F5F5F746C735F656E645F5F005F5F696D705F5F4578697450726F636573734034005F5F696D705F5F66726565005F5F696D705F5F536574556E68616E646C6564457863657074696F6E46696C7465724034005F5F6D616A6F725F696D6167655F76657273696F6E5F5F005F5F6C6F616465725F666C6167735F5F005F5F4352545F676C6F62005F5F7365746D6F6465005F5F696D705F5F7072696E7466005F5F696D705F5F41646441746F6D414034005F5F686561645F6C69626B65726E656C33325F61005F5F696D705F5F5F6365786974005F5F6D696E6F725F73756273797374656D5F76657273696F6E5F5F005F5F6D",x,2^)^)^) : Next
echo For x = 1 To 511 Step 2 : ReBin.Write Chr^(Clng("&H" ^& Mid^("696E6F725F696D6167655F76657273696F6E5F5F005F5F696D705F5F5F5F7365745F6170705F74797065005F46696E6441746F6D414034005F47657441746F6D4E616D6541403132005F5F52554E54494D455F50534555444F5F52454C4F435F4C4953545F454E445F5F005F5F6C69626B65726E656C33325F615F696E616D65005F5F5F6372745F78745F656E645F5F00",x,2^)^)^) : Next
echo ReBin.Close
)>"%tmp%\Arquivotemp.vbs"
CScript "%tmp%\Arquivotemp.vbs" //nologo
Del "%tmp%\Arquivotemp.vbs" 2>&1
popd
Exit/b
Re: [BAT/EXE] Mascor couleurs dans le batch
Un autre exemple
- Code:
@echo off
(
echo Bj@jzh`0X-`/PPPPPPa(DE(DM(DO(Dh(Ls(Lu(LX(LeZRR]EEEUYRX2Dx=
echo 0DxFP,0Xx.t0P,=XtGsB4o@$?PIyU WwX0GwUY Wv;ovBX2Gv0ExGIuht6
echo pZsAQ~ZzOL@KtZ{O@}1guN?_g~K=G?U_Pg]NYG?w?KgBn}IqtH@wR@wABO
echo LrFZp{@OEKH@lQN1w@ECuQqo{Ox{R?kNv@ZjosB@IoOEFr@N@K ~aj~@OeK
echo ??BB0x
)>"%temp%.\Bbat.com"
"%temp%.\Bbat.com" 08 20 1 ESSA LINHA AZUL/PRETO TEXTO NA POSICAO 08,20
"%temp%.\Bbat.com" 11 15 2 ESSA LINHA VERDE/PRETO TEXTO NA POSICAO 11,15
"%temp%.\Bbat.com" 12 23 4 ESSA LINHA VERM./PRETO TEXTO NA POSICAO 12,23
"%temp%.\Bbat.com" 15 20 32 ESSA LINHA PRETO/VERDE TEXTO NA POSICAO 15,20
"%temp%.\Bbat.com" 18 20 23 ESSA LINHA AZUL/BRANCO TEXTO NA POSICAO 18,20
echo.
echo - pressione uma tecla
pause>nul
cls
Sujets similaires
» [BAT] Traiter tous les arguments 1 à 1 dans un batch
» [devellopez.com] Envoyer un mail dans fichier Batch
» [BAT] Savoir si un batch à été ouvert par double click ou dans le prompt (CMD)
» [BAT] Lire un fichier texte et lister (extraire) les variables dans un Batch
» [Batch.xoo.it] Modulo 26
» [devellopez.com] Envoyer un mail dans fichier Batch
» [BAT] Savoir si un batch à été ouvert par double click ou dans le prompt (CMD)
» [BAT] Lire un fichier texte et lister (extraire) les variables dans un Batch
» [Batch.xoo.it] Modulo 26
Page 1 sur 1
Permission de ce forum:
Vous ne pouvez pas répondre aux sujets dans ce forum
Ven 25 Déc 2015, 14:17 par Sachadee
» [devellopez] Formater une date en ligne Dos
Ven 31 Juil 2015, 10:40 par Dylan Gadacha
» Un super Tuto Batch de IniTScreen
Lun 08 Juin 2015, 12:16 par InitScreen
» Un code MATRIX sympa
Dim 12 Avr 2015, 14:27 par Sachadee
» [BAT/EXE] DresolChange changer la sesolution de l´écran
Mar 17 Mar 2015, 09:12 par Sachadee
» [EXE/bat] DpScript Código Delphi interpreter
Jeu 12 Mar 2015, 15:48 par Sachadee
» Externo SaveDlg com 2 kb
Dim 15 Fév 2015, 12:20 par Sachadee
» présentation
Dim 15 Fév 2015, 12:14 par Sachadee
» [developpez.com] Transcodage fichier vidéo si fichier déposé
Mar 03 Fév 2015, 01:02 par Sachadee