sr = 44100 kr = 4410 ksmps = 10 nchnls = 1 ; instr 1 iamp = ampdb(p4) a1 soundin p6 a2 oscil iamp,p5,1 out a1 * a2 / iamp endin