1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
|
##,##,##,##,##,##,##,##,##,##,##,##,##
##,##,##,##,##,^^,##,##,##,##,##,##,## //Start Car
##,##,##,##,..,<>,..,..,##,##,##,##,## //Make New Car
##,..,..,..,..,##,##,..,##,##,##,##,##
##,..,##,##,##,..,..,<>,..,..,##,##,## //Make New Car
##,AA,##,##,##,AB,##,##,##,AC,##,##,## //Set Values of Cars
##,%D,..,..,##,%D,..,..,##,%D,..,..,## //Make sure car goes down
##,>>,##,..,##,..,##,..,##,..,##,..,## //Printing...
##,..,##,>>,##,>>,##,>>,##,..,##,AC,##
##,>>,##,..,##,..,##,..,##,..,##,>>,##
##,..,##,..,##,..,##,..,##,>>,##,AF,##
##,AD,**,AG,##,..,AE,..,##,..,AE,..,## //Have we got to one?
##,(),##,##,##,##,(),##,##,##,(),##,## //Destroy Cars
##,##,##,##,##,##,##,##,##,##,##,##,##
AA-> =99
AB-> ="Bottles of Beer on the wall,"
AC-> ="Bottles of Beer\n"
AD-> IF == 1 THEN %D ELSE %R
AE-> IF ** THEN %R ELSE %D
AF-> ="You Take one down, Pass it around,"
AG-> -= 1
|
