//    Instruction Example :      button.position.set (objectid,long,long)


        screen.resolution.set (512,384)

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

        button.display ("avo\button_01.btn",CENTER,CENTER,Event.Manager,PRESS_LEFT_BUTTON)

        screen.set (FRONT)
          text.display ("Click on the button to set its position.",CENTER,20)
          text.display ("Press a key to exit.",CENTER,350)
        screen.end ()

        keyboard.wait ()

        script.stop ()

        procedure Event.Manager (@event,%status)
          %x=number.random.get (0,500)
          %y=number.random.get (0,380)
          button.position.set (@event,%x,%y)
        end procedure