hm, sorry das ich so blöd bin.
habe schon alles auspobiert, was ich probiern könnte.
nun wolte ich erst nur mit einem PORT (8 bit) machen und schauen, ob es überhaupt funktioniert.
habe sowas geschrieben:
Code:
$regfile = "m32def.dat"
$crystal = 1000000

Dim Pac As Byte

Portb = Pac
Do
Pac = Gray2bin(pac)

Porta = Pac

Wait 1
Loop
end
es funktioniert aber nicht. kommt am PORTA nichts raus.
Der µC ist ok...
"PORTA = 3" funktioniert. Gibt er 11000000 raus.
Wo ist mein Fehler?
Danke