//    Instruction Example :      audio.volume.set (long)


        screen.resolution.set (512,384)

        sound.play ("Error.wav",CHANNEL_1,SOUND_LOOP)

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

        do ()
          for (%i=255 to 0 step -1)
          exit ()
            audio.volume.set (%i)
            text.display (" Volume = "+str(audio.volume.get())+" ",CENTER,CENTER)
            time.wait (0.01)
          next ()

          for (%i=0 to 255 step 1)
          exit ()
            audio.volume.set (%i)
            text.display (" Volume = "+str(audio.volume.get())+" ",CENTER,CENTER)
            time.wait (0.01)
          next ()
        loop ()

        procedure exit ()
          if (keyboard.get ())
            script.stop ()
          endif()
        end procedure