Mein erstes programm auf dem RN-Control 1.4
is eigentllich ganz simple
aber egal hier is es:

Dim I As Integer


$crystal = 8000000
$baud = 9600


Config Portc = Output
Do
For I = 1 To 7
I = Rnd(6)
Portc.i = 0
Waitms 50
Portc.i = 1
Next I

Loop