sr = 44100 kr = 4410 ksmps = 10 nchnls = 2 FLpanel "Geiger",280,280 gkint,giint FLknob "Rate",0.5,0.05,0,1,-1,200,30,30 FLsetVal_i 0.1,giint FLrun instr 1 kintvl rand gkint ares mpulse 20000,abs(kintvl) am1 mode ares,200,8 am2 mode ares,400,8 am3 mode ares,800,8 am4 mode ares,1600,8 am5 mode ares,3200,8 aout = (am1 + am2 + am3 + am4 + am5) * 0.2 outs aout,aout endin f 1 0 1024 10 1 i 1 0 100