论坛 › PowerMill › PM2016宏应用之五：刻字

xingyue* 发表于 2016-12-30 09:01:45

PM2016宏应用之五：刻字

       PM2016用宏实现的刻字功能！虽然没有外挂的方便，但也不失为一种好的方法！我在这里主要是想表达的一个意思：大胆地用宏去尝试完成一些外挂的功能！可以当作练习！       这个宏需要字库，我这里的字库是前辈作出来的！注意字库的路径，如下图：   
红色线标记的地方是字库路径！Text是字库的名称！
下面是使用方法：
一、输入字符串

二、设置字体高度

三、效果预览！我把坐标系放在字体的右下角！

下面是源码：

//QQ群：
CREATE PATTERN ;

string prompt="输入字符串："
string str=''
$str=input $prompt
//设置比例
string prompt1="输入字体高度："
REAL Height=0
bool err=0
do {
    $Height=input $prompt1
    $err=ERROR Height
    if err {
       $prompt1="请输入一个数值："
    }
} while err
//------------------------------
int i=length(str)
int j=0
While i>+j {
    String Char=substring(str,j,1)
    String Path="C:\dcam\PM2016\Text\"+Char+".dgk"
    //message info $path
    int k=-0.7
    EDIT PATTERN ; INSERT FILE $Path
    MODE NOGUI GEOMETRY_TRANSFORM START PATTERN ;
    MODE NOGUI TRANSFORM TYPE TRANSLATE
    MODE NOGUI TRANSFORM ORIGIN ACTIVE_WORKPLANE
    MODE NOGUI COORDINPUT COORDINATES $k 0 0
    MODE NOGUI GEOMETRY_TRANSFORM FINISH ACCEPT
    $j=j+1
}
//变换参考线高度
MODE NOGUI GEOMETRY_TRANSFORM START PATTERN ;
MODE NOGUI TRANSFORM TYPE SCALE
MODE NOGUI TRANSFORM COPY NO
MODE NOGUI TRANSFORM SCALE LOCK Z ON
MODE NOGUI TRANSFORM SCALE FACTOR $Height
MODE NOGUI GEOMETRY_TRANSFORM FINISH ACCEPT
//变换到激活坐标系
MODE NOGUI GEOMETRY_TRANSFORM START PATTERN ;
MODE NOGUI GEOMETRY_TRANSFORM TOWORK
MODE NOGUI GEOMETRY_TRANSFORM FINISH ACCEPT


字库也共享出来了：

txl280142787 发表于 2020-2-26 19:56:49

2017版本的可以不

txl280142787 发表于 2020-2-26 19:56:12

2017版本的 行不{:tongue:}

txl280142787 发表于 2020-2-26 19:19:26

你发的源代码怎么用啊

lemon爸爸 发表于 2020-2-16 15:16:15

厉害了   谢谢大神分享

王琳琅 发表于 2020-2-16 05:28:50

这个怎么是根据世界坐标系排列的啊，怎么改啊

85403003 发表于 2020-2-12 20:03:12

PM2016用宏实现的刻字功能！666666666666666666

lsf2750 发表于 2019-11-13 20:02:39

非常感谢

xlw41578 发表于 2019-11-4 11:11:48

谢谢分享

624255353 发表于 2019-11-4 09:06:57

谢谢分享，真的解决了我的问题！！！

查看完整版本: PM2016宏应用之五：刻字