:for i from=10000 to=500 step=-500 do={
   :beep frequency=$i length=11ms;
   :delay 11ms;
 }