08-23-2010, 06:11 AM
Macro 99 bottles of beer
;99 Bottles of Beer in Quick Macros
str s
int i
for i 99 -1 -1
,if(i!99) s.addline(F"Take one down and pass it around, {i} bottles of beer on the wall.[]")
,s.addline(F"{i} bottles of beer on the wall, {i} bottles of beer.")
s.addline("Go to the store and buy some more, 99 bottles of beer on the wall.")
s.replacerx("(1 bottle)s" "$1" 2); s.findreplace("[]0" "[]No more"); s.findreplace("0" "no more" 2)
out s