Erst einmal Hallo zusammen,
ich habe meinem ersten AVR-Board ein Problem.
Ich nutze folgenden Code, um die LED'S an PORT C anzusteuern:
Nun leuchten aber nur die LED's 1,2,7,8 die LED's 3,4,5,6 bleiben dunkel.Code:$crystal = 1000000 $regfile = "m16def.dat" Dim I As Integer Dim N As Integer Config Portc = Output For N = 1 To 100 For I = 0 To 7 Portc.i = 0 Waitms 100 Portc.i = 1 Next I Next N
Elektrisch sollte es funktionieren. Ich habe den MEGA 16 demontiert und die Pin's mit nem Draht auf Masse gelegt. Alle LED's leuchten dann.
Auch einen anderen M16 habe ich ausprobiert. Das gleiche Ergebnis.
Was habe ich falsch gemacht? Warum leuchten die mittleren LED's nicht?
Ich danke Euch für die Hilfe
Gruß Ingo







Zitieren
Lesezeichen