:for i from=1000 to=40 step=-20 do={
   :beep frequency=$i length=11ms;
   :delay 11ms;
 }