Scheme Sound

<run> (define piano (instrument 1))</run>

(define (run n)

   (if (= n 0) 'fertig
     (begin
       (play piano (* n 10) 100) 
       (run(- n 1))
     )
   )

) (run 10);