5 print

'can change this to skip some:
goto 10

10 print "this is a bit like a zx spectrum loading sound"
for n=1 to 5
 play sound 1,B,q,250+5*n*n
 pause 100
'play sound 1,B,q,400
'pause 300
next n
play sound 1,B,O,300

100 print "zap sound"
for k=1 to 3
 for n=800 to 100 step -20
   play sound 1,B,q,n
   pause 10
 next n
next
play sound 1,B,O,300


125 print "zap sound 2"
for k=1 to 3
 for n=2400 to 100 step -60
   play sound 1,B,q,n
   pause 10
 next n
next
play sound 1,B,O,300
'end

140 print "zap sound 3"
for k=1 to 3
 for n=2400 to 100 step -60
   play sound 1,B,s,n
   pause 10
 next n
next
play sound 1,B,O,300
'end

150 print "falling sound"
f=3200
do while f > 800
 play sound 1,B,q,f
 pause 50
 f=f * (3100/3200)
loop

200 print "zap sound 2"
for n=1 to 5
 f=6400
 do while f > 800
   play sound 1,B,q,f
   pause 10
   f=f * (3000/3200)
 loop
next n

300 print "rising sound"
for n=1 to 3
 f=800
 do while f < 8000
   play sound 1,B,q,f
   pause 10
   f=f * (3200/3000)
 loop
next n

400 print "jump sound"
for n=1 to 1
 f=300
 do while f >200
   play sound 1,B,q,f
   pause 15
   f=f -10
 loop
next n
for n=1 to 1
 f=200
 do while f < 600
   play sound 1,B,q,f
   pause 10
   f=f +30
 loop
next n

play sound 1,B,O,300

end