Electron User 3.04 ================== Fruit Worm ---------- By Carl Dunkley Conserve nature - help this poor worm round the screen as it eats fruit and avoids rocks, the outer fence and its own tail. A bonus is awarded at the end of each frame and an extra worm is awarded for every 50,000 points scored. The game should pose no problems to enter, but it may be advisable to save it before running as it contains a lot of machine code. All the instructions and movement keys are contained in the game itself. So wriggle off... Procedures pause Wait for key depression erase(l) Erase snake and increment score by l*length dead Dead subroutine bonus Bonus subroutine Print(A,B,B$) Print at location A,B the string B$ table Display high score table swap Adjust high score table exchange Swap names and scores input Input name initialise Set up envelopes and arrays titles Instructions wait Play a tune while waiting for a keypress screen Draw screen locate(A,B) Find an empty screen position characters Redefine characters colours Define colours black Blank out display assemble Assemble machine code HELICOPTER RESCUEBy Geoff Searle Helicopter Rescue is a game based on the rescue of two men whose boat has become stranded on rocks. You, as the pilot of the helicopter, have to rescue the men and land them safely on the cliff top. It is not a fast-action game, but needs concentration and skill, especially when the wind speed increases, as it does each time you save the men. At the beginning, brief instructions are given, and the Electron draws a random pattern of rocks and a cliff. It places a boat and the two men somewhere on the rocks. One of the men will always be in a position that can be reached by the helicopter. The Electron then selects a wind-speed and direction - at first you will be told the wind direction, but later you will have to work it out for yourself. First, you must position the helicopter over the boat - it must, obviously, be facing into the wind to hover, and the stronger the wind, the more power will be needed to maintain the hover. The wind gusts as well, so the power will have to be constantly juggled to keep the helicopter steady. Go down as low as you can with the helicopter, without touching the rocks, and lower the winch. When you touch one of the men with the end of the winch, he is secured and you can then winch him up into the helicopter, fly back to the cliff, and lower him on to the cliff-top before returning for the second man. If the first one that you rescued was the only man you could reach, the second one will "climb up" to where the first one was. If, during the rescue, the winch touches a rock, the winch breaks and is lost. If the helicopter touches the rocks, it crashes, and if you try to move too fast with the winch down it becomes tangled in the rotors, and again the helicopter crashes - and you only get one chance! Sometimes the men will be in a position which necessitates a long winch being used - for example, right at the foot of the cliffs. Once the winch gets over a certain length, it starts to swing, and the stronger the wind, the more it swings. This can make the rescue very difficult, especially if the casualties are down between two rocks. On the other hand, sometimes the only way that the men can be rescued is by swinging the winch on purpose. Another way in which men in apparently inaccessible positions can be reached is by turning the helicopter around, as this slightly alters the position of the winch. The helicopter can fly right up to the edges of the screen, but if you stay at either edge for too long, the helicopter will crash. If you crash or the winch breaks, you are given the opportunity to play again, with the wind-speed roughly the same as before. If you successfully rescue both men, you can play again but this time the wind-speed increases. When the wind gets up above about 60 knots, you really have to have your wits about you. Actually, you can cheat - just alter the value of L% in line 90 to roughly the wind-speed you want. At the end of each game you successfully complete you will be told how long it took you to rescue the two men, and the lowest time so far. A time under 100 seconds is good - under a minute is excellent. HELICOPTER RESCUE will take quite a while to get used to, but don't despair - RAF pilots spend months training... Once you do get the hand of controlling the helicopter, try to increase your speed. Game Controls: Z - Left, X - Right, * - Increase power, ? - Decrease power CTRL - Ascent, SHIFT - Descend, Q - Raise winch, A - Lower winch Variables L% Game level (in steps of 10) A%,B% Actual coordinates of helicopter A Calculated x-coordinate of helicopter a%,b% Previous coordinates of helicopter POW% Power level HL$ Character string for left-hand side of helicopter HR% Character string for right-hand side of helicopter H$ HL$ or HR$ WS% Approximate wind speed WI Variation of wind from WS% due to gusting Wind% Actual wind speed WTX%, WTY% Coordinates of top of winch WBX%, WBY$ Coordinates of bottom of winch in relation to helicopter WB% Actual 'y' coordinate of bottom of winch WBs% Displacement of bottom of winch due to swinging wsmax Maximum amount that winch can swing wistep Amount that winch moves vertically wipt% 'y' coordinate of top of winch as it falls RES% Number of men rescued time% Time to rescue both men low% Lowest time so far mrx%,mry% Coordinates of rescued man on end of winch cpx%,cpy% Coordinates of casualty's initial position CX% 'x'-coordinate of boat RX%,RY%,INC% Used in drawing rocks  Procedures heli_move Calculates and prints new position of helicopter and checks to see if it has crashed winch Calculates new position of winch and checks to see if it has rescued a man or touched a rock crash Self-explanatory winch_break Self-explanatory survivor Places rescued man on bottom of winch rescued Lands rescued man on cliff top title Title page, controls and warnings rocks Draws rocks and positions casualty chars Defines characters and envelopes  Flags h% Direction in which helicopter is flying (-1 or 1) swing% Direction in which winch is swinging (-1 or 1) Wdir% Direction of wind (-1 or 1) sw% Set if winch is to swing man% Man on end of winch cr% Helicopter crashed end% End of game new% New game