From 376886124765e666896a943eae3e0fccd0d66258 Mon Sep 17 00:00:00 2001 From: tzlil Date: Fri, 23 Aug 2024 21:07:23 +0300 Subject: initial commit --- bottles.mz | 22 ++++++++++++++++++++++ 1 file changed, 22 insertions(+) create mode 100644 bottles.mz (limited to 'bottles.mz') diff --git a/bottles.mz b/bottles.mz new file mode 100644 index 0000000..c7d18a3 --- /dev/null +++ b/bottles.mz @@ -0,0 +1,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 -- cgit 1.4.1