"" 0,2,4: 4,1/ 2000: RULESN M(15,11): ARRAY FOR GRID^LL1:J885i""I111: PLOT GRID" (" "25" $7EOG1 : END OF GAME]8 3072J,102: 3072113,42:X2:Y2: PUT YOU ON GRID9I14L6:A((.5)14):B((.5)10):M(A,B)1: GENERATE MINES:(A0B0)(A14B10)(A1B0) M(A,B)0;<X16Y125000= 1500>QJ@P$:P$"" 60: MOVEMENT2FP$""1000: UPJKP$""1200: DOWNbPP$""1400: LEFT{UP$""1600: RIGHTZ 64J12060JJ80:3072Q,46:3072J,102YY1 150060J86560JJ80:3072Q,46:3072J,102 YY1 150060<x ((J5)40)(J5)4060_JJ2: 3072Q,46: 3072J,102iXX1t 1500} 60 CHECK FOR BOMBSM(X2,Y2)1 3000X1X1:M(X12,Y1)1B1B11M(X12,Y2)1B1B11Y31515M(X12,Y3)1B1B11X1X:M(X12,Y1)1B1B11UM(X12,Y2)1B1B11cY31520~M(X12,Y3)1B1B11X1X1:X31570M(X12,Y1)1B1B11M(X12,Y2)1B1B11Y31570M(X12,Y3)1B1B11!""THERE'S ";B1;" BOMB(S) ONE SQUARE AWAY"2#M(X2,Y2)2;'B10A?_@ ((J7)40)(J7)4060TJJ2: 3072Q,46: 3072J,102VXX1Y 1500h 60Z$:Z$""1998"WELCOME TO MINEFIELD!" "YOU HAVE TO FIND YOUR WAY ACROSS A MINE-"9"FIELD, TO REACH SAFETY IN THE TOP RIGHT"U"CORNER OF THE SCREEN""YOUR RUSTY RADAR ONLY SHOWS MINES THAT""ARE ONE SQUARE AWAY : TREAD CAREFULLY!""USE THE CURSOR ARROW KEYS TO MOVE AROUND "PRESS 'SPACE' WHEN READY TO START"%SW$:SW$" """:0 2009C "DESTROYED!"j "PRESS 'SPACE' TO SEE THE BOMBS" SP$:SP$" "3008 3004 EOG1: 27 3072J,102 A015:B011 M(A,B)1SSA25(10B)8080: 3072SS,30:2048SS,67 M(A,B)2SSA25(10B)8080:3072SS,46:2048SS,8A B,A` "ANOTHER GAME (Y OR N)"r G$:G$"Y" G$"N""BYE ...": 3045 SURVIVED A LEVEL! ONTO NEXT ONE"YOU WERE LUCKY ON LEVEL ";LI015:K011:M(I,K)0:K,I3"BUT JUST PRESS 'SPACE' AND I'LL PUT YOU"I"ON LEVEL ";L1dSP$:SP$" """:20n5030