Z:2020R2030\"": MU,16:PC,0:$PC,0:TN,0:MU,0:AQ17:PC,70:PC,0:Q:TPC,70:PC,0:d(PN0602502"P RETURN ";Z20ZL1IN$(IN$,ZL1):"";:2030HZ141Z$(20(ZL1)):Z2ZL:Z$;:R(5),D$(6),T(12)%nI16:D$(I):I>x"   "Wy"   "pz"   "{" ѝ  "|" ѝ  "}" ѝ ѝ "CR$(13)cBB$" "800D1D23000:DN1*1100:DN::DN0R"REMOVE WHICH NUMBERS? ";:60000:bIN$""650nN0:S0I1(IN$):T$(IN$,I,1)T$","450T$"0"T$"9""NO ";T$;"'S PLEASE.":1000:420I:I(IN$)1U(IN$):IN$(I000:420 I:IN$""430Q SD1D2"THE NUMBERS MUST ADD TO";D1D2;".":1000:420\ K1Nn UR(K):T(U)0z T3U1 "";T);((U),2):K SW0:I112:SWSWT(I):I SW0400 &DL0:1000:1100 0"YOU REMOVED ALL 12 NUF THE DICE, YOU REMOVED":12F;"NUMBER";:F11"S";Q ", LEAVING";F;"NUMBER";:F1"S";Z "."~ "DO YOU WANT TO TRY AGAIN? "; 60000 (IN$,1)"N"360 9999 "" *" 4"ROLL  >"ΠӠӠ 2 CHERRIES"٠ΠŠРĠŠ;"Š, ԠРĠ.f"(L, I 'ԠĠ. D' -{"ΠϠ.))60200,," .5:1H"2 CHERRYS",," 2:1R"3 CHERRYS",," 5 ";25); IN030502 " ":25);" "8 j " ";:IN1"";:IN9""; :25);"";((IN),2);" EXTRA ROLL "; IN1"S"; : '"": `IN$" ":ZTTI:ZC2:ZD$(20) jZ$:Z$ԠӠŠ " ΠԠŠŠӠϠ.A"IΠŠǠΠՠĠ Z "ҠŠ.e*60200~4"P :>"1 CHERRY",," .5:1H"2 CHERRYS",," 2:1R"3 CHERRYS",," 5# 1IN$(IN$,ZL1):"";:60010;Z141Z$(20(ZL1)):Z2ZL:Z$;:Z:60000F60010V(PN060250x260300:"PRESS RETURN TO ";"٠РӠĠΠҠ,QH"(٠ҠŠ), ՠiR"ĠƠ."TŠàĠӠŠ"ƠҠ. TŠ8 ٠Ӡ ". TR$;" 11);"ݦ4 R$"ݦ"J 11);R$:11);R$g !11);"m &} X2200:TN,1 ]""; bI16 g" ɝݝ";:2270:I l" ɝSHIFT ٠Š. IƠ'>"٠РӠĠΠҠ,QH"(٠ҠŠ), ՠiR"ĠƠ."TŠàĠӠŠ"ƠҠ. TŠ8 ٠Ӡ ". T PLACE YOUR BET..$ ";:2020:IN$"0"21406 IN$""M(IN$)J M01790:380[ M50001970i M11990r 890 "":""; R$"ݦ ݦ ":Q$"ݦ " 11);" * 11);"  11);"TΠD F"Ϡ٠Π .J"YҠРӠĠ -w"ĠǠ. T -", ԠӠ٠ ."YҠΠӠ, -", CURSOR "," PLUM "S" CHERRY "," PLUM "," LEMON "," ORANGE "," CURSOR "," CHERRY "" PLUM "," LEMON "," ORANGE "," ORANGE """XCURSORMAGX","SLOTBY MARK","JENNIFERISA","DEBBIEHLOVE"," CHERRY "," PLUM "," LEMON "," ORANGE " 6440B5C5340'N$"**JACKPOT**":1540:N$"3 OF A KIND"D(X25:M$"WOW!!! JACKPOT"RxTK1540y1810:P$;M$;" PAYS";X;":1":1580TK01660340W110:K13:""14)" ":K:D13:""14)N$Y i WONDERFUL WIFE DEBBIE&jKk LOVE MARKhnPC59464:TNPC2:MUTN1I$"":N$"3 OF A KIND"BL$" "CR$(13)P$""3A 5X4:M$"SPECIAL II":1400 340B3340KC3C8X9:M$"THREE LEMONS":TK1:1400oC5X5:M$"SPECIAL III":1400x340B4340C4C9C10X9:TK1:M$"THREE ORANGES":1400C5X5:M$"SPECIAL IV":14003L$ /PC,1284W4"";TB)A$;""+6"";TB)B$;""C9"";TB)W$(W):W,I_>L$;"";TB)C$qC2260:2250:zz600A(6(1)1):B(5(1)1):C(9(1)1)A$A$(A):B$B$(B):C$C$(C):730TK0:M$"THIS"A110U:$I$;"YOU FORGOT TO BET":1900:*60I$;""h:ER$" "DER$:ER$:ER$:ER$;I$;blvTTTITITT1001920TTTITITT201950"ݝ";:2270:1940& q"ɝݝݝ";P vI15:"ɝݝݝ";:IZ {2260` j TTTI} TITT150710  M$"":L$"" 2200:TN,1 I18:W14:L$ PC,1284W "";TB)W$(W);"" 3 ԠΠĠ#"Š. NŠԠΠΠ'Q"Ԡ, ̠ԠƠ٠|"ĠϠΠŠ'Ӡ."A, ԠŠ " , ĠԠŠӠΠ 11);"ݦCURSOR+CASINO= 11);"ݦJ 11);R$[ 11);R$;"l 11);R$;"} 11);Q$;" 11);R$;" 11);R$;" 11);R$;" 11);Q$;" 11);R$;" 11);R$;" 11);ȠΠŠ٠ -(". IԠӠŠU"Ơ٠Ϡ, Ϡՠ' n "̠Ƞ."z 60200 "Y ӠŠӠ:*"PǠSHIFT ӠŠ.4"EҠ40:600:730:1900%;N14:W$(N):N:TB15.J440_TTTM:"ɝ*"^T0"MONEY AHEAD ":BL$;:"$";ThT0"MONEY BEHIND":BL$;:"$";(T)rT0"YOU ARE EVEN":" "|I$;:1810 "  "D:W:, **PAY OFF***6SXM:TTSM@I$:eJ"YOUR BET WAS $";M;" YOU WON $";S;" "sTTK1900y^|U117"";19)"*"TTTITITT51690"";19)" "TTTITITT31720$"THIS IS THE":B$" GAME OF ":C$"***SLOTS***":TB14YN16:A$(N):N:N16:B$(N):NN110:C$(N):N:N14:W$(N):N" CHERRY "," PLUM "," LEMON "," ORANGE "," CURSOR "," CHERRY " " CHERRY "," PLUM "," LEMON "," ORANGE ","  LP59468,PK::"";:100N dPNPN1:"";PG$;" - C #";NM$;" () 1979 P";PN;""T n 0"";PG$;" - CҠ#";NM$;" C () 1979 : "IҠǠŠ D"TӠ͠ӠΠŠΠ- N".  :59468,14:PK12B SPACE! COPYRIGHT (C) 1979 GREG ERKER_ CURSOR #8, MARCH, 1979 BOX 550, GOLETA, CA. 93017:ZPG$"SPACE!":NM$"8":62000dXC(9),YC(9)nCH33226:LM200xI19:XC(I),YC(I):IJ830937:X:J,X IN$" ":ZTTI:ZC2:ZD$(20)( jZ$: Z$""60070X tZTTI(" ",ZC,1);"";:ZC3ZC:ZTTI15c ~60010 Z(Z$):ZL(IN$):(Z127)32" ";:60110 FL(Z127)64(Z127)91Z$((Z128)255) ZL25460010 IN$IN$Z$:Z$;ZD$;Z$;  "1"ϣ";T$;T$;"Н"_!T$((EN),2):T$T$("",8(T$))&"ENERGY- ";T$;"HITS-0 "0T$"":"̤";T$;T$;""D827,100:826,41:(830):SD41X((5)40):Y00KP1:K26XX1:YY1:SD2:2500:K18YY1:SD1:2500[K25XX1:YY1:SD0:2500wK42XX1:SD42:2500K34SD41:2500 K41XX1:SD40:2500K58XX1:YY1:SD82:2500 K50YY1:SD81:2500 *K57XX00 ( CH,215:MU02640- 2 59467,16:59466,15:59464,0I < A108010:59464,A:Ah F 59464,0:59466,0:59467,0s P CH,87 Z ENEN100:"";10);EN;" " d "";10);EN;"" n C187C287C3873000 x PS,46:PS1,64:PS1,64:PS40,93,32 HH1:"";32);H;" " ENLM900' 6000. J8 1000Z p"";10);EN;"":MU06040{ z59467,16:59466,15:59464,0 K15:L2001002:59464,L:L:K 59464,0:59466,0:59467,0 T$:T$""6040 "ATTENTION: YOU00 H10A$"GOOD":B1:6500,H5A$"NOT BAD":B2:6500IH0A$"FAIR":B0:6500s"YOU DIDN'T HIT ANYTHING! YOU'D BEST"PRACTICE FOR A WHILE.":6600B2"A GOOD CONDUCT MEDAL."d"YOUR SHOOTING WAS ";A$;". AS A BONUS,"'ITM("? ",SW,1);"";:SW3SW:TMTI30^8010,rT$"N"YN0:?|T$"Y"YN1:UT$(13)YN1:_8010ă162,0,172,59,3,185,0,31,133,98,185,1,31,133,99,161,98,201,46,208,4,169"ă32,129,98,185,0,31,56,233,41,153,0,31,185,1,31,233,002"P RETURN ";"YՠԠӠ ҠΠhH"ӠӠҠΠŠ,R"Ԡ'ԠΠŠԠ. F\", f"P: GREEN GREEN BLUE REDz"G :59468,14:PK12F PAPER COPYRIGHT (C) 1979 RALPH S. DUFOURf CURSOR #7, FEBRUARY, 1979 BOX 550, GOLETA, CA. 93017:ZPG$"PAPER":NM$"7":62000d"DESIGN YOUR WALLPAPER. TYPE FOUR GRAPHIC"n"SYMBOLS AND PRESS RETURN "ϠӠŠҠΠŠPԠ>". AҠȠӠՠ, l"PԠ̠ŠՠӠԠנ"ՠŠϠŠ. S,"ՠ̠ŠĠנ٠HITS "MISSES ՠԠȠԠ'Š̠Š ,"ŠPԠ̠̠ՠנ̠ՠ7" ̠Š.M"GĠ.Y 60200d, ӠRETURN ϠĠ2"נ٠ӠĠӠՠ."< 60200F"TŠPԠ RETURN ";' b"̠Ƞ. '<' ̠Ƞ"ҠҠŠҒ ȠŠ"ϠӠ, Ġ'>' ȠŠ "ŠԠƠ "3)" "%3)" "92)". "L&3)" "_03)" "r:3)" "D3)" "N3)" "X3)"̤"]T11000:b"l20)""v22) ""22) "ӠRED, ORANGE,L"YELLOW, GREEN, BLUE, ĠVIOLET, Ҡ@`"ǠԠ 1 Ϡ6 (Šlj"ŠĠΠŠҠRED t"VIOLET)). TŠΠŠҠ~"ϠϠӠĠȠ--Œ." 60200 R19:DR53500 p KK1D:BJ10KKKD(DR)z B0B9935004 2900:PK102PKSBE PKSB3500] KX4KK4KX3500k KK:3550s DR APJ40K,102 K:J:@TB);PR$;": ";:60000JIN$"" 8050TIN1(IN$):T 1B:R1:DR19:BJ1D(DR):2900:PKSBRR1 RK125601 DR:K1K11:2500@ BJ1:2900j 22);"#";L;": ";("00"((B),2),2) LL1:APJX40KX,L1:( K- J:R02400/ 2210  KK1J1 BJ210K2(KKK)D(DR) :59468,14:PK12A MIND COPYRIGHT (C) 1979 GLEN FISHERa CURSOR #7, FEBRUARY, 1979 BOX 550, GOLETA, CA. 93017:ZPG$"MIND":NM$"7":62000dCR$(13)i"DO YOU WANT A LIMIT ON THE NUMBER OF":"GUESSES? ";:60000#nIN$ J2Z1Z2Z3:K2Z1Z2Z3BAPJ240K2'(B)Z%(J,K)2350B CYCLE DIRECTION-TESTYDR19:DR52340gKK1J1vKKK2330BJ210K2(KKK)D(DR):B0B9923402900:PK102PKSBPKZ%(J,KK)2340 K24KXKXI:LM(IN$)$T$:T$""CC1:200NRED,ORANGE,YELLOW,GREEN,BLUE,VIOLET,N4:CZ6:B$"":I1CZ:B$B$" ":L$L$"":IP(N),G(N),PS(N),C$(C):I1C:C$:C$(I)(C$B$,CZ):I:C$(0)B$H$"":M$"":I1N:H$H$"":M$M$"":1:(1).5L1 rI((1)100)|K1J12J14J11:K11J11JL%(2,J1,K1)I1650VK1:J1uL%(2,J,K)I:DI(I10)10L10D91650L19D01650L1D:IILB:I99I01650K:J:1000 "OTT"";T(OT));C$(G(OT))#T1TN0TNT1S"";T(T));"";C$(G(T)):OTTgT$:T$""1300T$" "T$""TT1:1200(T$(20)T$""TT1:12002T$(13)2000<I1CF:T$("123456789",I,1)T$(C$(I),1)19000K30)fB421390hK:V(K1)V(K1)W(J),iI2Z%(J,1)0>jV(K1)01400InJ1:I[sL1L11:1200ax"";N$(K1);"' !! ";L1:I12J14:K1J1J1(L%(I,J,K)10)K1L%(I,J,K)J1SWER IS:":H0:1990: TB);" SORRY, THE SOLUTION WAS:":H0:1990U LSLS1:TTTTTN:2100m I1N:G(I)01300 PS(I)P(I):I "";T(T));C$(G(T)) H0:I1N :PS(I)G(I)HH1:PS(I)1:G(I)2 I M0:I1N:J1N (IN$,1):IN$"N"1000( p"VERY WELL.":LSGM23008 zLM402250z "PERHAPS YOU SHOULD TRY MONOPOLY INSTEAD":"OF MASTERMIND."; " YOU DIDN'T GUESS ";:GM12210 GM2"EITHER":"OF ";:2205 "ANY OF" "THE";GM;"PATTERNS";:2$(IN$,IN,1):T$"0"T$"9"8050^IN:LC(IN$):LC0LC998050#h<r:"";BL$;"":8000]`IN$" ":ZTTI:ZC2:ZD$(20)tjZ$: Z$""60070tZTTI(" ",ZC,1);"";:ZC3ZC:ZTTI15~60010Z(Z$):ZL(IN$):(Z127)32" " 2900:PK102PKSB PKSB2880, R1:2570:LV(2)(@ KK:2600.T P^ B%(L)B:JX(B10):KXB10JXi PK(APJX40KX):oH M J14:Z%(J,1)03410P JR L18J1W DJ:J09:K09Z (APJ40K)SB3550\ D(IN$,1):IN$"N"IN$""LM1E38:200VsIN$"Y""PLEASE ANSWER 'YES' OR 'NO'.":105x"WHAT SHOULD THE LIMIT BE? ";:60000IN$"""I'LL ASSUME 10.":LM10:200I1(IN$):T$(IN$,I,1)T$"0"T$"9""NO ";T$;"'S, PLEASE.":120 4K22340 KK 2800$ DR. K2:J2:26001` 3400:K18:D((1)5)Da D0F0:2406^b D4FF25:D1:2406oe F((1)99)}f MLV(2)j BSH%(D,M)F:B1002510:M:t FF43:2410 B((1)99) 2900:PKSB2500  JITB6:T(N)(CZ1)(N1)TB9I1N:P(I)((1)C)1:Ib"";:I1N:T(I)(CZ2)1);I;:I:I1N:T(I));L$;:IGMGM1:TN0:"GAME":GMLTNLM1960VTNTN1:TTTT1:TB3);((TN),2):T1:OTT`I1N:G(I)0:I";22);V(2);"":2200:L1V(2)SL PRINTTAB(22);"#";L;": ";RIGHT$("00"+MID$(STR$(B%(L)),2),2)`NL:1300fnL1Z10:Z29:Z31:(1).5Z19:Z20:Z31R0:J411:Z%(J,1)02605K1J1Z%(J,K)SB2600PI ZT$">"T2T1:1800- dT$"<"T2T1:1800> nT$"?"1950H x1300W T2NT21f T21T2N IG(T):G(T)G(T2):G(T2)I &OTT2:1200 lG(T)I:TT1 v1200 " " TB6);"THE AN10TAPLJ140K1B(T):T,B128%K:J:L0:IC""^"WANT TO PLAY AGAIN?"tRJ$:RJ$""1518RJ$"Y"5000@JG(1)1:G(2)9:G(3)10:G(4)11TL11:J411^B((1)41):BG(B)hL PS(I)G(J)MM1:PS(I)1:G(J)2 J:IE "";T(N1));(H$,H1);(M$,M1)S *HN1100f 4"";T(1));s >I1N1 H:C$(P(I));" ";:I RC$(P(N)) WHNTB);" THAT WAS THE PATTERN!" \"CARE TO TRY AGAIN? ";:60000 fIN$220 "THE":"PATTERN";! " I SELECTED.":3000b "TRY A HIGHER GUESS LIMIT THE NEXT TIME":"YOU PLAY THIS.";l 2190 "YOU AVERAGED";(TT10(GMLS))10;"GUESSES PER SOLUTION,"  LS0"BUT MISSED";LS;"OUT OF";GM;"PATTERNS.":3000 ;:60110 (Z127)64(Z127)91Z$((Z128)255)ZL254600109IN$IN$Z$:Z$;ZD$;Z$;XZ13IN$(IN$,2):CR$;:Z20ZL1IN$(IN$,ZL1):"";:60010Z141Z$(20(ZL1)):Z2ZL:Z$;:Z:6000060010$IN1(IN$):T . I j (""BT$(1),FW1);""# P(T,0)P(T,0)1? P(T,P(T,0))P(F,P(F,0))S P(F,0)P(F,0)1q ( P(2,0)NP(3,0)N1900{ 8000 " " " YOU DID IT!!" " " "IT TOOK :59468,14A BSHIP COPYRIGHT (C) 1978 HOWARD ARRINGTONh 201 S. ALMON #9, MOSCOW ID 84843n: CURSOR #5, NOV/DEC 78 BOX 550, GOLETA, CA 93017 :2 "BSHIP - CҠ#5 (C) 1978"4"TŠŠƠB:  T)1HTP(2,0)HTHT1 uIFCHT" z: J18B :T$(J);LF$;B$(J);LF$;"";J :JU :"";\ If ""; L$("",1FW):R$(RT$,FW1) "";(" ",FW);"";("",FW); FT2250 IF $u20,21,30,39,40,41,-1,0,1,-41,-40,-399xI03:S$(I):Ij"S","P","C","B"BL$" "W(1)1:W(2)1:W(3)2:W(4)3J14:K1J1:Z%(J,K)SB:K:JI19:D(I):I"TŠPԠ̠ˠՠנ٠."ՠȠϠˠ. (B:V"٠3 4...). IԠ̠Π}"ŠƠŠ, Ġ:"'F͠Ƞ?'. EҠŠ"ƠŠŠ͠ȠՠԠ"Š Ơ #":20);" #"@214);"F "a414);" '5'."514);"E ";N$(1);"' "6700:J14;: S$(J1);" ";J1TTB3:PR$"L":8000:L%(1,J,1)LC ^20);"D";PT$:T$""60240ZPNLP59468,PK::"";:100_dPNPN1:"";PG$;" - C #";NM$;" (C) 1978 P";PN;""en0PG$"HANOI":LP1:CR$(13):59468,14D"CURSOR #5 - HANOI C (C) 1978I"AĠӠƠH64 bJ1L%(1,J,K):K1(J110):J1J1K1101 dL10J19640D fL19J10640_ lL1J1:BAK140J1120x vLSB(B)SBB,L: D0: " 0123456789" " 0";:J110 2);"----------":J  L11: ** DISPLT"";^(#""!`IN$" ":ZTTI:ZC2:ZD$(20)8jZ$: Z$""60070htZTTI(" ",ZC,1);"";:ZC3ZC:ZTTI15s~60010Z(Z$):ZL(IN$):(Z127)32" ";:60110FL(Z127)64(Z127)91Z$((Z128)255)ZL25460010:TB  I211:I21800* "";= J19:BL$:J\ "";V(I);""j J1V(I) TB0:PR$"#"(J):8000:B%(J)LC: K(LC10):K1LC10K TAP(I1)K40K1 (T)SBB%(J)2:1295 T,L1  YOU";MV;("MOVES",5(MV1));" TO DO IT."C T2N1:"THE SHORTEST POSSIBLE SOLUTION"i "NEEDS";T;("MOVES",5(T1));"." "PLAY AGAIN? ";:60000 (IN$,1)"Y"  PR$;60000:IN$""(IN$,1)"Q"(IN$)1. PET67 "S CURSOR NӠ#5 ."JPSB45:SH%(3,7)\UI03:J17pWSH%(I,J):J:IX30,4,29,60,92,96,89,0,2,10,11,12,20,22,0,9,11,21,29,31,40,0,1,10,12nD(9),S$(4),L%(2,4,5),Z%(4,6),E(9),B%(7)sI19:E(I):I13T131 :J15 LF$(J);R$;RT$(J);L$;% J/ "";6 I@ 2300S IT13F131] "";l :J511 ::LF$(J);R$;RT$(J);L$; :J I IHT1TC1  :J811  :T$(J);LF$;B$(J);LF$;"";  :J $ :"";9,10,11,-1,0,1,-11,-10,-9DA32930:P22:L11::V(1)7:V(2)7:N1i"YҠ: ";:60000:N$(1)IN$N$(2)"C PET"," 0123456789 E "/17);" ":20);"<00 99>"015);" ŠР. T, ՠ!"ŠҠƠŠŠŠ@"ԠϠŠԠ.k"R - ՠӠŠŠ"Ԡ! (T PԠ'ԠԠՠ "̠).60200Ơ".: ";:60000:(IN$)1520* _IN$"1"IN$"9"520V `DD((IN$)):K1:L15:600:D0K2:500{ hK2J1:L%(1,J,K)L%(1,J,K1)D r600:D0500 K:J:1600 LSB: KK1 1 1 610:K :"";BL$;"":340 X ]L(S$(J1))ɠ N"WԠ? ";:60000$X(IN$,1)"Y"62060<b"":59468,12:Gl60200rv"TŠԠƠӠŠӠ "ŠƠ. H, Ҡ"٠ҠŠĠΠРƠ". AY GRIDS "":B$"0123456789"" TB02222= ""TB);N$(TB221):c  TB2);B$:TB);" " I110:TB);(B$,I,1);"----------":I $TB);" ":"":TTB13:T);"" .I25:T);("*****",I):I:""IN$IN$Z$:Z$;ZD$;Z$;Z13IN$(IN$,2):CR$;:KZ20ZL1IN$(IN$,ZL1):"";:60010~Z141Z$(20(ZL1)):Z2ZL:Z$;:Z:6000060010(PN0602502"PRESS RETURN TO "; o DLCH0 DLDLCH: 2430W t LNCH0 LNLNCHz ~ 525,0:DDL:DL90: 7400:DLD 2750: I$: I$"" 1000 I$" " 4000 T$"PRESS 'RETURN' TO BEGIN": 2700 I$: I$"" 2460   :PK128 HANOI COPYRIGHT (C) 1978 GLEN FISHERW CURSOR #5, NOVEMBER 1978x BOX 550, GOLETA, CA. 93017~:Z62000dT$" "iB$" "nTP$(8),T$(8),BT$(8),B$(8) xI18'C$(T$,2I LNVJ((1)91): JT 1110A`:SQ$SQ$("123456789",J,1):TJIj ITt 7000dT1: 525,0}4 T$: T$"" 21055 TIOF 6100:OF1E86 21009 T$" " 6100: 4000: T$(13) 6100: 2300> T$"1" T$"9" 1RN Ϡ: " RJ$:RJ$""60150d, ŠŠӠ,U"ĠӠĠŠ."UŠŠàӠϠҠ". WΠՠӠΠԠ", Š̠͠٠WRONG!!!," (I):I/ 0,237,211,188,177,157,140,124,117,104MW$"Н̺":D$"  "m CM$(9):CM$""{ I0 2:V$("",7(2I)1,255): J1 3&::H$("",11J,255) 0::CM$(10ϠԠŠ. A 2" , ŠŠӠ,U"ĠӠĠŠ."UŠŠàӠϠҠ". WΠՠӠΠԠ", Š̠͠٠WRONG!!!," :RT$(I)(R$,2I1,2):I!,CR$(13)N"HOW MANY DISKS (UP TO 7) ? ";: 60000^IN$""500nI1(IN$):T$(IN$,I,1):T$"0"T$"9"550"NO ";T$;"'S PLEASE.":500&I0N(IN$):N7"I CAN'T HANDLE MORE THAN 7.":500:| " ";L$;"";L$;"";L$;""" I1 6: T$: ID " ";L$;"";L$;"";L$;""dH$"":V$"" "";"7";H$;"8";H$;"9" V$;"4";H$;"5";H$;"6" V$;"1";H$;"2";H$;"3"'# 8999` "C #3"~DN$;("",N);I1NL(""RT$,7I1);(""BT$(1),2I1);""_P(1,NI1)I2fIoMV0|lTMTI60vTITM19108000PR$"FROM WHICH PILE? ":5000:IN$""1950F(IN$)P(F,0)1"THAT PILE IS EMPT  "SĠ.  59467,0  59466,0& 7 8"S .K B 59464,PCH(SQ)Q L\ X 6000o ] I1 (SQ$) b:SQ((SQ$,I,1)) l: 7500 q 6200 v: 7400 : 7600  I  6100  TMTIDL  TITM 7410 I$" " 4000 2750: 10003 "": "";20(T$)2);T$9 W "": "";20(T$)2); (" ",(T$)) DN$;""; (" "(DL),3); "";LN WR ,1):C$C$C$C$:C$C$C$C$:C$(C$C$,14)CTP$(I)(T$,2I1,1)C$}C$(B$,2I,1):C$C$C$C$:C$C$C$C$:C$(C$C$,14)BT$(I)(B$,2I1,1)C$IL$"  "R$"  "LF$(5),RT$(5)I15:LF$(I)(L$,2I1,2) 2100H 7600:SQ(T$): 75003M 6000: 6200:OFTI45OR T$(SQ$,T,1) 2200a\ TLN 2250rfTT1: 2100T$"WRONG!!!":CH1:WR1: 2400T$"CORRECT!":CH1: 2400T$"STARTING OVER":CH0 DL30:LN1` 7600: 2700:FW2+ H DN$;("",FC1);(""RT$RT$RT$,X);M MLF$("",FW1) RI1 8:T$(I)(TP$(I),1FW):B$(I)(BT$(I),1FW):I WHT0:J1:FTJ1 \IFTJ aP(I,0)HTHTP(I,0) fI kHTP(T,0)HTHT1:2165 p(F(3IJ))V$H$:: JD I%X 8000HbDN$""vl DN$;"THIS WAS: /60 SECS., LENGTH"v "BEST: /60 SECS., LENGTH"LN1:DL30BL0:BD1E8 2450SQ$"":T0:WR0 525,0L I1נՠ נ.%"YՠΠԠҠ٠ǠO"RETURN KEY. P SPACE Ϡ_"Š."QUIX ӠĠ! SŠŠN"ҠӠΠנϠĠŠ"ϠΠ."PӠRETU N2"DON'T BE RIDICULOUS!":5009DN$""RRT$""sI13:J07:P(I,J)0:J:IL"";DN$;"";:P(1,0)NVI13:" ";:I`DN$;"#1#2#3 - QUIX (C) 1978"j "H YOUR ?"At "W ? N";T$]~T$(T$,1): T$"N" "QUIX - CURSOR #3 (C) 1978"TӠӠŠԠӠҠ."T PET ̠٠, " Y.":1900+ PR$"TO WHICH PILE? ":5000:IN$""19508 T(IN$)b FT"THAT MOVE DOES NOTHING.":1900u P(T,0)02100 *P(F,P(F,0))P(T,P(T,0))"IT WON'T FIT.":1900 4FCP(F,0):FWP(F,FC):TCP(T,0):TWP(T,TC):MVMV1 >X113(F1)7  L 7700: W$;:  7700: D$;:.  CM$;CM$(SQ);:R @L$"":S$" "v J " ";L$;"";L$;"";L$;"" TT$" "S$""S$""S$"" ^ I1 6: T$: I h " ";L$;"";L$;"";L$;"" r I1 6: T$: I  ' ZAP COPYRIGHT 1978 TOM MARAZITAC CURSOR #2 AUGUST 1978h P.O. BOX 550, GOLETA, CA 93017v VER 1.1^ 59468,12`WM(255)cEL18:HPEL1d"CURSOR #2 - ZAP"iA(255)n60000x""PO33766S1X d 60000:MG1E36'f" "7gGAGA1:G0Fi N0 99Qn 1100Yx NhOL0:OH99|NUM((1)100)SP$" "DL150: OHOL 450 "";SP$ SP$: "";SP$"OVE YOU DIAGONALLY)" 2 "EACH TARGET IS WORTH 10 POINTS, BUT"j "YOUR MISSLE GETS BIGGER AFTER HITING A TARGET...p "THE GAME ENDS AFTER 6 CRASHES!" "PRESS 'SPACE' TO BEGIN THE GAME" ZZ$: ZZ$"" 60310 $' APP N:OHHI/ LOOL NOL LO1: 1200: N:OLLOA LOHI 500tT$"MY NUMBER IS BETWEEN YOURS.": 1300: 200, LOOH NOH LO 1: 1200: N:OHLO16T$"MY NUMBER IS LESS THAN YOURS.": 1300: 200  HIOL NOL HI:E1171:A$:A$""240' E: SCSC10:SC0SC00 9009 770g "SCORE="SC;18); "NO. OF CRASHES="CRm  `"DO YOU NEED INSTRUCTIONS";B$ j(B$,1)"Y"60030 t ~"YOU CONTROL A STRANGE MISSLE!" "TARGETS '' APP "IT TOOK YOU ONLY";G;"GUESSES.":GTGTGD GMG MGG}0"DO YOU WANT TO PLAY AGAIN";PA$: (PA$,1)"Y" 800D P1 200: PN 102  U1300: U"THANKS FOR PLAYING."  "IN":900 D NCRCR1:CRASH S900/ XCSLLCS8 bCS0H gEL18:HP17Q hTP0Z lCV0 {T18 :X1100::PO,209:X11100::PO,81: |X0255:WM(X)0::HP17: TP0 ~ CR6650 120 "" "YOUR SCORE IS"SrHE BRICK JUST BEFORE2 "IT SHATTERS THE WINDOW. YOU STOP THEW "BRICK BY PRESSING THE 'Y' KEY.`  50$" 410 C$"Y" "YES": Z1 200: Z: 100 C$"N" "PLEASE ANSWER 'YES' OR 'NO'": 400 "NO" "THANKS FOR (PO)102590"Y(PO)102(PO)1045904^(PO)81590?hPO,81]rR((1)15)1:S5ZZ20wwP1((1)ZZ)1:ZZ50|R3410P13480730:230S6400Q((1)1000)(32768160 )Q33726430(Q)32430 N10 " "; V N `$  1000: "":B  "";T$;  (" ",40(T$)) (TTIDL 2 TIT 1330 < `"CURSOR #2 - GUESS" j"DO YOU WANT DIRECTIONS";D0$ t (D0$,328093280838:X,100:>X328084032768(4023)40:X,103:aX32769(4024)33766:X,99:X337674033767(4022)40:X,101:900525,0410A$"8":240A$A$"4"DIR1A$"8"DIR40A$"6"DIR1ENTER LOW NUMBER";LO:GG1M" "a Q1 200: Q"ENTER HIGH NUMBER";HI LOHI TLO:LOHI:HIT NUMLO 300 NUMHI 400 HIOH NOH HI1 1: 1200: ANKING OUT NUMBERS OUTSIDE THE RANGE9 "OF NUMBERS THAT TRAP THE SECRETG "NUMBER.y H"PRESS THE 'SPACE' KEY WHEN YOU ARE READY" R RJ$: RJ$"" 61010 \d `"CURSOR #2 - GUESS" j"DO YOU WANT DIRECTIONS";D0$ t (D0$, 1200: N:OLHI1BT$"MY NUMBER IS GREATER THAN YOURS.": 1300: 200^ ""; "AS YOU CAN SEE, MY NUMBER WAS";NUM 510T$"YOU GUESSED MY NUMBER!!":DL0: 1300NNUM: 1000 "ݝݝ"2EAR ON THE SCREEN, WHICH"7 "YOU TRY TO HIT. USE NUMBERS TO CONTROL"Z "THE MISSLE: 8 MOVES YOU UP," " 2 MOVES YOU DOWN." " 4 MOVES YOU LEFT" " 6 MOVES YOU RIGHT."  "(1, 3, 7, AND 9 M ;GA;"GAMES, YOU MADE A TOTAL OF";GTL  "GUESSES, WITH AN AVERAGE OF";GTGA;"GUESSES"^  "PER GAME."  "AT YOUR BEST, YOU TOOK ONLY";MG;"GUESSES."  R(N10):CNR10  ""; ("",R1);  3C3);  L 1000:C  $ "HIGHEST POSSIBLE SCORE:"TC10* ` "YOU HIT";((SC(TC10))100);"% OF THE TARGETS"l  525,0  "WANT TO PLAY AGAIN";PL$  (PL$,1)"Y"  LOCWM(TP):TPTP1:PICK TAIL TPELTP0 LOC,32  : 59468,(59468)14@ COPYRIGHT (C) 1978 GLEN FISHER` CURSOR #3, SEPTEMBER 1978 BOX 550, GOLETA, CA. 93017:260000:""d59468,(59468)25312nF11:F23:PICKS DISPLAY TIME CHANGE F1/F2 OF THE TIMEI09:PCHSS1:HH1:TCTC1Q,102.A(H)Q:CV1400<CV1:220Q REMOVE TARGETScP((1)H)1i(A(P))102540A(P),32SS1A(P)A(H):HH1:400&HIT TARGET0SCSC105SS16ELEL27EL250EL250 1)"Y" , ~"YOUR PET PICKS A NUMBER FROM 0 TO 99"V "WHICH YOU TRY TO 'TRAP'. YOU ENTER"~ "A LOW NUMBER, THEN A HIGH NUMBER" "WHICH YOU THINK WILL 'TRAP' THE PET'S "SECRET NUMBER. "THE COMPUTER GIVES YOU HINTS BY "BL A$"2"DIR40!A$"7"DIR415"A$"9"DIR39H,A$"3"DIR41[6A$"1"DIR39k7A$"5"770y@POPODIRAPO33767PO33728PO32808PO32847590:CORNERSD(PO)102550EWM(HP)PO:HPHP1FHPELHP0T(PO)98 J21069040:KJ,102:"J23071040:KJ,102:<J450470:KJ,102:YJ70098040:KJ,102:_|J18022040:KJ,102:J21069040:KJ,102:(J23071040:KJ,102:2J450470:KJ,102:<J70074040:KJ,10  JK39K1000 40:J,118:2 JK1000 K960 1:J,121:S JK960 K1 40:J,117:q  JK807 K832:J,102: $JK207 K832 40:J,102: .JK232 K832 40:J,102: 8JK20 K620 40:J,102: B LJK39K1000  (C) 1978 GLEN FISHER" I CURSOR(TM) MAGAZINE JULY 1978 #1n P.O. BOX 550, GOLETA, CA 93017t "BRICK: THROW A BRICK,"" BUT DON'T BREAK THE WINDOW!"-. "DO YOU WANT DIRECTIONS";D9$ / (D9$, ! f D 872,871,872,871,873,871,872,871,872S gKN39,W9:KN41,W9:KN39,W9:KN41,W9: hKN40,W9:KN1,W9:KN1,W9:KN40,W9 i T7((TIT6)6)10 JKN:J,160:J41,102:J40,218:J39,102:J1,218 J1,218:J39,102:J4 ; I BR$"":VN8((1)14)8 "";C "";QSP5(1)` I2 WNx C$: C$"" 290 " ";BR$;JSP((WNI2)8)25TI: IWN JTI TIJ 250: IVN BR$" " I C$: C$"" 275 N2N40:400JN2N39:400+N20N2N21000BN2999N2N21000K850d (KN2)32 900mNN2v800 A$: A$"" 435 (A$)0 435J9(A$):SP8JJ:SQSPJ1SP :210  D1 830,820,832,822,873,82 -"" ONDS SINCE STARTING WILL APPEAR IN=" THE TOP RIGHT CORNER. TO START WITH"k " A NEW TRACK, PRESS THE SPACE BAR, TO"" CONTINUE ON THE SAME TRACK, PRESS C."" THERE ARE EIGHT DIFFERENT TRACKS.""  GOOD LU J11800:"K2151:R637:L640:950:"WHICH TRACK";J2Z" HERE WE GO!!!!!"l J11900:Ju"" J2 1000,1100,1200,1300,1400,1500,1520,1560T6TI 800DD1 (K2)255 SPSQ:228 (K2)R6 SP380: JJ26676239:KJ,218:T2" WRITTEN BY MICHAEL BONNYCASTLE\" FOR IAN BONNYCASTLE ON HIS EIGHTH" BIRTHDAY - SEPTEMBER 27,1979." STEER THE CAR WITH A STEERING WHEEL" CONNECTED TO THE PARALLEL USERS PORT WS, "%h "YOUR AVERAGE IS";: SC0 " ";Am (SCTH);"PER THROW."G|X "AGAIN? ";o C$: C$"" 410 C$"Y" "YES": Z1 200: Z: 100 C$"N" "PLEASE ANSWER 'YES' OR 'NO'": 400 "NO" "THANKS FOR 2:FxJ2022040:KJ,102:,J21069040:KJ,102:IJ23071040:KJ,102:fJ70098040:KJ,102:lK210,102:K230,102:K690,102:K710,102:J208232:KJ,209:J447473:KJ,218:J688712:KJ,2 40:J,102: VJK960K1000:J,102:4 `JK13K49240:J,102:P jJK493K506:J,102:o tJK246K72540:J,102: ~JK726K753:J,102: JK259K272:J,102: JK273K77540:J,102:  J2022040:KJ,102: 1)"Y" 300002 "PRESS ANY KEY TO BEGIN"F< C$: C$"" 60SFR$(13)PMS$""R$"YOU BLEW IT"R$""ZWN37d "";WN2);i I0 24n "";x I8 I18 " ";: 140 "" 0,218:J41,102 J112 ""T7) J2190:; " "J J2190:Q Jg  A$: A$"" 940x  A$"C"955 "":N910:D4:D14:SP500:SQSP:130 N910:D4:D14:SP500:SQSP:190  ** TRACKS JK(K39):J,120: IWN1: "  ";" ""B,PT((I6))(WNI.5):SCSCPTN1THTH1a6 IWN MS$x; IWN ZAPZAP1@ IWN "YOU MADE IT!"E "YOU GOT";: PT0 " ";F PT;"POINTS THIS THROW."Jc "AFTER "; TH; " THRO 2,832,820,830= 4KN41,W1:KN39,W5:KN,W3:KN39,W1:KN41,W5:w 6KN41,W7:KN39,W7:KN,W3:KN39,W6:KN41,W6: >KN40,X1:KN1,X1:KN1,X2:KN40,X2:KN,W3: @KN40,X4:KN1,X3:KN1,X4:KN40,X3:KN,W3: RKN,W9YCK!! "(" (PRESS ANY KEY)";+2A$:A$""51704<122$" IF THE CAR RUNS OVER AN OBSTACLE "" WITH ITS WHEELS, IT WILL BE ERASED" BUT IF THE DRIVER WIPES OUT, YOU "" WILL CRASH. THEN THE TIME, IN SEC 234 (K2)L6 SP380:232)D1D:240:D1R(D):240KD1L(D):240y D1 250,260,270,280,290,300,310,320,330220N2N39:400N2N40:400N2N41:400N2N1:400"N2N:400,N2N1:4006N2N41:400@ " AND CHANGE GEARS FROM LOW (1) TO"6" HIGH(9) BY TOUCHING THE NUMBER KEYS."a" IF THE CAR RUNS OVER AN OBSTACLE "" WITH ITS WHEELS, IT WILL BE ERASED" BUT IF THE DRIVER WIPES OUT, YOU "" WILL CRASH. THEN THE TIME, IN SECPLAYING." -  "YOU BROKE THE WINDOW";ZAP;"TIMES"3 Z  CURSOR(TM) MAGAZINE JULY 1978 #1  P.O. BOX 550, GOLETA, CA 93017 "IN THIS GAME, YOU THROW BRICKS THAT "BECOME INVISIBLE IN MID-FLIGHT.  "YOU TRY TO STOP T 09:J2022040:KJ,209:+"J78098040:KJ,209:E,J480491:KJ,209:_6J509519:KJ,209:y8J207213:KJ,102::J227233:KJ,102:<J767773:KJ,102:>J787793:KJ,102:@J25476441:KJ,218: HE HEAT FROM THE FURNACE BURNES TO YOUR SOUL.":N0:E0:S0pW0:NE80:NW0:SE0:SW0:p"I CAN'T LET YOU DO IT AGAIN, YOU HAVEN'TDONE ANYTHING YET!!!":154q"*** BANG *** !!! AS YOU ENTER HERE, THE GOLD DISAPPEARS IN A ";Zq"FLASH, AND A H 77:SW0:n"OOPS!!! A SHARP TURN FORCES YOU TO GO EITHER SOUTH OR EAST DEPENDING ";n"ON WHICH WAY YOU CAME FROM.":N0:E78:S81:W0:NE0:NW0:SE0:SW0:o"A ROOM HERE HAS AN EASTERN EXIT AND ALSOA NORTHERN ONE. FROM THE NORTH ";ko"COM 4000:""1"KEY IS \ @":TQ12000:Z2 ORIGIN CPUCN 2,3 MODIFIED ++ DEC79dQ12:D9:"";30);"ABACUS"e30)""f27)"COMPETITION"g27)""h1100:""iE102:L64:B81:R13:X12:S1:Y21:Z10n :W83OlNE76:NW0:SE75:SW0:l"YOU ARE OVERCOME BY THE FEELING OF NAUSEA. AS YOU TRY TO ALIGN ";l"YOURSELF ON YOUR COMPASS YOU ROCK AND REEL BACK AND FORTH AND FIND";,m" IT DIFFICULT TO WALK IN ASTRAIGHT LINE. WHAT COULD BE CAUSING 150<TDC:ISX:P(C)RI,L:P(C)QITC1,B::CCS:160HTTTT1q"EQUALS NO.- ";TTA1$:A1$"\"1200:64:81:102L"GOING AT THIS SPEED, HOW LONG DO YOU"V"THINK IT WILL TAKE BEFORE ALL THE BE E MIDPOINT OF A LONG LONG SLOPING CORRIDOR LEADING ";j"SLIGHTLY SOUTH.":N0:E0:S0:W0:NE74:NW81:SE73:SW0:j"THE PATH HERE IS LITTERED WITH THE FRESHREMAINS OF BATS AND TOADS.";?k" THEIR BODIES ARE STILL DECAYING IN THE DIRT.":N0:E0  "1" "\"WINNER - ";WN$;" WAS NEAREST..."" ""THE ANSWER IS- 14 YRS,98 DAYS,9.5HRS!!"(" ":1014 R$" h"AS YOU APPROACHTHE AREA. YOU CAN LEAVE WITH MY BLESSINGIF YOU FIND";h" THE WAY OUT.":N75:E0:S78:W0:NE70:NW0:SE0:SW0: i"THE PATHS ORIENTATION BECOMES SUBTLY ALTERED AS ROUND YON CORNER. ";Si"WATCH OUT FOR THE BAT GUANO TO YO HAT'S ALL YOU NEED TO KNOWABOUT HOW YOU ARE";^s" DOING.":}s" KILL THE "NO$:s"THE FOREST IS VERY DARK. MOST TRAILSs"SEEM ALIKE AND YOU CANNOT GET YOUR BEARINGS IN HERE.":0t" UP AND NOTICE YOU IN THEIR REALM. THEY STO #Z59459,0:**TURN ON TO LISTEN0\K259471|dK32768:W1118:W387:W4113:W932:N500:D8:W5117:W6120:W7121:X1233nX2105:X395:X4223:D18:SP500:SQSPtJ19:R(J):vJ19:L(J):w 2,3,6,1,5,9,4,7,8, 4,1,2,7,5,3,8,9,6)x" UGE SET OF STEEL BARS DROPS INTO PLACE LOCKING";~q" YOU INTO THE CAVES.":: 292q"YOUR HANDS?? YOU HAVE TO FIND A CONTAINER.":q"AUURRRGGGHHHHH!!! SCREAMS THE WITCH !!! IN HER HASTE, THE WITCH";:??:9??8=09024<88>6" I1(R$)2O I900,((R$,I21))16((R$,I2))816:I\ 538,3:LUTION AT 5PM."x~WW1100:WW$:WW$"@"1208WW:1020"";:"WINNERS NAME";WN$""" UR LEFT.":N0:E0:S74:W0:NE0iiNW79:SE0:SW0:i"THE MIDPOINT FOR A LONG SLOPING CORRIDORIS WHERE YOU ARE. NOT MUCH";j" SPECIAL ABOUTTHIS PLACE EXCEPT THE SMELL OF BAT GUANO":N0:E0:S0:W0jNE72:NW0:SE0:SW79:hj"YOU ARE AT TH%NED YOU TO DEATH."?tEOGTRUE:LTING... IS THE LAST SHE BREATHS.":364r"THE TUNNELS IN HERE ARE VERY CONFUSING. YOU WILL NEVER GET OUT ALIVE."rs"YOU SLIPPED AND FELL ON THE BANANA PEEL,WHY NOT TRY AGAIN?":Ms"AREN'T YOU ??? WELL T  IAN'S SPEED RACE.":J11800:3y5000{z" HOW WILL YOU STEER?":" WITH THE KEYBOARD (K), OR WHEEL (W)"{ A$: A$"W"126| A$"K"127}123~K259471:R6191:L6127:950:"TO STEER RIGHT, PRESS 'K', LEFT, 'S'": HELP !! I'M SMELTING... ";mr"SMELTING... IS THE LAST SHE BREATHS.":364r"THE TUNNELS IN HERE ARE VERY CONFUSING. YOU WILL NEVER GET OUT ALIVE."rs"YOU SLIPPED AND FELL ON THE BANANA PEEL,WHY NOT TRY AGAIN?":Ms"AREN'T YOU ??? WELL T 0:SE0:SW0:[0"YOU ARE AT THE END OF THE SOUTH HALL. TWO SMALL PASSAGES LEAVE ";[2"HERE. ONE TO THE NORTH-WEST AND ONE TO THE SOUTH-WEST":N0:E58\4S0:W0:NE0:NW60:SE0:SW62:^\6"YOU ARE AT THE END OF THE WEST HALL. A SMALL PASSA NCE RALPHS LAST SERVANT DIED";Y " NINE-HUNDRED YEARS AGO THE PLACE IS A MESS AND ALSO SMELLS P";Y""RETTY BAD.":N0:E0:S0:W57:NE55:NW0:SE0:SW0:AZ$"YOU ARE OUTSIDE THE SERVANTS QUARTERS. A DISTRESSING SMELL COME";Z&"S FROM THE IS MUCHNICER BUT ";dx"NOT A LOT OF FUN. A ROCK HERE SAYS 'THIS WAY TO THE TLHTSOODST'";dz" AND ITPOINTS WEST":N0:E0:S68:W72:NE0:NW0:SE0:SW0:"e|"YOU ARE IN A SMALL CLEARING, A PAPER LIES NEARBY. IT READS ";ne~"'CONFUSION SAYS- E D TO THE EAST AN TO THE WEST.":N50:E54:S0WW61:NE0:NW0:SE0:SW0:W"YOU ARE IN THE MIDDLE OF THE EAST HALL. A RAT SCURRIES PAST YOU ";5X"AND TAKES A NIP AT YOUR LEG. IN AN INSTANT HE IS GONE WITH A S";}X"SNEER AND A TWITCH OF HIS T IS GOOD FOR YOUSINCE SH";bh"E COULD TURN YOU INTO AN UGLIER TOAD THAN YOU ALREADY ARE.":N68bjE47:S73:W0:NE0:NW0:SE0:SW0:cl"WALKING NORTH YOU WILL FIND A TWISTING OLD TRAIL. TO THE WEST ";_cn"LIES CONFUSION. SOUTH IS THE WAY TO  OF DEEPRESSION FLOWS LIKE";U" WAVES THROUGH YOU. YOU LONG FOR HOME AND YOUR SWEET BRUNHILDE";V". HOW YOU WISH YOU WERE THERE.":N0:E0:S0:W50:NE0:NW0:SE0VSW0:[V"YOU ARE IN THE GREEN ROOM. YOU ARE SUDD-ENLY VERY JEALOUS OF RAL" `X"PUNK ROCK MUSIC. THE EFFECT ITHAS ON THE CASTLES WALLS IS EERIE ";`Z"INDEED":N0:E0:S64:W0:NE0:NW0:SE0:SW0: a\"YOU ARE IN THE LIBRARY WHERE THE GOOD MAGICIAN RALPH IS POURING";Va^" OVER AN OLD AND ANCIENT TOME. THE WORD YOBYALP "HILDE.":N40:E0:S49:W0:NE0:NW0:SE0:SW0:S"YOU ARE AT THE NORTH END OF THE GREAT HALL. FINE PICTURES AND ";"T"OIL PAINTINGS ARE HUNG FROM THE WALLS. THIS MAGICIAN SEEMS TO";lT" HAVE DONE WELL FOR HIMSELF.":N48:E0:S50:W0:NE0:  A CONNECTING HALLWAY WITH SOME LOUD ALBEIT EERIE MU";^J"SIC EMANATING FROM THE SOUTH-WEST.":N0:E0:S0:W0:NE62:NW0^LSE0:SW64:#_N"YOU ARE IN A SMALL ANTE-CHAMBER. A LARGEWELL USED PASSAGE LEADS ";m_P"TO THE NORTH ANDA SMALLER PASS 0:f"YOU ARE IN THE SNEAKY CLEARING. THERE ARE THREE EXITS FROM HERE.";f" ONE THAT GOESTO THE SOUTH... ONE TO THE SOUTH-WEST...AND A DIRTY";g" SNEAKY.....LITTLE TRAIL TO THE NORTH.":N69:E0:S71:W0:NE0:NW0.gSE0:SW76:wg"A S GE LEADS TO TH";\8"E SOUTH-WEST.":N0:E61:S0:W0:NE0:NW0:SE0:SW59:\:"YOU ARE IN THE MIDDLE OF THE WEST HALL. A LARGE HOLE IN THE FLOO";]<"R REVEALS A HUGEDROP TO THE GROUND HUNDREDS OF FEETc]>"BELOW. BETTER NOT GO DOWN...":N0:E53: EAST.ITS BEST TO GO BACK TO THE WEST FOR YOURNOSES SAKE.Z(N0:E56:S0:W58:NE0:NW0:SE0:SW0:[*"YOU ARE IN THE MIDDLE OF THE SOUTH HALL.AN EERIE LIGHT COMES FROM";I[," THE WEST AND GREAT MUSIC FILLS THE AIR.":N0:E57:S0:W59:NE0^[.NW XPLORER WHO GETS OUT... IS VERY LUCKY INDEED...'"eN70:E70:S70:W70:NE70:NW70:SE70:SW74:e"YOU ARE IN THE MIDDLE OF A LONG BORING NORTH-SOUTH PATHWAY.";-f" YOUR HEAD IS SLIGHTLY ACHING.":N72:E0:S70:W0:NE0:NW0=fSE0:SW TAIL.":N0:E55:S0:W53:NE0:NW0:SE0XSW0:X"YOU ARE AT THE END OF THE EAST HALL. THEONLY NEW PASSAGE IS A SM";Y"ALL SERVANTS EXIT TO THE SOUTH-EAST.":N0:E0:S0:W54:NE0:NW0,YSE56:SW0:uY"YOU ARE IN THE SERVANT'S AREA. SI GO FOR A FAST EXIT FROM THIS";cp" LAND. GO THERE IF YOU VALUE YOUR LIFE.":N69:E0:S67:W70:NE0crNW0:SE0:SW0:dt"THERE IS A TINY LITTLE HIDDEN TWISTING SECRET OLD OVERGROWN DIRTY";Qdv" SNEAKY TRAIL THAT LEADS WEST FROM HERE. SOUTH ;V"PH AND HIS FINE CASTLE. HOW COME HE RATES ALL THIS STUFFAND YOU ";V"LIVE IN A HOLE IN THE GROUND?!?":N0:E50:S0:W0:NE0:NW0:SE0VSW0:?W "YOU ARE NOW AT THE SOUTH END OF THE GREAT HALL. HALLWAYS LEA";W "VE TO THE NORTH AN  SHOWSTHROUGH TH";a`"E COVER FROM THE LIGHT BEHIND.RALPH IS DEEPLY ABSORBED IN THE BOOK.abN0:E64:S0:W0:NE0:NW0:SE0:SW0:bd"YOU ARE AT THE EDGE OF THE EVIL WITCHES LAND. THE EVIL PRUDENCE ";]bf"DOES NOT SEEM TOBE ANYWHERE AROUND. THA NW0:SE0:SW0rTT"YOU ARE IN THE MIDDLE OF THE HALL. A DOOR TO YOUR RIGHT LEADS ";U"INTO THE BLUE ROOM AND ONE TO YOUR LEFT TO THE GREEN ROOM.":N49.UE51:S53:W52:NE0:NW0:SE0:SW0:xU"YOU ARE IN THE BLUE ROOM. A GREAT SENSE AGE TO THE WEST. EERIE MUSIC COM";_R"ES FROM THE NORTH.":N65:E0:S0:W66:NE0:NW0:SE63:SW0:_T"YOU OPEN THE DOOR AND ENTER INTO..... RALPHS BATHROOM. A RADIO ";D`V"TUNED TO ONE OFTHE MORE POPULAR ROCK STATIONS IS BLAST-ING FORTH "; MALL CLEARING AT THE SOUTHERN EDGE OFTHE EVIL PRUDENCES LAND ";g"GIVES YOU ROOM TO REST AND RELAX. TWO PATHS LEAD AWAYFROM HERE.gN70:E0:S0:W0:NE0:NW77:SE0:SW0:4h"AN INTERSECTION OF THREE PATHS IS HERE. YOUR HEAD ACHES SLIGHTLY "; S0:W60:NE0:NW0:SE0n]@SW0:]B"YOU ARE IN A WINDING PASSAGE. AS YOUR TRAVEL PROGRESSES THE EER";^D"IE MUSIC GETS LOUDER AND YOU GET COLDER BUT THIS COULDBE THE WAY";9^F" OUT!!!":N0:E59:S0:W0:NE0:NW63:SE0:SW0:^H"YOU ARE IN ARE AT A SMALL INTERSECTION OF ABOUT";Fn"FOUR PASSAGES. WELL EXACTLY FOUR PASS- Gp"AGES. I'M NOT GOING TO TELL YOU WHICH WAY THEY GO !!8GrN24:E0:S31:W25:NE0:NW0:SE0:SW29:iGt"YOU ARE AT THE INTERSECTION OF TWO SMALL";Gv"PASSAGES 0:W26:NE24:NW0:SE0:SW0:DZ"THE TUNNEL BRANCHES OFF HERE INTO TWOE\"PATHS OTHER THAN THE ONE YOU JUST CAME THROUGH. CONFUSING ISN'T IT???BE^N24:E25:S27:W0:NE0:NW0:SE0:SW0:kE`"THE TUNNEL HERE TURNS SLIGHTLY OFFEb"COURSE. OH TO THE WEST... AND ONE TO THE SOUTH. WHICH WAY WILL";O" YOU TAKE?":N34:E0:S40:W33:NE0:NW0:SE0:SW0:"P"FOUR PATHS LEAVE HERE. LOUD MAJESTIC SINGING SEEMS TO BE COMI";kP"NG FROM NEARBY. COULD THIS BE A SIGN? COULD IT LEAD OUT OF HE VERY LOUDLY WHEN SHE FINDS OUT.BFN0:E0:S24:W0:NE0:NW0:SE0:SW0:BH"YOU ARE IN THE CAVES PROPER NOW. THERE*CJ"SEEMS TO BE MANY DIFFERENT TUNNELS ABOUT";[CL"HERE AND ONE LARGE ONE RUNS TO THE EAST.";CN"OFCOURSE YOU DON'T HAVE TO LIS ON'T WAKE";M" THEM.":N0:E0:S41:W0:NE29:NW30:SE0:SW0:M"YOU ARE IN A SMALL EVEN WALLED CAVE ROOM";N"A FEELING OF DIZZINESS CONFUSES YOUR TRAVELS."FNN36:E36:S42:W0:NE36:NW30:SE0:SW0:qN"WELL... THE MESSAGE IN THE LA W17:SE22:SW0:@0"YOU'RE IN FRONT OF A LARGE CAVE ENTRANCE";@2"WHAT APPEARS TO BE A HUGE POT OF GOLD IS";*A4"SITTING IN THE CAVE. YOU'LL BE RICH! YOU";SA6"GET YOUR MOTHER HER OPERATION! YOUA8"CAN BUY SHOES FOR YOUR SISTER! BOY ARE YO  AND YOU NOW HAVE TO TRAVEL A DIFFERENT WAY.KN32:E0:S0:W39:NE0:NW0:SE0:SW0:K"THESE TUNNELS SEEM ENDLESS DON'T THEY?&L"WELL YOU MIGHT BE SURPRISED AT WHAT YOUWL"CAN FIND IN HERE. MAYBE IF YOU BREAK THE";L"BIG MIRROR ON TH OST... YOU ARE>"IN THE LARGE DARK MEAN SCARY NASTY OLD>"FOREST AND MOST LIKELY YOU'LL DIE HERE?"AND GET EATEN BY THE ROTTEN SQUIRRELS.H? N0:E0:S14:W0:NE0:NW4:SE0:SW0N?"?$ 1270:N0:E18:S17:W0:NE0:NW15:SE0:SW0:?& "BUMPING INTO WALLS NOW FOR ABOUT FIFTEENMINUTES.IN0:E0:S33:W28:NE0:NW0:SE32:SW0:I"AHA! YOU GOT YOURSELF OUT OF THAT LASTGJ"ROOM! GOOD! NOW YOU CAN FOLLOW THE NEXT TUNNEL AS IT LEADS YOU ";J"SOUTHWARD.":N0:E0:S34:W0:NE0:NW :SW44:Q 1258:N42:E42:S41:W0:NE0:NW0:SE41:SW44:Q 1258:N43:E43:S0:W0:NE43:NW45:SE0:SW0:R 1258:N44:E43:S44:W44:NE46:NW44:SE44:SW0:HR 1258:N45:E43:S43:W44:NE47:NW44:SE43:SW45:R 1258:N67:E43:S43 . ONE LEADS NORTH-WEST AND THEGx"OTHER LEAVES TO THE SOUTH. ON THE WALLGz"IS SCRAWLED... 'DEATH TO THOSE WHO TAKE H|"THE SOUTH PASSAGE'.7H~N0:E0:S38:W0:NE0:NW26:SE0:SW0:aH"NOT 'MANY' BUT QUITE A FEW PASSAGESH"LEAVE THIS ROO BY THE WAY, IF YOU WERE WOND-";Ed"ERING ABOUT HOW YOU COULD SEE IF YOU ARE";Ef"THIRTY OR FORTY FEET UNDERGROUND... THECFh"AIR IS FILLED WITH MAGIC AND IT GLOWS ENOUGH FOR YOU TO SEE BY.oFjN0:E26:S30:W0:NE0:NW0:SE0:SW0:Fl"YOU RE?";P" COULD YOU BE GOING HOME???":N35:E39:S0:W41:NE0:NW0:SE0:SW48:Q"THE PASSAGE TURNS A CORNER. THAT'S ALL THIS ROOM RATES AS A DISCRIPTION.4QN36:E0:S0:W0:NE38:NW0:SE0:SW0:lQ 1258:N37:E41:S41:W43:NE41:NW0:SE41 TEN TO ME YOU COULD ALWAYS TRY WEST.CPN23:E28:S25:W26:NE0:NW0:SE0:SW0:DR"WELL LETS SEE... THERE IS A TUNNEL HERE1DT"THAT RUNS EAST/WEST AND THERE IS A SMALL";oDV"FISSURE BARELY MANAGEABLE THAT GOES TO THE NORTH-EAST.DXN0:E28:S ST ROOMN"MUST HAVE BEEN MISTAKEN... SINCE YOU ARE";N"STILL ALIVE. WELL ONE CAN'T BELIEVE ANYN"GRAFITTI THEY READ ON WALLS CAN THEY?(ON0:E0:S0:W0:NE35:NW0:SE0:SW41:TO"THREE PASSAGES LEAVE HERE. ONE TO THEO"NORTH... ONE U LUCKY!!!A:N15:E15:S15:W17:NE15:NW21:SE15:SW23:A<"YOU ARE IN THE CAVE. THE EXIT IS BARREDB>"BY HUGE STEEL BARS AND TRY AS YOU LIKEFB@"YOU CANNOT GET THEM OPEN. NOW YOU'LLwBB"MISS YOUR WEDDING AND BRUNHILDE IS GOING";BD"CRY E WEST WALL YOU'D FIND SOMETHING OF INTEREST BEHIND IT.LN0:E0:S0:W0:NE33:NW0:SE0:SW38:L"YOU HAVE ENTERED A SMALL CHAMBER OF(M"SLEEPING ROCKS. THEY MUST BE SLEEPINGwM"SINCE THEY ARE NOT MOVING. TIP-TOE QUIETLY OUT AND YOU W  1270:N16:E0:S0:W0:NE0:NW0:SE0:SW13:?( 1270:N15:E19:S17:W16:NE15:NW15:SE17:SW17:'@* 1270:N15:E15:S20:W18:NE15:NW15:SE15:SW17:`@, 1270:N19:E15:S15:W17:NE15:NW17:SE15:SW21:@. 1270:N17:E15:S0:W17:NE20:N 0:SE0:SW0:J"THE ROOM HERE IS FILLED WITH DUST. ITJ"CLOGS YOUR EYES AND MAKES IT DIFFICULT%K"TO SEE. FOLLOW ME TO THE NORTH OR TO THESOUTH-WEST AND WE'LL GET OUT.QKN31:E0:S0:W0:NE0:NW0:SE0:SW35:K"A QUICK BEND IN THE PATH :W46:NE43:NW46:SE43:SW46:R"YOU ARE AT THE ENTRANCE TO A LARGE CLEAN";R"CASTLE. IT IS THE HOME OF THE ALL POWER-"; S"FUL ALL KNOWING ALL KIND ALL DRUNKZS"MAGICIAN RALPH. HE ALONE HAS THE POWER TO GET YOU HOME TO SWEET BRUN";S M. CAN YOU FIND THEM??HN27:E0:S0:W0:NE0:NW0:SE36:SW37:H"THE ROOM HERE IS EXTREMELY DARK. I CANI"NOT TELL YOU ANYTHING EXCEPT THAT A=I"LARGE ROCK HERE IS REPELLING THE MAGICnI"THAT GIVES YOU LIGHT. YOU HAVE ALSO BEEN";I !": 6041V FLG%(2)"YOU DIDN'T MEET THE MAGICIAN !!!": 6042X FLG%(3)"YOU NEVER KILLED THE WITCH !!!": 604N2Z"YOU DIDN'T GET THE BROOM TO THE MAGICIAN"2\:"SIGH... WELL I SUPPOSE YOU TRIED...":EOGTR:2^2`"YOU ARE IN A SMAL UTHWEST ETC 'END' LEAVES THE GAME"0B:"IF YOU ENCOUNTER A WITCH AND WISH TO KILL HER (WHY NOT)";R0D" YOU HAVE TO FIGURE OUT HOW. I WON'T TELL YOU, BUT IT WILL~0F"INVOLVE SOME OBJECTS AND ACTIONS THAT0H"YOU WILL HAVE AVAILABLE. THAT'S A 11:NW9:SE0:SW0:::"YOU ARE IN THE FOREST A LONG WAY;"FROM HOME. MONSTERS COULD BE ANYWHERE.4;"THEY COULD BE... BEHIND YOU NOW!!! HA-HA";a;"I'LL BET I SCARED YOU DIDN'T I??? WELL;"TO TELL THE TRUTH YOU ARE JUST IN THE; OU CANNOT GO OUT":-&PS1NO$"HOUSE"VE$"W": 262-(PS49VE$"N": 206.* PS56VE$"W": 2061., PS57 VE$"E": 206L.. PS65 VE$"S":206h.0 PS50 VE$"E": 206.2 PS51 VE$"W": 206.4"EXIT WHAT ???":.6.8:" E0:S0:W0:NE0:NW0:SE9:SW0888"THE FOREST IS A LOVELY PLACE ISN'T IT?9"IT HAS TREES AND SQUIRRELS AND NUTS ANDK9"BUSHES AND YOU WHO ARE MOST LIKELY LOST!t9N0:E0:S0:W0:NE0:NW0:SE10:SW0z999"BOY YOU JUST "YOUR BELOVED BRUNHILDE IS RUNNING+ "TOWARDS YOU THROUGH THE FIELD IN SLOW,,"MOTION... LIFE IS BEAUTIFUL ONCE AGAINr,"AND ALL IS WELL. I HOPE YOU'VE ENJOYED YOUR LITTLE EXCURSION.",EOGTR:,, PS22 NO$"CAVE" VE$"SW": 20 OREST WITH THE REST";6" OF THE NUTS.6N0:E0:S8:W0:NE5:NW0:SE7:SW066(7"YOU ARE OUTSIDE YOUR DILAPIDATED RUNDOWN";V7"DIRTY LITTLE FARMHOUSE. YOU CAN BREATHE7"FRESH AIR AGAIN. A WELL WORN PATH LEADS7"TO THE NORTH 'T)ITM%(3)1"ABIDE ANY FREELOADERS. BEGONE GNAT!!!(*ITM%(3)1"AND WITH THAT HE CLAPS HIS HANDS, YOUb*ITM%(3)1"TURN INTO A GNAT, AND GET EATEN BY THE*ITM%(3)1"NEAREST SPIDER.":EOGTR:*IT%(6)1:IT%(3)0:"AND WITH ST IS FULL OF NUTS ..4~N0:E0:S0:W0:NE0:NW0:SE2:SW5445"IF YOU ARE NOT LOST YET THEN YOU KNOWR5"THAT YOU ARE IN THE FOREST. (DOES THAT MAKE ANY SENSE?){5N0:E0:S0:W0:NE0:NW0:SE15:SW2555"YOU ARE IN A F  STANDING.<N0:E0:S0:W0:NE13:NW11:SE0:SW0<<<"BOY IT IS REALLY DARK NOW... MONSTERS(="COULD BE ANYWHERE... WHY NOT GO HOME TO;="YOUR MOTHER?e=N14:E0:S0:W9:NE17:NW0:SE0:SW0k=q= = "AHA! YOU ARE IN A CL L FARMHOUSE. IT ISN'T2b"MUCH BUT YOU CALL IT HOME. IN FACT IT3d"ISN'T ANYTHING TO BE PROUD OF... IT IS>3f"REALLY PRETTY SHABBY... ACTUALLY IT IS3h"DISGUSTING BUT YOU CALL IT HOME. ONE DOOR EXITS TO THE WEST.3jN0:E0:S0:W7:NE0:NW LL."::0J0L:"DO YOU REALLY WISH TO QUIT NOW";ANS$ 1N (ANS$,1)"Y" "WELL IF YOU'VE CHANGED YOUR MIND, THENK1P (ANS$,1)"Y" "BACK YOU'LL GO!":s1R:"OK, BUT YOU DIDN'T DO SO WELL."1T PS23 "YOU DIDN'T EVEN FIND THE CAVES !! "FOREST WITH THE SQUIRRELS.;N0:E0:S0:W0:NE0:NW0:SE12:SW10;;<"THE FOREST IS GETTING DARKER AND YOU ARE";><"OUT WAY PAST MY BEDTIME. MAYBE YOUi<"SHOULD TURN AROUND AND JUST GO HOME.<"THAT IS IF YOUR SHACK IS STILL DO YOU REALLY WANT A LITTLE HELP";ANS$/: (ANS$,1)"Y" "WELL, SINCE NOT, BACK YOU GO.":T/<:"'GET' WILL LET YOU PICK UP AN OBJECT 'DROP' PUTS IT DOWN/>"'INVENTORY' PRINTS YOUR SUPPLIES 'N' GOES NORTH, 'SW' GOES";/@" SO KEEP WALKING DEEPER AND9"DEEPER INTO THE FOREST. WHY DID YOU HAVE";:"TO LEAVE THAT NICE LITTLE RUN DOWN3:"SHANTY OF YOURS IN SEARCH OF ADVENTURE?a:"IF YOU WANTED ADVENTURE THEN YOU ARE INz:"THE WRONG FANTASY.:N0:E0:S0:W0:NE 6, PS7 NO$"HOUSE" VE$"E": 206- PS48 NO$"CASTLE" VE$"S": 206- PS64 VE$"N": 2067-"ENTER WHAT ???":=- ~-"PS23NO$"CAVE""THE BARS ARE QUITE SOLID AND YOU ARE BUT-$PS23NO$"CAVE""A POOR COUNTRY BOY. Y AND INTO THE FOREST.7N5:E1:S0:W0:NE0:NW0:SE0:SW077 8"YOU ARE IN THE FOREST. GREAT MUSHROOMS88"GROW HERE. THEY LOOK GOOD TO EAT BUTd8"COULD BE VERY WELL POISONOUS. I WOULD8"NOT TRY TO EAT THEM IF I WERE YOU.8N6: THE BROOM !! GOODY-GOODY HE*"YELLS !! FOR FINDING MY STAFF I HEREBY(+"GRANT YOU YOUR FREEDOM AND A PRESENT !!V+"CHECK YOUR BELONGINGS LATER HE CACKLES"+:">POOF!< YOU ARE STANDING UNDER A LARGE+"BEAUTIFUL SPREADING TREE.":368+  OREST OF HUGE TREES. THE5"FOREST IS FULL OF NUTS ..5N0:S0:E0:W0:NE3:NW0:SE0:SW66696"THE FOREST IS ALL AROUND YOU. YOU ARE IN";e6"THE FOREST. IN THE FOREST YOU ARE. DO6"YOU NEED ANY MORE HELP? YOU ARE IN THE HUGE F EARING AND CAN SEE="A TRAIL YOU ARE FAMILIAR WITH LEADING TO";="THE SOUTH-WEST. OF COURSE THERE ARE:>"OTHER TRAILS BUT THIS SEEMS THE SMARTESTMOVE AT THIS TIME.d>N15:E0:S13:W0:NE0:NW0:SE0:SW7j>>"WELL FOR THE HOPELESSLY L 0:SE0:SW03l3n3p"YOU ARE IN THE FOREST STILL. IT LOOKS4r"LIKE YOU MAY BE LOST BUT YOU NEVER KNOW74t"WITH THESE POOR FARM PEASANTS._4vN0:E0:S0:W0:NE4:NW3:SE0:SW0e4xk4z4|"YOU ARE IN A FOREST OF HUGE TREES. THE FORE FLG%(3)TR:IT%(3)PS:IT%(2)2npr,t:"YOUR INVENTORY IS AS FOLLOWS"::TMP0:v I1 9`x IT%(I)1 ""IT$(I):TMPTMP1z: TMPFALSE " (NOTHING)"|~ NO$"MIRROR" 388"HOW CAN I BREAK THAT FOR YOU?" IT%(I)0 "YOU CHEATER!! YOU HAVE TO WORK FOR THAT":;TIT%(I)PS"I DO NOT SEE ANY "NO$" HERE.":}VI2IT%(1)1"WHAT WILL YOU CARRY THE WATER IN?? ";:1250X"OK! WHY NOT?":IT%(I)1Z\^ I1 9` IT$(I)NO$ 356b ""HELP YOU INTO A GRAVE !!AND WITH THAT HE ";.&(ANS$,1)"Y""PLUNGES A SWORD INTO YOUR CHEST. YOU DIE."L&(ANS$,1)"Y" EOGTR:&:"GOOD!!! NOW AWAY YOU GO !!! BUT FIRST.. THE WAY INTO THE WITCHES ";&"LAND IS NOT SIMPLE. ALL  ISP BECKONS FROM THE EAST"7< PS43"A GREEN WILL 'O THE WISP BECKONS FROM THE NORTHEAST"|> PS44"A GREEN WILL 'O THE WISP BECKONS FROM THE SOUTHEAST"@ PS45"A GREEN WILL 'O THE WISP BECKONS FROM THE SOUTHWEST"B PS46"A GR $:"I'LL HELP YOU OUT... BUT FIRST I NEED A FAVOR. THERE IS A CERTAIN ";X$"WITCH UP NORTHTHAT I ONCE ANGERED AND SHE HAS ENCHANTED MY ";z$"MAGIC STAFF AWAY FROM ME":$"SHE TURNED IT INTO A BROOMSTICK AND I WANT IT BACK! SO IF YE WISP BECKONS FROM THESOUTH"8, PS20"A BLUE WILL 'O THE WISP BECKONS FROM THESOUTHWEST"y. PS21"A BLUE WILL 'O THE WISP BECKONS FROM THESOUTHEAST"0 PS22"A BLUE WILL 'O THE WISP BECKONS FROM INSIDE THE CAVE" 2 PS23"A BLUE WI."; "" I'LL JUST KILL YOU!! AND WITH THAT HE WAVES HIS HANDS IN A"S""MAGICAL MOTION AND YOU DISAPPEAR IN A CLOUD OF BRIGHT ORANGE ";i""DUST.":EOGTR:" ITM%(4)1 ITM%(5)1:"I'D LIKE TO HELP YOU, BUT THAT IS MY"" ITM%(4)186 280  NE PSNE: 286   280" NW PSNW: 286, 280C SE PSSE: 286M 280d SW PSSW: 286"YOU CANNOT GO THAT WAY." PS36"> BANG! < AS YOU HIT THE WALL, THE ROCKSWAKE";:1274 MVE0OURSELF.":EOGTR: FLG%(2) 4889 :"RALPH LOOKS UP AT YOU SLOWLY... THE ACCUMULATED WISDOM"; " OF THE AGES PORING FROM HIS SWEATY BROW. WELL?? HE CACKLES,"; "WHAT IS IT THAT YOU WANT SO BADLY AS TO INTERRUPT ME FROM MY ";IAN WAVES HIS HANDS, AND YOU BLACK-OUT IN A FRENZY OF ";("SENSATIONS. YOUAWAKE TO FIND..."9(PS36:FLG%(2)TR:MV0: 104?(E(u(:"WELL MUTTERS RALPH, I SEE YOU'RE BACK."(ITM%(4)1ITM%(5)1"AND TRYING TO STEAL MY TREASURE!!! : PS35"I DON'T SEE ANY MIRROR HERE. PERHAPS IF YOU KEEP ";B PS35"LOOKING YOU'LL FIND ONE.":"THERE WAS SOMETHING BEHIND THAT MIRROR. A HUNGRY TROLL WAS BEHIND";" THAT MIRROR! HE LEPT OUT AND MADE YOU HIS SUPPER. :"THAT IS BEYOND YOUR POWER.":"d IT%(I)1"YOU ARE NOT CARRYING IT!!":_f I1 IT%(2)1IT%(2)PS: IF DROP BOTTLE, ALSO WATER}h"OK! WHY NOT?":IT%(I)PSj PS84 IT%(2)84 FLG%(3) 1252l PS84 IT%(2)84 FLG%(3)  PATHS ARE CHARMED SO AS TO ONLY LEAD YOU ";'"AWAY FROM THE LAND."L':"BUT IF YOU SIMPLY REVERSE THE TAUNTINGS OF THE GREEN WILL 'O THE ";'"WISP, YOU'LL GET THERE EASILY ENOUGH. OK... NOW FOR THE BIG ";'"FINISH !!!"':"THE MAGICEEN WILL 'O THE WISP BECKONS FROM THE SOUTHWEST"GD PS47"A GREEN WILL 'O THE WISP BECKONS FROM THE SOUTH"MFSH_J I19tL IT$(I)NO$336N:"THAT IS BEYOND YOUR POWER.":P IT%(I)1"YOU ARE ALREADY CARRYING IT!!": ROU"; %" CAN STEAL IT FROM HER, I'LL SHOW YOU HOW TO GET OUT OF HERE.";3%"DO YOU WANT TO TRY??";ANS$m%(ANS$,1)"Y" :"WELL I NEVER!!! I TRY TO HELP ";%(ANS$,1)"Y""YOU AND YOU CAN'T HELP ME!!! ";: 4%(ANS$,1)"YLL 'O THE WISP DANCES OUTSIDE THE CAVE'S ENTRANCE",4(FLG%(2)1)FLG%(3)0326q6 PS30"A GREEN WILL 'O THE WISP BECKONS FROM THE NORTHEAST"8 PS37"A GREEN WILL 'O THE WISP BECKONS FROM THE NORTH": PS42"A GREEN WILL 'O THE W ITM%(5)1"TREASURE THAT YOU HAVE THERE, AND I9# ITM%(4)1 ITM%(5)1"DISLIKE A CLUMSY THIEF. SO SAY GOODBYE# ITM%(4)1 ITM%(5)1"QUICK CAUSE YOU'RE A GONER !!! AND WITH# ITM%(4)1 ITM%(5)1"THAT HE KILLS YOU !!!":EOGTR: " PS23 FLG%(1) FLG%(1)TR::1244B$ PS84 FLG%(3) :"YOU'VE FOUND PRUDENCE !!!"~& PS16"A BLUE WILL 'O THE WISP BECKONS FROM THEEAST"( PS18"A BLUE WILL 'O THE WISP BECKONS FROM THEEAST"* PS19"A BLUE WILL 'O TH "STUDIES????";!!ANS$:ANS$"FREEDOM"ANS$"HELP"ANS$"OUT"ANS$"HOME"436j!:"WHAT??? HE SAYS... DO YOU WANT TO GET OUT OF HERE???";ANS$! (ANS$,1)"Y" 436!:"WELL HE MUTTERS, SINCE I CAN'T SEEM TO UNDERSTAND YOU.. BOY(ITM%(4)1ITM%(5)1"NOW YOU'VE GONE AND DONE IT... I'M MAD!!D)ITM%(4)1ITM%(5)1"AND A MAD WIZARD IS DANGEROUS!!! >POOF<|)ITM%(4)1ITM%(5)1"YOU ARE DEAD !!!":EOGTR:)ITM%(3)1"AND EMPTY HANDED !!! WELL I JUST CANTOO BAD ";"THOUGH, YOU JUST CAN'T TRUST A HUNGRY TROLL.":EOGTR:\ PS61"THERE IS NO WAY TO TRAVEL THROUGH THE SOLID ROCK";y PS61" STUPID!!!":"BOY ARE YOU DUMB. I TOLD YOU NOT TO JUMPAND NOW YOU'VE KILLED";" Y 66"WELL I'LL HELP YOU ALRIGHT... I'LL ";:J:8:54:86::vY10:F20:G30:H40:R50:J60:K70:L80|  "WILL 'O THE WISP""BY MARK CAPELLA"" YOU ARE A POOR COUNTRY BOY WHO IS+ CP0:186VERB$BY$  186/NOUN$BY$:VE$"NORTH"VE$"N"HVE$"SOUTH"VE$"S"`VE$"EAST"VE$"E"xVE$"WEST"VE$"W"VE$"NORTHEAST"VE$"NE"VE$"NORTHWEST"VE$"NW"VE$"SOUTHEAST"VE$"SE"VE$"SOUTHWEST" 082,1090,1096,1102,1108,1116,1124,1132,1140,1148a ~PS81PSK1154,1160,1168,1174,1180,1186,1192,1196,1202,1210 PS91PSL1218,1224,1228,1234 :I19:IT%(I)PS""EX$(I) :"OBVIOUS EXITS:";:N0" N"; S0" S"; E0 " 1888(VE$"N" VE$"E" VE$"S" VE$"W") IT%(8)PS 1262|(VE$"NE" VE$"NW" VE$"SE" VE$"SW") IT%(8)PS 1262 VE$"N" 250 VE$"E" 254 VE$"S" 258 VE$"W" 262 VE$"NE" 266 EOG  f 88A h ((1)100)111 :"A SMALL WISP IS FLOATING HERE...a jMVEMVE1: MVE1 : 112u l MVE4 MVE0{ n pPS11PS606,622,634,642,652,662,676,690,704,716 rPS21PSY734,752,766,778,792,804,806,808,810,812$ t     "9"      "\"    ""       ""      ""    9,BALL,A MAGICAL CRYSTAL BALL GLISTENS HERE[ B 51,CARPET,A FLYING CARPET IS ROLLED UP HERE,0,,RING D 75,GUANO,A PILE OF BAT GUANO SLOWLY ROTS HERE F 31,PEEL,AN OLD BANANA PEEL IS LYING IN THE DIRT H 10,CAN,AN EMPTY BEER CAN RUSTS HERE J"DO YOU WANT TO PLAY AGAIN (Y/N)? ";#950+A$<A$"N"380G"":z"ARE YOU QUITTING? (Y/N)";:950:A$"Y"730460 *** SUBROUTINE PRINT LIST A(1) TO A(N)""; J1R: LC$(10);:"";L GO ALONG3*"WITH THE OBVIOUS AND GET YOURSELF LOST.`,"SO NOW THAT I'M BUSY, WHY DON'T YOU DO."JUST THAT?? HAVE FUN ANYHOW...0" PRESS RETURN WHEN YOU ARE READY";2 AN$4"WILL 'O T" 382 VE$"D"VE$"DOWN"400) VE$"IN" VE$"ENTER" 532L VE$"OUT" VE$"EXIT" 544 VE$"LOOK" VE$"SEE" VE$"VIEW" MVE0:VE$"SCORE"VE$"TOTAL""YOU ARE STILL STUCK IN THE MAZES ";:1264 VE$"HELP" 566"DESTINED TO MARRY THE BEAUTIFUL AND KINDX"BRUNHILDE ON TOMORROW MORN. BUT BEING"YOUNG AND STUPID, YOU HAVE DECIDED TO"SPEND YOUR LAST DAY DAY OF FREEDOM"EXPLORING THE ENDLESS FOREST THAT"SURROUNDS YOUR SHACK. YOU COULD VE$"SW" CP(CO$) BY$"":A SPCP1(CO$): (CO$,SP,1)" " BY$(CO$,CP1,SPCP1):CPSP:BY$"THE"BY$"IT"BY$"A" 188 BY$"AN"BY$"THAT"BY$"" 188 BY$"JUMP"BY$"GO"BY$"TRAVEL"BY$"WALK"BY$"MOVE" E";W0" W";NE0" NE";'NW0" NW";9SE0" SE";KSW0" SW";QWl:"";COM$COM$""" ";: 154(COM$"AGAIN"COM$"REPEAT")VERB$""COM$"AGAIN"COM$"REPEAT"VERB$""1242 VE$"NW" 270  VE$"SE" 274  VE$"SW" 278V VE$"GET"VE$"TAKE"VE$"GRAB"VE$"CARRY"328 VE$"DROP"VE$"THROW"VE$"TOSS"VE$"LEAVE" 348 VE$"I" (VE$,4)"INVE"368 VE$"BREAK" VE$"SMASH" VE$"DESTROYPS31PSF814,816,828,840,850,858,864,876,884,896] vPS41PSG902,914,920,928,932,942,950,956,966,972 xPS51PSH978,982,984,986,988,990,992,994,1004,1012 zPS61PSR1018,1026,1034,1040,1048,1054,1060,1066,1072,1078 |PS71PSJ1睝 "I110:A$:8" ";:I1100::" ";:I1100::A$:A$""960>a SUBROUTINE FOR SCREEN SQUARE"";:I138:"";::"";I123:"";::"";I138:"";::33767,122  " z" PSMZ1D LITM$(6)"A GOLD WEDDING RING IS IN YOUR POCKET FOR YOUR SWEET BRUN"~ NITM$(6)ITM$(6)"HILDA FROM THE GREAT MAGICIAN RALPH" PTRUE1 RFALSE0 T V: X 104 Z PS66 410 \ EOG ^ 132 ` 152 b 200 d K1R*LC$(A(K));4K8>:"1 2 3 4 5 6 7 8 9>H]R"     "\"     "f"      "p"    " z" HE WISP":-6 FL%(10),ITM%(10),ITM$(10),EX$(10)R8I19:ITM%(I),ITM$(I),EX$(I):: 30,BOTTLE,AN EMPTY BOTTLE LIES DISCARDED NEARBY< 67,WATER,A SMALL POOL OF WATER COLLECTS HERE> 0,BROOM,A SMELLY WITCHES BROOM FLOATS NEARBY! @ 5VE$"END"VE$"QUIT"VE$"STOP"VE$"DONE" 586WVE$"KILL"VE$"ATTACK""YOU HAVE TO TELL ME HOW TO";:1268h"WHAT???":n N PSN: 286 280 E PSE: 286 280 S PSS: 286 280 W PSW: 2STAY-"HOME AND WATCH TV BUT THEN YOU'D NEVERX "GET LOST IN THE FOREST AND FIND HIGH""ADVENTURE AND LEARN TO BECOME A MAN$"AND WHAT THE MEANING OF LIFE IS.&" NOW IN THE TRADITION OF ALL THESE("TYPES OF GAMES, I'M SURE YOU'L E,ENAMEL,DAHLIA,OBJECT" > WINCE,CRESS,DRUG,INVERTB H SNORT,MOTIF,CHORUS,GENDERb R POUCH,EXACT,BUTTON,ORIOLE \ YOKLE,ARMOR,VANDAL,PICKET f LIMIT,GAUDY,SINGLE,DOUBLY p SOUSE,FUZZY,AFFRAY,ESTATE z CLEFT,STEED,OUTBID,WIDEST LIN " N"ANOTHER WORD? (Y/N)";5 XQQ$:QQ$"Y"QQ$"N"600Q bQQ$"Y" "":240j "YOU ANSWERED:"t TWR X(RT100.5) Y(WT100.5)  X"% CORRECT "Y" % WRONG"    HOBBY,BUILT,DIVERT,FLOW  REVERSE_ ARRANGE DIGITS 1-9 IN CORRECT SEQUENCE BY REVERSINGer 8K PETx UNKNOWN AUTHOR ADAPTED BY H. HUNGATE  " ݠ SAN MATEO COUNTY  N STREET, REDWOOD CITY CA 94063 (415)364-5600 EX4401" " PROGRAMS MAY BE COPIED FOR EDUCATIONAL USE & MAY NOT BE%" SOLD. COPYRIGHT 1981 CUE,I980/"REVERSE"]"IN THIS GAME YOU ARE GIVEN A LIST OF""THE NUMBERS 1-9 IN RANDOM SEQUENCE.""FOR EXAMPLE, YOU MIGHT GET THIS LIST:" "2 3 4AN CHANGE THE ORDER OF THE"= "NUMBERS ONLY BY REVERSING THEM FROM"e "THE LEFT END. IN OUR EXAMPLE," "2 3 4 5 1 6 7 8 9" "BY TYPING '4' YOU WILL REVERSE THE" "FOUR NUMBERSZ:11001110 "";:X1(B$):"";::""C15) "";:X1(B$):" ";::""j15) "";:X1(B$):"";::""y16)""; XX1500: ""19)" ": 19)"SORRY!!";: XX1500:NTINUE "; J950 O 980L P"DO NOT USE THE RETURN KEY AFTER YOU"r Q"TELL ME HOW MANY TO REVERSE." T"TO QUIT THE GAME TYPE A LETTER WHEN ^"ASKED 'NUMBER TO REVERSE?' h"TYPE ANYTHING  END,END$9. CURSOR INPUT ROUTINE...PET USERS CLUB VOL 1,#6...QJ...9/1/79G8CR$(13)jB SET FL=1 FOR OLD STYLE PETS.LIN$" ":ZTTI:ZC2:ZD$(20)VZ$:Z$""1140`ZTTI(" ",ZC,1);"";:ZC3ZC:ZTTI15j1110 tZ(Z$) "'"";:R9:760L:"HOW MANY SHALL I REVERSE? "" (TYPE A LETTER TO QUIT)";950""A$R(A$)R0740&TT10 ***EAR,THYME,DISMAL,HELMET# CLOVE,HITCH,DUPLEX,ARTERYC WEDGE,TAFFY,QUAVER,BUTTERc ENACT,JOINT,THRUSH,WISDOM DOUBT,QUEEN,MARINA,BEHELD BEGIN,CANAL,GHOST,NIMBLE YIELD,ABYSS,EMPLOY,FASTEN ALBUM,TWINE,RANSOM,BEDECK IER  GRIMY,SMART,ENGINE,MUFFIN4  RUSTY,DESTROY,ICEBOX,DEBTORU  SCHOOL,HENNA,ARCADE,PURPLEu  RAINY,LAPEL,FROZEN,CIPHER  NUTTY,MAGIC,PASTRY,SOLACE  BOOTY,CLOUT,DROWSY,WINNOW * FELON,DICED,THROW,CLOUDY 4 DARING,BAFFLE,INVIT Q " OFFICE OF EDUCATION & " COMPUTER-USING EDUCATORS SOFTSWAP " ;"333 MAINC 3d59468,12InI110:LC$(I):yo" "p"WELCOME TO THE GAME OF REVERSEs"WOULD YOU LIKE INSTRUCTIONS? (Y/N) ";t 850u A$"Y" 370x 5 1 6 7 8 9"2 "TO WIN THIS GAME YOU MUST ARRANGE THE"\ "LIST SO THAT IT LOOKS LIKE THIS:" "1 2 3 4 5 6 7 8 9" "TYPE ANYTHING TO CONTINUE "; 950 980 "YOU C ON THE LEFT, AND GET:"S ""5 4 3 2 1 6 7 8 9" ,"NOW IF YOU REVERSE 5 YOU WILL WIN:" 6"1 2 3 4 5 6 7 8 9" @"TYPE ANYTHING TO CO:" ":";:11809~FL(Z127)64(Z127)91Z$((Z128)255)JZL2541110eIN$IN$Z$:Z$;ZD$;Z$;Z13IN$(IN$,2):CR$;:Z20ZL1IN$(IN$,ZL1):"";: 1110Z141Z$(20(ZL1)):Z2ZL:Z$;: TO BEGIN ";:950$ r"HERE WE GO ... THE LIST IS:":= wA(1)((N1)(1)2)H |K29] A(K)(9(1)1)j J1K1 A(K)A(J)JK1:J:390 J,K T0 " "; I18:"  ";:" :ZL(IN$):(Z127)32" ";:11809~FL(Z127)64(Z127)91Z$((Z128)255)JZL2541110eIN$IN$Z$:Z$;ZD$;Z$;Z13IN$(IN$,2):CR$;:Z20ZL1IN$(IN$,ZL1):"";: 1110Z141Z$(20(ZL1)):Z2ZL:Z$;: REVERSE R NUMBERS AND PRINT NEW LIST:K1(R2)*DZA(K)<NA(K)A(RK1)KXA(RK1)ZRbK[l760uv *** CHECK FOR A WINK19A(K)K500K" "" YOU WON IN ";T;" MOVES! "GLOO,WHINE,GRIMLY,SOLID! LOUSY,APRON,BANGLE,ANKLETC FINISH,PREFER,IODINE,DABBLEs GUTTER,NICKLE,POISON,OUTING,MOBILE,RAMROD NERVE,CHIME,HYMNAL,FACTOR CHAIR,AWOKE,AROUSE,SIPHON ZIGZAG,DONKEY,SPENT,VANITY,FAMOUS,INFUSE  HANGMAN4 1978#B TRADITIONAL HANGMAN GAMEHU 8K PET[x COPYRIGHT HARRY J SAAL DISTRIBUTED BY C.U.E. WITH AUTHOR'S PERMISSION " " SAN MATEO COUNTY  OWN,BASKET TIGER,DRESS,PUPPY,HIPPO1 DOWNTOWN,SHADOW,TRIANGLEV PRESIDENT,WORLD,VALLEY,HISTORYw SPIRIT,FEELING,PEACE,DREAM DANGER,PARTY,COUNTRY,TRACTOR RECORD,KITCHEN,HAMSTER,POINT JEWELRY,VILLAGE,TENNIS,GOLDEN  " ";4SW);("NOO",SW);: " ";:/ " ";:= " ";:M "";:\ " *";:m $"*";:} ." ";: 8" ";: B"";: L"";:  MAILBOX,ZEBRA,PEOPLE,ZIPPER  MITTENS,MFUSE ENOUGH,MACHINE,PRACTICE,FRIENDU ELBOW,BELLY,BRAIN,WORKER,LAWYER,STUDENT,DOCTOR,FARMER,POLICEMANv FIREMAN,COWBOY,RANCH,FIELD CALIFORNIA,AMERICA,GLOBE **END** CHEN,HAMSTER,POINT JEWELRY,VILLAGE,TENNIS,GOLDEN  37 "GUESS?";! C$: C$"" 2100 L(C$)64g L1 L26 MS$"ONLY GUESS LETTERS! ": 145 LE(L)0 MS$"YOU USED THAT ALREADY": 145 LE(L)0 Q1 LN: L((WD$,Q,1))64 255 MS$"GOOD!!! ) SCRAMBLED WORD JULY1980b UNSCRAMBLE LETTERS TO SPELL A GIVEN WORDhu 8K PET{ AUTHOR AND SOURCE UNKNOWN " ݠ SAN MATEO COUNTY = " OF1 LN:L((WD$,I,1))64@ x LE(L)1 ER10 AN$AN$".":SW0: 140X AN$AN$""(L64)` I SW1 ER10 MS$"YOU GOT IT!!!!! " ER10 145 SW1 3: ER0 10: 1000:: "";TY CA 94063 (415)364-5600 EX4401u" " PROGRAMS MAY BE COPIED FOR EDUCATIONAL USE & MAY NOT BE" SOLD. COPYRIGHT 1981 CUE,INC   LE(26)7! FIND NO OF WORDS@"NO0j# WD$: WD$"**END**" NONO1: 35$X(TI): RANDOMIZE%"DO NOT PRESS":" RETURN "&"HANGMAN *! ***************************':-:S""8)""x 8)"A SCRAMBLED WORD GAME" B$(20),A(20)A$""B$""C$"" Z 1 20A(Z) 0" Z,A (30(TI)1)6 B1 % " OFFICE OF EDUCATION K " & q" COMPUTER-USING EDUCATORS " " SOFTSWAP " "333 MAIN STREET, SUNDAY,SECOND,DOLLAR,TEACHER& GUESS,BORROW,WRITE,COMPUTERG CHANGE,CORRECT,SUPPLY,SLOWe CAUSE,BOARD,TIGER,FAIRY STATE,COVER,TRACK,SPECIAL SOUND,DEVELOP,MONEY,READER IDEA,MAGAZINE,THANKS,STOVE SCHOOL,HUMOR,ENGLISH,CONOUSE,ANIMAL,MONEY" MONKEY,FEATHER,TURTLE,FOOTBALLJ GARAGE,TURKEY,TOMATO,WAGON,SEESAWo BICYCLE,GEESE,BASEBALL,ROOSTER DOORWAY,KANGAROO,PAINTBOX SIDEWALK,JACKET,PEANUT,HORSE MOUNTAIN,NURSE,WITCH,RULER SPIDER,NEEDLE,CL'S YOUR GUESS? "; 1060 :" C$IN$3 A$C$ 560=  530a 3100:WWWW1:WW33000 :445~ " THE ANSWER IS: "A$:  580 WW1:510 0"CORRECT!!": :RR1 D"SCORE: CORRECT"R" WRONG "W: I" ":100 Q ERER1: 1000G  ER10 MS$"SORRY. HE'S DEAD!! ": 100r MS$"NO, THERE ARE NO "C$"'S ": 145 "";  SW0 ("",SW);  ER 1010,1020,1030,1040,1050,1060,1070,1080,1090,1100FICE OF EDUCATION & " COMPUTER-USING EDUCATORS SOFTSWAP " '"333 MAIN STREET, REDWOOD CI AN$;""8 BL$"LETTERSLEFT : "e I1 26: LE(I)0 BL$BL$" ": 180y BL$BL$(I64) I:BL$::MS$:QQ11500::MM$ ER10 SW0 200 "PRESS RETURN TO BEGIN AGAIN"; C$: C$"" 196 3d ***************************Un * *wx * SCRAMBLED WORD * * * * KID-PROOFED BY QJ * * JULY 17, 1980 * * ";H'"ݝݝݝݝݝݝ";N(2MM$" "FMS$"":ER0: I1 26:LE(I)1:IPWH(1(1)NO)Z I1 WH: WD$: I:LN(WD$)dAN$"":SW1 n I A @ A$ JA$"END" : BB1" T B. ^C(A$); h E1 CN rD(C(TI)1)a | A(D)1 370u B$(E)(A$,D,1) B$B$B$(E) A(D)1  E  A$B$ 360 "UNSCRAMBLE: ";:2000: B$:WW0 "" "WHATREDWOOD CITY/"CA 94063 (415)364-5600 EX4401U"{"" PROGRAMS MAY BE COPIED FOR " EDUCATIONAL USE & MAY NOT BE" SOLD. COPYRIGHT 1981 CUE,INC"AR UEl BPET GAMES 8P82A ABACUS BJACKBOP BRICKBSHIPCROSSWORD PUZZLE%"FLIP GUESS KKHANOIHANGMAN4HMAN IAN'S RACE (N)!MAZEMINDPAK JANAQUIXKK RACE REVERS!REVERSESCRAMBLED WORDSEABATTLE INSTSEABATTLE/SLOT!SPACE!KKVECTOR CHASEWILL O' WISPrWIPEOUTWANDER ZAP PAPER #PEGKKKKKKKK  ""+"";15);"SEABATTLE"P:8);"REWRITTEN MARCH 10, 1980l:12);"BY FRED MULDER5);"HIT ANY KEY TO CONTINUE LISTING"THIS IS A 13K PROG 6000 59468,14 " T ӠŠŠƠSEA BATTLE !!!) P"TŠŠ̠ǠKZ"ΠӠ. T٠:yd:3);".. DȠӠ͠٠n:3);".. V٠٠SEA MONSTERS!!x:3);".. ĠΠҠ. 6000"TŠȠӠŠ Ϡˠ. Y9"٠. T٠ϠŠϠh"Ҡ, ԠӠ̠.r6000"TŠ٠ӠŠΠ٠, "Ġ, Ӡ٠". T٠̠ԠΠ ŠӠҠ. T8 J"ΠӠĠ٠Š^ T"8 1 2 Ԡ. T Š8 ^" \ ^ / ӠϠŠ, h"7 -*- 3 ٠ŠŠŠŠ r" / ! \ ŠĠҠ.  |"6 5  ӠΠ& ", ŠӠΠĠ,= "ϠŠCAREFUL!!G 6000n "#1: SONAR - TӠĠӠ " , Ǡ " ĠӠΠ " Š . TӠ "ŠŠΠϠ, F"ŠҠӠΠ.f"1 ϠӠŠ.p6000 "#3: - POLARIS MISSILE CONTROL - T"Ġ ՠϠȠŠƠ "Ҡ ԠŠŠ$f". MӠ٠!!!/p 6000[z"#4: MANUEVERING - TӠĠ"ՠϠŠŠȠ'Š."Yՠ٠ԠϠϠӠƠՠ"٠, ŠӠΠ"ՠŠӠƠҠ. I+"ӠՠנȠӠԠΠX", ȠӠŠ, "נ. (- = BAD + = GOOD 0 = SO/SO)6000"#6: HEADQUARTERS - TӠĠ$"Ӡ͠Ҡ"ӠՠϠĠΠԠΠ1~"ŠΠԠ٠.]"Yՠ٠٠ϠԠ "3 ӠƠ, ĠՠԠ"ԠԠ10 ΠΠĠŠ Ԡ" ϠΠ.6000Ơ : 10 " 2500 . Ơ : 3 : " 1 d" Ġ͠. Ơ٠.n6000("I ԠŠǠӠ2"ƠŠ, ϠŠ<"ŠŠŠ"TŠԠƠŠŠӠϠ٠X" ƠŠ٠ӠΠҠ20 20(" ȠŠӠӠΠ2"'Ӡ. YՠԠϠ,<", Ԡ Š٠F" ՠ.' Ϡ7", Ԡ٠ŠҠd"Ҡ, ϠŠҠՠ"͠Š, Š!"TŠSM Š"ŠȠҠԠ٠ "ԠŠȠР* ", ĠԠΠ٠Ӡ? :15);"ORDERSm "YՠŠ10 ӠԠՠ٠.~ "٠: "6000 ,"#0: NAVIGATION - TӠĠ 6"ՠϠŠΠҠ @" 4 , ϠŠN, , "ĠŠŠ#1.6 6000T 10);" TŠҠL "ϠˠҠΠԠƠ. "Ӡ100 ӠϠŠҠ 1 ". BEWARE Ơ!! "IƠՠŠŠΠ1000"̠ҠǠ Ǡ,? "ŠԠӠ Ϡ̠Ơi "РӠΠ Ԡ Ƞ.t  6000 "#2: TORPEDO CONTROL - TӠĠ "ӠՠϠԠ1 ƠҠ10 ". TŠҠ̠.*"TŠҠ̠ˠҠŠI4". IԠӠ75 Ơ̠Ϡv>"Š1 . SŠ٠ H"ȠŠ, ٠R"٠٠ŠŠ٠\", Ӡ̠ƠŠŠӠԠנ2500 . 1"Š50 . Π . Y^"ԠŠŠԠ100 . YՠŠ"Ԡ1 ҠԠҠ٠2 "ՠ.6000"#5: STATUS/DAMAGE REPORT -TӠĠ"Ӡ."ϠȠҠ٠ƠA8"Ġ. Y ԠŠԠ50 ԠҠmB"ӠĠ2 ҠӠӠ٠ϠL"Ӡ, ĠՠΠ٠V"Ԡ.`6000j"#7: SABOTAGE (SCUBA) - T Ġt "#8: POWER CONVERSION - TӠ."ӠՠϠŠ̠Ϡ,D"Ҡ-.q"#9: SURRENDER - TӠĠӠ"ҠCOWARDS ĠTRAITORS!!"YՠԠŠŠȠŠ:" 6000 Ӡ נӠF".0P"YՠԠԠŠŠΠŠ'_Z", ĠԠӠҠ٠Ϡˠd"Ġ٠Š٠Ԡ̠!!!n6000x10500600011390n59468,12opA$ '-#-' Ӡ|)"'!H!' ӠҠ')"'(X)' Ӡ!!1)6000[)"E٠Ϡ, '.' ̠)"ΠŠ. TӠӠ)"ƠŠ, ϠŠԠ ')". IƠՠŠ " "";10);"SEA BATTLE"S"CREATIVE COMPUTING MORRISTOWN NEW JERSEY"iA11000:A:""o  A(10,10),D(9)"WHAT IS YOUR NAME ";:N$:6@I110BJ110:A(I,J)0:JHIJTGX123:G$:GX^X36 XC&"YOU MUST DESTROY ";S;" ENEMY SHIPS TO WIN":10);"***";N$;"***I0m:S3((1)10)1:S4((1)10)1NA(S3,S4)0570XA(S3,S4)4blX1((1)8)8vX1((1)10)1:X2((1)10)1A(X1,X2)0630A(X1,X2)5 PAUSE r1680$t"THE COMMANDS ARE:":Qu"#0:NAVIGATION #5:STAT/DAM REPORT{v"#1:SONAR #6:HEADQUARTERSw"#2:TORPEDO CONTROL #7:SABOTAGEx"#3:POLARIS MISSILE #8:POWER CONVERSIONy"#4:MANUEVERING #9:SURRENDER1((.23(1)10)((B50))) `6080G j"POWER AVAIL=";P;". POWER TO USE";:P1[ ~P10P1P1130n P110001210 (1).431210 "ATOMIC PILE GOES SUPERCRIT ";N$; " !!! HEADQUARTERS WILL WARN ALL SUBS" "TO CLEAR FROM RADIOACTI 2"YOU ALMOST RAN AGROUND ";N$;"!!, <A(X,Y)2:A(S1,S2)0: PS1X:S2YD d4690S nD501290 x"YOU RAMMED A SHIP!!! YOU'RE BOTH SUNK!! SS1 S06260 6180 D501290 "YOU RAMMED YOUR HEADQUARTERS!!!!! :"YOU'RE BOTHARROW ESCAPE WITH A";:"SEA MONSTER";N$;"!!%@Q10-JY35TX3=^X2jh"NAVIGATION COMPLETE. POWER LEFT=";P;".xrP01340|"ATOMIC PILE HAS GONE DEAD!!!!!:"SUB SINKS, CREW SUFFOCATES6180D(2)01720"SY1Y101880D" . ";N1950X'bX11A(X,Y)1/lA$7vX1cD50(1).23A(X,Y)1A(X,Y)21860 (1).15A(X,Y)21860A$;YXPP50:P01660D(2)02004"DIRECTIONAL SONAR IS S2Y1X41021404A(S1X1X4,S2Y1X4)32130,>X3X31:B(X3)X44RX4C\X302200hf" ";X;" ";X3;" ";pX41X3:B(X4);:X4X1980D(3)02260"TORPEDO TUBES UNDER REPAIR!895C:A$""6000q"":)"ΠŠŠ, Р̠E)"ŠΠǠ̠٠.i)"ŠǠӠҠ:T)" '*' Ӡ٠^)" '$' ӠΠҠh)"'\S/' ӠΠ٠r)"Š50 , )"Ӡ̠ϠנРӠ'.'.)(~,:17);"GOOD LUCK"J,::"NOW LOADING SEA BATTLE[,"SEABATTLE" :T)" '*' Ӡ٠^)" '$' ӠΠҠh)"'\S/' ӠΠ٠r)"hY35:A(X,Y):YX,S15:S24;A(S1,S2)2AUS((1)16)14[auGX17:G$:GXX1(((1)4)1)21D8,D9XX1SX1((1)9)1X2((1)9)1A(X1,X2)0500A(X1,X2)3X X14.X1((1)8)2:X2((1)8)2CA(X1,X2)0700RA(X1,X2)6X^rGX17:G$:GXY1((1)8)1M1,M2Y X I19:D(I)0:I*C30:P6000:F2500:T10:M3:D100:D22pPAUSE0700: :"WHAT ARE YOUR ORDERS ";N$; Oa  (O1) 1040,2001,2220,2680,3250,3410,3700,3880,4400,4660g y D(1)01080 $"ENGINES ARE UNDER REPAIR ";N$;". .895 8C81110 B"NOT ENOUGH CREW TO MAN ENGINES ";N$;". L895 VD1VE AREA!!! 6180 XS1:YS2:Q119 X21((P1100.5)D1.5)a XX10XX111YY10YY1111280 "YOU CAN'T LEAVE THE AREA ";N$;"!! 1340 A(XX1,YY1)11290,1330,1630,1390,1440,1470,1490 XXX1:YYY1:PP100 (1520 SSSUUNNKKK!!! 6180. "YOU'VE BEEN BLOWN UP BY A MINE!!!8 6180K (1).211630U 6180[ m X3X2 X2 Y3Y2 Y2 X31X310Y31Y3101610 A(X,Y)61610 "(1).251500 ,Q1016106"YOU JUST HAD A NONAR IS UNDER REPAIR ";N$;".&"UNABLE TO GIVE YOU A MAP",:C51790f"NOT ENOUGH CREW TO WORK SONAR ";N$;".lr{""X110Y110& " ","***","(X)","\S/","!H!"," $ ","-#-"0A(X,Y)01880: X1X10 UNDER REPAIR."895 C520201"NOT ENOUGH CREW TO WORK SONAR.":895@V I15:B(I)0:I{"DIRECTION-# OF SHIPS-DISTANCESGX17:G$:GXX18:X1,Y1X30 X4110*S1X1X41S1X1X410S2Y1X41 102290"NOT ENOUGH CREW TO FIRE TORPEDOES.895)T2320B"NO TORPEDOES LEFT.K 895\ D20002360n (1).52360$ "PRESSURE IMPLODES SUB UPON FIRING.) "YOU'RE CCRRUUSSHHEEDD!!. 61808 6080B XS1:YS2V X2 50 "YOU TOOK OUT SOME ISLAND!! A(XX1,YY1)0 24209 "OUCH!! YOU GOT ONE!!N SS1:S02520X 6260~ "YOU BLEW UP YOUR HEADQUARTERS!! S30:S40:D20( 25202 "BLAM!! SHOT WASTED ON MINE!!":2520F "A SEA MONSTER HA "RECOMMEND THAT YOU DO NOT FIRE AT THIS  "DEPTH...PROCEED";:A$5 (A$,1)"N"880G (1).52850m "MISSILES EXPLODE UPON FIRING!!! :"YOU'RE DDEEAADDDDD!! 6180" 6080, "FUEL (LBS.)";:F1@ F10F1F2910J "YOU HA 2Y1F21 X1X10Y1Y103140 D3D3(A(X,Y)3)% D4D4(A(X,Y)6): D5D5(A(X,Y)5)O D6D6(A(X,Y)1)c A(X,Y)43100 "YOU'VE DESTROYED YOUR HEADQUARTERS!! D30:S40:D20 3130 A(X,Y)23130& "YOU'VE JUST DE SSD3:S06260 2940  D(5)03290: "BALLAST CONTROLS ARE BEING REPAIRED.":895I C123320t "THERE ARE NOT ENOUGH MEN TO WORK THE :"CONTROLS ";N$;".":895 "NEW DEPTH";:D1 D10D130003370 "HULL CRU:895 "# OF ENEMY SHIPS.......";S "# OF POWER UNITS LEFT..";P6 "# OF TORPEDOES LEFT....";TW "# OF MISSILES LEFT.....";Mx "# OF CREWMEN LEFT......";C "LBS. OF FUEL LEFT......";F  "WANT DAMAGE REPORT"; A$ (A$)"HEADQUAR.":U$(8)"SABOTAGE"@U$(9)"CONVERTER"BX;" ";U$(X),D(X)LX$j880*t<~D(7)03740k"HEADQUARTERS IS DAMAGED. UNABLE TO HELP!t880D203770"HEADQUARTERS IS DESERTED.880((S1S3)2(S2S4)2LE.":895 PC103950 !Z"NOT ENOUGH CREW TO GO ON MISSION.":895!nD30:D40+!xXS12S12#X1Q1:D7D7((1).6):XM#X1Q1D7b#D6D6((1).15)i#Xx#D404360#"A SEA MONSTER SMELLS THE MEN ON THE WAY#"BACK. ";D7;"MEN WER=FUEL TO POWER, 2=REVERSE)";:O$ O 4510,4580$4470%'%"FUEL AVAIL=";F;". CONVERT";:C14% FUELFL%C1FUEL C104520c%FFC1:PP(C13)m%4640s%%"POWER AVAIL=";P1;". CONVERT";:C1%C1P1C104590% PPC1(75((D50))(1)4.5)$` XX10XX111YY10YY1112460Uj "TORPEDOES OUT OF SONAR RANGE..INEFFECTUAL.gt TT1:PP150u P04690 1660 A(XX1,YY1)12470,2510,2650,2540,2580,2610,2630 XXX1:YYY1 "..!.."; 26D A TORP FOR LUNCH!!":2420Z X2d "DUD.":2420x ) D(4)02720U "MISSILE SILOS ARE UNDER REPAIR.":895d C232750 "NOT ENOUGH CREW TO LUNCH A MISSILE.":895 M02780 "NO MISSILES LEFT.":895 D50D20002850VE";F;"LBS. LEFT.T 2860^ F2(F175.5)>h S1X1F20S1X1F211S2Y1F20S2Y1F2112980jr "MISSILE OUT OF SONAR TRACKING. LOST."| MM1:FFF1:PP300 2440 D30:D40:D50:D60 XSIX1F21S1X1F21 YS2Y1F21SSTROYED YOURSELF!! DUMMY!0 6180: A(X,Y)0 D YN X!X D603180@b "YOU BLEW UP SOME ISLAND.Ol D503200ov "YOU DESTROYED";D5;"MINES"~ D403220 "YOU GOT";D4;"SEA MONSTERS!! GOOD WORK. "YOU DESTROYED";D3;"ENEMY SHIPS!!SHED BY PRESSURE!! 6180* PP(((DD1)2.5))>4 "MANUEVER COMPLETE. POWER LOSS=";(((DD1)2.5))G> DD1QH 4690WR i\ D(6)03450f "NO REPORTS ARE ABLE TO GET THROUGH.":895z C33480 "NO ONE LEFT TO GIVE THE REPORT.",1)"N"880 "NO ITEM DAM" 5 "(+=G , 0=NUETRAL , -=BAD); AO$ RESTOREZ.X198U$(1)"ENGINES":U$(2)"SONAR ":U$(3)"TORPEDOES":U$(4)"MISSILES"=U$(5)"MANUEVER":U$(6)"STATUS":U$(7)2D513800 "UNABLE TO COMPLY WITH DOCKING ORDERS. 8804 "DIVERS FROM HEADQUARTERS BRING OUTN :"SUPPLIES AND MEN.u P4000:T8:M2:F1500:C25:D2D21 4690 ( 2D(8)03920 <"HATCHES INACCESSIBLE. NO SABOTAGE POSSIBERE ARE";D3;"SHIPS IN RANGE.""HOW MANY MEN ARE GOING";:Q1"CQ1104120L""YOU MUST LEAVE AT LEAST 10 MEN ON BOARD.":4070d"D5(D3Q1.5):D60u",XS12S12"6YS22S22"@D3Q11(1)(1)D3Q1.94220"JA(X,Y)34220" E EATEN!!#CCD7#D6;"MEN WERE LOST THROUGH ACCIDENTS. $CCD6"$PP(10Q1(1)10),$&46902$0E$: D(9)04440m$D"POWER CONVERTER IS DAMAGED.":895{$XC54470$b"NOT ENOUGH MEN TO WORK THE CONVERTER.":895$v"OPTION? (1 1:FF(C13)% "CONVERSION COMPLETE.&""POWER.....=";P;". FUEL...=";F&*4690&4C&>"COWARD!! YOU'RE NOT VERY PATRIOTIC!!M&H6180S&R[&\Q0l&fXS14S14}&pYS24S24&zX1X10Y1Y104760&A(X,Y)34760&QQ((0 EAL DAMAGE SUSTAINED.'5210'Q.36(1).964940($"LIGHT, SUPERFICIAL DAMAGE.(.PP507(8D(((1)9)1)(1)2A(B5210[(LQ.6 (1).9755020(V"MODERATE DAMAGE. REPAIRS NEEDED.(`PP75((1)30)(jY12(tX((1)9)1 )2"HELP ARRIVES IN TIME!!)<5040)Z*dD(1)0D(3)0D(4)0D(5)0D(7)05260*n2420C*x"DAMAGE TOO MUCH!!! YOU'RE SUNK!!M*6180S**::"--**RESULT OF LAST ENEMY MANUEVER**--*X110*Y110*A(X,Y)35690* +^+_GX17:G$:GX+hX01((1)8)1+rW,V+|X0,XW1XW10YV1YV105470,5420-,D505460T,"**YOU'VE BEEN RAMMED BY A SHIP**^,6180q,(1).155460,"YOUR HEADQUARTERS WAS RAMMED!!,S30:S40:D20:A(XXM1,YM2)15730,5760,5830,5850,5900,5730,5930-bA(XM1,YM2)6:A(X,Y)0.v6000. .!.GX17:G$:GX7.X01((1)8)1B.M1,M2J.X0r.XM11XM110YM21YM2105760|.5720."YOU'VE BEEN EATEN BY A SEA MONSTER!!.!/R5730/\"IT'S A TIE!!/f5760/pY/zX//Y190X((1)9)1E0D(X)D(X)((1)(2(1)2))(1((D51)(D2000)))((D(X)3))L0YU0880[00 -1,0,-1,1,0,1,1,1,1,0,1,-1,0,-1,-1,-10"COURSE (1-8)";:C1013000::""1`2651j1t"GOOD WORK!! YOU GOT THEM ALL!! 2~"PROMOTION AND COMMENDATIONS!!26210272 1,1,1,1,1,1,1,0,1,1,0,1=2L0YU0880[00 -1,0,-1,1,0,1,1,1,1,0,1,-1,0,-1,-1,-10"COURSE (1-8)";:C10 1000 VECTOR CHASE MAR 836:s AUTHOR UNKNOWN SOURCE PUG OF SILICON VALLEYy: DESCRIPTION INTERCEPT RANDOMLY MOVING TARGET USING X,Y COORDINATES AND A VECTOR: PET 8K : " '" M"333 MAIN STREET, REDWOOD CITYs"CA 94063 (415)363-5472 """ PROGRAMS MAY BE COPIED FOR " EDUCATIONAL 70&"Z$(13)167,1:Z(Z),32:Z$ZZ$::38@#(ZZ$""Z$(20))31\$ZC(ZZ$)ZC139:31%ZZ$ZZ$Z$:ZZ$(ZZ$,(ZZ$)((20)Z$)2):Z$;:32&ZC0:'ZX1ZC:(20);::("GET ROUTINE )Z$:(" ",(ZU1)21,2);:ZU1(Z)((S1X)2(S2Y)2))4&Y&X&Q4810'"NO SHIPS IN RANGE TO DEPTH CHARGE YOU!$'5210?'"DEPTH CHARGES OFF ";Q'(1).54850k'"PORT SIDE ";N$;"!!!u'4860'"STARBOARD SIDE ";N$;"!!!'Q.13(1).924890'"NO R(~D(X)D(X)(1)8(Y(5210(Q.9(1).9835100)"HEAVY DAMAGE!! REPAIRS IMMEDIATE!!!7)PP(200((1)76))L)X14((1)2)^)Y((1)9)1t)D(Y)D(Y)(1)11{)X)5210)"DAMAGE CRITICAL!!! WE NEED HELP!!) *WD8:VD9*XW0XW11YV0YV115420*X0911+A(XWX0,YVX0)054004+A(XWX0,YVX0)3:A(X,Y)0>+6000F+X0L+"+,A(XW,YV)15430,5460,5530,5460,5560,5600,5650+6A(XW,YV)3+@A(X,Y)0+J6000+TW,YV)0,5620,(1).75460,"**SHIP DESTROYED BY A MINE**!!-SS1-S05440-6260,-(1).85460X-"**SHIP EATEN BY SEA MONSTER*!!":SS1b-05630h-:|-DA(X,Y)66000-NXM11XM110YM21YM2105760-XA(6180.(1).25760."**SHIP EATEN BY SEA MONSTER*!!":SS1:S05730/62602/ "**A SEA MONSTER ATE YOU'RE HEADQUARTERS!E/S30:S40:D20O/ 5730b/*(1).755760/4"***A SEA MONSTER FIGHT***/>(1).85980/H"AND ONE DIES!C11C18610000GX17:G$:GX0X91(C1.5)0X1,Y10X901$-1."THERE ARE STILL";S;"ENEMY SHIPS LEFT!!W18"YOU WILL BE DEMOTED TO RAND OF DECKg1="SCRUBBER.y1B:A15000:1L::"";"";10);"NEW GAME1VAU0):Z$""41D *ZC$""ZX1(ZC$):ZFZFZX(Z$(ZC$,ZX,1))::ZF041V +ZC$"":ZF0:` c PUG d(50003)160144,88:120 n(50003)1144,49:120 x"":59468,14: N$(72) V1$"" V2$"" V3$V2$"C " SAN MATEO COUNTY i " OFFICE OF EDUCATION  " & " COMPUTER-USING EDUCATORS " " SOFTSWAP  USE ONLY AND 1" ARE NOT TO BE SOLD. W"n"INPUT ROUTINEZ(Z)(196)256(197)(198):158,0:ZZ$"":167,0 Z$:Z$""Z$""Z$""Z$""Z$""Z$""Z$""Z$""32!Z$"Q"9 "(V4$"OU'RE AT"(X2.5);(Y2.5)19)"OUR IRECTION";?ZC4:30 :D2(Z$)w" "15)" ";S1V1(D13.14159180)100M1V1(D13.14159180)100S2V2(D23.1415  PRINT:PRINT:"z""V1$" *********";>"*********";Z"******";v"*********";"*********""O YOU WANT TO TRY AGAIN? (/) ";:ZC$"YN":40Z$"Y"3  CROSSWORD PUZZLE:@ THIS PROGRAM WAS WRITTENa UNDER A GRANT FROM THE ONTARIO MINISTRY OF EDUCATION EXPERIENCE '81 PROJECT WENTWORTH COUNTY BOARD OF EDUCATION PROGRAM COORDINATORS- )" COMPUTER-USING EDUCATORS O" u" SOFTSWAP " "333 MAIN STREET, REDWOOD CITY"CA 94063 (415) 363-5472 "012"INPUT ROUTINEJ3Z(Z)(196)256(197)(198):158,0:ZZ$"":167,04Z$:Z$""Z$""Z$""Z$""Z$""Z$""Z$""Z$""525Z$(13)167,1:Z(Z),32:Z$ZZ$::576(ZZ$""Z$(20))517ZC(ZZ$)ZC158:51& 8ZZ LINE i GOTO130 n 10000 x 9000+ 1000; GOSUB4010G 8000M :Y 11000d 2500p 3000 " " NF0 " ";NF;"WORD(S) DIDN'T FIT" 216,2 : " PR" V4$V3$""@ V5$V3$" "u V6$V4$" " " "  Ҡ " "O YOU WANT INSTRUCTIONS? (/) ";:ZC$"YN": "THE POSITION AND DIRECTION OF THE"D ""TARGET. OU MUST TELL THE COMPUTER"p ,"WHICH DIRECTION YOU WANT TO MOVE IN" 6"ORDER TO INTERCEPT THE TARGET." @"RESS Β WHEN READY. ";:ZC$(13):40 JT90 T"Ҡ "&"OU MUST COME WITHIN";T;"UNITS OF THE"E"TARGET TO SCORE A HIT."OTTTl V1((1)10.5)1050V2(((1)2.5)1)V1 X1(((1)400)100)((0).5)Y1(((1)400)100)((0).5) X20 Y10  "N15)" = UIT ";XV2$" ="T9" ";Gb"LOSEST APPROACH",((C).5)" "ol"  ISTANCE TO TARGET";v(((X2X1)2(Y2Y1)2).5)" "V5$V6$V3$"ARGET AT"(X1.5);(Y1.5)19)"ARGET IRECTION"D1" 9180)100M2V2(D23.14159180)100C1.E38(I11005X1X1S1BY1Y1M1O X2X2S2\Y2Y2M2w C1(X2X1)2(Y2Y1)2*C1T8804CC1850> PRINTI"";:IFI=100THEN PRINT""HCC1RI\T9T91f560p30(50003)160144,85:"";:59468,12:,144,46:"";:59468,12:`V2$"";}XX13:"";38);"";:""C1RI\T9T91f560p DON WOOD AND NEAL REID$ :> PET 16K AND PRINTERD :k MODIFIED FOR SOFTSWAP BY J LEWIS"" SAN MATEO COUNTY " OFFICE OF EDUCATION " & 3 "Y!" PROGRAMS MAY BE COPIED FOR "" EDUCATIONAL USE ONLY AND #" ARE NOT TO BE SOLD. $" COPYRIGHT 1983 CUE INC. %"11$ZZ$Z$:ZZ$(ZZ$,(ZZ$)((20)Z$)2):Z$;:521 9ZC0:J :ZX1ZC:(20);::_ ;"GET ROUTINE <Z$:(" ",(ZU1)21,2);:ZU1(ZU0):Z$""60 =ZC$""ZX1(ZC$):ZFZFZX(Z$(ZC$,ZX,1))::ZF060 >ZC$"":ZF0: e MAINESS P TO PRINT PUZZLE"G 216,25 : " PRESS A FOR A DIFFERENT ARRANGEMENT"^ A$ : A$ : A$w  A$ : A$"" 260  A$"A" 200  A$"P" 260 :  1,4 : 2,4,5 : 6,4,6  IO0 1 6,(18)  216,25 : 40 Z$"N"330= "":59468,14:"HE OBJECT OF THE GAME IS TO TRACK"j "DOWN AND INTERCEPT A RANDOMLY MOVING" "TARGET (LIKE A SCARED RABBIT!)." "EFORE EACH INTERACTION THE COMPUTER " "WILL GIVE YOU INFORMATION CONCERNING"ELECT LEVEL OF DIFFICULTY":LD$"12345678"V ^" 0 ARD":XX18:" "(LD$,XX,1)"":o h" 9 ASY" r"RESS NUMBER ";:ZC$"0123456789":40:T(Z$) |T5T5 " "   X10 460 Y20*V1$" ARGET VELOCITY",V1" "Q" OUR VELOCITY ",V2" "m C(X2X1)2(Y2Y1)2XX((TI$,2))&YY1XX:D1(1):0D1 ((1)359):990D"  3370 LCLWDR(T)33640 3370 WT(LC)  WT273360B (LC(LW1)DR(T))27 3360O LC ,102U :] O0l V1 LW Q0LCVDR(T) : WI (Q0) : Q0,102 : Q0,WI DR(T)40 3322 (Q040)32 FQ%(Q040AD)DR(T ((W$(Y))1) O1 :YU Y  O1 33456 WI32 WI ( (W$,V,1))64 3345A 3350P VLW : O1X V O0 7000 : NF0 :ZQ(C$) : LLW : CU LC,WT* ZQ,L,CR NF0 3490\ NUNF 3499f W$W$(U1) :  PRINT STUDENTS' COPY 1,(19)1, 34);(1);"ACROSS"61, 34);(1);""D I1 A\1,NA(I);" ";DA$(I)d Ik11,36);(1);"DOWN" 1,36);(1);"" I1 D(1,ND(I);" ";DD$(I)< IPp C1 40(CL40) : CLCLC1 :C1C140  C0UB UBC0 C0LB LBC02 C1UB UBC1F C1LB LBC1SLO(T)LCY_@:lA SET UPT LC(25),DR(25),LO(25),G(25),FQ%(1000),A$(19),DA$(25),DD$(25)Y TB(25),Q$(25),NA(25),ND(25)*!4! 56,68,68,56,0,0,0,0>! 124,0,0,0,0,0,0,0H! 36,76,84,36,0,0,0,08R! 0,68,84,104,0,0,0,0R\! 24,40,124,8,0,0,0,0mf! 116,84,84,72,0,0,0,0p! 56,84,84,72,0,0,0,0z! 64,76,80,96,0,0,0,0! 40,84,84,40,0,0,0,0! 36,84,84,5"";BL$;""4  IO0 " ANSWERS "m  IO1 " PUZZLE "  " INSERT PAPER AND PRESS RETURN"  G$ : G$ : G$  G$ : G$(13) 460 :  "";BL$  " : INPUT WORDS AND DEFINITIONS& W$(25), D$(25).I08"";`"TITLE "; : ZC38: 50 : TL$Z$j"";tII1  I1I1 : "WORD NO.";I" "; : 50 : W$(I)Z$:B$Z$ B$"^" II1 : 1035 B$""1055  1040 REDO WD$ : "DEFINITION NO.";I,)" ";:ZC74:50U.B$Z$ : B$"^" II1 : 1035l3B$"""";:1051y8D$(I)B$B (D$(I))74"THE DEFINITION IS TOO LONG" : II2L I20 1030VN20:~ : "LETTERS ONL X(18(0))9 : K1 XLW30 2560; Y(10(0))6 : K2 YLW19 2570O LC3276840YX` 7000 WDf' l : PROMPT TO ENTER DITTO 216,25 : "";BL$;"";BL$ " INSERT PAPER AND PRESS RETURN" G$ : ";W$;" "b C1 U : EG(C) : C$W$(E)=v L1 LW : Z1$ (W$,L,1)a ZQ1 (C$) : Z2$ (C$,ZQ,1)y Z1$ Z2$ 3370 DR(E)40 DR(T)1 DR(E)1 DR(T)40 LC LO(E) DR(E)ZQ DR(T) L LC32895 ) 3345 (Q040)32 FQ%(Q040AD)DR(T) 3345 3324O (Q0 1)32 FQ%(Q0 1AD)DR(T) 3345 (Q0 1)32 FQ%(Q0 1AD)DR(T) 3345 Y1 U : DR(Y)DR(T) 3327 Q0LO(Y) O1 :YU :3327 Q0LO(Y)DR(Y) D$D$(U1)p CU2 N : W$(C1)W$(C) : D$(C1)D$(C) : C1 W$(N)W$ : D$(N)D$< 3100M TN 3000S Y:q6,4,6 : 6,(18):Q$(SC)Q$(SC)(L$,1)(254)" ":SCSC1I1(Q$(SC1)):Q$(SC)Q$(SC)" ": I::q INPUT DATAz50:B$Z$  B$"E" FL1X:,Y POKING THE WORD^b I1 LW : LCIDR(T) , ( (W$,I,1))64lFQLCIDR(T)32768 : FQ%(FQ)DR(T)vICFLCDR(T) : CLLCLWDR(T)C0 40(CF40) : CFCFC0^QZ ( (TI3)) : SEED RANDOM GENERATOR hAD32768?rBL$" "E :Q J09~ I1 8 : A : A$(J)A$(J)(A) : I A$(J10)(124)(0)(A$(J),6) J !UBLC : LBLCDR(T)((W$)1)6,0,0,0,0(#:)# INSTRUCTIONS%2#"DO YOU WANT INSTRUCTIONS (Y/N) ";:ZC$"YN":608<# Z$"N" 9310q@#"";12)"":12)"CROSSWORD PUZZLE"F#"CROSSWORD PUZZLE ALLOWS THE USER TO MAKE";P#"A CROSSWORD PUZZLE."d# :  PRINTING "/  13000 CROSSWD GRID< 6,(32)F 5000  IO0 216,25 : " ANSWERS COMPLETED " & IO 0 216,25 : " PUZZLE COMPLETED "  1 : 2 : 6 6: "DONE? (Y/N) ";1ZC$"YN":60:Z$"Y"NI1:FL0:o" ";:1035 J1 (W$(I))  (W$(I),J,1)"A" (W$(I),J,1)"Z" FA1 : J(W$(I))! J" FA1 FA0 : 1150 : Y PLEASE!" : POKE FIRST WORD. K0 N : DR(K)0 : C D(1)1 : D(2)40Y K((N1)(0))2 W$W$(1) : W$(1)W$(K) : W$(K)W$ D$D$(1) : D$(1)D$(K) : D$(K)D$ T1 : W$W$(T) : LW(W$) K( 2(0))1 : DR(T)D(K) G$ : G$  G$ : G$(13) 2840"  :, MAKE CROSSWORD< TT1 : U0n C1 N : DR(C)0 UU1 : G(U)C : C I1 U :S1(U(1)) :GGG(I) :G(I)G(S) :G(S)GG : I :& W$W$(T) : LW(W$) : NFNF1: "  D$(I)%04FS1%:4 I%X4:&b4 FS0 Q$(SC)Q$(SC)" " : 13500$&l4Q$(SC)Q$(SC)""(254)" "A&v4SCSC1 : TB(SC)3(C6)G&4:j&4 IO1 R$R$" " : 13900&4R$R$" "(X64) : 13900&5:&5Y(XX1) :ZQ(XX40) : V(XX41)4000 Q$'t61, R$'~6CWCWSC1'6 EEE1 R22'6 R'6(6:(6 SC1 14060'(6 I1 SC18(62, A$(CWI)V(61, TB(I));Q$(I);(141);^(6 Iv(61, TB(SC));Q$(SC)|(6 13900&5:&5Y(XX1) :ZQ(XX40) : V(XX41)  PAK JANA` PROGRAM ALLOWS USER TO CONTROL ANIMATION OF DANCING FIGUREf WRITTEN INSTRUCTIONS FOR ANIMATION ARE AVAILABLE FROM:  BILL FINZER, MATH DEPT SAN FRANCISCO STATE UNIVERSITY PAK JANA'S MOVEMENTS:f" (N STANDS FOR ANY DIGIT 1 TO 9 UNLESS STATED OTHERWISE)$ HEN -- CHANGES HEAD OR EXPRESSION% POSSIBLE MOVES: HE1,HE2,HE3, HE4,HE5,HE6,HE7,HE8,HE9& THE LEFT LEG (N=1,3,6,9)X1 POSSIBLE MOVES: LL1,LL3,LL6, LL9^24 RLN -- CHANGES THE RIGHT LEG (N=1,3,4,7)5 POSSIBLE MOVES: RL1,RL3,RL4, RL76( 8 WA -- FOLLOWED: "AS SOON AS YOU RUN THE PROGRAM THE "$n#"COMPUTER WILL ASK YOU TO ENTER WORDS AND";Vx#"THEIR CORRESPONDING DEFINITIONS. ALWAYS";#"END THE CURRENT LINE YOU'RE TYPING IN BY";#"PRESSING THE KEY."# 9500#"THERE ARE PE E AND"; $"." $9500!$"WHEN YOU ENTER A WORD FOR THE PUZZLE YOU";O!"$"MUST USE LETTERS ONLY. DEFINITIONS MAY"~!'$"CONTAIN ANY CHARACTER FOUND ON THE PET"!6$"KEYBOARD. THE DEFINITION MAY BE UP TO"!@$"TWO LINES LONG.SSWORD PUZZLE""8' I1(TT$)"B'"";"L'K150 : #V'"";(TT$,I,1);#`' I#e'*#j'216,180#t'6#*:K# + "";m#+I1 26 : ""; : :"";# + I118 : ""; : :"";#*+ I 1 25 :""; ::"";#4+ I13:$3 C7 32$3XXAD40RC : X(XX)%3 X26 13700 A TER%3:+%3P$P$"" : FS0 : E19%4 I1 NW%4 LO(I)DR(I)XX 13370%4 DR(I)1 AA1 : NA(A)CWSC : DA$(A)D$(I) :%&4 DR(I)40 DD1 : ND(D)CWSC : DD$(D) ES DANCER LEFT% J 2 -- MOVES DANCER DOWNs N GBN-M- -- CAUSES COMPUTER TO RE-EXECUTE THE LAST N P INSTRUCTIONS M TIMES. DASHES ARE IMPORTANT! T E -- CAUSES THE WHOLE DANCE &5ZQ27 P$P$"" : 13800'5 V26 Y26 P$P$" " : 13800'5P$P$" "'5:U'5 Y27 Q$(SC)Q$(SC)" " : R$R$" " : 13900{'5Q$(SC)Q$(SC)" " : R$R$" "'L6:'V6 C'[6 EEE0 13960'`6EE1 : 1, P$'j6 1 TO BE EXECUTE WITHOUT% V PAUSEe X P -- LISTS THE WHOLE DANCE PROGRAM Z F -- FINISHED. START A NEW DANCE PROGRAM. \ ^ -----SAMPLE PROGRAM----- ` LOAD PAK JANA a8  SAN FRANCISCO CA 94132Y PROGRAM MAY RUN 'AS IS' ON 16K OR LARGER PET_ TO RUN PROGRAM ON 8K PET, COPY LINES 1-160 AND THEN DELETE THESE LINES BEFORE RUNNING PROGRAM INSTRUCTIONS FOR( LAN -- CHANGES THE LEFT ARMf) POSSIBLE MOVES: LA1,LA2,LA3, LA4,LA5,LA6,LA7,LA8,LA9l*, RAN -- CHANGES THE RIGHT ARM POSSIBLE MOVES: RA1,RA2,RA3,- RA4,RA5,RA6,RA7,RA8,RA9.$0 LLN -- CHANGES BY ANY NUMBER FOLLOWED BY A DASHv : CAUSES THE COMPUTER TO WAIT THAT MANY TENTHS < OF A SECOND. @ D 8 -- MOVES DANCER UP F 6 -- MOVES DANCER RIGHT H 4 -- MOVEDITING FEATURES IN THIS" #"PROGRAM WHICH MAKE IT EASIER TO USE."B #::"TO CORRECT THE PREVIOUS LINE ENTERED HIT";o #" BEFORE TYPING ANYTHING ELSE." #::"WHEN YOU HAVE FINISHED ENTERING ALL " #"OF YOUR NAMES AND DEFINITIONS TY""E$"THE PROGRAM CAN HANDLE UP TO 19 WORDS AND THEIR DEFINITIONS.""J$9500"^$h"%"PRESS RETURN TO CONTINUE ";z"&%ZC$(13):60"0%"':"' TITLE"'"";"$'216,12 : 12);"";".'TT$"CRO18 :""; ::""#>+#R+#2:$2 PRINT CROSSWORD GRID%$21, 40((TL$)2));(1);TL$1$21 : 1M$2A0 : D0 : CW0 : EE0S$,3:b$63 R4 22~$@3 I1 SC :Q$(I)"" :$J3P$"" : R$"" : SC1 : E0$T3 "";R3$       "vLF$"" I124#LF$LF$""(20)""*ILD$""Rg -CURSOR TO X,Y-*Y0"":""X);:4"":""(D$,Y)X);>---GET INSTRUCT--"  10J(IN$(P),1)"G"2500:PP1:1510T3000: MOVE PART!^PP1:1510/-MOVE---?A(IN$(P))t(A2Y13)(A4X10)(A6X30)(A8Y9)2070A2YY1:225,128:"":""38)"X ";A4XX1:LF$;A6XX1:R1 b TYPE RUN. WHEN THE PAK JANA FIGURE APPEARS ON THE SCREEN[ c TYPE THE FOLLOWING COMMANDS:{ d LA9,HE9,RA7,LA7,RL7,4,4,4 e f FOLLOWING STEPS 96-100 ABOVE WILL CAUSE THE PAK JANA FIGURE h TO MOVE ACROSS THE SCREEN ED TO AN ANIMAL, FACE, ETC.59468,12+IN$(100),S(10,2)4500E----MAIN---X"":X20:Y11a800zBO$(1)RL$(4)LL$(6);HE$(5)RA$(3)LA$(6);1500A$"D""DELETE 1":PP1:250A$"F":180A$"P""";:NS**"HE$(1)"--"HE$(7)".."?HE$(3)" <  "BO$(1)"   Α"LA$(6)"ͤͤ(]"LA$(1)"   " LA$(7)"+$LA$(4)"  "_&RA$(3)"ΑΑ  "'RA$(4)"[) "(RA$(9)" ͤ")RA$(7)"ȧȧȧ["80LL$(6)" ͑ݧݧ ͑ ͑͑"l1LL$(9)"    Υͤ"2LL$(3)"ݧݧݧݧݧ "3LL$(1)"ݧݧݧݧݧΧ":RL    "_OE2LA$E2$"     "PE2LA$E2LA$"  "SE1$"    "B]E3R$"      "x^E3$E3$"  "bR1$"                "lR2$"  PART--- 800 IN$(IN$(P),2) A((IN$(P),1)) IN$"RA"3100/ IN$"LA"3200C IN$"RL"3300W IN$"LL"3400k IN$"HE"3450q  E1RA$;RA$(A);: E2LA$;LA$(A);: E3RL$;RL$(A);:H E4LL$;LL$(A);:z H ";8000(A$)0IN$(P)A$:2000:PP1:1510<A$"E"A$"P"A$"F"A$"D"nA$"H"A$"R"A$"L"A$"G"A$"W"1510|IN$(P)A$I12"8000,IN$(P)IN$(P)A$6I@(IN$(P),1)"W"3500:PP1:15 $;R2$;A8YY1:225,128:""D$ --FINISH GET GO BACK---" 80003 A$"-"2600H IN$(P)IN$(P)A$R 2510g( IN$(P)IN$(P)A$q2 8000< A$"-"2645F IN$(P)IN$(P)A$P 2610U NSP1:4600W PP2Z  -MOVE . i< j YOU CAN CREATE ENDLESS VARIATIONS OF THE DANCEp l BY USING THE COMMANDS IN LINES 32-90v n THE PROGRAM CREATES A SIMPLE ANIMATION LANGUAGE. PAK JANA FIGURE CAN EASILY BE CHANGP: 5000:250A$"E" NSP: 4500:PP1:250)-INIT---6P1:NS1rHE$(5)"ݬ >"HE$(2)""HE$(4)"< "HE$(6)" >"HE$(8)""HE$(9)""<Χ "LLA$(9)"   "q LA$(5)""!LA$(8)"  ""LA$(3)"  "#LA$(2)"   ͤ",*RA$(5)"ΣΣ"c+RA$(8)"ݧݧ  ͤ",RA$(6)"  "-RA$(1)"   ".RA$(2)"$(4)" ݑݑݑ Α Α"L;RL$(3)""<RL$(1)" "=RL$(7)"    ͤ"NE2LA$"  "6TE1$E1$"    "kUE1$E1$"   "XE4LL$"      "ZE4LL$E4LL$"  E$(A);: ---FINSIH GET WAIT- 8000  A$"-"3540 IN$(P)IN$(P)A$( 3510. <t-WAIT---E~TTINCW1bW$(IN$(P),CW)(W$)58(W$)47CWCW1:3730W((IN$(P),CW1))TITW63760--GO BACK--- 0|PPB1:P0P0S(SP,2)S(SP,2)1 ---GET BACKSTEP----" IN$IN$(P)4 B((IN$,3)): K --DRIVER---^ "":X20:Y11h  800 BO$(1)RL$(4)LL$(6); HE$(5)RA$(3)LA$(6); P1 SP110 S(SP,1)0:S(SP,2)jNS1!I;IN$(I),!I!!@ GET A$"J A$: A$""8010"L(A$)138010#"OA$;)"T 3)): K --DRIVER---^ "":X20:Y11h  800 BO$(1)RL$(4)LL$(6); HE$(5)RA$(3)LA$(6); P1 SP110 S(SP,1)0:S(SP,2)  (C) 1978 GLEN FISHER"J CURSOR(TM) MAGAZINE JULY, 1976 #1o P.O. BOX 550, GOLETA, CA 93017u BL32:CRT32768:HT25:WD40P$""WC87:HD81 59468,12 RC(7),CC(7),DS(7)( I0 7 "BE SERIOUS!": 100Us WSZ1 "SORRY, BUT IT MUST BE LONGER THAN THAT.": 100x WSZ255 "WORMS CAN'T GROW LONGER THAN 255!!!": 100 WM(WSZ):HP0:TP0:SZ0 "";TR1 RK$: RK$" " 2000 SZWSZ 300OL: 2000@T((1)DC):DRDS(T):DS(T)DS(DC):DS(DC)DRaJNRROWRC(DR):NCCOLCC(DR):LOCCRTWDNRNCT (NR0) (NRHT) (NC0) (NCWD) (LOC)BL 310Y OLD,WC:OLDLOC^ROSNR:COLNC: LOC,HDhSZSZ1:WM(HP)LOC:HPHP1: HP: 190  ZZ191 2050! WCZZ64: 1905 WCZZ128: 190F DIRECTIONSq "A FRIENDLY WORM WILL MAKE PATTERNS" "ON THE SCREEN." "YOU CAN SET THE LENGTH OF THE WORM" "FROM 2 TO 255."  "YOU CAN FREEZE THE WORMwIF YOU PRESS THE 'CLR' KEY WHEN THE"; X "WORM IS FROZEN, THEN YOU CAN SET"U b "IT'S LENGTH AGAIN."[ l a  ATTERNS" "ON THE SCREEN." "YOU CAN SET THE LENGTH OF THE WORM" "FROM 2 TO 255."  "YOU CAN FREEZE THE WORM , RACE COPYRIGHT 1978, CURSOR MAGAZINEF CURSOR #2, AUG 1978e BOX 550 GOLETA, CA 93017kydCRT32768nMX2:SO40(5(MX1)):CO(30(MX1))xFL37:LN102:BL32:PY214 RJ1510 I1 9: C(I): I  -41,-40,-39, -1,0,1,39,40,41"PS(0)87:PS(1)81JM$(0)"789456123":M$(1)"QWEASDZXC"U "";` 1200~ "HOW MANY PLAYERS";NH NH1 985 NHMX "ONLY";MX;"AT A TIME!": 210 "NUMBER OF PYLONS";NP NP0 "NO WAY!": 240$S(SP,1)P4100S(SP,2)04200---END LOOP--S(SP,1)0:SPSP1"3-NEW LOOP--ISPSP1:S(SP,1)PXIN$IN$(P)f"CL(IN$),(IN$,CL,1)"-"CLCL1: 41406S(SP,2)((IN$,CL1,(IN$)))h---LOOPINGr 4300 SP SP1 IN$IN$(P) " " !""P;IN$!F$(IN$,1),! (F$)02000D!F$"W"3700:4670\! F$"G"4000:4670r!43000: BODY PART|!>PP1!HPNSPP1:!R4600!--PROGRAM--!"PROGRAM!I1 NP200 "MAX OF 200 PYLONS.": 240> "SPEED (1-100)";SP_ SP1 "TOO SLOW.": 270" SP100 "TOO FAST.": 270,DL100SP TM$(59) I0 59:TM$(I)("0"((I),2,2),2): I "";& ICRT1 CRT38: I,100::DS(I)I: RC(I),CC(I): IJ2 -1,-1, -1,0, -1,1, 0,-1, 0,1, 1,-1, 1,0, 1,1X<OLD32767A "WANDER: A WORM CRAWLS OVER YOUR PET"F"DO YOU WANT DIRECTIONS";XX$K (XX$,1)"Y" 3000d"HOW LONG WOULD YOU LIKE IT";WSZn WSZ1LOCWM(TP):TPTP1:SZSZ1* TPWSZ TP07 LOC,BLH TR0 300rLOCLOCCRT:NR(LOCWD):NCLOCNRWD (TRNR)2 (TCNC)2 300 I1 25: I 200,DC8:TR11 (1).1 3306DCDC1: DC0 TRROW:TCCWSZ HP0 r 1501  CURSOR(TM) MAGAZINE JULY, 1978 #1V  P.O. BOX 550, GOLETA, CA 93017t  CHANGE PRINT CHARACTERS  RL$: RL$"" 2010  RL$" " 190 ZZ(RL$)  ZZ147 2030 "":  ZZ64 2040 WCZZ BY PRESSING THE".  "'SPACE' KEY. WHEN YOU PRESS IT AGAIN"V  "THE WORM WILL CONTINUE CRAWLING."\  & "WHEN THE WORM IS FROZEN, YOU CAN" 0 "CHANGE THE CHARACTER USED FOR ITS BODY" : "BY PRESSING WHATEVER CHARACTER YOU LIKE." D  N " I920,99: I;0 ICRT40 CRT880 40: I,103: I39,101: Ia: ICRT491 CRT518: I,160: IDICRTFL40 CRTFL440 40: I,160: IN ICRTFL120 CRTFL360 40: I,LN: IX NP1 650b I1 NPl:R(22(1)1):C SV(I)(PP(I)): PP(I),PS(I)3  SV(I)BL CR(I)1:KR1b  SV(I)PS(1I) PC(1I)0:CR(1I)1:KR1j  I  KR0 UPTIDL: 700 I0: SV(1)PS(0) I1 * SV(I)LN WN(I)1:WNWN1: 830 4 CR(I)0 PLI: 1100 >I1I  ";  WN(1) 5);"WINNER";:  WN(0) 30);"WINNER";Z  "WANT TO PLAY AGAIN";T$u  (T$,1)"Y" 985 WN0:WN(0)0:WN(1)0:RJ1: 1  "THANKS FOR PLAYING."   CRT995PLCO,PS(PL): 1020  PP(PL) ";  2922PL);9 SCRSEC(PL):MNRMIN(PL): 1500\ SCSC1: SC59 MNMN1:SC0 RSEC(PL)SC:RMIN(PL)MN:RN(PL)TI60   "CURSOR #2 - RACE"   "WANT DIRECTIONS? N";T$  (T$,1)"Y"  ME FOR EITHER ONE OR TWO"/j"PLAYERS. YOU CAN SELECT THE NUMBER OF"Zt"'PYLONS' WHICH APPEAR ON THE TRACK,"~"AND ALSO PICK YOUR SPEED (TRY 100.)""THE CARS ARE CONTROLLED BY TWO KEYPADS:""LEFT PLAYER RIGHT PLAYER"OS 'SPACE' WHEN YOU ARE READY..." RJ$: RJ$"" 60160)""/ PYLONS' WHICH APPEAR ON THE TRACK,"~"AND ALSO PICK YOUR SPEED (TRY 100.)""THE CARS ARE CONTROLLED BY TWO KEYPADS:""LEFT PLAYER RIGHT PLAYER":59468,(59468)25312F BOP COPYRIGHT(C) 1978 GLEN FISHERd CURSOR #4 OCTOBER, 1978 BOX 550, GOLETA,CA. 93017262000dRC(9,1),UP(9)nI09:RC(I,0),RC(I,1): Ix7,9,5,12,5,13,7,16,12,1712,21,7,22,5,25,5" 2) READ THEM"!" 3) WATCH THEM"8 " 4) COUNT TO 99"H" 5) QUIT"y"ENTER THE NUMBER OF YOUR CHOICE: ";:60000IN$"1"9000:1000!IN$"2"9000:3500&IN$"3"9000:3000+IN$"4"9000:3700,IN$"5"560-"LT$:T$""1100V" ";3`T$"<"NFNF1:NF0NF9RjT$">"NFNF1:NF9NF0dtT$""4000|~T$(13)RJ11200T$(13)RJ0500RJ1T$" "5001050N0:I301:UP(I)ZER1230:NN10:II((FL1)(1)1)*v:RCRT40RC: (R)BL 620:: R,PY: IX PL0 NH1: 1000: PLn NH1 SV(1)BL C$: C$"" 1300 TIUP 700KR0: I0 NH1PLI: TIRN(PL) 1150 PP(I),SV(I):PP(I)PP(I)PC(I)" THE NUMBER ON MY FINGERS IS";N;"."* I12000:I4 5500> 1000h l"THAT ISN'T EVEN A NUMBER!": 1510{ T((1)1024) NF09 UP1T:T(T2) UP(NF)UP4000 NF 2000 I11000:I 7000 NUMNM:NM05H SV(I)LN WN(I)1:WNWN1: 8604 R CR(I)0 PLI: 1100E \ WN0 700Y  I1 100: I{  "";  WN1 "";  " WE HAVE ";  WN1 "A WINNER";: 955  "SOME WINNERS";  " ": ",SV(PL) PP(PL)CRT800FLPLSO? RMIN(PL)0:RSEC(PL)0: 1150:RN(PL)1E37d SV(PL)(PP(PL)): PP(PL),PS(PL)| CR(PL)0:PC(PL)0:  "ѠBUG ": LSVSV(PL): 1010 VPLPL1: PL0 ` SVPS(PL) 1100 j 1110 ~ " 60000 J1 9 I0 NH1A(: (M$(I),J,1)C$ PC(I)C(J):RN(I)0:I2 IQ< JWFr TM$(MN);":";TM$(SC);x@ MN10 " ";J ((MN),2,2);":";T SC10 "0";^ ((SC),2,2);h`"RACE IS A GA" W ......UP...... 8(" X DOWN 2J" A ....LEFT...... 4l" D RIGHT 6" S ....STOP...... 5""WHEN YOU CRASH, YOU START OVER!"(AND YOUR TIME STARTS OVER.)"PRES00 6000 NF09" UP(NF)F(NF)4000* NFW "";(RT$,CN(NM9));(DN$,RN);NUM;" "b  3000 NUM((1)100):NMNUM:6000 NF09 UP(NF)F(NF)4000 NF 7000:NM0500 NMNUM"RIGHT!";:3580 "NO.,26,7,29PT$""NRT$""rDN$""ZER1:RN(RC(4,0)RC(5,0))21:CN(RC(4,1)RC(5,1))2CR$(13)"";"DO YOU WANT TO:"" 1) SET UP FINGERS" THANK'S FOR PLAYING.":@0"PLEASE TYPE '1', '2', '3', '4', OR '5'.I:510cNUM((1)99)1:RJ0"SET UP THE NUMBER";NUM;"."NF09:UP(NF)04000NF:NF0"";(RT$,1RC(NF,1));(DN$,1RC(NF,0));$(PT$,1NF,1);"";  01270 II01 :UP(I)ZER1900& I? NN50(UP(4)ZER)J I69_ :UP(I)ZER1310m :NN1:I| I91350 (II9 2:UP(I)ZER1900 <I FNN5(UP(5)ZER) PNNUM"RIGHT!";:1500 Z"NO.";:1500  ";UP(8)1UP(8)  "";- UP(9) " ";: 5093N "";(" ",1UP(8),1);\ "";nUP(9)1UP(9)t| ""; II1 3: " " II "";:p 500"NUMBER? ";:60000 IN$""NM1:IN$""7300.I1(IN$)^:T$(IN$,I,1):T$"0"T$"9"T$"-"7160T$".""NO FRACTIONS, PLEASE.":73107300INM(IN$) NM0"TOO SMALL.": 7310NM99 " ;d# "";n# " ߥ ";6x# " ";T# "   ";q# II0 9:UP(II)1: IIw#`IN$" ":ZTTI:ZC2:ZD$(20)jZ$: Z$""60070tZTTI(" ",ZC,1);"";:ZC3ZC: 0(ZL1)):Z2ZL:Z$;:Z:6000060010*(PN0PK(59468):59468,PK14:60250F2"PRESS RETURN TO ";c' ϠϠ,p"P '<' ϠϠ.?z"TϠŠ, ŠŠ'RVS' .h"AҠՠŠ'' Š," RETURN ϠҠҠ"TŠŠ̠ӠΠӠ."YzI09:F(I)ZER:IT(NM5):NNM5T:NMT2N0I6 5N:F(I)1F(I): INT(NM2):NNM2T:NMTaNF(5)1F(5)}T(NM5):NNM5T:NMTN0I34N1:F(I)1F(I):IT(NM2):NNM2T:NMTNF(4)1F(4)X5TOO BIG.": 7310 "THAT'S NOT A NUMBER."!I11000:I+7000H(#"";e2#"";<#"  ";F# " ";P# "   ";Z# ""ZTTI15~60010Z(Z$):ZL(IN$):(Z127)32" ";:60110JFL(Z127)64(Z127)91Z$((Z128)255)\ZL25460010wIN$IN$Z$:Z$;ZD$;Z$;Z13IN$(IN$,2):CR$;:Z20ZL1IN$(IN$,ZL1):"";:60010Z141Z$(2;" (C) 1978 P";PN;""n0"BOP - CURSOR #4 (C) 1978"A:"A GAME THAT TEACHES CHISANBOP"jD"DO YOU WANT DIRECTIONS? ";:60000}NIN$"Y"100XLP3:NM$"4":PG$"BOP":60200l"TӠŠӠŠKΠv" ŠȠ10 "YҠLEFT  ӠȠ50)*"PӠҠ ԠQ4"Ϡ'Š'. FҠ,u>" ŠҠ6,ӠҠH"Ԡ Ġ ΠŠ.R60200\"TϠԠŠӠΠ00:I NUM  5003 "";(RT$,1RC(NF,1));(DN$,1RC(NF,0));o NF15000,5010,5020,5030,5040,5050,5060,5070,5080,5090{ "";: ""; UP(0)" ";:5003 "";(" ",1UP(1),1); ""; UP(0)1UP(0) );(" ",1UP(3)2UP(4),1);"";(UP(2)1UP(2).:"";tUP(3)" ";("",1(UP(2)UP(4)),1);"";:5033"";(" ",1UP(2)2UP(4),1);"";"";UP(3)1UP(3)"";UP(4)(7),1); "";UP(5)1UP(5)! "";^ UP(6) " ";("̥",1(UP(5) UP(7)),1);: 5063 "";("̤ ",1UP(5)2UP(7),1); "";UP(6)1UP(6) ""; UP(7) "  ";("̥",NΠӠϠˠϠŠΠ "٠ǠR.60200$ԠQ4"Ϡ'Š'. FҠ,u>" ŠҠ6,ӠҠH"Ԡ Ġ ΠŠ.R60200\"TϠԠŠӠΠ :59468,14> HANGMAN COPYRIGHT (C) 1978 GLEN FISHER] CURSOR #5, NOVEMBER 1978~ BOX 550, GOLETA, CA. 93017:ZPG$"HMAN":62000dCR$(13)WC0T$:T$""WCWC1:1010"H ٠ ӠĠI  CLN:BL$(" ",2(LN 1)) WR0:B"";14);"";BL$;" Wī"^IND(39LN3)2:IND);jI1LN"?ݝ";I:" 0 : " " L: ABCDEFGHIJKLMNOPQRSTUVWXYZ"" U:" "  "";:30608 "";L$;"";:MM1:LCLC1A I:O M03100{ WRWR1:"";((WR),2);WR9);L$ "";9(L$)64);" ";L$& LC050000 WRLIM3000: "Y' !";BL$;" T W "LOUDSPEAKER,QUIESCENT,QUININE,KIDNEY,DIRTYa DuSYNTHESIZER,PERSONAL,COMPUTER,GUM,SIN,FOR,CRY,LUG,BYE,FLY,UGLY NuEACH,FROM,WITH,WORK,TALK,SELF,PIZZA,THING,FEIGN,FIEND,ELBOW,FAULT XuBUDGET,SPIRIT,QUAINT,MAIDEN,ESCORT,PICKAX,EXAMPLE,TENSION,REPLICA3N,CITE,CONCEDE,CONCURJ uCONSCIENTIOUS,CRYSTALLIZE,EXAGGERATION,EXHAUST,EXHIBIT,FACSIMILE uFLEXIBLE,FLUORESCENT,GRIPPE,HARDWARE,SOFTWARE,FIRMWARE,INCANDESCENT uITINERARY,LINOLEUM,LIGATURE,MANUSCRIPT,MEDIOCRE,MISCELLANEOUS uNUCLEUS,OBSOLESCE:ZD$(20) jZ$: Z$""60070<tZTTI(" ",ZC,1);"";:ZC3ZC:ZTTI15G~60010wZ(Z$):ZL(IN$):(Z127)32" ";:60110FL(Z127)64(Z127)91Z$((Z128)255)ZL25460010IN$IN$Z$:Z$;ZD$;Z$;Z13IN$(IN$,"";:1003dPNPN1:"";PG$;" - C #";NM$;" (C) 1978 P";PN;""9nT0NM$"5":LP1:CR$(13):"CURSOR #5 - HMAN CԠ(C) 1978?"A ĠǠD"WԠ? ";:60000I(IN$,1)"Y"62030K"": ӠӠ"٠ӠӠŠŠD"ΠŠ. IԠӠˠƠo"ӠՠŠ, ĠӠ"ŠԠӠ."AԠ٠, ՠΠŠΠ"ŠĠƠՠˠՠiנ."IƠՠԠϠנԠŠĠ,,"ԠӠRETURN.E"HŠ!":60200 |v"ՠŠϠŠ. IƠ{"Š, ԠӠRETURN,|"ĠŠ'ԠŠ!"TŠ͠Π:59468,14:PK12H BJACK COPYRIGHT (C) 1979 JOHN MELISSA, JR.g CURSOR #6, JANUARY, 1979 BOX 550, GOLETA, CA. 93017:PCR$(13)ZPG$"BJACK":NM$"6":62000dX(13),Y(13),D(52),B$(5),A$(14)nI15:B$(I):I s""": "? ";/60000:IN$""LIM1E2:1500cI1(IN$):T$(IN$,I,1):T$"0"T$"9"1060"N ";T$;"', .":1020$I.LIM(IN$)8LIM1"N٠ΠŠTHAT !":1020T((1)WC)1::I1 T:W$:ILN(W$):L G: ";? (" ",(L$)1)a " G: ";:60000:L$IN$s (L$)14000 IN$""4010 L$"A"L$"Z"3000 (327688409(L$)64)32 3000 M0:"";IND); I1LN (W$,I,1)L$D 4010 W$L$3000 "";IND);-  I1 LN[ : "";(W$,I,1);"";b I "A? "; 60000:IN$(IN$,1) IN$"Y"IN$""1500  '1500 ': ' 0u :uMATRIMONIAL,MAGISTRATE, buSLEEPER,TRIANGLE,KANGAROO,MAHOGANY,SERGEANT,SEQUENCE,MOUSTACHEx luDANGEROUS,SCIENTIST,DIFFERENT,ERRONEOUSLY,ABSENCE,ACCRUAL,ALTER vuADVANTAGEOUS,ANALYSIS,ANXIOUS,APOLOGIZE,APOSTROPHE,ASCERTAIN uBELIEVE,BOOKKEEPING,BANKRUPTCY,CALENDAR,CAMPAIGNT,OVERWHELM,OXIDIZE,PAMPHLET,PARENTHESES[ uIMPERTINENT,PRELIMINARY,PRIVILEGE,QUESTIONNAIRE,RECTIFY,STATUTE uSURMISE,TECHNICAL,TESTIMONIAL,UNPARALLELED,VENDOR,VENTILATOR uVISIBLE,WATERMARK,WHARF,YARDSTICK,ZEALOUS X"" `IN$" ":ZTTI:ZC22):CR$;:Z20ZL1IN$(IN$,ZL1):"";:60010RZ141Z$(20(ZL1)):Z2ZL:Z$;:Z:60000]60010n(PN0602502"PRESS RETURN TO ";MC1H1000TX(7)C1`Y(7)C2qC110C110zNC11000&X(2)C10Y(2)C21C110C1103MMC151000:X(8)C1?Y(8)C2@C110C110ANNC1" N21N0MN5700(MN5800E" STAND-OFF"k"CHIP BALANCE REMAINS AT $";B1;uC 200DB1B1BX"YOU WIN, CHIP BALANCE IS $";B1l200B1B1B"YOU LOSE, CHIP BALANCE IS $";B1 11 X(7)18000$ N11N1130002 I90810o %"INSURANCE LOSES $";B2:B1B1B2w *J2 /M11M115500 1M8M127000 4M205000 >M11M115000 H"" R"DO YOU WANT (#""/-#"YOU ARE BROKE. "^.#" "2#"WOULD YOU LIKE TO PLAY AGAIN? ";<#R$:R$""9020F#R$"":R$"Y"9100K#:PRINT"BET ";BM#B0:P#100ݝݝ˝ʝݝݝݝݝ";2 HA$(X(J));"";E MX(J)10"";T RB$(Y(J));n f"";B$(Y(J));""; k(A$(X(J)))1""; pA$(X(J));""; F10  M2M M11M12M2M10 "="; (20)jZ$:Z$""60070(tZTTI(" ",ZC,1);"";:ZC3ZC:ZTTI153~60010cZ(Z$):ZL(IN$):(Z127)32" ";:60110FL(Z127)64(Z127)91Z$((Z128)255)ZL25460010IN$IN$Z$:Z$;ZD$;Z$;Z13IN$(IN$,2):CRHAS 21 -- COVERED BY INSURANCE" : 200" JJ10 J66000: 1000K C110C110Z C11M11e MMC1} ""; PJ X(J)C1 Y(J)C2 2000 0 "" J8:P2:F21 2000 M215400 JJ %%BL$:"";%CR$"":PR$;:60000:IN$"""";IN:9640>%:Z1(IN$):Z$(IN$,Z,1)V%Z$"0"Z$"9"9650g%Z:IN(IN$)w%CR$(13):%"NO ";Z$;"'S PLEASE."%Z12000:Z%"";BL$:"";%9600`IN$" ":ZTTI:ZC2:ZD$"";15);"ENTER BET FOR NEXT HAND.";CPR$"BET? ":INB:9600:BINS"BET ";BcB.259100rBB1300"YOU ONLY HAVE"B1:"GET MORE CHIPS!"":100,6F10:F20@J152JD(J)1TJX(13)14Y(13B1B 6"CHIP BALANCE IS $"B1;{200|%""1J8:P2;2000KB1B1B1.5i""" BLACKJACK!!""CHIP BALANCE IS $";B1;200M12M11MM10N12N11NN10"D""I"DEALER"N$XJ7:P1.]2000;bJ13:P2Eg2000Y""g""u"PLAYER"J1:P1:2000J2:P2:2000M10X(1)1X(2)1M11N102200:F11X(7)1X(8)1N11I90:F200p"SIX CARDS LESS THAN 21 IS A WINNER!"!B1B1B*200HX""jb"DO YOU WANT TO DOUBLE? ";|l9400:YN0BB2"BET ";B40005000@"";15);"INSURANCE? ";J9400:YNI91TA HIT? "; \YN1:95001 fYN4000:820; p5000D z840N 9000a C((1)521)s D(C)11000~ D(C)0 C1(C4) C2CC14 C1C11 C21C2C24:C1C11 K  P77); ""; " :59468,14:PK12D REVERS! COPYRIGHT (C) 1979 GLEN FISHERa CURSOR #8, MARCH, 1979 BOX 550, GOLETA, CA. 93017:ZPG$"REVERS!":NM$"8":62000dBD(9,9):WH1:BL2:MT0nRC(7),CC(7)xI07:RC(I),CC(I):I -1,-1, $;: Z20ZL1IN$(IN$,ZL1):"";:60010>Z141Z$(20(ZL1)):Z2ZL:Z$;:Z:60000I60010Y(PN060250u2"P RETURN ";"DOUBLE: YՠŠҠԠĠԠ_H" Ġ.R"INSURANCE: CӠƠҠԠ \" ϠϠŠƠҠӠ.f 60200 'BET? " WCWCCH:BCBCCH+ 6);WC;" ";31);BC;" "= CH0SKSK1M CH0SK0W MM1j WCBC642500y  SK22500  WC0BC02500 ` RLRLR1LRR1 j RHRHR8HRR1 ~ CLCLC1LCC1 CHCHC8HCC1 20 R) R1R8 R8R1 C1C8# C8C14 39900:3100V SC$;"";:38000:39900:3100l H BD(R,C)MT3120 R 38200:CH039900:" ";:BD(R,C)MT:3120 \ CH0:RM0:CM0:MC1:O0 RLRHR CLCHC BD(R,C)MT (PV$,T,1)""(PS$,T,1) & RV1:TM0E 0 TITM(PR$,RV,2);"";:RV4RV:TMTI30Y : T$:T$""3120l D (PR$,2);""; N T$"1"T$"9"3200 X T$(13)3400 b T$(141)CH0: l 3120 DRDC((T$)):DR03120 RRRC(DR):CCCC(D 3610 39900:SC$;  38000( CH0CHCHVL%(R1,C1)M CHMCOO1:(1)1ORMR:CMChCHMCRMR:CMC:MCCHs" ";zC$RMC0RRM:CCM:38200<pCH0:D07zRCRC(D):CCCC(D)39000:N0CHCHND -1,0,-1,1,0,1!1,1,1,0,1,-1,0,-1=DC(9):I19:DC(I):IU6,5,4,7,-1,3,0,1,2mPS$" ":PV$" "{CR$(13)VL%(7,7),V(4)V(1)2:V(2)3:V(3)1:V(4)4I07:VV((3.5I).5)2J07:VL%(I,J)VL%(I,J)V:JJ07:V 00dPNPN1:"";PG$;" - C #";NM$;" () 1979 P";PN;""$n]0"";PG$;" - C #";NM$;" () C 1979":"L V-ŠB"D"W ? ";:60000N(IN$,1)"Y""";:59468,PK:XLP1:60200 "START WITH (1) OR (2) ?"9lS$;S$;T$;S$;""]qS$;S$;"";S$;"";v60000:IN$""N((1)2)1:700IN$"1"IN$"2"N(IN$):700"PLEASE ANSWER '1' OR '2'.":605I18:J18:BD(I,J)0:J,I BD( '. W " , 8"ƠՠԠϠDOUBLE Ϡ_"INSURANCE. TŠӠ̠"ĠΠˠΠŒ." Yՠ٠ԠԠŠΠ  "ΠӠ ϠDOUBLE 1):T2100 30);"MOVE"- PLBL:PL$"":SC$"ђ"F NP13500,3500,3000X CH0BCBC1b 2200r 45);"MOVE" 9PLWH:PL$"":SC$"ג" >NP13500,3000,3000 HCH0WCWC1 "":5);:(M1)030);:CHCH " ! 839900:BD(R,C)PL:PL$;"";BCH0:D073LRCRC(D):CCCC(D)RV39000:39100:N0CHCHN``39900:Dfj39900:BD(R,C)PL:PL$;"";D07RCRC(D):CCCC(D)NOE(D):39400ĕ39900:DΕXR0R:C0C: COUNT 00 "THE GAME IS OVER."5 WCBC"IT WAS A TIE GAME.":2600Z "":4);:BCWC29);h "WINNER" ( "WANT TO PLAY AGAIN? ";:60000 2 IN$(IN$,1):IN$"N"600 < R1:C1:39900 RV1:TM0  T(BD(R,C))1:PR$""! 59467,0䘂I:RR0:CC0::ܛ"":曙("",2RR);u("",10CC);{PÙ"":TB11ZÙTB);""dT$"ݠݠݠݠݠݠݠݠ":TB);T$nÁI17:TB);"! :59468,14:PK14F MAZE COPYRIGHT (C) 1979 HOWARD ARRINGTONc CURSOR #8, MARCH, 1979 BOX 550, GOLETA, CA. 93017:ZPG$"MAZE":NM$"8":62000d800:QQ800:810n:800:Q1800:Q232968:GP$" "#SS50:A%(SS)! 91Z$((Z128)255)ZL25460010#IN$IN$Z$:Z$;ZD$;Z$;BZ13IN$(IN$,2):CR$;:nZ20ZL1IN$(IN$,ZL1):"";:60010Z141Z$(20(ZL1)):Z2ZL:Z$;:Z:6000060010(PN0602502"P RETURN ";ZPNLP59468,PK::"";:100dPNPN1:"";PG$;" - C #";NM$;" () 1979 P";PN;""n0"";PG$;" - C #8 C () 1979"D"W ? ";:60000! "1S1((1)Q1):E10:P91:J%1]"PӠ٠ ϠР."tJQQQ11:J,0:LS:S1L:A%(1)L:LQ,E:LQ2,PbM((1)4)1:F1lLSD(M):L0LLQ1rLQ1LLQ1vP(LQ2):P32(P32D%(! 7 8 9" Š . W \/?" ҠӠ 456l", RETURN. I /\" , ŠҠ - 1 2 3", ՠ̠ " . I!(SQ):A%(J%)0:J%J%1:610, J%SSJ%J%1:A%(J%)L2 Z "";BL$:"N ..."t TR0:W0:W10:I125 L((1)Q1):(LQ)125010 A%(I)L:LQ2,164:L((1)10000)1:TRTRL:A%(I25)L "H";TR;14);GP$:I"I128:F32I58(E12) iE12II, lJQ2,C(E)I:JG vI125:A%(I)17070n TQ2A%(I):F(T):F32F36T,36 F32F36T,164 I TI$T$ T$TI$:" T ";(T$,2);":";(T$,3,2);":";(T$,2); " " "";" TR0"YՠĠ ŠΠ!"6WWI:"W";W;14);GP$SI1500:(525)08160ZIh"";BL$nwPYN1ZSW1:TM0dáT$:T$""50100nËTITM("? ",SW,1);"";:SW3SW:TMTI30xÉ50020ËT$"Y"YN1:5" Ġ "̠ŠΠŠŠ(ĠŠ)7". H, ǠΠ, `"̠ŠҠĠ ", ĠԠ Ƞנ."TŠŠ̠ŠĠ - "-Œ, " #";NM$;" () 1979 P";PN;""nC0"";PG$;" - C #8 C () 1979"e:"F "D"WԠ? ";:YN0:50010NYN0"";::59468,PK:100\LP3:60200f"T ԠƠӠŠӠϠ" :59468,14:PK14@ PGM COPYRIGHT (C) 1979 GLEN FISHER] CURSOR #9, APRIL, 1979~ BOX 550, GOLETA, CA. 93017:ZPG$"FLIP":NM$"9": 62000d"Nנ..."i L,Hn IL H: X: I,Xx I"FLIP Ӡנ" ) ՠ,$"ӠRETURN ϠР.Q"(SӠ PET ̠ ٠{"ΠŠŠӠ .)"WΠŠŠӠ, ŠP"ӠŠҠƠĠӠ"Ӡ",201,153,240,16,201,152,240V 12,201,133,240,8,201,132,240,4,201,131,208,40,200,177,86 240,63,201,58,240,212,201,34,208,243,200,177,86,240,50,201$ 34,240,234,170,41,127,201,64,144,240,201,91,176,236,138,73. 128,145,86,208,229,200,177," $"TŠŠ̠, Ġՠ̠5."ƠԠŠԠƠ .e8"Y ΠŠ٠ǠŠ8, 4, 8B"6, 2 . 8 Ӡ, 4 , L"6 , 2 Ӡ. W- 46V"Ҡՠ#0010,Z(Z$):ZL(IN$):(Z127)32" ";:60110\FL(Z127)64(Z127)91Z$((Z128)255)nZL25460010IN$IN$Z$:Z$;ZD$;Z$;Z13IN$(IN$,2):CR$;:Z20ZL1IN$(IN$,ZL1):"";:60010 Z141Z$(20(ZL1)):Z2"BL$:"W ? "; *50000# 4YN15005 HQQQ1:810:A R""G \a @I125:A%(I)L8100j TI: A%(I)1:IA%(I25):TRTRI W1W11:"TREASURE #";W1 "F ";I;14);GP$ TR0"H";TR;" ";14);GP$""IƠՠĠ̠Š,ՠ̠0"Ġ. Yՠ̠ŠŠϠZ"ǠŠ, . AԠ", ՠΠРǠ٠-"ǠRETURN. IƠՠҠƠ" ̠Š, ?,"0150ËT$"N"YN0:50150ËT$(13)500306Ù("NO YES",13YN,3):F(PN060250b2"P RETURN "; 2"P RETURN ";[ "ĠŠҠӠ, H"ҠŠŠ͠ R". \#U ROLL AN 8, YOU CAN$"REMOVE 5 AND 3, OR 2 AND 6, OR JUST ANR "8, OR 1, 2, AND 5, OR ANY OTHER SET OFs"NUMBERS THAT ADD UP TO 8. "THE ONLY RESTRICTIONS ARE THAT YOU CAN'T*"REMOVE THE SAME NUMBER TWICE, AND THAT4"YOU CAN# 30972Y@JY,P(Y):JX,32!JI143TP(I)60370:^IKhP(5)32530Tr180r6);"ILLEGAL MOVE":190MM1:MMXMXM11)"TRY AGAIN? ";60000(IN$,1)"N"1000:150600K015:""12)"!!!CONGRATULATIA z"ROLL. WHEN YOU GET A ROLL IN WHICH YOU<"CAN'T REMOVE ANYTHING, YOU CAN COUNT ITj"AS ONE OF YOUR EXTRA ROLLS, INSTEAD OF"ENDING THE GAME.60200( THAT YOU CAN'T*"REMOVE THE SAME NUMBER TWICE, AND THAT4"YOU CAN#IN$"""";:200/(IN$)32IN$(IN$,2):201<X(IN$)IX0470X1X9"TYPE A NUMBER FROM 1 TO 9, PLEASE.":190(XY)2450P(X)32450P(X)62XY450P(X)60XY450P(Y)P(X):P(X)32"JX330972X:JY3K#";PG$;" - C #";NM$;" C () 1979"E :"S "g D"WԠ?";:60000 N(IN$,1)"Y" 62100 X"";:59468,PK::100 LP2:60200 "FLIP ӠҠĠҠ "ΠPRINT, INPUT, ĠD#$;" - CURSOR #";NM$;" (C) 1979 PAGE";PN:60300n8Z110:"";:Z:[0"":9)"CURSOR #11 WIPEOUT:" COPYRIGHT (C) 1979 BY SHEILA DOLGOWICHD60300N"ELIMINATE NUMBERS BY THROWING DICEX"WANT INSTRUCTIONS? ";:60000#"Ӡ-Š. TH "ĠŠ͠ՠԠϠ, a " SYS(826) "TŠ̠͠ΠŠ, "ՠ٠ϠҠՠŠ . 60200 ""IƠՠϠNOT ԠDATA #REMOVED ACCORDING TO THE THROW OF1"THE DICE. AFTER EACH THROW, YOU CAN_"REMOVE ANY COMBINATION OF NUMBERS THAT"ADD UP TO WHAT'S ON THE DICE. (IF YOU"CAN'T REMOVE ANYTHING, JUST HIT RETURN.)60200"FOR EXAMPLE, IF YO 60200Ӡ-Š. TH "ĠŠ͠ՠԠϠ, a " SYS(826) "TŠ̠͠ΠŠ, "ՠ٠ϠҠՠŠ . 60200 ""IƠՠϠNOT ԠDATA #'T REMOVE MORE THAN FIVE NUMBERS&>"ON ANY GIVEN ROLL OF THE DICE.1H60200_R"THE GAME IS OVER EITHER WHEN YOU REMOVE\"ALL TWELVE NUMBERS, OR WHEN YOU CAN'Tf"REMOVE ANY NUMBERS ON A ROLL.p"IF YOU ROLL DOUBLES, YOU GET AN EXTR#iBB$" "]n"WANT TO SEE HOW TO SOLVE THE PUZZLE? ";hx60000x"";:1000(IN$,1)"Y"1200M0:X5"";BB$MM1:DL0:"MOVE #"M:YX800:700:DL10006);"FROM? ";:60000