99 Bottles of Beer

Voting

Bookmarking

Language Babbage's analytical machine

Date:	04/20/05
Author:	Greg Cook
URL:	n/a
Comments:	1
Info:	http://www.fourmilab.ch/babbage/
Score:	(2.98 in 44 votes)

his is an emulation of Babbage's original design.  
Details and the emulator may be found at 
<a href=http://www.fourmilab.ch/babbage/>http://www.fourmilab.ch/babbage/</a>

. 99 bottles of beer song
. written for Babbage's Analytical Engine with Attendant
. by Greg Cook 15/1/1998
. Attendant converts flow structure to conditional jumps

. No new line after number
A write in columns

. constants
N000  0
N001  1
N002  2

. bottle count
N003 99

(?
-
L003
P
. finish subtraction to compare bottles to 1
L002
{?
A write annotation  bottles
}{
A write annotation  bottle
}
A write annotation  of beer on the wall,
A write new line

. new subtraction card to clear mill
-
L003
P
L002
{?
A write annotation  bottles
}{
A write annotation  bottle
}
A write annotation  of beer,
A write new line
A write annotation Take one down and pass it around,
A write new line

. Still subtracting, update counter
L003
L001
S003
. compare for 0 this time
L003
L001
{?
. if <=0 then don't finish verse
-
L003
P
L002
{?
A write annotation  bottles
}{
A write annotation  bottle
}
A write annotation  of beer on the wall.
A write new line
A write new line
}
. if >0 then continue loop
L000
L003
)
A write annotation No more bottles of beer on the wall!
A write new line

Download Source | Write Comment

Alternative Versions

Comments

Ryan said on 10/17/05 03:33:04

I laughed aloud when I saw the title of this. The fact that this can be done is quite impressive.

Download Source | Write Comment

Add Comment

Please provide a value for the fields Name, Comment and Security Code.
This is a gravatar-friendly website.
E-mail addresses will never be shown.
Enter your e-mail address to use your gravatar.

Please don't post large portions of code here! Use the form to submit new examples or updates instead!

one program in 1500 variations