like all good things, it may have become inactive.
--Ralph
>-----Original Message-----
>From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]]On
>Behalf Of Michal Kracik
>Sent: Sunday, March 25, 2001 8:25 AM
>To: [EMAIL PROTECTED]
>Subject: [REBOL] Re: 99 Bottles of REBOL
>
>
>And I submitted Carl's version in 1998. I got no reply and it never
>appeared in the list.
>
>--
>Michal Kracik
>
>Graham Chiu wrote:
>>
>> On Sat, 24 Mar 2001 23:59:42 -0500
>> "Ralph Roberts / ALEXANDER BOOKS" <[EMAIL PROTECTED]> wrote:
>>
>> > 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:
>> >
>> >
>>
>> this was Carl's from late 1998 ...
>>
>> REBOL [
>> Title: "99 Bottles of Beer Song"
>> Author: "Carl Sassenrath"
>> Note: "The correct song. A bit more advanced."
>> ]
>>
>> sing: func [count rest] [
>> prin pick ["99 bottles " "no bottles " "1 bottle "
>> [count "bottles "]]
>> min 4 count + 2
>> print rest
>> ]
>>
>> for bottles 99 0 -1 [
>> sing bottles "of beer on the wall,"
>> sing bottles "of beer."
>> print pick ["Take one down, pass it around,"
>> "Go to the store, buy some more,"] bottles > 0
>> sing bottles - 1 "of beer on the wall."
>> print ""
>> ]
>>
>> --
>> Graham Chiu
>> --
>> To unsubscribe from this list, please send an email to
>> [EMAIL PROTECTED] with "unsubscribe" in the
>> subject, without the quotes.
>--
>To unsubscribe from this list, please send an email to
>[EMAIL PROTECTED] with "unsubscribe" in the
>subject, without the quotes.
>
--
To unsubscribe from this list, please send an email to
[EMAIL PROTECTED] with "unsubscribe" in the
subject, without the quotes.
