Jump to content

Welcome to eMastercam

Register now to participate in the forums, access the download area, buy Mastercam training materials, post processors and more. This message will be removed once you have signed in.

Use your display name or email address to sign in:

IF [MY IDEA DOSENT WORK] THEN GOTO THE FORUM

oneyankfan1

By oneyankfan1,
in Industrial Forum

 Share

Recommended Posts

oneyankfan1 Newbie

oneyankfan1

Posted
Posted

Okuma/Renishaw Guys.......

 

Im writing this code to use as a base for some renishaw probing. We want to find 2ea. Z points, subtract the smaller number from the larger number, then divide that number by 2. Then take that answer and add it to the smaller of the 2 numbers. to come up with the median of the values then shove that to an offset. This is our current code. Keep in mind Im new to probing and renishaw so bear with me.

VC81=10VC82=40VC121=VC81VC122=VC82IF[VC121 GE VC122]GOTO N1N1 VC123=VC121IF[VC121 LE VC122]GOTO N2N2 VC124=VC121IF[VC122 GE VC121]GOTO N3N3 VC123=VC122IF[VC122 LE VC121]GOTO N4N4 VC124=VC122VC125=VC123-VC124/2+VC124M02

The problem comes when I try to make the larger of the 2 numbers stay in  VC123 and the smaller number stay in VC124. I cant get it to stay that way. I change VC81 to 40 and VC 82 to 10 and VC121 and VC122 obviously follow suit but after that Im lost, I have tried many combos of verbage and structure but I am missing something some where. Im not even sure my structure is right for VC125. Any help would be appreciated. Thanks in advance. 

Link to comment
Share on other sites
The Cathedral Newbie

The Cathedral

Posted
Posted

Also I don't think your logic is correct. Right now you're saying, if 40 is bigger than ten, set VC123 and VC124 to 40. Try this:

 

VC81=10
VC82=40

 

VC121=VC81
VC122=VC82

 

IF[VC122 GE VC121]GOTO N1

VC123=VC121

VC124=VC122

GOTO N2

 

N1

VC123=VC122

VC124=VC121

 

N2

VC125=[[VC123-VC124]/2]+VC124

Link to comment
Share on other sites
oneyankfan1 Newbie

oneyankfan1

Posted
  • Author
Posted

Here is what I came up with :

 

 
O9001
(HOUSING, 25 GPM VANE PUMP)
(MOTOR CAN SIDE)
(Probe and set WORK ZERO for LEFT side parts on B 0 and B180)
 
(Set initial fixture offset values)
 
(Left side UPPER B 0)
VZOFX[1]=-6.6485
VZOFY[1]=25.5460
VZOFZ[1]=-8.37
 
(Left side LOWER B 0)
VZOFX[3]=-6.6485
VZOFY[3]=14.5460
VZOFZ[3]=-8.37
 
(Left side UPPER B 180)
VZOFX[11]=-6.6485
VZOFY[11]=25.5460
VZOFZ[11]=-8.37
 
(Left side LOWER B 180)
VZOFX[13]=-6.6485
VZOFY[13]=14.5460
VZOFZ[13]=-8.37
 
(PROBING ROUTINES)
G00 B0.
T1 M6
G56 HA (ACTIVE TOOL HEIGHT)
M204 (SENSOR POWER ON)
M130(FEEDRATE WITHOUT SPINDLE ROTATION)
 
(*** UPPER LEFT PART B 0 SIDE***)
G15 H1(FIXTURE OFFSET)
 
(CENTER HOLE)
G31 G01 X0.0 Y0.0 F1000.0
G31 Z1.0 F500.0
G31 G01 Z.820 F500.0
 
CALL OO10 PMOD=7 PDI=1.3662(PROBE FINDS CENTER OF ID)
CALL OO20 PX=0 PY=0 PHN=1(SETS CENTER OF ID TO WORK ZERO)
 
G31 G01 Z2.0 F500.0(RETRACT)
 
(UPPER BOSS)
G31 G01 X0. Y2.500 F1000.0
G31 G01 Z1.0 F500.0
G31 G01 Z.350 F50.0
 
CALL OO10 PMOD=3 PEI=0 POVT=.5 PUDT=.5 (PROBE FINDS SURFACE)
CALL OO20 PHN=90 PZ=0
VC81=VZOFZ[90] (PUSH RESULT TO COMMON VARIABLE 81)
 
G31 G01 Z2.0 F500.0(RETRACT)
 
(LOWER BOSS)
G31 G01 X0. Y-2.500 F1000.0
G31 G01 Z1.0 F500.0
G31 G01 Z.350 F50.0
 
CALL OO10 PMOD=3 PEI=0 POVT=.5 PUDT=.5 (PROBE FINDS SURFACE)
CALL OO20 PHN=91 PZ=0
VC82=VZOFZ[91] (PUSH RESULT TO COMMON VARIABLE 81)
 
G31 G01 Z2.0 F500.0(RETRACT)
 
CALL OZSET (Math Function MACRO)
VZOFZ[1]=VC127(SET Z ON H1)
 
(*** LOWER LEFT PART B 0 SIDE***)
G15 H3(FIXTURE OFFSET)
 
(CENTER HOLE)
G31 G01 X0.0 Y0.0 F1000.0
G31 Z1.0 F500.0
G31 G01 Z.820 F500.0
 
CALL OO10 PMOD=7 PDI=1.3662(PROBE FINDS CENTER OF ID)
CALL OO20 PX=0 PY=0 PHN=3(SETS CENTER OF ID TO WORK ZERO)
 
G31 G01 Z2.0 F500.0(RETRACT)
 
(UPPER BOSS)
G31 G01 X0. Y2.500 F1000.0
G31 G01 Z1.0 F500.0
G31 G01 Z.350 F50.0
 
CALL OO10 PMOD=3 PEI=0 POVT=.5 PUDT=.5 (PROBE FINDS SURFACE)
CALL OO20 PHN=90 PZ=0
VC81=VZOFZ[90] (PUSH RESULT TO COMMON VARIABLE 81)
 
G31 G01 Z2.0 F500.0(RETRACT)
 
(LOWER BOSS)
G31 G01 X0. Y-2.500 F1000.0
G31 G01 Z1.0 F500.0
G31 G01 Z.350 F50.0
 
CALL OO10 PMOD=3 PEI=0 POVT=.5 PUDT=.5 (PROBE FINDS SURFACE)
CALL OO20 PHN=91 PZ=0
VC82=VZOFZ[91] (PUSH RESULT TO COMMON VARIABLE 81)
 
G31 G01 Z2.0 F500.0(RETRACT)
 
CALL OZSET (Math Function MACRO)
VZOFZ[3]=VC127(SET Z ON H3)
 
G00 Z50.0 (SAFE RETRACT)
B180
 
(***PROBE B180 SIDE***)
 
G56 HA (ACTIVE TOOL HEIGHT)
M130(FEEDRATE WITHOUT SPINDLE ROTATION)
 
(*** UPPER LEFT PART B 180 SIDE***)
G15 H11(FIXTURE OFFSET)
 
(CENTER HOLE)
G31 G01 X0.0 Y0.0 F1000.0
G31 Z1.0 F500.0
G31 G01 Z.820 F500.0
 
CALL OO10 PMOD=7 PDI=1.3662(PROBE FINDS CENTER OF ID)
CALL OO20 PX=0 PY=0 PHN=11(SETS CENTER OF ID TO WORK ZERO)
 
G31 G01 Z2.0 F500.0(RETRACT)
 
(UPPER BOSS)
G31 G01 X0. Y2.500 F1000.0
G31 G01 Z1.0 F500.0
G31 G01 Z.350 F50.0
 
CALL OO10 PMOD=3 PEI=0 POVT=.5 PUDT=.5 (PROBE FINDS SURFACE)
CALL OO20 PHN=90 PZ=0
VC81=VZOFZ[90] (PUSH RESULT TO COMMON VARIABLE 81)
 
G31 G01 Z2.0 F500.0(RETRACT)
 
(LOWER BOSS)
G31 G01 X0. Y-2.500 F1000.0
G31 G01 Z1.0 F500.0
G31 G01 Z.350 F50.0
 
CALL OO10 PMOD=3 PEI=0 POVT=.5 PUDT=.5 (PROBE FINDS SURFACE)
CALL OO20 PHN=91 PZ=0
VC82=VZOFZ[91] (PUSH RESULT TO COMMON VARIABLE 81)
 
G31 G01 Z2.0 F500.0(RETRACT)
 
CALL OZSET (Math Function MACRO)
VZOFZ[11]=VC127(SET Z ON H11)
 
 
(*** LOWER LEFT PART B 180 SIDE***)
G15 H13(FIXTURE OFFSET)
 
(CENTER HOLE)
G31 G01 X0.0 Y0.0 F1000.0
G31 Z1.0 F500.0
G31 G01 Z.820 F500.0
 
CALL OO10 PMOD=7 PDI=1.3662(PROBE FINDS CENTER OF ID)
CALL OO20 PX=0 PY=0 PHN=13(SETS CENTER OF ID TO WORK ZERO)
 
G31 G01 Z2.0 F500.0(RETRACT)
 
(UPPER BOSS)
G31 G01 X0. Y2.500 F500.0
G31 G01 Z1.0 F200.0
G31 G01 Z.350 F50.0
 
CALL OO10 PMOD=3 PEI=0 POVT=.5 PUDT=.5 (PROBE FINDS SURFACE)
CALL OO20 PHN=90 PZ=0
VC81=VZOFZ[90] (PUSH RESULT TO COMMON VARIABLE 81)
 
G31 G01 Z2.0 F200.0(RETRACT)
 
(LOWER BOSS)
G31 G01 X0. Y-2.500 F1000.0
G31 G01 Z1.0 F500.0
G31 G01 Z.350 F50.0
 
CALL OO10 PMOD=3 PEI=0 POVT=.5 PUDT=.5 (PROBE FINDS SURFACE)
CALL OO20 PHN=91 PZ=0
VC82=VZOFZ[91] (PUSH RESULT TO COMMON VARIABLE 81)
 
G31 G01 Z2.0 F500.0(RETRACT)
 
CALL OZSET (Math Function MACRO)
VZOFZ[13]=VC127(SET Z ON H13)
 
G00 Z50.0 (SAFE RETRACT)
M205 (SENSOR POWER OFF)
B0
 
(There's no place like...) 
G30 P1
M131(FEEDRATE WITH SPINDLE ROTATION)
 
RTS
 
 
 
 
 
OZSET
(COMMON VARIABLES 81-120 DATA COLLECTION)
(COMMON VARIABLES 121-130 CALCULATIONS)
 
(CLEAR OLD VALUES)
VC121=0
VC122=0
VC123=0
VC124=0
VC125=0
VC126=0
VC127=0
 
 
VC121=VC81
VC122=VC82
 
CALL O111
NSKIP
CALL O222
 
VC125= VC123-VC124
NDIV
 
NDIV 
VC126=VC125/2
NEQ
 
NEQ
VC127=VC126+VC124
 
NEND
RTS
 
O111
IF[VC121 GT VC122] N1
IF[VC121 LT VC122] GOTO NSKIP
 
N1 
VC123=VC121
VC124=VC122
 
NSKIP
RTS
 
O222
IF[VC121 LT VC122] N2
IF[VC121 GT VC122] GOTO NEND
 
N2 
VC123=VC122
VC124=VC121
 
NEND
RTS
 
 
 
Link to comment
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

×
 Share
Go to topic listing

  • Recently Browsing   0 members

    • No registered users viewing this page.

Join us!

eMastercam - your online source for all things Mastercam.

Together, we are the strongest Mastercam community on the web with over 56,000 members, and our online store offers a wide selection of training materials for all applications and skill levels.

Useful Links

Contact Info

Subscribe to eMastercam News

 

Legal

Privacy Policy

Store Terms & Conditions

Forum Guidelines

Follow us

×
×
  • Create New...