Ich denke mal, das meine Frage hier am besten reinpasst, damit kein neues Thema eröffnet werden muss. Wenn nicht bitte nicht lynchen!

Ich habe folgendes Problem:
Ich will mit einem 2313 mehr als zwei Servos ansteuern, und habe mir eine Routine zusammengebastelt, mit der zumindest das Anfahren von zwei Positionen funktioniert. Nun kommt aber erschwerend hinzu, daß der Postionswechsel laaaaangsaaaam von statten gehen soll. (ein bis zwei Sekunden von Pos.1 nach Pos.2). So weit so gut etwas rumgepfrimelt und im Simulator klappts auch einwandfrei. Ich freu mir ein Loch in den Bauch, schwupps alles in den 2313 gebrannt und erwartungsvoll den Testschalter umgelegt.
Und was passiert: NÜSCHTS
Das sich alle 20ms wiederholende Signal was der µC von sich gibt bleibt stur bei 1,5ms - bei allen acht Ausgängen versteht sich. Wat mach ich falsch????

Anbei hab ich mal die wichtigtens Programmpunkte:
(weiß leider nicht wie ich die Progschnipsel anders Posten kann)

$regfile = "2313def.dat"
$crystal = 10000000

Dim A As Byte
Dim B As Word
Dim C( 8 ) As Word
Dim D As Word
Dim E As Word
.
C(1) = 3750
Config Portb = Output
Config Portd = Input
Portb = 0

Kontrolle:
If A = 8 Then
For E = 1 To D
Next
End If
If Portd.0 = 1 Then Gosub Decr1 Else Gosub Incr1
.
If A > 7 Then A = 0
If A = 0 Then B = C(1)
.
Goto Anf

Anf:
Pulseout Portb , A , B
A = A + 1
Goto Kontrolle

Decr1:
Decr C(1)
If C(1) < 3475 Then C(1) = 3475
Return

Incr1:
Incr C(1)
If C(1) > 3750 Then C(1) = 3750
Return


mfG der E-Fan