//    Instruction Example :      track.key.transparency.level.speed.set (long)


        screen.resolution.set (512,384)

        @track1=track.create (TRACK_LOOP)
          track.key.set (0)
          track.key.transparency.level.speed.set (-50)
        track.end ()

        @spr1=sprite.load ("avo\dinosaur.spr")
        sprite.display (@spr1,200,CENTER)

        @sequence1=sequence.play (@track1,@spr1,TRACK_KEEPALL)

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

        keyboard.wait ()

        script.stop ()