[comp.lang.apl] Device Driver: from Apple III BASIC to IBM BASIC

ttsung@csduts1.lerc.nasa.gov (Amy Sung) (07/12/90)

Hi, everybody,

	I have an example device driver program written in BASIC for Apple III
	computer and need to translate it into IBM code.  

	I am not an Apple-BASICer, so can someone out there tell me what the
	equivalence code is in IBM-BASIC.  Thanks in advance.

	// DETERMINE RS232 STATUS.
	..
	2100	INVOKE"REQUEST.INV":C=1	
	2220	R$=".RS232"			// GET INITIAL RS232 STATUS
	2240	OPEN #1,R$
	..
	2340	PERFORM STATUS(%C,@S$)R$	// GET RS232 STATUS
	..
	2400	PERFORM CONTROL(%C, @S$)R$
	......
.
--
\amy
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
Amy H. Sung
2001 Areospace Parkway			phone: 216 891-2922