Farey sequence by *yuko*

\xdf\x01\x18\x17\x16\x15\x14'\x138%7\x12G5X#W4EVgx\x11\xcd\x03\x80<O\x06\x17#>3\xedg_\xb90
~\xff>/\xff{\xff>
\xff\x10\xebv

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

Disassemble:

	ORG	00000H

	RST 18H			;0000	DF 	. 
	LD BC,01718H		;0001	01 18 17 	. . . 
	LD D,015H		;0004	16 15 	. . 
	INC D			;0006	14 	. 
	DAA			;0007	27 	' 
	INC DE			;0008	13 	. 
	JR C,$+39		;0009	38 25 	8 % 
	SCF			;000B	37 	7 
	LD (DE),A			;000C	12 	. 
	LD B,A			;000D	47 	G 
	DEC (HL)			;000E	35 	5 
	LD E,B			;000F	58 	X 
	INC HL			;0010	23 	# 
	LD D,A			;0011	57 	W 
	INC (HL)			;0012	34 	4 
	LD B,L			;0013	45 	E 
	LD D,(HL)			;0014	56 	V 
	LD H,A			;0015	67 	G 
	LD A,B			;0016	78 	X 
	LD DE,003CDH		;0017	11 CD 03 	. . . 
	ADD A,B			;001A	80 	. 
	INC A			;001B	3C 	< 
	LD C,A			;001C	4F 	O 
	LD B,017H		;001D	06 17 	. . 
	INC HL			;001F	23 	# 
	LD A,033H		;0020	3E 33 	> 3 
	RRD		;0022	ED 67 	. G 
	LD E,A			;0024	5F 	_ 
	CP C			;0025	B9 	. 
	JR NC,$+12		;0026	30 0A 	0 . 
	LD A,(HL)			;0028	7E 	~ 
	RST 38H			;0029	FF 	. 
	LD A,02FH		;002A	3E 2F 	> / 
	RST 38H			;002C	FF 	. 
	LD A,E			;002D	7B 	{ 
	RST 38H			;002E	FF 	. 
	LD A,00AH		;002F	3E 0A 	> . 
	RST 38H			;0031	FF 	. 
	DJNZ $-19		;0032	10 EB 	. . 
	HALT			;0034	76 	V 

download

return to the top page