mirror of
https://github.com/fhem/fhem-mirror.git
synced 2025-01-31 18:59:33 +00:00
10_DUOFERNSTICK.pm/30_DUOFERN.pm: fix remotePair
git-svn-id: https://svn.fhem.de/fhem/trunk@23892 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
parent
3135b32e7c
commit
623147eac0
@ -5,6 +5,7 @@ package main;
|
|||||||
|
|
||||||
use strict;
|
use strict;
|
||||||
use warnings;
|
use warnings;
|
||||||
|
use DevIo;
|
||||||
|
|
||||||
sub DUOFERNSTICK_Read($);
|
sub DUOFERNSTICK_Read($);
|
||||||
sub DUOFERNSTICK_Ready($);
|
sub DUOFERNSTICK_Ready($);
|
||||||
@ -32,14 +33,12 @@ my $duoStartPair = "04000000000000000000000000000000000000000000";
|
|||||||
my $duoStopPair = "05000000000000000000000000000000000000000000";
|
my $duoStopPair = "05000000000000000000000000000000000000000000";
|
||||||
my $duoStartUnpair = "07000000000000000000000000000000000000000000";
|
my $duoStartUnpair = "07000000000000000000000000000000000000000000";
|
||||||
my $duoStopUnpair = "08000000000000000000000000000000000000000000";
|
my $duoStopUnpair = "08000000000000000000000000000000000000000000";
|
||||||
my $duoRemotePair = "0D0006010000000000000000000000000000yyyyyy01";
|
my $duoRemotePair = "0D0106010000000000000000000000000000yyyyyy00";
|
||||||
|
|
||||||
sub DUOFERNSTICK_Initialize($)
|
sub DUOFERNSTICK_Initialize($)
|
||||||
{
|
{
|
||||||
my ($hash) = @_;
|
my ($hash) = @_;
|
||||||
|
|
||||||
require "$attr{global}{modpath}/FHEM/DevIo.pm";
|
|
||||||
|
|
||||||
$hash->{ReadFn} = "DUOFERNSTICK_Read";
|
$hash->{ReadFn} = "DUOFERNSTICK_Read";
|
||||||
$hash->{ReadyFn} = "DUOFERNSTICK_Ready";
|
$hash->{ReadyFn} = "DUOFERNSTICK_Ready";
|
||||||
$hash->{WriteFn} = "DUOFERNSTICK_Write";
|
$hash->{WriteFn} = "DUOFERNSTICK_Write";
|
||||||
@ -449,7 +448,7 @@ DUOFERNSTICK_SimpleWrite(@)
|
|||||||
|
|
||||||
#####################################
|
#####################################
|
||||||
sub
|
sub
|
||||||
DUOFERNSTICK_ReadAnswer($$$$)
|
DUOFERNSTICK_ReadAnswer($$)
|
||||||
{
|
{
|
||||||
my ($hash, $arg) = @_;
|
my ($hash, $arg) = @_;
|
||||||
my $ohash = $hash;
|
my $ohash = $hash;
|
||||||
|
@ -6,6 +6,7 @@ package main;
|
|||||||
use strict;
|
use strict;
|
||||||
use warnings;
|
use warnings;
|
||||||
use SetExtensions;
|
use SetExtensions;
|
||||||
|
use DevIo;
|
||||||
|
|
||||||
my %devices = (
|
my %devices = (
|
||||||
"40" => {"name" => "RolloTron Standard" },
|
"40" => {"name" => "RolloTron Standard" },
|
||||||
@ -567,7 +568,7 @@ my %setsHSA = (
|
|||||||
|
|
||||||
my $duoStatusRequest = "0DFFnn400000000000000000000000000000yyyyyy01";
|
my $duoStatusRequest = "0DFFnn400000000000000000000000000000yyyyyy01";
|
||||||
my $duoCommand = "0Dccnnnnnnnnnnnnnnnnnnnn000000zzzzzzyyyyyy00";
|
my $duoCommand = "0Dccnnnnnnnnnnnnnnnnnnnn000000zzzzzzyyyyyy00";
|
||||||
my $duoCommand2 = "0Dccnnnnnnnnnnnnnnnnnnnn000000000000yyyyyy01";
|
my $duoCommand2 = "0Dccnnnnnnnnnnnnnnnnnnnn000000000000yyyyyy00";
|
||||||
my $duoWeatherConfig = "0D001B400000000000000000000000000000yyyyyy00";
|
my $duoWeatherConfig = "0D001B400000000000000000000000000000yyyyyy00";
|
||||||
my $duoWeatherWriteConfig = "0DFF1Brrnnnnnnnnnnnnnnnnnnnn00000000yyyyyy00";
|
my $duoWeatherWriteConfig = "0DFF1Brrnnnnnnnnnnnnnnnnnnnn00000000yyyyyy00";
|
||||||
my $duoSetTime = "0D0110800001mmmmmmmmnnnnnn0000000000yyyyyy00";
|
my $duoSetTime = "0D0110800001mmmmmmmmnnnnnn0000000000yyyyyy00";
|
||||||
|
Loading…
Reference in New Issue
Block a user