hmmm .. sehr wirrer Programmierstil *mal anmerk*

so sollte es besser lesbar sein (vor allem, was Schleifen etc angeht):
Code:
$regfile = "m32def.dat"
$framesize = 32
$swstack = 32
$hwstack = 32
$crystal = 16000000
$baud = 9600

	Dim A As Byte
	Config Porta.0 = Output
	Motorl Alias Porta.0
	Config Porta.1 = Output
	Motorr Alias Porta. 1
	Config Porta.2 = Input
	Starter Alias Porta.2
	Config Porta.6 = Output
	Led Alias Porta.6

	A = 0
	Starter = 1
	Led = 1
	Motorl = 0
	Motorr = 0
	Do
		If Starter = 0 Then
			A = 1
		Else
			Waitms 1
		End If
	Loop Until A = 1

	Led = 0
	Motorl = 1
	Motorr = 1
	Wait 5
	Motorl = 0
	Motorr = 0
Ach ja, ich würde mal sagen, da fehlt irgendwie etwas ... und einiges ist auch nicht so ganz richtig ...

z.B. werden Eingänge immer mit PIN und nicht mit PORT ausgelesen
des weiteren scheint mir irgendwas am Ende zu fehlen ...