	.Z80
	CSEG
P.61:
	DEFB	'Illegal option %c'
	DEFB	10
	DEFB	0
P.70:
	DEFB	'Usage: TX -v -n filename [filename...]'
	DEFB	10
	DEFB	0
P.71:
	DEFB	'or:    TX -e'
	DEFB	10
	DEFB	0
P.85:
	DEFB	'r'
	DEFB	0
P.89:
	DEFB	'Can'
	DEFB	39
	DEFB	't open file %s'
	DEFB	10
	DEFB	0
P.95:
	DEFB	10
	DEFB	'Transmit %s ? (Yes/No/Quit/All) [N] '
	DEFB	0
P.113:
	DEFB	10
	DEFB	'Transmitting %s'
	DEFB	10
	DEFB	0
P.119:
	DEFB	0
P.121:
	DEFB	10
	DEFB	'EOT signalled'
	DEFB	0
	EXTRN	?NFILE
	EXTRN	?IOB
	EXTRN	GETFFN
	EXTRN	GETNFN
	EXTRN	TX1
	EXTRN	PRINTF
	EXTRN	EXIT
	EXTRN	STRCPY
	EXTRN	FOPEN
	EXTRN	FCLOSE
	EXTRN	?ABDOS
	EXTRN	?BDOS
	EXTRN	TOUPPE
	.REQUEST CFF
	.REQUEST ECC,EC2
$START:	CALL	$INIT##
	JP	$ARGV##
MAIN::
	ADD	HL,SP
	POP	BC
	EX	DE,HL
	LD	HL,-502
	ADD	HL,SP
	LD	SP,HL
	PUSH	BC
	PUSH	DE
	LD	HL,0
	EX	DE,HL
	LD	HL,13
	ADD	HL,SP
	LD	(HL),E
	INC	HL
	LD	(HL),D
	EX	DE,HL
	LD	HL,1
	EX	DE,HL
	LD	HL,11
	ADD	HL,SP
	LD	(HL),E
	INC	HL
	LD	(HL),D
	EX	DE,HL
	LD	HL,0
	EX	DE,HL
	LD	HL,9
	ADD	HL,SP
	LD	(HL),E
	INC	HL
	LD	(HL),D
	EX	DE,HL
	LD	HL,0
	EX	DE,HL
	LD	HL,7
	ADD	HL,SP
	LD	(HL),E
	INC	HL
	LD	(HL),D
	EX	DE,HL
L.28:
	LD	HL,506
	ADD	HL,SP
	LD	E,(HL)
	INC	HL
	LD	D,(HL)
	DEC	DE
	LD	(HL),D
	DEC	HL
	LD	(HL),E
	EX	DE,HL
	LD	A,L
	OR	H
	JR	Z,I.1
	LD	A,H
	RLA
	CCF
I.1:	CALL	$GT##
	CALL	$AOI##
	LD	A,L
	OR	H
	JP	Z,L.31
	LD	HL,508
	ADD	HL,SP
	LD	A,2 MOD 256
	ADD	A,(HL)
	LD	(HL),A
	LD	E,A
	INC	HL
	LD	A,2/256
	ADC	A,(HL)
	LD	(HL),A
	LD	H,A
	LD	L,E
	LD	A,(HL)
	INC	HL
	LD	H,(HL)
	LD	L,A
	LD	L,(HL)
	LD	H,0
	LD	DE,45
	CALL	$SCPI##
	CALL	$EQU##

	CALL	$AOI##
L.31:
	LD	A,L
	OR	H
	JP	Z,L.36
	LD	HL,508
	ADD	HL,SP
	LD	A,(HL)
	INC	HL
	LD	H,(HL)
	LD	L,A
	LD	A,(HL)
	INC	HL
	LD	H,(HL)
	LD	L,A
	INC	HL
	EX	DE,HL
	LD	HL,16
	ADD	HL,SP
	LD	(HL),E
	INC	HL
	LD	(HL),D
	EX	DE,HL
L.44:
	LD	HL,16
	ADD	HL,SP
	LD	A,(HL)
	INC	HL
	LD	H,(HL)
	LD	L,A
	LD	L,(HL)
	LD	H,0
	LD	A,L
	OR	H
	JP	Z,L.45
	JP	L.43
L.47:
	LD	HL,16
	ADD	HL,SP
	INC	(HL)
	JR	NZ,I.2
	INC	HL
	INC	(HL)
I.2:
	JP	L.44
L.43:
	LD	HL,16
	ADD	HL,SP
	LD	A,(HL)
	INC	HL
	LD	H,(HL)
	LD	L,A
	LD	L,(HL)
	LD	H,0
	EX	DE,HL
	JP	L.49
L.51:
	LD	HL,1
	EX	DE,HL
	LD	HL,13
	ADD	HL,SP
	LD	(HL),E
	INC	HL
	LD	(HL),D
	EX	DE,HL
	JP	L.48
L.54:
	LD	HL,0
	EX	DE,HL
	LD	HL,11
	ADD	HL,SP
	LD	(HL),E
	INC	HL
	LD	(HL),D
	EX	DE,HL
	JP	L.48
L.57:
	LD	HL,1
	EX	DE,HL
	LD	HL,9
	ADD	HL,SP
	LD	(HL),E
	INC	HL
	LD	(HL),D
	EX	DE,HL
	JP	L.48
L.59:
	LD	HL,P.61
	PUSH	HL
	LD	HL,18
	ADD	HL,SP
	LD	A,(HL)
	INC	HL
	LD	H,(HL)
	LD	L,A
	LD	L,(HL)
	LD	H,0
	PUSH	HL
	LD	HL,2
	ADD	HL,SP
	LD	A,(HL)
	INC	HL
	LD	H,(HL)
	LD	L,A
	PUSH	HL
	LD	HL,8
	CALL	PRINTF
	LD	HL,0
	EX	DE,HL
	LD	HL,506
	ADD	HL,SP
	LD	(HL),E
	INC	HL
	LD	(HL),D
	EX	DE,HL
	LD	HL,0
	EX	DE,HL
	LD	HL,9
	ADD	HL,SP
	LD	(HL),E
	INC	HL
	LD	(HL),D
	EX	DE,HL
	JP	L.48
	JP	L.48
L.49:
	LD	HL,-69
	OR	A
	ADC	HL,DE
	JP	Z,L.57
	LD	HL,-78
	OR	A
	ADC	HL,DE
	JP	Z,L.54
	LD	HL,-86
	OR	A
	ADC	HL,DE
	JP	Z,L.51
	JP	L.59
L.48:
	JP	L.47
L.45:
	JP	L.28
L.36:
	LD	HL,506
	ADD	HL,SP
	LD	A,(HL)
	INC	HL
	LD	H,(HL)
	LD	L,A
	LD	A,L
	OR	H
	JP	NZ,L.65
	LD	HL,9
	ADD	HL,SP
	LD	A,(HL)
	INC	HL
	LD	H,(HL)
	LD	L,A
	LD	A,L
	OR	H
	JP	Z,L.66
	LD	HL,1
	EX	DE,HL
	LD	HL,11
	ADD	HL,SP
	LD	(HL),E
	INC	HL
	LD	(HL),D
	EX	DE,HL
	JP	L.68
L.66:
	LD	HL,P.70
	PUSH	HL
	LD	HL,4
	CALL	PRINTF
	LD	HL,P.71
	PUSH	HL
	LD	HL,4
	CALL	PRINTF
	LD	HL,1
	PUSH	HL
	LD	HL,4
	CALL	EXIT
L.68:
L.65:
	LD	HL,506
	ADD	HL,SP
	LD	A,(HL)
	INC	HL
	LD	H,(HL)
	LD	L,A
	EX	DE,HL
	LD	HL,20
	ADD	HL,SP
	LD	(HL),E
	INC	HL
	LD	(HL),D
	EX	DE,HL
	LD	HL,26
	ADD	HL,SP
	EX	DE,HL
	LD	HL,24
	ADD	HL,SP
	LD	(HL),E
	INC	HL
	LD	(HL),D
	EX	DE,HL
L.74:
	LD	HL,506
	ADD	HL,SP
	LD	E,(HL)
	INC	HL
	LD	D,(HL)
	PUSH	DE
	DEC	DE
	LD	(HL),D
	DEC	HL
	LD	(HL),E
	POP	HL
	LD	A,L
	OR	H
	JP	Z,L.75
	LD	HL,508
	ADD	HL,SP
	LD	A,(HL)
	LD	E,A
	ADD	A,2 MOD 256
	LD	(HL),A
	INC	HL
	LD	A,(HL)
	LD	D,A
	ADC	A,2/256
	LD	(HL),A
	EX	DE,HL
	LD	A,(HL)
	INC	HL
	LD	H,(HL)
	LD	L,A
	PUSH	HL
	LD	HL,26
	ADD	HL,SP
	LD	A,(HL)
	INC	HL
	LD	H,(HL)
	LD	L,A
	PUSH	HL
	LD	HL,6
	CALL	STRCPY
	EX	DE,HL
	LD	HL,15
	ADD	HL,DE
	EX	DE,HL
	LD	HL,24
	ADD	HL,SP
	LD	(HL),E
	INC	HL
	LD	(HL),D
	EX	DE,HL
	JP	L.74
L.75:
	LD	HL,26
	ADD	HL,SP
	EX	DE,HL
	LD	HL,24
	ADD	HL,SP
	LD	(HL),E
	INC	HL
	LD	(HL),D
	EX	DE,HL
L.78:
	LD	HL,7
	ADD	HL,SP
	LD	A,(HL)
	INC	HL
	LD	H,(HL)
	LD	L,A
	CALL	$LNI##
	CALL	$AOI##
	LD	A,L
	OR	H
	JP	Z,L.79
	LD	HL,20
	ADD	HL,SP
	LD	E,(HL)
	INC	HL
	LD	D,(HL)
	PUSH	DE
	DEC	DE
	LD	(HL),D
	DEC	HL
	LD	(HL),E
	POP	HL
	CALL	$AOI##
L.79:
	LD	A,L
	OR	H
	JP	Z,L.80
	LD	HL,24
	ADD	HL,SP
	LD	A,(HL)
	INC	HL
	LD	H,(HL)
	LD	L,A
	PUSH	HL
	LD	HL,4
	CALL	GETFFN
	EX	DE,HL
	LD	HL,22
	ADD	HL,SP
	LD	(HL),E
	INC	HL
	LD	(HL),D
	EX	DE,HL
L.81:
	LD	HL,P.85
	PUSH	HL
	LD	HL,24
	ADD	HL,SP
	LD	A,(HL)
	INC	HL
	LD	H,(HL)
	LD	L,A
	PUSH	HL
	LD	HL,6
	CALL	FOPEN
	EX	DE,HL
	LD	HL,18
	ADD	HL,SP
	LD	(HL),E
	INC	HL
	LD	(HL),D
	EX	DE,HL
	LD	A,L
	OR	H
	JP	NZ,L.87
	LD	HL,P.89
	PUSH	HL
	LD	HL,26
	ADD	HL,SP
	LD	A,(HL)
	INC	HL
	LD	H,(HL)
	LD	L,A
	PUSH	HL
	LD	HL,2
	ADD	HL,SP
	LD	A,(HL)
	INC	HL
	LD	H,(HL)
	LD	L,A
	PUSH	HL
	LD	HL,8
	CALL	PRINTF
	JP	L.90
L.87:
	LD	HL,18
	ADD	HL,SP
	LD	A,(HL)
	INC	HL
	LD	H,(HL)
	LD	L,A
	PUSH	HL
	LD	HL,4
	CALL	FCLOSE
	LD	HL,1
	EX	DE,HL
	LD	HL,5
	ADD	HL,SP
	LD	(HL),E
	INC	HL
	LD	(HL),D
	EX	DE,HL
	LD	HL,13
	ADD	HL,SP
	LD	A,(HL)
	INC	HL
	LD	H,(HL)
	LD	L,A
	LD	A,L
	OR	H
	JP	Z,L.93
L.94:
	LD	HL,P.95
	PUSH	HL
	LD	HL,24
	ADD	HL,SP
	LD	A,(HL)
	INC	HL
	LD	H,(HL)
	LD	L,A
	PUSH	HL
	LD	HL,2
	ADD	HL,SP
	LD	A,(HL)
	INC	HL
	LD	H,(HL)
	LD	L,A
	PUSH	HL
	LD	HL,8
	CALL	PRINTF
	LD	HL,78
	PUSH	HL
	LD	HL,4
	CALL	@GC
	LD	L,(HL)
	LD	H,0
	EX	DE,HL
	LD	HL,15
	ADD	HL,SP
	LD	(HL),E
	LD	L,(HL)
	LD	H,0
	EX	DE,HL
	JP	L.99
L.101:
	LD	HL,1
	EX	DE,HL
	LD	HL,7
	ADD	HL,SP
	LD	(HL),E
	INC	HL
	LD	(HL),D
	EX	DE,HL
L.104:
	LD	HL,0
	EX	DE,HL
	LD	HL,5
	ADD	HL,SP
	LD	(HL),E
	INC	HL
	LD	(HL),D
	EX	DE,HL
	JP	L.98
L.107:
	LD	HL,0
	EX	DE,HL
	LD	HL,13
	ADD	HL,SP
	LD	(HL),E
	INC	HL
	LD	(HL),D
	EX	DE,HL
L.110:
	JP	L.98
L.111:
	JP	L.94
	JP	L.98
L.99:
	LD	HL,-89
	OR	A
	ADC	HL,DE
	JP	Z,L.110
	LD	HL,-65
	OR	A
	ADC	HL,DE
	JP	Z,L.107
	LD	HL,-78
	OR	A
	ADC	HL,DE
	JP	Z,L.104
	LD	HL,-81
	OR	A
	ADC	HL,DE
	JP	Z,L.101
	JP	L.111
L.98:
L.93:
	LD	HL,5
	ADD	HL,SP
	LD	A,(HL)
	INC	HL
	LD	H,(HL)
	LD	L,A
	LD	A,L
	OR	H
	JP	Z,L.112
	LD	HL,P.113
	PUSH	HL
	LD	HL,24
	ADD	HL,SP
	LD	A,(HL)
	INC	HL
	LD	H,(HL)
	LD	L,A
	PUSH	HL
	LD	HL,2
	ADD	HL,SP
	LD	A,(HL)
	INC	HL
	LD	H,(HL)
	LD	L,A
	PUSH	HL
	LD	HL,8
	CALL	PRINTF
	LD	HL,22
	ADD	HL,SP
	LD	A,(HL)
	INC	HL
	LD	H,(HL)
	LD	L,A
	PUSH	HL
	LD	HL,4
	CALL	TX1
L.112:
L.90:
L.82:
	LD	HL,7
	ADD	HL,SP
	LD	A,(HL)
	INC	HL
	LD	H,(HL)
	LD	L,A
	CALL	$LNI##
	CALL	$AOI##
	LD	A,L
	OR	H
	JP	Z,L.114
	LD	HL,2
	CALL	GETNFN
	EX	DE,HL
	LD	HL,22
	ADD	HL,SP
	LD	(HL),E
	INC	HL
	LD	(HL),D
	EX	DE,HL
	CALL	$AOI##
L.114:
	LD	A,L
	OR	H
	JP	Z,L.83
	JP	L.81
L.83:
	LD	HL,24
	ADD	HL,SP
	LD	E,(HL)
	INC	HL
	LD	D,(HL)
	LD	HL,15
	ADD	HL,DE
	EX	DE,HL
	LD	HL,24
	ADD	HL,SP
	LD	(HL),E
	INC	HL
	LD	(HL),D
	EX	DE,HL
	JP	L.78
L.80:
	LD	HL,11
	ADD	HL,SP
	LD	A,(HL)
	INC	HL
	LD	H,(HL)
	LD	L,A
	LD	A,L
	OR	H
	JP	Z,L.118
	LD	HL,P.119
	PUSH	HL
	LD	HL,4
	CALL	TX1
	LD	HL,P.121
	PUSH	HL
	LD	HL,4
	CALL	PRINTF
L.118:
	JP	$RTNV##
@GC::
	ADD	HL,SP
	POP	BC
	EX	DE,HL
	LD	HL,-3
	ADD	HL,SP
	LD	SP,HL
	PUSH	BC
	PUSH	DE
L.125:
	LD	HL,255
	PUSH	HL
	LD	HL,6
	PUSH	HL
	LD	HL,6
	CALL	?ABDOS
	EX	DE,HL
	LD	HL,5
	ADD	HL,SP
	LD	(HL),E
	INC	HL
	LD	(HL),D
	EX	DE,HL
	CALL	$LNI##
	LD	A,L
	OR	H
	JP	Z,L.130
	JP	L.125
L.130:
	LD	HL,5
	ADD	HL,SP
	LD	A,(HL)
	INC	HL
	LD	H,(HL)
	LD	L,A
	LD	DE,13
	CALL	$SCPI##
	JP	NZ,L.132
	LD	HL,7
	ADD	HL,SP
	LD	A,(HL)
	INC	HL
	LD	H,(HL)
	LD	L,A
	EX	DE,HL
	LD	HL,5
	ADD	HL,SP
	LD	(HL),E
	INC	HL
	LD	(HL),D
	EX	DE,HL
L.132:
	LD	HL,5
	ADD	HL,SP
	LD	A,(HL)
	INC	HL
	LD	H,(HL)
	LD	L,A
	PUSH	HL
	LD	HL,4
	CALL	TOUPPE
	EX	DE,HL
	LD	HL,5
	ADD	HL,SP
	LD	(HL),E
	INC	HL
	LD	(HL),D
	EX	DE,HL
	PUSH	HL
	LD	HL,6
	PUSH	HL
	LD	HL,6
	CALL	?BDOS
	LD	HL,5
	ADD	HL,SP
	LD	A,(HL)
	INC	HL
	LD	H,(HL)
	LD	L,A
	EX	DE,HL
	LD	HL,4
	ADD	HL,SP
	LD	(HL),E
	JP	$RTNS##
	END	$START

	ADD	HL,SP
	LD	A,(HL)
	INC	HL
	LD	H,(HL)
	LD	L,A
	EX	DE,HL
	LD	HL,4
	