' +JJJJ ?\>m0M='+l> /+l   d]@ŵLҦ]]L L}BBL] 鷎귭෍ᷩ췩緈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,&"_]` L/浍굺L  !"#$%&'()*+,-./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#0EB 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`   vLDcpq` [` ~  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 iõ`  \ 濭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-(  Р@跻~!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 / / ]ƴ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䵍䵐`"L ŵ8ŵH ~(` d Ǡz# u`$$ # g- n- # g- u- # |--" z ' " ) " # '( " - -f " E+ }+ ( L+ !-頑 + !- - + , ک" ] +" X + i" & i" >+ # a+/ ' O, Lm #w S$ " V ". ' S$ + i" 2' -) + " "Lm کZ:6=DKR 0:]ȕ5Kby + ,Ơ 碼 + \' 碨 +멭 ? 5 + + # ZY & + ~" # ZY & + , # ZY &: + '  #  -  "  I*  "  \' " V ,  "  )  "  " $ - - 3,{ + +v + f + + $ L.m w i" * i"g + + ~ + , .V   0+ , , .X   I# ) $' ` (  N  I  ` ,Lk I#% Lk i" ) )` i" ) `! ꢍ + on! "$ + ( "Ơ ++ " +! "? + ,3, ,! L$ v+ L0j , E+ L+ + , " L$a , " # " uk Qk=   " {2@   o$   " , !& *g נ  # #LjB   , " {2 # LjE  LGk , LjO  LGkS   i" ,L.k, , " & i" + , " i" , *3I]t " i" $ i" * , + + ~ B* + !& & " i" (& , $ B* + !& , * i" (& * + " * P# * 0+ i" + , $ , , , i" , * " g& * * " , $ " D& $ *LGk " g& w"Li " , v+Lj , =- 0$ B# g&L!h ( ,! 0$ "נ f # , "l נ ,נ ꥝Lh ( , " , ,Lh ک   Qk `& ) 0 B# g& , $ " , $Lh ک   Qk-   `& ) 0 " ,Li i" + & " V &] Li & % "  y,ɠ! ( ,] f # , ,נ  ,Ӡ! ,,ؠ! N LYg " ,, " D&Lg i" + & " V i" K& * i"b Lg + * $Lg " * " , , ' + $ i"ˠ R&ݠ! 0$ " g&Lg `& , " 0$ i" g&Lh " ,! 1 "$ >$ " v$L7 ک   `& ) i" $ " 7$Ġ! ' ' ~ i" + $ B*a + B* & " i" 'Lf a$v + " , * "q  $ "  % *Lf کڠ   0` " R& " & " &Lf i" & # !& (& " V " /& # v+ " / i" " / ( 5( " ) y% / U' 5( "! y% . ' 5( " {( y% . ( " U. j. %,   # i" $ `& $ $ ~ i" '  " B*!  P#  3% i" >+ " o+ i" 2' v+ L+頑 }+ \' " V ,  "  )  "  " $  #> ֠ C + :, # ZY &H + %, V, " # " ]% # a+/ ' ( 5( * $ , H, " / 1Y5KKby y% /! 5( * $ , H, " / 1Y " / i"v " / 3, " / i"{ " / + " / / $ Le + " / + " / !b :b i" 7$ ( ' ' ~ " ,  "  i" , , i" % &] LUc " , b S2 $'Lb V :b " E$ ( " V h$ ,  "  i" % ): Lc h$ , !&  "  ` _2 i" ' q' S2]  "  ` N'Lc +  +  B $Lc i" - Y ک " {2   P# .   ` g2 S2 " % & k, # q'`b y, $ " Lkb   " $ B* Lyb` b i" ( B* +  ~ c2 i" ' q' W2` i" 'Lb _2 " %` ( Lb` V ,  "  )  "  " $ & " V L$a_   %, ( " {2 .( ` !  & k,  S$ " V`!  "  (  "  O, r, " La d,! r, d, " V!  "  !  "  Lk2 # x   ( " {2z  N " {2~   (N  ک   w򩴠   s򩽠   ک   L$a "W L` $ % %, " V " :% " $ + ( G' V,    {2"   %, G' " {2 " ],L` $ *b p" "&   {2 " ],L`F   d, " {2 "WS+  H, . i" > Lv_   + Z +   i" & 0 " {2-   P# .0   & 驒! $ $  *! + * * O,  * H, & #L_2   L>`V   کl   کr  ,, a $L-^  # + ( + ,, a  # + ( + ,, a  # + ( ~" " ,, a  # , ( ,: ,, a  # , ( :, & ,, a کǠ   A, Z 9' . ک   A, Z v . ک   A, Z i" 7+&  * # # '{  *! {  *L.] 4# # " * $ + + ~ h$ ,  + ,  i": E$ i" % &: L] " E$ b S2 0+ $' b X'   U' Z J   ک_  # %, ( S$ ,, al  # 3, ({ ,, ay  # + (v ' [c 0+ b + ' + % " " b ~" ' + % , " b , ' , % " b $ L[\ i" &L] , " V !b :b ;# # #! ' " E$ " 7$ & ' ' ~ a$ + "$ " V " # " ' a$ + " V " % "]  " " " V "# ' "% ' -i" + $ "$ +L[ 0+ + +L&[ S$ + $LZ[ ( 5( " + ' !b [c + 5( " + ' [c b # L \ i" $ # $ $ ~ B* + "$ % +ՠ L[ B* # " +ՠ * #נ "L[ B* # * ' X( * 3% !b i" * # + + ~ +i "$ " + + "$ ' ' ~ a$ + $) ᠔ LSZ + & " a$ + " + & " a$ + " i" + * $' i" + &` +  +  B ک   i" +' 2' 9' @' " # G' " i" " U. j. " # U. 1Y 1Y 1Y [2 $  L&[ ' * i" + i"  + ~ + }$ $L[ + ~ + Z+ $L*Y + h+ " # * "L0Y 0+L{0` " "LU. 31 " # " "LU. [LU. " $ ' $ $ ~ i" + }$ $ B* $ Z$ (M S LY B* $ "$ % B* P " B* $ $ "` 3% S$ %L0 " * "> LY` ک   " 7$ &+ $ # a+᠔ L/X ' " + h+ " # "LV 0+ " * S+ + + ~ + Z+ "+LrX + Z+ "$ " + h+ " # "LV 0+ ' L{0 i" o+ S+ h+ " # " $ LX v+ L{0 " " P# }+LV + E+ " P# L+LV *LX` " * S+ +LW i"  LnW " * * + + ~ + + "+LZW + + "$ " + )+ " # "LV 0+ ' L{0 i" 7+ >+ * )+ " # " `& E+ " P# L+LV *LW` " * * + + ~ + + $LW + )+ " # * "` 0+L{0 *LX " * S+ + + ~ + Z1Y "ڠ y% ( *)L:V "[! y%L4V "`! y% x' *) 6LIT # %LdV " fb *)LIT x' *)e! % *j! % * *o! % * " * g  * "  $ P#  $ *L0t! % $ s* % %LV ( *) * " U. j.LITL= *# " V #b  *q  LU i" * h ;UkU{U $ L[U 4# # " # \. 1YG! K& y%LU "L! y%LU "Q! y% 6 V P# & i" ) ) ) ) * # * * ) ) * Y& *V! y%L6 i" * h UV'V $ LV 4# # " # \. T8! l*L@T J( %L#T ;# l*L@T * %L=T=! l*L@TL0 * y% 6 i" ) ) ) ) * m( * ) ) * *` " P*  * " f # * P* *L0 Y& l y%L6 4# y% ) %LTB! y% 6LIT I# * * $ * *L0 I# * % * * Y&  *L/S! y% 6! l*LTQ ( *) *  * " g& * * [) 8) * * * ?) *L@T " P* * " D& *L0 ) %LS$! l* ( *)L@T x' *) B# %LS)! l*L@T I# %LS m( l*L@T `& %LS.! l*L@T3! %L ( *L6R W B# z* ( * % $ %L6R! y% 6 & e*LT $ %LuT $ % H% ) % &LT i" g&LR " % ! y% 6 x' *) *  H% Y&  & H% B# 8) $ `& ?) $ $ $ % % $ ' 8) * * ?) * % * ) % * &L@T * % * *  8) $ ?) $ & $ 8) H% s* ?) & % H% " % & H% # % &L@V ) -* "$ & ) * % i" * ) " z* u& " ' *LQ " D&L6R u& ^*LQ! y% 6 " & u& " ' *L6R ' g&LQ " % WL6R I* g&LQ " % XL6R * u& ^*LPԠ y%LP I* g&L9P " 4* X W* y%LP٠ g&L`P " 4* Wޠ y%LP x' *) i" g&LP y% " % " 4*LP ' g&LP " 4* " % W y% 6 i" * ) & $ `& ?) H% & e* &LP i" $ c' l* T) % H%~ B* */ LOO W y% P# & B* ) d% # * k% B* ) d% I* k% 6LRO 3% i" P*LP ) -* "$ & ) * % u& " x' *) Y& LO Y& 4* # y%LP ' g&LO " 4* W # y%LP ( g&LO " 4* Wʠ y%LP ( *) " D&LP W* y% " 4 k% ) ) d% i" * -* k% i" * ) d% P# k% i" * ) d% ( k% i" 4* ) *b LaN " 4*LN i" * $ " $ i" ;* ~ B* *b LN V ' y% P# & B* ) d% # * k% B* ) d% ' k% 6LN 3% ) */ LN " 4*LP i" * $ " $ i" ;* "LF # ) % i" ) # ) * " (g  $ I#g f # % *  % $ ) % $LM i" * * ' ( &* $ x' &* $L;N J( % $ I# % %LM x' &* $ ) % H% % & H% % & H% % & %L;N ) -* ' ) ) d% i" * * " & " ) ) " Y& " " LF i" " # * % " V # # " " " # # " " i" ) ) ) " " " i" % ) ) " * " "LL # # " # ) " i" b) #) i) p) " " " ) ) $ "᠔ LM i) p) " B## d% C( k% MLJ # + i"%  H% i" * $ i"  $ &LK i" *LhK i" # # # " # " # + i" + i"  + ~ # ) ' $ # ) ) %L0 M ` w) LK LK 0/ s# ' %LK i" 1) i" ) ) ) )&L0 i" 1) i" ) # ) (LJ i" ) # # ) 7$ )f  H% [)f  &LF )f LuJ i" ) M i" #)LF # ) L K i) ) LJ i" ) #LJ頒 ꥝LJ # # d% ) k% " ) M i" " # # # d% ' k% #  ) ) " # " ) ) " ) ) !& " ) ) " ) ) H% i" ( " " 1) $ %LxI i" ) ) ) ) d% ( k% ) ) d% " k%LF # + &#ڠ + M %ڠ % " LHL0 C( % H% $ % &LI " 1) .LF ) %LK # ) ) H% w)  # d% C( k% # # d% I# k%LF % H% w)  &LDH " % ~) % ) % H% w)  &LF # ) M) H% ~) M) &LH .LF " 1) # )䠒 L{I # ) M) H% $ % &L{I . i) )  H% $ % &LDI i" ) ) ) ) d% ) ) % $ # Z$ k%&LH $ % LH $ %LK ' % H% i" % &LK & F)LI ( % H% ( % &LK % M)* LK $ %LH ' % H% T) F) &LK ) % H% [) F) &LH i" b) #) i) p) d% ) % !& k% . " 1) ) %LH i" " # #  # ( % LE C( ( H% ) ( &L;F i" %LE ) (LTF i" % %LE ꥝LE i" z#렓 + s#` / F x' 'LFL0 $ #LFL0z " j.LF " ) " # " ) " #) " *) " 1) %/ + j4 # LK B# 8) H% `& ?) ( & % $L#E I#N & 6L{: 6 $LˆʎõĵL õ ĵµ aµ`` L̦µ_bJLuLz`  ȟ QlXJ̥KlV  ȟ QlV e@ NL   L` -e L գsr ࣭ml ࣭srL -µLЦ գ ze)rs zrsLq ] Qlr L̦ գ8gh ࣥhgL գ8LʨM ࣥˤLµH hLħõµ µõLD&E`( 80 0 DDLDLDL^ t^`,tP ȟpMt-^^`DH hWLԧ d@` Lꢩ  c ȢL LqLգcl mllm ꢥELȦAD@ C N cLuɠ% d: L cvc]ܢ @J0G eeʎd d E DUEX ЃDWcДJEgDfLH eeh) tt L [ _HH`]ɍ]ɬ` ɠ``DE ɤ<(LΡ DE`80!  eDeE eDDeEE8`֭ͲLɍ [LLĦ__ ^ 9 LҦ3 9 a   0LjLY u< (_9 ˭ɠuɠK_9 ?LBP^pӀARPECR@BAFI SC@PXPYQXQYMMOHCpBCPBF1F2pEDDRKBKSMX MY?SVFRSFRCVINNI\ICrFAPMVdSWlIKllQ4=Qh.?.->?.7 v6$$$dddd 6$"+M?;-M)$$$$L-??'7>6vee< -5 e5555%5%5%5%5%d-?.$<1 . H 5   GPalGP1  ~ /6?Div|!$'.9  ` %L ` ` ` ` ` `з   Z X$*umoswRu`  Ff ef _b ذ  LJ 5 5  f#  A :z +BZ+'A$ S t f & # / h  .; J *   p + ~ "  _" / a$ $'` O, ( " " $d" " $ " ;* ~ B* " " O, & * (- - *Lw ( (& " V B*  "  i" +  "  3%`wԅ<=ig>Ȅ?BCL, ```````````````````````+] M G $ # c ϓ& *P" - * %L6v " $` - * " x' -LUv # * "U" , (& $ i"f 7$ (f Lu`  f - #  ' " * (Lv #  *` B* ` i" Z `  f - Lu 9 X " R `& 7$Z" ' "PAUSE11500:PAUSE: DELAY= 120: DRAW A NEW PATTERNA+1+ |7S: FIRST LINE BLACK, NEXT WHITEZ  DRAW LINE THRU "CENTER" TO OPPOSITE SIDEv 559,YSA,B0,159YS S,Y " PRESS 'E' TO END" " PRESS 'G' TO GO ON" Q$ Q$"E"ĺ"RUN MAIN MENU" Q$"G"ī80 441 Y ";N; X0558N; S01: 2 LINES,FROM X AND X+1d 7S: FIRST LINE BLACK, NEXT WHITE  DRAW LINE THRU "CENTER" TO OPPOSITE SIDE ,XS,0A,B559XS,159 @S,X TY0158N: STEP THRU B VALUES hS01: 2 LINES, FROM Y AND Y?)" %P MOIRE PROGRAM+ZPd24: MOVE CURSOR TO BOTTOM LINEnx: SET HI-RES GRAPHICSA(1)559: PICK AN X FOR CENTER B(1)159: PICK A Y FOR "CENTER" N((1)4)2: PICK A STEP SIZE 15:"STEPPING B  %Lu ک   LsL(t i" Y-   v - -LCu " Y- i" K-7   v - -Liu " K- i" `-Q   v - -Lu " `- کk   v CMWCCœʓ # |- B   v - -Lu " v$ i"͠ v$ " >$Π   v Q( >$ $ - " # g- " # Lt $ - " # " " v$ 1 "$ >$ 1 "$ )$Lu " )$   v Q( )$ $ P " #à " #à  $ i"͠ $ "$ Ƞ  %Lr i" + $ " R- v]   v - -L=s " R- i" + $ i" D- vw   v - -Lrs i" D- i" + ` '(Ls   ) " {2   # " {2   i" + $ i" + ` i" Z  # $ (  & >$ # g- n- # g- u-v   v ( LBr Q( =- "  $ -  %Lq i" + $ $ Lr " + v,   # " {2@   v ( Ls Q( + +  $ O,  %LXrLs ) /- vC   v ( Ls #  !& /- i"  $ &    S$ " {2۠   v ( LIq Q( V, -  $ - + %Lp i" + $ O, r, vޠ   v ( Lq Q( r, -  $ -  %LRq i" + $ 6- L+ v   v ( Lq Q( L+ "q  $ -q  %Lq i" + $ 6- =- "4  $ #4  %Lo I#     " . ک   &4 <" " " z Š  $ i" " z 3!  $ $ " " z A"  $LpF"  )  m i" + $ i" - v   v - -Lp " - i" + $ $ p"! V, vǠ LNo " - * - ) i" - * - # # * |- # ) ' # ' - $ " + ` B   ک   v - -Lo X` - -LTo X B# $   ک=   کe   I# + $ " " v   v ( Lp #  " &"&"",2"2, >" ,22,"""& " 0 " " ****"""&"""&& ,22,& <,2""""""6***""" <""">>  "<6*"""">""""""""""""">>>""2"""">""">>"  ">"""**6"""2*&""""""""",*"""" """ ">""""""""""""6**""""""""""> > *@666( <12# *>*>>  "&*2"> >  ""  "" >""">""""  <""00>>    >!!!&!!!>> .!!!>> >!!& !!!! ! !%%%%!!!!!!!!!!>!!!. > !!!!"""))))6""!! ? ?77$$~$~$$6.""> !!<<!!!?????<9"!!!/!!!8!  !?!%%%%%!!!!!!!!!!! !!!!!<   ><!!!!!!>!!! %%))"""""??<<00>@ 6677> 75:+;<>> 00*6*>00>1)%#! ?? ?? ""?!!!!""$ $ $     &"\"#"@@ <"""<0H""<&!@   >*$"""^0$8D">"D""D"*"D"<$8DD>"8Dd"8D!8$DBB1xx8D2!DD">"~?p@ H$!8TRB"LLJ*)8DD""8DD>8DD"*1^8DD> 8D ~DD"""DD""" DD"**B$!DB"~@`? @< <*@ $H~$>> >G%tRq  . *"*>@ 8DD""p($!!!> 0 "    wss"*6<wo[]_Q]L_1=_!=@_3 }};A_1-===@?}_A}??}oa}}|^3 }%;A===?!==_Dwwww_@? oommfq==]oi]=}}}}}}_@;-1====;55-===_3====AoQ]Oa}}|_3=5-=A_1=_i]=_!]^ =A?wwwwws======A=====;_o=====5;=;_ooW;==[oooog?0_ow{?_C{{{{_A}{wo_?_Q_____Ao_? ooog@oooogog[[I[?[?[Io? _?7Ig?=\o7|ݽoowo-;_?+-goo? ogooos_Aooc??_ow{}|_#==-5>Aokoooo?_3=_g{?_3=?S?>Aook=hog?}_0?>A?}_1=>A?!<_owws_#=_#=>A_#=>1?_`ogogogogs?{}{w?_A_A{to_ow{|oQ^o   &"&""` ,2"2l"><,22, &""w  0 "2 # ***+&""#"""&&l22, `&< g""2lg""c***6ccg""< >$> !-3>">""w"""""""""""?"  "??""r""w"">""w>**>c  g"?c6**""w#&*2""w"""""""!!!)."""w1 #Iw"""""w""""c""**6"c""cw"">""> "@$$$< (#21*>*>> "2*&" >" ">"  ">" """">"""""""< "00>> "   .>>>>> ,>>><>><<>>, >666 00000>2> >*"">666>>>>><>>, ><8 > <666><"""""*>>>>66>< ><> "*6<>>>666>>>>>>>>>>>>>>>>>>..>66>>>66>>>>8>>>>6>>>66626>>>6&>>>>>>>>>:6.>>>>8>>>>>>>>>>>>>>""">>>>>>>>>>>>>0 >> *@666< (#21   *>*>>> "2*&" >"  >"  "> """>"""""""<  >>>> < "     373>33>00>3;3>>#?3>7733>03?3?3338888;;377>>*"66?##77>2&>33?>33?60?7?'9?><<8;;;3??3366"*>>66666;;3?07??9'?"< "*6<?!?!333;;3333337773?3?3??3?33;3;;3?377773377'3;???--!33;3'?937>26&>3;?>33377>#<1??-- ?;;;;;3;; 33!--?333??33;;3?07?? .&? *@ 66$>+89#21:;6>> >"666">39???30<03?????03>333?31?3??3?>33>03?$ $>> $ >60<    0>3>3333300>333>3?633>03333 00000333 >kkcc33333333333>003>063333333 cckk>3 3333>0? ?𘘜8>c]]A]Uw?a]!]]a?>c]uu]c>1m]]m1>c]q}]c>>c]q>c}u]c>wU]A]UUwAwwApPPPW]c>gU--Ug}AAUU]UUwwUYUMUUw>c]UU]c>?a]]a=>c]]UMc>?a]]a-Ug~C}#^_a?AwwUUUU]c>wUUUU*wUU]UUAcU**UcwUU*A_(zA8p`xx``xx>@8888866$$~$~$>> >B%$R! *,88888"6">~~`p83;?73  ?30 ?30038<63?00?0333?3 333333>0 ~~ < <~b0 8  |&& ,2"""" "$(4"|****,2"""""",22, &&,2  <| """&""""***6""""">> 88 "*6, "">"""<""<""<" "<"""""<> < >> < " &""""">""">>D8"$(0($" >"6**"""""2*&"""""""<""< """*$<""<($"" ">""""""""""""""**6""""""""> >< <@ <<*@666>>( <bd&F($*>*>> @"&*2"(>" >" " $~> <"  <"">""""""" >>00"   L<$*0 >*** > >>> >*$$$"><>    >**>  "> >>8>$>> > >> """"  **" >"""">>""     <$*0 >*** > >>> >*$$$"><>    >**>  "> >>8>$>> > >> """"  **" >"""">>""   @ 8 > > >  >" >>>>$>> > >** >> (  >"" >>>>$$$$>><$"  <> >> & > ">$8""$    .<&( <*(6$ 0($ $1"$*$ "8$ $$ #)-*8  80,>c""""?""?""?>k>?""">""""  "c6**"""&*2""""""""?!!?""?""?6c"""""k*"">> >00000>"@(~ < (&20 *, **>> """ " >> ">> """>""""""< >> " 6>6>>>>>>""">AAAAA>cAAc> 0`@@`0  @@ AUIc]A>"""A~ ~ *II*@< ("">>>""""" >"  >"  "> """>"""""""<    &"&"" ,2"2,">,22, &"""  0 "" " ****&""""""&&,22, &< """2,""""***6"""""< >> "*6< ">"A"!!""" !!! """"=#> 0"""!@> H>@ "!  ! B=**+**A&*+**"EEE"""%B@0L?"""!@>>@>@?B<B%$$$$2MDDD(:JJJ*B% R!B%$$XA>> > *@666< (#21 *>*>> "2*&" >"  >"  "> """>"""""""<  00>> " 0>3>3333300>333>3?633>03333 00000333 >kkcc33333333333>003>063333333 cckk>3 3333>0? ?𘘜833?3333333333333333;33333?333? ?00003333?3?33333337;3333333333337;3333303? 33333333333 33333?333 33333 ?0 ?8p`xx``xx>@8888866$$~$~$>> >B%$R! *,88888"6">~~`p83;?73  ?30 ?30038<63?00?0333?3 333333>0 ~~ < <~b0   &"&"" ,2"2,">,22, &"""  0 "" " ****&""""""&&>>&< """2,"""""2,>8>>> >"> <"">"""""""""""""">>>"2""""">""">>"  ">"6**"""""&*2""""""""">>"" "" ">"""""""""""""2,>8>> > *>"""*@666< (#21 *>*>> "2*&" >"  >"  "> """>"""""""<  00>> "  L <""""<(($>"">** ">  <$$$&6***""">"""""""""**"">"""****>""*.*""8  80,$$>"">">BB>"""< >?!>>***>"BBbRJFB$ZbRJFB>>"  "<((((*&"6**"""""">""""""""""""""****"""">"""""******>""**.**"  ">> 8$$$8(&8$8($@$$< ("".22. *, ******~@ > """ " >> ">> """>""""""< ? > >>> "  9996'''''88>999'>.>99>8'''88888:'''''?+++''''''''''>999>8.# 1>.'''''' 555?''''999>8??8<  <88& ?#+7>?99?99'''''''''''>>>'7''''?'''88888:''''''??+++++''''''''''''''''''>`'''''#<1>''''''''' 55555?'''''''''>?8 ?<< @888888@ 6$??? ' 9 #21'7'  -?-  >>@ >7/''' ?9889???<='''?''''99>890880>>>> 988   00>3>3333300>333>3633>03333 00003333 ?[[[[333333333>33>003063333>333 mmmm~3 3333>0? ? 8( ?3??33?33??33??333????????;3?333??33?? ??3;;3??cwkcccc337?;33?333??3??##+.?3?;3?0??? 33333?33333 ccckkwc33 33333 ?? ??8p` ?@66$6???? ??0? '<:9 *.  88888*>* ??  >>`p833333<630000?38???0>0?8<63?00??0?33??0 ?33??3>0> p88p>>>>8?3  > >">>""">>> >""">>">><>""> >>""""  IIII>"""">""">>"">>""> >">> >><$$$$<"""AIII"""""> >>><$<?!###?!##??!#?!!###????!9##?!!?!### 001! ##??IIIKKK')))++3?!!!##??!!??!!)+/?!!?##??00?? !!!###?!!##"AAIIKK! !!!!!? ?? @< <6c@66$""""">> >G%tRq  .     > >>@ ? ?? >>>>~B@x.&"&""` ,2"2l"><$,22, &""w  0 "2 # ***+&""#"""&&l22, `&< $g""2lw""c***6ccg""< >$> !-3>">""w"""""""""""?"  "??""r""w"">""w>**>p #"c  g"?c6**""ws&*2""w""""""""""*,"""w1 #Iw"""""w""""c""**6"c""cw"">""> "@$$$< (#21*>*>> "2*&" >" ">"  " 0($~ p>" """">"""""""< "00>> "  * <"<"""<< <"""<"><$""< """"  "" 6***""""""""""<""< :< $"""2,"""""**6"""""< >>8  80,**"*:<"">""""""""""""">>><2"<""">""" ""  ">"6**"""""&*2""""""""""""*,"" "" ">""""""""""""""**6"""""""> >>> >00000>"@>>< (&20 *, **>> "2*&" " >>  ">> "8""> """"""< >> "   z#?? ŠұŠҠ®Šk ϮԠ ٮԠ ήԠ ׮Ԡ ԮԠ ЮԠ ήԠ  ׮ԠîԠîԠ ˮԠ Ԡ ҮԠ ŮԠ ɮԠ ϮԠŮԠ̮Ԡ ԮԠîԠϮԠ Ů ҮϮҠ ԮӮ ԮӮ ӮĮŠ Ůà !Ӯà ԮҠ ҮϮҠԮӮԮӮŮӠŮȠ ԮĮŠ ԮҠˮҠĮҠ Ӡ" Ӯؠ" ӠŮנРҠҠ ŮԠЮʠ ЮӠ# ŮҠ&hif&i'`'i,]1&i,&&iPII&if&H8HӰ hIiHӅхhЅhIi҄f8Ъх :$8e҅ԥ #(Ӱ %eЅԥeP`JJJJӊ)^1I_1ȄҤѢԆզ8eЅԐ V%e҅Ր W%JJJ1%01&1%0Q&&T(1,12Ȍ1JxTU-11&,10-1Q&&T(1L%)m1JxTU1) 1Q&%01Q&&T(1,16HȌ1JxTU $ Q&-1,10Q&&T(1h(e)jL:$0/',]1"&,%i8i#H&ii(1,1ʥHȌ1JxTU $ Q&,1-1Q&&T(1h`P,1,H00010111 O $h`0JI0`O0J `,13H01 P $0001011h`0 I0P0  `)L%1JxTU ^_^`80 g" ",S11) 1x,U $) 1,T( $)` F*,1 & &ҤHi #i)ҽ]00,1ҽ101011)  ` a#1JxTU) 1Q&,1%0Q&&TL"Los0pt)0`11(Ѹ11 110H0HL Lލ111 ,P,T,R,W`10] ^_^_ ^` \^_^_^`L > 0 g"L"0 g"] ^_8":8e::;i;:i:;i;:" h!mj!8":L!<"=>1?Bj!C ,6Å7k! li!㩠   8LG ӠˠŠŠҠŠ xЅԅ؅:020'0"(!!L(!,@, ,!"(!0! Lt8j!j! f"e":";"ih!:* /:" h!mj!     198ĺ(4)"RUN FONT.EDITOR";K211ĺ(4)"RUN SLIDE.SHOW"WK200ĺ(4)"BRUN DHGR"rK204ĺ(4)"BRUN DGR"K209Ģ23:9:" THIS IS THE DOS 3.3 SIDE OF THE DISK."::14:"(SEE PAGE 4.)":I1500:::I6)R rA(6),(7168A(6)):I15:A(I),170::A,192:I621:A(I)A(I1)::A(1)AX | K(16384):K196K198K211K200K204K209410 300 778,32:782,36:786,4:768 16368,0:17:34:(K) K196ĺ(4)"RUN DOUBLE.PLOT"K(36):I26:A(I)A(I1)1::A(1),192:I26:A(I),170:\ ,D((1)8):L((1)12):T1L 6VV1(D0D1D7)1(D3D4D5):HH1(D1D2D3)1(D5D6D7) @V1V24 JV24V1 TH1H39 ^H39H1 hV:H:A(40)(41)256(3ollowing: ";::" ":" I1800[ K(16384):K196K198K211K200K204K209420a  I768791:V:I,V::768 160,0,152,133,60,133,62,133,66,169,4,133,61,169,8,133,63,169,32,133,67,76,44,2548 "V24:H34:V:H:A(1)(40)(41)256e, Suite 102C"4 7:"San Diego, California 92110"Z :::10:"D - Run DOUBLE.PLOT"z 10:"F - Run FONT.EDITOR" 10:"S - Run SLIDE.SHOW" 10:"H - Load DHGR" 10:"L - Load DGR" 10:"Q - Quit"; 17:5:"Choose one of the f ";::" |"E Z:9:" ";::" |"i d9:" |______________________|" n::13:"By Mark Simonsen" x12:"Copyright (C) 1984" }17:"8/31/84" :5:"Beagle Bros Micro Software Inc." 6:"3990 Old Town Av (4)"NOMONICO" (17)/:::490e((1101)6ĺ"REQUIRES APPLE IIE OR APPLE IIC":2:9:" ";::"_"<:9:" ";::" |"F:9:" BEAGLE GRAPHICS ";::" |" P:9:"      Los#pt$#`#Lފ #H#HL e" #  ߅ cLLv P, P,-`L e",- P` e"0L" "0̤L6# ",0LE# L#,V,R,P ^ 2 LO#,S S#LKJ 8":8e::;i;:i:;i;:" h!mj!8":L!<"=>#?Bj!C ,6Å7k! li!㩠   8LG ӠˠŠŠҠŠ xЅԅ؅:020'0"(!!L(!,@, ,!"(!0! Lt8j!j! 0"/":";"ih!:* /:" h!mj!'"a00FILL(CIRCLE(BOX(XXCIRCLE(XBOX(XBMODE(HŴxaI1"3DUfwĠŠ̤̍Íà̍̍àҳҠ8 0U( / O/x 0T(LB)fөx<= 90==<<`,T0,U<,U0,T<` [' a#,10 *()%0*& *(ȸ *(0H1hJf)*)  ߅ cLLvݍT_ -L9")"-##''(#(''(#K(1+,'.+,---8///0Ӆ1 #h11i111ͪ181111` [' a#11ፁ1`  1$1  Ԑ1 АLԭ`ԭ`LީЄ - { lݩ , { lݩ ک [ / O/xm"m" .LA. >Jrh 111i1111 a#hh`81i1LA.811΁111m1111LA. LA. /LA.11H11 a#0ѥӠұԢFԭ11H,10 # # $hҩ111 &хg RQԅѥPӅ , Щ [' a#L+ ?/1eЅP쭀1eӅ1eԅͪ1 ץͩ1Ь1 -P -P11 -111 -1` 7&L#,1-7-6-Ӆ607`76--1`ЊHH1 ?/) ' && ,ԝéQ ~, _, ~, m,Q , , _, , , _, , , _, , , _,111 a#1`HP #h`HP 7& #h` ,Q 81P`1}P`Q811`1}1}`Ӆԅ&FPeӥeԐՈ`,1  h***$*$1```,1 g RPЅҥQ ,  ['111L{+ ?/Нѝ ,ͪ1 +ͩ1$ ,ҝ , P ,1L^1ȄPЅх ,ԝ՝HI_1ȄPh҅ %` %`ҥ P h*ҹV1$% %``H)&JJ&&h' &' &' f&')'` *()`ҹV10`j$ )1ԅL#Ј∹҈`ХȥҙȥȄ` h*Ҥ0V1$%M%G04$ h* * D* * L)ɛ  3)L# ) h) *í11 a#` h* s* {*)E%0EѤ 1,K)L*(? % h* s*$%0/ {*)%0%0 {*)%0  * &` &`? & h* s*$%0/ {*)%0%0 {*)%0  *eȱe [' a#` 'L& 'L'1HJhxTUp&P&T(1` Lo1ԅՆ , o1Ն ޥѰ$)ӥ)Ӆӥ)ԥ)ԅԥӅթ [' a#11 h* s*%0 %`Хҍ9`JJJJӊ)^1I_1ȄҤѢԆզ8eЅԐ $e҅Ր $JJJ` g RQP̪1914HH, $hh` o1` o11`L,1 [' # [' 7&L' ` `  >>< (&20 *, **>> "2*&" " >>  ">> "8""> """"""< >> "̍LcL_cȅccc Kci(ixU KcT(i(i `c c(`ȅccc ci(ixU cT(i(i `(`PPPPP-159=!%)-159=b"8ESY[`djny-??--->??7---??--??.-5??--->?7-->?7--->7-666666-----   IIޞqqa LLVLVLҠγٍčÍ̍à      G"A$"J"A$"K"270 "A$D ,A$"M"ĺ(4)"BLOAD MOUSE.DRIVER"k 6A$"G"ĺ(4)"BLOAD TABLET.DRIVER" @A$"J"ĺ(4)"BLOAD JOYSTICK.DRIVER" JA$"K"ĺ(4)"BLOAD KEYBOARD.DRIVER" T22:31:"One moment please..." ^Drawing Program". :33:"By Mark Simonsen": ::: 24:"M - AppleMouse //":24:"G - Apple Graphics Tablet":24:"J - Joystick, Paddles, Koala Pad...":24:"K - Keyboard" 14:26:"Choose your pointing device: "; A$ A$"M"A$" ";::"_"D 31::" ";::" |"n 31::" DOUBLE PLOT ";::" |" 31::" ";::" |" 31::" ";::" |" 31:" |__________________|" ::26:"Double Hi-Res BJ" F(4)"BRUN DHGR"@ PA(974)(975)256:A3,0:A4,104I Z160h dSW30464:230,32:16297,0 nSW:"PATTERNS","PATTERNS.AUX" xSW6,128:SW SW6,64:SW3 (104)64Ĺ103,1:104,64:16384,0 (4)"RUN DP.BAS" :31::"  Q$(34)&(4)"NOMONICO"::\(4)"PR#3"::12:31:"One moment please...":21((1101)6ė:"REQUIRES APPLE IIE OR APPLE IIC":2(116)146ė:"INSUFFICIENT MEMORY":"TYPE "Q$"FP"Q$" OR RE-BOOT AND TRY AGAIN": <(4)"BLOAD DP.O    d#(i.x#J0#T #Jn#U&M#%.Q&&T(#` ", #iH "h-`/'-O0 E#`HJ) 'h)i& &&`0i)0 00`J d##JxTU&T((JJJJ)#J )8)*#`T_L9"$"""""">"#׉>"#׉<>B'x=i?C Í'xi'x`Txh`RxH)&JJ&&h' &' &' f&')'`,1,1,1,2j 1,1,1u 1,1,2~ 1,3XLwLw@w'x\w]w'&(xx,U& [w,T(& [w(x(x gw]w(x'')`\w]w`<>B=?'xC8 Í'xi'x`w'xww'&(x wx,U w&,T( w&'')(x(x ww(x`ww`,T,U&H]-v]&vh,T(vvvv( vvvvvHJhx,T,U&]-v]&v,T(vvvv(vvvLu`vH)&JJ&&h' &' &' f&')'`8)` @߿~|xp`@?,T,U&,T(vJnvNvNv*H0u1u0uhv0u s1us Us s0us1uvvr`r8rJvvrr vvvrr vvvvvIvvvIvrvrv vvvHJhx,T,U&,T(vv٭v vvvvvHJhxzsv( ss ss8vv %s ss`rr vvvrr vvvrv vvvvvvHJhx,T,U&Mv&,T(vvvvvv(vvr`0u1urr vvvvvvrr vvvvvv8vm0u0urv vvvJxv Usvvr`H s>ss4shH<>Bv=i?C Ívivh` s nvJvJvvvvvvvHJhx,T,U&,T(v=vNvvvHvv s nvJvhvP vjvHJhx,T,U&,T(vv vvvLLrLrL,tLtLau@vkrlrrr vvvrr vvvrv vvvHJhx,T,U&,T(vkrlrlrlr rvvvr<>B=?vC8 Íviv`@v ssrr vvvrr vvvrv %s %s    Ҡ Ġ Ġ Ҡ Ġ  IJà  Πà̤Ҡ Ҡ Ġ vC8 Íviv`@v ssrr vvvrr vvvrv hHPhHxHUTh(T(h` Ӡ Р ˲ Š ̠ Ƞ Ҡ ıà IJà Πà̤Ҡ Ҡ Ġ ~LNn n nH nh`` nɛ`ɠ ɘɈ'# Ɉn : Ln nɕ n ɍз ɠɍɠ`HH{ n @I,np I,nI@ nhh`NO`H{ noho`HJpxUT(T(w]p?"3DUfw*;L]n"Df"**3L;nDL3UU]wfn;w]p?"3DUfw*;L]n"Df"**3L;nDL3UU]wfn;w]p?"3DUfw*;L]n"Df"**3L;nDL3UU]wfn;w]"3DUfw*;L]n"Df"**3L;nDL3UU]wfn;w]"3DUfw*;L]n"Df"**3L;nDL3UU]wfn;w]p?"3DUfw*;L]n"Df"**3L;nDL3UU]wfn;w]p?"3DUfw*;L]n"Df"**3L;nDL3UU]wfn;*Lklkxkxkiki  kȱ k k i ixU k T(i i`PP9=!%)-1§  ҽàŨ  ҍҲҭҭԭ׭ <"<"""<< <"""<"><$""< """"  "" 6***""""""""""<""< :< $"""2,"""""**6"""""< >>8  80,**"*:<"">""""""""""""">>><2"<""">""" ""  ">"6**"""""&*2""""""""""""*,"" "" ">""""""""""""""**6"""""""> >>> >00000>"lRS:16302,0:BBC::5004ZPE:2100:K500BOXX:OYYbX(XLM)(XHM)256:Y(YM)r*OX,OYX,Y~4ZX,Y>RD:(BTN)128įZX,Y:700H(CHANGE)128830\ZX,Y:750RD:(BTN)127899ZPE:2100:K500OXX:O6302,0:FU900,260,60,700,2900,1500,1200,1900?QA$(4)3200HS506wX2000:I8:JBC:A$"background color":3100]23:"Clear screen to what color (A-P)? ";^14bA$(27)ČRS:500eA$(13)620gA$"A"A$"P"606hBC(A$)65:60A$"Q"17006A$"E"FU5:16302,0:2900FA$"X"600f&A$"D"FU4:16302,0:7000A$"L"FU1:16302,0:900:A$"P"1100DA$"F"1400IA$"S"1800KA$"T"FU8:16302,0:1900LA$"M"2200-NA$(13)FUĹ1raw "I$"_P_"N$" Paint ("(PB64)") "I$"_X_"N$" Clear Screen":I$" L "N$" Line "I$" T "N$" Text "I$" Q "N$" Quit ";FUĢ21:36,67:"(Return = "FU$(FU)")"230014A$"B"FU2:16302,0:260A$"C"FU3:16302,016301,0:232,0:233,ICMODE1:131HC:BBC21:I$"_B_"N$" Box "I$"_E_"N$" Edit "I$"_M_"N$" Mode ("M")":I$"_C_"N$" Circle "I$"_F_"N$" Fill ("(F165)","(F265)") "I$"_S_"N$" Set Color ("(HC65)","(BC65)")"I$"_D_"N$" D^YDYCYY:YDY:OYCY)hXXCX:YYCY7rZOX,OYL|XBOX(X,Y)CX,CYRD:(BTN)128įZOX,OY:BOX(X,Y)CX,CY:260K(KB):K155ĹKS,0:ZOX,OY:XBOX(X,Y)CX,CY:259(CHANGE)128390XBOX(X,Y)CX,CYZOX,OY:320":)CXX2,CYY2:59* (CHANGE)128120N XCIRCLE(X2,Y2)CXX2,CYY2a ZOX,OY:100y RD:(BTN)127259 ZCR:2100:K500 6CXX:CYY:DXCX:DYCY @X(XLM)(XHM)256:Y(YM):CXDX:CYDY JOXX:OYY TXDXCXX:XDX:OXCXCYDY eOXX:OYY- fXDXCXX:XDX:OXCXG gYDYCYY:YDY:OYCYU hZOX,OYg iXXCX:YYCY nXCIRCLE(X2,Y2)CXX2,CYY2 xRD:(BTN)128įZOX,OY:CIRCLE(X2,Y2)CXX2,CYY2:60 }K(KB):K155ĹKS,0:ZOX,OY:XCIRCLE(X2,Y2; 3288:232,0:233,ICMODE1:16304,0::MODE(M):500M :" "(8);:c K(KB):K12815 " "(8);:A$((K128)32(K223)):KS,0: ;RD:(BTN)12759 <ZCR:2100:K500 ZCXX:CYY:DXCX:DYCY dX(XLM)(XHM)256:Y(YM):CXDX:,C,D,E,F,P,T,136,129,149,147,138,154,139,151 IN28672:RDIN3:XLMIN6:XHMIN7:YMIN8:BTNIN9:CHANGEIN10:CARDIN11:MDIN12 MD,MODE:IN15,PX:IN16,PY:IN17,QX:IN18,QY IN:(CARD)į:"NO POINTING DEVICE FOUND!": 500 RS:N$(14):NI28160:IC121:FA26624N 232,0:233,ICMODE1:MV29184:SW30464 VT(16),S%(127):I116:VT(I)::I18:FU$(I)::I0127:S%(I)I128::I14:C:S%(C128)128:S:S%(S128)C:, 15,22,29,36,44,51,58,62,70,82,89,95,97,104,111,120,L,Bs! 31488CARROW1:PENCIL2:CROSS3:BAR4:FINGER5:SCISSERS6xPX1:PY1:QX4:QY4:PRECISION X,Y AND QUICK X,Y:M1:MODE1:HC15:BC0:PB1:F10:F215:ED0:DR1:1:0:KB16384:KS16368:MX559:MY191" SV25344:RSSV3:RC27392:I$(15)            4=Qh.?.->?.7 v6$$$dddd 6$"+M?;-M)$$$$L-??'7>6vee< -5 e5555%5%5%5%5%d-?.$<$Qcw666I%'?(m8?'-?,$$,-; % -5J ??7---;??.-?$+--MI9??"$;-M)$$$$L-???????'?7?76uu--- --e ??? ----f--- --??N--??+5%5%5%5%5%5%5%5%5%5%5%d---???-5??',%??XXCX:YYCY# ZOX,OY0# XBOX(X,Y)CX,CYe# RD:(BTN)128įZOX,OY:XBOX(X,Y)CX,CY:3025# K(KB):K155ĹKS,0:ZOX,OY:XBOX(X,Y)CX,CY:2904# (CHANGE)1282990# XBOX(X,Y)CX,CY# ZOX,OY:2920$ SXX:SYY1:EXCX:MODE2S:2417""T ED(16287)1282905:"V (16287)1272902D"W 3040]"X RD:(BTN)1272904s"Y ZSC:2100:K500"^ CXX:CYY:DXCX:DYCY"h X(XLM)(XHM)256:Y(YM)"r CXDX:CYDY:OXX:OYY"| XDXCXX:XDX:OXCX" YDYCYY:YDY:OYCY # 2 A$""A$A$",D"(DR):A$,B$,!< 3200F!F A$"SAVE FILE!":2417~! NI:A$"":I512767:(I)141A$A$((I)128):! ! 2830! :23:"Name of font to load: ";:2700! A$""ĺ(4)"BLOAD "A$",A"FA",D"DR! 3200" A$"LOAD FONT!"ANY KEY TO CONTINUE ";:14. t 16304,0:32009 2530q :23:"Name of file to load: ";:2700:B$A$".AUX" A$""A$A$",D"(DR):A$,B$ 3200 A$"LOAD FILE!":2417 ( 2630 - :23:"Name of file to save: ";:2700:B$A$".AUX""!8:MODE2:MX139RD:50023:36,53:"DOUBLE PLOT (c) 1984":36,53:"Mark Simonsen, Beagle Bros";:21:36,53:"SELECT: ";:` 2416o :::(4)"CATALOG,D"DR:2419p A$"CATALOG DISK!"q 3288:16300,0::23:"UNABLE TO "A$ s "PRESS 8MK(KB):K155ĹKS,0:ZX,Y:232,0:233,ICMODE1:PR(CHANGE)1282120b\ZX,Y:2100:23:"Select mode (1-4): ";14A$(27)500A$"1"A$"4"2210M(A$):MODE(M)M1M3ĹMD,0:MODE1:MX559M2M4ĹMD,12*PĹRC3,127:RC4,128(MODE2):RC:JI116:II2835,150::h X0,147:X0,147139,147PĹRC3,127:RC4,128(MODE2):RC: I116:IVT(I),150::4X(XLM)(XHM)256:Y(YM)>ZX,YHRD:(BTN)127įZX,Y:K0:X,Y(CHANGE)1281920.ZX,Y:1905<P0:2010DP1N:21SV6,127:SV7,128(MODE2):SV::" A B C D E F G H I J K L M N O P "::12MODE22060X0,147:X0,147559,147bRS:500l:TFLAG0:ZBA?qX(XLM)(XHM)256:Y(YM)KvZX,Y|RD:(BTN)127TFLAG1:" ":X,Y:"_"(8);K(KB):K155ĹKS,0:ZX,Y:" "::500K1281935KS%(K128)TFLAGĹKS,0:ZX,Y:" "(8)(K128)"_"(8);:ZRS:500A$(13)18403A$"A"A$"P"1811C&HC(A$)65x021::80):I8:JBC:A$"background color":3100:23:"Select background color (A-P): ";?14DA$(27)ČRS:500IA$(13)1890NA$"A"A$"P"1855XBC(A$)65 16302,0:13)FU6:ZAR:2100:K500>JFILL(F1,F2)X,YIr640,3S|1500:23:"Quit now (Y/N)? ";:14:A$"Y"500::2000:I8:JHC:A$"foreground color":310023:"Select foreground color (A-P): ";14A$(27)"A"A$"P"1411F1(A$)65z21::80):I8:JF2:A$"2nd fill color":3100:3150:"Select 2nd fill color (A-P): ";14A$(27)ČRS:500A$(6)ČRS::16302,0:1405A$(13)1480A$"A"A$"P"1441F2(A$)65RS:W6,64:SW:MODE(2):SW6,128:SW3:14:MODE(M):SW6,64:SW3|16301,0:2000:I8:JF1:A$"1st fill color":3100:3150"Select 1st fill color (A-P): ";14A$(27)ČRS:500A$(6)ČRS::16302,0:1405A$(13)1440A$2,0-FU7:232,0:233,98:ZPB:2100:K500MX(XLM)(XHM)256:Y(YM)YZX,Ye(ZX,Y2RD:(BTN)128įZX,Y:1200<(CHANGE)1281330FZX,YP1250x(16287)1281409z(16287)1271402{16302,0:1500?}S5N(16287)1271102-O16302,0:1200WQ2001:I4:JPB:A$"paint brush":3100x`23:"Select brush (A-P): ";a14eA$(27)ČRS:232,0:233,ICMODE1:500gA$(13)1145jA$"A"A$"P"1121tPB(A$)64yRS:13~1630YY#X(XLM)(XHM)256:Y(YM)4XOX,OYX,Y@ZX,YmRD:(BTN)128įZX,Y:OX,OYX,Y:900 K(KB):K155ĹKS,0:ZX,Y:XOX,OYX,Y:899(CHANGE)1281030XOX,OYX,Y$ZX,Y:960L232,0:233,98:(16287)128110 qqqppmqp񩿍ppppͶqpͷqp͸q p ppqpqpq, p NpnpNpnp`qqpppmqppippppqpq`pLpL0p p p ppp`p`b qIq qqqq qqpp,q 0ppqq, pqq,qNq +JIqq |qq8qpqqp*pp Jq |qqmqpqmqpLp |qp0p /ppa pp /ppppp͢qpͣqpͤq p ppqpqpq, p NpnpNpnp`ϱʈ0ٟqȐ p` p p p` jpLpLDp _q p(ϱ έT^ p ppp`p` pϱ ΢) p, pp pp,pNnppppqpqpmqppmqpppppqpmqp񩿍pp0pp0p /pppp, p NpnpNpnp`H p ppMqNqhLȅ0"   p p p` p` p` pLpLp Oq pp 3q 3qxx/ 3qxx 3q 3q p p ppp`8p8 3q` 3q p p ppp8pppqpqpmqppmqpppppqpmqp00) A$"F"2800$) A$"L"25005) A$"S"2600V) A$"D"DR2(DR1)1(DR2)h) A$(27)500r) 3200rrent "A$")":36,80(B$):B$;:a(N 24:40:"(Press CONTROL-F to see Fill Patterns)";:22::( :21:I$"_C_"N$" Catalog "I$" D "N$" Disk Drive ("DR")":I$"_F_"N$" Font ":I$"_L_"N$" Load ":I$" S "N$" Save ";:2300( 14) A$"C"24 EXX:MODE2EXEX4' MV15,EX(EX256)256:MV16,(EX256):MV17,(EXSX)((EXSX)256)256:MV18,((EXSX)256):MV19,Y:YSY192ĹMV20,192:3055' MV20,YSY' MV3' 3040"( 22:K0IJ4:36,K:" ^";:::B$"(Press RETURN for cuZX,Y)& XEOX:YESY1:XXEMXXEMXX>& YYEMYYEMYYS& XBOX(XE,YE)X,Y& RD:(BTN)127įXBOX(XE,YE)X,Y:ZX,Y:3051& K(KB):K155ĹKS,0:XBOX(XE,YE)X,Y:ZX,Y:2905& (CHANGE)1283046& XBOX(XE,YE)X,Y& ZX,Y:3041'0% A$(27)2905,% A$"I"ČMV6:3030D% A$"H"ČMV9:3030]% A$"V"ČMV12:3030s% A$"C"ČMV:3040% A$"M"3030% MV:BC:ICYCYY:CX,ICXX,I::HC% ED1:ZFI:OXSX:MODE2OX(OX3)4% X(XLM)(XHM)256:Y(YM)& XSX43:EXEX4$ MV15,EX(EX256)256:MV16,(EX256):MV17,(EXSX)((EXSX)256)256:MV18,((EXSX)256):MV19,CY:MV20,CYSY$ ZOX,OY$ XBOX(X,Y)CX,CY:XBOX(X,Y)CX,CY:K(KB):K1283031% ZOX,OY:A$((K128)32(K223)):KS,‰đĐāđđđđĐāđꨶ⪪ՅࠂÍՅՕՅ՞衆죎졖跆軆¨ɡ酈檪ݸîϹ裏ꫠοIJȲՙ檪ݸကƸ檪ݸǾ駟ꯠĢՙ檪ݸŶم檪ݸǼɧʯݸՙ檪ݸ¨ɡ酈檪ݸĢՙ檪ݸƺݸՅĢՙ檪ݸǙ檪ݸìͱȣʫݸĀՙ檪ݸª˩녨ݸДࠨՀŴхՙ檪ݸ蠖⋮㮺돻ϸȡ̡̣̳̳̓ȳ̡̳̲̳̳̓ȳက䃎䁖啞枀ᇟ㏾ᗞđĐāđđđđĐāđđđĀᅗ㍶ᕖݗݞÏ՟ׇ݇Ï՟ׇ݇ÍՅՕՅ՞衆죎졖跆軆Յ≦晞‹ԛփ㬲덳̳̰̳̃‰đĐāđđđđĐāđꨶ⪪̀Օ怀ࠀÍՅՕՅ՞ՙ檪ݸ¨ɡ酈檪ݸîϹ裏ꫠοIJȲՙ檪ݸƸ檪ݸǾ駟ꯠĢՙ檪ݸŶم檪ݸՙ檪ݸǼɧʯݸՅŴхՙ檪ݸƺݸՅĢՙ檪ݸǙ檪ݸìͱȣʫݸ ՙ檪ݸª˩녨ݸª˩녨ݸ           iqhqpiqpjqjqjqppeqpfqpgq p ppeqpfqpgq, p NpnpNpnp`pnLpL9p p p ppiqphq`pjq`a pbkqIkqpp,kq 0pplqmq, plqlq3ɈhqlqhqWiqRhqiqHɕhqmlqhq8iq3 pLpɊjqmmqjqjqɋݭjqmqjqjqhq0iq /hqꨶ⪪Յ̀怀ÍՅՕՅ՞衆죎졖跆軆IJȲՙ檪ݸƸ檪ݸՙ檪ݸǾ駟ꯠŶم檪ݸǼɧʯݸՙ檪ݸ¨ɡ酈檪ݸîϹ裏ꫠοՅĢՙ檪ݸǙ檪ݸìͱȣʫݸĢՙ檪ݸìͱȣʫݸՙ檪ݸª˩녨ݸՅࠨŴхՙ檪ݸƺݸȡ̡̣̳̳̓ȳ̡̳̲̳̳̓ȳက䃎䁖啞枀䃎䁖啞枀ᇟ㏾ᗞđĐāđđđđĐāđđđĀᅗ㍶ᕖݗݞÏ՟ׇ݇蠖⋮㮺돻ϸՅ≦晞đĐāđđđđĐāđđđĀ‹ԛփ㬲덳̳̰̳̃ЉđĐāđđđđĐāđꨶ⪪Ѐ怀ࠂ܀ÍՅՕՅ՞衆죎졖跆軆IJȲՙ檪ݸကîϹ裏ꫠοƸ檪ݸǾ駟ꯠĢՙ檪ݸŶم檪ݸǼɧʯݸՙ檪ݸ¨ɡ酈檪ݸîϹ裏ꫠοДĢՙ檪ݸǙ檪ݸǙ檪ݸìͱȣʫݸՙ檪ݸª˩녨ݸՅՁࠀŴхՙ檪ݸƺݸȡ̡̣̳̳̓ȳ̡̳̲̳̳̓ȳ̀⋮㮺돻ϸȡ̡̣̳̳̓ȳ̡̳̲̳̳̓ȳ̀䃎䁖啞枀ᇟ㏾ᗞđĐāđđđđĐāđđđĀᅗ㍶ᕖݗݞÏ՟ׇ݇蠖衆죎졖跆軆≦晞‹ԛփ㬲덳̳̰̳̃ā晈³đݘ曬³đݘ裐⨮㏾ā晈³đݘȡЁ¨Íđݘā晈³đݘݷ睴ӏݘā晈³đݘ́䓌³đݘ衐؁⨦㍶𼀼ȁ³đݘԁ啔Ӎݘ聦³đݘɉʁ˭đđĐāđđđŇɧǝל݀‰Ɖ™™ɋʃ˯̱̳̰̳̳̳̃ÏǏ˯ÿϽ߼‹Ƌʫ»»鋮ꃾι೎޸āđđđđĐāđđđđď鋮ꃾι೎޸ꩊÍǍ˭ý͵ݷăιȣ̳̰̳̳̳̳̃̀鉦ꁶƙె֘晀𼀼ʩŅɥŕՕՀĀ怈𿏼ꩊā晈³đݘȡЁ¨Íđݘ܁嗜晈³đݘȣ¨Ïēݘ矼ā晈³đݘ曬³đݘā晈³đݘ裐⨮㏾聦³đݘ睴ӏݘā晈³đݘ́䓌³đݘ晆衐؁⨦㍶ ȁ³đݘԁ啔Ӎݘԁ啔Ӎݘ           ȡ̡̣̳̳̓ȳ̡̳̲̳̳̓ȳက䃎䁖啞ᇟ㏾ᗞЉđĐāđđđđĐāđᇟ㏾ᗞȡ̡̣̳̳̓ȳ̡̳̲̳̳̓ȳက䃎䁖啞枀ᇟ㏾ᗞЉđĐāđđđđĐāđᇟ㏾ᗞᅗ㍶ᕖݗݞÏ՟ׇ݇蠖⋮㮺돻ϸЀ≦晞‹ԛփ㬲덳̳̰̳̃đĐāđđđđĐāđđđĀᅗ㍶ᕖݗݞ曬³đݘ裐⨮㏾ā晈³đݘȡЁ¨Íđݘ܁嗜ā晈³đݘ́䓌³đݘ衐؁⨦㍶ā晈³đݘ衐؁⨦㍶ȁ³đݘԁ啔Ӎݘ聦³đݘ睴ӏݘ‰Ɖ™™ɋʃ˯̱̳̰̳̳̳̃ɋʃ˯̱̳̰̳̳̳̃ÏǏ˯ÿϽ߼‹Ƌʫ»»鋮ꃾι೎޸āđđđđĐāđđđđĀɉʁ˭đđĐāđđđŇɧǝל݀ăιȣ̳̰̳̳̳̳̃̀鉦ꁶƙె֘晀𼀼𼏀ʩŅɥŕՕՀꩊÍǍ˭ý͵ݷ晈³đݘ܁嗜ȣ¨Ïēݘ矼ā晈³đݘ曬³đݘ裐⨮㏾ā晈³đݘȡЁ¨Íđݘ܁嗜ā晈³đݘ́䓌³đݘ́䓌³đݘ衐؁⨦㍶𼀼𼀀ȁ³đݘՀԁ啔Ӎݘ聦³đݘ睴ӏݘ‰Ɖ™™怀Ňɧǝל݀‰Ɖ™™怀ɋʃ˯̱̳̰̳̳̳̃ÏǏ˯ÿϽ߼‹Ƌʫ»»鋮ꃾι೎޸āđđđđĐāđđđđĀɉʁ˭đđĐāđđđÍǍ˭ý͵ݷăιȣ̳̰̳̳̳̳̃̀鉦ꁶƙె֘晀𼀼ʩŅɥŕՕՀꩊÍǍ˭ý͵ݷȡЁ¨Íđݘ܁嗜晈³đݘȣ¨Ïēݘ矼16368,0+ --------------------------@ SCAN FOR INPUTW X$"Select:":2640` 310y 3COL77,ROW856 CHAR(16384)128 CHAR0190 16368,0 CHAR11LOCLOC10(LOC9) CHAR10LOCLOC10(LOC85) CHAR8LOC>17920:20&294,Y8:YY1:7 FONT EDITORR1000:LOAD DHGR, ETC.i950:POKE CURSORS2780:GET FONT TO EDIT<80F3288PLTTR0::ZDA3,0:DA4,67dADDRA768n1140:INIT MATRIXx1200:SET UP SCREEN           PATTERNS,10BIGBAT.PAC,108 BROADWAY.PAC,10$(I)".AUX":NAME$(I),TEMP$4 PB0:J1TIME(I)30T Z(16286)127JTIME(I)44x d(16287)127JTIME(I)44:B1 n(16384)155Ĺ16368,0:: xJ BIINUMBER(I1)1:50 III(INUMBER)1:50 BBROS.PAC,10 BEAGLE.PAC,10> (4)"PR#3":(4)"BRUN DHGR":(4)"BLOAD DOUBLE.SCRUNCH"g:MODE(3):NAME$(20),TIME(20):40I120:NAME$(I),TIME(I):(NUMBERI1:I12(NAME$(I),4)".PAC"70<(4)"BLOAD "NAME$(I)",A$4000":0,0:1,64:28675:80 FTEMP$NAMEx 2:"2) There are 9 less fonts on the ProDOS":" version than on the DOS 3.3 version.":" (We ran out of room!)"<:"3) BIGBAT.PAC and BROADWAY.PAC were":" created by Peter Joselow & are used":" with his permission. Thanks Peter."  ::B:" NOTES 8/31/84 ":::"If you're using Double Plot with the":"keyboard or joystick, the best set-":"tings for Quick Mode are--"(:" QX=10:QY=5 (keyboard)":" QX=3:QY=1 (joystick)"2ick)"‰Ɖ™™ɋʃ˯̱̳̰̳̳̳̃ÏǏ˯ÿϽ߼ʩÏǏ˯ÿϽ߼‰Ɖ™™ɋʃ˯̱̳̰̳̳̳̃ÏǏ˯ÿϽ߼ʩÏǏ˯ÿϽ߼‹Ƌʫ»»鋮ꃾι೎޸āđđđđĐāđđđđĀɉʁ˭đđĐāđđđŇɧǝל݀ăιȣ̳̰̳̳̳̳̃̀鉦ꁶƙె֘晀‹Ƌʫ»»ŅɥŕՕՀĀ怈݀ꩊÍǍ˭ý͵ݷ晈³đݘȣ¨Ïēݘȁ³đݘ矼-------f ONERR HANDLERSBp:"UNABLE TO SAVE CHARACTER SET"Lz"OR"f"ERROR DURING INPUT"l"PRESS ANY KEY TO CONTINUE ";:Z$32881720:"UNABLE TO LOAD CHARACTER SET""OR""ERROR DURING INPUT""P" S : SAVE/LOAD a character set"C1:" CTRL-Q : QUIT"J1_1:"Edit Mode-" 1:" : RETURN to Select Mode"1:" : PLOT/UNPLOT pixel at cross"4294,162559,162>16368,0R\ ------------------- : moves the cursor UP"H1:" : moves the cursor DOWN"t1:" : moves the cursor LEFT"1:" : moves the cursor RIGHT"270011:"Select Mode-"1:" : EDIT character at cursor"(1::"DO YOU WANT TO QUIT (Y/N)? ";Z$D0(Z$,1)"Y"(Z$,1)"y"1870T::216,0:eD:216,0:50vN216,0:2310X --------------------------b HELP DISPLAYv577,32:"Commands"294,30559,30Y6:1:"Both Modes-"1:" Y/N)? ";:"";Z$:(Z$,1)"Y"(Z$,1)"y"Z$SET$:1790i:"ENTER NEW NAME (RETURN FOR NONE): ";Z$yZ$""1810SET$Z$(4)"BSAVE "SET$",A"ADDR",L$300":"LOAD A NEW CHARACTER SET (Y/N)? ";Z$(Z$,1)"Y"(Z$,1)"y"1860"&J15TTEMP0"^I0PIXELS?hTEMPTEMP(2I)MA(I,GY)FrId|ADDR(LTTR32)8GY,TEMPn1170|2CX,CY -------------------------- SAVE/LOAD A CHARACTER SET2160SET$""1770:"SAVE AS "SET$" (! --------------------------4 A, Z, <-, ->B2CX,CYYCXXDISP1GXSIZEpCYYDISP1GYSIZE~2CX,CY -------------------------- SPACE BAR"MA(GX,GY)MA(GX,GY),2CX,CY6MA(GX,GY)į0@1CX,CY00,162140,162AXDISP2,YDISP2XDISPWIDTH2,YDISP2eXDISPWIDTH2,YDISPHEIGHT2XDISP2,YDISPHEIGHT2 XDISP2,YDISP2IXDISPXDISPWIDTHSIZEJYDISPYDISPHEIGHTSIZE(I,J2J,I<2380P1910:LTTR):DA4,67:1 --------------------------E SET UP SCREEN[:15:16302,0zSIZE16:XDISP164:YDISP32WIDTHSIZEPIXELS:HEIGHTSIZE8307,0:"Font Editor (c) 1984":277,8:"Mark Simonsen, Beagle Bros"15:0,30140,3(975)256:DA3,0:DA4,67!@$A67256:PIXELS7:216,0:a` --------------------------yj INITIALIZE MATRIXtI0PIXELS:J07:MA(I,J)0:J,I:~ -------------------------- PRINT NEW LETTER(COL1)7,(ROW7)8:DA4,64:(OKE CURSORSOPE(175)(176)256304:233,(PE256):232,PE((PE256)256)[1:0a --------------------------LOAD DHGR, ETC.:::2350(4)"PR#3"(4)"BRUN DHGR"(4)"BLOAD ASCII.FONT,A$4300"DA(974)2230A :"CHARACTER SET TO EDIT (RETURN FOR CATALOG): ";Z$Q*Z$""890d4(4)"CATALOG"H"PRESS ANY KEY TO CONTINUE: ";:Z$R800fp216,0:z(4)"BLOAD "Z$",A"A768SET$Z$:870 --------------------------  PCHAR11GYGY1(GY0):1500@ CHAR10GYGY1(GY7):1500i CHAR21GXGX1(GXPIXELS1):1500 CHAR8GXGX1(GX0):1500 CHAR32İ1570 CHAR13į2CX,CY: 640  -------------------------- GET FONT TO EDIT TEMPTEMP128:TG$">", 0MA(7,I)(TG$">")A :JPIXELS101L DJ22JX N1X,Y XTEMPJ2TEMPTEMPJ2:MA(J,I)1:620 b0:1X,Y:15 lXXSIZE:J:YYSIZE:I vGX0:GY0:1510 CHAR(16384)128 CHAR0640 16368,0 T --------------------------4 ^ REGULAR LETTERK hLTTRROW10COL33[ rLTTR127ıe |1170o 1140 X$"Edit: ":2640 YYDISP1 XTXDISP1SIZE(PIXELS1) I07 XXT TEMP(ADDR(LTTR32)8I) TG$" " TEMP127LOC1(LOC0)- CHAR21LOCLOC1(LOC94)F 3COL77,ROW856g ROW(LOC10):COLLOCROW10 CHAR13İ360:X$"Select:":2640 "CHAR83CHAR115İ1720:MODE(1) ,CHAR17į:: 6LTTRROW10COL33:70 @LTTR128İ2590 J180  )  `ÿ"3DUfw`F 4a5a``6a)ԩ 5aJxTU&,T(2a4aa3a5aȘJxTU&,T(3aa2aN3an2a2a)K5a `4aJxTU&E=$aE&,T(5a `4aJxTU&E=+aE&,T(4aa5a5aP5a`` `4a4a4aL`i@ XYZNX[ YYb ZZYx,U,T(Z)з`@0 `v@ uHJx,U,T(hȱHJh(ui(i(éu$0 )П`gh(ȱݢ)0ȘeiȑΥikmjln`ȱЬe@iA @ůA@A@A笠L@H@ȱ@h@`;? - ---;??7---;??7---;??7---;??7?-------;??????7-------;? - ;? - ;? - ---;??7---;??7---;??7---;??7;??7----;??7---;??7--;??7---;??7---;??7?301,83    )-- ???? ----- ??????)------;??????7-------;??????7-------;??????7)------?????? ----- ???? )--  - ;? - ;? - ;?-------;??????7-------;? - ;? - --------------%F EDIT/SELECT MODE7P 0,48:X$:k 301,59304,56:307,59304,56:304,58304,62 301,67304,70:307,67304,70:304,64304,68 301,75307,73:301,75307,77:305,75315,75 315,83309,81:315,83309,85:311,834)73,(VP2)83:HP73,(VP2)83; HP73,VP84d 0,198:20);:0,198:(SET$,20)j  -------------------------- UPDATE KEY AND ASCII 157,108:(LTTR)( 147,158:1(((LTTR))3))LTTR2 < ------------1 ::DA4,67) 147,88:"KEY"8 HP14:VP9^ HP73,VP84(HP2)73,VP84 (HP2)73,(VP2)83:HP73,(VP2)83 HP73,VP84 137,138:"ASCII" HP13:VP14 HP73,VP84(HP4)73,VP84& (HPRESS ANY KEY TO CONTINUE ";:Z$*32883800>3288D J$ i. :"UNABLE TO LOAD DHGR":8 --------------------------B PRINT SQUARE OF LETTERSL K33:DA4,64` I09:J09j K1272440t (J1)7,(I7)8:(K)~ KK!!! ! ! ! ! !!!!LLG Jx,T,U&,T( <P``  HJhx,T,U&,T(P``HJ) 'h)i& &&` @})8)j~)J  ~x,U,T((}i(i(}$0 )З`)Љ` @HJ)8)j)J  x,U,T(hȱHJh(Όi(i($0 )Ј` gh(ȱݢ)0ȘeiȑΥikmjln`ȱЬe@iA @ůA@A@A笠L@H@ȱ@h@` L LL3 8   Í` 8   Í`  BC<>=?<=  BC<>=?<=`< =>??B@C`<@=>_?B C`