|
From: <j-...@us...> - 2012-07-06 16:07:11
|
Revision: 912
http://openautomation.svn.sourceforge.net/openautomation/?rev=912&view=rev
Author: j-n-k
Date: 2012-07-06 16:07:04 +0000 (Fri, 06 Jul 2012)
Log Message:
-----------
Erfuellen scheinbar nicht die Qualitaetskriterien
Removed Paths:
-------------
wiregate/plugin/generic/Fensterstatus.pl
wiregate/plugin/generic/Heizung.pl
Deleted: wiregate/plugin/generic/Fensterstatus.pl
===================================================================
--- wiregate/plugin/generic/Fensterstatus.pl 2012-07-06 14:42:12 UTC (rev 911)
+++ wiregate/plugin/generic/Fensterstatus.pl 2012-07-06 16:07:04 UTC (rev 912)
@@ -1,51 +0,0 @@
-# Plugin zum Erfassen des Gesamt-Fenster-Status
-# Version 0.3 / 24.09.2011
-# Copyright: JNK (http://knx-user-forum.de/members/jnk.html)
-# License: GPL (v2)
-#
-
-####################
-###Einstellungen:###
-####################
-
-my @Fenster_GA = ('7/7/7', '7/7/8'); # hier alle Fenster-Einzel-GA
-my $Sammel_GA = '7/7/9'; # hier die Sammel-GA
-my $zustand_geschlossen = 01; # auf richtige polarit\xE4t achten!
-my $zustand_offen = 00;
-
-######################
-##ENDE Einstellungen##
-######################
-
-#
-# Flossen weg, der Rest geht automatisch
-#
-$plugin_info{$plugname.'_cycle'} = 0; # nur bei Telegramm aufrufen
-
-if (($msg{'apci'} eq 'A_GroupValue_Write') && (grep {$_ eq $msg{'dst'};} @Fenster_GA)) {
- # Telegramm auf einer Einzel-GA erhalten
- my $status = $zustand_geschlossen; # mit geschlossen anfangen
- my $old_status = $plugin_info{$plugname.'_oldstatus'};
- foreach my $GA (@Fenster_GA) {
- if (knx_read($GA, 0, 1) == $zustand_offen) { # da war eine 'offen', also Status auf 1 setzen
- $status = $zustand_offen;
- last;
- }
- }
- if ($old_status != $status){ #
- knx_write($Sammel_GA, $status, 1); # Status hat sich geaendert, senden
- $plugin_info{$plugname.'_oldstatus'} = $status; # neuen Status speichern
- return 'Sent Value'.$status;
- }
- return 0; # nichts gesendet, Also
-}
-
-# keine Telegramme, also Init
-
-foreach my $GA (@Fenster_GA) { # an allen Fenster-Einzel-GA anmelden
- $plugin_subscribe{$GA}{$plugname} = 1;
-}
-# bis zum Beweis des Gegenteils sind alle Fenster zu
-$plugin_info{$plugname.'_oldstatus'} = $zustand_geschlossen;
-
-return 'Init';
\ No newline at end of file
Deleted: wiregate/plugin/generic/Heizung.pl
===================================================================
--- wiregate/plugin/generic/Heizung.pl 2012-07-06 14:42:12 UTC (rev 911)
+++ wiregate/plugin/generic/Heizung.pl 2012-07-06 16:07:04 UTC (rev 912)
@@ -1,58 +0,0 @@
-# Plugin zum Erfassen des Gesamt-Fenster-Status
-# Version 0.1 / 18.05.2011
-# Copyright: JNK (http://knx-user-forum.de/members/jnk.html)
-# License: GPL (v2)
-#
-
-####################
-###Einstellungen:###
-####################
-
-my $schritt_ga = '4/1/3'; # Gruppenadresse Sollwert Auf = 1 / Ab = 0
-my $sollwert_ga = '4/2/3'; # Gruppenadresse Sollwert
-my $sollwert = 15;
-my $sollwertmin = 10; # Sollwert Minimum
-my $sollwertmax = 25; # Sollwert Maximum
-
-
-######################
-##ENDE Einstellungen##
-######################
-
-# Eigenen Aufruf-Zyklus auf 1x st\xFCndlich setzen, h\xF6rt ja auf GA
-$plugin_info{$plugname.'_cycle'} = 3600;
-$sollwert = $plugin_info{$plugname.'_sollwert'};
-
-# Plugin an Gruppenadresse "anmelden"
-$plugin_subscribe{$schritt_ga}{$plugname} = 1;
-$plugin_subscribe{$sollwert_ga}{$plugname} = 1;
-
-# 1=auf, 0=ab
-if ($msg{'apci'} eq "A_GroupValue_Write" && $msg{'dst'} eq $schritt_ga && defined $msg{'value'} && $msg{'value'} == "0" ) {
- if($sollwert>$sollwertmin) {
- $sollwert -= 0.5;
- knx_write($sollwert_ga,$sollwert,9);
- $plugin_info{$plugname.'_sollwert'} = $sollwert;
- return 1;
- }
-}
-
-if ($msg{'apci'} eq "A_GroupValue_Write" && $msg{'dst'} eq $schritt_ga && defined $msg{'value'} && $msg{'value'} == "1" ) {
- if($sollwert<$sollwertmax) {
- $sollwert += 0.5;
- knx_write($sollwert_ga,$sollwert,9);
- $plugin_info{$plugname.'_sollwert'} = $sollwert;
- return 1;
- }
-}
-
-#Sollwert vom Bus lesen, wenn von dort gesendet
-if ($msg{'apci'} eq "A_GroupValue_Write" && $msg{'dst'} eq $sollwert_ga ) {
- $msg{'value'} = decode_dpt9($msg{'data'});
- $plugin_info{$plugname.'_sollwert'} = $msg{'value'};
- return 2;
-}
-
-knx_write($sollwert_ga,$sollwert,9);
-
-return 0;
This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.
|