' +JJJJ ?\>m0M='+l> /+l   d]@ŵLҦ]]LF L}BBL] X  ` 鷎귭෍ᷩ췩緈JJJJx Lȿ L8ᷭ緍췩 緍i 8 `巬 췌`x (`(8`I`B` ``>J>J>VU)?`8'x0|&HhHh VY)'&Y)xꪽ)' `Hh`V0^*^*>&` aI꽌ɪVɭ&Y&&Y& 꽌ɪ\8`&&꽌ɪɖ'*&%&,E'зЮ꽌ɪФ`+*xS&x'8*3Ixix&& 8  '  & x)*++`FG8`0($ p,&"ųųೳŪŪųųij  !"#$%&'()*+,-./0123456789:;<=>?  , = #""*( (9"1 ( ,.(0# 2 /#0/#0 *?'#07#00/0/'#07#0:"4<*55/**5/*%5/)1/)1/)1/)'#0/#0*5/*75/**5/*:5//#0/#0'#07#0:::*::'#07#0!!+'2+4:'/+'2+4'??4)E81B $! h h Լ ռ ռ ռ`HJ>݌h Hh݌`IHɭ ɭ R`ӤL߼IHHHHhHH݌hHhHh݌H6 VDP (ED Z $0x8x D- ܸDD# H8`?E Vk *f???0xE Hh D#-EEE8` D ܸx D - ܸx8`-0ݩ?ʥD EEE`   LDcpq` [` ~  LɜK JI8h hLߍ ԧ᜙߼IHͺ9ٜ췈뷠詷 뷍ߜLJ` H`ߜߜ8)H`H`H` L` R\/ӛu`".Q`pNФbptťܥm2<(-Py0\|e<6e<g< JJJJj귍hI  aUL@ kU8  L  Q^R(jQ0l^l\  wUuW ԧ H h@ [_ /QSIRb_L`LLLL`ª`LQLYLeLXLeLee ўQH\(h0L& Ꝥ$`( R \ZLl8 ўR HH\`\Z[YS6`LxQɿu3'RͲʎRʎ]]]ɍuL͟ɍ}RLRɍg^H8 ^hZLɍR LͲɊRR% QLܤͲ Z@ -^ ş\[Z QY\[Z8`l6Lş_Ȍb_Ͳ] )Y h( ֭ͲLɍ [LLĦ__ ^ 9 LҦ3 9 a   0LjLY u< (_9 ˭ɠuɠK_9 ?LˆʎõĵL õ ĵµ aµ`` L̦µ_bJLuLz`  ȟ QlXJ̥KlV  ȟ QlV eօ3L e3L &RL &QL d L4 Ne)n `@-eff L f`L . tQLѤ LҦL` OPu d L Ne)noon 8ɍ` ^f\õL ^NR  RΩLҦ)\Z ʽ LHv 3h`0h8` [L NС õ`A@` ŵL^Lõ`  \ 濭0 \  ȟ Q ^\lZl^?cqH şch`fhjõĵ@OAP`u@`@&`QR`E Ls  @DAE@u`8` %@ @A@`@`@A`Mµ ) LЦ`8@AWc@8@-@HAȑ@hHȑ@ȑ@hHȑ@Ȋ@ch8&ȑ@Hȑ@Ah@LHȑ@ȑ@ htphso`hMhL`9V8U897T6S67`INILOASAVRUCHAIDELETLOCUNLOCCLOSREAEXEWRITPOSITIOOPEAPPENRENAMCATALOMONOMOPRINMAXFILEFINBSAVBLOABRUVERIF!pppp p p p p`" t""#x"p0p@p@@@p@!y q q p@  LANGUAGE NOT AVAILABLRANGE ERROWRITE PROTECTEEND OF DATFILE NOT FOUNVOLUME MISMATCI/O ERRODISK FULFILE LOCKESYNTAX ERRONO BUFFERS AVAILABLFILE TYPE MISMATCPROGRAM TOO LARGNOT DIRECT COMMANč$3>L[dmx- ( L Ϡ@跻~!Wo*9~~~~ɬƬ~_ j ʪHɪH`Lc (L ܫ㵮赎 ɱ^_ J QL_Ls贩紎 DǴҵԵƴѵӵµȴ 7 ַ :ŵƴѵǴҵȴµ納贍﵎ٵ്ᵭⳍڵL^ѵ-I `  4 ò-յ!  8صٵ紭ﵝ 7L (0+BC  7L HH`LgL{0 HH` õL H hBL BH [ h`Lo õ ڬL B ڬ LʬH hB@ յյ [L (ȴ) ȴ 7L L ( L (ȴL{ƴѵ洩ƴǴҵ 7 ^* B0 HȱBh ӵԵ 8 L8 ݲ` ܫ  / / ED B / / ]ƴS0Jȴ ȴ)  紅D贅E B ƴ  / 0L Ν `HD٤DEEhiHLGh ` ŵBѵ-` ѵB-` ܫ XI볩쳢8 DH ᜢ E𳈈췍Ȍ X0 · JLǵBȵC`,յp` 䯩 R-յյ`յ0` K R-յյ`ɵʵӵԵ` 4 K ( ѵҵLBȱBL8` DBHBH : ַ޵BȭߵBhhӵԵ RBܵmڵ޵ȱBݵm۵ߵ` 䯩LR˵̵ֵ׵`êĪLR E( 8` R` ELRŪƪ`췌 յյI뷭鷭귭ⵍ㵍跬ª 뷰` Lf ݵܵߵ޵ ^`8ܵ i B8` 4L ֵȱB׵ ܯ䵍൭嵍 ` DȑB׵Bֵ  ַ յյ`굎뵎쵬 뵎쵌``õĵBCõĵ`µµ`L õBĵCصص Qƴ0"Bƴ 󮜳` 0۰ϬBƴ8`i#`ЗLw!0>ﵭ` m ﳐ 7i볍 8 ЉLw`H h ݲL~ `浍국䵍뵩嵠Jm赍嵊mjnnn浈ۭm浍浭m䵍䵩m嵍`"L ŵ8ŵH ~(`w  d ֠z#???u`0,0,4 , 0,15.25,4$ 6X,Y,Z:70/ @I19? JX,Y,Z:100F TIU ^X,Y,Z:70` hI13p rX,Y,Z:100w |I T0470 X.875 I1182 Y14.625:Z4:70 Y15.25:100 Z2.5:100 XX.75 I   1,1,1,14.3,7.5:S2(PH):C2(PH) :30 17.75,15.25,2H 17.75,15.25,1.25 Y 15,15.25,0i 0,15.25,0y 0,15.25,4 8.75,15.25,4 17.75,15.25,2 17.75,0,2 17.75,0,1.25  17.75,15.25,1.25  17.75,0,2  8.75,0,4 "   130XEXS1YC19YEXC1C2YS1C2ZS2Z(ZEXS2C1YS2S1ZC2RHOl2SXDXEZECX<SYCYDYEZE:F20PSX,SYZd20nSX,SYxRHO100:D1100:CX116:CY105THETA.45:S1(TH):C1(TH) PHI1.2  ,2,3,4,5,6,7,8,9,1,4,7,2:J 5,8,3,6,9,1,5,9,3,5,7,0,0,0 L" 7000:# B(K)0A$(K)"X"/7000:EB(I)0A$(I)"X"Q7000:WdbnI,J,KpI07100SB(I)B(J)B(K)S266006510B(J)0A$(J)"X"B(K)0A$(K)"X"B(I)0A$(I)"X"X:4070:4000@ 1)C(0,4):W(J,4)C(1,5):W(J,5)0:W(J,6)00 x:T J03:W(J,0)0VS(1,0)1170 (VS(1,4)SD(1,1,0)W(J,1)SD(2,1,0))9(VS(1,5)SD(1,1,1)W(J,2)SD(2,1,1))5VS(1,0)1:24:1:"INTRUDER DESTROYED";:VS(1,16)0:DCDC1:475E :VS(0,15)(0)C110 I((1)39)1# 0,39I* J7 I1100= E 11o 18,268:18,269:16,2810:16,2811| L1229 14,30L:L 16,2830:16,2831:18,2632:18,2633 15:16,2510:16,2511:16,2533:16,2532 &14,2712:14,2712145:XX10:YY10:IR P259,145259,140262,135264,140264,145:259,140264,140o Z189,140209,140209,130 Xq  :3'279,110279,150159,150T179,150199,130249,130269,110279,110(219,135224,135224,140219,140:219,135219,145: P2229,135234,135:232,135232,145:229,145234,145: I 7X239:Y244<I12 FX,135Y,135X,145Y, 5990A$(7)C$5900'5990E C$,"WINS THIS ROUND":W1KfQp\I19rA$(I)"X"B(I)1A$(I)""B(I)0A$(I)"O"B(I)1I8I,J,KLI06500SB(I)B(J)B(K)S264006200B(J)0A$(J)"X A1100B(A)$C(A).(DCBL2ED5:F(E):J((1)15)V7FFJa<G1FkF"!";rPG{Z" "dAV A " || ||" n" || ||"+ x" ||---||"; " () ()"K " | |"[ " | || |"k " | || |"{ " | || |" "---- -----" "| | | |" "---- ------ " 23:2:"DESTROY A KID" 23:3:"OUR SPECIALTY" 23:4:"TODS""NAME A KID YOU HATE",KID$H"IS IT A BOY OR GIRL?"PS$gS$"BOY"S$"HIM"S$"GIRL"S$"HER" " #####"" #' '#"(" # ^ #"2" # U #<" \ /"F" | |"P" / \"Z" || ||" d    N15,14:20,14:15,16:20,16; ^21,19:27,21:30,21:33,21C h11S r9,29:9,30c |T1100:Tk 13 27,9:25,11:14,11:23,13:14,15:21,15 14,17:21,17:23,20:28,22:31,22:34,22 11:9,29:8,30  I1100:I 13 JFL1240 SX,SY:FL1$ SX,SY- J: I- I8ę2:1:2A,B:AA3:BB3:2A,B:75[ I19ę2:1:2C,D:CC3:DD1:2C,D:75l A140ĉ::} I:1140,96 I:100 2,0,6,0,8,0,4,0,109,229,240,54,14,4,0 J1N 7 TXCYS:YYCXS:XT SXSCXCX:SYCYY / I768782:X:I,X:I-233,3:232,09:0:2\(DT.1:C(DT):S(DT):N6.4DT2CX140:CY96:SC1.16:X50:Y0:FL0<190FX30:Y0:FL0:190PA175:B61:C191:D113Z2A,B:2C,Dd75:I063nI:1140,96 xJ115:J9)50545060$A$(9)C$5900:A$(4)A$(5)5062D5070ZA$(5)A$(6)5064d5070wA$(6)C$5900A$(7)A$(8)50725080A$(8)A$(9)50745080A$(9)C$5900A$(3)A$(5)50825990A$(5)A$(7)5084(4)A$(7)50245030+A$(7)C$5900AA$(1)A$(5)5032K5040aA$(5)A$(9)5034k5040~A$(9)C$5900A$(2)A$(5)50425050A$(5)A$(8)50445050A$(8)C$5900A$(3)A$(6)50525060A$(6)A$(m A1100B(A)$C(A).(DCB?2ED5:F(E)J<G1FTF"!";[PGdZ" "kdA A ACROSS1)" "(A$,ACROSS1):(7)L (A$,ACROSS,1)" "āI110:P(S):IR  S  ::F500(20:"FUEL:";F0A0K"ALIENS DESTROYED:";AS#L3h("LIVES LEFT:";Lo23{<I112FI160,180,200,220,240,260,280,300,320,340,360,380PI10,010,2030,2030,010,040,050,050,2040,2040,0 25,7:23,9:21,11:16,13:19,13:16,15:19,15:O 20,18:26,20:29,20:32,20W 11w 10,26:11,26:10,27:11,27 I12500:I "BLAST OFF" I1100 J3039 "0 ,0,39J 6J @I1500 J13 T15,10:26,8:24,9:22,5:%(ADDR3)ADDRADDR4 I1ADDRADDR48FADDR865ADDR1W16300DP,0cDP1DPl790ADP1DP790A$::DP0 ADDR1-230,32(DP1)4 4?*I16T4SP%(ADDR)0840>SP%(ADDR),SP%(ADDR1)SP%(ADDR2),SP%(ADDR3)HADDRADDR4RI\ADDRADDR24f7pI16zSP%(ADDR)0910 SP%(ADDR),SP%(ADDR1)SP%(ADDR2),SP 5000  S(9(1)1)3A$(S)""4060=4000KA$(S)"X"U2000_5000euZ0C$"O"Z1C$"X"A$(1)A$(2)50125020A$(1)A$(3)50145020A$(3)C$5900A$(1)A$(4)50225030A$WISCONSIN,MADISON( WYOMING,CHEYENNEA VERMONT,MONTPELIER[ FLORIDA,TALLAHASSEEt KENTUCKY,FRANFFORT I CITY  NEW MEXICO,SANTA FE;  NORTH DAKOTA,BISMARCKO  OHIO,COLUMBUSl  OKLAHOMA,OKLAHOMA CITY  OREGON,SALEM p SOUTH DAKOTA,PIERRE z TENNESSE,NASHVILLE  TEXAS,AUSTIN  UTAH,SALT LAKE CITY  WASHINGTON,OLYMPIA ANA,INDIANANAPOLIS(  IOWA,DES MOINES<  KANSAS,TOPEKAX  LOUISIANA,BATON ROUGEo  MICHIGAN,LANSING  MINNESOTA,ST. PAUL  MISSISSIPPI,JACKSON  MISSOURI,JEFFERSON CITY  MONTANA,HELENA  NEBRASKA,LINCOLN  NEVADA,CARSONNA,COLUMBIA! GEORGIA,ATLANTA: ALABAMA,MONTGOMERYN ALASKA,JUNEAUd ARIZONA,PHOENIX  ARKANSAS,LITTLE ROCK  CALIFORNIA,SACRAMENTO  COLORADO,DENVER  HAWAII,HONOLULU  IDAHO,BOISE  ILLINOIS,SPRINGFIELD  INDINCE  CONNECTICUT,HARTFORD4  NEW YORK,ALBANYM  NEW JERSEY,TRENTONk  PENNSYLVANIA,HARRISBURG  DELAWARE,DOVER * MARYLAND,ANNAPOLIS WEST VIRGINIA,CHARELSTON VIRGINIA,RICHMOND NORTH CAROLINA,RALEIGH SOUTH CAROLIl" ";:CAP$# vCAP$B$(K)700@ CAP$"SKIP"ĺB$(K):700I 620P KV \ o A$(50),B$(50){ I150 A$(I),B$(I) I   MAINE,AUGUSTA  NEW HAMPSHIRE,CONCORD  MASSACHUSETTS,BOSTON  RHODE ISLAND,PROVIDEv  1000%"DO YOU WANT:">("1)NAME THE STATES"Y2"2)NAME THE CAPITALS"`<AoFA200,600uPJ150B$(J);" ";:STA$STA$A$(J)ī300STA$"SKIP"ĺA$(J):300220,J6XK150bA$(K)   ::"SCORE: ";SC;20);"SHOTS LEFT: "SHOTS" ";41):k SHOTS1Ģ10:1:"THAT'S THE END OF THIS GAME":: B$"Z"ACROSSACROSS1 B$"M"ACROSSACROSS1 A$(A$,2)(A$,1) 100 SHOTSSHOTS1" (A$,ACROSS,1)" "SCSC57:A$(A$,W(K,6)(VS(0,15)C(0,6))8:VS(0,14)VS(0,14)VS(0,13) dJ03:0:3W(J,1),W(J,2):W(J,0):3W(J,3),W(J,4):W(J,1)W(J,3):W(J,2)W(J,4):W(J,3)W(J,3)W(J,5):W(J,4)W(J,4)W(J,6)( nW(J,3)C(0,3)W(J,3)C(0,4)W(J,4)C(1,3)W(J,4)C(1,4)W(J,0)0:W(J,3  :12 I34391,(0,39I32I:<8ZF11,32:11,33:16,32:16,33oP30,3231:31,30wZ15dI3233n30,32IxI4G12I3031G180,20010,12II:G15,17I:I13/ 16,9: CP)V(I,3)-V(I,1)T1:V(I,2)T2:V(I,3)T3@XT1:YT2:ZT3XEXS1YC1:YEXC1C2YS1C2ZS2:ZEXS2C1YS2S1ZC2RHOSV(I,1)D(XEZE)CX:SV(I,2)D(YEZE)CYIROROI148:SP%(I864)SP%(I):I:"READY ";SP%(AD1)SV(J,2):SP%(ADDR2)SV(K,1):SP%(ADDR3)SV(K,2)I lADDRADDR4P vI[ I14 T1CPCTV(I,1)(STCPSOSP)V(I,2)(SOSTCPSPCO)V(I,3) T2STV(I,1)COCTV(I,2)SOCTV(I,3) T3SPCTV(I,1)(SOCPCOSTSP)V(I,2)(STSOSPCOA,B2 A1,B2 A1,B2& , 3  1<  A,BI  A1,B1V  A1,B1c A2,B2p A2,B2} A1,B1 A1,B1 A2,B2  A2,B2  "TYPE YOUR MOVE: S A$(S)"X"A$(S)"O"3000 A$(S)"O" 2000T S16336*1:1::I123:40):3(SC0@2SHOTS25n<A$"ZAB Y DK SL DF G FD FGGG"|FACROSS15PDOWN19d11:1:A$nDOWN:ACROSS1:" X "xB$" ":B(16384)128:B0B$(B):16368,0B$"F"İ10004 5:1   (VS(0,15)C(0,6))SD(0,0,0)VS(0,6)SD(0,1,0):W(K,3)C(0,3)W(K,3)C(0,4)W(K,3)C(0,4):100 PW(K,4)(VS(0,15)C(0,6))SD(0,0,1)VS(0,7)SD(0,1,0):W(K,4)C(1,3)W(K,4)C(1,4)W(K,3)C(0,4):W(K,4)C(1,4):1006 ZW(K,0)1:W(K,5)(VS(0,15)C(0,6))18:O N5X21000'SXX1(VSN<2X,S,NF<NN2MFXN)WYN(I,3)WZ0570# E1S(I,1). J24< E2S(I,J)G K1Nn E(K,1)E2E(K,2)E1E(K,3)2:550u K E(N,1)E1:E(N,2)E2:E(N,3)1 NN1 &E1E2 0J :I DI16 NE(I,3)0620 XJE(I,1):KE(I,2)9 bSP%(AD)SV(J,1):A$(7)"O"İ2200 ]A20:B333 ^A$(8)"X"İ2300H _A$(8)"O"İ2200V `A33:B33k aA$(9)"X"İ2300 bA$(9)"O"İ2200 c  A2,B A2,B1 A2,B1 A2,B A2,B1 A2,B1 A,B2 A1,B2 A1,B2 A33:B7 OA$(3)"X"İ23002 PA$(3)"O"İ2200? QA7:B20T RA$(4)"X"İ2300i SA$(4)"O"İ2200w TA20:B20 UA$(5)"X"İ2300 VA$(5)"O"İ2200 WA33:B20 XA$(6)"X"İ2300 YA$(6)"O"İ2200 ZA7:B33 [A$(7)"X"İ2300 \ h"THE GAME IS TIED" " + :16 J12B K039N K,13JU K\ Jg J12s K039 *13J,K 4K,J C HA7:B7 IA$(1)"X"İ2300 JA$(1)"O"İ2200 KA20:B7 LA$(2)"X"İ2300 MA$(2)"O"İ2200 N x(1).5130 }160, "YOU GO FIRST"4 Z0= 180R "I'LL GO FIRST"Z Z1 "WHEN READY TO BEGIN TYPE";LQR$;"R";LQR$ C$ C$"R"210 180 2000 ,M19 6Z0İ3000 @Z1İ6000 JZ(1Z) ^W1ī400 cM< LQ$(34) A$(9))B$(3,3,3)/B("TIC TAC TOE"o2"YOU WILL BE O; THE COMPUTER WILL BE X"<"THE POSITIONS ON THE BOARD AR NUMBERED"F"AS FOLLOWS"P"1,2,3"Z"4,5,6"d"7,8,9"n"THE COMPUTER WILL TOSS FOR FIRST"     6):4JVS(J,4)SD(3J,1,0)(1)7,VS(J,5)SD(3J,1,1)(1)9::VS(J,16)VS(J,16).47e #D1180:D (:VS(1,15)(((VS(0,4)SD(0,1,0))(VS(1,4)SD(1,1,0)))2((VS(0,5)SD(0,1,1))(VS(1,5)SD(1,1,1)))2): 2K03:W(K,O)70 <:100] FW(K,3)- 16001000q J01:0:J1VS(J,4),VS(J,5):(VS(J,0)):J1VS(J,6),VS(J,7):VS(J,2)VS(J,2)VS(J,3)VS(J,4)VS(J,6):VS(J,5)VS(J,7):VS(J,6)(VS(J,2))VS(J,9)VS(J,11):VS(J,7)(VS(J,2))VS(J,10)VS(J,12):VS(J,0)140U 0:K0VS(J,1          """  ::1I1526&15,25I-(I;216,2414I<16,2427WF17,2313eP17,2328sZ14,1614d13,1513n12,1412x11,13118,11117,11I),2)# TV3V(S(I,3),3)V(S(I,1),3): ^N(I,1)U2V3V2U3Q hN(I,2)U3V1V3U1h rN(I,3)U1V2V1U2o |I XERHS2C1:YERHS2S1:ZERHC2 N1 I14 E2S(I,1) WXXEV(E2,1) WYYEV(E2,2) WZZEV(E2,3) N(I,1)WXN(I,2,4) I14 J14% S(I,J). J,I: N(4,3)G RO136^ I16:E(I,3)0:Ii I14 "U1V(S(I,2),1)V(S(I,1),1) ,U2V(S(I,2),2)V(S(I,1),2) 6U3V(S(I,2),3)V(S(I,1),3) @V1V(S(I,3),1)V(S(I,1),1) JV2V(S(I,3),2)V(S(I,102R,Y0.5R( X0,Y02RX0R,Y02R= X02R,Y0.5RC Z ,X0,Y0RX0,Y04Rw 6X0,Y04RX0R,Y06.5R @X0,Y04RX0R,Y06.5R JX0,Y02RX0R,Y04R TX0,Y02RX0R,Y04R ^XJ:I P d* nX1X0:Y1Y0R:X1,Y1T xY1Y11:X1X0SN(S(Y1).5):X1,Y1p X1X0SN1SN1:110 X1X0SN1ı 120 X0,Y0RX0,Y04R X0,Y04RX02R,Y06R X0,Y04RX02R,Y06R X0,Y02RX0R,Y02R X#X090:Y030:R10:RRR2:SN1?S(Y1)(RR(Y1Y0)2)n#:(21):(5):"THIS MAN CAN REALLY JUMP!!"(3:P116300:P216299:MX16301:FL163022:100:200<SN1::100:300 FS200:I1100:MX,0:P1,0:J1S:J:FL,0:P2,0:J1S:   (A$,ACROSS1)" "(A$,ACROSS1)P 5:1:"Score: ";SC;" Shots left: "SHOTS" " SHOTS1Ģ10:1:"That's the end of the game": B$"Z"ACROSSACROSS1 B$"M"ACROSSACROSS1 A$(A$,2)(A$,1) 100 S (SC0#2SHOTS15M<A$"ZAB DK SL DF G FD FGG"[FACROSS15gPDOWN19vd11:1:A$nDOWN:ACROSS1:" X "xB$" ":B(16384)128:B0B$(B):16368,0 B$"F"SHOTSSHOTS1:(A$,ACROSS,1)" "SCSC57:A$ $ (((1)2665));" ";" ( $""800>880H9400RB$;", ";NAM$;"!"6\@pB$""RzA(A$)11fB$B$(A$,A,1)mAs~S15SX ";NAM$;", I'M USING MY ";B$;".") 940L "WHAT'S YOUR FAVORITE FOOD ";T A$c A$""710i r 880 A$;"?? YUCK I LOVE ";B$;"." 940 "SORRY ";NAM$;", I'VE GOT TO GO."  "WHAT DO YOU SAY WHEN YOU LEAVE"; *A$4AV(4,3),SV(4,2)! nI14:X,Y,Z@ xV(I,1)X:Y(I,2)Y:V(I,3)Z XEXS1YC1:YEXC1C2YS1C2ZS2:ZEXS2C1YS2S1ZC2RHO SV(I,1)D(XEZE)CX:SV(I,2)D(YEZE)CY I 1,4,2,1 1,2,3,1 1,3,4,1 2,4,3,2 S(4n SP%(912):ADDR1:E(6,3)?RHO15:THETA.5:PHI.9:D400tCX140:CY96:S1(TH):C1(TH):S2(PH):C2(PH)(TN.1:TT.1:CT(TT):ST(TT):SO(TN):CO(TN)2TP.1:SP(TP):CP(TP)< 0,0,3F 1,0,0P -.2,1,0Z -.2,-1,0 d    $ I$"A"TT4:T100T100; &I$"D"TT4:T0T0H 0TFTFN :X N:23o X"LOST IN SPACE!!"u  :22 "LANDED AT VEL ";((VV1)5)10 (VV1)8700 "ALL DEAD": "SAFELY":T:":"THRUST:"; r C. Y(100H)1.3B 140,Y120,Y10\ 120,Y20:160,Y20s 160,Y10:140,Y 155,Y20160,Y25 125,Y20120,Y25  (20A):8  B4);  26B4);  I$" ":(16384)127ľI 220 H0:C3:390# 660) = H100:F100:T0L V5R(10)b G(R(40)40)100h o ,3z 10,155 6X02795 @X,159R(10) J OI130:R(279),R(150) QI T21:34);"G=";G ^21:"FUEL:":"VEL:" h"HEIGH $R(X)((1)X1)-(25062300C<C3:390TFA1:BF:460hPA2:B(V):460yZA3:BH:460dA4:BT:460n530xV1VT20G:FFT10H1H(VV1)10C0:390H10200HH1:VV1H10060 590    ,Y XLC,YLS. XLCHS,YLSHC@ XHS,YHCJ X,YP "LR 150(-3$2"L=";L0<"H=";H<F"X=";XHP"Y=";Y\Z"ALPHA=";ALPHAfx4010n50tzERR(22)ERR5350ERR9150PI3.14195RALPHAALPHAPI180C(RALPHA)S(RALPHA) X  "INPUT A FRACTION"'A$1("__"92B$M<A(A$):B(B$)WFTAB^PAmZ"-- =";TtdBn"PUSH Y TO TRY AGAIN";A$xA$"Y"Ĭ A  I$"A"TT4:T100T1009 &I$"D"TT4:T0T0F 0TFTFL :V N:23m X"LOST IN SPACE!!"s } :22 "LANDED AT VEL ";((VV1)5)10 (VV1)B700 "ALL DEAD": "SAFELY": L THE WAY" &"UP YO 1: ";B$( 0940O :"WHAT IS YOUR BEST FRIENDS NAME";W DA$f NA$""410l Xu b880 l"NEAT! MY BEST FRIEND HERE IS ";B$;"." v940 "WHAT COMPUTER ARE YOU USING"; A$ A$""640  880 "WELL,AT IS YOUR STREET ADRESS ";# A$2 A$""4108 A 880_ "GEE, I LIVE AT ";B$;"."h 940 NAM$;",TYPE IN HOW YOU COUNT TO 9"; A$ A$""480  880 "WELL WE COUNT TO 9 LIKE THIS: 9." "BUT HERES HOW WE COUNT AL BY2,Y4X9 X7,X8Y41 X7,X8Y5B X7,X9Y6` I12:EC:X7,X8Y1Ig Ip EBC} X8,Y3 X dY0Y0 nX39X39) xX0X0A }NYY:NXX:YOY:XOXU FC0:EC0:1000c YNY:XNXj 7p x FC Y1,Y6X Y2,Y5X1 X2,X3Y3 X2,X3Y4 Y2,Y5X4 $Y1,Y6X5 .Y1,Y6X6 8X7,X9Y1 X0:Y0U16336/FC5:EC15:EBC0; :1000FS(U)VI1500:ItB$" ":(16384)127ľB$(B$" "30-OXX:OYY2B$"I"YY1:90<B$"M"YY1:90FB$"J"XX1:90PB$"K"XX1:90U30 ZY39Y39    S01:1)S10İ1000@S10S100İ1500Y(S100S1000İ2000g2S1000Āt<I16336FK1180:KPSOUND(I)(I)(I)(I)ZSS1:15"00";S:"0";S:S:S 4 23:1:"High Score: "HS;20);"Play Again ";:Z$C Z$"Y"60I X SOUND1Ph SSOUND(0)s SOUNDy 2YD30DD:P3:1000) @X:Y1:" "9 JXXC:YYDB T220Q ^TT1:CC` hP70:1000 2:2:"Lives Left: "T" Score "SC" " 19:2:" " T0210 SCHSHSSC:22:1:"New High Score !!":P30:1000:":"THRUST:"; r C- Y(100H)1.3A 140,Y120,Y10[ 120,Y20:160,Y20r 160,Y10:140,Y 155,Y20160,Y25 125,Y20120,Y25  (20A):8  B4);  26B4);  I$"":(16384)127ľI$ 220 H0:C3:390# 660) = H100:F100:T0L V5R(10)b G(R(40)40)100h o ,3z 10,155 6X02795 @X,159R(10) J OI130:R(279),R(150) Q T21:34);"G=";G ^21:"FUEL:":"VEL:" h"HEIGHT $R(X)((1)X1)-(25062300C<C3:390TFA1:BF:460hPA2:B(V):460yZA3:BH:460dA4:BT:460n530xV1VT20G:FFT10H1H(VV1)10C0:390H10200HH1:VV1H10060 590  940+ "WICH COUNTRY DO YOU COME FROM ";3 A$B "A$""270H ,Q 6880v @"REALLY? MY COUNTRY IS ";B$;"." J940 T"WHAT CITY DO YOU LIVE IN "; ^A$ hA$""340 r |880 "INTERESTING...I LIVE IN ";B$;"." 940 "WH *" "####### ====*". " ##### ++++*D " ### ====="M 940u "WELCOME TO THE PLANET SDRAWKCAB!"~ 940 "WHATS YOUR NAME STRANGER "; NAM$ NAM$""190 A$NAM$ 880 "THAT'S FUNNY--MINE IS ";B$;"." /d"ON THE PLANET SDRAWSKCAB, PEOPLE"[n"DO SOME THINGS DIFFERENTLY FROM WHAT"x"WE'RE USED TO. HIT THE RETURN KEY TO""PUT YOUR COMPUTER INTO CONTACT WITH""ONE OF ITS CITIZENS";X$940" ###" " #####     (XS1YC1):XXN J P PI3.14159(C(PI3):S(PI3)KC1(PI36):S1(PI36):SF.95m(X95:Y0:CX140:CY96:SC1.16v2:3<J140FI06PSXXSCCX:SYCYYZI0ēSX,SYdSX,SYnXNXCYS:YXSYC:XXNxI XNSF(XC1YS1):YSF   20:30#((1)16))5I039E(I,I39IIP220:I_<I3901gF20vPI,I0II}ZId15xI 16336 I1200 BANG(S)(S)(S)(S)6 F ERR53ī60a "UNEXPECTED ERROR="ERq ERR53ī60Xs (X(1)-2101%215140,390>50,3939K60,3939W70,390`FX19iPY19qd15znX,YxNXX(1.5(1)2)NYY(1.5(1)2)ZNX,NY0X,YXNXYNY100ERR(222) S 4CC:YY((1)2.5):P10:10001 X20350B X:Y1:"o"Z 19:M1:" --- " A$"":A(16384):A128A$(A128):16368,0 A$(8)M4MM2 "A$(21)M25MM2 ,X19(Y(M1))2CC:P10:1000:SCSC3:2:25:SC 6YD100ī210" A2ĺ"TOO SHALLOW"8 A2ĺ"TOO STEEP"P V100ĺ"TOO SLOW"g V100ĺ"TOO FAST"n G "YOU'VE FAILED" "YOU'RE FIRED" "YOU'VE DONE IT" "NCTV WINS-THANS TO YOU" H "INTERGALACTIC GAMES"0H((1)1001)S"YOU MUST LAUNCH A SATELLITE"l("TO A HEIGHT OF ";Hw2G18<"ENTER ANGLE (0-90)"FAP"ENTER SPEED (0-40000)"ZVdAA(H3)1803.14159nVV3000(H1H) x(A)2(V) 24.7,365.26%  687,4332.7,10759.7 B  30686.3,60192,90740.6\  MERCUCY,VENUS,EARTHv  MARS,JUPITER,SATURN  URANUS,NEPTUNE,PLUTOY٠Ӎ؍,L K:L:J 140xS XR,YW XR,YW& XR,YW3 XR,YW@ XR,YRM "XW,YRZ ,XW,YRg 6XW,YRq @K:J ^J11000:J M15 N(21(1))10 J1N R(22(1))1:W(M(1)) W LYSYS(R4)1 KXSXSR K x:}S19+A(S),B(S):X19:Y19<T(16(1))XJ0S:A(J)J:B(J)J:JsJ0S:R((S1)(1))WA(J):A(J)A(R):A(R)W:JJ0S:R((S1)(1))WB(J):B(J)B(R):B(R)W:JJ0S:K0SRA(J):WB(K):CRWTC   OU FAILED -"& "THE ALIENS GOT YOU"G "THE CORRRECT FORCE WAS ";RM b "GOOD TAKE OFF"Gd "STARSHIP TAKE-OFF"2G((1)20)D(W((1)40)O2RGWb<"GRAVITY= ";GwF"TYPE IN FORCE"PC110ZFdFRĺ"TOO HIGH";nFRĺ"TOO LOW";xFRī190C10ĺ", TRY AGAIN"C10150C "Y OU'D BE ";2 (TD(N)100.5)100;" YEARS OLD."; 530` "WANT TO TRY ANOTHER PLANET";Y$u (Y$,1,1)"N"Ā~ 310  L138 &"="; 0L 2 5 : bC19 lD(C) vC A1Z P$ A    88,200;" YEARS OLD."9 ""NOW LETSFIND OUT HOW OLD YOU'D BE"R ,"ON THESE PLANETS."X 6c @B19k JZBt T610 ^5);B;15);P$ hB r |"SELECT A PLANET BY NUMBER"; N N1N9380  ZN 610 530 "ON ";P$;" Y+"HOW MANY YEARS OLD ARE YOU?";2YEY1Y100170Km"AND HOW MANY MONTHS(0-11)";tMM0M11210T(Y365.26)(M30.44)" ON EARTH YOUR`E ROUGHLY ";(T);" DAYS" "OLD--OR ";(T365.26100.5)1   @   * 768,P:769,D5 770:; (#Z 2# 160,0,174,0,3,173,48,192x 4# 136,208,5,206,1,3,240,5 6# 202,208,245,240,237,96,256 <#AD770 F#X P#X256ı Z#AD,X d#ADAD1 n#9030 XMILLION YEARS,HAS LEG LIKE FINSD980 X2XN:2000:990+ X2XN:2000? X2X:YB1000V Y2YN:2000:1010g Y2YN:2000p N: R(N):X2,Y2:P10SS1 SS139SS38# 60< 15:I3741:SS,IC Ii 0:H150:H:I3741:SS,I:I SS,2)1SCSC1:1050 2050 0:Y04:SS,Y:Y:SC01090 $1020 B::"YOU WON" "PLAY AGAIN(Y/N) A$ A$"Y"Ĭ  #" A. T10:SC0K 23:1:"High Score: "HSs 2:2:"Lives Left: "T" Score "SC C1:DC:X9:Y((1)10.5)10:MY2 A(Y,2(X1))16Y,2(X1))):A136CC:P4:1000:SCSC57:X1:Y1:" ":2:25:SC# X{ $SOUND(SOUND)(16336)-HS03<[P"################################"Z"# #"d"# #"nA15x"#XXXXXXXXXXXXXXXXXXXXXXXXXXXXXX#"AA112 "#    70,110 Z CREW QUATERS* d50,4070,407 nI5169F xI,40I,30M I JP1:P2P1 170) S(P)S(P)30:@ "PLAYER #1:";S(1)W "PLAYER #2:";S(2)j S(2)S(1)460 "PLAYER #2 WON !!":470 "PLAYER #1 WON !!"  I2332:15,32I xI' I16324/ 11< 18,22I` 13:I,15:I,17:I1,16:I1,16m 1:I,16t I X16:Y24:300 X26:Y24:300 24,2722:24,2724:23,24:23,27 ,0 624,27X:X1,24:25,27X2:X3,24:24,27X4ΠΠԍӍΠӍ٠ŠӠĠˠŠōȍΠ΍΍ΠӍӠǠŠӍ΍ōǍĠӍԠō؍Ҡ̠Ϡ̮٠ĠנԠӠĠӍΠӍΠΠҠ̠Ϡ̮٠٠Ӎ˭ĠӍȠРӠĠȍΠӍ٠٠ӠŠŠӠĠĠԍ 00 YBJ:900& XAJ:YBJ:900- J> J12000:JG 150V R(0):X,Ya J1ıv W(J2):TJW1 N1W X(A)950 Y2Y:X2XN:2000:X2XN:2000:N: YB970 X2X:Y2YN:2000:Y2YN:2000:N: Y2Y:X(A) x:}P19#AP:BP:D1,M157R(10)CJ010VR(J)(M(1))]JwDD:K1:LP:D0200KP:L1JKLDXAJ:YB:900XAJ:900XA:YBJ:900YBJ:900XAJ:YBJ900 XAJ:YBJ:9  I114X,YI,Y+(I40,X22I< 1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31FP5Z114,2I free at last!"+ T15000:SSOUND(S):T1  O  :7. MAIN BODY SPACE SHUTTLEZ(50,12050,3060,2070,3070,12050,120g)J5070w*J,120J,30~+J2 CARGO BAY DOORS70<60,12060,6050,6070,60F50,7070,70:50,8070,80:50,9070,90 P50,10070,100:50,110 1(P)V(P)370 ,P1330H 6H1(1)H(P)V1(1)V1(P)S(P)S(P)30:350Q @340~ JH1(2)H(P)V1(2)V(P)S(P)S(P)30:350 TS(P)S(P)A(V(P),H(P)) ^H1(P):V1(P) hA(V1(P),H1(P)) rH1(P)H(P):V1(P)V(P) |(P):"PLAYER #";P;"--";S(P) P H(28)!X128:H(X):X 170,170,152,170,128,143, 0,170,170,152,170,114,128,0, 170,170,101,128,152,170,191, 0,114,114,128,152,143,152 9000 100X128:PH(X):D115:1000:Xcd:15 nUSTRALIA,CRAYFISH SHRIMP SNALS AND FISH,180 MILLION YEARS,THEY LAY EGGS HAVE DUCKLIKE BILLS AND WEBBED FEETt OKAPI,AFRICAN RAIN FOREST,PLANTS,30 MILLION YEARS,THEY HAVE ZEBRA STRIPES AND A NECK LIKE A GIRAFFE~ COELACANTH,INDIAN OCEAN,UNKNOWN,350 1950:VAT:VW5100-(WH)105110EAHCTT25:5050\VHCTT35:5050hCTT30z(1)CT5110AD0:AD1: A F"COPYRIGHT JULY 20,1980"+ J11500:J:K7:20 X110 Y1102 (A(X,Y));" ";9 YF :20);M X[ A(P,Q)46k SSOUND(S){ Q9Q970 "370 ' ,Q((1)3)4 6P((1)3)4 @X110 JY110 TA(X,Y)254 ^Y,X h r: |20);"Whew... 3SOUND(S)(16336)(A(10,10).(62M0?<300WF(1).35PP1:90aPPP1zZ(1).35QQ1:110dQQ1nQ1Q1xQ10Q10P1P1P10P10MM13:120);"Attempt # "M" "A(P,Q)127    ,3080,4070,50:80,4090,50( I128(P)V(P)1:230, A$"M"V(P)V(P)1:230I A$"K"H(P)H(P)1:230f A$"J"H(P)H(P)1:230o 170 H(P)1H(P)1 H(P)35H(P)35 V(P)5V(P)5 V(P)18V(P)18 H(P):V(P):D$(P) H(P)35V(P)5410 "H1(P)H(P)Vz#??? ŠŠàϠҠĠˠ Š ؠ ԠҠ Ҡ Ƞ Π РĠР ààŠ  ǠҠ ĠӠ Π٠Ƞ ԠΠ Ϡ Š ͠ ΠӠĠĠРҠԠΠŠҠ!Ԡ ٠Ԡנ Š Ҡ  ӠΠ Š̠ ǠǠɠ ϠԠҠԠ Ԡ Š ٠ Ԡ" Ԡ ΠҠ Ԡɠ Ԡɠ ٠Ġ Š  Ƞ٠ ΠĠ Ġ ӠӠ ŠРҠ ̠Ҡ  Ġ̠ ΠҠ ΠŠ ̠ҠŠ٠Š Š ͠ Ӡ  Ӡ Π! Π" Π٠ؠ ŠԠ Р  ŠӠ Ҡ ԠΠ Š ȠàŠŠŠ!٠"Š Ġ ӠϠΠŠ̠͠ϠР٠Π13.25:70 X13.75:100" Y> X14:Z2.88:Y2.625:70N Y12.5:100\ T0760l X14.5:100| Y2.65:100 Y2.62511.425.73 X14:70 X14.5:100 Y X14.75:Z2.635:Y2.7 70 Y12.2:100 T0860 X175,14.3,7.75,1,1,1# Z4:X,Y:70. I14< X,Y:100C IZ Y0:X11:Z3.5:70k Y15.25:100 &X12.25:Z3.22:70 0Y0:100 DX13.25:Z3.125:Y3:70 NY12.5:100 XT0670 bX13.75:100 lY3:100 vY311.77.73 X150# X,Y1)9T2T1:K0:150- K:J3 : 0Q XZ0YY5:X,Y5` X,Y5:12u XZ1:ZX0:X,Y1 YY1: 0 "ZX0YY5 ,XZ0:ZX1 6X,Y5:12 @X,Y1:YY1: JX1,Y)0K39:350 T420 ^0 h1,38X  ::9K1382)(0,39K:K>20,390:0,3939L<K1382_FY((1)36)2uPK16Y6Y3870Z0:K,YdKnY6xJ119430J1T1K138T1İ230T2İ280330 X,Y1)9T1T2:K0:AY: ";KID$% 23:6:"PRESS RETURN"B 23:7:"TO DESTROY ";S$Q 23:8:A$m 1:1:I123::40):} "I1100:I ,: 6 @ J" ###" T" ###" ^" ###" h" /" r" /" |" \" " \" " /" 15 A(1)%B(0)6A100CC1H(A100CC1Y2B100DD1j<B100DD1wFC0C0PC39C39ZD0D0:dD39D39nC,Dx10 A :14,2713:14,2731:14,2732, 016,25343 :8@ DI2526P N37,38I:Ii XI3233:33,35I:Io bu l v"THANKS FOR COMING TO MARS. PLEASE COME" " AGAIN" ILE23215"(4)"CATALOG"(8"]RUN ";A$J((4)"RUN";A$ A5.25:100 *Y2.7:100, 4Y2.712.2.73< >X14.75:70M HX15.25:100T RYp \X15.5:Z2.39:Y2.7:70 fY12.2:100 pT0970 zX16:100 Y2.7:100 Y2.7:X15.5:70 X16:100 Y3.711.2.73 X15.5:70 X16:100r12:X1,Y |L1100' 0:X1,Y6 X36420K 12:X2,Y:XX2Q d TH((1)2)1t TH1T1:~ T2:K dI021nD"x3328I,D)Il 1,0,4,0,46,54,53,46,46,62,63,55,39,63,63,44,44,36,37,44,44,0232,0:233,133I1114II16160,60I I" / I12 " \"' " \"3 " /"> " /"E IQ "****" KY1Yĺ"NORTH ";' Y1Yĺ"SOUTH ";; X1Xĺ"EAST ";N X1Xĺ"WEST";T i D1Dĺ"TOO FAR" D1Dĺ"NOT FAR ENOUGH" I "YOUR TIME HAS RUN OUT!!" ,"*BOOM* YOU GOT HIM!" 6S "EVIL ALIEN""S10*G4;(X((1)S)L2Y((1)S)]<D((1)S)hFI1GP"X POSITION (0 TO 9)?"ZX1["Y POSITION (0 TO 9)?"dY1n"DISTANCE (0 TO 9)?"xD1XX1YY1DD1ī300"SHOT WAS ";   B M$(12)D(12) *A1125M$(A)<Az"JANUARY","FEBRUARY","MARCH","APRIL","MAY","JUNE","JULY"("AUGUST","SEPTEMBER","OCTOBER","NOVEMBER","DECEMBER"2"IS THIS LEAP YEAR";L$7J112<D(J)AJ F 31,28,31,30,  KA(6)+ 12/25/87(CHRISTMAS)G" H A N G M A N "WI1100:In(A$,B$,C$,D$,E$,F$2 B,C,FL,OAT,AT,OW<I((1)3)1FJ((1)6)1PJ370ZI100,110,120cJ5,5,5,130,140,150dG$A$:99nG$B$:99 ,R$"Y"10 6) @N1H18P1:390@ JN2H28P1:390W TN3H38P1:390r ^N1H1H11:14H1:2 hN2H2H21:14H2:16 rN3H3H31:14H3:31 |P$ T N((1)3)1% P0:P$"C":3202 P1160< (7)P H18N1CC1d H28N2CC1x H38N3CC1 70 20 YC280 "THE COMPUTER WON " 290 "YOU WON " ""PLAY AGAIN Y/N ";R$   :T18#5T:"H";1(15:"H";>230:"H"E<TVFY2C2240P20:"WHICH LADDER WILL YOU CLIMB?(1-3)"ZN$dN(N$):N3N180nP0:P$"Y":320xP180H18N1YY1H28N2YY1H38N3YY1X2,Y1 X3,Y2 Y "MOVING A SHAPE"<"TYPE A ROW(FROM 0 TO 37): ";YBH(Q-500]2X236l<T140:TuF600~K700PXZ32,Y1,3Y10,4Y2X0bX,YlX1,Y1vX2,Y23X1,Y 6301,0 16300,0 310# 4 D$"2"310B 16304,0P 16302,0^ 16299,0g 0310 Di (124214);"THIS IS TEXT":<@dFnMx7g110,30140,0140,159|100,159180,1597100,0180,0180,96100,96100,191180,1916D$@D$"T"ĉ:310D$"1"50016304,0 1 J1300 J T: "YOU BLASTED ";S;"/10 BUGS"@ I D5R A1[ 350d D1m A9v "350 ,D5 6A18 @350 JD10 TA7 ^I1D h rI |A); S "BUG EYES"S0%T110+(D2I1((1)300200)K<I^FR((1)41)uPR240,270,300,330Z"OO"dI1150iR$""n(16384)127ľR$xR$""ī140I("0"R$)Rī210SS1350"*"   :2030" "$$$$$MAY$$$$$$":2030> $"%%%%JUNE%%%%%%":2030Z ."@@@@JULY@@@@@@":2030v 8"!!!!AUGUST!!!!":2030 B"((SEPTEMBER)))":2030 "}}}OCTOBER{{{{":2030 "///NOVEMBER\\\":2030 "<<>>":2030 I1D(J) I7ĺ"31,30,31,31,30,31,30,31- PL$"YES"D(2)29A ZL$"Y"D(2)29S dA1:J1:1000 A1010,1020,1030,1040,1050,1060,1070,1080,1090,2000,2010,2020 "***JANUARY****":2030 "***FEBRUARY***":2030 "****MARCH*****":2030 "&&&&APRIL&&&&&" xG$C$:99! H$G$"OAT":1605 H$G$"AT":160D H$G$"OW"J :P ` "********"p "* *" "* *" "* " "*" "*" "*" "*" "*" "*" "*" ""*" ,"*" 6"*" @"*" J"****** PT(4,3)IP1:$I14/(J13C2PT(I,J)0:J:IQ<D0:SCR0kFK(16384):16838,0{PK128ī150ZKK128:JPIPdI14nJPJP1xJP4JPJP4PT(JP,3)KPT(JP,1)0300II14IPIP1 IP4IP6,10,6,9,6,8,6,7,1000,1000E  -2,6,-3,6,-4,6,3,6,4,6,5,6,1000,1000U " 2000,2000 X -2,4,3,4,1000,1000 -4,6,-4,7,-4,8,-4,9,-3,8,-3,9,-2,8,-2,9,-1,8,-1,9,0,8,0,9,1,8,1,9,2,8,2,9,3,8,3,9,4,8,4,9,5,8,5,9,5,7,5,6,1000,1000 -3,5,-2,5,3,5,4,5,1000,1000  -5,7,-5,8,-5,9,-5,10,-4,10,-3,10,-2,10,-1,10,0,10,1,10,2,10,3,10,4,10,5,10,00,1000K  -2,3,-2,4,-1,3,-1,4,0,3,0,4,1,3,1,4,2,3,2,4,3,3,3,4,1000,1000[  1000,1000 -2,5,-2,6,-1,5,-1,6,0,5,0,6,1,5,1,6,2,5,2,6,3,5,3,6,1000,1000  -2,3,3,3,1000,1000 -3,5,-3,6,-3,7,-2,7,-1,7,0,7,1,7,2,7,3,7,4,7,4,6,4,5,1000,1000 Wd310003)1000:X2000ī280A0K1000\X2000220bkX,YX1000X2000ī1040140X,96Y1000 0,0,0,1,1,0,1,1,1000,1000 -1,0,-1,1,-1,2,0,2,1,2,2,2,2,1,2,0,1000,1000  10 50X  :3 0,3919:0,3921,X0:Y0:(XD1:YD1F25:X,YR<XNXXDaFXN0XD1rPXN39XD1~ZYNYYDdYN0YD(2(1)1):YNYYD:100nYN39YD(2(1)1):YNYYD:110xXN,YN)3XD1XD0:X,YXXN:YYNND DISINIGRATED" ! NOı, I1N6 " ";= IC S I$"" (16384)127ľI$1 I$"Q"ī280< YY1G RR1Y I$"P"ī310c "YY1m ,RR1 6Y1R1ī370 @SS1 JSMī100 T"WELL DONE-YOU MADE IT" ^"THROUGH DEATH VALLEY" h r"YOU CRASHED INTO THE WALL" |"AE "DEATH VALLEY"S0'M2005("WIDTH?"<2WI<W(W2)RFL10ZPYWbZRWudD((1)31)nLD0LD20ī100xLLDYYDRRDNL1000"I";NY1000"*";NR1000"I"   " I9S1 S12070& I;- I9 I;" ";@ I J**" T"* *"# ^"* *"3 h"* *"> r34,34I |34,34IY$X16.25:Z2.145:Y4.7:705Y10.45:100DT01070UX16.75:100dY4.7:100uX16.25:100Y2.73.45.1X16.25:70X16.75:100$Y.Z(X)5.94.2X8T01480B ALY7:X9.95:ZZ(X):70VX9.13 TPT(JP,X)0:X$ ^DD1:150* h> rPT(IP,1)0390\ |PT(IP,1):PT(IP,2):" ";t PT(IP,1)PT(IP,I)1 PT(IP,1)24270 PT(IP,1):PT(IP,2):(PT(IP,3)); 200 IIP4 PT(IP,3)0ī360" I- I14A PT(I,3)0250O PT(I,1)0h PT(I,2)((1)30)1 PT(I,3)((1)26)65 I D1570  "YOUR SCORE WAS";SCR " , 6SCRSCR24PT(JP,1) @PT(JP,1):PT(JP,2):" "; JXб  :7I1159&279,I0,I-(I4-0B2I30129R<249,I30,IYFInPI600(12930)Z5:219,I60,IdInI7576x0:204,I75,III0:X,Y XXN:YYN 50X  :3 0,3919:0,3921,X0:Y0:(XD1:YD1F25:X,YR<XNXXDaFXN0XD1rPXN39XD1~ZYNYYDdYN0YD(2(1)1):YNYYD:100nYN39YD(2(1)1):YNYYD:110xXN,YN)3XD1XD:I120:S(16336):I  FFB (V1V)2Hī2201 HH(V1V)2; TT1D VV1L 70` V1V(5B)HV V15ĺ"YOU CRASHED-ALL DEAD" V11V15ĺ"OK-BUT SOME I NJURIES" V11ĺ"GO OD LANDING." T "MOONLANDER"!T0+(H50042V50><F120YF"TIME ";T,"HIEGHT ";HrP"VEL. ";V,"FUEL ";FUI2H50039V" ";WIX"*"ZF0ī140d"BURN? (0-30)"nBxB0ĪB0B30B30BFBFV1VB5   SC19 :1(I13723J14A(I,J:J,IK2SS19r<1:SS,39:SS1,39:SS1,39:SS,38}FB$" "P(16384)127ľB$ZB$"F"İ1000dB$(8)Ġ0:SS,38:SS1,39:SSSS1nB$(21)Ġ0:SS,38:SS1,39:SSSS1 }SS   :A$! 3-D: 12/28/87 AGE 9 1/2A 3PI20391\0,39IcIk15v13,11(12,12:14,12211,13:15,13<14,2410:14,2416F17,2713P11,15:15,15Z12,16:14,16d11,25:15,25 n12,2(1)13 X1,Y1)13PTSPTS1:DIR(1)1:DIR(2)1V X1,Y)13PTSPTS1:DIR(1)0 X1,Y1)13PTSPTS1:DIR(1)0:DIR(2)1 DIR(1)0XX1 "DIR(2)0YY1 ,DIR(1)1XX1 6DIR(2)1YY1 @15:X,Y:0:X1,Y1 JX1X:Y1Y TH:H4:OPPTS$ X1,Y)15DIR(1)1= X1,Y)15DIR(1)0V X,Y1)15DIR(2)0y X1,Y)14DIR(1)1:PTSPTS2 X1,Y)14DIR(1)0:PTSPTS2 X,Y1)14DIR(2)1:PTSPTS2 X,Y1)14DIR(2)0:PTSPTS2 X1,Y)13PTSPTS1:DIR  :150,390)(0,390620,3939G<10:0,3939XF14:19,205gP5,5:34,5~ZA18:PTS5:X6:Y1dX16:Y11n13xA,A43722:15"POINTS ";PTS;" "(16384)127İ410 X,Y1)10PTSPTS4:DIR(2)104354.5)):J@ d23:"PLOT: Y=151-.00435*(X-139)^2+4.5";:1000 nJ11292:XJ29:Y(((X139)2).004354.5):X2271J2:Y2(151((X139)2).004354.5):X,YX2,Y2:J  J01500:J: J2JO157157:K02:9,JK271,JK:K,J:1000c <J0276276:K132:JK,5JK,154:K,J:1000 F9,79:J0130:XJ211:X,(((X139)2).004354.5):J P22:"PLOT: YY=.00435*(X-139)^2+4.5":1000 ZJ12901:XJ29:X,((151((X139)2).0+ ::8:8:"HI-RES EXPLAINER PROGRAM"h1000:::21:"--------THIS IS THE BOTTOM LINE--------"J14:J31,32,33,34XP1:YP0:40 XP277:YP0:40!XP277:YP157:40"XP1:YP157(1:XP,YPXP2,YP2XP,YP2XP,YP:J:1000/  1:1""+("]]]"82"]]]"E<""KFXP"LLLLL"eZ"L;;;L"rd"L;;;L"n"LLLLL" Sī240 I) "CRASHED INTO ASTEROID"2 290A QNī270X "YOU DESTOYED IT"b SS1 QNĺ"NOT STRONG ENOUGH: QNĺ"TOO STRONG" "I1250 ,I 6G @"YOU HIT ";S;" OUT OF 1 0" J S "ASTEROID BELT"S0*G1100(C2A((1)181)V<D((1)121)hPN((1)91)sUI1DyZdInI1NxI1I417ī150A);"*";IQ0I1100(16384)127ľQ Q0   220,030,0-(30,040,10>240,1040,20O<40,2030,30`F30,3020,30qP20,3010,20Z10,2010,10d10,1020,0n25,3025,80x10,4040,4010,4010,7040,4040,7025,3025,8025,800,120 25  6:14,26 x1+ 16,2411:13:16,24152 1D 17,2512:13R 17,2514Y 8d 13,12r 12,1413 11,1514 12,1415 13,16A75:ZZ(X):100`Y6.7:1006jX9.95:ZZ(X):100?t PPR~LY7.27.7.5oX10.05:YLY:ZZ(X):70X9.75:ZZ(X):100YLY.3:100X9.95:ZZ(X):100YLY:100LY LY8.2:70X9.65:ZZ(X):100 E0HH1:PTSOP% ^PTS0PTS29370. h1104 rD |PTS29400V "YOU LOST":i "YOU WON!!":t D$:0 A,A437 D$(8)ĭA2AA2 D$(21)ĭA438AA2 A2D$(8)AA1 A3D$(21)AA1 13:A,A437  (4);"RUN DUCKSHOOT III"P "DUCK SHOOT MENU"&:@("WHICH DO YOU WANT:"F2[<"1)DUCK SHOOT IqF"2)DUCK SHOOT IIP"3)DUCK SHOOT IIIZdAnA170,200,250x(4):(4);"RUN DUCKSHO OT I"(4):(4);"RUN DUCKSHOOT II"0FBMī380 MMFB, FBP120ĪSS1A FBP80ĪSS.2d "HOW MANY MORE MINES TO BUY?"l LB LB0LBLPMī440 LLLB MMLBLP S.6ī660 S1.1CECE((1)201) S.9CECE((1)201) PL10ī680 S1L?" CS CS0CSCī249+ CCCS9 MMCSCPX ""HOW MANY MINES TO SELL?"` ,LSt 6LS0LSLī290 @LLLS JMMLSLP T ^"YOU HAVE $";M h r"BUYING" |"HOW MUCH TO SPEND ON FOOD ? (APPR. $100 EA.)" FB FBVE ";L;" MINES, AND $";M6 "SATISFACTION FACTOR ";S< h "YOUR MINES PRODUCED ";CE;" TONS EACH"u CCCEL "ORE IN STORE=";C;" TONS" "SELLING" "ORE SELLING PRICE=";CP "MINE SELLING PRICE=";LP;"/MINE" "HOW MUCH ORE TO SELz L((1)35)'P((1)6040)=M((1)5010)PR(FP((1)4080)g2CE((1)4080)o<C0wFS1PY1ZCP((1)127)dLP((1)20002000)nx"YEAR ";Y"THER ARE ";P;" PEOPLE IN THE COLONY." "YOU HA     ,8040,120 E "GOOGOL"%("1";22I1100<<"0";CFI IZ(X):100xY5.5:1001X10.4:ZZ(X):100= APPLED5_X9.810.1.1:ZZ(X)kY6:70zY6.3:100X BLACKOUTX8.75:Y3.4:Z4:20:P1SX:P2SYY12.4:20:Q1SX:Q2SYX0:20:R1SX:R2SYSL(Q2P2)(Q1P1)Y8.8:X9.95:ZZ(X):70)Y8.45:100<X9.75:ZZ(X)K Y8.8:100jX9.95:Y8.45:ZZ(X):100r ]~(Y9:702X9.65:ZZ(X):100<Y9.25:70FX9.95:ZZ(X):100P BOXZY5.5:X10.4:ZZ(X):70dY9.5:100 nX9.4:Z  X019Y139,(16(1)52X,Y<<YCFXSdX39201_nY139mx39X,Y)vX,Y}YX XFICE" & "THE PEOPLE REVOLTED", N "YOU'VE OVERWORKED EVERYONE"T r "NOT ENOUGH PEOPLE LEFT"x .1ĪPP((1)101)0 S.9ĪPP((1)101)? &P30ī700Q 0(1).1ī590u :"RADIOACTIVE LEAK....MANY DIE" DP(P2) NCE150ī620 X"MARKET GLUT - PRICE DROPS" bCE(CE2) lYY1 vY11ī90 "YOU SURVIVED YOUR TERM OF OF X20:Y100:Z60 :7=X,XX,Y:X,YY,Y:Y,YY,XJY,XX,Xr(Z,YX,Z:X,ZZ,X:Z,XY,Z:Y,ZZ,Y2Z,YX,X:Z,YY,X<Y,ZX,Y:Y,ZX,XFZ,XY,Y:Z,XX,YPX,ZY,X:X,ZY,YZXX80:YY80:ZZ80^GG1_G2110 d d 13$9,116:6,3411-(9,7927,118E<8,119RF7,1110_Z8,3410md12,2312n10,34:8,15:6,15:6,14:7,14x13,2296,1124:6,11259,346,11266,23 17,28:16,28:16,27:15,27:15,26:24,X8.75:Y11:Z6.5:20+TH06.3.4LSX,SYSX4(TH),SY4(TH)TTH`Z8:20qTH06.3.4SX,SYSX4(TH),SY4(TH)THY3.9:Z4.5:20:P1SX:P2SYY9.9:20:Q1SX:Q2SYZ9.5:20:R1SX:R2SYY3.9:20:T14XP1Q1&YSL(XP1)P23X,TX,Y:"XQ,SL(R2Q2)(R1Q1)m6XQ1R1:YSL(XQ1)Q2}@X,TX,Y:XJ MONITORT3^X8.75:Y3.4:Z4:70hY12.4:100rZ10:100|Y3.4:100Z4:100T01780 DIALSMALS?"* n"5)SAVE YOUR FILES ON A DISK?"C x"6)LOAD OLD FILES?"P "7)END"m :"CHOOSE ON BY NUMBER"} X$:X(X$) X180,390,500,610,680,780,910 40 "WOULD YOU LIKE TO:" "1)CHOOSE AN ANIMAL" "2)LET COMPUTER CH! ) N$(30),H$(30),F$(30),Y$(30),C$(30)5D$(4)?1020E(e2"WELCOME TO ANIMAL KEEPER"<"WOULD YOU LIKE TO:"F"1)READ ABOUT ANIMALS?"P"2)ENTER NEW ANIMALS?"Z"3)HAVE THE COMPUTER MAKE UP AN ANIMAL?" d"4)SEE A LIST OF ANI !"X160:R1 Y90%30I09D(XI,YX1,Y10K2IXdJZXR`nXJjx1000qJ{UU1U1Z160:X0:R1:100U2U0:Z0:X160:R1:1000X,YX,Y103X10,YX10,Y10BnX^ "A,B,R? ";A,B,R:3.XARARC(P(R2(XA)2)U2X,BP:X,BP\<X A {X(1989),Y(1989),Z(1989)] I11989:A((1)I1):BAI:CBIA:I;" ";A;" ";B;" ";CyX(I)A:Y(I)B:Z(I)C:I I 20 nX02614:22,2413 0:6,142 8,15:7,14:6,15L 3:10,17:9,16:8,15b 7,14:6,14:6,15120 NM159:P(N)7 Y02:120,PY125,PY:YA MM3J 120^ lNTE159:P(N)} vY02:135,PY140,PY:Y {TETE3 120 I(N)" Y02:60,PY65,PY:Y. FIFI37 120J NS159:P(N)g Y02:75,PY80,PY:Yq SS3z 120 @NSE159:P(N) JY02:90,PY95,PY:Y OSESE3 T120 NE159:P(N) Y02:105,PY110,PY:Y EE3 2:0,PY5,PY:Y OO3% 1208 LNT159:P(N)U VY02:15,PY20,PY:Y_ [TT3h `120| NTH159:P(N) Y02:30,PY35,PY:Y THTH3 120 NF159:P(N) Y02:45,PY50,PY:Y #FF3 (120 xNFI159:P S(200) I1200-J((1)10)18S(I)J?(IJ-S(1)1P2W<3zF21:1:"1 2 3 4 5 6 7 8 9 10"P"3 BARS=1 TIMEZI1200dS(I)1000,1100,1200,1300,1400,1500,1600,1700,1800,1900xINO159:P(N) Y0(0,5):VS(0,14)VS(0,14)VS(0,8):23:17:(VS(0,15)C(1,5).5);3);: 0:4W(4,1),W(4,2):VS(1,15)VS(1,14)VS(1,0)1W(4,3)C(0,4):W(4,4)C(1,4):J0300:: 0:4W(4,1),W(4,2): b140 l10:22:15:VS(0,14);2);:34:(VS(1,15).5);3);>" "2)LET COMPUTER CHOOSE"; "3)RETURN TO MAIN MENU"U X$:X(X$):X0ī190a X340n X1300 P((1)Q)1 AP:B(1)P:B(2)P:B(3)P:B(4)P "920:190 ,: 6"ENTER NAME OF ANIMAL " @P1:A$ JA$N$(P)28OF ANIMALS?"0 n"5)SAVE YOUR FILES ON A DISK?"I x"6)LOAD OLD FILES?"V "7)END"\ z :"CHOOSE ONE BY NUMBER" X$:X(X$) X040 X180,390,500,610,680,780,910 40 "WOULD YOU LIKE TO:" "1)CHOOSE AN ANIMAL ) N$(30),H$(30),F$(30),Y$(30),C$(30)5D$(4)?1020E(e2"WELCOME TO ANIMAL KEEPER"<"WOULD YOU LIKE TO:"AF"1)READ ABOUT ANIMALS?"P"2)ENTER NEW ANIMALS?"Z"3)HAVE THE COMPUTER MAKE UP AN ANIMAL?" d"4)SEE A LIST        :GG20 1000 I  C   :7(C20:F20:G20:H202(1000<22000G<J16]AA0:C20:E0:G20}FBB20:DD20:FF20:HH20P2000ZJd0n0,00,2019,19x0,019,0A,BC,DG,HE,FA,BI16 AA20:CC20:EE20  H1:G1,H1:G2,H I / POP:DEC 31`87:NEW YEARS EVE7(15K2I((1)100)1[<I50İ1000cF50pK16336|I120J(K)IG((1)39)1:H((1)39)1 G41030 H41030 H341030G341030 G,H:G1,H:G1, 144,56144,52148,53148,57 RSX:T2SY+P1,P2Q1,Q2R1,R2T1,T2P1,P2>&Z4:Y12.4:70K0X0:100Y:Z10:100hDY3.4:100xNX8.75:100XY12.4:70bX0:100lT01940vT40::RHO435:CX140:CY64:310143,55149,57149,59143,58143,55OOSE"" "3)RETURN TO MAIN MENU"* X$9 X$"3"40I X$"1"300[ P((1)Q)1 AP:B(1)P:B(2)P:B(3)P:B(4)P "920:190 ,: 6"ENTER NAME OF ANIMAL" @P1:A$ JA$N$(P)280 TB$(P)"XXX"360 ^PP1:330 h:"NO S:16,2317:16,2323:16,2322& 10R 18,2118:18,2119:18,2121:18,2120Y 0e I110v X((1)40) Y((1)40) KX,Y) SCSCK X,Y:I 21:"SCORE ";SCI8 }74 12,2712:12,2713:12,2727:12,2726` 12,2712:12,2713:12,2727:12,2726g 8 14,2514:14,2515:14,2525:14,2524 14,2514:14,2515:14,2525:14,2524 9 16,2316:16,2317:16,2323:16,2322 16,23164) F6,336:6,337:6,3333:6,3332O P6,336:6,337:6,3333:6,3332V U5| Z8,318:8,319:8,3131:8,3130 d8,318:8,319:8,3131:8,3130 i6 n10,2910:10,2911:10,2929:10,2928 x10,2910:10,2911:10,2929:10,292 :10 0,390:0,391:0,3938:0,3939V0,390:0,391:0,3938:0,3939]22,372:2,373:2,3737:2,3736(2,372:2,373:2,3737:2,37362374,354:4,355:4,3535:4,3534<4,354:4,355:4,3535:4,3534 AVS(0,0)VS(1,0)2(16287)127VS(0,14)VS(0,13)İ50:740G100h140:VS(0,0)VS(1,0)2İ390 VS(0,16)5VS(1,16)5610HVS(0,0)0VS(0,0)0RVS(1,0)0VS(1,0)0\K07:10:D1500:D,K VS(1,16),W(4,7):232,0:233,3:NTER EITHER OLD OR NEW NAME FOR ANIMAL:";N$(Q)P DH$(G)H$(B(1)):F$(Q)F$(B(2))r NY$(Q)Y$(B(3)):C$(Q)C$(B(4)) XN$(Q)"XXX":40 b l vX1Q N$(X):X  "WHEN DONE, PRESS RETURN";A$ 40    A1"ANIHARACTERISTICS:";C$(Q): "IS EVERYTHING CORRECT?Y/N";A$V (A$,1)"N"QQQ:400l N$(Q1)"XXX":40r  A0:X14 B(X)((1)Q)1 X 3000 !920 &:"DO YOU WANT TO SAVE THIS ANIMAL?Y/N ";A$ 0A$"Y"590. :QQ1:"E0 TN$(P)"XXX"360% ^PP1:330E h:"NO SUCH ANIMAL ON FILE"e r"PRESS RETURN TO CONTINUE"r |A$:190x  QQ1: "NEW ANIMAL" "NAME:";N$(Q) "WHERE FOUND:";H$(Q) "FOOD:";F$(Q) "AGE OF SPECIES:";Y$ "SPECIAL C9 I0300047&B;" x 47 = ";I0#BB17(I IUCH ANIMAL ON FILE"3 r"PRESS RETURN TO CONTINUE"@ |A$:190F R QQ1:d "NEW ANIMAL"w "NAME:";N$(Q) "WHERE FOUND:";H$(Q) "FOOD:";F$(Q) "AGE OF SPECIES:";Y$(Q) "SPECIAL CHARACTERISTICS:";C$(Q) "IS EVERYTHING CORQ) ?";:Q(0)<Q:Q$&FQ$"P"ı4PQ$"R"ı>Z1340Sx:YYS2YS24lXXS2XS2:1500:XXS7XS11:1500::XXS2XS24YYS2YS2:1500::XXS19XS234:YYS6YS2XXS7XS114:YYS2YS2 1 --- --"; XS5:YS6: "SERIES";:XS20:H;I XS28:A;a XS1:YS7:J132y "-";::XS2:YS8 P$;" HAVE ";T;" POINTS THIS SERIES"; : XS:YS "(P=PASS DICE - R=ROLL AGAIN)" (:XS 2"YOUR DECISION (P OR 111:B$;:( YYSYS10:XS:Y:B$;: $XS33:B$;:Q .XS:J134:B$;:c 8:XS6:YS2 BW;" POINTS NEEDED TO WIN"; LXS1:YS3:Y132 V"-";: `XS2:YS4 j"POINTS SCORED YOU ME"; tXS3:YS5 ~"BEFORE THIS XS4:YS2::P$"WE":T0:1010R 16:6:AWĺ"I WIN -- SKILL TRIUMPHS AGAIN"| HWĺ"YOU WIN -- IT WAS SHEER LUCK" AWİ2110 HWBL250:2000 22: ::XS4:YS9 YS:XS: J111:B$;: :" SCOREBOARD ";: J:15);"I'M ROLLING"% &P$"I":3200P 0F0P$"YOU":1560:DL4000:2050:300b :XS:YS:5000 DAD1ĺ"I'LL ROLL AGAIN":DL3500:2050:510 N"I'LL STOP WITH THIS":AAT XAWDL3500:2050:900 bYSYS2:P$"YOU":1560:DL3500:2050:300 .5500 ,T0+ 62700:TTR1R2:F0T08 @F2H0Y J:::13);"YOU'RE ROLLING"l TP$"YOU":3200 ^F0P$"ME":1560:DL4000:2050:500 h1300:Q$"R"310 rHHT:HW900 T0 ::2700 TTR1R2:F0T0 F2A0 A0:H0:T0:B$(32)IC$"*":BZ16336:Q(78)256(79):Q(Q)Z::2080:ChXS6:YS22100:2200:DL250:2050:2150:"HOW MUCH NEEDED TO WIN":"(BETWEEN 50-100 IS BEST) ? ";WW(W):W02302080:2500 Q0 !!"" S(1,0)0:VS(0,1)((1).5):VS(0,2)(2PI):VS(1,2)VS(0,2)PI(1)(((1).5))(PI)BVS(0,3)OV(VS(0,1))(12((1).5)):VS(1,3)OV(VS(1,1))(12((1).5))LJ04:W(J,0)0:W(J,3)C(0,4):W(J,4)C(1,4):W(J,5)0:W(J,6)0:W(J,1)W(J,3):W(J,2)W(J,J0:1:0:K04C(1,6),SD(3,1,1),OV(1):PI3.14159_J03:K01:L01:SD(J,K,L):L,K,JK01:J04:C(K,J):J,K:C(0,5),C(1,5)OV(1)557.2958:OV(0)OV(1)1.54353000.IC0:DC0:VS(0,16)0:VS(1,16)0:C(0,6)1.5707V8VS(0,0)1:V$(X)A$.A$:Y$(X)A$)8A$:C$(X)A$0BXDLQ4:N$(5)"XXX"JV` ECHINDA,AUSTRALIA AND NEW GUINEA,ANTS TERMITES AND WORMS,180 MILLION YEARS,WHEN IN DANGER THEY ROLL INTO BALL. THEY LAY EGGSWj DUCK-BILLED PLATYPUS,AUSTRALIA,CRAYFISH SHRMAL NAME:";N$(A)-"WHERE FOUND:";H$(B(1))K"TYPE OF FOOD:";F$(B(2))k"AGE OF SPECIES:";Y$(B(3))"SPECIAL CHARACTERISTICTS:";C$(B(4)):"WHEN DONE,PRESS RETURN"R$X14A$:N$(X)A$A$:H$(X)A$$A$:FIDED" XY ! "ADDED"* XY0 B "SUBTRACTED"K XY IM "MATH MACHINE"F"JUST ENTER ANY TWO NUMBERS AND I'LL"m("MULTIPLY THEM, DIVIDE THEM, ADD"2"THEM AND SUBTRACT THEM. IT IS"<"THE MOST AMAZING THING SINCE T.V"FI105::IPX,YZ"MULTIPLIED"dXYn x"DIV } :5:CX140:CY96(RHO80:D750GTHETA.4:S1(TH):C1(TH)f(PHI1.25:S2(PH):C2(PH){2YN(280),YX(280) RECT? Y/N";A$$ A$"N"QQ1:400: N$(Q1)"XXX":40@ O A0:X14d B(X)((1)Q)1k Xt 920 &:"DO YOU WANT TO SAVE THIS ANIMAL?Y/N ";A$ 0A$"Y"590 :QQ1:"ENTER NAME OF ANIMAL:";N$(Q) DH$(Q)H$(B(1)):F$(Q)F$(B(2)500::::X:Y:B$;:7:X:Y:"G R O A N";:WX:Y:"D E S P A I R !";:yXS:YS:"DICE PASS TO ";P$:@XS:YS:C$;:JXS1:YS1:C$;TXS1:YS1:C$;:^1600:1610:hXS1:YS1:C$;rXS1:YS1:C$;:1610:|5jVS(0,8)85:VS(0,13)134:VS(1,13)40:VS(1,14)120lt:21::21:"DEFENDER= ";DC;:23:"INTRUDER= ";IC~"ENERGY LEVEL = ";8);"DISTANCE =""FIRE DIRECTION ="1:1,0279,0279,1591,1591,0:1VS(0,4),VS(0,5):VS(0,16)0:VS(1,16)0@K4):VK01:VS(K,9)C(VS(K,1),0)SD(K,0,0)2:VS(K,10)C(VS(K,1),1)SD(K,0,1)2:VS(K,11)C(0,2)SD(K,1,0):VS(K,12)C(1,2)SD(K,1,1):K`K01:VS(K,4)(VS(K,2))VS(K,9)VS(K,11):VS(K,6)VS(K,4):VS(K,5)(VS(K,2))VS(K,10)VS(K,12):VS(K,7)VS(K,5):KIMP SNAILS AND FISH,180 MILLION YEARS,THEY LAY EGGS HAVE DUCKLIKE BILLS AND WEBBED FEETt OKAPI,AFRICAN RAIN FOREST,PLANTS,30 MILLION YEARS,THEY HAVE ZEBRA STRIPES AND A NECK LIKE A GIRAFFE ~ COELACANTH,INDIAN OCEAN,UNKNOWN,350 MILLION YEARS,HAS LE  :7M0,00,120:0,1010,120:0,2020,120:0,3030,120:0,4040,120k0,5050,120:0,6060,1200,7070,120:0,8080,120:0,9090,120:0,100100,120:0,110110,120(0,120120,120 : ī1000 P40 d  :&" KILL MARS"q"SHALL I SHOW YOU THE INSTRUCTIONS ";A$:A$"YES"ī1000:A$"Y"ī1000(A$"Y"1002A$"N"1007A$"NO"100<"DID I MISS UNDERSTAND YOU OR DID YOU " F"SAY ";A$;" PLEASE TRY AGAIN":A$:A$"YES" q I11000%1:1:"]";9I2(I2)T5G(T0ĺ" "U2T5ĺ""]7T0o<J1180:J,I I)# NY$(Q)Y$(B(3)):C$(Q)C$(B(4))9 XN$(Q1)"XXX":40? bE lP vX1Q^ N$(X):Xd  "WHEN DONE, PRESS RETURN";A$ 40  D$;"OPEN ANIMALFILE" D$;"WRITE ANIMALFILE" X1Q N$(X):H$(X) F$(X):Y$(X)C$1600:1640:'XS1:YS:C$;:XS18C$;:1640:PXS1:YS1:"@ @";bXS:YS:"^";rXS1:YS1"'''";:LXXSL:RXXSL:UYYSL:LYYSLLX,RXUY:LX,RXLYUY,LYLX:UY,LYRX:lXS,YS:vXS4,YS5:XS4,YS5: T 4,0,10,0,105,0,189,0,202,0B^ 45,5,45,5,45,5,45,5,73,58,7fh 63,7,63,7,63,7,63,7,63,5,63,7r 191,73,73,105,5,45,5,141,251,63,7,255| 74,45,5,109,21,7,59,7,7,255,31,7 74,45,,5,7,45,5,45,5,13,5,250,63 7,63,7,7,255,31,7,155,41,08:10:D1550:D,K:24::"WARNING! ! INTRUDER APPROACHING";:K04:10:D1550:D,K:23:958:VS(1,0)1:VS(0,14)3000610:IC5DC5108023:24:"TRY AGAIN ?"Q$:Q$"N"1070::@K7681000:J:J11840JK,J:K:1840G LIKE FINS("AGE OF SPECIES:";Y$(Q)3 I14= 3100D Ir T$Z$(1)Z$(2):U$Z$(3)U$(4):N$(1)T$U$x  Z$(I)(((1)2665))& DV1ı V2Z28:& Z381060, A $V1:0:1010:15P .Z31:1010c 8V2:0:1010:j 9w Z,Z35 Z,Z46 Z,Z37 Y1ı Y2Z25: Z252060  Y1:0:2010 Z31:2010 Y2 0:2010 * : Z(39) ::5*35,3916(1,235?-Z40I2ZZ1_<1000:2000:3000{F0:3,9Z:4,Z3:8,Z3PZZ1ZY2İ3000dV2İ2000n2001000:2000:300015Z,Z334,Z2:8,Z2Z,Z39    9000!:151X((0)7)>(X2X2N2Y((1)7)W<500hFX1((0)7)wPX12X12ZY1((1)7)dX1XY1Y120n200x300700:500XX1:YY115:500,J^ h !"(X):X"XXX",D$;"CLOSE ANIMALFILE"440: BQ1\ D$;"OPEN ANIMALFILE"v*D$;"READ ANIMALFILE"4:N$(Q)>N$(Q)"XXX"890H:H$(Q)R:F$(Q)\:Y$(Q)f:C$(Q)pQQ1:820zD$;"CLOSE ANIMALFILE"QQ1:40S1:XS8,YS3-XS9,YS4:XS12,XS15YSRXS12,XS15YS4:YS,YS4XS12tYS,YS4XS15:YS,YS4XS18YS,YS4XS21:XS18,XS21YSXS18,XS21YS2:YS,YS4XS24YS,YS4XS27:YS,YS2XS25 YS2,YS4XS26  DLBL120:2000:DL100:2050)>BL40:DL40@HK12:2050:2000^R:DL60:BL70:2050:2000d\wfBL200:2000:XS,XS3YS:YS,YS4XSXS,XS3YS4:YS2,YS4XS3XS2,YS2:YS,YS4XS6XS6,XS9YS:XS6,XS9YS2XS9,Y1900:1910:3XS4,YS5:XS4,YS5:1910:E1900:1930:cXS4,YS:XS4,YS:1930:t1940:J13XSJ1,YSJ2:XSJ1,YSJ2:XS1,YS3:XS,YS3:XS1,YS3J1BL:Q(BZ)::J1DL:: C(1)142:410460 :M A0B0480, CA:DB5 180Q "YOU RAN OUT OF MOVES"Z 490k "YOU WON!!" "PLAY AGAIN? Y/N" A$ A$"Y"10   A$"I"BB1 &A$"M"BB1 0A$"K"AA1 :A$"J"AA1 DMA$ 530 A0300' B03005 B39300C A39300O "6:A,B` ,AC:BD:180i 6530z @ACBD180 JA0A0:450 TA39A39:450 ^B39B39:450 hB0B0:450 rA,B)0AC:BD:450 |15:A,B MM1 M1 ::M0:S06$A0390(B03992A,BC<B:AIFPP0]ZX1750ndA((1)40)nB((1)40)xA,BX4:0,015:39,39C39:D39A39:B39A$A$"S"310S4310SS1 5 Z,Z36$ 4,8Z:5,7Z12 Z103008 Z1 mY,0X2 r600 w0+ |Y,0X21 7 D Y,Y3XU X2,X2Y1f X1,X1Y3l r Xz ]L5 bJ12 lP401208 v1000:P J: 768,P:769,L 770  (# 2# 160,0,174,0,3,173,48, 192) +"ANIMAL NAME:";N$(A)H"WHERE FOUND:";H$(B(1))f"TYPE OF FOOD:";F$(B(2))"AGE OF SPECIES:";Y$(B(3))"SPECIAL CHARACTERISTICS:";C$(B(4)):"WHEN DONE PRESS RETURN"R$X14A$:N$(X)A$C:Y33:2650:BL50:2000:;( Q(1):Q$"YOU":Q.5Q$"I"C2 :e< B$;B$;Q$;B$;"GET FIRST ROLL"yF DL3000:2050:Z X2,X2Y:d Y2,Y2X: R1((1)61):R2((1)61) F0:R11F1 R21FF1  J014:LJ2 XS925:X20:Y339 :"AND NOW A COIN TOSS FOR FIRST ROLL"b :"THE COIN IS IN THE AIR AND ...."{ YY1:C:2650:2050 0:2650:C:2660:2050 0:2660:Y92530 YY1:C:2650:2050 0:2650:C:2660:2050 0:2660:Y332560  15A039)B03922(A,B<2B:AC73O<Z039]FX0392fPX,ZoZX,Zd((1)16)nA039xB1392B,A)15150B,AB,A A!530,30I 50,2060,2060,3050,3050,20:55,2560,2560,3055,3055,25l 30,5030,4040,3050,4050,50 20,5020,6030,7050,7060,6060,50 P11000:P ! $RR1 .IT180 8160A!!!!!!!!"* "THE RIGHT ANSWER WAS ";FS1 I^ "OUT OF ";T;" PROBLEMS YOU HAVE GOT ";R{ "RIGHT AND ";W;" WRONG" :7 10,2020,1070,1080,2080,8070,9020,9010,8010,20 20,3020,2030,2030,3020,30:30,3025,3025,2530,2  :9"M U L T I P L I C A T I O N"H:::::Q(A,B`2"TIMES";Tk<I1T}FF((1)A)1PS((1)B)1Zd" ";Fn" x";Sx" _____"" ";JJFS1000 WW1:"!!!!!!!!!!!!!!WRONG!!!!!! ! ! 202,208,246,166,0,208,239,165,3,133,1,198,2,208,241,96S 1013,76:1014,0:1015,3\ 100i T50,226v $T50,226 .T50,201 8T66,254 BT25,190 LT50,179 VT50,179 `T50,169 jT66,179I !I768833:P:I,P:I 201,84,208,15,32,177, 0,32,248,230,138,72,32,183,0 ,201,44,240,3,76,201,222,32, 177,0,32,248,230  104,134,3,134,1,133,0,170,160,1,132,2,173,48,192,136,208,4,1986  1,240,7,!! 4# 136,208,5,206,1,3,240 ,5X 6# 202,208,245,240,237,9 6,256 c <#AD770j F#Xw P#X256ı Z#AD,X d#ADAD1 n#9030 A$:H$(X)A$!$A$:F$(X)A$2)A$:Y$(X)A$C.A$:C$(X)A$JBX^LQ4:N$(5)"XXX"dV` ECHINDA,AUSTRALIA AND NEW GUINEA,ANT TERMITES AND WORMS,180 MILLION YEARS,WHEN IN DANGER ROLL INTO A BALL. THEY LAY EGGSkj DUCK-BILLED PLATYPUS,A2050  X14:Y1:1540:2150:G Q1700,1610,1630,1640,1660,1670:m 2080:2800:XS9:YS22:QR1:3250 XS30:QR2:3250:2080:C:XS6 YS2:F0İ2200:2150:3240 DL1000:2050 1000:3000:XS6:YS21: Q1960,1910,1920,1930,1940,:YS8J:C:1800. XS30:1800:0:XS9:1800@ XS30:1800:R C:XS9:1800d" XS30:1800: XS16:YS5:1400:QR1:3100 XS25:QR2:3100 R11X4:YYS:1520 R21X29:1520 F0İ2150 F2ı DL400:2050:2100:DL800:,2> 11,7,3,3H 3,4,0,1-R 5,5,1,2D\ 128,75,138,5,270Yf 92,60,80,5,150np .02464,57.2958 :8:8:"= = = ORBITAL WAR GAME = = =":::12:"BRIAN BLACKWOOD" ::12:"7020 BURLINGTON":::12:"BEAUMONT TX, 77706" ::12:3,5,45+ 5,45,5,5,45,5,209,31,7,63,7,63T 7,63,7,159,41,5,105,41,5,73,5,45,0| 77,250,31,7,155,9,5,105,77,218,27 7,0 77,109,58,7,63,7,255,87,41,5,5 9,5,13,5,218,63,7,5,63,7,255,87 9,5,9,5,5,0& -104 10,10,45,45,5, 45,5,45,5,45,5,45,5,45,5,218,59N 7,63,7,63,7,63,7,7,63,7,7,0q 77,9,5,73,77,77,58,7,63,7,63 7,31,7,63,7,63,7,159,45,5,45,5 45,5,45,5,45,5,45,7,7,5,45,5 45,5,218,59,7,63,5,63,7,63,7,15 63,7,63,7,5,63,25,191,73,1 60,7070,7070,907 40,12030,13030,16020,160X 50,12060,13060,15070,150^ I9,59:49,5950,5950,6049,6049,59@ 40,7040,8050,8050,70b 40,90:50,90:40,110:50,110h $ .30,7020,7020,90 840,12030,13030,15020,150 =60,7070,6070,80 B50,12060,13060,16070,160 G 1005 30,7020,6020,80`  :31000#I150:I0(0:1070=23:2000L<I150:IYF0:2010dP3:20t1005:107040,5040,3050,3050,5040,5030,5060,5040,5030,6030,11040,12050,12060,11060,6050,50# 39,5940,5940,6039,603" " "*  :70,60170,60,0,80170,80?(170,60170,80^250,6050,30110,30110,60<170,90190,90190,110170,110170,90FA0:B70:D117PA,BZAA10:DdP110:P250:A10:A260:O120:O260nP1,P2O1,O2A1,A2P1,P2 x80"  A(20,40)'D$(1)"X":D$(2)"Y"-9(I135E2J518O<I:J_FN((1)9)iPI:JyZN:A(J,I)NdJiIn5:35:"$"xA(18,1)0:18:0P12V(P)18:H(P)1V1(P)18:H1(P)1:PP1A$ A$"I"V"