Druckbare Version
Ich weiß zwar nicht wie es in Bascom ist, aber bei C ist es egal, da er beides kennt (nicht genau die Befehle, aber auch mit Ein-/Ausgängen).
Wenn es so ist wie in C (AVR Studio mit GCC) ist PINB für Eingänge vom Port B und PORTB Ausgänge vom Port B.
MfG Hannes
würgs:Code:Timer_irq:
Timer0 = Timervorgabe
If Mg1time = 0 Then
If Mg1flag = 1 Then
Mg1time = 250 ' Anzeit
Mg1 = 1
Mg1flag = 0
Else
Do ' Auszeit
Mg1time = Rnd(500)
Loop Until Mg1time < 500
Mg1time = Mg1time + 250
Mg1 = 0
Mg1flag = 1
End If
End If
Decr Mg1time
Return
Edit: Ah jetzt seh ich erst was du gemacht hast! Du Fuchs ;-)
Ok deine Lösung ist zwar "gepfuscht" ;-) aber sie funktioniert. Ich denke das Rnd() nicht richtig funktioniert ist ein Bug in Bascom.
Gruß Daniel