2 einfache Fragen (Prot definieren;Start/Stopp)

Man merkt RCO hat lange mit der C-Control gearbeitet. Das C-Controll Basic kennt tatsächlich noch keinen "END IF" Befehl

[Rama-k]

Hallo,

wie programmiere ich den Starttaster bei der RN-Control, dass mein Lauflicht startet wenn ich ihn drücke?
Ich habe folgendes probiert:

$regfile = "M32def.dat"
$baud = 9600
$crystal = 16000000

Config Pina.7 = Input

Anfang:
If Pina.7 = 0 Then
Bitwait Pina.7 , Set
Goto Main
Else
Goto Anfang
End If
Main:

Do
Ddrc = &B00000001
Waitms 500
Ddrc = &B00000010
Waitms 500
Ddrc = &B00000100
Waitms 500
Ddrc = &B00001000
Waitms 500
Ddrc = &B00010000
Waitms 500
Ddrc = &B00100000
Waitms 500
Ddrc = &B01000000
Waitms 500
Ddrc = &B10000000
Waitms 500
Ddrc = &B01000000
Waitms 500
Ddrc = &B00100000
Waitms 500
Ddrc = &B00010000
Waitms 500
Ddrc = &B00001000
Waitms 500
Ddrc = &B00000100
Waitms 500
Ddrc = &B00000010
Waitms 500
Ddrc = &B00000001
Waitms 500
Loop

erfolglos.

Bin absoluter Newby im Thema programmieren!


mfG Rama-k