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.