$#\x06d#~\xb7\x0e\x08 \x01\x0c\xe5]T\x15\x19~\x81w\x19\xcbT(\xf8\xe1~\xfe3 \xe5\xd5\xd9\xd1\x01\xff\xff\xf7> \xcd\x00\x80\xd9\x10\xd6v\x00\xc5`i))\x09)DM\x19\xdc0\x00\xc1\xeb>/<\x098\xfc\xedB\xeb\xf5\xc9
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
Disassemble:
ORG 00000H INC H ;0000 24 $ INC HL ;0001 23 # LD B,064H ;0002 06 64 . D INC HL ;0004 23 # LD A,(HL) ;0005 7E ~ OR A ;0006 B7 . LD C,008H ;0007 0E 08 . . JR NZ,$+3 ;0009 20 01 . INC C ;000B 0C . PUSH HL ;000C E5 . LD E,L ;000D 5D ] LD D,H ;000E 54 T DEC D ;000F 15 . ADD HL,DE ;0010 19 . LD A,(HL) ;0011 7E ~ ADD A,C ;0012 81 . LD (HL),A ;0013 77 W ADD HL,DE ;0014 19 . BIT 2,H ;0015 CB 54 . T JR Z,$-6 ;0017 28 F8 ( . POP HL ;0019 E1 . LD A,(HL) ;001A 7E ~ CP 033H ;001B FE 33 . 3 JR NZ,$-25 ;001D 20 E5 . PUSH DE ;001F D5 . EXX ;0020 D9 . POP DE ;0021 D1 . LD BC,0FFFFH ;0022 01 FF FF . . . RST 30H ;0025 F7 . LD A,00AH ;0026 3E 0A > . CALL 08000H ;0028 CD 00 80 . . . EXX ;002B D9 . DJNZ $-40 ;002C 10 D6 . . HALT ;002E 76 V NOP ;002F 00 . PUSH BC ;0030 C5 . LD H,B ;0031 60 ` LD L,C ;0032 69 I ADD HL,HL ;0033 29 ) ADD HL,HL ;0034 29 ) ADD HL,BC ;0035 09 . ADD HL,HL ;0036 29 ) LD B,H ;0037 44 D LD C,L ;0038 4D M ADD HL,DE ;0039 19 . CALL C,00030H ;003A DC 30 00 . 0 . POP BC ;003D C1 . EX DE,HL ;003E EB . LD A,02FH ;003F 3E 2F > / INC A ;0041 3C < ADD HL,BC ;0042 09 . JR C,$-2 ;0043 38 FC 8 . SBC HL,BC ;0045 ED 42 . B EX DE,HL ;0047 EB . PUSH AF ;0048 F5 . RET ;0049 C9 .