Problem mit simplen Anfängerprogramm

[Hewlett (Gast)]

Ich schäme mich fast das hier zu posten, aber ich komm nicht weiter...

Ich habe einen Attiny13 und versuche mit dem Programm "BASCOM-AVR" eine 
einfache Schaltung zu Programmieren:

Spannung an Pin4 anlegen --> Ausgang an Pin3 wird freigegeben (LED 
leuchtet)

$regfile = "attiny13.dat"
$crystal = 1200000
Config Portb.3 = Output
Config Portb.4 = Input

Dim X As Byte

Do

X = Portb.4
If X = 1 Then
  Portb.3 = 1
Else
  Portb.3 = 0
End If

Loop

Irgend einen Bock hab ich drin. Kann mir jemand weiterhelfen?

End

[Sven P. (Gast)]

Informier dich mal über die Unterschiede zwischen DDR-, PORT- und 
PIN-Registern.

[Hübi (Gast)]

$regfile = "attiny13.dat"
$crystal = 1200000
Config Portb.3 = Output
Config Portb.4 = Input

x alias pind.4  'beim lesen immer PIN anstelle PORT verwenden

Do

If X = 1 Then
  Portb.3 = 1
Else
  Portb.3 = 0
End If
Loop
end

[Hewlett (Gast)]

Vielen Dank! So hats gefunzt!