Topics

1

VB and the development of wizards / Tool Changer Timed Out as safety

« on: October 18, 2015, 03:56:10 PM »

hi everyone
i need to add a macro as( time out) also i have tried to write something but that isn't worked...anyway i need to help


'ToolChange Macro For milling machine (liner type)
Sub Main()

OldTool = GetOEMDRO (1200) 'Tool In spindle DRO You must add this to your settings screen
x = GetToolChangeStart( 0 )
y = GetToolChangeStart( 1 )
z = GetToolChangeStart( 2 )
tool = GetSelectedTool()
NewTool = tool
'Tool Changer Macro (Bed Type)
MaxToolNum = 2      'Max number off tools for the changer
ToolDown   = -60 'Z Pos to Get or drop a tool
ToolUp     = 0   'Z Hieght to Rapid from tool to tool
If NewTool = OldTool Then
   Exit Sub
End If
While NewTool > MaxToolNum
NewTool = Question ("Enter New Tool Number up to " & MaxToolNum)
Wend
Code "G00 G53 Z" & ToolUp
While IsMoving()
Wend
Call MovePos(OldTool)
While IsMoving()
Wend
Code "G53 Z" & ToolDown
Code "G4 P.1"
While IsMoving()
Wend
Do                                                 'Start loop
ActivateSignal(Output2)                   'This is signal to activate  drawbar
If IsActive (Input1) Then Exit Do        'This is a  signal to say drawbar has released
Loop
Code "G53 Z" & ToolUp
Call MovePos(NewTool)
While IsMoving()
Wend
Code "G53 Z" & ToolDown
Code "G4 P.1"
While IsMoving()
Wend
DeActivateSignal(Output2) 'Turn Off Draw bar to Clamp the tool
Code "G4 P4.1"    'Wait for the tool to Clamp
While IsMoving()
Wend
============================================
its good but i think not enough ,i need something like this: if (input 2 ) not active after a time (10 ms) then show a (msgbox "tool isn't locked "   ) then active (emergency )
Do                                                 'Start loop
If IsActive (Input2)  Then  Exit Do      'This is a signal to say tool locked correctly
Loop


===========================
Code "G53 Z" & ToolUp
Call SetUserDRO (1200,NewTool)
SetCurrentTool( NewTool )
Code "G00 X" & x & " Y" & y 'Move back to where the tool change was prompted
End Sub

Sub MovePos(ByVal ToolNumber As Integer)

Select Case ToolNumber
       Case Is = 1
         Xpos = 10
         YPos = 10
       Case Is = 2
         Xpos = 20
         YPos = 20
   
End Select

Code "G53 X" & XPos & " Y" & YPos
End Sub
Main       

2

VB and the development of wizards / encoder dro with m/c dro Comparison

« on: December 20, 2013, 01:45:51 PM »

is it possible check( encoder dro )and( machine coordinate dro)
have some deviation during just mach3 do E-stop ?

i need to know can do this with macro pump or Brian.
if any one can  advise to me make me happy...
thanks

3

VB and the development of wizards / simple macro not running

« on: December 16, 2013, 03:09:01 PM »

hi everyone
i have a problem with running  a simple macro...

'M2000.M1S'
If isactive(input1) Then

doButton (1021)

MsgBox "servo alarm"

End If             

i write this and save to  mill macro folder by .m1s excitation ,and i check enable( run macro pump ) in config menu...
 
when i active input 1,then do nothing ..
now what is my fault ?!

4

Modbus / modbus and pwm output

« on: June 21, 2013, 12:21:14 AM »

hi everyone

how can send pwm output pulse for spindle speed control via modbus board ?maybe need to write brain or vb ?

please advice to me

thanks whit best regard

5

General Mach Discussion / kinematic on mach3

« on: May 19, 2013, 10:41:35 PM »

hi everyone
is there any way mach 3 do kinematic jog and move( delta parallel robot)like emc2?
for example formula can be do or maybe plugin ?

6

Modbus / how modio reconnect ?

« on: April 23, 2013, 01:30:40 PM »

hi
i have a problem with  mach 3 modio connection via USB.(modio board is made by myself)
due to abnormal condition connection between mach 3 and modio may fail in such condition i need mach 3 to ignore ''receive time out error'' and try to reconnect ..

maybe VB macro can do it '' but just this is my idea''

if anyone have any comment or advise, make me happy.

thanks

7

General Mach Discussion / MODIO problem

« on: April 20, 2013, 10:46:06 AM »

hi
i have a problem with  mach 3 modio connection via USB.(modio board is made by myself)
due to abnormal condition connection between mach 3 and modio may fail in such condition i need mach 3 to ignore ''receive time out error'' and try to reconnect would you please do me favor solution please .

8

General Mach Discussion / external input as (shift on key board)

« on: March 26, 2013, 09:42:07 AM »

hi
 when slow jog rate set then arrows will jog at the slow speed and shift + arrows will jog at 100% and when release shift key go back at jog slow .
now i want do that with external (input1) push button.after search on oem button code i cant find any code for doing this..
please adviceto me
thanks

9

VB and the development of wizards / external input as (shift on key board)

« on: March 25, 2013, 09:54:29 AM »

hi
 when slow jog rate set then arrows will jog at the slow speed and shift + arrows will jog at 100% and when release shift key go back at jog slow .
now i want do that with external (input1) push button.after search on oem button code i cant find any code for doing this..
please advies to me

10

General Mach Discussion / cnc lathe woodturning with 2 cut blade tool

« on: January 06, 2013, 02:44:44 PM »

hi every one

first of all ,sorry for my bad english

at this video ,cnc wood turning machine working with 2 cut blade ...but how can do that?Each tool individually moves. The question is: How did this with Mach 3?
 My first thought is that I need to add an axis like Y or A or C  But the problem is creating gcode..i dont have any best idea
and that is my problem.
so if any one can help me or say  comment  make me happy.


http://www.youtube.com/watch?v=dT3Kxw3sQ6Q