<pre>on fix  toComputer  push cd  repeat with x = the number of cds down to 1    put x    go to cd x    -- do something  end repeat  pop cd  beep 2end fix</pre>