LET fullbottles = 100 LET bottlenumber = 0 WHILE fullbottles > 0 DO SET bottlenumber += 1 passBottle(bottlenumber) SET fullbottles -= 1 END WHILE can't remember what language that is, think it's Comal .... not something I use anymore ... Rene (the boring programmer) At 02:49 17-04-2004, you wrote: >How can I be the designated troublemaker if nobody posts anything that I can >feed of of. > >100 bottles of beer on the wall >100 bottles of beer >Take one down and pass it around >99 bottles of beer on the wall. > >99 bottles of beer on the wall >99 bottles of beer >Take one down and pass it around >98 bottles of beer on the wall. > >98...oh to heck with it >Start >Bottles minus one >new total >goto start until you are too drunk to continue. > >Bert -- Rene Brehmer aka Metalbunny ~ If you don't like what I have to say ... don't read it ~ http://metalbunny.net/ References, tools, and other useful stuff... Check out the new Metalbunny forums @ http://forums.metalbunny.net/ -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- Was this forwarded to you? Want to subscribe? Send an email to chadfree-request@xxxxxxxxxxxxx?Subject=subscribe. For a complete list of email commands for our list send an email to ecartis@xxxxxxxxxxxxx with a subject line of "info chadfree" without the quotes. If you wish to unsubscribe from our list send an email to; chadfree-request@xxxxxxxxxxxxx?Subject=unsubscribe To contact the list moderators send an email to chadfree-moderators@xxxxxxxxxxxxx -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-