Anfängerfrage: Wie bekomme ich eine LED zum Leuchten?

[Freddy4]

Hallo zusammen!

Als Anfänger hat man so seine Probleme, deswegen die Anfrage an die Experten:

Ich habe ein STK200 und versuche schon seit Tagen ein Erfolgserlebnis zu verbuchen. Folgendes LED-Testprogramm sollte LEDs zum Leuchten bringen - Es tut aber nicht am Board:

$regfile = "8515def.dat" 'AT90S8515
$crystal = 4000000 'Quarz: 4MHz
$baud = 9600

Ddra = &B00000001 'Pin 1 als Ausgang konfigurieren
Porta = &B11111111 'Pin 0...7 auf High setzen

End

Der Compiler meldet keinen Fehler und die Übertragung ans STK200 scheint auch problemlos zu laufen (Es blinken 3 LEDs), aber keine LED am Port B leuchtet. Die LED-Jumper sind alle gesteckt, der EXTERNE Takt ist gewählt.

Übrigens, ein "Hallo" an die RS232 kann ich problemlos übertragen, der Chip scheint also zu leben...

Komischerweise "leuchtet" beim Simulator auch keine LED.

Ist bestimmt nur ein kleiner Fehler, aber ich hänge fest...!

[Jon]

Versuche mal diese Zeile
Porta = &B11111111 'Pin 0...7 auf High setzen
in
Porta = &B00000000 'Pin 0...7 auf High setzen
umzuwandeln.

jon