API tools faq
paste
Guest User

Untitled

a guest
Nov 7th, 2012
130
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 7.78 KB | None | 0 0
raw download clone embed print report
  1.  
  2.  
  3. (ROTORY TABLE STEPPER MOUNT PROFILE.NC)
  4. ( MACH 3 - ENGLISH)
  5. (WED. 03/26/2008 04:17PM)
  6.  
  7. ;Zero AT END OF STOCK
  8.  
  9.  
  10. ( T1 LEFT HAND TRIANGLE CARBIDE CUTTER)
  11. ( T2 RIGHT HAND TRIANGLE CARBIDE CUTTER)
  12. ( T3 RIGHT HAND DIAMOND CARBIDE CUTTER)
  13.  
  14. ( T8 HSS CUT OFF)
  15. ( T9 CARBIDE CUT OFF)
  16.  
  17. ( T30 CENTER DRILL , DIAMETER = .5 , LENGTH = 5.)
  18. ( T31 DRILL , DIAMETER = .4375 7/16, LENGTH = 5.)
  19. ( T32 DRILL , DIAMETER = 1/4 .25 , LENGTH = 5.)
  20. ( T34 DRILL , DIAMETER = 1/2 .5, LENGTH = 5.)
  21. ( T36 DRILL , DIAMETER = 21/64 , LENGTH = 5.)
  22.  
  23.  
  24. ( T30 CENTER DRILL , DIAMETER = .3/16 , LENGTH = 5.)
  25. ( T41 BORING BAR H8273 0.433 MINIMUM)
  26. ( T50 INTURNAL THREADING BAR H8274 0.433 MINIMUM)
  27. ( T51 INTURNAL THREADING BAR H??? ?? MINIMUM, NEXT SIZE UP)
  28. ( T98 INTURNAL GROOVING BAR )
  29. ( T99 INTURNAL BORING BAR )
  30.  
  31.  
  32. #1=0 ;Z0 START END OF STOCK
  33. #2=0 ;X0 START CENTER OF STOCK
  34. #3=[[3.]/2] ;RAIDIUS OF BLANK
  35. #4=0.03 ;CUT START OFFSET
  36. #5=0.02 ;STOCK FEED OFSET FOR NEW PART
  37. #6=[#3-0.1] ;X FOR STOCK FEED OPERATIONS
  38. #7=0.03 ;X CENTER OVER FEED FOR COMPLETE CUT
  39. #8=0
  40. #9=0
  41. #10=0.05 ;CLEARANCE
  42.  
  43. ;DRILLING CENTER DRILL
  44. #20=#1 ;STARTING DEPTH OF CENTER DRILLING
  45. #21=-0.07 ;DEPTH OF CENTER DRILL STARTING THREAD HOLE
  46. #22=1 ;CENTER DRILL, NUMBER OF PULLOUTS
  47. #23=-0.01 ;RETRACT OF CENTER DRILL
  48. #24=3 ;NUMBER OF PECKS PER PULLOUT
  49.  
  50.  
  51. ;DRILLING HOLE .25
  52. #25=#1 ;STARTING DEPTH OF DRILLING
  53. #26=[[#1+.1]*-1] ;DEPTH OF DRILLING ROUGH HOLE;
  54. #27=4 ;DRILLING, NUMBER OF CLEANING PULLOUTS
  55. #28=-0.01 ;RETRACT OF DRILL
  56. #29=2 ;NUMBER OF PECKS PER PULLOUT
  57. ;
  58. ;THREADING INTERNAL
  59. #50=14 ;TPI
  60. #51=-.425 ;DEAPTH TO RUN THE THREADS
  61. #52=[0.834] ;SIZE OF THREAD
  62. #53=3 ;NUMBER OF SPRING PASSES
  63. #54=[0.54127*[1/#50]] ;HIEGHT OF INTERNAL THREAD
  64. #55=[1/#50] ;PITCH OF THREADS
  65. #56=[[[#52/2]-#54]+0.00] ;RAIDIUS OF START FOR THREADING
  66. #57=[[#52/2]+0.006] ;0.2813 RAIDIUS OF FINAL THREAD DEPTH OF THREADING CM 0.2875 SS0.286
  67.  
  68. ;BORING BARS FIRST CUT
  69. #30=-0.625 ;DEPTH OF HOLE
  70. #31=0.29 ;RAIDIUS OF FINAL CUT
  71. #32=0.29 ;[0.875/2] ;[[7/16]/2] ;RADIUS TO USE FOR START OF CUT
  72. #33=0 ;NUMBER OF CUTS
  73. #34=0 ;SIZE OF FINAL CUT
  74.  
  75. ;BORING BAR 2 SECOND CUT FOR NIPPLE
  76. #35=-0.715 ;DEPTH OF HOLE
  77. #36=[0.693/2] ;RAIDIUS OF FINAL CUT .696
  78. #37=[0.693/2] ;[[7/16]/2] ;RADIUS TO USE FOR START OF CUT .696
  79. #38=0
  80. #39=0
  81.  
  82. ;BORING BAR 3 LAST CUT FOR THREAD
  83. #40=-0.425 ;DEPTH OF HOLE
  84. #41=[#56+0.0] ;RAIDIUS OF FINAL CUT
  85. #42=[#56+0.0] ;[[7/16]/2] ;RADIUS TO USE FOR START OF CUT
  86. #43=0 ;NUMBER OF CUTS
  87. #44=0 ;SIZE OF FINAL CUT
  88.  
  89. ;;BORING BAR 4
  90. ;#45=-? ;DEPTH OF HOLE
  91. ;#46=? ;RAIDIUS OF FINAL CUT
  92. ;#47=? ;[[7/16]/2] ;RADIUS TO USE FOR START OF CUT
  93. ;#48=0
  94. ;#49=0
  95. ;
  96.  
  97.  
  98. #64=#40 ;Z OF 45 DEG START
  99. #65=#41 ;X of 45 DEG START
  100. #66=-0.45 ;Z OF 45 DEG END
  101. #67=[0.700/2] ;X of 45 DEG END
  102.  
  103.  
  104. #61=#67 ;X
  105. #62=#66 ;Z
  106. #63=.015 ;RADIUS
  107.  
  108. #68=[0.8/2] ;X
  109. #69=0 ;Z
  110. #70=0.1;RADIUS
  111.  
  112.  
  113. ;CONVERT TO RADIUS
  114. #4=[#4/2]
  115. #5=[#5/2]
  116. #8=[#8/2]
  117.  
  118.  
  119. ;CALCULATED VALUES
  120. #200=0
  121. #201=0
  122. #202=0
  123. #203=0
  124. #204=0
  125. #206=0
  126. #207=0
  127. #208=0
  128. #209=0
  129. #210=0
  130.  
  131. ;TEMP PLACE HOLERS
  132. #240=0
  133. #241=0
  134. #242=0
  135. #243=0
  136. #244=0
  137. #245=0
  138. #246=0
  139. #247=0
  140. #248=0
  141. #249=0
  142. #250=0
  143.  
  144.  
  145.  
  146. G18 G40 G49 G90 G94 G80
  147. M3
  148. G20
  149. G95
  150. S250
  151. F0.006
  152.  
  153. (JOB 1 ZERO NUMBER 1 CUTTER, RUN IT UP TO ZERO AND HIT ZERO)
  154. ;M0
  155. T0101 ;LOAD CUTTER
  156. T0101 ;ZERO CUTTER
  157. G0Z0.1
  158. ;M98 P10 L6( SUBPROGRAM CALL )
  159.  
  160. (JOB 2 FACE )
  161.  
  162.  
  163. G0 X[#3+#4]
  164. Z0
  165. G91
  166. G1 X-0.35
  167. G90
  168. G0 Z0.03
  169.  
  170. (JOB 2B DIA REDUCE )
  171.  
  172. F0.006
  173. G0 X[#3-.035]
  174. G0 Z0
  175. G1Z-0.03 X[#3-.005]
  176. G0 X[#3-.005]
  177. G1Z-0.575
  178. ;G91
  179. G1 X[2.95/2]
  180. Z-0.76
  181. ;G1 X-0.35
  182. ;G90
  183. G0 X[#3+#4]
  184.  
  185. G0 Z1.5
  186.  
  187.  
  188. (JOB 3 BORE ID)
  189.  
  190. T9999
  191. F0.006
  192. G0X[2.51/2]
  193. Z#4
  194. G1Z-0.7
  195. G0 X[[2.51/2]-#4]
  196. G0 Z#4
  197.  
  198.  
  199.  
  200. (JOB 4 CUT FRONT STEP )
  201.  
  202. F.006
  203.  
  204. #240=[#1+#4] ;Z STARTING DEPTH
  205. #241=[2.536/2] ;#42 ;0.25 ;X STARTING RAIDUS
  206. #242=-0.09 ;Z END DEPTH
  207. #243=[2.774/2] ;#41 ;X END RAIDUS
  208. #244=4 ;NUMBER CUTS
  209. #245=0 ;LAST CUT DEPTH
  210. #246=0 ;TAPER START
  211. #247=0 ;TAPER END
  212.  
  213. ;G0Z#240
  214. ;X#241
  215. ;G1Z#241
  216.  
  217. M98 P20 (CALL BORING)
  218. G0Z#4
  219. ;CUT FRONT TAPER
  220.  
  221. G0 X[[2.774/2]+0.035]
  222. Z0
  223.  
  224.  
  225. Z-0.01G1 X[[2.774/2]+0.025]
  226.  
  227. G1 Z-0.1 X[2.774/2]
  228.  
  229. F0.004
  230. G1X[[2.533/2]+0.02]
  231. G1Z-0.12X[2.533/2]
  232. ;Z#4
  233. G1Z-0.7
  234. G0 X[[2.533/2]-#4]
  235. G0 Z#4
  236.  
  237.  
  238. ;G1 G91X-0.2
  239. ;G90
  240.  
  241.  
  242. G0 Z1
  243.  
  244. (JOB 5 ORING GROVE )
  245.  
  246.  
  247. T9898
  248. F0.002
  249.  
  250. G0X[[2.51/2]-#4]
  251. Z-0.406
  252. G1 X[2.718/2]
  253. G4 P500
  254.  
  255. F0.01
  256. G1X[[2.51/2]-#4]
  257. F0.004
  258. Z[-0.406-0.02]
  259. X[2.51/2]
  260. Z-.406X[[2.51/2]+.01]
  261.  
  262. F0.01
  263. G1X[[2.51/2]-#4]
  264. F0.004
  265. Z[-0.406+0.02]
  266. X[2.51/2]
  267. Z-.406X[[2.51/2]+.01]
  268. G0X[[2.51/2]-#4]
  269.  
  270.  
  271. G0
  272. Z0.25
  273.  
  274. (JOB 6 BACK STEP )
  275. T0808
  276. F0.003
  277.  
  278. G0 X[#3+#4]
  279. Z-0.504
  280. G1 X[2.946/2]
  281. Z-0.635
  282. F0.01
  283. G1 X[#3+#4]
  284.  
  285. (JOB 7 CUTOFF )
  286. F0.002
  287. ;G0 X[#3+#4]
  288. ;Z-0.635
  289. G1 X[2.85/2]
  290. G0 X#3
  291. Z[-0.635+0.03]
  292. G1 X[2.95/2]
  293. G1 Z-0.635X[[2.95/2]-0.02]
  294. G1 X[2.45/2]
  295. F0.01
  296. G1 X[#3+#4]
  297. G0
  298. Z0.5
  299. X2.85
  300.  
  301. G00
  302. ;M98 P11 ( SUBPROGRAM CALL )
  303. G00
  304.  
  305. G00
  306. ;X0 Y0 A0
  307. M30
  308.  
  309.  
  310. ;*******************************************
  311.  
  312. O10 (SUBPROGRAM DRILL)
  313. G91
  314. #250=#240 ;STARTING DEPTH OF DRILLING
  315. #251=[#241/#242] ;DEPTH PER PULLOUT
  316. #252=[#251/#244] ;DEPTH PER PECK
  317. #200=#250
  318. #201=[#242-1]
  319. G90
  320. G0Z[#250+#4] ;Z0 START END OF STOCK + CUT START OFFSET
  321. ;M0
  322. G1Z#250
  323. ;M0
  324. G91
  325. M98 P11 L#201(CALL DRILL STEP)
  326. M98 P12 L#244(CALL PECK)
  327. G90
  328. ;M1
  329. G4P100
  330. G0Z[#1+#4]
  331. ;M1
  332. G90
  333. M99 ( SUBPROGRAM RETURN )
  334. ;*******************************************
  335.  
  336.  
  337. ;*******************************************
  338.  
  339. O11 (SUBPROGRAM STEP ADVANCE)
  340. G91
  341. #200=[#200+#251]
  342. M98 P12 L#244(CALL PECK)
  343. G90
  344. G0Z[#1+#4]
  345. ;M1
  346. G0Z[#200+#4]
  347. ;M1
  348. G91
  349. G1Z[#4*-1]
  350. ;M1
  351. G90
  352. M99 ( SUBPROGRAM RETURN )
  353. ;*******************************************
  354. ;*******************************************
  355.  
  356. O12 (SUBPROGRAM PECK)
  357. G91
  358.  
  359. G1Z#252
  360. ;M1
  361. G0Z[#243*-1]
  362. ;M1
  363. G1Z#243
  364. ;M1
  365. G90
  366. M99 ( SUBPROGRAM RETURN )
  367. ;*******************************************
  368. ;*******************************************
  369.  
  370. O20 (SUBPROGRAM BORING MULTI PASS)
  371. G90
  372. G0X#241
  373. G0Z#240
  374. #200=#240
  375. #201=#241
  376. #202=[[[#243-#241]-#245]/#244]
  377. #203=#202
  378.  
  379. M98 P21 L#244 (CALL SUB BORING)
  380. G0Z[#1+#4]
  381. ;M0
  382. G0Z#240
  383. G0X#243
  384. G1Z#242
  385. G0
  386. G91X-0.01
  387. G90
  388. ;M1
  389. G0Z#240
  390. G1
  391. G90
  392. M99 ( SUBPROGRAM RETURN )
  393. ;*******************************************
  394. ;*******************************************
  395.  
  396. O21 (SUB SUBPROGRAM BORING SINGLE PASS THEN GO TO START)
  397. G90
  398. G0Z#240
  399. G0X[#241+#203]
  400. G1Z#242
  401. G0
  402. G91X-0.01
  403. G90
  404. G0Z#240
  405. G1
  406. #203=[#203+#202]
  407. G90
  408.  
  409. G90
  410. M99 ( SUBPROGRAM RETURN )
  411. ;*******************************************
  412.  
  413. ;*******************************************
  414.  
  415. O22 (SUBPROGRAM BORING SINGLE PASS WITH 0.01 PULL BACK THEN GO TO START)
  416.  
  417. G90
  418. G0X#241
  419. G0Z#240
  420. G0X#243
  421. G1Z#242
  422. G91X-0.01
  423. ;F0.003
  424. ;G1Z0.15
  425. G90
  426. ;M1
  427. ;F0.003
  428. G0Z#240
  429. G90
  430. M99 ( SUBPROGRAM RETURN )
  431. ;*******************************************
  432.  
  433. O23 (SUBPROGRAM BORING SINGLE PASS STOP AT END CUT)
  434.  
  435. G90
  436. G0X#241
  437. G0Z#240
  438. G0X#243
  439. G1Z#242
  440. ;G91X-0.01
  441. ;G90
  442. ;M1
  443. ;F0.003
  444. ;G1Z#240
  445. G90
  446. M99 ( SUBPROGRAM RETURN )
  447. ;*******************************************
  448. ;*******************************************
  449.  
  450. O24 (SUBPROGRAM BORING SINGLE PASS AND BACK CUT 0.225 THEN PULL BACK 0.01 GO TO START)
  451.  
  452. G90
  453. G0X#241
  454. G0Z#240
  455. G0X#243
  456. G1Z#242
  457. G91
  458. F0.003
  459. G1Z0.225
  460. ;G90
  461. ;M1
  462. ;F0.003
  463. X-0.01
  464. G90
  465. ;G0Z#240
  466. G0
  467. G90
  468. M99 ( SUBPROGRAM RETURN )
  469. ;*******************************************
  470. O30 (LATHE FILLET INTERNAL BORING CORNER LATHE)
  471. G90
  472. X#301 Z#302
  473. G02 X[#301-[#303]] Z[#302-[#303]] I0 K[[#303]*-1] ;J2 [[#3/2]*-1]
  474. G80
  475. G90
  476. M99 ( SUBPROGRAM RETURN )
  477.  
  478. O31 (LATHE FILLET EXTERNAL CORNER LATHE)
  479. G90
  480. X#301 Z#302
  481. G03 X[#301+[#303]] Z[#302-[#303]] I0 K[[#303]*-1] ;J2 [[#3/2]*-1]
  482. G80
  483. G90
  484. M99 ( SUBPROGRAM RETURN )
  485. ;*******************************************
  486. ;*******************************************
  487.  
  488. O500 (CUTTING STOCK DOWN TO SIZE)
  489. #205=[#205+#202]
  490. G90
  491. G0X#203
  492. G0Z#200
  493. ;G91
  494. G0X[#203-#205] ;[#205*-1]
  495. ;G90
  496. G1Z#201
  497. G1X[#203+.01]
  498. G0Z#200
  499.  
  500. M99
Advertisement
Add Comment
Please, Sign In to add comment
Public Pastes
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!