View Full Version : post for mazak 640 m Nexus


plast-art
01-16-2007, 10:21 AM
I created a big part of my post with the Option File Generator but I have problems with the tool change and the drill cycle.

I am not able to place the next tool on the same line of command ( ex: T01 T02 M06)

And I have to add the G83 (or 84 or 86...) by myself in mt text file.

sidecar82
03-17-2007, 01:05 AM
Hello Plast-art
Were i work we have a new lathe with live turret
nobody knows how to turn it on, or how to run it?
can't even get the spindle to turn on?

what is step one
what is the propper way to home out the machine when it come on.
any help at all ?
I dont want to go in to it blind
company has sent 4 men to learn how to run it
none of them know how after going to the mazak school

the parts are needed to run are not that hard to make
or lots of different ones.

thanks sidecar82

plast-art
03-19-2007, 08:50 AM
Sorry, I have a milling 3 axes.
I have no idea how to start it.

sinderal
05-26-2007, 11:50 AM
Write FIL, Just for your ref.......:)

TCF=0 $$ SET TOOL CONTROL FLAG TO ZERO

CIMFIL/ON,LOADTL $$ TRAP LOADTL(TOOLCHANGE)
TNM=POSTF(7,4) $$ CAPTURE TOOL #
HNM=POSTF(7,8) $$ CAPTURE HEIGHT OFFSET #
RSLT=POSTF(2,1,1867,1) $$ SIMULATION MODE ON
RSLT=POSTF(13) $$ EXECUTE THE CURRENT CL RECORD
RSLT=POSTF(2,1,1867,0) $$ SIMULATION MODE OFF
TCF=1 $$ SET TOOL CONTROL FLAG VARIABLE
CIMFIL/OFF $$ END ROUTINE

CIMFIL/ON,SPINDL $$ TRAP SPINDL(SPINDLE)
RTP=POSTF(7,4) $$ CAPTURE RPM VALUE
SPD=POSTF(7,5) $$ CAPTURE SPEED VALUE
RSLT=POSTF(2,1,1867,1) $$ SIMULATION MODE ON
RSLT=POSTF(13) $$ EXECUTE THE CURRENT CL RECORD
RSLT=POSTF(2,1,1867,0) $$ SIMULATION MODE OFF
DIR=POSTF(1,1,1513) $$ SET DIR TO CURRENT INTEGER CODE VALUE
CIMFIL/OFF $$ END ROUTINE

CIMFIL/ON,COOLNT $$ TRAP COOLNT(COOLANT)
RSLT=POSTF(2,1,1867,1) $$ SIMULATION MODE ON
RSLT=POSTF(13) $$ EXECUTE THE CURRENT CL RECORD
RSLT=POSTF(2,1,1867,0) $$ SIMULATION MODE OFF
CNT=POSTF(1,1,1962) $$ SET CNT TO CURRENT INTEGER CODE VALUE
CIMFIL/OFF $$ END ROUTINE

CIMFIL/ON,GOTO $$ TRAP FIRST GOTO STATEMENT
RSLT=POSTF(20)
IF (TCF.EQ.1) THEN
RSLT=POSTF(2,1,1867,1) $$ SIMULATION MODE ON
RSLT=POSTF(21)
RSLT=POSTF(13) $$ EXECUTE THE CURRENT CL RECORD
RSLT=POSTF(2,1,1867,0) $$ SIMULATION MODE OFF
CURX=POSTF(1,3,315) $$ CAPTURE X VALUE
CURY=POSTF(1,3,316) $$ CAPTURE Y VALUE
CURZ=POSTF(1,3,317) $$ CAPTURE Z VALUE
CURA=POSTF(1,3,292)
CURC=POSTF(1,3,294)
INSERT/'M5$'
INSERT/'G91G00G28Z0.$'
INSERT/'G91G00G28X0.Y0.$'
IF(NXTTL.GT.0)THEN
POSTN/IN,20,TNM,T,nxttl,13,6 $$ OUTPUT TOOL # AND M6
ELSE
POSTN/IN,20,TNM,T,0,13,6
ENDIF
POSTN/IN,7,0,u,FXT,24,CURX,25,CURY,3,CURC,1,CURA,19,SPD,13,DIR $$ OUTPUT XY S AND M3
POSTN/IN,7,43,8,HNM,26,CURZ,13,CNT $$ OUTPUT G43 H Z AND M8
OPFLG=0
TCF=0 $$ RESET TOOL CONTROL FLAG TO ZERO
ELSE
RSLT=POSTF(21) $$ SEND RECORD TO POST
RSLT=POSTF(13)
ENDIF
CIMFIL/OFF


CIMFIL/ON,SELECT $$ Output Fixture Offset with XY G
rslt=POSTF(20)
fxt=POSTF(7,4) $$ Get G54 H
IF(FXT.EQ.0)FXT=54
IF(OPFLG.EQ.1)THEN
POSTN/IN,U,FXT,NEXT
ENDIF
CIMFIL/OFF