.I#\x0e\x09~\xb9t0\xf8<w.O~\x87\x87\x87+\x86\xfe\x140\xef>\x06+\xbe(\xe9.K\xbe(\xe4\x0f.Q\xbe(\xde\xfd\xcbSF \x14.JE]\x13\x1a\xbe(\xcb\x10\xf9#\x0d \xf3~+\xc60\xcdv\x7f0\xf7\x18\xb7\xda
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
Disassemble:
ORG 00000H LD L,049H ;0000 2E 49 . I INC HL ;0002 23 # LD C,009H ;0003 0E 09 . . LD A,(HL) ;0005 7E ~ CP C ;0006 B9 . LD (HL),H ;0007 74 T JR NC,$-6 ;0008 30 F8 0 . INC A ;000A 3C < LD (HL),A ;000B 77 W LD L,04FH ;000C 2E 4F . O LD A,(HL) ;000E 7E ~ ADD A,A ;000F 87 . ADD A,A ;0010 87 . ADD A,A ;0011 87 . DEC HL ;0012 2B + ADD A,(HL) ;0013 86 . CP 014H ;0014 FE 14 . . JR NC,$-15 ;0016 30 EF 0 . LD A,006H ;0018 3E 06 > . DEC HL ;001A 2B + CP (HL) ;001B BE . JR Z,$-21 ;001C 28 E9 ( . LD L,04BH ;001E 2E 4B . K CP (HL) ;0020 BE . JR Z,$-26 ;0021 28 E4 ( . RRCA ;0023 0F . LD L,051H ;0024 2E 51 . Q CP (HL) ;0026 BE . JR Z,$-32 ;0027 28 DE ( . BIT 0,(IY+053H) ;0029 FD CB 53 46 . . S F JR NZ,$+22 ;002D 20 14 . LD L,04AH ;002F 2E 4A . J LD B,L ;0031 45 E LD E,L ;0032 5D ] INC DE ;0033 13 . LD A,(DE) ;0034 1A . CP (HL) ;0035 BE . JR Z,$-51 ;0036 28 CB ( . DJNZ $-5 ;0038 10 F9 . . INC HL ;003A 23 # DEC C ;003B 0D . JR NZ,$-11 ;003C 20 F3 . LD A,(HL) ;003E 7E ~ DEC HL ;003F 2B + ADD A,030H ;0040 C6 30 . 0 CALL 07F76H ;0042 CD 76 7F . V JR NC,$-7 ;0045 30 F7 0 . JR $-71 ;0047 18 B7 . . DEFB 0DAH ;0049 DA .