| Weitere Artikel aus dem Elo-Magazin |
Wanderwellen und AD-Wandler
von Burkhard Kainka
Hier werden laufend fortschreitende Wellen dargestellt. Für die Sinusfunktion braucht man Real-Variablen.
Dim Xx As Single
Dim Yy As Single
Initialisierung
Do
For N = 1 To 60000
For X = 1 To 12
Xx = X * 30
Xx = Xx - N
Xx = Xx / 60
Yy = Sin(xx)
Yy = Yy + 1
Yy = Yy * 5
Yy = Yy + 1
Y = Int(yy)
Leds(x) = 0
Led1 X , Y
Next X
Next N
Standby
Loop
Download LEDmatrix3.zip
Der AD-Wandler des Mega 8 hat eine Auflösung von 10 Bit und kann daher genau passend als Binärzahl in der Matrix dargestellt werden.
Do
For N = 1 To 120
Leds(2) = Getadc(6)
Leds(4) = Getadc(7)
Leds(6) = Leds(2) + Leds(4)
Waitms 200
Next N
Standby
Loop
Ganzen Artikel lesen...
Lernen Sie die ganze Vielfalt vom Franzis Buch- und Softwareverlag kennen
