Code:
.Include "m32def.inc"
.DEF tmp = R16
.DEF lowad = R17
.DEF highad = R18
.EQU wertadlow = 0x60
.EQU wertadhigh = 0x61
ldi tmp,(1<<ADEN)|(1<<ADPS1)|(1<<ADPS2)
out ADCSRA, tmp
ldi tmp,(1<<REFS0)|(1<<MUX2)|(1<<MUX1)|(1<<MUX0)
out ADMUX, tmp
sbi ADCSRA, ADSC ;Das Bit ADSC wird gesetzt und der ADC startet.
wait:
sbis ADCSRA,ADIF ;Das ADIF wird abgefragt, ob eine Spannung anliegt.
rjmp wait ;Warteschleife bis Spannung anliegt.
in lowad, ADCL ;Das Low-Byte des ADCs wird ausgelesen.
in highad, ADCH ;Das High-Byte wird ausgelesen.
;Überprüfung ob Werte im sinnvollen Bereich sind.
u1:
ldi R21,0x00
sub R21,highad
brmi u2
ldi R21,0x14 ;Es wird 20 vom gesamten ADC-Wert abgezogen.
sub R21,lowad
brmi write1
u2:
ldi R21,0x02 ;Es wird erst ab Wert 768 nicht mehr in EEPROM geschrieben.
sub R21,highad
brpl write1
rjmp wait ;Falls Werte nicht zwischen 20 und 768 -->wait
write1:
sbic EECR,EEWE ;Ist der Schreibzyklus beendet, PC = PC +2
rjmp write1
ldi R19, 0xF0 ;Festlegen der Zieladresse.
ldi R20, 0x00
out EEARH, R20 ;Die Zieladresse des EEPROM wird übertragen.
out EEARL, R19
;Als Nächstes wird das Low-Byte des ADCs abgespeichert.
out EEDR, highad ;Byte in Zwischenspeicher laden.
;Folgende 2 Befehle sorgen dafür, dass der Wert im Zwischenspeicher nun endgültig in der Zieladresse des EEPROMs abgespeichert wird.
sbi EECR,EEMWE
sbi EECR,EEWE
write2:
sbic EECR,EEWE ;Ist der Schreibzyklus beendet, PC = PC +2
rjmp write2
;Nun wird die nächste Zieladresse festgelegt und das High-Byte des ADCs abgespeichert.
inc R19
out EEARL, R19 ;Es muss nur das Low-Byte geändert werden.
out EEDR, lowad
sbi EECR,EEMWE
sbi EECR,EEWE
;Abfrage Bereich 110 bis 130
ldi R21,0x00
sub R21,highad
brmi ende
ldi R21,0x5A
sub R21,lowad
brpl ende
ldi R21,0x7D
sub R21,lowad
brmi ende
;LED1 leuchtet bei Taste 5
led1:
ldi R22,0x01
out DDRC,R22
ldi R22,0b11111110
out PORTC,R22
ende:
;Ende
Ich verstehe nicht, wo mein Fehler liegt und wo ich ihn suchen soll.
Lesezeichen