麻烦大师们帮看一下，在打印时，(setq bili "1:1")可以，(setq bili w)不行

669423907

麻烦大师们帮看一下，在打印时，(setq bili "1:1")可以，(setq bili w)不行，请问要怎么写呢？
未知命令“C”。按 F1 查看帮助。
未知命令“Y”。按 F1 查看帮助。
未知命令“MONOCHROME.CTB”。按 F1 查看帮助。
未知命令“Y”。按 F1 查看帮助。
未知命令“A”。按 F1 查看帮助。
未知命令“N”。按 F1 查看帮助。
未知命令“N”。按 F1 查看帮助。
未知命令“Y”。按 F1 查看帮助。

(defun c:fa1();                铺满打印
(setq dyj "\\\\JSEWEUKPWJJTKFF\\Canon LBP3000")
(setq bili w)
(setq dyys "monochrome.ctb")
(fa?)(princ))

(defun c:fa11();        1:1打印
(setq dyj "\\\\JSEWEUKPWJJTKFF\\Canon LBP3000")
(setq bili "1:1")
(setq dyys "monochrome.ctb")
(fa?)(princ))

;两点打印
(defun fa?(/ p1 p2 pl)
(setq myprint (defultprint))   
(setq p1 (getpoint "\n指定第一点坐标："))
(setq p2 (getcorner p1 "\n指定第二点坐标："))
(if (> (abs (- (car p1) (car p2))) (abs (- (cadr p1) (cadr p2))))
(setq PL "L")(setq PL "P"))
(command ".plot" "Y" "" dyj "A4" "" PL "N" "W" p1 p2 bili "C" "Y" dyys "Y" "A" "N" "N" "Y")
(princ))

maiko

w窗选后应该还有一个参数跟上

maiko

直接用秋枫批打不更快?在这里烧脑细胞

669423907

maiko 发表于 2014-10-3 16:37
w窗选后应该还有一个参数跟上

还望大师明示

669423907

maiko 发表于 2014-10-3 16:40
直接用秋枫批打不更快?在这里烧脑细胞

临时打印，没有图框

maiko

这个没啥用!
自己去调试,在开始处添加
(setq p1 (Getpoint "\r第一点:"))
(setq p2 (Getcorner p1 "\r下一点:"))
.......................
在"W"后添加 P1 P2
.......................

669423907

maiko 发表于 2014-10-3 18:25
这个没啥用!
自己去调试,在开始处添加
(setq p1 (Getpoint "\r第一点:"))

我上面写错了，(setq bili w)应该为(setq bili f)想要的是布满图纸打印

(setq bili "1:1")是1:1打印

lsjj

f 和 "f"是不一樣的

669423907

lsjj 发表于 2014-10-3 19:50
f 和 "f"是不一樣的

请问该怎么改呢？

669423907

谢谢Z版
(setq bili (if bili bili "F"))