(sleep _)

(loop for x from 0 below _
      do
      <put something here>)

(loop while _
      do
      <put something here>)

(when _
    <put something here>)

(if _
    <this>
    <that>)