Messages

271

Machscreen Screen Designer / Re: Box Joint Wizard

« on: March 19, 2022, 10:41:22 AM »

fixed this problem

272

Machscreen Screen Designer / Re: Box Joint Wizard

« on: March 19, 2022, 03:28:06 AM »

ok here we are. unzip the attached file to:

C:\Mach3\Addons\fingercut

the copy the files:

M120.M1S
numerickeyboard.M1S

to C:\Mach3\macros\ your profile name

then you should be able to run the wizzard with Wizzards -> Pick Wizzard

it is very "raw " without any grafics but it should work.
in the macro M120.M1S are the conditions for the program to wait for the next move,
in this case it is waiting for Input1 to go first LOW and then HIGH.
the guy i did this for had a limit switch installed on the support so every time he pushed forward
and came back the program did the next move. you can also put a M1 into it then you have allways to
push Start Button for the next step.

273

Machscreen Screen Designer / Re: Box Joint Wizard

« on: March 18, 2022, 02:23:56 PM »

Hello Willy,

i have made this for a guy named Roy. it is no "classic" wizzard, the screen had been integrated into
his custom screenset.
give me some time, then i will "export" this part into a wizzard.
 

274

G-Code, CAD, and CAM discussions / Re: Bad Character

« on: March 18, 2022, 03:50:40 AM »

here:

275

General Mach Discussion / Re: "SetTriggerMacro" Function is not Working When Gcode Programs are Running

« on: March 09, 2022, 02:18:56 AM »

in this case i would use macropump macro and place the code there.

276

General Mach Discussion / Re: Mach3 Threading with Gear head lathe

« on: February 14, 2022, 01:32:15 AM »

not sure you have this?

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

277

General Mach Discussion / Re: Mach3 Threading with Gear head lathe

« on: February 14, 2022, 01:27:50 AM »

just an idea, have you enabled

Config -> Ports&Pins -> Spindle Setup -> Use Spindle Feedback in Sync Modes
Config -> Ports&Pins -> Spindle Setup -> Spindle Speed Averraging

278

General Mach Discussion / Re: Bit depth zeroing tool help

« on: February 12, 2022, 06:37:24 AM »

reading all your Threads/questions this manual:

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

would be a good choice to start with.

279

General Mach Discussion / Re: controlled stepped z axis down

« on: February 12, 2022, 06:27:13 AM »

for your first question about jogging. if you use the standard screen set you can press the TAB key and you will see
a "virtual" MPG. there you can select continious and step mode and select step distance as well. by playing around a
bit you will figure out how to handle this.

the second question about toolchange. this is depending on wat you have selected in Config -> General Config ->
Toolchange. the options Ignore - Stop Spindle and wait for Start - Auto tool Change are selfexplaining.

If you have selected Stop Spindle and wait for Start the M6Start macro will be excecuted if a M6 comes up in your
G-Code and the M6End afte you pressed the Start Button.

within these two macros you can do some actions/movements via VB script.

280

General Mach Discussion / Re: Mach 3 on Tormach laser is not proceeding past M3

« on: February 11, 2022, 12:03:07 PM »

smoe years ago i did something simular for G43 should be easy to modify this

Code: [Select]

' ---------------------------------------------------------------------------------
' TPS 02/2018
' macro to open GCode file and comment out all G43
' ---------------------------------------------------------------------------------
Sub Main()
On Error GoTo errhandler

'get the source file
Dim Filename As String
Dim Dialog1

    Set Dialog1 = CreateObject("MSComDlg.CommonDialog")
    Dialog1.MaxFileSize = 256
    Dialog1.Filter = "GCode Files (*.tap)|*.tap"
    Dialog1.FilterIndex = 1
    Dialog1.DialogTitle = "select GCode file"
    Dialog1.InitDir = GetUserLabel(200)
    Dialog1.CancelError = True
    'get the last selection
    Dialog1.FileName = ""
    save = false
    If save = true Then
        Dialog1.DefaultExt = def
        Dialog1.Flags = &H800 + &H4
        discard = Dialog1.ShowSave()
    Else
        Dialog1.Flags = &H1000 + &H4 + &H800
        discard = Dialog1.ShowOpen()
    End If

FileName = Dialog1.FileName
If Len(FileName) = 0 Then
message "no source file selected"
Exit Sub
End If
'store last selection
SetUserLabel(200,CurDir)

'find the last "\" in filename
For i = 1 To Len(FileName)
If Mid(FileName,i,1) = "\" Then
last = i
End If
Next i

'extract filename
myfilename = Mid(FileName,last+1,Len(FileName)-last)

'get the destination folder
Dim destfile As String

    Dialog1.DialogTitle = "select destination folder and filename"
    'get the last selection
    Dialog1.FileName = GetUserLabel(201) + "\" + myfilename
    Dialog1.InitDir = GetUserLabel(201)

    save = true
    If save = true Then
        Dialog1.DefaultExt = def
        Dialog1.Flags = &H800 + &H4
        discard = Dialog1.ShowSave()
    Else
        Dialog1.Flags = &H1000 + &H4 + &H800
        discard = Dialog1.ShowOpen()
    End If

destfile = Dialog1.FileName

If Len(destfile) = 0 Then
message "no destination file selected"
  Exit Sub
End If
  'store last selection
SetUserLabel(201,CurDir)

'open input file
FNumInput    = FreeFile 'Determine next file number.
Open FileName For Input As FNumInput

'open output file
FNumOutput = FreeFile 'Determine next file number.
Open "C:\Mach3\GCode\import.txt" For Output As FNumOutput

actions = 0
'go through To whole file
Do While Not EOF(FNumInput)
Line Input #FNumInput, FileData ' Read a line of data.
If ((InStr(FileData,"G43") <> 0) And (Left(FileData,1) <> "(")) Then
Print #FNumOutput, "( " + FileData + " )"
actions = actions + 1
Else
Print #FNumOutput, FileData
End If
Loop


Close ' Close all open files.
message CStr(actions) + " G43 have been found"
DoOEMButton(169) 'close Mach3 files just in case
SourceFile = "C:\Mach3\GCode\import.txt"

FileCopy SourceFile, destfile ' Copy source to target.
Kill SourceFile
LoadFile( destfile)
Exit Sub
errhandler:
message "user cancel"
End Sub