plastic constant by ySas

\xf7AezJ\xc8\xa5w\xa7\x93X\xc9<;\xb8w\xab<\xa6s\xa6w78\x9c4\xa6f\x97\x86sH865\xb5\xab\x84W\x88z\x8cs\x87\x9c\xc6z\xcbJ\xba[\x00#\xaf\xedo\xc5\xeb \x01v\xc6-

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

Disassemble:

	ORG	00000H

	RST 30H			;0000	F7 	. 
	LD B,C			;0001	41 	A 
	LD H,L			;0002	65 	E 
	LD A,D			;0003	7A 	Z 
	LD C,D			;0004	4A 	J 
	RET Z			;0005	C8 	. 
	AND L			;0006	A5 	. 
	LD (HL),A			;0007	77 	W 
	AND A			;0008	A7 	. 
	SUB E			;0009	93 	. 
	LD E,B			;000A	58 	X 
	RET			;000B	C9 	. 
	INC A			;000C	3C 	< 
	DEC SP			;000D	3B 	; 
	CP B			;000E	B8 	. 
	LD (HL),A			;000F	77 	W 
	XOR E			;0010	AB 	. 
	INC A			;0011	3C 	< 
	AND (HL)			;0012	A6 	. 
	LD (HL),E			;0013	73 	S 
	AND (HL)			;0014	A6 	. 
	LD (HL),A			;0015	77 	W 
	SCF			;0016	37 	7 
	JR C,$-98		;0017	38 9C 	8 . 
	INC (HL)			;0019	34 	4 
	AND (HL)			;001A	A6 	. 
	LD H,(HL)			;001B	66 	F 
	SUB A			;001C	97 	. 
	ADD A,(HL)			;001D	86 	. 
	LD (HL),E			;001E	73 	S 
	LD C,B			;001F	48 	H 
	JR C,$+56		;0020	38 36 	8 6 
	DEC (HL)			;0022	35 	5 
	OR L			;0023	B5 	. 
	XOR E			;0024	AB 	. 
	ADD A,H			;0025	84 	. 
	LD D,A			;0026	57 	W 
	ADC A,B			;0027	88 	. 
	LD A,D			;0028	7A 	Z 
	ADC A,H			;0029	8C 	. 
	LD (HL),E			;002A	73 	S 
	ADD A,A			;002B	87 	. 
	SBC A,H			;002C	9C 	. 
	ADD A,07AH		;002D	C6 7A 	. Z 
	BIT 1,D		;002F	CB 4A 	. J 
	CP D			;0031	BA 	. 
	LD E,E			;0032	5B 	[ 
	NOP			;0033	00 	. 
	INC HL			;0034	23 	# 
	XOR A			;0035	AF 	. 
	RLD		;0036	ED 6F 	. O 
	PUSH BC			;0038	C5 	. 
	EX DE,HL			;0039	EB 	. 
	JR NZ,$+3		;003A	20 01 	  . 
	HALT			;003C	76 	V 
	ADD A,02DH		;003D	C6 2D 	. - 

download

return top