Puede utilizar una entrada en el controlador de CNC, pero si no tienes entradas gratis porque son utilizados para fines de carrera como en mi caso. Sólo puede obtener otro controlador CNC cuando se tiene un puerto del LPT adicionales, y si no son muy baratos.
He adjuntado un LED de mi sonda, pero no tiene ninguna función que no sea una indicación visual. Por lo tanto la resistencia y el LED que no necesita. Solo un cable y un bloque de Metal que funciona tan bien.
Lo que he usado es:
Un mismo controlador CNC de eBay por 12$ (5 ejes CNC Breakout tablero del controlador paso a paso)
Sólo necesita un puerto de entrada en el controlador.
Este código fuente de VB para la herramienta de sondeo.
' Comienzo de código VB
'-------------------
CurrentFeed = GetOemDRO(818)
DoSpinStop()
ZMove = 20.00 ' longitud Total de la sonda se mueva antes de parar o no hace contacto.
ZOffset = 1,60' placa Hight
ZSal = ZOffset + 2.00 ' + altura libre, será la posición el Proble 2 MM sobre el Material.
StopZmove = 0
Si GetOemLed (825) = 0 entonces
DoOEMButton (1010)
Código "G4 P2.5"
Código "G31 Z-" & ZMove & "F25"
Mientras que IsMoving()
Sleep(200)
Vendo
Probepos = GetVar(2002)
Si Probepos = - ZMove entonces
respuesta = MsgBox ("** ERROR **", 4, "sonda ** ERROR **")
Código "G0 Z10"
StopZmove = 1
Código "F" & CurrentFeed
End If
Si StopZmove = 0 Then
Código "G0 Z" & Probepos
Mientras que (IsMoving)
Sueño (200)
Vendo
Llamar SetDro (2, ZOffset)
Código "G4 P1"
Código "G0 Z" & ZSal
Código "(Z cero)"
Código "F" & CurrentFeed
End If
Otra cosa
Código "(cheque tierra punta de prueba)"
End If
Salida Sub
'-------------------
' VB código parada
