Squares Round 2 by *yuko*

%%j\xcd\x03\x808\x14\xd6 8\xf4O\x1eC\xe5\xf7%\xf7%\x1eC\xf7\xf7\xe1o\x18\xe7!\x00\xfe~,\xb7 \x07%\xf2,\x00j>
\xcdv\x7f\x18\xef\xe5\x06\x05\x1a\x0c\x0d(\x01\x13\xbe8\x01w},\x10\xf2\xe1\xc9 ___\x00|   |

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

Disassemble:

	ORG	00000H

	DEC H			;0000	25 	% 
	DEC H			;0001	25 	% 
	LD L,D			;0002	6A 	J 
	CALL 08003H		;0003	CD 03 80 	. . . 
	JR C,$+22		;0006	38 14 	8 . 
	SUB 020H		;0008	D6 20 	.   
	JR C,$-10		;000A	38 F4 	8 . 
	LD C,A			;000C	4F 	O 
	LD E,043H		;000D	1E 43 	. C 
	PUSH HL			;000F	E5 	. 
	RST 30H			;0010	F7 	. 
	DEC H			;0011	25 	% 
	RST 30H			;0012	F7 	. 
	DEC H			;0013	25 	% 
	LD E,043H		;0014	1E 43 	. C 
	RST 30H			;0016	F7 	. 
	RST 30H			;0017	F7 	. 
	POP HL			;0018	E1 	. 
	LD L,A			;0019	6F 	O 
	JR $-23		;001A	18 E7 	. . 
	LD HL,0FE00H		;001C	21 00 FE 	! . . 
	LD A,(HL)			;001F	7E 	~ 
	INC L			;0020	2C 	, 
	OR A			;0021	B7 	. 
	JR NZ,$+9		;0022	20 07 	  . 
	DEC H			;0024	25 	% 
	JP P,0002CH		;0025	F2 2C 00 	. , . 
	LD L,D			;0028	6A 	J 
	LD A,00AH		;0029	3E 0A 	> . 
	CALL 07F76H		;002B	CD 76 7F 	. V  
	JR $-15		;002E	18 EF 	. . 
	PUSH HL			;0030	E5 	. 
	LD B,005H		;0031	06 05 	. . 
	LD A,(DE)			;0033	1A 	. 
	INC C			;0034	0C 	. 
	DEC C			;0035	0D 	. 
	JR Z,$+3		;0036	28 01 	( . 
	INC DE			;0038	13 	. 
	CP (HL)			;0039	BE 	. 
	JR C,$+3		;003A	38 01 	8 . 
	LD (HL),A			;003C	77 	W 
	LD A,L			;003D	7D 	} 
	INC L			;003E	2C 	, 
	DJNZ $-12		;003F	10 F2 	. . 
	POP HL			;0041	E1 	. 
	RET			;0042	C9 	. 
	JR NZ,$+97		;0043	20 5F 	  _ 
	LD E,A			;0045	5F 	_ 
	LD E,A			;0046	5F 	_ 
	NOP			;0047	00 	. 
	LD A,H			;0048	7C 	| 
	JR NZ,$+34		;0049	20 20 	    
	JR NZ,$+126		;004B	20 7C 	  | 

download

return to the top page