|Score:||(2.00 in 14 votes)|
\ Abundance version of 99 bottles of beer RG 2.0/1.0 97/03/08 <<<DEFINE 1 99 SMALL All-Bottles DEFINE>>> <<< Bottles ( count -- ) DUP WRITE CASE 0 OF DROP " No more bottles " ENDOF 1 OF DROP " 1 bottle " ENDOF OTHERS OF . " bottles " ENDOF ENDCASE >>> <<< Sing WRITE <<<RFOR All-Bottles I Bottles " of beer on the wall, " I Bottles " of beer" NL " Take one down and pass it around," NL I 1- Bottles " of beer on the wall." 2 NLS RFOR>>> >>>
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!