c	DS 0
.G3:	CALL .GPC    
	MOV A,E 	
	CPI 32 
	JNC $GCH
	XRA A
	CMP C
	DCX H
	JNZ .G1
	PUSH H	 
	PUSH D	 
	LHLD IOtmp
	PUSH H
	LXI H,256
	PUSH H
	CALL read
	POP B
	POP B
	POP D
	MOV A,H
	ORA L
	POP H
	JNZ .G1    
	JMP $RM
.G1:	PUSH D
	PUSH H
	CALL h.
	INX H
	CALL q.
	DCX H
	XCHG
	LHLD IOtmp
	DAD D
	MOV B,M
	LXI H,IObin
	POP D
	DAD D
	MVI A,'b'
	CMP M
	JZ .G2
	MOV A,B
	CPI 13		
	JZ .G3
	CPI 26		
	JZ $RM
	ORA A
	JZ .G3
.G2:	MOV L,B
	MVI H,0
	RET
.GPC:	POP H
	POP B
	POP D
	PUSH D
	PUSH B
	PUSH H
	MOV A,E
	CPI 32	
	RNC
	CALL TM$
	LXI H,IOind
	DAD D
	DAD D
	MOV C,M
	INX H