![\"AVR-Beschaltung\"](\"http:\/\/www.skie.info\/wp-content\/uploads\/Standard-Schaltung.png\" "\\"Standard-Schaltung\\"")
<\/a>Einige Atmegas 88PA altern hier in der Kiste vor sich her und ich dachte zumindest einer k\u00f6nnte mal was tun f\u00fcr seine Daseinsberechtigung. Also hab ich mal ein Standardlayout auf meinem Rechner rausgesucht und ging ein wenig ans Platinen \u00e4tzen. Ein LM50 zum Temperaturmessen war leider grade nicht verf\u00fcgbar aber ein LM335z samt 2k2 Vorwiderstand an PC2 ist auch ganz hervorragend. Ein Crydom HD48125 (an PC1 angeschlossen, SSR - Solid-State-Relay) schaltet den Laminator entsprechend ein und aus.<\/p>\nDer Programmcode ist sehr einfach gehalten. Das komplizierteste ist die Konfiguration des Analog-Digital-Convertes (ADC). Alle 20 Minuten misst der Atmega gleich vier mal hintereinander die Temperatur und bildet den Mittelwert aus den vier Messungen. Wird 2 \u00b0C oder weniger gemessen wird f\u00fcr 10 Minuten der Laminator eingeschaltet. Der komplette Code fordert nicht mal 1% der Kapazit\u00e4t des Atmegas. \u00dcbrigens: RS232 ist mehr schein denn sein: Ich war nur zu faul zum L\u00f6schen aus dem Plan.<\/p>\n
#ifndef F_CPU<\/p>\n
#define F_CPU 8000000<\/p>\n
#endif<\/p>\n
#include <avr\/io.h><\/p>\n
#include <util\/delay.h><\/p>\n
#define Solltemp 563 \/\/entspricht ca. +2\u00b0C<\/p>\n
\/* ADC initialisieren *\/<\/p>\n
void ADC_Init(void) {<\/p>\n
uint16_t result;<\/p>\n
ADMUX = (0<<REFS1) | (1<<REFS0);\u00a0 \u00a0 \u00a0 \/\/ AVcc als Referenz benutzen<\/p>\n
\/\/\u00a0 ADMUX = (1<<REFS1) | (1<<REFS0);\u00a0 \u00a0 \u00a0 \/\/ interne Referenzspannung nutzen<\/p>\n
ADCSRA = (1<<ADPS1) | (1<<ADPS0); \u00a0 \u00a0 \/\/ Frequenzvorteiler<\/p>\n
ADCSRA |= (1<<ADEN);\u00a0 \u00a0 \u00a0 \u00a0 \u00a0 \u00a0 \u00a0 \u00a0 \u00a0 \/\/ ADC aktivieren<\/p>\n
\/* nach Aktivieren des ADC wird ein \"Dummy-Readout\" empfohlen, man liest<\/p>\n
also einen Wert und verwirft diesen, um den ADC \"warmlaufen zu lassen\" *\/<\/p>\n
ADCSRA |= (1<<ADSC);\u00a0 \u00a0 \u00a0 \u00a0 \u00a0 \u00a0 \u00a0 \u00a0 \u00a0 \/\/ eine ADC-Wandlung<\/p>\n
while (ADCSRA & (1<<ADSC) ) {}\u00a0 \u00a0 \u00a0 \u00a0 \/\/ auf Abschluss der Konvertierung warten<\/p>\n
\/* ADCW muss einmal gelesen werden, sonst wird Ergebnis der n\u00e4chsten<\/p>\n
Wandlung nicht \u00fcbernommen. *\/<\/p>\n
result = ADCW;<\/p>\n
}<\/p>\n
\/* ADC Einzelmessung *\/<\/p>\n
uint16_t ADC_Read( uint8_t channel )<\/p>\n
{<\/p>\n
\/\/ Kanal waehlen, ohne andere Bits zu beeinflu\ufb02en<\/p>\n
ADMUX = (ADMUX & ~(0x1F)) | (channel & 0x1F);<\/p>\n
ADCSRA |= (1<<ADSC);\u00a0 \u00a0 \u00a0 \u00a0 \u00a0 \u00a0 \/\/ eine Wandlung \"single conversion\"<\/p>\n
while (ADCSRA & (1<<ADSC) ) {}\u00a0 \/\/ auf Abschluss der Konvertierung warten<\/p>\n
return ADCW;\u00a0 \u00a0 \u00a0 \u00a0 \u00a0 \u00a0 \u00a0 \u00a0 \u00a0 \u00a0 \/\/ ADC auslesen und zur\u00fcckgeben<\/p>\n
}<\/p>\n
\/* ADC Mehrfachmessung mit Mittelwertbbildung *\/<\/p>\n
uint16_t ADC_Read_Avg( uint8_t channel, uint8_t average )<\/p>\n
{<\/p>\n
uint32_t result = 0;<\/p>\n
for (uint8_t i = 0; i < average; ++i )<\/p>\n
result += ADC_Read( channel );<\/p>\n
return (uint16_t)( result \/ average );<\/p>\n
}<\/p>\n
int main(void) {<\/p>\n
uint16_t i = 0;<\/p>\n
DDRB = 0;<\/p>\n
PORTB = 0;<\/p>\n
DDRC = (1 << PC3); \/\/PC3 als Eingang eingestellt<\/p>\n
PORTC = 0;<\/p>\n
DDRD = 0;<\/p>\n
PORTD = 0;<\/p>\n
uint16_t adcval = 0;<\/p>\n
ADC_Init();<\/p>\n
while(1) {<\/p>\n
adcval = ADC_Read_Avg(2, 4); \/\/4 Messungen auf Kanal 2<\/p>\n
if (adcval <= Solltemp){<\/p>\n
PORTC |= (1 << PC3);<\/p>\n
for (i = 0; i < 600; i++){<\/p>\n
_delay_ms(1000);<\/p>\n
}<\/p>\n
PORTC &= ~(1 << PC3);<\/p>\n
for (i = 0; i < 600; i++){<\/p>\n
_delay_ms(1000);<\/p>\n
}<\/p>\n
}<\/p>\n
else {<\/p>\n
for (i=0; i < 1200; i++){<\/p>\n
_delay_ms(1000);<\/p>\n
}<\/p>\n
}<\/p>\n
}<\/p>\n
return 0;<\/p>\n
}<\/p><\/blockquote>\n
Ich wei\u00df, ich wei\u00df. Der Kundige AVR-Programmierer wird nun sagen:<\/p>\n
\"WAS?!? Der nimmt _delay_ms() und ne for-Schleife f\u00fcr 10 Minuten warten? Sowas macht man doch mit Timern!\"<\/p><\/blockquote>\n
Dazu kann ich nur folgendes sagen:<\/p>\n
\n
- F\u00fcr meine Anwendung ist es v\u00f6llig wurscht ob es nun 10 Minuten sind oder 10 Minuten und 3 Sekunden<\/li>\n
- Eine eigene Timerfunktion f\u00fcr 10 Minuten zu schreiben h\u00e4tte mich sicher mehr Zeit gekostet als das ganze Projekt (2.5h wobei 2h f\u00fcr die Platine samt L\u00f6tstopplaminat draufgegangen sind)<\/li>\n
- delay.h war grad verf\u00fcgbar<\/li>\n<\/ol>\n
Den Code f\u00fcr den ADC hab ich \u00fcbrigens auch aus dem Internet gefischt, ich glaub aus dem AVR-GCC-Tutorial von\u00a0http:\/\/www.mikrocontroller.net<\/a>.<\/p>\n
Die meiste Zeit hat eigentlich die Suche nach einem passenden Beh\u00e4ltnis f\u00fcr die Heizung in anspruch genommen. Gl\u00fccklicher Weise gab es Sperrmuss und jemand hat eine K\u00fcche entsorgt deren H\u00e4ngeschr\u00e4nke genau auf meine Anforderungen passte. So steht nun in meinem Spind ein H\u00e4ngeschrank aus Kiefernholz (massiv!) in dem die M\u00f6hren lagern. Auf einen Einlegeboden wurde das Innenleben des Laminators wie die Steuerungseinheit samt Atmega geschraubt. In den letzten Tagen war es schon recht k\u00fchl und die Heizung war schon in betrieb. Weder sind bisher die M\u00f6hren eingefroren noch ist der Stall abgebrannt. Es scheint zu funktionieren, was ich mir hier \u00fcberlegt haben.<\/p>\n","protected":false},"excerpt":{"rendered":"
Die M\u00f6hrenheizung f\u00fcr angenehm temperierte Wurzel w\u00e4hrend der kalten Jahreszeit. Hier eine Beschreibung was ich da zusammengebaut habe. Weiterlesen