IMD 1.17: 4/01/2010 17:30:12 software distribution diskette - 2 mbasic rev 5.21 c 1979 microsoft bazic rev 3.03 c 1982 micro mike's   Not a SYSTEM Diskette.   Not a SYSTEM Diskette. BAZIC12 COMjBAZIC14 COMj BAZIC08 COMjBAZIC10 COMjMBASIC COM>#$%&'()*+,-CRT 0021 !"OBASIC COM./0123456RANTEST BAS7MENU 002%ZIPC 002 &FILESET 002 'DISPLAY 002(MERGE 002)SORT 002*+7!5iP)d5)Y5)*D]5)\5)5)E5)432y1510P0w1>2+->21+#"<-S>->26+1)s8+>23+>2)2.+0L*<-[>-N (! ( 8R0*<-:6+(*2-6Å":-:6+(*0-0)*2-#)]ͭ K:(*+" !6(cͥ !)):6#:] (!hiw2+-*<-")-â R"8"!"L+> 2c+z:+- :6+(26+#*<-G26+2)Q(>23+!T(V({8+!"2-20+27+:.+(1*4-N,͙$> !N,(Rc+*4-[6- "4-HBV(:N, (h8: , A7 ܭ d! ,!ͣ! !2+‚:)(5)G ((:x*D++c+!N,6 ͥ(O͕(O2)-25+ w!N,c+!Z(\(_(( _((Q8J 8N:5+  (w#6 G]( ͕(Oc+!N,6 3Å ( ͫ ]( ͫG  (%](:)-(+6 :5+ : G]( ](>G](:5+<25+](>](> b@](V(:7+B*.-(B!N,͒#5" , ,-~; 6,: 6\[ 6(] 6)G # ~ (f" ~ ([" x ((((( ( (~-#>D}~  x -~,~yD2 ,> !nO~ v# ~_ܭ !d!{>7RUNLISTMEMSETSCRAUTOLOADCONTAPPENDRENNSAVE SAVE BYE EDIT DEL PSIZECATLETFORPRINTNEXTIFREADINPUTDATAGOTOGOSUBRETURNDIMSTOPENDRESTOREREMFNDEF!ONINSTATOUTSTATOUTFILLEXITOPENCLOSEWRITECHAINLINEDESTROYCREATEERRSETCLSAPPENDSTEPTOTHENTABELSECHR$ASCVALSTR$NOENDMARKINCHAR$FILESIZEFILEPTRFILECPMFN(*+-/ANDOR>=<=<>=>=<<=>NOT^INTLENCALLRNDSGNSINSQRTATNADDRFREEINPEXAMABSCOSLOGEXPTYP[ ,6#0"-: ,([:- R#(.8*:-(*>-R!*:-S:-*-(S:-! ,[-~O> 22+20+!"D+u ҂"?o&))=  a   m u **  *  &L-MJ1)s8+{#ͭ V(*<-~=ʅ+"B+6 23+24+2\+!"L+z 84I! 3!҅!ͮ!ͳͤw! ! R"8"s:+*<+">+ͣͽ 0(:2--! *<-*:-(/#ͽ !*:- ͮ!>ͽ!"+-W 8(  *+-x2,*<+~‘++͟8 )‘N#F:,̍-~))p DM[0"<+))ͽ ÿ*<+~‘"<+ڂ͋####ڂ͋#ͽ ͮ!>ͽ!###͛'zN"(‚ڂ(!> ͋#"(X͡f!!:F-(>22+0ì "! #~ʂ #\0"( >22+*<+#͘"҂ڂ#))###*<+#͘x(z(&~## (z(7!!F-6A>"<+ <>#Ϳ*B+ͽ0 څ( 8i!>"͐ ͽ0"B+>1Ϳͫ(>"Ϳ8".-(#!>27+?](B27+V(N,(ʹ#8)ͽ8(x ?](> ͐  x !(V( INPUT ERROR-RETYPE " !\  ~ ȸ#*<+~ʑ( (+V+^+"<+~‡ +N+!)B)"<+~($͘ͽ v[<+#x(S<+)͡*<+ͽ w[<+S<+>2/+*@+">+22++V+^+~+"<+V+^+"<+i!ͮ83!D!͛'D!Hͽ3!D!ͮ!!͛'ͮ!(ͽ0!tͽ 8%>24+*<+s8+2)}! |"ċw'u!t"B͋$^(5)$$nw$"5)o>26+8!K#"2-ѧRe*<-")-2+-!\ͶÜ (͛'|N}N N͕(}*+-wͽ:)G͛'z>(@2+!1+!\Ͷ6 ?6 ?6 ?\5) ~ (,‚#͒#ڂ|N.u6  |Sd$ $} B8 z0! "a+!,7͐ >  >('ڂ͋#"V+!S"X+!S"Z+>2\+(:)!F~< G# 5)ͥ(*+-6!!9҅2/+:/+ L͟8 S̈́!<(_03"0-!3O!(m!0 0S:/+ʂ*/+-(( ‚#> ( #ͤ~[<+ !"<+DM!#))#*/+-ʂ!͂!͡!!O 0(3P04c32y1 51 .-y-/#",! ?V(~:) :--(= !Z(V(:=2-- ,W #(V(*,R0#))͙$##~(r  !~(͒#?[R?*:-RNS *<-6":-*:-#w"<+*>-"F+4ʹ24+ >2.+2.+! "4-"6-͒#8"4-ͽ ͒#?|N"6- !:4+ʅ23+24+"<+ÿ K#*<-N# ("## >* 0)K#8 [8-$)*4-[6-*<-Ny=tu ! ʂ̈́#c+W (V(͒#?͊#!͒#?͊# ! R??*:-B#DM o& ,͙$> (!L([<-*:-R#}($|(͒#}02\5)!]6?^ >\5)V(!(!^ (U  ](U  ](= V(>F](# : "͒#8!K#"2-[0-R> *<-")-26+>2+-!!\͹\5)-R!\5)ʐ ͡i!*a+͙*<+R"<+R0$)BK*<+#xS!͡i!!͡>Ϳ0!A0̈́!͡ͽ ڑͮ!Q(!G(24+d*<-ԋ#+"B+E"(0 V( ,%(g@H"(%͡*<+f!$ͥ(G͕(ܘ(ͽ(V(*<+͘"<+#z(͕(Gͥ(ԘF](#:)G:1+V(R"#͒#03!N+Z C  A $ # 6"B09}2P+"I(E(F %͒#8| }!P+0#w2O+!N+~ˎO8"lX!͛'!zN ͥ(l](!͛'!͛'{W!ͥ(*+-r5!~< l# 5)*D]5)\5)lÅ͛'!͛'zNY͛'!͛'s#!͛'B_og :ͳ$u%t&>%Ϳ8͛'!Ͷ5)$w$#!͛'B_o>%Ϳ8'!>Ϳ>&Ϳ"(1͡f!!@-~ 6~#ͽ0>è͘|## > #>|}*<+R"<+#z(~#͛'N{͛'B_o>%Ϳ8'!>&Ϳ0k(!Sw#ͽ0G*a+( SW_*<+!"<+#z( w#Û So&ͅ'i!c$Ͷwf&n%N' ͨ4'$͋6'4!4"4#cͶ~)N(#N N/ "28?EKQ )!Y"0SzNn&ͅ'|!!"a+!,7͐ !F-, (ʹ#څ!F-̈́!L!!\6 ?6 ?6 ?Ͷ5)5)!,0(!( F-ʹ#o!F-̈́!!]!!,0`!!SJ!J!͛'ͽ ͛'!J!͛'zN{%Nͽ ͛'5)JA7Gx" O&($ ( ($ %BK,0Í-͞'B_o#5)~#! n!f"0#Å'͞'B_on!f"'ͅ'K<+H0͌.K<+o&ͅ'[<+͍-f!f!*F+[<+R͞'zNKhb͞'n&Å'͞'Bo!(#8# PY]! BK(]w]w]w]w]w]w>Aw>`igG~ (  # $]!>ɯŷY"0$‚!>"0Sz(BK͜! >Ϳ0!͛'{ͽ!!!͛'{(5)(_ : !͡!E"*<+f!$X"]+7A<<F7T2c-i(*2-":-6q~*:-+:0+(*H+"F+*J+6#6 2+-( :3+ :\+2)Q((!t(:3+d*<-N R(0B#))!{( ,͙$> ! ,(dȹ 7! (\(# FtI!xA*>-+_R^#V+z( ~# ##"J+yͽ!ͮ!7!A0!F-*<+"<+*<+B"<+#*<+ !"<+<2/+*<+ !"<+*<+##!r"<++s*<+#!w"<+*F+R8 *<+R *:-#"<+Å,#)"Â~ #~# !"ͅ'"͒!"$*N+"R+*P+"T+*R+"N+*T+"P+!#"N+ɷ >"" Ϳ"]+G~# ʂW>Ϳ S3!I0)!>ͽ!(%̈́!ͮ!>ͽ!͡i!", ͽ8T͐ )‚>)Ϳ8?ͮ!ͽ!:2+!9!)rDMy*<+#S<+_1)ͮ!*>+"@+>ͿÅ͕#?*<-~7#)+N *4-*<-"0-"8-Ny=7#)+?[6-N#"0-+ ! *<-͕#?6#e!"%-;(?_;(0$N+ɯ2-2- +(( -( >2-S%-"'-+w+;(8'. ;(87;((8 E(C3;(0y$;((8.(y$;(8.(E(@#!-*'-w[%-: -G;(8+(( -( 2-;(0_;(0$;(:-{(D (A #w 0#6ɯ'͵$͵$d͵$ ͵$}B8 BѰx0"[-bk)))*[-_zW"'->2-:O+#(pIʛ%Eʱ%:Py(zNP{Y!)N0#z+{s#r#~#fo^#V#REVISION 11-01-81 COPYRIGHT 1980 MICRO MIKE'S INC.ͅ'*X+i!:+-o&ͅ'*Z+i!2\+{:+*>+"<+*V+###ÿARG"DIMENSION"FUNCTION DEF"OUT OF BOUNDS"TYPE"FORMAT"LINE NUMBER"FILE"HARD DISK"DIVIDE ZERO"SYNTAX"CONTINUE"TOO LARGE OR NO PROGRAM"DOUBLE DEF"CONTROL STACK"MISSING NEXT"READ"INTERNAL STACK OV"INPUT"MEMORY FULL"ARG MISMATCH"ILLEGAL DIRECT"LENGTH"NUMERIC OV"STOP" BLOCKS"READY"PRESS ANY KEY TO CONTINUE" ERROR" IN LINE "!A[?#!0:?#ͅG͒?СO͟ڂ>$Ϳ>,"ݾ+7!!F-ʹ#!F-Ä!>Ϳn#f#:2+ ‘:3+#ÅF-`!([:5):3+:F2+-:\+ ͮ!ͮ!!DM> ʹͤw!++++ ͮ!ͮ!($)*<+R##DMͳͤw!###"H+>20+*J+$)*F+B!"F+# T]w͟ڂʹ: >ݾ(3!0Q ͳͤw!>#3!i##͛')N##N#Fx( (+!!#3!E0)Sa+0)"]+S_+>Ϳ?08͞ RN*]++"]+ͽ8 ͞ RNS_+!*_+RN#"_+"a+7[_+*]+>=*_+*]+*a+͛'N"a+"]+"_+"\ ( !2+‚~=7ȧ###! \!2+ͮͽ "+&#[N+~ 8+kO'c( >"6"+6 $CO'r(*!-:P+G*#-+T]"c -O'>"p #w CP+~(+M0=G+~ ~(xA8)(:P+"%X2Q+:P+<&6"%!-6"+6 ~2-(Aw:P+&~.(#6E#:-+( A%-Dp#_ͬ$:O+# >"w%!-~" 6 %!N+f(=G> !-6"+w"!-+6!~^'A0DG:Q+ !F-ʹ#Ä!͡(O~$8c q yO'~#͡(~(DMS((z_J8'_0, $(=w({'~##jN*<+f!~!T\N(A*%-~2 -#"%-:0?7ͥ( ]( X:)(85)xͥ(*+- 6 5 84!):)("+-~!)>#Ϳ>8-͛'ͽzN{N>#Ϳ>8͛'ͽzN{N2) "~G ʂ](#o$x!j-j- (#o`i ~+b-@-D 8`!VG]- 8 DG!c-#g 0</!b-'w+0!b->'w+# #  !b-AG+(w+  !o-bkw !o-:/!h-+~(OB/>w ~(o-OB/ +]-/1/G~@(#/>)/;ÅG怰c-`! !o+շ'w+} ! ")-!x-+bkw+!q-:/c-!x-/*)-w!q-/*)-o#")-/1/goA(/>//W{怲 '+0B/y!~( P+> >'w+ > 0BP@A%`CeS`E( k0K<+O0͌.͞'+"L+_g_o"L+f!*L+}-0?|g}o"L+#ͅ'K<+O0N/N@G( 1>T-`!T-M-N/T-M-y-:0T-͌.M-T-͍-= !M-`!wM-]!M-N/!M-`!M-`!M-͌.> M-T-!5 1T-͌.8T- (4͍-!T-_5~(w`!(@333#Rc`@'Yc)E'g@w&xgvd?D5u3R"'C9!?q@IsT >#>D}~  x -~,~yD2 ,> !nO~ v# ~_ܭ !d!{>7RUNLISTMEMSETSCRAUTOLOADCONTAPPENDRENNSAVE SAVE BYE EDIT DEL PSIZECATLETFORPRINTNEXTIFREADINPUTDATAGOTOGOSUBRETURNDIMSTOPENDRESTOREREMFNDEF!ONINSTATOUTSTATOUTFILLEXITOPENCLOSEWRITECHAINLINEDESTROYCREATEERRSETCLSAPPENDSTEPTOTHENTABELSECHR$ASCVALSTR$NOENDMARKINCHAR$FILESIZEFILEPTRFILECPMFN(*+-/ANDOR>=<=<>=>=<<=>NOT^INTLENCALLRNDSGNSINSQRTATNADDRFREEINPEXAMABSCOSLOGEXPTYP[ ,6#0"-: ,([:- R#(.8*:-(*>-R!*:-S:-*-(S:-! ,[-~O> 22+20+!"D+u ҂"?o&))=  a   m u **  *  &L-MJ1)s8+{#ͭ V(*<-~=ʅ+"B+6 23+24+2\+!"L+z 84I! 3!҅!ͮ!ͳͤw! ! R"8"s:+*<+">+ͣͽ 0(:2--! *<-*:-(/#ͽ !*:- TB@TBA"+-`!͌.*+-"+-͍-=  PY]! -30v1[8̈́!͞'M-`!M-͌.3]!{2[!@0`!t2[N̈́!K<+2͌.K<+:0͍-[<+(!2T-M-[<+͌.T-[<+͌.M-y-T-y-M-`!M-͌.M-T-!2> 1M-[-!2> 1T-͌.[-y-[-N/:0͍-PY͍-*<+~w͞'{K2D{(2N/.e2<wPbCseÆ8@QA)%FIp"=PDdCubB3(sde?yD CA1b'v`A23N/NN>@BK3[0=N4M-`!:0y-:0y-M-A0͍-M-N/M-`!M-͌.>T-!3 1>[-!3 1T-͌.[-N/2͍-M-͌.o&ͅ'K<+3y-[<+͍-f!CBH@dB1b'v`@s#Ah#p$bP6QyAqC32)AWP#Bdft GRV8B!x5Ä́!2!F-f!͌.y1BK4͍-2-̈́!K<+4N/K<+:0͍-[<+(*<+̈́!͞'C(:-2-!4T-[<+T-͌.[<+M-͌.M-y-T-y-[<+`!K<+͌.K<+M-!4> 1[<+M-͌.M-͌.M-͍-f!:-wpyc&yA1AY&SXA1AAY&SX=fffff3333'>i2'UsB;%p4xDc#7spf'uA87!5iP)d5)Y5)*D]5)\5)5)E5)'5421E10^01>2+->21+#"<-S>->26+1)s8+>23+>2)2.+0L*<-[>-N (! ( 8R0*<-:6+(*2-6Å":-:6+(*0-0)*2-#)]ͭ K:(*+" !6(cͥ !)):6#:] (!hiw2+-*<-")-â R"8"!"L+> 2c+z:+- :6+(26+#*<-G26+2)Q(>23+!T(V({8+!"2-20+27+:.+(1*4-N,͙$> !N,(Rc+*4-[6- "4-HBV(:N, (h8: , A7 ܭ d! ,!ͣ! !2+‚:)(5)G ((:x*D++c+!N,6 ͥ(O͕(O2)-25+ w!N,c+!Z(\(_(( _((Q8J 8N:5+  (w#6 G]( ͕(Oc+!N,6 3Å ( ͫ ]( ͫG  (%](:)-(+6 :5+ : G]( ](>G](:5+<25+](>](> b@](V(:7+B*.-(B!N,͒#5" , ,-~; 6,: 6\[ 6(] 6)G # ~ (f" ~ ([" x ((((( ( (~-/#",! ?V(~:) :--(= !Z(V(:=2-- ,W #(V(*,R0#))͙$##~(r  !~(͒#?[R?*:-RNS *<-6":-*:-#w"<+*>-"F+4ʹ24+ >2.+2.+! "4-"6-͒#8"4-ͽ ͒#?|N"6- !:4+ʅ23+24+"<+ÿ K#*<-N# ("## >* 0)K#8 [8-$)*4-[6-*<-Ny=tu ! ʂ̈́#c+W (V(͒#?͊#!͒#?͊# ! R??*:-B#DM o& ,͙$> (!L([<-*:-R#}($|(͒#}02\5)!]6?^ >\5)V(!(!^ (U  ](U  ](= V(>F](# : "͒#8!K#"2-[0-R> *<-")-26+>2+-!!\͹\5)-R!\5)ʐ ͡i!*a+͙*<+R"<+R0$)BK*<+#xS!͡i!!͡>Ϳ0!M0̈́!͡ͽ ڑͮ!Q(!G(24+d*<-ԋ#+"B+E"(0 V( ,%(g@H"(%͡*<+f!$ͥ(G͕(ܘ(ͽ(V(*<+͘"<+#z(͕(Gͥ(ԘF](#:)G:1+V(R"#͒#03!N+Z C  A $ # 6"B09}2P+"I(E(F %͒#8| }!P+0#w2O+!N+~ˎO8"lX!͛'!zN ͥ(l](!͛'!͛'{W!ͥ(*+-r5!~< l# 5)*D]5)\5)lÅ͛'!͛'zNY͛'!͛'s#!͛'B_og :ͳ$u%t&>%Ϳ8͛'!Ͷ5)$w$#!͛'B_o>%Ϳ8'!>Ϳ>&Ϳ"(1͡f!!@-~ 6~#ͽ0>è͘|## > #>|}*<+R"<+#z(~#͛'N{͛'B_o>%Ϳ8'!>&Ϳ0k(!Sw#ͽ0G*a+( SW_*<+!"<+#z( w#Û So&ͅ'i!c$Ͷwf&n%N' ͨ4'$͋6'4!4"4#cͶ~)N(#N V/ "28?EKQ )!Y"0SzNn&ͅ'|!!"a+!,7͐ !G-, (ʹ#څ!G-̈́!L!!\6 ?6 ?6 ?Ͷ5)5)!50(!( G-ʹ#o!G-̈́!!]!!50`!!SJ!J!͛'ͽ ͛'!J!͛'zN{%Nͽ ͛'5)JA7Gx" O&($ ( ($ %BK50Õ-͞'B_o#5)~#! n!f"0#Å'͞'B_on!f"'ͅ'K<+U0͔.K<+o&ͅ'[<+͕-f!f!*F+[<+R͞'zNKhb͞'n&Å'͞'Bo!(#8# PY]! BK(]w]w]w]w]w]w>Aw>`igG~ (  # $]!>ɯŷY"0$‚!>"0Sz(BK͜! >Ϳ0!͛'{ͽ!!!͛'{(5)(_ : !͡!E"*<+f!$X"]+7A<<F7T2c-i(*2-":-6q~*:-+:0+(*H+"F+*J+6#6 2+-( :3+ :\+2)Q((!t(:3+d*<-N R(0B#))!{( ,͙$> ! ,(dͮ!>ͽ!"+-W 8(  *+-x2,*<+~‘++͟8 )‘N#F:,̕-~))p DM[0"<+ ))ͽ ÿ*<+~‘"<+ڂ͋####ڂ͋#ͽ ͮ!>ͽ!###͛'zN"(‚ڂ(!> ͋#"(X͡f!!:G-(>22+0ì "! #~ʂ #\0"( >22+*<+#͘"҂ڂ#))###*<+#͘x(z(&~## (z(7!!G-6A>"<+ <>#Ϳ*B+ͽ0 څ( 8i!>"͐ ͽ0"B+>1Ϳͫ(>"Ϳ8".-(#!>27+?](B27+V(N,(ʹ#8)ͽ8(x ?](> ͐  x !(V( INPUT ERROR-RETYPE " !\  ~ ȸ#*<+~ʑ( (+V+^+"<+~‡ +N+!)B)"<+~($͘ͽ v[<+#x(S<+)͡*<+ͽ w[<+S<+>2/+*@+">+22++V+^+~+"<+V+^+"<+i!ͮ83!D!͛'D!Hͽ3!D!ͮ!!͛'ͮ!(ͽ0!tͽ 8%>24+*<+s8+2)}! |"ċw'u!t"B͋$^(5)$$nw$"5)o>26+8!K#"2-ѧRe*<-")-2+-!\ͶÜ (͛'|N}N N͕(}*+-wͽ:)G͛'z>(@2+!1+!\Ͷ6 ?6 ?6 ?\5) ~ (,‚#͒#ڂ|N.u6  |Sd$ $} B8 z0! "a+!,7͐ >  >('ڂ͋#"V+!S"X+!S"Z+>2\+(:)!F~< G# 5)ͥ(*+-6!!9҅2/+:/+ L͟8 S̈́!<(_03"0-!3O!(m!0 0S:/+ʂ*/+-(( ‚#> ( #ͤ~[<+ !"<+DM!#))#*/+-ʂ!͂!͡!!O 0(4^0'5c421 E1 .--ͅ'*X+i!:+-o&ͅ'*Z+i!2\+{:+*>+"<+*V+###ÿARG"DIMENSION"FUNCTION DEF"OUT OF BOUNDS"TYPE"FORMAT"LINE NUMBER"FILE"HARD DISK"DIVIDE ZERO"SYNTAX"CONTINUE"TOO LARGE OR NO PROGRAM"DOUBLE DEF"CONTROL STACK"MISSING NEXT"READ"INTERNAL STACK OV"INPUT"MEMORY FULL"ARG MISMATCH"ILLEGAL DIRECT"LENGTH"NUMERIC OV"STOP" BLOCKS"READY"PRESS ANY KEY TO CONTINUE" ERROR" IN LINE "!A[?#!0:?#ͅG͒?СO͟ڂ>$Ϳ>,"ݾ+7!!G-ʹ#!G-Ä!>Ϳn#f#:2+ ‘:3+#ÅG-`!([:5):3+:F2+-:\+ ͮ!ͮ!!DM> ʹͤw!++++ ͮ!ͮ!($)*<+R##DMͳͤw!###"H+>20+*J+$)*F+B!"F+# T]w͟ڂʹ: >ݾ(3!0Q ͳͤw!>#3!i##͛')N##N#Fx( (+!!#3!E0)Sa+0)"]+S_+>Ϳ?08͞ RN*]++"]+ͽ8 ͞ RNS_+!*_+RN#"_+"a+7[_+*]+>=*_+*]+*a+͛'N"a+"]+"_+"\ ( !2+‚~=7ȧ###! \!2+ͮͽ "+&#[N+~ 8+kO'c( >"6"+6 $CO'r(*!-:P+G*#-+T]"c -O'>"p #wCP+~(+O0=G+~ ~(xA8)(:P+"%X2Q+:P+<&6"%!-6"+6 ~2-(Aw:P+&~.(#6E#:-+( A%-Dp#_ͬ$:O+# >"w%!-~" 6 %!N+f(=G> !-6"+w"!-+6!~^'A0DG:Q+ !G-ʹ#Ä!͡(O~$8c q yO'~#͡(~(DmS((z_J8'_0, $(=w({'~##jN*<+f!~!T\N(A*%-~2 -#"%-:0?7ͥ( ]( X:)(85)xͥ(*+- 6 5 84!):)("+-~!)>#Ϳ>8-͛'ͽzN{N>#Ϳ>8͛'ͽzN{N2) "~G ʂ](#o$x!p-p- (#o`i ~+g-@-D8`!VGa- 8 D G!h-D/!h-~P0g-F+2.'+8>#g0<%/!g-'w+0!g->'w+# #  !g-AD/ xw~.6g- >G+(w+  !v-bkw!v-B/!n-+~(OJ/>w ~(v-OJ/ +a-09/G~@(+/>1/;ÅG怰h-`! !o+շ'w+} ! ")-!-+bkw+!x-B/h-!-/*)-w!x-/*)-o#")-09/goA(/>/%/W{怲 '+0J/y!~( P+> >'w+ > 0BP@A%`CeS`E( y0K<+]0͔.͞'+"L+_g_o"L+f!*L+}-0?|g}o"L+#ͅ'K<+]0V/N@G(1>W-`!W-O-V/W-O-́-E0W-͔.O-W-͕-= ȹ 7! (\(# FtI!xA*>-+_R^#V+z( ~# ##"J+yͽ!ͮ!7!M0!G-*<+"<+*<+B"<+#*<+ !"<+<2/+*<+ !"<+*<+##!r"<++s*<+#!w"<+*F+R8 *<+R *:-#"<+Å,#)"Â~ #~# !"ͅ'"͒!"$*N+"R+*P+"T+*R+"N+*T+"P+!#"N+ɷ >"" Ϳ"]+G~# ʂW>Ϳ S3!I0)!>ͽ!(%̈́!ͮ!>ͽ!͡i!", ͽ8T͐ )‚>)Ϳ8?ͮ!ͽ!:2+!9!)rDMy*<+#S<+_1)ͮ!*>+"@+>ͿÅ͕#?*<-~7#)+N *4-*<-"0-"8-Ny=7#)+?[6-N#"0-+ ! *<-͕#?6#e!"%-;(?_;(0$N+ɯ2-2-+(( -( >2-S%-"'-+w+;(8'. ;(87;((8 E(C3;(0y$;((8.(y$;(8.(E(@#!-*'-w[%-: -G;(8+(( -( 2-;(0_;(0$;(:-{(D (A #w0#6ɯ'͵$͵$d͵$ ͵$}B8 BѰx0"_-bk)))*_-_zW"'->2-:O+#(pIʛ%Eʱ%:Py(zNP{Y!)N0#z+{s#r#~#fo^#V#REVISION 11-01-81 COPYRIGHT 1980 MICRO MIKE'S INC.!O-`!wTB@TBA"+-`!͔.*+-"+-͕-=  PY]! -=01[8̈́!͞'O-`!O-͔.3]!2[!L0`!2[N̈́!K<+2͔.K<+E0͕-[<+(!2W-O-[<+͔.W-[<+͔.O-́-W-́-O-`!O-͔.O-W-!2>1O-_-!2>1W-͔._-́-_-V/E0͕-PY͕-*<+~w͞'{[2D{(2V/.u2<wPbCseÆ8P@QA)%FIp"=PDdCubB3(sdeA?yD bCA1b'v`A23V/NN>@BK3[0=N4O-`!E0́-E0́-O-M0͕-O-V/O-`!O-͔.>W-!31>_-!31W-͔._-V/2͕-O-͔.o&ͅ'K<+3́-[<+͕-f!CBH%@dB1b'v`@s#Ah#p$bP6QyAqC32&)AWP##Bdft CGRV8sB!x5VÄ́!2!G-f!͔.É1BK4͕-2-̈́!K<+4V/K<+E0͕-[<+(*<+̈́!͞'C(:-2-!4W-[<+W-͔.[<+O-͔.O-́-W-́-[<+`!K<+͔.K<+O-!&5>1[<+O-͔.O-͔.O-͕-f!:-wpyc&yIA1AY&SXA1AAY&SX$=ffffff3333'Y>7!5iP)d5)Y5)*D]5)\5)5)E5)p432Y11040W1>2+->21+#"<-S>->26+1)s8+>23+>2)2.+0L*<-[>-N (! ( 8R0*<-:6+(*2-6Å":-:6+(*0-0)*2-#)]ͭ K:(*+" !6(cͥ !)):6#:] (!hiw2+-*<-")-â R"8"!"L+> 2c+z:+- :6+(26+#*<-G26+2)Q(>23+!T(V({8+!"2-20+27+:.+(1*4-N,͙$> !N,(Rc+*4-[6- "4-HBV(:N, (h8: , A7 ܭ d! ,!ͣ! !2+‚:)(5)G ((:x*D++c+!N,6 ͥ(O͕(O2)-25+ w!N,c+!Z(\(_(( _((Q8J 8N:5+  (w#6 G]( ͕(Oc+!N,6 3Å ( ͫ ]( ͫG  (%](:)-(+6 :5+ : G]( ](>G](:5+<25+](>](> b@](V(:7+B*.-(B!N,͒#5" , ,-~; 6,: 6\[ 6(] 6)G # ~ (f" ~ ([" x ((((( ( (~-/#",! ?V(~:) :--(= !Z(V(:=2-- ,W #(V(*,R0#))͙$##~(r  !~(͒#?[R?*:-RNS *<-6":-*:-#w"<+*>-"F+4ʹ24+ >2.+2.+! "4-"6-͒#8"4-ͽ ͒#?|N"6- !:4+ʅ23+24+"<+ÿ K#*<-N# ("## >* 0)K#8 [8-$)*4-[6-*<-Ny=tu ! ʂ̈́#c+W (V(͒#?͊#!͒#?͊# ! R??*:-B#DM o& ,͙$> (!L([<-*:-R#}($|(͒#}02\5)!]6?^ >\5)V(!(!^ (U  ](U  ](= V(>F](# : "͒#8!K#"2-[0-R> *<-")-26+>2+-!!\͹\5)-R!\5)ʐ ͡i!*a+͙*<+R"<+R0$)BK*<+#xS!͡i!!͡>Ϳ0!)0̈́!͡ͽ ڑͮ!i2"'UsB;%p4qxDc#7spf'uA8O-]!O-V/!O-`!O-`!O-͔.> O-W-!51W-͔.8W- (4͕-!W-5~(w`!(#@333#RHc`P@'Yc)E'gH@w&xPgvd?D5u3R"'C9!P?q@IsT >0#>D}~  x -~,~yD2 ,> !nO~ v# ~_ܭ !d!{>7RUNLISTMEMSETSCRAUTOLOADCONTAPPENDRENNSAVE SAVE BYE EDIT DEL PSIZECATLETFORPRINTNEXTIFREADINPUTDATAGOTOGOSUBRETURNDIMSTOPENDRESTOREREMFNDEF!ONINSTATOUTSTATOUTFILLEXITOPENCLOSEWRITECHAINLINEDESTROYCREATEERRSETCLSAPPENDSTEPTOTHENTABELSECHR$ASCVALSTR$NOENDMARKINCHAR$FILESIZEFILEPTRFILECPMFN(*+-/ANDOR>=<=<>=>=<<=>NOT^INTLENCALLRNDSGNSINSQRTATNADDRFREEINPEXAMABSCOSLOGEXPTYP[ ,6#0"-: ,([:- R#(.8*:-(*>-R!*:-S:-*-(S:-! ,[-~O> 22+20+!"D+u ҂"?o&))=  a <  m u **  *  &L-MJ1)s8+{#ͭ V(*<-~=ʅ+"B+6 23+24+2\+!"L+z 84I! 3!҅!ͮ!ͳͤw! ! R"8"s:+*<+">+ͣͽ 0(:2--! *<-*:-(/#ͽ !*:-  ͮ!>ͽ!"+-W 8(  *+-x2,*<+~‘++͟8 )‘N#F:,}-~))p DM[0"<+))ͽ ÿ*<+~‘"<+ڂ͋####ڂ͋#ͽ ͮ!>ͽ!###͛'zN"(‚ڂ(!> ͋#"(X͡f!!:D-(>22+0ì "! #~ʂ #\0"( >22+*<+#͘"҂ڂ#))###*<+#͘x(z(&~## (z(7!!D-6A>"<+ <>#Ϳ*B+ͽ0 څ( 8i!>"͐ ͽ0"B+>1Ϳͫ(>"Ϳ8".-(#!>27+?](B27+V(N,(ʹ#8)ͽ8(x ?](> ͐  x !(V( INPUT ERROR-RETYPE " !\  ~ ȸ#*<+~ʑ( (+V+^+"<+~‡ +N+!)B)"<+~($͘ͽ v[<+#x(S<+)͡*<+ͽ w[<+S<+>2/+*@+">+22++V+^+~+"<+V+^+"<+i!ͮ83!D!͛'D!Hͽ3!D!ͮ!!͛'ͮ!(ͽ0!tͽ 8%>24+*<+s8+2)}! |"ċw'u!t"B͋$^(5)$$nw$"5)o>26+8!K#"2-ѧRe*<-")-2+-!\ͶÜ (͛'|N}N N͕(}*+-wͽ:)G͛'z>(@2+!1+!\Ͷ6 ?6 ?6 ?\5) ~ (,‚#͒#ڂ|N.u6  |Sd$ $} B8 z0! "a+!,7͐ >  >('ڂ͋#"V+!S"X+!S"Z+>2\+(:)!F~< G# 5)ͥ(*+-6!!9҅2/+:/+ L͟8 S̈́!<(_03"0-!3O!(m!0 0S:/+ʂ*/+-(( ‚#> ( #ͤ~[<+ !"<+DM!#))#*/+-ʂ!͂!͡!!O 0(340p4c32Y1 1 |.}-i-ͅ'*X+i!:+-o&ͅ'*Z+i!2\+{:+*>+"<+*V+###ÿARG"DIMENSION"FUNCTION DEF"OUT OF BOUNDS"TYPE"FORMAT"LINE NUMBER"FILE"HARD DISK"DIVIDE ZERO"SYNTAX"CONTINUE"TOO LARGE OR NO PROGRAM"DOUBLE DEF"CONTROL STACK"MISSING NEXT"READ"INTERNAL STACK OV"INPUT"MEMORY FULL"ARG MISMATCH"ILLEGAL DIRECT"LENGTH"NUMERIC OV"STOP" BLOCKS"READY"PRESS ANY KEY TO CONTINUE" ERROR" IN LINE "!A[?#!0:?#ͅG͒?СO͟ڂ>$Ϳ>,"ݾ+7!!D-ʹ#!D-Ä!>Ϳn#f#:2+ ‘:3+#ÅD-`!([:5):3+:F2+-:\+ ͮ!ͮ!!DM> ʹͤw!++++ ͮ!ͮ!($)*<+R##DMͳͤw!###"H+>20+*J+$)*F+B!"F+# T]w͟ڂʹ: >ݾ(3!0Qͳͤw!>#3!i##͛')N##N#Fx( (+!!#3!E0)Sa+0)"]+S_+>Ϳ?08͞ RN*]++"]+ͽ8 ͞ RNS_+!*_+RN#"_+"a+7[_+*]+>=*_+*]+*a+͛'N"a+"]+"_+"\ ( !2+‚~=7ȧ###! \!2+ͮͽ "Q(!G(24+d*<-ԋ#+"B+E"(0 V( ,%(g@H"(%͡*<+f!$ͥ(G͕(ܘ(ͽ(V(*<+͘"<+#z(͕(Gͥ(ԘF](#:)G:1+V(R"#͒#03!N+Z C  A $ # 6"B09}2P+"I(E(F %͒#8| }!P+0#w2O+!N+~ˎO8"lX!͛'!zN ͥ(l](!͛'!͛'{W!ͥ(*+-r5!~< l# 5)*D]5)\5)lÅ͛'!͛'zNY͛'!͛'s#!͛'B_og :ͳ$u%t&>%Ϳ8͛'!Ͷ5)$w$#!͛'B_o>%Ϳ8'!>Ϳ>&Ϳ"(1͡f!!@-~ 6~#ͽ0>è͘|## > #>|}*<+R"<+#z(~#͛'N{͛'B_o>%Ϳ8'!>&Ϳ0k(!Sw#ͽ0G*a+( SW_*<+!"<+#z( w#Û So&ͅ'i!c$Ͷwf&n%N' ͨ4'$͋6'4!4"4#cͶ~)N(#N >/ "28?EKQ )!Y"0SzNn&ͅ'|!!"a+!,7͐ !D-, (ʹ#څ!D-̈́!L!!\6 ?6 ?6 ?Ͷ5)5)!0(!( D-ʹ#o!D-̈́!!]!!0`!!SJ!J!͛'ͽ ͛'!J!͛'zN{%Nͽ ͛'5)JA7Gx"O&($ ( ($ %BK0}-͞'B_o#5)~#! n!f"0#Å'͞'B_on!f"'ͅ'K<+.0|.K<+o&ͅ'[<+}-f!f!*F+[<+R͞'zNKhb͞'n&Å'͞'Bo!(#8# PY]! BK(]w]w]w]w]w]w>Aw>`igG~ (  # $]!>ɯŷY"0$‚!>"0Sz(BK͜! >Ϳ0!͛'{ͽ!!!͛'{(5)(_ : !͡!E"*<+f!$X"]+7A<<F7T2c-i(*2-":-6q~*:-+:0+(*H+"F+*J+6#6 2+-( :3+ :\+2)Q((!t(:3+d*<-N R(0B#))!{( ,͙$> ! ,(d ȹ 7! (\(# FtI!xA*>-+_R^#V+z( ~# ##"J+yͽ!ͮ!7!)0!D-*<+"<+*<+B"<+#*<+ !"<+<2/+*<+ !"<+*<+##!r"<++s*<+#!w"<+*F+R8 *<+R *:-#"<+Å,#)"Â~ #~# !"ͅ'"͒!"$*N+"R+*P+"T+*R+"N+*T+"P+!#"N+ɷ >"" Ϳ"]+G~# ʂW>Ϳ S3!I0)!>ͽ!(%̈́!ͮ!>ͽ!͡i!", ͽ8T͐ )‚>)Ϳ8?ͮ!ͽ!:2+!9!)rDMy*<+#S<+_1)ͮ!*>+"@+>ͿÅ͕#?*<-~7#)+N *4-*<-"0-"8-Ny=7#)+?[6-N#"0-+ ! *<-͕#?6#e!"%-;(?_;(0$N+ɯ2-2- +(( -( >2-S%-"'-+w+;(8'. ;(87;((8 E(C3;(0y$;((8.(y$;(8.(E(@#!-*'-w[%-: -G;(8+(( -( 2-;(0_;(0$;(:-{(D (A #w/#6ɯ'͵$͵$d͵$ ͵$}B8 BѰx0"S-bk)))*S-_zW"'->2-:O+#(pIʛ%Eʱ%:Py(zNP{Y!)N0#z+{s#r#~#fo^#V#REVISION 11-01-81 COPYRIGHT 1980 MICRO MIKE'S INC."+-}-=  PY]! -0V1[8̈́!͞'I-`!I-|.q3]!W2[!(0`!R2[N̈́!K<+\2|.K<+$0}-[<+(!f2N- I-[<+|.N-[<+|.I-i-N-i-I-`!I-|.I-N-!p2>0I-S-!2>0N-|.S-i-S->/$0}-PY}-*<+~w͞'{+2D{(2>/|.E2<wPbCseÆ@QA)%FI=$8C 2BDCA1b'vA͐2C3>/NN>@BKM3[0=N4I-`!$0i-$0i-I-)0}-I->/I-`!I-|.>N-!\30>S-!p30N-|.S->/\2}-I-|.o&ͅ'K<+H3i-[<+}-f!CBH@dB1b'v@)h1cIAg5`iBÄ́!ͅ2!D-f!|.Y1BKL4}-2-̈́!K<+Q4>/K<+$0}-[<+(*<+̈́!͞'C(:-2-![4N- [<+N-|.[<+I-|.I-i-N-i-[<+`!K<+|.K<+I-!o4>0[<+I-|.I-|.I-}-f!:-wpycA1AY&A1AAY&SX=ffW3Q>t&0;A8I-]!I->/!I-`!I-`!I-|.> I-N-!50N-|.8N- (L4}-!N-4~(w`!@333#@'YE@w&g+&#[N+~ 8+kO'c( >"6"+6 $CO'r(*!-:P+G*#-+T]"c -O'>"p #wCP+~(+I0=G+~ ~(xA8)(:P+"%X2Q+:P+<&6"%!-6"+6 ~2-(Aw:P+&~.(#6E#:-+( A%-Dp#_ͬ$:O+# >"w%!-~" 6 %!N+f(=G> !-6"+w"!-+6!~^'A0DG:Q+ !D-ʹ#Ä!͡(O~$8c q yO'~#͡(~(DMS((z_J8'_0, $(=w({'~##jN*<+f!~!T\N(A*%-~2 -#"%-:0?7ͥ( ]( X:)(85)xͥ(*+- 6 5 84!):)("+-~!)>#Ϳ>8-͛'ͽzN{N>#Ϳ>8͛'ͽzN{N2) "~G ʂ](#o$x!^-^- (#o`i ~+X-@-D 8`!VGU- 8 DG!Y-,/!Y-~P/X-F+.'+8>#g/< /!X-'w+0!X->'w+# #  !X-A,/ xwf.6X- >G+(w+  !a-bkw!a-*/!\-+~(O2/>w ~(a-O2/ +U-/!/G~@(/>/;ÅG怰Y-`! !o+շ'w+} ! ")-!h-+bkw+!c-*/Y-!h-/*)-w!c-/*)-o#")-/!/goA(/>/ /W{怲 '+02/y!~( P+> >'w+ > 0BP@A%`CeS`E( O0K<+30|.͞'+"L+_g_o"L+f!*L+}-g0?|g}o"L+#ͅ'K<+30>/N@G(0>N-`!N-I->/N-I-i-$0N-|.I-N-}-= !I-`!wTB@TBA"+-`!|.*+- ?D5u3"'C?q@IT>~#>D}~  x -~,~yD2 ,> !nO~ v# ~_ܭ !d!{>7RUNLISTMEMSETSCRAUTOLOADCONTAPPENDRENNSAVE SAVE BYE EDIT DEL PSIZECATLETFORPRINTNEXTIFREADINPUTDATAGOTOGOSUBRETURNDIMSTOPENDRESTOREREMFNDEF!ONINSTATOUTSTATOUTFILLEXITOPENCLOSEWRITECHAINLINEDESTROYCREATEERRSETCLSAPPENDSTEPTOTHENTABELSECHR$ASCVALSTR$NOENDMARKINCHAR$FILESIZEFILEPTRFILECPMFN(*+-/ANDOR>=<=<>=>=<<=>NOT^INTLENCALLRNDSGNSINSQRTATNADDRFREEINPEXAMABSCOSLOGEXPTYP[ ,6#0"-: ,([:- R#(.8*:-(*>-R!*:-S:-*-(S:-! ,[-~O> 22+20+!"D+u ҂"?o&))=  a   m u **  *  &L-MJ1)s8+{#ͭ V(*<-~=ʅ+"B+6 23+24+2\+!"L+z 84I! 3!҅!ͮ!ͳͤw! ! R"8"s:+*<+">+ͣͽ 0(:2--! *<-*:-(/#ͽ !*:- ͮ!>ͽ!"+-W 8(  *+-x2,*<+~‘++͟8 )‘N#F:,̅-~))p DM[0"<+))ͽ ÿ*<+~‘"<+ڂ͋####ڂ͋#ͽ ͮ!>ͽ!###͛'zN"(‚ڂ(!> ͋#"(X͡f!!:E-(>22+0ì "! #~ʂ #\0"( >22+*<+#͘"҂ڂ#))###*<+#͘x(z(&~## (z(7!!E-6A>"<+ <>#Ϳ*B+ͽ0 څ( 8i!>"͐ ͽ0"B+>1Ϳͫ(>"Ϳ8".-(#!>27+?](B27+V(N,(ʹ#8)ͽ8(x ?](> ͐  x !(V( INPUT ERROR-RETYPE " !\  ~ ȸ#*<+~ʑ( (+V+^+"<+~‡ +N+!)B)"<+~($͘ͽ v[<+#x(S<+)͡*<+ͽ w[<+S<+>2/+*@+">+22++V+^+~+"<+V+^+"<+i!ͮ83!D!͛'D!Hͽ3!D!ͮ!!͛'ͮ!(ͽ0!tͽ 8%>24+*<+s8+2)7!`5iP)d5)Y5)*D]5)\5)5)E5)432i1%10B0g1>2+->21+#"<-S>->26+1)s8+>23+>2)2.+0L*<-[>-N (! ( 8R0*<-:6+(*2-6Å":-:6+(*0-0)*2-#)]ͭ K:(*+" !6(cͥ !)):6#:] (!hiw2+-*<-")-â R"8"!"L+> 2c+z:+- :6+(26+#*<-G26+2)Q(>23+!T(V({8+!"2-20+27+:.+(1*4-N,͙$> !N,(Rc+*4-[6- "4-HBV(:N, (h8: , A7 ܭ d! ,!ͣ! !2+‚:)(5)G ((:x*D++c+!N,6 ͥ(O͕(O2)-25+ w!N,c+!Z(\(_(( _((Q8J 8N:5+  (w#6 G]( ͕(Oc+!N,6 3Å ( ͫ ]( ͫG  (%](:)-(+6 :5+ : G]( ](>G](:5+<25+](>](> b@](V(:7+B*.-(B!N,͒#5" , ,-~; 6,: 6\[ 6(] 6)G # ~ (f" ~ ([" x ((((( ( (~-/#",! ?V(~:) :--(= !Z(V(:=2-- ,W #(V(*,R0#))͙$##~(r  !~(͒#?[R?*:-RNS *<-6":-*:-#w"<+*>-"F+4ʹ24+ >2.+2.+! "4-"6-͒#8"4-ͽ ͒#?|N"6- !:4+ʅ23+24+"<+ÿ K#*<-N# ("## >* 0)K#8 [8-$)*4-[6-*<-Ny=tu ! ʂ̈́#c+W (V(͒#?͊#!͒#?͊# ! R??*:-B#DM o& ,͙$> (!L([<-*:-R#}($|(͒#}02\5)!]6?^ >\5)V(!(!^ (U  ](U  ](= V(>F](# : "͒#8!K#"2-[0-R> *<-")-26+>2+-!!\͹\5)-R!\5)ʐ ͡i!*a+͙*<+R"<+R0$)BK*<+#xS!͡i!!͡>Ϳ0!50̈́!͡ͽ ڑͮ! Q(!G(24+d*<-ԋ#+"B+E"(0 V( ,%(g@H"(%͡*<+f!$ͥ(G͕(ܘ(ͽ(V(*<+͘"<+#z(͕(Gͥ(ԘF](#:)G:1+V(R"#͒#03!N+Z C  A $ # 6"B09}2P+"I(E(F %͒#8| }!P+0#w2O+!N+~ˎO8"lX!͛'!zN ͥ(l](!͛'!͛'{W!ͥ(*+-r5!~< l# 5)*D]5)\5)lÅ͛'!͛'zNY͛'!͛'s#!͛'B_og :ͳ$u%t&>%Ϳ8͛'!Ͷ5)$w$#!͛'B_o>%Ϳ8'!>Ϳ>&Ϳ"(1͡f!!@-~ 6~#ͽ0>è͘|## > #>|}*<+R"<+#z(~#͛'N{͛'B_o>%Ϳ8'!>&Ϳ0k(!Sw#ͽ0G*a+( SW_*<+!"<+#z( w#Û So&ͅ'i!c$Ͷwf&n%N' ͨ4'$͋6'4!4"4#cͶ~)N(#N F/ "28?EKQ )!Y"0SzNn&ͅ'|!!"a+!,7͐ !E-, (ʹ#څ!E-̈́!L!!\6 ?6 ?6 ?Ͷ5)5)!#0(!( E-ʹ#o!E-̈́!!]!!#0`!!SJ!J!͛'ͽ ͛'!J!͛'zN{%Nͽ ͛'5)JA7Gx" O&($ ( ($ %BK#0Å-͞'B_o#5)~#! n!f"0#Å'͞'B_on!f"'ͅ'K<+;0̈́.K<+o&ͅ'[<+ͅ-f!f!*F+[<+R͞'zNKhb͞'n&Å'͞'Bo!(#8# PY]! BK(]w]w]w]w]w]w>Aw>`igG~ (  # $]!>ɯŷY"0$‚!>"0Sz(BK͜! >Ϳ0!͛'{ͽ!!!͛'{(5)(_ : !͡!E"*<+f!$X"]+7A<<F7T2c-i(*2-":-6q~*:-+:0+(*H+"F+*J+6#6 2+-( :3+ :\+2)Q((!t(:3+d*<-N R(0B#))!{( ,͙$> ! ,(dȹ 7! (\(# FtI!xA*>-+_R^#V+z( ~# ##"J+yͽ!ͮ!7!50!E-*<+"<+*<+B"<+#*<+ !"<+<2/+*<+ !"<+*<+##!r"<++s*<+#!w"<+*F+R8 *<+R *:-#"<+Å,#)"Â~ #~# !"ͅ'"͒!"$*N+"R+*P+"T+*R+"N+*T+"P+!#"N+ɷ >"" Ϳ"]+G~# ʂW>Ϳ S3!I0)!>ͽ!(%̈́!ͮ!>ͽ!͡i!", ͽ8T͐ )‚>)Ϳ8?ͮ!ͽ!:2+!9!)rDMy*<+#S<+_1)ͮ!*>+"@+>ͿÅ͕#?*<-~7#)+N *4-*<-"0-"8-Ny=7#)+?[6-N#"0-+ ! *<-͕#?6#e!"%-;(?_;(0$N+ɯ2-2- +(( -( >2-S%-"'-+w+;(8'. ;(87;((8 E(C3;(0y$;((8.(y$;(8.(E(@#!-*'-w[%-: -G;(8+(( -( 2-;(0_;(0$;(:-{(D (A #w0#6ɯ'͵$͵$d͵$ ͵$}B8 BѰx0"W-bk)))*W-_zW"'->2-:O+#(pIʛ%Eʱ%:P}! |"ċw'u!t"B͋$^(5)$$nw$"5)o>26+8!K#"2-ѧRe*<-")-2+-!\ͶÜ (͛'|N}N N͕(}*+-wͽ:)G͛'z>(@2+!1+!\Ͷ6 ?6 ?6 ?\5) ~ (,‚#͒#ڂ|N.u6  |Sd$ $} B8 z0! "a+!,7͐ >  >('ڂ͋#"V+!S"X+!S"Z+>2\+(:)!F~< G# 5)ͥ(*+-6!!9҅2/+:/+ L͟8 S̈́!<(_03"0-!3O!(m!0 0S:/+ʂ*/+-(( ‚#> ( #ͤ~[<+ !"<+DM!#))#*/+-ʂ!͂!͡!!O 0(3B04c32i1 %1 .-q-ͅ'*X+i!:+-o&ͅ'*Z+i!2\+{:+*>+"<+*V+###ÿARG"DIMENSION"FUNCTION DEF"OUT OF BOUNDS"TYPE"FORMAT"LINE NUMBER"FILE"HARD DISK"DIVIDE ZERO"SYNTAX"CONTINUE"TOO LARGE OR NO PROGRAM"DOUBLE DEF"CONTROL STACK"MISSING NEXT"READ"INTERNAL STACK OV"INPUT"MEMORY FULL"ARG MISMATCH"ILLEGAL DIRECT"LENGTH"NUMERIC OV"STOP" BLOCKS"READY"PRESS ANY KEY TO CONTINUE" ERROR" IN LINE "!A[?#!0:?#ͅG͒?СO͟ڂ>$Ϳ>,"ݾ+7!!E-ʹ#!E-Ä!>Ϳn#f#:2+ ‘:3+#ÅE-`!([:5):3+:F2+-:\+ ͮ!ͮ!!DM> ʹͤw!++++ ͮ!ͮ!($)*<+R##DMͳͤw!###"H+>20+*J+$)*F+B!"F+# T]w͟ڂʹ: >ݾ(3!0Q ͳͤw!>#3!i##͛')N##N#Fx( (+!!#3!E0)Sa+0)"]+S_+>Ϳ?08͞ RN*]++"]+ͽ8 ͞ RNS_+!*_+RN#"_+"a+7[_+*]+>=*_+*]+*a+͛'N"a+"]+"_+"\ ( !2+‚~=7ȧ###! \!2+ͮͽ " +&#[N+~ 8+kO'c( >"6"+6 $CO'r(*!-:P+G*#-+T]"c -O'>"p #w CP+~(+K0=G+~ ~(xA8)(:P+"%X2Q+:P+<&6"%!-6"+6 ~2-(Aw:P+&~.(#6E#:-+( A%-Dp#_ͬ$:O+# >"w%!-~" 6 %!N+f(=G> !-6"+w"!-+6!~^'A0DG:Q+ !E-ʹ#Ä!͡(O~$8c q yO'~#͡(~(DMS((z_J8'_0, $(=w({'~##jN*<+f!~!T\N(A*%-~2 -#"%-:0?7ͥ( ]( X:)(85)xͥ(*+- 6 5 84!):)("+-~!)>#Ϳ>8-͛'ͽzN{N>#Ϳ>8͛'ͽzN{N2) "~G ʂ](#o$x!d-d- (#o`i ~+]-@-D 8`!VGY- 8 DG!^-4/!^-~P0]-F+".'+8>#g0</!]-'w+0!]->'w+# #  !]-A4/ x wn.6]- >G+(w+  !h-bkw !h-2/!b-+~(O:/>w ~(h-O:/ +Y-/)/G~@(/>!/;ÅG怰^-`! !o+շ'w+} ! ")-!p-+bkw+!j-2/^-!p-/*)-w!j-/*)-o#")-/)/goA(/>//W{怲 '+0:/y!~( P+> >'w+ > 0BP@A%`CeS`E( ]0K<+A0̈́.͞'+"L+_g_o"L+f!*L+}-u0?|g}o"L+#ͅ'K<+A0F/N@G(0>Q-`!Q-K-F/Q-K-q-/0Q-̈́.K-Q-ͅ-= !K-`!wTB@TBA"+-(r4ͅ-!Q-5~(w`!@333#c@'YcE'@w&gv?D5u3"'C9?q@IT >ey(zNP{Y!)N0#z+{s#r#~#fo^#V#REVISION 11-01-81 COPYRIGHT 1980 MICRO MIKE'S INC.`!̈́.*+-"+-ͅ-=  PY]! -)0f1[8̈́!͞'K-`!K-̈́.Ö3]!i2[!40`!c2[N̈́!K<+o2̈́.K<+/0ͅ-[<+(!{2Q- K-[<+̈́.Q-[<+̈́.K-q-Q-q-K-`!K-̈́.K-Q-!2>0K-W-!2>0Q-̈́.W-q-W-F//0ͅ-PYͅ-*<+~w͞'{;2D{(2F/.U2<wPbCseÆ8@QA)%FIp=$8hC 2vBtDCA1b'v`Aͫ2_3F/NN>@BKk3[0=N4K-`!/0q-/0q-K-50ͅ-K-F/K-`!K-̈́.>Q-!}30>W-!30Q-̈́.W-F/o2ͅ-K-̈́.o&ͅ'K<+e3q-[<+ͅ-f!CBH@dB1b'v`@)h81cIAg5`i@BUÄ́!͠2!E-f!̈́.i1BKr4ͅ-2-̈́!K<+x4F/K<+/0ͅ-[<+(*<+̈́!͞'C(:-2-!4Q- [<+Q-̈́.[<+K-̈́.K-q-Q-q-[<+`!K<+̈́.K<+K-!4>0[<+K-̈́.K-̈́.K-ͅ-f!:-wpyc&A1AY&SA1AAY&SX=ffff3333>i'UsB;%pxDc7spf'uA8K-]!K-F/!K-`!K-`!K-̈́.> K-Q-!_50Q-̈́.8Q- Ì]z))DEc9@gQC}DE CsD +"]D  $ |D}DDD<|""XL{LL{PtM=$$YXTZZSR\SZeXY{TzTSYHIyII|(*g(678&+7y8919JHFIHH"+IFFz)) *m*zQ}QQU@VXVaQdQgQ;LM$Xq"9BLdhiUTϫNBTSLOSONԚLEAҒINSNDBV+V,V-O HRAL̶OMMOθHAIιELETŪATI͆EFSTҭEFINԮEFSNǯEFDB̰EƘLSŢNāRASŦDIԧRROҨRRX O/QO҂IELILERIOTωO TωOSUEEXNPUԅƋNSTNNMNKEYILPRINԞLISԟPOEԈINűOASEISԓO O0EEFTO1ERGOKI2KS3KD4IDEXԃUL̖AMEהOPEοUԝΕCTPTIOκRINԑUOKřOEEETURΎEAćUΊESTORŌE͏ESUMũSEIGHTNENUͬESEANDOMIZŻTOАWAХAVPCTEGQI TRTRINGPACEYSTEͽHEROΣROFƤABA SINSAARPTIDTȡAIԗHILŴENĵRITŷO۾yy||PF<2(z{ *z);*)&,,d-D.s)%%'i')1+%+Q+3)NEXT without FORSyntax errorRETURN without GOSUBOut of DATAIllegal funct& A256\ IGIN OF BAZIC 0100 HEX)  A$12) ? ADDITIAL CRTS ARE ADDED THIS PROGRAM, LEAVE "OTHER" >( AS THE LAST OPTI IN THE MENU UPDATE THE "C" VARIABLE 92 C6\ MAXIMUM NUMBER OF TERMINALS 1 IN THIS PROGRAM *< \ CLEAR THE SCREEN BY SCROLLING IF "THIS PROGRAM IS DESIGNED TO CONFIGURE BAZIC FOR A PARTICULAR CRT." JP "FOR THE PRINT@ AND THE CLS STATEMENTS TO WORK PROPERLY, BAZIC MUST" LZ "KNOW THE CURSOR ADDRESSING PREFIX AND OFFSET FOR YOUR CRT AS WELL AS" Jd "THE CODES TO CLEAR THE SCREEN. THIS PROGRAM IS DESIGNED TO CHANGE" In "BAZIC FOR THE TERMINALS LISTED AND TO ALLOW CUSTOM CHANGES IF YOU" Hx "KNOW THE CODES FOR A CRT THAT IS NOT LISTED HERE. SOME CRTS MAY" K "REQUIRE RE-WRITING THE CURSOR ADDRESSING AND CLEAR SCREEN ROUTINES." J "THIS PROGRAM CAN BE CHANGED SO THAT IT 'WRITES' THE PROPER ROUTINE" M "BY ADDING AN ENTRY TO THE TABLE OF DATA STATEMENTS AT THE END OF THIS" H "PROGRAM. THE FIRST FIELD IS THE NUMBER OF PAIRS THAT HAVE TO BE" G "WRI0 TO END) ",E  E0 E8   E0  \ LE OF BAZIC NAMES  J1 E ) A$\ NAMES UNTIL THE RIGHT E  J % P\ LE OF BYTES KNOW CRTS ! IC \ OTHER SITUATI  H1 I + M\ NUMBER OF CODES LOCATI PAIRS  N1 M 5 NN),BN)\ UES O N ARRAY LOCATI O B  N  H 2 SECTI CRECT UES DISK COPY OF BAZIC & #1%1,A$\ BAZIC AS A 0 N1 M ': #1%BN),&NN),\ CRECT UES D N N #1 X N1 M ?b ABN),NN)\ PUT CURS ESG INFO IN RAM COPY OF BAZIC l N 2v SECTI TEST CLEAR SCREEN CURS ADDRESG  \ CLEAR THE SCREEN L "THIS LINE SHOULD BE AT THE TOP OF THE CRT AND THE REST OF THE SCREEN" ) "SHOULD BE CLEAR. 1=YES, 0=NO ",F ) F0 F1 \ ID ANSWER CHECK 7 F0 <\ NO, SO GO BACK TRY AGAIN CTINUE # SECTI TEST CURS ADDRESG  \ CLEAR SCREEN TEST  Z0 35 .25 ' @24Z)10,2Z4Z)6),"*",  Z Jion callOverflowOut of memoryUndefined line numberSubscript out of rangeDuplicate DefinitionDivision by zeroIllegal directType mismatchOut of string spaceString too longString formula too complexCan't continueUndefined user functionNo RESUMERESUME without errorUnprintable errorMissing operandLine buffer overflow??FOR Without NEXT??WHILE without WENDWEND without WHILEFIELD overflowInternal errorBad file numberFile not foundBad file modeFile already open?Disk I/O errorFile already exists??Disk fullInput past endBad record numberBad file name?Direct statement in fileToo many filespP8`@` :TTEN. EACH PAIR CONSISTS OF THE VALUE TO BE WRITTEN AND THE" K "NUMBER OF BYTES FROM THE BEGINNING OF BAZIC OF WHERE THE BYTE IS TO"  "BE WRITTEN." K \"THE BAZIC DISK MUST BE IN DRIVE ONE FOR THIS PROGRAM TO OPERATE"\ % "PRESS RETURN TO CONTINUE ",X$  \ CLEAR SCREEN $ "1=ZENITH Z-19 OR HEATH WH-19"  "2=ADM-3A"  "3=INTERTEC INTERTUBE"  "4=HAZELTINE"  "5=SOROC"  "6=OTHER"  \ E "SELECT THE NUMBER THAT CORRESPONDS TO YOUR CRT (0 TO END) ",I * I0 IC \ ID RESPSE CHECK " I0 , \ CLEAR SCREEN 16 "1= 8 DIGIT SOFTWARE FLOATING POINT BAZIC" 1@ "2= 10 DIGIT SOFTWARE FLOATING POINT BAZIC" 1J "3= 12 DIGIT SOFTWARE FLOATING POINT BAZIC" 1T "4= 14 DIGIT SOFTWARE FLOATING POINT BAZIC" 1^ "5= 8 DIGIT HARDWARE FLOATING POINT BAZIC" 1h "6= 10 DIGIT HARDWARE FLOATING POINT BAZIC" 1r "7= 12 DIGIT HARDWARE FLOATING POINT BAZIC" 1| "8= 14 DIGIT HARDWARE FLOATING POINT BAZIC"  \ : "ENTER NUMBER OF BAZIC TO BE CHANGED ( @20,1),"THIS COMPLETES THE TEST. IF EVERYTHING IS OK THERE SHOULD" = "BE A DISTINCT PATTERN FROM THE PREVIOUS !@ STATEMENTS" . "ENTER 1=EVERYTHING IS OK, 0=NOT OK ",F  F0 F1  $  F0 <\ START OVER OK    SECTI CUSM @ * \ CLEAR SCREEN H4 "THIS SECTION ASSUMES THAT YOU DO NOT HAVE ONE OF THE CRTS LISTED" J> "IN THE PREVIOUS MENU, BUT YOU DO KNOW THE CURSOR ADDRESSING PREFIX" IH "AND ROW AND COLUMN OFFSET VALUES AND THE CLEAR SCREEN CODE(S) FOR" PR "YOUR CRT. THE PREFIX IS PRESENTLY LIMINTED TO TWO BYTES, THE OFFSETS TO" J\ "ONE BYTE EACH, AND THE CLEAR SCREEN CODES TO TWO BYTES. IF ANY OF" Mf "YOUR CODES EXCEED THESE LIMITS, YOU WILL HAVE TO CUSTOMIZE THE CURSOR" Fp "ADDRESSING AND CLEAR SCREEN FEATURES OF BAZIC. PLEASE EXAMINE" Er "THE PARTIAL SOURCE LISTING IN YOUR BAZIC MANUAL AND CONSULT A" It "MACHINE LANGUAGE PROGRAMMER FOR HELP IN CONFIGURING BAZIC TO WORK" v "ON YOUR CRT." ?z \ "PRESS RETURN TO CONTINUE OR ANY OTHW" G` "AND COLUMN POSITION BEFORE THE TERMINAL WILL RESPOND CORRECTLY." Ij "THIS VALUE IS NORMALLY 31 BUT CAN BE 0 OR ANY OTHER VALUE IN THIS" Dt "RANGE. ENTER THE VALUES ONE AT A TIME STARTING WITH THE ROW" ~ "VALUE."   + DESCRIPTI OF THE CLEAR SCREEN CODES   G "THE LAST TWO VALUES TO BE ENTERED ARE THE CLEAR SCREEN CODE(S)." E "IF YOUR CRT REQUIRES ONLY ONE VALUE, ENTER A ZERO (0) FOR THE" < "SECOND ENTRY. REMEMBER TO ENTER ONE CODE AT A TIME."   3 X1 25\\ X\\ CLEAR SCREEN BY SCROLLING # LE OF BAZIC NAMES DISK  "BAZIC08"   "BAZIC10"  "BAZIC12"  "BAZIC14" ( "BAZIC08F" 2 "BAZIC10F" < "BAZIC12F" F "BAZIC14F" !P LE OF CODES OF KNOWN CRTS ;Z 6,27,30,89,37,31,68,31,69,27,74,69,81\ Z19 WH19 4d 6,27,30,61,37,31,68,31,69,26,74,0,81\ ADM3A 5n 6,27,30,61,37,31,68,31,69,12,74,00,81\ ITUBE Dx 8,126,30,17,37,255,68,255,69,126,74,28,81,92,49,93,56\ HAZEL D 10,27,30,61,37,31,68,31,69,5,ER KEY TO END ",X$  X$"" \  N1 6\ 6 BYTE UES 4 N1 \ INFO CURS ADDRESG PREFIX & N3 8\ INFO OFFSETS + N5 \ INFO CLEAR SCREEN ; "ENTER A VALUE ACCORDING TO THE INSTRUCTIONS ",NN) , NN)0 NN)255 \ OF RANGE  N E B1)29\B2)36\B3)41\B4)42\B5)70\B6)77\M6\ SET AULTS - \ MAKE CHANGES BAZIC TEST THEM * DESCRIPTI OF CURS ADDRESG PREFIX   F "THE FIRST THING TO BE ENTERED IS THE CURSOR ADDRESSING PREFIX." G "THIS IS THE CODE OR CODES SENT TO THE CRT TO INFORM THE CRT THE" H "CURSOR IS TO BE ADDRESSED. IF YOUR CRT NEEDS ONLY ONE CODE THEN" G "ENTER A ZERO (0) FOR THE FIRST VALUE. EACH CODE MUST BE IN THE" @ "RANGE OF 0 TO 255. ENTER THE CODES ONE VALUE AT A TIME." $ . 8 DESCRIPTI OF OFFSET UES B  GL "THE NEXT ITEM TO BE ENTERED IS THE OFFSET VALUE FOR THE ROW AND" HV "COLUMN. MOST CRTS REQUIRE A VALUE TO BE ADDED TO THE ACTUAL RO70,27,71,43,72,13,73,13,74,36,75  SOC DELAY CRTINEINTERTUBETH WH-19IVE ONE FOR THIS PROGRAM TO OPERATES TOIS< HER VALUE IN THIS" Dt "RANGE. ENTER THE VALUES ONE AT A TIME STARTING WITH THE ROW" ~ "VALUE."   + DESCRIPTI OF THE CLEAR SCREEN CODES   G "THE LAST TWO VALUES TO BE ENTERED ARE THE CLEAR SCREEN CODE(S)." E "IF YOUR CRT REQUIRES ONLY ONE VALUE, ENTER A ZERO (0) FOR THE" < "SECOND ENTRY. REMEMBER TO ENTER ONE CODE AT A TIME."   3 X1 25\\ X\\ CLEAR SCREEN BY SCROLLING # LE OF BAZIC NAMES DISK  "BAZIC08"   "BAZIC10"  "BAZIC12"  "BAZIC14" ( "BAZIC08F" 2 "BAZIC10F" < "BAZIC12F" F "BAZIC14F" !P LE OF CODES OF KNOWN CRTS ;Z 6,27,30,89,37,31,68,31,69,27,74,69,81\ Z19 WH19 4d 6,27,30,61,37,31,68,31,69,26,74,0,81\ ADM3A 5n 6,27,30,61,37,31,68,31,69,12,74,00,81\ ITUBE Dx 8,126,30,17,37,255,68,255,69,126,74,28,81,92,49,93,56\ HAZEL D 10,27,30,61,37,31,68,31,69,5,, in Ok Break!9~#b  T N#F#`izv C T  *|<ʗ :  D=96543>7@?2C: * "   *" 2 2 |< "  * Y! d! ~Y#=%iʎ%à&O[H> K> Yi>: y +=2i ZY#ZEo:ҋ0o.o%~ Ҡ ʠ ʠ> :i <ʩ=m+~ ʬ ʬ ʬ#>d2 ͋9C" :g ͬ! (" !9T  +V+^##* C" B* *Cd Nz)~S ͒(q)ʹ(QZ~>r)ʹ(E(OdG+ $* "* 3àE3\B" !9" ~: #~#ʅ #^#V": >[@1>]@ցLO! N#F#~: ҆ ځ#:l `#2l f>R~#"j &o"n >2m !~##"j +fC͎*j <2m n G("j ! 0?<=:l ҫ ګ*n ¨###^#V,:m 2g *n " *p " !n (E AOGEAGx3Ø(:l  *j #*C > 2 ,$`i P "  "!>:yHG+ȸ#", ~,B>2 d: =Bd̨H+~,ʿ+N6,E* 2 QC,͋9~,c: 2 TF—Qd¢WG"ʌ: Wʉ:,+FO: y!...+ʽ,G+M: C#~# #^#V" cCC(+B͓2 " * ~" ڎ_4:g {[H !xVzʬQںzʺ! :g  N#F#N#F! N#F#N#FKG* W " Ð)͙(6Çz)uÇxdd!BdX* \FÇy2h :g g+Wx(zOxdz o! N#F* *(" " ͩ( *!:h og~#fox(2g 6" ;)!A͙(*ʹ(" " i*͙(*g' .EJ ]<=ʓ<"FO&i:* ,C(#r PQ͉:C)|)IoBI'UTC)}* k(͋9" d(~a{_&([OʭH¬#~[Eҗ:0ÞG7))))o~ +8  )))0O í)#~ց(7>OyC,;*C{K2* " * |< " " * |! 4 4 5wY2B!{DP 2R U >(_#U * ~?o !P #GC!BʻY|<1>DA2MSB!E :* > @(K 2 Ç 2 *  C " :b ʢ >(Kڢ <=ʢ (ͬ~ ̾(" ҊSe]" ;5$ܢ"ʇ: \*v " * ͶB" t##s#r## w# y}ͯ!6"*" 7C*"* "â *bk~####~ ҷ ڷù#s#rïC *DM~#+##~#foC`i~#fo??2i 2h ;#~=!@}O|G!""y O:h ~ʂ#Y:aJg>2h 2i U%~|*O~#Ym?>HjZEڗ;;>ʸ;>HOZ#þGO TOUBZ!AO ^#V#ZOd#<y(!!!Z.!>dG>Y2i Y%=+ZOiMk֢ύ>2i W„Y>5W>Y{~.ʧ:"0":i ~O.O>Y(ͬ}Y|Y%~.ͬ:g * |>}e. <֌W-͋9C" :g G:g x=ͬ:g  H * #^#V*Cs* C{! C{>HͣFH(µC(zʢPY" : {:_ u ~GC+K x),  <2~(z˜<* * "~ #####u   =>C,* =( |" 2 " â ~,dC+͆(~ʕ *n €€l>2á Q+!B>ee,%;d)1F6 * 4TF* ::G<:?=:G<:e ?=!B&Gá(* TF~\:I:G<:\V:G:e \!B\/V tz|TF›:::o<ʛ& ,C)+(* TF~:::e /<!B{= @è2go"C#ʧQHLo͋9;*0KDF>-?Redo from start #~ "4N: !!#G* Q!a ;#YHL">2>2 F~,2 ÓC;&G: ʫ>?@> @0KDů2 6,+>2 ͉:~+[(# "4([])* u )4} )H>2  N#fi-++<(aZz)}/o|/g" :g q7xz)z ,{ʨ+F•{o|P {o|<«{o|2¸{/o|/}//o|//}o|g,::e 2 ͋9:g " " ͬB!9(:g * ~)C,* C,Á2N 2g !9(!9.,:g G:N Od}!P O:* * C)>" : OBO/2 OÐ9~ #~#`J x 2b b + C,u W : u 2_H 2u 2_H 2H /<z)zu 2 2 C,u Y +{>2e]!"N#F#xʇ TFQBN#F#Cچ " 1~ > @ !b !BÑ ~ͥB# b 2 e] #~ %#~#Y #^#V" y~.%$$$$$%** "͋9+%c%C,+8%": 2 2 ! 6ͷ(È%ͷ(t(x: ʩ(Ң%/<͙(ͩ((gb&|! %B&#ʈ0.͉&#&G~_#~W#~ON&hcGy&JTeox%2 |&y%O&)zWyO%x\E#&! w%%x! 5&F#~怩Oé( 4Ç0~_#~W#~O! ~/woG}_}W}Oq&CZQd& oz…&y-O{&Ë&-yOzW{_xGÅ&$cCu͍M r5E(&1r'ʹ(>2 ͙(!&ͧ7͙(ͩ(!&ͧ7i'͙(T(È%E(.(y2<'"7'PX!%!%'! ~#Y'Wy='O|g}oxGQ'x Gz/'CZQO͙(!-ͦ(E(ʐ0.(4g04g0+~2'+~2'+~2'AOW_2'}o|gxG>?ұ'2'7y<=':'x'> $&{_zWyO)xG:'2'y”'! 5”'%>.! N#G.x'(}! Gx&(ƀwW'(w+E(/%g0ʹ(xڀ0G͈%! 4À0: : /<! Op#6%͆(d+ ! ~w͆(og)d E(* ||O(* * ͷ(" `i" ! ^#V#N#F# (:g Gw#(! ~7w?##wy7O! ((! ( d 2 -# -~/w! Oyw#-q<-NsY+1-'- W~w+F-?-! C-~w# [-E(: %'͝.qʙ-G,Q-x ‚-y-Ñ,! --Ñ-L} : A--! (d-: -2 !t(. ! (.&, ! (>.".&,! 3.=-..! 5%! >5=.>! N#F#=(.>! p+q+=9.: ʔ0: %'44ʈ0͝.!7 qA>,?t.>,: <=,! [-!0 Y-xb.! 5b.%y2 +6 ~q+¨.(+~ڈ0w&,4È0%3*j%>2 `h)~&i-.+.+/.ʆ/e /E5/l#/L#/q#/Q4/:g N/>N/~%ʓ/#ʤ/!ʥ/dN/De/ͮ/2S0e/_{_//i/k(d!W')d e/ܮ/.!W'!z)e/ͮ/e/) *d.(.=d^'- ̓$> ̓$!  101(d0! 1(* |* "1C! _!A!_.!!!/!: -!<-!> >2 { =! ! <~J!#~#X! k*l!~#>l!+!:G@ #T]~u!#y!~v!ʏ!y_¢!: >2 ÷![®!2 !: >2 !> XG{!~#_XG!!2 E0:?+͎ " o6 r6*n )1:l O " H*">&{:m ;"!;"#~ ̾(~#m":m A" ^".h"Dh"EA"A"{v"*j 5$Ҕ"T]C!E #G!* C¦"`i" "\]~"\]C,u "z)d: E()È% PX/#,#BK/#C,/#C,( z`iC[# !C^#Vzn#~#+K#͑#^#Vzʌ##s#r u# 2 *+#~##^#Vʚ#O: y$#¦#¦#3z##£#3 > %$B!$#G11+ã#Undefined line #3###N#F>!#*j +p+q+w: Ò#CBCACSCE: * * C ~0  2 <2 ~̓$#y$\Aʔ$z)ð$!$#G KD#~.~•$z)"j87Random number seed (-32768 to 32767)$*" +%%$ xE(!N(E(y! y )#x+y+z+{z|O(@)}P(! ( E(!N(E(O! y#)+f)I)N(d* )(! 6(&,)Ü)y%: 2 : B*: ½)))|/g}/o)! : )B*" >2g )aj)d* ʹ(6*x(! F#&* 6*|UY(d *!" " >>)d GOW_ʹ((gf*>b&|5&N&z< dE(*t(̀*k(dҦ* )! ~: ~B*6{y%! ~*O+~+¶*!*) *yʹ((+6+q*: O! >%-,2 Ñ,! ~5#*!x"+>);)+ ;=+|G+y4+|Gz)*͙(,N0|)+DM!>)ډ+)q+ ډ+=c+|+x+ʚ+*͙(*'x)*t(| ++DM!>+ +7>{_zW}o|g=+w+|G+|)Ooyg)* +|6*Y(ͨ+g{o)+! ~w! ~G+N (R,/<#Fwx+ B,F+N9(! G>w2 ! %-x,: 2 ,,4ʈ0Q-,>,! -G: º,! Vwz# Ÿ,x’,%! Y-,x,! w%: ,! ~++w! 4#,4ʈ0+60 ! ->!  !@ #G"G)Ͳ1F1Ͳ1416+͆(F16-k(#60: W:g 22һ1ͺ5! F : _ 1x*1{1Aqʟ1Eʟ1Dʟ101,1.¢1+60{ʫ1+6${+p2 ! 6 ͙(* * 2 f2E~2:101 #~1>DG1" `i" #~+N2-%20OxGN2#~ 2`xEC2y 1>2 S2|1;21" `i" ͩ(#W\4: 2Ë22ҏ2460̾("5+~0ʞ2.ľ(2d>"w#6+26-/</ 2:#p#w#6! #zQ334z4ͺ5{(=4b13p#6! #: ~ 3* 3+3-+$0I3#I3++w?3 3I36%3m36C){3)1+6%)d3E(\43_x44"5452_y/3/3{_x34434y5O4GO"53* =4P2*ѯ3E(7\4y/OzWO/4)4/<* C;^#~#¸;:g ¸;~;#^^#V#˜;:f DMW']< #:¹;#ʾ;+͸<þ;:g w#_ʖ @:A 3A6A:<:-A!MA6A<2Oɯ2:> 7A> 7A2:XG{A:e ʍA=2e >îA A> @:e €A ڮA:G:e ʥA!BʮA<2e OTFAWMS: 0P:A!7C!E #G:AD/2AD:e !B6!a > @> @TF3B:?B2ɯ2e :=@FBAA2CDD͙BƒBʌBAͷF_H!D " >2g :2@ > @+B> BC~ +üB*v  >ƕo>gB9*++"  BgGBB* C:G!^#V#C T*}D2 2 2 w#w#" *+" : XC2 2 ! 6#QC7!i8(!F8w#w#w2 og" " *v : ƒC" C* " " : T*++" ##!z "x r%DAgo" 2 "N " " 2 * |}~C##~:  *C(`i+" < D T" !z "x !*}<-D" * " 2DAB!J b Æ >OD22>^@@@!B* | * "u <2>2 ͋9! (* dC,͋9Gd * CD( (>2 ͋9D2 `i D * CD `i" ~,D 6.#605#H56." #H 6,#dq5(! 6(&,*6> 5/>,K5>,p#=B5! ͦ(~5y%>B*ͩ(_6?5ʹ(/{_#zW#yO++Ғ5B&#ͩ(p#ڄ5>5e6>5N#F#* /}o|g5" p#=55w1_cƤ~@zZrN vH Tʚ;@B''d G" կʎ6))))Ÿ6y=ʟ6ʫ60:ڨ6 ʸ6ʊ6È6!t(͙(! 6ͦ(6)!r%>2 E(x+76ʗ0%yʹ(7: 77͍*)|" " ܻ6t(ͽ&'8;': `7hr7͙(͍*Ɓc7ͅ%!{7ͧ7J'͙(: o7%~0é(|Yt&wz^Pc|u~r1͙(+ʹ('͙(~#ͦ(='ͷ(͈%ð7RO!&ͦ(76*E(!H8>8!i8ͦ(!H8Ȇw#O ͷ(':G8<2G8!i8O |%ʹ({YOO6+F6!F84~֫58w %!i8(w+w+w85Jʙ9v" GSљ e͘w>ROhFhiuh!8|%: w: 82 t("~'͙(͍*ͅ%)8͈%͈%E(t(͈%t(: 82 !9͘7: 2 "~|<>!@1> @!b  ~#=GA"=[0A= A=_zW"=! =L=ʺ>O>>ʨ=1g= !>=#ʻ=>>= >>(9>ʵ=6>>@!B<~ͥB#¨=!>7A_>~=ͥB܁>=#~== !B<~>\ͥB~>ͥB́>=>\@~A +> +>+> +>>@ >wͥB# >6Hͨ=Aq>s> >s> ʑ>ʑ> ʑ> >>_‘>>_ʙ>ͥB+>> ~7W'#~+w#Ã>yڡ>>@>> o&DM#͹BwͥB#Þ>x+>ͥB>x+~ͥB> !Bz\@@_W@W~#!ʎ@#ʡ?&ʉ@g@+>H?+~#.?_}@\&???$ʚ?*??x#ڒ?~$> ž?#W?~#.?#ʡ?,?z@Wá?~#>.??# ?~##??T]^###xG#z+@x@~-@@>Wr@Cxz*1#G+7N@2 ;K@, ~#_~#foxE?m@@@?!BͫH@~#@_@Ò@>@r@;** AxxOI&G* 5@G> 5@@@z>+@TFfV:\A@:@27A ~A[?;C E, E+ EC, E*,4EyE+ʅEC,ʅEyE+ !NC҂E͗EڂE*  C҂E"v " E"zB**v {_zWME}_|W2 " ċ9" P ^#V#* C ~#~#Eͦ(: E! ͦ(|%(ͷ()/F####N#F#^#Vi`: F* F1+:g  r+s^#V#3)ͷ(AF"i`Ü" * ~, ͨE*|ͥH~#N#FͬHW^#N#F{zد< #rF?P(o6ÙFr6ÙF)1FͨHH~#*x " >2g ( C"x ~ #FͨH͹( @ +B-G* * /O #CZG" # >G*v " !* !z *x CxGH!L " * " * * CʹG~###͚<²GH_ÕG* ^#Vz* G" ##^#V#" ÕG* C7H~###͚!=_M=_M=_M!9DM!jM* * * à2 2 ~‡M2 #+͔R!" +NC,,ʸM"" +NC,MCACLCLNOC, 2 5$`i" NT]" CNO**+#~#N#^#V"N:N2 ͉:ʢNxG͒;>2 hN~(nNþN~(͉:zNxGN::g W):zBK!N N 2 ~(nN ͖N+"N(NC)"NC,BN"* * C#ON##~w#͚< NO* " N* C Oy_xW `i" * CNO##~w#͚2 : mS:2ùR2 2 * DM* " * #* " CNP `i" * *+zʠ `ià Q+PdP)1F* #^#V ªPr+s+5&G+P;ʿPC,+>,@ÇP>"@&G>"@íP*|Q~Q\}o|gQ> @+|U>  U!Ux͹FFTC$C(u ~,KU*Qʠ "QC)}͹FʅU͙BlUA~Uw# ^UF* DWڬ qU6Qʦ ʠ !' ~U U#~¸U`i}WÙU>O #~(PY!' ůwͱW:!͞Zʻ =ʝ =UѯÚ <ʻ !% ^#Vr+s9Q6V PY,V!#V`i>yV!' ~UͱW)9V6Qʦ !&QV! ~+n6Qʦ ! ~*~Ee\DM'~U4N#V pʝVzw w+s#r#6#6DM:V!" s#r#6 W! {zVWw<W<ʻ !! {w:W}W!! ~!) ;WU;W~#>W*~ʖ\( ~hW+~#5O ~+~tWzWJW7>*T]% N#F+q#p###6 ’WͱW: ͞Z>ªW>w+w!(HW7?*' 6#67ͥH~ʲ #^#fk_XN#~:X++@bXy@bXbX #RX~.0X>X7X#X2 z bXbX> >X7X> WX7Xò W<ʣ ! w#…XCACSW:!<¾ ͥH~ʠ #N#F OXIXR  C,#u C,{ʦ _C(u C,C)d$Ix 'IH0Ix > {͹FGH* w#?IHIO>~XIxIx C,;*C,* C)ͥHW'ͫHG=O>x~#F#fh GN#^#VUJ LJ#7Jѯx<#4JIJC(͋9;*#^#V* CڍJ*CҍJͣF(C,u ~JͥHG!W'y~?@> @(KͿAzK68Kp22 ͿAoK!B!=:>\2UK'K@+iK~@K+@K@!B!b 2OAK:ʐK>\@2yKCD7 ;L K ´K(KKCD(KK0K@> @>bKK>#iKK6!B!b K KxL*|>L!b ("_yq#@ K2e > @ͿA,L KzK: Bw!a >2 ;2 " $L33oL " ** áL LL" *" ##^#V#~#fo"͆(ʵLA3à* "à!9~#L L~#foC L >2 ͋9dP!B#*QѻQ  C,PY"+#x _:ڦ !N#F :Q!)^Q! >>>ͬ͹F* (H>>>ͥH<2g #~#fo(d ,»QZûQ Q͋9;*W_Wڬ Q¾Q"QG{,xQPXW1R!b Oz"yR QR RO{,yĊRW1R R{ +R,> +R+R1R1R͊RWQ"hV* *CMS~#hVSV:SS=S~,~#u SůSѯ*Qʦ   ! ~#fo" !"o]| G~,r CACS͋9;*O*o] "o]* Cڸ q#s#r9T7͋9;*ͥHF~O#^#VT*CT* CTY* * CUyYwwͱWoY<ʻ ÅY<…Y£ cY!%w#w#w#w~ʨYCzW* ) p# ®YC T T _W<Yʣ Z!6# ͖ZW2 !͒Z!͒Zʣ O!  ~#@ygZ~ dZ>.@ QZ:e W:ڀZ> @@!BAZ~*6?# –ZO!!4¶Z#4¶Z#4y"Zʻ ><+Z* C! s#r#wZ2u]*Q  ! ^#V~,+ zʵ +s#r! w#w! ~#fo!CT[Ò[BK>!)g[)#h[))v[ u[#=][}_}la)ҍ[#x"o]! "q]!) "s]!}o|gCڼ[bk:u]\C[ \DM*s]*q]X\"q]PY\*o]#"o]}o|g|Ÿ[ \DM*q]*s]X\"q]PY[2*o]! ~#foCs#rG\:T\!T\!& äV~# xY\DM\ʓ\͹\! w!( V6 ʎ\zwø \ʓ\͹\! ~!ô\! ^#V! s#rDMͱ\ͫ\C" ͒#\>;S"]C ** C!X9}o|gG:%:,}O!Uej"&- V.& 3(  (&b&K&  M,*',Q1i05O.N.43g410q1V5U54X1g$$$ 9:8DE)Fv7D#FFF< &f #"$#$,(J$!"` :=:i::222_--.222;LMx  C\o(267NBTSUTϫLOSONԚLEAҒINSNDBV+V,V-O HRATI͆EFSTҭEFINԮEFSNǯEFDB̰EƘELETŪNāLSŢRASŦDIԧRROҨRRX O/QO҂IELILERIOTωO TωOSUEEXNPUԅƋNSTNNMILEԈINűOASEPRINԞLISԟPOISԓO O0EEFTO1ERGOKI2KS3KD4IDEXԃUL̖AMEהOUԝΕPEοCTUOKřRINԑOEEEAćUΊESTORŌETURΎE͏ESUMũSEIGHTNENUͬESETOАWAХAVPCTEGQI TRTRINGPACEYSTEͽROΣROFƤABHEA SINSAARPTIDTȡAIԗO۾yy||PF<2(z{i:::=:f<_<==:z6w6789q;e;;9NEXT without FORSyntax errorRETURN without GOSUBOut of DATAIllegal function callOverflowOut of memoryUndefined line num in Ok Break!9~#N#F#i`zʳ ʹ Ý ʹ~ + *,  >>ƕo> g9*+++" $  0 *-|< :! $ à* "-  *-" " 6 * À {K2#* " * |/_#‰ * |"|2*X4! :#*!"-:  * ? >* >  2 â *  ʹ " +ڽ ͫ<=ʽ ~ K9ͦ " ҕ4ͫ" G ʯW-(ʆ *( ͼ "( t##s#r# w# y| ͮ !6"9*5"" A *7"9*" "5ý */bk~####~ Ҷ ڶ ͬͫø #s#rî   ͺ */DM~#+!9}o|g ] \ \ ** C!9}o|g!X9}o|g S] )] )]*|<:  C*+6* ~šRÇ !?`2 "!"6:͗C2e " * ^#V"zB"UB"##^#V"A##^#V"A##^#V"=A 2!]!!"" !"22d 2 2 2!"!" !z "x ! "L *"v >2!^" :^^<2^!~" ^F#~+w##D^+6" !^/x^+6"" #/x^i^^6ZS^Mʐ^F C:dʯ^z{2ô^"v +^C/}^C:d" ô^+*v +"v +:!]"2<s#r# *  DM=^#"" {ozgB|g}o_|0_!{ozgB"v "" " *B}o|g++!_#G1!_#G!#G" !B! v] Owned by Microsoft Bytes freeBASIC-80 Rev. 5.21 [CP/M Version] Copyright 1977-1981 (C) by Microsoft Created: 28-Jul-81 berSubscript out of rangeRedimensioned arrayDivision by zeroIllegal directType mismatchOut of string spaceString too longString formula too complexCan't continueUndefined user functionNo RESUMERESUME without errorUnprintable errorMissing operandLine buffer overflowFIELD overflowInternal errorBad file numberFile not foundBad file modeFile already open?Disk I/O errorFile already exists??Disk fullInput past endBad record numberBad file nameMode-mismatchDirect statement in fileToo many filesH8jII,##~#foʹ`i~#fo?? :YG!9^#V# 5*/ 2 2 w#w#"( */+" !0 6#M 2! og" "& * " U*( "* ", 5*+++" ##! " ͆go2 * >?> 2 2 ;~"n Dw: ~D?>D8͗ڇ!AO ^#V#͗Oʢ#  +>͌2 ͌ó ! +``>2 ~t͊%͊>͌p~.ʗ:0: ~D.D>͌}͌|͌ó ~i>: *X |>}e. ҷü͌!X !T ~͌#=ó 7ʫý&DͫH> 8> ͌õ#͌:VJ\>2 2 U³ ~|wD~#͌b!@}O|G!>: y$ ~a{_w+=2 g~ ҽ ʽ ʽ> : \2)>+#~+!2)O:)J>\2)yʊ7  ʊ nÊ@#_ x<>ʕyq# 2 > oʥ 4|}~#ʫ *5|.:&) > :% :%<ͫ!ʹ bk))0_E +ͫ* }_|W *( ( ʹ "+E A \ 3E F| *->3À: * *-ʹ# ү > 2 N-`i$ ͙ " $ "-!F>:yHG+ͫȸ#"<֌W1ͺ" ̀ͧ!͈9P*X #^#V*/ʹD*+ʹL*( ʹL>#"#V9…ͫͺzs PYү" :! :#_- ͆&~Gʔͺ+K xʓ,Õ! " <2#~z€<ͫ* * "-~#####͆&$  ͺ,*  |" 2 " ý ̀~,̫4ͺ+9Lͫ} }ÒͫNN<>2&o\2+ͫʆa(BB,;̀?5"*5|*X :&ʿ:%:'G: "> "o: 6!> > *5|:"=2 *5|% ~9:&+:%p3:(G: 9/t̓&ͺ)+o*5|% ~o:&l:%o: / xͫv2&go"5ͺ#21̈́:ڝ8"?REDO FROM START : !|"* Z2!#">2*6"ͺ7+ͫ)8 7)))0O %:#~ցOͫyY|ͺ,̈́:*X ͆&n͠} j=: N#fi#~#N#F#^#N#F{zد< #ʌ?8< 9Z̓:}/o|/g"X Ï: 7:zM<{;k F{o|P{o|< {o|2{/o|/}//o|//+ͫͺ,#2 F OͫJWOͫKK~%$!#xA_!0 V+z2 ͫ: =d~(1312 *( ** ʹo>&ã|wʹʹO*, ͼ ", `i"* +6ʹs#s#rW_2[ go"X /! "X * W*, ʹ: ʦ#‡~#ˆ~>##^#V#j:  DM7  $ w#_q#p#O ##" q#: y q#p#E;=BKڡ ", +6ʹW* ^) ++s#r#8 GO~#^#V#ʹҡE;=DM : DM)0 )5 )5 *" *, !9W #Ϳ"*+* }o|gC<:%i : og%:͎ ͠N#F!7: #!X ͫҦ ڦ ͫ: O! ͎ ͺg&s#rʭ !!s#r~(ͫ1~)ͺ, !: "" ~#fo ~(`2%Oɯ2&:%> > 2%:*±" H> : 8 \:'G: <2 O*5|ʠz/7X4:1!FA ! |":*/2*>d2 ͙  "  *-ͺʈ:҈:̀:~d&94=:A9QZ~>5́=:A98OG* 3{" !9" ~:ʋ #~# #^#V"-:R ʊ>[?>]ͫFցL%O! N#F#~: ʫ : * ì#2 ~#o&" >2 <2  GZ9" !$  ҫ0?<=: F F* @###^#VC<! : 2 {9*/j `iү+". oo<Ó5" ! " !*-}<ʴ"$ * "& 2*! – á >2&2*>^@*& |$ *$ "-͆&:'G{<2">2R 1!J V9** ͺ,1ˆ:** ʹV9J V9>2 12 `i *, ʹe `i", ~,ͫM AOGͫ¯ͫAGͫx?͙ ڝ#~+*5|2‚ͫWG"u:,+9"!ͫxi>b>+ͫʝ,+ͫ): k*5|!|"Æ?Extra ignored #~#$ #^#V" ͫU1" ͙  " ~#~#.39n6M9D9͓9W####N#F#^#Vi`q;: 7r+s^#V#9D9i"-i`B" * ~,Fͫͺ(+ "" *" ~ڲҲW " ͫÖzG~" _: y#!MxVz-Q;z;!X : === !N#F#N#F#!T N#F#N#F*!KGd* Ã=:&9D&:&xdd!*X w&y2 xʗ: ʿWxzʈ:!w N#F*X i:́9"V "T 69i:!c: O ~#fó92 ʥ"X ê=:!mð&9]:A9"Z "X ]:&9]:8ͫ$ i> &<.=Ҷʨ"6"ʱ&Gͫ:#i Xͫ* C<‡ͫͺ(#t̓&͚2w1ͺ)|%:o $$ 6 |ͺ)}̓*" 81"X {9&ͫOH#:)0)G)7))))o!ͫ" !ͺ, >2 17҈:["ѯ~) !*" ͺ(* 1 ~)W!ͺ,ͺ,>!ͫͺ)>ͺ̀+ͫ ʶ!!Қ!p+qv!+p+qv!+p+q+p+qv! ["!YO q* *X ʹ!"u!! #~" w#q#pv!*-#| $ ͺ>2 G6QD "TD "?5"#$~#͕"N#F*"o͸#͕"! w#s#r+"P#~ K"K"<""̫#y*" >* "X >2 V9 ʹ" ~$ #5"#F9  Æ"*+* /O #ʹڳ"" #$ "* " !*+! * ʹ"0#*( ** ʹ#~###"1#_"*, ʹU#~#D9 #" N #* ʹ#"#ů#^#V#DM* ʹ`iʹ`i}+F+N+n& PY+DM* Ϳ q#pi`+"*X ̈́:~*X $ '"##* Ͱ#Ͱ#!W"~#N#Fo,- ù#̈́:*X #PYN* ʹ#G " * +F+N+ʹ" i #W~i ##^#V>'"͉&* sW"ͫͺ(͆&ͺ,̀ͺ)C$͉&F$$O$͉&> {'"_$* w#^$$$O>~w$x͕"#F#fh DM*"o͸##W"$k$~$ &o$=O~GC#i _#~#foFr~b>pͺ)Cͫ|> %͉&WV)~#.+)#),7)z@W)~#>.©(# V)~##+)T)T]^###xG#z+v)xv)~-q)v)>W)̀Cxz?|"+ͫ7ʮ)2 ;ʫ), ͫ~#N#fi_x¯()*r(#Æ>*)̀̈́:*X An$"*X G> ʕ) *z>+2#* <0*" ү`i##N#F#&|<>!?> ! ~#`*Gok*0ڇ* ҇*_zWk*!i*’*O++*1ڨ* ! ,#+#*c+-+J++(^+*[+>1*~+#*!D+7o_D+~!++ܡ++#~++&H*~>\+~D++͡+5+>\~ow+#J+6H*oʑ+ +ʓ+ ʱ+ʱ+ ʱ+ c+_±+>_ʹ+++c+ ~77#~+w#ã+y+>c+ o&DM#Ϳ w+#c+x+~++&z z7@?2C:$ 1!l6# R2ĕ/!mN2!uN2lʤ1O!  ~#y#2~ 2>. 2: W:'<2> l1~*6?# R2#t2ѻ¡1ͺ,`i"5+ͫ#̫͉̀&_:Yڧ1!9N#F ̈́2!& >>>ͧ!'"* ̈́9$>>>#<#N#fi2 {9x ,2Z2Z21̈́:W_z/ڭ1 33"%3G{,x%3PXz/s3!Oz"y^3 ʓ3 ^3O{,y3z/s3 ^3{ m3,> m3m3s3s33z/*3"~3 ¦3z/ڦ3 ~3,ʦ3 ž3z/ڦ3 ʦ3*5% 46!{ ʹ38"ͫi>ɷw#ç3ë03:Y22+ͫ3ͺ,ͺR 2Y21!6"9. :22Y*7"9"5z/<…4*/*+ ʹa4 /w#4ͪ ##"( !Y~226A :22Y:1ʢ F͆ͼ-Õ . 3+ͫz4X4 21z/<ʡ1*5% ~ʽ 4ý *5|B$ Ë3+ͫʻ4ͺ,ͺAÚ&ͳ,>.*( */ʹX4~#.4-:Y44=4~,ͫ͆,̀̈́:ͺ,*X ̀ͺ)#7i #G=O>~x~#F#fh GN#^#Vt% k%#V%ѯx<#h%S%~ #~ #ͺ(1̈́:#^#V*+ʹڰ%"V9ͺ,͆&~ &ͺ̀#G!7y~<%yH #^#fk GN#~#foyw# %)&ͺ,͆&ͺ)͉&2$&i s&s&+ͫB&ͺ,͆&C&͆&2'V&/<2(ͫ̀:z͆&2D&2,&ͺ,Æ&ͫ̀j&+ͫ{>2& !"-N#F#xʢ *5|pN#F#ʹڡ " ?> &!&ß&~+#&&#~ ' c'&<~'#~#'' ̶:!:G@ #T]~5'#9'~6'y[R'~#_!+P'&+ͫ&' QD TD* ?: O ʕ' H '>&{: ڱ'!ʱ'#~ K9~#': ڷ' '.'D'E·'÷'{'* & W- (T]ʹ! |"! *( ʹ(`i"( E(~i ̀E(ͺ,͆&::[ :Z z6́̈́:ͺ;*X {(: ʅ(2 F#N#fiï(X~#\) ¥( ”(C>\*_W*W~#!)#))+>ʲ(+~#. )\ʐ(©($(*©(x#(~$> (# > G-!#-|"??+,Undefined line ,###N#F>!-* +p+q+w: ó,̀2ʡ1!$ ~}-#N>O #~ 9PY!$ 6i/ʞ1«-ѯÛ1<ʼ1!" ^#Vr+s̓2- PY-!-`i>".!$ ~Ć-i/&-̀2ʧ1!# ~+nk ̀2ʧ1! ~i *5~ʀDM$~̃-4~O#V pG.zw w23t2¡1!" ^#V~,+ͫ {ʶ1+s#r#6#6DM! {zV.w<.<ʼ1!! {w:3.9/!! ~!& .̓-.Æ~# .*5% ~#/+~#5O ~+~0/6/ /7>*5T]" N#F+q#p###6 N/i/=c/>w+w!% /7?*5$ 6#67̀#~ʳ1#^#fk_ڸ/N#~:ʼ/++@ʳ1y@ڳ1ҳ1l #0~.//7/#/z ʳ1ڳ1> //>  0/͕/l<ʤ1!\l w# 40ͺAͺS͕/:l!\l<¿1\̀#~ʡ1#N#F Oʓ0Iʓ0R¡1ͺ,#̫͆&ͺ,{ʧ1_̓2°1z͕/" 0{0!u~ 06B#6A#6S"5#l w# 0i/~ 1&4ů4ѯt2ʧ1¡1& G~,̓&ͺAͺS1̈́:Oڹ1ҹ1q#s#r 571̈́:ͺ̀#F~O#^#V5*/ʹҶ5*( ʹڶ5Y*+* ʹ5y͕"##s#r#^#V#^#Vyx5yGyO55~#55> 56x'"W"ß5ͫͺ$ͺ(͆&~,06ͫt2¡1l2ͺ)}'"b6͡]6w# C6͆W"Éz/ڭ1P6!CD9z6D99x:[ 69Ҕ6/<&969c9gA7!X 6!77#47.W77G~_#~W#~O-7hcGy6JTeox62[ )zWyO6x\E7![ w6x![ 7F#~怩O69 4$ ~_#~W#~O!\ ~/woG}_}W}OP7CZQC7 o-yOzW{_xGS7V"vE88![ ~5pz68!e7t6!i7WEz6͸?1r8.͐8y27"7PX!6!7!X ~#8Wy7O|g}oxGz7CZQO&9!=398 .͐844+~2B8+~2>8+~2:8AOW_2E8}o|gxG>?S82E87y<=7{_zWyO)xG:E82E8y68![ 5687>.!d N#G.xʴ8}![ Gx8ƀw7c9w+8/67A9x7Gz6![ 47:[ :Z /<![ Op#6698<ʈw6:S =!\ ~++w!T 4#=47+6 !^ <=>!^ T 2C=# B=~/w!S Oyw#V=qv=NsY+k=a= W~w+€=y=!Z }=~w# •=8͆85>q=G4=͋=x µ=¬=! qA>+=? >>+=:Z <==!T ͕=! ͓=x=![ 5=7y2d + ~q+@>́9+~7wf<476|:`h%:~&-ʆ>+ʆ>+ͫP?.?E£>ͫL>·>~% ?#?!?D>?!>ͫ-++ͫ?>_{-?=?>8!7.: >?Æ> #>??=:i:8J>=8=yZ:7ҥ?t$͓9?ͻ8͸?}?s:J>́98s:f<}?&98z6{ ?0_2>! |"%:p@ @{"p@?6+9 @6-8#60: W: @@y@͜C!g F : _ =@x*=@Aqͫ]@E]@D]@0=@,=@.`@+60{i@+6${+p2 !g 6 WRB@Ҕ@B60K9C+~0ʣ@.K9@>"w#6+@6-/</ @:#p#w#6!g #zVAABzB͜C{̬8=7:[ Ү8:ƀڮ8!e7n6ͮ7w69!6EfEJô7@.tpO.wnz*|P~&9;A9ʹ7&9~#39=ʹ7D9z6oE8!EE!F39!EȆw#O D9ʹ7:E<2E!FO n6A9{YOO6+F6!E4~֫Ew 6!FM9w+w+wE5Jʙ9v" GSљ e͘w>ROhFhiuh!mFn6&9I698&9:w6!qFt687YFk689!qFn69!uFWEId&X4#]I&9)F&969#F88D9:[ ڼFQY8!t6!FWE!mF J;xn{/|t1}=Z}~L~l */+6*Z~3â !I"+" * ^#V"t"H##^#V"##^#V"h##^#V" !"-2*2 2##"%! " *" !~>2Y"ZGF#~+w##lG+p"Z!ͫG/ʟG+6""Z#/ʟGͫGGpͫMʮGF ͫͺ:Gz{2YG" +ͫGͺ/ãG* +"  +:Y!F"792Y<s#r# =H#"/Iʹ "+" {ozg ?!pH|"!|"" ! "F Owned by Microsoft Memory size Bytes free BASIC Rev. 4.51 [CP/M Version] Copyright 1977 (C) by Microsoft :!Z ~w9og%:ʈ:8*X ||8*X *Z D9"X `i"Z !X ^#V#N#F#X Z9: Gw#Z9!Z ~7w?##wy7O!^ U9Ç9!^ V9X T x8!88y!Z yͭ9#x+y+z+{z|88}8!^ V9e 8!88O!Z y#ª9+998*X ʈ:G:!7:[ .:͍:"X >2 ͓9aj$:Z:ʈ:A9:xc9!W F7*X :|U8ʈ:Z:!"T "V >>*: $ GOW_A9c9g:>A7|7-7z< 8:9:8:ʈ::![ ~:X ~͍:6{y6![ ~:;O+~+;!%:yA9c9+6:;!Z >_==2S )ڡ)^; ڡ=P;|G.);)ұ; ;=£;|;x*<;]:&9]:ô7x%:]:9| "<. < <7>{_zW}o|g=<÷;|G)<|%:Ooyg%:*X .<|:8;g{o(:*6=!\ L=G:Z B/>9=.C>9=p#=%C!T 39`Ck6<͍:69AD?BA9/{_#zW#yO++tC!7#69p#fC>âCGD>BN#F#*X /}o|gҵC"X p#=¢CBw1_cƤ~@zZrN vH Tʚ;@B''d GE(f կpD))))Dy=ʁDʍD0:ڊD ʚDlDjD!9&9!C39ñD=:8xDD 6yA9D:͓9|"Z "X ܝD9v7ʹ7&98;I "R",,"B:RFILEI #, AS N$I #,  AS I$I I I( N$(,)J2 I$(I) J< #,IJA I$JF I#JK+JL @JM "R",,"B:RFILESJN #,  AS N$bJP I mJZ #,IvJd N$~Jx IJ}JA I$J !"#$%&'