Atari 400 Basic Reference Manual page 101

H-4 Appendix
7080 ?
II
Et·HEF.: \' OR t·i''
j :
HfliT A:f
7090 IF LEN( A$ >=0 TH£t· i END
7100 IF A$(1 .. D= 11 Y'' THEt·i
F.:ETU~:t·~
7110
END
7999 REt1 MSG F'R HH I HG
F.~
OUT
H~E
8000
?
t1SG$ .:
II
$"
j
At10Ut· H
w
1ft
IF PERt-1= 1 THHl LPF-:
mr
r·E;G:f . ; " $" .; AMO
LINT
S"e20 F.:ETUF.li
810ft
REt1
t1SG
PRHH
:s:
INPUT
ROUTHE
8110 TRAP 8110 : ?
II
Et-HER At'1CllJt·H FOR
II
j
MSG
$;
=
INPUT
At·10U~·~T
8120 TRAP
4000~3
8133
IF PERt·1=1 THEt·{ LPF.:HH M : : ;G$ .:
H
:f!! .: Ar10
liNT
8140 RETURt-l