Am einfachsten ist es eine For- Next Schleife zu programmieren (Siehe Bascom Hilfe) die bei jedem Zyklus einen Ausgangsport Toggelt.
Für erste Versuche kann man ja die Schrittzahl Fest einprogrammieren, später kann man dann noch ein kleines Displaymenue einfügen das die Schrittzahl und Drehrichtung anzeigt und mit Tastern dann die Schrittzahl verstellen kann.
So bin ich jedenfalls mit Schrittmotoren angefangen.
So sieht dann das Hauptprogramm aus (Konfigurationen usw. habe ich hier weggelassen)
Do

While Pinc.0 = 0

For A = 1 To B Step 1
Locate 1 , 1
Lcd A;
If A < 10 Then
Locate 1 , 2
Lcd " "
End If
Waitms 100
Toggle Portd.7
Waitms 100
Toggle Portd.7

Next A

Wend


If Pinc.3 = 0 Then 'Änderung der Drehrichtung
Waitms 100
Toggle Portd.6
End If

If Portd.6 = 1 Then 'Anzeige der Drehrichtung
Locate 1 , 5
Lcd "links "
Else
Locate 1 , 5
Lcd "rechts"
End If

If Pinc.1 = 0 Then '+1 Schritt
Waitms 50
Incr B
End If

If Pinc.2 = 0 Then '-1 Schritt
Waitms 50
Decr B
End If

If B > 99 Then B = 0

If B < 10 Then
Locate 2 , 2
Lcd " "
End If

Lowerline

Lcd B

Loop