Dimming in webserver

[eulaersivan]

Can you post an example on how I should define a dimmer in the eibpc webserver? (to dim a light to eg 60%)

I've just set up my first button so every hint is welcome. My goal is to rewrite the generated html code and to host it on an apache webserver. I will call the cgi script of eibpc with the appropriate parameters as they have been defined in the generated html code.

Tx for your help - Ivan

[eulaersivan]

Can somebody post an example on how I should define a dimmer in the eibPC webserver?

I already have defined the following:

[WebServer]
shifter(2)[LIGHT,UP,DOWN]$Living$
[EibPC]
if webbutton(2)==1 then \\
if("Switch_Living-0/1/15"==EIN) then write("Switch_Living-0/1/15",AUS) endif;\\
if("Switch_Living-0/1/15"==AUS) then write("Switch_Living-0/1/15",EIN) endif;\\
endif

Now I would like to add the dimmer and show also the actual value on the webdisplay. Any help is much appreciated.

Ivan

[pio]

You need to have an EIB group for dimming, e.g. "Dimming_Living".
This group is either of type "dimmobject"=4bit or dimming with absolute value, which is then usually of type 1 byte unsigned.

Then just write to that group a you do for switching.

Of course you need a dimmable EIB actor.

[enertegus]

You need to have an EIB group for dimming, e.g. "Dimming_Living".This group is either of type "dimmobject"=4bit or dimming with absolute value, which is then usually of type 1 byte unsigned.

MyDimmerValue="GADimmer-1/2/3"
if webbutton(2)==1 then {
         if (MyDimmerValue<90%) then write("GADimmer-1/2/3",MyDimmerValue+10%)  endif
} endif 
if webbutton(2)==3 then {
         if (MyDimmerValue>10%) then  write("GADimmer-1/2/3",MyDimmerValue-10%)  endif
} endif
if webbutton(2)==2 then {
 write("Switch_Living-0/1/15",!"Switch_Living-0/1/15") 
} endif

Hint: Use {} - it's not yet documented in this release but already works.

[eulaersivan]

Tx for the tip! It's working perfect.

Last question: can I also write the current dimming value to the web interface (eg 70%)?

Ivan

[enertegus]

Last question: can I also write the current dimming value to the web interface (eg 70%)?

if change(MyDimmerValue) then  webdisplay(2, $Dimmer: $ +convert(convert(MyDimmerValue,0f16)/255.0,$$)+$%$, LIGHT,DISPLAY,GREEN) endif