99 Bottles of Beer

Voting

Bookmarking

Language Emoticon

Date:	05/01/07
Author:	Mike Stone
URL:	n/a
Comments:	1
Info:	http://www.teuton.org/~stranger/code/emoticon/emoticon.html
Score:	(2.94 in 105 votes)

** Initialize song lyrics, useful integer constants and bottle counter **
Song:-O bottles of beer on the wall, bottles of beer. Take one down and pass it around, bottles
        of beer on the wall.
SongN:-O 21
Final:-O Go to the store and buy some more, 99
FinalN:-O 8
bottle:-O bottle
No:-O No
no:-O no
more:-O more
T:-O 3
B:-O 99

** Beggining of main loop **
:-(

** Print the current verse of the song **
B:-P S:-P
SongN:-O
Song:-P S:-P Song:-@ Song:-P S:-P Song:-@ Song:-P S:-P Song:-@ Song:-P S:-P Song:-@ Song:-P S:-P
Song:-@ Song:-P S:-P Song:-@ B:-P S:-P Song:-P S:-P Song:-@ Song:-P S:-P Song:-@ Song:-P S:-P
Song:-@ Song:-P S:-P Song:-@ Song:-P S:-P Song:-@ Song:-P S:-P Song:-@ Song:-P S:-P Song:-@ Song:-P
S:-P Song:-@ Song:-P S:-P Song:-@ Song:-P S:-P Song:-@

** Decrement the bottle counter and continue printing **
B:-O -1 B:+} SongN:-O
B:-P S:-P Song:-P S:-P Song:-@ Song:-P S:-P Song:-@ Song:-P S:-P Song:-@ Song:-P S:-P Song:-@
Song:-P S:-P Song:-@ Song:-P S:-P Song:-@

** Continue looping while the bottle counter is above the verse for 2 bottles **
B:-O
T:<\
:-E
:-)

*********************
** Verse 2 bottles **
*********************

B:-P S:-P
SongN:-O
Song:-P S:-P Song:-@ Song:-P S:-P Song:-@ Song:-P S:-P Song:-@ Song:-P S:-P Song:-@ Song:-P S:-P
Song:-@ Song:-P S:-P Song:-@ B:-P S:-P Song:-P S:-P Song:-@ Song:-P S:-P Song:-@ Song:-P S:-P
Song:-@ Song:-P S:-P Song:-@ Song:-P S:-P Song:-@ Song:-P S:-P Song:-@ Song:-P S:-P Song:-@ Song:-P
S:-P Song:-@ Song:-P S:-P Song:-@ Song:-P S:-P Song:-@

B:-O -1 B:+} SongN:-O
B:-P S:-P bottle:-P S:-P Song:-@ Song:-P S:-P Song:-@ Song:-P S:-P Song:-@ Song:-P S:-P Song:-@
Song:-P S:-P Song:-@ Song:-P S:-P Song:-@

********************
** Verse 1 bottle **
********************

B:-P S:-P
bottle:-P S:-P Song:-@ Song:-P S:-P Song:-@ Song:-P S:-P Song:-@ Song:-P S:-P Song:-@ Song:-P S:-P
Song:-@ Song:-P S:-P Song:-@ B:-P S:-P bottle:-P S:-P Song:-@ Song:-P S:-P Song:-@ Song:-P S:-P
Song:-@ Song:-P S:-P Song:-@ Song:-P S:-P Song:-@ Song:-P S:-P Song:-@ Song:-P S:-P Song:-@ Song:-P
S:-P Song:-@ Song:-P S:-P Song:-@ Song:-P S:-P Song:-@

B:-O -1 B:+} SongN:-O
no:-P S:-P more:-P S:-P Song:-P S:-P Song:-@ Song:-P S:-P Song:-@ Song:-P S:-P Song:-@ Song:-P S:-P
Song:-@ Song:-P S:-P Song:-@ Song:-P S:-P Song:-@

***************************
** Verse no more bottles **
***************************

No:-P S:-P more:-P S:-P
Song:-P S:-P Song:-@ Song:-P S:-P Song:-@ Song:-P S:-P Song:-@ Song:-P S:-P Song:-@ Song:-P S:-P
Song:-@ Song:-P S:-P Song:-@ no:-P S:-P more:-P S:-P Song:-P S:-P Song:-@ Song:-P S:-P Song:-@
Song:-P S:-P Song:-@

** Print the special go to store lyrics **
FinalN:-O
Final:-P S:-P Final:-@ Final:-P S:-P Final:-@ Final:-P S:-P Final:-@ Final:-P S:-P Final:-@
Final:-P S:-P Final:-@ Final:-P S:-P Final:-@ Final:-P S:-P Final:-@ Final:-P S:-P Final:-@
Final:-P S:-P Final:-@

** Skip unnecessary lyrics and print the rest **
SongN:-O
Song:-@ Song:-@ Song:-@ Song:-@ Song:-@ Song:-@ Song:-@
Song:-P S:-P Song:-@ Song:-P S:-P Song:-@ Song:-P S:-P Song:-@ Song:-P S:-P Song:-@ Song:-P S:-P
Song:-@ Song:-P S:-P Song:-@

Download Source | Write Comment

Alternative Versions

Comments

skldfg said on 07/27/09 02:56:25

this is so cool

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