ROST
11.02.2006, 19:01
Wer kann mir helfen?
Habe auf dem STK500 einen AT90S8535 laufen. Ich möchte nun eine Spannung an ADC0 (Poti angeschlossen) messen und an die an PortD angeschlossenen Led ausgeben. Am Simulator läuft das Programm, nicht aber auf dem Board was mache ich falsch?
.INCLUDE "8535def.inc"
.LIST
.CSEG
.ORG $0000
.def AKanal = r19
init:
ldi r16, LOW(RAMEND)
out SPL, r16
ldi r16, HIGH(RAMEND)
out SPH, R16
ldi AKanal,0
ldi r16, 0xFF
out DDRd, r16
loop:
mov r16,AKanal
out ADMUX, r16
ldi r16, 0b10000111
out ADCSR,r16
sbi ADCSR,ADSC
Wait:
sbis ADCSR,ADIF
rjmp Wait
in r17,ADCL
in r18,ADCH
lsr r18
ror r17
lsr r18
ror r17
com r17
out Portd,r17
rjmp loop
Habe auf dem STK500 einen AT90S8535 laufen. Ich möchte nun eine Spannung an ADC0 (Poti angeschlossen) messen und an die an PortD angeschlossenen Led ausgeben. Am Simulator läuft das Programm, nicht aber auf dem Board was mache ich falsch?
.INCLUDE "8535def.inc"
.LIST
.CSEG
.ORG $0000
.def AKanal = r19
init:
ldi r16, LOW(RAMEND)
out SPL, r16
ldi r16, HIGH(RAMEND)
out SPH, R16
ldi AKanal,0
ldi r16, 0xFF
out DDRd, r16
loop:
mov r16,AKanal
out ADMUX, r16
ldi r16, 0b10000111
out ADCSR,r16
sbi ADCSR,ADSC
Wait:
sbis ADCSR,ADIF
rjmp Wait
in r17,ADCL
in r18,ADCH
lsr r18
ror r17
lsr r18
ror r17
com r17
out Portd,r17
rjmp loop