4 Led´s unabhängig per Zufall blinken lassen?

[DanielSan]

Dein Link funktioniert leider so nicht. Was für suchbegriffe hast du eingegeben?

Nochmal kurz zu meinem Programm...
Ich habe es jetzt erstmal ohne Zufallszahl und mit nur einer Led gemacht.

Timer_irq:
Timer0 = Timervorgabe

If Mg1time = 0 Then
   If Mg1flag = 1 Then
      Mg1time = 10                                          ' Anzeit
      Mg1 = 1
      Mg1flag = 0
   Else
      Mg1time = 5100                                        ' Auszeit
      Mg1 = 0
      Mg1flag = 1
   End If
End If

Decr Mg1time
Return

Die Zeiten habe ich ich bewusst so weit auseinander gelegt um zu prüfen ob das ordentlich funktioniert. Leider scheint die "Anzeit" genauso lang wie die "Auszeit" zu sein. Die Zeit in der die LED an bzw aus ist, entspricht auch nicht 5,1 Sekunden sondern ehr 1 Sekunde an 1 Sekunde aus. Das sollte aber doch eigentlich so sein!? Denn ich springe jede ms in die IRQ und zähle einen runter. Dann müsste ich doch auf 5100 ms kommen!?

Danke
Gruß Daniel