English VersionAber auch für Schaufensterdekos, Tuning, Modellbau sehr interessant!
Das ASM-File zum Download gibts hier, fertig programmierte Controller auf Anfrage.
Das Programm selbst ist recht einfach, aber es verwendet eine Reihe von Techniken, welche auch in grösseren Projekten benötigt werden, z.B.
Lesen aus dem EEPROM
Timer-Interrupt
Software-Counter
In der Hauptroutine des Programms wird lediglich das PWM Signal erzeugt. Über den Timer Interrupt wird die Helligkeit periodisch zwischen einem Minimum und einem Maximum gesteuert, wobei das Hellerwerden schneller erfolgt als das Dunklerwerden. Dies erzeugt ein sehr realistisches optisches Pulsieren!
Das Programm wurde mit AVR Studio 4.10 erstellt.
Beim Programmieren bitte den OSCCAL-Wert in die EEPROM-Zelle $3f speichern!
| ;Hearbeat LED ;(C) 2004 Markus Vohburger ;Gewerbliche Nutzung untersagt. ; ;Registerdefinitionen für Tiny12 ladan .include "tn12def.inc" .def temp1 = r16 .def temp2 = r17 .def output = r18 ;Software-Zähler .def swcount = r19 .def output = r20 ;Zähler für PWM .def pwmcount = r21 ;Richtung heller oder dunkler .def direction = r25 ;Wert für PWM .def pwmvalue = r27 ;Kalibrierbyte für internen Oszillator ist in EEPROM $3f gespeichert .equ EE_OSCCAL= $3f; ;reset-Vektor .org $0000 rjmp main ;Timer 0 Overflow Interrupt Vektor ;timer overflow interrut handler .org OVF0Addr rjmp OVF0Handler ;Hauptprogramm beginnt hier .org $0010 main: ;set internal osc cal ldi temp1,EE_OSCCAL rcall readeeprom out osccal,temp1 ;Ports Setup ldi temp1,$1f out ddrb,temp1 ldi temp1,$1f out portb,temp1 clr pwmcount clr pwmvalue clr direction ;Timer zurücksetzen clr temp1 out tcnt0,temp1 ;Timer interrupts an ldi temp1,(1<<toie0) out timsk,temp1 ;Timer starten ldi temp1,$02 out tccr0,temp1 ldi swcount,0 sei ;hauptschleife, implementiert die PWM loop: ;leds aus ldi output,$1f check_value: cp pwmvalue,pwmcount brsh writeoutput ;leds an (PB0 bis PB2) andi output,$18 writeoutput: out portb,output inc pwmcount rjmp loop ;subroutine zum Lesen aus EEprom readeeprom: sbic eecr,eewe rjmp readeeprom out eear,temp1 in temp1,eedr ret ;Timer 0 Interrupthandler OVF0Handler: ;statusregister sichern in r1,sreg ;Softwarezähler erhöhen inc swcount cpi swcount,$04 brlo exit_ovf0handler clr swcount cpi direction,$00 breq dodec ;pwmwert erhöhen doinc: inc pwmvalue cpi pwmvalue,$80 brlo exit_ovf0handler clr direction ldi pwmvalue,$80 rjmp exit_ovf0handler ;pwmwert verringern ;das Verringern geschieht doppelt so schnell wie das Erhöhen, um den Effekt zu verbessern dodec: dec pwmvalue dec pwmvalue cpi pwmvalue,$01 brsh exit_ovf0handler ldi pwmvalue,$01 ldi direction,$01 ;ende der Timer 0 Interrupt Routine exit_ovf0Handler: out sreg,r1 reti |
Weitere Informationen,Grundlagen,Bauanleitung,Schaltplan, Links zum Thema
Anzeigen: