写文字脚本，求修改，谢谢

cindy_fisher

OPEN "62-100-D-01" LAYER SET 17
STYLE ARIAL ARIAL.TTF 0.1389 0.8 0 NO NO
TEXT S ARIAL J M 30.8418,6.9163 0.1389 YSW
qsave
OPEN "62-100-D-02" LAYER SET 17
STYLE ARIAL ARIAL.TTF 0.1389 0.8 0 NO NO
TEXT S ARIAL J M 30.8833,6.9579 0.1389 YSW
qsave
如上，在每个文件30.8833，6.9579的地方写上YSW的脚本。

遇到如下两个文字：
1.程序不能写在一行上，负责运行到把层设为17就不动了，qsave也会跟着当成要写的文字，因为图纸较多，想用EXcel弄下，然后运行，结果不能写在一行就很麻烦，得敲回车。
2.文字总是不按照上面脚本给出的坐标（x,y）上写，所有的文字具体位置都比程序的Y坐标小了0.25,实际X坐标跟程序中是一样了，不知道原因是什么。

因为不会用lisp写直接开关保存文件的语句，所以只好弄个脚本，请求帮忙修改，谢谢。

dunkel

不同的命令，还是独立成一行吧，多敲几个回车，没什么困难吧，毕竟在 Excel 里也只要拖拉下就可以了，不需要每个文件都敲上几次的。
Layer Set 17 这个命令，还没完成吧；再加个 "" 试试呢？
写文字时，Y 坐标有偏移，这个有些奇怪。OSMode 置为 0 再试试？

cindy_fisher

dunkel 发表于 2011-11-22 08:49
不同的命令，还是独立成一行吧，多敲几个回车，没什么困难吧，毕竟在 Excel 里也只要拖拉下就可以了，不需要 ...

谢谢dunkel大哥，把扑捉关了就好了
写在不同行不用一直敲回车，我把所有的都写一行，然后粘贴到写字板，把要换行的标记替换成回车就行了。