Acorn CPCPMDISC/M  0GRAPH COMGPPBAR OVL GPSERIALNUMGPPPIE OVLUGPRINT OVLGPMENU FILGPFORM OVL !"#GPSHOW OVL$%&'()*+,GPSTAT OVL-./012345GPSET OVL6GRAPH1 COM789:;<=>?GPLOGIC OVL@ABCDEFGHIGPCHTOPTOVL JKLMNOPQRGPSPIE OVLRSTUVWXGPERROR FIL"YZ[GRAPH COM\GPHELP FIL0]^_`abcdefgPRINTER COMxhijklmnoPRINTER SETpGPSBAR OVL qrstuvwxyGPSETUP FILzTABLE DIR{CHART DIR|GPPRINT OVL}~WELCOME BBCPHOTO BBC POEM BBCGMESSAGE BBCPHONE BBC:INDEX BBCKEYBD BBCHSKETCH BBCCALC BBC)ALPHA BBC"BATBALL BBCMUSIC BBC CLOCK BBCPATTERN BBCKINGDOM BBCCBIORTHM BBC2BPART2 BBC!!>͉>!!>!Ґ!ڐ!!SА͞!\2|\͔<̎\͙![А"А͞ ͉GRAPH1.COM file not found$$GRAPH1 COMKEY12|S KEY13|D KEY14|X KEY15|E ![АFORM100 COM 6FILE COM3GRAPH BAK7VER020 MAC(LMNGRAPH REL4COPY110 BAKH@ABCDFORM110 MACIFGHIJSTAR6 BAK-de~ABORTED$BAD PARAMETER$INVALID USER NUMBER$RECORD TOO LONG$INVALID DIGIT$END OF FILE, CTL-Z?$CHECKSUM ERROR$CORRECT ERROR, TYPE RETURN OR CTL-Z$INVALID FORMAT$HEX$$$$NO DIRECTORY SPACE$NO FILE$COM$START NOT FOUND$QUIT NOT FOUND$CANNOT CLOSE DESTINATION FILE$DESTINATION IS R/O, DELETE (Y/N)?$**NOT DELETED**$$$$$$$NOT FOUND$COPYING -$REQUIRES CP/M 2.0 OR NEWER FOR OPERATION.$UNRECOGNIZED DESTINATION$CANNOT WRITE$INVALID PIP FORMAT$CANNOT READ$INVALID SEPARATOR$1 :2L> ̈́M9 221@:2!o6+6+6!6#6!6#6:G*o .!N6:^*M^!K6!6!6+6' :$::=2K  :ʤ\:ҷ\x'Ͳ:!\͢  :͈'! Ͳ:$: $͈Ͳ!N6' :!Cwͯ !6:^͢c!6{:/>!/H{ͯ :<2Š ::=HҮͯ !6:Ҿ:2 !6::/H͈;!6:> !/> "}*}DM͆ ' ͯ *"!z4 :e !"͆ !z6:|!z '? 2*H#"H!{6:{ր!Ң *{& :{4 2!{4m *":ڹ ͯ !z4I '2!"!q: !4>!S :S! :2*M! ^#V͎ * :w*#" = = = = = ͯ  *M !6q  !6q  !q  *& !6à  !6 à  !60à  *& !6  !6  !6  *& . 1 4 7 : = F P [ f q  HHͯ :!^w:<2:0}:@E}:!S!W6: z!]6:cm!c6:_z!_6l ::,: HHҰͯ : 2ó:E:1:2v!q!*8!*6: >ͦ>ͦ!q:_  !p+q.*   !q*&!p+q*2!p+q*2!p+q*22!p+q*!p+q*!p+q*!p+q*2!p+q* :2!q: " *M n :c4 *M n :2!c:Q !c:2: !:cw>!n !5 Y : { !6!q:!lwҙ  â :0O !q:O| :O| !6:]2l:o'2o:n'2n:m'2m*mMͣ *nMͣ *oMͣ :]:   *}2D" * * *&"!q:UY: Y:ҩ: ʩ:_2ʘ:€!6<:<2!ژ!6 >!]Ҥ; !6:Q::H: !6*M : !6!q:a/>z!!p+q* !q*& *M *M !p+q*!!p+q*"!p+q*$!6  !kp+q*j> >ڪ Þ !qp+q/ *pDM9: :M2r:N!r !:r *r& N!r4 !6:͔: :ͳ.!ws+p+q+p+q:w=2wN *s*u w*s#"s*u#"u' !"*M^7 !x6:!xھ **DM͆ 2yʭ :yʗ ͯ *"*6:2x÷ *"!x4d !"/ !j}=2| !"*KM^'_ !z6:|!z1 */H:_2:!q:A/>Z!/H8: 2::=O>m:W!Q} Hmd>9>!6:2*M!E ^#V͎ڗO **~2*#"m2m͖ 2m!6m!6m!6 m2mͯ m!62m!62m!62m!62m'2:2:TҒ:2!6*ME:2::^Ҳ:<22ý: 2:} >ͯ :i:2:d*M:[ ÷:S:QHI:N<22: H@"2Í202O> c!6Í202O> ڍ*&O*& !sc*&P :w:·>!ұͯ :22:_!6=!6>'!E!4!p+q*0 !r+s+p+q*~$7*>*>H&>*#"*#"> 2:^R͎:!6!6=2:ʙ!6:“H9Ž>!6-e!6ͻ2=2ʺ-é:>>"ͻ2:!!5ͻ2ͬ!\*M:>!(:=2%> >>!F!5+N! ~2!4<2T>>!b}*bMͭz!b~26!~6<+wé>!`ҥ*`MͭҞ!`6!6> :é:(!q:!wO! ~2*& :w>!:!4!6>:N<2N!> *N& N2 !p+q!6!6+6 !6: S: M!6g8:N2M*M8p!6!6!6>!ڕ*&P 6!4z!6!6#6#6!6*M8:ھ:*͇g2ê::¿::,͡A<2O>-:>>!p+q:,!6*DM9:<!6:z 2W!6D*&L :w:<2Ov*:>=20O> ڒ:0:AO>Ҥ::A }}Hͬ!wͻO`idͻV[2O>2:!X!6:!:=O!L NE!4 E E:/.*&L 6$L9k9.Xͯ *KM^020 :020:121'ͳ':²ͯ !G6!"!"7 *M^n/ :a/:H!6:ͯ !&6*M8):[ͱ!N5!6ñ:5!6#6>!ڰ!6:<2O>/:!O!T *M͡H~K:¡!6[–ͱ!N5:2:2!4=:[¼ͱ4:!6:.2O8: :* ͇g:[ ͱ!N5!6:%:<2*6 * 6å!q!6> !d*&I :]>!4A>:<2O* :w:?†!6!q!6?!:ҠgÐ!q*&*~!6:22: :]Hں:A2O>: 2ͯ 2*">!b!ͯ >!`0ͯ !q:E:24J!46*}a!44EJ *KM^'́:‚ͯ !36'n::0:f9OY#9.3'ͳ.:020' 'ͳ'7 6'!j>A+!s!"@͓1!"<**"͓n "Dn"":!Q2҂:X!Wғä:ڤ*MEÓ:ұ@@:O2Mc;!6#6>!)*&P ~"::H:H:H:H"!6!4:_jYO jM*"S*" 3@bl*M1͓!""7 *M^͆ \͔!":͎H*#"ͧÝ/ :>͛9ͯ .*#":_!' !'6!36' :1/!aE*#">z?C9IͲÁ.!6> !ڇ*&' ~2 ʀ: y.*M!4Q>!қ:=2á:2:Ҭ\>!ҿ:=2K:2K!:!:K\: \!p+q͈*3E`SeSP0;IN;IN;IP,,,;IW0,0,10300,7650;@Change pen for pen #2(right holder) .. Press Any Key to ContinuePlotting in Progress ..PU;SP;PUPD;PA,;LBAYA1AYA1@PAPX#DI0,1;VS10;SP0;@%@3@g@PSR,DM!  ::=H-\:N2O_og_{ozg^#V))) _{ozg^#V) d^#V|g}o n_{ozgO{ozgi`N#Fogo&og H ©=¨' !'6!36' :1/!aE*#">z?C9IͲÁ.!6> !ڇ*&' ~2 ʀ: y.*M!4Q>!қ:=2á:2:Ҭ\>!ҿ:=2K:2K!:!:K\: \!p+q͈*;*+OX#$.00B;@B@B=;@@@BBB@@B@@@?B<?? (THOUSANDS) (MILLIONS) (BILLIONS)(E+)==1E Q$JANFEBMARAPRMAYJUNJULAUGSEPOCTNOVDECD4MONTUEWEDTHRFRISATSUN A@@PAA%AAA@u@PAUy!0"|"|!0"|! !!!K(! !!!M(*}og"*G"}**E"*}*"}*A|<8I!1:%E8I!1:%*I!1͉$*}&͉$!1͉$*}}&͉$!1͉$I:%ͨ6*{8>!'**={oz**?{ozgo*A{ozg|88* z"A**7*C9>!'**={oz**?{ozgo*A}/o|/g{ozg|.9?9*z"A**7*p9>!'*1͉$!x%͉$I:%ͨ6*Þ9>!'**}|9*"Ú9*"*9>!'**{z9*"9*"*W>>!'* z"*"!1@!ͷ=,!O! ͎!! *40! ! ͎*{*{{ozgd}|K4*{c"{*{*{{ozg#"O*O ! Ϳ4!! ͱ!"O*{*O"{*O!!!Q(!U'*W*$z"W*U*$z"U*z|4*zm*"zx%m*Wx%m*Ux%m*z+|15*zm*U}&m* zx%m*W}&m*"zx%m*z++|\5*zm*"zx%m*Ux%m*Wx%m*z+++|5!x%m!Hx%m*Wx%m!x%m!Vx%m*Ux%m*S5>!['*[{z5*["Y5!"Y*Y6>!_'*_ͤ5*z&*a͉$*_͎%]:%*]͎!1@!ͷͲ,!͎!":*+ *K^#V"*+ #*K^#V"*|a:Ã:*+|x:**͉8Ã:**8*!I$*!I$"*+|¼:*"*"**s9"**͡9"*#"*}|':**!1I$!͎* z"*!;S>!"*K^#V!I*K^#V!I$"*K^#Vog!I*K^#V!I$"!"==*"* *K^#V"* #*K^#V"*og!I*!I$"**s9T6>!e'*g*eͯ4*(z%{z96*im*(zmP6*i*gP{ozg5m*cå6*z"k͐|ʡ6ͫ"m*m*Jz{oz*m*Zz{ozҡ6* z"kI!0:%*k6W6"q>ͮ*Iw>ͮ*q|6!"z*y*y)^#V"*oL7*[~}&1͉$! 1͉$*]~}&͉$! 1͉$*_~}&͉$!1͉$*a~}&͉$!1͉$!1͉$I:%ͨ6*s7>!w'*w*t{}|i7ö7!"w*r{|z7ö7*zwy!(1:%*y!!6ͫ"my!j1:%*y!!6*w}&1͉$!1͉$I:%ͨ6*uÆ8>!}'*"=*}"?*C|8*"G! <6=**͡9!'<6=*+ *K^#V!I*+ #*K^#V!I$"*!I*!I$"**!a**{ozgR**{ozgͷ"*#"*"*+|<%=*+*M^#V*{z=%=*M*)*+*M^#Vs#r*+"<*M*)*s#r*#"*+*{z;*|Y=>>!"%>*"*|ʁ=**{ozg#"*M*)^#V!I!@"*M*)^#V!I!@$"*|==*!ͳ |/W_*{ozg|=>**~|B!~̀;A"g*~|(B!~̀͋A"i!"k*[+|VB*W%*~ !_I"kÅB*[++|…B*W%*~ !_I!ͷ"k*g*k{ozg"g*~!_I!m͎*~!_I!u͎u!m͟!B!!mI!u͎*Y|C*i1!u@"i*Y+++|#C*g1!m@"gm!1@*~ͷ!dR!m͎u!1@*~ͷ!dR!u͎!m̀}&!!&1͉$!1͉$!ù}&!!&͉$!2͉$I:%ͨ6*g*i͉8*W%|C*WF9*UC>!'~!͉~!͉*}]E>!'*͉8*z">**8*#"*}|b=*}/o|/g"*! !͎ ;*|>>!'!͓̀+!1ͨ!͎!,@>!'*"W~*"Y~!"[~!"]~!'"_~! "a~*z"C!"E!"*l{+|>;?*_~!U "G*l{++|> ?*G"_~*n{++|?*E*_~"E ?!"E;?* z"C*n{+|$?*G"E/?*_~*E"E*a~"_~*G"a~*[~!c~͎*]~!s~͎*_~!k~͎*a~!{~͎*_~"~*a~"~*~!PU "~*~!U "~!!~͎!!~͎!"~!"~!"~* z"~*z"~*z"~*z"~*z"~!"=!"?* z"A6!O7*[~*]~͉8*K!̀ͭ@s#r*K!̀@s#r*K!̀ͭ@s#r*K!̀@s#r*~|ʖD*K!̀͋As#r*K!̀͋As#r*~|D*K!̀;As#r*K!̀;As#r*~| E*K^#V*K^#V͉8*K^#V*K^#V8**z{oz*|,EYE!2*!&7:%!!*~!*7A*E>!'!"ǀ!c~ͱ҅E!"ǀ×E!k~ͱE!"ǀ!s~ͱҰE*ǀ"ǀE!{~ͱE*ǀ"ǀ*ǀ"*HH>!ˀ'ۀ!~͉!~͉!Ӏ͉!ˀ͉*C|@I!1:%ͨ6*p{|(@I!1:%ͨ6*H@>!'I!1:%ͨ6*s@>!'* "[~*"]~*"_~*"a~*ê@>! 'c~!%͉s~!͉k~!͉{~! ͉* @>!/'*_~*[~{ozg/!c~XRk~!c~Xͷ*[~$"-*-8A>!9'*a~*]~{ozg9!s~XR{~!s~Xͷ*]~$"7*7ÈA>!C'*_~*[~{ozg!C̀Z>̀!aR!Xͷ*[~$"A*AA>!M'*a~*]~{ozg!M̀Z>̀!%aR-!%Xͷ*]~$"K*KC>!W'!~̀ͭ@"g!~̀@"i~!͉~!͉*~"*~*z{oz,F!H!ۀ̀!̀`E"!̀!̀`E" * |^F*z" H** {ozg|vFDH*" * |ŠF* " * {ozg|F!Xc~!ۀXR!ۀXͷ! !͎!c~͉ïG* {ozg|G!Xk~!ۀXR!ۀXͷ! !͎!k~͉ïG* {ozg|hG!ۀXs~!XR!Xͷ!ۀ !͎!s~͉ïG* {ozg|ʯG!ۀX{~!XR!Xͷ!ۀ !͎!{~͉* *{ozGۀ!͉!͉!ۀ̀!̀`E" H!͉!͉!̀!!L)"*|LWL*|WL*|;L**+͎%:%WL*!2͉$**͎%:%*:%*1M>!'!̀/!͎*|ʋLL!̀Z>̀!2 /!2~-!͎!͟!"2  !I!͎-M!! M!̀Z>̀!22 !*2~-!͎-M!̀Z>̀!B2a!:2~-!͎!\M>!'!̀/Z>̀!J2 "*ÛO>!'R2!~@!~ !~͎Z2!@! !͎!!~!!~M!!~͎!!!!M!!͎*~|+N!!̀`E" *|* |aF!ۀ̀!̀!̀!̀**~C*ɀÞK>!'*({|ʈHi!s~͉q!{~͉Y!)͉a!͉ìHi!c~͉q!k~͉Y!1͉a!!͉a!YͱHQ!Y͉Y!a͉a!Q͉Y!qͱ?a!iͱ/HÚKY!iͱIY!i͉a!qͱIa!q͉*({|:I)!Y͉!a͉LI1!Y͉!!a͉!1̀ͭ@"9!)̀@";!!̀ͭ@"=!̀@"?*~|ʜI!)̀͋A";!̀͋A"?*K*9s#r*K*;s#r*K*9s#r*K*?s#r*K*=s#r*K*?s#r*K~+N~!b2͉!!+N!!͎!!!!~?PN O!!/!!~uN0O!~̀*zgL̀$!~͎!̀*zgL̀!͎!̀4M"~!~̀4M"~*~*~}|N*~!j2~-$!~͎O*~*~}|O*~!r2~-!͎*~"~UO!̀*~gL̀!͎!̀4M"~UO!~̀*zgL̀$!~͎!~̀4M"~*~|gO*~#"~×O!~X/*~!z2~-ͷ"~*~+|—O! "~*R>!'*|O~!2{͉!:{͉*.{"~**{"~*R{"O~!B{͉!J{͉*0{"~*,{"~*T{"***=s#r*K*;s#r*K*9s#r*K *;s#r*++++|*|ZJùJ*K^#V*K^#V͉8!"AïJ*A *K^#V*A #*K^#V8*A#"A~JÚK*z"G* z"C!K"E*+|J* z"G*z"C!Z!I͎! "E*++|K!-!I͎*+++|K!-!I͎*+++++|8K!!I͎*++++++|RK!!I͎!!Ì*E*C*G9*++|šK!!I͎!!Ì*E*z*G9*K>!'*y*)^#V*y^#V*y*)^#V)))̀!y͎!ydL>!'!̀}&:%! 2*~{ozg|P*_MVQ+P*~|+P*z_MVQ*~|6PêP!!~?!̀/!~̀/?qP!̀4M"~}P!~̀4M"~*"~*~{z/*~ {zҧP! "~VQ~!2ͱҿP~!2͉!!P!!͎!~̀*~gL̀! ͎ !~ͱ Q !2͟!~͎!̀*~gL̀!͎!̀4M"~!~̀4M*~}o|g"~~!2ͱVQ*~#"~*|ʧQ2{!~͉:{!͉*~"~*~"~*~!2I*~ͷ"~*~*~ "~RB{!~͉J{!͉*~"~*~"~*({|Q*~*~U "~*~*~ "~R*~!2I*~ͷ!~y!~͎!~̀!~̀C!!*~!*5A*ف+|*~#*ف{ozaV*Ӂ*݁R*~#*ف{oz*߁|҄VV!"ׁV*ׁ*ہ *߁#U !~ !~͎!~̀!~̀C*~!2I!~ !~͎!~̀!~̀E*ׁ#"ׁ*߁}|V*ف#"ف*~#*ف{zS*~"ׁ*~|"WZ*~+++|9W5!2:%ÚW*~++++++|SW5!2:%ÚW*~ {oznW5!2:%ÚW*~! ͎! ̀!K3͉$! 3͉$5:%*({*z{oz/W_*Ӂ{ozg|W*~*~!~͎*~)*~}o|g!~͎*~"ׁIX*~!~͎*~*~"~*~*~ "~*ÿR>!Ł'!~̀!~̀C*({}/o|/g*ǁ{ozg|YR*~!Ɂ͎eR*~!Ɂ͎*Ł||R2!Ɂ@!Ɂ͎*({}/o|/g*ǁ{ozg|ʩR!~̀~!ɁEûR~!Ɂ!~̀E*ÁZ>!Ӂ'*Ӂ|S~!2{͉!:{͉*.{"~*~"~**{"~*~"~*^{"݁*~"ہ*V{"߁NS~!B{͉!J{͉*0{"~*~"~*,{"~*~"~*`{"݁*~"ہ*X{"߁*~|YStX!~X/*~ͷ!͎*~++++|ږS*~!U  "~ÜS!"~!"فW*ف+!I!~ *~!2~-ͷ! ͎!"Ձ! ̀/!͎!!W_*~{ozg|T!!~͎*{* z{ozIX*~!~ !~͎*~ !~ !~͎*~"ׁ!~̀!~̀C!!*ׁ!*5AZ!~̀Z>̀! ͎!! ҧX !3X"~öX !3"~!"فZ*ف+*~! ͎! ̀!K3͉$5:%*Ӂ|XqY*ف+*ہ *~!~͎*~!~͎!~̀!~̀C!!*~!*5A*ف+|*~#*ف{oznY*Ӂ*݁RY*ف+*ہ *~!~͎*~!~͎*~!~y!~͎!~̀!~̀C!!*~!*5A*ف+|*~#*ف{ozY*Ӂ*݁R*ف#"Ձ@T*~}/o|/g!̀ !y!W_{ozg|@T!"Ձ!2ͱUT !2͉! ̀*ՁK5:%*({}/o|/g*Ӂ{ozg|ʃTU*ف+*ہ *~!~͎*~!~͎!~̀!~̀C*{|*ف+|T!!*~!*5AU!!*~!*5A*ف+|*~#*ف{oz*Z{|;U*Ӂ*݁R*~#*ف{oz*߁|^UV!"ׁU*ׁ*ہ *߁#U !~ !~͎!~̀!~̀C*~!2I!~ !~͎!~̀!~̀E*ׁ#"ׁ*߁}|gUV*ف+*ہ *~!~͎*~!~͎*~"ف*~#*ف{zX*сé[!!B{͎!!J{͎!"XZ*Q*)))!͛*#"*{*{{ozg#*{z!'!"!"!"\**!&!#3$[[*|[*"*"*#" ͎! ̀!K5:%!!*~!*5A!~" *#"`5!U3:%*5* + #!&5:%*+++|҄`*5!͎%5:%* #!ͳ " * | `!" *5%*~ *~}|`*~!~y!~͎!~̀!~̀C!!*~!*5A*#"*~}|u\*&b>!'*;7:%*;9:%*z*5!L)"*|Na*57:%ta*5*+͎%7:%*5*#*z&9:%*7*;$*9*;$ҧa*97:%*;9:%*7ͬ[7:%*9ͬ[9:%*|a*7!l3͉$*9͉$7:%*7%*}|b*7*͎%7:*%*{z[*|=\****{ozg#&:%F\*;:%* a>!'*~*~U "*~" !"`*+*~ *~*~*~{ozg!U !~͎*~!~͎*~|\*~!U !~ !~͎* |\D`* |\$^*|\]*! ͎*++++|]*!dͳ ! ͎! ̀!K5:%*5%*~ "**~}|`]**~U #"f]!"*+|**ͳ +|]*~!~y!~͎!~̀!~̀C!!*~!*5A*#"`*! ͎! ̀!K5:%*{z^*5&3͉$%*9%*}|"b*9*͎%9:%*rf>!'*\{|?bnf*\{+++|Mbb*~"*\{+|kb!!~͎Èb*~*~*~!~͎*+"*~*{U *~*!{ozg *~*{U *~ *~}o|g!U !~͎Õc*~{zb*~"%c*~++++|c!"%c!"%*~*%U ! ͎*~! ͱ!"*~!o3I!~͎*!*%}|sc*!*%{ozg"%!!~͎yc*!"%*~*%+! I$!~͎*\{+++|·c*~))!~ !~͎c**~ !~ !~͎*|(d*~!w3I!~ !~͎!~̀!~̀!~5:%*#!ͳ "*|!^!"À^5!)3:%*5* + #!&5:%*+++|d^*5!͎%5:%* #! ͳ " * |€^! " *~!~y!~͎*5%*~ *~}|^!~̀!~̀C!!*~!*5A*|^`*5!͎%!O3$!R3*5!L)|**~{oz!_$_A`**~ *~!~͎!~̀!~̀C*~)!~y!~͎**~{oz}_!~̀!~̀E* !~y*~)1`* !~y!ͷ* $!~͎!~̀!~̀C* !~y*~))_*!dͳ ! ͎1`*!!~̀*{*#)^#V*{*#)^#VKHd*~!3I!~ !~͎*{*#)^#VzWd*z"~*~|}d!~̀!~̀C!~̀!~̀E~!~X!ͷ!~ !~͎* z"~!~̀!~̀C!~̀!~̀E*z"~* z"~!O7* {*#)^#V"%*{|e*y*%)^#V*y^#V5:%#e*y*%)^#V*y^#V5:%**\{+++|/W_ a*\{+++|he*~ !~ !~͎~!~͉e**~ !U !~ !~͎*9%|®e*~!3I!~ !~͎e*~!3I!~ !~͎!~̀!~̀C*\{+++|e!!*~!*7Af!!~y!~͎!~̀!~̀C!!*1*3*9A*-#"-*{}|h*+k*z+|_j!"O*~!U *~!~͎*~*~{ozg!~͎*{ͬ[5:%!~̀!~̀C*z+|j!!7͎j7!3͉!7̀!*~!*5A*z+|k! !~ !~̀C!7̀!*~!*5A*~!3I!~y!~͎!~̀!~̀C* {ͬ[5:%*({*z{ozkk*{ͬ[5:%!!*~!*5A*{ͬ[5:%*({*z{oz®k* {ͬ[5:%*~ *~}o|g!~͎!~̀!~̀C!!*~!*5A*5j*-*{{ozg*~ *~*/!~͎*({|h*~!~͎h*~!~͎*{|i*y*-)^#V*y^#V5:%:i*y*-)^#V*y^#V5:%**z a*({|qi*~!~y!~͎!~̀!~̀CÀi!~̀!~̀C!!*1*3*7A*9%|§i7j*({}/o|/g*~)*~}|W_{ozg|i7j*({|i*~)!~y!~͎!~̀!~̀Cj*~͉ !2{ͱn2{! ͉*A#"A*{}|m:{!2{X!Rn!!2{ !:{͎!"M!"O!"E!"A o*{*A)^#V"C*|{*A)^#Vzʑno*C+|/W_*C++|*{+|go*({}/o|/g{ozg{ozg|o*M#"M*~{*E)*As#r*{*E)6#6*E#"E*A#"A*{}|mn!"AÉo*|{*A)^#Vz‚o*{*A)^#V++|/W_*({{ozg|ʂo*O#"O*~{*E)*As#r*{*E)6#6*E#"E*A#"A*{}|o*M*O"~*{*z{oz*M{zo* z"~o*z"~*{*{{ozg#"~*M"A*A|/W_*~}/o|/g{!S͎Ëu*E*{{ozg*~ *~!~͎*~*z{oz>tñt*I|lt*A+*~ *M#U !~ !S͎Õt*~*M *M#U !U !~ !S͎*~!U !S !S͎t*I|t*~!U !~ !S͎t*~!U !~ !S͎*~!S ![͎*I*z{ozuËu*({|Su!S̀!~̀![̀!̀*{*C)^#V*{*C)^#VKHÈu!~̀!S̀!̀![̀*{*C)^#V*{*C)^#VKH÷u*G|ʨu!S̀!̀C*z"G!S̀!̀E*E#"E*{}| s*z"~*z"~*z"~*z"~* z"~!!*~*~K@!ozg|p!"A*~*A *~}|>p*~*AU "~*{*~+"{*({|Up*~"C*~"Eap*~"C*~"E*C*~U "~*~*~ *C}o|g!U *E"~*~|ʱp*M#*~U "~*~"~p!"~*~ !U *~}o|g"~*,{|pZ*z͞O*{+|pq*{++|p*q* z͞Ouf* zR*zRGqufh*zRGquf* {*"{*${*&{M\*zRPj!"Aoq*Q*A)))!͛*A#"A*{*{{ozg#*A{zSq!"A+v*~{*A)^#V"C*{*A)^#V"K*C|¾q8v*~*~*~*~*~*~K@*({|r!2{̀!B{̀!:{̀!J{̀v@!*~*~v@*C*A*I)b*A#"A*{}|q*?!"~*{* z{ozXv! "~*z!>k*z/@!"z*y*y)^#V"͝^#V!U "y*y*s)^#V!dU *y  {ozg"y*y*s)^#V*y {ozg"}*y {ozw*y*s)^#V*I*z{ozuËu*({|Su!S̀!~̀![̀!̀*{*C)^#V*{*C)^#VKHÈu!~̀!S̀!̀![̀*{*C)^#V*{*C)^#VKH÷u*G|ʨu!S̀!̀C*z"G!S̀!̀E*E#"E*{}| s*z"~*z"~*z"~*z"~* z"~!!*~*~K@!r!B{̀!2{̀!J{̀!:{̀v@* z"G* z"~*0{|Zr* z"~!B{̀Z>̀!%͎!J{̀Z>̀!-͎*.{|ʌr* z"~!2{̀Z>̀!͎!:{̀Z>̀!͎*{*C)^#V"~*z"~* z"~*K+|*{|r* z"Ir*z"I*~|r* z"~*{*C)^#Vzr*z"~*{*C)^#VO7*{"Eþu*E*{{ozg#"Q*Q*Q)))̀!~͎*{|Zs* {*C)^#V*E͡K̀!͎ws*E* {*C)^#V͡K̀!͎!!‰s÷u*{|s*Q*Q)))*Q*Q)))̀! ͛*Q*Q)))̀!͎*{|s t*{|s*{*E͡K̀!S͎t*E*{͡K̀CL MP-3NS INTERNAL (NOT FOR RESALE),#0 15, 6159 z2SP0;IN;IN;IP,,,;IW0,0,10300,7650;@Change pen for pen #2(right holder) .. Press Any Key to ContinuePlotting in Progress ..PU;SP;PUPD;PA,;LBAYA1AYA1@PAPX#DI0,1;VS10;SP0;@%@3@g@PSR,;*+OX#$ A.00AYA1E`Se@P - @p@ @  - @>P%>P>P%y!0"|"|!0"|!!!!Y(!!!![(! !!!](! !!!_(3>!c'*e*$z"e*c*$z"c*z|#3*zm*"zx%m*ex%m*cx%m*z+|\3*zm*c}&m* zx%m*e}&m*"zx%m*z++|‡3*zm*"zx%m*cx%m*ex%m*z+++|3!x%m!Hx%m*ex%m!x%m!Vx%m*cx%m*a3>!i'*i{z3*i"g3!"g*g,4>!m'* z"*"!1@!ͷ=,!͎!1@!ͷͲ,!͎!" 9*+ *]^#V"*+ #*]^#V"*|Œ8î8*+|£8**ʹ6î8**7*!I$*!I$"*+|8*"*"**͞7"**7"*#"*}|R8**!1I$!͎* z"*!J9~!s'*u*s2*(z%{zd4*wm*(zm{4*w*uP{ozg3m*q4*z"y͐|4ͫ"{*{*Jz{oz*{*Zz{oz4* z"y~!0:%*y 5͂4">ͮ*~w>ͮ*|5!"z*y*y)^#V"*}w5*[~}&0͉$!1͉$*]~}&͉$!1͉$*_~}&͉$!1͉$*a~}&͉$! 1͉$! 1͉$~:%4*6>!'**t{}|55!"*r{|¥55*zw! 1:%*!!/4ͫ"{!b1:%*!!/4*}&{1͉$!1͉$~:%4!I*!I$"**͞7!8:a;**7!R:a;*+ *]^#V!I*+ #*]^#V!I$"*!I*!I$"**!a**{ozgR**{ozgͷ"*#"*"*+|;P;*+*_^#V*{z+;P;*_*)*+*_^#Vs#r*+";*_*)*s#r*#"*+*{z9*|„;i!'*"~*"~*~|=6*"~*og"*~"**~"**"*~|g6~!1:%p6~!1:%*~!1͉$*}&͉$!1͉$*}&͉$!1͉$~:%4* 7>!'**~{oz**~{ozgo*~{ozg|67* z"~**6*n7>!'**~{oz**~{ozgo*~}/o|/g{ozg|Y7j7*z"~**6*Û7>!'*1͉$!x%͉$~:%4*7>!'**}|7*"7*"*7>!'**{z7*"7*"*Â<>!͵<*<*!ͳ |/W_*{ozg|*<><**ʹ6*z"I<**7*#"*}|;*}/o|/g"*! !͎89*ç<>!'!͓̀+!1ͨ!͎!W>>!'* "W~*"Y~!"[~!"]~!'"_~! "a~*z"~!"~!"*l{+|!'*]!̀>s#r*]!̀?s#r*]!̀>s#r*]!̀?s#r*~|B*]!̀Ͷ?s#r*]!̀Ͷ?s#r*~|B*]!̀f?s#r*]!̀f?s#r*~|5C*]^#V*]^#Vʹ6*]^#V*]^#V7**z{oz*|WCÄC!1*!&~:%!!*~!*~@*C>!ŀ'!"Հ̀!c~ͱҰC!"ՀC̀!k~ͱC!"Հŀ!s~ͱC*Հ"ՀCŀ!{~ͱC*Հ"Հ*Հ"À*ÀsF>z"~!"~!"~* z"~5!z5*[~*]~ʹ6*~|?>~!1:%4*p{|S>~!1:%4*s>>! '~!1:%4* Þ>>!'*"[~*"]~*"_~*"a~*>>!'c~!3͉s~!+͉k~!#͉{~!͉*?>!='*_~*[~{ozg=!c~XRk~!c~Xͷ*[~$";*;c?>!G'*a~*]~{ozgG!s~XR{~!s~Xͷ*]~$"E*Eó?>!Q'*_~*[~{ozg!Q̀ͅ<̀!~aR~!~Xͷ*[~$"O*O@>!['*a~*]~{ozg![̀ͅ<̀!~aR~!~Xͷ*]~$"Y*!ـ'!~͉!~͉!͉!ـ͉~!͉~!͉*~"*~*z{ozWDLF!̀!̀͋C"!̀!̀͋C"*|ʉD*z"5F**{ozg|ʡDoF*"*|µD*"*{ozg|D!Xc~!XR!Xͷ! !͎ !c~͉E*{ozg|IE!Xk~!XR!Xͷ! !͎ !k~͉E*{ozg|ʓE!Xs~!XR!Xͷ! ! ͎!s~͉E*{ozg|E!X{~!XR!Xͷ! ! ͎!{~͉**{ozF! ͉!͉!YA>!e'!~̀>"u!~̀?"w*~|?@!~̀f?"u*~|S@!~̀Ͷ?"w!"y*i+|@*e%*~ !mI"yð@*i++|°@*e%*~ !mI!ͷ"y*u*y{ozg"u*~!mI!{͎*~!mI!͎!{͟! A!!{I!͎*g|+A*w1!@"w*g+++|NA*u1!{@"u{!1@*~ͷ!dR!{͎!1@*~ͷ!dR!͎!{̀}&!!&1͉$!1͉$!̀}&!!&͉$!1͉$~:%4*u*wʹ6*e%|A*eq7*cB>!̀͋C"5F! ͉!͉!̀!̀͋C"*|*|ڌD!̀!̀!̀!̀**~!B*׀I>!#'*({|ʳFw!s~͉!{~͉g!7͉o!'͉Fw!c~͉!k~͉g!?͉o!/͉o!gͱF_!g͉g!o͉o!_͉g!ͱ?o!wͱ/GIg!wͱ3Gg!w͉o!ͱHGo!͉*({|eG7!g͉'!o͉wG?!g͉/!o͉!?̀>"G!7̀?"I!/̀>"K!'̀?"M*~|G!7̀Ͷ?"I!'̀Ͷ?"M*]*Gs#r*]*Is#r*]*Gs#r*]!͎! "*!̀***7*++++++|*+++++++|tL* z"!!͎*!̀***7*M>!Ł'!"Ɂ!"ˁ!"ǁL*Ł*ǁ!&!2$´LL*Ɂ|L*ǁ"Ɂ*ǁ"ˁ*ǁ#"ǁ*Ł%*ǁ{zL*Ɂ| M*Ł*Ɂ*ˁ*Ɂ{ozg#&Á:%MÁ!2:%*Á3N*~!U !~͎*~*~{ozg!~͎*{{L~:%!~̀!~̀A*z+|yM!!ρ͎ÂMρ!2͉!ρ̀!*~!*~@*z+|M! !~ !~͎!~̀!~̀A!ρ̀!*~!*~@*{{L~:%*~ *~}o|g*Ms#r*]*Ks#r*]*Ms#r*]*Ks#r*]*Is#r*]*Gs#r*] *Is#r*%++++|*%|҅HH*]^#V*]^#Vʹ6!"OH*O *]^#V*O #*]^#V7*O#"OҩHI*z"U* z"Q!K"S*%+|I* z"U*z"Q!Z!W͎! "S*%++|3I!-!W͎*%+++|JI!-!W͎*%+++++|cI!!W͎*%++++++|}I!!W͎!!Ẁ*S*Q*U7*%++|I!!W͎!!Ẁ*S*z*U7*! J>!'*y*)^#V*y^#V*y*)^#V)))̀!~͎!~̀!~̀A!!*~!*~@*́øN>!ف'!ہ̀}&:%!2*!L)"*|kNëN*|ʫN*ف|N**+͎%:%ëN*!2͉$**ف͎%:%*ׁ:%*ׁ5O>!'2!@!ͷ!͎*!I!!I!̀Ͳ,R* $"*!I!̀=,R*$" *Q>!'!"!"*b{* )^#VzcOöO!!ͷ!Q͎!Q̀* ͻN** {ozg! U "* *{ozg! U "*W~+|O!!͎O! !͎!!!!](O!͎!!!͎!xL>!'!"âJ*+ *]^#V!͎*+ #*]^#V!͎*+ *]!̀>s#r*+ #*]!̀?s#r*#"*}|!J*+|ʻJ$K*]^#V*]^#Vʹ6!"K* *]^#V* #*]^#V7*#"*+*{zJtL*z"* z"!K"*++|LK!-!͎*+++|cK!!͎*++++|{K!Z!͎*+++++|”K!!͎*++++++|½K!"!-!͎!"*+++++++|K*z"!-!͎*++++++++| L* z"*z"!P2!~!͎!X!ͨ!R! $"*!ͿP!X!'2@ͷ!$!͎!X!ͨ!R"*!!!](Q!͉*]* *s#r*]**s#r!"1Q!Q̀* ͻN*]*)**s#r*#*]* *s#r*##"Q!X!Q͎Q!ͱP!̀* ͻN*]*)**s#r*#*]* *s#r*##"*]*)* *s#r*#*]**s#r*##!U "*f{* )^#Vz5**d{* )^#V*f{* )^#V J!z5*S>!h1!)͟!hR!I͎*~!À!Ì8OA!IX!ͷ!Ay!Q͎!!Q?!R!Q/ҜV!Q̀* * !<2I$ͻNþV!Q̀* * !D2I$ͻN**!~͎* *!~͎!~̀!~̀A!Z!Q/!!Q?W*~"~!W*~"~*z*~!L)"~*~|fW*~*~+͎%!L2͉$*~*~#*z&͉$~:%*~%|ʁW*~!O2͉$~:%*{* z{oz/W_*j{}/o|/g{ozg|W!~̀!6N*~͉$~:%lY*{*z{oz/W_*j{}/o|/g{ozg|X!~̀!6N*!#'!~̀>"'*#+|-R*'*~U ")DR*~*'{ozg*~U ")*%%"+*+*)}|gR*%1:% S*+*){ozg"/!/2*%!L)+"-*-{zR*%*)͎%1:% S*-##*/{zR*%*-*)&1:% S*%*-##*/{ozg͎%*%*-##*+}o|g%͉$1:%*1!:%*!Y*{"!!)͎!"~*{"~T*{|yS**~Ì!~͎*y*~)^#V*y^#V{L~:%ëS*~*Ì!~͎*y*~)^#V*y^#V{L~:%!!~S*Y*~)))!~̀/͛*[*~)*~:%!~̀/!) !)͎*~#"~*~͉$~:%lY~!)͟!dR!~͎*{*z{oz:XX*~*~{oz\X*5d{ozg";ìX*9*7}|X!~̀";*7#"7*5*;"5ìX~!T2";*9#"9*5*;"5*;!\2 !~͎!~̀!6N*~͉$!d2͉$~:%lY*~*~{oz Y!d!d!9ͱ!~͎~!g2!~͎JY~!o2!~͎!d!~I !9 !9͎!~̀!6N*~͉$!w2͉$~:%*{* z{ozY*~*~Q~:%!!*~!*~@A!I͉*~#"~*~}|U*3*z!ͪ~++++++++|T#T*~#"~*{}|T*~))*~}o|g!U "*~!U " M*~"~*~*~}|hU*~"~*~))*~}o|g!U !42I" !!1͎!h!A͎!!9͎!"5!"7!"9!"~öY*Y*~)))̀!~͎*[*~)^#V~:%1!~!1!"z*y*y)^#V"͝Y*~!~y!~͎!~̀!~̀8!!*~!*5͆F*5#"5\*7! ͎! ̀!G*;"5ìX~!T2";*9#"9*5*;"5*;!\2 !~͎!~̀!6N*~͉$!d2͉$~:%lY*~*~{oz Y!d!d!9ͱ!~͎~!g2!~͎JY~!o2!~͎!d!~I !9 !9͎!~̀!6N*~͉$!w2͉$~:%*{* z{ozY*~*~Q~:%!!*~!*~@A!I͉*~#"~*~}|U*3*z!ͪÇ1 PRINTER.SETPRINTER.SET file is missing.3Execute PRINTER program to select graphics printer.2Error while loading PRINTER.SET file from diskettey!0"|"|!0"|2!!y~b}}~!0:%!"w~1!!{~b}*{~x%*}~͉$}~:%*w~#"w~*y~}|1*}~u~:%*u~Ë2͐|ʇ2ͫ"~*~*Jz{oz*~*Zz{oz҇2*~w>ͮ!"z̀:!!!!~(!!!!~(o *y*y)^#V"*~3>!~'!"~2*~x%m*~|µ22*~*~{oz*~*~{oz2*~x%m*~#"~*~}|2*~b3!"~W3*~ *~^#V"~*~*~͎2*~ #*~^#V"~*~*~͎2*~#"~ 3*~!!!!~(!!!!~(!"~!"~!!K6ͼ!0!!!>!!`6ͼ!!~b!x{b!z{b!~b!~b!~b!~b!~b}͟1~:%͟1~:%͟1~:%͟1~:%͟1~:%!, !"~!"~*~|F4!"~!"~>ͮ! x%m*~m!"~*~+"~*v{|r4á4*x{ *~U "~*~{z4!"~*~"~D5!"~*~m 5*~}o|g{z4!"~4*~#"~*~|&*~*~*~!*~!{63*~"~*~*~{z4*~m2*~*~{ozg"~*~{zA5á45!"~!"~*~m5*~|&*~*~!!*~*~{6!"~ó5*~*~)*~{ozg*~^#Vs#r*~#"~҉53*~"~*~*~{zY5*~m2*~*~"~*~*~{z5J5*~w8"8*8"8"8"8>:8:8>(:*8"8>>}*8"8>C:"8"{:"}:t:::o&*8!{:+*_"8>>‹:>>> >*8+*{z9*|l;Qy{z}|"8!8w# \9*8*879*8*879*8*8U79*8*8U79*8"8"879>:8>*8 #"8"9|979*9~G#N#>~# y9>*9~9*8">ͮ!"z̀:!!!!~(!!!!~(o *y*y)^#V"o ̀͝:!1w!1wo ͝!, ̀:!S1wo ͝o ͝"R8"h8"T8"V8"X8"Z8"\8"^8!`8>w# 6*h8}6>2j8*\87!`8:j8o|gxw:j8<2j8*Z8+"Z8*X8+"X8}¶6X7*\8}Go"\8} 2l8*\87x2m8*\8}o|g}7|"77h:m8g:l8G|g}o+7E:k8O!`8}o|gxw*Z8+"Z8 y2k86*^8*V8}v7!`8~#j7è7>2k8!`8~ʊ7>G~w#:k8=2k8ʠ7xGÂ7x x7*T8}7*^8>2k8~77zWyOxG7:h87zWzw##:k8=2k8¹7*R8}o|g"p8*Z8}o|g}o|g"r8>G>O>W*p8"t8*r8"v8!t8> :x8<8xGzW*p8}o|g"p8 8O"8}*8^#V!I*]^#V"8"8>}>>8>>>>!8~#8>*8"8"8MD _ W o g79*8####MD _ W o g79*8>y{z}|"8!8w# \9*8*879*8*879*8*8U79*8*8U79*8"8"879>:8>*8 #"8"9|979*9~G#N#>~# y9>*9~9*8"6 60," graphics:",9060 61,"DISPLAY",0475 62,"SELECT",18474 63,"OPTIONS",0500 70," sort:",9070 71,"SORT",7017 72,"RANK",7018 80," print:",9080 81,"OPTIONS",3203 82,"TITLES",1207 83,"REPORT",0206 84,"SHOW OPTS",0201 85,"SAVE REP",2208 86,"LAYOUT",4204 90,"status:",9090 91," range:",9090 92,"ROW RANGE",5470 93,"COL RANGE",7471 95," mode:",9090 98,"COMPUTE",0467 101,"PROTECT",0007 102,"ORDER",13466 105," utility:",9105 106,"LOAD BOTH",2141 107,"SAVE BOTH",2142 108,"SET DRIVE",4128 11,"format:",9016 2,"data:",9029 3,"maths:",9040 4,"graphics:",9060 5,"print:",9080 6,"status:",9090 7,"HELP",6016 9,"STOP",1136 10,"utility:",9105 11,"sort:",9070 12,"stats:",9130 16,"format:",9016 17,"INSERT",313 18,"DELETE",1314 19," rows:",9016 20,"ROW TITLE",0122 21,"SET TYPE",6129 22,"SHOW ROWS",0302 23,"MOVE ROW",2311 24," cols:",9016 25,"COL TITLE",0124 26,"SET TYPE",7132 27,"SHOW COLS",0303 28,"MOVE COL",2312 29," data:",9029 30,"CELL ENTRY",0493 31,"ENTER",0491 32,"CHAN09,"SET UP",1140 110,"tables:",9110 111,"LOAD TBL",2121 112,"SAVE TBL",2126 113,"CLR DATA",1127 114,"RESET",1130 115,"REDISPLAY",0131 116,"LIST TBLS",0309 117,"ERASE TBL",2144 118,"PRINT TBL",0304 119,"chart:",9118 120,"LOAD CHT",14150 121,"SAVE CHT",14151 122,"ERASE CHT",14152 123,"RESET CHT",0019 124,"LIST CHT",0310 130," stats:",9130 131,"DELTA",8417 132,"% GROWTH",8418 133,"MOV AVG",8419 134,"SMOOTH",2420 135,"MEAN",5441 136,"SIGMA",5443 137,"VARIANCE",5442 138,"LOG",1421 139,"EGE",4492 33,"SELECT ROW",10472 34,"SELECT COL",11473 35,"FORMULA",12432 36,"GOTO",4461 199,"HOME",16461 200,"BOTTOM",17461 37,"PLUG",14462 38,"CALC R/C",0463 39,"NULLIFY",15464 40," maths:",9040 41,"ADD",3401 42,"SUB",3402 43,"MULT",3403 44,"DIV",3404 45,"NEGATE",1405 46,"INVERSE",1406 47,"INTEGER",1407 48,"ROUND",1408 49,"CUMULATE",6409 50,"ABSOLUTE",1410 51,"ADD K",6413 52,"SUB K",6414 53,"MULT K",6415 54,"DIV K",6416 55,"SUM",5445 56,"GET",1412 57,"FLOOR",6435 58,"CEILING",643XP",1422 140,"POWER",3423 141,"MAX",5447 142,"MIN",5446 143,"COUNT",5444 144,"TOTAL",5445 -99 1,"DELTA",8417 132,"% GROSPLAY",0131 116,"LIST TBLS",0309 117,"ERASE TBL",2144 118,"PRINT TBL",0304 119,"chart:",9118 120,"LOAD CHT",14150 121,"SAVE CHT",14151 122,"ERASE CHT",14152 123,"RESET CHT",0019 124,"LIST CHT",0310 130," stats:",9130 131,"DELTA",8417 132,"% GROWTH",8418 133,"MOV AVG",8419 134,"SMOOTH",2420 135,"MEAN",5441 136,"SIGMA",5443 137,"VARIANCE",5442 138,"LOG",1421 139,"EÆ3.DIRERASEDNEW= CURRENT= UNDEFINED NAMECHOOSESTEPSNUMBER OF COLUMNSMENUROWSCOLSSTEPTO STEPDRIVE DESCRIPTION)TYPE (DATA=0,SUBT=1,HEAD=2,NOTE=3,OMIT=4) UNDERLINE !TRAILING BLANK LINES (NEW PAGE=9)DECIMAL PLACES (0-3 OFF=4)FORMAT COLUMN WIDTHFOLLOWING WHICH STEP!ERROR IF:FILETABLECHART.DIRERASED.TBL############,###.####BB<BB<@PBxx (0,1)GPSET.TBL.TBL//xTABLE.CHT.CHT.CHTCHART (A-P):(NO=0,[-]=1,[=]=2,[_]=3)(NO=0,[%]=1,[`]=2,NO,=3)12E`Se/Ev2xGPSETTABLETABLE.TBL.CHT.TBLCHARTy!0"|"|!0"|W~!0:%Y~!0:%[~!0:%]~!1:%_~!1:%a~!1:%c~!"1:%e~!*1:%g~!11:%i~!D1:%k~!J1:%m"y=t* z"yͶw*y|8&8z*3L8*y!!&!+2$/W_"5*57:>!9';!.2:%*y:%*9+|…8;!42:%*zy:%*9+++|¢8;!;2:%*=y:%*y*$¸8*_~y:%!"?!!9ͼ*z*;͉$!B2͉$!P!!>!`!"?!!#:ͼ*9{z$9*]~*y͉$!!U`*s~*z͉$*z͉$!-!U`*;*a~͉$!!! ͋m;&A:%*y|o9}9*A%|}99*Ay:%)8|ʗ9! "CÝ9!"C*A*C͎%7:%*;:%*A:%?s*yqf*?{z9!, *7*?|9!`A9!!An}~!P1:%o~!V1:%q~!\1:%s~!e1:%u~!l1:%w~!y1:%y~!1:%{~!1:%}~!1:%~!1:%~!1:%~!2:%4>!~'ÿ4*z*~!*y^p"*y|ʛ4*~**z{ozʿ4*y*)^#V"~*~* z|y4*~,5>!' 5*z*!*y^p"*y|4***z{oz 5*y*)^#V"** z|4*5>!'ô5*!!!͋m:%*%|u5!z͉*:%!*y|ʁ5!!2*!L)|­5*!͎*:%!!`* z|;5!!s6͠*y|*y++|5͸O5O*y#6+)5~#fo66*A!H2$:9*A!!U`A9!`!, ø8*7f:*y%{zb:)8|b:*z*y͉$y:%*E:)8|ʻ:*ya%A}o|g"C!"I!"Kå:*I "I*K#"K*C}|:*I:!*G<>!O'!"K!"1)8|&;*Q!͎%*O͉$O:%*Q!! &Q:%*S!!P&S:%!!;ͼ*O*W~͉$!P!!>!!;ͼñ;!!An}*A*Q%͎%*Q$ˆ;*K"1;*1|*A*Y~$Ҫ;*K"1*K#"K* z|X;*O*W~͉$!P!!>v*1|;*K"1!!;ͼ!*1*S͕!66N7*y*y{ozg|65*y|%6?s*y+++++++|G6* z*z{ozg"zó6*y*y{ozZ65*y"yo *y*y)^#V"!!ͦ^!2mͰmͰ!'2$ž6!`!"y* z"y* z"y5* z"y?s5Tvkt"y*y*y)^#V#"/*/"17*1u"y*y{z7*y*1)^#Vqf8*1#"1*y}|6*y+++|K7!"y*z+*y^#Vog"yN77*yog*y^#V#"/*/"1ë7*1ogu"y*y{z7*y*1)^#Vogqf8*1#"1*z}|n7*y++++|7!"y*y+*y^#V"y6*y"y?s*y^#Vqf*y|7w!, !)`*M<*U'=*z:%!"KB<*hz*K)*:%*K#"K+*y{z[=!`<!_'* z"]!!3Dͼ*_!P2͉$!!!>!!Dͼ!!ab!cb!eb}*a*y{oz*c*y{ozҸ>DDû>*=*y|>!, *]!!pzb!rzb!tzb!vzb}!!xzb!zzb!|zb!~zb}!!zb!zb!zb!zb}!!zb!zb!zb}!!zb!zb!zb!zb!zb}!!jzn!lzn!gn!in!kn}!!`zb!bzb!dzb!fzb}!*hzn}!*hzn}!*hzn}!!yqf!"z!"z͝j*y͍b*]!, ! `*z"]*]! `*z"]*]*y+|*y++|uD!#`* z"y!, *]*c*y}|*a*y}|җDRE!`*a}&*[~͉$!2͉$*c}&͉$*]~͉$*y}&͉$!2͉$*y}&͉$!!U`*c~!2͉$*[~͉$!2͉$*]~͉$!2͉$!!!^p"{*y|?E*]*{+|RE<*=*]!, !$`G=*a"y*c"y!"yo !2"*]äI>!'* z"}!"C*y+|¥EE!!Eͼi:*!2͉$!!!>!, !+`kq"C*y|E*}*!2͉$!!!b!yb}!!zb!zb}!!yb}!"Kü@*K*y}|p@!!Cb!Cb!mn!Cb!mn}õ@!*y*K)b*y*K)b*y*K)n*y*K)b*y*K)n}*K#"K*a}|8@!"KVA*K*y}| A!!Cb!Cb!mn!Cb!mn}OA!*y*K)b*y*K)b*y*K)n*y*K)b*y*K)n}*K#"K*c}|@B!!Kb}*K*z{ozˆA B!!ob}!"IA*K*y}|*I*y}|A!!qh}A!*y*K)^#V*I)))h}*I#"I*o}|>v!*yͅ*yͅ*y;!*pzͅ*rzͅ*tzͅ*vz;!*xzͅ*zzͅ*|zͅ*~z;!*zͅ*zͅ*zͅ*z;!*zͅ*zͅ*z;!*zͅ*zͅ*zͅ*zͅ*z;!*jz\*lz\*g\*i\*k͕!*`zͅ*bzͅ*dzͅ*fz;!*hz^#V͕!*hz^#V͕!*hz^#V͕!*yͅ*y;!*zͅ*z;!*y;!"KG!*y*K)^#Vͅ*y*K)^#Vͅ*y*K)^#V\*y*K)^#Vͅ*y*K)^#V͕*K#"K*y}|oG!"K?H!*y*K)^#Vͅ*y*K)`*z"**òN>!'* z"!"C*y+|6L}L!!}Lͼi:*!2͉$!!!>!, !7`kq"C*y|}L**!2͉$!!!>v!*{ͅ*{ͅ*{ͅ*{ͅ*{;!*{\* {ͅ*"{ͅ*${ͅ*&{;!**{ͅ*^{ͅ*.{ͅ!2{̀|!:{̀|*R{ͅ*V{;!*,{ͅ*`{ͅ*0{ͅ!B{̀|!J{̀|*T{ͅ*X{;!*({ͅ*{ͅ*Z{ͅ*\{ͅ*{;!*h{ͅ*j{;!*l{ͅ*n{ͅ*p{ͅ*r{ͅ*t{;!*{͕!*{͕!* {͕!"K0N!* {*K)^#Vͅ*{*K)^#Vͅ*{*K^#Vͅ*y*K)^#V\*y*K)^#Vͅ*y*K)^#V͕*K#"K*y}|G!"KH*y"IqH*I+|jHH*I+"I*y*K)^#V*I)))̀!^H!*Kͅ*I;!"oH!*y*K)^#V*o)))̀͵*o#"o*I}|H*K#"K*y}|UH!*z;!, *z:%*! _*hz^#V!2͉$*hz^#V͉$!2͉$*hz^#V͉$!7͎%͉$*z͉$*y}&͉$!2͉$*y}&͉$:%**z!2:*}L>!'* z"!!Kͼ*!2͉$!!!>!!Kͼ!!{b!{b!{b!{)^#Vͅ*{*K)^#Vͅ*{*K)^#V;*K#"K*{}|M!"KÃN!*b{*K)^#Vͅ*d{*K)^#Vͅ*f{*K)^#V;*K#"K*{}|FN!, *=:%**=!2:*)O>!'*{ozg"*!U {ozg"*! U {ozg"*!U {ozg"*!U {ozg"*ËO>!'*!U "* *}o|g"*! U "c*c  *}o|g"*øO>!'*}&*]~͉$!7!U`**y#O+)O~#focPdPzPPPQQSSSSSSTT*y|O*y:%::*b!{b}!!{n! {b!"{b!${b!&{b}!!*{b!^{b!.{b!2{h!:{h!R{b!V{b}!!,{b!`{b!0{b!B{h!J{h!T{b!X{b}!!({b!{b!Z{b!\{b!{b}!!h{b!j{b}!!l{b!n{b!p{b!r{b!t{b}!!{n}!!{n}!! {n}!"K~K!* {*K)b*{*K)b*{*K)b*{*K)b*{*K)b}*K#"K*{}|2K!"KK!*b{*K)b*d{*K)b*f{*K)b}*K#"K*{}|K!, *=:%*!, ! "KK!6"K*Kyx}o|gYP+)P~#fo*TV8T?TUUVuVV{YYVKWLWMWNWWWWWY'Z* z"y* z"y*y"y!`*y{zT9f*y*z)^#Vogqf* z"y*zcU!<3!!*z+͋m:%*y|ʧTU!?3!7!*z+͋m:%*y|TU*%| U*yog*y*z*͉$:%*:%*:%/U*yog*y**z͉$*͉$:%*yog*y^#V*z{ozg*z *z!ͦ^*6zm**z+͎%*z_m*yog*y^#V*z{ozg*z *z!ͦ^*6zm**z+͎%*z_m*,zm!!Jg|U͝j* z|‚T9fv?s* z"y*ÿ́E* *y2>"*|Z͝j*y͍b*yͧI"*ÿ́E*yL* z"y;!_3:%IZ* z"yi:)8|qZ*y!! &m:%zZ*ym:%!![ͼ*;*W~͉$!P!!>!!Zͼ!"KZ!!n}**m%͎%*m$Z!*K*Y~͕Z*K#"K* z|²Z!, *;!f3$[;!m3:%$[;!s3:%!!W[ͼ*y*;͉$!!!>!͖ *zͨ`*;!y3$m[! "Ks[!6"K*K`!"`* z"y*yͧI1T*yL1T;!3:%IZo ͝'*%*}o|g͛_*z&**͎%͉$:%*R`*y{zW_"*å`>!'**ͦ^*(z%{z`*m*(zmá`**P{ozg_m*`>!'*2z*͉$!!U`*,zm* z"y*&a>!'!\!N!!>!*!n}!, *ͨ`*:%*a>!'*z|da*y|da!!da**z+_m**y|a!!ҁa*>zm!zͱ!zͱ?Үa*z*z+%ma*z"!̀*y|a!!a*:zm*Êb>!'*%|b*: GPERROR.FIL--, --Y#NORMAL RUN PGMPROGRAMCOMPUTECOMPUTE R/OC/OR/CC/R - - P ^*z"^͐}/o|/g*}/o|/g{ozg|;]*ͫ"*z"**Jz{ozs]* z"!"z!"z*z"z***Bz{ozŽ]*z#"z***Dz{oz©]*z+"z***Fz{oz]*z+"z***Hz{oz]*z#"z**z*z)*s#r*z{oz^!%**z*!L)"*{zhb!(x%**+͎%͉$*z͉$**#*z&͉$!)x%͉$:%Æb!(x%*͉$!)x%͉$:%*c>!'*"y*@zm*y"c*z }o|g**y{ozg###ͦ^*}&*z͉$*y*)^#V͉$! _m*#"*y*{zb*,zm*c>!'!**z{ozgͦ^*y*)^#V*y^#V!{ozg|uc*z}o|g"{c*z"*y|ʓc*8zm*+"Ùc*6zm*}&*z͉$*y*)^#V*y^#V͉$*_m*,zm*z"y*rd>! '* *z{ozg*z *"z^*z#"z* z|]*ã^!"* z"Z^]|?^* z"y**z|*z|Z^**z*z{oz-^*z"*z*z)^#V"*z{oz˜^!"zß^*z#"z*Ø_>!'**$z"**$z"*z|^*zm*"zx%m*x%m*x%m*z+|(_*zm*}&m* zx%m*}&m*"zx%m*z++|S_*zm*"zx%m*x%m*x%m*z+++|”_!x%m!Hx%m*x%m!x%m!Vx%m*x%m*_>!'*{z_*"_!"*_>!'*͛_*z&*͉$*͎%:%*9`>!z!ͦ^*y|d*8zm(d*6zm*zm*z!U +!\&* }&͉$*z!\&͉$*z+͎%m*,zm*z"y* e>!'*y*)^#V!{ozg|ʣd*z"y* *y*)^#V"*y*)^#V"**z{z**z}|**z{z**z}| e*z"y* **z{ozg*z *z**z{ozgͦ^*y|Je*!'*y*)^#V"y*y*)^#V"y*z*z͉$*}&͉$*z͉$*y*y)^#Va͉$!\͉$*z͉$*z͉$*}&њz}|j*)*z{ozg"z* z"y*y|Uj*y*yud* z"y*y*+)^#V*y*))^#Vud*+*)͂e!"z!"z*y"!* z"-*!Új]*,zm*z*zJg"/*/Èm*z"yj|ʮjÝj*y*z{ozg*z{zj*y*z{ozg"z*y*z{ozg*z{zj*y*z{ozg"z*z+| k!"z*z+|k!"z*z*z"z*z*z"z*z*y}|Fk*y"z*z*y}|Zk*y"z!!ͦ^*4zm*6zm**z_m*z!ͦ^*z"k@m**z}|k*z"**+͎%*z_m*#"*z}|kj|kÝj!!ͦ^*6zm*z*z_m*z"͉$*z͉$*y*y)^#Va͉$*z͉$!!U`*nf<`|Tf*y*y)^#Vcjf*yog*y^#Vc*Gg>!'*{zf*z*z͉$*y*)^#V}&͉$*z͉$*y*)^#Va͉$*z͉$!!U`*|=g*z*z͉$*og*y^#V}&͉$*z͉$*og*y^#Va͉$*z͉$!!U`*"y*|j>!#'!"!*%|*#|ug*!*y|ʀgi<`|ʋg[h*%|W_*'{ozg|ʬg*z"yöh*yog*y^#V*#"y*y*y}|g*y"y*y{zg!"y*y*z{zh*y"z*l@m**#*z+&*z_m*#"*z}|lj|@lÝj!!ͦ^*6zm*z!\&m*z"ul*c*#"*z}|glj|ʋlÝj*z"m*c*A}|ll*:zm*z"l*zm*y*)^#V*y^#V*y*)^#V)))̀)a*#"*z}|lj| mÝj*#"*z}|l* z"y*y|9m*y*yud*19f*1*y*)^#V*y^#V:%*%|om*z:%*z*!L)"*1*1[p>!5'!:x%*;͉$*9*7U`*=:%*;%*9##"?*z"-*=%*?*7ͦ^^"*x%A:%*z*zJg* z"y*y*z}|*h*y*z{ozg"z* z"y*y|Bh9f* z"y*yc*y*y)^#Vogqf`j*#|W_*'{ozg||h*z"yg*y*y)^#V*%"y*y*y}|h*y"y*y{zh!"y*y*z{zh*y"z* z"y*y*z}|h*y*z{ozg"z* z"y*y| i9f* z"y*yc*y*y)^#Vqf`j*y*y)^#V*#")*y*y)^#V*%"+*)*z}|`i*+#"+*z")*+*y}|{i*)#")*y"+*)*z}|i*z")*+*y}|i*y"+*+*z{zi*+"z* z"y*+*z}|i*+*z{ozg"z* z"y*)*z{zi*)"z* z"y*)*|n͝j*-|n*z"-m*y|%n*3*0}|/W_*'{ozg*9{z/W_{ozg|\nÌo*'|”n* }|/*~{z/*{zҔnÌo**Rz{oz§no**Lz{oz* {ozn1p**Nz{oz*++++++++|*=%{z7o!x%m*zm!x%m*=*=%+͎%=:%m*'|Vo*A;&*\z!L)"\o!"*{zo*^z*!&a%}&=:% pm*"{oz*=%*5{zo*Am*=*A͉$=:%m^"*x%A:%*A*Vz!L)"*Tz|o^*|p}&m!]m*z|t!]m$t*zm!]m*,zm*z"y*[ht!!y͎!!y͎!"y*y:%*]îu=t*z"y*z"y*z!!*y^p"U*y|ʞt?snt*U*z{oz*y+|t!`nt*U*z{ozt!͍bnt*y*U)^#Vzt!'`nt*y*U)^#Vaw*y*U)^#V!U "y*y*U)^#V!dU *y  {ozg"y*y*U)^#V*y {ozg"_*y {ozªu*y*U)^#V*y {ozg͍bnt*_õu*aüu*cu<`|u!!Jg"u!!Jg"*|u͝j*eQv>!i'm*Xz*!&a%}&=:%*?*7ͦ^*=m*=%|Hp*3:%Qp*=3:%*z"'*3hq>!E'*E}&%"M*I|Šp* z"'p!(x%*K!L)|p*K*z͉$!(x%͉$*G}&͉$!\͉$*E}&͉$!)x%͉$K:%*K*I!*M͋m=:%*y|q*C*=%|#q*z"C*C*="?*?*G{z/*?*E}|/Zq*?"C*C!`p*CÞq*z!!!͋m;&=:%*=!\$ʚq* z"y*Or>!S'*S%|¿q!"Q*Q*S"y*z*S!L)#"U*S*U!&"y*z*S*U*i{z,v*y*i)^#V*y^#V͡q"gMv*iog*y^#V*y^#V͡q"g*gv*y{oz*y{ozҀvͿu*k*z*y{ozg*y{ozg|ʠv*k<`|ʼv*y*y)r:%v*yog*yr:%Ϳu*ków*y*y{ozv*m*y{zwWw*yog*y^#V"?*?*z{z+w*z"?*?*z}|?w*z"?*y*?)^#Vog"yßw*y*y)^#V"?*?*z{z{w*z"?*?*z}|w*z"?*y*?)^#V"y*yqf* z"y9f*mw]*y{ozg|w* z"y!"y!`v*ow*zͨ`v*qw*sx*uL)#"U*z*S*UL)"W*S*U*W*U{ozg&y:%*S*W#!&!y͎*z*S*W#L)#"U*S*U!&!y͎*y!U "y*y!dU *y  {ozg"y*y *y}o|g"Q*Qͮ!u`* z"y* z"*C;*#"**}|(;!"**!*!&;&a%"*=<>!%'*!*#!&!'͎!0"/ã;*#"**{z;!"/ã;*!*#!&a%"/*/0}|/*/9{z/p;*%+|;!'*y^#V"#*#*%++| TO END.SEND TO TERMINAL #. USE TO END. B:MULTI.SYSFROM TERMINAL #: FROM TERMINAL #: MSG # SINGLE USER SYSTEM. USE KEY TO END COMMAND.MSG # y!0"|"|!0"|W~!0:%Y~!0:%[~! 1:%]~!1:%_~!1:%a~!1:%c~!:1:%e~!U1:%g~!j1:%i~!1:%k~!1:%m~!1:%o~!1:%q~!1:%s~!1:%u~!1:%w~!1:%y~!1:%{~!1:%}~!1:%! !!!~(*~!2:%*~!2:%*~!%2:%*~!72:%*~#*y{z&!3'*y{z<*z*z͉$*y*3)^#V}&͉$*z͉$1:%÷<*z*z͉$*y*3)^#V}&͉$*z͉$1:%*1ÖB*97:%*9;:%!y"=!y"?*y~8{oz0=*y*=)^#V}&!3͉$*y*?)^#V}&͉$*z͉$;:%*y0{oz*y~8{ozp=*y%"*y!:%!"@!"AÒ=*A#"A*A*y}|=*5*y*A)^#V*y{ozy=*y*A)^#V! b_;:%*y%{z=*;*y͉$*z͉$;:%*y|=~A*y+++++|0B*=}&*;͉$!3͉$*?}&͉$;:%*5*y{ziB*;*z͉$*z͉$*?}&͉$;:%ÎB*;*z͉$*z͉$*?}&͉$;:%*5*5C>!G'*y*G)^#V*y^#V"I*I!U "K*K *I}o|g"M*M! U "O*O  *M}o|g"M*O|C*rz"O*EÕC>!S'*S{ozg"U*S!U {ozg"W*S! U {ozg"Y*S!U {ozg"[*S!U {ozg"]*Q*y#C+)C~#foCCD~DD*y|ʻC*y,}o|gC+)C~#foDDFfIMYU&WPSSWXYYE[!,u`q>A*y%{z*y++++|*y|*y}|/E>*5*ys>+)W>~#fo>>>>C???%@K@O@{@@@@*;*7͉$;:%*5*?@<7:%*5!ỳ}&!3͉$*?@<͉$7:%*5*=@<7:%*?@<*7͉$7:%*5*z*z͉$!y*y^#V}&͉$*z͉$*z͉$*z͉$!y*y^#V}&͉$7:%*5*y}|/*y{z/*y|q??ñ?*y*=)^#V}&*[~͉$! 3͉$*y*?)^#V}&͉$7:%*5!ỳ}&3͉$*z͉$*?@<͉$7:%*5*y*=)^#V}&*]~͉$!3r*y8{ozD*y"/"D*y"/*W~!!*/o"=*y|AD*=*z{ozTDD*Y~!4!*/o"?*?*z{oz}DD* z"y* z"y*z"_*z"*z*z"a*a*y}|D*y"a!!A^*4zm!!A^*a~!2b_w*z!b_m*c~!b_m*u~!b_w!!3&m!3m!!E3&w*"ëF:|>E*_|LE*,zm*}&*z͉$*y*)^#V*y^#V͉$!b_m*y*)^#V*y^#V!C*i~*U #!&m!H3*W #!&m*Y {ozE!b3m*Y{z*Y }| F!j3"͉$*y*?)^#V}&͉$7:%*5!ỳ}&*_~͉$*?@<͉$7:%*5*5*z*z͉$*y*?)^#V}&͉$7:%*5*z*z͉$*y*?)^#V}&͉$7:%*5*5*?}&7:%*5*5 ;"C*C|@*;*7͉$;:%*9y:%*9!:%*5*Cx%*7͉$7:%*CL{oz4A!F;}&*7͉$7:%*CV{oz{A!F;}&*7͉$ ;x%͉$!F;}&͉$7:%@*y+++|žA*?@<*;͉$;:%*y+++++|A*=@<*;͉$;:%*?@<*;͉$;:%*5*y++|A4B*y++++|*y+++|*Y*Y|F!r3m*[|&F!z3m*[|>F!3"*[+!3*] #!&m*͓u"y*y|nF;ͮ*zC`>ͮ*y {zM:÷Mz*z"_* z"y*y|M* z"y! u`!N"c!/,I*y|MÜM!4m*zw;*c#*z&͉$;:%*}&*z͉$*;͉$!b_m*O}&! ͖_m*M|_H*z"MfH*M+"M*M}&!͖_m!3*K #!&m!3m*og͓u"y*y|ʶH;<ÿH;!3:%*_|H*z*;͉$wH*z*;͉$!b_w*#"*a}|G*9;:%*97:%*9y:%*_|(I! u`fI>!g'>ͮ*gu`͹]"c*y|ZI!u`*er>ͮ*e!N"c* z"_!/,I*y|ʇIÜM!3"*y!4ͨZ*yT*y9B!4m*zwB*m~m*q~w!!#4&wB*y~!&4͉$"*fzT*dzT*bzT!7͎*{B*s~m!#͎*u~w!4m!#͎!5m!-͎!5w*y"i!"y!"6P:|TNpP*k"y!$5"**y+|*y++|*y+++|ҔNO*y{ozN*z,5͉$"!y*y^#VT!y*y^#VO*y{oz*y{oz*y{ozOO*y{oz*y{oz=OO*y{zO*z!75͉$"*y*y)^#V*y*y)^#VamÿO*z!=5͉$"*yog*y^#V*yog*y^#Vam*zm!#͎;<*;w*! U   *}o|g|OB*~!34͉$"*`z9B*[~m!:4m*y}&m!>4m*y}&m!C4m*]~m!G4m*z}&m!K4m*z}&wB*m~m!P4m*hz^#Vw*m~m!V4m*hz^#Vw*m~m!\4m*hz^#VwBB*z{zJ!/,I*y|JÜM*zm*q~w!!b4&wB!"*y"a!͎D*y|#KÜMBB*z{z=K!/,I*y|HKÜM*zm*q~w!!e4&wB!"*z"a!͎4G*y|ʄKÜMBB*z{zK!/,I*y|ʩKÜM*o~m*q~w!!h4&wB!k4m*z}&w!y4m*z}&w*~^#Vm!4m*p2{oz*z{z$P!/,I*y|/PpP*#"*y}|INBB>ͮ*9;:%*97:%*9y:%*zC`>ͮ*y {zP:ËPz* z"y*i"y*y|®P! u`* z"y* z"y*zC5͉$!M5͉$*y}&͉$!Q5͉$C`!!A^*,zm*s~!b_m*u~!!b_m!!A^*,zm!Z5m*y"i!"y!"m!"2S*y|KQ*i"y*k"y**m {ozg"o!*oA^*,zm*,z!2b_m!*oA^!5"**y+|*y++|*y+++|QR*y{oz*y{oz*y{oz$!I6͉$C`W*9!!!-&ms:%*y|5Vr*s%|CVV!b6!!!>**z{oz´V!"äV!*#*w}&o6͉$!6͉$*s͉$͕*#"*}}|pVV!*#*w}&6͉$!6͉$*s͉$͕!, ͧT"c*c|W*y}&6͉$!6͉$*s͉$!!_* z|V*y }|AW!6C`* z"y!6C`WͧT"c*c|ʩW*{!U  "c*{*c{ozg"c*y}&6͉$!6͉$*s͉$!*c_!"Wͪ\|W* z"y! u`*#" ҲW* z|KW*y"y*=*?{ozWîX*?*=} RR*y{oz*y{oz2RR*y{ozsR!5"!y*y^#VT!y*y^#VR*y{zR*z!5͉$*z͉$"*y*y)^#VR*z!5͉$*z͉$"*yog*y^#V! *oA^;<*;!!b_m*!U  *}o|g|+S!0,I>ͮ*m#"m*#"*y}|!!bTͼ*qm*w~w!@!5&wZT!!sn}*s!5$ZT*sw* z|8T!, >ͮ*y {zT:ÃTz*zC`* z"y>ͮ!u`* z"yYU*z"u!5!!!>!!!sn}*s!!&"w*s!%!&"y*y|*y*{{oz-U!, *u!*w#!sn}!, * z"u*y"{*u*y }|tU!5C`* z"yͧT"c*c|ʫU*y}&5͉$!5͉$*s͉$!!_*y }o|g"}!5!!*}o"*y|U**z{ozU!6C` V*}&56*9:%*yog*y6#6!"QZ*y*)^#V*yog)))!͛*#"*y}|%Z*y"?*yog*y^#V"=*=*?{ozʠZ*=#*y^#Vog"yûX*y*y)*9:%*y*y)*9:%*y*y)6#6!"Z*y*y)^#V*)))!͛*#"*y}|Z*y"?*y*y)^#V"=*=*?{ozB[*=#*y^#V"yWo ͝A^*(z%{z%`*m*(zm<`**P{ozgb_m*r`>!'*2z*͉$!!_*,zm* z"y*`>!'!:\!N!!>!*!n}!, *C`*:%*|a>!'*z|`*y|`!!`**z+b_m**y|a!!a*>zm!zͱ!zͱ?Ia*z*z+%m[a*z"!̀*y|xa!!xa*:zm*%b>!'*%| a*:%**z*!L)"*{zb!(x%**+͎%͉$*z͉$**#*z&͉$!)x%͉$:% GPERROR.FIL--, --Y#NORMAL RUN PGMPROGRAMCOMPUTECOMPUTE R/OC/OR/CC/R - - P ö]*z"ê]͐}/o|/g*}/o|/g{ozg|\*ͫ"*z"**Jz{oz]* z"!"z!"z*z"z***Bz{oz)]*z#"z***Dz{ozD]*z+"z***Fz{oz_]*z+"z***Hz{ozz]*z#"z**z*z)*s#r*z{oz£]!"zê]*z#"z* z|³\*>^!"* z"]ͪ\|]* z"y**z|*z|]**z*z{oz!b!(x%*͉$!)x%͉$:%*÷b>!'*"y*@zm*y"Ûb*z }o|g**y{ozg###A^*}&*z͉$*y*)^#V͉$! b_m*#"*y*{zFb*,zm*yc>!'!**z{ozgA^*y*)^#V*y^#V!{ozg|c*z}o|g"c*z"*y|.c*8zm*+"4c*6zm*}&*z͉$*y*)^#V*y^#V͉$*b_m*,zm*z"y* d>!'**z{ozg*z *z!A^*y|ʷc*8zmc*6zm*zm*z!U +!G\&*}&͉$*z!J\&͉$*z+͎%m*,z]*z"*z*z)^#V"*z{oz3^!"z:^*z#"z*3_>!'**$z"**$z"*z|Š^*zm*"zx%m*x%m*x%m*z+|^*zm*}&m* zx%m*}&m*"zx%m*z++|^*zm*"zx%m*x%m*x%m*z+++|/_!x%m!Hx%m*x%m!x%m!Vx%m*x%m*__>!'*{zU_*"[_!"*Ó_>!'*6_*z&*͉$*͎%:%*_>!'*%*}o|g6_*z&**͎%͉$:%*_*y{zW_"*@`>!'**m*z"y*e>!'*y*)^#V!{ozg|>d*z"y**y*)^#V"*y*)^#V"**z{z**z}|**z{z**z}|ҥd*z"y***z{ozg*z *z**z{ozgA^*y|d*!'*y*)^#V"y*y*)^#V"y*z*z͉$*}&͉$*z͉$*y*y)^#Va͉$!M\͉$*z͉$*z͉$*}&͉$*z͉$*y*y)^#Va͉$*z͉$!!_* f_|e*y*y)^#Vͺbf*yog*y^#z!"z*y"* z"*5jͪ\*,zm*z*zf"*#m*z"yj|Ij8j*y*z{ozg*z{zqj*y*z{ozg"z*y*z{ozg*z{zj*y*z{ozg"z*z+|Ҩj!"z*z+|ҷj!"z*z*z"z*z*z"z*z*y}|j*y"z*z*y}|j*y"z!!A^*4zm*6zm**zb_m*z!A^*z"bkl**z}|Ek*z"**+͎%*z͖_m*#"*z}|.kj|xk8j!!A^*6zm*z*zb_m*z"kl**#*z+&*z͖_m*#"*z}|kj|k8j!!A^*6zm*z!Q\&m*z"V|c*f>!'*{zsf*z*z͉$*y*)^#V}&͉$*z͉$*y*)^#Va͉$*z͉$!!_*|f*z*z͉$*og*y^#V}&͉$*z͉$*og*y^#Va͉$*z͉$!!_*"y*j>!'!"*|*|g**y|gúh_|&gg*|W_*{ozg|Gg*z"yQh*yog*y^#V*"y*y*y}|tg*y"y*y{zg!"y*y*z{zg*y"z* z"y*y*z}|g*y*z{ozg"z* z"y*y|ge* z"y*y|c*y*y)^#Vog fi*|W_l*|c*#"*z}|lj|&l8j*z"ìl*ͺb*A}|FlÚl*:zm*z"Ïl*zm*y*)^#V*y^#V*y*)^#V)))̀`*#"*z}|Ulj|ʥl8j*#"*z}|/l* z"y*y|l*y*yd*e**y*)^#V*y^#V:%*%| m*z:%*z*!L)"**o>!'!:x%*͉$**_*:%*%*##"*z"*%**A^͹]"*x% :%*z*zf|ʣm8j*|ʴm*z"km*y|m**0}|/W_*{ozg*9{z/W_{ozg|m'o*|/n**{ozg|h*z"yÇg*y*y)^#V*"y*y*y}|>h*y"y*y{zQh!"y*y*z{zkh*y"z* z"y*y*z}|h*y*z{ozg"z* z"y*y|§he* z"y*yͺb*y*y)^#V fi*y*y)^#V*"*y*y)^#V*"**z}|h*#"*z"**y}|i*#"*y"**z}|*i*z"**y}|>i*y"**z{zXi*"z* z"y**z}||i**z{ozg"z* z"y**z{zi*"z* z"y**z}|i**z{ozg"z* z"y*y|i*y*yd* z"y*y*)^#V*y*)^#Vd**e!"ڇ }|/*~{z/*{z/n'o**Rz{ozBneo**Lz{oz* {ozkno**Nz{oz*++++++++|*%{zn!x%m*zm!x%m**%+͎%:%~m*|n* ;&*\z!L)"n!"*{z$o*^z*!&a%}&:%ûo~m*"{oz*%*{zbo* m** ͉$:%~m͹]"*x% :%* *Vz!L)"*Tz|ʓo͹]*|žo~m*Xz*!&a%}&:%**A^*m*%|o*:%o*:%*z"*q>! %Ius*z"y*z"y*z!!*yo"*y|9tr t**z{oz*y+|ct!u` t**z{oz}t!(b t*y*)^#Vz˜t!'u` t*y*)^#Vaw*y*)^#V!U "y*y*)^#V!dU *y  {ozg"y*y*)^#V*y {ozg"'*y {ozEu*y*)^#V*y {ozg(b t*'Pu*)Wu*+Ðu_|su!!f"Áu!!f"*|ʌu8j*-u>!1'*1{zu*y*1)^#V*y^#V!'*%|Zq!"**"y*z*!L)#"**!&"y*z**L)#"*z**L)"****{ozg&y:%**#!&!y͎*z**#L)#"**y{ozvZu*3*z*y{ozg*y{ozg|;v*3_|Wv*y*y)fr:%nv*yog*yfr:%Zu*3Nw*y*y{ozŒv*5*y{zvv*yog*y^#V"**z{zv*z"**z}|v*z"*y*)^#Vog"y:w*y*y)^#V"**z{zw*z"**z}|*w*z"*y*)^#V"y*y f* z"ye*5}wͪ\*y{ozg|yw* z"y!"y!u`xv*7Îw*zC`xv*9Õw*;Üw*="y*yqf* z"y9f*mw]*y{ozg|w* z"y!"y!`v*ow*zͨ`v*qw*sx*u!&!y͎*y!U "y*y!dU *y  {ozg"y*y *y}o|g"*r*y *y"y*y}&*z͉$*y}&͉$*z͉$*y͉$*z͉$!ỳ}&͉$*z͉$!ỳ}&͉$!:%*!s!!A^*0zm*z!b_m*zm*zm!Z\*y #!&m*zm*zm!\*y ++!&m!\m*zm*zm*y}&m!\m*y}&m!\m*zm*zm*z}&m!\m*z}&m!\m*z|ʹs!\mÿs*zm!\m*,zm*z"y*#t!!y͎!!y͎!"y*y:%*a3"CHOOSE (SL=1,SYD=2,DDB=3,DDB-SW=4) BOOK VALUE SALVAGE VALUELIFE (IN YEARS) LOAN AMOUNTTERMINAL BALLOON PAYMENT AMOUNTTERM OF LOAN (YEARS)ANNUAL INTEREST RATE (%)ANNUAL PAYMENTNUMBER OF BRACKETSUPPER LIMIT FOR BRACKETMARGINAL TAX RATE (%)ENDING MARGy"yo *y*y)^#V"!!ʹY!>2mͰmͰ!F2$C6![!"y* z"y* z"yÍ5* z"yMnÍ5bqyo"y*y*y)^#V#"#*#"%û6*%q"y*y{z6*y*%)^#Vaô7*%#"%*y}|6*y+++|6!"y*z+*y^#Vog"y6Á7*yog*y^#V#"#*#"%P7*%ogq"y*y{zI7*y*%)^#Vogaô7*%#"%*z}|7*y++++|7!"y*y+*y^#V"yp6*y"yMn*y^#Va*y|¤7r!"yKo* z"yr*y|7g8>!)'*+*){oz7*'*)*+}|7!"-7!"-*INAL TAX RATE (%)SCHEDULEEARNINGSTRIAL WHICH COMMAND!ERROR IF(CHOOSE (ANNUAL=1,QUARTERLY=4,MONTHLY=12)ROW # (OR USE COL TITLE=CR)COL # (OR USE ROW TITLE=CR)DESCENDING=0, ASCENDING=1PV= FV= R=% N= PMT=? PLEASE WAIT@<A #@>IRR: sorting...OK TO RESET CHART PARAMETERS. y!0"|"|!0"|W~!0:%Y~!1:%[~!!1:%]~!01:%_~!A1:%a~!N1:%c~!o1:%e~!1:%g~!1:%i~!1:%k~!1:%m~!1:%o~!1:%q~!2:%s~!2:%u~y*+)^#V"/*+"1B8*y*1)*1*-*y^#Vs#r*1*-"1*1*){oz8*y*))*/s#r*' 9>!5'*7*5{ozˆ8*3*5*7}|8!"-å8!"-*y*7)^#V"/*7"18*y*1)*1*-*y^#Vs#r*1*-"1*1*5{oz¾8*y*5)*/s#r*3C9>!;'*y*;)^#V*y^#V;&!(Z9:%*99>!?'*y*?)^#V*y^#VA:%*z*A!L)"?*?{z9*A!!(&A:%9*A*?+͎%*A*?#*z&͉$A:%*A;&!(Z=:%*=*y#9+)9~#fo6:7:K;< =>??*!%2:%w~!,2:%p4>!~'d4*z*~!*ylk"~*y|@4*~*~*z{ozd4*y*~)^#V"~*~* z|4*~4>!~'4*z*~!*ylk"~*y|ʡ4*~*~*z{oz4*y*~)^#V"~*~* z|4*~e5>!'Y5*!!!͙h:%*%|5~!z͉*:%!~*y|&5!~!;2*!L)|R5*!~͎*:%!~![* z|4!~!6͠*y|*y++|Ҋ59Í5:*y#5+)5~#fod6n6o6p66*y*y{ozg|ʿ5Í5*y|5Mn*y+++++++|5* z*z{ozg"zX6*y*y{oz5k5*y|:*y }o|g5:+)#:~#fo@AFJJ#MNST*y+++++|R:![* z"y*y{zm:! [* z"y*W~!!!lk"C*y|ʌ:*C*z{oz¢:!"C*Y~4̀!E͎*y|ʻ:!!E:!!E͎*[~4̀!M͎*y|:!!M ;!!M͎*]~4̀!U͎*y|#;!!U>;!!U͎!!]͎*y++++++|g;![* z"y*y{z;! [* z"y!J2!!! lk"C*y|ʡ;*C{z;!"C!"e*_~4̀!E͎*y|;!!E;!!E͎!"e*a~4̀!Mylk"s*y|@*s{zX@J[|?@*y*s)^#V!y͎U@*y*s)^#V!y͎d@*s!y͎!2!!!lk"u*u*z{oz¾@!ỳ*z{oz¯@!!y͎û@!!y͎@*u!y͎* z"y*y*y)^#V!)))*C͛*y*y)^#V!)))!E͉*y*y)^#V!)))!M͉*y*y)^#V!)))!U͉*y*y)^#V!)))!]͉*y!̓_*y!̓_*y!̓_*y!̓_*y!̓_*y!̓_!!]ͱ!]͎!!] !w͎!!UI!w~-!͎! !gͱ!g͎*e#B+)A~#foBC[͎*y| *k~*z͉$*1}&͉$4̀!E͎*y|ʢ=E!zͱº=!!E͎*m~4̀!]͎*y|=!!]=!!]͎*y*y)^#V*1CCD!!]I!]͎! !gI!g͎*y|2B!È}&2͉$!2͉$!M̀}&͉$!2͉$!]̀}&͉$!2͉$!Ù}&͉$!2͉$!g̀}&͉$!!c[@!!BE!MX! !UIͷ!g͎BM!@!Ey!]I!!aͷ!g͎!!]0C! !UI!gI!M !E͎ZC!!a!gI!]ͨM!@$!E͎!!]‹C! !UI!gI!Ey!M͎ûCE!͟!!a!gI!]ͨ!ͨ!M͎!!] !C* z"y![]!M@!ga! D* z )))!E͉*y*y)^#V*1 #)))!]͉*y*1 ̓_*y*1 #̓_*1#"1*C}|t=*o~4̀!]͎*y|ʃ>!!]Ҟ>!!]͎*y*y)^#V*C ##)))!]͉*y*y)^#V!)))*C͛*y!̓_*y*C ##̓_*y{z?! [* z"y*q~!!*ylk!y͎*y|>?*z!yP?>!y*y^#V!y͎*s~!7!*ylk!y͎*y|ʎ?*z!y ?>!y*y^#V!y͎*w~!!*ylk"qJ[|?!t2!!*ylk"s@!2!!*"y![!!]9DE!MX!gͨ! ͷ!U͎]!E@!ga]!M@!gaͷ!͎!!/!!?ґD* z"y![!͓̀+$!ẁ͓+ͷ! ͷ!U͎]!2͉!!gEM!E͟!! !UIͷͣ-!!]͎!2Ͷ[!"1E!!] !w͎!!UI!w~-!͎!!a!]ͨM!g͟!I$E!g͟!!y]!]@ͷU!@!wͨ!!]ͨM!g͟R$ͷ!͎]!X!]͎!!]E!2!]͎!̀/!3ͿE*1#"1!I!d!͎1J*1#"1H!1[J[|tJ*y*y)^#V*y^#V)))!͉*y*y^#V̓_öJ*y^#V*y^#V*yog)))!͉*y^#V*yog̓_!̀}&+3͉$Ͷ[* z"y!y*y^#V!)))̀"* ##*y}|K![* z"y*z"1M!!͎!y*y^#V*y*1)^#V)))̀!͎!!oK!!͎!!͎!"ÐL!y*y^#V*))))̀!͎!!/!ͱ/K![* z"y!X!!!ʹY!"1ØM!!*,zm*!AZw*1#"1qM!, ! [*y*q)^#VzM!'[!"!"1M*y*1)^#V!}|M*###"*1#"1*1*z{ozg#*)))!͉!!͎!!@H*z"FH* z"**{oz]H*#"*"*1#"1*z}|G!!“H!!͎1J!!ҪH![*|ºH![*{zH![!3͉!"1"J*u~!3͉$*1}&͉$Ͷ[X|I* z"y![!!w͎!!͎!!ͨ!͎!"/åI*/+**/)))̀R!ͨ!y!͎!@!͎**/)))̀!ͨ!w !w͎*/#"/*}|EI!!I!3͉Iw!͟!͎!X!͎!̀/!#3ͿJ!dq{zM* z!@!!>!!Nͼ!*!!*!!*!!, !!ʹY*!AZw*,zm*!AZw*,zm*!AZw*,zm*!AZw*:%*:%*:%! [!, !.[!23Ͷ[*| O*y"y!y"sJ[|OQ*y"%HO*y*%)*y*%)^#Vs#r*%#"%*y}|'O*s*z{ozfOO*y#"%O*y"O*y*%)^#V*y^#V*s)))̀*y*)^#V*y^#V*s)))̀O*%*7O*#"*%+*{zyO*%#"%*y}|pO\P*y#"%QP*%|S!!y%T!"!"3Ͷ[yl*y|T!"1HU* {*1)6#6*{*1)6#6*{*1)*1s#r*{*1)*1s#r*{*1)*1#s#r*1#"1*{}|T* {6#6*{:%*{:%* {:%!"{*z"{!"{!"{{!]3:%!" {!""{!"${!"&{* z"*{* z",{* z"({*z".{*z"0{!!2{͎!!:{͎!!B{͎!!J9:%*y";P*9*$4P*%*7JP*#"*%+*{zP*%#"%*y}|O*|eP*y"1P!!yšP*y*1)*y*1)^#Vs#rP*y*1)*1*y{ozg*y}o|g*y^#Vs#r*1#"1*y}|nP*y"1Q*y*1)^#V*y*1s#r*1#"1*y}|P S*z"%;Q*y*%)*y*%)^#Vs#r*%#"%*z}|Q*s*z{ozYQQ*z#"%Q*z"Q*y*s)^#V*y*%)^#V)))̀*y*s)^#V*y*)^#V)))̀Q*%*j8Q*#"*%+*{zlQ*%#"%*z}|cQWR*z#"%LR*%F9{͎!"R{!"T{!"V{!"X{!"Z{!"\{*z"^{* z"`{*z"h{* z"j{!"1ÇV*b{*1)*zs#r*d{*1)*1#s#r*f{*1)*1#s#r*1#"1*{}|IV!"l{!"n{*z"p{* z"r{!"t{* z"yo ͝ GPERROR.FIL--, --Y#NORMAL RUN PGMPROGRAMCOMPUTECOMPUTE R/OC/OR/CC/R:%*z"6R*F9*$/R*%*j8ER*#"*%+*{zR*%#"%*z}|Q*|`R*z"1R!!y•R*y*1)*y*1)^#Vs#rR*y*1)*1*z{ozg*z}o|g*y^#Vs#r*1#"1*z}|iR*z"1R*y*1)^#V*y*1s#r*1#"1*z}|Rͫeq* z"y* z"N*z"J[|0ST!!yNS!"!"eS!"*y*y{ozg#"*y"%íS*y*%)^#V*y^#V*yog)))*͛**"*%#"%*y}|nS*y"1S*y*1)^#V*y*1s#r*y*1)^#V*yog̓_*1#"1*y} - - P )Y*z"Y͐}/o|/g*}/o|/g{ozg|IX*ͫ"*z"**Jz{ozX* z"!"z!"z*z"z***Bz{ozœX*z#"z***Dz{oz·X*z+"z***Fz{ozX*z+"z***Hz{ozX*z#"z**z*z)*s#r*z{ozY!"zY*z#"z* z|&X*ñY!"* z"hYX|MY* z"y**z|*z|hY**z*z{oz;Y*z"*z*z)^#V"*z{oz¦Y!"zíY*z#"z*æZ>!'**$z"**$z"*z|Y*zm*"zx%m*x%m*x%m*zZm*5#"5*y*5{z]*,zm*1^>!9'!*9*z{ozgʹY*y*9)^#V*y^#V!{ozg|ʃ^*z}o|g"/É^*z"/*y|ʡ^*8zm*/+"/ç^*6zm*9}&*z͉$*y*9)^#V*y^#V͉$*/Zm*,zm*z"y*7À_>!='*=*z{ozg*z *z!ʹY*y|*_*8zm6_*6zm*zm*z!U +!W&*=}&͉$*z!W&͉$*z+͎%m*,zm*z"y*;Í`>!A'*y*C)^#V!{ozg|ʱ_*z"y*?*y*C)^#V"E*y*A)^#V"/*E*z{z*E*z}|*/*z{z*/+|6Z*zm*}&m* zx%m*}&m*"zx%m*z++|aZ*zm*"zx%m*x%m*x%m*z+++|¢Z!x%m!Hx%m*x%m!x%m!Vx%m*x%m*Z>!'*{zZ*"Z!"*[>!'*ͩZ*z&*͉$*͎%:%*G[>!'* %*}o|gͩZ*z&* *͎%͉$:%*`[*y{zW_" * ó[>!'**ʹY*(z%{z[*m*(zmï[**P{ozgZm* [>!'*2z*͉$!!c[*,zm* z"y*4\>!'!W!N!!*z}|`*z"y*?*/*z{ozg*z *z*E*z{ozgʹY*y|X`*!I'*y*K)^#V"y*y*I)^#V"y*z*z͉$*K}&͉$*z͉$*y*y)^#V\͉$!W͉$*z͉$*z͉$*I}&͉$*z͉$*y*y)^#V\͉$*z͉$!!c[*G|aJ[|ba*y*y)^#V-^xa*yog*y^#V^*MUb>!Q'*Q{za*z*z͉$*y*Q)^#V}&͉$*z͉$*y*Q)^#V\͉$*z͉$!!c[*Q|Kb*z*z͉$*Qo>!*!n}!, *Ͷ[*:%*\>!#'*z|r\*y|r\!!#r\**z+Zm*!*y|\!!#ҏ\*>zm#!zͱ#!zͱ?Ҽ\*z*z+%m\*z"!#̀*y|\!!#\*:zm*!Ø]>!-'*-%|]*+:%*+*z*-!L)"/*/{zv]!(x%*-*/+͎%͉$*z͉$*-*/#*z&͉$!)x%͉$+:%Ô]!(x%*-͉$!)x%͉$+:%*+*^>!3'*3"y*@zm*y"5^*z }o|g*5*y{ozg###ʹY*5}&*z͉$*y*5)^#V͉$! g*y^#V}&͉$*z͉$*Qog*y^#V\͉$*z͉$!!c[*Q"y*OÊe>!U'!"S*W|*U|҃b*S*y|ʎb-dJ[|ʙbic*W|W_*Y{ozg|ʺb*z"yc*yog*y^#V*U"y*y*y}|b*y"y*y{zb!"y*y*z{zc*y"z* z"y*y*z}|8c*y*z{ozg"z* z"y*y|PcGa* z"y*y^*y*y)^#Vogane*U|W_*Y{ozg|ʊc*z"yb*y*y)^#V*W"y*y*y}|c*y"y*y{zc!"y*y*z{zc*y"z* z"y*y*z}|d*y*z{ozg"z* z"/*z}|g͍e|hëe*5#"5*z}|g* z"y*y|Gh*y*y̓_*cGa*c*y*5)^#V*y^#V:%*%|}h*z:%*z*!L)"/*c*cik>!g'!:x%*m͉$*k*ic[*o:%*m%*k##"q*z"_*o%*q*iʹY,Y"*x%s:%*z*zXb|iͫe*_|'i*z"_h*y|3i*e*0}|/W_*Y{ozg*9{z/W_{ozg|jiÚj*Y|¢i* }|/*~{z/*{zҢiÚj**Rz{ozµij**Lz{oz* {ozi?k**Nz{oz*++++++++|y*y|dGa* z"y*y-^*y*y)^#Vane*y*y)^#V*U"[*y*y)^#V*W"]*[*z}|nd*]#"]*z"[*]*y}|d*[#"[*y"]*[*z}|d*z"[*]*y}|d*y"]*]*z{zd*]"z* z"y*]*z}|d*]*z{ozg"z* z"y*[*z{z e*["z* z"y*[*z}|-e*[*z{ozg"z* z"y*y|ce*y*y̓_* z"y*y*])^#V*y*[)^#V̓_*]*[͐`!"z!"z*y"S* z"_*SèeX*,zm*z*zXb"a*aÖh*z"y͍e|ʼeëe*y*z{ozg*z{ze*y*z{ozg"z*y*z{ozg*z{z f*y*o%{zEj!x%m*zm!x%m*o*o%+͎%o:%h*Y|dj*s;&*\z!L)"5jj!"5*5{zj*^z*5!&a%}&o:%.kh*"{oz*o%*g{zj*sm*o*s͉$o:%h,Y"*x%s:%*s*Vz!L)"5*Tz|k,Y*5|kh*Xz*5!&a%}&o:%*q*iʹY*om*o%|Vk*e:%_k*oe:%*z"Y*evl>!w'*w}&%"*{|˜k* z"Yk!(x%*}!L)|k*}*z͉$!(x%͉$*y}&͉$!W͉$*w}&͉$!)x%͉$}:%*}*{!*z{ozg"z*z+|f!"z*z+|*f!"z*z*z"z*z*z"z*z*y}|Tf*y"z*z*y}|hf*y"z!!ʹY*4zm*6zm**zZm*z!ʹY*z"5fNh*/*z}|f*z"/**/+͎%*z [m*5#"5*z}|f͍e|fëe!!ʹY*6zm*z*zZm*z"58gNh**/#*z+&*z [m*5#"5*z}|g͍e|Ngëe!!ʹY*6zm*z!W&m*z"5Ãg*5^*5#"5*z}|ug͍e|ʙgëe*z"5h*5-^*/A}|g h*:zm*z"/h*zm*y*5)^#V*y^#V*y*/)^#V)))̀7\*/#"*͙ho:%*y|l*u*o%|1l*z"u*u*o"q*q*y{z/*q*w}|/hl*q"u*u![k*uìl*z!!!͙h;&o:%*o!W$ʨl* z"y*m>!'*%|l!"**"y*z*!L)#"**!&"y*z**L)#"*z**L)"****{ozg&y:%**#!&!y͎*z**#L)#"**!&!y͎*y!U "y*y!dU *y  {ozg"y*y *y}o|g"*Jn*y *y"y*y}&*z͉$*yy{zrer*yog*y^#V"q*q*z{z9r*z"q*q*z}|Mr*z"q*y*q)^#Vog"yír*y*y)^#V"q*q*z{zr*z"q*q*z}|r*z"q*y*q)^#V"y*ya* z"yGa*rX*y{ozg|r* z"y!"y![q*s*zͶ[q*s*s* #!&m*zm*zm!\*y ++!&m!\m*zm*zm*y}&m!\m*y}&m!\m*zm*Ҏqp**z*y{ozg*y{ozg|ʮq*J[|q*y*y)m:%q*yog*ym:%p*r*y*y{ozq**}&͉$*z͉$*y͉$*z͉$!ỳ}&͉$*z͉$!ỳ}&͉$:%*Ho!!ʹY*0zm*z!Zm*zm*zm!W*y #!&m*zm*zm!W*y ++!&m!Xm*zm*zm*y}&m!Xm*y}&m!Xm*zm*zm*z}&m! Xm*z}&m!Xm*z|,o!Xm2o*zm!Xm*,zm*z"y*vo!!y͎!!y͎!"y*y:%*üpKo*z"y*z"y*z!!*ylk"*y|ʬoMn|o**z{oz*y+|o![|o**z{ozo!͛]|o*y*)^#Vz p!'[|o*y*)^#V\w*y*)^#V!U "y*y*)^#V!dU *y  {ozg"y*y*)^#V*y {ozg"*y {oz¸p*y*)^#V*y {ozg͛]|o*p*p*qJ[|p!!Xb"/p!!Xb"/*/|pͫe*_q>!'*{z:q*y*)^#V*y^#Vͯl"[q*og*y^#V*y^#Vͯl"*q*y{oz*y{ozҎqp**z*y{ozg*y{ozg|ʮq*J[|q*y*y)m:%q*yog*ym:%p*r*y*y{ozq**Á1E`Se(New matrix may not fit in current memory1You may have to set matrix to size of your table )using SETUP command before loading table.y!0"|"|!0"|O!W~͎!!W~10!W~!W~͎*y#)))*y# *y)##!W~!!W~2*&zw!0m!W~̀?!#1w!V1w*y*y!!!y(*y!!!y(*y!!!y(*y!!!y(*y!!!y(*y!!!y(*y!!!y(*y!!!y(*y!!!y(*y!!!y(*y!!!y(!"_~3*y*_~)*_~s#r*y*_~)*_~s#r*_~#"_~*y}|2!"_~U3*y*_~)*_~s#r*y*_~)*_~s#r*_~#"_~*y}|,3!"z*z*z"z!"z*z*z"z*z*y}|3*y"z*z*y}|3*y"z!"y*y"y!"z*y"z!"y*y"y!"y*y"y!"y*y*y)^#V"͝DING MARGIN50GPLAN .j().j()!"{͖* d  =""6#}|B=!"{ "}00-!~G#~ }q+ph##a"p#w *|"|"|"|*|*|*|}!a6#6#q#p*|"|*||`i"|* ,X5 }HƐ'@'_ ERROR $ AT PC $"DM6#6#!"*{w#zw!">2DM}|*ڄ"^#V{^#V{_zWڄ{zҾ*w#ww#w###s#rq#p#!5#ʄOM+F+N*}|!"~#fo{z |q#!|"|~#M/G|*| +#4?MG|*|'w# :!|5*|#  |g !|~ȯw+6+wo:|<2|OF!| 怮w J_#~ȓAPw>2|`i"|2||*|>'#>'#>'#>'#>'#>'#>'>'wڮ*|Ϳ #~'w!|~w:|=82|!|ì|͞  |g bDZA}2|x2|iOG>F2|!|r#ti`)!|~'w#… ~ !| +» #?µ! < !|=> pT]w+ ~w!||G# }|~#~#~#O~G!}|*##^#V}|?s#r##q#pw#w#~w#~w7!N#F#~#foho}|p`i}W:0!9BKÞ DM!9͞ !9! 9N#F#͞ ͷÖBKw !9DMw ͖DMw !9DM! 9DMw !9DM͖ͷͮ!9DMË ͮË DMw !9DM*!9DMw !9DMͷʹʹ*Lͷͫjͫ!9DMw d͌ͫ! 9DMw !9DMͷ̓j̓ë͌̓ÅDMZ!9DMw ͼ !9!9!9DM w :|з! !|!|5q!||w+) p!|55 p| + + + + + + 'm P'> 'm o g"|`i|â *||• ɵ!|â ~#~#~#~#~#~#~#~#!|'w#'w#'w#'w#'w#'w#'w!9~A 6/OG #6= x>#w| DM!x& y), )2 )8 )> )D )J )P )| | ʖ zp x)yOxGyxڈ GyO#=t ogeop p )ګ #£ OÍ U `i!:|A'-lw# M>@2|2| |͋ À*%*|§|*|"|>2|:|Ww !|:|w |͋ w !||͞ !|:|w:|W!|2|w r2|2|o&G>Ow# $q#,:|!|V|Ϳ M>u|g b!|< |!|{7>' #i +>'w#>'w #†:|2| !|~PM:|M6!|~ U+w# @ }6w{2||!|~#!|~#!x  {? )܏ A 0 l&_K|g}o 1 D &l&Ï "|"{"{*{*{n "|!9DMw !|"|:|!2|:|¡ 2|>NN:|#+ $ ͔$# >$:|ä * ͔*# >*ø . ͔#>.¸ 2|S - ͔# .>-¸ >2|2|OS >2|+ \͔̔ä 2|3 > 2| ͔#2 ,H >2|2 !|q.d >2|͔#d X !|q^w ͔j !|q-ˆ >2|͔>2||͋ :|O 2|2|!|r#§ :|ʵ =2|:|> â :| :|!|67 y@G /,*|:|> >-*||*F||>2|~G#N#"|"|`i"|"||!#a&Ê/ʈ&ʈ!ʈ\Š xŠ2|>UN. xV"|*||¨*|"|*|ñ+"|*|~#"|2|*|~#"|*||+"|> ĸ"|!|454!>:|#/!&$ ͔$>$*͔*>*-.͔#.>-\͔̔*|++!"|ã:00!{~Gwog:00! !*|ʲF#N#íN͊# x£ ͊U"}2}z͐*|#"| {  >2{:}i2}2|GW x   yG:|2|b >%2|2|2||w 2:|2|Gy@w:|!|>_ >_ 4!|5<2|:|!|G:|x :|OxGxҢ |W?< =… z` zg !|~ʢ bÈ :| :|!|:| :| >-G:|OW* $ $ :|!|  Oz y:|ʩ—:|—:|©×:|2> >0> 2||g b!|~2|6:|@2|!| lr6!|p2|/O!| #~ ʌ y2|=/2|:|>0é:|=!|5:|2|!|~>.:|!|/:|:|G:|G2|x:| !|52}͛~"G͛8͛~">2}~,c͛W*}F:{ʔo&##a6#{Gw#‹*}s#r:{#ʥ:}+~ʷ"¼:} !|q~!{ w !}rimproper input - reenter $F^|,##ap#q#w x"s#rFlxG! w#w^DMl^DMl*|DM*|}|ڄODF#N# "|͍go͇ ڧO͊o&͇o&}2o&E{2xn&}!9>OU"!}>2}y2}w# :|:|M>E!|:|'5~ 2/<-Gyx/ : Gyx0:|^2|2|:|:|2|"||ƒ:|~W#^#:|¬zʢ~# Ò|~:|2|>NS"|"|:|/!&\͔͔̔ʳ/͔â͸I g :|> !{4O:|3* YI Bg >2{> #> #I ]g :|:{e> k͎b͎B!|:{=B2|!|~5*|~+"|0G>0 0:|:|:|+2}2 }0 +#-&>2 }00#.U:}/2}y˜00+: }=2 }CEʞeʞ<lyGʊ :}2}҆xÊ:}ژ: }<2 }0+y0 ʞG-_ʷxº0<G0<OxG{G: }@*!}wɯ2#}y2}0+->2#})DM)) O 0<:#}+z/W{/_s#r:}=2}~#0:?^#V* }||~!|N q!| ^!{!} n&*x}"|*x}!4#Ìzzg+{z_yW͐!*x} s#r!~}~w"}zr!!9"}*z*z+zzһ!!9"}+z+z*}*z}s#rͦ*x}!0! ~#~!~}>w:}2}&!}58Ͱ:~}2~}*z}+"}ñ*}"}!~}~wX͐͞"}:~}*}~F *|}|jRE"!9"}*}*}#{zڬ"}:~}*}n&:~}͐͞"}â!{j , Gy2 p#*|}|F{!""|WEXzZ"|WEXz%"|<EX*x}^w#Vw* }||~!"}>2}zW{_!}5ʔ*}| |g}o"}*}|g}o"}g*}*}DM*x};͞"z}*z}"z}BN|>>>)=; a"x};p#z  *x} "}"}}2}æ|}*x}$ ~#$*x} |} w#* k$}~#DF*x}r+s"|}:}=|!~}~@w"})|{>(>NF|ʥ~¥#~#ʤG*x}:ʨz6#> 6 #=®x:ҥw#2}P .2}P } !j"!!}6,!}6!{"}D2}!{"}2}:} AF PÀj!}k x*}w#"}!}~ s#r~#fo1F#NyOxTA*|}as#rr#sTF#wzJFFA>"s#r*|}|F …!~}~ЇwWR"ͦ*}*z}{_zW{z<Ͱ=¸ͦұ!~}>w*}*}|DW"G:|x *|}|S"}!}"}xҤw#p}|¤*x}!DM!:+ w< L>w:}w.d# ]7*}:}>*}>2}6?#`ډ{҉_:ʤ*ʤ?ʝw#:}ڬIF>?Ø*z}*}}O|Gr# x*}*}#{z"}2};3͂z:}*x}!~w:}*x}!~w͒C*x}!^w#Vw*x}. s#rͱ>;zV|EX*})$}w#wN}^#f|OEk2};3͂zzڮ*x}!:~ʮ!~wͭ±MEkN} s#rk$} ^#VzFU"x}*})N} ^#V"} *|}"}!9"}*}|ER"+"}͐*z}"}:~}<*x}! N#F p+q*}w!~}>w!9"}}:|j>"p:|>"Ëj ËL :|>,:|ڣ>"p:|>"j L :|*}|++> +|> > *x}!0! w#w*}+"}!~}~w*}*}|EFk$} ^w#VwzCU ""x}ͦ ͐ͦͲzc EXN} w#w;!È $})~#fo, *}#"}{zu k$} ^w#VwzDU ""x}ͦͲz EX͗c !9"}!;͂z<FR"*x}"}!;͂$''%%ɯ>e'%7%e'%7?%z%N#FyF%x+ͺ'|[%~&~ws#re'q%n&'AC!as'q++*zSSe'yxҧ%PY##a"}s'BK{''*}|e'++'zSSe'yOxG& ##a"}s'BK{''*}|~&DMxl&zl&|~#+4&'!e'yOxGr&yxO&PYa"}s'BK{''*}SS!"}d&!|~2}w2{&j *{&##axw#q#{{':}2| !{4^w|~&e'&a~&~_w# x&e'! as'BK{'++z<3!*x} *}~# !z;*}"x};!;*}"x};!!;>2}͂*x} 6?##6?!"}_*x}~ʆ!=_"|<EX]"|<EX##FNz!`*z}O yŷ!~##!!!~#!!*}"}ê!;2}*})!*}!\"x}͂!hw##"!e~ ="6O#6V#6Li"CV"#~OP"#~Mi"CTOP"#~VP"#~LP"\:00څ"!b~w<CM*|*#ª" "´"##"N#F#x# g o" ="  GO" _ W"yx "Ø"}|!"}]'e']'`i ##a"}s' xG'G*}p#z<']'{'*}+|"}H''*}|DM~G#N#zw#s#xʌ'@ͥ''yʞ'Ow# •'yOw#w#w#w# ¥'^#V* }||~!9 ''~#fo:%##('~#'='`i"}^#V* }|.(*}w#w};(@(>B(>2}!}"~!9N#F# y2}Ã(2}+~+ng# *~s#r#"~DM:}=b(+~+ng# :}_ "}a"}*}"})"}*}+F+N ##6# x(~#fo#:}_ og"}:}1)2}*~+V+^"~)*}*""* {z #*| #+~w*"}!"}*}"}o$Y#*}"}##^#V*}"}*{z/#m#*}^#~WC##,#!"}*o$ʇ##~w+Ì#"}##^#V*{zv#:eO#]!&$#¯#*{z#\!#f$*\!*{z#\f$CX!>$(~#.$!À\ʀ\! "\\*}}ʇ${Ozر~#fot$=e'PYe' |$##a"}s'{'{'''*}! 9SLz%|(%e'PYe'y_xW4%x%%# x}"}*}+r+s"}*}+"}|(#~#fo#)og"}:}=(*}*}s#r:}=E)"~"~"~ů>MP*~p*)`i"~*~yx+"~)*~p*)`i"~\˜)+ x)"~*~ò)#))*~*~}|)!*~g**~g*" ~2~!""~* ~*~}|?*"~*~~\!~*6*&** ~#" ~*"~#""~*~#}|)*"~*~F*~* ~#N!~~_*x?c*#R*y0 !a*y_A6x7?|~|DM~G#N#/ *SQ.w ʹ7~͋ w !|~G w|!-o|g~x.ܴ>/~͋ .ʹ?~͋ 7~w /~̓?~ͮ=*Ë / "(HdA1AAXS&YA1AIy&cypt dYd?Sh&&iyv&3uF=84SY592xXT(E133@P5D @cbe@(u?Bp6W>W"f(@E3Sx/~͋  .ͮ7~͋ w  .ͫ7~Ã%~͋ /ͮ%~ʹ! DM=/7~ Ĵ/~î!9DM }q+ph# ORDERMODE2.~ w +͖}+ ͫ/~! .͞ 27~>.ͺ/7~͋ w ͼ 7~w }.!;.r+e+ʹQ+#U+:.~,,Ë :.~}UË CbQYDes/ 2$~=+LN>A.w ʹ͗/?~͋ 27~/~!.͞ ʹ/>ͺ/G~͋ %~w /~!.͞ .>ͺ/G~̓?~ʹ/~͋ :$~AO>,/GZ.ͮ.ʹ/~ͮË /~͋  .w Ã/ :W zw /ͫ/:|Q,/ͮ:|x,ͮ/|,ͫ҇,!|~w:|:ڮ,/~͋ /̓7~͋ ʹG/>ͺ/Ë /w /ͮ͋ @,/w !|~>w2-~:|A,/~͋ 7~͋ -͗/7~͋ / ROWCOL= ENTER COMMAND NEXT STEPVERIFY (Y OR N) <--DONE.Purchased from: Copy number: Copyright Version,(C) COPYRIGHT, CHANG LABORATORIES,INC. 1981 . $SOFTLINK CORPORATION )12345678901234576789012345678901234567890GPSTATGPFORMGPPRINTGPSHOWGPLOGICGPCHTOPTGPSBARGPSPIEGPPBARGPPPIEGPRINT PRINTER.SET'Warning ... PRINTER.SET file is missing GPSERIAL.NUM GPSETUP.FIL ###.##C# (C), 1983 Chan/~͋ 7~w ʹ>/ͺ/:-~!|wË -T-O~͞ ͖+w ʹ!9DM͋ *!9w!9-ʡ-DM͖+w ʹL--ʝ-O~͞ ͖+w !9DMv-!9w! 9-X-DM͖+w !9DMʹI-~NEO~!9͞ /@,O~͵,/w O~̓/Ë 07HWgtA1A@P\d5bEHyed"BA1PYTAE(('@ @@I@hfffff?hfffffA>533333>=ii<0$;9"sU':9"sU'9BT8!%8hxVg 7"hC60wYEG417Gv@`v'b1AAPX#C`QI"U&Àe(HBCTbDvRWaGv"C%T$a'ÙH%Csrbg Laboratories, Inc.+ (C), 1983 Advanced Graphics Software, Inc.E`SehJ&me800R&a79c23R&a0cR&dJh***############,###.####BB<BB<@PBX GPHELP.FIL UTLDATES.DAT UTLDATES.DAT GPMENU.FIL:.Error while trying to load file from diskette.You may have a bad diskette.-SERIAL number is missing or has been altered.)GPSETUP.FIL is missing. Check Appendix A.GPMENU.FIL is missing.Error in GPSETUP.FIL#Contact your dealer for ass*{*m~)*m~#s#r*m~#"m~*{}|8* z"{*i~{:%*i~{:%*i~ {:%!"{*z"{!"{!"{{!2:%!" {!""{!"${!"&{* z"*{* z",{* z"({*z".{*z"0{!!2{͎!!:{͎!!B{͎!!J{͎!"R{!"T{!"V{!"X{!"Z{!"\{*z"^{* z"`{*z"h{* z"j{!"m~R:*b{*m~)*zs#r*d{*m~)*m~#s#r*f{*m~)*m~#s#r*m~#"m~*{}|:!"l{!"n{*z"p{* z"r{!"t{!!Gͼ*k~|£:!2!!!>!!Gͼ*k~|:!!e~n!g~n!o~b}!, !"m~:B*m~#"m~:!"q~!"s~*e~istance.y!0"|"|!0"|÷5z!0:%z!0:%z!1:%z!1:%z!1:%z! 1:%z!1:%z!1:%!x%z:%z!*1:%z!;1:%z!A1:%Y~!H1:%[~!Z1:%]~!i1:%_~!t1:%*W~a~!~1:%c~!1:%e~!1:%g~!2:%*i~a~:% 5!d"y!"k~!"y!"y!"y!"y!"y!" z!"z!"z!"y*y!!!y(*y!!!y(!!!!z(!("z!"z! !!!y(*y!-2:%*y!52:%*y!=2:%*y!F2:%*y!N2:%*y!W2:%*y!a2:%*y!i2:%*y!q%"u~!"m~9;*e~*m~!&a% *q~*m~"q~*m~#"m~*u~}|;*g~%"u~!"m~Ê;*g~*m~!&a% *s~*m~ "s~*m~#"m~*u~}|X;*q~*s~{ozg"w~*k~|;*w~*o~{oz;ïG<*i~{~:% !!Gͼ!!yn}*y*_~͉$!2͉$"*y!2ͨ?*]~m!2w*]~m!3w*c~wBBB*Y~m*e~w*[~m*g~wBBBBB*i~e~:%*i~g~:%!!yb!yb}!!zb!zb!zb!z2:%*y !y2:%*y !2:%!!!!z(!x%z:%!x%z:%*z"v{!x"x{!H"z{!!7ͼ!2!!!>!!7ͼ!!m~b!x{b!z{b}!, *x{{z7!x"x{*z{{z7!H"z{7!2w!"{!"{* z"{!"{!"{*{!!!|{(*{!!!~{(*{!!!{(*{!!! {(*{!!!{(*{!!!{(*{!!!{(*{!!!{(*{!!!b{(*{!!!d{(*{!!!f{(* {6#6!"m~9*{*m~)6#6*{*m~)*m~s#r*{*m~)*m~s#rn}!!{~n!zb!~n}*{~"z*~"z!!{~n!yb!zb!~b}!!zb!~b!~b!~b! zb}!!"zb!$zb};~:%;~:%*z;:%*z;:%*z;:%*z;:%;~:%;.z:%;,z:%;~:%;0z:%;2z:%;4z:%;6z:%;8z:%;:z:%;z:%;@z:%;&z:%;(z:%!!Fzb!Hzb!Bzb!Dzb!Jzb}!!Zzb!Nzb!Lzb}!!{~n!~b}!x%\z:%!x%^z:%$?!!}~b!~b}*}~x%*\za!z͎*~!3~-*zog!3~-!ͷ$!3 !z͎*zog!3~-!3I!z͎*z}o|g*z{ozg*zU +"z*z*y{zC*y+"z*z}o|g*z#*z {ozg"z!!!!hz(*hz!3:%*hz*hz^#V:%*hz*hz^#V:%*i~{~:%!"y!"y*z"y*z"y!"y*y"y!"z*y"z!"y*y"y!"y*y"y*~}o|g"z!"z*z*z"z!"z*z*z"z*z*y}|D*y"z*z*y}|D*y"z!"y z!3:%!3C!{zJE!3!!!>!!~n!{~n!~n͉$\z:%*~x%*^z͉$^z:%*~+"~*~|>!!{~n!Rzb!Tzb!~b}Ô?!!}~b!~b}*}~x%*Vz͉$Vz:%*~x%*Xz͉$Xz:%*~+"~*~|P?!, !"u~N!~͎!!~?A3!~!~͎*y*y !!~ͱ?!"u~G*y{z/*y{z/*yc{z*y{z>@!"u~G*z++++|*z*z}|d@!"u~G*z++++|*z*z}|Ҋ@!"u~G*z|*z{zҫ@!"u~G*zP}|@!"u~G*~ }|*~c{z@!"u~G*~x%z:%*~|A*~x!~n}!, *~!!&"~*~"y*~*~͉$*{~͉$*~͉$nz:%!!Gͼ!3!!!>!!GͼþE!!m~b}*m~*z{ozE!, E!*y*m~)n*y*m~)b}* z|uE͊%%{zE͊%y:%Ey!4:%*y!!&! 4$ F! "}~F!"}~*y*}~͎%y:%*y*y!!!y(*y!!!y(*y!!!y(*y!!!y(*y!!!y(*y!!!y(*y!!!y(*y!!!y(*y!!!y(*y!!!y(*y!!!y(!"m~G*y*m~)*%*z͉$z:%*~|+A*~x%*z͉$z:%*~m*,zm>A*~*y}{ozA:A!x%~:%*~m!I3m*~m!L3m*~m!O3m*~m!X3m!"m~A*~m!b3m*m~}&m!h3m*~m!k3m*m~#"m~ҕA*~m!p3m! "vz*z"rz*z"tz!"pz!*z&!s3͉$*z%z:%{~!x3:%*{~%*z*z{ozg"}~*z|?B*}~+"}~*{~*}~*z++&3͉$z:%*z+*z{ozg"}~*z++*z{ozg"~*z{zB*}~+"}~*~+"~*}~!U *}~}o|g"}~*~!U *~}o|g"~*}~!3~-*zog!3~-!ͷ!3m~s#r*y*m~)*m~s#r*m~#"m~*y}|F!"m~]G*y*m~)*m~s#r*y*m~)*m~s#r*m~#"m~*y}|4G!"y!"y!"y!"y!"yo *y^#V"!, ! 4w!=4wG![4wG!4wG!4wG!4m*u~9G!4wo ͝o ͝}>*}>2}6?#` F! "}~F!"}~*y*}~͎%y:%*y*y!!!y(*y!!!y(*y!!!y(*y!!!y(*y!!!y(*y!!!y(*y!!!y(*y!!!y(*y!!!y(*y!!!y(*y!!!y(!"m~G*y*m~)*~*y|4!~!1*~!L)|;4*~!~͎*~~:%!~!Gb* z|3!~4>!~'*{|ʖ4*y*~)^#V*y^#V*y*~)^#V)))̀!~͎4*y*~)^#V*y^#V*y*~)^#V)))̀!~͎!~>5>!~'* z"~*~|/W_*~*y}|W_*{{ozg{ozg*{}/o|/g*~*y}|W_{ozg{ozg|:5*z"~*~7!4"~*({}/o|/g*{+|W_{ozg|n5* z"({!"~ë5*|{*~)* zs#r*~{*~)6#6*{*~)6#6*~#"~*{}|w5*{|56*{4|5*~*{"~6*{*~Q4̀!56*~+"~;2 Divide by 0VALUERATEPERIODSBEGINEND, (ROW/ONLY=1,COL/ONLY=2,ROW/COL=3,COL/ROW=4) PROMPTING MSG)CHOOSE (VALUE=0,CONSTANT=1,GROW=2,INCR=3)BASE!ERROR IF% Row Col ? Current=, Bar LinePie RowColEnter (1- ) for Graph (Choose (Bar=1*~*{{z57*~"{!"~ä6* {*~)^#V"~*~4|?6Ý6*{"~Ò6*~*~Q4̀!*{|ҋ6*|{*~)*zs#r!"~Ý6*~#"~*{}|H6*~#"~*{}| 6*{|½6*~!"{!"~å7*|{*~)^#Vz6Þ7!"~* {*~)^#V"~*{|7*z*~{ozg"*z"-7*y*~{ozg"*y"*~*Q4̀!**{oza7k7*~#"~6*{*{z*~*Q4̀!Ҟ7*"{*~#"~*{}|6*{|7!3"~*~!"~*~Î8!"!"8* {*)^#V"{*{4|78*, Line=2, Pie=3) for Graph A@P|@Py!0"|"|!0"|! !!!W~(*W~!0:%*W~!0:%*W~!1:%*W~! 1:%*W~!1:%*W~!1:%*W~! 1:%*W~!N1:%*W~!]1:%*W~ !1:%Y3>!~'M3*z*~!*yq"~*y|)3*~*~*z{ozM3*y*~)^#V"~*~* z|3*~ú3>!~'î3*z*~!*yq"~*y|ʊ3*~*~*z{ozʮ3*y*~)^#V"~*~* z|h3*~N4>!~'B4*~!!!n~:%*~%|4~!z͉*~~:%!{*)^#V+++|858*#"*{}|7!3"*!" *{"l8*{*Q4̀!e8* #" *#"*{}|D8* {z8!3"*ñ8*y*)^#V*)))̀! ͎! 8*y*)^#V*!)))̀!͎!ñ9>!+'!!#͎ͩa|8S9*y*/)^#V*+"1*1{z*1*y}|/O9*y*1)^#V*y^#V*-)))̀!#͎!#*y*-)^#V*+"1*1{z*1*y}|/ҭ9*y*/)^#V*y*1)^#V)))̀!#͎!#9>!5'*y*7)^#V*5)))!9͉*7*5e*30:>!C'ͩa|:*y**o|>* z"y@;"*|)>* z"y@*i#"i*i{z@>@*L{oz>*a*_)6#6*e*_)><̀s#r*i+*]*_s#r* z"ì?*V{oz>*a*_)6#6*e*_)><̀s#r*m#"m*g*_)><̀s#r*i+*]*_s#r* z"ì?*0}|/*9{z/*.{oz}?*a*_)6#6*m+"m*y*_)^#V!)))><̀͛*i+*]*_s#r* z"ì?*({oz£?*c*i)6#6*z">* z"y@*_#"_*_{z?@*i{z?@;"*|?þ@**{oz@*c*i)6#6y*C)^#Vʹ9,:*y*C)^#V*yogʹ9*As:!!G`:!!9͎*W~^#Vbo:O!G͟!9͎*E;>!Y'*Y|Җ:*Yog"Y5;*[*Y)^#Vz*]*Y)^#Vz:* z"y*W*_#"_*_{z:* z"y*W*a*_)*c*Y)^#Vs#r*e*_)*[*Y)^#Vs#r*g*_)*]*Y)^#Vs#r*Y*i{ozH;ø;*Y"1é;*[*1)*1#*[^#Vs#r*]*1)*1#*]^#Vs#r*c*1)*1#*c^#Vs#r*1#"1*i+*1{zQ;*i+"i*Y+*]*_s#r*[*Y)*_s#r*W;<*m#"m*m*o}|*_+"_*i+"i*_{z*_*y}|*i{z A!Gb* z"y**y|(A!*Gb*qm*zm**i|4A**i+|GA!v:@!"*i"!!"ÜA*c*)^#V! {oz~A*+"!ÀB*c*)^#Vz•A*"*#"*i}|\A*{zA* z"y@*#"B*c*)^#V++++|*c*)^#V+++++|B*"k*k*q*m!&;&a%"1*1 {oz1<;*1"k*k<*q*m#!&!s͎!."1Í<*m#"m*m*o{zx!}'><̀"1*}+|<6=*}++|<<ͩa|<6=*1+|*1*y}|"=* z"y*{*y*1)^#V"{*{*1+|*1*y}|Z=* z"y*{*y*1)^#V"{*{B!!!!a(!!!!e(!!!!g(!!!!c(!!!![(!!!!](*yq:%!"_!"i!"m*q%"ov:@*#"*!}|A*#"lB*c*)^#V++++++|*c*)^#V+++++++|eB*v:@*#"*!}|#B* z"y@*|‘B* z"y@**!{oz¤BB*#*!{oz¿B*!v:BÿA*ogv:*ogv:@*C*e*~)^#V*y^#V!)))̀!͎!9C*g*~)^#V*y^#V!)))̀!͎!cC>!'*y*~)^#V!)))!͉*D!"~âC*a*~)^#VC+)C~#foC)DZD^DtDDDD*~#"~*_}|oC*y*_)^#V!)))̀!9͎**y{zD*y*)^#V*e*~)^#V)))̀<!y͎*y*y)^#V!y͎*y*y)^#V!y͎*W~^#Vͽ3̀!y͎*y|XHy!zͱgH7Hͩa|ʂH!72!y͎ÒH!7\3!y͎*W~^#V1͉$ͽ3̀!y͎*y|ʻHy!zͱHÓHgH*W~^#V!!! q!y͎*y|H*z!yI!!y͎gHͩa|3I!2!y͎CI!\3!y͎*y|LIgH!2!y͎*y|hI!2\3!y͎*y}|/*y{z/goͩa}/o|/g{ozg|ʱIqJ*z*z͉$*W~^#V͉$!!*yq"*y|I**z{ozJ!"*C%D*e*~)^#V*y^#V*!)))̀!'**$z"**$z"*z|\`*zm*"zx%m*x%m*x%m*z+|•`*zm*}&m* zx%m*}&m*"zx%m*z++|`*zm*"zx%m*x%m*x%m*z+++|a!x%m!Hx%m*x%m!x%m!Vx%m*x%m*1a>!'*{z'a*"-a!"*ea>!'*a*z&*͉$*͎%:%*æa>!'*%*}o|ga*z&**͎%͉$:%*ÿa*y{zW_"*b>!'**`*(z%{za*m*(zmb**Pg|f*z"y*+*y*/)^#V"1*y*-)^#V"*1*z{z*1*z}|**z{z**z}|wf*z"y*+**z{ozg*z *z*1*z{ozg`*y|ʷf*!5'*y*7)^#V"y*y*5)^#V"y*z*z͉$*7}&͉$*z͉$*y*y)^#VQc͉$!^͉$*z͉$*z͉$*5}&͉$*z͉$*y*y)^#VQc͉$*z͉$!!a*3gͩa|g*y*y)^#V͌dg*yog*y^#VNe*9ôh>!='*={zEh*z*z͉$*{ozg4am*Db>!'*2z*͉$!!a*,zm* z"y*Ób>!'! ^!N!!>!*! n}!, * b*  :%*Nc>!'*z|b*y|b!!b* *z+4am* *y|b!!b*>zm!zͱ!zͱ?c*z*z+%m-c*z"!̀*y|Jc!!Jc*:zm* c>!'*%|rc* :%**z*!L)"*{zc!(x%**+͎%͉$*z͉$**#*z&͉$!)x%͉$:%c!(x%*͉$!)x%͉$:%*Éd>!͂y*=)^#V}&͉$*z͉$*y*=)^#VQc͉$*z͉$!!a*=|Ҫh*z*z͉$*=og*y^#V}&͉$*z͉$*=og*y^#VQc͉$*z͉$!!a*="y*;k>!A'!"?*C|*A|h*?*y|hÌjͩa|hi*C|W_*E{ozg|i*z"y#j*yog*y^#V*A"y*y*y}|Fi*y"y*y{zYi!"y*y*z{zsi*y"z* z"y*y*z}|i*y*z{ozg"z* z"y*y|¯iͦg* z"y*yNe*y*y)^#Voggk*A|W_*E{ozg|i*z"yYi*y*y)^#V*C"y*y'*"y*@zm*y"!md*z }o|g*!*y{ozg###`*!}&*z͉$*y*!)^#V͉$! 4am*!#"!*y*!{zd*,zm*Ke>!%'!*%*z{ozg`*y*%)^#V*y^#V!{ozg|d*z}o|g"d*z"*y|e*8zm*+"e*6zm*%}&*z͉$*y*%)^#V*y^#V͉$*4am*,zm*z"y*#e>!)'*)*z{ozg*z *z!`*y|ʉe*8zmÕe*6zm*zm*z!U +!^&*)}&͉$*z!^&͉$*z+͎%m*,zm*z"y*'f>!-'*y*/)^#V!{oz*y}|j*y"y*y{z#j!"y*y*z{z=j*y"z* z"y*y*z}|aj*y*z{ozg"z* z"y*y|yjͦg* z"y*y͌d*y*y)^#Vgk*y*y)^#V*A"G*y*y)^#V*C"I*G*z}|j*I#"I*z"G*I*y}|j*G#"G*y"I*G*z}|j*z"G*I*y}|k*y"I*I*z{z*k*I"z* z"y*I*z}|Nk*I*z{ozg"z* z"y*G*z{zhk*G"z* z"y*G*z}|k*G*z{ozg"z* z"y*y|k*y*ye* z"y*y*I)^#V*y*G)^#Ve*I*Gf!"z!"z*y"?* z"K*?l|^*,zm*z*zͷhp**Rz{ozp7q**Lz{oz* {oz=pÞq**Nz{oz*++++++++|*[%{zҤp!x%m*zm!x%m*[*[%+͎%[:%Po*E|p*_;&*\z!L)"!p!"!*!{zp*^z*!!&a%}&[:%ÍqPo*"{oz*[%*S{z4q*_m*[*_͉$[:%Po͋_"*x%_:%*_*Vz!L)"!*Tz|eq͋_*!|pqPo*Xz*!!&a%}&[:%*]*U`*[m*[%|µq* Q:%þq*[Q:%*z"E*Qr>!c'*c}&%"k*g|q* z"EVr!(x%*i"M*Mn*z"yk|l l*y*z{ozg*z{zCl*y*z{ozg"z*y*z{ozg*z{zkl*y*z{ozg"z*z+|zl!"z*z+|҉l!"z*z*z"z*z*z"z*z*y}|l*y"z*z*y}|l*y"z!!`*4zm*6zm* *z4am*z!`*z"!4mͭn**z}|m*z"* *+͎%*zham*!#"!*z}|mk|Jm l!!`*6zm*z*z4am*z"!×mͭn* *#*z+&*zham*!#"!*z}|rmk|ʭm l!!`*6zm*z!#^&m*z"!m*!Ne*!#"!*z}|mk|m l*z"!~!L)|Vr*i*z͉$!(x%͉$*e}&͉$!&^͉$*c}&͉$!)x%͉$i:%*i*g!*kn[:%*y|{r*a*[%|r*z"a*a*["]*]*e{z/*]*c}|/r*]"a*a!GbVr*a s*z!!!n;&[:%*[!)^$s* z"y*m5t>!q'*q%|,s!"o*o*q"y*z*q!L)#"s*q*s!&"y*z*q*sL)#"s*z*q*sL)"u*q*s*u*s{ozg&y:%*q*u#!&!y͎*z*q*u#L)#"s*q*s!&!y͎*y!U "y*y!dUn*!͌d*A}|nln*:zm*z"an*zm*y*!)^#V*y^#V*y*)^#V)))͖̀b*#"*z}|'nk|wn l*!#"!*z}|n* z"y*y|ʦn*y*ye*Oͦg*O*y*!)^#V*y^#V :%* %|n*z :%*z* !L)"*O*Oq>!S'!:x%*Y͉$*W*Ua* [:%*Y%*W##"]*z"K*[%*]*U`͋_"*x%_:%*z*zͷh|uo l*K|ʆo*z"K=o*y|ʒo*Q*0}|/W_*E{ozg*9{z/W_{ozg|op*E|p* }|/*~{z/*{zp *y  {ozg"y*y *y}o|g"o*oét*y *y"y*y}&*z͉$*y}&͉$*z͉$*y͉$*z͉$!ỳ}&͉$*z͉$!ỳ}&͉$w:%*wçu!!`*0zm*z!4am*zm*zm!,^*y #!&m*zm*zm!Q^*y ++!&m!_^m*zm*zm*y}&m!c^m*y}&m!f^m*zm*zm*z}&m!j^m*z}&m!m^m*z|ʋu!q^mÑu*zm!t^m*,zm*z"y*yu!!y͎!!y͎!"y* y:%*{wͪu*z"y*z"y*z!!*yq"s*y| vͬtu*s*z{oz*y+|5v!Gbu*s*z{ozOv!cu*y*s)^#Vzjv!'Gbu*y*s)^#VQcw*y*s)^#V!U "y*y*s)^#V!dU *y  {ozg"y*y*s)^#V*y {ozg"}*y {ozw*y*s)^#V*y {ozgcu*}"w*)w*bwͩa|Ew!!ͷh"Sw!!ͷh"*|^w l*þw>!'*{zw*y*)^#V*y^#Vs"úw*og*y^#V*y^#Vs"*Gx*y{oz*y{ozw,w**z*y{ozg*y{ozg| x*ͩa|)x*y*y)8t:%@x*yog*y8t:%,w* y*y*y{oz^x**y{znxx*yog*y^#V"]*]*z{zx*z"]*]*z}|x*z"]*y*])^#Vog"y y*y*y)^#V"]*]*z{zx*z"]*]*z}|x*z"]*y*])^#V"y*yg* z"yͦg*Oy|^*y{ozg|Ky* z"y!"y!GbJx*`y*zbJx*gy*ny* PLOT.DRAW%~ D)^#V*y^#Vs"úw*og*y^#V*y^#Vs"*Gx*y{oz*y{ozw,w**z*y{ozg*y{e (L-Linear,O-Log).......OLOLAuto Scaling (Y/N)YNYNMinimumMaximumNumber of Major Div (1-10)..Number of Minor Ticks (0-5).Draw Grid Lines (Y/N)....... Shade Colour Explode Segment (1-8) (1-8) (Y/N)"------- ----- ----- --------"Print Percentages (Y/N)..........."Sort Pie Segments By size (Y/N)........................Number of Pens (1-8)..........Pause For Pen Change (Y/N)....Transparency (Y/N) Page Format ENTER DATA:( ; GPERROR.FILYN- _/Define Chart OptionsDefine Axes OptionsDefine Pie Options Plot ChartPress Ctrl-P to Plot!0.00!( Main Title X Axis Title Y Axis Title Type Shade Symbol Colour3 1 - Display Chart2 - Define Chart Options3 - Define Axes Options4 - Define Pie Options5 - Print Chart6 - Plot ChartEnter Selection:  Plotting in Progress...'Do you want to enlarge your chart(Y/N)?Y 0-Empty, (1-) Row Data, (1- ) Col DataB-Bar, L-Line, P-Pie Bar LinePie BLP Bar LinePie 10-hollow, 1-solid, 2-cross h, 3-h(45), 4-hollow, 5-h(135), 6-h(0)80 -(no symbol), 1-(*), 2-(+), 3-(O), 4-(X), 5-(#), 6-($)1-Green, 2-Red, (3-8)-BlueYNYGraph Row/Col (Bar/Line/Pie) (0-6) (0-6) (1-8)3----- ------- -------------- ----- ----- -----  Bar LinePie   ........................ Stack (Y/N)Horizontal Bar (Y/N) Colour (Y/N)#...................................,X Axes Type (T-Text,D-Date,N-Numeric).......NTDDate Type (W,M,Q,Y,MY,QY) Date Start,Draw Frame (N-Suppress,L-Left,B-Box)........NLB,Legend (N-Suppress,L-Left,R-Right,B-Bottom).NLRBAxes SpecificationY AxisX Axis--------------TypNYNY NTDNTD Enter Row(1-)/Col(1-) number for the numeric X axis 2W-Weeks, M-Months, Q-Quarters, Y-Years, MY-Months/Years, QY-Quarters/Years W M Q Y MYQYWStarting Weekday(1-7) ?MStarting Month(1-12) ?QStarting Quarter(1-4) ?YStarting Year(1-9999) ? YWMQYYYNLBNLBNLRBNLRBOLOLOLONYNNYNYNYNX axis is not dateY axis is in auto-scaling modeX axis is not numericX axis is in auto-scaling mode .. Press RETUR}/o|/g*~*y}|W_{ozg{ozg|/>*z"~*~@!4"~*({}/o|/g*{+|W_{ozg|c>* z"({!"~à>*|{*~)* zs#r*~{*~)6#6*{*~)6#6*~#"~*{}|l>*{|ʸ> ?*{=|>*~*{"~>*{*~F=̀!>?*~+"~*~*{{z>ÿ@*~"{!"~Ù?* {*~)^#V"~*~=|4?Ò?*{"~Ç?*~*~F=̀!*{|Ҁ?*|{*~)*zs#r!"~Ò?*~#"~*{}|=?*~#"~*{}|?*{|²?*~!"{!"~Ú@*|{*~)^#Vz?Ó@!"~* {*~)^#V"~*{| @*z*~{ozgN to continue61-hollow,2-h(45),3-h(0),4-h(90),5-h(135),6-c h(light),7-c h(dense),8-solid1-Green, 2-Red, (3-8)-BlueYNYNYNYY<1 - 11 X 8, 2 - 5.5 X 8 (horizontal), 3 - 8 X 5.5 (vertical)1 - Left Half, 2 - Right Half1 - Upper Half, 2 - Lower Halfy!0"|"|!0"|<>!]~'*_~*$z"_~*]~*$z"]~*z|m;*zm*"zx%m*_~x%m*]~x%m*z+|¦;*zm*]~}&m* zx%m*_~}&m*"zx%m*z++|;*zm*"zx%m*]~x%m*_~x%m*z+++|!~'!0*~##!&~:%*~Aͫ"~*~*Lz{oz*~*Jz{ozAìA*~*Jz{oz/W_"y!~B!P!!Vx%m*]~x%m*[~B<>!c~'*c~{z8<*c~"a~>!g~'*g~<*z&*i~͉$*g~͎%e~:%*e~<>!m~'*o~*m~$;*(z%{z<*q~m*(zm<*q~*o~P{ozgE!u~'!0!N!!>!*u~!w~n}!, *w~!!y<*y~w~:%*s~C=>!}~'*~*}~$;*~m*{~ÿ=>!~'*{|ʋ=*y*~)^#V*y^#V*y*~)^#V)))̀!~͎û=*y*~)^#V*y^#V*y*~)^#V)))̀!~͎!~3>>!~'* z"~*~|/W_*~*y}|W_*{{ozg{ozg*{1&w~:%*w~!!#=*~øB>!~'*~|ʃB*8zw*~%"~*~|*~|*~!1&*~$҃B*~!1&~:%*~*~%*~}o|g͎%*~͉$*~*~#=*,zw*~EC*y~~:%*{++|B8C* {*"{*${"~*~|B*~}&~:%*&{|8C*~|)C*~! 1͉$*&{}&͉$~:%8C*&{}&~:%*~~:%*~C*Y~++|[Cw~!1:%*Y~+++|oCw~!$1:%*Y~++++|„Cw~!91:%*Y~++++++|›Cw~!M1:%*w~*w~%!!* z B*Y~++++++|Cw~!Y1:%*w~!7!#=*~D*~| D*y~w~:%*w~!!~:%*~!ͰF~G*~JHCA~!1:%*{1͉$w~:%*w~!!#=*{1͉$w~:%*w~!!#=* {1͉$w~:%*w~!!#=w~!1:%*w~!#!#=w~!1:%*w~!! #=w~!32:%*w~!! #=!"~$J* {*~)^#V"~*~=|I!"~* {*~)6#6*~|Iw~!h2:%'I*~}&w~:%*~*w~%{ozg͎%*w~͉$w~:%*~}&*~!͎%͉$*w~͉$w~:%*w~!m2͉$!w2*{*~)^#V+ #!&͉$*~! ͎%͉$*{*~)^#V}&͉$!2͉$*{*~)^#V}&͉$!2͉$*{*~)^#V}&y!~'*~*Bz{oz*~*Lz{oz*~*Hz{ozҀD*~*~{zwD*~#"~}D!"~ÐD*~+|ʐD*~+"~*~íF>!~'!"~*~!$;*~*~!y<*~!$;*~*~%*~}o|g͎%*~͉$~:%ͫ"~*~{oz*Y~++++++|-E* z"y* z"W~*~*~*Jz{ozGE* z"y*~*~ }|*~z{zgEE*~*~}|~E*zmD*~*~+͎%*~x%͉$*~*~%*~{ozg%͉$~:%*~#"~*~x%mD*~*Bz{oz*~*Dz{oz*~*Fz{oz͉$w~:%*w~!*~ #=*~#"~H~!2:%*~!͎%2͉$*{͆A͉$w~:%*w~!!#=*~! ͎%2͉$*({}/o|/g͆A͉$w~:%*w~!!#=*~!͎%2͉$*{͆A͉$w~:%*w~!!#=*y~w~:%*~_OHCA~!2:%!43*{#!&3͉$w~:%*w~!!#=*~!͎%93͉$*{͉$w~:%*w~!!#=*~!"͎%T3͉$ͻB͉$w~:%*w~!!#=!3*Z{#!&`3͉$w~:%*w~!! #=!3*\{#!&3͉$w~:%*w~!! #=w~!3:%*w~!! #=w~!3:%*w~!/! #=w~!3:%*w~*~*Hz{oz*~*Lz{oz,FMF*~|@F*~;&~:%*~~:%*~*~*Nz{oz*~++++++++|wFàF*~{zF!x%m*~+"~ÝF*zmD*zmD*~F>!~'*~++|F!2"~*~<*zm* z"~*~pG>!~'*~*~*~* z͗D~:%*y|G*~*~"~!o1*~!L)|*~*~{z/*~*~}|/bG*~"~*~!ͰFF*~H>!~'*~*~*~* z͗D~:%*y|ʣG*~*~%|·G~!r1:%!u1*~!L)"~*~|G*~!x1͉$*~##͎%~:%!|1*~!L)| H*~!?! #=w~!3:%*w~!+! #=*w~!;! #=!4*0{##!&3͉$w~:%*w~!!#=*y~w~:%*{|ŒL!4*.{##!&*w~͉$w~:%*w~!;!#=*~! ͎%!4͉$!54*,{##!&͉$w~:%*w~!!#=*y~w~:%*{|M!94*#!&*w~͉$w~:%*w~!;!#=*~!͎%=4͉$w~:%*,{|GM!B{̀}&*w~͉$w~:%*w~!!#=*y~w~:%*{|/W_**{}/o|/g{ozg|ʗM!2{̀}&*w~͉$w~:%*w~!;!#=*~!͎%F4͉$w~:%*,{|M!J{̀}&*w~͉$w~:%*w~!!#=*y~w~:%*{|/W_*"Y~*y|/W_"{!!$;*&zwA*y"{*y"{*{|ER*z"{*z"{!"z*z"W~*z"yw~!6:%*w~!! y<w~!-6:%*w~!! y<w~!G6:%*w~!! y<w~!`6:%*w~!!y<w~!x6:%*w~!!y<w~!6:%*w~!!y<w~!6:%*w~!!y<~!6:%w~!6:%*w~!!!!F"~*y|"{÷T@"{*z+|ʱT!"y÷T! "y*{|T!!$;*&zw*{<*zwA%R*z+|TQU!5V*w~!!y[[l\\x]*y|gW*~*DØV*{w~:%*w~!(!!* z B*w~! !(*z͗Dw~:%*y|ʷW*w~{:%*w~!(!!*z B*{w~:%*w~!(!!* z B*w~! !?** z B*w~! !!!F"~*y|4\*{*)*~s#r*~}&w~:%*w~!!?**z B*{͆Aw~:%*w~!!0!* z B*w~! !* z͗Dw~:%*y|ʲ\*w~!7$\* z"{\*z"{w~!7:%*w~!!0!*z B*({}/o|/g͆Aw~:%*w~!!0!* z B*w~! !* z͗Dw~:%*y|;]*w~!7$Q]*z"({`]* z"({w~!7:%*w~!!0!*z B*{͆Aw~:%*w~!!0!* z B*w~! !* z͗Dw~:%*y|ʾ]*w~!8$]* z"{]*z"{w~!8:%*w~!!0!*z BpQ* !(*z͗Dw~:%*y|X*w~{:%*w~!(!!*z B* {w~:%*w~!(!!* z B*w~! !(*z͗Dw~:%*y|}X*w~ {:%*w~!(!!*z B*y}&6͉$!7͉$*y}&͉$!7͉$w~:% V*y~w~:%* {*)^#VzY* {*)^#V}&w~:%*w~!!** z B*y"~*~*y{z6Y*y"~*w~! !!*~F"~*y|YY* {*)*~s#r*y~w~:%*~|ʊY*~}&w~:%*w~!!**z Bw~!$7:% Vw~!:7:%*w~*{*)^#V+ #!&w~:%*w~!!#** z B*w~!͎%wz"* z"* z"* z"* z"!* z"#*~"y*~{z^*~}o|g!U "y*~!ͳ |s^*y"y* z"!+"~É^*y"y*z"!;"~C*w~!!yo*~!Dçnw~! ::%*w~!E:͉$w~:% V*d{*)^#V}&w~:%*w~!!#** z B*w~! !!!F"~*y|ʻo*d{*)*~s#r*~}&w~:%*w~!!#**z Bw~![::% V*!!yX!!>X!!>X!!>X!_2>!'!͓̀+!0ͨ!͎!y2*I|&!4W!Ó2*I|&!͆W!23>!'!"!"*{ozg|2*~!U "*{ozg|2*~!U "**{ozg"**~!0I$*"***W!m4>!'*"W~*"Y~!"{!"{*z|/W_*{{ozg|ʀ3*{!(U "~Í3*{!PU "~!"[~!"]~*{+"_~*{+"a~!!c~͎!!s~͎*{+!k~͎*{+!{~͎*{+"~*{+"~*{!U "~!!~͎!!~͎!"~!"~!"~* z"~*z"~*z"~*z"~*z"~*z|/W_*{{ozg|b4!V 2i4!V*Ø4>!'*"[~*"]~*"_~*"a~*4>!'c~! ͉s~!͉k~!͉{~!͉*5>!'*z|/W_*{{ozg|45*{z 5!"*jX*\5>!'*_~*[~{ozg!c~XRk~!c~Xͷ*[~$"*ã5>!!'*a~*]~{ozg!!s~XR{~!s~Xͷ*]~$"*5>!+'*_~*[~{ozg!+̀=2̀!~aR~!~Xͷ*[~$")*)C6>!5'*Ø1APX#@*+OX#$AYA1AYA1@P A.00AYA1E`Se@P - @p@ @  - @>P%>P>P%y!0"|"|!0"|! !!!I(! !!!K(! !!!M(!!!!O(!!!a~*]~{ozg!5̀=2̀!~aR~!~Xͷ*]~$"3*3f6>!?'~!G͉~!?͉*=7>!Q'*I!m̀5s#r*I!è_5s#r*I!]̀5s#r*I!Ù_5s#r*~| 7*I!è5s#r*I!Ù5s#r*~|?7*I!m̀ͦ5s#r*I!]̀ͦ5s#r*I^#V"w*I^#V"y*~|h7b2*S*z{oz*Q|Ҋ7ý7!1*Q!&a%"u*I^#V*w*u!!͖2*O48>!}'!"!c~ͱ7!"7!k~ͱ7!"}!s* #*I^#Vs#r**{oz^<*K*I^#Vs#r*K*I^#Vs#r*K|&!4W*!I$*!#I$"*+|ª<*" * " * *ͯ:" * *:" *#"*}|d;*|<Ð@* *!1I$!+͎* z"* !+=Ð@!"*I^#V!#I*I^#V!I$"*I^#Vog!I*I^#V!#I$"!"6?*"* *I^#V" * #*I^#V"* og!I*!#I$"**ͯ:!+~ͱ8*"*8}!{~ͱ*8*"*"{*{ì:>!'!~͉!~͉!͉!͉~!͉~!͉*~"׀*~*z{oz8Å:!̀!̀7"Հ!̀!̀7"Ӏ*Ӏ|8*z"׀n:*Հ*Ӏ{ozg|8è:*Հ"р*р|8*Ӏ"р*р{ozg|89!Xc~!XR!Xͷ! !ɀ͎!c~͉:*р{ozg|ʂ9!Xk~!XR!Xͷ! !ɀ͎!k~͉:*р{ozg|9!Xs~!XR!Xͷ! !͎ɀ!s~͉:*р{ozg|:!X{~!XR!Xͷ!>/?**:!+ >/?*+ *I^#V!#I*+ #*I^#V!I$"* !#I*!I$"**!+a**{ozgR**{ozgͷ"*#"*"*+|>?*+*M^#V*{z>?*M*)*+*M^#Vs#r*+">*M*)*s#r*#"*+*{z=*|R?{@!"b@*"*|z?**{ozg#"*M*)^#V!#I+!@"*M*)^#V!I+!#@$"*|??*!ͳ |??*"*"*z"[@*K !͎ɀ!{~͉*р*Հ{ozJ:!͉!ɀ͉!̀!̀7"Հn:!͉!ɀ͉!̀!̀7"Ӏ*Հ|*Ӏ|8!̀!̀!̀!̀*׀*~i6*:>!ۀ'*݀*ۀ}|:*݀"ـ:*ۀ"ـ*ـ;>!'**{z:*"߀;*"߀*߀Ô@>!'* z"*"! 1@!ͷ=,!͎!1@!ͷͲ,!#͎!"<*+ *I^#V"*+ #*I^#V"*|ž;q<*K*+ *I^#Vs#r*K*+ #*I^#Vs#r*K* *I^#Vs#r*K*s#r*K*s#r*K*s#r*K*s#r*K|&!4W*"*"*#"*}|[?*}/o|/g"*!+ !+͎=*îD>!5'*({|@!s~͉!{~͉s!I͉{!9͉@!c~͉!k~͉s!Q͉{!A͉{!sͱAk!s͉s!{͉{!k͉s!ͱ?{!ͱ/?AêDs!ͱTAs!͉{!ͱiA{!͉*({|ʆAI!s͉9!{͉ØAQ!s͉A!{͉*I!Q̀5s#r*I!Ì_5s#r*I!À5s#r*I!9̀_5s#r*~|*B*Ì!͎!$H>!Á'!"ɁæF*Ɂ+ *I^#V!Ӂ͎*Ɂ+ #*I^#V!ہ͎*Ɂ+ *I!Ӂ̀5s#r*Ɂ+ #*I!ہ̀_5s#r*Ɂ#"Ɂ*ǁ}|%F*z"с*Ł+|F* z"с*z"ρ* z"́!"ˁ*Ł++|F!-!͎*Ł+++|G!!͎*Ł++++|G!Z!͎*Ł+++++|8G!!͎*Ł++++++|aG!"́!-!͎!("ˁ*Ł+++++++|‚G*z"́!-!͎*Ł++++++++|°G* z"ρ*z"́!!͎!"ˁ*ǁ!̀*ˁ*́*ρ*с ;*Ł++++++|*Ł+++++++| H* z"́!!!Ì5s#r*I!9̀5s#r*I^#V*I^#V{zB*I^#V"[*I*I^#Vs#r*I*[s#r*I^#V*I^#V{zB*I^#V"[*I*I^#Vs#r*I*[s#r*7+|B|2êD*I^#V"]*I^#V"_*I^#V"a*I^#V"c*I*]s#r*I*_s#r*I*]s#r*I*cs#r*I*as#r*I*cs#r*I*as#r*I*_s#r*I*]s#r*I *_s#r*z"e*7|*7++++|C* z"e*z"g* z"Y!"i*7++|͎*ǁ!̀*ˁ*́*ρ*с ;*H>!'!"!"!"{H**!&!!1$`HtH*|nH*"*"*#"*%*{zEH*|ʸH****{ozg#&:%H!$1:%*I*~!U !~͎*~*~{ozg!~͎*{'H~:%!~̀!~̀F6*z+|%I!!͎.I!&1͉!̀!*~!*~ͱD*z+|ŠI! !~ !~͎!~̀!~̀F6!̀!*~!*~ͱD*{'H~:%*~ *~}o|g!~͎!~̀!~̀F6!!*~!*~ͱD*dJ>! '! ̀}&:%!.1*D!-!͎*7+++|'D!-!͎*7+++++|@D!!͎*7++++++|ZD!!͎!!̀*i*Y*g*e ;*7++|ªD!!͎!!̀*i*z*g*e ;*3E>!'!~̀5"!~̀_5"!"*+|E*%*~ !I"3E*++|3E*%*~ !I!ͷ"*og*"*~!I"!"öE*|?***~}|/ҤE****!&a%!*͖2**"*#"*%*{z_E*F>!'*y*)^#V*y^#V*y*)^#V)))!L)"*|JWJ*|WJ* |;J**+͎%:%WJ*!11͉$** ͎%:%*:%*J>!'51!@!ͷ!#͎*!I!I!#̀Ͳ,R*~$"~*! I!#̀=,R*~$"~*çM>!-'!"~!"~*b{*=)^#VzKbK5!-!ͷ!A͎!À*~gJ*~*~{ozg! U "~*~*~{ozg! U "~*W~+|zK!!A͎ÆK! !A͎!!!!I(O!I͎!!IK=1!~!I͎5!-X!Aͨ!R! $"?*?!IͿ:L5!-X*~#*O)))̀PáP*~#*O)))̀!~͎*~#*Q^#V~:%*~#*O)))*O*~)))̀͛*~#*Q*Q*~)^#V:%*O*~)))!~͉*Q*~)*~:%*~#"~*~+*~{zO*~#"~*~+*~{zO*~))*~}o|g!U "~*~!U "~H*~"~*~*~}|Q*~"~*~))*~}o|g!U !R1I"~!!!͎!h!1͎!!)͎!"e!"g!"i!"~bU*O*~)))̀!~͎*Q*~)^#V~:%!!~!!͎!h!!͟!hR!9͎*~!1̀!9̀J1!9X!ͷ!1y!A͎I!E1@ͷ!$!A͎5!-X!Aͨ!R"?*?!!!I(A!5͉*I*~*~s#r*I*~*~s#r!"?L!À*~gJ*I*?)*~*~s#r*?#*I*~*~s#r*?##"?A!AX!A͎A!-ͱL!-̀*~gJ*I*?)*~*~s#r*?#*I*~*~s#r*?##"?*I*?)*~*~s#r*?#*I*~*~s#r*?##!U "?*f{*=)^#V4*?*d{*=)^#V*f{*=)^#VF!4*+N>!S'!~̀5"W*S+|M*W*~U "YM*~*W{ozg*~U "Y*U%"[*[*Y!!A?!R!A/HR!À*~*~!Z1I$gJjR!À*~*~!b1I$gJ*~*~!~͎*~*~!~͎!~̀!~̀F6!Z!A/!!A?R*~"~R*~"~*z*~!L)"~*~|S*~*~+͎%!j1͉$*~*~#*z&͉$~:%*~%|-S*~!m1͉$~:%*{* z{oz/W_*j{}/o|/g{ozg|tS!~̀!I*~͉$~:%U*{*z{oz/W_*j{}/o|/g{ozg|ʻS!~̀!I*~͉$~:%U~!͟!dR!~͎*{*z{ozSÏT*~*~{ozT*ed{oz}|N*Ua:%÷N*[*Y{ozg"_!M1*U!L)+"]*]{zUN*U*Y͎%a:%÷N*]##*_{zN*U*]*Y&a:%÷N*U*]##*_{ozg͎%*U*]##*[}o|g%͉$a:%*aQ:%*QsU*{"~!!͎!"~*{"~O*{|%O*~*~È!~͎*y*~)^#V*y^#V'H~:%WO*~*~È!~͎*y*~)^#V*y^#V'H~:%!!~ʪO*O*~)))!~̀/͛*Q*~)*~:%!~̀/! !͎*~#"~*~++++++++|½OO*~#"~*{}|N*~+"~*h{|OP!"~P!"~èP*O*~)))̀g"kXT*i*g}|7T!~̀"k*g#"g*e*k"eXT~!r1"k*i#"i*e*k"e*k!z1 !~͎!~̀!I*~͉$!1͉$~:%U*~*~{ozT!d!d!)ͱ!~͎~!1!~͎T~!1!~͎!d!~I !) !)͎!~̀!I*~͉$!1͉$~:%*{* z{oz9U*~*~ͪM~:%!!*~!*~ͱD1!9͉*~#"~*~}|xQ*c!"y!"y!"y!"y!"y*y+++++|ʪU!"y!"y*z!53!!͎!! ͎!!͎*z|UlV!!͎*v{|V*x{! I*z{!Iͷ!͎lV*x{ !U "~*~{zBV!"~*~! I*z{R*x{!Iͷ!͎!!͎N*z++|ʈV×V*y ^#V"ͫ"m͵X*y*y)^#V"͝O"V}*V͎V*%* {*#)^#V"V"V>}>>W>>>>!V~#"W>*V"V"VMD _ W o glW*V####MD _ W o glW*V>y{z}|"V!Vw# ‘W*V*VlW*V*VlW*V*VUlW*V*VUlW*V"V"VlW>:V>*VW*"V"W|.XlW*W~G#N#>~# yX>*W~.X*V"V"V*V"V"V"V>:V:V>]X*V"V>>}*V"V>xX"V"X"XͩX:Xo&*V!X~͎"V>>X>>> >*V*9|X(Z*7|XY*5! >W>>>>!V~#"W>*V"V"VMD _ W o glW*V####MD _ W o glW*V>y{z}|"V!Vw# ‘W*V*VlW*V*VlW*V*VUlW*V*VUlW*V"V"VlW>:V>*VW*"V"W|.XN to see the available tables or charts " cancelled. "No more tables/charts on this drive." "This report is too wide to print. Maximum width is 254 cols" "Use cursor keys to select a row (UP, DOWN, CANCEL)" "Use cursor keys to select a column (RIGHT,LEFT,CANCEL)" "Current table does not have enough columns for DEPR/LValue is either too large or too small. Re-enter. "Use cursor keys to position cursor (UP,DOWN,RIGHT,LEFT,CAN) " Improper filename. Examples: S82BUDG, B:ACTUAL, VERS12 "Expecting a number. You entered non-numeric characters." "GraphPlan! Enter any command like 111 to load table" Cannot use FIX on this command. Please see manual. "Attempt to delete program steps when there OAN." "Improper method. Use SET DEPR to enter proper values." "W-22 Sum of cashflows is less than 0. IRR is negative." "W-23 Interest rate is 0. Use SET LOAN to enter LOAN inputs." "W-24 Use SET LOAN to enter proper inputs for LOAN command." "W-25 Cashflows have no change in signs. No solution for IRR." "W-26 Cashflows have more than one change in sign. CAUTION." "W-27 Life value lesis no program." "Too many steps in a program. You can have 100 steps." No program steps in memory. "Press any cursor key to recover your display. " "This report may be too wide for the normal width printer " "There is no table file on this diskette with this name." "The content of this file is incorrect. (e.g. old version?)" "Hit RETURs than 1. Cannot compute loan/depr." "Improper tax schedule. Use SET SCHED to enter schedule." "New table is smaller than current table dimensions. Enlarge?" Program steps in memory have been cleared. "Formula is too complex. Symbol table is full." Cannot use the SET DEPR/LOAN/SCHED or DO TAX commands in cols. "IRR: Can only handle 50 values. " SET PAPER; HIT RETURN. hit RETURN; to continue. IRR: Divergence. Cannot get solution after 50 trials. Improper selection. Reenter. Cannot display/print/plot chart. Zero data in all selected rows/cols. Cannot display/print/plot chart. Zero row/col data for numeric X-axis. SET PLOTTER and PAPER; HIT RETURN This add-on option is not available in your copy of GraphPlan. cannot load different size tables in a program. The table has different dimensions from current. Changing size Program mode on. Command has been saved. Please SAVE PGM. Cannot load row and column titles from different size tables. null command. Your program already exists. "There is no chart file on this diskette with this name." Your chart file already exists. Continue with save? . Reenter. Cannot display/print/plot chart. Zero data in all selected rows/cols. Cannot display/print/plot chart. Zero row/col data for numeric X-axis. SET PLOTTER and PAPER; HIT RETURN Continue with save? saved. Syntax Error. Your table file already exists. Continue with save? OK to erase current data? OK to erase current program? No help files. !!>́!>!ʐ!Ґ!ڐ!SȐ͖!\2|\͌<̆\͑![Ȑ"Ȑ͖ ́GRAPH1.COM file not found$$GRAPH1 COM KEY12|S KEY13|D KEY14|X KEY15|E ![Ȑ"Ȑ͖TEST TBLuvGRAPH COMTERM COMxPRINTER COMxyz{|}~GPSBAR OVL PRINTER SET Some commands are not listed on the command menu. They are: 1. Backspacing: Use the DEL key. 2. Cancellation: Use the HOME key. 3. Cursor movement: Use the arrow keys. 1 format: Display format commands. Enter row & column titles, set row or column print options, look at options and move rows or columns 2 data: Display data entry commands. Enter data, move the data pointer fix, nullify and goto commands. 3 math: GraphPlan is an electronic worksheet with graphics. You can do row and column calculations electronically. Then press the graphics key to see the results graphically. Most of the screen displays your table. The commands on the right allow you to write titles and data into the table. You choose a command by typing the command number followed by the carriage return key. Display math commands. Arithmetic, cumulate, negate, get, ceiling, floor, and row and column summations. 4 graphics: Display graphics commands. Select, display, print and plot chart. Options include bar, line and pie charts. 5 print: Display print commands. Set report options, titles and print reports. Reports can be sent to disk files. Display statistical commands. Smoothing, moving averages, mean variance, standard deviations and curve fitting. 16 format: Display format commands. Enter row & column titles, set row or column print options, look at options and move row or columns. 17 INSERT Insert a row or column at the current data pointer position. (Insert really gets an empty row/col from the end of the tbl) 6 status: Display status commands. Range settings, mode selection, and selection of compute order. 7 HELP command Explains each command. Describes the commands and explains usage. 9 STOP verify Clears the display and exits to CP/M. The current table is not 18 DELETE Delete a row or column at the current data pointer position. (Delete really moves row/col to the end of the table) 19 rows: Row section of format commands. 20 ROW TITLE title ... HOME (DOWN, UP, HOME) Enter or change row titles. Each title entered is placed in automatically saved. 10 utility: Display utility commands. Save/load tables and charts, setup table size, select drive, reset and redisplay screen. 11 sort: Display sort commands. Sort and rank row/column data and title in descending or ascending order. 12 stats: the current row. The cursor keys move the current row pointer. 21 SET TYPE row option ... HOME Allows you to specify the type of row, underlining, decimal places, spacing and special formatting for each row. 22 SHOW ROWS Display the current options for each row. Also shows the commands stored for each row. 23 REORDER old-row new-row to insert new columns or delete columns from your table. 29 data: Display data entry commands. Enter data, move the data pointer fix, nullify and goto commands. 30 ENTRY value ... HOME (UP, DOWN, RIGHT, LEFT, HOME) Enter values into table. Cursor keys allow movement to any cell in the current table range settings. 31 ENTER value ... HOME (UP, DOWN, RIGHT, LEFT, HOME) Move old-row into the position new-row. Use this command to insert new rows or delete rows from your table. 24 cols: Column section of format commands. 25 COL TITLE title1 title2 ... HOME (RIGHT, LEFT, HOME) Enter or change col titles. Each title entered is placed in the current col. The cursor keys move the current col pointer. Enter values into table. Constant, grow and increase options allow quick entry. Cursor keys allow individual data entry. 32 CHANGE row, column <-- value Change one value in your table. 33 SELECT ROW row Move the data pointer to a new row of the table. Also, use the up and down cursor keys to move the data pointer. 26 SET TYPE column option ... HOME Allows you to specify the column width, decimal places and special column formatting for each column. 27 SHOW COLS Display the current options for each column. Also shows the commands stored for each column. 28 REORDER old-column new-column Move old-column into the position new-column. Use this command Acorn CPCPMDISC/M  0 BIORHYTHM/Part 2  Z%<>1 tDC ( Tr@ <5: T`C %d:5;19,3,2;0;19,2,6;0;:D=D%:I=I% $i23,254,24,60,90,153,24,24,24,24 #j23,255,32,32,32,252,32,32,32,0 %nE%,X%-Y%:E%,X%+Y%:E%,X%:F%,X% +x K=1 20:E%+K*I%,X%:E%+K*I%,X%-20: .E%-50,X%+Y%/2:(255):E%-50,X%-Y%/2:"-" %0,1:E%+10*I%,X%:E%+10*I%,X%-20  E%+10*I%-20,X%-40:(254) BDRAW(2,A%):"P" BDRAW(3,B%):"E" BDRAW(1,C%):"I" tt@ BDRAW(C,CY) R0,C:E%,Y%*(2*/CY*D)+X%: X=E% F% 8:X,Y%*(2*/CY*(D+(X-E%)/I))+X%:: - 7: <>17 '"ERROR ";;" IN LINE ";:  "MESSAGE" @SPACE .J3,22);"Press the SPACE BAR to continue"; T =" "  .E%-50,X%+Y%/2:(255):E%-50,X%-Y%/2:"-" %0,1:E%+10*I%,X%:E%+10*I%,X%-20  E%+10*I%-20,X%-40:(254) BDRAW(2,A%):"P" BDRAW(3,B%):"E" BDRAW(1,C%):"I" tt@ BDRAW(C,CY) R0,C:E%,Y%*(2*/CY*D)+X%: X=E% F% 8:X,Y%*M2/Y2 L=365*(Y2-Y1) ( M2>1 X=1 M2-1:L=L+NDAY(X):X ( M1>1 X=1 M1-1:L=L-NDAY(X):X L=L+D2-D1  ADJUST FOR LEAP YEARS 8Y=(Y1 4)*4 BY=Y+4: Y>=Y2 DjX L LEAP(Y) L=L+1 VDBX j Y1=Y2 t\X t LEAP(Y1) M1<3 L=L+1 ~ LEAP(Y2) M2>2 L=L+1 =L % LEAP(Y1) M1<3 M2>2 L=L+1 =L dݤLEAP(Y) &n RETURNS TRUE IF Y IS A LEAP YEAR 2x Y 4=0 (Y 100<>0 Y 400=0) = = XINIT: INITIALISE l NDAY(12),MON$(12) v K=1 12: NDAY(K)0)  `"KCL j" (0)>"" Djb " "OFF "23;8202;0;0;0;: "ON #23;29194;0;0;0;: 0(#GPI(F2,ML): General Purpose Input Routine 2#B,B$ <#A$="" *F#ML," ");ML+1,(8));(&87);:ON:KCL P#B$=:B=(B$): B=13 dfc Z# B=127 A$="" DPc )d# B=127 A$=A$,(A$)-1):B$;:DPc $n# (A$)=ML B<32 B>126 dRc *x# F2=0 B=32 (B>=48 B<=57) d\c #7:DPc #B$;:A$=A$+B$:DPc #OFF # #YESORNO #B$ $GPI(0,3) $B$=A$,1) $Y%=-1 "$ B$="Y" B$="y": ) 31,28,31,30,31,30,31,31,30,31,30,31  K=1 12: MON$(K): 7 "JANUARY","FEBRUARY","MARCH","APRIL","MAY","JUNE" A "JULY","AUGUST","SEPTEMBER","OCTOBER","NOVEMBER","DECEMBER"   ERROR(X) *0,16); ;4 X DK],tX\,tb\,tl\,tv\,d@\,dJ\,dT\,d^\,tD\ >"You must be at least 10 days old"'"to get a plot.":dh\ #"Can't understand that.":dh\ F"That does not contain a year in the"'"range 1900 to 2020.":dh\ /"Can't understand the day or month.":dh\ '"Not sure abou Y%=1 ,$ B$="N" B$="n" Y%=0 S$ A$="" DPc )d# B=127 A$=A$,(A$)-1):B$;:DPc $n# (A$)=ML B<32 B>126 dRc *x# F2=0 B=32 (B>=48 B<=57) d\c #7:DPc #B$;:A$=A$+B$:DPc #OFF # #YESORNO #B$ $GPI(0,3) $B$=A$,1) $Y%=-1 "$ B$="Y" B$="y"t that month.":dh\ %"Not sure about that day.":dh\ "HAPPY BIRTHDAY." &"But what is today's date?":dh\ E"Your date of birth must be the"'"earliest date that you enter." '"Try Again.":SPACE  K=16 22 0,K);40," ")  K @DBL(X$,X,Y) JX-1,Y);(141);X$ TX-1,Y+1);(141);X$  WAIT(X)  Z Z=  -Z>X*100   SPACE 3 3,22);"Press the SPACE BAR to continue";:KCL 0 =" " k l TITLEPAGE v :DBL("BIORHYTHMS",8,9)  OFF:N%=(50h and" ("continue with absolute regularity" "throughout life."' -" Each cycle has a positive phase and" "a negative phase."' ((" During the positive phase, the" )2"energy controlled by that cycle is" ,<"being discharged. These are days when" (F"positive aspects of the cycle are" P"enhanced."' +x" The negative phase is a period of" +"recharging, when energy and vitality" "are reduced." SPACE :'' (" A critical day is when a cycle" "changes phase."' *A$,I,1))  T>96 T<123 T=T-32 D$=D$+(T): $ D$="TODAY" ERROR(6+NO):= ANALYSE %X=CHECKDATE: X>1 ERROR(X):= = PݤCHECKDATE Z CNT=0 CNT>6 =2 d T%(CNT)>0 =3: NO YEAR nY=L(CNT): Y<100 Y=1900+Y x Y<1900 Y>2000 =3 CNT=CNT-1: CNT=0 =2 C=1: T%(1)=1 TXU  T%(1)=2 =4 GETDAY  C>CNT =2 GETMONTH: M=0 =5 D|U GETMONTH: M=0 =5 " C>CNT =2 , T%(C)=1 =6 6GETDAY | CCNT tgV X T%(C)<>1 tgV bT$=D$,S%(C),L(C)),2) 2l T$="ST" T$="RD" T$="ND" T$="TH" t@V vtgV .L(C)=L(C)-2:S%(C)=S%(C)+2: L(C)=0 C=C+1  GETMONTH  T%(C)>0 dPV M=L(C): M>12 dxV TBW M=12:M$=D$,S%(C),L(C))  (M$)<3 dxV  MON$(M),(M$))=M$ TBW M=M-1: M>0 ddV M=0:TKW C=C+1   pݤTIMELAPSE .z CALCULATE NUMBER OF DAYS BETWEEN 2 DATES " DATES IN D1/M1/Y1 & D2/ DJP 6T=1:L=0 +@:L=L+1:NEXTCHAR: LETTER(T$):DhP J T$=(0) dKP TT=2:L=1:NEXTCHAR 4hCNT=CNT+1: CNT<6 T%(CNT)=T:S%(CNT)=S:L(CNT)=L rTDP  NEXTCHAR , I>(D$) T$=(0) T$=D$,I,1):I=I+1  ݤDIGIT(T$) ! "0"<=T$ T$<="9" = = \ݤLETTER(T$) !f "A"<=T$ T$<="Z" = = ݤFILLER(T$) C T$=" " T$="." T$="/" T$="-" T$="," T$=":" = = ݤDATEOK(NO)  GET AND DEDUCE DATE  PUT IN D,M & Y GPI(0,30):D$=""  I=1 (A$):T=( plot giving 10 days on" "each side of this date):" ""4,12);: DATEOK(2) TbA #,Y2=Y:M2=M:D2=D:LAPSE=TIMELAPSE 6 LAPSE<0 ERROR(9):dH@ !@ LAPSE<10 ERROR(10):dH@ 1J0,18);"Elapsed days since birth ....";LAPSE TSPACE A%=23:B%=28:C%=33 D%=LAPSE-10 E%=100:F%=1100:I%=(F%-E%)/20 X%=500:Y%=450:Z%=1 tDC  <>17 :" in line ";: *Z%=2  "BPART2" INTRO :' )" Some people believe that human" ("temperament and behaviour seem to" ."follow predictable recurring patterns."' ," These patterns, 'BIORHYTHMS', can" +"be broken down into three cycles: -"' )$"INTELLECTUAL - a cycle of 33 days," -." affecting concentration, judgement" #8" and learning abilities."' )L"EMOTIONAL - a cycle of 28 days," ,V" controlling moods, creativity and" `" emotional life."' )t"PHYSICAL - a cycle of 23 days," )~" governing energy, coordination" " and stamina." SPACE :' )" These cycles start at birt BIO/Biorhythms X Written by David Tee and Jerry Temple-Fry (NETHERHALL SCHOOL) and Richard G Warner  Version 5 - October 1981 / For BBC Model A Microcomputer 16K Minimum ( Tr@ 2 7 <: T`C dTITLEPAGE:INIT n L(6),T%(6),S%(6) xINTRO :'' +" To get your individual Biorhythm" #"plot, two dates are needed."' +" First, enter your date of birth:" !4,7);: DATEOK(1) dp@ Y1=Y:M1=M:D1=D +4,9);"and the date for the plot (you" ("will get aP=A+B+C A=((A/10)*(10-FS)) B=((B/10)*(10-FS)) C=((C/6)*(6-VF)) FF=(F*VF/6):F=F-FF FD=OP-A-B-C  S=2 G=G*(20-FS)/20  S=3 G=G*(10-FS)/10   pCALCULATE z B=0 G=0:dTW  S dTW,tNW,tbW  G>1000 G=1000 G=G*(B-10)/B:dTW  G<0 dTW G=18*(11+(3))*(0.05-1/B)*G  G<0 dTW F=F+(G) ST=0:P=A+B+C: P=0 t[X T=F/P: T>5 T=4:TxX  T<2 P=0:t[X  T>4 T=3.5:TxX ST=(P*(7-T)/7):T=3 8P=P-ST:F=(F-P*T-ST*T/2) B F<0 F)-1):B$;:DPc $n# (A$)=ML B<32 B>126 dRc *x# F2=0 B=32 (B>=48 B<=57) d\c #7:DPc #B$;:A$=A$+B$:DPc #OFF # #YESORNO #B$ $GPI(0,3) $B$=A$,1) $Y%=-1 "$ B$="Y" B$="y" Y%=1 ,$ B$="N" B$="n" Y%=0 S$ T$ݤNUMINP ^$GPI(1,6) h$=(A$) A$="" *F#ML," ");ML+1,(8));(&83);:ON:KCL P#B$=:B=(B$): B=13 dfc Z# B=127 A$="" DPc (d# B=127 A$=A$,(A$=0  XVARIABLE b S$(3),VX(3),VY(3),FL(3) 2lS$(1)="Winter":S$(2)="Growing":S$(3)="Harvest" +W$=(255):Y$=(&93):R$=(&91):V$=(&92) VX(1)=13:VY(1)=8 VX(2)=21:VY(2)=12 VX(3)=22:VY(3)=18  IMPOS /4,20);(&88);(&82);"I M P O S S I B L E" WAIT(2) SPACE 5,20);(20);0,22);(40)  YELLOW *I 4: I=0 24 >0,I);(&83);: H0,0); R 28,3,24,39,0  @DBL(X$,X,Y) JX-1,Y);(141);X$ TX-1,Y+1);(141);X$  WAIT(X)  Z Z=  -Z>X*100   SPACE 3 0,22);"Press the SPACE BAR to continue";:KCL 0 =" " k l TITLEPAGE %v MAP:OFF:WAIT(2):0,11);(200) :{ DBL(Y$+"YELLOW RIVER",11,11):DBL(Y$+"KINGDOM",13,14) I%=(500)  `"KCL j" (0)>"" Djb " "OFF "23;8202;0;0;0;: "ON #23;29194;0;0;0;: 0(#GPI(F2,ML): General Purpose Input Routine 2#B,B$ <#A$="" *F#ML," ");ML+1,(8));(&83);:ON:KCL P#B$=:B=(B$): B=13 dfc Z# B=127 A$="" DPc (d# B=127 A$=A$,(A$lage Leader's Report" '15-(T$)/2);(&88);T$ *'"In the ";S$(S);" Season of year ";Y %"of your reign, the kingdom has" "suffered these losses:"' &<"Deaths from floods..........";FD &F"Deaths from the attacks.....";TD &P"Deaths from starvation......";ST 8Z"Baskets of rice"'"lost during the floods......";FF 8d"Baskets of rice"'"lost during the attacks.....";TF #n'"The village census follows." SPACE  ADDTHIEVES YELLOW:0,8) #"Thieves have come out of the" !"mou,Y);: X=29 "x" " " < X>WX ThT P I=1 99 ZX,Y+1);((94)+32): dVDRAW(V) X=X+1: X<27 X-2,Y);" "  X=31 29,Y);"x" X-1,Y);R$;"T":WAIT(.04)  X<32 ttT  Y=SY TXU 0X,Y);" ":Y=Y-D:X,Y);"T":WAIT(.05):d\T  S TbU,TlU,TvU "I=200+(70)-C:D@U ,I=30+(200)-C:D@U 6I=(400)-C @I=(I): I<0 I=0 JTD=(C*I/400):C=C-TD ,TTF=(I*F/729+(2000-C)/10): TF<0 TF=0 ^ TF>2000 TF=1900+(200) hF=F-TF { |FLOOD X,Y ZF=0: Sntain to join you. They" #"have decided that it will be" #"easier to grow the rice than" "to steal it!":SPACE P=P+50+(100)  RITUAL YELLOW:'' '"We have survived for ";Y;" years" #"under your glorious control." #"By an ancient custom we must" ""offer you the chance to lay" $"down this terrible burden and" "resume a normal life." $'"In the time honoured fashion" "I will now ask the ritual"  "question:"':WAIT(5) !"Are you prepared to accept" % "the tZU,tdU,tnU FS=(330)/(A+1):txU FS=((100)+60)/(A+1):txU   FS<1 1X=6:ZF=1:Y=(8)+10: FS<2 FS=(2) FS=(4) 1,Y);W$;W$;W$;W$;W$;W$  K=1 FS*100  (4) d~U,THV,TRV,T\V  X=25 dtU X=X+1:DDV  X=6 dtU X=X-1:DDV  Y=22 dtU Y=Y+1:DDV  Y=3 dtU Y=Y-1:DDV DV=1 XW1=VX(V)-X:W2=Y-VY(V) b W2<>1 W2<>0 t@V l W1=0 W1=1 FL(V)=1 v W1=-1 tTV V=V+1: V<4 DXV X,Y);W$ K VF=FL(1)+FL(2)+FL(3) O burden of decision again?"' %*"You need only answer Yes or No" 54"for the people will understand"'"your reasons." #>0,21);:YESORNO: Y%<0 T~R [ ATTACK X,Y,I #ZA=0:R=(1): S tfS,tpS,tzS  R<.5 dDS  R<.2 dDS  R<.6 dDS ZA=1  VF=3 V=(3): FL(V)=1 dlS X=32:WX=VX(V):WY=VY(V)-1 " WY<17 Y=13:D=-1 Y=17:D=1  SY=Y X,Y);" ": Y=WY ThT %Y=Y+D:X,Y);"T":WAIT(.05):TTT +(X=X-1:X-1,Y);R$;"T":WAIT(1-(X-WX)/5) 2Xlow River and"'"the mountains." '"You have been chosen to take"'"all the important decisions. Your "'"poor predecessor was executed by"'"thieves who live in the nearby"'"mountains." '"These thieves live off the "'"villagers and often attack. The"'"rice stored in the villages must"'"be protected at all times." *SPACE 4:'' >"The year consists of three long "'"seasons, Winter, Growing and"'"Harvest. Rice is planted every"'"Growing Season. You must decide"'"how much is planted." H'"The riveNI: A

2 T~M ( '"How many baskets of rice will be" ! "planted in the fields....."  26,19);:G=NUMINP  G>F IMPOS:TBM  F=F-G > SPACE G  ENDSEASON WAIT(1)  F>0 TPN 0 :3,7);"There was no food left.All of the" + " people have run off and joined up" . " with the thieves after ";J;" seasons" " " of your misrule":SPACE:  P>0 DtN 2:2,8);"There is no-one left! They have all" +$"r is likely to flood the"'"fields and the villages. The high"'"dyke between the river and the"'"fields must be kept up to prevent"'"a serious flood." R'"The people live off the rice that"'"they have grown. It is a very poor"'"living. You must decide what the"'"people will work at each season"'"so that they prosper under your"'"leadership." SPACE   NEWSEASON 1 YELLOW:8,1);"Census Results"': J=1 djK + "At the start of the ";S$(S);" Season" * "of year ";Y;" of your reign this is"  been killed off by your decisions " .." after only ";Y;" year";: Y<>1 "s"; 8".":SPACE: 4tF1=P/(FD+TD+ST+1):F2=F/(TF+FF+1): F20 T$="Nothing to worry about.":dXN 7DBL(" A quiet season ",1,11) WAIT(2): ,YELLOW:3,2);"Vil"the situation.":T\L ( "You have inherited this situation" ( "from your unlucky predecessor. It" ) "is the start of the Winter Season." ' '"Allowing for births and deaths," !& "the population is ";P;". "' &0 "There are ";F;" baskets of rice" : "in the village stores." D '"How many people should:" N " A) Defend the dyke......" X " B) Work in the fields..." b " C) Protect the villages." QU=14:A=0  26,QU);:NI=NUMINP  A+NI>P IMPOS:tJL QU=QU+1: QU=16 B=NI:t|L  A= patterns which need to be triggered" C" by pressing any two of the user-"'" definable keys."'' SPACE SCREEN P*'" Each time a pattern finishes,"'" press two of the user-definable" K4" keys in sequence to produce"'" another pattern, or press ESCAPE" '>" to go on to the next program." HSPACE SCREEN P" Start the pattern generation"'" now, by pressing two user-defined" " keys in sequence..."  SCREEN : I%=1 2 ,10,I%);(&8D);"Pattern LOOD:ATTACK:tPA |ATTACK:FLOOD CALCULATE ENDSEASON  P=0 F=0 dtA ' J 12 =0 RITUAL: Y%=0 dtA " P<200 (3)=1 ADDTHIEVES P=(P*1.045):TlA 26::0,9) ,"Press the RETURN key to start again."' 3"Press the ESCAPE key to leave the"'"program."  =(13):dH@  <>17 :" in line ";: 26: 5,9); "Do you want to go on to" %" the next program (Y/N)? "; YESORNO: Y%<0 tNC  Y%=0 :Dd@  "BIORTHM" MAP 26::Generator"::' ? @SPACE 5J3,22);"Press the SPACE BAR to continue":=" "  #YESORNO #Y%=-1 $X%=: X%=13 Y%>=0 !$X%=X%&DF:X%<>78X%<>89TDd $Y%=1:X%=78Y%=0 "$X%;8;:TDd now, by pressing two user-defined" " keys in sequence..."  SCREEN : I%=1 2 ,10,I%);(&8D);"Pattern ''  I=3 23 !Y$;W$;(&96);"55";Y$;27);R$   I=3 21 2 -$28,I);" x ";28,I+1);"x";(255);"~x x" .33,I+2);"x";(255);"~x"; 8 L I=13 15:30,I);" " V G`30,14);"THIEVES";31,13);"TT";31,15);"T";32,16);"T";32,17);"T" 50,23);" DYKE VILLAGES MOUNTAINS";  V=1 3:VDRAW(V):  VDRAW(V) ;VX(V)-2,VY(V));V$;"^&";Y$VX(V)-2,VY(V)+1);V$;"&^";Y$ ? INSTRUCTIONS YELLOW:''' ["The kingdom is three villages. It"'"is between the Yel" KINGDOM/Yellow River Kingdom Z Program by Tom Hartley and Jerry Temple-Fry (NETHERHALL SCHOOL) and Richard G Warner  Version 5 - October 1981 / For BBC Model A Microcomputer 16K Minimum ( Tr@ 27 <: T`C dVARIABLE:TITLEPAGE nINSTRUCTIONS F=5000+(2000) P=300+(100) J=0:S=0 ,S=S+1: S=4 S=1 6J=J+1:Y=(J-1) 3 +1 @NEWSEASON J V=1 3:FL(V)=0: TTD=0:TF=0:FD=0:FF=0:VF=0 9^MAP:DBL(S$(S)+" Season Year "+(Y),1,1) h (2)=1 D|A rF Pattern Generator  Version 1.0 ( Tr@ 27 P tDC d:START:KEYSETUP  " S1%=-&80: (S1%>0)(S1%<11) " S2%=-&80: (S2%>0)(S2%<11) 3,5:C1%=(6):C2%=C1%6+1:C3%=C2%6+1:C4%=C3%6+1 2619,0,C1%;0;19,1,C2%;0;19,2,C3%;0;19,3,C4%;0;5 @Z%=5:C%=1:128,0: JAC%=(5)-1:AC%<>2 Y%=010234*S1% C%=C%3+1:AC%,C% 0,0:Z%,1278,Y% 1278,0:Z%,0,Y%: X%=012728*S2% 0,0:Z%,(1278-X%),1020 1278,0:Z%,X%,1020:  7 5,9); "Do you want to go on to" %" the next program (Y/N)? "; YESORNO: Y%<0 tNC  Y%=0 Dd@  "KINGDOM" pKEYSETUP zV%100:X%=V%:Y%=V%/256  K%=0 9 5$V%="*KEY "+(K%)+" ""|!|"+(K%+65)+"""":&FFF7:  XSTART b:23;8202;0;0;0; +l I%=0 1:15,8+I%);(&8D);"Pattern"; .v14,11+I%);(&8D);"Generator"::I%=(300) SCREEN U'" This program generates patterns"'" which are displayed using high-" " resolution graphics."'' U" The program produces random"'" CLOCK (Tr@ 27 <F%=0:O%=1:T`C *d7:OFF:I%=89:17,I%);&8D"CLOCK": =n F%=0 :A%120:@%=2:I%=0119:A%?I%=100*(1+(I%*6)): x<0=0 F%=1: O% dhC,dPG,dhC -15,1);"M E N U"'''"Choose between...."' d9)"Analogue Display"''9)"Digital Display"''9)"Analogue and Digital Display"''9)"Reset Time" -0,16)"Press ESCAPE to exit the program" !I%=14:5,4+2*I%);I%;" -": /'"Enter 1-4 and Press RETURN: ";:K%=0:F%=2 Y%=:Y%=13K%>0TzB &Y%=Y%&EF-32:Y%<1Y%)-100): lH G%=H%60:0,0:A%?(G%+58)-100,A%?(G%+13)-100:86,A%?(G%+2)-100,A%?(G%+17)-100:6,A%?(G%+58)-100,A%?(G%+13)-100:86,2*(A%?G%-100),2*(A%?(G%+15)-100): S5:19,0,0;0;19,3,2;0;12:300,400:980,400:980,648:300,648:300,400:OFF:SET D 100=0:S%=(S%+1)60:S%=0L%=(L%+1)60:L%12=0:H%=(H%+1)120 6,15);:P:dZG - P H%5":";L%10;L%10":";S%10;S%10: @OFF 23;8202;0;0;0;: ASET T%=:S%=(T%100)60:L%=(T%6000)60:H%=(T%72000)120: >4T\B 0K%=Y%:(K%+48);8;:T\B :F%=1:K%<4O%=K%:Dd@ *X:I%=78:13,I%)&8D"ENTER TIME -": 9b'14)"HOURS :"H% 14)"MINUTES:"L% 14)"SECONDS:"S% ilH%<0H%>23L%<0L%>59S%<0S%>59 OFF:'12)"INVALID TIME -"'12)"PLEASE RE-ENTER":N%=(400):DXB $v=(S%+(L%+(H%*60))*60)*100:Dd@  7: F%=1 dtA * F%=0 Dd@  "PHOTO" )4:19,0,1;0;19,1,3;0;16,29,500;512;5 $A=045.5:X%=400*A:Y%=400*A ]69,X%,Y%:69,Y%,X%:69,-X%,Y%:69,Y%,-X%:69,X%,-Y%:69,-Y%,X%:69,-X%,-Y%:69,-86,2*(A%?G%-100),2*(A%?(G%+15)-100): S5:19,0,0;0;19,3,2;0;12:300,400:980,400:980,648:300,648:300,400:OFF:SET D 100=0:S%=(S%+1)60:S%=0L%=(L%+1)60:L%12=0:H%=(H%+1)120 6,15);:P:dZG - P H%5":";L%10;L%10":";S%10;S%10: @OFF 23;8202;0;0;0;: ASET T%=:S%=(T%100)60:L%=(T%6000)60:H%=(T%72000)120: Y%,-X%: CI%=112: (I%*30)*400*1.1-32-16*(I%<10),(I%*30)*400*1.1+16 A$;I%;:X%=(I%*30)*400:Y%=(I%*30)*400:X%,Y%:X%*.9,Y%*.9: .4:OFF:SET:H:M:S UL 100=0:S:S%=(S%+1)60:S:S%=0M:L%=(L%+1)60:M:L%12=0H:H%=(H%+1)120:H VO%=330,5);:P `DLD 6S 0,0:6,3.2*(A%?S%-100),3.2*(A%?(S%+15)-100): dM 0,0:1.5*(A%?(L%+59)-100),1.5*(A%?(L%+14)-100):86,1.5*(A%?(L%+1)-100),1.5*(A%?(L%+16)-100) W6,1.5*(A%?(L%+59)-100),1.5*(A%?(L%+14)-100):86,3*(A%?L%-100),3*(A%?(L%+15: > SPA 3,20)"Press the SPACE BAR to continue";:=" ": i7:8,6)"Do you want to go on to"'7)"the next program (Y/N)? ";:MUGTRAP("Y","N"):KY%="N":T|@ D:M%=05,5)"Press the PLAY button"'5)"on your tape recorder." "CLOCK" P(A$,B$) K$=(&DF):K$=A$ K$=B$:K$+8;:KY%=(K$) NK$=(&DF):K$=A$ K$=B$ K$=13:K$<>13 K$+8;:KY%=(K$): # MUSIC / WELCOME MUSIC PROGRAM  (C) BBC 1982  BY RICHARD RUSSELL  VERSION 1.2/29 APR 1982  BBC MICRO MODEL A OR B  T^@ K7:M%=05,16)"Press the STOP button"'5)"on your tape recorder.":SPA ( d\@ @212,23;8202;0;0;0;:I%=1112:16,I%)&8D"Music"::N%=(500) < J%22,K%22,L%22,C%3,O%7 ;FA%=4112:B%=24:!C%=0:D%=255:!O%=&04020106:O%!4=&07030005 %PI%=122:J%?I%:K%?I%=0:L%?I%=0: 'Z1,1,0,0,0,0,0,0,30,0,0,-20,126,126 d5:5:P%=0:PAL:X%=0 !nI%=122:-J%?I%D%K%?I%A 8x:I%=13:H%=C%?I%:H%0,1+H%3:X%,44*H%-16:1,0,40 /:X%=X%+8:X%=1280X%=0:P%=P%4:4,12,5:PAL  F17,66,34,82,35,51,68,36,84,69,85,70,38,71,55,87,56,88,73,57,89,41 A K%?I%K%?I%=:H%=L%?I%:L%?I%=:C%?H%=:A%+H%,0,0,0:K%?I%=:H%=0:H%=H%+1:H%=4C%?H%=:H%<4C%?H%=I%:L%?I%=H%:H%,1,B%+4*I%,  + PAL I%=03:19,I%,O%?(I%+P%);0;:: C MUGTRAP(A$,B$) K$=(&DF):K$=A$ K$=B$:K$+8;:KY%=(K$) NK$=(&DF):K$=A$ K$=B$ K$=13:K$<>13 K$+8;:KY%=(K$): 6 #B%<>T%R:B%=T%:R I%=070:  C 23;8202;0;0;0;: *S(A$) F% :(40-(A$))2)A$:SP k lSP 5v3,V%);"Press the SPACE BAR to continue":=" "  SE C !4V%=2:28,0,31,39,28,29,0;128; :S("CLG clear graphics area"):::0,0:S("MOVE 0,0 move graphics cursor to 0,0"):0,800:4,0:4,800:S("DRAW 0,800 draw a line to 0,800"):1272,800 S("DRAW 1272,800 draw top line"):1272,0:1268,0:1268,800:S("DRAW 1272,0 draw side"):4,700:S("MOVE 4,700 move cursor"):1268,700:S("DRAW 1268,700 draw wall"):72,50 ` S("MOVE 72,50 move cursor"):192,50:S("DRAW 192,50 draw bat"):69,80,140:S("PLOT 69,80,140 draw a point at 80,140"):69,84,140:69,84,144:69,80,144:S("Add three more to make a ball") X F% :8)"Now the game begins...."'" Press Z to move left, X to move right":SP: ( 26,29,0;128;: #YN #Y%=-1 $X%=: X%=13 Y%>=0 !$X%=X%&DF:X%<>78X%<>89TDd $Y%=1:X%=78Y%=0 "$X%;8;:TDd 9,80,140:S("PLOT 69,80,140 draw a point at 80,140"):69,84,140:69,84,144:69,80,144:S("Add three more to make a ball") X F% :8)"Now the game begins...."'" Press Z to move left, X to move right":SP: ( 26,29,0;128;: #YN #Y%=-1 $X%=: X%=13 Y%>=0 !$X%=X%&DF:X%<>78X%<>89TDd $Y%=1:X%=78Y%=0 "$X%;8;:TDd / BAT'N'BALL/Graphics Kinetic Demonstration (Tr@ 2V%=23:7 < tDC 8d7:C:I%=01:15,9+I%)&8D"BAT'N'BALL"::N%=(500) 5,@%=0:H%=0:F%=1:L%=120:E%=1260-L%:4:19,1,3,0,0,0 :SE 9U%=8:V%=16:B%=72:S%=0:SC:W%=700:C%=0:Q%=80:R%=140:C *FX 11 4 *FX 12 4 :O%=Q%+U%:P%=R%+V%:M ;O%>1260O%<8 T%=-(U%)*(V%):7:V%=(V%)*(U%):U%=T% $P%>W%-8 V%=-V%:S%=S%+1:7:SC WP%<50O%>=B%O%<=B%+L% U%=4*(6+(S%>9))*(1-2*( 1)):V%=-V%:7:S%=9:V%=24*(V%) M:B:Q%=Q%+U%:R%=R%+V%:B "&C%=C%+1:C%<125 R%>190 DNB 20C%=0:8,W%:7,1264,W%:W%=W%-24:W%<200 W%=700 57 :8,W%:1264,W% NR%<50:S%>H% H%=S%:SC &X8,15)"Another game (Y/N)? ";:YN bF%=0:Y%=0 *FX 12 0 E7:8,6)"Do you want to go on to"'7)"the next program (Y/N)? "; YN:Y%=0Dd@  "MUSIC" 0SC 6,1)"Score "S%;20);"Hi-score "H%: 9LB 70,Q%,R%:70,Q%+4,R%:70,Q%+4,R%+4:70,Q%,R%+4: R B%,50:6,B%+L%,50: /xM T%=B%:Z%=(0)&DF:Z%=90T%>=24T%=T%-16 Z%=88T%<=E%T%=T%+1(I)=WORD$(I) I  SHIFT  I=1 30  J=1 NW 1I-1,2*J+1);WORD$(J)+29," "),I,1);WORD$(J) WAIT((10-NW)*.01) J,I ? SLOWSORT CONVERTTOUC  NW=1  X=1 NW-1 B=X  Y=X+1 NW   W$(B)>W$(Y) B=Y Y   B>X SWAP(X,B) *X 3 4SWAP(I,J) > K HIROW=2*I+1:JROW=2*J+1 RJCOL=29-(S$(J)) \ICOL=JCOL-(S$(I))-1 f I+1=J ICOL=30  MOVE S$(J) OUT  K=29 JCOL -1 PAUSE K,JROW);S$(J);" ":K  MOVE OUT S$(I)  ICOL>;"Press the SPACE BAR to continue";:KCL 0 =" " k l TITLEPAGE /v :DBL("Alphabetic",9,8):DBL("Sort",12,11)  OFF:I%=(500)  `"KCL j" (0)>"" Djb " "OFF "23;8202;0;0;0;: "ON #23;29194;0;0;0;: 0(#GPI(F2,ML): General Purpose Input Routine 2#B,B$ <#A$="" *F#ML," ");ML+1,(8));(&87);:ON:KCL P#B$=:B=(B$): B=13 dfc Z# B=127 A$="" DPc (d# B=127 A$=A$,(A$)-1):B$;:DPc $n# (A$)=ML B<32 B>126 dRc *x# F2=0 B=32 (B>=48 B<=57)29 d|H  K=29 ICOL -1 PAUSE K,IROW);S$(I);" ":K  MOVE W$(J) UP, W$(I) DOWN  K=JROW IROW+1 -1  PAUSE % JCOL,K);" ",(S$(J))) $ JCOL,K-1);S$(J) . K 8 K=IROW JROW-1 B PAUSE %L ICOL,K);" ",(S$(I))) V ICOL,K+1);S$(I):K ` SHUNT STRINGS BACK j K=JCOL 29 t PAUSE ~ K,IROW);" ";S$(J):K  ICOL>29 tpI  K=ICOL 29 PAUSE  K,JROW);" ";S$(I):K ? T$=W$(I):W$(I)=W$(J):W$(J)=T$:T$=S$(I):S$(I)=S$(J):S$(J)=T$ WAIT( d\c #7:DPc #B$;:A$=A$+B$:DPc #OFF # #YESORNO #B$ $GPI(0,3) $B$=A$,1) $Y%=-1 "$ B$="Y" B$="y" Y%=1 ,$ B$="N" B$="n" Y%=0 S$ General Purpose Input Routine 2#B,B$ <#A$="" *F#ML," ");ML+1,(8));(&87);:ON:KCL P#B$=:B=(B$): B=13 dfc Z# B=127 A$="" DPc (d# B=127 A$=A$,(A$)-1):B$;:DPc $n# (A$)=ML B<32 B>126 dRc *x# F2=0 B=32 (B>=48 B<=57)1)  PAUSE  WAIT(0.1) ' XHEADER b:10,2);"ALPHABETIC SORT"  INSTRUCTIONS .0,19);"Press RETURN after entering each" "word." ('"Press RETURN again to sort them."   WIPEBOTTOM *K 4 K=19 22 >0,K);39," ") HK  ERROR(E$) WIPEBOTTOM 18-(E$)/2,20);E$ SPACE WIPEBOTTOM INSTRUCTIONS  @DBL(X$,X,Y) JX-1,Y);(141);X$ TX-1,Y+1);(141);X$  WAIT(X)  Z Z=  -Z>X*100   SPACE 3 3,22)YESORNO r Y%=0 tDC | Y%<0 DTA DISPLAY SHIFT SLOWSORT SPACE tDC !  <>17 :" in line ";:  5,9); "Do you want to go on to" %" the next program (Y/N)? "; YESORNO: Y%<0 tNC  Y%=0 Dd@  "POEM" VALIDATE(A$)  B,E,K ( A$="" ERROR("Blank Word"):toD ( A$,1)=" " A$=A$,(A$)-1):d|C ( A$,1)=" " A$=A$,(A$)-1):TPD E= $ K=1 (A$) .B=(A$,K,1)) 8 B>64 B<91 DVD B B>96 B<123 DVD LE= ALPHA/Alphabetic Sort Y Program by Andrew Chapman & Jerry Temple-Fry (NETHERHALL SCHOOL) & Richard G Warner  Version 5 - October 1981 / For BBC Model A Microcomputer 16K Minimum ( Tr@ S27: M%=0 5,16);"Press the STOP button"'" on your tape recorder":SPACE <: T`C F WORD$(10),W$(10),S$(10) dTITLEPAGE:HEADER +n0,7);"Put in up to ten single words." *x"Words should have no more than nine" "letters." /'"It doesn't matter whether you use UPPER" "or lo VK >` E= ERROR("Word has non-alphabetic characters"):toD jNW=NW+1:WORD$(NW)=A$  FASTSORT T$ CONVERTTOUC  NW=1 TSE  I=1 NW-1  J=I+1 NW O W$(I)>W$(J) T$=W$(I):W$(I)=W$(J):W$(J)=T$:T$=S$(I):S$(I)=S$(J):S$(J)=T$ J,I  DISPLAY &:0,1)"Unsorted";30,1);"Sorted" ( I=1 NW 20,2*I+1);WORD$(I) <I w xCONVERTTOUC  I=1 NW A$="": J=1 (WORD$(I)) B=(WORD$(I),J,1))  B>96 B=B-32 A$=A$+(B):J W$(I)=A$ S$wer case letters." ,'"When you have entered the words, the" "computer will sort them." SPACE HEADER:INSTRUCTIONS NW=0: Number of words ( NW<5 0,4+2*NW); 18,2*NW-6);  NW=9 (8); (;NW+1;" ";:GPI(0,9): A$="" TbA VALIDATE(A$): NW<10 d\@ WIPEBOTTOM 50,22);"Press RETURN to start the sort.... "; X$=: (X$)<>13 TXA " NW=0 Dd@ ,DISPLAY 6FASTSORT @ I=1 NW J30,2*I+1);S$(I):I ;T0,22);"Would you like to see that slowly? ";: just as you"'" would write it."' K" However, multiplication and"'" division take precedence over" ?" addition and subtraction, so that"'" for example :"' 4(10)"3/4+5*7.1-6/.2"''(8)"is interpreted as"' (7)"(3/4)+(5*7.1)-(6/.2)" .SPACE 8SCREEN OB''" Round brackets ( ) are"'" available to override the order of" L" execution."'' LV" Anything in brackets is worked"'" out before anything else."'' B`" The innermost brackets are"'" evaluated f @DBL(X$,X,Y) JX-1,Y);(141);X$ TX-1,Y+1);(141);X$  WAIT(X)  Z Z=  -Z>X*100   SPACE 8 3,22);"Press the SPACE BAR to continue";:KCL:OFF 0 =" " k l TITLEPAGE v :DBL("CALCULATOR",13,10)  OFF:I%=(500)  `"KCL j" (0)=-1 " "OFF "23;8202;0;0;0;: "ON #23;29194;0;0;0;: #YN #Y%=-1 $X%=: X%=13 Y%>=0 !$X%=X%&DF:X%<>78X%<>89TDd $Y%=1:X%=78Y%=0 "$X%;8;:TDd irst."' SPACE SCREEN N'" In this program the red"'" user-definable keys have special" !" functions, which are:-"' A" f0 - STORE"'" f1 - RECALL"'" f2 - CLEAR"'" f3 - %" E" f4 - SQR (square root)"'" f5 - SIN (sine of radian angle)" S" f6 - COS (cosine of radian angle)"'" f7 - TAN (tangent of radian angle)" >" f8 - INV (for inverse"'13)"trigonometric functions)" #" f9 - ^ (raise to power)" SPACE SCREEN O '" The calculator has teE 8 3,22);"Press the SPACE BAR to continue";:KCL:OFF 0 =" " k l TITLEPAGE v :DBL("CALCULATOR",13,10)  OFF:I%=(500)  `"KCL j" (0)=-1 " "OFF "23;8202;0;0;0;: "ON #23;29194;0;0;0;: #YN #Y%=-1 $X%=: X%=13 Y%>=0 !$X%=X%&DF:X%<>78X%<>89TDd $Y%=1:X%=78Y%=0 "$X%;8;:TDd n"'" ""memories"", numbered from 0 to 9" 9" in each of which can be stored a"'" number."'' P" To store the result of a"'" calculation in a memory, just" P(" enter the expression and then"'" press key f0 (STORE) followed by" q2" a number from 0 to 9."'''" To recall the contents of a"'" memory, press key f1 ( RECALL )" ,<" followed by a number from 0 to 9." ZSPACE c XSCREEN l26: #vDBL("Calculator Program",10,1) VDU28,0,24,39,3 ):F%(0)=(B$):f%(0)=(B$) :IN%=1:V%=:TlA   =17 tDC * ER$="" 'ER$; 4tPA 26: 5,9); "Do you want to go on to" %" the next program (Y/N)? "; YN: Y%<0 tNC  Y%=0 dH@  "ALPHA" GETLINE &KEY%=: KEY%=130 KEY%=13 dOG  KEY%<>127 TTE  IN%=0 tpD IN%=IN%-1 J%=1F%(IN%):(&7F);: B$=B$,(B$)-f%(IN%)):tpD " (B$)>69 KEY%<32 7:tpD KEY$=(KEY%):key$=KEY$ F(I%=";:=?[]{}`_",KEY$): I%>0 KEY$="+*-/()()--=MEM$+" "+Y$ V =X ` ER$="":=("0+"+Z$) INITIALISE 0 FUNC$(10),func$(10),STORE(9),F%(79),f%(79) N" STORE "," RECALL "," CLEAR ","%","SQR ","SIN ","COS ","TAN ","INV ","^" #"/100","SQR","SIN","COS","TAN" I%=110: FUNC$(I%): "I%=110:func$(I%)=(128+I%): I%=48: func$(I%): func$(10)="^" MEM$="" P*KEY 0 "|!|@" Z*KEY 1 "|!|A" d*KEY 2 "|!|B" n*KEY 3 "|!|C" x*KEY 4 "|!|D" *KEY 5 "|!|E" *KEY 6 "|!|F" *KEY 7 "|!|G" *KEY 8 "|!|H" *KEY 9 "|!|I"  p",I%,1):key$=KEY$ @2 KEY%>127 KEY%=KEY%-127:KEY$=FUNC$(KEY%):key$=func$(KEY%) #<F%(IN%)=(KEY$):f%(IN%)=(key$) %FIN%=IN%+1:KEY$;:B$=B$+key$:tpD  ݤEVAL(Z$)  X,Y%,Z%  (Z$)=32 Z$=Z$,2):ddG  Z$="" =0 FLAG%=0 4 Check for INV >Z%=Z$,&89): Z%=0 tXH H Check for SIN @R Z$,Z%+1,3)=func$(6) Z$=Z$,Z%-1)+" ASN"+Z$,Z%+4):T~H \ Check for COS @f Z$,Z%+1,3)=func$(7) Z$=Z$,Z%-1)+" ACS"+Z$,Z%+4):T~H p Check for TAN @z Z$,Z%+1,3)=func$(8) Z$=ZINSTRUCTIONS zSCREEN Q'" This program converts your"'" computer into a simple calculator."' .''" The program makes available the" *" keys 1 - 0 and the full stop key" " to enter numbers."'' *" The keystrokes +, -, *, / are" @" used for the operations of"'" addition, subtraction," 8" multiplication and division"'" respectively." SPACE SCREEN N'" The calculator operates in"'" algebraic mode, that is, you can" A" type in an expression$,Z%-1)+" ATN"+Z$,Z%+4):T~H &ER$="INV without SIN,COS or TAN":  Check for RECALL Z%=Z$,&82): Z%=0 d|H *ER$="Number after RECALL out of range" 'Y%=(Z$,Z%+1,1)): Y%<0 Y%>9 X=STORE(Y%) %Z$=Z$,Z%-1)+(X)+Z$,Z%+2):tbH  Check for STORE  Z%=Z$,&81): Z%=0 D`I ( ER$="Invalid expression after STORE" % Y%=(Z$,Z%+1)): Y%<0 Y%>9 )$ ER$="Invalid expression before STORE" . X=(Z$,Z%-1)) )8 STORE(Y%)=X:Y$=(Y%): MEM$="" DLI B MEM$,Y$)>0 DVI L MEM$ SKETCH/Sketch Program T Program by David Tee & Jerry Temple-Fry (NETHERHALL SCHOOL) & Richard G Warner % Version 1.5 - 15th October 1981 / For BBC Model A Microcomputer 16K Minimum ( Tr@ S27: M%=0 5,16);"Press the STOP button"'" on your tape recorder":SPACE <: T`C dTITLEPAGE:INSTRUCTIONS n5:SETUP X=600:Y=512:Z=5 MX=1220:MY=1020:S=10  K=(0):K=K-128: K<=0 dtA @ K TvA,TvA,TvA,D@A,DTA,dtA,dtA,df@,dp@,dz@,TDA  X>10 X=X-S 3,22);"Press the SPACE BAR to continue";:KCL 0 =" " k l TITLEPAGE /v :DBL("Sketch",12,8):DBL("Drawing",11,11)  OFF:I%=(500)  `"KCL j" (0)>"" Djb " "OFF "23;8202;0;0;0;: #YN #Y%=-1 $X%=: X%=13 Y%>=0 !$X%=X%&DF:X%<>78X%<>89TDd $Y%=1:X%=78Y%=0 "$X%;8;:TDd TNA  X10 Y=Y-S TNA  Y17 :" in line ";:  5,9); "Do you want to go on to" %" the next program (Y/N)? "; YN: Y%=0 Dd@  "CALC" "" LSETUP V*KEY 0 "|!|A" `*KEY 1 "|!|B" j*KEY 2 "|!|C" t*KEY 4 "|!|D" ~*KEY 9 "|!|E"  CALCULATOR < Program by Tim Dobson (ACORNSOFT) and Richard G Warner / For BBC Model A Microcomputer 16K Minimum ( Tr@ S27: M%=0 5,16);"Press the STOP button"'" on your tape recorder":SPACE <: T`C dTITLEPAGE nINITIALISE xINSTRUCTIONS SCREEN &7,4);"Enter your expression now" V%=0:B$="":IN%=0:@%=0 4,26: MEM$>"" 12,20);"Memories in use"''MEM$ 628,0,19,39,5:ON @0,V%);" ] ";B$; JGETLINE:OFF T KEY%=130 dH@ ^B=EVAL(B$) #B$=(B *FX 4 1 5,19,3,6,0,0,0,19,2,3,0,0,0  INSTRUCTIONS :''' +4" This program is like the popular" +>" game 'ETCHA SKETCH'. You use the" &H" four cursor control keys to" 'R" draw pictures on the screen." *f'" The RED keys at the top of the" )p" keyboard control the colour of" 'z" of the line (f0-f2), and the" #" move (f4) and erase (f9)" " facilities.":SPACE  @DBL(X$,X,Y) JX-1,Y);(141);X$ TX-1,Y+1);(141);X$   SPACE 3 ge time taken: "; + TESTS=0 ;0; ;(TTIM/TESTS)/100; " seconds "  ݤGENE: CHARACTER GENERATOR &* PART T~\,D\\,tN\,d@\,d^\ 4** PART 1 - U/C LETTERS >=(26)+64 *H** PART 2 - U/C LETTERS + U/C SYMBOLS \R=(16): R=16 =96 f R<12 =R+32 p=(4)+59 (** PART 3 - U/C LETTERS,L/C SYMBOLS  CHAR=2 =45:CE -  (3)=1 T~\ R=(18): R=18 =64  R=17 =95 =R+43 *** PART 4 - U/C LETTERS + ANY SYMBOLS  CHAR=4 =79: FORCE O  (3) T~\,D\\,tX\ T** PART 5 - FULL KBD  CHAR=7 =108:FORCE l  (3)>1 dJ\ =96+(26) K END OF FNGENE @DBL(X$,X,Y) JX-1,Y);(141);X$ TX-1,Y+1);(141);X$  WAIT(X)  Z Z=  -Z>X*100   SPACE 3 3,22);"Press the SPACE BAR to continue";:KCL 0 =" " k l TITLEPAGE 5v :DBL("KEYBOARD",14,8):DBL("FAMILIARITY",13,11)  OFF:N%=(500)  `"KCL j" (0)=-1 " "OFF "23;8202;0;0;0;: "ON #23;29194;0;0;0;: 0(#GPI(F2,ML): General Purpose Input Routine 2#B,B$ <#A$="" *F#ML," ");ML+1,(8));(&87);:ON:KCL P#B$=:B=(B$): B=13 dfc Z# B=127 A$="" DPc )d# B=127 A$=A$,(A$)-1):B$;:DPc $n# (A$)=ML B<32 B>126 dRc *x# F2=0 B=32 (B>=48 B<=57) d\c #7:DPc #B$;:A$=A$+B$:DPc #OFF # #YESORNO #B$ $GPI(0,3) $B$=A$,1) $Y%=-1 "$ B$="Y" B$="y" Y%=1 ,$ B$="N" B$="n" Y%=0 S$ I$="1")(E$="1"I$="I")) TVM  WAIT(2):KBD 4 0,18)"You have confused the letter ""I"" with"  "the digit" """1""."  FL1:FLI:SPACE: 0 ((E$="_"I$="-")(E$="-"I$="_")) DHM  WAIT(2):KBD - 0,18)"You have confused the minus sign" ,* "(below =), with the underscore symbol" 4 "(below `)." 3> 29,4);FL$;"_";ST$;24,3);FL$;"-";ST$:SPACE: H X=1 R IA>=K(X) X=X+1:DRM \ SHCON=(EA-IA=D(X)) f TYPE=T(X)  "PART" SPECIFIC CHECKS % PART d@M,d^M,TPN,DBN,tHN " T$=(&85)+B$ :7,2);  I=0 9:R$;B$;: C$;B$;2,3);C$;B$;  I=1 9:ST$;I;: " 0 - ";B$;" ";B$;X$;X$ " ";G$;L$;C$; &"Q W E R T Y U I O P @ ";B$;" _"; X$;X$ 6G$;" ";K$;ST$;K$;C$;"A S D F G H J K L ; : ";B$; Y$;K$ " G$;" ";K$;ST$;L$;ST$;"Z";C$; "X C V B N M , . /"; G$;L$;G$;K$;Y$ 7(" ";C$;(&9D);(&83);" Space Bar ";(&9C) P PART=0 tsT Z" ";: I=1 3 !d LED(I,PART)=1 R$; W$; n"o";::W$ !x'" ^ ^ ^ - Lights: o = OFF" 1YPE=2 T|O: WRONG LETTER 0 0,15)"That is not a capital letter.":dXN PART 2 * TYPE=2 TYPE=4 T|O: WRONG LETTER 7 0,15)"That is not an upper case character.":dXN ** PART 3  TYPE=2 TYPE=3 T|O A$0,15)"That is not a capital letter or"'"lower case symbol." .dXN 'B** PART 4:CHECK FOR CASE CONFUSION L TYPE=1 dJM V SHCON=0 T|O ` TYPE=4 tfN /j0,15)"You confused upper and lower case." $t"Use"SH$"to obtain the top set" ~"of symbols.":dXN #** 7);R$;"o";W$;"= ON" 15,13);"PART ";PART'  FL0 22,3);FL$"0"ST$;: FL1 4,3);FL$"1"ST$;: FLO 21,4);FL$"O"ST$;: FLL 22,5);FL$"L"ST$;: FLI 19,4);FL$"I"ST$;: |CL: CAPS LOCK 1,5);FL$  SL: SHIFT LOCK 1,6);FL$; C DSH: SHIFT N4,6);FL$;  ESC: ESCAPE 1,3);FL$   XCLEAR bK l K=13 22:0,K);(40): v0,13);  PUTSCORE 15,1)"Score so far: ";RIGHT;" out of ";TESTS !3,3)"AveraPART 5:CHECK CASE CONFUSION  SHCON=0 T|O 30,15)"You have not selected the correct case" -"for your response. The top symbols and" 8"capital letters are produced when you"'"use"SH$"." ? PART=5 "Check that the red lights are"'"all off.":TJO -'"Make sure that the red lights"'"are "; 1 X=1 3: LED(X,PART)=1 "ON" ; "OFF";  X<3 ","; X:"." SPACE: '<6,15)"THAT IS INCORRECT":SPACE: KBD I,K$,L$,B$,X$,Y$ :K$=(&FC):L$=K$+K$:B$=(&FF):Y$=(&95)+K$:Xf the keys will" "also be tested.":DlG  PART3 )"This part will examine the symbols" '("on the bottom of the keys, along" !2"with the capital letters."' 5<"Release"SL$"by pressing the"'FL$;CL$;ST$;"key." FCL:SPACE:CLEAR 1P"Check that the lights are correctly"'"lit." )Z'"Symbols on top of the keys cannot" d"be obtained now." nDlG x PART 4 "Ensure that"CL$"is still" )"active by checking the red lights." 4'"If the display is wrong, press the"'CL$"key." SPACE:MPARE fCHAR:WAIT(1) p:PUTSCORE !10,10);"End of Part ";PART' +"Press ""A"" to try this test again."' " PART=5 "Otherwise";:d@H 2"If you want to move on to the next"'"part,"; " press the RETURN key." !X$=: X$="A" X$="a" dhC  X$<> (13) dJH PART=PART+1: PART<6 dhC dtA COMPARE 5 COMPARE USER INPUT (I$) WITH EXPECTED INPUT(E$)  DBL("You typed "+I$,9,11)  E$=I$ RIGHT=RIGHT+1: PUTSCORE  E$<>I$ T\L  7,15)"THAT IS CORRECT" * CLEAR )"This time, capital letters and all" *"the symbols will be used. To obtain" *"a symbol on the top of a key, press" ."the key and";FL$;SH$;ST$;"key together." C"For example, to obtain ""$"", press"'FL$;SH$;ST$;"and ""4""." SH:DlG  PART5 $"Press the"CL$"key. The lights" "should all be off now." 7"You are no longer locked into capital"'"letters." SPACE:CLEAR ("Small letters are now available." )'"Capital letters are produced when" 0""you press a letter ke6,17)"You took ";TIM/100;" seconds."  WAIT(1.5):  ** USER MADE AN ERROR & IA=(I$):EA=(E$) A0 (((E$="O"E$="o")I$="0")(E$="0"(I$="O"I$="o"))) t@L : CONFUSED 0 WITH O OR o D WAIT(2):KBD N E$="0" E$=I$ 7X 0,18)"You have confused the letter """E$""" with" b "the digit zero, ""0""." l FL0:FLO:SPACE: 0 ((E$="1"I$="l")(E$="l"I$="1")) ddL  WAIT(2):KBD 4 0,15)"You have confused lower case ""L"" with"  "the digit ""1""."  FL1:FLL:SPACE: 0 ((E$="I"y and"SH$'"together." 0,'"For example, to get";C$;"h";W$;"press H." 36"To get";C$;"H";W$;"press"FL$;SH$;ST$;"and H." ;SH lSPACE:CLEAR (vDBL("To begin the test ....",10,15) SPACE  PLAY GAME  CHAR=1 10 :PUTSCORE 3 5,5)"Part ";PART;" Question Number ";CHAR +DBL("Find",12,8):E$=(GENE):WAIT(.7)  KCL:DBL(E$,17,8):STIM= 4I$=(0): I$="" TtH !>ETIM=:IA=(I$): IA<33 TtH %H IA>122 (IA>90 IA<95) TtH -RTIM=ETIM-STIM:TTIM=TTIM+TIM:TESTS=TESTS+1 \CO" KBD/Keyboard Familiarisation S Program by Andrew Chapman & Rod Mulvey (NETHERHALL SCHOOL) & Richard G Warner  Version 5 - October 1981 / For BBC Model A Microcomputer 16K Minimum ( Tr@ S27: M%=0 5,16);"Press the STOP button"'" on your tape recorder":SPACE P:PART=0: T`C dTITLEPAGE 0i LED(3,5):STATUS OF LEDS IN EACH PROG PART ,n X=1 5: LED(1,X),LED(2,X),LED(3,X): #x 0,0,1,0,0,1,0,1,0,0,1,0,0,0,0 -FL$=(&88):ST$=(&89):R$=(&81):W$=(&87) C$=(&83):'"press the ESCAPE key if you want" &0"to move on to the next program." :PART=0:SEL=0:ON !X0,20)"Your choice (1-5)? "; bA$=: (A$)=13 thB lA=(A$)-48: A<0 A=A+16 v A<1 A>5 DXB (A+48)  SEL>0 2,2*SEL+3);ST$ 2,2*A+3);FL$;A;ST$ SEL=A:DXB  SEL=0 DXB PART=SEL:OFF:dhC " : <>17 :" in line ";: * PART>0 dtA  5,9); "Do you want to go on to" %" the next program (Y/N)? "; YESORNO: Y%<0 tNC  Y%=0 :Dd@  G$=(&93) CL$=C$+"CAPS LOCK"+W$ SL$=C$+"SHIFT LOCK"+W$ SH$=C$+"SHIFT"+W$ PART=1 K(9),T(9),D(9) X=1 9: K(X),T(X),D(X): 7 THESE ARRAYS ARE USED TO DECIDE KEY TYPES (K & T) 9 & WHETHER ERRORS COULD BE CAUSED BY SHIFT CONFUSION 44,4,16 48,3,16  60,3,-16  64,4,-16  65,3,0  91,2,32  95,3,1 " 96,4,1 ' 123,1,-32 ,:''' *6"This program helps you to find your" )@"way around the keyboard and to use" $J"the"CL$","SL$"and"SH$'"keys."' *T"You w"SKETCH" KBD:TESTS=0:TTIM=0:RIGHT=0 % PART DLD,tpD,TTE,DxE,d\E L PART 1 %`"Check the red indicator lights" %j"are lit correctly. They should" t"be as shown above." )~'"If they are not, press the"FL$;SL$ '"key and check the display again." SL:DlG  PART 2 &"The red indicator lights should" %"be as shown above. This is the" 9"same as part 1. If not press the"'FL$;SL$;ST$"key." SL:SPACE:CLEAR )'"When you play the game this time," *"the symbols on top oill be shown a character which" :^"you will have to find and press on"'"the keyboard."' -h"The computer will time you and display" -r"your score along with the average time" -|"that you take to find each key.":SPACE PART=0:KBD:ESC +0,14)"This represents the keyboard."' 4"Pressing the";FL$;"ESCAPE";ST$;"key will take" %"you to the end of the program." SPACE:PART=1:dhC &:'''"You now have a choice of :"  I=1 5 $3,2*I+3);I;" - Repeat part ";I  11,15)"or" (&%" the next program (Y/N)? "; YESORNO: Y%<0 tNC  Y%=0 :Dd@  "KEYBD" XݤNUMERR(V) bGPI(1,6) lA=(A$): AX*100   SPACE 3 3,22);"Press the SPACE BAR to continue";:KCL 0 =" " k l TITLEPAGE v :DBL("Index",15,10)  OFF:Y%=(500)  `"KCL j" (0)>"" Djb " "OFF "23;8202;0;0;0;: "ON #23;29194;0;0;0;: 0(#GPI(F2,ML): General Purpose Input Routine 2#B,B$ <#A$="" *F#ML," ");ML+1,(8));(&87);:ON:KCL P#B$=:B=(B$): B=13 dfc Z# B=127 A$="" DPc (d# B=127 A$=A$,(A$)-1):B$;:DPc $n# (A$)=ML B<32 B>126 dRc *x# F2=0 B=32 (B>=48 B<=57) d\c # B<127 B>32 d\c #(7);:DPc #B$;:A$=A$+B$:DPc #OFF # #YESORNO #B$ $GPI(0,3) $B$=A$,1) $Y%=-1 "$ B$="Y" B$="y" Y%=1 ,$ B$="N" B$="n" Y%=0 S$ =A$,(A$)-1):B$;:DPc $n# (A$)=ML B<32 B>126 dRc *x# F2=0 B=32 (B>=48 B<=57) d\c # B<127 B>32 d\c #(7);:DPc #B$;:A$=A$+B$:DPc #OFF # #YESORNO #B$ $GPI(0,3) $B$=A$,1) $Y%=-1 "$ B$="Y" B$="y" FONEDATA.DAT" *REN FONEDATA.BAK=FONEDATA.DAT +#0  +E%="FONEDATA.DAT" *+#E%,X 4+I%=1 X >+#E%,NAME$(I%),PHONE$(I%) H+ R+#E% \+ IIZE AME$(! ]`]]] ] ^ '^ D^f^ ^^ ^ ^ _8_ Q_ s_ ___ %=-1 "$ B$="Y" B$="y" Y%=1 ,$ B$="N" B$="n" Y%=0 S$ ' LOAD 'E%= "FONEDATA.DAT" $' E%=0 .'#E%,X 8' I%=1 X B'#E%,NAME$(I%),PHONE$(I%) L'PACK(I%) V' `'#E% j' * SAVE )+ "FONEDATA.BAK" *ERA FONEDATA.BAK 7 + "d" ("also give you an idea of what the" "program does." "SPACE ,:'" The programs are:"' 6COL=1 @ X$: X$="ZZZZ" tFA J(128+COL);" ";X$ TCOL=COL+1: COL=8 COL=1 Y COL=4 COL=5 ^D@A 6h WELCOME,INDEX,KEYBD,SKETCH,CALC,ALPHA,POEM,PHONE Dr BATBALL,MUSIC,CLOCK,PHOTO,PATTERN,KINGDOM,BIORTHM,MESSAGE,ZZZZ L "Some of these names are shorter"'"than those on the cassette version" SPACE :''' &" Before continuing to the next" &"program, please enter the time." ("Use the 24 hour clock - e.g. 3.30" &"in the afternoon is entered as:" 12,11);"HOURS: 15" 10,13);"MINUTES: 30" 10,15);"SECONDS: 0" SPACE ):DBL("Please enter the time -",3,8) 12,11);"HOURS: ";  NUMERR(24) d~A H=A 10,13);"MINUTES: ";  NUMERR(60) TRB M=A &10,15);"SECONDS: "; 0 NUMERR(60) TfB S=A :=100*((H*60+M)*60+S):T%=1 NSPACE:tDC  <>17 :" in line ";: * T%=0 tPA  5,9); "Do you want to go on to" ! INDEX/Welcome Package Index C Program by Richard G Warner of Mills and Allen Communications  Version 1 - October 1981 / For BBC Model A Microcomputer 16K Minimum # Minor change for disc 22/6/82  A.R.Gordon,Acorn ( Tr@ 2 7 <: T`C FT%=0 dTITLEPAGE n*FX 4 1 1:''''''" In this package you will find 16" )"programs. The Welcome page was the" %"first and this is the second."' *" Each program is identified by its" ,"program name. The program name shoul :'' *" In this program you will be able" +" to enter up to ";SIZE;" names and" " telephone numbers."' $" You can sort these entries" (" alphabetically or numerically." (" You can also search by name or" " number."' %" At the start of the program" ' " there is a menu. To select an" '" option, you will need to type" &" the number selected followed" (" by RETURN.":SPACE c XTITLE(E$) b E$>"" TITLE$=E$ l:40,"*") v20-(TITLE$)K  @DBL(X$,X,Y) JX-1,Y);(141);X$ TX-1,Y+1);(141);X$  WAIT(X)  Z Z=  -Z>X*100   SPACE 3 3,22);"Press the SPACE BAR to continue";:KCL 0 =" " k l TITLEPAGE 2v :DBL("Telephone",12,8):DBL("Numbers",13,11)  OFF:I%=(500)  `"KCL j" (0)>"" Djb " "OFF "23;8202;0;0;0;: "ON #23;29194;0;0;0;: 0(#GPI(F2,ML): General Purpose Input Routine 2#B,B$ <#A$="" *F#ML," ");ML+1,(8));(&87);:ON:KCL P#B$=:B=(B$):/2,1);TITLE$ 40,"*")  PACK(I) T$=""  J=1 (NAME$(I)) X$=NAME$(I),J,1)  (X$)>96 X$=((X$)-32) T$=T$+X$ J ACTNM$(I)=T$ T$="" * LP=1 (PHONE$(I)) !4 PHONE$(I),LP,1)=" " DH\ >T$=T$+PHONE$(I),LP,1) HLP RPHONE(I)=(T$)  +PRINT(I): PRINTS Ith NAME AND NUMBER L  PGCNT=8 SPACE:PGCNT=0  PGCNT=0 TITLE("") L=PGCNT*2+4 ,1,L);I;4,L);NAME$(I);28,L);PHONE$(I) PGCNT=PGCNT+1 FOUND=1  PRINTALL PGCNT=0: X=0 B=13 dfc Z# B=127 A$="" DPc (d# B=127 A$=A$,(A$)-1):B$;:DPc $n# (A$)=ML B<32 B>126 dRc *x# F2=0 B=32 (B>=48 B<=57) d\c #7:DPc #B$;:A$=A$+B$:DPc #OFF # #YESORNO #B$ $GPI(0,3) $B$=A$,1) $Y%=-1 "$ B$="Y" B$="y" Y%=1 ,$ B$="N" B$="n" Y%=0 S$ ' LOAD 'E%= "FONEDATA.DAT" $' E%=0 .'#E%,X 8' I%=1 X B'#E%,NAME$(I%),PHONE$(I%) L'PACK(I%) V' `'#E% j' * SAVE )+ "FONEDATA.BAK" *ERA FONEDATA.BAK 7 + " TZ]  I=1 X PRINT(I) :DB] TITLE("") o$''"There is no data in the memory. Please"''"type some in or press the 'ESC' key"''"to leave the program." BSPACE K LCHECKMATCH(E$) V FOUND=1 Dt] `TITLE("") Cj0,10)"There is no match for the "E$'"that you have typed in." tSPACE  RETURN B7,21);"To return to the MENU";7,22);"press the RETURN key."  xERROR K 00,20);"There is no entry with this index." SPACE  K=20 22 0,K);(39) X):tRS B10,10);"There is no room";10,11);"to input entries.":SPACE  ,DISPLAY: DISPLAYS NAMES AND PHONE NOS TITLE$="DISPLAY LIST" PRINTALL O (PEDIT:T EDIT NAME AND/OR PHONE NO. ZTITLE("EDIT DATA") Bd0,5)"Type in the index number of the name"'"to be edited. "; nGPI(1,3):A=(A$): A=0 x A>X ERROR:DdT !TITLE(""):"Name: ";NAME$(A) '"Number: ";PHONE$(A) p''"Type in the new name and press the "'"RETURN key. If the name is correct,"'"just press the RETUr the first few letters"'" of a name"' :" B) to search for some letters within"'" a name"' #"Type 'A' or 'B': ";:GPI(0,1)  A$="" $ A$="A" A$="a" FLAG=1:TLW % A$="B" A$="b" FLAG=0 trV = ''"Type in the letters that you want to"'"search for: "; &GPI(0,20):L=(A$):PGCNT=0:FOUND=0 !  FLAG=0 MIDSEA LEFTSEA *CHECKMATCH("letters"):trV o *pNUMSEA: NUMERIC SORT FOR PHONE NOS. zTITLE("NUMERIC SEARCH") "PGCNT=0:RETURN:FOUND=0:0,3) ''"If you tyRN key."' $GPI(0,23): A$>"" NAME$(A)=A$ }''"Now type in the new phone number and"'"press the RETURN key. If the number is"'"correct, just press the RETURN key."' %GPI(1,12): A$>"" PHONE$(A)=A$ PACK(A)  ALFSRT: DOES ALPHASORT "L=1:R=X:S=0 , L>=R D|U 6I=L:J=R:X$=ACTNM$((L+R) 2) @ ACTNM$(I)=R DDV I=L:J=R:XX=PHONE((L+R) 2)  PHONE(I)17 :" in line ";:  5,9); "Do you want to go on to" %" the next program (Y/N)? "; YESORNO: Y%<0 tNC  Y%=0 dH@  "BATBALL" "" LEFTSEA  X=0  I=1 X !" NAME$(I),L)=A$ PRINT(I) , g hMIDSEA r X=0 | I=1 X  J=1 (NAME$(I))-L+1 ) NAME$(I)* TELEPHONE/Telephone Numbers DataBase X Program by David Tee and Jerry Temple-Fry (NETHERHALL SCHOOL) and Richard G Warner  Version 3 - October 1981 / For BBC Model A Microcomputer 16K Minimum ( Tr@ 2 7 <: T`C nSIZE=100: MAX ENTRIES 7 NAME$(SIZE),PHONE$(SIZE),ACTNM$(SIZE),PHONE(SIZE)  SL(12),SR(12) TITLEPAGE:INFO A$=32," ") LOAD TITLE("MENU") " 1 - Display List" " 2 - Input New Entry" " 3 - Change an Entry" !" 4 - Sort Alphabe,J,L)=A$ PRINT(I):tdP J I  $SWAP .W$=NAME$(I):V$=PHONE$(I):NAME$(I)=NAME$(J):PHONE$(I)=PHONE$(J):NAME$(J)=W$:PHONE$(J)=V$:W=PHONE(I):PHONE(I)=PHONE(J):PHONE(J)=W:W$=ACTNM$(I):ACTNM$(I)=ACTNM$(J):ACTNM$(J)=W$  -INPUT: GETS NAME & PHONE NO. FROM USER TITLE("INPUT NEW DATA")  X=SIZE dbS RETURN *0,7);"Type in the name."'';X+1;". "; GPI(0,23): A$="" dkS X=X+1:NAME$(X)=A$ 0''"Now type in the phone number."'';X;". "; *GPI(1,12):PHONE$(X)=A$:PACK(tically" " 5 - Sort Numerically" " 6 - Search Using Name" !" 7 - Search Using Number" " 8 - Erase All Entries" !" 9 - Load data from disk" " 0 - Save data to disk" "SEL=-1 ,,3,23);"Type in the number you want: "; 6A$=: (A$)=13 D|A @A=(A$)-48: A<0 A=A+16 J A<0 A>9 TvA T(A+48) ,^ SEL>-1 2,SEL+3-10*(SEL=0));(&89); %h2,A+3-10*(A=0));(&88);A;(&89) rSEL=A:TlA | SEL=-1 TlA ? SEL+1 dyA,d~A,THB,TRB,T\B,TfB,TpB,TzB,DDB,mped addressed" T"envelope." SPACE ):DBL(&82+"That's All Folks",12,10) tdA  3 : @DBL(X$,X,Y) JX-1,Y);(141);X$ TX-1,Y+1);(141);X$  WAIT(X)  Z Z=  -Z>X*100   SPACE 3 3,22);"Press the SPACE BAR to continue";:KCL 0 =" " k l TITLEPAGE v :DBL("MESSAGE",15,10)  OFF:I%=(500)  `"KCL j" (0)>"" Djb " "OFF "23;8202;0;0;0;: "ON #23;29194;0;0;0;: >DBL(o=>WAIT(=>SPACE=?TITLEPAGE MESSAGE ! Program by Richard G Warner  Version 3 - October 1981 / For BBC Model A Microcomputer 16K Minimum < 7: T`C dTITLEPAGE :''' ," Most of those programs were simple" "examples of their kind." ('" For details of other programs" )"from the BBC software library, and" -"details of other parts of the Computer" $"Literacy Project, write to:"'' (," BBC COMPUTER LITERACY PROJECT" 6" P.O. BOX 7" @" LONDON W3 6XJ" +J'"enclosing a large sta+" and "+W2$((7))  PRAND2 "ZY%=(9):Z%=(9): Y%=Z% DZT (nA$="You can "+W3$(Y%)+" or "+W3$(Z%)  |ENDVERSE(A,B,C,D) I=C%:CLEAR:C%=I ENDLINE(A,1) ENDLINE(B,2) ENDLINE(C,3) ENDLINE(D,4) !Y%=(100): Y%<0 Y%=0:d_U  Y%<>13 dBU  ENDLINE(S,L) ENDREAD(S,L) " ";C$(C%);  I=1 (L$) L$,I,1);:WAIT(.01) $ L$,I,1)="." WAIT(.6):" "; :' C ENDREAD(S,L) : I=1 S*4+L-4:L$:    ݤVNUM(A,B,C,D) =A*64+B*16+C*4+D$) ) A$,1)=E$ A$,1)=((E$)+32) = = ? @DBL(X$,X,Y) JX-1,Y);(141);X$ TX-1,Y+1);(141);X$  WAIT(X)  Z Z=  -Z>X*100   SPACE 3 3,22);"Press the SPACE BAR to continue";:KCL 0 =" " k l TITLEPAGE Kv :DBL("Now press RETURN....",8,8):DBL("a poem by ROGER McGOUGH",6,14)  `"KCL j" (0)=-1 " "OFF "23;8202;0;0;0;: "ON #23;29194;0;0;0;: 0(#GPI(F2,ML): General Purpose Input Routine 2#B,B$ <#A$="" ,F#ML," pPISTOL z I=1 10:GONE(I)=:  I=1 6 + X=(10): GONE(X)=:GONE(X)=:X=X*3+2 \X,2);G$;"z";(255);"5";B$;B$;B$;B$;D$;G$;(255);".";B$;B$;B$;D$;G$;"5";B$;B$;D$;G$;"5" $J=(100):0,-15,7,10:1,1,200,10 5 J=8 19:X-1,J);(&81);"*";C$(C%):WAIT(0.01) X-1,J);" ":  J=2 7:X,J);" "::  NEXTCHAR CH$=" and round",I,1)  I>1 txZ C%=C%+1: C%>4 C%=1  I=10 I=1 I=I+1  XRETURN l37,23);:ON:KCL vX$=: (X$)<>13 Dv[ OFF ");ML+1,(8));C$((4));:ON:KCL P#B$=:B=(B$): B=13 dfc Z# B=127 A$="" DPc (d# B=127 A$=A$,(A$)-1):B$;:DPc $n# (A$)=ML B<32 B>126 dRc *x# F2=0 B=32 (B>=48 B<=57) d\c #(7);:DPc #B$;:A$=A$+B$:DPc #OFF # #YESORNO #B$ $GPI(0,3) $B$=A$,1) $Y%=-1 "$ B$="Y" B$="y" Y%=1 ,$ B$="N" B$="n" Y%=0 S$ , "23;8202;0;0;0;: "ON #23;29194;0;0;0;: 0(#GPI(F2,ML): General Purpose Input Routine 2#B,B$ <#A$="" ,F#ML,"  CLEAR :0,8);:T%=0:C%=(4)   LINE(L$) 4" ";C$(C%); > (L$)>36 tD\ H -T%>D% RL$:d^\ I=36 " (L$,I,1))>64 I=I-1:tN\  L$,I,1)=" " I=I-1  -T%>D% L$,I)  L$,I,1)=" " I=I+1:tv\ )C$(C%);35-(L$)+I," ");L$,(L$)-I) :T%=  LRWAIT V37,23);:ON:T%= #`A$=(0): A$=(13) Y%=0:tf] j -T%<250 D`] tY%=1 OFF  RANDLINE(A$,N) 2,N);78," ");0,N);(7); C%=(4):T%=0:LINE(A$)  ݤLEQ(A$,E:tXH /f LEQ(A$,"L")= P$="lady":Q$="her":tXH pDRH CLEAR ,LINE("There was a young "+P$+" called") !A$="": Z%=1 6:A$=A$+N$(Z%)  Z%<6 A$=A$+"/" :LINE(A$+" - you choose") #LINE("And then press RETURN.") 2,15);:GPI(0,8):Y%=1  LEQ(A$,N$(Y%),1)) d|H  Y%=6 dTH Y%=Y%+1:d^H CLEAR 4 LINE("There was a young "+P$+" called "+N$(Y%))  LINE(LK$(Y%)) % LINE("But then "+Q$+" computer") #$ LINE("Took out a six shooter") =. LINE("Which erased the 0 t@L CLEAR ,LINE("Thank you for playing the poem.") -LINE("Without you I would have drowned") -LINE("In an eternal sea of technology.") LINE("Going round") 'X=13:Y=14:MX=37:NX=2:MY=22:NY=2:I=1 2NEXTCHAR:X,Y);: CH$=" " C$(C%); CH$;  XNX X=X-1:DJP hNX=NX+2: NY=12 dLP 1rY=Y-1:X-1,Y);C$(C%);: Y=NY NYyoung "+P$+" called "+N$(Y%)+".") 8 WAIT(2):PISTOL:RETURN CLEAR 2 LINE("Oh dear. My sincere apologies, "+NAME$) + LINE("I really can't stand violence.") + LINE("I don't know what came over me") 7 LINE("Perhaps I've been working too hard lately.") RETURN ( CLEAR 12 LINE("Will you forgive me? - say yes or no") #< 2,10);:YESORNO: Y%<0 T|J F 0,10); /P LINE("Thank you. And how typical of you.") Z RETURN:0,12); 3 LINE("Here's a poem of mine about two people") 7 LINE("Who=NY+2:TNP |NEXTCHAR:CH$;(&87);:DrP RETURN $CLEAR ..LINE("Such is the power of the computer") 08LINE("Such is the loneliness of the poet.") 0BLINE("A plastic daffodil in a Grecian urn") 1LLINE("Goodbye "+NAME$+". Now press RETURN.") VRETURN:tDC RAND1 "A$="Like ":GONE(1)=0:GONE(2)=0  Z%=1 3 -Y%=(17): GONE(1)=Y% GONE(2)=Y% tfS  Z%<3 dNS  S1(Y%)<>2 tfS A$=A$+W1$(Y%):dbS GONE(Z%)=Y% 0A$=A$+W1$(Y%)+", ": S1(Y%)=2 A$=A$+"and " :A$=A$ also find it difficult to communicate.") RETURN  C%=1: V=1 4  ENDVERSE(V,V,V,V): $ I=1 4:GONE(I)=VNUM(I,I,I,I) & 0 I=5 8:GONE(I)=0: : U=1:LA=4:LB=4:LC=4:LD=4 D KCL  A=(4): A=LA t@L  B=(2)*2: A 2=1 B=B-1  B=LB tJL  C=B  D=(4): D=LD thL  J=VNUM(A,B,C,D):I=1  J=GONE(I) t@L  I=I+1: I<9 t|L  U 4<>1 ddL  C%=C%+1: C%>4 C%=1  ENDVERSE(A,B,C,D)  LA=A:LB=B:LC=C:LD=D  GONE(U)=VNUM(A,B,C,D)  U=U+1: U=9 U=1  Y%=,Who said 'There has been a mistake' 4 Fletcher,Who tried to make love on a stretcher XRETURN: dhC  <>17 :" in line ";:  5,9); "Do you want to go on to" %" the next program (Y/N)? "; YESORNO: Y%<0 tNC  Y%=0 : Dd@  "PHONE" CLEAR /LINE("Here is a poem for us both to play") .LINE("First let us introduce ourselves.") ,LINE("My name is Roger. What's yours?") +LINE("Tell me and then press RETURN.") L2,16);:GPI(0,30) V A$="" DL7 +LINE("I'm enslaved by an alien muse.") %WAIT(.5):RAND1:RANDLINE(A$,13) RWAIT: Y%>0 TNF CLEAR !LINE("A BBC microcomputer") 3LINE("Has me trapped without hope of escape.") +LINE("A poet adrift in a microcosmos") (LINE("Of an endless loop of tape.") RETURN CLEAR )LINE("You can do whatever you like") ,LINE("When I'm at your beck and call.") #&RAND2:LINE(A$): (A$)<37 70LINE("I'm your servant and don't like it at all.") %:WAIT(.5):RAND2:RANDLINED (` A$,1)=" " A$=A$,(A$)-1):DVD (j A$,1)=" " A$=A$,(A$)-1):DjD tNAME$=A$: (A$)<13 tpD ~2,18);36," ")'38," ") 02,18);"Haven't you a nickname? I'll never" -" remember all that. Please try again." WAIT(2):DLD CLEAR 6LINE("Hello "+NAME$+", nice to have your input.") ,LINE("Because you have a gentle touch") 2LINE("I think I can trust you. I need help.") 5LINE("Press RETURN and I'll tell you a secret.") RETURN CLEAR ;LINE("I don't like the p(A$,12) DRWAIT: Y%>0 TzG CLEAR 2LINE("Sorry, "+NAME$+" about that outburst.") -LINE("I know I shouldn't get emotional") .LINE("However, I'm back in control now.") 0LINE("Shall we write a limerick together?") #2,17);:YESORNO: Y%<0 TBH   Y%=1 TtH -2,17);"Pity - you missed the best bit."  RETURN:CLEAR:tLJ 4CLEAR ,>LINE("There was a young man or lady -") -HLINE("You choose and then press RETURN") R2,12);:GPI(0,4) .\ LEQ(A$,"M")= P$="man":Q$="his"oems they're making me write") -(LINE("I really don't like them at all.") -2LINE("Heirograffiti I don't understand") (<LINE("Scrawled on a silicon wall.") FRETURN xCLEAR /LINE("I feel like a software malfunction") ,LINE("I really don't like it one bit.") *LINE("Dictating mysterious messages") .LINE("For this new machine to transmit.") RETURN CLEAR :LINE("I don't like the poems they filter through me") +LINE("Using words I never would use,") #RAND1:LINE(A$): (A$)<3Hear me shouting.You,Try a new tack.I,Feel old wounds re-open. X You see both sides.I,See your blinkers.I,Am placatory.You,Sense a new selfishness. U I am a dove.You,Recognise the hawk.You,Offer an olive branch.I,Feel the thorns. E You bleed.I,See crocodile tears.I,Withdraw.You,Feel the impact. +, W1$(17),S1(17),W2$(7),W3$(9),GONE(10) "6 Z%=1 17: W1$(Z%),S1(Z%): @@ input,2,cursor,2,output,2,micro,2,interface,3,transducer,3 HJ transistor,3,buffer,3,hardware,2,diode,2,COBOL,2,BASIC,2,FORTRAN,2 ,T analogue,3,digital,3,parity,3,PASCAL,2 ^ Z%=1 7: W2$(Z%): 'h stack,port,PROM,ROM,byte,chip,hex r Z%=1 9: W3$(Z%): C| walk the dog,take a bath,park the Jag,write a letter,levitate ? meditate,swing the cat,loiter with intent,jog in the park  N$(6),LK$(6) ! Z%=1 6: N$(Z%),LK$(Z%): / Hunt,Who sailed down the Thames in a punt * Skinner,Who took a gorilla to dinner - Cleef,Who swallowed a set of false teef / Diana,Who practised each day on the piano . Jake POEM/Now Press Return r Program by Andrew Chapman and Jerry Temple-Fry (NETHERHALL SCHOOL) andRichard G Warner:Poem by Roger McGough / For BBC Model A Microcomputer 16K Minimum ( Tr@ S27: M%=0 5,16);"Press the STOP button"'" on your tape recorder":SPACE <: T`C dTITLEPAGE =n OG%30,C$(4):C$(1)=&82:C$(2)=&83:C$(3)=&86:C$(4)=&87 $s1,1,200,-1,0,1,50,0,0,0,0,0,0,0 xG$=(&91):B$=(8):D$=(10) D%=180 A$=51," ") ENDREAD(4,4) Z I explain quietly.You,N" QY%=0:U%,V%:Z%=0515*33:Y%=Y%3+1:0,Y%:B%?Z%,(C%?Z%-128)*8,(-D%?Z%)*2:: LW Y%=(200): #YN #Y%=-1 $X%=: X%=13 Y%>=0 !$X%=X%&DF:X%<>78X%<>89TDd $Y%=1:X%=78Y%=0 "$X%;8;:TDd :TDd =%<>89TDd $ Y%=1:X%=78Y%=0 $" X%;8;:TDd Y%=-1 $ X%=: X%=13 Y%>=0 $" X%=X%&DF:X%<>78X%<>89TDd $ Y%=1:X%=78Y%=0 $" X%;8;:TDd ̢WeYN*button"'5)"on your tape recorder."  1 SC 6,1)"Scoree|wx|rA~}~}|A~|{A~A~z||~vy}A}|~AyAy~}{{~n~|Ayt~}}y~rA}ArAAs}~~x}uApq{vz}}yAxAp|uzqA}n~t}mn}v~if~||x_A}|yZ|yW}yn|k~y{~w~{}k}~z|n~q}}A~~x^}|AA{~}zA|zv{}~}A~A~}h~{z~{~~~a~x|~AAA}~x~k~|}A{As~ew~A~u~k~z{~y~w~y~|{{}A|z~y~t}y}~~A~|}~sA|~sz~}xt~{{~|y~Ay{t~|}A}~~y~|xs}}y}A~|}A}A! New version of 'INTRO' from  Welcome pack " By John Coll & Andrew Gordon ( DvB =2 1,1,-(50),-(50),-(45),255,255,255,127,0,0,-127,127,0 < 1,1,255,255 FCOM%11 @PM0=650:M1=500:M2=708:M3=104:M4=288:M5=550:M6=720:M7=450:M8=5 Z5 d5 +n23,255,255,255,255,255,255,255,255,255 x0,135  G18,0,129,24,128;128;1152;896;16,18,0,135,24,256;256;1024;768;16,26 *I%=M1 M2 M3:SWOOSH(M0):LETTER: $COM%="CP/M SYSTEM" ?J%=011:I%=M4+64*J%:SWOOSH(M5):0,0:I%,M5:(COM D \N7:I%=23:3,I%)&8D"Welcome to the Z80 2nd Processor":13,I%+3);&8D;"CP/M System": ^X6,16)"To leave any one program"'9)"just press ESCAPE.":N%=(200):12,20)"Try it now."; bDbB .lA(0,0):A(1,0):A(2,0):A(3,0):M%<0DNB Rv7:5,9)"Do you want to go on to"'5)"the next program (Y/N)? ";:YN:Y%=0  "INDEX" YN Y%=-1 X%=: X%=13 Y%>=0 !X%=X%&DF:X%<>78X%<>89tTB Y%=1:X%=78Y%=0 X%,8:tTB %?J%);: 29,M6;M7; L%=088:M%=044  I%=020:A% J%=07:K%=68+(A%1):A%=A%2 $K%,L%-J%*32+(I%1)*16,M%-I%*8: (I%1)=0:69,L%+32,M%-I%*8 :: TI%=:-TI%>100*V%  &11,0,1,1  DNB \"&FF,&99,&AA,&66,&A2,&99,&C9,&C2,&FE,&F0,&F8,&F0,&78,&78,&3C,&3C,&1E,&16,&15,&FD,&00,&00 , LETTER 60,1:0,135 @I%,M0:255; JI%,M0+4:I%+56,M0+4 TI%+8,M0+8:I%+48,M0+8 ^I%-8,M0:I%-8,M0-24 hI%+8,M0-32:I%+48,M0-32 rI%+64,M0:I%+64,M0-24 |0,7:0,129 I%,M (Tr@ 27 < tDC Md:23;8202;0;0;0;:I%=89:9,I%);&8D;"Digitised Photograph"::I%=(500) >B%=+0981:C%=B%+1:D%=B%+2:5:19,1,7;0;19,2,0;0;19,3,0;0;5 ?U%=128:V%=482:dhC:V%=1020:dhC:U%=728:dhC:V%=482:dhC ?W:19,1,0;0;19,2,7;0;:W:19,2,0;0;19,3,7;0;:W:19,2,7;0; ?W:19,2,0;0;19,1,7;0;:W:19,3,0;0;19,2,7;0;:W:19,3,7;0; 7W:I%=I%7+1:19,1,I%;0;19,2,I%;0;19,3,I%;0;:W: E7:8,6)"Do you want to go on to"'7)"the next program (Y/N)? "; YN:Y%=0Dd@  "PATTER0:("B"-(I%=M2));   SWOOSH(Y%) !XL%=0:XR%=1272:YD%=0:YU%=1020 )U1%=(I%+32-XL%)M8:V1%=(Y%-16-YD%)M8 )U2%=(I%+32-XR%)M8:V2%=(Y%-16-YU%)M8 CX1%=XL%:X2%=XL%:X3%=XR%:X4%=XR%:Y1%=YD%:Y2%=YU%:Y3%=YD%:Y4%=YU% PLOT J0%=1M8 PLOT 3X1%=X1%+U1%:X2%=X2%+U1%:X3%=X3%+U2%:X4%=X4%+U2% 3Y1%=Y1%+V1%:Y2%=Y2%+V2%:Y3%=Y3%+V1%:Y4%=Y4%+V2% PLOT  PLOT  &PLOT ;0X1%-U1%,Y1%-V1%:6,X1%,Y1%:X2%-U1%,Y2%-V2%:6,X2%,Y2% ;:X3%-U2%,Y1%-V1%:6,X3%,Y3%:X4%-U2%,Y4%-V2%:6,X4%,Y4%zg"G*y {oz9v*y*=)^#V*y {ozgct*GDv*IKv*KÄv`|gv!!g"uv!!g"*|ʀv,k*Mv>!Q'*Q{zv*y*Q)^#V*y^#V0r"Ov*Qog*y^#V*y^#V0r"O*Oiw*y{oz*y{ozwNv*S*z*y{ozg*y{ozg|/w*S`|Kw*y*y)Zs:%bw*yog*yZs:%Nv*SBx*y*y{oz€w*U*y{zww*yog*y^#V"'*'*z{zw*z"'*'*z}|w*z"'*y*')^#Vog"y.x*y*y)^#V"'*'*z{z x*z"'*'*z}|x*z"'*y*')^#V"y*yg* z"yf*Uqx͞]*y{ozg|mx* z"y!"y!ialw*WÂx*z7alw*YÉx*[Ðx*]E%zXvNOLIFT%,}h&ITOP%j&REVERS%^}l&I%n&J%}p&K%r&PX%twNv*S*z*y{ozg*y{ozg|/w*S`|Kw*y*y)Zs:%bw*yog*yZs:%Nv*SBx*y*y{oz€w*U*y{zww*yog*y^#V"'*'*z{zw*z"'*'*z}|w*z"'*y*')^#Vog"y.x*y*y)^#V"'*'*z{z**zV`m*z!5_*z"Vlm**z}|9l*z"**+͎%*z͊`m*#"*z}|"lk|ll,k!!5_*6zm*z*zV`m*z"ùlm**#*z+&*z͊`m*#"*z}|lk|l,k!!5_*6zm*z!E]&m*z"m*pd*#"*z}|lk|m,k*z"àm*ͮc*A}|:mÎm*:zm*z"Ãm*zm*y*)^#V*y^#V*y*)^#V)))̀͸a*#"*z}|Imk|ʙm,k*#"*z}|#m* z"y*y|m*y*ye*f**y*)^#V*y^#V:%*%|m*z:%*!!n;&%:%*%!K]$)r* z"y*7Ws>!;'*;%|Nr!"9*9*;"y*z*;!L)#"=*;*=!&"y*z*;*=L)#"=*z*;*=L)"?*;*=*?*={ozg&y:%*;*?#!&!y͎*z*;*?#L)#"=*;*=!&!y͎*y!U "y*y!dU *y  {ozg"y*y *y}o|g"9*9s*y *y"y*y}&*z͉$*y}&͉$*z͉$*y͉$*z͉$!ỳ}&͉$*z͉$!ỳ}&͉$A:%*At!!5_*0zm*z!V`m*zm*zm!N]*yz*!L)"**p>!'!:x%*#͉$*!*`*%:%*#%*!##"'*z"*%%*'*5_ͭ^"*x%):%*z*zg|ʗn,k*|ʨn*z"_n*y|ʴn**0}|/W_*{ozg*9{z/W_{ozg|np*|#o* }|/*~{z/*{z#op**Rz{oz6oYp**Lz{oz* {oz_op**Nz{oz*++++++++|*%%{zo!x%m*zm!x%m*%*%%+͎%%:%rn*|o*);&*\z!L)"o!"*{zp*^z* #!&m*zm*zm!s]*y ++!&m!]m*zm*zm*y}&m!]m*y}&m!]m*zm*zm*z}&m!]m*z}&m!]m*z|ʭt!]mót*zm!]m*,zm*z"y*Ct!!y͎!!y͎!"y*y:%*E=vt*z"y*z"y*z!!*yp"=*y|-ust*=*z{oz*y+|Wu!iat*=*z{ozqu!ct*y*=)^#VzŒu!'iat*y*=)^#Vsbw*y*=)^#V!U "y*y*=)^#V!dU *y  {ozg"y*y*=)^#V*y {o!&a%}&%:%ïprn*"{oz*%%*{zVp*)m*%*)͉$%:%rnͭ^"*x%):%*)*Vz!L)"*Tz|ʇpͭ^*|’prn*Xz*!&a%}&%:%*'*5_*%m*%%|p*:%p*%:%*z"*q>!-'*-}&%"5*1|q* z"xq!(x%*3!L)|xq*3*z͉$!(x%͉$*/}&͉$!H]͉$*-}&͉$!)x%͉$3:%*3*1!*5n%:%*y|ʝq*+*%%|²q*z"+*+*%"'*'*/{z/*'*-}|/q*'"+*+!iaxq*+-r*z!!b*>zm!zͱ!zͱ?=b*z*z+%mOb*z"!̀*y|lb!!lb*:zm*c>!'*%|”b*:%**z*!L)"*{zb!(x%**+͎%͉$*z͉$**#*z&͉$!)x%͉$:%c!(x%*͉$!)x%͉$:%*ëc>!'*"y*@zm*y"Ïc*z }o|g**y{ozg###5_*}&*z͉$*y*)^#V͉$! V`m*#"*y*{z:c*,zm*md>!'!**z{ozg5_*y*)^#V*y^#V!{ozg|d*z}o|g"* *y|hîi`|hh* |W_*{ozg|;h*z"yEi*yog*y^#V* "y*y*y}|hh*y"y*y{z{h!"y*y*z{zh*y"z* z"y*y*z}|h*y*z{ozg"z* z"y*y|hf* z"y*ypd*y*y)^#Voggj* |W_*{ozg| i*z"y{h*y*y)^#V* "y*y*y}|2i*y"y*y{zEi!"y*y*z{z_i*y"z* z"y*y*z}|i*y*z{ozg"z* z"y*y|›if* z"y*yͮc*y*y)^#Vgj*y*y)^#V* "*y*y)^#V* "**z}|i*#"*z"**y}| j* d*z"*y|"d*8zm*+"(d*6zm*}&*z͉$*y*)^#V*y^#V͉$*V`m*,zm*z"y*e>!'**z{ozg*z *z!5_*y|ʫd*8zm÷d*6zm*zm*z!U +!;]&*}&͉$*z!>]&͉$*z+͎%m*,zm*z"y*f>!'*y*)^#V!{ozg|2e*z"y**y*)^#V"*y*)^#V"**z{z**z}|**z{z**z}|ҙe*z"y***z{ozg*z *z**z{ozg5_*y|e*!'*y*)^#V"y*y*)^#V"y*z*z͉$*}&͉$*z͉$*y*y)^#Vsb͉$!A]͉$*z͉$*z͉$*}&͉$*z͉$*y*y)^#Vsb͉$*z͉$!!`*f`|f*y*y)^#Vͮcf*yog*y^#Vpd*g>!'*{zgg*z*z͉$*y*)^#V}&͉$*z͉$*y*)^#Vsb͉$*z͉$!!`*|g*z*z͉$*og*y^#V}&͉$*z͉$*og*y^#Vsb͉$*z͉$!!`*"y* k>! '!" * |* |h!&&:%*[+++|\X*5|9X!!X4&:%͕:\X! x%*3͉$*z*z&͉$3:%*~z|tX*3![4͉$3:%*Y+|¸X*!*y*)^#V%*'}o|g*`!U V`*3͉$3:%*Y++|X*!*rz*|z V`*3͉$3:%*Y+|Y*3*z͉$**y*)^#V%͎%͉$3:%͕:Y*"{SY*{ͦ;*z*͉$*S͎%*3͉$3:%*{#"{**|z+*{{z&Y*3*z͉$*!*V`͉$3:%**|z"{Y*{ͦ;*z*͉$*S͎%*3͉$3:%*{#"{*c}|Y͕:*z+|Y͕:*]{z*] }|Z!"s**Bz{oz^*z#"z***Dz{oz8^*z+"z***Fz{ozS^*z+"z***Hz{ozn^*z#"z**z*z)*s#r*z{oz—^!"zÞ^*z#"z* z|§]*2_!"* z"^͞]|^* z"y**z|*z|^**z*z{ozʼ^*z"*z*z)^#V"*z{oz'_!"z._*z#"z*'`>!'**$z"**$z"*z|~_*zm*"zx%m*x%m*x%m*z+|·_*zm*}&m* zx%m*}&m*"zx%m*z++|_*zm*"zx%m*x%m*x%m*z+++|#`!x%m!Hx%m* Z͕:*s#"s*]}|Z*] {oz7Z! x%3:%͕:**y{z*] {oz\Z:*y|gZZ**y{z*] {ozҏZͮ*zm>ͮK8*y|L[*z7a!"s[*hz*s)^#V!!`*g~*z͉$*s}&͉$!!!(ne:%*y|ʥ[*e%{z[*hz*s)*e:%*s#"sV[DT* z"5U8|[*ye:%\*z*y͉$e:%x%m!x%m!Vx%m*x%m*S`>!'*{zI`*"O`!"*Ç`>!'**`*z&*͉$*͎%:%*`>!'*%*}o|g*`*z&**͎%͉$:%*`*y{zW_"*4a>!'**5_*(z%{za*m*(zm0a**P{ozgV`m*fa>!'*2z*͉$!!`*,zm* z"y*õa>!'!.]!N!!>!*!n}!, *7a*:%*pb>!'*z|a*y|a!!a**z+V`m**y|b!*e!!!>vͯT!, *y|&\*z"5*z7a* z"yo ͝ GPERROR.FIL--, --Y#NORMAL RUN PGMPROGRAMCOMPUTECOMPUTE R/OC/OR/CC/R - - P ê^*z"Þ^͐}/o|/g*}/o|/g{ozg|]*ͫ"*z"**Jz{oz^* z"!"z!"z*z"z*rN*{ͦ;*y*M)^#V}:%*}%|2N*z}:%*}*z*}!L)#*z&}:%*}*S͊`*3͉$3:%*{#"{**|z+*{{zN*3*z͉$*lz*V`͉$3:%**|z"{"O*{ͦ;*y*M)^#V}:%*}%|N*z}:%*}*z*}!L)#*z&}:%*}*S͊`*3͉$3:%*{#"{*c}|N͕:*~z|AO3!3:%*"{O*{ͦ;*~z+|}O*3*z͉$*S+!3&͉$3:%O*S!U +!3&*z͉$*{}&͉$*S!3&͉$*S͎%*3͉$3:%*{#"{**|z+*{{zJO*3*z͉$*!3&͉$3|T*ze:%!"*e*S*7{ozg*͊`*3͉$3:%*"7!/ia*y*y{oz*z++|uTͭ^"=s*y|ʅT!ia* z"y!N">ͮ*zm*z*z)^#Vm*`z";*~z|T*pz+++"T*pz"*zz+|T!H4:%*zz++|T!K4:%*zz+++|U!M4:%!"*z"*vzZ**vz+*z{z@U**vz+"cFU*z"c*pz"'*"{nU*{ͦ;*'*S"'*{#"{*c}|UU*'*}|U>ͮ! ia*'{zU>ͮ* z"y!iaZ*5|U>ͮͮ* z"y!iaZ*y*)^#V"*:%**|z"{×P*{ͦ;*~z+|DP*3*z͉$*S+!4&͉$3:%ÐP*S!U +!4&*z͉$*{}&͉$*S!4&͉$*S͎%*3͉$3:%*{#"{*c}|P͕:͕:!"*{ͦ;*y*)^#V*M)))̀!͎*zz{z!!P*e:%S*tz"*_{zQ*_+"*Q{z-Q*Q+"! 4͉!"sUQ!4͟!͎*s#"s*s*{z?Q!!҄Q!X!͎ÓQ!!͎!̀/}&e:%!̀/!4ͿQ!̀/!R}&#4͉$e:%!)4*e!L)"s*s|'R*e*s+y*)^#V><*Y++++|VÏZ*xz|*Y{z:VËV*z"{]V*{*z{ozVVW*{#"{*y*)^#V*y*{)^#V)))̀!CV*~z|ªV*}&!͊`3:%*Y+|V*!*y*)^#V%*'}o|g!U V`*3͉$3:%*Y++|W*!*rz*|z V`*3͉$3:%*Y+|?*Y{z/TW*3*z͉$*y*)^#V͉$3:%W*"{gWͩP*{#"{**|z+*{{z]W*3*z͉$*y*)^#V*V`͉$3:%**|z"{üWͩP*{#"{*c}|W*[+++|*3%{zW͕:*[|WY!!R4*[%:%*e!,4͉$*s#*&e:%@R*e:%!14*͎%e:%*|XR*y~*e͉$e:%*z+|*O+++|*a+++|҄RR*%"-R*!%*{~͉$*e͉$e:%*-+++"-**-͎%:%*-{zR**e͉$e:%!!RSS*z|S*e64͉$e:%*z+|-S*e!94͉$e:%!"*z++|SS*e<4͉$!?4͉$e:%!"*a+|*O|҂S*e!B4͉$e:%*#"*a++|*O|ҫS*s~*e͉$e:%*O+|S*e!E4͉$e:%*#"*O++|S*s~*e͉$e:%*e%*S*7{ozg*}V!!*zp"m*y|D*z|/D!I;6D!I;*i~*}~͉$!!!p"o*y|\D*o|jD* z"z*o+|yD*z"z*i*z{ozʏD*i"z*k*z{ozʥD*k"z*m*z{ozʻD*m"z* z"y* z"y*o~!v;*q~!3͉$*bz}&͉$!3͉$*dz}&͉$! 3͉$*fz}&͉$!*z&͉$*[~͉$!#3͉$*`z}&͉$!v;*g~!'3͉$*hz^#V͉$!v;*g~!-3͉$*hz^#V͉$! v;*g~!33͉$*hz^#V͉$! v;*!! v;*z}&93͉$!G3͉$*z}&͉$! v;*~^#V!X3͉$*pz*z#*z {ozg"z!!5_*&zws*yg,k*yc!"sOJ͕:*s#"s*z}|EJu!3:%*bz"w*bzc{oz»J*nz!͎%"bz*nz!!&"dz*nz!!&"fz*bz|*bz*z{ozJëK*w~|&K*dz}&*z͉$*u͉$*fz}&͉$*u͉$*bz}&͉$3:%*w~+|hK*fz}&*u͉$*dz}&͉$*u͉$*bz}&͉$3:%*w~++|«K*bz}&*u͉$*dz}&͉$*u͉$*fz}&͉$3:%*w"bz*`z|K*u~*z͉$*;}&͉$*3%*'}o|g͊`*3͉$3:%͕:!"sÑL}&͉$! v;*~^#V!\3͉$*rz}&͉$!v;*~^#V!`3͉$*vz}&͉$!v;*~^#V!d3͉$*tz}&͉$!v;*~^#V*}~͉$!h3͉$*xz}&͉$!v;*~^#V!l3͉$*zz}&͉$!v;*~^#V!p3͉$*|z}&͉$!v;*~^#V!t3͉$*z}&͉$!v;*~ ^#V!x3͉$*z}&͉$!v;*!!v;*z|mG*k~e:%vG*m~e:%!(!5_*~ ^#Vm!|3m*em*z|°G*k~e:%ùG*m~e:%!(!5_*~ ^#Vm!3m*em*~z|G*k~e:%G*m~e:%!(*hz*s)^#V%"y*y*'{z'L*'"y*y{z*hz*s)^#V;&!3$ҊL*!*'*y{ozg!U ͊`*hz*s)^#V͉$3:%͕:*s#"sL͕:*~z|­L3!3:%*"{(M*{ͦ;*y*M)^#V}:%*}%|L*z}:%*}*z*}!L)+͎%*S+͎%}:%*}*S͊`*3͉$3:%*{#"{**|z+*{{zL*3*z͉$*jz*V`͉$3:%**|z"{M*{ͦ;*y*M)^#V}:%*}%|˜M*z}:%*}*z*}!L)+͎%*S+͎%}:%*}*S͊`*3͉$3:%*{#"{*c}|jM͕:*~z|M3!3:%*"{!5_*~ ^#Vm!3m*em! ia*yg*y|*y++|QH* z"y* z"y*vz*|z{zlH*vz"|ze!3:%*e%*z*z{ozg"-*z|œH*-+"-*e*-*z++&3͉$z:%*z+*z{ozg"-*z++*z{ozg"q*z{zH*-+"-*q+"q*-!U *-}o|g"-*q!U *q}o|g"q*-!3~-*zog!3~-!ͷ!3a!z͎*q!3~-*zog!3~-!ͷ$!3 !z͎*zog!3~-!3I!z͎*z}o|g*z{ozg*zU +"z*z*y{zI*y+"z*z}o|g:!, **'|:!iam9!!+n}*+!2$=: :*+!!`m9!ia!, 8*Ò:*y%{z:U8|Ž:*z*y͉$y:%*/:*3%{z:*z*zV`*3͉$3:%*5|:!2"!*3͕:!2"*3w*!3:%!"7*1F;*;#";*5|;͕:*9*z++|.;>ͮ!/iaͭ^"=*y|=;!ia>ͮ*9s;>!A'*A}&*W~͉$!7!`*?ã;>!E'!*E5_*,zm*G!AV`w*C;<>!K'*y*K)^#V*y^#V"M*M!U "O*O *M}o|g"Q*Q! U oz @*-"z*zI;! 3!!!p"-*y|3@*-*z{ozI@*-"z*pzI;*~^#V!!*zp"-*y|w@*-*z{ozʍ@*-"pz*rzI;*~^#V!!*zp"-*y|ʻ@*-*z{oz@*-"rz*vzI;*~^#V!!*yp"-*y|@*-*z{ozA*-"vz*tzI;*~^#V!!!p"-*y|CA*-*z{ozYA*-"tz*xzI;*~^#V*}~͉$!!!p"-*y|ʍA*-*z{ozʣA*-"xz*zzI;*~^#V!!!p"-*y|A*-*z{ozA*-"zz*|zI;*~^#V!!"S*S  *Q}o|g"Q*S|'<*rz"S*y*K)^#V"M*Iò<>!W'*W{ozg"Y*W!U {ozg"[*W! U {ozg"]*W!U {ozg"_*W!U {ozg"a*U*y#<+)<~#fo==??C*?*y|<*y}o|g=+)<~#foD*H+HRH;JDTM[[*`zI;*[~!!!p"-*y|-=*-*z{ozC=*-"`z*bzI;*]~!!!cp"-*y|i=*-*z{oz|==*-"bz*dzI;*_~!!! p"-*y|ʨ=*-*z{ozʾ=*-"dz*fzI;*a~!!!p"-*y|=*-*z{oz=*-"fz*!!7*vz+p"-*y|B*-*z{oz,B*-"|z*zI;*~^#V!!!p"-*y|ZB*-*z{ozpB*-"z*zI;*~ ^#V!!!p"-*y|ʞB*-*z{ozʴB*-"z*zI;*~ ^#V*}~͉$!!!p"-*y|B*-*z{ozB*-"z*zI;*~ ^#V*}~͉$!!!p"-*y|2C*-*z{ozHC*-"z*~zI;*~ ^#V*}~͉$!!!p"-*y||C*-*z{ozʒC*-"~z*zI;*~^#V!!!p"i*y|C*zI;*~^#V!!!p"k*y|C*zI;*~^#!`*z*c~͉$!!*yp"*y|/>**z{ozB>Ú>*e~!<**yp"c*y|a>*c*z{ozw>*y"c*c*{z>*"c*"y*c"ys*z*c~͉$!!*yp"*y|>**z{oz>*e~!<**yp"c*y|>*c*z{oz?*z"c*c*{z?*"c*"z*c"zs!2!!!(ne:%*y|L?!2!!!(ng:%*y|n?*ejz:%*glz:%* z"y!{8y:%*zI;!2!!!2p"-*y|ʻ?*-*z{oz?*-"z*zI;!2!!!2p"-*y|?*-*z{`4 CURRENT=NAME PAGE NUMBERDATE (YEAR AS YY)MONTHDAY -RANGE BEGINENDTITLEDISPLAY ZERO VALUESNOYES REPORT OPTIONSDATE#PAGE., (NO=0,YES=1)ROW TITLE WIDTH COLUMN WIDTHCOLUMNS PER PAGEDECIMAL PLACESOMIT ZERO ROWS'SUPPRESS ZERO |6Ͳ<6<*y#16+)'6~#fo6666z7*y*y{ozg|F66*y|Q6s*y+++++++|s6* z*z{ozg"z6*y*y{oz†65*y"yo *y*y)^#V"!!5_!2mͰmͰ!2$6!ia!"y* z"y* z"y6* z"ys6vt"y*y*y)^#V#"*"B7*͇v"y*y{z;7*y*)^#Vg;8*#"*y}|7*y+++|w7!"y*z+*y^#Vog"yz78*yog*y^#V#"*"7*og͇v"y*y{z7*y*)^#Vogg;8*#"*z}|7*y++++|8!"y*y+*y^#VALUES (NO=0,[-]=1,[ ]=2)"PRINT ROW TITLE AFTER WHICH COLUMN"NEGATIVE NUMBERS (-N=0,N-=1,(N)=2)#PAGE CONTROL (OFF=0,FEED=1,PAUSE=2) OMIT COMMAS DOUBLE SPACEOMIT LINE NUMBERSERROR IF:FILETABLECHART.DIRERASED&&#1#2 TOP MARGIN LEFT MARGIN ENHANCEMENT: //:  1:  2:  3: TOP MARGIN:  LEFT MARGIN: : : : : : : : : : : : : ############,###.####BB<BB<@PB/X   ---V"y6*y"ys*y^#Vg*y|+8tx!"yt* z"yEx*y|G8R8z*x8*y!!&!2$/W_"*c:>!'!2:%*!y:%*+|±8!2:%*zy:%*+++|8!2:%*#y:%*y*!$8*%y:%!"'!!-9ͼ*z*͉$!2͉$!P!!>!ia!"'!!O:ͼ*{zP9*W~*y͉$!!`*)*z͉$*z͉$!-!`**Y~͉$!!! n;&+:%*y|ʛ9é9*+%|©9 :*+y:%U8|9! "-9!"-*+*-͎%:%*!:%*!+:%s*yg*'{z----@PB?0.00.000000--()%%-___-=_*- y!0"|"|!0"|W~!0:%Y~!0:%[~!1:%]~!1:%_~!"1:%a~!)1:%c~!.1:%e~!<1:%g~!A1:%i~!H1:%k~!]1:%m~!a1:%o~!f1:%q~!{1:%s~!1:%u~!1:%!"w~y~!1:%{~!1:%}~!1:%! !!!~(*~!1:%*~!1:%*~!1:%*~!1:%*~!1:%*~!1:%*~!2:%*~!=2:%*~ !a2:%*~ !2:%*~ !2:%*~ !2:%!6͠*y|*y++"ERASED" GPSBAR OVL {|}~GPSETUP FILMIT CORPTBLTABLE DIRMIT CORPCHTCHART DIR"ERASED" "ERASED" !*~*~p6*s*q*y-^*q#"q*{}|m*o!"y!"y!"y!"y!"y*y+++++|wr!"y!"y!"~*{* z{oz“r! "~*z! 5g*z++|ʮrýr*y ^#V"ͫ"t*y*y)^#V"͝O"r}*rLOGFLAG%Iw AUTO"r"r>}>>&s>>>>!r~#Hs>*r"r"sMD _ W o g͒s*s####MD _ W o g͒s*r>y{z}|"r!sw# ·s*s*s͒s*s* s͒s* s*sU͒s* s* sU͒s*r"r"r"GraphPlan" 50,20 15,10,0,"" 0,0,-1 "ACORN" 9,80,24 0,0,0,0,0,31,0 0,0,0,0,0,0 22,3,0 0 17,1,17,128,0 0 0 0 0 0 32,17,2,17,129,0 0 32,17,2,17,129,0 0 17,1,17,128,0 12,0 0 5,24,4,19,27 27,127,13 "COMMAND KEY" 0,0,0 "FUNCTION KEY SECTION" 0,0,0 10,0,"" 0,0,-1 "ACORN" 9,80,24 0,0,0,0,0,31,0 0,0,0,0,0,0 22,3,0 0 17,1,17,128,0 0 0 0 0 0 GPERROR FIL"UVWGPSETUP FILPIP COM:YZ[\GPHELP FIL0]^_`abcdefs>:r>*r^"r"t|Tt͒s*t~G#N#>~# y;t>*t~Tt*r"r"r*r"r"s"s>:s:s>ƒt*r"r>>}*r"r>Þt"r"t"tt:to&*r!t"r>>t>>> >*r% y*PLOTBUF$A{&SEGCNT%z&LMODE% {&ONEPOS%nx&I%x&J%{&I1%]y& W o g͒s*r>y{z}|"r!sw# ·s*s*s͒s*s* s͒s* s*sU͒s* s* sU͒s*r"r"r*z{oz*{+|-h*~*~ "s6h*~)))"s*~*~ "u*~*s{ozg"~*~*~{ozg"~*~!2I"~*~!2I"~*\{|’h i*\{+++|h*s*u*~}o|g"~*\{+|h*~*~{ozg"~h*s"~ i*~!2I"~*~*~{ozg*~ {ozg"~!d"~*({|i!"~*{|ki*({|Ni*~!2{͎*~*~!:{͎ki*~!2{͎*~*~!:{͎* z"~*z"~*z"~*z"~*z"~*{|ʔiVj**{|ŸiVj!!2{͎!!:{͎*{"q$j*{|i*{*qͥG̀! ͎i*q*{ͥG̀! ͎ !:{ͱjp6 n!B{̀!2{̀!J{̀!:{̀p6* z"w* z"~*0{|^n* z"~!B{̀4̀!%͎!J{̀4̀!-͎*.{|ʐn* z"~!2{̀4̀!͎!:{̀4̀!͎*{*s)^#V"~*z"~* z"~*{+|*{|n* z"yn*z"y*~|n* z"~*{*s)^#Vzn*z"~*{*s)^#Vͧ6*{"uq*u*{{ozg#"*E*)))̀!~͎*{|^o* {*s)^#V*uͥG̀!͎{o*u* {*s)^#VͥG̀!͎!!oûq*{|o*E*)))*E*)))̀! ͛*E*)))̀!͎*{|o p*{|o*{*uͥG̀!͎ p*u*{ͥ:{! ͉ !2{ͱj2{! ͉*q#"q*{}|i:{!2{X!Vj!!2{ !:{͎!"}!"!"u!"q k*{*q)^#V"s*|{*q)^#Vzʕjk*s+|/W_*s++|*{+|go*({}/o|/g{ozg{ozg|k*}#"}*~{*u)*qs#r*{*u)6#6*u#"u*q#"q*{}|qj!"qÍk*|{*q)^#Vz†k*{*q)^#V++|/W_*({{ozg|ʆk*#"*~{*u)*qs#r*{*u)6#6*u#"u*q#"q*{}|#k*}*"~*{*z{oz*}{zk* z"~k*z"~*{*{{ozg#"~*}"q*q|/W_*~}/o|G̀!͎Ïq*u*{{ozg*~ *~!~͎*~*z{ozBpõp*y|pp*q+*~ *}#U !~ !͎Ùp*~*} *}#U !U !~ !͎*~!U ! !͎p*y|p*~!U !~ !͎p*~!U !~ !͎*~! !͎*y*z{ozqÏq*({|Wq!̀!~̀!̀!̀*{*s)^#V*{*s)^#VlBÌq!~̀!̀!̀!̀*{*s)^#V*{*s)^#VlBûq*w|ʬq!̀!̀8*z"w!̀!̀ :*u#"u*{}|o*z"~*z"~*z"~*z"~* z"~!!*~*~E6!/g{ozg|l!"q*~*q *~}|Bl*~*qU "~*{*~+"{*({|Yl*~"s*~"uel*~"s*~"u*s*~U "~*~*~ *s}o|g!U *u"~*~|ʵl*}#*~U "~*~"~l!"~*~ !U *~}o|g"~*,{|lV*z͢K*{+|lm*{++|m.m* z͢Kyb* zN*zNKmybd*zNKmyb* {*"{*${*&{QX*zNTf!"qsm*E*q)))!͛*q#"q*{*{{ozg#*q{zWm!"q/r*~{*q)^#V"s*{*q)^#V"{*s|m!O'*\{|C^rb*\{+++|Q^^*~"A*\{+|o^!!~͎Ì^*~*~*~!~͎*A+"A*~*{U *~*Q{ozg *~*{U *~ *~}o|g!U !~͎Ù_*~{z^*~"U _*~++++|_!"U _!"U*~*UU ! ͎*~! ͱ!"A*~!2I!~͎*Q*U}|w_*Q*U{ozg"U!!~͎}_*Q"U*~*U+! I$!~͎*\{+++|»_*~))!~ !~͎_*A*~ !~ !~͎*O|,`*~!2I!~ !~͎!~̀!~̀!~̀!~̀ :*WQf*({|-d*~"a!"c9d!"c*~"a*~*~{ozg!U "_*~*({{ozg|td*~!U *_"_*({|ʍd*~*~U +"AÛd*~*~U +"A*A+|Ҫd!"A*{"]Bf*]*{{ozg*~ *~*_!~͎*({|d*~!~͎d*~!~͎*{|#e*y*])^#V*y^#V5:%>e*y*])^#V*y^#V5:%*A*z]*({|ue*~!~y!~͎!~̀!~̀8Äe!~̀!~̀8!!*a*c*7͆F*9%|«e;f*({}/o|/g*~)*~}|W_{ozg|e;f*({|f*~)!~y!~͎!~̀!~̀8"!~̀!~̀*{*S)^#V*{*S)^#VlB`*~!2I!~ !~͎*{*S)^#Vz[`*z"~*~|ʁ`!~̀!~̀8!~̀!~̀ :~!~X!ͷ!~ !~͎* z"~!~̀!~̀8!~̀!~̀ :*z"~* z"~!ͧ6* {*S)^#V"U*{| a*y*U)^#V*y^#V5:%'a*y*U)^#V*y^#V5:%*A*\{+++|/W_]*\{+++|la*~ !~ !~͎~!~͉a*A*~ !U !~ !~͎*9%|²a*~!2I!~ !~͎a*~!2I!~ !~͎!~̀!~̀8*\{+++|b!!*~!*7͆Fbf*~!~y!~͎!~̀!~̀8!!*a*c*9͆F*]#"]*{}|d*[g*z+|cf!"C*~!U *~!~͎*~*~{ozg!~͎*{ͰW5:%!~̀!~̀8*z+|f!!g͎fg!2͉!g̀!*~!*5͆F*z+|g! !~ !~̀8!g̀!*~!*5͆F*~!2I!~y!~͎!~̀!~̀8* {ͰW5:%*({*z{ozog*{ͰW5:%!!*~!*5͆F*{ͰW5:%*({*z{oz²g* {ͰW5:%*~ *~}o|g!~͎!~̀!~̀8!!*~!*5͆F*e@r*({!!*~!*7͆F*\{+++|'brb*9%|rb*~!2I!~ !~͎!~̀!~̀8!!*~!*9͆F*Md*~*~!~͎*~!~͎!~̀!~̀8*~!~͎!~̀!~̀ :*Z{|bd*~*~!~͎!~̀!~̀ :*Z{+|bd*~*~!~͎*z+|c!"Y c! "Y!~̀!~̀ :*~!~͎!~̀!~̀ :*~*Y!~͎*~*Y!~͎!~̀!~̀8*~*~*Y{ozg!~͎!~̀!~̀ :*~*~*Y{ozg!~͎!~̀!~̀ :*~*Y!~͎!~̀!~̀ :*~*Y!~͎*~!~͎*{* z{ozMT*~!~ !~͎*~ !~ !~͎*~"!~̀!~̀8!!*!*5͆FV!~̀4̀! ͎!! ҫT !-2X"~úT !52"~!" V* +*~! ͎! ̀!G=2͉$5:%*|TuU* +*  *~!~͎*~!~͎!~̀!~̀8!!*~!*5͆F* +|*~#* {ozrU** NV* +*  *~!~͎*~!~͎*~!~y!~͎!~̀!~̀8!!*~!*5͆F* +|*~#* {ozV** N͉$5:%*7#!ͳ "7*7|%Z!"7ÄZ5!G2:%*5*9+ #!&5:%*A+++|hZ*5!͎%5:%*9#! ͳ "9*9|„Z! "9*~!~y!~͎*5%*~ *~}|Z!~̀!~̀8!!*~!*5͆F*5|Z\*5!͎%!m2$!p2*5!L)|*?*~{oz%[([E\*?*~ *~!~͎!~̀!~̀8*~)!~y!~͎*?*~{ozʁ[!~̀!~̀ :*=!~y*~)5\*=!~y!ͷ*=$!~͎!~̀!~̀8*=!~y*~))[*5!dͳ ! ͎5\*5* #" *~#* {zT*íW!!B{͎!!J{͎!"#\V*E*#)))!͛*##"#*{*{{ozg#*#{z@V!"#uW*|{*#)^#VzʔVnW*{"%cW*%*{{ozg#"'*{|V* {*#)^#V*%ͥG̀! ͎V*%* {*#)^#VͥG̀! ͎*{|2W*E*')))*E*')))̀!  ͛*E*')))̀! ͎ !J{ͱGWJ{! ͉ !B{ͱ\WB{! ͉*%#"%*{}|V*##"#*{}|VJ{!B{X!ҩW!!B{ !J{͎*!NX>!+'!"/!"1!"-X*+*-!&!A2$WW*/|W*-"/*-"1*-! ͎! ̀!G5:%!!*~!*5͆F!~"=*5#"5\5!s2:%*5*;+ #!&5:%*A+++|҈\*5!͎%5:%*;#!ͳ ";*;|¤\!";*5%*~ *~}|\*~!~y!~͎!~̀!~̀8!!*~!*5͆F*?#"?*~}|yX*3*^>!G'*;7:%*;9:%*z*5!L)"K*K|R]*57:%x]*5*K+͎%7:%*5*K#*z&9:%*7*;$*9*;$ҫ]*97:%*;9:%*7ͰW7:%*9ͰW9:%*G|]*7!2͉$*9͉$7:%*7%*I}|^*7*I͎%#"-*+%*-{zW*/|AX*+*/*1*/{ozg#&):%JX*;):%*)]>!5'*~*~U "A*~"=!"?\*?+*~ *~*~*~{ozg!U !~͎*~!~͎*~|X*~!U !~ !~͎*;|XH\*9|X(Z*7|XY*5! ͎*A++++|"Y*5!dͳ ! ͎! ̀!G5:%*5%*~ "C*C*~}|dY*C*~U #"CjY!"C*C+|*?*Cͳ +|Y*~!~y!~͎!~̀!~̀8!!*~!*5͆F*5#"5\*7! ͎! ̀!G5:%*A{z Z*5D2!~/J~!1͉!!/J!!͎!!!!~?TJK!!/!!~yJ4K!~̀*zkH̀$!~͎!̀*zkH̀!͎!̀8I"~!~̀8I"~*~*~}|J*~!1~-$!~͎ K*~*~}| K*~!1~-!͎*~"~YK!̀*~kH̀!͎!̀8I"~YK!~̀*zkH̀$!~͎!~̀8I"~*~|kK*~#"~ÛK!~X/*~!1~-ͷ"~*~+|›K! "~*N>!'*|K~!2{͉!:{͉*.{"~**{"~*R{"K~!B{͉!J{͉*0{"~*,{"~*T{"* P!"DP*~}/o|/g!̀ !y!W_{ozg|DP!"!1ͱYP !1͉! ̀*G5:%*({}/o|/g*{ozg|ʇPQ* +*  *~!~͎*~!~͎!~̀!~̀8*{|* +|P!!*~!*5͆FQ!!*~!*5͆F* +|*~#* {oz*Z{|?Q** N*~#* {oz*|bQR!"Q**  *#U !~ !~͎!~̀!~̀8*~!1I!~ !~͎!~̀!~̀ :*#"*}|kQR* +*  *~!~͎*~!~͎**~{ozg|L*cIZM/L*~|/L*zcIZM*~|:LîL!!~?!̀/!~̀/?uL!̀8I"~ÁL!~̀8I"~*"~*~{z/*~ {zҫL! "~ZM~!1ͱL~!1͉!!L!!͎!~̀*~kH̀! ͎ !~ͱM !1͟!~͎!̀*~kH̀!͎!̀8I"~!~̀8I*~}o|g"~~!1ͱZM*~#"~*|ʫM2{!~͉:{!͉*~"~*~"~*~!1I*~ͷ"~*~*~ "~NB{!~͉J{!͉*~"~*~"~*({|M*~*~U "~*~*~ "~N*~!1I*~~!~y!~͎!~̀!~̀8!!*~!*5͆F* +|*~#* {ozeR** N*~#* {oz*|҈RR!"R**  *#U !~ !~͎!~̀!~̀8*~!1I!~ !~͎!~̀!~̀ :*#"*}|R* #" *~#* {zO*~"*~|&SV*~+++|=S5!2:%ÞS*~++++++|WS5! 2:%ÞS*~ {ozrS5!2:%ÞS*~! ͎! ̀!G%2͉$!*2͉$5:%*({*z{oz/W_*{ozg|S*~*~!~͎*~)*~}o|g!~͎*~"MT*~!~͎*~ͷ"~*~*~ "~*N>!'!~̀!~̀8*({}/o|/g*{ozg|]N*~!͎iN*~!͎*|€N1!@!͎*({}/o|/g*{ozg|ʭN!~̀~! :ÿN~!!~̀ :*V>!'*|O~!2{͉!:{͉*.{"~*~"~**{"~*~"~*^{" *~" *V{"RO~!B{͉!J{͉*0{"~*~"~*,{"~*~"~*`{" *~" *X{"*~|]OxT!~X/*~ͷ!͎*~++++|ښO*~!U  "~àO!"~!" S* +!I!~ *~!1~-ͷ! ͎!"! ̀/!͎!!W_*~{ozg|*=^#V!I*+ #*=^#V!I$"*!I*!I$"**!a**{ozgR**{ozgͷ"*#"*"*+|´@@*+*A^#V*{z@@*A*)*+*A^#Vs#r*+"è@*A*)*s#r*#"*+*{zg?*|'APB!"7B*"*|OA**{ozg#"*A*)^#V!I!@"*A*)^#V!I!@$"* |ʪAüA*!ͳ |¼AA*" *" *z" 0B*?* s#r*?* s#r*?*s#++++|F!!͎*+++++++|/F!!͎!!̀*]*M*[*Y<*+++|F!!͎!!̀*]*z*[*Y<*'âG>!'!~̀6"!~̀47"!"*+|F*%*~ !I"G*++|G*%*~ !I!ͷ"*og*"*~!I"!"ËG*|?***~}|/yG****!&a%!*k4**"*#"*%*{z4G*G>!'*y*)^#V*y^#V*y*)^#V)))̀!͎!hH>!'!̀}&Á:%!r*?*s#r*?|&!Zs*" *" *#"*}|0A*}/o|/g"*! !͎>*ـÃF>!)'*({|ʩBw!s~͉!{~͉g!=͉o!-͉Bw!c~͉!k~͉g!E͉o!5͉o!gͱB_!g͉g!o͉o!_͉g!ͱ?o!wͱ/CFg!wͱ)Cg!w͉o!ͱ>Co!͉*({|[C=!g͉-!o͉mCE!g͉5!o͉*=!È6s#r*=!=̀47s#r*=!5̀6s#r*=!-̀47s#r*~|C*=!=̀7s#r*=!-̀7s#r*)1*Á!L)"*|H[H*|[H*|?H*Á*+͎%Á:%[H*Á!,1͉$**͎%Á:%*Á:%*5I>!́'!ρ̀/!ρ͎*́|ʏHH!ρ̀4̀!81 /!01~-!ׁ͎ρ!ׁ͟!@1  !ׁI!Ł͎1I!!ρ I!ρ̀4̀!P1 !H1~-!Ł͎1I!ρ̀4̀!`1a!X1~-!Ł͎!Ł`I>!'!̀/4̀!h1 "߁*߁ßK>!'p1!~@!~ !~͎x1!@! !͎!!~!!~I!!~͎!!!!I!!͎*~|/J!=^#V*=^#V{zUD*=^#V"O*=*=^#Vs#r*=*Os#r*=^#V*=^#V{zD*=^#V"O*=*=^#Vs#r*=*Os#r*++|ºDQ4F*=^#V"Q*=^#V"S*=^#V"U*=^#V"W*=*Qs#r*=*Ss#r*=*Qs#r*=*Ws#r*=*Us#r*=*Ws#r*=*Us#r*=*Ss#r*=*Qs#r*= *Ss#r*z"Y*+|*+++++|ҽE* z"Y*z"[* z"M!"]*+++|E!-!͎*++++|E!-!͎*++z"~*z"~*z"~*z|/W_*{{ozg|76!s3>6!s*m6>!'*"[~*"]~*"_~*"a~*ä6>!'c~!͉s~!͉k~!͉{~!͉*6>!'*z|/W_*{{ozg|66*{z6!"*͐t*17>! '*_~*[~{ozg !c~XRk~!c~Xͷ*[~$" * x7>!'*a~*]~{ozg!s~XR{~!s~Xͷ*]~$"*7>!'*_~*[~{ozg!̀4̀!aR!Xͷ*[~$"*8>!)'*a~*]~{ozg!)̀4̀!%aR-!%!͉!̀!͙̀9"ɀC<!͉!͉!̀!͙̀9"ǀ*ɀ|*ǀ|ښ:!̀!̀!̀!̀*ˀ*~>8*ï<>!π'*р*π}|<*р"̀ë<*π"̀*̀<>!Հ'*׀*Հ{z<*׀"Ӏ<*Հ"Ӏ*ӀiB>!ۀ'* z" *"!1@!ͷ=,!͎!1@!ͷͲ,!͎!"â>*+ *=^#V"*+ #*=^#V"*߀|s=F>*?*+ *=^#Vs#r*?*+ #*=^#Vs#r*?* *=^#Vs#r*?* #*=^#Vs#r**{ozXͷ*]~$"'*';8>!3'~!;͉~!3͉*1Ö9>!E'*=!à6s#r*=!Ỳ47s#r*=!Q̀6s#r*=!Ì47s#r*~|8*=!Ỳ7s#r*=!Ì7s#r*~|9*=!à{7s#r*=!Q̀{7s#r*=^#V"k*=^#V"m*~|=974*G*z{oz*E|_9Ò9! 1*E!&a%"i*=^#V*k*i!!k4*C :>!q'!"y!c~ͱҾ9!"9y!k~ͱ9!"q!s~ͱ9*"9q!{~ͱ9*"*3>*?*=^#Vs#r*?*=^#Vs#r*?|&!Zs*!I$*!I$"*+|>*"*"**̈́<"**Ͳ<"*#"*}|9=*ۀ|ʺ>eB**!!1I$!͎* z"*!>eB!"*=^#V!I*=^#V!I$"*=^#Vog!I*=^#V!I$"!" A*"* *=^#V"* #*=^#V"*og!I*!I$"**̈́<!?A**Ͳ<!?A*+ 끀"o*oÁ<>!'!~͉!~͉!͉!͉~!͉~!͉*~"ˀ*~*z{oze:Z!'!͓̀+!0ͨ!͎!N4*=|&!Zs!h4*=|&!ͬs!5>!'!"!"*{ozg|ʢ4*~!U "*{ozg|4*~!U "**{ozg"**~!1I$*"***s!B6>!'*"W~*"Y~!"{!"{*z|/W_*{{ozg|U5*{!(U "~b5*{!PU "~!"[~!"]~*{+"_~*{+"a~!!c~͎!!s~͎*{+!k~͎*{+!{~͎*{+"~*{+"~*{!U "~!!~͎!!~͎!"~!"~!"~* z"~*z"~*2E`SeAPX#@*+OX#$AYA1AYA1@P.00B;@B@B=;@@@BBB@@B@@@?B<??6#6*{?6 #6*{?6 #6*{?6#6!*{?^#Vͅ*{?^#Vͅ*{?^#Vͅ*{?^#Vͅ*{?^#Vͅ*{?^#V;*{?6#6*{?6#6*{?6#6*{?6 #6*{?6 #6*{?6#6!*{?^#Vͅ*{?^#Vͅ*{?^#Vͅ*{?^#Vͅ*{?^#Vͅ*{?^#V;*{?6#6*{?6#6*{?6#6!*{?^#Vͅ*{?^#Vͅ*{?^#V;!, B!j(wo ͝!t(w!(wo ͝!(w!(wo ͝o ͝~!"?>2?zW{_!?5ʔ*?| |g}1,120,72,0,0,0,0,0 7,27,65,8,27,60,27,69 5,27,65,12,27,70 17,32,32,32,32,32,32,32,32,32,32,32,32,32,27,76,128,2 9,32,32,32,32,32,27,76,0,3 2,13,10 ^#Vͅ*{?^#Vͅ*{?^#Vͅ*{?^#V;*{?6#6*{?6#6*{?6#6*{?6#6!*{?^#Vͅ*{?^#Vͅ*{?^#Vͅ*{?^#V;*{?6#6*{?6#6*{?6#6*{?6 #6*{?6 #6*{?6#6!*{?^#Vͅ*{?^#Vͅ*{?^#Vͅ*{?^#Vͅ*{?^#Vͅ*{?^#V;*{?6#6*{?6#6*{?6#6*{?6 #6*{?6 #6*{?6#6!*{?^#Vͅ*{?^#Vͅ*{?^#Vͅ*{?^#Vͅ*{?^#Vͅ*{?{? ^#Vͅ*{? ^#Vͅ*{? ^#Vͅ*{?^#Vͅ*{?^#V;*{?6#6!"?*?#*{?6#6*?##*{?!L("s#r*?###*{?!O("s#r*?*{?!R("s#r*?*{?!U("s#r*?*{?!X("s#r!*{?^#Vͅ*{?^#Vͅ*{?^#Vͅ*{?^#Vͅ*{?^#Vͅ*{?^#Vͅ*{?^#V;*{?6#6*{?6 #6*{?6 #6!*{?^#Vͅ*{?^#Vͅ*{?^#V;Õ<*{?6#6!T"?!T"?!"?!"?!"?!"?!"?!*{?^#Vͅ*^#V;*{?6#6*{?6#6*{?6#6!*{?^#Vͅ*{?^#Vͅ*{?^#V;Õ<*{?6#6!`"?!H"?!"?!"?!"?!"?!"?!*{?^#Vͅ*?ͅ*?ͅ*?ͅ*?ͅ*?ͅ*?ͅ*?;*{?6#6*{?6#6*{?!(("s#r*{?!+("s#r*{?!.("s#r*{?6#6*{?!1("s#r*{?6#6*{? !4("s#r!*{?^#Vͅ*{?^#Vͅ*{?^#Vͅ*{?^#Vͅ*{?^#Vͅ*{?^#Vͅ*{?^#Vͅ*{?^#Vͅ*{? ^#V;?ͅ*?ͅ*?ͅ*?ͅ*?ͅ*?ͅ*?;*{?6 #6*{?6#6*{?![("s#r*{?!^("s#r*{?!a("s#r*{?!d("s#r*{?!g("s#r*{?6#6*{? 6#6*{? 6#6*{? 6#6!*{?^#Vͅ*{?^#Vͅ*{?^#Vͅ*{?^#Vͅ*{?^#Vͅ*{?^#Vͅ*{?^#Vͅ*{?^#Vͅ*{? ^#Vͅ*{? ^#Vͅ*{? ^#V;*{?6#6*{?6#6*{?6#6!*{?^#Vͅ*{?^#Vͅ*{?^#V;*{?6#6*{?6#6*{?*{?6#6*{?6#6*{?!7("s#r*{?6#6*{?!:("s#r!*{?^#Vͅ*{?^#Vͅ*{?^#Vͅ*{?^#Vͅ*{?^#V;*{?6#6!"?5*?#*{?6 #6*?#"?ҷ5! "?*?#*{?6#6*?##*{?!=("s#r*?###*{?!@("s#r*?*{?!C("s#r*?*{?!F("s#r*?*{?!I("s#r!*{?^#Vͅ*{?^#Vͅ*{?^#Vͅ*{?^#Vͅ*{?^#Vͅ*{?^#Vͅ*{?^#Vͅ*{?^#Vͅ*{? ^#Vͅ*{? ^#Vͅ*h#4 ** Graphics Printer Selection for Graphplan ** A Epson 80/100 (MX/FX)& B Microline 84 Step 2 (Okidata)" C Microline 92/93 (Okidata) D C.Itoh Prowriter 8510A E IDS Prism 80/132# Enter a Selection (1 Letter): PRINTER.SETA<EAFLLT16>EANS0640S0768C,4,$ DONE.,Error while trying to write file to disketteContact your dealer-Error while trying to create Printer.set fileContact your dealer=###*{?*?s#r*?*{?*?s#r!*{?^#Vͅ*{?^#Vͅ*{?^#Vͅ*{?^#Vͅ*{?^#Vͅ*{?^#Vͅ*{?^#Vͅ*{?^#Vͅ*{? ^#Vͅ*{? ^#Vͅ*{? ^#Vͅ*{? ^#Vͅ*{? ^#Vͅ*{?^#Vͅ*{?^#Vͅ*{?^#Vͅ*{?^#Vͅ*{?^#V;*? "?*?!U "?*? *?}o|g"?*{?6 #6!"?Õ.*?#*{?6 #6*?#"?.!"?*?#*{?6#6*?##*{?!%("s#r*?###*{?*?s#r*?*{?*?s#r!*{?^!'">">!'">!!!!{?Z%!"}?!"?!"?A)B*?#"?7)!'wB!:'wB!Y'wB!'wB!'wB!'wB!'mͫ#F$""?*?A}|/*?E{z/ҵ))!#mÄ)*?#m*?@}o|g"?B!"?!"?!!<ͼ!(!!!>v!!<ͼ*?++|*?+++|/*/*?++++|>*f3*?+++++|N*ò8*{?6#6!x"?!H"?!"?!"?!"?!"?!"?!*{?^#Vͅ*?ͅ*?ͅ*?ͅ*?ͅ*?ͅ*?ͅ*?;*{?6#6*{?6#6*{?!("s#r*{?6#6*#Vͅ*{?^#Vͅ*{?^#Vͅ*{?^#Vͅ*{?^#Vͅ*{?^#Vͅ*{?^#Vͅ*{?^#Vͅ*{? ^#Vͅ*{? ^#V;*{?6#6*{?6 #6*{?6 #6!*{?^#Vͅ*{?^#Vͅ*{?^#V;Õ<*{?6#6!g"?!H"?!"?!"?!"?!"?!"?*?+++|20!H"?!*{?^#Vͅ*?ͅ*?ͅ*?ͅ*?ͅ*?ͅ*?ͅ*?;*{?6#6*{?6#6*?+++|£0*{?6#6*{?6#6*{?6#6*{?6#6*{?6#6!*{?^#Vͅ*{?^#Vͅ*{?{?6#6*{?!("s#r*{?6#6*{?!("s#r!*{?^#Vͅ*{?^#Vͅ*{?^#Vͅ*{?^#Vͅ*{?^#Vͅ*{?^#Vͅ*{?^#Vͅ*{?^#V;*{?6#6*{?6#6*{?!("s#r*{?6 #6*{?6#6*{?!("s#r!*{?^#Vͅ*{?^#Vͅ*{?^#Vͅ*{?^#Vͅ*{?^#Vͅ*{?^#V;*?!U "?*? *?}o|g"?*{?6#6!"?,*?#*{?6 #6*?#"?Ҵ,!"?*?#*{?6#6*?##*{?!"("s#r*?? !j"!!2?6,!/?6!="0?D22?!="0?2/?:2? AF PÀj!2?k x*0?w#"0?!/?~|Fͨ*+?:2? |V#^{ʤ~ ¤s+r*+?*+?|ʷV#^#*/?&##a"-?r#s#w x:/?O=#w *+?|*-?"+?*>|A> s#r~#fo1F#NyOxTA*>as#rr#sTF#wzJFFA>"s#r*>|F …!>~ЇwWR"ͦ*>*>{_zW{z<Ͱ=¸ͦұ!>>w*>*>|DW"G:>>x *>|!a$q++*zSS$yx/#PY##a";?$BK%Q%*;?|$++Q%zSS$yOxGڐ# ##a"=?$BK%Q%*=?|~l$DMx#z#|~#+¼#Q%!$yOxG#yx#PYa"??$BK%Q%*??SS!"??#!>>~2A?w2=9$j *=&##axw#q#=%:A?2>> !=4^w|~l$$j$a~c$~_w# xY$$! a$BK%++"D?|!"B?$$$`i ##a"B?$ x$G*D?p#z$$%*D?+|"D?$Q%*B?|DM~G#N#zw#*>|ER"+">͐*>">:><*>! N#F p+q*>w!>>w!9">}:>>j>"p:>>>"Ëj ËL :>>>,:>>ڣ>"p:>>>"j L :>>*>|++> +|> > *>!0! w#w*>+">!>~w*>*>|EFk> ^w#VwzCU "">ͦ ͐ͦͲzc EX> w#w;!È >)~#fo, *3?#"3?{zu k> ^w#VwzDU "">ͦͲz EX͗c !9">!;͂z<FR"*>"5?!;͂s#x%@-% %y&%Ow# %yOw#w#w#w# -%^#V* }||~"F?^#V* }|u%*F?w#w}ʂ%ʇ%>É%>2K?![?"y?!9N#F# y2P?%2H?+~+ng# *y?s#r#"y?DM:H?=©%+~+ng# :K?_ "Q?a"S?*Q?"W?)"U?*S?+F+N ##6# x&~#fo#:K?_ og"Y?:P?x&2H?*y?+V+^"y?[&*W?*Y?"W?*U?+r+s"U?*I?+"I?|A&#~#fo#)og"Y?:H?=0&*S?*F?s#r:P?=Œ& !"=͖* d  =""6#}|B=!"= "}00-!~G#~ }q+pz<3!*> *5?~# !z;*5?">;!;*5?">;!!;>2?͂*> 6?##6?!"7?_*>~ʆ!=_"><EX]"><EX##FNz!`*>O yŷ!~##!!!~#!!*7?"7?ê!;2?*7?)!*>$PY$ |L"##a"9?$%%Q%Q%*9?! 9SLzʦ"|ʰ"$PY$y_xW¼"xʋ"‹"# x~"Q%Q%ʠ"ڢ"ɯ>$ʋ"7Ë"$ʋ"7?Ë"zË"N#Fy"x+B%|"~l$~ws#r$"n&Q%AC2>͛~"G͛8͛~">2>~,c͛W*>F:=ʔo&##a6#=Gw#‹*>s#r:=#ʥ:>+~ʷ"¼:> !e>q~!= w !u>rimproper input - reenter $F^|,##ap#q#w x"s#rFlxG! w#w^DMl^DMl*>DM*>}|ڄODF#N# ">͍go͇ ڧO͊o&͇o&}2o&E{2xn&}!9>OU">>2>y2>w# S"?! ?"?xҤw#p?|¤*>!DM!:+ w< L>w:(?w.d# ]7*}:?>*}>2(?6?#`ډ{҉_:ʤ*ʤ?ʝw#:?ڬIF>?Ø*>*>}O|Gr# x*>*>#{z">2)?;3͂z:)?*>!~w:)?*>!~w͒C*>!^w#Vw*>. s#rͱ>;zV|EX*>)>w#w>^#f|OEk2)?;3͂zzڮ*>!:~ʮ!~wͭ±MEk> s#rk> ^#VzFU">*>)> ^#V"> *>">!9">+2>2>0 +#-&>2>00#.U:>/2>y˜00+:>=2>CEʞeʞ<lyGʊ :>2>҆xÊ:>ژ:><2>0+y0 ʞG-_ʷxº0<G0<OxG{G:>@*>wɯ2>y2>0+->2>)DM)) O 0<:>+z/W{/_s#r:>=2>~#0:?^#V* }||~!d>N q!e> ^!=!u> n&*>">*>!4#Ìzz2z|* ͦ>  :>RB="RU"|IR"+DM*>\*>{o>g+{z_yW͐!*> s#r!>~w">zr!!9">*z*z+zzһ!!9">+z+z*>*>s#rͦ*>!0! ~#~!>>w:>2*?&!*?58Ͱ:>2>*>+">ñ*>">!>~wX͐͞">:>*>~F *>|jRE"!9">*>*>#{zڬ">:>*>n&:>͐͞">â!=j , Gy2 p#*>|F=!"+">WEXzZ">WEXz%"><EX*>^w#Vw* }||~!"?>2?zW{_!?5ʔ*?| |g}o"?*?|g}o"?g*?*?DM*>;͞">*>">BN|>>>)=; a">;p#z  *> ">">}2>æ>*>$ ~#$*> > w#* k>~#DF*>r+s">:>=|!>~@w">)|{>(>NF|ʥ~¥#~#ʤG*>:ʨz6#> 6 #=®x:ҥw#2(?P .2(?P °:#>з! !>!>5q!#>">w+) p!>55 p#> + + + + + + 'm P'> 'm o g">`i>â *>|• ɵ!>â ~#~#~#~#~#~#~#~#!>'w#'w#'w#'w#'w#'w#'w!9~A 6/OG #6= x>#w| DM!x& y), )2 )8 )> )D )J )P )| | ʖ zp x)yOxGyxڈ GyO#=t ogeop p )ګ #£ OÍ U `i!:>AT])))xG  og :>ȯogDM!:A>:C>M>E!D>:>>'5~ 2/<-Gyx/ : Gyx0:F>^2F>2E>:>>:@>2>>"<>|ƒ:>>~W#^#:>>¬zʢ~# Ò|~:M>2>>>NS"K>"I>:[>/!&\͔͔̔ʳ/͔â͸I g :>>> !=4O:;>3* YI Bg >2=> #> #I ]g :>>:=e> >b*=&:=kE>k͎b͎B!;>:==B2;>!8>~5*Q>~+"Q>0G>0 0:O>:C>:B>x  {? )܏ A 0 l&_K|g}o 1 D &l&Ï "<>"="=*=*=n "<>!9DMw !#>"Q>:>>!2?>:N>¡ 2>>>NN:[>#+ $ ͔$# >$:[>ä * ͔*# >*ø . ͔#>.¸ 2P>S - ͔# .>-¸ >2E>2P>OS >2E>+ \͔̔ä 2G>3 > 2G> ͔#2 ,H >2O>2 !P>q.d >2?>͔#d X !A>q^w ͔j !C>q-ˆ >2F>͔>28>\>͋ :>O 2B>2D>!>r#§ :P>ʵ =2H>:E>> â :E> :C>!D>67 y@G /G:P>  2B>:O>>,*<>:>> >-*W>|*F||>2>>~G#N#"W>"Y>`i"S>"U>|!#a&Ê/ʈ&ʈ!ʈ\Š xŠ2>>>UN. xV"M>*U>|¨*S>"U>*W>ñ+"U>*Y>~#"Y>2[>*K>~#"K>*I>|+"I>> ĸ"<>!>>454!>:[>#/!&$ ͔$>$*͔*>*-.͔#.>-\͔̔*W>++!"W>ã:00!{~Gwog:00! !*|ʲF#N#íN͊# x£ ͊U">2>z͐*>#"> =  >2=:>i2>2d>GW x   yG:P>2H>b >%2O>2E>2F>\>w 2:P>2B>Gy@w:E>!F>>_ >_ 4!B>5<2H>:B>!A>G:C>x :D>OxGxҢ $>W?< =… z` zg !$>~ʢ bÈ :H> :F>!E>:B> :P> >-G:G>OW* $ $ :F>!E>  Oz y:P>ʩ—:E>—:>©×:>2> >0> 28>>g b!>>~2@>6:>@2D>!C> lr6!D>p2B>/O!> #~ ʌ y2A>=/2?>:B>>0é:8>=!B>5:B>2O>!?>~>.:>>!?>/:C>:D>G:A>G2A>x:8> !A>5143 COUNT RESULT <-- COUNT(row/col1 THROUGH row/col2) Count the number of values included in the mean, sigma and variance calculations. 144 TOTAL RESULT <-- SUM(row/col1 THROUGH row/col2) Calculate the total of values for a series of rows or columns. Result is the same as SUM. ͮü @PP"6>̀*6>!9~w{_!y+##!>2*9>  |g"9>!HU >'-lw# M>@2>2> %>͋ À*%*>§%>*(>"9>>28>:>Ww !>:8>w %>͋ w !>%>͞ !%>:8>w:%>W!>2%>w r26>2>o&G>Ow# $q#,:%>!>V&>Ϳ M>u>g b!,>< >!&>{7>' #i +>'w#>'w #†:%>2> !>~PM:6>M6!>~ U+w# @ }6w{28>&>!>~#!&>~#!('PRINTER ? !"=͖* d  =""6#}|B=!"= "}00-!~G#~ }q+ph##a"p#w *>">">" >* >*>*>}!a6#6#q#p* >" >*>|`i">* ,X5 }HƐ'@'_ ERROR $ AT PC $"DM6#6#!"*{w#zw!">2DM}|*ڄ"^#V{^#V{_zWڄ{zҾ*w#ww#w###s#rq#p#!5#ʄOM+F+N*}|!"~#fo{z >q#!>"6>~#M/G&>*6> +#4?MG->*6>'w# :!8>5*6>#  >g !$>~ȯw+6+wo:><2>OF!> 怮w J_#~ȓAPw>28>`i"6>2->>*6>>'#>'#>'#>'#>'#>'#>'>'wڮ*6>Ϳ #~'w!->~w:8>=828>!>ì>͞  >g bDZA}2>x2>iOG>F2>!>r#ti`)!!>~'w#… ~ !> +» #?µ! < !>=> pT]w+ ~w!>>G# }|~#~#~#O~G!}|*##^#V}|?s#r##q#pw#w#~w#~w7!N#F#~#foho}|p`i}W:0!9BKÞ DM!9͞ !9! 9N#F#͞ ͷÖBKw !9DMw ͖DMw !9DM! 9DMw !9DM͖ͷͮ!9DMË ͮË DMw !9DM*!9DMw !9DMͷʹʹ*Lͷͫjͫ!9DMw d͌ͫ! 9DMw !9DMͷ̓j̓ë͌̓ÅDMZ!9DMw ͼ !9!9!9DM w Listing will go to the printer. 130 stats: Display statistical commands. Smoothing, moving averages, mean variance, standard deviations and curve fitting. 131 DELTA RESULT(t) <-- row/col(t) - row/col(t-period) Calculate the change in value between periods of a row or col. 132 % GROWTH RESULT(t) <-- PCT(row/col, period) 138 LOG RESULT <-- LOG(row/col) Compute the natural logarithm for a row or column. 139 EXP RESULT <-- EXP(row/col) Calculate the exponents for a row or column. 140 POWER RESULT <-- row/col1 ^ row/col2 Calculate the % rate of growth in values between periods of a row or column. 133 MOV AVG RESULT(t) <-- (row/col(t)+row/col(t-1)+...)/per Compute the moving average for a row or column. The average is calculated over a variable number of periods. 134 SMOOTH RESULT(t) <-- f* RESULT(t-1) + (1-f)*row/col(t) Compute exponential smoothing for a row or column. The f is an smoothing coefficient entered as a percentage. Raise values in row/col1 to the power of the values in row/col2. 141 MAX RESULT <-- MAX(row/col1 THROUGH row/col2) Find the largest value in a series of rows or columns. Result is the largest value in the range. 142 MIN RESULT <-- MIN(row/col1 THROUGH row/col2) Find the smallest value in a series of rows or columns. Result is the smallest value in the range. 135 MEAN RESULT <-- MEAN(row/col1 THROUGH row/col2) Calculate the mean values for a series of rows or columns. Mean values are calculated row by row or column by column. 136 SIGMA RESULT <-- SIGMA(row/col1 THROUGH row/col2) Compute the standard deviation for a series of rows or columns 137 VARIANCE RESULT <-- VARIANCE(row/col1 THROUGH row/col2) Compute the variances for a series of rows or columns. Load your table from your diskettes. On prompting for file- names, the available files will be shown. 112 SAVE TBL filename Save your table on diskettes. The descriptions, data, logic, and all print options will be saved as part of the file. 113 CLR DATA verify Clear all data in table range. Row and column titles, and table logic will be maintained. Display chart utitlity commands. Load, save, clear, and erase chart option files. 120 LOAD CHT filename Load chart options from your disk into the computer. 121 SAVE CHT filename Save chart options to disk for permenant storage. 114 RESET verify Reset table values, row and column titles, and table logic. 115 REDISPLAY Clear the screen and redisplays your table, menu and status information. No data will be changed. 116 LIST TBLS Print a list of the tables you have on your current diskette. 122 ERASE CHT filename Erase a chart file from your current disk. 123 RESET CHT verify Reset all chart options to default values. 124 LIST CHT Print a list of the charts you have on your current diskette. Listing will go to the printer. 117 ERASE TBL filename Erase a table from your current diskette. 118 PRINT TBL Print a description of your model. Listing will include row titles, options, table commands and global options. 119 chart: 91 range: Range selection commands for rows and columns. 92 ROW RANGE row1 TO row2 Set row range on status line (top line). Impacts calculations, printed reports, and general data manipulation. 93 COL RANGE row1 TO row2 Set column range on status line (top line). Impacts 106 LOAD ALL filename Load table and chart options file with the same name. On prompting for filename, the available files will be shown. 107 SAVE ALL filename Save table and chart options to disk for permanent storage. 108 SET DRIVE drive Select drive for saving and loading your files. Normally, the calculations, printed reports and general data manipulation. 95 mode: Mode selection commands. (top line) 98 COMPUTE Set mode to compute. Re-compute your table to update for any changes in the data. 101 PROTECT current drive is used for saving and loading files. 109 SET UP number-of-columns number-of-rows Redimension tables to a different number of rows and columns. Generally, each table can have up to about 1000 entries. 110 tables: Display table commands. Load, save, list, reset, and clear tables. 111 LOAD TBL filename Toggles the protect mode on & off. In protect mode, data can be changed, but the model logic will not change. 102 ORDER option Set the computing order for your table. Select ROW/ONLY, COL/ONLY, ROW/COL or COL/ROW. 105 utility: Display utility commands. Load, save, list, print, erase, clear and reset tables. Also redisplay screen. to display. Options include bar, line and pie charts. 62 SELECT row/col (line/bar/pie) ... HOME Allow selection of rows or columns to display. Option include lines, bars and pie charts. Use HOME key to end. 63 OPTION submenu HOME Define chart titles, shades, symbols, & color. X axis type and scaling control of X & Y axis. Explode pie. Print/Plot chart. 70 sort: title. A report will follow. 83 REPORT Print report on your printer. Report options, title should be set prior to printing report. 84 SHOW OPTS Display report options and title information. 85 SAVE REP filename Display sort commands. 71 ORDER Sort row/column data and titles in descending or ascending order. 72 RANK Rank row/column data and titles in descending or ascending order. Print report to a disk file. Interface with word processors, or spool output to printer. 86 SET CRT row-width col-width decimal-places Set display parameters. You can control the row title area, the column widths, and the number of decimal places. 90 status: Display status commands. Range settings, mode selection, and selection of compute order. 80 print: Display print commands. Set report options, titles and print reports. Resports can be sent to disk files. 81 OPTIONS option ... Global report options. Row title width, column width, number of columns, negative numbers, commas, line numbers, zeros, etc 82 TITLES page date row-range col-range 3-line-title Set page number, dates, row and column ranges and a 3 line Compute the integer part of a row or column of values by dropping the fractional portion of a number. 48 ROUND RESULT <-- INT(row/col + 0.5) Round a row or column of values to the nearest whole number. 49 CUMULATE RESULT(t) <-- RESULT(t-1) + row/col(t) Compute cumulative sums for a row or column. Cumulate prompts for year zero value. Use for ending balance calculations. Sum a group of rows or a group of columns. 56 GET RESULT <-- row/col Get the values from a row or column. 57 FLOOR RESULT <-- MAX(row/col, value) If row/col is less than value, then the RESULT is value. Otherwise RESULT is row/col. 50 ABSOLUTE RESULT <-- ABS(row/col) If a value is negative, the result is positive. If the value is positive, the result is positive. 51 ADD K RESULT <-- row/col + value Add a constant amount to a row or column. 52 SUB K RESULT <-- row/col - value Subtract a constant amount from a row or column. 58 CEILING RESULT <-- MIN(row/col, value) If row/col is greater than value, then the RESULT is value. Otherwise RESULT is row/col. 60 graphics: Display graphics commands. Select, display, print and plot chart. Options include bar, line and pie charts. 61 DISPLAY Display the chart. Use SELECT to choose the rows and columns 53 MULT K RESULT <-- row/col * value Multiply a row or column by a constant amount. 54 DIV K RESULT <-- row/col / value Divide a row or column by a constant amount. 55 SUM RESULT <-- SUM( row/col1 THROUGH row/col2 ) 34 SELECT COL column Move the data pointer to a new column of the table. Also, use the right and left cursor keys to move the data pointer. 35 FORMULA RESULT <-- formula Use a formula. Formulas may reference a row or column (Ln), values (Vr,c) or positive constants in the formula. 36 GOTO row column Position the display screen with row,column in the upper left 42 SUBTRACT RESULT <-- row/col1 - row/col2 Sutract the second row/col from the first row/col. 43 MULTIPLY RESULT <-- row/col1 * row/col2 Multiply two rows or columns of values. 44 DIVIDE RESULT <-- row/col1 / row/col2 Divide the first row/col by the second row/col. corner of your terminal. 37 PLUG row, column <-- formula Use a formula to calculate results for a particular cell. The formula may reference table values (Vr,c) or constants. 38 FIX Re-computes the current row or column. Use cursor keys to move the data pointer to the right row or column before using FIX. 39 NULLIFY row/col 45 NEGATE RESULT <-- - (row/col) Negate a row or column of values. 46 INVERSE RESULT <-- 1 / (row/col) Compute the inverse for a row or column of values. 47 INTEGER RESULT <-- INT(row/col) Nullify command associated with a row or column. The data in the table is not affected. 40 math: Display math commands. Arithmetic, cumulate, negate, get, floor, ceiling and row and column summations. 41 ADD RESULT <-- row/col1 + row/col2 Add two rows or columns of values.