packed UTF 9 by kodera

-\xf9\xd6G0\x06\xc6\x17#0\x03+\xedo\xcd\x03\x800\xef3\x06\x08\xe1;H)\x0d \xfc|\xfe
\xd4\x00\x80\x10\xf10\xecv

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

Disassemble:

	ORG	00000H

	DEC L			;0000	2D 	- 
	LD SP,HL			;0001	F9 	. 
	SUB 047H		;0002	D6 47 	. G 
	JR NC,$+8		;0004	30 06 	0 . 
	ADD A,017H		;0006	C6 17 	. . 
	INC HL			;0008	23 	# 
	JR NC,$+5		;0009	30 03 	0 . 
	DEC HL			;000B	2B 	+ 
	RLD		;000C	ED 6F 	. O 
	CALL 08003H		;000E	CD 03 80 	. . . 
	JR NC,$-15		;0011	30 EF 	0 . 
	INC SP			;0013	33 	3 
	LD B,008H		;0014	06 08 	. . 
	POP HL			;0016	E1 	. 
	DEC SP			;0017	3B 	; 
	LD C,B			;0018	48 	H 
	ADD HL,HL			;0019	29 	) 
	DEC C			;001A	0D 	. 
	JR NZ,$-2		;001B	20 FC 	  . 
	LD A,H			;001D	7C 	| 
	CP 00AH		;001E	FE 0A 	. . 
	CALL NC,08000H		;0020	D4 00 80 	. . . 
	DJNZ $-13		;0023	10 F1 	. . 
	JR NC,$-18		;0025	30 EC 	0 . 
	HALT			;0027	76 	V 

download

return top