Figure E-2 /8085 Assembly Language Program | Intel 9800758-02

BASIC-SO	Calling Non-BASIC-SO Subroutines

ASN8B.OY3	:Fl:USRASH.ASH
ISIS-II 8181/8185 "ACRO		ASSEHBLER. Y2.1	USRAS"	PACE
Lce 09J	SEQ	SOURCE STATE"ENT

1ASSE"BLER ROUTINE TO TEST BASIC USR

3RESULT=ARGA+ARCB+ARCC

4IGNORE OVERFLOW

			S		NAHE
			6		NAHE
			7		PUBLIC
			8		CSEC
BBIS	El		9	USRAS .. :	POP	H	;RETURN		AOOR
BBBI	229BBB	D	IB		SHLO	RETADR	;5ET	ASIDE
BSB4	21BBBB		11		LX I	H.8	; SET TCTAL TO 8
BSB?	COICBB	C	12		CALL	AODDE	iAOD	ARCC		TO. TOTAL
BIBA	5B		13		"CY	D.B	i"OVE AOOR o.F ARCB TO DE
IBBB	59		14		"Cy	E.C	iAOD	ARCB		TO.	To.TAL
BBBC	COICBI	C	15		CALL	ADDDE	iAOD	ARCB		TO.	To.TAL
BBBF	01		16		PCP	o	; ADDRESS			OF	ARG.A
BBl8	CDICBB	C	17		CALL	AODOE	iADD	AReA		TO.	To.TAL
B813	EB		18		XCHG		;TOTAL		IN	DE
BB14	El		19		PCP	H	JADDR	o.F		RESULT
BUS	73		2B		"CY	PI. E	;LOW	BYTE		OF	RESULT
B81'	23		21		INX	H
BB17	72	o	22		"CY	H,D	;HI BYTE			OF	RESULT
BU8	2AIBBB	o	23		LHLD	RE"TADR	; RETURN		ADDRESS
BBlB	E9		24		PCHL	; RETURN
			25	ADD 2 BVTES ADDRESSED BY DE TO HL
			26	ADD 2 BVTES ADDRESSED BY DE TO HL
			27		CHANCES A.D,E.H,L
BIIC	E5		28	ROODE:	PUSH	H	;SAVE	TOTAL
BII0	EB		29		XCHG		;AODR	IN		L
BIlE	5E		38		"o.Y	E.H	;LOW BYTE TO BE ADDED
BI IF	23		31		IN X	H	;HI BVTE TO. BE ADDED
B82B	5'		32		HOV	0,"	;HI BVTE TO. BE ADDED
8121	El		33		PCP	H	;OLO	TOTAL
B822	19		34		DAD	o	; ADD	TO	TOTAL
B823	C9		3S		RET
			36	DATA	AREA
			37		OSEG		;SAVED		RETURN ADDRESS
BBBB	88BB		38	RETAOR:	OW	B	;SAVED		RETURN ADDRESS
BBBB		C	39		END	USRASH
PUBLIC	SYMBOLS
USRASH	C BBBB

EXTERNAL SY"BCLS

USER S'/HBOLS

AODDE C BBIC RETAOR 0 BIBB USRAS" C BBBS

ASSE"BLY CO .. PLETE. NO ERRORS

Figure E-2. 8080/8085 Assembly Language Program

E-5

Image 91

Intel 9800758-02 manual Figure E-2 /8085 Assembly Language Program

Contents

BASIC-SO Reference Manual A108/0979/7500 FL Preface Page Contents Illustrations Invoking BASIC-80 Chapter Introduction to BASIC-80 Filename ExamplesIntroduction to BASIC-80 Basic filename MEMTOPaddress Deleting a File Listing the Directory of a DiskRenaming a File Changing File Attributes Save LP ,A You can now run, list, or edit the program Statements Commands BASIC-80 Statements BASIC-80 Commands Contd BASIC-80 Functions BASIC-80 Statements Contd BASIC-80 Functions Contd Functions Representing Data Hexadecimal Integer Constants ConstantsInteger Constants Decimal Integer Constants Single-Precision Floating-Point Constants Octal Integer ConstantsDouble-Precision Floating-Point Constants $ = Enter next data string String ConstantsString Variables This is a string constant YI,1 L4! = Csng l4 String Arrays BASIC-SO Operators in Order of Precedence Contd Arithmetic Operators String Expressions Logical OperatorsString Operator Numeric Expressions Entering and Editing Programs 30 A--=8xx*522537 Control-R a = 8*37 30 A=8*5230 A=8 30 A=8*52 30 A=8*37 If AB then SubcommandCommand 3D press 3, then D results Integer D If AB then 120 Else Null SET At this point, the other editing subcommands may be used Syntax of the X subcommand is Print Undefined SET. Enter a L Print Undefined SET The E subcommand is enteredInteger C character character Move the cursor to PRINT. Enter 2C RE L Syntax Error Messages BASIC-80 Error MessagesOverflow, Underflow, and Divide-by-Zero Error Trapping Trace Facility If line 40 is replaced with Error SimulationError Handling Restarting Program Execution Open 1,#1,F1DATES Opening a Sequential File If executed four times, it would read all eight values Refer to for further details of Print UsingWriting to a Sequential File Reading from a Sequential File Value of R$ would be Closing a Sequential File Defining a Random 1/0 Field-FIELD BuffersField #3, 20 AS N$ Field #3, 20 AS N$, 9 AS SS$ Disk File Input/Output To read the next record Opening and Closing a Random Disk FileReading from a Random 1/0 File Any of the parameters can be variables Double-precision value Writing to a Random 1/0 FileInteger Single-precision value MKI$ Clear expression,address Attrib Fdrive numberfilename, W1Attrib Fdrive numberfilename, WO Auto first lineJ, increment Close Commands and Statements Rules for function name are the same as for variable name DEF FNX Defsng Defdbl Defstr Defint Delete DIM END ErrorDIR Edit FOR-NEXT-STEP Error expressionExit Field GET I file number ,record number GETGosub For variable=expression to expression Step expression Input IF-THEN-ELSEGoto List KillLET Line Input Load LSET, Rset NEW Merge 9 16 Next On ... Goto On ... GosubOpen OUT Option BasePoke Print Print UsingString Fields If X$=SEVEN and Y$=EIGHT, the results of line 40 would be Numeric fields PUT Prun Read Randomize REM Return Resume 60 END SaveRUN line numberlstring expression ,F Line number RUN filename ? 5,8,2 TRON, Troff Width Wait ATN ABS Cint CHR$Functions AO/o = CsngCVI CVS 10 A# = 1.00/3.00 EOF Dskf Ok· FIX INP HexsInputs Instr INTLEFT$ LOG LENLOC LOF MKI$ MKS$ MKD$ MID$OCT$ RIGHT$ string,integer RightsPeek expression POS integer 10 a =1 SGNSIN Spaces SQRexpression SPCSPC integer If A$ = 2 then Print Correct Else Goto TAB expression STR$ expressionTAN expression 60 AO/o = Here is an example of how the USRn statement is used Table A-I. BASIC-80 Error Codes Appendix a BASIC-SO Error Codes Table A-I. BASIC-SO Error Codes Contd Appendix B BASIC-SO Reserved Words Page To resume program execution after it is stopped by To halt program execution and return to commandLevel To tab across the linePage Appendix D Ascii Codes Table D-l. Ascii Code List BEL Table D-2. Ascii Code Definition Appendixe Calling Subroutines Figure B-1. Internal Representation of Numbers and Strings RESULT=USR%1VARPTRA, VARPTRB, VARPTRC» PRINTA+B+C= Result Some Real Examples Figure E-2 /8085 Assembly Language Program Figure E-3. PL/M-80 Program Appendix F RMX/SO BASIC-SO ISIS-II BASIC-SO Initializing the Predefined RMX/SO BASIC-SO Configuration OOOOH-OFFFH Table F-l. Sample Configuration Jumper Wiring BASIC-80 Executable Files Generating Boot-Loaded and PROM-Based VersionsBASIC-80 Source Files BASIC-80 Object Files Generating a Boot-Loaded RMX/80 BASIC-80 This option enables your user-written I/O drivers if you That are not boot loadedThis option is used to allocate memory. It is 1 if the boot Setting baud rates, refer to the RMX/SO Users Guide ISBC 80/20-4 Generating a PROM-Based RMX/80 BASIC-80 Prom F1 RMX820.L1BSTART, & FOBASCM.OBJ,& FORMXBAS.LlB F1 DFSDIR. L1BDIRECTORY ,RENAM E,& F1 MTI810.L1B ISBC SO/10 System Clock Configuring DFS on an iSBC 80/10Adding BASIC-SO to an Existing RMX/SO Configuration Configuration Requirements Public Variables Open 0,#1, L1LlST Adding User-Written I/O Drivers to RMX/SO BASIC-SO Figure F-S. Sample User-Written 1/0 Driver Routine Burning a BASIC-80 Program Into Prom Altering BASIC-80 Workspace Baprom F1HEATER.BAS Page Index Ase BASIC-80 RIGHT$,7-1O Request for Readerscomments 111111