EISMAN
22.10.2006, 07:58
Hi!
Ich habe hier ein Lehrbuch, sowohl für Assembler als auch für BASCOM. Mit Assembler funktioniert es, aber das nützt mir nix...
Also PIND 6 und PIND 7 sollen verglichen werden --- Jenachdem ob die Spannung niedriger oder höher ist, soll an PIND 5 High bzw. Low ausgegeben werden..
So steht es im Buch, was aber nicht funktioniert..
$regfile = "m8def.dat" 'Prozessortyp
$crystal = 3686400 'Taktfrequenz
Ddrd = &B00100000
Acsr = &B00000000
Do
If Acsr.aco = 1 Then
Portd.5 = 1
Else
Portd.5 = 0
End If
Loop
End
Ein bisschen irretiert mit "Ddrd = &B00100000" da ja an PortD.5 Der zustand ausgegeben wird.. Ich habe es zb auchmal auf Ddrd.5 = 1 geändert aber es funzt auch nicht :(
Dann vermute ich, dass der Comparator erst initialisiert werden muss, steht aber nicht im Buch drinne (sonst haben alle bsps immer funktioniert)
Ich hoffe ihr könnt mir weiterhelfen
Gruss Axel!
Ich habe hier ein Lehrbuch, sowohl für Assembler als auch für BASCOM. Mit Assembler funktioniert es, aber das nützt mir nix...
Also PIND 6 und PIND 7 sollen verglichen werden --- Jenachdem ob die Spannung niedriger oder höher ist, soll an PIND 5 High bzw. Low ausgegeben werden..
So steht es im Buch, was aber nicht funktioniert..
$regfile = "m8def.dat" 'Prozessortyp
$crystal = 3686400 'Taktfrequenz
Ddrd = &B00100000
Acsr = &B00000000
Do
If Acsr.aco = 1 Then
Portd.5 = 1
Else
Portd.5 = 0
End If
Loop
End
Ein bisschen irretiert mit "Ddrd = &B00100000" da ja an PortD.5 Der zustand ausgegeben wird.. Ich habe es zb auchmal auf Ddrd.5 = 1 geändert aber es funzt auch nicht :(
Dann vermute ich, dass der Comparator erst initialisiert werden muss, steht aber nicht im Buch drinne (sonst haben alle bsps immer funktioniert)
Ich hoffe ihr könnt mir weiterhelfen
Gruss Axel!