Hello! lenne egy amatör kérdésem. Most ismerkedek az alapokkal...
Na szóval. Azt hogy tudnám megcsinálni, hogy két led egymástól függetlenül, véletlenszerű időben villogjon? olyasmit akarok elérni, mint a felvezető autók stroboszkópja, hogy össze vissza villog véletlen módon. Megoldható egyátalán? Köszi.
help!
Szerintem valahogy így lehetne megoldani:
Config Portb = Output
Dim I As Word
Dim J As Word
Portb = 0
Do
I = Rnd(3)
J = Rnd(100)
J = J * 50
If I = 1 Then
Portb = Portb Xor 1
Else
Portb = Portb Xor 2
End If
Waitms J
Loop
A J=Rnd(100) és J=J*50 sorokban a szám átírásával tudsz játszani azzal, hogy mennyi legyen a váltások közti idő!
(Az I= Rnd(3) sorban 3 helyett lehet hogy 2 kell)
Config Portb = Output
Dim I As Word
Dim J As Word
Portb = 0
Do
I = Rnd(3)
J = Rnd(100)
J = J * 50
If I = 1 Then
Portb = Portb Xor 1
Else
Portb = Portb Xor 2
End If
Waitms J
Loop
A J=Rnd(100) és J=J*50 sorokban a szám átírásával tudsz játszani azzal, hogy mennyi legyen a váltások közti idő!
(Az I= Rnd(3) sorban 3 helyett lehet hogy 2 kell)