' +JJJJ ?\>m0M='+l> /+l  H d@hLҦ L~ L  ﵪ*i BB䵊嵰`72µ- i ư&( Rp s P  LLʬLoō 鷎귭෍ᷩ췩緈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)*++`NG8`0($ p,&" ۿ ۿڿL흍ٿ vLQ  !"#$%&'()*+,-./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((*!!.<,$94>94="4; +,E!r ; $ Hh Լ ռ ռ ռ`HJ>݌h Hh݌`DF DF /L\HIHHHHhHH݌hHhHh݌H6 VDP (FD Z $0x8x D- ܸDD# H8`?F Vk *f???0xF Hh D#-FFF8` D ܸx D - ܸx8`-0ݩ?ʥD FFF`   LDcpq` [` ~  L IH  /JJJJ"LL뷩 ᷩ췩 ɛ LDLSAVBPILOCUNLOCIBPIBPIB`Ӝsqu`".Q`pNФbptťܥm2<(-Py0\|e<6e< ~ vL~ JJJJj귍hI  aUL@ kU8  L  ^R(jQ0l^l\  OÌȌ`W ԧ H h@ [_ /QSIR4b_L`LLLL`ª`LQL߼YLeLXLeLee ўQ0 L&RE;BY; Ꝥ$`( 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׭Lܫ &RL &QL d L4 We)n `@-eff L f`L . tQLѤ LҦL` OPu d L Ne)noon 8ɍ` ^f\õL ^NR  RΩLҦ\L \ şL_ NLjHv 3h`0h8` [L NС õ`A@` ŵL]Lõ`  \ 濭0 ş  Q ^\lZl^\8  ş Lȟ`fhjõĵ@OAP`u@`@&`QR`F Ls  @DAF@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@ ,\Z[PRR3\ɄSɊ"RQJ(0Fw6. ^-%p 㩠RP.Q I* P\L˵B̵C8pB߮Z\ @ յյ\BIR Z-^ Jp\IZLLӜv  ̠@跻~!Wo*9~~~~ɬƬ~_ j ʪHɪH`Lc (L ܫ㵮赎 ɱ^_ J LsL Q(`贩紎 DǴҵԵƴѵӵµȴ 7 ַ :ŵƴѵǴҵȴµ納贍﵎ٵ്ᵭⳍڵL^ѵ-I `  4 ò-յ!  8صٵ紭ﵝ 7L (0+BC  7L HH`LgL{0 HH` õL H hBL BH [ h`Lo õ ڬL B ڬ LH hB@ յյ [L (ȴ) ȴ 7L L ( L (ȴL{ƴѵ洩ƴǴҵ 7 ^* B0 HȱBh ӵԵ 8 L8 ݲ` ܫ  / / şFD B ߼ / ]ƴS0Jȴ ȴ)  紅D贅F B ƴ  / 0L Ν `ND8HFFhDh N ş`, ŵBѵ`, ѵB8`  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˵̵ֵ׵`LzĪLR E( 8` R` ELRŪƪ`췌 յյI뷭鷭귭ⵍ㵍跬ª 뷰` Lf ݵܵߵ޵ ^`8ܵ i B8` 4L ֵȱB׵ ܯ䵍൭嵍 ` DȑB׵Bֵ  ַ յյ`` Bl şL/Ơĵµ`ڿ8.ڿ.ۿ`êL`õĵ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 x(`# d£àĠz# u`L^ɓI )L_L,0[ Dɠ , J `Ɉ ? 5Lqɕ O 5Lqɋ ? LqɊL6 O ۭ `ɍ ɠɛ@ ک` `ɈL_ɕL_ݦ@Ɋ8&jiАЭJKjFKjJJ[ ݦj 0L0ɋ? P4 `ې/ o 5ۘ omЍЊmЍ , а`mЍЊmЍJ+А * а`a b)N ) Ѝ 0N ۭpdeȭOЅKKe d08$`8Hh``,0 J Щ,  Эލ,ɗ,0ϭ J) - ڎ ڭ"Н B L qrC*D,L,0 ۭ )  )Lک Ѝ LJ6 H h)`JЭjЭJjЭЅЅЅ ) `, 1 ٮ н н8н8нн,..`,L b4L aY"cA !l i aY k l ljk i` + LFG1Ь2 LمFG TLKTFO m`eKKLTOL`2<>37921ٮ Ь L  PRTW_,./ W^*Ќ+ D`#`# ` إ") EFGH` '(") 췧") 츈") 즆` ")") 췧` 츈` I;J7Ko(` I9J5Km'` ɽ ` ` ` Y9` Y;` ʛ ` a# L_ح)0ЅH) H  q HLHL`kH'  "  HHА k LӢ ` `Е ` DȱE`н`н נD +ӥ, آ ` נ KNmk; j '9 i+ [m cL ש L > 6,  Ր` Ր 6, + No[; j (9 i+ [o HLL ש"LӅj L 6 , B 4 ,$l k lj ֩j YL >L L$l ֥j(`$l0 k ꩀl` =") _ h }Lַ{L֥L` No >  L` Nm >  L` ANm ˚ Ш} :`8` No  IЧ :`8` Y 6,  tՐ` tՐ 6, + e "hh`L 6 ڭg ɀ` q @ ЍL  q<8~5")   0L`")  N ސLB`L `-].") ސ LB`")7 _ g ~Lָ|L֦LLG .((((((((((((((((((((((((((((((((PPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPUUUU3333~|xp`@?pKE!!>0:҅K҅L`YY*Y*YY` LHH   $(,048< $(,048"&*.26:>#'+/37;?#'+/37;? $(,048< $(,048"&*.26:>#'+/37;?#'+/37;? $(,048< $(,048"&*.26:>#'+/37;?#'+/37;?rJuu`ebaibrayby`Fr8r`ebaibr8ab`80pr80p8`p`p``aȱa`a`aȵa`  r`ab`LLL( @S3333LLLLLLLLLLLLLiLELLLLLLLLLLLLLNLuLLLLLLLLKLL`LL lAKE%3#3 GAk ACANCEO M* Т IK L L, MLl B``Dc~IiI.9 Xɝ, ,. -l.H h0`̽.ʧ` 00  . .ІLK `ˠ Ӡ                     U,T\\*\QK%]N]I1KNK`?>=hIhJIJIE) I)JJJJshIbIa) aJJJ)r hIesIJб?>IJH=(lIBϦc0abr eaebJvvv`ab 666 LQЅPRЅQU,.0ȩTPJJJ Ӆ`mP)VӅ^ ӽӅ_`Y^%__Y8`)P\V\*\҅K҅L`^  Y_ TPLݤ`,.J,T\\*\QK)K,U\\*\QK)K`],. J,'&ԭ)(ĥ#А"А %А$А'Э&)Э(  #Э" %Э$ 8`"н*Н&`$Q1P`S ӎPЍQЌR`Ӣ橘Ӣ L L L ݢPFbeabdaeqq҅K҅L\rYsbs0/X+^`_],. J,U,T\%]QKK\bssX&^`_%\,. HJ,U,ThQKKqa0L T`e`/Ќ0`1Ќ2`/Ь0ЅKL^_KX[``$0$ 0$$U`"Ь# ӅXӅ^&Ь' Ӆ`Ӆ_K$8K$ІeWKmZed(8eddX`^%_^ ݤVR VVRULݬ_b)8XYa eabm^aba`aam^'m_(` m`ʊJJJri Y0`Y8`iVarbW aFbeajFbeaj` qrC*t  67fg[ I ;66[`4ɠ0項OІCC B[f)@f)?O BBC`RS/Ь0 RS1Ь2ІU 8[KH(KAKmZ9$А42VVR m`e0 #А"аVVRҦ789 gff[ȱf I `fg ȱfȘeffg`U ӅX ө[ i  ` 67 pJA`A  JJJ[@`'UA! U)@ i #L  L r a*jfHH Ih)?i . h "j# "Ll ! ;j)@ b4Rj# dR 좂jj[Ћ``@CO ݥ UY8XX ӤXNYMM,. J,U,TKMNL` 6A@ L 6 a9AC@B 0IFCBB;B)@25ЊHB ` h C8 ȱԩCBLL` C LB @LC B@ @ L` ݦAi UY8XX ӤXNYMM,. J,U,TKMN eq Z b!")$k0[ 쥑0c/ y٪Jj 'Ff ,<l bA O&?^&FG _& C!$k0 b B "L`)3,3ɏ 0 a b) PLG)`2` ` e Z t 췁 $k0- 쥑 !b_ a^ L e Z  츂 $k0/ 즒 1b\ 1"] L NoH . L NmH  èth0LZ L Z + +L `  e $"0 ٥") ") ")- ") _ g ^") _ h L צ-.&DE %཰፞ά፟ k DȱD LݺᩀӢ + !r `` DȱDL  췱 Z$k0 췁 $ 0 Ѝ`DȱD` D D D`-  e ΄ ש& LB` L 즍 N 6,  ސLB`?H ש өk hН שkL` ڭ ) $l0 i +٭, ѩՐ ^ ; < ` e  8`ЅfЅgЅh` IЊKfh` ^ )*;L$c0 ,{ |k(FD` eq--3 k4 lL1<lL3<l` o aUU#V%W'X)` צ-.%DE %ީMZi(ލ4ލAލJޮІN,а: ӤMӆdIVӆeY ޤYȦdIVe NNMhh,T`M,а҅K҅LY ʤY M`. JUT( (PK(K`,. HJh,U,T(K%VK`Ь ӆZiM ` Nߩ,c  ꩠӢ o +٩l 6j8аL( ݩХ[j . .Цj 0ǩ ` Ѝ`a b`a b`А 8 н9*Э8ЭЩЩЅ@ `A O__..Щj`HH ޸ ^hh,T`ojHH , ^7 d#V(PdKPCSUd_Gr:#?#!#A -#-Fp#A @ArJ@r@r@r zAJzIE FUN TIM DESKTOP MANAGE COLLEGE BOUN BLACKJACK CHALLENG ELECTRONIC JUKEBO ZONKER EVIL EY HANGMA MEMOR_ CLASSIFIED SPELL.EVASIOMREAD HELG6' ?2  ? Op PRIN INSIDE COVER PAG ABOUT THIS ISSU DISK ARCHIVE TECHNICAL NOTE INFORMATION PLEAS READER SURVE1 QUIT UPTIM TO THE EDITOR.. EDITORIA NEWS AND VIEW TECHNIQUES FOR THE I ASK THE APPLE WIZAR INTRO TO DOS 3. APPLEFLIGHT REV-_;8` s? k_;8` s,_98` s? j_98`"  d` sz'*\5J9: \9z(*\7J;: \; 8`} x ` UPTIME DEPTS PROGRAMS ADS > H = HELP 1>Vx1K ABOUT..( HEL MIRR mХ8de 8噅YӅ_IY ^%_^IYeK҅LedMeeeNYM\.M\%_W1KWK\M\K\M\%^W1KWK杦 j` РLK  Ki8H sJ5K7L9M;NKh sI!HHHIIIhhh`H h`K `K`K EK`$008e-)`Ɣ08e攥œ唐 sJK*_; 8`` ` sI9J;!" ІV ЅӅ^I8Viiny8eН $p' sKM+_7 Х8` `` m$07 w oȱƞ8eީ jЩ` @J) 76 *0"ɍ " :K @ɥKi >󩀅 67 ,I`, `)JJ & & f)`" sJ;K_L`L`L-LEL9 ` w rs $p s({ , ' MNW)~M 9$PF%8 K eK  eMMNN L v 'Lozu mРȱ "LjH ЪJj s'Ff s.h p s v sЌ e!,`HH Щ;<9:p hh`   Ơ)杤(ƞ0 ƅ v󤄦g0 L|H h /0 4Ƅ0 4 4 "`ʆe 23` Цhh * d`HHH $) ,)їΈhhh` jХ/H0H愩 gh0h/ L \ } r Q Hw Hf pЩ oƅ Щ Lv \ w򩫠 0  wЍJ Щ[ H Lv } rK pЩJ p` '  w 󠀩` @ \L \0 + :` \ } rEF H Щ 󄄈# *,H h 'L`l+ć`aR扢<6\ gL:Lۅ/0   G   g` v`, G g` \ } H r HȠ H H r H H% H9 H?\iHHLWLLLLLvLHLoLrL}LwLLL\LL+LLLL:L4LLLL4LLCLL* Li,i  4`@ xׅ Щ Щ gЩ $))_H 6L LЄ aЭ%y, P'c xC3@w@A@ccrxoc?=|w` @@{o?}}wI! ٠ 8``KDžL K KL`Lٍٍ `L3fq=|sww8|n>@8Gw=*@*TrEXE BLQ*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*ua8oc?~? P*U|=D& `awxoS }I*J$=P*@*UrKell&&8aqbq`=]aeIIeJJ`ЍР Ј MsxNM&NMJNsxѩ `n nЩ, a bI)0P@ ` 0K ٠ ٠ ٩/xx ٮ Щ~xxՀపƂ pᰘՀ‡Հ Հ泪ဨdz ՀՀvcۏϏ ՆՀ{yp߳ ԕՀ ՀՀӃ  Հ㪀𱁑ߓ Հޞ Հ`bс ꂪꂪꂪꂪꂪԀԀǗ΄ ՀǪÁɀಾ ՀՀ       fff~f~ffff66nfffff<<8  8  >Հψތ Հ ՀՀ fff\>ff>f>`|ff|f||f6|6||f~`<~`<>fffff f>ffffn666>fffffff>f>|ff|`f|`   6 <<f>f>f><<>fff>f>>>><vf|f|ff~ffff 8003f66f6fN666fn~vfvff>f>6f6f<0 ffff<f<fff666Nf &2>DJPV\6$l~l~l~>l?6 68l<f\   [<[>`0 00ff~````>>0><>f<f<>0 0  b&,28 DJP \bhn z ".4@FLXdjp|  *06<B NZ`lx~ >;3>33?33<33cwkcccc37?;3333333;n;n333? 3333333C[[[333333  >?>`0?~??~?~ ??)/!?? ?!!!? ՀՀӃ Հ઀ $).6666~~X~3 363^3^[<[ ? 0 73;  0?0033?00?03? 333>0   3 ;;>3?3333333 3&+05? INX]bg qv{ %*/4>CHMRW afkpu !fLa`0f`3f00fL13f`@qLcrLLxpCxpo`a@a"|=|wKelly, PublisheProgramming by Lane RoatMousTrap Windows(tmby Micheal Hoffma Print to slot?ESC cancel \ System ErrorPlease turn disk oveInsert a bootable disCOVER ?`fG=QQWWTR:A17:D$(A,QQ)D$(A,QQ1)::HTRTR1:f ==--------------------==g == Error Trap Routine ==--------------------==8N == SCAN THE DATA BASE ==XX ==--------------------==fTR9999A1TR:B17:B5:1:BP$(B);D$(B,A);:868::WW1900::: ==--------------------== == DELETE FROM LIST ==  ==--------- ==--------------------==+TR9999f:16:LN$:17:1:39):17:1:"Printer Slot?: ":LN$17:17:Q$:Q$(27)5690:Q$"1"Q$"7"5590:D$;"PR#"Q$::PR$:0A1TR:B17:BP$(B);" ";D$(B,A):B::A:D$;"PR#0"::D M$"y"M$"N"M$"n"54705hM$"N"M$"n"5445KrTRTR(A$(27))|:16:LN$:"Do you want to enter another? [Y/N]..";:M$:M$"N"M$"n"5030(M$"Y"M$"y")5445:5500 ==--------------------== == PRINTER COMMANDS == ":LN$nJA17:A5:1:BP$(A);:868::A17:A5:(BP$(A))1:A$:M$A$:A$""A$" "A$D$(A,TR1)OD$(A,TR1)A$:AA2(M$(11)A1)6(M$(27)):T(A$(27))5490^:16:LN$:"Check the data. Is it correct? [Y/N].";:M$:M$"Y"eviewing memo .":LN$;:17:A$:A ==--------------------==a == ADD NEW MEMOS ==" ==--------------------==@TRMRĺ:17:"Sorry, the all records are filled! ":A11000:: E:16:LN$:"Enter data on lines above. MEMO ==, ==--------------------==:TR9999@dA1TR::A"-"D$(1,A);:868:::"Review number [ RETURN exits ]? ";:WWWW1WWTRı:A17:A5:1:BP$(A)D$(A,WW);:868:!:16:LN$:"Press RETURN when done r䮠䮍Ӎޠ͠Πޠ퍨蠨ũŠ͠ΠӍ͠Π宍Ӎ͍ή􍱵ްӍԠԠ宠ԍŠ̠ǠŠ͠΍Ԡ宠          ,294,295,296,297,300,301,302,303,306,307,308,309,312,313,314,315,318,319,320,321,324,325,326,327,330,331,332,333,336,337,338,339:::1002:(1101)6ĺD$"BRUN LC.CONV"12:10:"One moment please..."10:110:500:1000: LM350:TX$(LM):M44,14,245,19,246,33,255,24,258,36 7 271,38,277,35 1,26,5,38,15,5,41,4,43,11,54,34,79,34,125,26,134,26,184,11,202,8,244,37,270,11 1,2,82,83,84,85,192,193,194,195,212,213,214,215,230,231,232,233,250,251,252,253,282,283,284,285,288,289,290,291)Z061:X:TX$(X)SP$(TX$(X),2):/4$ 28,4,44,6,56,6,57,20,65,29,69,5,71,28,72,6,73,32,92,23,96,36,111,12,115,7,132,9,135,24,140,28,146,21,148,7,151,28,154,7,158,4,158,11,163,27,163,34,179,10,179,30,181,17,206,14,221,33,223,19,224,39,244,5,2"SL$"7"ĺBEEP$:1050,CD$;"PR#";(SL$)<$(9);"80N"H)Z0LXe3(TX$(Z),1)CL$ĺ:1085q8TX$(Z)w=BCD$;"PR#";0:620Z038:X,Y:TX$(X)(TX$(X),Y1)","(TX$(X),Y1):Z012:X,Y:TX$(X)(TX$(X),Y1)":"(TX$(X),Y1):er between ";LA$;" and ";HA$;":";:IN$:O IN$"a"IN$"z"IN$((IN$)32)h IN$LA$IN$HA$700 IN$CA$ĢMS:16:"CORRECT":620 MS:8:"The correct answer was ";CA$:620 768PT:4:" What slot is your printer in?";:SL$:SL$"11050( IN$BK$IN$UP$ĺBEEP$;:625= CC0:ZX101k (TX$(Z),4)ES$(TX$(Z),4)QST$CCCC1 CC2XZ:Z0:X0X0  CC2XZ:X0X0 :535' LA$(TX$(X),5,1):HA$(TX$(X),6,1):CA$(TX$(X),7,1):PT:4:"Choose an answHDR$Ĺ34,0::HD$(TX$(X),5):(40(HD$))2);HD$:2:Z039:DS$;::34,2:690b cCTX$QST$700 lCTX$ES$CTX$QST$ĢM1:H1$;:PT:1:38);" ";:PT:6:"Press SPACE BAR to continue:"; qIN$ vIN$EC$1000 {IN$SP$690 }IN$"P"IN$"p"EXT" xCD$;"READ SAT.TEXT"1 X0LM:TX$(X)[ TX$(X)EF$LXX::TX$(X1)(13):XLMa r CD$;"CLOSE"| 2000 X0::2 X0LX (TX$(X),1)CL$ī600 TX$(X)   XCTX$(TX$(X),4) ]CTX$EF$1000O bCTX$X$(LM):MS22:PT23:M124 ES$"?EOS":QST$"?QST":HDR$"?HDR":EF$"?END":CL$"?":EC$(27):SP$" ":HELP$"?":PRSC$(11):BEEP$(7):BK$(8):UP$(11) CD$(13)(4):DS$"-" (H1$"ESC - Menu Up Arrow - Prior P - Print" c nCD$;"OPEN SAT.TРzFb#? "Р  ˮˮʠ ˠŠ ˠŮؠ ϮĮĠ ϮͮĠ ؠ ! ΠŠ  ͮàؠҠΠŠ ʮ̠ʮ̮à ʮ̮Ԡʮ̮ǠBҮӠ ŠĮؠŠĠ ԮԠ&àخؠ àؠͮΠŠͮŠ  ӠĠӠ ̠ ӠҠŠɠ ˠŠŠĠ РҮؠРҠԠ̠;Ҡî֠ ˠ ŠҠŠԠӠŠˠӠ䮍Š©éĩũ썿Š宍ޠ宍Ӎ䠨蠨ũ䠧򧭭Ӎ͠Ӡ䮠ޠ蠠ޠӍ讠䠧򧭭宠ޠޠĭӠޠލޠ宍Ӎޠ䮠ޠ䠧讍ޠԢŠ卧姠䠧ޠ姠򮠠ޠ򮠠򮠠ޠ宍Ӎ䮠ԠŠš堧䠨󮠠宠ޠ箍宍ٮӍӭ䮠Š٠宍Ǡš䭭ޠ򮠠ލ宠쮠宍Ӎ쮮뿍Ӎ٠Š箠ޠŮ姍ԍŠ宠孭ԠŠӍ٠©éĩũ䍍ͯŠ䮍ޠԠ٠Š䮠ޠޠލӡޠԠٍŠ䡍ӍŠԮޠ ũÍӠ©éĩũ䍿čéĩ©éĩũԠ©éĩéĩũ卿č̠©éĩũ卿č̠ĩũ卿芩éĩũÍӠ©ũ卿芩éĩũ卿Ҡ©é©éĩũōҠ©éĩŠލ٠箠쿍Ӎ٠΍Ӎ̠ލÍŠޠޠ䮠卧姠ޠ󮠠ޠԠŠ򮍿ӍŠ©éĩũ堨򮠠殠ޠޠŮӍӠ©éĩũōӠŮޠ宠ޠ퍨ލԍ宍ӍĠ©éĩũÍĠ䮍䮠ޠ宠`tl H- P0 H- Z6 H- P0 H-l H- P0 H- Z6 H- P0 H-l" D( H+ D( P6 D( H+ D(l" D( H+ D( P6 D( H+ D( l D( H- D( P0 D( H- D( l D( H- D( P0 D( H- D( l Z$ `( Z$ H- Z$ `( Z$ l Z$ `( Z$ H- Z$ `( Z$ l 6" <$ 6" D- 6" <$ 6" l 6" <$ 6" D- 6" <$     3 9"@&D+L-D+ &rrrrrrrr "+&9-&  D9- " &+3&&&&LLLL++++333"3-&-&9&-&9"9 V"D9++---fV"D"3"3"9"9 9@L9-r-@LDV@33D VD9 +" -&fVD 3 9"@L9999rrrr@@@@LLLLD9DVDVV@@LD@<93ZVLrrr f f Z"Z&V"@ 9"9&9"9&@"@&@"@&9"9&9"9&r"r&r+r&V+VVL V"Z&V"9"Z-"$"$"$($"f(Z&V"P"LD&r"f fr-f+`&Z&VL+"  L V&  ` frrDD+ LL0 "PP3"L @ 3 && &9999-&V LZD66L"Z"VV"V "Z&f+l-f+D+@&D+L-V3Z6V3V+V"fZPL&LLLD<rZL99<<<rZDDLLLVfLV+ZrV""ZrfxZ$$fxrrr<DHD-+-39"<$9"f `2+"  3+"   &9 &""+&9-&  D9- " &+3&&&&LLLL++++333"3-&-&9&-&9"9 V"D9++---fV"D"3"3"9"9 9@L9-r-@LDV@33D 7 Viking TechnologiePlaying ->Press [ESC] to canceance`KEBOX.. TELEMANN FUGU PRELUDE  MUSIC BOX DANCE1 QUIBQn(_^P }(fffU-e7G#MBOX,A$8000Electronic Jukebox v1.Written by Lane Roat(c) 198   `HHHȱȱi暠 hhhIȱ` ;MJ ;ɑNJ‘hhh,00,0,0MI@$Pp 0 00Ɲƛ P,0HHHL#NIpPOU ` ELECTRONIC JUKEBOn ABOUT JU5  Ѕԅ: K𩾠 H𠀩` Q gЩ1 ? L? g`ʊ:L '  ɠ  ࠒ   <` gЬ( dL? ' D@F  g K𩻠 H𥓤 H Hrs  dL?@ ! ` '  p   𮍍亍𮠠뮍ӠϠ٭ͮŠ٠ӠϠ٭嬠󮠠󺍍ݠ箍έŭѬ嫫󮮮à؍宠󮠠 ЀZZ[Y9 烰 ¢݁     V$ l+ l$ V `  `$ H H ` `$ H$ `$  ` L L& `0 `& L `& $ `0 H `$ H$ H$ V  ` L L& `0 `& L `  `$ H H ` ` H `$ $ `0 H$ H `$ ` H $  l V `  ` H  ` L L& `0 `& L `& $ `0 H H$ `$ `$ H$ `$  l V V$ l+ l$ V `  `$ H H ` ` H  ` L L& `0 L& L `  H$ 9 9 H H 9   l V 9 $ 0 9 0$ H$ 90 0$ $ 9$ 0 $ 0$ 6 + $  H 9 0 $ ` L @ 0& L0 @& 0 @ H 9$ $ 0 9 0 $ 0$ H$ 90 0$ $ 9$ 0 $ 0$ 6 + $  H 9 0 $ ` L @ 0& L0 @& 0 @& H$ 90 0 $$ 9$ 0$ $ `$ $ `0 H$ H `$ ` H $  l  `  ` HV `  `$ H H ` ` H  ` L L& `0 L& L `  H$ 9 9 H H 9   l V V$ l+ l$ V `  `$ H H ` `$ H$ `$  ` L L& `0 `& L `& $ `0 H `$ H$ H$  H 9 0 9 $ 0 9 0 H 9 0 9 $ 0 9 0 H 9 0 9 $ 0 9 0 H 9 0 0& L0 @& 0 @& H$ 90 0 $$ 9$ 0$ $ `$ $ `0 H$ H `$ ` H $  l  `  ` H  ` L L& `0 `& L `  `$ H H ` ` H `$ $ `0 H$ H `$ ` H $  l V `  ` H  ` L L& `0 `& L `& $ `0 H H$ `$ `$ H$ `$  l V V$ l+ l$ )U H 9 0 9 $ 0 9 0 H 9 0 9 $ 0 9 0 H 9 0 9 $ 0 9 0 H 9 0 9 $ 0 9 0$ H$ 90 0$ $ 9$ 0 $ 0$ 6 + $  H 9 0 $ ` L @ 0& L0 @& 0 @ H 9$ $ 0 9 0 $ 0$ H$ 90 0$ $ 9$ 0 $ 0$ 6 + $  H 9 0 $ ` L @  P D H < H V D P ` P V H V l P ` r `ؐl`VH<HD6("$(0+0+V H- D( P0 D( H- D( l D( H- D( P0 D( H- D( l Z$ `( Z$ H- Z$ `( Z$ l Z$ `( Z$ H- Z$ `( Z$ l 6" <$ 6" D- 6" <$ 6" l 6" <$ 6" D- 6" <$960(9@96--0-P"0(6-0(Z$6-906-`(90@690lllHH<H6@<+<+<6<0<+($""$($+lllPPDP6@D(D(D$D(D+($"$(-0-(0-( 9 9 r9 r` P D H P 9 P 0 P 9 D H P V 3 < H 6 D- 6 9 6 & 6 & - 6 9 6  $06 0-6 9$6 @&6 9$6 09$@&9$H09@96DHDP@H@9HPHZ$($"(-(0(-($-0-6$-0-("060-$6 Z6 & Z6 `9 Z6 l@ Z6 `9 Z6 & Z6 `9 Z6 l@ Z6 `9 Z6 $ Z6 `9 Z6 P0 Z6 `9 Z6 $ Z6 `9 Z6 P0 Z6 `9 Z6 " Z6 `9 Z6 P0 Z6 `9 Z6 " Z6 `9 Z6 P0 Z6 `9 Z6 r ` P D P V P 9 P 0 9 D P V P l Z H 6 H L H - 6 $ - 6 D H D L 6 0 Z6 P0 D9 P0 Z6 P0 l( P0 V6 P0 D9 P0 V6 P0 l( P0 V6 P0 D9 P0 V6 P0 l- Z6 `9 Z6 PH Z6 `9 Z6 l- Z6 `9 Z6 PH Z6 `9 Z6 P l- r0 l- `( l- r0 l- P l- r0 l- `( l- r0 l- L Z6 `9 Z6 l- Z6 `9 Z6 L Z6 `9 Z6 l- Z6 `9 Z6 - Z6 `9 Z6 PH Z6 `9 Z6 - Z6 `9 Z6 PH Z6 `9H- Z$ `( Z$  Z$ `( Z$ H- Z$ `( Z$ l" Z$ `( Z$ D- Z$ `( Z$ l" Z$ `( Z$ D- Z$ `( Z$ `" P0 Z6 P0 D< P0 Z6 P0 `" P0 Z6 P0 D< P0 Z6 P0 Z$ H< PD H< D- H< PD H< Z$ H< PD H< D- H< PD H< Z( @6 H< @6 P@ @6 H< @6 Z( @6 H< @6 P@ @6 H< @6 `( P0 Z6 P0 D9 P0 Z6 P0 `( P 6" l @& H+ @& L0 @& H+ @& l @& H+ @& L0 @& H+ @& x <$ @& <$ H0 <$ @& <$ x <$ @& <$ H0 <$ @& <$ x H+ P0 H+ V6 H+ P0 H+ x H+ P0 H+ V6 H+ P0 H+  D( H+ D( P6 D( H+ D(  D( H+ D( P6 D( H+ D(  `( l- `( P0 `( l- `(  `( l- `( P0 `( l- `(  Z$ `( Z$ FF$" INSTRUCTIONS"4 ((B$)40B$" "B$" ":40N 2(B$)40B$(B$,40)T <q FR(1):(16384)12870 PA$:A(A$):16368,0:A96A123AA32 Z dR(1):(16384)128ı n(16384)128ı x54915::(4)"CLOSE"F$".INST":::21S IN LINES 2, 20 & 21 FOR NEW PROGRAM K "PRINT U/C",0::T$;::950:n "PRINT U/C",0::T$;::950: R(16336)(16336): F$"BJ.CHAL":FF$"BLACKJACK CHALLENGE": 104,64:16384,0::(4)"RUNBJ.CHAL.PROG": TF1:T$(A): B$________________________________ THANKS TO DAV HOLLE FOR HIS PACKER/UNPACKER ROUTINE. THANKS TO ROGER WAGNER PUBLISHINGFOR THE USE OF "TOOLBOX SERIES" AMPERSAND ROUTINES. ________________________________( 16384:160: CHANGE PROGRAM NAMEV7(175)256(176)46:(637)223į"PRINT U/C",1________________________________ BLACKJACK CHALLENGE COPYRIGHT (C) 1987 PAUL M. ZELMAN 739 TIFFT STREET BUFFALO, NY 14220 WRITTEN: 18 JAN 87 ________________________________       ꨠ ݝ Հ'ŀ *& ¢݁   Āߟ ՀƄǀƀĀʈԀ ЀȠЀ π　ȇ Р䤀 ΀   Ƞ€ :  Ԁ ¢ ܬ  Հ    Հ'ŀ!* D[Z\YةÀäАࠢԔ瀀ǀđ Ā ߟƄπđݝ݀Ȉ âȀɀȀ　ĀʀшǤǀ㧧 Ո耫Ȁ　܀݀Ȉ߀Рܬ Ä Ą Ѐ  Ȁ     ^_eQ_ ȱ^8e^^_ , l^ưȭ氩L8ˍ`w16%H6^ȥ7^h67ɾa^6ȱ^7L<2H<)۰ AJI0I9YBT$(J):(T$(J))40ĺiCJF2JI9oDE130:A8A10A11A21325FI1ĭA10A21325GI10F2ĭA8A11325HIA10A21II10:321Jh:1,0:145W:(4)"READ"F$".INST":"INPUT",A$:A(A$):TF025:20:22:17:A$;:T$(0)A$23:17:I1A:"INPUT",T$(I):(T$(I),5)""F11:F2I1:IA:23:17:"Done";:300"23:17:I;:23:17,(0)15:JJ:110:::(4)"CLOSE"F$".INST":1A89A78230P:A78Ĺ16297,0:16304,0:"PRINT U/C",0:"AMP":1:1:21w:30:T$B$:9::34,2::F1132022:6:"Loading..........instructions.":24:" (Press any key to skip instructions.)";:3:16368,0:20:(4)"OPEN"F$".INST":BLOADPACK.UNPACK.OBJ"::(4)"BLOAD",F$".PAC"|230,32:0,0:1,97:24576:16301,1:16297,0:16304,0:360::950:420:16297,0:16304,0:16368,024:1:"Do you need instructions? [Y or N] [";:T$"N":8:"]";:2:170:A13A78MP": 150. 20:::230,32:62450:: 10:" This program incorporates portions of The Toolbox Series, a copyrighted product of Roger Wagner Publishing, Inc.":I13000:-23:8)"Just a moment, please...":"PRINT U/C",0:1::(4)"0d 24:2:T$"ESC":9::" to play ";:T$"ARROWS":9::" page through text";:2:1:70:A27ıx 54915:::210 :(4)"CLOSE" 54915:::I(218)(219)256:J(222):216,0:"PRINT U/C",0:"ERROR #"J" HAS OCCURRED IN LINE #"I"!":"AՀ ̌ Հ 瀪Հ򀀀Հπ׀𰀀񀀪ՀʀՀϿ秧߀  Հ쀀  ՀՀ  Հ̀怀ՀÀ矀 ՀՀ𰱀 ƀ ՀՀπ   Հ ̌ ၁  瀪 Հ ÿ 倀π ׀Յ ՀϿ!ǟ߀Հ 5KKG Hр5 Հ  Հ　Հ Հ　Հ ̀ä ՀՀ  怀վՀ 繹󀪪Հ 　 π ՀʀՀϟ׀ 憀Հ 쌌ހ ̀Հ怀Հ򀀀Հ񀀀 Հ𳀀ϏՀՀ̀ÀՀ̼̀ကՀ󜼜ՀḀ  󳳁̌倀πՀՀ怀ހ Հ ῁ 󀪪憀Հ՗Հϟϓ׀Հ a?GKK5ՀՀ𼜜𜜜𼜜𜜜 ՀՀ򮠠ﬠ䍢墩򮠠컍쮍󠭭蠤󮠠򠲱򠲱䮠蠲컠썠󍠠䍠썠占򠲱䮍䮍庠􍠠򍠠䮍䮍䢠䩠宍󍠠占䠢墠占򮍍堭􍠠󮠠占占䮠占䮠占捠 󩮠庍򠭠򬠨宍栲䠢뢡묠򮍍󮠠젱讠򮠠栲嬠򠲱󠭭䮍𮠠Ჰ󠭭󠭭䠭󠭭          5Ҁ Hÿ  矀 Հ ՀÀ怀Հ Հ  ____";:1527,159::16303,0M "[?] or [/] displays these instructions.": "[S] allows you to play the cards alreadyin your hand. (Stand Pat)": "[H] instructs the dealer to deal anothercard to your hand. (Hit Me)":R"[D] doubles your betuble down":A(3)68:PH(CU,1,1)PH(CU,2,1)235< CU2235N BT(2)0235u TX$"P":9:" Split pair";:A(4)80 12:1: 34,0:35,19::1:1:TX$" INSTRUCTIONS FOR GAME CONTROLS ":9:34,2:20:1:"___________________________________):A96A123AA32" nA10A81 sA11A21@ xA63A47F } :"CLEAR",A(0):21:TX$"S":9:" Stand pat";:A(0)83:30:TX$"?":9:" Help":A(2)47:TX$"H":9:" Hit me":A(1)72 PH(CU,0,0)2235 SC(0)BT(CU)235. TX$"D":9:" Do"SOUND",20,20:# <"SOUND",0,0:6 AR12:60::\ FR125:A(16336)(16336)::| KE12:70:"TONE",0,10:: P"TONE",25,1;20,1;25,1: U"TONE",255,10;0;255: Z"TONE",I10,5: dR(1):(16384)128100 iA$:16368,0:A(A$)256:J(222):216,0:"PRINT U/C",0:"ERROR #"J" HAS OCCURRED IN LINE #"I"!":"TONE",54,10;0,1;54,10:"AMP": "PRINT U/C",0::TX$;::950: "PRINT U/C",0::TX$;::950: 16368,0:2039,107:100:16368,0:2039,160: I13000:: 21@ (175)256(176)46:950 BLACKJACK CHALLENGE COPYRIGHT (C) 1987 PAUL M. ZELMAN 739 TIFFT STREET BUFFALO, NY 14220 WRITTEN 18 JAN 87 :(4)"BLOADSUPER.SHAPES,A2049":232,1:233,8:1:0:1000:510000n ::12:I(218)(219                    䠢ľӠ۫򩮍ʮ̠Πʮ̮Íʮ̮ԍʮ̮ǍˮˮʍҮӍ宍ӠӮӠ䮠ݠ䮠򢍍󠭭䠭ۿݠۯݠ宍ݠ䮠ݠ䮠墍ݠ󠲭󠶬󠲭堲堷󠳭堲蠵󠲭蠶󠳭宠䬠쮍䮠欠뮍宍婮嬠䬠宠䬠00ECC1:900:s:::62450::4:0,0:62454:6:0,00,158278,158278,00,0:1,107277,107:136,1136,106X10:Y8:I1(PL$):J((PL$,I,1))20:71X,Y:JX,Y:YY11::X146:Y8:C$"APPLE":I15:J((C$,I,1))20:71X,Y:JX,Y:YY11:I(11)0E(11)E(11)1:E(0)E(0)10:E(1)E(1)1:1535]E(0)21EC(5,0)E(0):EC(5,1)2:1560 E(0)21DH(0,0)2EC(5,0)21:EC(5,1)26:1560E(0)22DH(0,0)5EC(5,0)E(0):EC(5,1)24:1560EC(5,0)E(0):EC(5,1)E(0)@C52C0:700:170CUQU:1400:CU0BDH(0,0)0EC(5,1)2:E(0)0:1560"CLEAR",E(0):N1DH(0,0):DH(N,1)1E(11)E(11)1:E(0)E(0)11:1530DH(N,1)9E(10)E(10)1:E(0)E(0)10:1530E(DH(N,1))E(DH(N,1))1:E(0)E(0)DH(N,1)3E(0)21EE(7)1E(8)1EC(CU,0)E(0):EC(CU,1)22:1460gE(0)22PH(CU,0,0)6EC(CU,0)E(0):EC(CU,1)25:1460E(0)22PH(CU,0,0)5EC(CU,0)E(0):EC(CU,1)24:1460EC(CU,0)E(0):EC(CU,1)E(0)"CLEAR",EC(0,0):QU14:"CLEAR",E(0):BT(QU)0151)E(0)PH(CU,N,1)YE(0)21E(11)0E(11)E(11)1:E(0)E(0)10:E(1)E(1)1:1420E(0)21EC(CU,0)E(0):EC(CU,1)2E(0)21PH(CU,0,0)2EC(CU,0)21:EC(CU,1)26:1460E(0)21E(7)3EC(CU,0)E(0):EC(CU,1)23:1460-E(0)21E(6)1X$"Y":8:"]";:12:1:16368,0A100:A89A13A781310P(A13A89V2x"CLEAR",E(0):N1PH(CU,0,0):PH(CU,N,1)1E(11)E(11)1:E(0)E(0)11:1415}PH(CU,N,1)9E(10)E(10)1:E(0)E(0)10:1415E(PH(CU,N,1))E(PH(CU,N,1))1:E(0:16302,0:12:" Press any key to begin.":L16301,1::LXXX(CU)5:YYY(CU)1:32:33X,Y:XX26:33X,Y:0:29:XXX(CU)6:YY1:43X,Y:1: 34,19::34,0:22:1:" Does someone else want to play a game?":12:"[Y or N] [";:T925V6DK(0)DK(0)1 =(1)1į"PRINT U/C",1:\(1)2į"PRINT U/C",1,I:q"PRINT U/C",0:34,0::16368,0:J0:K1:I12:JJ1:L(1):(16384)127Ĺ16368,0:16301,1:I2::I1:J35J0:(0)50:KK:K11015,1020I240,102I:(0)50:<4:245,J50251,J50:I1500:c I152:DK(I)D(J):JJ1:J53J1%:I152:D(I)DK(I)::::62450:DK(0)0:SHSH1:SU18:VD(C)V13SUSU1:VV13:905V1DK(0)DK(0)1:925V10DK(0)DK(0)1:W::"Press any key to cut cards at the line.":16368,0:I52101:3:245,I251,I(16384)128I101Ē0:245,I251,I: (16384)128I101Ē4:245,I251,I:I52:16368,0::JI50:I101:IJ11:0:40,50I240,50I:3:40,10268,01:21:" 1 - Shuffle again 2 - Cut & deal 3 - Deal Which [";:TX$"?":8:"]";:12:1100A$"1"A$"2"A$"3"750:A$"1"710A$"3"ĉ:62450:DK(0)0:SHSH1::62450:K0:3#I5211SJD(I):D(I)D(((1)52)1):D(((0)52)1)JKK:15(50K),I50215(50K),I50:(0)50:I125:0:266I,51266I,102:3:65I,5165I,102:0:14I,5114I,102:3:215I,51215I,102::34,20:1634:46128,Y:69138,Y:49148,Y:16297,0:16304,0:I110:(0)90:30:::62450:"PRINT U/C",0:"AMP":103,1:104,8:2048,0::(4)"BRUN SHELL"::62450:34,21::16:"Shuffling":I152:D(I)I::715 ::34,21::16:"Shuffling"ld you like to play another game? ":23:12:"[Y or N] [";:TX$"Y":8:"]":12:1:16368,0e100tA13A89A89A7866034,19::34,0:A89100401300:34,19::34,0:A8910000F:62450:48:72110,90:16:73167,90:0:Y11:16297,0:16304,0::35,24:DK(((40(C$))2).5):K:C$;:X:22:1:" Do you want to end this game? ":23:12:"[Y or N] [";:TX$"N":8:"]":1]100bA13A78gA78A89605l:A78ı54915\22:1:" Wou and instructs the dealer to deal one last card to your hand. (Double Down)":"[P] splits the pair into two hands, places a bet on your second hand and instructs the dealer to deal a second card to each hand. (Split Pair)"100:34,0PH(I,0,0)034159-M I3EC(I,1)26BJ(0)BJ(0)1:3415a-R I2EC(I,1)26BJ(1)BJ(1)1:3415-W :EC(5,1)26BJ(2)BJ(2)1-\ - PH(CU,0,0)5E(0)213515. LPH(CU,0,0)3:KBT(CU)L::22:TX$" "(PH(CU,0,0))" CARD WINNING HAND! WON $"(KT(CU)0:K((CU2).5):LS(K)LS(K)1:2500:BDCU:2200::, :22:LBT(CU):TX$" BUSTED! LOST $"(L)". ":4000:9:(0)70:10:BT(CU)0:K((CU2).5):LS(K)LS(K)1:2500:BDCU:2200::, I14:EC(I,1)23EC(I,1)22EC(I,1)21, :-H I14:CU:2200::^+ :22:LBT(CU):TX$" TIE HAND! THIS BET IS RETURNED. ":4000:9:(0)85:10+ BT(CU)0:K((CU2).5):TI(K)TI(K)1:SC(K)SC(K)L:2500:BDCU:2200::+ :22:LBT(CU):TX$" LOSING HAND! LOST $"(L)". ":4000:9:(0)70:10:,! B1:WN(K)WN(K)1:2500:BDCU:2200::N*T :22:EC(CU,1)23L3BT(CU):2915p*Y EC(CU,1)22L2BT(CU):2915}*^ LBT(CU) +c TX$" WINNING HAND! WON $"(L)". ":4000:9:(0)60:10:K((CU2).5):SC(K)SC(K)LBT(CU):BT(CU)0:WN(K)WN(K)1:2500:BD:2610 )d A13B$B$A$:2610-)n PL$B$:s) 4:YY(5):LDH(0,0)11:XX(5)(16(L1)):30X,Y::DH(0,0)0:) :22:LBT(CU)2:TX$" BLACKJACK! WINS $"(L)". ":4000:9:(0)65:10&* K((CU2).5):SC(K)SC(K)(BT(CU)3):BT(CU)0:BJ(K)BJ(K)ease.)":B$""a(2 24:1:">"B$;:TX$" ":8:868:16368,0:100:(A64A91)A13A8A1272620k(7 2610(< A$(A):(B$)0ĭA13A8A1272610(F (B$)9ĭA127A8A132610(P (A8A127)(B$)1B$(B$,(B$)1):2610)Z A8A127B$""5:"? USING"," 0";BJ(1)::" * Dealer had "BJ(2)" Blackjack";:BJ(2)1ĺ"s";]' ".":' 4:XX(CU):LPH(CU,0,0)11:YY(CU)(10(L1)):30X,Y::PH(CU,0,0)0: (( 21:1:" Type in your name then press [RETURN]. (Nine (9) letters or less pl13:"Wins";:23:"? USING"," 0";WN(0);:35:"? USING"," 0";WN(1):"Loses";:23:"? USING"," 0";LS(0);:35:"? USING"," 0";LS(1)R'~ "Ties";:23:"? USING"," 0";TI(0);:35:"? USING"," 0";TI(1):"Blackjacks (*)";:23:"? USING"," 0";BJ(0);:3"You have shuffled "(SH)" deck":SH1A$A$"s"d%o A$A$".":"CENTER",A$:8:B$"":RD1B$"s"%t A$"You have played "(RD)" round"B$" of":"CENTER",A$:"CENTER","Blackjack Challenge so far."&y 11:"More Statistics";:22:PL$;:34:"APPLE":)10:XXX(BD):YYY(BD):DB(1)1DB(1)42S$ 7:DB(1)X,Y:XX6:41X,Y:(0)80:$` :::"CENTER","Blackjack Challenge Scoreboard":3:$e PL$"'s total = ";:"? USING"," , $.";SC(0)3%j "APPLE's total = ";:"? USING"," , $.";SC(1):6:A$0PH(CU,0,0)):PH(CU,0,0)PH(CU,0,0)1:PH(CU,PH(CU,0,0),1)V:PH(CU,PH(CU,0,0),2)SU:4:39X,Y#7:30X,Y:VX,Y:(0)50:SUX,Y:#41400:E(0)21İ3200#9#17:4:XXX(BD):YYY(BD)1YY(BD)7:43X,Y::1:($2200:DB(0)BT(BD):DB(1)BT(BDPH(CU1,0,0)2:PH(CU1,2,1)V:PH(CU1,2,2)SU:4:XX(CU1):YY(CU1)10:39X,Y:30X,Y:31X,Y:(0)50:":22:TX$" DOUBLE DOWN ":4000:9:BDCU:CU3SC(0)SC(0)BT(CU):2010"SC(1)SC(1)BT(CU)]#BT(CU)BT(CU)2:2300:1600:XX(CU):YY(CU)(130X(CU1),Y(CU1):VX(CU1),Y(CU1):(0)50:SUX(CU1),Y(CU1):K((CU2).5):SC(K)SC(K)BT(CU):BT(CU1)BT(CU):BDCU1:2300!v1600:XX(CU):YY(CU)10:4:39X,Y:7:30X,Y:VX,Y:(0)50:SUX,Y:PH(CU,0,0)2:PH(CU,2,1)V:PH(CU,2,2)SUj"{1600:H(CU,PH(CU,0,0),2)SUK 4:39X,Y:7:30X,Y:VX,Y:(0)50:SUX,Y:: l:22:TX$" SPLIT PAIR ":4000:9:4:30X(CU),Y(CU)10:7:PH(CU,1,2)8X(CU),Y(CU):VPH(CU,2,1):SUPH(CU,2,2):PH(CU,0,0)1:PH(CU1,0,0)1:PH(CU1,1,1)V:PH(CU1,1,2)SU!q0,0):XX(5)(16(O1)):4:40X,Y:DC0O1Ĕ30X,Y:31X,Y:(0)50:1760|7:30X,Y:DH(O,1)X,Y:(0)50:DH(O,2)X,Y :22:TX$" HIT ME ":4000:9:1600:XX(CU):YY(CU)(10PH(CU,0,0)):PH(CU,0,0)PH(CU,0,0)1:PH(CU,PH(CU,0,0),1)V:PX112:Y116:C$"DEALER":I16:J((C$,I,1))20:71X,Y:JX,Y:XX9:bN14:BT(N)01745}BDN:2300:CUNİ1100PH(N,0,0)01745CUNN1DC1İ4100:1745N2N4İ4300:17454200:DH(0,0)01765JYY(5):O1DH(=~'BT(3)SC(1)BT(3)BT(3)10:10110='SC(1)SC(1)BT(3)::22:A$"Apple bets "(BT(3)10)" chips - $"(BT(3))".":"CENTER",A$:2300:10:='DC0:RDRD1:"CLEAR",PH(0,0,0),DH(0,0):F12:H152:1600:H510160P>'PH(H,0,0)F:PH(H,F,1)V:PH(H,110080???????.------->???????..,.,-6?*--',-.,., 166&! ;3& $$36666#$$$$$$36666666&#$$$$$<2666&#$<2$ 7+-.)7'?'<?*-+ 57;?>>6%%%-55><<>>. 5775-,,.,25?<75-5;><<<6)2'7?'),<,<<''??>66 !$$$$ 0666666 !$$$$$$$4 266666& $$$,26& --:??---5???7---5??- ) )-:??;??-------5???????7-------5;??;??- ) )5??*-- 266 $$$$$ 666666 $$$$$$,2666666 $$$$$$,666666 $$$$,266 )??*--???7---5?;7 )7+-?? .,->779>. 9,,557?>..%%? 9<,,55757=:'' )>7)>.>-- ''%'%')557575; -5;.>.>>''' 175757)-(<,<,?5) 666%$$, 9>>655- ?*-???*---?????*-----???????*------->???????.------->???????.-------????7 )-???6 16`I 1N]u+J h/:Qh  CWm+K]kmr.?Wh";Plh 66%$$ 6!$$66 ),557777-- ),55?*.>>''$ )>?*->7--5;-% ??.-5575;''% ).>>''%'%')55     l^ưȭ氩L8ˍ`XHALLENGE COPYRIGHT (C) 1987 PAUL M. ZELMAN 739 TIFFT STREET BUFFALO, NY 14220 WRITTEN 18 JAN 87 :(4)"BLOADSUPER.SHAPES,A2049":232,1:233,8:1:0:1000:510000n ::12:I(218)(219^7L<2H<)۰ %ʊ [ >${ = ک; ީ ڢ0 $. *媆 gݥ 9 r륢H #h 4\NEF- ,00 *$,XǘP$,ȱ8# ! =ۥ % ,;LL lݠA$PL$" has no money left!":10410[C(TX$" "PL$" WINS! ":A$"APPLE has no money left!"C(4000:8:23:"CENTER",A$:10::16297,0:16304,0:650+AMPRESTORE AMPERSAND.TBưȱ`>? USINGPRINT USING.TB { lݠi R %;:TX$"ESC":9:" to reset totals or quit;":4500:12:1::A27Ĺ16297,0:16304,0:600dBx(10050B(K5172:"TONE",K,5;0,1:B(21:SC(0)0SC(1)0TX$" NOBODY WINS! ":A$"Both players have no money left!":10410#C(SC(0)0TX$" APPLE WINS! ":(G14:BT(G)010320IA2(CUG:1100:EC(G,1)EC(5,1)İ3000:1100:10320qA<(EC(G,1)EC(5,1)İ2900:1100:10320AF(3100:1100AP(:CU0AU(CU14:PH(CU,0,0)0İ2500AZ(:CU0:DH(0,0)0İ2700Ad(2400:SC(0)0SC(1)010370YBn(23:4:"Press ")X,Y(@ (1515:EC(5,1)24İ3600:10325@(EC(5,0)17İ1600:DH(0,0)DH(0,0)1:DH(DH(0,0),1)V:DH(DH(0,0),2)SU:XX(5)(16(DH(0,0)1)):YY(5):4:40X,Y:7:30X,Y:VX,Y:(0)50:SUX,Y:10250@(EC(5,1)2İ4600@(1500:3400:EC(5,1)21İ3300A(:(0)50:SUX,Y8?'::1515:EC(5,1)26İ4400:10270[?'M14:CUM:PH(M,0,0)010230w?'1100:M3İ3700:10220?'3800?'1100?':CU0:BT(1)0BT(2)0BT(3)0BT(4)010325@(XX(5)16:YY(5):DC1:7:30X,Y:DH(2,1)X,Y:(0)50:DH(2,2F,2)SU:XX(H):YY(H)(10(F1)):4:39X,Y:H3Ĕ30X,Y:31X,Y:(0)50:10180~>'7:30X,Y:VX,Y:(0)50:SUX,Y:10180>'DH(0,0)F:DH(F,1)V:DH(F,2)SU:XX(H)(16(F1)):YY(5):4:40X,Y:F2Ĕ30X,Y:31X,Y:(0)50:10180?'7:30X,Y:VX,Y  .,.,.,.,2%.,2%..65.6.66;,<'<$'<<<<<> 7'7'77775%? ??????*------>??????------575  %<6>><2777777'7'><>><>><><><><2'><2'>>67>6>66 )<,%,$%,,,,,. 5%5%5555?-;------:??????.------??????7578$5>7??<!'%')-55<56>'%'%#-<'- 8??75 57575757??<,<,<,<,7555 %%'%'%?;.>.6'%'%'%'%/ 57575?7-5?-56 %'$ ,<2?$75619?.$-<66%$$%')<75-:7166):??'%+-8'),-8')$$(<,<766>$$ $7666>$$$$76666---%$$$$$<36'$$$,665757 ?? $$-<'-8??65-%%'%'%'-8?...>'%'%'%'%/ 577?6 :??'%'%'%'%' (%?,!)>.>.>.>.;,<,<,<,<'%;$76576.$,)0.6%$$$<666< $$66757??<,<,<,< --6+-,<,??7666.$$$$ 57?-:?<,<,<,< --.>.+-,<,??75757575/ %;<<+-.? - ? - ? - ? - ? -5!>.>.>.>.>.>.>.>.>.>.>.>.>... 175757)%%'%'%; 1716-%#$$2'*->.>'%'-'%%%..>+-.>.??'%'%'%'%/)-.>. 7??<,<,<,< --.'%'%/)5557575;>?'%'--+- :??'%'%'%'%/)---9?66'$$%'%/)--/-5757??<,<,<,$$$$$$$$())))))))))))1666666666666666$$$$$$$$$$$$$$$,6+%?,%?,% ??? --? "<6'<6'<6#$$<26&#<*.+----%;???')--%;?')%;> 6$$ 666$5.-<'-<'-<'-<'-<'-<'-<'-<'-<'-<'-<'-<'-<'-<'-<'?- ' ? - ? - ? - ? - ? - 66666666666666666666666666!$$$$$$$$$$$$$ 66666666666666.,.$ $$$$$$$$$$$ 8?,-5266666:.-< $$$$$$$$$ 5%52622662.,.$ $$ 5%56666626:.,.$ $$ $$$$$ 5%-5?666666666666.,.,"$$$$$$$$$$$$$$6666666666666. $$$$6.$$$$$$$$$$$$$$,66666666666666.$$$$$$$$$$$$$$,66666666666666.$$$$$$$$$$$$$$,66666666666666.$$$$$$$$$$$$$$,66666666666666.$$$$$$$$$$$$$$,66666666666666.$$$$$$$$$$$$$$,66666666666666.$$$$$$$$$$$$$$,66666666666666.$$$$$$$$$$$$$$,66666666666666. $$$$$$$$$$$$$?7--)))))))))->????7---)))))))-->??????7----)))))--->????????7-----)))---->??????????7------)----->???????????7)----------5;??????????6666666666666!$$$$$$$$$$$$$ 66666666666666.$$$$$$$$$$$$$$,66666666666666.$$$$$$$$$$$$$$,6666666666666;?7-- )->?;?7--- ) -->????;??7----- )---->????????7------------>???????????7)----------5;??????????------------>???????????7----)---)--->?????7---)))-)))-->??7--)))))))))->??7--)))))))))->????7----)))))--->????????7-----)))---->??????????7------)----->???????????7)----------5;??????????------------>???????????7------------>????;????7----- ---->???;???7---- )--->???;???7----- )---->????;??7--- ) -->?????7----- )---->????????7------------>???????????7)----------5;??????????------------>???????????7------)----->??????????7-----)))---->????????7----)))))--->??????7---)))))))-->????7--)))))))))->????7---)))))))-->???66.$$$$$$$$$$$$$$,66666666666666&!%'%'%'%'%'%'%'%'%'%'%'%'%'------------>???????????7------------>??????????7----- )---->????????7---- )--->??????7--- )-->????7-- )->?;?7-- )->?;?7-- )->??77..6?76%,-$,%%%$<<<$$<<<'$$$$5666.$$$$56666$$$$$5666666655566>>>76?7--$,6.%9'-%?'-%? $$$< ?<$$$$$$$56666665%<,<,<,<,<,<$66666666666$ )>.>.>.>.>.66666665757-$$$$$$$$$$$$$$,66666266.$$$$$$$$$$$$$$,666662666.$$$$$$$$$$$$$$,666666266$$$$$$566666666666666 $$$$$$$$$$$$$,2666666666666 166666666666666%$$ $$$$$->.>.>.>.>.>.>66666575757-$$$$$$$$$$$$$$,666666662666.$$$$$$$$$$$$$$,66666666626666.$$$$$$$$$$$$$$,.?.5?.5?.5?.5?.5?.5?.5?.5?.5?.5?.5?.5?.5;.6 16666.5556>55-,,<'?-? 6 $$,66& $$,6366$$$$$666666$$$$$$<2666666 $$$$$$366666&$$$$<266 16666626%$ $$$$$5666666626%$$$$$$$$,666666666.$$$$$$$$$$,57575757575757575>.>.>.%$$$$$$$$zi$J$ $JDD?UUGJKPTGG//'#)(*%$$$$HYj~w_|jW_?z~yyrrd^J\T@^Hb"%%e%%eQAAQQ//NAQ$~{w_>z}s{wwoo/OVTVVDo/o/o/o/o*(*Udd$xo'!~}{{wwooomX*U*oU@@ UXXllz@CA@@@AACOABB@@$~$c *Jb7<Lo U(+(~>[oqH$AA$HypA}}RRQ "J p~x@F@ ? vyo_?NNYg2LS~(*** AAOA@@ |g}c@ @U_U[[U*zzx{jkkyku|}~GQUppHH3C$~g~W_~vvv~~~}yueU@U{8  wttU_U[[UJKJKJ;{{;[k{34'g_?}w|r *bb"1 I 1oC@?^U"~~"oyzo?-.|uv1UUU )@@@ UTTSV~$%$%%$*Q+Qww}~x!r((r!ypplh)E`4?ooOo???_/Wk}u~z~~Z??*?~ z~z~UAQQQUUU(8~ ?/kz}~/Wk}uz~-)-%!-)~z~z ~* *@@``* (oMyuz}OII$$$D ETT ()(()ii)}~~p@@IIIL~om}O$ -,,...>**|jz |    !!! ! ! 󡡡򿍍䍍䍍 ЮϮɍ Ӎˮˮʍ󮠠箍ˠō嬠뮠宍亍ˠōʮ̍ʮ̮Íʮ̮ԍʮ̮ǍҮ G& 42739,0:42740,166:0:::1002?:(4)"RUN BJ.CHAL"E _ `` (0 Z`нй`)JJ & & f)`  (0 Z` H  ` ` ` `h$``ɀ쬠ɠӠ堳Ӡ宠̠Ӡ宍ӨӠ䠤ﺠҬ㮬󮠠㮠㮠宠캠ծӮ䠢󢮠㮠堠젱宍卍쮠宠宠䮠ﮠ宍䠤ЮϮƮЮϮ̠ϺŠЮϮ䮠ŠЮϮɠɠ忍󠨳󩠠󠠠󩠠󠨱򩠠󿍍󮠠䬠󮠠Ӡ̠竫忍򮮮殮򮮮򮮮箮! !!!!!!!!!"ll@COCAA@@BAB@$~~~H z~UAQQQUUU(8~ ?/kz}~/Wk}uz~-)-%!-)~z~z ~* *@@``* (oMyuz}OII$$$D ETT ()(()ii)}~~p@@IIIL~om}O$ -,,...>**|jz |UHHHDdy}i/?tRi$H! JDDD* * OOOGWSQTU*$$$$XiJyo?{w/_?z|yrrd\T@^J\T%"bBR70uooQY$}{o_>}z}{wwoooOVVTV/o//o/ o(((*$$cx!a/~}{wwwoo`U]U*Uo@ UXXXi c*9E$c  B0}HL/??((`Z((=~=Wnf#O#f~f?a}"#"pURR ~NLq}?p88 ???oyv_??NNBR'fx?CUUU* OGA@@Acxx d @ @[UUTzzJ`{jjjkiyuz}?#*>>>Uzj|`~vv~||:zJ*@*Ux ?8 cb ( [UUDJKJKJ|[{{;[kkK;43'O~~yU*""nI 1 ,Qw??AA""z""_v}w_??G$$O5|3Lgx***UX @@@ UTSR~QQ~UQQ{w{~ |, &~`??oOooO???_/kkuuz~~`*;?*??* z~z~AQQUUUO8~  _Wkz}>okku}~-%!-)-%z~z~z~z~ *@@j``X3v~oku}>O'II$  ( TP Q}*~~@@@II1s{3r~'I嬠Р̭Ϡ̭Ϡ嬠̭ϬРˠà̠ź஠ϠέŠɫ婍Р宠îΠ堮Π宍ààΠ퍍ɠà󍍽󠽽󠽽̭Ӡ󠭠򮍍󠭠ڠɫ뮠έŠ੠Р諫𠭭䍍᩠宍䩠宍󮠠" " " " " """ԩ嬠ɠ根Ԭ