Chapter
10
I
BASIC
Keywords
Sample
Program
1
10 REM THIS PROGRAM DEMONSTRATES CHAINING USING
20 REM SAVE THIS MODULE ON DISK
AS
"PROGI
.BAS"
30
DIM ASC2),BS(2)
40 COMMON
AS0,BSO
50
AS<l)="VARIABLES IN COMMON MUST BE ASSIGNED
"
60 A$(2)="VALUES BEFORE CHAINING"
70
BS
(
1
1
="I'
:
BS
(2)
="I'
80 CHAIN
"prog2.ba5"
90 PRINT
:
PRINT
BSCI):
PRINT
:
PRINT BS(2):
100 END
Save this program as
progl.bas,
using the
A
option (Enter:
SAVE
"progl.bas",
A).
Enter
NEW,
and then enter the following
program.
COMMON
TO
PASS VARIABLES.
USING THE
A
OPTION.
PRINT
10 REM THE STATEMENT "DIM AS(2),BS(2)" MAY ONLY
20
REM HENCE, IT DOES NOT APPEAR IN THIS MODULE.
30 REM SAVE THIS MODULE ON THE DISK
AS
40 COMMON
AS0,BSO
50
PR'INT: PRINT AS(l);AS(2)
60 B$(I)="NOTE HOW THE OPTION
OF
SPECIFYING
A
STARTING LINE NUMBER"
70 B$<2)="WHEN CHAINING AVOIDS THE DIMENSION
STATEMENT IN 'PROGI
'
.
"
80 CHAIN
"progl
.ba5",90
90 END
BE EXECUTED ONCE.
"PROG2.BAS" USING THE
A
OPTION.
Save this program as
prog2.bas,
using the
A
option. Load
progl .bas
and run it. Your screen should display:
VARIABLES IN COMMON MUST BE ASSIGNED VALUES
BEFORE CHAINING.
NOTE HOW THE OPTION OF SPECIFYING
A
STARTING
LINE NUMBER
WHEN CHAINING AVOIDS THE DIMENSION STATEMENT IN
'PROGI
'
.
109
To Next Page
Loading...
Need help?
General
