Radio Shack TRS-80 100 User Manual page 150

Hide thumbs Also See for TRS-80 100:
Table of Contents

Advertisement

- - - - - - I M o d e l .,
D D f - - - - - -
10 If A • 10 OR A • Z0 THEN
~.
" "P.id" ELSE B' "
"NO\ P.id"
,."" the
CODdi'i"" A
<
100
~
if ""'" U"'" BASIC jump< '"
Ii""
100, if f.I",.
'lien
BASIC
<OOlinuc. <:xocUl,,,,, .. Ii... 20
,
..
IF...THEN... ELSE
Test Rdatlonal [_pression
,f ANS
«tual.
"Y,·' <hell8ASIC b...
""he.
t<>
I;... 1000,
~h<fWi",
BASIC b...
""IIe,
to Ii"" 2000.
A.I,32 ,
~OTO
1000
o..ips A
!he
vol"" 1.32 ond boBi'" .XKU';oo" Ii .. 1000.
IIlMEM
Get lligh Memory Address
HIMEM
-
. .
PRlfoIT
HI~E~
pri'"
tho <um:'" '''''
od<It."
of
BASIC m<mory.
Thi,
[.ncli.,. ,"",,'"
Ihc 1"" oddre>. of
m<mo:Jf)' ....
,I>blt '" BASIC
Y""
m'f ''''n.
Ill"
voJ...
,,"Ih lh. CLEAR
"omll>;,OO.
1l>::
IFITHEN ... ,.m<.... ,,"
!he
1oJi<.1
"U\llh··
of
,d.,u..l "
loJi<ol
o>.pn:s,;""
(rel"""",1
..,01
101;"01
.~,
.."".
on:
.kfilJed
.,oIco
"'b...-
ion>." • ..-1 ....
i.
rhI.. lI«'iOll). If II..
• 0pteS>;""
i. ··'me." then BASIC .."""'".
"""""a
)I. If
,lie <aiR'Yoo ;. "raise," BASIC
••«IIt..
<"<>Mtondf
,)2.
If THEN <oI'1lma"'*&JI I•• TItEN OOTO 10 ..
""mber.
BASIC 01"" ""..
pt.
THEN I,...
".mher
000 GOTO
II"" """""" •• "l",v.l<nt
"ITO•.
ELSE "'
""'*'.j2 nopoiolUl:
if ornln«l.
BASIC ...."""
the
ELSE d • ....: i.
,t.: .."
Ii .... If
ELSE
0.(
.j2
i' •
GOTO lin< numb«, Ihc. ELSE 101>< ••
"ibc,
i, .., "'l"I,...,.... rm.
In oumcri< ,.""". "rol><" ha.
Ihc
~""
'W",
tad
"true" is OIly ,..11.1:
.''''l'' '''''''
.:...mplt
u
I~
A
<
100 THEN 100
"
rem
In.
"mdi,,,,,,
A_
IOOR
"_20_
ifU\lc, th<. BASIC ...iB.' BS Ihc
SIn ... ··!';aid".
if
f>!s<,
,he.
llASIC .... I".
BS '''''
mi"B
"1'0'",
Poid"

Hide quick links:

Advertisement

Table of Contents
loading

Table of Contents