[OT] Poetry (was Re: Height/width limit on groups?)

[Mark Brownell]

OK, here's mine:

on mouseUp
   global spaz
   put 1 into spaz
   someDays
end mouseUp

on someDays
   global spaz
   if spaz < 6 then
     answer "Some days my life just seems to go around in circles" with 
"OK"
   else
     answer "Are you sick of this yet?" with "Yes"
   end if
   if it = "Yes" then exit someDays
   add 1 to spaz
   doThis
end someDays

on doThis
   global spaz
   answer "Do This" with "Yes Dear"
   add 1 to spaz
   doThat
end doThis

on doThat
   global spaz
   answer "Do That" with "Yes Dear"
   add 1 to spaz
   someDays
end doThat