Hi Akram, try this:

        pan-offset: 0.0
        tilt-offset: 0.0

        refresh: does [
                print ["pan:" pan-offset "tilt:" tilt-offset]
        ]

        control-window: center-face layout [
                style hscroller scroller 200x20
                across
                label "pan" hscroller [pan-offset: face/data refresh] with 
[data:
pan-offset]
                return
                label "tilt" hscroller [tilt-offset: face/data refresh] with 
[data:
tilt-offset]
        ]

        view/new control-window

        do-events

The scroller/data is from 0.0 to 1.0 only, so if your pan and tilt values
range
outside these bounds, you will need to do map those values, eg:

        pan-offset: face/data * 2

etc.

Anton.

> Dear Rebol Expert,
> I'm sorry, I'm a newbie and not proficiently good in programming.
> I'm doing
> my school project using Rebol/core software. The machine will pan and tilt
> by adjusting 'panoffset' and 'tiltoffset' values below. My problem is how
> can I possible run the rebol and then 'show pop up' and adjust
> the values at
> the 'field of text' and confirm with 'ok' button. Could someone
> please help
> me to fix the problem or show me the way to do it. Below is the script;
>
> make integer! n: 0
>
>  comment {change these values}
>  make decimal! panoffset: 0.0
>  make decimal! tiltoffset: 0.0
>
>
> Thanks in advanced for the help and very much appreciated.
>
> Regards,
> Akram

-- 
To unsubscribe from the list, just send an email to 
lists at rebol.com with unsubscribe as the subject.

Reply via email to