CLS

FOR i = 100 TO 1000 STEP 50
  PRINT "current:"; i
  SOUND i, 1                            ' makes sound  <frequency, length>
NEXT i