packed UTF 9 by hiro.suzuki

\x0e\x08Qa\xcd\x03\x808\x10\xd608\xf7\xfe
8\x02\xd6'\xedo#\xeb\x18\xebahQ^#~B\xcb\x13\x17\x10\xfb\xb9(\x01\xcdv\x7f\x15 \xee#\x18\xea

Note that non-ascii characters in the above source code will be escaped (such as \x9f).

Disassemble:

	ORG	00000H

	LD C,008H		;0000	0E 08 	. . 
	LD D,C			;0002	51 	Q 
	LD H,C			;0003	61 	A 
	CALL 08003H		;0004	CD 03 80 	. . . 
	JR C,$+18		;0007	38 10 	8 . 
	SUB 030H		;0009	D6 30 	. 0 
	JR C,$-7		;000B	38 F7 	8 . 
	CP 00AH		;000D	FE 0A 	. . 
	JR C,$+4		;000F	38 02 	8 . 
	SUB 027H		;0011	D6 27 	. ' 
	RLD		;0013	ED 6F 	. O 
	INC HL			;0015	23 	# 
	EX DE,HL			;0016	EB 	. 
	JR $-19		;0017	18 EB 	. . 
	LD H,C			;0019	61 	A 
	LD L,B			;001A	68 	H 
	LD D,C			;001B	51 	Q 
	LD E,(HL)			;001C	5E 	^ 
	INC HL			;001D	23 	# 
	LD A,(HL)			;001E	7E 	~ 
	LD B,D			;001F	42 	B 
	RL E		;0020	CB 13 	. . 
	RLA			;0022	17 	. 
	DJNZ $-3		;0023	10 FB 	. . 
	CP C			;0025	B9 	. 
	JR Z,$+3		;0026	28 01 	( . 
	CALL 07F76H		;0028	CD 76 7F 	. V  
	DEC D			;002B	15 	. 
	JR NZ,$-16		;002C	20 EE 	  . 
	INC HL			;002E	23 	# 
	JR $-20		;002F	18 EA 	. . 

download

return top