\xfd!\xb3\x00\x04\x0eabj\xc5\xfd~\x9c\xfd\x86\x00_\x19\x10\xfd\x0e\xff\x1e \x0c\xedR0\xfb\x19\xfdudi\xfd#\xc1\x0d \xe1\xc5\x06a\xc4\x00\x80\xfd+\xfd~\x9c\xb7(\x01O\xc60\x0d\x0c\x10\xee\xcd\x00\x80{\xcd\x00\x80\x0ed\xfd\x09\xc1x\xfe3 \xb6v\x01
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
Disassemble:
ORG 00000H LD IY,000B3H ;0000 FD 21 B3 00 . ! . . INC B ;0004 04 . LD C,061H ;0005 0E 61 . A LD H,D ;0007 62 B LD L,D ;0008 6A J PUSH BC ;0009 C5 . LD A,(IY-064H) ;000A FD 7E 9C . ~ . ADD A,(IY+000H) ;000D FD 86 00 . . . LD E,A ;0010 5F _ ADD HL,DE ;0011 19 . DJNZ $-1 ;0012 10 FD . . LD C,0FFH ;0014 0E FF . . LD E,00AH ;0016 1E 0A . . INC C ;0018 0C . SBC HL,DE ;0019 ED 52 . R JR NC,$-3 ;001B 30 FB 0 . ADD HL,DE ;001D 19 . LD (IY+064H),L ;001E FD 75 64 . U D LD L,C ;0021 69 I INC IY ;0022 FD 23 . # POP BC ;0024 C1 . DEC C ;0025 0D . JR NZ,$-29 ;0026 20 E1 . PUSH BC ;0028 C5 . LD B,061H ;0029 06 61 . A CALL NZ,08000H ;002B C4 00 80 . . . DEC IY ;002E FD 2B . + LD A,(IY-064H) ;0030 FD 7E 9C . ~ . OR A ;0033 B7 . JR Z,$+3 ;0034 28 01 ( . LD C,A ;0036 4F O ADD A,030H ;0037 C6 30 . 0 DEC C ;0039 0D . INC C ;003A 0C . DJNZ $-16 ;003B 10 EE . . CALL 08000H ;003D CD 00 80 . . . LD A,E ;0040 7B { CALL 08000H ;0041 CD 00 80 . . . LD C,064H ;0044 0E 64 . D ADD IY,BC ;0046 FD 09 . . POP BC ;0048 C1 . LD A,B ;0049 78 X CP 033H ;004A FE 33 . 3 JR NZ,$-72 ;004C 20 B6 . HALT ;004E 76 V DEFB 001H ;004F 01 .