Today we have the classic WORM / SNAKE where the objective is to eat and not crash into walls.

Today's computers are over 1000 times faster than Spectrum, so some IF-THEN-ELSEIF-ELSE sequences had to be converted into tables to get faster. The original routines are still in the program and can be observed to better understand how the program works.

Even so, the game was still slow. Thus, the game must be run at 3 times the normal speed.

The most important thing in this program is to erase the tip of the tail. Here are some alternatives for programming tail detection:
 a) Use an array with the list of tail coordinates.
 b) Use a 22x32 array to store a copy of the screen with the tail directions there.
 c) Use the SCREEN$ function. But SCREEN$ doesn't work with UDG characters. Anyone who wants to use UDG characters and the SCREEN$ function has to do a trick.
 d) Draw the tail with 4 different colors and, instead of SCREEN$, use the ATTR function (was the option used here).

Anyone interested in participating in the contest,
You can read the rules here:
http://arcalusitana.fun/MuseuZX/Pascalated_BASIC/Concurso2022_ENG.html