dibahh
11.10.2006, 15:08
Also folgendes Problem!
Ich habe mit einen µC zusammen gebastelt und bekomme irgendwie diese einfache funktion nicht hin - leuchten tut die LED aber reagiert nicht auf den Taster!
$regfile = "m32def.dat"
$crystal = 16000000
Ddra = &B11111111
Porta = &B00000000
Ddrb = &B11111111
Portb = &B00000000
'Ddrc = &B11111000
'Portc = &B00000111
Ddrd = &B11111000
Portd = &B00000111
Config Pinc.3 = Input
'Taster_1 Alias Pinc.3
Portc.3 = 0
Config Portc.4 = Output
'config Pinc.3 = Input
'Config Portc.4 = Output
'Portc.3 = 1
Do
If Pinc.3 = 0 Then
Portc.4 = 1
End If
Loop
Die beschaltung sie folgender maßen aus!
5V+
|
|
\ - Taster
\_
|
|------------------- zum µC Mega32
|
---
| |
| | 10K
---
|
|
GND
BITTE HELFT MIR!!!
Ich habe mit einen µC zusammen gebastelt und bekomme irgendwie diese einfache funktion nicht hin - leuchten tut die LED aber reagiert nicht auf den Taster!
$regfile = "m32def.dat"
$crystal = 16000000
Ddra = &B11111111
Porta = &B00000000
Ddrb = &B11111111
Portb = &B00000000
'Ddrc = &B11111000
'Portc = &B00000111
Ddrd = &B11111000
Portd = &B00000111
Config Pinc.3 = Input
'Taster_1 Alias Pinc.3
Portc.3 = 0
Config Portc.4 = Output
'config Pinc.3 = Input
'Config Portc.4 = Output
'Portc.3 = 1
Do
If Pinc.3 = 0 Then
Portc.4 = 1
End If
Loop
Die beschaltung sie folgender maßen aus!
5V+
|
|
\ - Taster
\_
|
|------------------- zum µC Mega32
|
---
| |
| | 10K
---
|
|
GND
BITTE HELFT MIR!!!