\x1eQ!\x85\x00\xd7\xeb\xd7\xeby\xfe\x030\x17\x18\x13~#\xcb\x7f\xdf(\xf9\xc9\xcb\xbf\xf5\xf5y\x900\x01\xf1\xf1\xc9##\xd7\x06\x0b\xd7x\xfe\x05>s8\x08>i\xdf>n\xdf>g\xdf>,\xdf> \xdf\x10\xe7\xd7\x04\xd7\x0c\xd7\x06\x0c\xd7y\xb8B(\x1f\xd7\x18\xb1firs\xf4secon\xe4thir\xe4fou\xf2fi\xe6si\xf8seve\xeeeig\xe8ni\xeete\xeeeleve\xeetwel\xe6On the\xa0th day of Christmas, my true love sent to me\x8aTwelve drummers drum\xedEleven pipers pi\xf0Ten lords a-lea\xf0Nine ladies dan\xe3Eight maids a-mil\xebSeven swans a-swim\xedSix geese a-la\xf9Five golden rin\xe7Four calling bir\xe4Three French he\xeeTwo turtle dov\xe5\xc1nd \xe1 partridge in a pear tre\xe5\xa1. \x8a
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
Disassemble:
ORG 00000H LD E,051H ;0000 1E 51 . Q LD HL,00085H ;0002 21 85 00 ! . . RST 10H ;0005 D7 . EX DE,HL ;0006 EB . RST 10H ;0007 D7 . EX DE,HL ;0008 EB . LD A,C ;0009 79 Y CP 003H ;000A FE 03 . . JR NC,$+25 ;000C 30 17 0 . JR $+21 ;000E 18 13 . . LD A,(HL) ;0010 7E ~ INC HL ;0011 23 # BIT 7,A ;0012 CB 7F . RST 18H ;0014 DF . JR Z,$-5 ;0015 28 F9 ( . RET ;0017 C9 . RES 7,A ;0018 CB BF . . PUSH AF ;001A F5 . PUSH AF ;001B F5 . LD A,C ;001C 79 Y SUB B ;001D 90 . JR NC,$+3 ;001E 30 01 0 . POP AF ;0020 F1 . POP AF ;0021 F1 . RET ;0022 C9 . INC HL ;0023 23 # INC HL ;0024 23 # RST 10H ;0025 D7 . LD B,00BH ;0026 06 0B . . RST 10H ;0028 D7 . LD A,B ;0029 78 X CP 005H ;002A FE 05 . . LD A,073H ;002C 3E 73 > S JR C,$+10 ;002E 38 08 8 . LD A,069H ;0030 3E 69 > I RST 18H ;0032 DF . LD A,06EH ;0033 3E 6E > N RST 18H ;0035 DF . LD A,067H ;0036 3E 67 > G RST 18H ;0038 DF . LD A,02CH ;0039 3E 2C > , RST 18H ;003B DF . LD A,00AH ;003C 3E 0A > . RST 18H ;003E DF . DJNZ $-23 ;003F 10 E7 . . RST 10H ;0041 D7 . INC B ;0042 04 . RST 10H ;0043 D7 . INC C ;0044 0C . RST 10H ;0045 D7 . LD B,00CH ;0046 06 0C . . RST 10H ;0048 D7 . LD A,C ;0049 79 Y CP B ;004A B8 . LD B,D ;004B 42 B JR Z,$+33 ;004C 28 1F ( . RST 10H ;004E D7 . JR $-77 ;004F 18 B1 . . LD H,(HL) ;0051 66 F LD L,C ;0052 69 I LD (HL),D ;0053 72 R LD (HL),E ;0054 73 S CALL P,06573H ;0055 F4 73 65 . S E LD H,E ;0058 63 C LD L,A ;0059 6F O LD L,(HL) ;005A 6E N CALL PO,06874H ;005B E4 74 68 . T H LD L,C ;005E 69 I LD (HL),D ;005F 72 R CALL PO,06F66H ;0060 E4 66 6F . F O LD (HL),L ;0063 75 U JP P,06966H ;0064 F2 66 69 . F I AND 073H ;0067 E6 73 . S LD L,C ;0069 69 I RET M ;006A F8 . LD (HL),E ;006B 73 S LD H,L ;006C 65 E HALT ;006D 76 V LD H,L ;006E 65 E XOR 065H ;006F EE 65 . E LD L,C ;0071 69 I LD H,A ;0072 67 G RET PE ;0073 E8 . LD L,(HL) ;0074 6E N LD L,C ;0075 69 I XOR 074H ;0076 EE 74 . T LD H,L ;0078 65 E XOR 065H ;0079 EE 65 . E LD L,H ;007B 6C L LD H,L ;007C 65 E HALT ;007D 76 V LD H,L ;007E 65 E XOR 074H ;007F EE 74 . T LD (HL),A ;0081 77 W LD H,L ;0082 65 E LD L,H ;0083 6C L AND 04FH ;0084 E6 4F . O LD L,(HL) ;0086 6E N JR NZ,$+118 ;0087 20 74 T LD L,B ;0089 68 H LD H,L ;008A 65 E AND B ;008B A0 . LD (HL),H ;008C 74 T LD L,B ;008D 68 H JR NZ,$+102 ;008E 20 64 D LD H,C ;0090 61 A LD A,C ;0091 79 Y JR NZ,$+113 ;0092 20 6F O LD H,(HL) ;0094 66 F JR NZ,$+69 ;0095 20 43 C LD L,B ;0097 68 H LD (HL),D ;0098 72 R LD L,C ;0099 69 I LD (HL),E ;009A 73 S LD (HL),H ;009B 74 T LD L,L ;009C 6D M LD H,C ;009D 61 A LD (HL),E ;009E 73 S INC L ;009F 2C , LD A,(BC) ;00A0 0A . LD L,L ;00A1 6D M LD A,C ;00A2 79 Y JR NZ,$+118 ;00A3 20 74 T LD (HL),D ;00A5 72 R LD (HL),L ;00A6 75 U LD H,L ;00A7 65 E JR NZ,$+110 ;00A8 20 6C L LD L,A ;00AA 6F O HALT ;00AB 76 V LD H,L ;00AC 65 E JR NZ,$+117 ;00AD 20 73 S LD H,L ;00AF 65 E LD L,(HL) ;00B0 6E N LD (HL),H ;00B1 74 T JR NZ,$+118 ;00B2 20 74 T LD L,A ;00B4 6F O JR NZ,$+111 ;00B5 20 6D M LD H,L ;00B7 65 E ADC A,D ;00B8 8A . LD D,H ;00B9 54 T LD (HL),A ;00BA 77 W LD H,L ;00BB 65 E LD L,H ;00BC 6C L HALT ;00BD 76 V LD H,L ;00BE 65 E JR NZ,$+102 ;00BF 20 64 D LD (HL),D ;00C1 72 R LD (HL),L ;00C2 75 U LD L,L ;00C3 6D M LD L,L ;00C4 6D M LD H,L ;00C5 65 E LD (HL),D ;00C6 72 R LD (HL),E ;00C7 73 S JR NZ,$+102 ;00C8 20 64 D LD (HL),D ;00CA 72 R LD (HL),L ;00CB 75 U LD L,L ;00CC 6D M RETN ;00CD ED 45 . E LD L,H ;00CF 6C L LD H,L ;00D0 65 E HALT ;00D1 76 V LD H,L ;00D2 65 E LD L,(HL) ;00D3 6E N JR NZ,$+114 ;00D4 20 70 P LD L,C ;00D6 69 I LD (HL),B ;00D7 70 P LD H,L ;00D8 65 E LD (HL),D ;00D9 72 R LD (HL),E ;00DA 73 S JR NZ,$+114 ;00DB 20 70 P LD L,C ;00DD 69 I RET P ;00DE F0 . LD D,H ;00DF 54 T LD H,L ;00E0 65 E LD L,(HL) ;00E1 6E N JR NZ,$+110 ;00E2 20 6C L LD L,A ;00E4 6F O LD (HL),D ;00E5 72 R LD H,H ;00E6 64 D LD (HL),E ;00E7 73 S JR NZ,$+99 ;00E8 20 61 A DEC L ;00EA 2D - LD L,H ;00EB 6C L LD H,L ;00EC 65 E LD H,C ;00ED 61 A RET P ;00EE F0 . LD C,(HL) ;00EF 4E N LD L,C ;00F0 69 I LD L,(HL) ;00F1 6E N LD H,L ;00F2 65 E JR NZ,$+110 ;00F3 20 6C L LD H,C ;00F5 61 A LD H,H ;00F6 64 D LD L,C ;00F7 69 I LD H,L ;00F8 65 E LD (HL),E ;00F9 73 S JR NZ,$+102 ;00FA 20 64 D LD H,C ;00FC 61 A LD L,(HL) ;00FD 6E N EX (SP),HL ;00FE E3 . LD B,L ;00FF 45 E LD L,C ;0100 69 I LD H,A ;0101 67 G LD L,B ;0102 68 H LD (HL),H ;0103 74 T JR NZ,$+111 ;0104 20 6D M LD H,C ;0106 61 A LD L,C ;0107 69 I LD H,H ;0108 64 D LD (HL),E ;0109 73 S JR NZ,$+99 ;010A 20 61 A DEC L ;010C 2D - LD L,L ;010D 6D M LD L,C ;010E 69 I LD L,H ;010F 6C L EX DE,HL ;0110 EB . LD D,E ;0111 53 S LD H,L ;0112 65 E HALT ;0113 76 V LD H,L ;0114 65 E LD L,(HL) ;0115 6E N JR NZ,$+117 ;0116 20 73 S LD (HL),A ;0118 77 W LD H,C ;0119 61 A LD L,(HL) ;011A 6E N LD (HL),E ;011B 73 S JR NZ,$+99 ;011C 20 61 A DEC L ;011E 2D - LD (HL),E ;011F 73 S LD (HL),A ;0120 77 W LD L,C ;0121 69 I LD L,L ;0122 6D M LD (07869H),DE ;0123 ED 53 69 78 . S I X JR NZ,$+105 ;0127 20 67 G LD H,L ;0129 65 E LD H,L ;012A 65 E LD (HL),E ;012B 73 S LD H,L ;012C 65 E JR NZ,$+99 ;012D 20 61 A DEC L ;012F 2D - LD L,H ;0130 6C L LD H,C ;0131 61 A LD SP,HL ;0132 F9 . LD B,(HL) ;0133 46 F LD L,C ;0134 69 I HALT ;0135 76 V LD H,L ;0136 65 E JR NZ,$+105 ;0137 20 67 G LD L,A ;0139 6F O LD L,H ;013A 6C L LD H,H ;013B 64 D LD H,L ;013C 65 E LD L,(HL) ;013D 6E N JR NZ,$+116 ;013E 20 72 R LD L,C ;0140 69 I LD L,(HL) ;0141 6E N RST 20H ;0142 E7 . LD B,(HL) ;0143 46 F LD L,A ;0144 6F O LD (HL),L ;0145 75 U LD (HL),D ;0146 72 R JR NZ,$+101 ;0147 20 63 C LD H,C ;0149 61 A LD L,H ;014A 6C L LD L,H ;014B 6C L LD L,C ;014C 69 I LD L,(HL) ;014D 6E N LD H,A ;014E 67 G JR NZ,$+100 ;014F 20 62 B LD L,C ;0151 69 I LD (HL),D ;0152 72 R CALL PO,06854H ;0153 E4 54 68 . T H LD (HL),D ;0156 72 R LD H,L ;0157 65 E LD H,L ;0158 65 E JR NZ,$+72 ;0159 20 46 F LD (HL),D ;015B 72 R LD H,L ;015C 65 E LD L,(HL) ;015D 6E N LD H,E ;015E 63 C LD L,B ;015F 68 H JR NZ,$+106 ;0160 20 68 H LD H,L ;0162 65 E XOR 054H ;0163 EE 54 . T LD (HL),A ;0165 77 W LD L,A ;0166 6F O JR NZ,$+118 ;0167 20 74 T LD (HL),L ;0169 75 U LD (HL),D ;016A 72 R LD (HL),H ;016B 74 T LD L,H ;016C 6C L LD H,L ;016D 65 E JR NZ,$+102 ;016E 20 64 D LD L,A ;0170 6F O HALT ;0171 76 V PUSH HL ;0172 E5 . POP BC ;0173 C1 . LD L,(HL) ;0174 6E N LD H,H ;0175 64 D JR NZ,$-29 ;0176 20 E1 . JR NZ,$+114 ;0178 20 70 P LD H,C ;017A 61 A LD (HL),D ;017B 72 R LD (HL),H ;017C 74 T LD (HL),D ;017D 72 R LD L,C ;017E 69 I LD H,H ;017F 64 D LD H,A ;0180 67 G LD H,L ;0181 65 E JR NZ,$+107 ;0182 20 69 I LD L,(HL) ;0184 6E N JR NZ,$+99 ;0185 20 61 A JR NZ,$+114 ;0187 20 70 P LD H,L ;0189 65 E LD H,C ;018A 61 A LD (HL),D ;018B 72 R JR NZ,$+118 ;018C 20 74 T LD (HL),D ;018E 72 R LD H,L ;018F 65 E PUSH HL ;0190 E5 . AND C ;0191 A1 . LD L,00AH ;0192 2E 0A . . ADC A,D ;0194 8A .