Messages

1111

Feature Requests / Re: ARC-ON TIMER AND PIERCE COUNTER IN MACH3

« on: October 30, 2019, 02:52:04 PM »

no, instead of pls replace


M5 code

Code: [Select]

'save the cuttime
SetUserDro(1601 , GetUserDro(1601) + ( Timer - GetUserDro(1600)))

by

M5 code

Code: [Select]

'check that endtime has not been calculated allready
If GetUserDro(1600) <> 99999 Then
'save the cuttime
SetUserDro(1601 , GetUserDro(1601) + ( Timer - GetUserDro(1600)))
'set calculation allready done
SetUserDro(1600,99999)
End If


1112

Feature Requests / Re: ARC-ON TIMER AND PIERCE COUNTER IN MACH3

« on: October 29, 2019, 11:53:16 AM »

ok, this M5 code should work even if M5 is called twice


M5 code

Code: [Select]

'check that endtime has not been calculated allready
If GetUserDro(1600) <> 99999 Then
'save the cuttime
SetUserDro(1601 , GetUserDro(1601) + ( Timer - GetUserDro(1600)))
'set calculation allready done
SetUserDro(1600,99999)
End If



it is not the M30 witch is acting the Problem, it is the double cáll of M5, then cuttime was calculated (added) twice.
the new code should help.

1113

Feature Requests / Re: ARC-ON TIMER AND PIERCE COUNTER IN MACH3

« on: October 26, 2019, 01:50:06 AM »

Manuals:

https://www.machsupport.com/wp-content/uploads/2013/02/Mach3_V3.x_Macro_Prog_Ref.pdf

http://www.machsupport.com/wp-content/uploads/2013/02/VBScript_Commands.pdf

1114

Feature Requests / Re: ARC-ON TIMER AND PIERCE COUNTER IN MACH3

« on: October 25, 2019, 05:55:06 AM »

if you use machscreen just click on the button, than you will see a selection list, where the button and the DRO is shown, then click
(left mouse button) and hold the button to 'move' the transparent button upwards in the list. hope you understand my bad bavarian english.

1115

Feature Requests / Re: ARC-ON TIMER AND PIERCE COUNTER IN MACH3

« on: October 25, 2019, 04:37:56 AM »

i don't know a "direct" way to make a dro read only, but you can put a transparent button (witch has no functionality) over the DRO
to "protect" it for Input.

1116

Feature Requests / Re: ARC-ON TIMER AND PIERCE COUNTER IN MACH3

« on: October 24, 2019, 04:34:06 AM »

here is a easier Version:

M3 code

Code: [Select]

'Save the starttime in seconds
SetUserDro(1600, Timer)

'increment the piercecounter
SetUserDro(1602,GetUserDro(1602)+1)

M5 code

Code: [Select]

'save the cuttime
SetUserDro(1601 , GetUserDro(1601) + ( Timer - GetUserDro(1600)))


1117

Feature Requests / Re: ARC-ON TIMER AND PIERCE COUNTER IN MACH3

« on: October 24, 2019, 04:18:58 AM »

UserDro's start at 1000, i allways use them above 1100 because some at the 1000 aeria are used by Standard Screen set.

1118

Feature Requests / Re: ARC-ON TIMER AND PIERCE COUNTER IN MACH3

« on: October 24, 2019, 03:54:40 AM »

yes i thinks it should work.

piercecounter will be in DRO 1602
cuttime in DRO 1601

1119

Feature Requests / Re: ARC-ON TIMER AND PIERCE COUNTER IN MACH3

« on: October 24, 2019, 03:44:41 AM »

this M5 code will only measure the cuttime of one cut

Code: [Select]

'Calculate the enddtime
Dim endtime As Double
endtime = (Hour(Time(Now))*3600)+(Minute(Time(Now))*60)+Second(Time(Now))
'save the cuttime
SetUserDro(1601 , endtime - GetUserDro(1600))

this M5 code will measure the total cuttime

Code: [Select]

'Calculate the enddtime
Dim endtime As Double
endtime = (Hour(Time(Now))*3600)+(Minute(Time(Now))*60)+Second(Time(Now))
'save the cuttime
SetUserDro(1601 , GetUserDro(1601) + ( endtime - GetUserDro(1600)))


1120

Feature Requests / Re: ARC-ON TIMER AND PIERCE COUNTER IN MACH3

« on: October 24, 2019, 02:51:14 AM »

as far i know there is no functionality in Mach3 for this, but you can add some code to M3 and M5 and do it by your own.

M3 code

Code: [Select]

'Save the starttime in seconds
Dim starttime As Double
starttime = (Hour(Time(Now))*3600)+(Minute(Time(Now))*60)+Second(Time(Now))
SetUserDro(1600, starttime)

'increment the piercecounter
SetUserDro(1602,GetUserDro(1602)+1)


M5 code

Code: [Select]

'Calculate the enddtime
Dim endtime As Double
endtime = (Hour(Time(Now))*3600)+(Minute(Time(Now))*60)+Second(Time(Now))
'save the cuttime
SetUserDro(1601 , endtime - GetUserDro(1600))

code is not tested, just written down