vielen dank für die antworten!
ich habe meinen code jetzt etwas geändert und es funktoiniert so wie ich es wollte!!! ist schon gut zu wissen das man hier so gut beraten wird *schleim* ich poste mal meinen funktionierenden code für andere anfänger mit dem gleichen problem:
Code:
$regfile = "m8def.dat"
$crystal = 1000000

'###Declarationen###

Config Portc = Output
Config Portd = Input
Portd.0 = 1
Portd.1 = 1
Portd.2 = 1

Led1 Alias Portc.5
Led2 Alias Portc.4
Led3 Alias Portc.3
Led4 Alias Portc.2
Led5 Alias Portc.1
Led6 Alias Portc.0

'###Hauptschleife###

Do
If Pind.0 = 0 Then
Gosub Laufa
End If
If Pind.1 = 0 Then
Gosub Laufb
End If
If Pind.2 = 0 Then
Gosub Laufc
End If
Loop

'###Lauflichter###
Laufa:
' Lauflicht

Goto Laufa

'----------

Laufb:
' Lauflicht

Goto Laufb

'----------

Laufc:
' Lauflicht

Goto Laufc
Das "' Lauflicht" muss dann mit entsprechendem code ausgetauscht werden. ich hab grad festgestellt das man das auch mit loop machen kann. dann muss nur goto weg gelassen werden.
MfG Omeg@