Temperaturabhängige Lüftersteuerung: Unterschied zwischen den Versionen

Aus Ethersex_Wiki
Wechseln zu: Navigation, Suche
(Die Seite wurde neu angelegt: „<source lang="c"> CONTROL_START THREAD(mainloop) ON ONCE (1) DO dnl 0.425: x/600*255 (60° will result in 255 => maximum fan speed) …“)
 
Zeile 1: Zeile 1:
 
<source lang="c">
 
<source lang="c">
 
+
dnl ################################################################################
 +
dnl #                                                                              #
 +
dnl #  Copyright (c) 2011 by Maximilian Güntner <maximilian.guentner@gmail.com>    #
 +
dnl #                                                                              #
 +
dnl # This program is free software; you can redistribute it and/or modify it      #
 +
dnl # under the terms of the GNU General Public License (either version 2 or      #
 +
dnl # version 3) as published by the Free Software Foundation.                    #
 +
dnl # This program is distributed in the hope that it will be useful,              #
 +
dnl # but WITHOUT ANY WARRANTY; without even the implied warranty of              #
 +
dnl # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the                #
 +
dnl # GNU General Public License for more details.                                #
 +
dnl #                                                                              #
 +
dnl # You should have received a copy of the GNU General Public License            #
 +
dnl # along with this program; if not, write to the Free Software                  #
 +
dnl # Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.                    #
 +
dnl #                                                                              #
 +
dnl # For more information on the GPL, please go to:                              #
 +
dnl # http://www.gnu.org/copyleft/gpl.html                                        #
 +
dnl #                                                                              #
 +
dnl ################################################################################
 
CONTROL_START
 
CONTROL_START
 
THREAD(mainloop)
 
THREAD(mainloop)
 
         ON ONCE (1) DO
 
         ON ONCE (1) DO
 
                 dnl 0.425: x/600*255 (60° will result in 255 => maximum fan speed)
 
                 dnl 0.425: x/600*255 (60° will result in 255 => maximum fan speed)
                 double newvalue=0.425*(ONEWIRE_GET(28a4aae002000017));
+
                 double newvalue=0.425*(ONEWIRE_GET(28a419e002000017));
 
                 dnl Set fan to maximum
 
                 dnl Set fan to maximum
 
                 if (newvalue > 255)
 
                 if (newvalue > 255)
Zeile 30: Zeile 49:
 
END
 
END
 
CONTROL_END
 
CONTROL_END
 
 
</source>
 
</source>
 
[[Kategorie:PWM]]
 
[[Kategorie:PWM]]

Version vom 31. Mai 2011, 11:46 Uhr

dnl ################################################################################
dnl #                                                                              #
dnl #  Copyright (c) 2011 by Maximilian Güntner <maximilian.guentner@gmail.com>    #
dnl #                                                                              #
dnl # This program is free software; you can redistribute it and/or modify it      #
dnl # under the terms of the GNU General Public License (either version 2 or       #
dnl # version 3) as published by the Free Software Foundation.                     #
dnl # This program is distributed in the hope that it will be useful,              #
dnl # but WITHOUT ANY WARRANTY; without even the implied warranty of               #
dnl # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the                #
dnl # GNU General Public License for more details.                                 #
dnl #                                                                              #
dnl # You should have received a copy of the GNU General Public License            #
dnl # along with this program; if not, write to the Free Software                  #
dnl # Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.                    #
dnl #                                                                              #
dnl # For more information on the GPL, please go to:                               #
dnl # http://www.gnu.org/copyleft/gpl.html                                         #
dnl #                                                                              #
dnl ################################################################################
CONTROL_START
THREAD(mainloop)
        ON ONCE (1) DO
                dnl 0.425: x/600*255 (60° will result in 255 => maximum fan speed)
                double newvalue=0.425*(ONEWIRE_GET(28a419e002000017));
                dnl Set fan to maximum
                if (newvalue > 255)
                        OCR2A = 0;
                dnl Disable the fan, cooling makes no sense
                else if(newvalue < 120)
                        OCR2A = 255;
                dnl Set the fan to the dynamic value
                else
                        OCR2A = 255-(uint8_t) newvalue;
        END
THREAD_END(mainloop)

ON STARTUP DO
        dnl PD7 has to be output
        DDRD |= 0b10000000;
        dnl FastPWM
        TCCR2A = (1 << COM2A1) | (1 << COM2A0) | (1 << WGM21) | (1 << WGM20);
        dnl Prescaler: 256
        TCCR2B = (1 << CS22) | (1 << CS21);
        dnl Maximum Speed
        OCR2A = 0;
        THREAD_START(mainloop)
END
CONTROL_END