var x;
var ws$:="test.wav"; sound(ws$,1);
for x:= 0 to 200 do
PrintLog(x)
next;
rerun(1);