Hello Guest it is December 05, 2020, 06:52:34 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 - TPS

G-Code, CAD, and CAM discussions / Re: Using a macro to "ref all home"
« on: August 15, 2018, 01:18:24 PM »
ok tested this here

code M12 macro
Code: [Select]
DoButton( 24 )
DoButton( 23 )
DoButton( 22 )
DoButton( 25 )


gcode file:
Code: [Select]
G53 Z0               
G0 G54 Y-79                     
G0 Y-79                     
T1 M6 S3250 M3
G43 H1 Z15               
G1 F250

without any Problem, maybe somebody else can do the test as well, to doublecheck.

G-Code, CAD, and CAM discussions / Re: Using a macro to "ref all home"
« on: August 15, 2018, 04:44:44 AM »
have you tryed to run your M12 Version with

Config -> General Config -> Ignore M calls while loading    enabled?

VB and the development of wizards / Re: edit REF ALL HOME macro
« on: August 14, 2018, 01:50:34 PM »
Speak ("  zero   macchina") 'Avviso Vocale
   Message "************   ZERO MACCHINA ************"
   Sleep (1000) ' pausa di 1 secondi
   While IsMoving()
   SetParam("XRefPer", GetParam("XRefPer")/15)
   SetParam("YRefPer", GetParam("YRefPer")/15)
   SetParam("ZRefPer", GetParam("ZRefPer")/15)
   'SetParam("ARefPer", GetParam("ARefPer")/15)
   While IsMoving()
   SetParam("XRefPer", GetParam("XRefPer")*15)
   SetParam("YRefPer", GetParam("YRefPer")*15)
   SetParam("ZRefPer", GetParam("ZRefPer")*15)
   'SetParam("ARefPer", GetParam("ARefPer")*15)
   Speak ("zero macchina completato") 'Avviso Vocale

VB and the development of wizards / Re: 4 Way Lathe ATC Macro
« on: August 14, 2018, 08:53:33 AM »
Looks like you whant to wait until PLC has changed tool, and reports it in OEMDro(2001) ?

if so you have to use something like this

While newtoolNumber <> TurretTool
    TurretTool = getoemdro(2001)


General Mach Discussion / Re: Best Screenset for Mach3?
« on: August 09, 2018, 12:48:29 PM »
simular question: what is the best Color for a car to buy!?

text = userlabelXX

you have to use in Screen a Label with description Userlabel10 (just an example).

in VBScript you have to set userlabel like:

myString="hello world"

SetUserLabel(10, myString)

General Mach Discussion / Re: Spindle On and Off- Please help
« on: July 26, 2018, 03:08:53 AM »
if you tell us witch BOB you are using, and what is cobbected on the BOB,
someone may be able to help.

CS-Lab / Re: CSMIO IP/M - No connection / Problem with IP Adress?
« on: July 09, 2018, 04:33:25 AM »
have you checked CSMIO webside for the actual verstion? actual version is 3.016 or so.

Modbus / Re: Mach 3 Modbus TCP with Siemens Logo!8
« on: June 30, 2018, 03:55:15 AM »
Hello Manfred,

you will also have to do some Brain in Mach to write to the modbus.