Scheme Sound

Wiki-Quelltext dieser Seite.

<language>SchemeJS</language>
<run id="556f21ea5541">

(define (run n)
    (if (= n 0) 'fertig
      (begin
        (play piano "C" (+ 2 (/ n 2))) 
        (sleep 0.2)
        (run(- n 1))
      )
    )
)
(run 10);
</run>