Obrigado a todos, depois de partir a cabeça e com o arranque do Fábio encontrei o que procurava,
vai ser mais ou menos isto:
Sub Main
Dim fer
fer=GetSelectedTool()
p1=getOEMDRO (1301)
p2=getOEMDRO (1302)
p3=getOEMDRO (1303)
p4=getOEMDRO (1304)
If fer=1 Then
Call SetUserDRO (1300,p1)
End If
If fer=2 Then
Call SetUserDRO (1300,p2)
End If
If fer=3 Then
Call SetUserDRO (1300,p3)
End If
If fer=4 Then
Call SetUserDRO (1300,p4)
End If
End Sub
Agora é só pegar no valor da DRO(1300) e colocar em uma saida analogica, pode ser feito facilmente
no brains, agora sempre que a ferramenta mudar tambem muda a presão, e a presão para cada
ferramenta pode ser configurada na tela do mach3 adicionando umas novas DRO com o scren4.
Fábio, tem mais de que uma saida analogica na minha interface, precisarei de uma para control de RPM, e outra
para control de presão, não vou usar um CLP, posso usar uma interface da CS-Lab Electronics do site artsoft ou usar
o PoKeys tambem do site da artsoft, este ultimo já usei uma vez e é fantastico, permite usar varias entradas e saidas analogicas, apenas não tem step/dir para control.
No exemplo que eu mostrei eu usei um DRO do sistema - 824 é o DRO da ferramenta atual.
Sim é verdade e está correcto, mas alem dos DRO do sistema (que tambem é preciso para ler o nº da ferramenta) em posso configurar algumas DRO digamos, personalizadas, então 1300/1301/1032/1303/1034 são DRO que eu configurei na tela mach3.
Obrigado.