[REBOL] 99 Bottles of REBOL
From: ralph::abooks::com at: 24-Mar-2001 23:59
David Perkins liked my Rebol Scripting Song (on pp. 345-6 of REBOL FOR
DUMMIES) and pointed out that the website:
http://www.cs.man.ac.uk/~pjj/cs1011/beer.html
which has the 99-bottles refrain programmed in 142 computer languages did
not have a REBOL version.
So, thanks to David, I was inspired to submit one, to wit:
;;;;;;;;; REBOL version of "99 Bottles of Beer" ;;;;;;;;;;;;;;
bottles: 99 loop 99 [
print [bottles "Bottle(s) of beer on the wall," bottles "Bottle(s) of
beer"]
print "Take one down and pass it around,"
bottles: bottles - 1
print [bottles "Bottle(s) of beer on the wall.^/"]]
--Ralph
you can get REBOL FOR DUMMIES at http://rebolpress.com/#RFD
