Radio Shack TRS-80 100 - Page 208

-----Model 100'-----
Sample Session #3:
Sorting .00 files with a BASIC Program
•
•
•
•
•
•
•
•
•
•
•
•
•
•
•
•
•
•
•
•
•
•
•
•
•
•
•
•
•
•
•
•
•
•
•
2 .....
SUbsl~utB ltle cocle' yot.I wan 10 obtain inIormatior1 about
he'e. Be lIUrB 10 Itdd ""y ~ry Ieacling comr'rlllS 0< ottlIII
~mboIs ., ftl<J'ired by Dow JctIes,
The rhl""""IIIASlC f'<Ol!J"'" I,,, yOI' nun;pul>l"r><! ,,~~ <!ar.,~ in •. OO me. n.o.
1..,1..,;10.; olphab<1ic.lIy ornJIlintlli, .. of ., on "DRS, DO iiI< W1><n "';0& ,hIS "'''1;''''''.
"" '"'!"''''',,-. ,. ,"",p. ,"n,i"e., form h<n " ... ml ,n.: ,DO f,le. F", •• ampl<, r<'" .an
.... " .• ,lit r ... ,8 ,poco. in 0 Ii"" for f mt,. ,0< n,,,' 10 ,~ .. r", I .. , NITlO', 'hm 9
'POC'" for Itl<phonc ""mbon. and l/I< rernai"'.1 'p,>ce. for _.>c>
AnoII"" ..-""'koJ .pplic"'ioun of l/I< s.on... l""If.m i. il' INlI'y '0 lill • I""'P of dall in "ariou,
f""".,,. Y"" c.n .imply'''''' l/I< ,"f"""",io" .. >000., I' b; k"".'o.nd 'lion I .. <ll< ~Ir.m
"'" iI j", )"1' ~ In any onkr tho< y"" " ..... t.
A. you !Un ttl< proJIlOm. )'00'11 b< .. l..J rot the fil' yoo ",i>h w..,.,. All ui"in~ f,k •• ',11
"""",or on "'" Di,pIay. An''''" by 'ypin~ l/I< ... "'" of Ib< .00 file .nd PU";"I 1I!IIIRl.
The~" ",lIeh"'g. to """". lin<", 'Il< lOp ... "h d •• h<>. dot,. or>d """""',,. folk>",e<;I by.
>«~nd II"" >I>o",",~ ,.,. fi," moord of ,tI< .DO fll. y"" .pocifoed. V"", '111>0 ... «1 !O lp<Cify ttl<
"",."" ,n 'll< lill<'~ brgin ,tI< "",;"g.
fl"!>< "'" Iill< .. "'eo,~ ;00"'.>1' ll>< coIu"," .... "'''''iog, No_.",. .Ilo.... Ill ...... h ooIomn.
......,br, ''''0 >Ilo .. ~ ,he ,,,,,,,,i.,. column, ond .., on, Tho Jol ..... midpi>in1S b«o~n ,h ...
0,.,,1>< .. ,)
You .hook! .... "'Of by 'demog '0 the: lill< disploj'«! .. the 'Op 01 "" Scrun ;" "1aI"'" lO ",'
r..,. I" of 'Ile: file y"" 'podf>nl.
1I.,'ing <t.".,n It >WI'OI I"'itioo b~ pickin."" prOf:CI' 'olumn. y"" ,~ .. ill be .<10:.0 for ItO
<nJ'"g ""'ition. Ikl<~'" s/lould typo ,"" ",1011," oombcr '0 ill<lud< .II'h< charxl ... th., w,ll
be 0,«1 h~ the """ .. prog"''''
When .... prog ... ",;" 'h''''''gh _inl a<ooro;~ lO ,-oJ< <o"gO<)'. 'Ile: OK prompI ~'illltppc .. on
,1>0 S<r«n. V"", ma~ ..... I" 'oth. M.io ~, ... (h~ p«>.ing !III), ond ... n,ill< ,00 fil.
On ,he "'00 h1lld. ,f ~"'" ","", [0 ... mill< ,.,. inl~_ "'" only O<C<lfd'og to Clll'KOO ... bu'
ol"" by dat ••• imply ,,,e,,,'y ,he mllOl ""lum" '" ill<lod< Ill. d .... , Voo mal' .... any column;n
,tI< 1;1l< to """"I Ih< bellinn,n, 01 the ""';01: """"',", 'fbi< OIC.n, yoo can ..... n "'" lhe file
""'ord itlll '" ''''''''01 """.
"'''
,~ "" ,.~ .. -, ,.
I.'. ", .". .. '" ",. ", .......
,.0. .. "'.' ~ '0 "Sc"
I". '0 ••• ,. ,,~.'" •••• "_.
, ••• S •• j'-,..", ••• o."n" .1,.".-,,, •.
10'0
' •• " eL.
"'" CLrA" 0 ....
",,,. "Lr'
'0 ••