Hallo William,
danke für deine Antwort!
Jedoch habe ich es entweder falsch verstanden oder falsch umgesetzt...
Hier mal mein Code:
Vielleicht kannst du dir den Code ja mal ansehen, oder hast du vielleicht ein konkretes Beispiel??Code:$regfile = "m32def.dat" $crystal = 16000000 Config Portc = Output Portc = 0 'Winkel[rad] = Winkel[°] / 180 * PI Dim X As Single Dim Y As Single Dim Z As Single Const Div_1 = 180 * 3.14159265 Do For X = 0 To 90 Y = X / Div_1 Z = Rad2deg(y) Z = Z * 20 Portc = Z Waitus 10 Next X Loop End
Gruß
Chris







Zitieren

Lesezeichen