-
-
Hier mal mein Problem...
Ich will, das mein Robi 1000 schritte gerade aus macht,
und dann eine Linksdrehung dazu soll ein rad 45 schritte in ne andere richtung machen. sprich das programm hängt 45 schritte in der if schleife und danach springt es aus der subroutine.
und dann wieder 1000 geradeaus.
usw...
wie zähle ich jetzt 45 interupts??
Declare Sub Drehen_links()
$regfile = "m32def.dat"
$crystal = 16000000
Dim Z As Integer
Config Timer1 = Timer
On Timer1 Timer_irq
Tccr1b = Tccr1b Or &H05
Timer1 = 65458
Z = 0
Do
If Z > 1000 Then Call Drehen_links
Loop
End
Timer_irq:
Toggle ...
Z = Z + 1
Return
Sub Drehen_links()
...
If Z > 45 Then
Z = 0
End If
End Sub
Berechtigungen
- Neue Themen erstellen: Nein
- Themen beantworten: Nein
- Anhänge hochladen: Nein
- Beiträge bearbeiten: Nein
-
Foren-Regeln
Lesezeichen