Snake: Difference between revisions
Content deleted Content added
→{{header|Locomotive Basic}}: add colors; make keyboard input less laggy |
|||
(5 intermediate revisions by the same user not shown) | |||
Line 1,523:
9 IF Q#5 THEN GOTO 4:Q=Q*(B=Q): COLOR=T: IF Q=0 THEN PLOT X,Y: IF Q=0 THEN PRINT "GAME OVER";: IF Q THEN PRINT "DONE";:K= PEEK (J):B=0: END </syntaxhighlight>
==={{header|Locomotive Basic}}===
[[File:Snake locomotive basic.png|thumb|''Snake'' running in CPCBasic]]
Use the
If you
▲Use the cursor keys to control movement direction. If you find gameplay too easy, lower the skill parameter in line 20 or increase ml (maximum snake length).
▲If you are playing this in [https://benchmarko.github.io/CPCBasic/cpcbasic.html CPCBasic], paste the code into the top box, then click on the "Reset" and "Run" buttons below and finally click on the CPC screen so it gets keyboard focus. (The frame around the screen will turn dark).
<syntaxhighlight lang="locobasic">10 mode 1:randomize time
15 ink 0,0:ink 1,6:ink 2,18:ink 3,11
Line 2,421:
.
</syntaxhighlight>
=={{header|Emacs Lisp}}==
[[File:Snake emacs lisp.png|thumb|''Snake'' in Emacs]]
GNU Emacs has a built-in Snake game in Lisp that is started with
<syntaxhighlight>M-x snake</syntaxhighlight>
and which uses the same tile set as the included [[Tetris]] game.
=={{header|F Sharp}}==
|