Gray code by kodera

Q|k\x83*myno**xG
\x0c\xd6
\xcc\x03\x80\xff \xf6\x14\xcb
= \xfb|\xb2\x1f\xacO>\x05\x8f\xcd\x00\x80>\x18\xcb! \xf6\x190\xecv

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

Disassemble:

	ORG	00000H

	LD D,C			;0000	51 	Q 
	LD A,H			;0001	7C 	| 
	LD L,E			;0002	6B 	K 
	ADD A,E			;0003	83 	. 
	LD HL,(0796DH)		;0004	2A 6D 79 	* M Y 
	LD L,(HL)			;0007	6E 	N 
	LD L,A			;0008	6F 	O 
	LD HL,(0782AH)		;0009	2A 2A 78 	* * X 
	LD B,A			;000C	47 	G 
	LD A,(BC)			;000D	0A 	. 
	INC C			;000E	0C 	. 
	SUB 00AH		;000F	D6 0A 	. . 
	CALL Z,08003H		;0011	CC 03 80 	. . . 
	RST 38H			;0014	FF 	. 
	JR NZ,$-8		;0015	20 F6 	  . 
	INC D			;0017	14 	. 
	RRC D		;0018	CB 0A 	. . 
	DEC A			;001A	3D 	= 
	JR NZ,$-3		;001B	20 FB 	  . 
	LD A,H			;001D	7C 	| 
	OR D			;001E	B2 	. 
	RRA			;001F	1F 	. 
	XOR H			;0020	AC 	. 
	LD C,A			;0021	4F 	O 
	LD A,005H		;0022	3E 05 	> . 
	ADC A,A			;0024	8F 	. 
	CALL 08000H		;0025	CD 00 80 	. . . 
	LD A,018H		;0028	3E 18 	> . 
	SLA C		;002A	CB 21 	. ! 
	JR NZ,$-8		;002C	20 F6 	  . 
	ADD HL,DE			;002E	19 	. 
	JR NC,$-18		;002F	30 EC 	0 . 
	HALT			;0031	76 	V 

download

return top