\x01\x1b\x03\xcd\x03\x80\xd61on\x1e\x07eJ|\xbd(\x10\xdf8\x17\x18\x14\x00{\xd6\x02\xc6\xfby\xcb\xef\xf5\xc9{\x90\xc6\xfd0\x05\xdf0\x02\xe7\xe7H\xdf0\x01\xe7% \xd8> \xe7\x1d \xd1v
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
Disassemble:
ORG 00000H
LD BC,0031BH ;0000 01 1B 03 . . .
CALL 08003H ;0003 CD 03 80 . . .
SUB 031H ;0006 D6 31 . 1
LD L,A ;0008 6F O
LD L,(HL) ;0009 6E N
LD E,007H ;000A 1E 07 . .
LD H,L ;000C 65 E
LD C,D ;000D 4A J
LD A,H ;000E 7C |
CP L ;000F BD .
JR Z,$+18 ;0010 28 10 ( .
RST 18H ;0012 DF .
JR C,$+25 ;0013 38 17 8 .
JR $+22 ;0015 18 14 . .
NOP ;0017 00 .
LD A,E ;0018 7B {
SUB 002H ;0019 D6 02 . .
ADD A,0FBH ;001B C6 FB . .
LD A,C ;001D 79 Y
SET 5,A ;001E CB EF . .
PUSH AF ;0020 F5 .
RET ;0021 C9 .
LD A,E ;0022 7B {
SUB B ;0023 90 .
ADD A,0FDH ;0024 C6 FD . .
JR NC,$+7 ;0026 30 05 0 .
RST 18H ;0028 DF .
JR NC,$+4 ;0029 30 02 0 .
RST 20H ;002B E7 .
RST 20H ;002C E7 .
LD C,B ;002D 48 H
RST 18H ;002E DF .
JR NC,$+3 ;002F 30 01 0 .
RST 20H ;0031 E7 .
DEC H ;0032 25 %
JR NZ,$-38 ;0033 20 D8 .
LD A,00AH ;0035 3E 0A > .
RST 20H ;0037 E7 .
DEC E ;0038 1D .
JR NZ,$-45 ;0039 20 D1 .
HALT ;003B 76 V