FHEM Forum

FHEM => fhem-users => Thema gestartet von: Guest am 23 November 2012, 19:26:57

Titel: Hilfe zu FHEM/Perl
Beitrag von: Guest am 23 November 2012, 19:26:57
Originally posted by: <email address deleted>

Hallo,

ich bin ja dabei mich in Perl einzuarbeiten. Auch lese ich schön die
Referenz von fhem.pl

Aber was mache ich falsch an meinem notify? Ich finde es nicht...

Wäre nett wenn mir jemand auf die Spürnge hilft. Danke

define Heizungsteuerung notify CUL_WS_8
{
my $wunsch-temp = ReadingsVal("Wunschtemperatur","state","99");;
my $ist-temp = ReadingsVal("CUL_WS_8","temperature",99);;
if ($ist-temp < $w-temp)
  {
    fhem "set Heizung on";;
  }
elseif ($ist-temp > $w-temp +1)
  {
    fhem "set Heizung off";;
  }
}

--
To unsubscribe from this group, send email to
fhem-users+unsubscribe@googlegroups.com
Titel: Re: Hilfe zu FHEM/Perl
Beitrag von: borsti67 am 23 November 2012, 19:34:26
                                                 

my $wunsch-temp

if ($ist-temp < $w-temp)
>

???

--
To unsubscribe from this group, send email to
fhem-users+unsubscribe@googlegroups.com
Titel: Re: Hilfe zu FHEM/Perl
Beitrag von: Guest am 23 November 2012, 19:36:33
Originally posted by: <email address deleted>

Hallo,

danke, das habe ich auch im letzen Moment gesehen. Schade, das wars aber
nicht.

Am Freitag, 23. November 2012 19:34:28 UTC+1 schrieb Borsti67:
>
> my $wunsch-temp
>
> if ($ist-temp < $w-temp)
>>
>
> ???
>  

--
To unsubscribe from this group, send email to
fhem-users+unsubscribe@googlegroups.com
Titel: Re: Hilfe zu FHEM/Perl
Beitrag von: borsti67 am 23 November 2012, 19:45:49
                                                 

da ich da doppelte ";" sehe, vermute ich mal, das steht so in der fhem.cfg?
Dann musst Du auch jede Zeile mit "\" abschließen, ist es das vielleicht?

Ansonsten mach doch mal vor dem IF ein

   Log 3,"wunsch=$wunsch-temp   ist=$ist-temp";;

...um zu sehen, ob überhaupt (und die richtigen) Werte drin stehen.
Außerdem würde ich pauschal das "Minus" durch "Unterstrich" ersetzen,
möglicherweise versucht Perl da gerade was zu subtrahieren...
Hast Du denn irgendwas im Log?

Und wenn das erstmal funktioniert, solltest Du den Trigger noch verfeinern,
denn der wird nun unnötigerweise bei jedem Event des WS ausgelöst - sollte
reichen, wenn das bei einem Temp-Update feuert. ;-)

Gruß
Torsten

2012/11/23 JoachimM

> Hallo,
>
> danke, das habe ich auch im letzen Moment gesehen. Schade, das wars aber
> nicht.
>
> Am Freitag, 23. November 2012 19:34:28 UTC+1 schrieb Borsti67:
>>
>> my $wunsch-temp
>>
>> if ($ist-temp < $w-temp)
>>>
>>
>> ???
>>
>  --
> To unsubscribe from this group, send email to
> fhem-users+unsubscribe@googlegroups.com
>

--
To unsubscribe from this group, send email to
fhem-users+unsubscribe@googlegroups.com
Titel: Re: Hilfe zu FHEM/Perl
Beitrag von: Martin Fischer am 23 November 2012, 20:31:40
Am Freitag, 23. November 2012, 10:26:57 schrieb JoachimM:
> [...]
> my $wunsch-temp = ReadingsVal("Wunschtemperatur","state","99");;

hier setzt du die variable "$wunsch-temp"

hier

> if ($ist-temp < $w-temp)

und hier

> elseif ($ist-temp > $w-temp +1)

prüfst du "$w-temp"

"joachim" ungleich "jochen"

gruss..

--
To unsubscribe from this group, send email to
fhem-users+unsubscribe@googlegroups.com