Hallo allerseits,

ich habe eine Frage/ein Problem beim programmieren in Bascom - vorweg, ich bin Anfänger

Ich möchte mit folgendem, zugegeben sehr primitivem Code

Code:
$regfile = "m8def.dat"
$crystal = 8000000

Config Pind.5 = Output
Config Pind.6 = Output

Led1 Alias Portd.5
Led2 Alias Portd.6


Dim Laenge As Byte
Laenge = 1


Do

Led1 = 1
Waitms 1
Led1 = 0
Waitms Laenge


Laenge = Laenge + ?

If Laenge > 30 Then Laenge = 1

Loop
End
(vorerst) eine LED aus"faden" und anschliesend wieder aufblitzen usw. lassen.

Wenn ich nun an der Stelle des Fragezeichens eine Zahl größer als 0,5 (.5) eingebe funktioniert das ganze, nur leider zu schnell. Gebe ich allerdings eine Zahl gleich oder kleiner 0,5 ein, so passiert im Endeffekt überhaupt nichts mehr, die LED leuchtet nur noch.

Warum ist das so? Und wie kann ich das ändern?

MfG,
maxxtro