Mold Sort by McBusLuck

\x062\x0e9\x1e9\xcd\x03\x80\x12\x1c\xfe
 \xf7\xc5\x1e9k\x1aF\xcbg(\x0b\xcb`(\x07\xb88\x04\xeb\x12p\xeb, \xec\x1c \xe8\xc1\x1e9\x1a\xcd\x00\x80\x1c\xfe
 \xf7\x10\xccv

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

Disassemble:

	ORG	00000H

	LD B,032H		;0000	06 32 	. 2 
	LD C,039H		;0002	0E 39 	. 9 
	LD E,039H		;0004	1E 39 	. 9 
	CALL 08003H		;0006	CD 03 80 	. . . 
	LD (DE),A			;0009	12 	. 
	INC E			;000A	1C 	. 
	CP 00AH		;000B	FE 0A 	. . 
	JR NZ,$-7		;000D	20 F7 	  . 
	PUSH BC			;000F	C5 	. 
	LD E,039H		;0010	1E 39 	. 9 
	LD L,E			;0012	6B 	K 
	LD A,(DE)			;0013	1A 	. 
	LD B,(HL)			;0014	46 	F 
	BIT 4,A		;0015	CB 67 	. G 
	JR Z,$+13		;0017	28 0B 	( . 
	BIT 4,B		;0019	CB 60 	. ` 
	JR Z,$+9		;001B	28 07 	( . 
	CP B			;001D	B8 	. 
	JR C,$+6		;001E	38 04 	8 . 
	EX DE,HL			;0020	EB 	. 
	LD (DE),A			;0021	12 	. 
	LD (HL),B			;0022	70 	P 
	EX DE,HL			;0023	EB 	. 
	INC L			;0024	2C 	, 
	JR NZ,$-18		;0025	20 EC 	  . 
	INC E			;0027	1C 	. 
	JR NZ,$-22		;0028	20 E8 	  . 
	POP BC			;002A	C1 	. 
	LD E,039H		;002B	1E 39 	. 9 
	LD A,(DE)			;002D	1A 	. 
	CALL 08000H		;002E	CD 00 80 	. . . 
	INC E			;0031	1C 	. 
	CP 00AH		;0032	FE 0A 	. . 
	JR NZ,$-7		;0034	20 F7 	  . 
	DJNZ $-50		;0036	10 CC 	. . 
	HALT			;0038	76 	V 
To protect the system from spam, please input your favorite sport (hint: I believe its name must start with 'g', case insensitive)

download

return to the top page