Filter
Top Products
Language Elements
BASIC-80
Table 2-1. BASIC-80 Commands
(Cont'd.)
Command
Description
Example
MERGE Combines file program with current
MERGE
":F1:TIME"
program.
NEW
Deletes
current
program, clears
NEW
variables.
NULL
Specifies nulls added to a line. NULL
20
PRUN
Executes program in
ROM. PRUN
4EOOH
RENAME
Changes
file
name. RENAME ":F1 :SOUP"
TO
":F1
:NUTS"
RENUM Changes program line numbers. RENUM
RUN
Executes program.
RUN
SAVE Stores program
or
file on disk.
SAVE ":F1:INVEN"
TRON
Turns on trace facility. TRON
TROFF
Turns off trace facility. TROFF
WIDTH
Changes width
of
display line.
WIDTH
80
Table 2-2. BASIC-80 Statements
Statement
Description
Example
CLOSE
Closes
one
or
more files.
CLOSE 3
DATA
Identifies values that can be assigned
DATA
9,0,
"JUNE",
.33
with a READ statement.
DEF
Defines a user-written function.
DEF
FNRT
(R1,
R2)
=
R1
*R2/(R1 +
R2)
DEFDBL
Defines variable names starting with
DEFDBL
R-Z
the given
letter
as double-precision
floating-point.
DEFINT
Defines variable names starting with
DEFINT
I-N
the given
letter
as integer.
DEFSNG
Defines variable names starting with
DEFSNG B-H,
X,
Y
the given
letter
as single-precision
floating point.
DEFSTR
Defines variable names starting with
DEFSTR
K-O
the given
letter
as string variable
names.
DEFUSR
Defines non-BASIC subroutine.
DEFUSR 0 =
4EOOH
DIM
Allocates space for array variables.
DIM
char (25,10,25)
END
Concludes program.
END
ERROR
Simulates errors with given
error
ERROR
12
number.
FIELD
Allocates space in random file buffer.
FIELD #3,20
AS
A$
FOR-NEXT-STEP
Creates a loop.
FOR
1=1
TO
5 STEP.5
NEXTI
GET
Retrieves data from
disk
file.
GET#2,4
GOSUB
Transfers execution to subroutine.
GOSUB
550
GOTO
Transfers execution to line number.
GOT0400
IF-
TH
EN-ELSE
When the expression specified is true,
IF
A>B THEN
2~0
the statement executes;
if
false, a
ELSE PRINT
">"
second statement executes.
INPUT
1.
Prompts for terminal
input
in
INPUT
A,
B,
C
program
2.
Reads data from sequential file.
INPUT
#1,
A$,
B$,
C$
LET
Assigns value to variables.
LET A=52
2-2