Skip to content

Instantly share code, notes, and snippets.

@fuzz6001
Last active October 16, 2023 02:00
Show Gist options
  • Save fuzz6001/1c0fb6f49dc8ae1f5d3a3ba2440f024b to your computer and use it in GitHub Desktop.
Save fuzz6001/1c0fb6f49dc8ae1f5d3a3ba2440f024b to your computer and use it in GitHub Desktop.
Acorn Atom, Micromania, Puckman, 1982 (BASIC part)
5 F.Z=0 TO18;Z?#2814=Z?#2CB9;N.
10 P.$12;GOS.a;P."*puckman (C)MICROMANIA 1982*";GOS.a
20 P." instructions"''
30 P." EAT ALL THE DOTS IN THE MAZE."'" CONTROLS;"''
35 P." RETURN.........GOES RIGHT"'
37 P." ]-KEY..........GOES LEFT"'
40 P." CURSOR L/R.....GOES UP"'
45 P." CURSOR U/D.....GOES DOWN"'
50 P.''"press shift to contine";LI.#3B90
60 P.$12
62 P." *************"'
65 P." *score table*"'
70 P." *************"'$11
75 P.$#A7$#DF$#DF$#AB'$#CB$#B7$#CB$#B7" CHASER AVOID THESE!"'
81 P.$#D8$#D8$#D4$#D4'
82 P.$#A7$#D8$#D4$#AB" RUNNER 200,400,800,1600"'
83 P.$#DE$#C8$#B4$#DD" POINTS,MAY PASS THROUGH YOU"$#D8$#D8
84 P.$#D4$#D4
86 P.'" ENERGY DOT 50 POINTS"'
95 P." CHASERS GHANGE INTO RUNNERS"'
100 !#8100=#40CBC740;!#8120=#40F8F440
105 P." DOT 10 POINTS"'';!#8160=#40CAC540
110 P." THE MYSTERY GHOST APPEARS WHENA BONUS HAS BEEN GIVEN"
120 P.'"press return to play";LI.#FFE3;CLEAR4;LI.#3970
199 E.
200aFORZ=0 TO31;P.$#2A;N.;R.
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment