EasyManua.ls Logo

IBM 5100 - Sample Programs Using the ~AUTO Command; Sample BASIC Program

IBM 5100
54 pages
To Next Page IconTo Next Page
To Next Page IconTo Next Page
To Previous Page IconTo Previous Page
To Previous Page IconTo Previous Page
Loading...
SAMPLE
PROGRAMS
USING THE &AUTO COMMAND
Sample
BASI
C
Program
00010
REM
THIS
PROGRAM
IS
AN
EXAMPLE
00020
REM
OF
USING
THE
AUTO
COMMAND,
o00
:::~
0
I~
E
t1
00040
FOR
N~l
TO
16
o0 0
~.=:;
0 PRI N
'r
N
00060
PI~INT
N+l
00070
PF~INT
N+2
oooeo
PRINT
N+:::l)
00090
REM
THIS
LAST
NUMBER
IS
THE
00100
REM
AUTO
RESPONSE
TEXT,
00110
INPUT
I
00120
IF
I~N+3
GOTO
150
o0
:I.
:::~
0 PRI
NT'
E
I~~
RD
F·:~
,
o0
11.1·
0
130
TD
:I.
n0
o0
:I.
~:.:.i
0
j\!
::::
N+
::?
00:1.(;.0
NEXT
N
00170
REM
ALL
IS
OK.
OOtBO
STOP
001(':'>0
END
40
The printed output
is:
'-I.
I::'
-.J
17
1
:;;;:
The extended display
using
~AUTO
contains:
g(:~I.J·ro
HI...IN
1
.,,)
..
:
..
'+
1+
I::'
..
J
''')
i
:l.!.l.
The extended display
without
~AUTO
contains:
:I.
::.:::
:::~:
'-I.
1+
I::'
...
J
'·'1
{
'''}
i
10
10
:I.
[I
:1.1
:1.
::.?
.'::,
.,
i
.I.e,
:i.
./
:I.
f::
:I.
-=.:)
?
:1.0:.:.:'

Table of Contents

Other manuals for IBM 5100

Related product manuals