//    Instruction Example :     long sound.amplitude.get (long)


        screen.resolution.set (512,384)

        text.display ("Press a key to exit.",CENTER,350)

        sound.play ("avo\audio.mp3",CHANNEL_1,SOUND_LOOP)

        repeat ()
          $data=str(sound.amplitude.get (CHANNEL_1))
          text.display ("  Amplitude = "+$data+"  ",CENTER,CENTER)
        until (keyboard.get ())

        script.stop ()