Sterownik CNC na uP z L298 do portu LPT - szukam schematu lub projektu

witam
szukam takiego sterownika ale nic nie moge znalesc ma moze ktos cos takiego chodzi o sterowni polaczany do portu LPT
moze byc jaki kolwiek chodz szukam takiego zbudowanego na jakims uP i jako koncowki mocy zastosowane uklady L298 (mam takie 3) czy moze mi ktos pomoc??

Może więcej danych podasz na temat zasobów tego sterownika i czym ma sterować ?

ma sterowac 3 silnikami krokowymi sterownie z portu LPT sterowanie prez sygnaly SETP/DIR sa takie na allegro ale strasznie duzo sobie licza wiec szukam schematu

http://www.piclist.com/techref/io/stepper/linistep/index.htm
co prawda nie na l298 tylko na tranzystorach i PIC'u ale zawsze

ale to jest najlepszy sterownik jaki w sieci znalazłem wykonałem tego typu już 30 szt
podobne lecz na większe prądy do 7A są też w sieci ale nie takie rychliwe jak ten - jest the best
polecam
a właściwie pokukaj tukej hopie

Ja urzywam wymontowanych ze starych drukarek i kserokopiarek kosci np. SLA7024 , (pojdzie tez na L298) dorobilem tylko na 90S8515 (sporo tego sie poniewiera u amatorow tvsat) logike pod step/dir - scalaki zapewniaja choperowanie PWM .
Sterowanie jest 2-1-2 phase ale latwo jest przerobic na 2-2 jak rowniez na sterowanie kosci do silniczkow bipolarnych allegro czy tym podobnych typu A2918 czy czy A3962 i tym podobnie sterowanych - oczywiscie bedzie urzywane mniej portow wyjsciowych i inne tablice .
Akurat ten program chodzi dla dwoch silnikow na porcie A i C ale latwo dorobic jeszcze dwa na B i D dopisujac analogicznie jak dwa pozostale .
Mozna go tak zmodyfikowac aby kazdy silnik pracowal i innym trybie dodajac odpowiednie tablice.
Program ten dziala wysmienicie tak jak jest , chociaz jest prosty i podalem go jako w zasadzie wzor do wlasnych wariacji. Wejscia sa podciagniete do masy przez 10Kom . Sterowanie jest logika active high ale mozna tez podac active low- dal silnikow to bez znaczenia - sla7024 nic nie wystawia na wyjscie przy dwoch wejsciach o identycznym stanie .


Oto listing w bascomie :

' --------------------------------
' (C) 2005 by remzibi
' sterowanie silnikiem krokowym
' step/dir
' --------------------------------

$crystal = 10000000
Config Portc = &B00111111 'portc y
Config Porta = &B00111111 'porta x
Porta = 0
Portb = 0

'wyjscia portow a=0 /a=1 b=2 b/=3 bajt '
'wejscia portow to 7=step 6=dir

Dim X As Byte
Dim Y As Byte
Dim Xf As Bit
Dim Yf As Bit
X = 1
Y = 1
Xf = 0
Yf = 0

Dim Krok(8) As Byte
Krok(1) = &B00000001
Krok(2) = &B00000101
Krok(3) = &B00000100
Krok(4) = &B00000110
Krok(5) = &B00000010
Krok(6) = &B00001010
Krok(7) = &B00001000
Krok(8) = &B00001001

Waitms 50

Porta = Krok(x)
Portc = Krok(y)

Do

If Pina.7 = 1 And Xf = 0 Then Gosub Xaxe

If Pina.7 = 0 And Xf = 1 Then Xf = 0

If Pinc.7 = 1 And Yf = 0 Then Gosub Yaxe

If Pinc.7 = 0 And Yf = 1 Then Yf = 0

Loop

Xaxe:
If Pina.6 = 1 Then
Incr X
If X = 9 Then X = 1
Porta = Krok(x)
Else
Decr X
If X = 0 Then X = 8
Porta = Krok(x)
End If
Xf = 1
Return

Yaxe:
If Pinc.6 = 1 Then
Incr Y
If Y = 9 Then Y = 1
Portc = Krok(y)
Else
Decr Y
If Y = 0 Then Y = 8
Portc = Krok(y)
End If
Yf = 1
Return