instr 1 a2 expon 1,p3,.0001 a1 oscils 8000,88*(p4%9+5),1 out a1*a2 if p2<60 then event_i "i",1,rnd(.6)+.1,4,p4+rnd(2) endif endin i 1 0 1 8