' +JJJJ ?\>m0M='+l> /+l   d]@ŵLҦ]]LF L}BBL] X  ` 鷎귭෍ᷩ췩緈JJJJx Lȿ L8ᷭ緍췩 緍i 8 `巬 췌`x (`(8`I`B` ``>J>J>VU)?`8'x0|&HhHh VY)'&Y)xꪽ)' `Hh`V0^*^*>&` aI꽌ɪVɭ&Y&&Y& 꽌ɪ\8`&&꽌ɪɖ'*&%&,E'зЮ꽌ɪФ`+*xS&x'8*3Ixix&& 8  '  & x)*++`FG8`0($ p,&"ųųೳŪŪųųij  !"#$%&'()*+,-./0123456789:;<=>?   1 '" *"( (9"1 ( ,.(0# 2  /#0/#0 *?'#07#00/0/'#07#0:"4<*55/**5/*%5/)1/)1/)1/)'#0/#0*5/*75/**5/*:5//#0/#0'#07#0:::*::'#07#0"):$(%"%:$(%"%$$2%4%$$2%4%$(2()!)E(!8b $!H(+ "@H !D)"E` @ $ C ` DQ &J80^݌Hh ü ü݌ ռ ռ ռA ļD ļ? ļAEDE?HJ>h Լ ռ ռ ռ`HJ>݌h Hh݌`葠葠ȔЖȔЖȠHIHHHHhHH݌hHhHh݌H6 VDP (ED Z $0x8x D- ܸDD# H8`?E Vk *f???0xE Hh D#-EEE8` D ܸx D - ܸx8`-0ݩ?ʥD EEE`   LDcpq` [` ~  LӜu`".Q`pNФbptťܥm2<(-Py0\|e<6e<g< JJJJj귍hI  aUL@ kU8  L  Q^R(jQ0l^l\  wUuW ԧ H h@ [_ /QSIRb_L`LLLL`ª`LQLYLeLXLeLee ўQH\(h0L& Ꝥ$`( R \ZLl8 ўR HH\`\Z[YS6`LxQɿu3'RͲʎRʎ]]]ɍuL͟ɍ}RLRɍg^H8 ^hZLɍR LͲɊRR% QLܤͲ Z@ -^ ş\[Z QY\[Z8`l6Lş_Ȍb_Ͳ] )Y h( ֭ͲLɍ [LLĦ__ ^ 9 LҦ3 9 a   0LjLY u< (_9 ˭ɠuɠK_9 ?LˆʎõĵL õ ĵµ aµ`` L̦µ_bJLuLz`  ȟ QlXJ̥KlV  ȟ QlV eօ3L e3L &RL &QL d L4 Ne)n `@-eff L f`L . tQLѤ LҦL` OPu d L Ne)noon 8ɍ` ^f\õL ^NR  RΩLҦ)\Z ʽ LHv 3h`0h8` [L NС õ`A@` ŵL^Lõ`  \ 濭0 \  ȟ Q ^\lZl^?cqH şch`fhjõĵ@OAP`u@`@&`QR`E Ls  @DAE@u`8` %@ @A@`@`@A`Mµ ) LЦ`8@AWc@8@-@HAȑ@hHȑ@ȑ@hHȑ@Ȋ@ch8&ȑ@Hȑ@Ah@LHȑ@ȑ@ htphso`hMhL`9V8U897T6S67`INILOASAVRUCHAIDELETLOCUNLOCCLOSREAEXEWRITPOSITIOOPEAPPENRENAMCATALOMONOMOPRINMAXFILEFINBSAVBLOABRUVERIF!pppp p p p p`" t""#x"p0p@p@@@p@!y q q p@  LANGUAGE NOT AVAILABLRANGE ERROWRITE PROTECTEEND OF DATFILE NOT FOUNVOLUME MISMATCI/O ERRODISK FULFILE LOCKESYNTAX ERRONO BUFFERS AVAILABLFILE TYPE MISMATCPROGRAM TOO LARGNOT DIRECT COMMANč$3>L[dmx- ( O Ϡ@跻~!Wo*9~~~~ɬƬ~_ j ʪHɪH`Lc (L ܫ㵮赎 ɱ^_ J QL_Ls贩紎 DǴҵԵƴѵӵµȴ 7 ַ :ŵƴѵǴҵȴµ納贍﵎ٵ്ᵭⳍڵL^ѵ-I `  4 ò-յ!  8صٵ紭ﵝ 7L (0+BC  7L HH`LgL{0 HH` õL H hBL BH [ h`Lo õ ڬL B ڬ LʬH hB@ յյ [L (ȴ) ȴ 7L L ( L (ȴL{ƴѵ洩ƴǴҵ 7 ^* B0 HȱBh ӵԵ 8 L8 ݲ` ܫ  / / ED B / / ]ƴS0Jȴ ȴ)  紅D贅E B ƴ  / 0L Ν `HD٤DEEhiHLGh ` ŵBѵ-` ѵB-` ܫ XI볩쳢8 DH E𳈈췍Ȍ X0 · JLǵBȵC`,յp` 䯩 R-յյ`յ0` K R-յյ`ɵʵӵԵ` 4 K ( ѵҵLBȱBL8` DBHBH : ַ޵BȭߵBhhӵԵ RBܵmڵ޵ȱBݵm۵ߵ` 䯩LR˵̵ֵ׵`êĪLR E( 8` R` ELRŪƪ`췌 յյI뷭鷭귭ⵍ㵍跬ª 뷰` Lf ݵܵߵ޵ ^`8ܵ i B8` 4L ֵȱB׵ ܯ䵍൭嵍 ` DȑB׵Bֵ  ַ յյ`굎뵎쵬 뵎쵌``õĵBCõĵ`µµ`L õBĵCصص Qƴ0"Bƴ 󮜳` 0۰ϬBƴ8`i#`ЗLw!0>ﵭ` m ﳐ 7i볍 8 ЉLw`H h ݲL~ `浍국䵍뵩嵠Jm赍嵊mjnnn浈ۭm浍浭m䵍䵩m嵍`"L ŵ8ŵH ~(`  d ֠z# u`ժժՊ x? 8` ժժժ   ժժժժՂ py ?@s ժժժժժՂ p? @ac ?@sLq@ ԪժժՊ `?~ap>pnqLc~ P Ъ   ժժ `?p?  ժժժ @~``~s~pc~ P*U*U*U*U ժժժ p 3 `syaxx ժժժ   ժժժժՂ p @ ԪժժժժՂ p? @sc 3@LqL Ԫժժժ `?~ap>pnqLc~ P Ԫ   ժŪժ `?p?  ժժՊ `~``3~s~pc~ @*U*U*U*U ժժժ p  `syc??|yA ժժժ   ժժժՂ  @ ԪժժժժՂ p 3c 3@LqL Ԫժժժ `9f` `0n0@c ~ UPP Ԫ   ժժժ @  ժժՂ `|``3~c~p|c~ @*U*U*U* ժժժ p ? `syc?@|yA ժժժ   ժՊԪՂ  @ ЪժժժժՂ 0Nq ?xc?@|yO Ԫժժժ `9f` `0n0`a f (U*PT ժ   ժժժ   ժժՂ `98``3^A6`xA< @*U**U* n_@]ŠȠҠhdedeM]if ijkijkijkijkijkjlm&nlq q_r]"(#]ӠĠŠҠ2#de8rdejfl m&nk`%_ul`%q`%_(#u`%_v`%q`%_(#`%_`%q`%_(#`%_`%q`%_(#f l m&n_`%_#f lm&m&na`8r8r%_b`%_d&c`8r%q`%_hd`%_f&e`8r%q`%_hf`%_h&g`8r%q`%_hh`%_+i`8r%q`%_h_d6?eM6[9dd6?eKM6o P a(ŠĠ)QX]Ǡ٧1YdedeMdedeMZfq[`=>r%_`\`=>r%_`]`=> r%_j^flm&n_`la()o Pa(٠Ү)c[ca(ӠҠǠ٠Š)ca(ǮȠԠҠӧ) 8oa(ӠçϠ)1oa(ӠŠŠҠϠŮ)`.?6@r$d`.?6@r$cccP"a(ԠŠҠϠ٠)`.?6@r%__p]ŠŠŧ2zoPa())oP a(٧ӠǠ)2oPa()o P5X a(ՠŠӠϠϠҠԮĠˡ) ` oP  a d2eb a(ԠŠҠϠԮ) c M6|l `.?6@r%[v _l ]Ԡ KM6 q d6?e o P5a(ҠŠƠ)FE(ĠŠҮ)͠ĠàΠ<(]ΠŠF(QԠҠŮ'P;@r'a@ 'a()([ (]e(]ΠϠŠŠƠΠϠҠŠƠӮ (]F((]ԠĮԮҠӠŮM2(]Ů$~'oa(ӠŠçϠ)1'oa(ӠŠŠҠϠŮ)'`.?6@r$''`.?6@r$'']̠ĠŮ'd6?eM6['d6?eK_' '\'o "'P a(ŠĠ)Q']ŠĠ)\'!8'@p(٠٠ʮ)\'='@p(Π)\'B'@p(Š)\'G'@p(̠)\'L']0V'c@p(ΠŠӠŠԠ)\')`'@p(ԠҠ٠Ġ)\'j']t']Šϱ rlmn' #qT$UVW-rqY^$UVW-rq Y#r$q/? rq/? rq|$_#']Ň'N@"(r\'$']ŠŠŮ#.'o@p(ΠŠ)\'"3'@p(͠q q#UVW'lm'nY #fU#M6a(Π)G]٠٠ʮΠȠΠ٠Šɠ+#UVW'Xlm'nij'kY#f7#qq/? rflmn/#q/?VW@Y d6?eKa()2QԪժժՊ `~ap>pnq|c~ P U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U* KM6a(Πìɬ)a(ƠŠŠ)!d6?ed6?ed6?eUժժ `?p? P ԪժժѪ f` `3n0` f P*U*U*U*U qq\]֠Ӡlu[y]d}]Yn}]ΠϠŠŠƠΠàҠŠƠӮήx}]C}]ԠĮԮҠӠŮ}]>}]͠ĠàԠͤeO[O]ҠGOijkijk lm nlm nO]ԠͤO[0uq-r :uq-r Du`%_Xu+Nuqqq\]֠Ӡ*XuqҠQNlm nlm nghghghghO]ԠͤO[LO]ҠTVOlm nijkghijk lm n)WOlmnijkdO]jkijkijk lmnJ4Nlmnghghghgh 8N]Ԡͤ9N[N]Ҡ4Nlm nijkijk N]ԠͤN[N]ijkijkijk B[(#f/?r]F)#lmnlm nijkijkijk *#['f/?r]7'lm nlm nijkijk '[ N]ҠJ*Nlm niӠŮM]͠ĠàΠ] ɠΠǠϠQ]РŮ`.?6@r$d6?eQҠŮP;@ra@ a()[]Ġԇή]e]ΠϠŠŠƠΠϠҠŠƠӮ ]F]ԠĮԮҠϮoa(ӠŠçϠ)1oa(ӠŠŠҠϠŮ)`.?6@r$`.?6@r$]̠ĠŮd6?eM6[d6?eK_ \o "P a(ŠĠ)Q]ԠŴ(r\]ŠŠŮ!o@p( ɠΠǠϠ)\ @p(٠Ҡ)\@p(٠)\]5c@p(Ӡ͠ӠϠ)\"@p(ҠҠϠ)\]]ŠŮ$]֠Ӡ*qqq\]֠Ӡ[oPa( ɠΠǠϠ)coPa(٠)c]Z]ΠϠŠŠƠΠϠҠŠƠӮή ]4Q]ɇŮN@"ijkl]Ԡͤv[]ҠGijkijk lm nlm n]Ԡͤ[q-r q-r `%_+qqq\}]ˠԧ}QUP}]̠ӠĠŠš٠ŠӠZ}]|d}]ΠϠŠŠƠΠϠҠŠƠӠ٠Ү٠ҮӠ®n}]x}]ԠĮ٠}]e`[}]< }]ůˠŠŠ }]ϯΠ }]٠ (}]ŠŠ 2}]Ǡ٠ <}]ůŠ F}]ӯӠŠ4$f lmnlmnlmn$lm&n $q"$_T}dede0dededededed ed e_}d ed ed ededededeLdededMP#qU#f lm&nGV#ijk ijk ijk ijk Z#_%#]ӯůӠҠH#dedeMde8rdeMde82rdeM$qqŠçϠ),S a(ӠŠŠҠϠŮ)X `.?6@r$v ] `.?6@r$N !b d6?ed6?eKM6[Cv d6?ed6?eKM6o P a(ŠĠ)Q [F M6\2d2e?oa(ҠӠŮM ]͠ĠàΠ ]Ʊ QQ ]ԠҠŮ P;@r a@ a() [ ]Ġԇή ]e ]ΠϠŠŠƠΠϠҠŠƠӮ ]F ]ԠĮԮŠŮ$ oa(ӠŠçϠ)1 oa(ӠŠŠҠϠŮ) `.?6@r$  `.?6@r$  ]̠ĠŮ d6?eM6[ d6?eK_  \ o " P a(ŠĠ)G[ [ ]ɇŮ N@"(r\  ]ŠŠŮ# o@p(ƠŠ)\  @p(٠Ҡ)\  @p(Š)\  ]& c@p(ӠӠ٠)\  @p(ՠϠŮ)\  ] ]j#ki!j#k!i!j#k#flmn lmn,ca(ӠΠϠΠϠ)GR@KM6_n Q _  a(Ʈ)G[ a(٠)G[ a(Ү)G[ a(Ӯ)G[ a(Š)jkijkijk ijkijkijk*ijk!ijk#ijk%Dlm n#lmn!lmn#l!m#n!l!m%n#Qi!j#ki!j#ki!j#k i!j#ki!j#ki! lm nlm#n7l mnij#k ijkij#k*lm nl!m%nijk!*lmnlmnijkQlmnlm nlmnlmnl!m%nl!m%nQiˠ)cBcccccc)Da(ҠҠΠƠŠ)Fa(ӠΠ)GHR@ M6L,oa(Š͠)f7lm'nij'klm'n'ij'k'Dl mn lm n lm#nŠŠ)&2a(ĠӠάҠǧ)"4a(ΠŠϠԠ)(6a(ƠՠԠҠŠŠҠ)(8a(ҠŠŠԬՠ̠)):a(ŠӬԠ̠Š)<a(ΠŠ̠Ǯ) >cccc@ca(Ġ(ŠĠǠŠŠԠ)#$a(ήƠŬҠ)(&a(ĠӠάӠ)(a(ԠŠΠԮ) *ccccc+,S(ȠΠҠԠŠ)&@&.a(ΠՠˠՠנϠ)%0a(ŠƠӠĠŠ٠ԠŠ)&a(͠ҠԠŠĠ)a(ӪŮ)'a(ŠĠӠΠԠ)+a(ĠƠŠŠ̭Ŭ)*a(ŠƠҠŠΠ͠)( a(ŠƠ̠͠ϠŠ))"a+S(ȠΠҠԠŠ)&@a(ŠӠϠ)& a(ŠԠԠŠ)# a(ŠӠΠǠ)&a(ΠŠ͠Ƞ͠Ҡ)a(͠٠׮)'a(ŠƠӠӠ)*a(ŠŠ)#a(ϠŠԠנ)a(ԠӮ)c$a(ŠӠȬҮ)'a(ŠԠӠΠ)&a(ŠԠ͠٠ŠΠ)&a(٠ŠԠӠƠ)a(ŠŮ) ccc+a(Ӡ٠ǠՠŠ)a(κ)c$a(ӠΠԠ)a(à)'a(ҠҠԠŠ)%a(ӠΠΠ͠Ԡ)a(Ġ)%a(ϠӠȠΠ}]}]àϧQAL END ROUTINE.'/16368,0:936:>/16298,0::12032M/12034:10o/10:"* * * THE END * * *":/ PRINT CENTER ROUTINE. /20(CT$)2 /CT$/""// / GIVEN TO APPLE CORE OF SAN FRANCISCO FOR . 1.:CT$"YOU ARE A RACER SKIING":12040L.CT$"DOWN HILL":12040U. l. PAUSE ROUTINE..21:" PRESS THE 'ESC' TO END".22:"< PRESS THE SPACE BAR TO CONTINUE...>".(16384)15512036.(16384)16012024. SPECIխԧQ$(d6?e`$<_#<d6?eKM6Kd6?eQ)@S()'S()'dedeM_@J]^T]ΠϠŠŠƠΠϠҠŠƠӠҠ^]h]ԠĠ٠r]|]κYZ_*`$ UVWYq_D UVWde deMqoPa(ӽ)FAYoP d2e?a(̠ūө)FGd2ec.a(Ӡ٠٠Ҡנ)Gd6?e2(q.?6@r`˽)FH(Ž)FGPa(Ž)FGd6?e`$3`DZ$DZqqPM6/d2e?a(Ġ٠)Gad2ePa(Ž)GUVWPP$bE()GdeKdeMUVW ]Š d6?e`$%\]ŠŠƠ\2\]Š d6?e1deFde(`%de M/`%\]ƠРӠˬˠԡ\2M6Gqa(Ӡӭ]Π͠]\]&`$]ƠנŠΧԠ\]Š\]ԠРנ d6?e,\\]ȠӬŠ\2\ ڧǠԠŠŠӠԠ q  q Wq qqqdqqq,qXq qqXq, $qn .DZq[]Ӡϭ'qq]ԠŠϠKM6]Ҡq]ΠŠӠԠ׬ŠӠŠĠϠӠȠԠĠƠ l]ՠĠΠڽΠŠӠ̠٠ededededeLdede`;]ŠӠҠӠĠӠC`$O4 rD4 rD4 rD4 rD4 rD4 rqO4 rD4 rCO4 rD4 r]ԠРӠԠŠՠ)G $d2ed6?ed6?e .`.?6@r$.d6?e[]Š]ŠŠTdede0dededededed ed e deTd ed ed (Ƞ ՠˮ)-a()-a(ĠˬΠ)-a()-a(ŠӠ΢٠Π٠).a(٠ĮƠՠԠŠԠ)W a(ҠЬՠ̠ŠƠҠ)a(ӮϠҠĠŠӬ)W a(̨)a(ΠŠӠϠŠŠӠ)W a(Ġՠ̠ŠĠӠҠ)aȠήƠŠ)W a(ŠӠŬՠ̠Ԡ)a(ΠҠƠӬǠ)W a(ϠנРŠ Ӯ)a(ӠŠӠӠȠՠ)W a(٠٠ŠӠȠŠ)a(נ)- a(͠ɠӠӠɠϠΠՠ ϠԠ)- a(ԠŠҠà)- a()- a(ՠŠŠΠƠĠҠ)W a(ɠҮϠȠȠ)a(ӠPUTERS WORRY YOU?"B  "ARE YOU TALKING ABOUT ME IN PARTICULAR?"j  "ARE YOU FRIGHTENED BY MACHINES?"  "WHY DO YOU MENTION COMPUTERS?" $ "WHAT DO YOU THINK MACHINES HAVE TO DO WITH YOUR PROBLEM?"!. "DON'T YOU THINK COMPUTERS CAN HELP PEOPO YOU BRING UP THE TOPIC OF FRIENDS?"H "DO YOUR FRIENDS WORRY YOU?"m "DO YOUR FRIENDS PICK ON YOU?" "ARE YOU SURE YOU HAVE ANY FRIENDS?" "DO YOU IMPOSE ON YOUR FRIENDS?" "PERHAPS YOUR LOVE FOR FRIENDS WORRIES YOU."  "DO COMSUGGEST TO YOU?";z "WHAT OTHER CONNECTIONS DO YOU SEE?"j "COULD THERE REALLY BE SOME CONNECTION?"w "HOW?" "YOU SEEM QUITE POSITIVE." "ARE YOU SURE?" "I SEE. PLEASE GO ON." "I UNDERSTAND. PLEASE CONTINUE."% "WHY D"  "WHEN?"1* "WHAT ARE YOU THINKING OF?"I4 "REALLY, ALWAYS?"i> "DO YOU REALLY THINK SO?"H "BUT YOU ARE NOT SURE YOU*"R "DO YOU DOUBT YOU*"\ "IN WHAT WAY?"f "WHAT RESEMBLANCE DO YOU SEE?"p "WHAT DOES THE SIMILARITY NOW?"4 "ARE YOU SAYING NO JUST TO BE NEGATIVE?"Z "YOU ARE BEING A BIT NEGATIVE."k "WHY NOT?" "ARE YOU SURE?" "WHY NO?" "WHY ARE YOU CONCERNED ABOUT MY*" "WHAT ABOUT YOUR OWN*""CAN YOU THINK OF A SPECIFIC EXAMPLE?PEAR IN YOUR DREAMS?"? "ARE YOU DISTURBED BY YOUR DREAMS?"j "HELLO...PLEASE STATE YOUR PROBLEM." "YOU DON'T SEEM QUITE CERTAIN." "WHY THE UNCERTAIN TONE?" "CAN'T YOU BE MORE POSITIVE?" "YOU AREN'T SURE?" "DON'T YOU KE BE?"&D "PLEASE DON'T APOLOGIZE."KN "APOLOGIES ARE NOT NECESSARY."X "WHAT FEELINGS DO YOU HAVE WHEN YOU APOLOGIZE?"b "DON'T BE SO DEFENSIVE!"l "WHAT DOES THAT DREAM SUGGEST TO YOU?"v "DO YOU DREAM OFTEN?" "WHAT PERSONS AP ASK THAT?", "NAMES DON'T INTEREST ME."\ "I DON'T CARE ABOUT NAMES--PLEASE GO ON."} "IS THAT THE REAL REASON?"& "DON'T ANY OTHER REASONS COME TO MIND?"0 "DOES THAT REASON EXPLAIN ANYTHING ELSE?": "WHAT OTHER REASONS MIGHT THER THE MOST?"& "WHAT DO YOU THINK?"U "ARE SUCH QUESTIONS ON YOUR MIND OFTEN?" "WHAT IS IT THAT YOU REALLY WANT TO KNOW?" "HAVE YOU ASKED ANYONE ELSE?" "HAVE YOU ASKED SUCH QUESTIONS BEFORE?"  "WHAT ELSE COMES TO MIND WHEN YOU"WHAT WOULD IT MEAN TO YOU IF YOU GOT*"@ "WHY DO YOU WANT*"^ "SUPPOSE YOU SOON GOT*"} "WHAT IF YOU NEVER GOT*" "I SOMETIMES ALSO WANT*" "WHY DO YOU ASK?""DOES THAT QUESTION INTEREST YOU?"  "WHAT ANSWER WOULD PLEASE YOU ENTERED IN LIBRARY BY LE ROY LARSEN.2E ' CHECKERS 'KCTER GAMES". ADAPTED FOR APPLEII BY ROBERT H. ABBOTT JAN 79z CONTRIBUTION FROM THE AKRON, OHIO APPLE USER'S GROUP THIS PROGRAM GIVEN TO APPLE CORE OF SAN FRANCISCO FOR USE OF MEMBERS BY SAN DEIGO APPLE CLUB, MAY 12 1979 ENTER ROUTINE."20(CT$)2($CT$2&""8(B* P. 0 LAST MOD.SEPT 1979 FOR CONVENTIONS UPDATE.12 PROGRAM CLASSIFIED - PUBLIC DOMAIN -4 ; ORIGINAL FROM CREATIVE COMPUTING'S "BASIC COMPUPRESS THE 'ESC' TO END"H22:"< PRESS THE SPACE BAR TO CONTINUE...>"`(16384)1554636y(16384)1604624 SPECIAL END ROUTINE.16368,0:936:16298,0::46324634:1010:"* * * THE END * * *":  PRINT C TITLE PAGE ROUTINE.63:CT$"* CHECKERS *":4640ZCT$"BY ROBERT H. ABBOTT":4640sCT$"MAY 1979":4640| :CT$"A VERY GOOD GAME OF CHECKERS":4640CT$"TO PLAY WITH YOUR APPLE":4640    PAUSE ROUTINE.21:" USE OF MEMBERS../ V/ LAST MOD.SEPT 1979 FOR CONVENTIONS UPDATE./ PROGRAM CLASSIFIED - PUBLIC DOMAIN -/ / ' SNOW RACER ' /ҠӠŮM;]͠ĠàΠ;]ĠŠ;Q)Q;]ԠҠŮ;P;@r;a@ ;a();[;]Ġԇή;]e;]ΠϠŠŠƠΠϠҠŠƠӮ ;]F;]ԠĮԮŠŮ$v;oa(ӠŠçϠ)1x;oa(ӠŠŠҠϠŮ)z;`.?6@r$;|;`.?6@r$x;~;]̠ĠŮ;d6?eM6[;d6?eK_; ;\;o ";P a(ŠĠ]ɇŮb;N@"(r\;d;]ŠŠŮ#f;o@p(ԠӠ)\;h;@p(٠Š)\;j;@p(Š)\;l;]*n;c@p(ǠŠ)\;*p;@p(ԠΠŠǠ)\;r;]t;]Ъ)a()N;cca()a()a()cD;a(ƠՠԠԠ̠ƠŠӠ)a(Šٮՠ);c ;S(Šՠ٠Ϡ)&@$;`@9()$ `@9()$ .;_`;CISCO BY THE AUTHOR. JEFF FRANKEL...1K LAST MOD. JULY 1979Qd  'HANGPERSON'(79 FOR CONVENTIONS UPDATE.V'b# PROGRAM CLASSIFIED - PUBLIC DOMAIN -]'d# m'f# ' FREUD 's'h#|'h#CC,0::9032&L#9034:10:&N#10:"* * * THE END * * *":V&P# PRINT CENTER ROUTINE.g&R#20(CT$)2p&T#CT$z&V#""&X#&Z# &\# GIVEN TO APPLE CORE OF SAN FRANCISCO FOR USE OF MEMBERS..&^# !'`# LAST MOD.SEPT 19LET FREUD HELP YOU SOLVE IT !":9040;%<# PAUSE ROUTINE._%>#21:" PRESS THE 'ESC' TO END"%@#22:"< PRESS THE SPACE BAR TO CONTINUE...>"%B#(16384)1559036%D#(16384)1609024%F# SPECIAL END ROUTINE.%H#16368,0:936: &J#16298$ $p $(# INITIALIZE.3$*#CT$(40):9034O$,# TITLE PAGE ROUTINE.l$.#3:CT$"* FREUD *":9040$0#CT$"BY AUTHOR UNKNOWN":9040$2#CT$"JUNE 1979":9040$4# $6#:CT$"NEED SOME HELP ?":9040$8#CT$"HAVE A PROBLEM ?":9040$%:#CT$"99,7,106,6u# "PLEASE LEAVE MY FEE ON THE KEYBOARD.":X13000:X:"DID YOU LEAVE THE MONEY?":I$:(I$,1)"N"5000# "YOU ARE HAVING DELUSIONS. YOU NEED "# "ANOTHER SESSION.":X13000:X:$"THAT'S A VERY SANE ANSWER. YOU'RE CURED. GOODBYE." "CAN YOU ELABORATE ON THAT?"A"~ "THAT IS QUITE INTERESTING."u" 1,3,4,2,6,4,6,4,10,4,14,3,17,3,20,2,22,3,25,3" 28,4,28,4,32,3,35,5,40,9,40,9,40,9,40,9,40,9,40,9" 49,2,51,4,55,4,59,4,63,1,63,1,64,5,69,5,74,2,76,4 # 80,3,83,7,90,3,93,6,LE?"8!8 "WHAT IS IT ABOUT MACHINES THAT WORRIES YOU?"m!B "DO YOU HAVE ANY PSYCHOLOGICAL PROBLEMS?"!L "WHAT DOES THAT SUGGEST TO YOU?"!V "I SEE."!` "I'M NOT SURE I UNDERSTAND YOU FULLY."!j "COME COME ELUCIDATE YOUR THOUGHTS.""t ss`ppqqqqppppppqqqqiŠrrrrrri` O  #  - XA E L.XR RB AEMO07 07 07 03 07 0E C6 07 07 0@p88ЯԪܪԪԪЪкЀԠԨܬԨ漘氌漰漼ఘ漼`hsp s &,p8$j,p 07 07 07 03 07 0E C683 07 07 07 03 07 0E C60606B83 07 07 07 03 07 0E C63 07 07 07 03 07 0E C606B06B83 07 07 07 03 07 0E C6 07 07 07 03 07 0E C606B806B83 07 07 07 03 07 0E C607 07 07 03 07 0E C606B8306B83 07 07 07 03 07 0E C67 07 07 03 07 0E C606B83 06B83 3 07 07 07 03 07 0E C66B83 07 07 07 03 07 0E C606B83 07 07 07 03 07 0E C66B83 07 07 07 03 07 0E C606B83 07 07 07 03 07 0E C66B83 07 07 07 03 07 0E C606B83 07 07 07 03 07 0E C66B83 07 07 07 03 07 0E C606B83 07 07 07 03 07 0E C6B83 07 07 07 03 07 0E C6006B8307 07 03 07 0E C606B83 07 07 07 03 07 0E C6066B83 07 07 07 03 07 0E C6006B83 07 07 07 03 07 0E C606B83 07 07 07 03 07 0E C6006B83 07 07 07 03 07 0E C606B83 07 07 07 03 07 0E C66B83 07 07 07 03 07 0E C606B83 07 07 07 03 07 0E C66B83 07 07 07 03 07 0E C606B8306 83 07 07 07 03 07 0E C606 83 07 07 07 03 07 0E C606 833 07 07 07 03 07 0E C606 806 83 07 07 07 03 07 0E C606 83 07 07 07 03 07 0E C606 883 07 07 07 03 07 0E C606 06 83 07 07 07 03 07 0E C606 83 07 07 07 03 07 0E C606 83 07 07 07 03 07 0E C60606B83 07 0706 83 07 07 07 03 07 0E C606 83 07 07 07 03 07 0E C606 83 077 07 07 03 07 0E C606 83 006 83 07 07 07 03 07 0E C606 83 07 07 07 03 07 0E C606 83 007 07 07 03 07 0E C606 83 06 83 07 07 07 03 07 0E C606 83 07 07 07 03 07 0E C606 83 07 07 07 03 07 0E C606 807 07 07 03 07 0E C606 83 07 07 07 03 07 0E C606 83 07 077 07 03 07 0E C606 83 07 006 83 07 07 07 03 07 0E C606 83 07 07 07 03 07 0E C606 83 07 007 07 03 07 0E C606 83 07 06 83 07 07 07 03 07 0E C606 83 07 07 07 03 07 0E C606 83 07 07 07 03 07 0E C606 83 C606 83 07 07 07 03 07 0E C606 83 07 07 077 03 07 0E C606 83 07 07 006 83 07 07 07 03 07 0E C606 83 07 07 07 03 07 0E C606 83 07 07 007 03 07 0E C606 83 07 07 06 83 07 07 07 03 07 0E C606 83 07 07 07 03 07 0E C606 83 07 07 07 03 07 0E C606 83 07 0706 83 C606 83 07 07 07 033 07 0E C606 83 07 07 07 006 83 07 07 07 03 07 0E C606 83 07 07 07 03 07 0E C606 83 07 07 07 003 07 0E C606 83 07 07 07 06 83 07 07 07 03 07 0E C606 83 07 07 07 03 07 0E C606 83 07 07 07 03 07 0E C606 83 07 07 0706 83 07 07 07 03 07 0E 07 07 07 03 006 83 07 07 07 03 07 0E C606 83 07 07 07 03 07 0E C606 83 07 07 07 03 007 0E C606 83 07 07 07 03 06 83 07 07 07 03 07 0E C606 83 07 07 07 03 07 0E C606 83 07 07 07 03 07 0E C606 83 07 07 07 0306 83 07 07 07 03 07 0E C606 83 07 07 07 03 07 0E6 83 07 07 07 03 07 0E C606 83 07 07 07 03 07 00E C606 83 07 07 07 03 07 06 83 07 07 07 03 07 0E C606 83 07 07 07 03 07 0E C606 83 07 07 07 03 07 0E C606 83 07 07 07 03 0706 83 07 07 07 03 07 0E C606 83 07 07 07 03 07 0E C606 83 07 07 07 03 077 0E C606 83C606 83 07 07 07 03 07 0E 06 83 07 07 07 03 07 0E C606 83 07 07 07 03 07 0E C606 83 07 07 07 03 07 0E C606 83 07 07 07 03 07 0E06 83 07 07 07 03 07 0E C606 83 07 07 07 03 07 0E C606 83 07 07 07 03 07 0EE C606 83 07 07 07 03 07 006 83 07 07 07 03 07 0E C60 6C E0 70 30 70 70 70 38 6006 83 07 07 07 03 07 0E C606 83 07 07 07 03 07 0E C606 83 07 07 07 03 07 0E C606 83 07 07 07 03 07 0E C6606 83 07 07 07 03 07 0E C06 83 07 07 07 03 07 0E C606 83 07 07 07 03 07 0E C606 83 07 07 07 03 07 0E C         ˠ PG K(LOCK U(NLOCK N(EW D(ELETE E(XIT ----------------------------------------VOL PG OF SECT-USED LEFT ---------------------------------------- ؅D$% 0 +DE ` A PCL~@E^E_EZE[` 2 B A PC @`6798 `H|C h|C``2D3DEEiEiA)m3D3D +D 4D +D) 4Dm2D2Dm3D3Dة$eeELCؠ C82D2D3D3Dؠ 3D$C >B$E  ``L#BH$%  hWB\  `CATALOG\Y/N\LOAD\LOCK\UNLOCK\RUN\SAVE\DELETE\NOMONC\START\ LENGTH\,D\E  EmEB&BBNBmBJnBmBeeE` 8EEPEE &B B00   5DEEE B ALT@ BG A CL~@Ъ2'EE &B B B" yD$ >B B A C }CL~@ :L@% E E >B yD AE/5 >Bs r ; >Ba ` `$$(@ @_E%E^EZE[E̍^ZE_[ 0E^ D C1  }CE)ȹE)ȹE) 5D E Bɠ 0   5DL@ M  EТ E XELiLLT@ E &B B B E A EL@ E  ϠƠՠԠϠ)4:ccS(Š٠ҠҠ̠)&@ :M6:cc+:a(ŠӠĠ٠ȠԠŭ)L:cca()a()a()L;cca()a(ˠŮ)+:a(Ԡ٠ӠĠԠˠ)m:a(ΠՠԠҠԠ)a(ԠӠϠˠӠ)a(ԆӠˠӠϠ).:a(ϠԠҬŠŠҠƠ) :a(ӠȠ)&:a(Š)c :N@"r2:S(Š٠ҠϠŠ)&@ :M6 :ccc":a(ŠҠӠŮ):cQ:a()ca()ca()c<:a(ΠՠԠҠՠŠԠcQ:a()ca()ca()cg:a(ŠԠƠҠΠӠϠҠŠ٠ϠԠӠǠŠˠ)cQ:a()ca()ca( r"S(ϠՠԠϠ٠)&@ ccc`@9()$;`@9()$;_c$a(ՠŠРҠ)FE()_#'a(ԠӬԠˠ)'_ :M6ccC:a(Ҡ٠ӠŠҠ)a(٠Ԡˠ)6$'q6q6q6[@`6$'Jq6q6q6Kq6T[`6$'q6q6q6[`6$'q6q6q6q6['a(ՠŠĠΠ)FE()_! a(ՠŠҠ)FE() _ N@"Y \d %q*_x`6$'q6q6q6q6[L`6$'Vq6q6q6`[`6$'q6q6q6q6[`6$'q6q6q6([x`6$'q6q6q6q6q6[`g!h`$`$`6$ S(Ƞ)'$`$`$` $UVWUVWMq.?6?r.?6?r.?6?r.?6?r.?6?r.?6?r.?6?r.?6?r.?6?rUVWYf ghf Kghghgh gh!gh!gh ghgh`%f`6%flm#nij#kf ghf Kghghg h g!h!gh!gh g hhghg hg!h`%f&`6%f0lm#n:ij kDf ghNf KXghghgh g h!gh!gh ghg hb`%fl`6%fvlm#nijkmnijkf ghf Kghghghghghghghgh`%f`6%flmnij#kf ghf Kghghg hg!hgg hg!h gh ghg hg!hJ`%fT`6%f^lmnhij krf gh|f Kghghghg hghghghg h`%f`6%fl`6%flm nijkf ghf Kghghghgh gh ghghgh`%f`6%flm n"ij#k,f gh6f K@ghghm$nYPfZUVW%X dlm%nnij%kY sqx`%f`6%flm nij kf ghf Kghghghg h ghgh ghg h`%f8]ǠӠҠŠɠ٠ŠȮ\`;o N@"r# S(ϠՠĠӿ)&@ `@9()$`@9()$_:Aq6q6q6q6qq6q6q6q6(L2f<UVW$Fl              ĮԮҠӠŮM\]͠ĠàΠ^]Ϡˠ`QŠĠ)QH]ԠҠŮJP;@rLa@ Na()P[R]ĠԇήT]eV]ΠϠŠŠƠΠϠҠŠƠӮ X]FZ]Ԡ)\H2]4]ŠŮ$6oa(ӠŠçϠ)18oa(ӠŠŠҠϠŮ):`.?6@r$D<`.?6@r$8>]̠ĠŮ@d6?eM6[Bd6?eK_@ D\Bo "FP a(6`@9()$(Q ]ɇŮ"N@"(r\B$]ŠŠŮ!&o@p(Ϡˠ)\H!(@p(٠Ҡ)\H*@p(Š)\H,]).c@p(ӠӠĠΠŠ)\H 0@p(ŠƠϠˠŠ)a(ΠŠӮ)c5a(ŠӠ̠ԠƠ)a()Gca(ŠԠ̠ŠЬԠƠՠԠΠŭϠ˧)cS(ԠΠϠ)&@[deddedM[cS(ϠΠٯΩ)&@ Mmnijkijkijk \\_bUVWX6=lo P8ra(Ϡ˪)\YUVWYvP.oS(ϠՠԠӠٯΩ)&@ `@9()%[OM6o a(ŠҠˠԠȠԳ D\_!NfUVW&ij&kY"Ofijklm nPl mn7Qlmnijkijkijk R\_!Xf UVW&ijkY"Yfijklm nZl mn7[lg h lm n l mn *lmnij klmn  \_*fUVW&ij&kY`$XA&flm ngh lm ngh lm n0l mn*:lmnijklmn_d ed ed ededededeLdedede`[&de2dedfghM[&deddedfghM[+f UVW&ijkY`$NAflm ngh lm n %\|`%\`%\_deddeM[q/?rq[q/?rq[q/?rq[q/?rq[Tdede0dededededed ed er%q$$`=>r%\`=>r%q$\"f,ijkijk6ijkij&k@ijkij&kJijkijk Tghgh^`&%q`&%qh`&%q`&%qr`%\`fq82?rr#q82?r r`&%q& ghgh f\#qqqqfijkijkijkij&kijkij&kijkijk$`=>r%\`=>Ӝ ] \ \\b(L2f<UVW'Fij'kPYZf dlm'n7nij'kij'k'lm'nlm'n'Exq$qqqqqqq$qqq`$`$        S, FANTASTIC, THOUSAND, WHEAT, GREASE, MEADOW, OCILLATOR, CASSETTE, DICTATE, BLANKET, MARBLE, PAPER, APPLE, SYNTAX, ATLAS, LINEAR, MICROWAVE HANGPERSON, BLINDFOLD, GALLOWS, PLATFORM, FINANCIAL, SECTION+ GIVEN TO APPLE CORE OF SAN FRAN;:N$: THUMB, MUSHROOM, AMERICA, COMPUTER, TELEVISION, ATLANTIC, GAMES, HOUSE, PACIFIC, BOTTOM, SEVERAL, ORANGE, CREAM, RECIEVER, INTEGRATED, PRETZEL, VITAMIN, CONTAINER, DEXTROSE, FAMILY, BASIC EXIT, EXCECUTE, PURPLE, SANITY, WIDOW, TREMENDOU **BY**"5<" *JEFF FRANKEL*?F::eP" **FROM THE TAB BOOK**"Z" -24 READY TO RUN PROGRAMS IN BASIC-"d" **BY KEN TRACTON**"nA16000:Ax17" ***HIT ANY KEY TO CONTINUE***"E PRACTICE":"DO YOU WANT TO PLAY AGAIN (Y OR N)";:X$KX$"Y"ī100Q"THE HANGPERSON THANKS YOU, GOOD BYE FOR NOW" ::::::" ***WELCOME TO HANGPERSON***"::(" ***ADAPTED FOR THE APPLE II***"2" EXCELENT! YOU BEAT THE HANGPERSON AND ONLY MADE ";;P;S" GUESSING ERRORS"]1250"THAT WAS VERY GOOD! YOU ONLY MADE ";P;" GUESSING ERRORS"1250 "THAT WAS O.K. BUT THE HANGPERSON THINKS THAT YOU MAY NEED A LITTLE MOR"WOULD YOU LIKE TO KNOW WHAT THE WORD WAS (Y OR N)";:O$l8O$"Y"ĺ"THE WORD WAS ";::W$::A13000:ArB|L:10VP2ī1160`P4ī1200jP6ī1240t"THE HANGPERSON THINKS YOU MAY NEED SOME MORE PRACTICE"~12503"THAT WAS 34,3520::9"YOURE IN TROUBLE NOW!"B500Q LEFT LEG_25,2826m25,2629w::"THIS IS YOUR LAST CHANCE"500 RIGHT LEG25,283030,3129::$"YOU HAVE BEEN HUNG"9.1625,312517,2425,17,24316*::[4"PUTTING ON A LITTLE WEIGHT?"d>500sH LEFT ARM~J24,17L23,18N22,19P21,20R22,20f::p"OH! OH!"z500 RIGHT ARM32,1733,1834,19; lD$v340"PP1BP720,780,840,900,960,1020M HEADT0a26,309o10,1326}10,133026,301425,1031,1025,1131,1128,15::"THAT'S ONE!"500  BODY25,31L A$Z$(A)C$(A)A$ A* A1L= A$Z$(A)ī500D AM 700^ A11500:Ai S$"-"t E$" " A1L ALĺC$(A)E$ ALĺC$(A)E$; &A 0A1L :ALĺS$E$ DALĺS$E$; NA Xb"LETTERS GUESSED "LA XA$(D$,A,1)ĺ:::A$;:" HAS ALREADY BEEN GUESSED":500H ZA ^(A$)1ĺ:::"ONE LETTER AT A TIME PLEASE":500 hA$"0"D$D$A$:430 r"WHAT IS YOUR GUESS";:B$ |B$W$ī1090 "SORRY THAT WAS NOT THE WORD" 500 A1FCHARACTERS GUESSED---A=GENERAL COUNTER---MORE TO FOLLOW AS PROGRAM EVOLVESW L(W$)_ P0j "A1L~ ,Z$(A)(W$,A,1) 6C$(A)" " @A J MORE STRINGS A$=GUESSED LETTER---B$=GUESSED WORD---W$=WORD P500 T"PICK A LETTER";:A$ VA1 W$ A DRAW GALLOWS& , 3 1? A039K 0,39AR AZ 12 8,3139:8,3138:8,3137:1,397:8,311:2,828:8,7:9,6:10,5:11,4:12,3:13,2K VARIABLES---L=LENGTH OF WORD---Z$=CHARACTER ARRAY---C$=RUNNING ARRAY ONS:":8 P"WHEN ASKED FOR A LETTER, KEY IN YOUR GUESS AND HIT RETURN. IF YOU WISH TO GUESS THE WORD, HIT 0 (ZERO) AND RETURN WHEN ASKED FOR A LETTER. THE PROGRAM WILL THEN ASK FOR YOUR WORD GUESS." Z1410 d i nR(50(1)1) xA1Rf!**************************@ADAPTED FOR THE APPLE BY:RJEFF FRANKELg338 FUNSTON AVESANFRANCISCO, CA. 94118 (415) 221-9796 ************************** 1300(Z$(25)2C$(25)< F6:"INSTRUCTIO      ,6 "DID YOU COME TO ME BECAUSE YOU ARE*"L@ "HOW LONG HAVE YOU BEEN*"vJ"DO YOU BELIEVE IT IS NORMAL TO BE*"T"DO YOU ENJOY BEING*"^"WE WERE DISCUSSING YOU--NOT ME."h"OH,I*"r "YOU'RE NOT REALLY TALKING ABOUT ME, ARE YOU?"'| BE ABLE TO*"#"WHY CAN'T YOU*"Z "WHY ARE YOU INTERESTED IN WHETHER OR NOT I AM*""WOULD YOU PREFER IF I WERE NOT*" "PERHAPS IN YOUR FANTASIES I AM*""HOW DO YOU KNOW YOU CAN'T*"" "HAVE YOU TRIED?", "PERHAPS YOU CAN NOW*""DOES THAT TROUBLE YOU?"D"TELL ME MORE ABOUT SUCH FEELINGS."^"DO YOU OFTEN FEEL*"{"DO YOU ENJOY FEELING*" "DO YOU REALLY BELIEVE I DON'T*""PERHAPS IN GOOD TIME I WILL*" "DO YOU WANT ME TO*"  "DO YOU THINK YOU SHOULDBE ABLE TO*"/Z "WHAT MAKES YOU THINK I AM*"[d "DOES IT PLEASE YOU TO BELIEVE I AM*"n "PERHAPS YOU WOULD LIKE TO BE*"x "DO YOU SOMETIMES WISH YOU WERE*" "DON'T YOU REALLY*" "WHY DON'T YOU*" "DO YOU WISH TO BE ABLE TO*"OU "," I ","YOUR ","MY "U " IVE "," YOUVE "," IM "," YOURE "," ME ", " HUMANS "z2"DON'T YOU BELIEVE THAT I CAN*"< "PERHAPS YOU'LD LIKE TO BE ABLE TO*"F"YOU WANT ME TO BE ABLE TO*"P"PERHAPS YOU DON'T WANT TO*" U "DO YOU WANT TO "I AM","IM "J. "YOU ","I WANT","WHAT","HOW","WHO","WHERE","WHEN","WHY"8 "NAME","CAUSE","SORRY","DREAM","HELLO","HI ","MAYBE"B " NO","YOUR ","ALWAYS","THINK","ALIKE","YES","FRIEND"L "COMPUTER","XXX" " ARE "," AM ","WERE ","WAS "," Y18XX1R%(K): F$:XDbR%(K)R%(K)1:R%(K)N%(K)R%(K)S%(K)gl(F$,1)"*" F$:P$I$:200~v (F$,(F$)1);C$P$I$: 200 "CAN YOU","CAN I","YOU ARE","YOURE","I DONT","I FEEL" $ "WHY DONT YOU","WHY CANT I","ARE YOU","I CANT",(C$,(C$)L(S$)1)#LL(R$),540CL(R$)(C$)540^(C$,L,(R$))R$540C$(C$,L1)S$(C$,(C$)L(R$)1)LL(S$)L&X+(C$,2,1)" " C$(C$,(C$)1)N: X1 N1%N2%: Z$: X: 15: 12,1318: 22,2310,1514: 20,2514:K.mS%0KS%:LT:420<rK36:590l:X1N1%:Z$:X: 0: 12,1318: 22,2318C$" "(I$,(I$)(F$)L1)X1N2%2 S$,R$L2(C$)1L(S$)(C$)510(C$,L,(S$))S$510C$(C$,L1)R$T YOURSELF!":2002 ": 15: 12,1318: 22,2318; 'S%0I , K1N1%Q 6K$_ ;S%0360v @L1(I$)(K$)1 T(I$,L,(K$))K$S%K :TL:F$K$ ^L: 11: 10,1514: 20,2514: 15: 10,1512: 21,2512h 11: 10,1512: 21,2512: 15: M FREUD. WHAT'S YOUR PROBLEM?"::L 0: 12,1318: 22,2318:"";:I$_ I$" "I$" "e k } L2 (I$) (I$,L,1)"'"I$(I$,L1)(I$,(I$)L):230 L4(I$)ĭ(I$,L,4)"SHUT"ī 3000 L I$P$ĺ"PLEASE DON'T REPEA,2528: 11,2429: 11,2430: 12,2331: 12,2332: 12,2333: 13,2234: 14,2135 7: 11,1416: 21,2416: 11,1417: 21,2417: 12,1318: 22,2318 0: 16,1920: 17,1821: 1: 14,2126: 14,2127 0: 12,1318: 22,2318" "HI! I'14` 4,2215: 4,2216: 4,2217: 4,2218: 4,2219: 4,2220: 4,2221: 4,2322: 4,2423 5,2524: 6,2625: 7,2626: 8,2527: 9,2428: 15,1829 15: 10,1514: 20,2514: 14,2123: 13,2224: 12,2325: 11,2426: 10,2527S 10 P""( d S%(36),R%(36),N%(36)B nN1%36:N2%14:N3%112b x X1 N1%N2%N3%: Z$: Xr X1 N1% S%(X),L:R%(X)S%(X):N%(X)S%(X)L1:X : 11: 15,186: 9,247: 8,258: 7,269: 6,2610: 5,2511: 4,2412: 4,2313: 4,22u9000 1: 3,717: 18,233: 4,520: 10,1417: 18,2310: 11,1420: 18,1914: 12,21: 13,22: 14,23 17,2117: 18,2317: 18,1920: 18,2123: 17,2324: 25,2723: 17,2328  17,2331: 32,3417: 18,2235: 32,3423         :4CN1,5(7DN)1(COCN:DODN:TTNSZ(16287):Z127Č198:I1100:I:Z(16384):Z127Ĺ16368,0:C1:198:64030CC((0)4)C((CC8(CC8))8)D((0)32) INITIALIZE.CT$(40):4634)2Ġ1:I,I1J:I,I1J2AX S(X,Y)2Ġ12:I,I1J:I,I1J2gb S(X,Y)0Ġ15:J,J2I:J,J2I1pl X,Yvv 16368,0CO0:DO7:T04500CNC:DNDCOCNDODN4100T:4CO1,5(7DO)1TN4CN1,5(7DN)1)6S(X,Y)2Ġ1:I,I1J:I,I1J2G S(X,Y)2Ġ12:I,I1J:I,I1J2m S(X,Y)0Ġ15:J,J2I:J,J2I1v X,Y Y712& X1720 I4X1:J5(7Y)1: S(X,Y)1Ġ1:J,J2I:J,J2I1D S(X,Y)1Ġ12:J,J2I:J,J2I1N S(X,Y0YII4X4308)X,X3Y4 X,Y,ICI53910P YII4^*X0308k4X,X3Yv>X,Y,I|H Y602 X062 I4X1:J5(7Y)1 S(X,Y)1Ġ1:J,J2I:J,J2I1 S(X,Y)1Ġ12:J,J2I:J,J2I1   "+TO ";:4000:A1C:B1D:A10B101810; A1;",";B1g S(A1,B1)0(A1A)2(B1B)21802EA:HB:AA1:BB1:II15:1750B7S(A,B)2&230XI180:J1I:J:Z(16336):Ib::"YOU WIN!"l15I0391"THAT'S AN EMPTY SQUARE, TRY AGAIN":198:1595LT" TO ";:4000:AC:BD^^A0B01580jhA;","BvXA:YBS(X,Y)0(AE)2(AE)(BH)1700198:1620I46S(A,B)S(E,H):S(E,H)0:(EA)21810S((EA)2,(HB)2)0,3000:15900ZUXA:VYB:U0U7V0V71400TdS(U,V)0S(XA2,YB2)0İ910Zxd,3000z6::"YOUR MOVE?";"FROM ";@4000:EC:HD:E0H0ī1580EE;",";HJXE:YH:S(X,Y)0ĺ"PLAY YOUR OWN PIECES!":198:15950OS(X,Y)04))S(R(1),R(2))@S(R(1),R(2))0:(R(1)R(3))2İ3000:1590e2S((R(1)R(3))2,(R(2)R(4))2)0<XR(3):YR(4):S(X,Y)1B2:A224:1370FS(X,Y)2āA224:B224:1370BPA:R(0)99ĺ" TO ";R(3);",";R(4);:R(0)99:1240 UG71080>S(UC,VG)0(S(UC,VG)0(UCXVGY))QQ2p8C:QR(0)R(0)Q:R(1)X:R(2)Y:R(3)U:R(4)VzLQ0:tR(0)991880:"I MOVE FROM ";R(1);",";R(2);" TO ";R(3);",";R(4);:R(0)99R(4)0S(R(3),R(4))2:1310S(R(3),R(İ910:870 S(U,V)0870A UUA:VVB:U0V0U7V7870T RS(U,V)0İ910Z fs V0S(X,Y)1QQ2 (YV)2QQ5 Y7QQ2 Y0U7QQ1 C112:UC0UC0VG01080 S(UC,VG)0QQ1:1080 UC0UC7V000:3000/ "DO YOU WANT TO MOVE FIRST? ";A$E (A$,1)"Y"1590f X07:Y07:S(X,Y)1350 6S(X,Y)1āA112:BG:650:A JS(X,Y)2āA112:B112:650:B,A ^Y,X:3000:1140 UXA:VYB:U0U7V0V7870 S(U,V)0ENTERED THE BEGINNING OF AN":"INCORRECT MOVE, PRESS ANY KEY TO CLEAR."f F:"HIT 'RETURN'";A$:936 PR(4),S(7,7):G1:R(0)99 Z 1,0,1,0,0,0,-1,0,0,1,0,0,0,-1,0,-1,15 xX07:Y07:J:J15170 S(X,Y)J:175 :S(X,Y) Y,X 2R YOUR MOVE."0 ("REPEAT FOR THE 'TO' SQUARE. ^ -"THE MOVE COORDINATES WILL BE DISPLAYED" 2"AT THE BOTTOM OF THE SCREEN." 7:"THE COMPUTER WILL TYPE '+TO' WHEN YOU" <"HAVE ANOTHER JUMP. PRESS ANY KEY IF YOU":"CANNOT JUMP."G A:"IF YOU *******************************"7 I12000:I:936` :"THIS IS THE GAME OF CHECKERS.": "THE COMPUTER IS GREEN, AND YOU ARE RED." :"TO MOVE, MOVE THE CURSER TO THE 'FROM'" "SQUARE USING PDL(0). PRESS PDL(0)" #"SWITCH TO REGISTEL  CONTRIBUTED BY WM.R.DIAL*4600=34,0:936:8" **************************************":" * *" " * CHECKERS *" " * *":" *******         z #   ՠ !נҠ Π٠ӠĠ!Π Ϡˠ ԠӠ àϠƠκխԠϠΠ ˠ֠Ӡ ӭӠϠŠϠ#ΠŠԯ  ˠԠϠĠ Ϡ D  (768)0Āj ":"...LANGUAGE CARD CANNOT BE RELOADED":" UNTIL THE SYSTEM IS REBOOTED..."p ,6: 769 (768)1250% I --IF THERE, LOAD INTG AND PA#1P 10:"(LOADING INTEGER INTO LANGUAGE CARD)" "BLOAD INTBASIC,A$D000" --WRITE PROTECT THE CARD A(16254): $C082  --NO CARD OR CAN'T RELOA804,0:805,208:806,208:807,10:808,173:809,129:810,192:811,173:812,129: s813,192:814,169:815,1:816,208:817,2:818,169:819,0:820,141:821,0: x822,3:823,104:824,205:825,0:826,224:827,240:828,3:829,173:830,128: }831,192:832,9,104:W _777,72:778,205:779,0:780,224:781,208:782,35:783,173:784,131:785,192: d786,173:787,131:788,192:789,169:790,165:791,141:792,0:793,208:794,205: i795,0:796,208:797,208:798,19:799,74:800,141:801,0:802,208:803,205:N nD "THIS #5 BACKUP DISK"<"BELONGS TO KYLE THOMPSON"B O 08/25/80"<:"APPLE II PLUS OR ROMCARD SYSTEM MASTER"F P --POKE LANGUAGE CARD FINDER Z768,0:769,173:770,0:771,224:772,72:773,173:774,129:775,192:776    ժժժ p ? `syc?@|yA ժժժՂ  8` ժՀ  ? ЪժժժժՂ 0Nq ?xc?@|yO Ԫժժժ `9|` ``n0p`f @*U*U U* ЪժժՀ   ժժժ   ժժՀ `9`3 *U*(U* ժժժժ p 3 `sc 3@s|q@ ժժժՂ x 8` Հ   ժժժժՂ 0Ny 3xc?@|yO Ԫժժժ `9x` `@n08`f @*U*U*U* ЪժժՊ   ժժժ   ժժ `9`3 (U*U* ժժժժ p 3 @sc @sLq@ ժժժՂ x? 8`    ժժժժՂ py 3xa@sxx Ԫժժժ <`` `n0` f P*U*U*U* ԪժժՊ   ժժժ   ժժ `9p?  U U* ժŪժժժ p? @ac ?@sLq@ ժժՊ x? 8` T   ժժժժՂ py ?@s 1!6d<e8.?rrd=e.?r8.?rrkd>e8.?<rrd?e.?=r8.?<r rdBedCe de.?>rde.??rM6_ U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*`\ap>` natA<            :#c-;#a(ԺՠΠΠ̠Š))<#a(ӬΠŠՠΠŠԬ))=#a(ŠԠԠŠΠΧԠ)>#a(Ƞԡ)?#c7F#a(Šՠ٠ϠΠ) #N@"r#\',#Lq qfϠԠϠŠҠΠŠԠ)+4#a(ŠŠΠŠĠԩ) 5#a(ծ),6#a(šӠŠ)/7#a(Ӡ٠ĬĠӠҠ̮)-8#a(ԠԠƠŠŬŠΧԠϠ)9#a(ĠӠϠϠĮ)Š)E-#a(ŮΠէ̠٠ŠŠӠӠՠРϠͮ)'.#ca(ϠŬՠԧҧҠԬ)"/#a(̧ҠԬէҠЬ))0#a(ħҠήϠԠԧΧ)1#\'12#oa(ŠԠӠҠՠŠΠԩ)+3#a(q6_l.@\\\\a(ŠΠԠա)J_# (#KM69)#qqqqqqqqq,*#oa(ŠϠŠΧӠŠ)c-+#a(ՠ٠ȠŠɠĠŬ),,#a(ԠΠԧӠŬɧ̠ 8rr $`- 8rr $qq_lK`$`- 8rr $`- 8rr $q6q_lK`$]`- 8rr $`- 8r r $]qq oUVWqqpfaqUVWUVWghYZfUVWUVWghYZqqvY{qq-- 8rrq- 8rr[G` $`-Wq.?6?r.?6?r.?6?r.?6?rY[pa(ՠΡ)z\\\a(Ž)FQX`$]`$Y`$`$G]` $`- 8rr $b`- 8rr $bqqlfnqӱ $ _\ fl8rmn_\ f"l8rmn8r"_h\ rf"|i8rjk8r_\ fi8rjk_=qUVUVWUVWghYZqq>YCqqD` $pH_ q6q! `- 8rr $ _ qq6 `- 8rr $h _ qq `- 8rr)r$ `$ `<()r$  `<()r$ `<()r$ `<()r$  \_qq`- 8rr $(qqUVWqqf` UVWUVWghYZfq q#flmn'q qqqq.?6@r`$ d6?eq\Xq`$@`<()r$`<()r$`$`<()r$ `<(jk_#\ca(ŠŠӠ)'fUVW'lm'nYf7lm'nlm'n'ij'kij'k'1qqflmnf1UVWUVWghYZq$olmn8rp_#!t`7$V-rq-r q$yijk8rz_#)~`7$V-rq-rqlmn_#)`7$V- rq- r q#i-rP`$Zq- r.Zq`788/? rrr$VBnq/? rq/? r`- r$nqq_#x`- r$nqq_# Vq/?r`_j !j`7$V-rq-rq_]O4rD4r\'_(# q/? rq/? r'`- r$ qq#`$[(qqqqq 8r-rq61?-rrq` $<q-r<` $Fq- rF`$Pq         ӠO]T]ԯ§YQ$" `.?6@r$[9"d6?eKM6o P a(ŠĠ)Q2']ԠŠҬî,]1]ĠϠ6]ҠӮ;]@]٠Š٠׮ΠE]ҠJ]Ša(ӠԠ̠٠)c.a(ԠϠӠ̠٠)c.a(ӮԠӠŠŠ)c%a(ŠϠŠŠĮ)ccoa(ӠçϠ)*a(ӠŠŠҠϠŮ)`.?6@r(Į)_a(٠Į)_a(Ԯ)_a(٠Ԯ)\ M6S(Šӿ)&@_--oa(ԠҠӠ)c(a(͠ŠĠˠ)c,a(Į٠Š٠Π)ccc-.?6?r.?6?r.?6?r.?6?r.?6?r.?6?r.?6?r.?6?r.?6?r`$i,a(Ӭ)E@E(ՠΡ)_0a(ҠŠƠ)FE(Ӡ)G_8dra(š)_a(ٮ)_a(Ү)_a(Ү)_a.?6?r.?6?r.?6?r_n%dUVWq.?6?rYqqiq6!nghfghqq_Usa(Į)G,xS(ҠϠ)'`$s[C}`%q1?rlmnq oP bUq.?6?r(Ԡ̬)E@cUVWd\Yqq;Uq`x$Zq6qUVWq.?6?rYoZq`$\fq`'$d`=>r$n`$}qq8rq8rqB_q.?6?r.?6?r.?6?r.?6?rlm'nfUVW'XTAlmnYZPa(Š)ccd"eqqqqqq[F\<`Kfghqq/?xrq6q/?rq`$P`8r%`%qVP`%bE(ӠԮ)`%a"eUVWoPbGYd"eoca()Gg7\xqa(Π)G\xqa(Ġ)G\xqa()G\xqa()G\x\<_Kl<d"efUVW'lm'nYUVW"XPb Gf°q[ UVWPq.?6?rY_K L\<P#S(ɬԧӠҠſ)&@M6oqq q qqL\<*(M6a(ĠӠ)E@E()GR@N-L`;@r$F`@*#r9()$FUVWflm'nYM6Q2d+ d6?eM6\c N@"rC@"rKM6a(Ԡ)ca(ԠӠϠ٠̠)cc_#dq82?rr`%q`"%q"flmnf`$`%lmnq[&`%[`"%lm'n     ŠӠ); o J= a(ӮǠŠϠӠՠӠӮ)c`? a(ӠҠĠ٠ҠԠӠӠԠŠРƠŠή)cCN a(κŠƠŠ٧ˮŠӠȠӮ)cӠӠŠƠǠ̮ՠ̠ŠǠԠǠӬӠĠӮ)' cP0 a(Š̨ϠԠǠήӠĠȭϭ̭ĠΠϠŮ)1 cW: a(ˠӠȠӮҠӠȠӮĠgh ECgh gh gh gh gh gh EHgh gh gh gh gh gh I`%_f6Jlmnlmnlmnqf[ K \p  M6e& a(%lmn#`=>r%lmn#`=>r%lmn#`=>r%lmnJ4f gh gh gh gh gh gh E>gh gh gh gh gh ghgh.ghghghghgh.ghghghghghij'k&Bq882?rrrs`%q`$%q$fgh&f# `=>r%lmn#`=>r`$%q$fgh&[ ]f lm%n`=&> r%_7i"j&k i"j&k i"j&k i"j&k .ghghghghgh.ghghghghgh.ghghgh%_CQBijk ijk gh gh gh gh C`%_ADflmnlmnlmnfghL`.?6@r$df ij'k&Cq882?rrrs`%qjk gh gh gh gh )`%_3Q.ijk ijk gh gh gh gh 3`%_=Q8ijk ijk gh gh gh gh =`%_8ijkijkijkghgh8ijkijkijkghghf ij'k&Bq882?rrrs`%q`$%q$fgh&f"`%_)Q$ijk i`$%q$fgh&f`%_8ijkijkijkghgh`%_8ijkijkijkghgh`%_ 8ijkijkijkghgh `Pb \q` %q`<%_`%_q/?r_f `=>r%_Dijkijkijkijkijkij'k&Bq882?rrrs`%q`%%q`%q'q`%%q`%q'Mq`%%q`%q'q`%%q`%q' \`.?6?r%_XoPb%oPbqoP%boj'k&Bq882?rrrs`%q`$%q$fgh&Mq`%q#`#%qq`%q#`#%qbJq`%q#`#%qq`%q#`#%qq`%q#MqqqqqFL0Hd ed!ed"ed#eKqcqdqq(3doa(ӠӠӠ)f UVW'lm'nY$]ǠŠӠϠŠf i\}KM6\ ,qq(qq M6qqq q#qqq 0qqqqq'q'q'q'q'!q$qqqq(        ŮM]͠ĠàΠ]ϠĠQ]РŮ`.?6@r$d6?eQQŮP;@ra@ a()[]Ġԇή]e]ΠϠŠŠƠΠϠҠŠƠӮ ]F]ԠĮԮҠӠa(ӠŠçϠ)1oa(ӠŠŠҠϠŮ)`.?6@r$`.?6@r$]̠ĠŮd6?eM6[d6?eK_ \o "P a(ŠĠ)Q]ԠҠ]ŠŠŮ+o@p( ɠΠǠϠàҠĠ)\!@p(٠Ҡ)\@p(٠)\]3c@p(Ӡ͠ӠϠ)\@p(ҠҠ)\]]ŠŮ$occc ^q%`$4,*a(נ٠ӠϠՠԠ)GT/_'4S(ӠΠҠԠĠ)&@>`$M6_d_/]ҠҠŠŠ]ɇŮN@"(r\)(a( ɠΠǠ))a()bIIIIcbIIIIcbIH()IIcbIIIIcbIIIIc) a() q/?r=q/?r=`%_q/?r=`%_`%_q/?r=`%_`%_`%_q/?r=`%_`%_`%_`%_)a(%_X`%_Xq/?r.q/?r.`%_q/?r.`%_`%_q/?r.`%_ `%_`%_ q/?r.*`%_ 4`%_ >`%_ H`%_ `%_`%_`%_q/?rq/?r`%_q/?r`%_&`%_0q/?r:`%_0D`%_0N`%_0Xq/?rb`%_Xl`%_Xv``%_`%_`%_`%_,q/?r6q/?r@`%_6Jq/?rT`%_J^`%_Jhq/?rr`%_h|`%_h`%_hq/?r`%_ 02]ҠҠŠŠF\PN@"r Zo _*dq/?rnq/?rx`%_nq/?r`%_`%_q/?r`%_`%_`%_q/?r     Ԡͤ[&]ҠQ0lm nlm nghghghgh:]ԠͤD[N]ҠTXlm nijkghijk lm n)blmnҠJlm nijkijkijk lmnJlmnghghghgh ]Ԡͤ[]Ҡ4lm nijkijk ]F|lm nlm nijkijkijk [f/?r]Flmnlm nijkijkijk [f/?r]7lm nlm nijkijk []klmnijklm nijk ,[6f/?r]J@ijklm nijkijk lm nJ[Tf/?r](^lmnijklm nh[rf/?r]ijkijk lmnlm n[f/?r]?ijklm nijk ijk[f/?r],lmnlm nijk[f/?r]J"ij%q(`%\2`%\<`%\F`%\P`%\Z`%\d`%\6n`%\Tx`%\r` %\[Qf/?r]ghlm n[f/?r]JijkY`f/?rjUVW%X tgh~YUVWX g%hYUV%WX6ghYUVWX6 ghY]M6cccQ`%q `#%q#`%q`YUV%WX6ghYUVWX6 ghY]fUVW%X ghYUVWX g%hYUV%WX6$gh.Y8UVWX6 BghLYVVW X f\ f/?r\ f/?r\ [ ]ؠĠϢ]ȠĬԠ ]*qq4UVW X>f/?rH]RUVW%X \ghfYpUVWX zg%h\bqq\&lqq\Nvqq\Y,a(Ϳ٠ҠΩ)GR@`@9()%_fUVWXij'kY]ӠӠ]ĠϢqqU[]ƠҠ]ϧנ]UVW X(q]ȽȠΠϠŠϢ&fUVWX)0lm$n]ӠΠԠ:YDf Nqq\]ӠֽXq qӠغ͠ӠŠƠ7ij kij klmnlmn $fUVWXijkYf/?r R@`%\`%\`%\&`%\N`%\]ƠϠͬӠĠ"fUVW&X,ij#k 6Y@YJ_T]Π ^q8-rr2hqq]ҠΠخӠȽĠֽrf/?r]ҠƠ0|]ΠϠ)`-r%_^-rq]̠\T R@\>cbGa(ӠĠ)GbKGa(Ӡ)ca(Ͽ)GR@`@9()%\ M6"]͠٤Ԡ٤' ]\]((N@"rN@"rN@"r2N@"r <M6F]ӠPO4KrZUVWKd^-rqnYxLUVWKX]Π͠q/?Kr!oa(Ӡ       lm nijk [pf/?r]Jqijklm nijkijk lm nr[Xf/?r](Ylmnijklm nZ[@f/?r]FAlm nlm nlmnlm n[ f/?r]? ijklm nijk ijk [f/?r],lmnlm nijk[f/?r]JijklmnijkҠŮJP;@rLa@ Na()P[M\]͠ĠàΠfQf/?r]ghlm n[f/?r]Jijkijkijk oa(ӠŠçϠ)18oa(ӠŠŠҠϠŮ):`.?6@r$D<`.?6@r$8>]̠ĠŮ@d6?eM6[Bd6?eK_@ D\Bo "FP a(ŠĠ)QH]ԠθB$]ŠŠŮ'&o@p(àϠ)\H!(@p(٠Š)\H*@p(٠)\H,]..c@p(Ӡ͠Ӡ)\H'0@p(ӠҠϠ)\H2]4]ŠŮ$6\&`%\0`%\p:`%\XD`%\@N` %\(#X[bQ~]ŠŠӠŠԠƠ̠ӠΠŠŠ٠Ҡ٠] ]ɇŮ"N@"(r\UV%WX6ghYUVWX6 ghYM6ccb[]ӠϠQ`%q`#%q#`%q`%q`%\'`%\`%\`%\ `%YfUVW%X ghYUVWX g%hYUV%WX6ghYUVWX6 ghYf/?rUVW%X ghYUVWX g%hYؠĠϢs]ȠĬԠt]uqqyf/?r]UVW%X ghYUVWX g%hYUV%WX6ghYUVWX6 ghYUVW;]Ϡ)Ef/?r]ҠƠϠFqq\ NGq q\NHqq\NIqq\LOJqq\OT]Ϡ^]ӠӠ_]ĠϢh]Ӡr]r`%\ N`%\N`%\N`%\LO`%\O[,]ƠҠ-]ϧנ.](2q]ȽȠΠϠŠϢ3fUVWX4lm$n5Y-rr2qq]ҠΠخӠȽĠֽf/?r]ҠƠ1]Ӡغ͠ӠŠƠ7ij kij klmnlmn $fUVWXijkYf/?KL^-rqMYcLnUVWKXs]Π͠xq/?Kr`-r%_s^-rq\\0u\,]Y!UVWYKM6Q]Π q8ҠǠ ]]ΠҠ]]8]ŠŠĠРŠԠ]]2\ (3N@"rN@"rN@"r4N@"r 5M6F]ӠJO4KrKUVW/]ϭȡ]ӠӠ͠ ]Š͠]ҠϢš ]]Π]٠Š]Ҡ]٠Ʈ ] ] ]     Ӭ))a(٠٠ŠĠϠŠ)a(͠ŠΠŮ) ccc+S(ȠΠҠԠŠ)&@(a(ՠŠ͠ՠԠ)'a(ΠԠàŠ)*a(ŠϠŠԮŠ)ǠӠĠ٠)'a(٠ՠΠŠŠŮ)c*a(ŠŠӠŠ)&a(ȠŠ͠͠)#a(ŠЮͮϠŠԮ))a(٠ҠĠΠŠŠ)*a(ҠϠŠϠҠԬ)&a(ĠՠȠϠԬӠ)*a(ŠϠŠŠĠ)a(ԠԠŮ)-a(ՠŠŠΠ٠)+a(ŠӠŠ٠Š)'a(ӬŠƠ͠Ӡٮ)'a(Ҡנ)G\ c_\ha(ɠנ)G\ c_q\ha(ɠנ)G\ c"_.,a(ՠԠ͠) 6q_@a(٠) Jq T_^_ h^qr[(a(ΠŠĠӠ)&a(ͮ͠_ #<]٠ƠƠ Fq2P_.Z]Ұ٠ƠԠԠ dqn_xq- 8rr_!a(ɠĠԠŠŠġ)_q\ha(ɠӠȠ)G\ c_\ha(ɠƠŠ)'` $`$,`$@a(ҠŠ)q qd\h)a(ŠƠӠ)G\ a(ԠŠ)F a(ҠǠӺ)FdS(٠Π)&@(`@*#r9()$n2`@*#r:()$7YY_q/? r `$`$`/?dr$.q/? r `$$`$ .q 8ѱqѱB_LcVa(٠Ԡ)G`R@jUVW~`@9@*#r$Y_LS(8rr- 8rr$\>qH\hRa(ɠӠȠ)G\ c\Yf_pq/?r z`$p`$`/?dr$UVW%q-8- 8rrrr`$UVW`- 8rr$ `$d*`/?dr- 8rr$xq/?r%q-8- 8rrrr`$a(ɠӠΠ͠)F`$ `$ a(ɠנŠ)`/?dr$p UVW *`$\*4`- Ԡ)"a(ƠԬǧҠ) ccca(Π)Fѱa(Ԡ)G&R@0@p():`@9()$LDUVWX`@9@*#r$vbYl_vS(Š)'` $v cq\ a(ԠŠ)FE() `$F(a(ŠӠΠŠġ)UVWYoca(ŠӠź)ca(Ʈ)a(٠)a(Ү)a(Ӯ)a(Š)c%a(ҠԠ̠ƠW"q/?r'q- 8rr%,- 8rrq-8rr6`- 8rr$"@YJYTq/? r^UVWh`- 8rr$rY|_Tq/?r`- 8rr$M6o- rq-rq$- rq-rq-rq$-rq-rq-rq- rq-rq$-rq-rq-rq-rq -rq UVW!- 8rrq/? rYUVW UV@P`@*#r9()$Z`@*#r:()$<nqѱq xcccc!a(ˠ̠ԠӠ):-rq-rq- rq-rq-rq-rq- rq-rq-rq-rq-rq$-rq\ $ N@"rC@"HrC@"rC@"rO4rD4<r N@"r&M6Koa(ŠŠƠ)UVWYo%S(ϠՠԠӠ)&@(`@*#r9()$2`@*#r:()$%<S(ϠՠԠҠΠ)&           a@ a() [6 o@p(͠ɠӠӠɠϠΠՠ ϠԠ)\ '! @p(͠ŠҠî)\ & @p(٠à)\ + @p(٠)\ /: c@p(ˠŠӠŠ٠)\ ? @p(هχՇ)\ $N oa(Ӡ YO UVW -rq6-rq6Y\f\\fq\4 ]ԠԠŠĠŠРĠŠ2 oca(ϠԠŬӠŠâ٩)G* d#e]ˢŠԠ [ P;@rd ]٠ԠŠ٠̠ϠŠϠРӠ͠ΠĠӠŠӠ Y_  ]Š LM6- UVW'f`%fij'kYD UVW -rq6]ӠŠӠȠԠӠ̠E qUVW `-r$ f\-rq-r-r< `-r-r#$( qf\Y3 ]ŠŠŠƠŠȠנ8 `/?r%\`%[qf\[( -rq6Y_ -qUVWfij'kY[)UVW`-r$Yq6[4q/?rUVW`-r-r$Y-rq-rq@q/?r-rq-rq6`%-rqq[ ]Šq[-q2?r`$`$_q_q` $$f\qf\`.?6?r%[!$UVW `-r$LY[$L-rq-rq-rq []ŠW`$ijkY'UVWYUVWfij'kYfYRUV W'fij'kYUVW qf\-rq6-rq6Y$UVWY\f\qk-ri-rj-rk-rb_f g-rh-rY[fFM6d2e?a(ՠŠΠˠ) d2eKUVW UVW`$ijkYCUVeM6d6?e[MXUVW `-r$fg-rh-r-rq-r`-r$)Y`=-r>-rr%q-rq6O]fi-rj-rk-ri-rj-rk-rUVWG`Yfi-rj-rqY`/?8rr%[!UVW `-r$Y[IqUVW `1?-rr-r$ñqq1?-rr3Y-rq-rq-ñr-rq-ñr[]Š?d<ed=ed>ed?edBedCUVW YZ7UV6Wfi-rj-rk-rYBq8-rrUVW`-r-r$YY[qf\-rq6$qq_r]Y[?qUVW `-r%UVW `-r$`=-r>-rr$|fg-rh-r-rq-r`-r&$r1`=-r>-rr$|6fg-rh-rY[r-rq6Y[7|UV6Wfi-rj-rk-rY;~UVWdedeM[d]Ši`-r%[Eni-rj-rk-ri-rj-rk-rxg-r-rh-r[5UVWX6ijkY3UVWijkYgh+[d,]] ]Ӡ ] N@"(rKM6\ _2]ŠŠ?<d<ed=ed>ed?edBedCeM6 Fd6?eP`.?6@r$< JdJedKe de.?Jrde.?Kr]ԠͺҠǠŠ]]ȠŠ]٠àҠ]Ԡ]ŠҠà]           ]F]ԠĮԮҠӠŮM]͠ĠàΠ]ϠΠQd6?eK_ \o "P a(ŠĠ)Q]ԠҠŮP;@ra@ a()[]Ġԇή]e]ΠϠŠŠƠΠϠҠŠƠà)\!c@p(Ҡ)\]]ŠŮ$oa(ӠŠçϠ)1oa(ӠŠŠҠϠŮ)`.?6@r$`.?6@r$]̠ĠŮd6?eM6[ de  de de`[_x]ɇŮzN@"(r\|]ŠŠŮ#~o@p(ϠΠ)\(@p(Π̠Ġٺ)\c@p(Ġ)\c@p()\c@p(_ de de de de( de de $d e .d e0 8d e Bd e Ld e( Vde `de( jde tde ~de de( de de de deL8=>rr8 rrd,M6ca(Ž)FE(ӠĽ)Fd6?e`$_!cS(ԠϠ٠ο)&@`@*#r9()$ _K[M6ccca(ŠĠ)o a(Ҡ̠ŠӠ)Fó q`=>r$+fghqfgh`%q"fghM`"$$`=>r=>r$_*M6a(Ԡ)UVWY9M6q88=>rr8 rijk \gh _`'$d`/?r$df nqx`$ijk gh _fq'q/?r `"$fl#m'nfq2?rl#m'nq`.?6?r$_#f(ijk*gh-`$2`/?r$P2f <qA`$$KFijkHghJ_PKfqq/?r Lq`$MoPa(Ž)FPfU`.?6@r$d6?eZν)ucP a(Ž)ca(ҠԠӠ)oa(ŠӠ٠ҠĠȠӠ) UVW'YN@"2r\ qqqLUVWYqq'qq"qUVWY ]Ů\xo@p(Ϡ)\*o@p(Šנ٠Ӡ)\c@p(Πˠ)\c@p(Ӡ)\\dM6oa(Ԡӽ)oP a(ν)cP a(׽)cP a(Ԯ     Ӯ ]F]ԠĮԮҠӠŮ]M]͠ĠàΠ]ӠˠՠΠˠQd6?eK_ \o "P a(ŠĠ)Q]ԠҠŮP;@ra@ a()[]Ġԇή]e]ΠϠŠŠƠΠϠҠŠƠŠƠ)\!t@p(ҠҠ)\v]x]ŠŮ$zoa(ӠŠçϠ)1|oa(ӠŠŠҠϠŮ)~`.?6@r$`.?6@r$|]̠ĠŮd6?eM6[ϠӠŠө)$a(ҠŠӠˠϠϮ) o[d]ɇŮfN@"(r\h]ŠŠŮ!jo@p(ӠˠՠΠˠ)\l@p(٠Π)\n@p(Ƞ)\p]#rc@p(ŠҠԮՠ̠)+a(Š٠ǠŠήՠ)+a(ĠҠΠ٠Ҡ)+a(̠٠ǠΠŠŮ)cc)a(ƠՠԠŬՠŠ̠)+a(ӠĠΠԠή)*a(ՠԠpoPa()cc.zPa(ŠŠҠŠҠϠ)/ccPa(Ԡ٠Π)*oS(ϠՠԠӿ)&@`@*#r9()%[ M6o+a(ŠԠƠŠŠӠϠԠ)*a(Šhgh[9g h gh g hgh[Fg h gh g hghgh[Sg h gh g hghg hgh[ N@"r\dıq/?rIJq/?r`$q.?-rr`$q \ qıIJ[.LfUV Wi jkijkY*qf\ıq \IJ[gh[g h gh[,g h g$@-rq-r<`-r8-r-rr^$_(5,-rq-rqq`%q_()@-rqq`%q_(A-rq-r-r-rqq`%q_(0()Q9A`$DUVWd`2?r$Y_FDUVWYF@pű@`%@pŲ@!KoPa()PoPa@E(Ӡ)Z`$dUVWYd\__dQ;`ıIJ$,`ıIJĠҿ)&Ų@/#qcaű@E(Ӡ)UVWY'(UVW-rq-r-rY(2M6oaű@oPaŲ@)<oPb-roPb-rQ>`-rd-rd$Aq`%qoPa ] ]'S(נ٠Ӡ)'`$ M6L`$S(ԠӠҠſ)&ű@a(ɠ̠ŠŠĠ).UVWYqŲ@p()_#FS(ŠƠԠҿ)&ű@S(ŠƠ \ bO4rD4rD4rD4rCű@"rCŲ@"rC@"r-rq6?-rq6?9UVW-rq-rq-rqYq]]Π]Ϡ]Ҡ]נ٠     ]ӠQ]ΠϠŠŠƠΠϠҠŠƠӮ ]F]ԠĮԮҠӠŮM]͠ĠàΠ$`.?6@r$]̠ĠŮd6?eM6[d6?eK_ \o "P a(ŠĠ)Q]ԠҠŮP;@ra@ a()[]Ġԇή]eΠ)\@p(Ƞ)\]1c@p(ՠ٠٠ӠȠ)\@p(Š)\]]ŠŮ$oa(ӠŠçϠ)1oa(ӠŠŠҠϠŮ)`.?6@rh g hghgh[Sg h gh g hghg hgh[]|]ɇŮ~N@"(r\]ŠŠŮ$o@p(Ӡ)\@p(٠.LfUV Wi jkijkY*qf\ıq \IJ[gh[g h gh[,g h ghgh[9g h gh g hgh[Fg h gY qY_^ıq/?rIJq/?roP&R@q \ qıIJ[/KM6oa(٠Ơ)FE()+oa(Π)FE(Ԡ)F,o `%a(էŠҡ)Qoa(ՠŠՠΧԠŠҠ)t`$wUVWY wq|_2M6a(̠ՠΠΠŠԠ)`$UVWY q_/M6a(ӠՠŠΠŠԠ)`$UVW UVW\`$` $`$"` $('M6a(Š)FE(ҠԠӠ)F,q6\ @`$^J`$rT_6)^oa(ՠΠՠŠҠ)``$cUVWY cqh_1rŮ)32oa(ƠՠŠҠԠŠǠ)+<a(άՠήƠՠ̠)*Fa(ŠǠҠԬՠŮ)Poqq,S(נ٠ӠϠՠԠϠ٠)' M6#oa(ԠΠϠ̠) N@" r\| KM6 oP a()0o Pa(Ԡ٠Π)2oa(Ӡ͠ӠӮŠ)-a(ӠŠŮƠŠ͠ӠҠ),a(ՠήƠŠ͠ӠҠ) (a(     ]͠ĠàΠ]]ӭӠQ]@ra@ a()[]]٠Πٮ]e]ΠϠŠŠƠΠϠҠŠƠӮ ]F]ԠĮԮҠӠŮ]MϠ)1oa(ӠŠŠҠϠŮ)`.?6@r$`.?6@r$]̠ĠŮd6?eM6[d6?eK_ \o "P a(ŠĠ)Q]ԠҠŮP;@p(ԠŠ)\@p(٠Π)\@p(٠)\],c@p(ԠŠԠӠ)\+@p(ҠӠȠΠ)\@p(ҠŮ)\]ŠŮ$oa(ӠŠçTdede0dededededed ed e_Yd ed ed ededededeLdedede`[]ɇŮN@"(r\]ŠŠŮ$o)oa(Ӡ)Q q6 UVWdq`6|%q6MoPa()!q/?r2q/?2r"\'Y ,M6|1oPa()6[;\T @q EqJdedeMOQTa()#a(٬٬)GPa()&a(٬٬)GPa()cc.a(̠ŠΠĠРϠŠٮ)`2?r$K_8KM6oa(ٮҠԠӠϠҠ)1oa(ĬŠŠŠԠΠe_=KM6P a()cca(ĬĬ)GPa()#a(ĬŬ)GPa()#a(٬Ŭ)GPa()*a(ԬԬ)GPa()'a(ŬŬ)GPa()*a(ŬŬ)GPY,q׳-r`%q` %qfUVW i jkYqq\'q`6d$5M6a(ՠΠ)FPoa(̠)F`%\`2?rd$K`.?6@r$d6?M$}q_}`o%q.Lqױ-r`%q` %qf1UVW ij kYqq\UVWY,qײ-r`%q` %qf1UVW ijkYqq\UVWq`ײ-rױ-r$_q__`ױ-r$dq_;dq׳-rdײ-r ױ-r`z$iq2_)i`ײ-rױ-r$nq_,n`׳-r$`+$sq _s`$xq _x`ײ-rqײ-rqײ- rqײ-rq׳-rq?<׳- rq׳-rq׳-rq׳-rqױ-rqA`2?r$F_AFL-K`2?r$Pq.?6?r`$_K*Pq/?rq/?rq/?r Uq1ZӮ)$\(\T^-UVWXױ-rq׳-rq׳-rq׳-rqױ-rqױ-rq\2ײ-rqYUVWXײ-rqYױ-rqױ-rqױ-rqױ-rqo7ױ- rqײ-rqײ-rqײ-rqj \ Oױ4rDײ4rD׳4r_dedeM[/KM6o P a(ӠӠԠ)0o Pa(Ԡ٠Π)0oa(̠ŠΠĠΠРϠ)+#oa(ȠΠϠŠŠ         0) TO CONTROL THE RACER'S POSITION."Y'::"HIT RETURN KEY TO START THE RACE";A$:1000m. INITIALIZE..CT$(40):12034. TITLE PAGE ROUTINE..3:CT$"* SNOW RACER *":12040.CT$"BY PEL WHITING":12040.CT$"JANUARY 1979":12040:A$"Y"ī1000T$:':"OBJECT: TO SKI THE FACELESS RACER DOWN-":"HILL THRU THE 10 SLALOM GATES HE WILL":"ENCOUNTER, PLACING THE RACER AS CLOSE"$t'"TO THE CORRECT (GREEN) SIDE OF THE GATE":"WITHOUT HOOKING A GATE OR MISSING IT.":"USE PADDLE (10,L12Y:SKI:L4,L5Y:L7,L8YC#I19ĠPOL:L1,Y:L11,YZ#Y39::I15000:#21:::I14:" >>>>>>>>>> W I P E O U T <<<<<<<<<< ":: $I13000:"$::"AFTER YOU PICK YOURSELF OUT OF THE SNOW WILL YOU RACE AGAIN?(Y OR N)";A$#I9ĠMIT:L1,L2Y:SWT:L4,L8Y:MIT:L10,L11Yi#I9I12ĠPOL:L1,Y:L11,Y:SWT:L4,L8Y#I11I16ĠPOL:L1,Y:L11,Y:SWT:L4,L5Y:L7,L8Y#I15I18ĠPOL:L1,Y:L11,Y:BOT:L4,L5Y:L7,L8Y%#I18ĠPOL:L,L2Y:LL7Y!I18I48ĠSNO:0,39Y-YYI:3 I(# WIPED OUT RACERb*#I039:6:0,39I:~-#I016:6:L,L8YI:2#Y40:L157#:16301,0<#I3901:YYI#I0I8ĠSNO:0,39Y#I8ĠSWT:L1,L2Y:L4,L8Y:L10,L11Y711I16ĠPOL:L1,Y:L11,Y:SWT:L4,L5Y:L7,L8YuI15I18ĠPOL:L1,Y:L11,Y:BOT:L4,L5Y:L7,L8YI18ĠPOL:L,L2Y:L10,L12Y:SKI:L4,L5Y:L7,L8YI19ĠPOL:L1,Y:L11,YI6I8ĠCRS:L6,YI7ĠCRS:L5,4ĠFAC:L6,Y'I5ĠSWT:L3,L9YAI6ĠSWT:L2,L10Y[I7ĠSWT:L1,L11YI8ĠSWT:L1,L2Y:L4,L8Y:L10,L11YI9ĠMIT:L1,L2Y:SWT:L4,L8Y:MIT:L10,L11YI9I12ĠPOL:L1,Y:L11,Y:SWT:L4,L8Y7I::"TOTAL CLEARANCE = ";SUM;" INCHES":::x"DO YOU WANT TO IMPROVE ON THIS RUN?":"(Y OR N)";A$:A$"Y"ī1000~ @ STAND UP RACERJL15TI047:YYI^I0ĠTAS:L6,YhI1ĠCAP:L5,L7YrI1I4ĠFAC:L5,L7Y|I:SUMSUMT(I)::7100_::T(GT)0āI1GT:"CLEARED GATE ";I;" BY ";T(I);" INCHES":"YOU MISSED GATE ";GT1;" BY ";D2;" INCHES.":"YOU ARE AUTOMATICALLY DISQUALIFIED !":::"DO YOU WANT TO RACE AGAIN? (Y OR N) ";A$:A$"Y"ī10000G,G1Y17:" X SCORING ROUTINEN bY3Y9Y15Y21Y27DG(L6):7040 lY6Y12Y18Y24Y30D(L2)(G1):7040 v D5ī7050 D6D1ī9000GTGT1:D0T(GT)D2:GT10ĉ::I1GT:"CLEARED GATE ";I;" BY ";T(I);" INCHES"2Y8Y14Y20Y26Ġ4:Y17,Y18G:1:Y17,Y18G1:z Y5Y11Y17Y23Y29Ġ1:Y17,Y18G:4:Y17,Y18G1:  p ERASE GATES Y1647Y1747ı Y3Y6Y9Y12Y15Y18Y21Y24Y27Y30ī6100  SNO:G,G1Y16:7Y:SKI:L3,Y:L5,YO I11ĠMIT:L1,L2Y:L6,L7Y:SKI:L3,Y:L5,Y}  I0I11I17ĠSKI:L2,L3Y:L5,L6Y  YYI:: I016:SNO:L,L8YI::  GATES Y1747Y1847ı G(39(1)1):G9G9 G30G309 Y16:YYI> I2ĠPOL:L,L2Y:L6,L8Y:SKI:L3,Y:L5,Y} I1I2I6ĠPOL:L1,Y:L7,Y:SKI:L2,L3Y:L5,L6Y I5I9ĠSWT:L1,L3Y:L6,L7Y:CAP:L3,L5Y:I7ĠTAS:L4,Y I9ĠSWT:L1,L7Y I10ĠSWT:L1,L2Y:L6,L13:MIT9:SNO15:FAC11:BOT4:CRS22 :16302,0K I047:6:0,39I:Y Y0:8000t I047:SNO:0,39I: Y031 3000:7000:6000:5000:4000:I11000: :: DOWNHILL RACER L((0)6.5):L0L0 L31L31 I0  12000(d >>>>> SKI RACER <<<<<>n PROGRAMMED BYRs PEL WHITINGlx FOR THE APPLE COREr}}T(10):"INSTRUCTIONS? (Y OR N)";A$:A$"Y"ī10000 INITIALIZATIONG0:GT0:D0:T0:SUM0" SKI2:POL0:CAP9:TAS4:SWT!! ! ! ! ! !!!!!!!!!Π]ԠQή]e]ΠϠŠŠƠΠϠҠŠƠӮ ]F]ԠĮԮҠӠŮ]M]͠ĠàŮ)r`.?6@r$|t`.?6@r$pv]̠ĠŮxd6?eM6[zd6?eK_x |\zo "~P a(ŠĠ)Q]ԠҠŮP;@ra@ a()[]ĠԠ)\$`@p(٠ΠҮ)\b@p(٠)\d]0fc@p(ĠŠŠΠŠ)\h@p(Ơՠ)\j]l]ŠŮ$noa(ӠŠçϠ)1poa(ӠŠŠҠϠҠŠ)\p_x)UVWfijkM6YAa(ՠĠҠנĠΠŠ)UVW M6YUVWY_x_|X]ɇŮZN@"(r\z\]ŠŠŮ!^o@p(ϱ`%q!|`'$`$0`$`$`$`$Y&`$`'$_-`$`$`$_`$_`$_ q)a(Ū)FE(m'n'#q/?"rq/?rq UVWfq"lmnlm&n\ ,f\6q.?6@rd6?e;`$|$@`1$J`2$T`3$^Jq_hTq_h^q_h hf\!r`%qŠΠӠٮ)cda(Ҡ̠ƠҠź)a(ŠР)a(ŠԠ)a(ŠΠ)5cca(͠٠ΠҠҠ)c]Š\p[M6f*ij'kij'k'lM6Y[Poa(ҭԠ)c+a(ŠԠƠӠŠӠϠ)"a(ҠŠĠנٮ)a(ԠΠŠŠ)c,a(šŠĠŠРϠ)+a(٠ӠΠҠȠϠٮ)+a(Ҡ٠/ 2\X dqn\ xL\_6ijklmnlmn[ qfghghHqghghfghgh`$[AUVWq/?r q/?$rf gh"" " " " " """"