iCAx开思网

标题: 用PowerMILL 做2D VB+巨集原創 [打印本页]

作者: tonybpx 时间: 2006-3-4 12:07
标题: 用PowerMILL 做2D VB+巨集原創
使用VB後加巨集(複製成你需要的刀數.改成你要刀具大小.都用巨集)
依然使用巨集加入進退刀.注意刀路方向.
POST出來的路徑,必須是 I,J,K,或 R 值,才能補正
不會用 POST 成 I,J,K 或 R 值的可以用 NCTOOLS 或相關軟件改變.

作者: tonybpx 时间: 2006-3-4 12:58
标题: RF.MAC
EXPLORER SELECT Toolpath '2' NEW
ACTIVATE Toolpath '2'
FORM TOOLPATH
EDIT TOOLPATH "2" RECYCLE
ACTIVATE TOOL "40"
EDIT TOOLPATH "2" CALCULATE
AREACLEAR CANCEL
EXPLORER SELECT Toolpath '3' NEW
ACTIVATE Toolpath '3'
FORM TOOLPATH
EDIT TOOLPATH "3" RECYCLE
ACTIVATE TOOL "32"
EDIT TOOLPATH "3" CALCULATE
AREACLEAR CANCEL
EXPLORER SELECT Toolpath '4' NEW
ACTIVATE Toolpath '4'
FORM TOOLPATH
EDIT TOOLPATH "4" RECYCLE
ACTIVATE TOOL "30"
EDIT TOOLPATH "4" CALCULATE
AREACLEAR CANCEL
ACTIVATE Toolpath '5'
FORM TOOLPATH
EDIT TOOLPATH "5" RECYCLE
ACTIVATE TOOL "25"
EDIT TOOLPATH "5" CALCULATE
AREACLEAR CANCEL
ACTIVATE Toolpath '6'
FORM TOOLPATH
EDIT TOOLPATH "6" RECYCLE
ACTIVATE TOOL "20"
EDIT TOOLPATH "6" CALCULATE
AREACLEAR CANCEL
ACTIVATE Toolpath '7'
FORM TOOLPATH
EDIT TOOLPATH "7" RECYCLE
ACTIVATE TOOL "16"
EDIT TOOLPATH "7" CALCULATE
AREACLEAR CANCEL
ACTIVATE Toolpath '8'
FORM TOOLPATH
EDIT TOOLPATH "8" RECYCLE
ACTIVATE TOOL "12"
EDIT TOOLPATH "8" CALCULATE
AREACLEAR CANCEL
ACTIVATE Toolpath '9'
FORM TOOLPATH
EDIT TOOLPATH "9" RECYCLE

作者: tonybpx 时间: 2006-3-4 13:00
RF.MAC

EXPLORER SELECT Toolpath '2' NEW
ACTIVATE Toolpath '2'
FORM TOOLPATH
EDIT TOOLPATH "2" RECYCLE
ACTIVATE TOOL "40"
EDIT TOOLPATH "2" CALCULATE
AREACLEAR CANCEL
EXPLORER SELECT Toolpath '3' NEW
ACTIVATE Toolpath '3'
FORM TOOLPATH
EDIT TOOLPATH "3" RECYCLE
ACTIVATE TOOL "32"
EDIT TOOLPATH "3" CALCULATE
AREACLEAR CANCEL
EXPLORER SELECT Toolpath '4' NEW
ACTIVATE Toolpath '4'
FORM TOOLPATH
EDIT TOOLPATH "4" RECYCLE
ACTIVATE TOOL "30"
EDIT TOOLPATH "4" CALCULATE
AREACLEAR CANCEL
ACTIVATE Toolpath '5'
FORM TOOLPATH
EDIT TOOLPATH "5" RECYCLE
ACTIVATE TOOL "25"
EDIT TOOLPATH "5" CALCULATE
AREACLEAR CANCEL
ACTIVATE Toolpath '6'
FORM TOOLPATH
EDIT TOOLPATH "6" RECYCLE
ACTIVATE TOOL "20"
EDIT TOOLPATH "6" CALCULATE
AREACLEAR CANCEL
ACTIVATE Toolpath '7'
FORM TOOLPATH
EDIT TOOLPATH "7" RECYCLE
ACTIVATE TOOL "16"
EDIT TOOLPATH "7" CALCULATE
AREACLEAR CANCEL
ACTIVATE Toolpath '8'
FORM TOOLPATH
EDIT TOOLPATH "8" RECYCLE
ACTIVATE TOOL "12"
EDIT TOOLPATH "8" CALCULATE
AREACLEAR CANCEL
ACTIVATE Toolpath '9'
FORM TOOLPATH
EDIT TOOLPATH "9" RECYCLE
ACTIVATE TOOL "10"
EDIT TOOLPATH "9" CALCULATE
AREACLEAR CANCEL
ACTIVATE Toolpath 'A'
FORM TOOLPATH
EDIT TOOLPATH "A" RECYCLE
ACTIVATE TOOL "6"
EDIT TOOLPATH "A" CALCULATE
AREACLEAR CANCEL

作者: tonybpx 时间: 2006-3-4 13:02
RFT.MAC

ACTIVATE Toolpath '1'
FORM LEADLINK
EDIT TOOLPATH LEADS PAGE LEADIN
EDIT TOOLPATH LEADS GOUGECHECK N
EDIT TOOLPATH LEADS LEADIN HARC
EDIT TOOLPATH LEADS LEADIN ANGLE 90
EDIT TOOLPATH LEADS LEADIN LRAD 15
EDIT TOOLPATH LEADS LEADOUT COPY
EDIT TOOLPATH LEADS PAGE LEADSOUT
EDIT TOOLPATH LEADS PAGE LINK
EDIT TOOLPATH LEADS LINK THRESHOLD 20
EDIT TOOLPATH LEADS LINK SURFACE
EDIT TOOLPATH LEADS LONGLINK INCR
EDIT TOOLPATH LEADS SAFELINK INCR
PROCESS TPLEADS
LEADS ACCEPT
ACTIVATE Toolpath '2'
FORM LEADLINK
EDIT TOOLPATH LEADS PAGE LEADIN
EDIT TOOLPATH LEADS GOUGECHECK N
EDIT TOOLPATH LEADS LEADIN HARC
EDIT TOOLPATH LEADS LEADIN ANGLE 90
EDIT TOOLPATH LEADS LEADIN LRAD 15
EDIT TOOLPATH LEADS LEADOUT COPY
EDIT TOOLPATH LEADS PAGE LEADSOUT
EDIT TOOLPATH LEADS PAGE LINK
EDIT TOOLPATH LEADS LINK THRESHOLD 20
EDIT TOOLPATH LEADS LINK SURFACE
EDIT TOOLPATH LEADS LONGLINK INCR
EDIT TOOLPATH LEADS SAFELINK INCR
PROCESS TPLEADS
LEADS ACCEPT
ACTIVATE Toolpath '3'
FORM LEADLINK
EDIT TOOLPATH LEADS PAGE LEADIN
EDIT TOOLPATH LEADS GOUGECHECK N
EDIT TOOLPATH LEADS LEADIN HARC
EDIT TOOLPATH LEADS LEADIN ANGLE 90
EDIT TOOLPATH LEADS LEADIN LRAD 15
EDIT TOOLPATH LEADS LEADOUT COPY
EDIT TOOLPATH LEADS PAGE LEADSOUT
EDIT TOOLPATH LEADS PAGE LINK
EDIT TOOLPATH LEADS LINK THRESHOLD 20
EDIT TOOLPATH LEADS LINK SURFACE
EDIT TOOLPATH LEADS LONGLINK INCR
EDIT TOOLPATH LEADS SAFELINK INCR
PROCESS TPLEADS
LEADS ACCEPT
ACTIVATE Toolpath '4'
FORM LEADLINK
EDIT TOOLPATH LEADS PAGE LEADIN
EDIT TOOLPATH LEADS GOUGECHECK N
EDIT TOOLPATH LEADS LEADIN HARC
EDIT TOOLPATH LEADS LEADIN ANGLE 90
EDIT TOOLPATH LEADS LEADIN LRAD 15
EDIT TOOLPATH LEADS LEADOUT COPY
EDIT TOOLPATH LEADS PAGE LEADSOUT
EDIT TOOLPATH LEADS PAGE LINK
EDIT TOOLPATH LEADS LINK THRESHOLD 20
EDIT TOOLPATH LEADS LINK SURFACE
EDIT TOOLPATH LEADS LONGLINK INCR
EDIT TOOLPATH LEADS SAFELINK INCR
PROCESS TPLEADS
LEADS ACCEPT
ACTIVATE Toolpath '5'
FORM LEADLINK
EDIT TOOLPATH LEADS PAGE LEADIN
EDIT TOOLPATH LEADS GOUGECHECK N
EDIT TOOLPATH LEADS LEADIN HARC
EDIT TOOLPATH LEADS LEADIN ANGLE 90
EDIT TOOLPATH LEADS LEADIN LRAD 15
EDIT TOOLPATH LEADS LEADOUT COPY
EDIT TOOLPATH LEADS PAGE LEADSOUT
EDIT TOOLPATH LEADS PAGE LINK
EDIT TOOLPATH LEADS LINK THRESHOLD 20
EDIT TOOLPATH LEADS LINK SURFACE
EDIT TOOLPATH LEADS LONGLINK INCR
EDIT TOOLPATH LEADS SAFELINK INCR
PROCESS TPLEADS
LEADS ACCEPT
ACTIVATE Toolpath '6'
FORM LEADLINK
EDIT TOOLPATH LEADS PAGE LEADIN
EDIT TOOLPATH LEADS GOUGECHECK N
EDIT TOOLPATH LEADS LEADIN HARC
EDIT TOOLPATH LEADS LEADIN ANGLE 90
EDIT TOOLPATH LEADS LEADIN LRAD 15
EDIT TOOLPATH LEADS LEADOUT COPY
EDIT TOOLPATH LEADS PAGE LEADSOUT
EDIT TOOLPATH LEADS PAGE LINK
EDIT TOOLPATH LEADS LINK THRESHOLD 20
EDIT TOOLPATH LEADS LINK SURFACE
EDIT TOOLPATH LEADS LONGLINK INCR
EDIT TOOLPATH LEADS SAFELINK INCR
PROCESS TPLEADS
LEADS ACCEPT
ACTIVATE Toolpath '7'
FORM LEADLINK
EDIT TOOLPATH LEADS PAGE LEADIN
EDIT TOOLPATH LEADS GOUGECHECK N
EDIT TOOLPATH LEADS LEADIN HARC
EDIT TOOLPATH LEADS LEADIN ANGLE 90
EDIT TOOLPATH LEADS LEADIN LRAD 15
EDIT TOOLPATH LEADS LEADOUT COPY
EDIT TOOLPATH LEADS PAGE LEADSOUT
EDIT TOOLPATH LEADS PAGE LINK
EDIT TOOLPATH LEADS LINK THRESHOLD 20
EDIT TOOLPATH LEADS LINK SURFACE
EDIT TOOLPATH LEADS LONGLINK INCR
EDIT TOOLPATH LEADS SAFELINK INCR
PROCESS TPLEADS
LEADS ACCEPT
ACTIVATE Toolpath '8'
FORM LEADLINK
EDIT TOOLPATH LEADS PAGE LEADIN
EDIT TOOLPATH LEADS GOUGECHECK N
EDIT TOOLPATH LEADS LEADIN HARC
EDIT TOOLPATH LEADS LEADIN ANGLE 90
EDIT TOOLPATH LEADS LEADIN LRAD 15
EDIT TOOLPATH LEADS LEADOUT COPY
EDIT TOOLPATH LEADS PAGE LEADSOUT
EDIT TOOLPATH LEADS PAGE LINK
EDIT TOOLPATH LEADS LINK THRESHOLD 20
EDIT TOOLPATH LEADS LINK SURFACE
EDIT TOOLPATH LEADS LONGLINK INCR
EDIT TOOLPATH LEADS SAFELINK INCR
PROCESS TPLEADS
LEADS ACCEPT
ACTIVATE Toolpath '9'
FORM LEADLINK
EDIT TOOLPATH LEADS PAGE LEADIN
EDIT TOOLPATH LEADS GOUGECHECK N
EDIT TOOLPATH LEADS LEADIN HARC
EDIT TOOLPATH LEADS LEADIN ANGLE 90
EDIT TOOLPATH LEADS LEADIN LRAD 15
EDIT TOOLPATH LEADS LEADOUT COPY
EDIT TOOLPATH LEADS PAGE LEADSOUT
EDIT TOOLPATH LEADS PAGE LINK
EDIT TOOLPATH LEADS LINK THRESHOLD 20
EDIT TOOLPATH LEADS LINK SURFACE
EDIT TOOLPATH LEADS LONGLINK INCR
EDIT TOOLPATH LEADS SAFELINK INCR
PROCESS TPLEADS
LEADS ACCEPT
ACTIVATE Toolpath 'A'
FORM LEADLINK
EDIT TOOLPATH LEADS PAGE LEADIN
EDIT TOOLPATH LEADS GOUGECHECK N
EDIT TOOLPATH LEADS LEADIN HARC
EDIT TOOLPATH LEADS LEADIN ANGLE 90
EDIT TOOLPATH LEADS LEADIN LRAD 15
EDIT TOOLPATH LEADS LEADOUT COPY
EDIT TOOLPATH LEADS PAGE LEADSOUT
EDIT TOOLPATH LEADS PAGE LINK
EDIT TOOLPATH LEADS LINK THRESHOLD 20
EDIT TOOLPATH LEADS LINK SURFACE
EDIT TOOLPATH LEADS LONGLINK INCR
EDIT TOOLPATH LEADS SAFELINK INCR
PROCESS TPLEADS
LEADS ACCEPT

作者: hua791205 时间: 2006-3-8 00:20
高技术

作者: hua791205 时间: 2006-3-8 00:22
VB好学吗？？？？？？？？？？？？

作者: 13640609720 时间: 2006-3-8 13:17
能不能讲详细点，听不懂

作者: tonybpx 时间: 2006-3-8 16:16
在powerMILL裡面有關巨集(宏)的指令.都能錄製
先錄製好你想要的相關動作.在改成你要的正確動作即可

VB 全名 Visual Basic 這是另一個領域.自己找相關的去學吧

作者: 冠天Ж陈玮 时间: 2006-3-8 16:28
...............

[ 本帖最后由冠天Ж陈玮于 2006-3-9 02:55 编辑 ]

作者: wangliguo 时间: 2006-3-8 18:08
谢谢你

作者: tonybpx 时间: 2006-3-8 18:59
理論上是可以实现任何的操作要求.但是有些要求你輸入數據(部份).就不能用宏表現
所以遇到變數還是用 VB 才表現的出來

作者: ljanan 时间: 2006-3-9 10:23
卖广告的

作者: zl088 时间: 2007-10-10 23:52
ding

作者: sparrow33 时间: 2008-6-3 16:24
把你的VB放上来哦

作者: qj6666 时间: 2008-6-8 09:27
好,今天就说句话了

欢迎光临 iCAx开思网 (https://www.icax.org/)