setchannelrate.bmx 209 B

123456789101112
  1. ' setchannelrate.bmx
  2. timer=CreateTimer(20)
  3. sound = LoadSound ("shoot.wav",True)
  4. channel=CueSound(sound)
  5. ResumeChannel channel
  6. For rate#=1.0 To 4 Step 0.01
  7. WaitTimer timer
  8. SetChannelRate channel,rate
  9. Next