property pWidgetSprite -- the widget sprite number ----------------------------------------------------- -- USE THIS SCRIPT WITH THE "X" SLIDER BEHAVIOR -- -- This script should be attached to the "track" or -- "bar" sprite of the slider. It moves the slider -- widget to a position on the track where the mouse -- was clicked. -- -- Ken Loge - http://diginoodles.com ----------------------------------------------------- on getPropertyDescriptionList me list = [:] addProp list, #pWidgetSprite, [#comment: "Widget Sprite Number:", #format: #integer, #default: 2, #range: [#min: 1, #max: 100]] return list end -- send mouse messages to the widget sprite -- to trigger widget movement and update on mouseUp me sprite(pWidgetSprite).locH = _mouse.mouseH sendSprite(pWidgetSprite, #mouseDown, me) sendSprite(pWidgetSprite, #moveSlider, me) sendSprite(pWidgetSprite, #mouseUp, me) end