Beer on tap (Commodore 64) by Sioban

╔═══════════════════════╗
║***********************║
║***** Beer on tap *****║
║***********************║
╚═══════════════════════╝

"Put on the shoes of a bartender who has to fill pitchers of beer to throw to the customers 

who insistently demand them (in true saloon style) before they lose patience 

and reach the corner of the counter where you are and give you a piece of their mind."

┌────────────────┐
│Running the game│
└────────────────┘

At first the customers will move slowly but as the score increases they will start to go faster and faster.

To move the beer mug to one of the three counters, press the [down] button;

when you reach the bottom the mug will be brought back up and so on.

To throw the foamy beer stein, press the [space bar].

When the customer drinks his beer, the mug will return empty and the customer will move back to the front of the counter.

As soon as one of the customers reaches the right end of the counter, the game ends.

Press any key to play again.

How to play:

[down] key to move the mug from top to bottom;

[space-bar] to launch the beer stein

┌────────────────┐
│Code explanation│
└────────────────┘

>>>[line0]-[line2]

Initialize the string variables that will hold the drawing of the characters, of the mug, of the counter and screen positioning.

     

>>>[line3]:

Paint the background black, clear the screen and draw the 3 bar counters.

>>>[line4]:

Define the position of the i-th customer (M$).

Write the score at the top left of the screen.

Check if [space bar] is pressed and in this case increase the score and the backward position of the customers

>>>[line5]:

Move the i-th character back and forth.

>>>[line6]:

Move the beer mug (B$) and calculate the speed (V) increasing of the characters.

>>>[line7]:

Check if the mug reaches the character; in this case reverse their movement.

>>>[line8]:

Check if the "down" key is pressed to move the mug.

>>>[line9]:

Repeat the cycle otherwise game over and wait for a key to be pressed to start again.

┌────────────────┐ 
│Loading the game│ 
└────────────────┘