! I made sure to not use any shufflers (the last one was a dup ! where the keep is used) but I don't think this is idiomatic ! or clean. Please help if you see this; can't get to IRC! : bottle ( -- quot ) [ [ [ [ # " bottles of beer on the wall,\n" % ] [ # " bottles of beer.\n" % ] bi ] keep "Take one down, pass it around,\n" % 1- # " bottles of beer on the wall\n" % ] " " make print ] ; : last-verse ( -- ) "Go to the store and buy some more," "No more bottles beer on the wall!" [ print ] bi@ ; : bottles ( n -- ) 1 [a,b] bottle each last-verse ;