blob: 05f0a2096c942cc55632ccea9fedb25824892351 (
plain)
1
2
3
4
5
6
7
8
9
10
11
|
bottle := method(i,
if(i==0, return "no more bottles of beer")
if(i==1, return "1 bottle of beer")
return i asString .. " bottles of beer"
)
for(i, 99, 1, -1,
write(bottle(i), " on the wall, ", bottle(i), ",\n")
write("take one down, pass it around,\n")
write(bottle(i - 1), " on the wall.\n\n")
)
|