Hi
Ich greiffe nun diesen Thread aufgrund 2 Fragen meinserseits nochmal auf^^
*duck*

Ich bin auch schon am Lauflichterprogramme durcharbeiten, bin aber bei einzelnen noch verwirrt

Nr1:
Code:
 $regfile = "m32def.dat"
$crystal = 16000000
Dim A As Byte

Config Portc = Output
A = 1
Do
Do
Portc = A
Waitms 200
Shift A , Left , 1                                          ' Schiebe 1 um eine Stelle nach links und somit auch die LED
Loop Until A = 128                                          ' wenn eins am "ende" der Var. beende Schiebvorgang
Do
Portc = A
Waitms 200
Shift A , Right , 1                                         ' Schiebe 1 um eine Stelle nach rechts und somit auch die LED
Loop Until A = 1                                                            ' wenn eins am "ende" der Var. beende Schiebvorgang
Loop
Zu diesem Programm:
1.
Wenn es heisst:
Portc = A
Ist dann automatisch portc.0 als erster wert gedacht?

2.
Loop Until A = 128
Wieso 128? Er rackert sich doch von 1 bis 7 durch, wieso nicht:
Loop Until A = 7
??


Und noch was:
wenn ich die Erste LED permanent ausschalten will, wie muss ich das machen?
Wieso gehts mit diesem Programm hier nicht?
Code:
$regfile = "m32def.dat"

$crystal = 16000000
$baud = 9600
Config Portc = Output
Do

  Portc.1 = 0

Loop

^^
Das wars vorerst...

cu & danke
Serge