' +JJJJ ?\>m0M='+l> /+l   d]@ŵLҦ]]LF L}BBL] X  ` 鷎귭෍ᷩ췩緈JJJJx Lȿ L8ᷭ緍췩 緍i 8 `巬 췌`x (`(8`I`B` ``>J>J>VU)?`8'x0|&HhHh VY)'&Y)xꪽ)' `Hh`V0^*^*>&` aI꽌ɪVɭ&Y&&Y& 꽌ɪ\8`&&꽌ɪɖ'*&%&,E'зЮ꽌ɪФ`+*xS&x'8*3Ixix&& 8  '  & x)*++`FG8`0($ p,&"ųųೳŪŪųųij  !"#$%&'()*+,-./0123456789:;<=>?   1 '" *"( (9"1 ( ,.(0# 2  /#0/#0 *?'#07#00/0/'#07#0:"4<*55/**5/*%5/)1/)1/)1/)'#0/#0*5/*75/**5/*:5//#0/#0'#07#0:::*::'#07#0"):$(%"%:$(%"%$$2%4%$$2%4%$(2()!)E(!8b $!H(+ "@H !D)"E` @ $ C ` DQ &J80^݌Hh ü ü݌ ռ ռ ռA ļD ļ? ļAEDE?HJ>h Լ ռ ռ ռ`HJ>݌h Hh݌`葠葠ȔЖȔЖȠHIHHHHhHH݌hHhHh݌H6 VDP (ED Z $0x8x D- ܸDD# H8`?E Vk *f???0xE Hh D#-EEE8` D ܸx D - ܸx8`-0ݩ?ʥD EEE`   LDcpq` [` ~  LӜu`".Q`pNФbptťܥm2<(-Py0\|e<6e<g< JJJJj귍hI  aUL@ kU8  L  Q^R(jQ0l^l\  wUuW ԧ H h@ [_ /QSIRb_L`LLLL`ª`LQLYLeLXLeLee ўQH\(h0L& Ꝥ$`( R \ZLl8 ўR HH\`\Z[YS6`LxQɿu3'RͲʎRʎ]]]ɍuL͟ɍ}RLRɍg^H8 ^hZLɍR LͲɊRR% QLܤͲ Z@ -^ ş\[Z QY\[Z8`l6Lş_Ȍb_Ͳ] )Y h( ֭ͲLɍ [LLĦ__ ^ 9 LҦ3 9 a   0LjLY u< (_9 ˭ɠuɠK_9 ?LˆʎõĵL õ ĵµ aµ`` L̦µ_bJLuLz`  ȟ QlXJ̥KlV  ȟ QlV eօ3L e3L &RL &QL d L4 Ne)n `@-eff L f`L . tQLѤ LҦL` OPu d L Ne)noon 8ɍ` ^f\õL ^NR  RΩLҦ)\Z ʽ LHv 3h`0h8` [L NС õ`A@` ŵL^Lõ`  \ 濭0 \  ȟ Q ^\lZl^?cqH şch`fhjõĵ@OAP`u@`@&`QR`E Ls  @DAE@u`8` %@ @A@`@`@A`Mµ ) LЦ`8@AWc@8@-@HAȑ@hHȑ@ȑ@hHȑ@Ȋ@ch8&ȑ@Hȑ@Ah@LHȑ@ȑ@ htphso`hMhL`9V8U897T6S67`INILOASAVRUCHAIDELETLOCUNLOCCLOSREAEXEWRITPOSITIOOPEAPPENRENAMCATALOMONOMOPRINMAXFILEFINBSAVBLOABRUVERIF!pppp p p p p`" t""#x"p0p@p@@@p@!y q q p@  LANGUAGE NOT AVAILABLRANGE ERROWRITE PROTECTEEND OF DATFILE NOT FOUNVOLUME MISMATCI/O ERRODISK FULFILE LOCKESYNTAX ERRONO BUFFERS AVAILABLFILE TYPE MISMATCPROGRAM TOO LARGNOT DIRECT COMMANč$3>L[dmx- ( q Ϡ@跻~!Wo*9~~~~ɬƬ~_ j ʪHɪH`Lc (L ܫ㵮赎 ɱ^_ J QL_Ls贩紎 DǴҵԵƴѵӵµȴ 7 ַ :ŵƴѵǴҵȴµ納贍﵎ٵ്ᵭⳍڵL^ѵ-I `  4 ò-յ!  8صٵ紭ﵝ 7L (0+BC  7L HH`LgL{0 HH` õL H hBL BH [ h`Lo õ ڬL B ڬ LʬH hB@ յյ [L (ȴ) ȴ 7L L ( L (ȴL{ƴѵ洩ƴǴҵ 7 ^* B0 HȱBh ӵԵ 8 L8 ݲ` ܫ  / / ED B / / ]ƴS0Jȴ ȴ)  紅D贅E B ƴ  / 0L Ν `HD٤DEEhiHLGh ` ŵBѵ-` ѵB-` ܫ XI볩쳢8 DH E𳈈췍Ȍ X0 · JLǵBȵC`,յp` 䯩 R-յյ`յ0` K R-յյ`ɵʵӵԵ` 4 K ( ѵҵLBȱBL8` DBHBH : ַ޵BȭߵBhhӵԵ RBܵmڵ޵ȱBݵm۵ߵ` 䯩LR˵̵ֵ׵`êĪLR E( 8` R` ELRŪƪ`췌 յյI뷭鷭귭ⵍ㵍跬ª 뷰` Lf ݵܵߵ޵ ^`8ܵ i B8` 4L ֵȱB׵ ܯ䵍൭嵍 ` DȑB׵Bֵ  ַ յյ`굎뵎쵬 뵎쵌``õĵBCõĵ`µµ`L õBĵCصص Qƴ0"Bƴ 󮜳` 0۰ϬBƴ8`i#`ЗLw!0>ﵭ` m ﳐ 7i볍 8 ЉLw`H h ݲL~ `浍국䵍뵩嵠Jm赍嵊mjnnn浈ۭm浍浭m䵍䵩m嵍`"L ŵ8ŵH ~(` d ֠z# u`ȠӠˠҠCLICK(SPEAKER)a  ======================= LINE 400 BY BEAGLE BROS ======================= 16298,0:16302,0:A1999:16304,0:16303,0:(KB)128Ă:400 49233,0 21:1400 BEEPCLICK(SPEAKER) PAUSE1500: 1000, :"..TO.COPY.THIS.DISK.FOR.OTHER.PEOPLE..."E BEEPCLICK(SPEAKER)U "1400:1400e ,1400:1400p 6CLR,0 @PAUSE1400 J(KB)128PAUSE600 TPAUSE ^21 h".....(PRESS SPACE-BAR TO CONTINUE)....." rBEEPCLICK(SPEAKER) |BEEP°14004 "............COMPILED BY JOHN PESCHAR..."M BEEPCLICK(SPEAKER)] 1400:1400m 1400:1400 "..THIS.DISK.IS.NOT.COPY.PROTECTED.OR..." BEEPCLICK(SPEAKER) "..COPYRIGHTED..PERMISSION.IS.GRANTED..." BEEPCLICK(SPEAKER), A124 Z1400 dE n"...MICRO-EDUCATIONAL..................."U x1400:1400 "......LIBRARY.DISK.NUMBER.ONE.........." BEEPCLICK(SPEAKER) 1400:1400 ".........PUBLISHED.OCTOBER.1984........" BEEPCLICK(SPEAKER) 1400:  :CDASH$"==-==-==-==-==-==-==-==-==-==-==-==-==-==-==-"vDOT$"......................................."(SP$" "2KB49152:CLR49168<SPEAKER49200:D$(4)FCLICK(X)(49200)(49200) P    ~*upWU*U*U*@"T*]*UU*U*U*U*U*@*U*@A]?}PT*U(U*E*U@(U*U/U*E*U*U*U @*U*@@~ "@t*UT*U*U*U*U*U*Uz_;w*T  D+U*U*U*U@  U:Un]+U@@:U**U*U*U*U*U*U*@*U*U@+U*U*"D(U@P@@Q*U*U*U*U*U*}_;w.]+*U*U*@ (U*UzU*U*U@*x/@a"(U*U*U*U*U*U*];wnU*U T*UU@+"T*U*u*U@)(@!U* U{ *ET*UjW*U"U*UP*U @T@!U*U*U*U*U}(U>T*UP*U*u+U*QT*U @Eu_j+U"D"D"T u+W@*U*u?W*U;wn]+W*U* U*u@];wjU*U*U*U*U*"D""D@A_~"DP~?zW;w.U+@ U*Uz_;U*];wn]; U*U@;{>{cc}=?pLo~n`qq_{w^wEU*U*U*U*U*}*U*U*U*E"D"D"DbA*U~U*Q*U*U*U*U*U*Uj/(UPPjU+U*U*U*E"D"D*U*Uz"D@E"T*Uz_*U*U**U*}*E"D"DbP*U*.U*Uj];wn]+U*U*U}**@];U*U*U*U*U"D"D"U*"@U*U*U*U*U*UjU*Q"DQ"T"D"D"D"DbQ*Un];wn];wn}T*U*UjU*"D"U:Uj?w*]*@U*U*U*U*U*U*U*U*U+U*T"D"D"Db}*U"U*U*U:U*]*Uj}]:U*t?@U*U*U*"D @Q*]*u];@U "D"DU"D"D"D"D"D"D"DbA+}}U P*UjQ*P*U*]+un};(U*@U*U"D*Q"TQ.E"D"D"D"D"D"DbQ;w~U;w}h} (UjU**U*]nU**]*@|?u?xo_:E*];WjU@T*UzU**U*U*U*U*U**U:@+U*U*U*U"D@~ h T*U*U*U"@P*U*]*U U*U*U*U P*U*@;{mm={]]}=?oO+~v~nn_{7w_U  W"D@hU*(U*U*U*U*U*U*uw];U*(U+U*"DT*U*u@~G(@*]+w.@"t+U*T*U*U*U*U*U*U*(U P@+U*U*U"P*U@TP@!U*U*U*]*U*Uz} U*U*U+P*U*u?U*U*U @*TW@)U*P*U*U*U*U*U*U_;w*U*UT*nU*@+U(U*UjU*U@+(@!unU:@W*T*U(U*U>U*E*U*U P*U @!@!U*UUjU:U:*QU*U**U*TP*U @Q"U*/U*U*D("U{w+"D"DHP*U*nU*wn];wn];w.U Uz+@wn];U*U*U*U*U*U"D"D"E"D"@@Q?Q~U"t"u "D~}k?@*U*uw.U{wn];wn(uj]@[m}={]]}=?_G~z~ooxWw_cU*U*U*U*U*U*UzU*U*U*U*U*U*U*U"D(Q*UHQ*}+U*];un];wn];Wn]WP**TjW*U*U*U*U"D"D"DQj]+wE"D@U*U*U*U*u?U*u*U*U*UU*U*U"T*DH U*U~]+Un];wn];wn];Uj}P~*U@wn]*U*U*U*U*"D"D"D*wnE"D@U*U*U*U*U*U:U*U*U*U*U*U*U*U*U*U*U*U*U*EhQj];n}w~]{/:U*UjU*U"D:wn]o]*wnU @U*U*U*U*U*U*U*U*U*}U*U*U*U*U*U*U*U*UjQ*U:wn];wn];wn]{.(U";U @U*U*U*D"@"U;wn?wnE"D@U*U*U*E"] "D"D"D"D"D"D"DHa{? @~:w*p*]{T* U:Uzwj} (wnU@U*U*U*U*U*U+U*U*U*E(U*D *U Q"E(*T("DHq~?Uo?@/ \jU*E@Qj];_;UnE*wn]@h{_@_:w.];WjU*@"t+U*P*U*U*U*U*U*@*}+U@+U*U*U"D@x *U*U*U*@D*UzU*(U*U*U*U @*U*@;[m>CCcc}=8x?~opppqq_{g_w z+D@*U P*U*U*U*U*U*Ujo];w.U*P@+U*D(U*Uj_@tjU+  U*@(W*(U*U*U*U*U*U*UzP* @+U*U T*U@TT@U*U*U:U*U*u_;P*U*U U*U*_*U*T*U @* _ @"U*U*U*U*U*U*_;wn]*U***U*@+P*U*U+U*U@ *@!]:wn`+U* *UP*U*}+U P*U*U @*U*@! @!U*U+U~ u/(U(U*U~U*U(UT*U @E*U~W*U"_"{}?"D"Db U*U~]*Uj];wn];W*U*U U@];U*U*U*U*U*U"D"D(@A_"D"D}/D*U~E"TzU@P*U*n]*un];wn]: U*U@;+mm?;]]}:7}Gnn~~~_{Ww/cU U*U*U*U*U*U*U*U*U*D"D"D"DbQjW*U*U*U*U*U*U*U* *T@U*U*U*U*D@"U*U*}?@@EQ*T*U*U*k*U*U*U*Uj]*"D"D"Db(U*}+U*U*U*]:U*U+U*Uz?(w@ @*@]+U*U*U*U*"D"DQ*U*"D@U*U*UQ"T(*E*"D"D"D"D"D"DbQ*wn];n];~_  U*UjU P*U*];U*U:@U*U*U*U*U*U*U*U*U*U~U"D"D"D"DbQ*U*]:wn];wn]+wnP*U*U*@U*U*E"D*U*Uzn];@U"D"DU"D"D"D"D"D"D"DbA_ @>|?Uj]; T*uj *U*Uw.U:wn];(U*@U Q"T"DQ*D"D"D"D"D"D"DbQ{+U{_P@PjU*U U*Uj?w*];*U*@PP*"u.};W~]+@"T*_*U U*U*U*U*U*U*zw*U*@+U*U*U*"DT@ ~ h*w.U*U @(U*u/U*@*U*U*U*U*@*U*@Wslm=;]]=77o}+nn~nn?}7ww~U(}W"D@t*"U*U*U*U*U*U*u~];w*U*@+U*"P*U*U?U@hu T"P@>U*A*U*U*U*U*U*U*}](@+U*U*D(U*U@TT@!U*U*u/U*UjT (U*U#(U*U~U*UT*U @@ @PW@!T*U*U*U*U*U*U~_;u*UT*U*U @+DU*U**U*U @@ @!w~}(xU*U*U *U*UU*UzW*U U*U*U P*U*@)(@!U*Q*n}`TP*U*}+U*Q*UP*U @Q"U*U*}?U*U*W*U*U~}W*E("D"DH*U*}?w*U;wn];wn];w.U w@wn];U*U*U*U*U"D"D"T(UjE"D@z?U"DQ"_ Q*W"D*W~?/E"DH U*U~_;Uj];wn];wn] U*U@o{m|Ccc?078p~opp`qq~wv~wU*U*U*U*U*U*U*U*W*U*U*U*U*U*U*U U*UjQ.U*Un];wn];wn];w~n] @*@U*U*U*U "D@"D:wn]{nE"D@U*U*U*U*U*U~kU*U*U*U*U*U*U*U*U*E Q"DHQ*Uj*U*wn];wn];w.]:w_P:@*TBnU*U*U*U*U"D"D"U:U*E"D@U*U*U*U*U*U:U*U*U*U*U*U Q*U*U*T*U"T("DhQn]{_;?PnP*UjU*E@"];wnw*E*wn]@U*U*U*U*U*U*U*U*U*U*}*U*U*U*U*U*U*U*U*UjQ*];wn];wn];w~/(U*U*U@U*U*"D"DQn];w_;wnE" @ A?(GT~/]*wnUJP*U*]+un_;n](unU@U*U*U*U*U*U+Q*D "D("D"T"T"D"DHq+U? | "z@@*TjQ*U :wj]oU:(wn]@          ~px`P@:g}~~?q@_PWp+`~|~P{7"}?^~}/|xc~p{xWP0Za?@~? ?p?zPA p@@Cpp@A8~>_?`xpPz/P@?|U?||@G p`?~D xo{?|x/@|`?t~`P~/"D(Q_"@"zx|z?T: s_C~@Dx_~@/`@Q~@_T*U~hpA|p+U*Tj>o?*T*U*Uzh?@*_*U*U"T*u~?U*T*h/_>#~_"T*U*U*P/U*U*"T*U*us?~_|x/U*U*Tj||*T*U* Ux?|`@U*"T*UjO ``x`_*U*Tj_:pW}?*T*U*u?A*|G*}_`/U*U"T*U |_~`?p~+U*U*U"Tj{ @oU?S*T*U~@?U*/"T*U `_w{||_*U*U*ThPx*T*Uzhph *U"T*U*U*U*U*}+U*U*U*U*U*T*}WPxU*T*}z~}o/xW"T*U*U*U*?~/U*U*U*U*T*a2?@_*T*ujEh@}/x?"@}@/`px?@\~_??p? |?|W`ow}T~(d."`~|W@?T~_??\E?|/ D*@ _ `y/|?x"p~~P?  |?xP?A+A?ap`z~~?@+p?4 }opO@r@~ |Dj?@xh?hBs@?E"@y TO`?|` @W?u?|~/`|?|~`P?~?D"T*U*Uz?E Q"D"|g0~| ~dn?@?{_A"Dzm"D@~?x?~h]@~W|`T*Uz_`_p`|*U*Tj>?x+*T*U*U~/pWj""V*U*U*T*U?}@/U*T*?n:z_*T*U*U*?zU*U*U*T*U*u}~p/U*U*Tj?+T*Ujux?PhbW*U*T*U*px`q}W*U*Tj.@~_@o+T*U*}Ph*U`?U*U*T*U*}|Owt*U*U*U*Tj>Qn>?|_*T*U?~p@(b/U*T*U_~U*U*U*Tj~*T*U~@?h*U*T*U*U*U*U*U_*U*U*U*U*U*T*}w~xU*T*}}_n}ox_ T*U*U*U*}+U*U*U*U*T*~~_*T*}?t} PU*t}@x?P: ]|}~_@?}`Q3? ~  @PzW?}~s`/P T@~"x?hP~~?@Ux@~A@~?Pb|@"~ PtO?q?xP~"?@_`@~~c?/@?T 8>u?|/ |x@@@a~"@6?|@*"D"} "D"xy?|p~*O?~w?A~ "Dh? ~A|| x8Wxxx/}hT*Uz>x`|_*U*Tj_>w~}?z*T*U*UP pGjp*U*"T*U|?@p/U*T* o;*T*U*Uj|+T}W*U*U"T*U*U|~p+U*U"Tj?~@*T*UjT*apjb_*U"T*U*~w~`A&|U*U*Tjh_?ex*T*U*}*z |?(U~`?U*U"T*U*h?wW*U*U*U"T*_T(pcx_*T*u?|_|(`?"T*Ub?tO@?U*U*U*Tj?xp*T*U~@ U+"T*U*U*U*U*Uj?U*U*U*U*U*U*T*}}~xU"T(#G~}k|WT*U*U*U*U_*U*U*U*U*T*{||W*T*u+p@"@q<}pe`?PTnu}>3?"h?U`T~ `"~}@xW@@nwq~0~/"tzW@*h "~+|x?p~@?p`hPA/zo@x"pP ~b~~tA~?@*}?@p?x{+D@PGh`@4~@~_:~~@_@|x?}@*@~"U*U*Uj]:wn]*W*U*U*U*U(xz|@~Q~_~w?D"D Q*} "D~?|x| xAn@t#f| T*Uzq kp@~_*U*Tj_(]__?*T*U*u|W*qWj`+U*U*T*U|~?@@~+U*Tj.}o+}/?_*T*U*Uj *_*U*U*T*U* ~~x*U*U*Tj~`*T*Uzxpx*U*T*U*}W~`/|?U*U*Tj`#Gw+T*U*P`|"E~bU*U T*U*U*UzP~yU*U*U*U*TjW`P_*T*u@#~|?UT*Uj+x/U*U*U*Tj}r*T*U@*U+U* T*U+wn}n_;wn]+U*U*T*}|?U*T*j_?{?(T*U*U*U*UzU*U*U*U*U*T*}_~|zW*T*}j @wo?xW*          |  1wmO UhH;f;3SrVX)I(, `wRl}5#=mo7h~=4'c* _'C  X  <_:{acmstg?H@ HS^cE1G0_ +w{x\m`-k~>EYbT2OYF !AU|}?mlE;k x\oq}w;_@b" Pywi] B@@ 2A(]/ fVO}$QByg_*akpg{;/tTu_ v?_l>0.8W[0$!PqlE=*J6IcNAs:V__b?TR q 1@PbJ><~o_%b`"V{v^s?WzbUu[}>P"#v?MI*5 %7^|ECg_| @@!Vc20HH DjsfxBuO:~__{{( 6<T@ P" Ch:xo_^=E*@hpV.sY7 Kg{_@ga,=o}m{On1& Sl!@@   6?{V;[< K_u#h  ek9>}` [B@sZG_n(| @e*k@d~OE&~Qm4ku}?6UgoowfTnm@9*B@@o79Uog)jwA*~~{(*t}?$ (4*y)'\+Rv$Rq/+TOqX?7::8}~_Zud~wZRh"R}K2 W%U?w3.5_W{ T#C#c;5@I 62z6_:Z`w}/fm,@sD{L;jPXwW{>^Q"GsmiN2^'oo}=_/BG1" U???~kJw7z,@ =rF `\za?.o;wSD)Y.pWGZ#D`^`B?|]vF 96o6K 5QoNqTu?SwRvsq||k(1@aw{?KH>a7wo}~  @,?H8OpvN}/z|m_}g mpyCr_` @x70 p@>~_wO1)y~@@t?8k0M%zY{[NDl"%D|>/~% S7z)wo~>}2L!)@` %|QaQi?o}YoHI`Bv9kGoE*xD/>O@$@ax{?_`~;y^sze>(4r#1A|tHP!]~U7/]HSr=og~_xy HH$W~{ b32_|B~mCDN-QMss uobZ3?}t=wS_O'h30`5!lsWK1~aW>$@P! @m`~_+e2$9$ @PboA`A a%UXw=%{}{}??; IX:tr~;^8+x_PhDB7\@]x{B%(@x@3_WeED5 Vv7y~NSDlw-O_VH$,HlR{/x~}?/_2 !TJ q=}~#)lViG\zu\btVz{V3Sl~??{k\McWZ<{}5K@>,UC0aUg|k/.9y5Gq} P7A"D?``&7qT?Ri"@HDA%2wD` :|&w6}K^|K?_}M,S:)\NHw x_k~BJ2b4 $H0!apxq7W@j\Z=HCB@( |oW( PA$ 4qXn)W-L[X-)n& DI$  K|_0%]h%iowo#GQn2\Yb~.UrE'0DBTb?Ws?W'rl#~]/[u_u  @! )_^yQ@@@( b,;+ o@;8`7mJ-R&IY0pA]7 C*j{jooZnO}?gw`+swGh2`@q"m,6&w~->_~w=.eK'P4 `  0^Oxr;{[bL2 % 1{){}M{8@Q,AbJ7<0]f@iA(lw?XA>}w}~}_^wmo>i\<4q>KZ~B&A|=n~?>y{jh~|VoEP"j\ OVowW=TY #0m;57 k}; ghfy !I@HzZ7-:fo]^>Rk=y>;oomw7U}R0NH$(\{+Lg;j;^{<{~lBOXBRT;w:mr}mzOG9HjO?[;hd1$pC@A~g&i,j`zR0^t'@B}V?oz.xB`# v[(} #IyA/}?|;_ *(@!BN},//wjOJw?{3+y JCfl?7x\s\xOnO9s`@)m?;s n|?[wKgh? R~Q?^oNH1}Pa [4|bg#:bhs=w?_ DP  r?_(2Xzlf]:&;]x"[jitZ?zgk:,%:<oqk]=N$hFNv +M$! $t.`p}W{@nk}?__b@@As}_&F@0@V CND  ("~l=`6;w{ \uwwr_]2 &?Z-H!Bh~-&\YN|j_?BCk @>}O xi+pHsS7 P  1c Nk?DUj@@RM%Vh%m7_~',gk2~;mAM\q T zx??g)lv|Tmj^g<v-$~gk8E`@8cOqqt?'_-}jyq]odv/]~~3%1p$dXmg[lr U*tzO:/ow (`c(A4%o_O{hWc% H}}=WRpnc~_/ !$C n?Xt:U}wZae?^}O&lx?wR@rocO8+ $11;8N~O]>j]eYy~~{w@d[@A- @Zus{=?{D)kD@a(Gpwn&6XwSoKFIN>3Q K{\ `0O{OUi~x4w}?YFO^:?_Ah\F]uh3,.]M~?}}p$ZBHLBA@w yM>W?w~Sm3W|__[ @( hw+ P!? c :600h=ym;oXS0SI @cVo[;Q;n/y/yooao?9 p >X\,)+'}yzC}wu;g4t;$ zDp}yZ8;dm?S!{# P *Vo5bp~2?gGO@}clLy5p7[w]B AJr~s?5KH>{w?Qx>0o?~p ~#w;I b0r6 $"E]o[ykvp[}?a&y=w_}\W322@W/=/VI40sw-Fm}o@{ `T~y! @5 p Zulpy3%tL@*kAX[Fzg^gtQ^`frL|??>#CSb#] ;P6 @hu]}o!0Io3``DQ4@ @,ZCsm;GS$ 0# IosEw"p30xQ$" !Y( ~t@A^t|w?w_{uC'kY7c]]WHF1~_O+8yxn6=rYH[vk5_!@ P:t]G?_o,wJJBr4|V5}^{4r6+uW9Q~&+!@6 w?W4Ys[_u{O?qOE~5~r)75^_<&0P" "\H[_&=NIo39yOo~{* LP OB1k'?{>k; I4lnq~6}_j?X86 i';m?)C ~'5~e{|<^>~`]>OOo@S ^ gv6}oQ7>ww{L`(0p3LeI+?}/_j<s/s#rGG_7n}_y~@@H`7(^~{I%a^"uB` a cZpfI` 0D`o~^{H8|u^j~~_yuAiT' 9+Q g_\}e>.uZM~Y;,lTBs\H{>~255,OxCWO;QS Evn.>~~ C~G3{o>f0"8  .GxeH+h\t:z?@kA J3\?ooQB `rvka*wn?@P(T_}3)pHw7E2W6U^@DA(~_>"y|yZYko6]/?j^Kid2 B `  kx?7U)Q~G|J20DH: =^w#)klDDY Jp;rMju"0 ;>qOF1a0haz-~v~ oO}#NN];^~Oe|O?5G`_G IF"hl&~=Wjs{j: _=]gaPl/L $?~w=@f Vp\Mz7?.w7iMXP `a{-BN+:Kl;gw}?l!t_}Xsb,A@ly1=m[L|?k{w}{] $a$ 06v/__{V~1bU <#/o?_zp)nH$ywN"  ")S_rCtFNU~~^[}_Wg"j}~(L;UrM:. (i*Dq+5Sw?:]vs<_~|} E@2`^}Sifm$ c~mY{}S!4]>~wHCe~6H,!$D}bQPE#D}?rw?oom_>zy&v?Q9v\IBi?@4Y~?ia@P`WW}?~/eS <#a @a>B{-oH{K>F|_]?~{/3,8+&JG1b 1O}|=}l_}{>\ML0H4D0-Foom;}LhG~g,("aR]{_1 xtC/J|"}7!64Ec_Y"|.B0}! A<=}kr{qy[}?}@m~owX$ $J+2%u9?W,k@1wuUG=s~q6EsG{wc!B H5LA&:@@(pdpGCcBRuyO k'v8 % "  ?O7 l @p Xb'!E<){<`@ glm>1zBRi?]}c>|{/h@*S6H"B%A6~_j=+,wy?$P(z@ "|qk?sWo)3 Pht,4z:%36d$ ^&"t-HU@?`_H'm>OvuS o}y#(tg-9G"@P t2X~[lys[__?o@`~0 PRq^1P AA 1@S' j=~B7#@ f/S72zLeH7~wO_FT;O)0J" 1-q_0B S{,oyy~gom qo~ Hl  +djSs_~K]X SfJu/.[lp7b_7u I_o~ \B2C.E"K~w_s|,\W_`n0cZBn9JP2`p[.jk=S~|?o "~RDQ07{\;yo Y P^s~{gw{4>Octw~9s{ ioRNo}w @'(+ 5+(|}_'Crs}}k>Mw+~SSWu?,!`g@$2ej_K&WhF>'l}sxGl$Ok@" "nXw{=j]=qpZy{w_?nP6$@KX$H|hQb_n;n_;}k49!Szk~oLOS%+@@|my 1"i?u!>k4~QRr~_! Yvjy!`-X a@d6pWo ;!n7f?{                  ժժŠE@TD"*"ĂPA*Axcpx~?ӊU E((*) "(@ƂP̀U" "Uժժժ"@*U(Ģa2 Ţ* T@ D|aOC~ P(P"ЀTPh(*A E ժժ!ժ @P""E P Ԫ"T(B@xq?b*D * fc`pD> ppТpTUժժժ@ ("*AŀTD JѪ U U((U*UĂ*E* Պȉ*U(ŢѪՊŢPU" UժժժU 0ԀQP D Q"P P*Ѫ @ p(q'Ј|T Uժժժ@@ E*T!Ϣ*T@" A  (J@ըPY  Uժժժ(D P*TA "ЈըP@"Ոw|?? *(DQbڪ! bx>@Հq|>ʆ*Uժժժ(䀐P*A `?@@U ԈD@ B~@xs`?~"@`xs'qg ?*qq'| ժժժժ* 0" UՀք)&Q((U4ԀQ (XLxKP  (@|g? |Pß0ժժժժ @ ЄԠĠP"PT* D ĨԨPŀ0@ ժժժժ Ģ@ qJ)(ĢE*(aqd<|!|(U"*Q U@D Uժժժ D&ĨxBЈ1F"@QA@q|p?@~)S ł@**$ڊ"с4T(UUUժժժ$̀Ā(@ @|' @ 5Ђ*E~Pxs??HԨ"U J&qs'@pD?*p(q'Ġ5ZUժժժPU"@ *D*(*(Ȉ|p?Ę(@  T Ap~p|ɂUժժժJ$(ŪQ(QP P   բՈP0X(D@xcA@Ġ"@U# p||xp` x~*ժժժժ (QDP`?p? " PŢ!E"UT"E(ePxs|?|Ē3E*@*E"`Oxs'pG?"pp*|!€UժժժрQ ̪ À՚Q Ш E ~Q""QP @"U"@'|pg~$?D*‚Uժժժ@ E*Ҡ "ԂD@T"Pxe?T @ @Ղ ЬEpT*?xC4aHE~e@"ՠժժժժ  "D rJ$LO" E ŀ@ p?D?~ ~@T*J(A*!"ըŪPTZT*Uժժժڊ*T"U(ѐU$xO+ *E*Tʆ @A` AP(Ղ@ѠAE  Ј"ժժժժĠ*T(  | A( *T"-%Њ TDȐ xsP? "*P Њ @qxsP p@? p p P ժժժժE@ AAP @AQ"U P Tex|FԠ3QP P*E Ј`|cxa(@ UժժժЈ A(@ Q"U P Te|~?`aԠ3QP P*E E@x?~ៀ ժժժժ  ՂAP`?@ p?@ P %Њ TDȐ xsp?x"*P Њā`Oxs'(q?? q'(q'*|!-ժժժժѠAE  Ј" @Q AP(Ղ@ڊ*T"Eѐq' pπx?*E*TʆժժժժT*J(A*!"ըŪPTZT*ŀ@ @X2Ġe?T J@  "a?xqL@E UժժժЬE U*ՠ,qE`4I*U*(@"ՠP@ @Ղ @ E*Ҡ "ԂD@T"Uժժժ@"U"@4e2%D*‚Ш E qgQx"QP рQ ̪ À՚Q ժժժժր*T( !|'D"D*T €E"UT"E(ePxs~@?Ē3E*@*E" HqOxsP p`?pp' qGŢ!UժժժU *"EDE T *D@p~<? Ġ"@JD})@wpxp> 񇀜>0X(UժժժA łAT*@ɂ*(Ȉ Ę(@  T PU@*(UժժժJ& ԠD*`? @*|)U"ԈĠ5ZЂ*E~Pxq`?pHԨ"U $̀ā`Oxc'@(q?> p#p|!5Uժժժ**$ڊ"с4T(UUQ @ax)P ł@ ADrcf|~ UժժժQ U@D E*(URԂxe?xj((U"* Ģ@ Ep|~cr~y#ĢUժժժԨP @rĂ @ P"PU*U*U* D Ĩ @ ЄԠĠUժժժ ( !@Q4ԀQ (@XLp|`~`yP * 0" UՀք)&Q((UUժժժɪ" |'U*A AD D@ B~@xs~?"@(Oxs'(px?pgp qUժժժQbڪ PT"AπE*@ @(ʆ*"Ո<>`?  *(D})|paxx"՘x@Uժժժ(J(@ժт@@ըժPY   A  @@ E*TD"*T@"UժժժP*  `? P|)Q(ЈP T բ(E*&Pxq`?rLj5V@" ŪJ?`Oxc'@ppp'| @BUժժժѢ@ P YPࠀ () PDՈQU(U ,eՂ~2** (Aq'|揄~|$ժժժժ( (Д  TA (@ AUPL x忔  *QA* !łU@(|1xßI%~*TUժժժD@ pD"D @"Ġ C U*H,QAP *"+ըԪԪՔUUժժժE@ **@VՈP@"*т҈D"@"gx0|~fxD"*Ђ  AT ժժժժ*UŠՊD )|PD A"Ъ٠*UQ@~@xs|(@ ӂxs p?pgpUժժժ$ T@E@ (@*̆0Ѫ @ |p*A?È,UP(ԊՀU }lQxpD| x qxP*Uժժժȉ*U(ŢѪՊŢPU" Ѫ U U((U*UĂ*E* Պ@ ("*БŀTD Jժժժժ* Ŋ@ @Т(T"T(B@xqd?b*D !ʼnbOxcE`p"q|!ժժժժ(P"ЀTPh(*A E @  ~x@҄ P"@*EĢq'ß~?* Tժժժժ((*) "(@ƂP̀U" "ĂPA*Q x`?@ъU ŠE@T|A ?~s@"ժժժժ E(T*@(EςT@* "ՠ"ՀU(E P@(HłԂ@T  Uժժժ@D*(Zx@KT"@@ت EDx0*(D0  Sh($ "Uժժժ‚@р *|P @TP E "@(&Pxsp?4  D‚@xs'(p? pgp |q UժժժU U(D AO (*Q*A@Ѫ P xq?BĒ P ՊU((*Uyfcpp'E> q#Uq'բ)U*UժժժP@(HłԂ@T  "ՀU(E  E(T*,U*V*ՂT@* "ՠUժժժU((*UĪE**((  UU"բ)U*Ѫ P |pa?BĒ P ՊbOxC0||yD p'|)y@Uժ@TU Ā@ň  *A P ł~x@  *@ P@ q`C~x  *@ժժժժ0  Sh($ "ت U*L`?@(*(@D*'|Ig?x~c`@@Uժ                     ժժ @yfxc>(p(|(*x~Ob |~pxgpϨUՂ"€" ժժժժP(@aOaxsq?(q'|p P(xx | xU(px#~T>| Ԁ@(H"@ժժ(UU@**D"P*DԂU @ R*ԢT "P "ŀUL* P+UE(Uժժժ T*ԪQ*F**TU"")U ժT* *T"ՀQ(D*E@*P((U"U"T UժժժP "ŀUL* P+UE("P*DԂU @ R*ԢT "(UU@**DUժժժ "DE Q AT @@* "DEUժժժՂ"€" *@`C0p|rU|xШU px8@@c'c~(ժժժժ(D*E@*P((U"U"T  *T"ՀQ T*ԪQ*F**TU"")U ժT*Uժժժ @}lC|"|x Ex|bpx~~C|(ÄH*QE(PȄPЂUժժժT*@aOax'*q?*q'Up*p* P xxI`"~!0~xP @@A@ DUժժժ(Ā*TQ@ *T U @@* B(UҀ@ P D @@" Uժժժ P(UD**TU"(%  Q(*ԈA  PŀT € @ @(рP Uժժժ P @( @( T*ԠĊTJ@X*ТT*EP E$ Q@ P  P 4ժժժժ@  P *T*D T*T @*ĀТUP**ETР UժժժԀ ш@*@`xc`p|!>pp|pUUxxpՊ s *Uժժժ@*U"A*UE*UT HP* E "A"DE"ժժժժU@lxx ՠq'@|!*(||`'pxxCCǀ@@ (*P ЀUժժժT @aOOxs(qx? qpp* 1P*xxAb@( |p2~TxpU $D@@P* @ Uժժժ(PU* *P*҆@(U*Q()ʼnUQ@ U@*р PUHB*@ LUժժժP*"A@**TT E(A T (TT@* 5V*ŪժU *UբU*& ժժժժ"T ШD  @ P*( EłQ*T "TU(U* P"(U*( ժժժժAPX *AUJ( D(*U*EP("U*U T%D P((AP!Uժժժ* @HЉ @ T(P*@?`c@p~>pC*p'|pUB(PQxxpрrq~ wpq|(% ~xp#H`(`p~è@U @P*ժժժժP@qcOxsP q'a?"q'Q *p T@ xx0a`Tax~xp(I@ @*P*P @ @Uժժժ(D""U(D! "A*@@EA UQ*U a Q*ՀU ) EժժժժT*E*U UP"*T E (Q*U"U**(@ @PԀPPT"Ԁ PԀ* (@Uժժժ ͉P ԪŪ*"UբժP b*UP @P р*QR**UT P* *U T UժժժQ""D"E $T U(U$M@5**Q* 5 ńT @  (ժժժժ@ @@ T& @?`xcp? > pCj'U|pQ0*A@Uxxc|`S"<(pGx~ xp*ժժժժШ@((D @P" ШTDP Q*@ UU@P*ժժժժ$Q@x|cx`~ U?p~!@??"ax~*Ԩ*U*U(XJP@*U*U ԨUժժժ@qOxs(q'E?*q'(p p( @ xx`aP B~Dp`Q`D !(Pˆ@ժժժժUU*ЀTP(*T* ) @E U*E( U"U*Q" @਀Q@ @P"(ժժժժ** P P* (U U *)ТT*Q("Q(T*Ċ(T @P * T P  Uժժժ@P * T P  *)ТT*Q("Q(T*Ċ(T ** P P* (U U UժժժQ@ @P"( @E U*E( U"U*Q" @਀UU*ЀTP(*T* )Uժժժ !(Pˆ@ @ @?`xsPr?p*|pQ`D@xxC|`("x(p'qx~p`(UժժժԨ*U*U(XJP@*U*U ԨUpx?Op?|`"*$QD axsgψ ժժժժ UTx~O@|!Հ*T`?(D*G AC`|x?*@Ш@((D @P" Шժժժժ@U@qOxs'UBp@ pD*q p* T& xx@aR yC@ ~p`Q0*A@ @@ժժժժT @  ($T U(U$M@5**Q* 5 ńQ""D"E UժժժR**UT P* *U T *UP @P р*Q ͉P ԪŪ*"UբժP bժժժժPT"Ԁ PԀ* (@*(@ @PԀPT*E*U UP"*T E (Q*U"U*Uժժժ@EA UQ*U a Q*ՀU ) EU(D! "A*@(D""Uժժժ@ @*P*P @ @T@ @A`xsTqGp)p|p(IPxx| G E"q!p'qFx~Pb@ UժժժU @P* ` p|Cxp`Px~Ш@0@*||xqg(%ժժժժQ"T( E"U*(*@PĀT* P**@T(U PЊUժժժQ@yOxc'A> q(p *p (P*xx@O`P xC@ {~p'`UB(P* @HЉ @ TUժժժ%D P((AP!D(*U*EP("U*U TAPX *AUJ( UժժժU(U* P"(U*( ( EłQ*T "T"T ШD  @ P*ժժժժ 5V*ŪժU *UբU*& (TT@*P*"A@**TT E(A T ժժժժPUHB*@ L*҆@(U*Q()ʼnUQ@ U@*р (PU* *PUժժժ@@P* @  1P*@A`xs'@rg?@q p|pU $DT xx| xg(Q"aGpqx#~PB*Uժժժ@ (*P Ѐ(@ `>@pp>Pp|>Ѐ@U`*|pC~`G*Uժժժ E "A"DE"T HP*@*U"A*UE*UUժժժU@yxc'> q(|**xxa`@ x~~0pg`UԀ ш@ժժժժ @*ĀТUP**ETР  *T*D T*T@  PUժժժ$ Q@ P  P 4( T*ԠĊTJ@X*ТT*EP E P @( @ժժժժ€ @ @(рP *ԈA  PŀT  P(UD**TU"(%  Q(ժժժժҀ@ P D @@"  @@* B(U(Ā*TQ@ *T UUժ@@@A@ D P @A`xspgq'@pP T*xx *U"Er'y# x#~T >*Uժժժ(ÄH*QE(PȄPЂ E@`rxCxxr'Ę|x p|Ԁc~@ժժ                     `L` g``ƍ ` ``LJ`JJJJJJJi g``0` V` ei  V```` ` `` ` ` ```%PC E5EEdnnxx `L` g``ƍ ` ``LJ`JJJJJJJi g``0` V` ei  V```` ` `` ` ` ```%PC E5EEdnnxx w`8&&0jjjE 0  )(ťк`PPPPPPPPPPPPPPPPPPPPPPPPPPPP $(,048< $(,048"&*.26:>#'+/37;?#'+/37;? $(,048< $(,048"&*.26:>#'+/37;?#'+/37;? $(,048< $(,048"&*.26:>#'+/37;?#'+/37;?PRTW A Bv@6Av@6A ޠ Bj*0U,,Q`Ց0LY@((((((((((((((((((((((((((((((((PPPP| ~@?`*_/u `@@`ժժժժ ``? @|``~7_o @~`Pժժժժ| p~`: ` 0@|@`|| 8g 6 00dX!6L1cl ` `@`^_OU @@`@` ` ~?`z/  `@`/? ?xx?` <`vz}{  0x`2-k x` `x p`|`^?_o_ x@x~` @@`|{} <p `x?_o @x|`| ~@?`v+_/u @p`@*U*U*U* L ?oo`@ @|``~7_o~ @~` U*U*U*U*U*| p~`~;o} 0@|@` vyycpwc~c8 ` <`^_Ou @@`@`U U ` `p`v{_u  `@o/? ?xx?` <`vz}{u 0@?`~  x` `x px`>?_oo x@x~` @@`|{} <p `p?_o |xp`x ~@?`v+_/ @p`ժժժՊ f 3f``@ @```6_ov @~`@ժժժժ ` @~`;ou 0@|@`|_| ` <`_Ou @@~`` ` `p`z ` `@_/_ ?xx?` <`z}{u 0@?`xo/? |?` `p px`~>_ow @@x~` x?`x y <p ``?_o? |xp`Q'p `p`~{} ` `@___ xx`'@Hz p``vz{}u 0@?`@o/? |?`AHc z8" `p px`~=_o{ @@x~`Dh=wI x?`xyy p||`@?_o |xp`h (B x`v_O] @`ԪՂԪՂ cZ ? ` @```3/o @@?`ժժժժ `A R|R @~`vz"t 0`x`|c_?| `_$ D2 |`^_O] @@~`` f 3 00dX!cL1cF `P(D  |`z ` `@?` xx`P(@Xa p``vz{}  0p`@o/? |?`A$Jx%D2 `p p@`~;_o @@x~`DH@"*" x?`pxq p||`?_o Cx@?`' &2 x`~_O} @`(U*(U* cM1 0 ` @~``v+_/u @@?`T*U*U*U*U `O`"( x@`vz&vu 0`x`|3,c| `R* D* |`^;_o] @@p` f X1l70lXL1s~ `N/D  |`~ ~ `?o xx`NhChBty p``~{{}} 0p`@`/? @x@`O'{UrD* `p p@`~7_ov 0@~`DO8"b x`pxq p||`z?_o Cx@?`S $(B `@`^_Ou @`ЪՀЪՀ fN11', `~ @~``*_/ `@@`ժժժժ `Q R0R x@`vz~w 0x`|(A| `T1 D& |`^;_o] @@p`~~ Xf x3lw3lXcL1kF `A(D  |`|{} ~ `~? ` @x|`A(@H ~?`zw~ 0p`@o/? @x@`Q(! D&|p p@`~7_o 0@~`DH"(" x` x! p`|`v?_o Cx@?`'G9 `@`^_O% @@`@` U* U* L <FG`~ @~``~+_/} `@@`P*U*U*U*U ``c   x@`~{~w} 0x`|3-k| x`X x9" p~`^;_o] @@p`~~ Xf 6 00lXcL1gF `N(t{> @@`|{} ~ `|?_o @x|`gw vy ~?`~zw~}  `@o/? @x@`"L@Gc{@r8"|`? @|``~7_ov 0@~`_h9gI x`x p`|`n?_o? x@x~`           83,85,144,16,8,189,94,18,147,117,44,164,47,149,67,114,175,58,168,78 170,165,128,142,153,135,6,64,31,17,145,11,81,103,19,12,129,4,34,125,115,188,13,21,166,141,22,177,139,111,41,99,71,138,36,101,69,46,72,176,127,150,121,172,161,91,157,137,20,155,181,35,88,42,158,143,93,133,134,187,169,38,89,113,61,29,130,45,28,190,122,48,86,30,55,131,26,40,70,97,60,5,185,174,159,23,66C 82,76,59,136,171,151,124,56,152,63,126,24,163,162,105,116,90,100,156,112,160,49,118,25,148,0,1 ============== LINE SWAP DATA ============== 95,51,102,39,119,167,52,10,77,84,1,179,108,96,110,43,150,7,53,57,180,191,37,140,3,79,33,27,80,107,32,182,87,178,68,54,75,104,83,65,106,132,154,74,73,14,184,2,92,98,123,9,62,146,173,186,109,120 500":P2$"2000"-D$"BLOAD MOUSE.PIC,A$"P1$KD$"BLOAD EYES.PIC,A$"P2$Q| ========== SET PAGE 2 ========== 49232,0:49234,0:49237,0:49239,0: ========== SET PAGE 1 ========== 49232,0:49234,0:49236,0:49239,0:3NDOM PIC @ A$ ==================== ;f(1(1)2)2170WpD$"BLOAD EYES.PIC"A$:tzD$"BLOAD MOUSE.PIC"A$: ==================== LOAD TWO RANDOM PICS ==================== (1(1)2)2210P1$"2000":P2$"4000":2220P1$"4028 120:#2180/:21:Q"PRESS ANY KEY FOR SLIDE IN"dCLR,0:KB,128n 2270y33304 PAUSE1999:*MIX,04:21:>"FINISHED. PRESS A KEY"HCLR,0:KB,128R120%\ ==================== LOAD RAA KEY"0CLR,0:KB,128":120*D:0NGXA$",A$4000":2140Sb:21:l"PRESS ANY KEY FOR DROP AND ACCUMULATE"vCLR,0:KB,128227033260PAUSE1999:MIX,0:21:"FINISHED. PRESS A KEY"CLR,0:KB,1 MIX,0:21:5"FINISHED. PRESS A KEY"HCLR,0:KB,128Q120Y:c2180o:21:"PRESS ANY KEY MODIFIED VEN BLIND"CLR,0:KB,128227033136PAUSE1999:MIX,0:21:&"FINISHED. PRESS 227032988&PAUSE1999:1MIX,0=:21:\"FINISHED. PRESS ANY KEY"o"CLR,0:KB,128x,1206:@J2180T:21:^"PRESS ANY KEY FOR A VENITIAN BLIND"hCLR,0:KB,128r2270|33039PAUSE1999:== SCREEN INVERT ============= (Z:.d?nA$",A$2000"Ix2140S21:y"PRESS ANY KEY TO INVERT SCREEN"CLR,0:KB,128227032988PAUSE1999:MIX,0:21:"PRESS ANY KEY TO RESTORE"CLR,0:KB,1282270A0191%SOURCEA(A)4TARGTA(A)F32956,SOURCEW32972,TARGTb32955vBEEP(SPEAKER) BEEP(SPEAKER)PAUSE1999:(MIX,0:222:"FINISHED. PRESS A KEY"<CLR,0:KB,128F120 P ===========2250,2270832829'BPAUSE1999:3L:21:FVB$"2"ĹMIX,0c`"FINISHED. PRESS A KEY"vjCLR,0:KB,128t120~ ========= LINE SWAP ========= ::218022:5"PRESS SPACE-BAR FOR LINE SWAP"CLR,0:KB,12832834,TAR:20:/"TYPE OF FUNCTION"M"1. PAGE MOVE 2. OR"l"3. EOR 4. AND"{CLR,0:A$A$"1"A$"4"1000A$"1"TYPE162A$"2"TYPE17A$"3"TYPE81A$"4"TYPE49$32845,TYPE .(B$)z#0   Šà! Ӯà!Ůà!иà!͠ !ŠϠ" ӠӠ" ӠӠϠŠŠȠ$ Π ΠϠ Šà! ӠӠӠŠŠӠ ŠӠ!ŠӠ!Š  ŠŠ ŠŠ ŠŠϠ  ŠŠҠǠҠǠҮӠǠҮà:ϠՠǠ3 ˠРˠРϠ  ˠРϮʠŠŠCT :"(8); ":":";: ,:) 6A133 @2:1F J(DASH$,A,39)L TZ ^A120:m h(KB)128310u rA$ |A$"P"490 A$"V"1940 A$"D"2140 A$"C"2340 A$"S"2840 A$"O"2630 A$"N"3020 A$"Q"470 S"& :" (V) FOR VIDEO MONITORS"A :" (D) FOR DISKS"k :" (C) FOR CARDS FOR YOUR SLOTS" :" (O) FOR ODDS AND ENDS" :" (S) FOR SOFTWARE" :" (N) FOR NEW PRODUCTS" :" (Q) FOR QUIT TO BASIC" ::"SELEPCLICK(X)(49200)(49200)' Z120P d ========= MAIN MENU ========= Z n3200` x " MICRO EDUCATIONAL AUTUMN CATALOG 1985 " 200 (DASH$,1,39) 255 34,3 :"PRESS": :" (P) FOR PRINTERS AND ACCESORIE/  :CDASH$"==-==-==-==-==-==-==-==-==-==-==-==-==-==-==-"vDOT$"......................................."(SP$" "2STAR$"\ ! / - \ ! / - \ ! / - \ ! / -"<KB49152:CLR49168FSPEAKER49200                301234,A<(FPAUSE120:.P@ZPAUSE130:Hd:Nn~x ============ DOTS & CLICK ============ DOT$BEEPCLICK(SPEAKER)CK(SPEAKER)DFT 33,1A3901'32,A11340P *** CLEAR TOP->BOTTOM \A022f34,Ar35,A1|1340 *** CLEAR SIDES->MIDDLE 33,1A02032,A: 32,39A1340 *** CLEAR BOTTOM->TOP (A2 8((1)61)1030,1100,1150,1200,1250,1310Y *** CLEAR FROM MIDDLE c33,1rA1911~$32,A:.32,39A81340BL *** CLEAR LEFT->RIGHT V33,1`A039j32,At1340~ *** CLEAR RIGHT->LEP"D$"RUN SNAKE"5D$"RUN SNAKE INSTRUCTIONS"UD$"RUN SHAPE TABLE VIEWER"sD$"RUN SHAPE TABLE DEMO"D$"RUN TALKING CALCULATOR"D$"RUN CATALOG"D$"RUN GRAPHICS ROUTINES DEMO" ============== CLEAR ROUTINES ==============1:" ";$ BEEPCLICK(SPEAKER)4*AB111@4:A:1J>39)VH:A:1`R39)y\BEEPCLICK(SPEAKER)fp22:z(A$)910,920,930,940,950,960,970,980,990D$"BRUN SPACE SHUTTLE LAUNCH":460D$"RUN DISK MA vA19A21:3%A8Ğ3"("A")";9L(KB)128690R[580tA$:A$"Q"Ģ23:1:A$"1"A$"9"450B(A$)21A24B11:A:139):A:139)BEEPCLICK(SPEAKER)  B::" (7) TALKING CALCULATOR"):" ";7:"(8)";c:" MICRO-EDUCATIONAL AUTUMN CATALOG "&:" (9) GRAPHICS ROUTINE DEMO"0:" [Q] QUIT TO BASIC":CLR,0DA19NA21:3SA8ĞX"<"A">";]b(KB)128690l" LIBRARY DISK # 1 PROGRAM MENU ":P :" (1) SPACE SHUTTLE LAUNCH"u :" (2) DISK TRACK/SECTOR MAP" :" (3) SNAKE (GAME)" :" (4) SNAKE INSTRUCTIONS" :" (5) VIEW SHAPE TABLES" :" (6) ASCII SHAPE TABLE DEMO"32988 xA13000:! ::15 (4)"RUN MENU"N (49152)160200[ 49236,0d 130z (4)"RUN TITLE6"6 230,32:228,213&0,0:62454<49239,0:49236,0R(49234,0:49232,0i-(4)"BRUNSPEEDOS"2(4)"BLOADTITLE 1.PIC"<(4)"BRUN MERGE"F(4)"BLOAD GRAPHICS ROUTINES"P(4)"BLOADTITLE 2.PIC"Z33039d(4)"BRUN SIREN" n 19104@ =========== ACCESSORIES =========== >J3200qT:" PRINTERS - ACCESSORIES ":^:" RIBBON'S FOR DT80/BX80/DT100/BX100 ETC"h" $12.00 (INC) $10.00 (EX)":r" RIBBON'S FOR FT5002/P88-2 ETC"|" $15.00 (IM)"/"STANDARD TRACTOR, OPTIONAL FORM FEED"Y"BOTH FORWARD & REVERSE PAPER FEEDS""RIBBON MULTI STRIKE FILM RIBBON"" OPTION FABRIC, ONE-TIME STRIKE"""WEIGHT - 8.5KG (18.7LBS)",A$" PRESS RETURN FOR PRINTER MENU........."6ARALLEL OR RS-232C"B" INTERFACES - SPECIFY WHEN ORDERING":a"PRINTING SPEED - 14 CPS""PRINTING PITCH - 10, 12, 15""DAISY WHEEL - 96 CHAR'S INTERCHANGABLE""PAPER WIDTH - 13 INCHES (330MM)""PRINTING WIDTH - 10 INCHES (254MS RETURN TO RETURN TO PRINTER MENU ".x1910] =========== SILVER REED =========== g3200:" PRINTERS - SILVER REED EXP 500 "::"PRICE $895.00 (INC) $810.00 (EX)":"FEATURES INCLUDE:":"EITHER CENTRONICS PCPS"/" IN NEAR LETTER QUALITY MODE."Y" BIDIRECTIONAL LOGIC SEEKING PRINT" " BOTH FRICTION AND TRACTOR FEED"" PRINT HEAD LIFE 100 MILLION CHARACTERS"" RIBBON, BLACK CLOTH. APPROX 3 MILL CHAR WEIGHT APPROX 6.5KG"$<A$"PRESOCK"." GRAPHICS, 132 IBM-PC CHARACTERS"X" 80 CHARACTERS/INCH DRAFT & N.L.Q."" 96 CHARACTERS/INCH ELITE CHAR SET"" 137 CHARACTERS/INCH CONDENSED PRINT"" SPEED=120 CPS IN DRAFT & ELITE OR"" 75 CPS PROPORTIONAL OR 22 /5002-AMUST P88/2 ":B~"PRICE $499.00 (INC) $450.00 (EX)":]"FEATURES INCLUDE:":" 4 PRINT MODES INCLUDING NEAR LETTER"" QUALITY AND PROPORTIONAL SPACING"" 96 ASCII CHAR, 96 ITALIC CHAR"" 32 INTERNATIONAL CHAR, 64 BL8 BITS HEX DUMP MODE"C8" RIBBON - CARTRIDGE MYLAR CARBON BLACK"fB" 2 TYPES OF SELF TEST MODES"LA$" PRESS ANY KEY TO CONTINUE "V1910` ============= FT/5002-P88/2 ============= j3200t:" PRINTERS- LOGITECH FT 40 (ENLARGED), 142 (CONDENSED)"M" BIDIRECTIONAL LOGIC SEEKING PRINT"" BOTH FRICTION AND TRACTOR FEED STANDARD STANDARD PARALLEL CENTRONICS INTERFACE"" WEIGHT - 5 KG, POWER - 40WATTS"$" EXPANDABLE RAM BUFFER 2K-4K OPTIONAL"." :" PRICE $379.00 (INC) $350.00 (EX)"E:"FEATURES INCLUDE:"t:" 192 ASCII CHARS, 160 JAPANESE CHARS?"" 103 SEMI GRAPHIC CHARS, 91 OTHER CHARS"" 100 CPS (CHARACTERS/SECOND)"" COLUMNS/LINE - 80 (NORMAL), 96 (ELITE)"#" Y-ACCESS FORMAT SWITCHES"<p" EXTENSIVE 'ENGLISH' MANUAL"mzA$" PRESS RETURN FOR PRINTER MENU "w36503960490 ============= DT/100 BX/100 ============= 3200:" PRINTERS - AMUST DT/100 - BMC BX/100 ":*7 OR 8 BIT"84" PARALLEL INTERFACE AND RS-232 SERIAL"^>" OVER 100 TYPE FONTS AVAILABLE"H" 110,132 AND 165 COLUMNS PLUS PROPORTIONAL SPACING"R" UNI-DIRECTIONAL AND REVERSE PRINTING."\" STANDARD CASSETTE RIBBON"f" 32 EAS:" PRINTERS - STAR POWER TYPE DAISY WHEEL":^:"PRICE - $499.00 (INC) $479.00 (EX)"{ :"FEATURES INCLUDE:":" 18 C.P.S. WITH 96 PETAL DAISYWHEEL" " BIDIRECTIONAL/LOGIC SEEKING PRINTWHEEL POSITIONING" *" CENTRONICS-COMPATIBLE vA17A23:2%">"(8);6PAUSE13:@":";FXKEY(KB)176mKEY1KEY7630xCLR,0KEY730,930,1120,1410,1600,1750,100 =============== START POWERTYPE ===============  STAR POWERTYPE3200.MC BX/100"5 &:"3: LOGITECH FT5002 OR AMUST P88/2"] 0:"4: SILVER REED 500 DAISY WHEEL"} ::"5: PRINTER ACCESSORIES" D:"6: PRINTER INTERFACES" N:"7: RETURN TO MENU" XA$"TYPE NUMBER FOR MORE DETAILS AND PRICES" bVT22:3650 l: 300  ==== EXIT ==== / :23:958:U  ======== PRINTERS ======== _ 3200 :" PRINTERS ": :"WE HAVE FOUR TYPES OF PRINTERS." :"1: STAR POWER TYPE DAISY WHEEL" :"2: AMUST DT/100 OR B00"2+ "MICOM KEYBOARD - $190.00 $180.00"a+ "DX85 DISK STORAGE BOX - $35.00 $35.00"+ "DATALINER (A4 ONLY) - $99.00 $99.00"+ "APPLE FAN SURGE SUPP - $65.00 $65.00"+ "JOYSTICK ][+ //E //C - $45.00 $45.00", "REXEL BOX H007*F ============= ODDS AND ENDS ============= A*P 3200t*Z :" ODDS AND ENDS ":*d :"PRICE - INC EX":*n "ATLAS 8 DISK DRIVE - $275.00 $250.00"+x "BOSS KEYBOARD - $190.00 $180.:BEEP(SPEAKER):A) "AUTO ICE MODEM D/C - $399.00 $349.00"T) PAUSE1100:r) A130:BEEP(SPEAKER):) 16:1:) "AUTO ICE MODEM D/C - $399.00 $349.00") A$" RETURN FOR MENU *:*:*:*:*:*:*:*:*:*:*:")( VT22:3650)2 3960*< 1 "PRODOS CLOCK CARD - $99.00 $99.00"Z( "AUTO ICE MODEM D/C - $399.00 $349.00"( "VISION 80 COLUMN CARD - $199.00 $179.00"( "VISION 128K RAM CARD - $359.00 $319.00"( "VISION 256K RAM CARD - $499.00 $449.00"( 16:1:) A130 $300.00 $300.00"@'t "16K LANGUAGE/RAM CARD - $90.00 $80.00"o'~ "MUSIC MACHINE - $110.00 $99.00"' "SUPER SERIAL CARD - $140.00 $140.00"' "SERIAL CARD - $90.00 $80.00"' "SNAPSHOT COPYCARD ][+ - $90.00 $80.00"+(CARDS ":O&B :"FOR MORE DETAILS ON CARDS, PLEASE PHONE"~&L :" PRICES - INC EX"&V &` "DISK DRIVE INTERFACE - $90.00 $80.00"&j "Z80 CPM CARD - $90.00 $80.00"'o "Z80 CPM CARD APPLE //C- SSDD BOX 10"4%" $60.00 (INC) $50.00 (EX)"R%"3 1/2 INCH DSDD BOX 10"x%" $80.00 (INC) $70.00 (EX)"%A$" PRESS ANY KEY TO RETURN TO MAIN MENU "% 3650% 3960% 100%$ ===== CARDS ===== %. 3200&8 :" PERIPHERAL OXED":'$"8 INCH DISKS SSDD BOX 10"O$" $42.00 (INC) $38.00 (EX)":o$"8 INCH DISKS DSDD BOX 10"$" $56.00 (INC) $50.00 (EX)":$"FOR OTHER DISKS AND FOR QUANTITY (>500)"$"DISCOUNTS THEN PHONE FOR PRICES": %"3 1/2 INCH #f3200?#p:" FLOPPY DISKS ":j#z:"5 1/4 DISKS CONTROL DATA/VERBATIM"#"REINFORCED HUBS, 5 YEAR WARRANTY"#"SINGLE SIDED, DOUBLE DENSITY"#"SOFT SECTORED - $2.00 EACH BULK"$" $2.20 EACH BMPOSITE VIDEO 0.5-2VP-P NEG"A"" WEIGHT 7.5KG - POWER=30WATTS"j" " DISPLAY SIZE 210(W)MM X 150(H)MM""*" DIMENSIONS 323(W) X 330(H) X 345(D)MM""4A$" [ PRESS ANY KEY ] [ PRESS ANY KEY ] "">3650"H3960"R100#\ ===== DISKS ===== .00 (EX)":6!:" WE HAVE TWO TYPES OF MONITORS":`!" YJE AMBER - 20MHZ - SWIVEL BASE"!" ANTI GLARE SCREEN":!" YJE GREEN - 20MHZ -0SWIVEL BASE"!" ANTI GLARE SCREEN":!"SPEC'S OF BOTH MONITORS"" " SIGNAL - COlA$" TO RETURN TO MENU, PRESS ANY KEY "8 v3650B 3960K 490m  ======= SCREENS ======= w 3200 :" VIDEO MONITORS ":  :"ALL OUR VIDEO MONITORS ARE THE SAME" !"PRICE - $195.00 (INC) $17032K BUFFER)",0" $220.00 (INC & EX)":R:" EPSON APL I/F (STANDARD CARD)"zD" $110.00 (INC) $99.00 (EX)":N" PRINTRONICS PARALLEL I/F TO SUIT"X" COMMODORE C-64 - $225.00 (INC & EX)":b" STAND ALONE PRINTER BUFFER - $CALL". :0:" THE BEST CARD ON THE MARKET IS THE"_" NEWCASTLE AUTOMATIC ICE PARRALLEL I/F"" $110.00 (INC) $99.00 (EX)":" GRAPPLER INTERFACE (STANDARD CARD)"" $110.00 (INC) $99.00 (EX)": &" MICROBUFFER (GRAPPLER WITH HT":2" RS232C SERIAL INTERFACE FOR PRINTERS"^" PHONE FOR AVAILABILITY AND PRICE":A$" <=- P R E S S A N Y K E Y -=> "1910 ========== INTERFACES ========== 3200:" PRINTERS - INTERFACE CARDS ":NC) $13.00 (EX)":b" PRINTHEAD FOR DT80/BX80/DT100/BX100 ETC $95.00 (INC) $95.00 (EX)":" PRINTER STANDS - 10 INCH $35.00 15 INCH $45.00":" TRACTOR FEED 10INCH PAPER 2000 SHEETS"" $40.00 + $10.00 FREIG *** CLEAR LEFT->RIGHT %5 33,115 A039;5 32,AM5 PAUSE110:W5 3740v5 *** CLEAR RIGHT->LEFT 5 33,15 A39015 32,A5 PAUSE110:537405 *** CLEAR TOP->BOTTOM 5A0225$34,A5.35,A1683740Y GENTLY -=*> "4 3830#4 4140,4* 100c44 ============== CLEAR ROUTINES ============== i4> 4H ((1)61)3410,3480,3540,3600,3650,37104R *** CLEAR FROM MIDDLE 4\ 33,14f A19114p 32,A:4z 32,39A4 37404 5 19, ============ TWIRLY STARS ============ <96CLR,0G9@A18S9J24:10i9T(STAR$,A2,16);|9^(KB)127A89h9r(KB)12841609|24:109" * * * * * * * *";9 * * * *";8(A$,A,1);38PAUSE110:PAUSEL8BEEPCLICK(SPEAKER)R8a8A3812l8VT:A|8(A$,A,1);8PAUSE110:PAUSE840908A39118VT:A8(A$,40A);8BEEPCLICK(SPEAKER)88823:39:9")7P 7Z7d23:39:!7nQ7x ============ TWIRLY STARS ============ \7CLR,0g7A18s724:107(STAR$,A2,16);7(KB)127A877(KB)1283980724:107" * * * * * * * *";70724:10 8" * * * *,A1,39);63910!6A1392,6VT:A<6(A$,A,1);S6PAUSE110:PAUSEl6BEEPCLICK(SPEAKER)r66A38126VT:A6 (A$,A,1);6PAUSE110:PAUSE639106(A391162VT:A6<(A$,40A);7FBEEPCLICK(SPEAKER CLICK ============ 5$DOT$85.BEEPCLICK(SPEAKER)>58c5B ======== PRINT A$ ======== i5Ly5VVT0VT235`((1)41)3690,3730,3770,38805jA20115tVT:A5~(A$,A,(20A)2)539105A39015VT:1 6(A$SP$ 4p 34,A4z 35,A1 4 3560B4 *** CLEAR SIDES->MIDDLE L4 33,1X4 A020d4 32,A:q4 32,39A{4 35604 *** CLEAR BOTTOM->TOP 4 A23014 34,A4 4 4 PAUSE130:PAUSE4:45 ============ DOTS &3 32,39A3 35603 ;3 *** CLEAR LEFT->RIGHT E3 33,1Q3 A039[3 32,Am3 PAUSE110:w3 35603 *** CLEAR RIGHT->LEFT 3* 33,134 A39013> 32,A3H PAUSE110:3R 35603\ *** CLEAR TOP->BOTTOM 4f A0222X A$" <*=- PRESS ANY LETTER KEY GENTLY -=*> "92b 3650C2l 3960L2v 1002 ============== CLEAR ROUTINES ============== 2 2 ((1)61)3230,3300,3360,3420,3470,35302 *** CLEAR FROM MIDDLE 2 33,12 A19112 32,A: A 91 FUNCTIONS TO YOUR APPLE II+"M1& " OR APPLE COMPATIBLE KEYBOARD. GREAT"x10 " FOR PROGRAMERS - $45.00 (INC & EX)"1: :"WALL BRACKET FOR YOUR MONITOR. HAS"1D " SWIVEL TILT BASE. HOLDS 76KG. MOVE"1N " THAT MONITOR FROM YOUR DESK FOR $99.00"/S ":N0 :"AUTO ICE RS-232 PRINTER CARD. THE ONLY"{0 " SERIAL PRINTER CARD TO OFFER GRAPHIC"0 " DUMPS. 300 TO 9600 BAUD"0 " $110.00 (INC) $99.00 (EX)"0 :"MOUSE FUCTION EXTENDER - GIVES YOU AN"!1 " EXTRL PROGRAM FOR THE"A/ "APPLE. REQUIRES 80 COLUMN CARD & SERIAL"b/ "CARD - $110.00 (INC & EX)"/ A$"(PRESS RETURN KEY) "/ 3650/ 3960/ 100/ ============ NEW PRODUCTS ============ / 32000 :" NEW PRODUCT"-.T "PROCESSOR FOR THE APPLE II, II+, //E"\.^ "//C, DICK SMITH CAT AND ALL COMPATIBLES".h " PRICE $195.00 (INC) $179.00 (EX)":.r "SCHOOL TIMETABLE - TIMETABLE MANAGEMENT".| "FOR SCHOOLS - $50.00 (INC & EX)":/ "TERMINAPLE - TERMINA MENU...]"- 3650- 3960'- 100K- ======== SOFTWARE ======== U-" 3200-, :" SOFTWARE ":-6 :"WE DONT SELL MUCH SOFTWARE. BELOW ARE"-@ "THOSE THAT WE DO SELL.":.J "SANDY'S WORD PROCESSOR - BEST WORDOLDS 35 - $15.00 $15.00"L, "APPLE POWER SUPPLY - $110.00 $110.00"{, "MONITOR SWIVEL STAND - $35.00 $35.00", "R/F MODULATOR - $40.00 $34.00", "GAMES PORT EXTENDERS - $35.00 $35.00" - A$"[...PRESS ANY KEY TO RETURN TOMAP" 8:CLR:BELL$C "" DO NOT USE YOUR MICRO-EDUCATIONAL":p ,"LIBRARY DISK. FIND AN OLD DISK WITH": 6"DATA ON IT THAT YOU NO LONGER NEED,": @"THEN RERUN THE DISK MAP DEMO PROGRAM.": J620 T216,0 ^(ERR)6450 h8:CLR::"NOT OPERATE CORRECTLY AFTERWARDS."T :"USE AN OLD DISK OR ONE THAT HAS JUST"o :"BEEN FORMATTED.": :"PRESS 'E' TO END OR 'C' TO CONTINUE +"(8); KB,0:A$ A$"E"ĺA$:620 A$"C"220 A$ 340 (4)"VERIFY DISK " WRITTEN BY SHUTTLE SOFTWARE OCT 1984 ":\ n"---------------------------------------" x(4)"BLOAD DISK MAP DEMO.OBJ" 8 "INSERT A ";: " FORMATTED ";: " DISK INTO DRIVE ONE" :"THE DISK MODIFIED BY THIS PROGRAM MAY"& A  :KB16368:ERR2227CLR958:BELL$(7)Q(:" DISK MAP DEMO ";W2t<": USE THIS PROGRAM TO"F"TEST THE 'DISK MAP' PROGRAM FOUND ON"P"THE MICRO-EDUCATIONAL LIBRARY DISK #1"Z"---------------------------------------"- d  ,105,5,170,76,12,16,96,96,240,78,230 e 6,165,6,201,9,240,24,32,102,252,126,56,2,176,240,169,32,32,237,253,198,36,230,7,208 2,230,8,76,29,16,169,0,133,6,202,230,6,165,6,201,9,240,24,32,102,252,126,56,2 176,240,169,32,32,237,253,198,36,230,7,208,2,230,8,76,66,16,24,1380)560USED100)560USED;9 h:" - FREE SECTORS = ' '";E r23:22R |CLR,0: 169,15,160,8,32,217,3,96,1,96,1,0,17,0,25,15,0,2,0,255,1,0,6,96,1,0,1,239,216 169,1,133,36,169,0,133,7,133,8,162,1,169,0,133,6,169,4,32,91,251,230,36,165,36,201,37ESS ANY KEY TO START"( CLR,0:KB,1280 :A A38403868M B:A,BY :3840j A40964203v B:A,B :4096 USED(7)(8)256 "23:5 ,:USED; 6:" - USED SECTORS = '"; @:" ";: J"'" T5 ^:560USED1---------------------------"; d"::"DEC$DEC$DEC$"01234::"Z nA015:A(10(A9))":":e x22:1~ "::"HEX$HEX$"012::" 6:A116 38:":"(HEX$,A,1): 34,5:33,35 35,21:32,2 10:5:"INSERT DISK TO BE MAPPED" 12:6:"PR CLR16368:KB163846HEX$"0123456789ABCDEF"LDEC$"0123456789"V(::k2" DISK MAP ";:<" DISPLAYS USED DISK SECTORS.":F"---------------------------------------"P" WRITTEN BY SHUTTLE SOFTWARE JULY 1983" Z"------------  19, ============ TWIRLY STARS ============ <96CLR,0G9@A18S9J24:10i9T(STAR$,A2,16);|9^(KB)127A89h9r(KB)12841609|24:109" * * * * * * * *";92 8xVT:A8(A$,A,1);38PAUSE110:PAUSEL8BEEPCLICK(SPEAKER)R8a8A3812l8VT:A|8(A$,A,1);8PAUSE110:PAUSE840908A39118VT:A8(A$,40A);8BEEPCLICK(SPEAKER)88823:39:9"ԠҍΠٍIIII HIIII eeeeeeeec--?? -------------e- @6v-- $66$$QQ166666?RA>Q666666666v6v?$$$$$D666666v666?$$???Q6?7'? 666v6??$$$$D36&$66v666?ӚӚӚvvvv6?$8666v.e$d vv6>$ $d?66????????OI?66?????vv6?d$ d?? LIHvvv66@wuu--------uuuuuueeeee=?W?6- $??6- ----\4?v666666ee- -$$$$$$ ddd vvvvJvvvv66-e$$I166666v $d$$$$$ Z ?????66666666$$$$$ddd$$$ dde------ ee e e-dR66 ddܓ- LIe d$$ԚӚӚӚӚӚqb -Ӛv6 uv6'\IJ6 -u66-u????dA???6?6H dd $$ $$ddd,%$ $$$dd$ $ Ӛ$666666666?6vv66v6ee $v.e t- d$ dd d$.^D???<$$$$dddd ee-----5uu5v66666?>???????????6666.- --u-----e --$$$ $??d훓?d-r6?Rve d0LIIIIQ ve d.v666666uu5666?$ 66v%d76feeeee---uuuu--- eeee$ ddd$ ,--ۖӚ???RQAH1v6- 6.-u?66v--- $$?h p- 3666------66III?$$vI 8?$$$d---666?W1- 666666I 5v6)E??.-  666666666v-$d$d ddd 66vv6??'$$$ $H -u-u-Q6v66v66666--&$$$$$$$$d 66666666??? $$$ $ ue-  $$?1؛s6e$ d ????@| ,jY;@S D ~ _  d$$-ee?O?I 6??6??vvu-- eeeee 66.-----e ? $$Ia d - -----e ????R6v->??HIIa e--ۚ$$$???????8 ?    'z#  MPRACTICAL"6b:"BUT IMPRESSIVE USE OF THE 'VTOC'."@l23:  Πլı "O.K. NOW RUN THE DISK MAP PROGRAM ON"W0:"THE MICRO-EDUCATIONAL LIBRARY DISK #1."::"WHEN YOU ARE PROMPTED TO INSERT THE"D:"'DISK TO BE MAPPED', INSERT THE DISK"N:"YOU JUST USED FOR THIS PROGRAM." X:"YOU WILL THEN SEE A TOTALY IO") :"USE THE DOS OPERATING SYSTEM."2 620I 47084,17:47085,0_ 47083,0:47091,0m LOC10000 47088,LOC(LOC256)256 47089,(LOC256) 768,32:769,227 770,3:771,76 772,217:773,3 47092,2:768 8:CLR'&BELL$/ r"THE DISK YOU USE MUST BE FORMATTED"L |:"USING NORMAL DOS.":y :"THE 'INIT' COMMAND ON THIS DISK HAS" :"BEEN DISSABLED. IF YOU ARE NOT SURE" :"WHAT DO, THEN YOU SHOULD NOT USE THIS" :"PROGRAM UNTIL YOU UNDERSTAND HOW T     II)--uvv6 66666?????$$$$$d$ ddd d ----66666v6vvuu-------e- - -e e e e d d ddd$$d$ $6v66v666v6666v666666666666???????????$$$$$$$$$$$$$$$$$d$ $$$ $ $ $ $ ddd$ e e e e e e- ee -- uu?+u-uvv66666666??????$$$$$$ $d$ d d d--mIIIIIIIIII-------5.----------------66666?????$$$$lQ 666--+----56666>????'$$$$Mc u.-----------66666?????$$$$l--u?---------66666?????$$$$l16668?d D* uu---u---uuuuvvv6I????$6666666>0?$$$$$$vvvvvv.dddd ddd66666.$d$ $ $ $66666.$d$d$ $ $` vvvv@JI866vuu- ee d$$'866vuu- ee d$$'ۛ3666666666666666866vuu- ee d$$gII266666666666666ӚӚ#$$$$$$$dd e-uvIIIIHI??u---uv???$$#$$$$$$$$$$$$$$$$$$$$$$HI06666666666666?$ӚӚ#$$$$$$$$$$$$$$UQQQ?.uuu$$$$$$$$$$$$$$ӚӚ#$$$$$$$d$-5666666.,-v666666ӚӚ#$$$$$$$dd - uuv666666u- ee d$$gII$$$$$$$$$$$$$$+------%??66vuu- ee Ӛ$$$$$$$$$$$d$ dd euuvvښ????866vuu- ee d$$gII26666666666666$ӚӚ#$$$$$$$$$$$$$$" d e-uvv66666!@!Dy(R>t"b :[2WE866vuu- ee d$$gII2666666866vuu- ee d$$'ے$$$$$$$$$$$$$$866vuu- ee @'866vu?????----------- ?????'$$$$$$$$$$$$$$$uuu?眒I6666- - -uu d$$$$-uuv666666?ۛd$?^II" -66??6666??66.---------------$$w e R 6666666ddd766.---------566666-66?????????????????'$$$$$$$-%$$$?IQJ-6>'v66vØ6vv---ue -u-- e$$$6666666666666$$$$$$$$$$$$$$T-    6------$$$$$$$$$?vv--ee$d3>6--uuuu66??dddd -,Y 0:27X,Y. BEEP(SPEAKER)(49200)4 F X2401801U 3:27X,Yd 0:27X,Y BEEP(SPEAKER)(SPEAKER)(SPEAKER) :3:27X,Y C1503 2120C,40 2340C,40 2560C,40 BEEP(SPEAKER)(SPEAKER)  040& A$"Press any key to continue"; V60:H128:1040N CLR,0:KB,128T &z 0A$"or a game of space invaders." :H10:V130:1040 DX02402 N3:27X,30 X0:27X,30 bBEEP(SPEAKER)(SPEAKER) l vY301302 3:27X15 |Z 0:17X5,Y3. 3:ZX5,Y3M BEEP(SPEAKER)(SPEAKER)U :g Y10512015w X010515~ Z 0:17X5,Y3 3:ZX5,Y3 BEEP(SPEAKER)(SPEAKER) : A$"How about a game of CHESS ." H1:V135:1Z,YXZ,Y15) "X15Z,Y15X15Z,Y303 ,::{ 6 ==================== DATA FOR CHESS BOARD ==================== @8,9,10,7,6,10,9,8 J5,5,5,5,5,5,5,5 T11,11,11,11,11,11,11,11 ^14,15,16,13,12,16,15,14 hY153015 rX0105S CHARACTER SET"$ A140:"-";:P "ABOVE ARE THE 136 CHARACTERS IN THE " "SHAPE TABLE. FOLLOWING ARE A FEW USES."; CLR,0:KB,128 : X012015 X,0X,120 0,X120,X X09030 Y09030 Z114 X  :24576-KB49152:CLRKB49168?(SPEAKER49200e2(4)"BLOAD SHAPE TABLE 3,A24576"x<233,96:232,0F1:0:3P:Y10ZA1136dXX20nX260X20:YY14xAX,Y:21:" ASCII SHAPE TABLE "; :":HIRE 6? h $36, $M16/& M )$l 6>5?/ .-c,??=I? <%d}$$$$4) ,'@` ---86 m)8???,---????,---?!<(d}-- $$86-($$$6.(6&)=$$'- $'$$$M)=$$$/$$6n$< $$(6& d-6?$$ 6?866 ? dm>5>564$$ --?`-= -#<(- $M1-?=$$$-66??--d ?'$--/$L9?$,-= $d-/6?/$$$*$$$&)=$$$/=- $$&$$$MI9?'$$4$$$Vd 6664$$$%$4666 $d-66?=$$$-?? $d-6/$$$-? - ? - $$+-= $$M166?= $$M16$$$M166&'dl & $l -- i  $h ? I8?h $h8hIc hhIiI $$*--=  $4@@$ 64i(-(-ln(5,,? <%.-`.$ 7%) l ;h @a   %-; m---(Mg '&7----R]pH]vGt !$*,2AIT`kv$/;CKW_kx&,3>JQ^gn}  ,6>F520#DA$(T1)"*"B(K)B(K)B(T)CDA$(T1)"/"B(K)B(K)B(T)MDNN1TDT[DNhDANSB(1)uD&I1600D0N1ID:A$(N)"+"ANSANSB(N1)DDA$(N)"-"ANSANSB(N1)DNNDXANS0660DvWRD,MINUS:"-";DANSANSDTALKUSC|X$"*"ĹWRD,MULTIPLY2CX$"-"ĹWRD,MINUSJCX$"/"ĹWRD,DIVIDEYCTALK:220eC" = ";{CWRD,EQUALS:TALKCII1:B(I)A:A$(I)"=":K1CANS0:N1ICA$(N)"*"A$(N)"/"530CKN:TN1IDA$(T1)"*"A$(T1)"/"TI:"X$";"X$"<"X$"*"X$"="2200BX$"="4209BX$;PBX$"0"X$"9"310`BK1:E(X$)sB"WRD,E1:TALKB,A10AE:220B6K0350B@K1X$"+"350BJK1X$"-"350BT220B^II1:B(I)A:A0BhK0:A$(I)X$CrX$"+"ĹWRD,PLING CALCULATOR !! !! THE CHARACTERS YOU CAN USE ARE !!0123456789 + * / - = (ESC TO FINISH) !! !+--------------------------------------+"A34,8:16368,0AA0:BA:IBAX$AX$(27)ĉ:22::(4)"FP" BX$","X$"."X$":@dD$(4):K1*@nSETUP2073:TALK2054<@xWRD6:PLUS11U@MULTIPLY12:MINUS13m@DIVIDE14:EQUALS15@B(10),A$(10)@D$"BLOAD TALKING CALCULATOR.MC"@SETUP:SETUP100@:A"+--------------------------------------+! TALKwv:::10:10:" LOADING CALCULATOR ":104,64:103,0:16384,0:16383,0::D$(4):D$"RUN TALKING CALCULATOR.BAS"G CALCULATOR.BAS"BAS"HE END OF "FILE$2 :"WHAT DO YOU WANT TO DO ?"D :"1 - STOP"c :"2 - SEE ANOTHER TABLE" :"3 - SEE SAME TABLE AGAIN" :I$:I$ "(I$)300,20,130 ,::1 6:21 @" THATS IT FOR THAT TABLE. PRESS A KEY +"(8); JA$::TABLE "N$* x(4)"BLOAD "FILE$",A$4000"8 M0:310F :MM1:r 22:"PRESS 'E' TO EXIT, 'C' TO CHANGE" 24:"FILE ->"FILE$", SHAPE NUMBER ->"M M150,80 21:38:C$ C$"E"300 C$"C"Ĭ :140 ::10 "THAT'S T 1:0:3!233,64:232,0,::7[("THERE ARE 3 SHAPE TABLES ON THIS DISK":2"WHICH ONE DO YOU WANT TO LOOK AT":<"ENTER 1, 2, 3 OR PRESS 'E' TO EXIT +"(8);FN$PN$"E"Ģ23:ZN$"1"N$"3"70dN$ nFILE$"SHAPE    text"V135:H1:1040,CLRKB,0:A$:6:: ======================= PRINT TEXT IN A$ AT H,V ======================= A1(A$)$0:17H,V:3.((A$,A,1))H,V8HH6B:....."V9:H1:1040FA$" Micro Educational ASCII shape table"YV27:H1:1040A$" More usefull programs will be presented"V40:H1:1040A$" in the next library disk."V53:H1:1040A$"Press any key to return to normal A1300:2120C,40+ 2221C,40;*2340C,40K42441C,40[>2560C,40kH2661C,40RBEEP(SPEAKER)(SPEAKER)\A1300:f2661C,40p2441C,40z2221C,40A$"..................................O                      F*&5s c  Y b ! a   g  0g  t  c   k32< =4hR7j]Y7`]8`[8f ]?do6dWRjm@rp4ox0p*xii!LKI! ; 0=  X 24;;U_9;MGB==,"=-<]Ӹ:    9aPdCOdDN_FJZJELSAA[;8`M?94; ;:6/,#2F6,'$c-( $20( (!' 9*$ ( !D&! m F   |&%j (8m!9'.l'1#7$:$0#) :"2"# !$D!6 !5"F!;6 J!;)+"K!:0$"P"74!(X#2!5!)Z" 9!(k"0 9 )w# "(#* K&# !!) ^*'9;66[& " !%(f# "062b$ &  = C*<:18= ;= ; :#     \6"[=S/76: ; " 5s 7 2 m 62k 4K|  43 {  4/ |  7-} %, =) &- '. =1e)?2=88>;7A*  ~'<t5, v""A     rM_V`.? r.? r$a(ϠŠΠ٠ϠŠ)UVWY_Bo Pa()d<e d=ed>e d?eM4d<ed=ed>e.? rd?e.? rM_]Ԡ٠a(Ǡ٠)F MY_B M6S(Ƞ٠Ҡԩ)'`$`$ , ca(Ǡ٠)FdeM_ Bo Pa()d<e d=ed>e d?eM3d<ed=ed>e.? rd?e.? 2ea(٠)FM_ MԲ MS q.?r`$ a(ŠŠϠӠΠ٠)UVWY_^ a(ŠŠ)FE(ӠΠ)cS(٠̠ӿٯΩ)&@`@*#r:()$ . UVWdeM6deM_<`.? r$a(٠̠)UVWY_ MԲ M[q.?ra(ϠԠǠӠ)ca(ϠŠǠӠŠ)$q.?6@r`$d6?ec?d2e?a()Gd(ҠĠ٠)(Fq.?6@r`$Fd6?eM6IP`<()r$`<()r$`<()r$ `<()r$`<()r$_`S(נ٠˧Ơ٠Š)'`0$q` $qq +qde)cP a(٠ )Pa(̠)cP a(Ġ)@(o P a(àҠ)cP a(ҠĠ)cA2P a(Р٠)cP a(̠ĠŠ͠)cG<P a(ӠŠŠϠ)ccP a`   @I H88888hH(H@(`8HH@@@P @W hH@ H`hH( 8 H(h Hب@HH88 H@h H@888 hH8@@ Hh8H@H8L L"LV ``H  }    ȥ h`H  ȱ  h`Hȱh```E0 `0`E `ɠ                     EANS$(ANS) EA1(ANS$)3EA$(ANS$,A,1)AEANS(A$)JEA$;ZEA$"."760jEA$"E"760}EA$"+"ANS10EWRD,ANS1ETALKEAE:210 TALK A :2100W30W20W0760e6,W41:2054:W4;fANSAN+    + J   #O   #'<    ( (    ']    `      S , & A  -B,   *o    :w     `OO 9 R    0-&)#8 &  a;>@@v;z]dlEm]Y;Z[Cb`Dhk*4q &; T  A J   `    % L  A  .",     " /jM64v6J1{4B2~4{'242D)0$48)02  =02( 7*/1 N0/ 9*0/(D1-,E3.,B5. C  1 :  N8-# X>(>^%(3H#B812 PC:'v?Q5#  #6|#+#  $ !6{$     b$"   ,,  (3,'N  4 F   8G@  K1D$Q=/ Q!'%=}!4(d 0*2+F%=/'59e %A T 7$          0;;267555454443432)! f)10 ]*1"*"^( . d !-$f "+%, ,3-(+ . 4+-"!; ++*4# "$     T o     $ X     X  -/= -/ &Z 2$  !3  3 Z "G!E D D B#A!?%=!)<)8'? e @ :! " A !   I  * ! P  ^  "!"+/%&&I#""&)#"M!#&-?*#"$ #(w)!!* $#5'M&J%:,39G9s B&@"u""?!!2O @ !Z :$ $*" 1) $ ( # & +! -'#" + 3" 0 #3!.! :$!)6i>JCL,fZ3 ,K24O81P,;S)8>6G04R@*4/RC%30RK(31G42B52@62?53>64=73=73=63<63<52<62952651540330/1a1/-+ f/-,'$0$-+*'%-*-**&'063,+*8.42,-92&92-*,H'O0)&+Kh-&'4* 0*  . ~  ,   V    a    #    q       ?       *     (<   )  S9  B<&   ;   A; < N ?=O;{-)  'D>C"A&,D!*A#G6-E8*Di6*Cg3+> e4(@ g&: i"8 O" R# 6 Y$   >:;G: #K9  !  g '0 r  1 v  E+   J    :1d -YEE4X_/AmrZ  Y _N'I ( +-J/T&'+) R >#  %  .      $*X$.O   ! /&    f    O   H ^<:::(=149 5#! 3#  "8! #8! "%U8" !%R9! ! "N8# " w:99y:98|:99|;9:y;9<~;$=' 4 x>=D5?+>}) >A. >)=+*?, +}1+T?2TGD?3@E<A4FA EY5DA RXEF@6dLATA0OBT           X 2   Z   H2!    ! 9y]T7j_KNi @I :5  5 6661,m4   50x3  02  35U3565X4769S1=yw:xtrqtw $vrQL  U 3] 2 [   h    j  s Y     J     - h  0                8G|}}W'X/F(*o%  t"{!  s  2z  3-   3  263,:98<Y7H G$ 4I[{c`_coTawYc0e0ZoLW\[p*  0   (@       3-/!:9 y q  q  o  +9 4o  l (u  l   $w } %y   g  s fy  o~z p  l  z       F :C 2}                = 0m: \F                  !    )#$  '/'%)&1+.2$  75)n4.2M2#f(4"%=F=)#"1 a ,%:*+4  !    #!   e`RdbKN#e^GP\bWo^V)P 5/o     # #2% ]=gX G# ?n " G #ECN "!!    h  +T15%?fY9W3e FU)9]9?E8N>>,<7P78P;.H[:[01,:\22?w@W3"}  9 M WnF; ! 8 < ; A AC""LJ ")   ! !. " X  d   ^  "]  "X  >  %5]_+&9K5893190H3490RD$"OPEN SNAKE SCORES"\D$"READ SNAKE SC222&A(V)(V) 0I:18):D1$2DI1<NDOT$FX:18ObD1$_lI11000:jv35,23uI14~260"..COPYRIGHT.SHUTTLE.SOFTWARE.DEC.1982.."260".........WRITTEN.BY.J.PESCHAR.........."260#".....B%(3)193 U16368# V163360 K16384E FR0:SO813:PL0` B(X)(38)(39)256w C(X)(X(1)1) A119:C$C$(95): D1$"SNAKE" DOT$"......................................." I2311 I 260 I===========: :ENTRY POINT: :===========: 6 "D$(4)> ,:G 62,5R @:255d JD$"NOMONICO" TA%(330),A$(15),C%(15) ^DP$(16),DS%(16),D%(16) hC0:D0:E0:H0 rM0:N0:P0:R0 |L0:L20:L30:X0 B%(0)149:B%(1)136 B%(2)218:H1:160:23:32:" "HI" ";% : 198:23:18:" ";::"BONUS POINTS";::" 0 ";:A%(D),106:L0500::JD1:FL2:230:J0:FD:230:L02500:::2170 DOT$:A(V)(V): 23:1:"####################################";:4:4:*  :2(A$)2:L11(A$):(A$,L1,1);:FR,L12:SO::T A$" HIT ANY KEY ":180:U,0 L14:L0:12(32):("!\-/",L,1)" HIT ANY KEY "("/-\!",L,1);:(K)127ı :200 (33)2(A$)21:A$;: IH:LJF:(A%(L))170ĹA%(L),160:A%(L)0:H8İ130 Z40$ dHHC(20)5:1609 n30:M160ĹR,13? xg 30:M13ĹR,160:HHC(20)10:160m :===========: :SUBROUTINES: :===========: 23:11:H" #";:FR,M:SO: 50,255D%(L)192:3 (33)2(A$)2:(A$));:(33)˩  3490280I25,C(38)1:26,C(20)1:905:RB(X):M(R):k(L0L3::FR,39L2105:8872PB(X):C(P):C13İ100<C160250FP,170:L3L3.75:L2L2.125(L2330):D(D1)(D1L2):A%(D),160:A%(D)P:L(1):L.9İ110 PL.             P:"COMMAND AND LOADS AT $6000.":T Z:"ONCE THE PROGRAM HAS BEEN RUN, IT CAN"m d:"BE OVERWRITTEN." ߢ u 9ե R ȥoȥp`0L5`LoLoɕLoɈ`LN H G&e&L- G&e&`66` Ԡҍ )!H D%(L5)D%(L51)!R -!\ DS%(L)C%(L4)?!f DP$(L)A$(L4)K!p D%(L)1U!z 3470\! Lf! L4:! :======: : DATA : :======: ! :D$"NOMONICO":216,0:79,210,78! Z94314043272:Z8:Z9,Z8:[" 73,78,73,212,76,79,65,196,83,65,86,1 D$"LOCK SNAKE SCORES"+ D$"NOMONICO"1 k :=============: : SORT SCORES : :=============: A$" SORTING SCORES "  23:180 L41PL  L1511 C%(L4)DS%(L)3460 * L50L1 4 DS%(L5)DS%(L51)!> DP$(L5)DP$(L51:A$D A$"Y"2960N :,X D$"MONC"Ib D$"UNLOCK SNAKE SCORES"fl D$"DELETE SNAKE SCORES"v D$"OPEN SNAKE SCORES" D$"WRITE SNAKE SCORES" A114 " " 0  "HIGHEST SCORER" 0 D$"CLOSE SNAKE SCORES" (L)))2);:170:DS%(L):$ L:23:3 L023:190F A$((K)128)Z A$"W"İ3050:c 270t WIPE SCORES} 270 : A$" WIPE DISK SCORES ":180  ::& U,00 "DO YOU REALLY WANT TO WIPE THE DISK": "SCORES? (Y/N)";TIONS : :=========: q :::" TOP PLAYERS SO FAR NO: PLAYERS NAME : SCORE ": L1511:DP$(L)""3000 FR,30L:SO :" "16L10);:170:16L;::": "10(DP$(L))2);:170:DP$(L);::31:":"4((DS% D$"CLOSE SNAKE SCORES"9 D$"LOCK SNAKE SCORES"? s" :===========: :END OF GAME: :===========: {, :6 10@ 39)J 120T A$"BYE FROM THE SNAKE ..................."^ 180h 255r U,0|  :=========: : OP 3320x 2960* A$" SAVEING SCORES "2 23; 220D 1:a D$"UNLOCK SNAKE SCORES"~ D$"OPEN SNAKE SCORES" D$"DELETE SNAKE SCORES" D$"OPEN SNAKE SCORES" D$"WRITE SNAKE SCORES" L115 DP$(L) DS%(L)  L023 190 " 270- 23:1C " SCORE = 0 ##"I R U,0Z 50b :( A$"ANOTHER GAME ?"(8)2 180< B1F U,0:A$P A$"Y"A$" "2400Z A$"N"2630d :===========: :SAVE SCORES: :===========: n " L1PL/ " "10((A$(L))2))A$(L);7$ 31B. C%(L)R8 A(V)(V)XB gL L6(37)3uV B02590{` j L6t 39)~ L6  A$"IT'S "A$(B)"'S TURN" PL1A$"PRESS ANY KEY TO START THE GAME" 220  234,B%(C(4)1)!7,C(20)1016,C(10)5:887FL3(0)[C%(B)HC%(B)HeBB1sBPLB0H0:I0:L20:L33002702(15PL)2" PLAYERS NAME TOP SCORE " " -------------- -----------2039,163>A$"# #"H2:1W L2011`L1i A$;u*FR,8L}4SO>H20:10R32,1:33,38\34,1:35,21f:p2960z :=============: :RESTART POINT: :=============: -------------------------------"2bI122(L1)?l:A(V)Gv:VL0L4:L0_190eA$"########################################"L123A$;FR,L5SO24"#######################################"; EDUCATIONALS LIBRARY DISK #1."N d:"ALTHOUGH THE ROUTINE IS LONG AND BADLY"x n:"WRITTEN, IT DOES WORK VERY WELL." x:"PRESS 'E' TO EXIT OR 'C' TO CONTINUE" :"WITH DEMO (+)"(8)(8); CLRKB,0:A$ A$"E"ĺA$:23: A$"C"140 FULLSCREEN49234,MIXEDSCREEN49235DCLRKB49168:D$(4)N(::d2" MERGE DEMO ":<:"MERGE IS A NEAT ROUTINE TO CREATE A"F:"TWO WAY MERGING OF A HIRES PICTURE."P:"THIS ROUTINE IS USED IN THE TITLE PAGE" Z:"OF MICRO-!!""  0` !$(+/37;?CGLPUZ_dintz ".;IWfv3Om,] Ufb3b'` $(,048< $(,048"&*.26:>#'+/37;?#'+/37;? $(,048< $(,048"&*.26:>#'+/37;?#'+/37;? $(,048< $(,048"&*.26:>#'+/37;?#'+/37;?((((((((((((((((((((((((((((((((PPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPЩc a acc acLa`bi `b'`c`bi `` PWRLa` P`' C```b``bi `_```;c`b```bi ``b'``m```m```!!!!0":(4)"RUN SNAKE"$24:1R"PRESS THE SPACE BAR TO CONTINUE :"(8);ZA$lA$" "ė::w24:1:39)24:1:39)46000D RIGHT" ^::@ h"PRESS SPACE BAR TO PLAY SNAKE........."I r460P |7x "FOR MORE INFO ON SNAKE AND OTHER" :"SHUTTLE SOFTWARE PROGRAMS WRITE TO" : " SHUTTLE SOFTWARE" " P.O. BOX 408"" HAMILTON 228SCORES ARE" :"DISPLAYED."N ":"AT THE START OF EACH GAME THE CURRENT"p ,:"HIGHEST SCORER IS SHOWN."y 6460 @:"THE KEYS YOU USE TO MOVE THE SNAKE ARE" J:"THE 'A' AND 'Z' KEYS FOR UP AND DOWN &" T:"THE TWO ARROW KEYS FOR LEFT ANAUGHT YOU WILL". :"LOSE TWICE ITS VALUE."7 460h :"THE PROGRAM WILL RETAIN THE TOP 15 HIGH" :"SCORES ON DISK WHICH IS UPDATED AT THE" :"END OF EACH GAME." :"YOU CAN WIPE THE HIGH SCORES BY" :"PRESSING 'W' WHEN THE HIGH OR YOUR"5 :"TAIL YOU WILL DIE. YOU WILL THEN BE` :"AWARDED EXTRA POINTS BASED ON THE" :"LENGTH YOUR SNAKE OBTAINED." :"FOR EACH MOUSE CAUGHT YOU WILL RECEIVE" :"POINTS FROM 10 TO 100. IF A MOUSE" :"DISSAPEARS BEFORE ITS CNAKE IN A PIT. YOU START"D Z:"AS A SINGLE ASTERIX '*'. YOU WILL"p d:"STEADILY GROW IN LENGTH AND SPEED." n:"YOUR AIM IS TO EAT AS MANY MICE AS YOU" x:"CAN, WHILE AVOIDING THE WALLS AND YOUR" 460 :"OWN TAIL. IF YOU HIT THE WALLS  ::<" SNAKE INSTRUCTIONS ":F34,2u(:"SNAKE IS AN EXCITING GAME FOR 1 TO 15"2:"PLAYERS, COMBINING SKILL, PATIENCE"<:"AND A LITTLE LUCK."F:"THE STORY TO THE GAME IS AS FOLLOWS :" P:"YOU ARE A S!! ! ! ! ! !270 R2180\21:MIX,0:f"PAGE MOVE / SCREEN MIX"bp"SELECT. 1: FROM PAGE 2 TO PAGE 1"z" 2: FROM PAGE 1 TO PAGE 2"CLR,0:B$B$"1"B$"2"900B$"1"SOURCE32:TAR64B$"2"SOURCE64:TAR3232830,SOURCE VERSE"CLR,0:KB,128#2270;32809,TYPE:TYPE Z32800,32: PAGE. 64=PAGE2n32797:INVERSEPAUSE1999: :MIX,0:22"FINISHED. PRESS A KEY" CLR,0:KB,128*1204 ======== MOVE/MIX ======== >::H2GH BIT".v"3.INVERSE EVERYTHING +"(8);=CLR,0:A$TA$"1"A$"3"640`A(A$)A1TYPE127: INVERSE & SAVE COLORA2TYPE128: TOGGLE COLOR BITA3TYPE255: INVERSE EVERYTHING:22" PRESS A KEY FOR A FAST IN22:MIX,0& "FINISHED. PRESS A KEY"9 &CLR,0:KB,128B 0120 : =================== FAST SCREEN INVERSE =================== D:: NA$",A$2000":2140 X21:"SCREEN INVERSE. SELECT" b"1.INVERSE SAVING COLOR"l"2.TOGGLE COLOR HI"COL0 A$"2"COL127/ A$"3"COL128C A$"4"COL255M :22| "PRESS SPACE BAR FOR A FAST SCREEN CLEAR" CLR,0:KB,128 2270 32769,COL 32771,32: 32=PAGE1:64=PAGE2 32768:CLEAR PAUSE1999: :0,570,820,1150,1360,1590,1730,1860,2000g T ================= FAST SCREEN CLEAR ================= s ^::22 h"FAST SCREEN CLEAR" rA$",A$2000":2140 |"ENTER CLEAR COLOR FROM 1 TO 4 +"(8); CLR,0:A$ A$"1"A$"4"390 A$"1EN"! " 6. VENITIAN BLIND"G " 7. TWO WAY VENITIAN BLIND"j " 8. DROP AND ACCUMULATE" " 9. SLIDE IN" :" Q. QUIT" ":" SELECT +"(8); ,CLR,0:A$ 6A$"Q"ĺA$:23: @A$"1"A$"9"300' JA$:(A$)34/ " DEMO PROGRAM "; 39):C :_ :" SELECT FROM :": " 1. A FAST SCREEN CLEAR" " 2. A FAST SCREEN INVERSE" " 3. PAGE MOVE / SCREEN MIX" " 4. LINE SWAP" " 5. INVERT SCRE  24576: D$(4)7(CLR49168:KB49152S2SPEAKER49200:MIX49235t<D$"BLOAD GRAPHICS ROUTINES"FA(191)P:A0191Z::A(A)d:n ==== MENU ==== x::39): " MICRO-EDUCATIONAL GRAPHICS ROUTINES """"""""""     'L0`8e fi f'``/8惘8 fi 8 f QۥL'`ɿ i0ȄL`/8惘8 ݁8 f 8 ݁8 f ϥL|'`_ i0ȄLx` fi ` ݁ fS @`` I@``@ Q@``HH)JJ轊h) eh` !!""##( (!!(""(##P P!!P""P## fi  f'`_ f8 f'" " " HE PICTURE TO BE MERGED ONTO"? "" HIRES PAGE 2 (,A$4000)"m ,:" 2. BRUN MERGE. THIS LOADS AT $6000."w 6:: @"THE PROGRAM WILL ACTIVATE HIRES PAGE 1" J:"AND MERGE THE PICTURE ON PAGE 2 ONTO" T:"PAGE 1." ^23: A$: FULLSCREEN,0: D$"BLOAD MOUSE.PIC,A$4000"N D$"BRUN MERGE"b PAUSE11500:u MIXEDSCREEN,0 22:"FINISHED. PRESS A KEY +"(8); CLRKB,0:A$ :: " MERGE DEMO ": :"TO USE THIS ROUTINE:" :" 1. BLOAD T