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`,"POKE 809,0";:30:"POKE 827,0"*22:I;:A$::3:Tt19:"APPLE";:33:"CASSETTE":4:18:"SPEAKER";:33:"SPEAKER"::~:"SOUND ON","POKE 801,48";:30:"POKE 817,32"::"SOUND OFF","POKE 801,0";:30:"POKE 817,0" :"OVERTONE ON","POKE 809,48";:30:"POKE 827,32"::"OVERTONE OFF"1 AND T2) MAY BE SET TO ANY DECIMAL NUMBER BETWEEN .01 TO .99 TO ACHIEVE SPECIAL SOUND EFFECTS.":`"ALSO, ITS POSSIBLE TO MOVE T1 FROM SPEAKER TWO WITH A POKE 809,32 ETC." j:"PRESS ANY KEY FOR LIST OF POKES TO CONTROL SPEAKER MODES."CTAVE & A OF THE SECOND OCTAVE PLAYED FOR 1/2 COUNT DURATION."kG:"PRESS ANY KEY TO CONTINUE";:A$::8L"THE VALUE FOR T MAY BE SET TO ANY NUM- ICAL VALUE BETWEEN 1 AND 250. SETTING T TO 53 PRODUCES 64 QUARTER NOTES PER MIN.":eV"OVERTONES (TEQUAL TO N."::"2. SELECT SECOND NOTE OF CORD EQUALTO NN."::"3. SELECT DURATION OF CORD EQUAL TO T.":8"4. GOSUB 20 TO PLAY CORD. FOR EXSAMPLE:"::"100 N=C/S3:NN=A/S2:T=HA:GOSUB 20"::"IN LINE 100 TWO NOTES OF THE CORD ARE">B"C OF THE THIRD O BEATS PER MINUTE)."s:"IF A SINGLE NOTE IS DESIRED RATHER THAN A CORD, MAKE BOTH NOTES N AND NN THE SAME."$:"PRESS ANY KEY TO CONTINUE.";:A$::2)"PROGRAM MUSIC LINES USING THE FOLLOWING FORMAT:"::i."1. SELECT FIRST NOTE OF CORD HEN '/', FOLL-OWED BY SCALE. FOR EXSAMPLE: C/S2 WOULD BE THE C NOTE OF THE 2ND OCTAVE."" DURATION OF NOTES AND REST ARE 'WH' (WHOLE NOTE OR REST), 'TH' (3/4 NOTE), 'HA' (1/2 NOTE), 'QU' (1/4 NOTE), 'EI' (1/8 NOTE), SI(1/16 NOTE) ETC. (BASE ON 10012::"USER INSTRUCTINS"::"PROGRAMING CORDS: MUSIC NOTES ARE C,D E,F,G,A,B. SHARPS ARECS,DS,ETC. OCTAVE SCALES ARE S1,S2,S3,S4S5. (S1 THE LOWEST SCALE & S5 IS THE HIGHEST PITCHED OCTAVE).":W"NOTES ARE PROGRAM FIRST, T4+"RANDOM VARIATIONS OF 'BARCAROLLE'"4475[19::10:"PRESS ESC KEY TO STOP"a}KEY(16384):16368,0KEY15557021::9:"PRESS RETURN TO CONTINUE"KEY141635<<<<>>>>:2: TO END, PRESS 'E'";:A$:A$"E"Ā7SA$"I"ī1000JT22:958:590RX10l" CONNECT SPEAKER TO CASSETTE RECORDEROR COMPUTER HIFI AMPLIFIER (SEE INSTRU- CTION SHEET). TURN ON CASSETTE RECORDER IN 'RECORD' MODE."v650:680:630{:7:RAM:"::6:"1. DELETE LINES 100-700":6:"2. BEGIN HIGHER THAN LINE 50":6:"3. SEE USER INSTRUCTIONS"oF14I" FOR BEST RESULTS CREATE PROGRAM IN OCTAVES S1,S2,AND S3 WHEN USING OVER-- TONES."%N22:1:"FOR USER INSTRUCTIONS PRESS 'I' FACTOR=";WF;" ") OCTAVE SELECTIONFX(3(1))1:XWWī541OWWXX545,546,547:16:13:"OCTAVES=";S2;" AND ";S3;" " 550!S22:S32:"S21:S32:#S22:S31:&6500400::8gD" TO DEVELOP YOUR OWN PROG:T2T2100:14:4B"HAVE ENVELOPES T1=";T1;" AND T2=";T2;" "X TEMPO SELECTIONzX28(((1)10)):TEMPOX:1810:11"TEMPO=";(((TEMPO33).56)100);" BEATS/MIN " VOICE SELECTION:WF((1)81):VOICE,WF13:"VOICE:NNAS2:20)NGS3:NNCSS3:TQU:20FNFSS3:NNAS2:TEI:20cNFSS3:NNDS2:TQU:20NFSS3:NNAS2:TEI:20NFSS3:NNDS3:TQU:20NFSS3:NNAS2:TEI:20T1(1)25T2(1)25T1(T1100):T1T1100:T2(T2100)S2:TEI:20(NGS3:NNDS3:TQU:20FNFSS3:NNFSS2:TEI:20^NFSS3:NNDS2:20uNES3:NNDS2:20NGS3:NNAS2:20NGS3:NNCSS3:TQU:20NFSS3:NNAS2:TEI:20NFSS3:NNDS2:20NES3:NNDS2:20 NGS3SS3:TEI:2030-NBS3:NNFSS3:20ENBS3:NNFSS3:20M30dNAS3:NNAS3:20|NAS3:NNFSS3:2030NBS3:NNBS3:20NBS3:NNFSS3:2030NAS3:NNAS3:20NFSS3:NNDS2:TQU:20 NGS3:NNFS SCALE NCS2:NNAS1:205 NDS2:NNBS1:20L NES2:NNES2:20c NFS2:NNDS2:20z NGS2:NNES2:20 NAS2:NNFS2:20 NBS2:NNGS2:20 LT1T25 NCS3:NNAS2:20  BARCAROLLE MUSIC DEMO NAS3:NNF10:10:"THE STEREO GENERATOR"% xD :11:"COPYRIGHT 1980 BY"J m 8:"DANDELION MICRO PRODUCTS" ::6:"PUBLISHED IN SOFTSIDE - 9/80" 190:T10:190:T1.02:190:T1.03:190:T1.01:190:T10:T10:LT1:190 I11000:I::600 SIQU4:PLAY864:U VOICE27:VOICE,2:: POKE VOICE,NO.1-8 TO CHANGE VOICE FACTOR N1,N:N2,N(T1N):N3,NN:N4,NN(T2NN):TD,T:PLAY  TD,T:REST  2 PREFIX LINES 0-50 P INTRODUCTION OF PROGRAM d iT3:T1.01:T2H2 nD25  234, 165, 6, 166, 27, 74, 202, 208, 252, 170, 165, 8, 164, 27, 74, 136, 208, 252, 133, 31, 165, 7, 168, 165, 9, 133, 30, 165, 25, 133, 29, 76, 2, 3 REST836:H2.004:H102:T1H2:T2H2:TEMPO33:18:19:50 QUTEMPO:HA2QU:WH4QU:EIQU2: 6K$"3"B$"DELETE"& @I:1:868K J" PRESS 'LETTER' YOU WISH TO ";Y TK$"3"ğp ^B$;::198:BELLy h240 rISL(K$)65 |X(L(I)2) X194B$"RUN"B$"BRUN" X212470 N$"" J433 N$N$((L(I)J)) J + :(I770896:J:I,J:ZZJ: 202,240, 27, 136, 240,32, 198, 31,240 , 36,198,30,240,42,198, 26,240,3,76,2,3,198,25,208,231,76,81,3,234,234* 173,48,192,166,6,76,5,3,173,48,192,164,7 ,76,8,3,173,32,192,165,8,133,31,76,12,3,173,32,19          A","GOOD EFFORT AND DISIRES TO REMIND YOUR","OF YOUR RESPONSIBILTIES WITH THE","TITLE 'IMHOTEP-HORUS-WATCHES'.":IM$"IMHOTEP-HORUS-WATCHES"'Z"HIT ANY KEY TO CONTINUE ";:A$: ZOAH IS DISPLEASED WITH YOU AND","DESIRES FOR YOU TO SUFFER DISHONOR","OF BEARING THE TITLE'IMHOTEP THE","'INCOMPETENT'."&K(N7)(ER3)(P300000)(S1000P50)ERER1:IM$"IMHOTEP THE INCOMPETENT":1370'PIM$:"PHAROAH FEELS YOU HAVE NOT PUT FORTHPEFORMANCE SO FAR AND BESTOWS A GREAT","HONOR ON YOU. FROM THIS MOMENT YOUR ARE","KNOWN AS 'GREAT LORD IMHOTEP'."%A(N20)((N10)(P300000)(S1000P)(ER2))ER1:IM$"GREAT LORD IMHOTEP":1370x&F(N7)(ER3)(P300000)(S1000P50)ĺIM$:"PHAR"IMHOTEP"$TZ1ı/$ZZ05000:ZZ:TZ1:B$ REWARDS ETC.$2::61:16)"JUBILEE":"IT IS TIME FOR PHAROAH'S JUBILEE.","YOU HAVE USED HALF OF YOUR TIME."q%<(N200)((N10)(P300000)(S1000P)(ER2))ĺIM$:"PHAROAH IS PLEASED WITH YOUR":"621:33,3821I#5,938:5,933:4,834:6,835:7,936:27,339:32,8#27,305:30,316:31,326:26,2819:25,2620:36,3719:36,3720#1:XP16:35XP,9XP:37XP,9XP:39XP,9XP:XP#XP14:39XP,11XP:XP:38,14:37,15 $21:16)9ZP:3ZP,9ZP:ZP:8,10J"YP13:ZP1YP21:2ZP,16ZPYP2:ZP,YP"3:3,616:3,517:3,518:8,1316:10,1317:11,1418"28,3116:27,3017:27,2918:35,3816:35,3817:35,3718#9:33,371:33,382:33,343:36,393:36,394:23,2#!INTRODUCTION & ANNUAL PICTUREF!9:4,81:8,122:12,3:7,83y!2,96:5,97:2,95:2,94:2,93:3,92:1,4!8,129:4,519:4,520:15,1620:14,1519:3,821:14,1921!1:13,155:15,6:5,2113:11,152:11,1539"ZP16:5ZP,TH OF THE WORK","FORCE WAS LOST.":HH3:420: N20:690V HERE ARE THE OVERSEERS  "MENE-PTAH","RA-ANX-TETA","ATUM-ATON","SETEP-EN-RE","RAMOSE","MERI-ATUM","KA-RES","MAATTUM","MERI-TEHU"  "TOTHMES","RE-MES-SES","PTAHMES","MERIPASHTU"!:S'S VICTORIOUS ANUBIS SQUADRON."/BU1U:WWU:L1190VB$:"THE GREAT ZOSER HAS CHOSEN ";B$:"TO BE YOUR NEW OVERSEER.":HH6:420jZ((1)22):NNZ:WW(W.25):MWP:NNNNNN, tZ;" COURSES OF THE PYRAMID HAVE":"COLLAPSED AND ONE-FOUR:V1V:WWV:"A FANATILICAL REBEL-PRIEST HAS ESCAPED","WITH ";V;" WORKERS INTO THE":"WILDERNESS OF THE SINAI.":HH3:W0ı$U((1)100):"THE WORK FORCE HAS REVELLED. ";U."WORKERS, AND ";B$;",THE OVERSEER,":"WERE KILLED BY" 8"PHAROAHCHANTS HAVE BROUGHT ";V:"STOREHOUSES OF GRAIN TO TRADE FOR":"METHODS OF BUILDING AS PRACTICED IN","KHEMI.":SSV:HH4:V((1)100):"THE PHAROAH'S NEW SYRIAN BRIDE BROUGHT","A DOWRY OF ";V;" STOREHOUSES":"OF GRAIN.":SSV:HH3:wV((1)W)RD":I11I2:I1N"AND MASTER, ZOSER, THE GOLDEN HORUS.":I11I2:I1:660V((1)50):"A MILITARY CAMPAIGN LED BY ZOSER HAS","BROUGHT AN ADDITIONAL ";V;" TEL":"OF LAND INTO THEN DOUBLE-KINGDOM.":DDV:HH3:510zV((1)5020):"MINOAN MERFROM THE NORTHERN SEA","HAVE RAIDED THE DELTA ";Q:"PEOPLE HAVE BEEN KILLED.":V1Q:HH3:fI22000"IMOTEP,YOU HAVE FULFILLED THE WISH":I11I2:I1"OF PHAROAH. YOUR REWARD IS THE GREAT":I11I2:I1"BOON OF BEING ENTOMBED WITH YOUR LOITH CHARIOTS AND BLADES OF","BLACK EVIL METAL HAVE ATTACKED KHEM.",Q;" PEOPLE HAVE BEEN KILLED.":V1Q:HH3:V((1)50):"NUBIAN EMISSARIES HAVE BROUGHT TRIBUTE","OF ";V;" STORE HOUSES OF GRAIN.":SSV:HH2:510ZQ((1)P):"ACHEAN BARBARIANS OUR HEAD.":6600 YOU KILLED TOO MANY PEOPLEy"ZOSER WANTS YOU MUMIFIED ALIVE INT THE ","HOUSE OF THE DEAD.":660Q(1)(P2)5:Q(Q.5):"A PESTILENCE DESCENDED FROM AMEN-RE.":HH1Q;" PEOPLE DIED.":V1Q:510mQ((1)P):"HYKSOS WAM ";B$;"YOUR NEW OVERSEER.":"NOW...":290f"THERE IS ONLY ENOUGH GRAIN TO PLANT ";S1001:"TELS.":ERER1:S10010901g290p"THERE ARE ONLY ENOUGH PEOPLETO PLANT":P10;" TELS.":ERER1:290z"YOU HAVE RUN OUT OF TIME, ZOSER WANTS","Y",":"DO NOT JEST,":"THE HAWK'S EARS ARE SHARP.":ERER1:200n4IM$;",":"I, ";B$;", WARN YOU NOT":ERER1>"TO MOCK PHAROAH ZOSER. HIS FLAIL IS","SWIFT.":250HIM$;",":"PHAROAH HAS KILLED ";B$:"YOUR OVERSEER.":ERER1R1190+\B$:"I 150:PA:EE&EE1:FF1:YY1:G/NNN=N20970C_PUNISHMENTS FOR ERRORS IM$;",":"ZOSER HEARD YOUR FOOLISHNESS.":"HE HAS EXILED ";B$;".":ERER11190 B$:B$;" HAS BEEN ASSIGNED AS OVERSEER.":"NOW...":180>*IM$;M0"IMHOTEP WILL YOU TRY AGAIN? (Y/N) ";:V$>V$"Y"ĬPV$"N"ĉ::Y660l DRAW PYRAMID::1200:13:E0:F39:Y39N0ıNN0āG1NN:E,FY:EE1:FF1:YY1:GGNN1N:EEEF EE,Y:SD(16336)(16336):PAST.":6602lH2ĺIM$;",":"AN UNEVENTFUL YEAR."em(H8)(H14)ĺIM$;",":"A VERY EVENFUL YEAR."p"PRESS ANY KEY TO CONTINUE ";:A$qT6İ1330v690T12890S(S10.5)10:D(D10.5)10:P(P10.5)10:150 END OF PROGRA(H10)ĺ"THE MELTING SNOW OF ETHIOP SWELLS THE","NILE THIS SPRING.":HH2X(N10)(T6)(ER3)(N20)ĺ"PHAROAH IS BOTHERED BY YOUR INEFFICIENCY":HH2 bER7ĺ"HE HAS DECREED, THAT FOR YOUR MISTAKES,","YOU WILL BE EXILED TO THE RED LAND OF","THE EA&PRLMU1V1'U10:V1080N(N(W(WM))90000)G:N20N20D(N21)(N0)ĺ"THE WORK FORCE HAS COMPLETED ";N:"COURSES OF THE PYRAMID."N(N21)(D1000)(H10)ĺ"THE VIZIERS PREDICT A POOR FLOOD NEXT","YEAR.":HH2IO(N21)(D3700)530b (ER0)(O1)ĺ"THE PRIESTS OF AMEN GAVE ZOSER,";O:" STOREHOUSES OF GRAIN.":HH1:540pO2ī540ER0ĺO;" STOREHOUSES OF GRAIN WERE CLAIMED":" BY THE PRIESTS OF AMEN.":HH1"THE POPULATION INCREASED BY ";R:" PEOPLE."1010Q8920-WA(1)300:WA19İ940?WA282İ1040[(WA210)(WA165)İ960w(WA75)(WA130)İ1020(WA255)(WA260)İ1030 YEAR'S PROGRESS REPORT"THE HARVEST THIS YEAR WAS ";K10:" STOREHOUSES PER TEL."ER01)50):(Z9)(N4)11303K(1)3.5:SS(B100)FNT2ERER1wER0O(((S((1))(ER4))2)):O2SSOER0O(S((1))10):SSOS0S0SS((BK)10):TT1D((1)4000(O.5)):Q(1)30:Q22950(Q12)(Q18)1000:MW0MW,rLJ1000:RLP:R0R0A|RR((1)1000)xPL0ĺ"YOU HAVE STARVED ";PL;" PEOPLE.":ERER1LP0LPPLP.45900U((1)40):U41050(MW)0ĺ"YOU HAVE STARVED ";WM;" WORKERS.":ERER2:1050Z(((S);" REMAINING STOREHOUSES,"S "HOW MANY WILL FEED ";(P):"REMAINIG PEOPLE ";Jh (JS)(J0)820r SSJ ":"FROM ";(D);" TELS,HOW MANY DO YOU" ,"WISH TO PLANT ";B @BDB0840 JBS100870 TBP10880 ^::H0:61hMIREHOUSES.":"NILE FLOODED ";(D);" TELS OF LAND."` :"# OF PEOPLE YOU WISH ON WORK FORCE":Wu (WP)(W0)780 :"FROM ";(S);" STOREHOUSES OWNED BY RA," "HOW MANY WILL FEED WORKERS ";I (IS)(I0)810 PPW:SSI :"FROM "; IS TO OBEY YOUR COMMANDS."::E :"HIT ANY KEY TO CONTINUE";:A$K X T0163a 690 21:"WORK SITE AFTER ";T;" YEARS." 162:163 I115000:I1: ::5 "POPULATION OF KHEMI - ";(P)1 "PHAROAH OWNS ";(S);" GRAIN STOUS,":" BULL OF KHEM,++++"@ Z:"TO IMHOTEP, MASTER MASON:" d"IMHOTEP,THE PHAROAH HAS COMMANDED A","PYRAMID TO BE BUILT. THE HORUS DESIRES","THIS GLORY TO HIS NAME TO BE FINISHED","WITHIN A PERIOD OF TWELVE YEARS." "YOUR OVERSEER IS ";B$:"HE8)"*****":17)"*******":16)"*********":::] F17)"IMHOTEP":13)"PYRAMID BUILDER":: K"WRITTEN BY: TERRY CLARK":"TRANSLATED TO APPLE BY: M.P. ANTONOVICH":::61 PI215000:I2: R5 U"++++A DECREE FROM ZOSER,":" THE GOLDEN HOR- IMHOTEP-PYRAMID BUILDER * VERSION 2.5^ COPYRIGHT (C) 1980 TERRY CLARK COLUMBUS IN| SEE 'SOFTSIDE' OCT.1980:::1200:NN02B$:P300000:D2500:S330:T0:W0:ER0:N0:IM$"IMHOTEP"<::61:70/ =20)"*":19)"***":1                      ]͠٠ ]ӠΪ ] ]Šŧ ]ЮŠŠӠϠԠ)c, a(ҠԠӮ٠)cm a(ΠȠŠӠŠ)ca(Į)cca(ՠ̠ŠŠΠŠӮ)* o8rS(ӠΠΠ)&@[ ]̠ ]UVW X de de2 de8 8r r2$ de88r r . YYY 8 deB [1 M6oP a(Ӡ)cc. a(ŠԠVWPX(UVW XUVW Xdede2de88r r2de88r r YYY dxeUVWX(UVW Xqqqq<\R!>q-q"q`_>@q"q"q"_FBq"qq_FDqqqF\RH_RUVWX\dededefdededepY zde[U_(&qqqq(\R!*q)q"q _*,q"q"q"_2.q"qq_20qqq2\R!4q"qq@_4 6q"q"q"q_< 8q"q"qq_<:,ed-ed.ed/eK d0eLd1e d2ed3ed4ed5ed6ed7e9d8ed9ed:eLd;ed<ed=e`! q"qq_  "q"q"q"q_( $q"q"qqdededededededeyKdedededededededeKd ed!ed"e d#ed$ed%e d&ed'eKd(ed)ed*ed+ed%a(ؠĠ̠)cS(ŠŠ)'`$[KdedededededededeKded ed ed ed ed ededeKdeŠ)'`$ \_,a()IH()Icc_6 q`$a()IH()I(a(ؠנӠ)_a()IH()Icc_6K M6QK M6o%q`'%q' rghfgh\_h tghvUVWq.?6?rYx`$ zq|`$~a()IH()I(a(ؠŠӠ)S(ҠŠٯΩ)&@`@*r9()$/S(`6($jq6qVj`=>r$rq6qq`8r %qqlq.?6?rq.?6?rYnq888882?r r rr rr`%q`6%q6*pq`J`.?6?r$NLqq6N[PYRf TghVUVWX\Z\B\Y^`$b`_6 b`.?6?r.?6?r$fd_6fqqqqahfqqqq`'$t ! q8 r 8r@ "de $d e &de(M*[ ,q.qq0a()IH()I2c4c6f 8gh:UVW<\>\B@_PB`$ND`.?6?r$JFqqH_N5dJedKede.?Jrde.?Kr\ ] \\Lf UVW' ij'kY_,q82?r r q8 r 8r de d e deMq82?r r          ΠϠή)&@ [ŠӠϠŠҺ) c\ P a(Šά)P a(ĠΠΠ٬)P a(ŠŠ׬)v P a(ŠŠή)ca(ŠΠŠĠŠĄ̇̄)a(٠ǠΠҠĠҮ)" cS(ŠǠӠΠҠԮ)T Pa(ƠՠŠΠĠҬ)a(ŠӠΠάĠՠ)x a(ĠŠӠĠҠή)a(Ơՠ̠ϠĠȬŠ)a(ŠĠՠŠҠΡ)+ ca(Šd ed ededededeLdedede`[ ]Ӡ o ccP Pa(ŠŠӠƠӠέ)a(٠ΠĠӮ)Y Pa(ŠԠƠŠŠӠϠĮ)a(ҰedeMY[9 M6o8 ra(ӠҠǮŠŠ١) Q ]ӠҠŠ ]ŮŠ ]ŠĠT dede0dededededed ed e_ d er c& a@GPb-rGP!b-r o 7 @p(ŠĠΠ)\ bG@p()\  \/ oP@p(ҠſٯΩ)\ R@( `@9()$`@*#r:()$_  ]ԠȠ5 UVW;@ra@*#rGdX'F ij'kdedeMP YZUVW,YZ KM6`$ %d UVW-rq-r-rY0n Pa()GPa()GP a()0x Pa()GPa()GP a()& a@GPb-rGP!b-R@c `;@r$  \ _  @p(ĠҠ)\ R@ `;@r$  \ _  q`@9()%q _ ! a(ŠϠŠ)c]̭ [ d"eM6)( @p(ӠΠҠ)\ R@2 f< UVWUVWqf-rUVWlmn#qdedeM"Y-ırq]ҠӠ[] KM6#a(ά٠Ӡ) \ M6 P a(Ӡ) cc! @p(ԠҠ)\ ]ΠҠׯfUVWX6lmn&de deM0Y:-rq]ҠӠD[N]ŠӠׯXqf-ұrbUVرWرllٱmٱn#vqdedeMY-rqVW#-rqY]ĠӠ]Π٠Ӡ]ϠРΠ]ԠӠӠƠ]ӠԠŠ]ӠΠبDUV$WX6q/?r-rq-rUVW-rq-rYZ[-rq-rq-rq-rq -rq^L&hUVW#f-rij$kY0rfUVW$Xij$klm$nY)|oUVW"XPbGYd"e[]٠ǠӠĠ]ƠȩUm'n&ij'k&q`-r$"8oPa(٠Π)GdedeMPM6d_"q`$6+,ұqرqٱqıq]ŠԠ6[@]ԠJ]נӠԠ٠èET-rq fijk&`.?6?r$`2?r$fij'k&_ ]Ԡ"q2?rqf-rlmn&`.?6?r$`2?r$flm'n&_?fl6 FfNPUVWXlm$nlm$nij$kij$k"Zde8rde M dYZZ/n-rq-rq`$ x_]ԠҠՠ̧]Ԡ"q2?rqr$]Ϡ__BUVWY\NY_8]]ĠƠΠ]]ӠҠM6o_   a@G[ a@G[]ŠȠΠ(]ĠŠ2UVW<UV WXqq\@]$]ΠΠ.]8UVW]нB\Lq]ĽҠϣV\!`-rq-r]ŠȠj\6t\-r]ԠŠΠĠŠ~`$Vq!`-r-UVWlmnYf%@ijklmn/BghghghghCfghDUVWFfghghGUVWAYHfghghIfgh5JUVWdede4/)flmnfijk*UVW+fijk,fgh-UVWY).fijkf gh6UVWY7Y)9fijkfgh;[<@p()\4_]Š@p()\41fijkghgh'fghf gh qUVWfghq/?rf ghUVW<Y Y'[(@p()\ ]]٠Ӡ]٬]ŠŧǮ9O4rD4$rD4rD4(rD4rD4(rD4 r$N@"rC@"(rC@"(rC@"r'O4r-rq-rq M6\ ]\                     0`$& :d6?eD[TNdede0dededededed ed e_Xd ed ed ededededeLdedede`[)^`%a(š)hc rd6?e|S(Ҡſ)&@`@*#r9()$tK M6Q f-r\ de-r deMf\[UV6WijkY[&q.?6@rǠ)FE()G`%a(ƠĠġ)"`%a(Π),`%a(Š)"6` %a(Ӡ)+@`  %a(էŠŠӠ)&J`  %a(٠)%T` %a(ԧӠϠΠР PUVWZ-rq/?r dUVW nq-rx\Y UVW\&\`-r$Y UVWYY%a(̠̠ĠƠŠӠ)a()_ha(ҡҡҡ)a()a()ccfUVWUVWXijklmnYY-rq-rq -rq -rq -rq`(-rqL2-rq@<-rq9F]ŠӠ)c0$a(ĠƠՠŠԬϠӠ)c0.a(ԠŠŠĠĠנŮ)c-8a(Š̠ՠӮĠˡ)Bo&La(ŠӠΠΠ)GVR@`\NjLtUVW~cY(a(N@" rO4rD4r qX qd q O4rK M6cP a(ϠӠ) ccc0a(ϠӠӠŠŠ)c.a(ĠӮՠԠҠ)c1a(ŠĠԠԬǠ ]*]ԠΠ4]>]͠ĠH]R]ΠŠ\]f]p]z]ϠӠ]   ٧Ġĩ)a(§ˠө) ='d e)B'oPa(Ӡ٠٠Ϡξ) L'q.?6@r V'`$L'd6?eM6[ a()Gd2e?a(͠Π)Gd2ea()($'oP a(Ġө)ccf.'d e ca(Ч)a(ƧԠ)a(̧Ԡ)a(ҧԠ)a(ͧȠ)]8'a(ç)a(ħ)a(ȧ)a(ѧ)a(#dJedKe <#dede F#qqBP#qdqq,qqqqqq%Q#qḺq~qұq,Z#UVWoa()Y d#qLn#_'Q'M6]C'oP)_/a(ӠՠŠŠŠ)E@ q0a(Ϡ٠ΠӠЧƠԠԠѧ)G[@]Ԡ.BUVW q.?6?rUVWYY['Ja(ȠԠԠ٠Š)K[(#]2$`x$|`P$h`($TT@a(ӠԠ)E@a(Ҡ٠ӠՠӠ̠)G_ed?edBedCeM6Pd6?eL*Z`!$\`]͠ŠԪ]̠]Ҡ]Ӡ®î]]]Šŧ]Ŭ٠Ǡ \']Ġ_(#q.?6@r`$< ccc`%qh       "n"THEREAFTER,YOU MAY MOVE RIGHT,LEFT, OR"::"DOWN, YET NEVER INTO A PREVIOUSLY OUCC-"::"PIED SQUARE."24:"PRESS ANY KEY TO BEGIN.";:A$$EVE A SINGLE COUNTER UNTIL IT REACHES"::"THE GOAL AREA AT THE BOTTOM.":5);"YOU MAY CHOOSE WHO GOES FIRST BY"::"TYPING '0' FOR THE COMPUTER TO GO, OR A":"NUMBER 1-6 TO MAKE YOUR FIRST MOVE INTO"::"ONE OF THE SIX POSITIONS IN THE TOP ROW.32,36R"";$\T1100:T:780Pf0::F16:G15:6F1,6G3:G:F:wp::14:10);"WELL I ENJOYED IT":z:10);"HOPE YOU DID TOO!"::::1:9);"<<< INSTRUCTIONS >>>":G5);"IN THIS GAME YOU AND THE COMPUTER"::"MO880,*6:32,376:5,32:5,37:7,32:7,37432,3415:34,3616:16,2236:17,37:20,37:15,34:15,35:33,3622:32,3423:19,34:19,35:18,37:21,37>32,3726:25,32:25,37:27,32:27,37H32,3729:32,3733:30,33:30,34:31,34:31,35:32,35:;C$:(C$)3240((C$)278801720o870::::" THE SCORE: COMPUTER - ";CG;" PLAYER - ";PG:"SPACE BAR TO PLAY : 'ESC' KEY TO END"; 0:I3138:3,37I:I:T1200:TX(16384):X160Ĺ16368,0:40 X155Ĺ16368,0: CAN'T MOVED THERE; THAT'S WHERE":"THE COUNTER WAS JUST MOVED FROM."N520` PLAYER WINS{0:Z16:6Z1,27:Z::7)"YOU WIN. YOU MUST BE LUCKY!":"THE SCORE: COMPUTER - ";CG;" PLAYER - ";PG"SPACE BAR TO PLAY : 'ESC' TO END"G$"D"R5RR1:A(R,C)1:490<bG$"D"R5PGPG1:690llG$"U"ĺ::" YOU CAN'T GO BACK UP":520v::::" YOU MUST EITHER USE 'L' OR 'R' OR 'D'";:530:::"YOU CAN'T MAKE THAT MOVE. IT'S OFF":"THE BOARD."520E:::"YOUROUR GO":2:"INPUT AN 'L', AN 'R' OR A 'D' ";:G$jG$"L"C1A(R,C1)0CC1:A(R,C)1:490~&G$"L"C16400G$"L"A(R,C1)1660:G$"R"C6A(R,C1)0CC1:A(R,C)1:490DG$"R"C6640NG$"R"A(R,C1)1660XL:::" T H E C O M P U T E R I S"::" T H I N K I N G";]T11000:Tw870:13:6C1,6R3T1100:T:510 PLAYER'S GO PLOTTED870:13:6C1,6R3:T1200::310 PLAYER'S GO::" IT'S Y) hA(R,C1)0C1CC1:A(R,C)1:440B rRR1:A(R,C)1:440R | MOVE LEFTw A(R,C1)0CC1:A(R,C)1:440 R4J(3(2)):J1RR1:A(R,C)1:440 A(R,C1)0C6CC1:A(R,C)1:440 RR1:A(R,C)1  COMPUTER'S GO PLOTTEDN6N0ĺ::::240; N0C(6(2)1):A(R,C)1:440N CN:A(R,C)1:W "490k , COMPUTER'S GO 6R5CGCG1:760 @(C(C2)2)0390 J MOVE RIGHT TA(R,C1)0CC1:A(R,C)1:440 ^R4J(3((2))):J1RR1:A(R,C)1:440(N)280$ :"AN INTEGER ";:160e "ENTER AN INTEGER FROM 1 TO 6. IF YOUR WANT TO GO FIRST." " IF YOU WANT ME TO GO FIRST ENTER 0";:N (N)N260 : " E N T E R A N I N T E G E R" :" (BETWEEN 0 AND 6) ";:N 1035:33,375:35,3710D n14,1933:14,1937:33,3713:33,3719p x22,2733:22,2735:33,3722:33,3727 30,3537:33,3730 PG2ĺ"O.K. YOU GO ";:160 200 "-A NUMBER FROM 1 TO 6";:N N1N6ĺ:"NO - YOUR GO ";:160 NXXXXXXXXXXXXXXXXXX, 1000: INSTRUCTIONS4 :@ A(6,7)g (M106:M207:A(M1,M2)0:M2:M1s 2R1:C1 <::1:X2386:0,30X:X:31,392:31,3938 FY0306:2,38Y:Y:2,3839 P PRINTING 'GOAL' Z12 d5,1033:5,1037:8,z#Xǰ   ϠĠҠ !ŠŠ"̠͠ŠԠ ϠӠ Π" Ġ̠̩ Р! ΠҠ͠ ŠҠ̠ˠ̧ӠĠ!ΠǠϠ Үʰà* ՠɠŠӠŠŠ ˠ̠;/ ) ) "&6 B /`TLՆ8M˕  Tբ , Tզ`  . $ ; E.. 4L& >`Lk 34 Lh856!;<79)F:&8J9j*0v 婭   +<; LhLk'cg=%;!,<+k,w(gG gG]$ t < N8i| (|`ܠLդ4ɪ 4<`<  $ H h .Ю#` L}Э%J u ӊH Өh dѮ#` L Q ;Ү#` Q Ү#`#2 Ӎ'( H() 91 eȱm)h`JJ`#JȱJLh `#  <(eΨ=)eϰ%Hh>?iJK̅  #& ')*& "'JJ) ""% m% ʥ0)J!m%! `JJJJS)фPIȄR%*QTU'T8ePT UeRU QJJJ`JJJJS)фPIȄR%*QTU'T8ePT UeRU QJJJ` ӥ',"&,i8i#H&ii&hif&i'`'i,&i,.&iPII&&if&H !"hH8 H!S hIiHSQUhPTh !"IiR"fS8PQ% 8TeRTUU&E%0Q&&kS TePTUeQPفŴxaI1( &WSP& )`" !H)&JJ&&h' &' &' f&') &'#i%Ѕ0J$)` .ХQ&%0Q&&`$0JI0`'0% I`0 I0ܩ(ߠQ)'%01&*%0Q)&E%0*Q&&QeS)j00           ààH /Ѽdd`dЅ deԄ8ҍӍd`D}Tߥ҅ީd LԦ}dҍ` ǠҠÍǠԠÍϠٮɆ0&⽌D}T L֠ $Ȅф(0PLddLԩՠԑihL* ۄکڍ ȱڍ `D`ߠ h  *L`,0,0I,0`d hhLd t Ld L di#Ld)ʽdʽdȄф L Pd0G  @dd0 RHDThЮ$0lp  :DL DLld 4ILILHUЍ`(S(L Lީߩ$, Lީߩ$hL  % "  hH ބ ބߩdҩ Ȍ   B(20((A$)2)):B0B1( B:A$:)  :D$(4): CTRL-D92:A$"APPLE II":1000j(4:A$"DOS VERSION 3.3 SYSTEM MASTER":100027:A$"JANUARY 1, 1983":1000<D$;"BLOAD LOADER.OBJ0"F4096: FAST LOAD IN INTEGER BASICd(4);"BRUNMENU" CENTER STRING A$  hޤȄ h󰩠ɩch cɰ$0 $` d'ʅ˅LM&ȱϰqȥȥ`FLʥM˥J̥Kͩ`Lkȱ0@hJHȱШhЄ0)ȆȘHJI@hL`ȩ)?Jжi?oiO iȱ) zȵх 8 05X~")XȔ) v*Ȇ0LJɢ  Ȉ ϴX)HЄ ȹ)eHe0 ̥͐Eʑ˥ʥ˰ਈ$ u~q  u  mʥ` ȹ0 L uߙ`` $0LL*iS 0wh(VP`΅h(OM L6 T&ϐ eڅeۅ &L~ 畠(LoU [΅ڥυ   o ` l3 3` 4J G 4&(JJJJ) 甠` F٩ $ 婠 Ȣ ii)ɰLPx+L 4P xL# 48` PxL PeHxeH˰iکeۅȱhڙ`ꠀЕ x ت3 Q3ؕxQεy NvNδPPPL#Q8yڅ`Sε{ϵQڵyxȔPMuHOL L3L`) #L $  `  v mL;ʅ˅LM  mdžة * * *     % 0LH΢QPHΪ0h$0 )?i h](Њ q L H ϐ { lhHHH hHL? hυυ Ljݥ ,L mݰ % LߩƉ 慝 憨80 ў*%L L ު `  }LޢٹHH ޥLLޥШh^^h_H r륡HHHHHl^h#d j݄hJhhhhhhE` LJ }d.U"i L=8,LLTҐL {ݩ),(,,ѸLLԠhhL ߅` ȱLL  ߅ ei` 꺽  ' 8 uvL׊i , {$8$0`LԦƹƸ$HH `ީ 8ϐ*IEʼna Lݦ,{iweLi^ e^hٲаg jH hV_F*ƹƸٲаH $P )0 Z ۆ $1$P 膸 ": ,i = {LrH0h J c ,Lqۥ 3 LۥL Ȫ*ȱ_ȱ{ȱȅ| L+ܥLSؠߠL:`?EXTRA IGNORED ?REENTER  \I`$ !i)$ )L(ʊ$ L W 檠^ \ LD۩ ,? ɠ )H h`0{|uvLh$L :ۥyz` @ `" ީ; =L Z , ,խLc ZL,զ}~, ߅hL* ,h`PQ/ Q^ԥP &^ &^ePP^eQQP&QPe PQ L ߅ ޥHH {h* mh r ȥ`L'hpoj iLڠ 㥌 婝 5ȱȱ` = $)94,;D {$0 4 Lک?`gh<=ij>?`v(Le lL5٩ ӥHHvHuHH >L ٥vQ 8egh ֐` eӚɰ ,ZLLhhB;uhvhh ٘e`:,  "hhh` { ɫ ޥ L>L( HɰɫЉơ$v# \ۦuv $ W (Lb-逐@ HHLLF:L8gh}~`Ƀ` Sբ$Lׅ ׅLԱJHȱJh`LNפ0`L,׈L20`LF׈LL ׅJF8ȹe8ИL`Lø{{ttmnghab\\WWRRMNIIEEAA=>::673401..+,))&'$%"# !H ֥ h ߦ>  E֥ E & > ` E  E  H ֥ h ֥  ֥ -L L -EF# =Pi  ֤Lְ ׅ! ׅ  J?>ʊ:>Ș;k/=:   S;:L 4 40K14 L= BC D..=D5֤4 J :3 g ɠɤ ɓՊ x= 4   &B&C= 44ݴ 4ݺ ɤ4&D`L# ȱ0` 4 `u` 7$ 8`0 &&` { %Ppĥ uv` 2e   %F8 2 8Hh&&&&& 0hhI`LLLHxܥyݥPQLuƵPxLhQεyϱΠ L 4) ؘ 甠` uHɃLh` ☪ T`  甠`ѥ΅ ΅ҥυө 甠0ХҠ ӕ "L 4i` F`ٚ .L 4 `$$L$Ն$L,L 8!$ L赟0L0ܤ } L赟L0ܤ } L ` ` [ S oP YVPL6 O 5OPL Ι_LfP0Q@PPxA@QPa`qp`HP8εxh`Ʌ۰եڅʥۅ , ` :L΄<Ȅ>=?`ʕ>?>`8M˕   , ` L:L``F`$ ܪȱ 婠Lܤ`Ś25 a0 穠LJKH۰hЅѠȱ0@ȱHШhh0JL JLKMMLILLILLLLy 2L,PQ܅x݅yL آ8ЕNЕKʵ˕ە LkLMNܕ`LΥΥLMLʥMː ʥ˰JυKL  8MϕڥL 4΅` ȑ` l΅υLD L4 xPiڄeΕPeϕxPȵxڰL# N ONi)OO i@ &N&O ϕLz JKLυML LMJυKL qL ȩ` 6 6P`JLKMLxL L6 L[` Oڵw۴Nv L`xw8OPL# (` 40!(L 4LdF`  %L"wL{ TL~&&&ڥې څΈ` l 4Ȑ,` 40L 4Ȑ-` 4(L(n ㊨ rLa ?&0ΰ` Δ䮥G 0 #gMghghPcQ)Wqqqqhhq`uuuQ줰䮲륥Q9O/Q) WjB`O~5'Q 䯭䮡ޜݜݞGg` ` `嶡䡯z~" `P O䯭䮡𥴳\@`` ~3`Gg壡yi壡yi` @Gh X{gggggg'(dgxkg~9g'7(*7ϠGX͠LϠ٠SGϠDĠHSĠNSĠTĠ 5EMҠL Šō?FِLϚΠ κ f ٢  ٦Τ ȹɀI ȄȹH h3 oLB oTMɅ"3J[NSJIfmzq# [$NYP;#o6#"#!0 9@0Ӷ:Pyإ<[(N>W']5Kgvq ʤ  Y YoܹݾЇ`TP@xL` Ιϙ_oܙݙᙯ` ??<<<<<<<0UUUUUUUUWΤ PڵxۥΑȥL`hh$ F`` %ֈ`ʤZA^ܙ ݙ0  m7;܄iȢٚ . y$IqܤݐLM͠1FLJܹ/ݾLuc ܪȱ L[ĨP?xO_ڹo  l`w0P`fLPεϵxϱHȱ΅hΈ` J  畠P` Y $0`  畠$0 8 P# o ΅ڥυ e epݕ` 4LL$ `  rPՆϦ ` ΅υȩ ` Ӡȱ0I@iHeШiH˰hhЈЈ͑Ј̑ЈЈ0JKЬ@iHe eѕxh$0 xx ԅբ H 0  敠$ ( x$0  xx 0$FԨֹ)U h)װ H ֐ι LX  ::0D$(4):CHR$(4) IS CTRL-DF(D$;"NOMON C,I,O"L2^<D$;"CATALOG"iFL(24)uPI124ZL(I)dInSLSL1xX(L(SL))128X("0")X("2")110ISL24X(L(I))128X("0")X("2")210   we will delete that"6 "program from our library."> :g "WILLAMETTE APPLE CONNECTION, INC."{ "P.O. Box 7252 "SALEM, OREGON 97303-0053 ::- ::::"These programs are distributed by the"f"WILLAMETTE APPLE CONNECTION, Inc. as""Public Domain. If any person has valid""evidence that a program is, in fact, ""not in the Public Domain, please " "contact us and$% 0 vf'  `m :F a -mLǏLi^j_kZl[`8tp`8M`y h (`|)* X |`YLHHJhh`Ǘ˯߷ë󳏋'C/cO KC[ a(נ)+Ss?` WILLAMETTE APPLE CONNECTION, INC. L(OAD R(UN D(ELETE C(ATLG T(DRIV K(LOK U(NLOK X(ALL E(XIT V(ERIFY ----------------------------------------VOL PG OF SECT-USED LEFT ---------------------------------------- ) v) m}}m~~ة$eeeLؠ D8}}~~ؠ ~ 0})JJJJ 0ș}) 0șeJJJJ 0``% $ Bd 鑠e e ēHi&eh L`$e  ɍ ` X0 md:&98N9m:Jn8m8eed`8edd 鑠` :` ^67ą89 Q@ y 6 @^`6798 Q`Hǒ hǒ``}~eei@iA)m~~ v  6g/5 ys r ; ya ` `$$(ɠ$C y$f ``H$%  h\  `CATALOG\Y/N\LOAD\LOCK\UNLOCK\RUN\SAVE\DELETE\NOMONC\START\ LENGTH\,D\I/O ERROR\VERIFY\@  dh a X ;g B ؐg KL L KPhg a X00   ddd 鑠 ؐLs ;O ؐ YLЪPТ2'gh a X ;" ē$ y X ؐ Y ȒL :L'% g h y ē I8Mtn=vH?J QVQT_ɕ%j^iZk[l#^Z_[ 0f ߓ Y1  Ȓ@)ȹ@)ȹ@) Xmɠ 0   L Mf'fП K Xg QLiLLs4    eʵ``` f f` &L L fLC`8i`uu  ee`` ` 0` ` ` 5I` 5Iй` f f`L ?5=ɥD 5 5 D4ɻɍЀL\ɠ` }Ɏ$ ``LXWVhY `XWYHV(` Jhh LH) JQ JJJH`HJ`hh ?l8e` %GQ/[҅n3p:I856,32:I,32:I128,32:I256,32:I384,32:I512,32:I640,32:I768,32:I896,32:I40,32:I168,32:I296,32:I424,32:68)D(A,0)" REGISTERED VOTERS":::(19):" %%%%% CHANGE %%%%"@19:" -5% +5% "J19:"!....!....+....!1P 1490(3010'24010:<A1P:5020:DZ9010Nx1740ZYRYR1d112024:7::"PRESS ANY KEY TO CONTINUE ";::80:" CONGRESSIONAL DISTRICT "A", "YRA$B$N$(A)C$:140I10821102:I728,32D(A,1)10000:D(A,2)30000:D(A,3)60000:D(A,4)25000l$D(A,5)50000:D(A,6)50000:D(A,7)15000:D(A,8)40000.D(A,9)20000:D(A,10)40000:T(A,0)60:D(A,0)3400008B1460`A1Pj1490301040101740YRYR1A\0fI10241063:I,32:I128,32:I256,32:72b:" ===ELECTION RESULTS "YR" ==="}I12801319:I,43:::A1P" CONGRESSIONAL DISTRIC - ";AA$B$N$(A):140" NEW REPRESENTATIVES"A1P4MBER ";A(7)"* PLEASE TYPE YOUR FIRST AND LAST NAME *";::"........................<<>>";:N$(8):I134:N$;:::"";N$(A):I1(N$(A)):(N$(A),I,1)" "LN$(A)(N$(A),(N$(A))I):I(N$(A))>HLN$(A)""LN$(A)N$(A)RTION" N:~ X"HOW MANY EAGER CANDIDATES WISH TO BEGIN THEIR CAREER IN THE UNITED STATES CONGRESS (1 TO 4) ? ";:80 bP(KB$):P P1P1 P4P4 A%(P,10),PO(P,10) A1P:5:"WHO IS THE CANDIDATE FROM DISTRICT NUA120:B011:V(A,B):B,A/ A111:P(A):D A14:B(0,A):X A120:W(A):m A110:A$(A): &A14:O$(A): 0A110:D$(A): :YR1980:B$"THE HONORABLE ":C$",M.C" D:"THE GAME THAT CONGRESSPEOPLE NEVER STOP PLAYING:RE-ELECL$"----------------------------------------"K I1R(50):AR(1)::A0 AD(4,10),V(20,11),P(11),C(4,16),B(4,5),D(4,10),E(4,10),F(4,10),W(20),M(4,2),L$(11),LF$(12) V$(20),A(4) A011:L$(A): A14:B$(A): A120:V$(A): 6384)) Q& (40(A$))2)A$:: I(B1$(B))11:(B1$(B),I,1)" "B2$(B1$(B),(B1$(B))I)B2$:B1$(B)(B1$(B),I1):210 (B1$(B))40ı B2$" "B2$:160 rR(X)((1)X)1 |X((9)) ::10:8:"PORK BARREL"- L TRANSLATED FOR ** ** APPLE II AND ** ** SOFTSIDE (APPLE) ** ** BY============ ** ** MURRAY SUMMERS ** ** SPRINGFIELD, PA ** ** ** *********************** P16384,128:16368,0:KB$((1C9370: .04/24/801NA$"PORK BARREL"::  *********************** *********************** ** ** ** PORK BARREL ** ** WRITTEN BY ** ** GEORGE BLANK **i ** ** **                 *APPLESOFT MENU***, :BY LARRY L. FREEMAND DAND JAMES P. DAVISW N OF ABACUS...D:D$;B$;N$ 20; :10:"THAT IS A TEXT FILE!!!"T PAUSE11000:PAUSE\ 20v  1027,1155,1283,1411  1539,1667,1795,1923  1067,1195,1323,1451  1579,1707,1835,1963  1107,1235,1363,1491 & 1619,1747,1875,2003 0** 6K$"3"B$"DELETE"& @I:1:868K J" PRESS 'LETTER' YOU WISH TO ";Y TK$"3"ğp ^B$;::198:BELLy h240 rISL(K$)65 |X(L(I)2) X194B$"RUN"B$"BRUN" X212470 N$"" J433 N$N$((L(I)J)) J L(I),160:L(I)2,173$ LLISL1933 L(I)1,LL: Ii "RUN ? LOCK=1 UNLOCK=2 DELETE=3 EXIT=4";v B$"RUN"} 6 K$ K$"4"Ā K$"0"K$"4"290 K$"@"K$(LL127)370 240 "K$"1"B$"LOCK" ,K$"2"B$"UNLOCK").....$ 10":BL(37)^"J1:ITLBL:I:(IL1IL2IL3)IN1:39((A%(A,J))):A%(A,J)u":IN1JJ1:IN0{"("222::"** LEFT/RIGHT ARROWS & RETURN SELECTS. ":"** "(34)"ESC"(34)" KEY TO CONTINUE. ";:30020%#<:::"A D VEWSPAPERS (PER PAGE)":L2(37)o!" DAILY SCANDAL............$ 100 MORNING JOURNAL..........$ 50"!(3):"===OTHER MEDIA":L3(37)" " MILLWORKERS NEWSLETTER...$ 200 BILLBOARDS (EACH)........$ 500 HANDBILLS PER (1000" SOAP OPERA...............$ 500 EVENING NEWS.............$1000 PRIME TIME...............$2000" (3):"===RADIO SPOTS":L1(37) " TOP 40 HITS..............$ 25 ALL NEWS.................$ 15"!(3):"===DAILY N)0:1460:B2$"" TT1,34,2:3B9?aI1P:J110:A%(I,J)0:J,Ik::B$N$(A):"ADVERTISING CAMPAIGN FUND: $"C(A,15)I15361575:I,36::7(3):"===TELEVISION SPOTS (PER MIN.)==TOTAL":TL(37)1u ,1)0:M(A,2)0A::<N(1)N(1)11100R(120)Y&N(2)N(2)11100R(120)a0::"RESULTS OF VOTE: YEAS-"N(1)" NEAS-"N(2)D:NXN(1)N(2)Ė12:"THE BILL PASSES":4460b10:"THE BILL IS DEFEATED"l vN(1)0:N(2h6010(C011:LF$(C)""ĺLF$(C)/C91460C::Z15:"V O T I N G"" YES NO OR ABSENT (Y,N OR A) "A1PB$N$(A):"YOUR VOTE: ";80:KB$"Y"KB$"N"KB$"A"ĺ(7)(7)(7);:43207710:M(A VOTE FOR THIS ONE"G6W(X)2Ė3:"THE WHITE HOUSE OPPOSES THIS BILL"M@xJ4:"** LATEST PUBLIC OPINION POLL **"T"UNDECIDED FAVOR BILL OPPOSE BILL ========= ========== ==========="^4:O(2)" %";:19:O(1)" %";:34:O(3)" %"0)R(5):O(2)3R(18):O(3)100O(1)O(2)N7:"HOUSE BILL NUMBER "B" - "YR|B1$(B)"A BILL "V$(X):(B1$(B))39İ160(40(B1$(B)))2);:B1$(B)B2$""ĺ(40(B2$))2);:B2$"34,(37):,W(X)1ĺ"THE PRESIDENT WANTS YOU TO12:"ROLL CALL VOTING":HH(1)R(20):H(2)R(20):(2)H(1)430rH(3)R(20):H(3)H(2)H(3)H(1)4040H(4)R(20):H(4)H(3)H(4)H(2)H(4)H(1)4050H(5)R(20):H(5)H(4)H(5)H(3)H(5)H(2)H(5)H(1)4060)B15:XH(B):O(1)V(X,:I$""/v B(A,B)(.9B(0,B))B(A,B).9B(0,B)\ B(A,B)(B(0,B)1.2)B(A,B)(B(0,B)1.2) PC(A)(B(A,B)B(0,B).9)5:PC(A)0PC(A)0 A::B A0P:B14:B(A,5)B(A,5)B(A,B):B,A 34,0 :5::"U.S. HOUSE OF REPRESENTATIVES"& YR1" BUDGET";26);YR" REQUEST"B0 B(0,B)(100B(0,B).5)100: "$";B(0,B);" BILLION";26);"$"(B(0,B)120.5)100" BILLION"D A1PN :B$N$(A)C$X B(A,B)1.1B(0,B)b "HOW MANY BILLION $ WILL YOU VOTE FOR ? ------";I$l B(A,B)(I$)B14 B(0,B)B(0,B)(1P)'B-3 ` I10241063:I,36:I128,36:I256,32: 3:10::"$$ BUDGET HEARINGS $$": LL$ 34,5 B14 B1$(B)"DEPARTMENT OF "B$(B) (B1$(B))39İ160 :B1$(B):B2$ B2$"""(A,9)D(A,9):D(A,9)D(A,9)R(800)400X0PO(A,10)D(A,10):D(A,10)D(A,10)R(1000)400:J110:PO(A,J)((D(A,J)PO(A,J))D(A,J))100:DD(A,0)0NI110:D(A,0)D(A,0)D(A,I):IX:AbB1PlC14vB(0,C)B(0,C)B(B,C)C,B(A,3)R(5000)2200@PO(A,4)D(A,4):D(A,4)D(A,4)R(500)250oPO(A,5)D(A,5):D(A,5)D(A,5)R(5000)3000PO(A,6)D(A,6):D(A,6)D(A,6)R(3000)1000PO(A,7)D(A,7):D(A,7)D(A,7)R(600)500PO(A,8)D(A,8):D(A,8)D(A,8)R(2000)500&&PO!....+....!....!":d22:" UNEMPLOYMENT RATE ";((D(A,9)D(A,10)5)D(A,0)10000)100;" %"n1460tA1PPO(A,1)D(A,1):D(A,1)D(A,1)R(1000)400:A(A)37PO(A,2)D(A,2):D(A,2)D(A,2)R(3000)1000PO(A,3)D(A,3):D(A,3)D....!"/T32,28:33,1::10:I110:"!";::9^:10ghB110:D$(B);18((D(A,B))));D(A,B):rJ110:PD(PO(A,J)):PD1Ğ|(PO(A,J))10ğ9J:29(PO(A,J))((PO(A,J))10)10((PO(A,J))10):"*":::20::19:"!....B")";16((OV)));OV;24((CV)));CV"....."D$(B)92$s2$10:"------";:18:"------":"FINAL";10);TA;18);TC{2$:2$"THE WINNER IS ";2$TC(TA)ĺN$(A):94502$TATCĺO$(A):LL1:L(L)A::N$(A)" IS DEFEATED":"AND IS OUT OF THE GAME"!3C(A,7)4C(A,10)3C(A,11))10S1@$X(ZA(A)AD(A,10))100D(A,10):8810:E(A,10)Xa1J$TC0:TA0m1T$B1101^$Z85R(10)2B1h$XE(A,B)Z100:8810:CVX1r$X(D(A,B)E(A,B))Z100:8810:OVX1|$TCTCCV:TATAOV1$B41$"(";:B10ĺ" ";32$020$X(ZA(A)AD(A,7))100D(A,7):8810:E(A,7)Xa0$Z(2C(A,0)2C(A,7)2C(A,6)4C(A,3))100$X(ZA(A)AD(A,8))100D(A,8):8810:E(A,8)X0"$Z(3C(A,0)3C(A,7)C(A,6)3C(A,1))100,$X(ZA(A)AD(A,9))100D(A,9):8810:E(A,9)X16$Z(C(A,0)2)X7/#Z(3C(A,0)C(A,7)2C(A,6)3C(A,1)C(A,4))10h/#X(ZA(A)AD(A,5))100D(A,5):8810:E(A,5)X/#Z(3C(A,0)2C(A,7)2C(A,6)C(A,4)C(A,1)C(A,5))10/#X(ZA(A)AD(A,6))100D(A,6):8810:E(A,6)X0#Z(2C(A,0)C(A,7)3C(A,6)4C(A,9))12))107.#X(ZA(A)AD(A,2))100D(A,2):8810:E(A,2)Xm.#Z(3C(A,0)2C(A,7)C(A,6)2C(A,5)2C(A,2))10.#X(ZA(A)AD(A,3))100D(A,3):8810:E(A,3)X.#Z(3C(A,0)C(A,7)2C(A,6)3C(A,8)C(A,4))10/#X(ZA(A)AD(A,4))100D(A,4):8810:E(A,4:"E L E C T I O N R E S U L T S ":B-n#I11521191:I,35::3r-x#"DISTRICT ";A:"PCT "O$(A)" "LN$(A)-#Z(C(A,0)4C(A,7)3C(A,6)2C(A,2))10-#X(ZA(A)AD(A,1))100D(A,1):8810:E(A,1)X.#Z(2C(A,0)C(A,7)2C(A,6)2C(A,5)3C(A,:8870#,~"X3276700XX100:8880B,"X32767000XX1000:8890H,"U,"X(X):i,"X(X):XX10:~,"X(X):XX100:,"X(X):XX1000:,2#A1P:B011,<#C(A,B)22C(A,B)22,F#C(A,B)(123)C(A,B)(123),P#B,A,Z#A1P&-d#::4N(2)1+E111&+V(X,E)07880E+ZV(X,E)5:C(A,E)C(A,E)ZK++C(A,15)C(A,15)M(A,2)87:C(A,0)C(A,0)O(3)O(1)+C(A,14)C(A,14)1:V(X,6)5C(A,13)C(A,13)1+V(X,7)5C(A,12)C(A,12)1++j"X327678860,t"X327670XX10V(X,E)07780-*ZZV(X,E)5:C(A,E)C(A,E)Z3*di*nC(A,15)C(A,15)M(A,1)98:C(A,0)C(A,0)O(1)O(3)*xC(A,14)C(A,14)1:V(X,6)5C(A,13)C(A,13)1*V(X,7)5C(A,12)C(A,12)1*W(X)1C(A,16)C(A,16)1*W(X)2C(A,16)C(A,16)1+N(2),2)(4V(X,C))P(C):A);)LF$(C)L$(C)" +++":6180Z)LF$(C)L$(C)" ++":6180y)LF$(C)L$(C)" +":6180)$V(X,C)7āA1P:M(A,1)M(A,1)(V(X,C)6)P(C):A).)KB$"Y"7740)(KB$"N"7840)2)<N(1)N(1)1)FE111*PC)7)P(C)0)İ20020( (Y(V(X,C)6100,6110,6120,6140,6140,6140,6170,6160,6150(LF$(C)L$(C)" +++":6130(LF$(C)L$(C)" ++":6130(LF$(C)L$(C)" +":6130)V(X,C)3āA1P:M(A,2)M(AK'ZX1000:AD(A,4)AD(A,4)Z3:AD(A,5)AD(A,5)Z2:AD(A,6)AD(A,6)Z4:v'ZX4000:Y110:AD(A,Y)AD(A,Y)Z::'z::" LOBBIES ";:'17:" FAVOR OPPOSE"'C111'V(X,C)0İ6090'V(X,C)0LF$(C)"":6070(((V(X,C)3V(X,)Z2:=&ZX150:AD(A,1)AD(A,1)Z3:AD(A,2)AD(A,2)Z2:&ZX500:AD(A,3)AD(A,3)Z:AD(A,5)AD(A,5)Z:AD(A,8)AD(A,8)Z:&ZX500:AD(A,1)AD(A,1)Z2:AD(A,2)AD(A,2)Z3:AD(A,8)AD(A,8)Z4:'ZX1000:AD(A,5)AD(A,5)Z:AD(A,9)AD(A,9)Z5:%:P%ZX1000:AD(A,1)AD(A,1)Z:AD(A,4)AD(A,4)Z3:AD(A,7)AD(A,7)Z5:%ZX1000:AD(A,2)AD(A,2)Z:AD(A,3)AD(A,3)Z:AD(A,6)AD(A,6)Z:AD(A,8)AD(A,8)Z:AD(A,10)AD(A,10)Z2:&ZX250:AD(A,5)AD(A,5)Z5:AD(A,6)AD(A,6)Z4:AD(A,9)AD(A,9A%(A,I)A%(A,I)XJ$I5290,5320,5330,5340,5350,5360,5370,5380,5390,5400`$C(A,15)C(A,15)Xj$5030$ZX1000:AD(A,5)AD(A,5)Z5:AD(A,6)AD(A,6)Z4:AD(A,9)AD(A,9)Z2:AD(A,10)AD(A,10)Z:$X110:AD(A,X)(AD(A,X)):AD(A,X)12AD(A,X)12 E R T I S I N G C A M P A I G N":F#F:"CAMPAIGN FUND $"C(A,15)#P:" HOW MUCH DO YOU WANT TO SPEND ADVERTISING ";#ZA$(I)" ?"#d:"AMOUNT : $";X$:X(X$)#nXC(A,15)ĺ"SORRY, YOUR CREDIT IS NOT THAT GOOD!":5220#xX15280$      ETC. INDICATE SUBTLE HINTS FROM THE LOBBIES, ETC. VARIABLE, A(A). THIS IS THE PERCENT VOTE YOU START WITH IN ALL CAL- CULATIONS. IF YOU WANT TO MAKE THE GAME HARDER@6ySET A(A) BELOW 37.IF YOU WANT TO MAKE RE- ELECTION EASIER, SET A(A) ABOVE 37@@yBAJy $$$ AND +++L3):?luKB$(8)VTVT12?vuKB$(21)VTVT1I?uKB$(27)ġ:5300?u(VTL1VTL2VTL3)VTVT1(KB$(8))1(KB$(21))?uVTTLVTTL?uVTBLVTBL?u2:" ";:VT:30030?u?y>>> NOTES <<<?"y@,yLINE 1750 CONTAINS THE (LF$(C),3)"+++"LF$(C)(LF$(C),(LF$(C))3)"$$$"m>>N(LF$(C),2)"++"LF$(C)(LF$(C),(LF$(C))2)"$$"s>HN>DuVTTL:TL>Nu:2:">";:>Xu80:KB$(8)KB$(13)KB$(21)KB$(27)30040?buKB$(13)IVTTL11(VTL1)1(VTL2)1(VT "IN THE MILITANT MILLWORKER","ON BILL BOARDS","ON HANDBILLS"=( "BLANK","SMYTHERS","KENNEDY","SUMMERS"=) "PROFESSIONS","TECHNICAL","WH. COLLAR","DEFENSE","INDUSTRY","SERVICE","FARMERS","RETIRED","UNEMPLOYED","WELFARE"5>4N1,2,1,0,1,1,2,2,1,2,1,0,0,2,2,2,1,1,1,2<( "ON THE TV SHOW -PASSION FOR ADULTERY-","ON THE EVENING TV NEWS", ON THE TV SHOW -MAYHEM IN BEDLAM-","ON RADIO KRAP","ON RADIO KIKI","IN THE DAILY SCANDAL","IN THE MORNING JOURNAL"S=( ,7,3,0,3,0,0+;( 40,3,3,0,0,9,2,8,0,7,0,0J;( 40,8,3,0,0,0,2,7,0,2,0,0i;( 40,3,8,0,0,0,9,3,0,8,3,0;( 45,0,7,0,0,0,9,7,7,0,7,1;( 45,9,0,8,7,0,1,8,7,0,8,7;( 45,7,0,8,0,8,3,7,0,0,3,0;( 10,10,2,2,2,8,5,8,2,0,50;( 40,200,300,50'<( ,0,7,0,0,2,9,0,0,0,03:<( 35,8,3,8,0,0,1,8,0,0,0,0R:F( 45,1,9,0,0,0,9,1,2,0,0,3q:P( 35,9,1,0,0,0,3,8,8,0,0,0:Z( 45,7,3,9,7,0,2,9,0,7,0,0:d( 30,8,3,7,8,0,3,7,9,0,0,0:n( 45,0,0,0,7,0,9,1,0,0,1,0:x( 30,0,2,0,3,0,1,8,7,0,9,0 ;( 45,0,0,0,0,0"PROVIDING LOW RENT HOUSING FOR POOR AND ELDERLY"Z9' "ESTABLISHING NEW NATIONAL PARKS"y9( 40,8,8,0,0,1,7,1,0,0,0,09 ( 40,0,3,0,0,0,8,1,3,0,0,09( 40,0,0,0,0,0,3,8,0,8,0,09( 45,0,0,0,3,0,2,9,0,0,0,09(( 40,8,9,0,8,0,9,1,0,0,0,0:2( 30,8ITS"?8' "ELIMINATING FOREIGN AID TO NON-DIMOCRATIC NATIONS"p8' "PLACING STRICT CONTROLS ON STRIP MINING"8' "PLACING HIGH TARIFFS ON MANUFACTURED GOODS"8' "PROMOTING TRADE THROUGH LOW TARIFFS"8' "INVESTIGATING ORGANIZED CRIME"19' R UNIONS"<7' "LIBERALIZING LABOR'S RIGHTS IN ORGANIZING"i7' "INCREASING SOCIAL SECURITY BENEFITS"7' "INCREASING PAY FOR GOVERNMENT EMPLOYEES"7' "PLACING STRIC CONTROLS ON WELFARE RECIPIENTS"8' "LIBERALIZING THE RIGHT TO WELFARE BENEFASING FOOD AID TO UNDERDEVELOPED NATIONS"O6V' "PLACING CONTROLS ON HANDGUNS"y6`' "TO DEVELOP A NEW MILITARY WEAPON"6j' "OFFERING MEDICAL CARE TO THE POOR"6t' "SUPPORTING MEDICAL CARE FOR GENERAL PUBLIC" 7~' "PLACING STRICT CONTROLS ON LABONMENT ","FARMERS ","WELFARE RIGHTS ","RACKETEERS"5.' "AGRICULTURE","DEFENSE","HEALTH AND HUMAN RESOURCES",EDUCATION"58' "RELAXING ENVIROMENT CONTROLS ON NUCLEAR POWER"5B' "RESTRICTING GOVERNMENT FUNDS FOR ABORTION")6L' "INCRE%A1P:X110:AD(A,X)0:X,A+4X%P0440O4b%L0:L(1)0:L(2)0:L(3)0:L(4)0U4l%4' "GENERAL PUBLIC ","LABOR ","MANAGEMENT ","RETIRED PERSONS ","VETERANS ","ENVIRONMENTALS ","CONSERVATIVES ","LIBERALS "?5$' "GOVER$TATCĺ"RUN OFF ELECTION":9290.3$1460:A<3$L09570G3$C1LX3%L(C)P9530r3%N$(C)N$(P):A(C)A(P)3%A016:C(C,A)C(P,A):3&%A010:D(C,A)D(P,A):E(C,A)E(P,A):F(C,A)F(P,A):30%A07:B(C,A)B(P,A):3:%PP1:P1ė::3D%C4NUTTON. (USE PADDLE ZERO).": "EACH MINE YOU PICK UP IS WORTH ONE POINTOCCASIONALLY, THE COMPUTER'S VEHICLE WILL DROP SPECIAL BONUS MINES WORTH FIVEPOINTS EACH. WHEN YOU CLEAR AN ENTIRE ";R"RACK YOU ARE GIVEN A NEW, COMPLETE ONE. THERE ARE 3 OVING CLOCKWISE ON A COLLIS- ION COURSE WITH YOU.":"THERE ARE FOUR POINTS IN THE TRACK WHEREYOU MAY CHANGE LANES TO AVOID THE ON- COMING VEHICLE BY STEERING WITH THE PDL CONTROL. YOU MAY ALSO DOUBLE YOUR SPEED.";"BY HOLDING DOWN THE PADDLE BB9BB7#FL,A16B:LL1:I:M:12:16:"COLLISION":I11000:I:5:"INSTRUCTIONS? (Y/N)";:A$:(A$,1)"Y"ı:2:16:"COLLISION"::4"YOUR VECHICLE TRAVELS AROUND THE TRACK COUNTERCLOCKWISE, WHILE THE COMPUTER HASA VEHICLE M6,YD1260:21:"SCORE","HIGH SCORE":SC,HSDI11000::60[ LOAD SHAPE TABLEfL7680A$"030008000B0012003E2C003E2E2E2C3C3C0037373F3E362E2C252D352D2E243C3C272700"(I17222A((A$,I,1))48:A9AA7 <B((A$,I1,1))48:612X,15012Y:13X(12Y)S,1P127012X,15012Y:13(22X)(12Y)S,1ZX:YtXC10:YC12:DC3:LC5XY12:YY12:DY1:LY5DY16:7:3XY126,YY126DC16:5:3XC126,YC126 RK2XD10:YD0:DD1:LD5:DD16:3XD128Y,65Y,91&B276Y,65276Y,917L125,Y151,YPV125,156Y151,156YV`aaS7716wbLSS298:L,0:cPUT IN THE MINESe1:0:1jY04tX09~1612X,612Y:13XYS,1127012X,612Y:13(22X)YS,1!1NITIALIZE SHAPE TABLE13002232,0:233,30EHS0:SC0:SW0T NEW GAMEeSCHSHSSCsSC0:RK0C200:RKRK1: NEW RACK DRAW LAYOUT:6Y06012Y,Y276Y,Y276Y,156YY,156YY,Y$0.Y124812$0(XD11)LD6(YD6)LD1600;:DDDD1:DD5DD1SXDD610,620,630,640dbXDXD1:650ulYDYD1:650vXDXD1:650YDYD1XDXYYDYY1013XDXYYDYY1013T2T1:5005:DD16:3XD126,YD12660I60%MOVE 2ND COMPUTER VEHICLEF0:DD16:3XD12T,YD126vZ(XD13YDS):ZĒZ:0:ZXD126,YD126XD11YD6560Z(LYLD):LDLDZDD535,540,545,550YDYDZ:600XDXDZ:600!YDYDZ:600&XDXDZ:6006(YC6)LC1400*rDCDC1:DC5DC1BDC410,420,430,440SXCXC1:450dYCYC1:450uXCXC1:450YCYC1XCXYYCYY1013R470ZXC13YCS:(Z)0CC1Z,2T2T1:3005:DC16:3XC126,YC126 ,0:DC16:3XC126,YC126P 1Z(XC13YCS):ZĒZ:0:ZXC126,YC126f 6XC11YC6360| ;R0:(1).05R1 @Z(LYLC):LCLCZ JDC335,340,345,350 OYCYCZ:400 TXCXCZ:400 YYCYCZ:400 ^XCXCZ:400h(XC11)LC)1)41:CC1:Z,0:22:1:SC: IF ALL ERASED,NEW RACKH C01015Z T2T1:110o REDRAW VEHICLE 7:DY16:3XY126,YY126 IF 2 COMPUTER VEHICLES,WHICH ONE MOVES RK2T2:SW1SW:SW1300,500 MOVE 1ST COMPUTER VEHICLEION DY160,170,180,190, XYXY1:200= YYYY1:200N XYXY1:200Z YYYY1s CHECK FOR COLLISION XYXCYYYC1013 RK2ĭXYXDYYYD1013 CHECK FOR POINTS ZXY13YYS:(Z)1240 0:(Z)XY126,YY126:SCSC((Z:LYLYZ:YYYYZ:LY1LY5LYLYZ:YYYYZ4 ^150B _YY7150 aZ(((0)86)(255286)):LYLYZ:XYXYZ:LY1LY5LYLYZ:XYXYZ c150 dCHANGE DIRECTION AT CORNER n(XY11)LY6(YY6)LY1150 xDYDY1:DY0DY4 CHANGE POST KDY80,85,90,95! PXY12150j RZ(((0)86)(255286)):LYLYZ:YYYYZ:LY1LY5LYLYZ:YYYYZs T150 UYY5150 WZ(((0)86)(255286)):LYLYZ:XYXYZ:LY1LY5LYLYZ:XYXYZ X150 YXY10150+ ZZ(((0)86)(255286))S COLLISION0 C. 1980, MARK PELCZARSKIMSEE 'SOFTSIDE' NOV.1980W2000r21000: INITIALIZATION<(16287)127T2? ERASE YOUR VEHICLEA0:DY16:3612XY,612YYD CAN YOU SWITCH TRACKS?F(XY11)1(YY6)1110_8/?r r8`$qqqijk_8`$qqqijk_8`$qqqlmn_8`$qqqlmn_`$rq/?rqqghqh`/?dr$)q`$`=>r%q)q`$`=>r%q)q`$`=>r%q)q`$`=>r%q`$h]Š]ӠĠ]٠ ]]Šŧ]Ԯ]Z]Π!dN@"rC@"rD41 rqn_x]נ Lq>fq/?          1:1:"YOU GOT THE HIGH SCORE OF ";HP:"ENTER YOUR NAME PLEASE: ";HP$:280L NOT ";T"ADD TO OR SUBTRACT FROM YOUR SCORE, IT MAY LAND YOU ON A METEOR (IN WHICH CASE YOUR MISSION IS OVER!)"::13:"GOOD LUCK!!!"::^8:"PRESS ANY KEY TO BEGIN";:16368,0:A$:I120:32,20I:33,2I::::I124:::110Jh:HPP METEORS (AT 100 POINTS EACH!). LINE "J"YOURSELF UP WITH A METEOR AND PRESS THE PADDLE-BUTTON TO FIRE.":"ANOTHER FEATURE OF YOUR SHIP IS ITS":"ABILITY TO ENTER HYPERSPACE. PRESS ANY KEY TO DO THIS. A WORD OF CAUTION: WHILEBEING IN HYPERSPACE DOES:"O"::13:"METEOR STORM":13:"BY ROY HARPER":"APPLE TRANSLATION:GARON AND PELCZARSKI":(@"YOUR MISSION IS TO BLAST A PATH THROUGH A SEVERE METEOR STORM. YOU ARE ABLE TO STEER LEFT AND RIGHT USING PADDLE ZERO. YOUR MISSION ALSO INCLUDES DESTROYING1:L$:20:1((1)40):M$(B)::1208  END OF GAMEK 22:P1HP360 15:HP$;":";HP:"YOU EARNED ";P1;" POINTS ON THAT MISSION" "DO YOU WANT TO TRY ANOTHER MISSION?";:A$:A$"N"110 :: , INSTRUCTIONS\6I135:24:1(1)4039):Y:S1:"#";:S2:"2";:S3:"#";:I1150::210L :I11000::270` METEOR IS HIT P1P1100:S11:G:"333":T130::S11:G:(34);(34);(34):F1ĢG1:S1:B$ G1: HYPERSPACE& :16368,0:G1:I110(1)70:24::20:0& GG1:S11,GG1)2İ230:120: G:S1::E$;:f F0:HG1:S11,HH1)2GH:F1:230w P1P11:120 COLLISION 21:1::P1;:Y1:S1S:S2S1:S3S25 :Y:S1:B$;:S2:B$;:S3:B$;:YY1:Y20S1S1139(S12):S3S3138(SS38S38" CHECK FOR COLLISIONZ S1,2)2S,2)2S1,2)2Ģ24::20:L$;:200x 24::20:L$;:1:S:S$; CHECK FOR FIRING G1(16287)127G2:S1S1:180 (16384)127250 G1190 MISSILE ROUTINE G19G1:19:B0! p CLEAR SCREEN TO BKGND 9 s:I120:I:L$;:` xA(P11000)AA1:BB4(B2)1t z PLACE METEORS }G:S1:B$::21:1:P1;::I0(P11000):20:1((1)39):M$(B): CHECK PADDLE P(((0)2)251):SSP S1S1 K 8P INITIALIZE BACKGROUND AND METOR CHARACTERSrZL$"":I140:L$L$(34)::I03:M$(I):: @,H,D,Xd:::"INSTRUCTIONS?";:A$:(A$,1)"Y"ė:310iSET TEXT-GRAPHICS MODE n::34,0:P10:S11:S20:G1:S$"#2#":E$"]":B$(34):A0     RACKS TOTAL. TO END GAME PRESS (CTRL 'C')"::"PRESS ANY KEY TO BEGIN. ";:A$:)cPa(ĠՠŠϠŠ)9S(ĠٯΩ)&@q`@*#r9()%qMS(ĠՠŠӠٯΩ)&@q`@*#r9()%qkS(ĠՠŠРŠӠŠՠŠԩٯΩ)&@ӠǮ)UVWYd6?eUcPa(ŠҠ̠נŠ)a(ͬĠԠՠŬĠ)Fa(ŠϠĠŠ٠Ԯ)Pa(Ơՠ̠Ŭՠ)ja(ŠŠӠӬЬ)a(ҠŠӮe`n[x]_a(ӠƧϠϠҬ̧Ϡ)a(ԬҧϠΠԬĠ§)a(Πˮ)UVWY[ ]ԠKM6o OPd2e?a(Ҡ)d2ecPa()P a(%\F-rq=>rYZ[4P]ŠŠŠҠŠTZdede0dededededed ed e]dd ed ed ededededeLdeded`%[(@p(ȠȠ)M6o/Pa@*8r#8rr[]נ`%[`-r%[q6 fgh%[]Ҡ(UVW&2UVW&#<q')`%\:+`qq`$~q')j`-r-r%\t`-r%\~Y[]נLqqqUVW&UVW&q')f-rgh*YZqqUVWY\"_ ]`&$q')`-r-r%\`-r%\Y[$]Ġ.UVW68qq`%$Lq')B`-r-r%\(Lq`$`q')V`-r-r)`-r-r%\`-r%\Y[]ĠUVW6qq`%%$q')`-r-r%\(q`$q')`-r-r%\:+qq-r%\H`-r%\RY[\]ĠfUVW6pqq`$q')z`-r-r%\(q`%$q')`-r-r%\:+qq`$q'[ghq[]ĠUVW6 qq`%$ q')`-r-r%\( q`$4q')*`-r-r%\:+4qq`&$Rq')>`-rn&Y[]נĭ"f`-r%f_ 'UVW#lm#nYq['UVW lm nYq['UV Wl mnYq['UVWlmnYq['UVWlmnYqflmnYfghfgh[/lfghfghfgh[vfgh[ ]0f`<()r$UVW%ij%kY[+`<()r$UVW%lm%nY[-`<()r%[UVW%lm%h[0]ŠԠ:_D CDUVWflm&nfijkfijk&Y[CNUVW flm&nfijkfijk&Y[CXUV Wflm&nfi jkfi jk&Y[BbUVWlm&n&fij kfij k&Y[KUV Wflm&n&fijkfijk&Y[BUVWflmnYfghfgh[/fghfghfgh[&fglmn]ԠlmnY5\`$M6\a(ӠͧҠ)[]ŠԠ_ OUVWflm&n&fi%j%kfi%j%k&Y[KUVW fAq/?rq/?rqq`=>r$_["]נ,fUVW6ijk@YJ]נTf^UVWhijkrY|]נf UVW]Ԡ/dqUVW'`=>rñ$ifòghefghqfUڱVW8Աr YڱZ]g]ˠؽȠƠ̩̠ӯΠΠӠ͠ifòghmqn`$o`$p`٠Aq(B`Ա$FUڱVW8Աr Yڱ"FY\ q`$M9H]ԠӠϠŠ̠ҠKqq_<Mqq_<*Z]٠̠ǠΠ_fògh bghq` %q D:`ǵ˱%óq`˱ǵ%óq` %óq˱qǵq\>;]ŠΠҠˠȠԠĠ)<UVWX0?rfòghfgh>]ΠҠŠ?`.?6?r$Z@]٠%hg%h g%h g%h g%h94g#hg#hg#h g#h g!h g!h K5g'hg'hg'hg'hg'h g'h g'hg'h6UVW -rqY7qqq58fUVWlm#nY٠Ҡ)GTԱԱqԱ`ԱԱ$qqM6 qòq ñqq6]ŠϠŠΠӠ@ Lfñij'kij'kfòUVW'lmnY qfñ93g%hg^]Ҡͭ͠ԠĠ٠РŠŠŧ֮O4rD4rD4 rM6=KM6a(נ٠ӠҠ)GT`$:UVW-rq-rqYUVW -rqY@a(          Ž)F8dr[]ŠΡG]Ӡįנïάү\P\vXUVWYb_l]ĠŢvdede2Mdede2Mdede2MdedexMdede2MdedeM]Ԡ̠!P a(Ҡj$kYd6?eM6pDf ijkijkijkijkijklmn lmnlmn*Ilmn lmnlmnTNlmnlmng hg hghg hgh%q`-r%qq')`-r$:G`%q.`%q`%q`%qf%`<()r%_&d6?e\_r&-rq\d6?e_r0]ՠŠԡD:fUVWij$ki`-r%q`$Hqq')`-r-r%q`-r%q`$Hqq')`-r-r%q`-r%q`$Hqq')`-r-rr`<()r%q8r`<()r%q8r`$`<()r%_`<()r$\\"_ \"\P8]ŠԠŠĠŠԠΠР˩`$Hqq')`-r-r%qg%h%qqfghq%q%_J J\(\Z Td6?e^q/?r\"_h]ĠErq.?6@r`$rq81?r1?rrdedeM|]Šנi`<()r%q`<()r%q8u"a(ҠŠĬŠĠӠŮ)qq/?r`$,fgh%fq%qghqq%_JB,`$6fghq%q%fghqq_JB6`$@fg%hqq%fghq%q_J7@fq`@*#r9()%qaa(ŠՠŠŠԠ)a(ŠՠϠĠƠէŠ)a(Πš)ZcP S(ٿϠ)'M6oPa(ɠ͠ǠҠŠ׮)\ M6]ĠԠĠŠD-  rq-  r `-  r %q_]ήέ\\`-r$\"`/?r$\`/?r$\`/?r$\,`/?r%\`/?r%\,_\F\rq-  r-  r&eoPb-  rGh_Ai]ӠҠԠӠӬҠӬîjqq_ tq qq_ ~q_ qq_ !]ˠҠŬ  rq-  r.QoPb-  rGR`-  r$T_;V-  rq-  r ` $[W_.[oPb-  rG^_4`-  \"\_\\,_\`/?r%\_\\_)\\`-r/?r%\,_)\\`-r/?r%\_9]̠ǠӠҠӠ0L-,`-r$`- r$_ \"_\\`-r$`-r$_ \"_ \_\\\\"_\\\\_\\_\`/?r%\,_Y ZKM6[cA]UVWa(Ҡ)FE(ӠŠӠ)F-   rccY2ba(Ҡſ)GR@`@*#r9()%_Q]ήέΠ\`-r%\_\,`- r%\"_\\ %bFG`%a()G` %bE()G]4`$` -   r$j`$t` -r$~`-   r$X`$~`$q_ ]ԠӠĠXUVW-  r$`-  r$x`-  r $V.`-  r -  r$` $`]q` %q ,q-  r` %\h` %\h\oPq-  r`ghgh7q6?]Ġ>UɱVW @q.?rEYɱ^[c]Š ha()G[`$`$6`-  r-  r$L!q-  r`%q 2`-  r`$,]ŠӠ͠Πq!q _6q#q_6q#q _6q%q_6q%q _6q%q _6q'q_6q'q_6"q'q _6,q'q6fò/?r%\"_.\\\"`- r-r%\,`-r$`-r/?r%\\b`$q -  rq `-  r $-  rqq_`$q_7%\`-r-r$`-r/?r$`-r-r$`-r/?r%\_.\\\`-r-r%\`-r$*`-r-r/?r%\`-r_` $\`/?r%\\\`-r%\`-r-r$`-r/?r$`-r-r$`-r/?r%\"_\`/?r%\\\"`-r-r$_` $9\\\"`-r-r/?r%\,`-r/?r%\`-r-r%\`-r%\`/?r-r$5`-r-r- r/?r%\/?r%\,y`-r$Fz_}`$.~\\\`-r-r%\`-r/?r%\,`-r%\`-r-r%\5`-r-r-r/?r%\"`/?r$q`$r`$`s`$`$x\\\`-r-r%\`-r/?r%\t`-r$w_`x` $` $}\\\"`-r-r%\,`-r A(110)/ * TROLLS GOLD *96000J2G0:P1:T36P<ZP2000dZ1000yd * DRAW GRID * n:15:4,360xI6366:1,36I:II1376:0,36I:"5:2,2:2,3:3,3:3,4:4,4:4,5:5,5@13:32,3435:33,34           ĠϠӠ٠ͮijk[dlm n[l mn[,ijk [Xq \bqlq \v[@]͠ĬΠJ]נũT]٠Š h][ \[-rq-rq \[fUVW`7-r%\pYUVW`7-r$f/?r\pY[p_pdijk[!8l mn[lm n[q V\[~-rq-rq \[-rq-rq \[$-rq-rq-rq \[-rq-rq \[F-rq-rq P\[/x-rq-rq-rq-rq \$qq`$ qUVWY `$x `$n_d&]ŠԠǬج٩UVW-rqY_28r-rq $\[:L-rq-rq-rq-rq-r KM6 q*a(ҠԠŠȬͬө)T'' Lq.?6?r O4rUV(W/(ij'k2Y <qdqq\Xnqq\Xxqq\Xq`<$ qq`< UɱVW q.?r.?r.?r.?r.?r Yɱ [Q_q#q _q%q_ q%q _q%q _ q'q_*q'q_4q'q _>q'q_`=>rñ$_ -rq qY[,]ҠĠǠ qUVW -rqYUVW :`$`$`$`$`$ :`$`$ `$*` $4` $>6]àҠǠ̠Ӡq!q _q#q[ijkijk[lmn[lm#n[ijk"ijk#[lm#n[lmn[ijkijk[^]Š̠ӠΠˠϠŠȠӠŠԠϠŠĠΠ\\\\[,\\\\1[6\\\\\[#@\\\\\\[J\\\[(T\\\\\\\[0^lm#n\\\\\\[#h\\\\\\b-  rG_2]٠ŠҠ٩Ofó`$`$`$"`$,`$6`$@,`$J`$T` $h_^\\[\\\\\["\`-r$\`/?r$\`/?r$\`/?r$\G`/?r%\H`/?r%\K_)P]ŠǠàԠ:x-  rq-  r ` $.}oPINGdEL, JUST TO"&"STEAL HIS GOLD ....",C"PRESS RETURN";A$IU:(7)10::"*** ";::"PLEASE DON'T FEED THE TROLL";:::" ***"A12000:' BY GEORGE BLANK' CONVERTED BY MURRAY SUMMERS$' DONATED BY M.CH700 5300"D * RESET GOLD *CN0:X5,X3Y2:X4,X3Y1IOpUz_(7)r"TROLLS GOLD"x"IF YOU ARE FOOLHARDY ENOUGH TO ""DESCEND TO THE LOWEST AND INMOST""REACHES OF A CAVE INHABITED" "BY A NASTY TROLA(P)2)JE%(E6)(A(P6)2)JE@(E1)(A(P51)2)JE\(E1)(A(P50)2)JEjJ05490t5000~"5100,PPJ6P365500@5000J5200TTP4000^5300r| * TAKE GOLD *5000G1520055(A(P)2)(A(P6)2)(A(P50)2)(A(P51)2)5490"UP, DOWN, RIGHT (OR IN), LEFT (OR OUT), OR STAY? ";D$:E0:E$(D$,1):E$"U"E6E$"D"E6E$"R"E$"I"E1E$"L"E$"O"E1J0:(E0)(P1)(G1)4500 (E6)(PLAYER LOCATION *DP6%2200/24009XX3CYY3I` * RESET PLAYER *n0:X3,YG1Ġ0:X5,X2Y2:X4,X3Y1FP * SET PLAYER *Z12:X3,YxG1Ġ13:X5,X3Y2:X4,Y1 * CONTROL PHASE *E WON *:10="* * * * Y O U W I N * * * *"Ch" YOU ARE VERY RICH!!!!!!!!!!!"n~A11000:(7):"BY THE WAY...."A11000:"CAN YOU LOAN ME A FEW THOUSAND?" A11000: 4110 * E SIGN AT THE ENTRANCE SAID:":L:"* PLEASE DON'T FEED THE TROLL *":R|"THE TROLL JUST ATE YOU FOR DINNER!"" * * * Y O U L O S E ! * * *""WOULD YOU LIKE TO TRY AGAIN?";B$(B$,1)"N"ĝ:50 * GAMT303800TP4000+A(T6)2TT6C *END TROLL TURN *QTP4000[3000e3200k2 * EATEN BY TROLL *I110:(7)::30003200I11000:::10:10:::"SOME PEOPLE NEVER LEARN!!":"TH0H * MOVE TROLL UP *'R T735009\ A(T)2TT6Gf TP4000` * MOVE TROLL OUT *n T13600 A(T50)2TT1 TP4000 A(T)2TT6 3800 * MOVE TROLL IN *A(T51)2TT1:3730t * MOVE TROLL DOWN * ~ROLL * DT6 2200$ 2400. XX38 YY3> T * RESET TROLL *b& 0:X3,Yhv | * SET TROLL * 9:X3,Y  * CONTROL TROLL * 3000 3100 CTP C03370 3400* C(C)4 C63600> 370110 2600 A(B)D$ 0:X,Y5 D40čX,Y1< BB H ^ * CLOSE DOORS *l A90110w  DA(A)  A(A)0  A(D)1 " 2200 , 2400 . 15 1 D402880 6 15:X1,X1Y ; 2890 @ Y,Y1X J A O  * LOCATE T4 ZZ6 Z62540' Z(Z.2)4 Z2X7B  Z3X13P Z4X19^  Z5X25l  Z6X31r  ( * SELECT DOORS * 2 D(((1)80)7) < A(D)12610 F A(D)2 P 2200 Z 2400 * WHICH DOORS ARE OPEN? * B9017:2390  D75Y23:23903  D81Y29:2390<  Y35B V \ ` * X COORD OF DOOR *d j ZDs t Z492530} ~ ZZ6 Z62430 Z(Z.2) Z1X4 Z2X10 Z3X16 Z4X22 Z5X28 Z6X34 2590 ZD4)1 HA(A24)1 RA(A30)1% \+ fE  * Y COORD OF DOOR *T D492280h D13Y6:2390} D19Y12:2390 D25Y18:2390 D31Y24:2390 D36Y36:2390 Y30:2390 D57Y5:2390 D63Y11:2390 D69Y 5000 5200 2  * MASTER ROUTINE *E 2,2)5İ100O 2700Y L5300c 3300m v2800w 1000  * DOORS * A1110 A(A)0  A736 A(A)1  A5256 A(A)1 *A(A6)1 4A(A12)1 >A(A18""" " " " " """"""":4X,Y3:B140::0:4X,Y3Gx3:5X,Y17:B140::0:5X,Y17w2:3:5X,Y34:B140::0:5X,Y34:1:'20:1:"PLAY AGAIN? (Y OR N) ";:A$'A$"Y"1000'A$"N"10000t':A150,26,183,146,223,250,219,27,63,255,219,219,59,223,31,31,223,27,32,32,3,96,67,5,0 0,0,173,48,192,136,208,5,206,200,29,240,9,202,208,245,174,199,29,76,201,29,96,215,203,173,48,192,232,236,222,29,240,29,76,242,29,200,204,223,29,240,238,96n3,182,183,109,28,12,228,100,28,223,223,31,254,50,174,254,142,42,44,85,41,77,109,5,40,56,32h 44,32,0 219,219,219,219,219,219,27,5,32,193,193,32,53,69,65,32,63,73,65,65,37,77,9,77,73,13,13,21,141,141,50,109,137,18,150,146R 18,86,49,150,18,54,63,54,54,63,37,44,12,36,39,45,45,45,45,45,60,63,63,63,63,63,40,45,45,45,45,45 37,63,63,63,63,63,63,44,45,45,45,45,45,229,255,59,255,59,12,45,13,13,45,28,63,63,63,12,45,45,6,0 18,12,31,28,77,57,0 7,0Y 99,177,223,63,1,32,12,104,13,21ON - YOU MUST LAND AT":"A HORIZONTAL AND VERTICAL SPEED OF TEN"::"OR LESS."v 23:"PRESS ANY KEY TO BEGIN.";:A$| P74247666:N:P,N:232,0:233,29 5,0,12,0,84,0,91,0,93,0,133,0M 45,45,45,54,54,46,39,60,28,36,63,63,63,63,AS A PILOT IS ";((F%500)(10V)((101SI%)201))>10000i :5:9);"<<< INSTRUCTIONS >>>":: 5);"THE MAIN ROCKET IS CONTROLLED BY"::"PADDLE ONE WHILE THE SIDE THRUSTERS ARE"::"CONTROLLED BY PADDLE ZERO."N ::5);"A WORD OF CAUTISI%23ī2060"0:1X,Y:65103J812000:::10:"YOU HAVE JUST DESTROYED A FIFITY MILLION DOLLAR SPACECRAFT!!"10000 G11T%:0:2X,Y3G1::B13000:::10:"THE EAGLE HAS LANDED. CONGRATULATIONS!!"3:"YOUR RATING 00B3159(((1)30))F0JB2SI%2B2SI%2:J,B3:7912J,B3:PDB1B3oXJB2SI%2201:1940:ylB1B3JB2SI%21270:1940::16304,0:(1).6B1B11.3:1980B1B11.3J,B1:7912J,B1:V1XB2SI%23XB28571429:( (21):36,13:(V10);" ";U (21):36,34:H0ĺ">";(H10);" ":1740m "<";((H10));" " (23):36,5:F%;" ";:F%F%40(T%1):F%1T%1:F%0 (23):36,25:(B3Y5);" "; B2((1)280):B2SI%22B2179SI%2218):R70R%10:1440* xR130R%54:14403 R%0U 1580:XXH:YYV:Y11Y11d X21X21u X259X259 1200 ,R%0X10:Y1.5:1640 @R%10X1.8:Y1.5:1640 TR%54X1.8:Y1.5:1640 hHH(T%X13.5):VV(T%Y13.5).42 T%1R%54Ē0:G11T%:X8G11.8,Y1::1280` T%1R%10Ē0:G11T%:X8G11.8,Y1:t 1:0:0:1X,Y G11T%:0:2X,Y3G1: (Y((7912X))20Ē3:B2SI%2,B3B2SI%2,B3 <1680 PF%1T(1):T%T35:T%:T%0T%1 dR(0 ALITITUED= " 3( 1:3:0:1X,YL T%1āG11T%:5:2X,Y3G1:z T%1R%54Ē3:G11T%:X8G11.8,Y1: T%1R%10Ē3:G11T%:X8G11.8,Y1: 7623,(200Y):7624,10:7625:T%1āY816T%:7648: Y((7912X))6İ20002000 A :T%1:12:"INPUT LANDING SPOT SIZE (15-100) ";SI%Z SI%15SI%1001020| 20:" ONE MOMENT PLEASE"  3:1800 LH10:V4:A300:X20:Y20:F%20000 `23:"VERT. SPEED=";:" HORIZ. SPEED=" t:"FUEL ";:"  X MOOD LANDING X3 X BY XL X HERB SANDY Xe( X (C) 1980 X~2 X X< X SEE 'SOFTSIDE" XF X OCT. 1980 XP3000: INSTRUCTIONSd:11:16::"MOON";::" ";::"LANDING": x5!! ! ! ! ! !!!!!!!! XXXXXXXXXXXXXXXXXX3 XXXXXXXXXXXXXXXXXXL XX GOAL XXe XX BY XX~ XX FRED PENCE XX XX XX XX NOV,1979 XX XX XX XXSEE 'SOFTSIDE'XX XX SEPT. 1980 XX "     * GEORGE JOHNSON ***0**********************I*** ***4***PROGRAM WRITTEN***P*** BY STEVEN KAHN ***l*** ****** SEE 'SOFTSIDE' ****** JULY 1980 ****** ******PROGRAM MODIFIED****** BY *****08,245,174,0,3,76,2,3,96X 6 *** THE MUSIC *** 192,60, 192,60, 192,60, 144,60, 114,120, 114,60, 144,120, 144,60, 192,120 192,60, 192,60, 192,60, 144,60, 114,120, 114,60, 192,120, 192,60, 144,120 0,0**********************ISER","SIDE SADDLE"0 **** SOUND ROUTINE ****: 3080U P=PITCH : D=DURATION^ P,Dl P03070 768,P:769,D:770 3030  ** TONE SUBROUTINE ** L770790 V:L,V LN 173,48,192,136,208,5,206,1,3,240,9,202,2 MUFFIN","BUFFALO CHIPS","ALL AGLOW","MERCHANT MARINE" "IGLOO","ICE PACK","ROCKY ROAD","HAYWIRE","NASHUA PRIDE","HOME STRETCH","SANDLEFOOT","FIRST PLACE" "BIG RED","BLUE RIBBON","BARNSTORMER","GRAIN BELLY","BRIGHT EYES","THUNDER FOOT","STORM RA:" %":K140:"=";:KR`"= NAME";:27);"CASH BALANCE =":6:K140:"=";:Krj8:K1W::B$(K),,B(K):Kx~ "LIGHTNING FLASH","DADDY'S LITTLE FILLY","GLUE FACTORY","DOG CHOW","CHECKERS","HONEY BEE"6 "FUNNY FACE","PATTY MELT","MEADOW WON $";P(Y)R(L):B(Y)B(Y)(P(Y)(R(L)1)):1010`B$(Y);" HAS LOST $";P(Y):B(Y)B(Y)P(Y)::"ANOTHER RACE (Y/N) ";:F$(F$,1)"Y"ī130(F$,1)"N"İ11001010L::2:K1227:K:"%";:K:V12:"% ";::"FINAL SCORES";:(A)37ĠC(A):550:TA-P12000:P6930n:::"* * * * * WINNINGS AND LOSINGS * * * * *":1043:1043:1043:"THE WINNER IS NUMBER ";T;", ";N$(N(T))B(Y)0B(Y)B(Y)(P(Y)(R(L)))2Y1W::TZ(Y)LT:B$(Y);" HAS1,Y(A)! 0F(G)(G)(G)(G)_ :X(A)2,Y(A)1:X(A)1,Y(A)1:X(A),Y(A)1:X(A)1,Y(A)1t DF(G)(G)(G) NX(A)2,Y(A)2:X(A)2,Y(A)3:X(A)1,Y(A)2:X(A)1,Y(A)3 XF(G)AA(G) bv12:550:B((1)3R(A).25)1:X(A)X(A)B:X2:X(2)2:Y(2)10:7:C(2)7:550E A3:X(3)2:Y(3)18:8:C(3)8:550m A4:X(4)2:Y(4)26:13:C(4)13:550 A5:X(5)2:Y(5)34:1:C(5)1:550 A(5(1))1:630 510 &X(A)1,Y(A)1:X(A)2,Y(A)1:X(A)2,Y(A):X(A)1,Y(A):X(A),Y(A):X(A)Y)(P(Y)0)290! P(Y)0ī270Z (7)::"COME ON, YOU DON'T HAVE THAT MUCH."::270 ":"WHICH NUMBER HORSE? ";Z(Y):Z(Y)5Z(Y)1290 613:958 ^ r: wG16336 12:I039:0,39I:I A1:X(1)2:Y(1)2:C(1)2:2:550 A:B$(Y);" ";"HAS $";B(Y) B(Y)1P(Y)0::"YOU ARE BANKRUPT,AND CAN NO LONGER BET.":23:"PRESS ANY KEY TO CONTINUE.";:A$:310 I2223:I:" "::14: :"HOW MUCH DO YOU WANT TO BET? ";P(Y):P(Y)B($ L15:S(30(1))1:R(L)S:* ] :"* P A Y O F F S F O R H O R S E S *":h Y15~ N((1)28):SW0 J1Y1:N(J)NSW1 J:SW1195 :3 N(Y)N Y;") ";N$(N(Y));27);"PAYS ";R(Y);" TO 1":Y Y1W::141  :N$(27)*I027:N$(I):43000V3:"WELCOME TO VIDEO DOWNS!"u2::"HOW MANY PLAYERS ";W<W0W6ĺ:"NO MORE THAN SIX PLAYERS PLEASE":P12000:P::30ZY1W::"NAME OF PLAYER ";Y;" ";:B$(Y): nU1W:B(U)1000: