L%hh LHH` X% " ӠӠΠǠ ˮԠˠǠӬĠӠ٠٠ϠŮ+JJJJ ,,,L Lک ٥ҥ>ӥ? ( ㆭ  ؆` | A""""""QQQYV <"<Q '(h((QQQ`@GHOHO $"!$q}T@` `@@``p0 8p@@`00 |0@` `pppPox`D3 < p?|@@@|@`f ppn|>0p  qcs6<, 3['Nxxxpp0` ```@vl  ?`@:3q  AcqcCyO@  0p`@@q @p?|`3cC ? ?>|xp`p`@Acwsssssss__????????~^^ ?~~~~~~~?>~||xpp`@~| xyy{~|@`pp xpp`@yyyyyyyx~ ~x`|xpxqa` cqx|||||||cCC?>>>??<<|||~?`ppxx||<||xxpp`|||||||| |?|p`@@@@`p|? OOGgccqpxsssssssppxxx|<<~?>~||xxxxppp```@@@`?~|x|~|||||||p@@p|~><|xp`@>|x|xpx}yyyyyyyAA?~|xpp`ppx|~? ?? 33@``@@glloLL LlOgloloG @`@glolo@@gLLL GaamGGlg`GGlg`G  xL| x@@xMLLxMyyM MyxAxMx|Yq @lllLglllgG LlL`@GLOLo033366m~0>3>33~G<`G}rccb``acccq{{{{8008????~ |lL COoooog CgoooocCFFLLXXPpqa88`}}}}>????~ | ~FCCFL ____|GG|GGccp{{{{ ;1q``qp`aas{{{{8008 0y| |}}}}AAQg((h' $C@0j ed`y < I1@@q q s8EE9EE8> ` `$DC0ANPQN@'h(' WPG((H@stq q8AyEx:NPQ@GhHHG#$p# @ (*Y9AyEy: QQQO~C%%C~_DDD qAAAaq9`ppxxx|xxx|AsGN8088 Ccˆʎõĵ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- ( t Ϡ@跻~!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䵍䵐`"L ŵ8ŵH ~(` d ֠z# u`Ш<@*U*U***U*UU*Ul΃߃<ł*U**U*U*Uh޿ޛݑ콷 "p z v ;z v g n L NQ S t L`a x t qw f| tt Le v x v } Ux $Le v } w o gu $Lf v u $Le e v t Le w vLNe x su vu S gu w $Le { f t L`a w ~~ t   Uu } w $ t Uu } w $)~ d w Dz $LLJ w y $Lcd z   Ld Ln x 3v z =u px QvLdSCORE = *v  {d  !~ "p` w ~~ y   Uu } w o 1 ~~ w ~~ |   Uu | w o 1 ~~ w | ^x o x du z  w v J x 2w z =u px QvL"eSCORE = *v  e  !~ y w | D |  t | D | )~ Lkc y w` Ln { >  | T { > w T z  x 2w x 3v z =u px QvLcPRESS RETURN TO CONTIUE c !~ "p z =u px QvLcOR '' TO QUIT c !~ "p { > w T '| 8 w D n w w cy $L8y $L@b lc w  @{  v  v w . n :x c v x v v w . n w y c v x v v v z Lb z v v y (Lb y v v I{ Lb L{ v v y (Lb y v Lx  @{  v  v | D | Lc y w | D | L9c v z LGa z v Lx  @{  v  v w y $Lpa lc` c w ~~ tz   Uu }  o Uu ;}  o Uu Q}  o 1 ~~`La85-8-8730-8798-874-80758078-8877084488 w  w  w D u w n w { > w T w LF` t } w o 1 =~` w  w  w D u w n w { > w T w  @{  v  v w w w t w ~~ tz   Uu } w $L` Uu 9} w Uu O} t 1 ~~ v }w v v t v v y (L a y v v I{ La L{ v v x (L3a x v |  t }  t } x v t | t | x o { >  y T { > w T { 8 t v ( t t | x )~ L_ t | *y o t | 'y (LF` t | x o t } w $L#` t } x o t } w o t } x $v } v o iv ~ v o iv | x o iv } x o iv x fv | w o iv >w $L^ v x fv w  u #}  | v  v 1 j~ w  w v { >  B| T { > w T w =~ Dw   t } $LF` { 8 t }  w  t y (LT] u } w o n 1 j~ 1 ~~ t L`a w t w  w j~ x   u y w L^ u } $L^ u } u } c x o u } t u | }t c x v v  y v  x w $LY v x fv u $L'Z z  a{  Uu e}  Uu p} w 1u w rv ,$` L( L5 LD 8 XL XLR XQHPH RPhPhQ8 XL.0'L+ LfLLLLL ꥪLYԨé๸σ~tLd~yLd~~Ld~Ld~Ld~Ld~Ld~Ld~Ld~Ld~Ld~Ld~Ld~Ld~Ld~Ld~Ld~Ld~Ld~LdP?17xz# >{# >|L???~)Ld~.Ld~3Ld~8Ld~=Ld~BLd~GLd~LLd~QLd~VLd~`Ld~eLd~jLd~oLd(pEX P@DHL4p|p "H&4( \&1%9)  @n?o3[pt qw f| tt Lor v x v } Ux $Lor v } w o v t Lr w v gu w $LLJ u v $LfLqLc@@\) A@ ffff@`@ pP @H { > Yw Q { > t Q { 8 1 L~` w ~~ y   Uu } w o 1 ~~ x du z  X x v w t J ch J { =u ^x Qv x 2w x 3vLq'SPACE BAR' TO START q !~ "p w D w $Lq w 'vLn L NQ S w D w $Lr w 'vLn | > w T x u 5w  w  }z > w T { > T| T 6v  w ~~ ~    ~ Uu '  n u w F x Nv   { 8 u  u bw  @u 1 F 3y /w u u 1 ~~ }z > w T { > w T` w [~ {   1 [~` w > w T v L~ u  w  w [~ |   1 [~ )o !~ "p ;z =uLIoOR Fo !~ "p Pz =uLmoPADDLE/JOYSTICK ]o !~ "p ,z =uLo(K/P) o !~ "p { > w T '| 8 w D n ~v { > w T v kz $Lo x tLd v y $LLJ v 5z $Lp ^x tLd { > w T z   Lo ~  y n /w z u 9|  u 1 ~` w  y ~ |   w  w  u 9|  u 1 ~` w  w  w  Uu } Uu } o Uu ~ z o {  u #}  x| ` { > | T { > a{ T Ln w } w Lo n y =uLoSELECT o !~ "p z =uL2oKEYBOARD =u px Qv x 2w x 3vL^mBONUS CITY AWARDED Km !~ "p |  z  w  v x u ^x w Hy Vw p 1  pL0l ^x 2w x Qv ^x 3v ;z =uLmLEVEL v  m  !~ "p w ~~ y v   x Ou v x u Hy Vw x w p 1 ~~` w  w ~ |   w  w !v # v | w Lel gu x du v | x o w ~~ v   Uu | x $Ll 1 ~~` w ~~ y   Uu } Ux $Ll v | ^x o Uu } w o Ll 1 ~~` n z  {  Uu y  x| w  {  Uu y  x| z  {  Uu y  x| ;z ~ y   Uu y Ru u } Ux $Luk {  Uu  x { 8 1 ~ { u ,z =u ^x QvLk= v Mz ^u  k  !~ 7p Ln v Mz ^u $v t u kw }t t v Xx kw }t t u kw y }t t qw Ty v }t 'v w v z =u px QvLlSCORE = *v   l  !~ "p 0l p` {  ~ v kw Xx  ~  !~ "p w } t Lx } }t t x } }t t z =uLj SAUCERS = v  zj  ~ qw v Ty  ~  !~ "p ;z =uLj BOMBS = u  j  ~ u kw y  ~  !~ "p Pz =uLk SHOTS LEFT = u  j  ~ u kw  ~  !~ "p x Ru w w  t w  t w  t w  t w  t 1 U x 3v x 2w x u ;z =u ^x QvLiBY i !~ "p Pz =uLi ORDON URIE i !~ "p x 3v Zy Vw y v y u w n w p` ^x Qv y =u { > | T { > a{ T x 2w x 3vL'j HITS = v  j CITY BONUS = v Mz  4h  !~ "p p n m` ^x 2w { > | T { > 0| T { > w T w u x 3v x Qv z =uLh NVASION h !~ "p Yz =uLhORCE h !~ "p  w T bz u w v x w y Vw p |{ U w  w  Cx zw t z t w X{ w  x =u px Qv x 2w ^x 3vL]g CORE ABLE Qg !~ "p y =u ^x Qv x 2w x 3vLgINVADERS HIT = qw Xx  g  !~ "p z =uLg SAUCERS = qw Ty  g  !~ "p ;z =uLgBOMBS = qw y  g  !~ "p Pz =uLh SHOTS LEFT = qw  h  !~ "p ,z =uLBhLe 1 ~~ w K a{   ^ 1 K gL yu w Lsf L w u` { n i { ;Le` w [~ a{   ^ 1 [~ n i p n x 2w ;z =u px QvLf GAME OVER f !~ "p z v z u ^x w ry Vw p pLLJ w K |   S 1 KLLJ { > | T { > a{ T w  w  T9V8V8B(0)1> A(T9,H8)0A(T9,H8)B(T9V81)3380H 2950W O013440a* 3330i4 T9z> Y$(T3)W$(T)H T3T31R T9V8V8B(0)1\ A(T9,H8)B(T9V81)f T9p z DIAGONALLY 1 O00 M1PB(0)1:M2M1 V9((1b O013260l 3140 v T91 Y$(T3)W$(T)= T3T31L PLACE ITa T9H8H8B(0)1y A(V8,T9)B(T9H81) T9  VERTICALLY O00 M1PB(0)1 M2P V9((1)(M1.00001)1):V8V9 H9((1)(M2.00001)1):H8H991D84V9(M1M21)3060# V81- 30706 O01< O HORIZONTALLYX O00a M1Pq& M2PB(0)10 V9((1)(M1.00001)1):V8V9: H8((1)(M2.00001)1):H9H8D T9H8H8B(0)1N A(V8,T9)0A(V8,T9)B(T9H81)3190X 2950270,3450,36206 O002930(@ D8D81@J D8A5D8D92860UT D8D9D912930^^ D81hh 2860or Ty| 3890 H8H81 H8M2H8H93070 H8H9H913000 H81 3070 V8V81 H8H9 V8M1V8V93070 V8V9VA5  T1A] B(0)(W$(T)):XX1B(0):XY163:(W$(T),XX,1)(UI$,XY,1)B(XX)XY:2790e XYm XX~ B(0)P2930 PICK DIRECTIONAL MODE A62A612850 A64(1).53820 A54" D8((1)(A5.00001)1):D9D8 , D83080,3WORKING":( B1A"2 X$(B)"")< B5F A(P,P)eP SORT W$ BY LENGTH OF WORD - LONGEST FIRSTrZ T1A1d T1T1An (W$(T))(W$(T1))2710x Q$W$(T) W$(T)W$(T1) W$(T1)Q$ T1 T T31 PLACE THE WORDS A6:"ENTER A NUMBER 32 OR LESS?"_ :"(20 IS THE MAXIMUM SIZE WITHOUT"::"A PRINTER.)";:868n 4490:PZNt  P32P02490 21:"DO YOU WANT A KEY";:868 C$ (C$,1)"Y"K61 (C$,1)"N"(C$,1)"Y"2550  :10:17::"DO YOU WANT THE WORDS PRINTED IN A LIST"::"AT THE END";:868H Z1$r (Z1$,1,1)"Y"(Z1$,1,1)"N"2450z 12 "WHAT SIZE DO YOU WANT THE PUZZLE TO BE"::"(SHOULD BE SLIGHTLY LARGER THAN THE"::"NUMBER OF LETTERS IN YOUR LONGEST WORD)":r8  …8  8  ?8  l8  8  8  \8  8  8  (8  Ɉ 8  8  P8  8  8  8  cA8  8  A8  G8L 8L HL tJL tLL tNL tPL tRLdtWLdt\LdtaL tcL teL tgL tiL tkL tmL toL 8  d 8  (8  h8  р8  l8  A8  Q8  A8  8  ; 8  LdtLdtL t LdtLdtL tL tL tL tL tLdt#L t%L t'L t)L t+L t-Ldt2L t4L t6L t8L t:L tL t@L tBL tDL tFL tsLdsLdsLdsLdsLdsLdsL sL sL sLdsLdsLdsLdsLdsLdsLdsLdsLdsLdsLdsLdsLdsLdsL sLdss"Lds'L s)Lds.Lds3Lds8Lds=LdsBLdsGL sIL sKLdsPL sRLdsWLds\LdsaLdsfLdskLdspLdsuL swLds|LdsLdsL sLdrLdrLdrLdrL rLdrLdrL rL rL rLdrL rLdrLdrLdsL sLdsL s L s LdsLdsLdsL sLd2Ld7Ld # TL t% 5  L s /%  t% L $ > $ ]L  v%L %  t% L   s $  wL   s $  wL3 /  s $  wLN J  sL$ //I\\ //I\\ //I\\ //I\\ _  !$ % `$   # U% a# !$ n ^# LM # W% 0$ r$ E$ # o # L% !$ o # % 0$ $ $ 'L'" ENTER YOUR SKILL LEVEL(1-15)?   #  $ # m# # i$  a# # *$ (% Ls $ D u !$ L X $ rLSCORE:   # a &% rLBASES:   # a % L# /-\ /-\ /-\ /-\   $  wL % `$   # W% !$ n o 1 $ > # T X $ Le'********** KEYBOARD INVASION ********** =  'L DO YOU NEED INSTRUCTIONS ?   l% LY j% !$   L OLL j% 5  L $ D u N$ Lp q,$` L( L5 LD 8 XL XLR XQHPH RPhPhQ8 XL.0'L+ LfLLLLL ꥪLYԨé %%%% %    $ y# $ # 9$ # $ #L  v% !$ z1023,9):")SA$"OFF"ı1)1:" K"::)0:U"OFF"ıT)1:" K":])0:U RUN A DIFFERENT PROGRAM, OR"-(*:"3) END"X(413:"PLEASE ENTER 1, 2, OR 3 ";:868h(>4490:ZEZN|(HZE0ZE44700(R:"PLEASE ENTER A NUMBER 1 - 3":4660(\ZE1Ĭ(fZE34730(p:10:"GETTING THE MENU PROGRAM...":(4);"RUN HELLO" )(1023)1234640^'5:"WOULD YOU LIKE TO RUN THIS PROGRAM"::"AGAIN - YES OR NO";:868f'A${'(A$,1,1)"Y"Ĭ' (A$,1,1)"N"4740':"PLEASE ANSWER WITH YES OR NO":4590( "WOULD YOU LIKE TO:"::"1) RUN THIS PROGRAM AGAIN,"::"2)ZN$:(ZN$)(((ZN$)))4520:&(ZN$)0ZN$"0"4530s&ZM:"THAT IS NOT A NUMBER - TRY AGAIN";:4540:4500&ZM:868:CV1(CV23):ZN(ZN$):&CV1:36,CH:868:& END OF PROGRAM&:"PRESS ANY KEY TO CONTINUE":SA$&::5'NES TO LOOK FOR"%0T1T31*%:Y$(T),<%DT3(T3)ĺC%NTI%XS%b4760]%l4550%v24:"PRESS SPACE BAR TO CONTINUE";:AB$::%18:"I CAN'T FIND ";N$;", TRY AGAIN.":4470::(4);"DELETE ";N$:216,0:1330%CH(36):CV(37)&"";$ $T$Q$::"THERE ARE ";T31;" WORDS HERE - CAN YOU FIND THEM?"j$(Z1$,1,1)"N"4440x$ SORT X$$T1T32$CT1T31$Y$(T)Y$(C)4360$Q$Y$(T)$Y$(T)Y$(C)$Y$(C)Q$$C$T$%&"HERE ARE THE OWHEN YOU WANT THE"0#"PUZZLE TO BE PRINTED.";L#"PUSH RETURN KEY":AB$V#4750a#T13g#"n#,T#6(P2(H$))2);H$#@#JT1P#TC1P#^A(T,C)04220#h(UI$,A(T,C),1);" ";#r4230#|(UI$,((1)261),1);" ";$C13 "Z"dT"nT1P'"xC1P:"A(T,C)04000T"(UI$,A(T,C),1);" ";^"4010i"". ";p"Cv"}"T":"4760"SA$"OFF"4100""IF YOU WISH, YOU MAY INSERT A DITTO MASTER AT"#"THIS TIME. PRESS THE RETURN KEY 3680!T9!Y$(T3)W$(T)+!T3T31 # T $ 8 $ 8 $ D Lk"" WOULD YOU LIKE TO PLAY AGAIN ? H"   l%L~"YL"N j% 5 |"  a# j% 5 " % L" $ 8Ls"L"Y j% 5 " L X `$  L"FP "  Lc@P!   L;!( BUT BEWARE, YOU CAN ONLY HAVE ONE !  Lr!(CRUISE MISSILE ON THE SCREEN AT A TIME. I!  w 'L!& PRESS RETURN TO BEGIN THE BATTLE !  l%  s X ` $  $ 8 $  $ L!G A M E O V E R (AND YOU ARE THE ONLY ONE LEFT TO DEFEND   L\ (IT! TO SHOOT DOWN THE ATTACKING LETTERS, 3  L (TYPE THE LETTER OF THE ENEMY SHIP ON THE j  L (KEYBOARD. YOUR SHIP WILL SEND A CRUISE   L!(MISSILE AT THE LETTER AND BLOW IT U L   |# W% !$ n o $ y# $   |# %LF E o ` XL}'********** KEYBOARD INVASION ********** U  L( WELCOME CAPTAIN TYPEMASTER!! ENEMY   L(LETTERS ARE ATTACKING YOUR HOME PLANET   L% # U% j# o # U% # a# # U% c p# # ^# $ a# # J% # $% LLV T  #  # ~%  # L% # o 1 %` # W% !$ n o !$  A%  # a ` #  |# ~$ W$ c $ L   |# U%  |# ~$ W$ c $%L # # 0$ # # |# ~$ W$ c $ # #  # L6 4  # B$ $LV $ y#` 0$ #  # LjI h ` !$ % `$   # ~% t%  a# |# $% L 1 ` # y# $ #` !$ % `$   # ~$ W$ c $ # # U%  #  # W% " %  t% L  !$ % `$   # U% $ Lk 0$ # # %  # ~$ W$ c $ L` ^   # $ $L! |# U% # # $%  a# |# U% # c 0$ # $%  a# |# U% # -$ # $% L # u$ # !$  $  # a  1 r`u`ɛɓLIL`JIJ`KIK`J ` qq` `ɻ qqt`u``ggB u H0H`H)`⥚) 恥 悥晩*`xAI IA&I IA9I `yBwCLIILLILLILLI`I1w`II挽IאI`JatbtuLK bu0`ɱɶ 8鱅hhLɍLxJ&Hɻq`ɠt`K"xxb`I)IGebb Ge`GHehebb`H)<<b`I)I Gebb  Ge` GHehebb`IIpYII`k` k0 _rI _rI __I_I _ILILILI в`I@ivehe`wfFg@h<@ bebLPaivxbebbI1`w`bebbeb?i9j5@ eLe eeL`H)Ƞݠȅb`I)IGebb Ge`GHehebb`H) FeFfLLi DeDfLLi 7EeEfB}CeBc}CcfG G&G&G:nyY yYPY0HY+@Y  E@PYLإ`myY yYPY0%H א`ZL1ZL1 ZL10ZL1@Z[[`Z[0H L[i[ e [[܆L,0, Ы`Z[[8[[`^L^LELLE u H`H)(h e~~}i})"0INPL:PT(IN)21ND5:J2%<(# * END PROGRAM *H2#::21V<#N0NP1}F#MN(N)MN(N)1000LN(N):A$" LOST "P#MN(N)0A$" WON "Z#MN(N)(MN(N)):N$(N);", YOU";A$;"$";MN(N);"."d#Nn#:(4)"RUNMENU"d#N n#:(4)"RUNMENUSPLIT PAIR *BJCD(PL)52:PT(IN)PT(IN)2AC(IN)4.5:SP(K)1:J1\T4:18108,18K72:7v^X108:Y18K72:4000hSD(NC1)CD(PL3):NCNC1rX80:Y18K7235:INPL3:4000|X108:4000BT(IN)BT(PL):X60:Y33PL7235:VL$(BT(IN)):6002:22:N$(I1);", WHAT IS YOUR BET (0=QUIT)?"I17:"-->";BT(I1)(BT(I1)500)((BT(I1)5)(BT(I1)0))(BT(I1)MN(I1))ĺ"":7050BT(I1)09000X60:Y33(I1)72:VL$(BT(I1)):6000R1(78):R2(79)I @ * 9000vMN(I1)0FE(I1)FE(I1).05:LN(I1)LN(I1)1000:MN(I1)1000:::"I HAVE LOANED YOU $1000, BUT WILL TAKE ";FE(I1)100;"% OF YOUR WINNINGS FROM NOW ON...":J13000:J:X36:Y50(I1)72:VL$"1000":6000MN(I1)5BT(I1)MN(I1):7080I3l28675I2,1vI%768+Ip * VALUE PRINT ROUTINE *VzER1Ē4dLS(VL$)rN0LS1LT((VL$,LSN,1))LT2LTLT49LTXN7,YN7X * BET INPUT *bI1NPl(MN(I1)0)(FE(I1).95)28672,1:28673,32:28674,255:28675,1.7684I * BUST SOUND *a28672,10:28673,16I0164:28674I,205:28675I,1:28676I,200:28677I,1:I768D * BLACKJACK SOUND *N28672,10:28673,16XI09b28674I2,40`H) !IIްIpY I Ihh`I I u H`vLw Y4Y+-nyY yYY  YE  Lw¥`(Y1Yʐ*myY yYY (YE L`' $(,048< @ivA'Y  YLć`miL\i !mL\miL\`E H L niL( nLni`E H 5L   5L   L  u `H) ``)(m}I@Y@YL@YL)@n}I@Y@YL@YLH0]HXpY0HyYyY L0HyYyY L0HyYyY }HHHH Й`v:  r(Y#YY (YLćӥ   Y#Y~^PY ިYPYɽBC0Y}8Yi`HLa)IHLa)IH6HH8HY`Ԑ`pY L L LpY  L   L  yHHHY`Ґ`HPYL y0H@Y<`hh`)@`挢PY 6`` PY0]HY@Y   PY)@PY>PY HY@Y y 0# PYY @ PYYPY Д` HYHYL HYHY@YL HYHY@YL @YHYHYL HYHYL@YHYHY@Y<HY԰`PYhhLZI1wZI1w`  w +ZZک`)w`y) ˩`yĭ~^`~^`H)q0 h?8埝Y`heY`h`H)qLr0 h?8埝Y`heY`BC0Y}8Yi`@ivxAw-*i Ѱ!Ym)YniY(YL` YJYY  Y YLY僝Y YLY vy 0  Y ŇЧv (YKYY  (Y(YLYeYӐ(YLY y  (Y ŇЦ`   Qi<`} h~ h# h% hvQ `Q Q ` HJJJJQ h)Q `Q Q$Q(Q,Q0Q4Q8`t3t+ Y8#YmiY Y LץuAu9(YmLmňm0ij LĴȄm{ 6i zLIJ}CB H`)H` zװ z损h@ivaAe `%`` 2$  $(4 ' v  ivLL  `vL [ƅ) L Lz 来!LZ Ƃ L|La |Lz |Lz |Lz r0 nŗ nLz nŖnn| 6 * IYƄ' `zL朥!L Ɓ L{zL {L{L{Lq0 mŕL 0HL. L. L. HHEL^^^^^^^^vd{tuqr}~|z`JK`pdd e J qJK  r`J` ` `HxHhHHYHL ) `H) I IL HL #nmi0HL HH HL xHHYHL HT F 8.$  挠 y}^ HH0H``8`8 `   e 0HeHHH`HHLQ L7 H HH L7 0HZH HH HH)L7 HLf HH) HLf HJJJJLx HinHH`)`)H H HhhLf @)H  . s t 0   s  . < s   . , 0 ?ƞL$L I)y GY`   ^L`yyH0š pY  yy` 8|L}  :9J ?\>m0M='+l> /+l   d]@ŵLҦ]]LF L}BBL] X  `                                                     *T"T"(*U*ժժժժT*U*T*U**U U*U*Q*UT*T*p U ժժP*U*Ԋ U ժժP* U*U|؞*U@*ժժU*(U P*U*U תP*U T*T*U*T*@ P*ՊԪT*Uժժ@*U`_*U*U *U*U ?@*ժժU*P*P  U*ժժժժT*U*T*U*(U U*U*Q*T*T?,m8??g--? .>.>.>.>+.?<,<,<,< --.>.>.6-..%'%'%'%'--557?7-757??< <,< --.:'-<'-<'-<'- 8???J$$$56667??<,<,<,<,R,,<,<,<;.>.>...6?n$$$,6666$$$$5666->5'%%g-,$,''<2:'-<'-<''<, .$,6I???,,,,,,<,??:?(<,<,,566%$$$<56-$%7+%?,%:?g'%'%'%'--5575757-???,<,<,<,< --?76>$$,<,----5757??<,<,<,< --. 6.$$$$76>?'$<6666%$I???L-<'-<'-<'- 8???5-%%'%'%'-8?0..%'%'%'%'mI77776I???,<,<,<,< 6.$$$$5>8> 666>$$$$)6.$$$$76>''0666>$$$$J57??<,<,<,< --.>.>.--8,<>.>.>.-757??'%'%'%'--5575I7??%'%'%'%--.??7---M MM --5?????????.----MI)---5????????????.-----------???????????-------------m ---5????7--m --5??7--m --5????7---m ---5??????7----m ----5????????7-----m-----5??????????7------------???????????$6666666666666---mIII--->??;??7--mIIII)-5???.-mIIIII-5???.-mIIIII-5???.--M m)M -->?????????.----MI)---5????????????.-----------???????????--------------MII---5?????????.--mIMM --5????7--MIIII -5???.-mIIIII-5??66.$$$$$$$$$$$$$$,66666666666666.$$$$$$$$$$$$$$,66666666666666.$$$$$$$$$$$$$$,66666666666666.$$$$$$$$$$$$$$,66666666666666.$$$$$$$$$$$$$$,66666666666666.$$$$$$$$$$$$$$,66666666666666.$$$$$$$$$$$$$$,66666666666666.$$$$$$$$$$$$$$,66666666666666. $$$$$$$$$$$$???---m---??????--m--????-m-??m"$$$$$$ H9;--M)-??????---m---5??????7---m---5??????7---m---5??????w--- ---????w-- --??w- -w 666666666666v$$$$$$$$$$$$$d66666666666666.$$$$$$$$$$$$$$,66666666666666.$$$$$$$$$$$$$$,666666666666$$l66*.%%'%'-8?*?(<,<,,-.>.>6-..>'%'%'m577$$$$$$$m-??-m--????--m---??????.--m---5??????.--m---5??????-m M-;m-$$$$$$-?- -5??.m-;-mi-????--- ---5??????.--m---????-mi-m-"$$$$$$$m??-m-????--m--??? 5l|!0* S&6Kaw4I\q;,<,< %.>.>.(,557777--%-.>657?<:'%% 5757---(757?< (<,--557?<,<,< -.8,-57>>.''%<,,557.>>''%-.>.>.?<$<565-e$$ -66?     NC1) 2 4-< 238,47240,44261,44263,474F 7]P X238:Y45:IN2:4000:CD(5)SD(NC1)cZ o BUSTED :22:15:"* BUSTED *" 5300 PL2PT(2)0: WL1 ER1:X60:Y33PL72L35:VL$(BT(IN)):6000  X36:Y50PL72:VL$(T(I)0:AC(I)0 I 7000G X80:Y18:IN0:4000:CD(0)SD(NC1)u NP2X80:Y90:IN1:4000:CD(1)SD(NC1) NC1İ4500 18238,30:CD(2)SD(NC):IN2:4080 X108:Y18:IN0:4000:CD(3)SD(NC1)( NP2X108:Y90:IN1:4000:CD(4)SD(\IfJ0NP18pX36:Y50J72:VL$(MN(J)):6000LzI0(N$(J))1eLT((N$(J),I1,1))(LT65)(LT90)LT93LT427(I8),22(J72)I,J 24,34,23,25,33,32,23,25,33 26,27,23,34,27,40 1STDEALRTN I04 P0,14220,159#NP2ē0,86220,86Q0,00,159279,159279,00,0:0,14279,14\I08d LTyLT100(I10),8 I*I0755:I,0I7,14:I,14I7,0:I4I1972725:I,0I7,14:I,14I7,0:I>I05HLTRLT230(I8),2201150OD(NU)0:SD(I)NU15210(I5),50VNU(16336)(16336)(16336)(((I1)13)((I1)13))0Ĕ13(I1)13(I5)15,100II1500:I:NC51: 41,30,43,28,28,34,31,36,29 * INITIAL DEAL ROUTINE *:7 22)I72500:2608 * SHUFFLE ROUTINE *>G7:RI08ZLTpLT100(I10),20w$I.1685380,19B48L53200,19V0`202,R1:203,R2jI051:OD(I)1:ItI051~NU((1)52)OD(NU)T(2)ĺ"YOU WIN!!":3700<>PT(IN)PT(2)ĺ"YOU LOSE!":3040hHPT(IN)PT(2)ĺ"YOU PUSH...":WL0:3050rRL,PLy\4fI04p1880(I28),18z1880(I28),531880(I28),901880(I28),125II0418238,90(I15PT(2)16730"I12000:I>Y60K15:4000:NDND1EKn(PT(2)21)(AC(2)0)PT(2)PT(2)10PT(2)21İ3000:770ND5İ3300PL0NP1 L0SP(PL)INPLL3 BT(IN)0850*:22:10:N$(PL);", ";4PT(IN)PC1)CD(5):SD(NC2)CD(2):NCNC2JvX238:Y30:IN2:PL2:PT(2)0:AC(2)0_4:18238,45:7{4000:YY15:4000:ND2PT(2)21ND5:740K02PT(2)21PT(2)PT(2)((AC(2))10):AC(2)AC(2)1:AC(2)0730(PT(2)17)(AC(2)0)71028):Y18(K72)L35:4000:NDND1* J2 16L 5360,43(K72)L35S 0 &(PT(IN)21)(AC(IN)0)PT(IN)PT(IN)10 0PT(IN)21İ3000:580 :ND5İ3300 DLL1:290 NK X b(BT(0)0)(BT(1)0)(BT(3)0)(BT(4)0)860!lSD(N:1:"ENTER OPTION--";:A$ (A$"D")CJ2:A$"S":X136:Y18(K72)L35:4000:X60:Y33K72L35:ER1:VL$(BT(IN)):6000:ER0:BT(IN)BT(IN)2:VL$(BT(IN)):6000 C(SP(K).1)(A$"P")İ8000:510 (A$"S")(A$"H")460# A$"H"X136(JPT(IN)PT(IN)((AC(IN))10):AC(IN)AC(IN)1:AC(IN)0510J A$"S"510P x :N$(K);:15::"YOU MAY: S)TAND" 25:"H)IT" C(J0)(MN(PL)(BT(PL)BT(PL3)BT(IN))) CĖ25:"D)OUBLE DOWN" C(SP(K).1)Ė25:"SPLIT P)AIR"; 24* PLAY LOGIC * K0NP11 PLK:SP(K)0:L0B "LSP(K)590Q ,A$"":ND2Y 616s @5360,43(K72)L35z J0 TINPLL3 ^PT(IN)21ND5:520 h(CD(PL)(CD(PL)13)13)(CD(PL3)(CD(PL3)13)13)SP(K).1 rJ02: |PT(IN)21160 :NP(A$)h 17:"INPUT A MAXIMUM OF NINE CHARACTERS FOR":"EACH PLAYER--> ";:"#1: ";N$(0) NP2Ė18:"#2: ";N$(1) I01 (N$(I))9N$(I)(N$(I),1,9) I MN(0)1000:MN(1)1000:R1(78):R2(79) 1000 2000  d * BY DARREL RAINES *.x28928:34,206}:R9:16::"BLACKJACK":r11:12:"BY DARREL RAINES"OD(51),SD(52),N$(1),PT(4),AC(4),MN(1),BT(4),CD(5),SP(1),FE(1),LN(1) 14:5:"HOW MANY PLAYERS (1 OR 2)? ";:A$:(A$"1")(A$"2")             *Uܞ@Ѐ*U P*ժժU*(U ŨP*U*Uߪ@*U U*T*U* T*@P*ժժT*U`@*UxW*U*U*U*@*ժժU*U QE"Q*T*ժժՠT*U ׏P*U *U*T*U*T*UT*ĠT*~`? U ժժP* U*U ЪժժՂP* U*U܎@р*U P*U P*ժժU*~?(U P*U*U@*U  T*U*A PP*ժժT*U@@*U|Q*U*U*U* U*U2@*ժժU*U"D*U*ЪժժՂT*U ߂P*U*@*U T*U*P*UT*T*@@ U ժժP* U*܊U ЪժժՂP* U*U|؎?*U@*ժժU*(U ŨP*U*UP*U A @ T*U*P*ժժT*U?@*UpQ*U*(U*Uz?@*ժժU*TQE"A*U*ԪժժՊT*U P*U**U T*U*P*UT*T*` U ĈP* U*Ԋ U ժժՀP* U*U|؎*UT*U*@*ժժU*(U P*U*U P*U P"T*U*D P*ժժT*Uժժ@*U0_*U*UU*U*@*U*Uz}@*ժժUSpOȹpPȹpQȹpRN ,NO`QPQ R`0QL9 *p U ժժP* U*@U*ԪժժՊT* U*߾`Ѐ*U P*U P*ժժU*|(U P*U*U@*U @G*U*A U*U*U*UBP*ժժT*Up*U@T*U*`@*ժժU* U *P P*T*ժժT*U P*U (U*T*U*T* P*T*|p U ժժP* U*xU ԪժժՊP* U+%?,%?,m8??g--? ,<.>.>.>+.?<,<,<,< --.>.>.6-..%'%'%'%'--557?7-757??< <,< --.:'-<'-<'-<'- 8???J$$$56667??<,<,<,<,R,,<,<,<;.>.>...6?n$$$,6666$$$$5666->5'%%g-,$,''<2:'-<'-<''<, .$,6I???,,,,,,<,??:?(<,<,,566%$$$<56-$%7:?g'%'%'%'--5575757-???,<,<,<,< --?76>$$,<,----5757??<,<,<,< --. 6.$$$$76>?'$<6666%$I???L-<'-<'-<'- 8???5-%%'%'%'-8?0..%'%'%'%'mI77776I???,<,<,<,< 6.$$$$5>8> 666>$$$$)6.$$$$76>''0666>$$$$J57??<,<,<,< --.>.>.--8-----------m -5??7-m -5??7--m --5????7---m ---5??????7----m ----5????????7-----m-----5??????????7------------???????????----------+ %'%'%'''>>.>.>.-757??'%'%'%'--5575I7??%'%'%'%--.??7---M MM --5?????????.----MI)---5????????????.-----------???????????-------------m ---5????7--m --5??7--m --5????7---m ---5??????7----m ----5????????7-----m-----5??????????7------------???????????$$6666666666666---mIII--->??;??7--mIIII)-5???.-mIIIII-5???.-mIIIII-5???.--M m)M -->?????????.----MI)---5????????????.-----------???????????--------------MII---5?????????.--mIMM --5????7--MIIII -5???.-mIIIII-5??666.$$$$$$$$$$$$$$,66666666666666.$$$$$$$$$$$$$$,66666666666666.$$$$$$$$$$$$$$,66666666666666.$$$$$$$$$$$$$$,66666666666666.$$$$$$$$$$$$$$,66666666666666.$$$$$$$$$$$$$$,66666666666666.$$$$$$$$$$$$$$,66666666666666.$$$$$$$$$$$$$$,66666666666666. $$$$$$$$$$$????---m---??????--m--????-m-??m"$$$$$$ H9;--M)-??????---m---5??????7---m---5??????7---m---5??????w--- ---????w-- --??w- -w 666666666666v$$$$$$$$$$$$$d66666666666666.$$$$$$$$$$$$$$,66666666666666.$$$$$$$$$$$$$$,66666666666?$$l66*.%%'%'-8?*?(<,<,,-.>.>6-..>'%'%'m577$$$$$$$m-??-m--????--m---??????.--m---5??????.--m---5??????-m M-;m-$$$$$$-?- -5??.m-;-mi-????--- ---5??????.--m---????-mi-m-"$$$$$$$m??-m-????--m--??` 5l|"1+ T ):Oe{ "9Obw;,<,< %.>.>.(,557777--%-.>657?<:'%% 5757---(757?< (<,--557?<,<,< -.8,-57>>.''%<,,557.>>''%-.>.>.?<$<565-e$$ -66     X(0)120:Y(0)123'uJ152:DK(J)J:-y<h49152,128BPÀ_ ADAPTED FROM ** ONE FOUNDATION ** - BY PAUL M. ZELMAN -` COMPLETELY REWRITTEN 5/18/83 BOB RAGSDALE  F IVE,SIX,SEVEN,EIGHT,NINE,TEN,JACK,QUEEN,KINGDuI768789:J:I,J:: 160,1,162,0,138,24,233,1,208,252,141,48,192,232,224,125,208,242,136,208,237,96 uX102:X201:X306:I1X37X214X1:X(I)1232X3:Y(I)1015(2X1X2)30(X12)(X21)::::HN"IF A CARD CANNOT BE PLAYED TO THE FILE, THEN A CARD IS DEALT FROM DECK TO THE FILE.":"IF THERE ARE NO CARDS LEFT IN THE DECK THEN YOU LOSE."RN24:"PRESS ANY KEY TO START";:49152,128:49168,0::0uI113:C$(I):,:u ACE,TWO,THREE,FOUR,F COLUMNS TO THE OUTPUT PILE.":"ONLY THE CARDS AT THE BOTTOM OF EACH COLUMN IS PLAYABLE">N"A CARD CAN BE PLAYED TO THE OUTPUT FILE IF IT IS ONE NUMBER HIGHER OR ONE NUMBERLOWER THAN THE FILE CARD."::"SUITS ARE IGNORED AND THE ACE EQUALS ONE":025  N:*N"THE DECK IS SHUFFLED AND DEALT FACE UP IN 7 VERTICAL COLUMNS OF 5 CARDS EACH.":"THE NEXT CARD IS THEN DEALT,FACE UP, UNDER THESE CARDS TO START THE PILE."/N]4N"THE OBJECT OF THE GAME IS TO TRANSFER ALL THE CARDS IN THE SEVENND STILL HAD "C1" CARDS TO PLAY!":6025%TL0:SP0:I17:J511:JI7(J1)I:V(JI)0TLTLJ:J1:V(JI)V(0)1V(JI)V(0)1SP1:I7&%:0%SP1ı%::21:"YOU LEFT ";:N1TL:10:N;:768:W1500:::" CARDS! YOU LOSE!":6A$"Y"đ:::50(::(4)"RUN MENU"JXICU35:7:53X(I)12,Y(I):lLIOC35:4:53X(I)12,Y(I):@::"THE "C$(V(I))" DOESN'T GO ON THE "C$(V(0))"!"P13000::400(#K0:I17:KKV(I)::K0ī400'd#:21:"YOU WIN  A5:LS(I)14S(I)15Ē44S(I)16S(I)17Ē5PS(I)X(I)12,Y(I)25:p22:"GIVE UP ON THIS HAND? ";:A$:A$:A$"Y"A$"N"6000zA$"N"40024:"DO YOU WANT TO TRY AGAIN? ";:49168,0A$:A$"Y"A$"N"6028A$:),Y(I):V(0)V(I):V(I)0:S(0)S(I):S(I)0:I0:5000:9000BD8000X(V(I)V(0)1)(V(I)V(0)1)Ē4:18X(I),Y(I):7:S(II)5X(I),Y(I):V(0)V(I):V(I)0:S(0)S(I):S(I)0:I0:5000:9000b8000783,100:7:18X(I),Y(I):4:V(I)X(I)5,Y(I)7000:400M AA5ė::" YOU GOOFED - TRY AGAIN":P12000::400 V(CU)0ė:"THERE ARE NO CARDS HERE!":P13000::400 J28 V(JCU)0IJCU:III7:600 J7JJ7:530 0ICU8:(V(I)V(0)1)(V(I)V(0)1)Ē4:18X(IA(49152)128:49168,0/ AA4AA6Ė1:320O AA3ė:6000:QUIT ROUTINE~ AA1CU1OCCU:CUCU1:7500:7000:400 AA2CU7OCCU:CUCU1:7500:7000:400 AA1CU1OCCU:CUCU6:7500:7000:400 AA2CU7OCCU:CUCU6:7500:13):V(I)V(I)13(S(I)14)$ r50004 C10İ9500 1:21:"[<- ->] MOVE POINTER [ESC] = QUIT":"[SPACE] PLAY CARD TO OUTPUT FILE [1-9-0] PLAY CARD FROM DECK":7)"THE DECK HAS ";::C1;::" CARDS LEFT "; 49168,0 49152,128 2,158266,158266,12,1:C135:V(C)D(C):D(C)0< S(C)14g "V(C)13S(C)S(C)1:V(C)V(C)13:290o ,IC 65000::7000 @C0:D(52)0400:DEAL A CARD JCC1:C152C:D(C)0330 TI0:S(I)14 ^V(I)D(C):D(C)0 hS(I)S(I)((V(I)1)32:A658:1:0:CU1 (300006 214:" SHUFFLING "I R(((1)2))U C152q R(52(1)1):RC235 RTDK(C):DK(C)DK(R):DK(R)RT:D(C)DK(C):D(R)DK(R) C)"*";:768 :P1500:::0 34,20:::6:0,00,159268,159268,02,0 ::24576]5:"DO YOU WISH TO SEE THE INSTRUCTIONS? N";:38:A$:A$:A$"Y"İ20000~:"LET'S START THE GAME":5(4)"BLOAD CARD.SHPS,A$4000":232,0:233,64 D(52),DK(52),V(35),S(35),X(42),Y(42),C$(13):L768:A18:A221:A327:A447:A5     3,1,83,7,74,1,70,1,66,1,83,1A 74,1,66,2,88,1,74,2,83,6,149,1i 141,1,133,1,83,2,133,1,83,2,133,1 83,7,99,1,111,1,118,1,99,1,83,1 66,2,74,1,83,1,99,1,74,2,224,2 199,2,149,1,141,1,133,1,83,2,133,1 83,2,133,1,83,7,74,1,70,1,66710000 ER0ćN1,N2:28674,N1:28675,N2:7686 N * ERROR ROUTINE *W ER1b 216,0h  * PAUSE UNTIL SPACE BAR *24:9::"";:A$:A$" "4020 149,1,141,1,133,1,83,2,133,1,83,2 13 LUCK..."4000:! =(4);"RUN BLACKJACK.2"C_ * CARD DRAW ROUTINE *k18X,YSU(CD13):NUCD(SU13)4(SU2)14SUX12,Y257 1NUX5,Y5 * CHECK FOR KEYBOARD INPUT * (49152)12TO BET MORE THAN YOU HAVE.":L" IF YOU DO LOSE ALL OF YOUR MONEY, YOU""MAY BORROW ANOTHER $1000 FROM A GROUP OF";::"LOAN SHARKS";::". THESE BOYS PLAY ROUGH SO":"WATCH OUT";::".": " ENTER 0 AS A BET TO QUIT THE GAME.":"GOOD" YOUR GRANDMOTHER HAS GIVEN YOU $1000":"WHICH YOU ARE STARTING OFF WITH. SHE":"WOULD LIKE THE MONEY BACK WHEN YOU""FINISH. SO DON'T LOSE IT ALL!!"::"YOU MAY BET ANY AMOUNT MORE THAN $5 AND":"LESS THAN $500. YOU WILL NEVER BE":"ALLOWED THE OPTION":"OF SPLITTING THE CARDS INTO TWO HANDS":"AND THEN PLAYS FROM THERE. THIS MAY""ONLY BE DONE ON THE FIRST TWO CARDS.":"BOTH OF THESE SPECIAL RULES ARE ALLOWED":"ONLY IF THE PLAYER HAS THE MONEY TO":"COVER THE BETS."4000{":"PLAYER. HE MAY DOUBLE HIS BET AFTER HE":"HAS SEEN THE FIRST TWO CARDS OF A HAND.""HOWEVER, IF HE DOES SO HE MUST TAKE ONE,";:"AND ONLY ONE, MORE CARD AFTER THAT.":]"IF A PLAYER IS DEALT A PAIR AS THE FIRST";:"TWO CARDS OF A HAND, HE HASF YOUR":"BET. IF YOU TIE, YOU PUSH (NEITHER WIN":"NOR LOSE.)"J`4000Pjt" THE DEALER WILL DRAW UNTIL HE HAS 17":"POINTS. HE WILL HIT 17 IF AN ACE HAS":"BEEN COUNTED AS 11 POINTS IN THAT HAND."W~:" THERE ARE TWO SPECIAL RULES FOR THE BET. IF":"YOU GET A BLACKJACK, YOU WIN ONE AND ONE";:"HALF TIMES YOUR BET. IF YOU CAN GET"L"FIVE CARDS WITHOUT BUSTING, IT WILL":"COUNT AS A BLACKJACK. IF THE DEALER":"BUSTS OR HAS A LOWER POINT TOTAL THAN"@V"YOU, THEN YOU WIN THE AMOUNT O A TIME UNTIL HE HAS MORE THAN 21":"POINTS OR WANTS TO STAND WITH THE POINT":"TOTAL THAT HE HAS. POINTS ARE COUNTED" 8"AS FOLLOWS: ACE -- 1 OR 11 POINTS":15:"FACE -- 10 POINTS":15:"OTHER -- NUMBER VALUE":_B" IF YOU BUST, YOU LOSE YOUR:"RULES OF PLAY:":::34,2q " THIS BLACKJACK GAME IS LIKE MOST":"OTHERS. EACH PLAYER IS DEALT ONE HAND." $"THE PLAYER MUST PLACE A BET BEFORE THE":"FIRST CARDS ARE DEALT. AFTER THE FIRST":"TWO CARDS, EACH PLAYER MAY DRAW ONE CARD";w ."AT,Y :3000 D51.5OF195,Y& NY7 XX191834I b51.5OFX,63S l3000e v51.5OFX,63l X{ Y67954 51.5OF83,Y 3000 51.5OF83,Y Y 490  * CONTINUE PROGRAM * A$ A$; A$"N"1280 ::Y63954 5283,Y Y> 22:25:"BY DARREL RAINES"h "DO YOU WISH TO SEE INSTRUCTIONS? "; 28672,1:28673,60:ER0 OF.5 OFOF X871954 51.5OFX,95 3000 51.5OFX,95 X &Y91634 051.5OF1959,Y199,Y Y 7" I08* LT@ "LT100(I10),79G ,Ih 6 24,34,23,25,33,32,23,25,33 @79,99199,99199,5979,5979,99 JX831954 T52X,95 ^X hY95634 r52195,Y |Y X195834 52X,63 X  d:3n(4);"BLOAD CARD.SHAPE.TABLE,A$6000"Xx(4);"BLOAD TONE SUB.OBJ,A$300"k232,0:233,96u1:03500:202,(78):203,(79)I5101X((1)255)Y((1)130)CDI:2000I4Y5999 7     z#X°    ֳִ ĮŮŠ Š®ʠ ˮ ĮӠ  ĠΠ ΠӠ%֮à"ְֱֲֵ5ϠˠԠŠ ̠ԠҠҠ#͠ȠӮРSPL,36,30,"THIS IS A TYPING DRILL PROGRAM. AS LETTERS DESCEND FROM THE TOP OF THE SCREEN YOU MUST PRESS THE SAME LETTER ON THE KEYBOARD TO PREVENT IT FROM REACHING THE BOTTOM."SPL,36,30,"THIS GAME DOESN'T REQUIRE ANYTHING BUT A CREADING ALIENS. YOU CAN PLAY WITH EITHER A JOYSTICK OR THE KEYBOARD."J:SPL,36,30,"PRESS 1, 2, OR 3 TO FIRE A MISSILE FROM THE CORRESPONDING MISSILE CENTER. GUIDE YOUR MISSILES BY MOVING THE CURSOR AROUND THE SCREEN WITH THE I-J-K-M KEYS OR JOYSTICK."N YOU MUST ENTER THE ANSWER IN RIGHT TO LEFT ORDER SO THAT THE NUMBER TWELVE WOULD BE ENTERED AS 21."k?C@SPL,36,30,"THIS IS AN ADAPTION OF THE ARCADE GAME CALLED 'MISSILE COMMAND'. YOU HAVE TO PROTECT YOUR CITIES AND MISSILE EMPLACEMENTS FROM INVAU MAY RUN A DEMO WITHOUT HAVING ONE."+SPL,36,30,"THIS IS A MATH DRILL PROGRAM WHICH HAS OPTIONS FOR ADDING, SUBTRACTING AND MULTIPLYING. EACH CORRECT ANSWER ADDS ONE SEGMENT TO THE WORM."e:SPL,36,30,"NOTE THAT IN THE ADDITION SECTIO,30,"NOTE THAT EACH OBJECT MUST BE HIT SEVERAL TIMES BEFORE IT DISAPPEARS. WHEN ALL THE OBJECTS ARE GONE YOU CAN ADVANCE TO THE NEXT LEVEL."w%xSPL,36,30,"YOU CAN CREATE YOUR OWN WORD SEARCH PUZZLES WITH THIS PROGRAM. IT REQUIRES A PRINTER BUT YO OF A JOYSTICK AND SOME GOOD HAND-EYE COORDINATION TO PLAY."SPL,36,30,"PRESS THE JOYSTICK BUTTON TO FIRE AND TRY TO SHOOT DOWN THE CLOWN'S JUGGLING OBJECTS. MOVE THE JOYSTICK BACK AND FORTH TO AVOID THE CLOWN'S FEET AND TEARS."#5000(SPL,36 THEM TO THE DISCARD PILE. IT LOOKS EASY BUT YOU'LL HAVE TO BE LUCKY IN ORDER TO GET RID ";bSPL,36,30,"OF THE CARDS. DON'T CHEAT!"<SPL,36,30,"THIS GAME WAS CREATED WITH THE ARCADE MACHINE BY BRODERBUND SOFTWARE. IT REQUIRES THE USE TRY YOUR LUCK AT BLACKJACK."sV:SPL,36,30,"INSTRUCTIONS FOR PLAY ARE INCLUDED WITH THE PROGRAM. GOOD LUCK!!!"y\SPL,36,30,"THIS IS A DIFFERENT VERSION OF SOLITAIRE THAT I'VE NEVER PLAYED BEFORE. YOU TRY TO GET RID OF ALL THE CARDS BY MOVINGA$;:: 9_BLACKJACK,SOLITAIRE,REVENGEFUL RABBIT,SUPER WORDPUZZLE,MATH WORM,INVADERS KEYBOARD INVASION,BRAIN TEASERSEXIT TO BASICLSPL,36,30,"YOUR GRANDMOTHER GIVES YOU $1000. WHAT ELSE IS THERE TO DO BUT HEAD FOR THE CASINO AND900,4000,4100,4200,60,60,4600,4700,4800,4900,4950; :70E +::] ,(21(A$)2):A$: 21:3:"M = MENU R = RUN PROGRAM ";:A$:A$ A$"M"A$"R"Č198:400 3:: 1:X140:A$;:*23:X140:A$;::2:X222:1:A$;:40:0,2700,2800,2850,2850,29750 PK14PKWĉ:70x 21:"PRESS ";::"M";::" FOR MAIN MENU ";::"R";::" TO RUN "; A$:(A$)96A$((A$)32) A$:A$"M"A$"R"Č198:1621 A$"R"ĉ::PK3000,3100,3200,3300,3400,3500,3600,3700,3800,3PK((A$)):PK1PKWČ198:1301 PK9ĉ::_ 2::A$" ":300:y 2::A$A$(PK):300: 34,3:35,22:32,1:33,33:5:10::32,5:6 PK1100,1200,1300,1400,1500,1600,1700,1800,1900,2000,2100,2200,2300,2400,2500,260TWORK #11 ":300::23:A$" THE BIG RED APPLE CLUB ":300Y ZXT1T2:5:4X1T1:s dX9ĺ(64X9);:120{ nX; x:10);A$(X): 21:10:"ENTER SELECTION ";:A$:A$ (A$)96A$((A$)32) A$"A"A$"Z"A$((A$)649)! "THE BIG RED APPLE CLUB":300:A$"1105 SOUTH 13TH, #103":300:A$"NORFOLK, NE 68701":300h <8:5000~ F::A$" ":810: H2:2::X15:" ";::35:X15:" ";:: K1::A$": :":300:3:300:= P2::A$" DISK.NEI (175)(176)25655'D$(4)L(21):D$;"PR#0":D$;"NOMONCIO"T:rW:A$(W):X1W:A$(X):T11:T29:A$"+":800:(8:A$"CONTRIBUTED PROGRAMS":300:14:A$"DISTRIBUTED BY":300:6:A$"DISK.NETWORK #11":300[ 216:A$          !!!!"""####$$$%%%%&&&''''((((((((((((((((((((((((((((((((PPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPP $(,048"&*.26:>#'+/37;?#'+/37;? $(,048< $(,048"&*.26:>#'+/37;?#'+/37;? $(,048< $(,048"&*.26:>#'+/37;?#'+/37;?*? U ժժP* U*P(qGB U*ժժժժT*ժժժժժժժժժժժժժժժժժ U*р(U P*U P*ժժU*p(U ĈP*U*UԪժժՊ@*U`G*U*U*U*(U*Uj?@*ժժU*Ux|@*UT*U*`@*ժժU*(U U*U*Q*T*ժժT*U ׯP*U AU*T*U*T*P*բѪT* U ժժP* U*@pU*ժժժժT* U*р*U P*ĈĈժĈĈժĈĈU*xժ(U ԪՊP*U*Uժժ@*U pW*U*A U*Uj?P*ժժT*Up~`*U0<@*ժժU* U U*U*Q*T*ժժT*U P*U  U*T*U*T*P*ՈĪT CONTINUE ";::A$:A$::6:v$ѸȱȱeLޱ, 8Hȥh lSPL F { ȪbHPh ĝĝ  88! ڤ \ĝ ;$;"RUN BLACKJACK START"/ D$;"RUN SOLITAIRE"P D$;"BRUN REVENGEFUL RABBIT"o D$;"RUN SUPER WORDFINDER"H D$;"RUN WORM MATH" D$;"RUN INVADERS.STARTUP"D$;"BRUN KEYBOARD INVASION"tD$;"RUN BRAIN TEASERS"21::"PRESS ANY KEY TOTIVE MIND. INSTRUCTIONS ARE INCLUDED AND AFTER YOU HAVE SEEN THE ANSWERS TO SOME OF THE PUZZLES I'M SURE YOU'LL BE ABLE TO SOLVE THE OTHERS."kl34` T116:T2W  T116:T2W T11:T215: D ǃ޽ۇ ǃ`׃ి*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U(泌0@Ṹǃժժժժժժժժժժժժժժժժժժժժ(x 0           L ,-` Leh8PhHQH`hbihciHHb\ȱb]`ߚl hhHHHH`L⥠`ʆ  hdheHdHHHH08  X Xhdhe + eHdHHHeHdH`   q% 0 L0`,wyywxzzx,Hyw wȄffȪ yw fh0`h&Hwyxzwy wy h Lh` ` ` ` 憅` ` ᥠQP` L  8e`LԩLcغh8uhHvH` L L L~ 憅 L ʊ8$!  W$Li)$` LY L   hPhQP 8ePQiHHš`hh PȱPʘHH` ,խwqq膸 J즸 , :hhlP,q`h8uhv] :  ڢ hgʆbcb KLf/q ߠ :۩q` S0 L,Hh*Mȱڦhwx%ȱH J hw0У8 ewwx𴰺 抦5?wtsʆwx8dedЕБt Z Z ,խvqq ", ȹ,ȹ ,W,qewix8 Z ZCBЍw U  yUUwyVxz`Зԥwyxz`ywzx`GH o8 UpVUVƠ UVUʆoph3]eУk ЮU 4Г U 5,wЅƩѤ wU! 5B=ooppȆbcĂbUVdf08ophLД8= 7MLdlkȄmn;op:E UUȥViлh8HH`Ї{y SՠUEowyywxzzxwIy:e \`fH,Hops8otpf,kiUliVU$f&łmUŁfbUȥcUUŭUVŮMvłGUŁ>UV2ЅUŕȱU喰!0UUdUV0*UiUViVUmVnɊȢwU0ХyyUU⥁œ.QP$  e LWHhL:5~    eȱeLaL LRwwxȆwxwHw Jhw`w5U,w`,hbhcbwȱbxcȘHH`wȄ wep`0CBe]Q=b`LicbbbE0`Ġ``MMLeڢD ! SL3LH h%LddЉ`?0 HH chh ޥ Yަ`н  eE   ࠰>Ffee0  &ߢEX$ƫv` ꥪLYDcbbwyȱbxz`ݥܦL+3UV UwȱUx`wUȥxU`Ncbbȱb`cbbȥb`cbbȱb8塅堅PEncbbȱbe HH`0S,,hdehUhVhhHHU hehHehUU HHk`UiȱUiuкe& & &eeHHqUȥqUeFdO݅܆`ycbbȱbƫ8pM䡥UȥUU +뺠ЧUV욥VHUHthhЁ HHf ㈱ۺQi e 纼 +뺊i  e HH`iiiHH`(bcbebbePE1b]  0  j=i<<=kbޙץ,,stHʈcbhH ʈpoophMm X RQtPsh`bhH      _[ [ __[ [ _ĀĀĀĪ(@( A A( A(@A(ŀ  " "   " 33333  ?30 ?30038<63?00?0333?3 333333>0 `p6x?~ppxcţţģA;x|A7A;x|@@ ~F||?~x>p>p >pp0@A@q?@>? |__? |?_? |__0 0`/`p#8` <ǂǂwpow``@  x x|xр߀рЂЂЂ`?|~`?`?`pp``~~`x8ииԀԀԀx??x?x??``8@_@xg`~o~_~o+Hfu3\~!mCQ=CjOS?f`J_c@E>I^c`@kpv|rl}xü         h|hpxb`hpxR{p`hVPCWWWMMMMgg3C998bJ ""$ -)JJJQa!rQ2d,*?Ti(P< BJ+Hfu3\~!mCQ p J&%0Ȋ98` ɀ(IժU*`no0pp`hm[@ՂՂՂՂՂՂՂՂ݇ػЊЊЊЊA(|r~y@|@p@@px?|xx'x?xOxxxxxx`x~ @U A*P@ TA@$A@(P A P@ A@((@"U (@* _ i<`, w_ _IL_0Ja0 `bhh`L_`ks!!!!   BBBBB=====OOOOG  13;13cc--13'13-13;13-NTW;TW  YURP8 xgޕޕ((#vC˕˕!!U!Ld!ޔהYY g湭: 808`OR!!!!!!!!!R! !!!!!!!9nnnnnnCWWWMMMMgg3C99>DnnnnCWWWMMMMgg3C99hhmmCWWWMMMMgg3C99h>DhD          h|hpxb`hpxR{p`hDbh|hpxb`hpxQ{p`hQQQh|hpxb`hpxR{p`hDbQQh|hpxb`hpxR{p`hQQh|hpxb`hpxR{p`hDbSCWWWMMMMgg3C99h>DCWWWMMMMfg3C9ЀЀ```` 0000@@@@ĀĀĀ 0@0H`U)D (08pFcmukÉey PP @@   Fcfwf6f6fwFcFcfwf6f6fwFc@q8@y}@Ym@Ym@y}@q8@q8@y}@Ym@Ym@y}@q800>06060>000>06060>0 GLoLmLmLo G GLoLmLmLo Gcqs{3[3[s{cqcqs{3[3[s{cq`8`|>`l6`l6`|>`8`8`|>`l6`l6`|>`8/ 0///000 x0 ) 0 0 &L/BLOADINV1,A$300 &/ & 0 &L0 BLOADINV2 &/ & 0 &L&0BLOADINV3,A$1800 &0 & 0 &LK0BLOADINV4,A$4000 &:0 & 0 &Lh0BRUNINV5 &_0 & L`+0vL%80L|$} Bv Uu p} [x Zv .R Uu \} Uu Z} 1x o Uu Z} x LX Uu \} x o Uu g} Uu e} t Uu D} }t o Uu r} Uu p} t Uu Z} }t o w x $ t Uu p} z ()~ L2Y Uu } x o w  a{  Uu e}  Uu p} u x uL'Z U } Uu } t Uu } t Uu } t t Uu } y t )~ LW Uu g} Uu } o Uu r} Uu } o Uu F} Uu } c x i o Uu \} w o Uu } w o Uu } w L'Z w  w  w  a{  Uu e}  Uu p} Uu e}  Uu } Uu } Uu } t Uu } }t o Uu } 'y ( t Uu } I{ )~ LV Uu } ^x o LW Uu } Bv Uu } c px Zv .R w x $LW Uu } x o w  j{  Uu }  Uu } v x vLW Lx  j{  Uu }  Uu .} Qy ( t x t v ]| t )~ LU Uu } y o Uu }  Uu 0} Uu .} Xx o z  (u  Uu }  Uu ~ Uu t L'Z Uu }LW Uu } 'y ( t Uu } I{ )~ LV Uu } ^x o LW w  w  w  j{  Uu Uu } Uu } t Uu } }t o w x $ t Uu ~ z ()~ LT Uu | x o u x u v x vLU Uu } x ( t Uu } 7{ )~ L1U Uu | x o u x u Uu } Uu } t Uu } zt o Uu ~ Uu ~ t Uu .} zt o LU Uu` z  w  w  x  Ev  ]v { 8 w  x  Ev  ]v { 8` w ~~ v   w t Uu |LU w  Uu }  w  (u  Uu }  Uu ~ Uu } Bv Uu ~ mx t Uu } Xx }t Zv .R Uu ~ Uu ~ t Uu .} }t o gx ( t ]v v gx ()~ ` ^x ?v t ^x ?v # tt L~R Ev x Bv w > Ev # 2L Q (x > %{ ?v Q yx > ]v Q y 8 x D n w w w LR x w ]v x Zv w > Ev # 2L Q (x > %{ ?v Q yx > ]v Q y 8 x D n u u w L-S x w w x | Uu } o 1 ~~ w u` w ~~ t   Uu } ^x o Uu } x Xx # .{ y o Uu } x x x t Uu } c y wt t w n wt o Uu } x 8z Wy t v Xx }t o Uu } ^x o w v w u Uu } x z # oy o 1 ~~` Ev v} w o Uu } x o Uu } w o Uu ~ w o Uu | x o Uu | Uu } o v gx (LBQ w u gu w $Lf u x $LP w u u x u } Ux $LP Uu } Uu } t u y zt t Uu .} z qt t w n wt o Uu } w o Uu | w o Uu v c x } w o Uu v c x | x o Uu } x Ty t x Lu y }t x o Uu 0} x Xx [x # o Uu | Uu .} x o Uu ~ Uu | o Uu | w o Uu } x t Uu .} wt t Uu } z wt o Uu x kw t x jx # }t x vu y LaN y vu v v (LuN v t x %u ^x pu t ^x pu # tt $LN ^x %u px pu t px pu # tt $LN px %u v x fv v fy t v Xx }t Aw v x ~~ Dw   Uu } x o Uu | x o 1 ~~ w ~~ v   Uu v c x Lx | z o x | z o { > | T { > 0| T { > w T yu $ t v Ey )~ LM w j~ x   u } y o u %} x u )z Wy o {  u #}  x| 1 j~ yu w $LM w v { > { T { > { T v t x jx # mx v yu $LaN ^t %{ t t %{ t # t "{ o| # t %{ t t` qa` w ~~ x   Uu } w o Uu | x o 1 ~~` w u w ~~ y   Uu } Ux LL u x u gu u x LL x u 1 ~~ u u L M 0l u w $` u u LL z  w  w  w | x ox y  w  w 9|  w z  w  w  z ~~ {  z  y Iu } Ux $LK s{  Uu  x| y Iu } w o y Iu }} w o {  Uu  x| 1 ~~ z  w  | ~~ x  K|  {  Uu  x| 1 ~~ v x v px v # x nwLcL 8J3 a7J7J7J(~ { ;  X { >  | T { > w T x Mw ^x 2w x 3vLVq { > w T gu w $Lf gL }z > w T { > w T w u w v w u w vu w v w  w  x| 9|  x| w  | 9|  | w  x 9|                     * wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwww@* @>|~||@p~~~~ԀЂĀĀĀԀЂ *@@@E U U(( U $ $  *@(A( @*@*@P @P@@CGN8p`@p|@?@@?@? @Ѐ܃څڅڅ܃ЀPP@ Q((**@"  ))@E@ P** @*@*Tpp`p`` 0pOppp?(PЂ(*@*@***((" " P Q P@ @JP P  |x|xx`||||@ TЭЭЭ Ѐ @*P*P*@*@* @@(((PP (%   * 8p~`@@A`apqx8@ ((@P T T*P*P @D%%J ЊЊЊЊ(* )(%(( @(``@?`?@?@?8>``?``P ( Ѐ*P(T T UU Q P $ $ @@BԀԀԀԀ A*J*@* @*@0p8`y@sw~|x @Gxgxx?xЂЂA(ۀۀۀ @  UU U U(T ))PPP   @(P @R PJP P( @ЪՀЪՀЪՀЪՀЪՀЪՀЪՀЪՀػ݃ *@|@ ~`p|pp|~~~ ~~~~'~?~~?~?x~G *PԪԪԪԪԪԪԪԪݻ @`pHxd|||@c@@?@@@@ @@?@@~?@q Tժժժժժժժժݻ(Pxd|r~y``pxp?pOpppp?pppp@p?|@ժժժժժժժժݻ@ T~y@|@ ~`x``x|~||||'|?|O||||p|@T ժժժժժժժժ@@ ~`pHx~xx~?G |cP(ՊՊՊՊՊՊՊՊݻP p?H?x?d?|?r?~?@?~?~?@`q?````?```````x?{(4);"MAXFILES1"%::(12)G9);"LOADING INVASION FORCE"d (4);"BLOAD INV2,A8192"y(4);"BRUNINV0" ENINV5" RUN INVASION FORCE2.OBJ"sscsscsscsscsscsscsscssc#3#3#3#3#3#3#3c3c3c3c3c3c3c3########ssSssSssSssSssSssSssSssSCCCCCCCSCSCSCSCSCSCSC2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2Bsssssssssssssssssss2B2B2B2B2B2B2B2B2BB22BB2B2B22BB2B2B22BB2B2B22BB2B2B22BB2B2B22BB2B2B22BB2B2B22BB2B2B22BB2B2B22BB2B2B22BB2B2B22BB2B2B22BB2B2B22BB2B2B22BB2B2B22BB2B2#3#3#3#3#3#3#3#3#3#3#33c3c3c3c3c3c3c3c3c3c3cCCCCCCCCCCCCSCSCSCSCSCSCSCSCSCSCS$$$$$TTTTTtttddddd2B#$--=??$ 6I666?/6666d $ 6666646$du6&$ 56&I6&$t -6& -u6?$2666$$d -6? u$666$$26&d -? --??-u??< 6-??-66ve26- $6662ve $626f u$$ru e ?26- $666?//*----=*----I66& )-u6??6-- $??$ -)-u6?$)--6666II I---???   --L )-u6??$$$ --66?-?$,>? -$66$?$ 6666$ -6? -u?6-e I 6666$?$ -266$$/=$ u -$66?4m1?=6666$ -6&6I66 dI6II666 I6666$$ LI:--- I266&$?/--=-R <. .*--=R <.-II $)-u666??$$$ ---I 6666?/--=- --.--= --6?/-6??66---'$4666&---???66--u6??/?II?.--6??$,----6?$$$ 6666$$$$--u6??/u6)-u??6--6??6---??5666&?666v-- $$$4 66v $$4$6666 $$$$ v# 46v66$$ 4=---.--=I666M 6 $- 6666 $$$$6/-???-66=?---?I6666<-- ??d-- II& #7J 5' v-e- $??7-)-u&??666-- 4?6666--e$$$??/6---???66--??66---6---???66--??66-)-u??666--%$?-66666$$---$$6666)-=7666>/-=6II666??46666$$4- 66666--- 6666$$$$ 66666666$$$t&$$$4$)-u666??$$$ -6666$$$$--u6??7)-u66@ d';L_q~ !5AN[l~ "CPZaju)/7CNZg $4AN`r} -u>??v-==I66#$--=??$ -6666--e$??-      }}}ɶ}}}~LyLyyyꍶyyyLx٠ŠҠŠŠӠӠΠϠΠԠΠĠϳŬΠӠ٠ŠŠĬ̤ðΠŠҠxx` X{  { @{ ,ɲpɱ X`{{,,{{0@rzuzuz@zzzLzL|L}~LŠįŠϮŠŠ 2222ZZZ  AP6Hf*ΠԠ yz x ߼詷 췠詷 LzxzyYyyay` X hy :hh yL,R,Q X lxLiɍ ɱɹɸL8x x syxP]ghxSyikmZyjln eLע8yByx轖x `ΠՠŠȠŠ̠įSsSsSsSsSsSsSsSsSsSsSs###########ssssssrrsrrrrrrssssrrssssssssscsscsscsscsscsscsscssrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrr66>?<'?<'<'$'%$,,,,%%-%--.-.55-..666>6777?>4??>??<'?<'<'$'$%77/,$<<55-%%=>6..''?77/,$<<55-%%=>6..''?-,.4557>?,%6><<'$%-,-5556777??<<'<,$%-,--.6?.-$56677?'66>?<<'<$,,,,,---...66>>>>?>??<<'<$$,,,,,----.....6>$<665?.>'>.=?7??,-6666?6777?7????<'$?<$$$66>?<<'<$,,,,,---...66>>>>?>??<<'<$$,,,,,----.....6>$<665?.>'>.=?7??,-?66,6.--%$5666'$?????,,.%$,66%,,,6>.%$,...$,66-,.>??<>'4>'$$%$76????,,.%$,66%,,,6>.%$,...$,66-,.>??<>'4>7?????$$%%%%-,------.555556>??????6?76>$$%-,$465.56.$$'?>677/,$<<55-%%=>6..''?$$$,6.--%$5666'$?''/..&%%=>>$$$77/,$<<55-%%=>6..''?'-6?''%<'-,5,5->755<77-.5--%-,%?7-6%,%6&?6&$%%$6..66&?6&$%%$6..66$$$,6.--%$5666'$?6?76>$$%-,$465.56.$$'?>67<7,,<'-,5,5->755<7$$$,6.--%$5666'$?7<7,,<'-,5,5->755<77-6%,%?7<7,,<'-,5,5->755<7$$$55??,%?$????7----->??????'%,,,,$65555.>?,$7>$$76>$<6>+----5?????.----5???????????$$,66-%$$$,$65666.-$,,4556?$56--$$$,$656-56>?$,--$$$,$656666>''$$766'$$$<666>$$<66>4------>?????7------>??????7<7,,!$,,66?7------$$$76?7.-$<$>6.$56-6>$5.-%$,$-$65566'$$766'$$766-5-----$7'$%$'>6.$4676$<67-6$$6?,<,4??????$5.-$$?'$%%4..6>$<$>6.$56-6>$5.-%$$%566.---$$,,$$6...666?$$$666??????67>7?7??>??<'?<'<'<$$,66,.7?<%6?7?>?,%-%-,$$555-------.???7..-.-.-<'?'?'???/,------%%%56.>$$<66>-5---%$7!$'6>?.6??????$,6.,?$,45666-$,,$$5666>$<6.--@cN |h.>b$5.5?6'<'66>6-$7'-6?''%-,555>>?6><<'$%-,-5556777??<<'<,$%-,--...6>>66>?<<'<$,,,,,---...66>>>>?>??<<'<$$,,,,,----.....6>$<665777??>?6666?6777?7?6666>?<'?<'<'$'%$,,,,%%-%--.-.55     ITE ";B$ JKAO1A#$ W$(JK)+. JK?8 D$;"CLOSE ";B$RB D$;"OPEN ";B$fL D$;"WRITE ";B$V A10ĺ(34);A;(32);(34):2410` (34);A;(34)j D$;"CLOSE ";B$t ~ 2:"PLEASE TYPE A HEADING FOR YOUR PUZZLE": H$ 7? "P." :AOA#JKA150/W$(JK)<CV(37)(W$(JK))24Ģ23:"WORDS MUST BE 24 OR LESS LETTERS LONG.":CV:868:2220958W$(JK)"END"2300(37)21Ģ6:958:JKAJK1 D$;"APPEND ";B$ D$;"WR(37)21AJKİ4470:4JK(>4470.HlR6:"DO YOU WISH TO ADD TO THE LIST"::"OF WORDS";:868t\C$f(C$,1)"N"2420p(C$,1)"Y"Ģ23:"YES OR NO PLEASE.":2130z:"TYPE IN THE WORDS ONE PER LINE."::"TYPE 'END' TO STOW$(JK):JK$D$;"CLOSE ";B$3A60242096:"DO YOU WISH TO SEE A LISTING OF THE"::"WORDS IN THE FILE";:868C$(C$,1)"N"2120(C$,1)"Y"Ģ23:"YES OR NO PLEASE.":2010: JK1AW$(JK) * MUST BE 24 OR LESS LETTERS LONG.":CV:868:1810<0958B:YDW$(JK)"END"1900rN(37)21Ģ6:958:zXJKlAJK1vG611990D$;"OPEN ";B$D$;"WRITE ";B$A10ĺ(34);A;(32);(34):1960(34);A;(34)JK1A(B$)13(B$)01760b23:"THE NAME OF THE FILE MUST BE 1 TO 12":"LETTERS LONG.";:1:1700kG61s:"TYPE IN YOUR WORDS ONE PER LINE."::"TYPE 'END' TO STOP.":JK150W$(JK)CV(37)2&(W$(JK))24Ģ23:"WORDS8 |C$(C$,1)"N"1770P(C$,1)"Y"Ģ23:"YES OR NO PLEASE.":1650Z95810:"WHAT IS THE NAME OF THE FILE YOU WANT"::"THE WORDS SAVED IN";:868B$JK1(B$):(B$,JK,1)" "B$(B$,1,JK)(B$,JK1,(B$)JK)JKORDS HORIZONTALLY, VERTICALLY,"::" DIAGONALLY AND IN INVERTED ORDER"::r620:"ENTER 1,2,3, OR 4?";:868@4490:A5ZNJA50A55A5(A5)1630T1590^A01990hr4:"DO YOU WANT THE LIST OF WORDS SAVED IN"::"A FILE";:86JKD$;"CLOSE ";B$!216,0*A61a:4:"WHAT FORMAT DO YOU WANT THE PUZZLE TO BE":" 1)WORDS HORIZONTALLY":" 2)WORDS HORIZONTALLY AND VERTICALLY":"" 3)WORDS HORIZONTALLY, VERTICALLY AND"::" DIAGONALLY":M," 4)W"WHAT IS THE NAME OF THE FILE THE WORDS"::"ARE SAVED IN";:868N x4480V N$ JK1(N$):(N$,JK,1)" "N$(N$,1,JK1)(N$,JK1,(N$)JK) JK:B$N$ D$;"OPEN ";B$ D$;"READ ";B$ A$ A(A$) JK1A W$(JK)INTER ON OR OFF?" SA$c SA$"ON"SA$"OFF"ĺ"ENTER 'ON' OR 'OFF' AND PRESS RETURN ":1290i u (A0:G0| 24 <"ARE THE WORDS FOR YOU PUZZLE SAVED"::"IN A FILE";:868 FB$ P(B$,1,1)"N"1540 Z(B$,1,1)"Y"1330 d9C n "LATER ON, OR ADD TO YOUR SAVED LIST OF":Y "WORDS TO MAKE A LARGER WORD PUZZLE."c 4470 4:"TO USE THIS PROGRAM YOU MUST HAVE A"::"PRINTER AVAILABLE."::"HOWEVER, YOU CAN DEMONSTRATE IT"::"WITHOUT A PRINTER.":4470  :6:"PRE WORD PUZZLES":A "FOR YOU WITH WORDS YOU HAVE ENTERED. YOU"q "MAY SPECIFY HOW THE WORDS WILL BE PLACED" "IN THE PUZZLE. IF YOU WISH, YOU MAY": "KEEP THE WORDS YOU ENTER IN A DATA FILE": "SO THAT YOU MAY RE-USE THE SAME WORDS":.),X$(50) 8Y$(50)F B::10:5:"S U P E R W O R D F I N D E R"N L16v V"DO YOU WANT INSTRUCTIONS ";:868~ `B$ j(B$,1,1)"N"ė:1270 t(B$,1,1)"Y"1170 ~23:"YES OR NO PLEASE.":1100 1110 ::"THIS PROGRAM WILL CREAT;!) AUTHOR: L. BORRY, MECC AND OTHERSf ASSOCIATED PROGRAMS AND FILES: FILES ARE USER DEFINEDUI$"ABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789+-*/()$= ,. ]:'& ^#<> ? ;"D$(4):D$;"NOMON I,O,C":::255:$ZM23 .B(35),C(35),R(35),W$(50           L ,-` Leh8PhHQH`hbihciHHb\ȱb]`ߚl hhHHHH`L⥠`ʆ  hdheHdHHHH08  X Xhdhe + eHdHHHeHdH`  `% 0 L0`,wyywxzzx,Hyw wȄffȪ yw fh0`h&Hwyxzwy wy h Lh` ` ` ` 憅` ` ᥠQP` Lh 8e`LԩLcغh8uhHvH` L L L~ 憅 L ʊ8$!  W$Li)$` LY L   hPhQP 8ePQiHHš`hh PȱPʘHH Z ,խwqq膸 J즸 , :hhlP,q`h8uhv] :  ڢ hgʆbcb KLf/q ߠ :۩q` S0 L,Hh*Mȱڦhwx%ȱH J 5Bw0У8 ewwx𴰺 抦5?wtsʆwx8dedЕБt Z Z ,խvqq ", ȹ,ȹ ,W,qewix8 ZeCBЍw U  yUUwyVxz`Зԥwyxz`ywzx`GH o8 UpVUVƠ UVUʆoph3]eУk ЮU 4Г U 5,wЅƩѤ wU! 唐=ooppȆbcĂbfUVd8ophLД8= 7MLdlkȄmn;op:E UUȥViлh8HH`Ї{y SՠUEowyywxzzxwIy:w \`fH,Hops8otpf,kiUliVU$f&łmUŁfbUȥcUUŭUVŮMvłGUŁ>UV2ЅUŕȱU喰!UUdUV0*UiUViVUmVnɊȢwU𧰸ХyyUU⥁œ.QP$  e LWHhL:5~    eȱeLaL LRwwxȆwxwHw Jhw`w5U,w`,hbhcbwȱbxcȘHH`wȄ ep`0CBe]Q=b`LicbbbE0`Ġ``MMLeڢD ! SL3LH h%LddЉ`?0 HH chh ޥ Yަ`н  eE   堰>Ffee0  &ߢEX$ƫv` ꥪLYDcbbwyȱbxz`ݥܦL+3UV UwȱUx`wUȥxU`Ncbbȱb`cbbȥb`cbbȱb8塅堅PEncbbȱbe HH`0S,,hdehUhVhhHHU hehHehUU HHk`UiȱUiuкe& & &eeHHqUȥqUeFdO݅܆`ycbbȱbƫ8pM0UȥUU +뺠ЧUV욥VHUHthhЁ HHf ㈱ۺQi e 纼 +뺊i  e HH`iiiHH`(bcbebbePE1b]  0  j=i<<=kbޙץ,,stHʈcbhH ʈpoophMm X RQtPsh`bhH          $"0"N$"9"2030N1%(N$)/PO,N1%1765AX125H0mpC10,R10C20,R:C,R10C10,RtuHzC10,R10C20,R10: : HPLOT C, R + 10 TO C + 10,R 0:C10,R10C20,R10:C,R10C10:::"WOULD ANYONE ELSE LIKE TO PLAY?(Y OR N)";N$\)N$"Y"C20:OK0:NO0:T0:P0:200,"":"":"THE GAME IS OVER. GOOD BYE ";P$6"PRESS RETURN FOR CATALOG":A$:::(4):(4);"CATALOG":(23)PO,127N$N$"E"6100NLLIE SAYS THAT YOU WERE TERRIFIC!! ";P$:5000iT17ĺ"WILLIE SAYS YOU DID A VERY GOOD JOB.....";P$T17ĺ"WILLIE WANTS YOU TO PRACTICE SOME MORE, ";P$"WOULD YOU LIKE TO PLAY AGAIN?(Y OR N)";N$"N$"Y"C20:OK0:NO0:T0:PP1:9104'03.C20,R60C10,R60C,R50C,R40C10,R30>8CC20GW370b`C10,R10C20,R:370zjC,R10C10,R:370t2:C9,R33C1,R33y3~C10,R25:C9,R26:C8,R27:C1,R25:C,R26:C1,R27:1500TNOOK0T15T16ĺ"WI(23)360(M0::: GRAPHICS/RVZ16336:I15:SOUND(Z)(Z):IfOK111065vOK131120OK141130OK151140OK151150$C10,R30C20,R30C30,R40C30,R50&1070)C10,R30C20,R30:C30,R5::P11Į:P0{14:"WOULD YOU LIKE TO KEEP PRACTICING WITH THE SAME KIND OF QUESTIONS?(Y OR N)":N$:N$"N"ĺ::200N$"Y"ĺ"ANSWER Y OR N !":920:SET GRAPHICS MODE:H((1)5)1H4950HC20:OK0:NO0:TO:T11000:T:::37793" HERE IS THE CORRECT ANSWER"e4W1ĺX"+"Y"="XY:M0:T13000:T:3775W2ĺX" X "Y" = "XY:M0:T11500:T::::3776W3XYĺX"-"Y"="XY:M0:T13000:T:3777W3XYĺY"-"X"="YX:M0:T11500:T:3773)100)(P(2)10)P(1)?&W1IXYOKOK1:T1500:T:1000h'W2IXYOKOK1:T1500:T:1000(W3XYIXYOKOK1:T1500:T:1000+W3XYIYXOKOK1:T1500:T:10000"":"":NONO1:MM1:M25632"WRONG, TRY AGAIN"34LX)X:30)"----":C$(YX):LC(C$)m~W3XYĺ34LX)X:29)"-"34LY)Y:30)"----":C$(XY):LC(C$)yJ1LCPO2033J:2000P(J)N1%J543JLC11PO1895J:2000P(J)N1%J543I(P(4)1000)(P(Q)1:X$(X)& tY((1)Q)1:Y$(Y)J uP(1)0:P(2)0:P(3)0:P(4)0:I0W wLX(X$)d xLY(Y$) yW1ĺ34LX)X:29)"+"34LY)Y:30)"----":C$(XY):LC(C$) {W2Ģ24:12:X" X "Y" = ":C$(XY):LC(C$):500&|W3XYĺ34LY)Y:29)"-"0, YP0ĺ:"TYPE IN YOUR FIRST NAME ";P$G Z:"TYPE YOUR ANSWERS"} [:"OR TYPE 'E' TO CHANGE AN ANSWER":T13000:T ^935 e:"OR TYPE 'E' TO CHANGE AN ANSWER":T12000:T h :SET UP NUMBERS rW2S0XS:X$(X):372 sX((1)E FOR AN ADDEND.(5 TO 999)"g CW3ĺ"CHOOSE THE HIGHEST NUMBER YOU WOULD LIKE TO WORK WITH.(5 TO 999)w EQ$:Q(Q$) FQ5Q999ĺ"":320 J:W2ĺ"CHOOSE THE HIGHEST NUMBER YOU WOULD LIKE FOR THE FACTOR.(2 TO 12)":Q$:Q(Q$):Q2Q12ĺ"":33 TO PRACTICE ONE OF THE MULTIPLICATION TABLES?(Y OR N)"A N$V N$"N"S0:330l N$"Y"ĺ"":285 ":"WHAT MULTIPLICATION TABLE (2 TO 12)":S$:S(S$) (S2S12ĺ"":290 )330 6 @:W1ĺ"CHOOSE THE LARGEST NUMBER YOU WOULD LIK10:"WOULD YOU LIKE:"/ :10)"1 ADDITION"M :10)"2 MULTIPLICATION"h :10)"3 SUBTRACTION" :7)"OR 4 TO QUIT "  "CHOOSE 1,2,3 OR 4 ";W$ W(W$) W41580 W1W4ĺ"":270 W23109 :W2ĺ"WOULD YOU LIKE :8 WILLIE WORM'S MATH GAME BY HELEN TUFTS WDECEMBER,1980 48K SYSTEM GRAPHICS BY HELEN TUFTS,MATH PROBLEMS BY MARLYS NEWCOME,JAN,1981::5:5)"***WILLIE WORM'S MATH GAME***":"TYPE IN YOUR ANSWERS AND PRESS RETURN"       LL! کLH8ưhHiRhi`**D  XPRW  > v   qZZy^ yy^HP[0H[HHP\I\HH`H% HHâ Y(YPYpYvY|YYGI   .      .  0 . < ,`L-PY `(Y0 Y&" ~Y@PY(Y1 L* Y, Y" ~Y@PY Y L*ćЕ`HYi8 `@Y8i`hh [@A j )  __ w_  _Lz " zJJJJ"xNx+% pL@ < X2 Lzp,08l+JJJJ I٠**<%<(=о<Y<<Y<&,YЍ`J>J><& <&3*!!!!500000000%%%%%%%''ofBhxz eZlzKOeeeeػceػc@eceof&&6z" P;Z :(>`"xUR8ޥՎ(#A!!U!Ld!xՎ湭: 808`OR!!!!!!!!!R! !!!!!(P*ЪP @ @ @@ @@ @@ @ @ (P*ЪP*FTbp`@A'א詴! 綐}! 綐 `i:`40,40,40,40,30,50,50,50 O_ 40,40,40,40,40,40,40,40,40,40,40,30,50,50,50 ` 20,10,0,-10,0,10,20,30,40,50,40,30,50,50,50 a 60,70,60,50,40,50,60,70,60,50,40,30,50,50,50 b 40,30,40,50,60,70,80,70,60,50,40,30,50,50,50 W0,50,40,40,30,50,50,50 KZ 80,70,60,50,40,30,20,30,40,50,40,30,50,50,50 ~[ 40,40,40,40,40,40,40,40,40,40,40,30,50,50,50\-20,-10,0,10,20,30,40,50,60,50,40,30,50,50,50] 20,20,30,30,40,40,50,50,60,70,70,60,80,80,80