ORG 	F000H
;       << ZAPPLE 2-K V 100R MASKED ROM MONITOR SYSTEM >>
; disassembly in TDL Z80 & Intel 8080 menmonics
	JMP	BEGIN
	JMP	0F619H
	JMP	0F636H
	JMP	0F48AH
	JMP	0F4C4H
	JMP	0F4ABH
	JMP	0F51AH
	IN	076H	;IOBYTE
	RET
	JMP	0F11DH
	JMP	0F5ACH
	JMP	0F6BEH
MSG:	
	DB	0DH,0AH,0,0,0
	DB	'Zapple V1.0R'
BEGIN:	
	MVI	A,'S'
	OUT	'p'
	OUT	'r'
	OUT	't'
	MVI	A,'Q'
	OUT	'p'
	OUT	'r'
	DCR	A
	OUT	't'
	XRA	A
	OUT	'w'
	OUT	'z'
	DCR	A
	OUT	'v'
	MVI	A,4
	OUT	'w'
	IN	'z'
	OUT	'v'
	MVI	A,0F8H
	STAI
	LXI	SP,0F05BH
	JMP	0F5BAH
	MOV	E,A
	RP
AHEAD:	
	SPHL
	XCHG
	LXI	B,0023H
	LXI	H,0F7A8H
	LDIR
	XCHG
	LXI	B,0FFA1H
	DAD	B
	PUSH	H
	LXI	H,0000H
	MVI	B,0AH
STKIT:	
	PUSH	H
	DJNZ	STKIT
HELLO:	
	MVI	B,11H
	CALL	0F44FH
START:	
	LXI	D,START
	PUSH	D
	CALL	0F512H
	MVI	C,'>'
	CALL	0F48AH
STAR0:	
	CALL	0F736H
	ANI	7FH
	JRZ	STAR0
	SUI	'A'
	RM
	CPI	1AH
	RNC
	ADD	A
	LXI	H,0F0A2H
	ADD	L
	MOV	L,A
	MOV	A,M
	INX	H
	MOV	H,M
	MOV	L,A
	MVI	C,2
	PCHL
TBL:	
	DW	ASSIGN
	DW	0F121H
	DW	0F14EH
	DW	0F16FH
	DW	0F186H
	DW	0F1A2H
	DW	0F1AFH
	DW	0F57EH
	DW	0F81BH
	DW	0F1FDH
	DW	0F81EH
	DW	0F681H
	DW	0F21BH
	DW	0F4F8H
	DW	0F821H
	DW	0F12FH
	DW	0F757H
	DW	0F226H
	DW	0F2DFH
	DW	0F308H
	DW	0F4E0H
	DW	0F782H
	DW	0F370H
	DW	0F3B0H
	DW	0F328H
	DW	0F47BH
ASSIGN:	
	CALL	0F736H
	LXI	H,0F794H
	LXI	B,0400H
	LXI	D,0005H
A0:	
	CMP	M
	JRZ	A1
	DAD	D
	INR	C
	DJNZ	A0
	JMPR	ERR
A1:	
	MOV	E,C
A2:	
	CALL	0F736H
	CPI	'='
	JRNZ	A2
	CALL	0F736H
	LXI	B,0400H
A3:	
	INX	H
	CMP	M
	JRZ	A4
	INR	C
	DJNZ	A3
ERR:	
	JMP	0F464H
A4:	
	MVI	A,3
	INR	E
A5:	
	DCR	E
	JRZ	A6
	SLAR	C
	SLAR	C
	RAL
	RAL
	JMPR	A5
A6:	
	CMA
	MOV	D,A
A7:	
	CALL	0F60AH
	JRNC	A7
	IN	'v'
	ANA	D
	ORA	C
	MOV	C,A
	
	END