Voting

Category

real language

Bookmarking

Del.icio.us Digg Diigo DZone Earthlink Google Kick.ie
Windows Live LookLater Ma.gnolia Reddit Rojo StumbleUpon Technorati

Language GOO

Date:04/20/05
Author:Juri Pakaste
URL:n/a
Comments:1
Info:http://www.googoogaga.org/
Score: (3.02 in 123 votes)
; GOO version of 99 bottles of beer
; by Juri Pakaste <juri@iki.fi>
; GOO information at http://www.googoogaga.org/

(df bottles (n)
        (cat
                (cond ((= n 0) "No more bottles")
                        ((= n 1) "One bottle")
                        (#t (cat (num-to-str n) " bottles")))
        " of beer"))

(df bow (n)
        (cat (bottles n) " on the wall"))

(do 
        (fun (n) 
                (post (bow n)) 
                (post "\n") 
                (post (bottles n)) 
                (post "\nTake one down, pass it around\n") 
                (post (bow (1- n))) 
                (post "\n\n")) 
        (range-by 100 >= 1 1-))

Download Source | Write Comment

Alternative Versions

Comments

>>  anonymousgoo said on 04/30/08 04:34:14

anonymousgoo me and my friend made up goo language GOO goo goo ga goo goo goo ga goo goo goo ga gooooooooooooooo

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!

Name:

eMail:

URL:

Security Code:
  
Comment: