Circle radius by *yuko*

\xcfDM\x0b\xaf\xf5\x18\x1c\xafgoT]\x06\x09\x19\x10\xfdO\x09\xcd\x03\x808\x08\xd600\xeeT]\xc9\xf60\x18v\xf1\x19\xce\x00\xf5\x0bx\xb1 \xf6\xe5\xcfH\xe1\xf1\x03\xedR\xde\x000\xf9\xeb\x09\xcb\x1c\xcb\x1d|\xd6^ \x05<\xe7!\x1eX\x01\xf6\xff7\xf5PX\x13\x098\xfc\xedB\xeb|\xb5{ \xf1\xe7\xf10\xfc>
\xe5

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

Disassemble:

	ORG	00000H

	RST 8			;0000	CF 	. 
	LD B,H			;0001	44 	D 
	LD C,L			;0002	4D 	M 
	DEC BC			;0003	0B 	. 
	XOR A			;0004	AF 	. 
	PUSH AF			;0005	F5 	. 
	JR $+30		;0006	18 1C 	. . 
	XOR A			;0008	AF 	. 
	LD H,A			;0009	67 	G 
	LD L,A			;000A	6F 	O 
	LD D,H			;000B	54 	T 
	LD E,L			;000C	5D 	] 
	LD B,009H		;000D	06 09 	. . 
	ADD HL,DE			;000F	19 	. 
	DJNZ $-1		;0010	10 FD 	. . 
	LD C,A			;0012	4F 	O 
	ADD HL,BC			;0013	09 	. 
	CALL 08003H		;0014	CD 03 80 	. . . 
	JR C,$+10		;0017	38 08 	8 . 
	SUB 030H		;0019	D6 30 	. 0 
	JR NC,$-16		;001B	30 EE 	0 . 
	LD D,H			;001D	54 	T 
	LD E,L			;001E	5D 	] 
	RET			;001F	C9 	. 
	OR 030H		;0020	F6 30 	. 0 
	JR $+120		;0022	18 76 	. V 
	POP AF			;0024	F1 	. 
	ADD HL,DE			;0025	19 	. 
	ADC A,000H		;0026	CE 00 	. . 
	PUSH AF			;0028	F5 	. 
	DEC BC			;0029	0B 	. 
	LD A,B			;002A	78 	X 
	OR C			;002B	B1 	. 
	JR NZ,$-8		;002C	20 F6 	  . 
	PUSH HL			;002E	E5 	. 
	RST 8			;002F	CF 	. 
	LD C,B			;0030	48 	H 
	POP HL			;0031	E1 	. 
	POP AF			;0032	F1 	. 
	INC BC			;0033	03 	. 
	SBC HL,DE		;0034	ED 52 	. R 
	SBC A,000H		;0036	DE 00 	. . 
	JR NC,$-5		;0038	30 F9 	0 . 
	EX DE,HL			;003A	EB 	. 
	ADD HL,BC			;003B	09 	. 
	RR H		;003C	CB 1C 	. . 
	RR L		;003E	CB 1D 	. . 
	LD A,H			;0040	7C 	| 
	SUB 05EH		;0041	D6 5E 	. ^ 
	JR NZ,$+7		;0043	20 05 	  . 
	INC A			;0045	3C 	< 
	RST 20H			;0046	E7 	. 
	LD HL,0581EH		;0047	21 1E 58 	! . X 
	LD BC,0FFF6H		;004A	01 F6 FF 	. . . 
	SCF			;004D	37 	7 
	PUSH AF			;004E	F5 	. 
	LD D,B			;004F	50 	P 
	LD E,B			;0050	58 	X 
	INC DE			;0051	13 	. 
	ADD HL,BC			;0052	09 	. 
	JR C,$-2		;0053	38 FC 	8 . 
	SBC HL,BC		;0055	ED 42 	. B 
	EX DE,HL			;0057	EB 	. 
	LD A,H			;0058	7C 	| 
	OR L			;0059	B5 	. 
	LD A,E			;005A	7B 	{ 
	JR NZ,$-13		;005B	20 F1 	  . 
	RST 20H			;005D	E7 	. 
	POP AF			;005E	F1 	. 
	JR NC,$-2		;005F	30 FC 	0 . 
	LD A,00AH		;0061	3E 0A 	> . 
	PUSH HL			;0063	E5 	. 

download

return to the top page