' *** TUNNEL ***M *** FOR C16/PLUS4 ***s *** BY P.WALKER *** *** 4TH APRIL 86 *** *** FOR C= USER ***# *** ISSUE 33 *** % *** SAVED BY SIXTEEN PLUS ***1& *** WWW.COMMODORE16.COM ***M( 1,1: 0,1: 4,1: ""U2 7e<S("3800")F1,"POKE65298,PEEK(65298)AND251:POKE65299,(PEEK(65299)AND3)OR"(S256)P *** SET VARIABLES ***Z 55,0: 56,56::S("3800")d"MONITOR":"T D000 D7FF "(S):"X"dn"POKE65298,PEEK(65298)AND251:POKE65299,(PEEK(65299)AND3)OR"S256ux"RUN 140" 1319,19: A0 4:1320A,13::239,6:S("3800") 65,24,60,90,90,153,153,255,36 83,36,255,153,153,90,90,60,24# 0,126,195,207,199,207,207,207,126D 27,0,255,0,187,187,0,255,0e 28,248,7,0,187,187,0,7,248 29,31,224,0,187,187,0,224,31 88,24,24,60,36,102,255,195,195 81,126,195,207,195,243,243,195,126 I1 8: A: C0 7: B: S(8A)C,B::HS100" 1,2:"", 8805""\G15:X20:P$" ":P0:L.5f"FU99n,C7v6S0~@D0JM0:MX0:MY23TO$""^""hA((1)3) r A1 G26 GGL!| A2 G8 GGL* A$= D1 1320R A$"." XX1g A$"," XX1{ FU99 FU99 1,0,24,"":O$;"";G);P$FUFU1:"SCORE";S; S10 ;" ""FUEL:";FU;"" 1,C,4 FU0 D1 660OX(3072X)L OX27 OX29 (3072X),83: (2048X),113| OX81 SS5:M0I17:I:1,I100,1: OX102 OX65 D1& OX88 D10 OX0FUFU10:M0I17:I:1,800,1:3,1004,1:: P$" " P$" ": 1,C,4LD ((1)4)13 J((1)10)G:3992J,0:2968J,53N ((1)10)13 J((1)10)G:3992J,81:2968J,68X ((1)10)13 J((1)10)G:3992J,65:2968J,50b ((1)6)15 P$"\[[[[[[[[]"lPP1: P100(P100) C((1)14)2: 1,C,4)vSS1>L0.5(S200)1H 360^ *** MISSILE *** M0 ((1)20)5 840 M0 830MYMY1 MY1 M0: 830T(P100)3 T8 T8 T3 T3 ((1)10)T 830 3072MX(MY40),OM3 2048MX(MY40),CM;F0T  MXX MXMX1:F1m MXX MXMX1:F1  F1 OM(3072MX(MY40)):CM(2048MX(MY40))* 3072MX(MY40),884 2048MX(MY40),99>HM1:MXG5:MY23$RVVMX((MY1)40):OM(3072VV):CM(2048VV)5\ 3,1023,400;fEp ""^z 1,16,8,"TUNNEL"} 1,14,10,"BY P.WALKER" 1,7,12,"DO YOU WANT INSTRUCTIONS?" A$ A$"Y" 960 A$"N" 1310 920 "YOU ARE A SMALL SPACECRAFT[ "7"(SHOWN AT THE TOP OF THE SCREEN!"_"TRAVELLING DOWN A LONG TUNNEL.""YOU MUST DODGE VARIOUS OBSTACLES.""AND COLLECT FUEL CANISTERS.""IF YOU RUN OUT OF FUEL.HIT AN OBSTACLE""OR HIT THE SIDES OF THE TUNNEL YOU DIE."<"YOUR FUEL IF SHOWN AT THE TOP LEFT"l"OF THE SCREEN.IT CAN GO NO HIGHER THAN""99 FUEL CANISTERS @ ARE COLLECTED"$"BY RUNNING OVER THEM."."PRESS THE SPACE BAR TO CONTINUE"8 A$: A$" " 1080$B" OBSTACLES:"RL" .....OTHER SPACESHIPS-DO NOT HIT!"V" @.....FUEL CANISTERS-COLLECT THEM!"`" .....BONUSES-COLLECT FOR POINTS!"j" \[[]...BRIDGES-YOU WILL PASS UNDER "t" THEM AUTOMATICALLY.WHILE UNDER BRIDGES"4~" YOU CANNOT SEE YOUR CRAFT."d " .....GUIDED MISSILES.THESE WILL "" FLY TOWARDS YOU.THEY TURN QUITE SLOWLY"" SO ARE QUITE EASY TO DODGE."" WHEN THEY APPEAR THEY MAKE A SOUND" " (PRESS 'A' TO HEAR THE SOUND"9" PRESS RETURN TO CONTINUE..."V A$: A$(13) 1250q A$"A" 3,1023,10| 1220"";17);"KEYS:"" '.'........MOVE CRAFT RIGHT"" ','........MOVE CRAFT LEFT" " PRESS SPACE BAR TO START"%  A$<  A$" " 1290B T ( *** DIE ***t 2 I8 0 1: 3,I100,5: <" YOU DIED!!!" F"" P OX102 " BY HITTING A WALL."!Z OX88 " BY BEING HIT BY A MISSILE.">!d OX65 " BY BEING HIT BY A SPACECRAFT."o!n FU0 " BY RUNNING OUT OF FUEL."!x" YOUR SCORE WAS:";S! SHS " WHICH BEATS THE HIGH SCORE!!":HSS!" HIGH SCORE:";HS "" DO YOU WANT ANOTHER GO?")" A$>" A$"Y" 270T" A$"N" "":_" 1440