Hola amigos , resulta que desde hace tiempo tengo la ilusión de crear un brazo-robot con varios motores paso-paso y gobernado con un zx-spectrum , Marcos me ha aconsejado y esta es mi segunda versión para mover un motor . ¿qué os parece el código? , en principio haré las pruebas con dx-forth en cp/m .
(Dx-forth) ( programa el 8255 como puertos de salida ) : ppi_inic 128 99 pc! ; ( ponemos el puerto B a 0 ) : reposo 0 97 pc! ; ( temporizacion entre cada pulso del motor , 50 milisegundos ) : temp 50 ms ; ( damos un nombre a la salida/puerto para mover el motor ,con temporización entre cada pulso) : pulso ( b – ) 97 pc! temp ; ( para que el motor de un paso enviamos por el puerto la secuencia de bits 1 2 4 8 respectivamente ) : paso 1 pulso 2 pulso 4 pulso 8 pulso ; ( ahora creamos un nombre para que el motor de una vuelta completa , es un motor de 48 pulsos/vuelta , finalmente ponemos el motor en reposo ) 48 constant pasos/vuelta : vuelta pasos/vuelta 0 do paso loop reposo ; ( n rotaciones da n vueltas al motor ) : rotaciones ( n – ) 0 do vuelta loop ; Saludos !! [Se han eliminado los trozos de este mensaje que no contenían texto]
