Hello Guest it is October 26, 2021, 06:41:02 PM

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 - TPS

Brains Development / Re: Brain to trigger home or probe input
« on: October 15, 2014, 09:31:57 AM »
Hi Pierre,

had the same problem with a Y axis driven by two motors.
i put a relay to each home limit switch.

a NC contact of the relay disabled the pulse signal off the motor driver.

i put also a relay to the direction signal of the axis , NO contacts of this relay
linked the NC contact of the limit switch relay.

then i put a NO contact of each limit switch relay in a row to the limit switch input.

worked perfect, i hope you can onderstood what i mean in my bad english.


General Mach Discussion / Re: Spindle requires two inputs for control
« on: October 15, 2014, 04:03:02 AM »
Output#1 for CW
Output#2 for CCW

then connect two relays to the outputs

Relay 1 CW
Relay 2 CCW

Relay 1 one NO contact to ON/OFF
Relay 2 one NO contact to ON/OFF (parallel to Relay 1) and an other NO contact to the direction input.


German / Re: Not-Aus ohne Funktion in Mach3, Step-3D
« on: September 19, 2014, 02:47:23 AM »

ich kenne leider die Step-3D karte nicht, wenn ich mir aber die Belegung anschaue:

Schnittstellenbelegung (gültig für D-Sub 25 Stecker)
Pin Norm-Bezeichnung Software Signal
1 Strobe Spindel
2 Data Bit 0 Richtung X
3 Data Bit 1 Takt X
4 Data Bit 2 Richtung Y
5 Data Bit 3 Takt Y
6 Data Bit 4 Richtung Z
7 Data Bit 5 Takt Z
8 Data Bit 6 frei (optional Richtung C)
9 Data Bit 7 frei (optional Takt C)
10 Acknowledge End/Referenz Z
11 Busy Enable
12 Paper Out End/Referenz Y
13 Select End/Referenz X
14 Autofeed Kühlmittel
15 Error frei (opt. End/Referenz C)
16 Reset Boost
17 Select Sleep (low aktiv)
18-25 GND GND

wird das Not-Aus Signal, welches Due warscheinlich hier aufgelegt hast:

Pin HD-2X5 Pin 9 gegen Masse

so wird dieses gar nicht auf die Paralelle Schnittstelle weitergegeben,
und somit kann Mach3 dieses Signal nicht auswerten.

Die einzige Möglichkeit, die ich auf die schnelle sehe ist,
den Pin 9 mit Pin 7 zu brücken (insofern die 4.Achse nicht benutzt wird)
und dann den

15 Error frei (opt. End/Referenz C)

Eingang für den Not-Aus zu benutzen.

Gruß Thomas

Mach Screens / translation main menue and submenues
« on: September 17, 2014, 10:22:06 AM »

does anybody know of a possibility to translate main menue bar and
al the submenues ?

Thanks Thomas

Mach Screens / tooltiptext
« on: September 17, 2014, 03:55:45 AM »
has anyone a idea how to add a tooltiptext to a button ?

Thanks Thomas

Screen designer tips and tutorials / Re: BMP automatic update
« on: September 17, 2014, 02:43:28 AM »
OK i found a solution.

here the code:
Code: [Select]
Dim objDialog
Dim filesys
set filesys=CreateObject("Scripting.FileSystemObject")

' Create a dialog object
Set objDialog = CreateObject( "UserAccounts.CommonDialog" )
objDialog.InitialDir = "C:\Programme\Platemaster\Projekte"
objDialog.Filter = "Programm|*.tap"
' Open the dialog and return the selected file name
If objDialog.ShowOpen Then

If filesys.FileExists(Left(objDialog.FileName, Len(Trim(objDialog.FileName)) - 4) + ".bmp") Then
filesys.CopyFile Left(objDialog.FileName, Len(Trim(objDialog.FileName)) - 4) + ".bmp", "C:\Mach3\Bitmaps\Platemaster\Anzeige.BMP"
    End If

GetFileName = ""
End If

ok its reloading the whole screenset and not only the bitmap, but its working.


Screen designer tips and tutorials / Re: BMP automatic update
« on: September 16, 2014, 08:52:42 AM »
Hello Gerry,

sorry for the bad explaining.

my self written postprozessor is creating now a picture (BMP) of the coresponding
cnc program with the finished part.

what i am trying to do is to display this pricture on my screenset.

-i created a picuturebox in my screenset witch is diplaying the file part.bmp
-in my load G-code button a script is loading the g-code file (no problem) and it is doing a filecopy from actpart.bmp to the part.bmp
an here starts my problem, because the picturebox is not updated dynamicly. if i reload the screenset or stop and start Mach3 software
the picture is updated.

-in my close file button a script close the g-code file (no problem) and does a filecopy from blank.bmp to part.bmp and of course
the same problem with the update.

hope you understand now what i am trying to do.
any other solution is welcome.

Thanks Thomas

Screen designer tips and tutorials / BMP automatic update
« on: September 16, 2014, 07:43:15 AM »

is there any possibility to update a BMP picture during runtime ?

mine is only update if i start the software.

Thanks Thomas

VB and the development of wizards / Re: homing macro and Ismoving
« on: September 16, 2014, 03:12:47 AM »

i'm back. this is the final macro, witch was working in my test scenario for more then
two hours without any stop. more then 4 times longer then any version before.

Code: [Select]
Sub Main()
' -------------------------------------------------------------------------------
' TPS 03.09.2014  
' Referenzschalter freifahren und anschliessend Referenzieren
' neue Version mit Benutzung von OEM Led's
' -------------------------------------------------------------------------------
'beim Laden des Files Abbrechen
If IsLoading() Then
    GoTo Ende
End If

'Geladenes Werkzeug lesen--------------------------------------------------------
AktWerkzeug = GetOEMDRO(1000)
If AktWerkzeug <> 0 Then
MsGBox "Referenzfahr mit geladenem Werkzeug nicht möglich. Bitte manuell entfernen."
        GoTo Ende
End If    

Message ("Automatische Referenzfahrt")

'Z referenzieren
Message ("Z-Achse referenzieren")
'RefCombination(4)   'Zuerst Z
DoOemButton(1024) 'Ref Z
While GetOemLed(809) = true
   If GetOemLed(800) Then
       Message"Fehler Referenzfahrt Z"
   End If

'X und Y referenzieren
Message ("X/Y-Achse referenzieren")
'RefCombination(3) ' dann X und Y
DoOemButton(1023) 'Ref Y
DoOemButton(1022) 'Ref X
While ((GetOemLed(807) = true) Or (GetOemLed(808) = true))
   If GetOemLed(800) Then
       Message"Fehler Referenzfahrt X/Y"
   End If

Code "G54" 'Koordinatenverschiebung ein
Sleep(500) 'warten
Message (" ") 'Stauszeile löschen
Exit Sub

 Message ("Automatisches Referenzieren Abgebrochen")
End Sub      

dont ask me about the difference between DoButton(22) and DoOEMbutton(1022),
but it seems to work.

VB and the development of wizards / Re: homing macro and Ismoving
« on: September 07, 2014, 10:50:16 AM »

i think i have to wait now, what the CSLab people figure out.
i have send them all the results off my testing.

let's see whats gona happen.

I will be offline until end of this week.