Hello Guest it is April 20, 2024, 03:20:09 AM

Show Posts

This section allows you to view all posts made by this member. Note that you can only see posts made in areas you currently have access to.


Messages - zealous

1
VB and the development of wizards / Re: User Label
« on: March 13, 2016, 07:16:07 PM »
you don't need to get the label value, if you put the text box var as _root.USERLABEL********* and you can use 0 - 3000.

also here are some more labels

VB Label:            Flash Label

"COSYS"            _root.Cosys
"TOOLDESC"         _root.ToolDesc
"UNITREVMIN"      _root.UnitRev
"UserLabel#"         _root.USERLABEL#
"Error"            _root.StatusLine
"RADDIA"         _root.RadDia
"Mode"            _root.Mode
"Profile"            _root.Profile
"File"            _root.FileName

2
General Mach Discussion / Re: Mach3 Visual Studio 2008-2013
« on: October 07, 2013, 03:15:59 AM »
John,
Was that "A method using acoustic features to detect inadequate utterances in medical communication"?
or a congratulations!

3
General Mach Discussion / Re: Mach3 Visual Studio 2008-2013
« on: October 06, 2013, 06:21:17 PM »
Thank you for the positive feedback, I am so excited about using Visual Studio to design interfaces!
I will finish up the beta version and post the files in the screen development section.

5
General Mach Discussion / Re: "run from here" problem
« on: January 08, 2012, 11:11:41 PM »
Did you import your drawing from soildworks (DXF) into Sheetcam?

6
General Mach Discussion / Re: "run from here" problem
« on: January 08, 2012, 07:42:55 PM »
No I am getting the error as well:
"Process: Outside Offset. 0. T1: Plasma: 0.06 in Kerf
Are you using Sheetcam ?

7
General Mach Discussion / Re: "run from here" problem
« on: January 08, 2012, 07:31:55 PM »
It might be an Mcode in the file, try:
Go to Config/ General Config/ Check off "Ignore M Calls While Loading"

8
Flash Screens / Re: G-Code - Window
« on: January 08, 2012, 07:26:15 PM »
Hi we are adding this ability in, will post here when the update comes out.

9
Flash Screens / Re: fscommand calling a vbscript
« on: January 08, 2012, 07:23:37 PM »
There are 3 ways to do this:

Code: [Select]
_global.RunScript = function(the_script) {
RunScipts = 'If'+' RunScript("\\macros\\'+_root.Profile+'\\'+the_script+'") < 0 Then '+"\r"+'MsgBox "ERROR! Cannot Locate Script:'+' macros\\'+_root.Profile+'\\'+the_script+'" '+"\r"+'End If ';
fscommand("VBMacro", RunScipts);
};

On every button place(where LoadGCode is the name of you macro) :

Code: [Select]
on (release) {
RunScript("LoadGCode");
}

or

Set the value of a var using +"\r"+ to add the return lines :

Code: [Select]
Runstart = 'If'+' RunScript("\\macros\\'+_root.Profile+'\\'+"CycleStart"+'") < 0 Then '+"\r"+'DoOEMButton(1000) '+"\r"+'End If ';
fscommand("VBMacro", Runstart);

or

In you will need a text box with VB code in it and name the text box for example to Edge1:


Code: [Select]
on (release) {
fscommand("VBMacro", Edge1.text);
}

Let me know if this helps, I can upload examples if needed.

10
VB and the development of wizards / Re: User Label
« on: November 02, 2011, 07:55:51 PM »
Scott posted this awhile ago but the search function in Mach's forum is broken
Just change the location of "UserLabel.AGD" to store the Userlabels when you close Mach3, maybe make a Save button.
I dont rember if Mach3 has a Mcode that gets fired off when you shut it down, but if there is one you can put this script in there to store the userlabels.

Code: [Select]
UserLabels = 1
Open "C:\\Program Files\\AGD\\UserLabel.AGD" For Output As #6
For z = 1 To 250
LabelState = GetUserLabel(UserLabels)
Print  #6, LabelState
UserLabels = (UserLabels + 1)
Next z
Close #6
Code("SAVE_XML")


Put this in a Macro to load the stored labels:

Code: [Select]
Dim fich3 As String
fich3="C:\Program Files\AGD\UserLabel.AGD"
If Dir(fich3)<>""  Then
Call Dir("null")
UserLabels = 1
Open "C:\Program Files\AGD\UserLabel.AGD"  For Input As #5
Do While Not EOF(5)
Line Input #5, FileData
SetUserLabel(UserLabels, FileData)
UserLabels = UserLabels + 1
Loop
Close #5
Else
Call Dir("null")
MsgBox("no file to load:" & fich3)
End If

otherwise you'll have to request that Mach3 stores user/Labels in the XML.