Hallo,

ich habe deinen Tip schon in das Pogramm eingebaut... wo ich das noch mit dem timer hatte, hatte ich nur an dem 1. pin der 1.spule die spannung. jetzt wechselt die spannung schon auf der ersten spule pin1 und pin2 von -7 auf +7V, aber auf der zweitenspule habe ich immer 0V.

so sieht das poramm nach deinen änderungen jetzt aus... aber motor dreht halt nicht....
Code:
$regfile = "m8515.dat"
$crystal = 16000000
$baud = 19200

Dim A As Byte

  Config Porta = Output
  Declare Sub Write_port

Do

  Config Pina.0 = Output
  Cw Alias Porta.0
  Cw = 1


  Config Pinc.2 = Output
  Ena Alias Porta.2
  Ena = 1





  Config Pinb.1 = Output
  Tog Alias Porta.1
  Tog = 1
  Waitms 100
  Tog = 0
  Waitms 100
Loop

Sub Write_port
Porta.0 = A.1
Porta.1 = A.2
Porta.2 = A.3
End Sub


End
Gruß Dennis