//    Instruction Example :     long video.position.x.get (objectid)


        screen.resolution.set (512,384)

        screen.set (BACK)
          pattern.display ("avo\bubble.gif")
        screen.end ()

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

        @video=video.load ("avo\video.mpg")

        video.play (@video)

        @sequence=track.create (TRACK_LOOP|TRACK_PINGPONG)
          track.key.set (0)
            track.key.position.set (128,CENTER)
          track.key.set (2)
            track.key.position.set (512-27-128,CENTER)
        track.end ()

        sequence.play (@sequence,@video,TRACK_KEEPALL)

        repeat ()
          screen.set (FRONT)
            %posx  =video.position.x.get (@video)
            %posy  =video.position.y.get (@video)
            %width =video.width.get (@video)
            %height=video.height.get (@video)
            text.display ("   "+str(%posx)+"   ",%posx+%width,%posy+%height)
          screen.end ()
        until (keyboard.get())

        script.stop ()