cadsz 发表于 2004-2-11 19:22:00

都说好用，不过不知道怎么使用，请各位大侠指教！

myfreemind 发表于 2004-2-11 20:15:00

在AUTOCAD的命令行中敲vbaide命令，然后把代码COPY到thisdrawing中，运行就可以了！

jdjfy 发表于 2004-2-18 23:22:00

嗨，好像cad里面没有，如果你要是查询，就用id命令


但是你可以借助其他软件       ：如 天正，等

天涯倦客 发表于 2004-4-7 10:11:00

请问建筑与水平线成一个角度这样的标注怎么标啊?

xtay 发表于 2004-4-8 14:13:00

不明!!

Hideman 发表于 2004-4-8 19:06:00

顶

Hideman 发表于 2004-4-8 19:08:00

不知道

bigfoot315 发表于 2004-4-20 17:01:00

ID肯定不是的啦！他只可以显示坐标！装个天正建筑用就可以了啥！那里面的坐标表注超快！可以试一下！

zhouxi87 发表于 2004-7-13 11:37:00

你可以在天正里标啊！

guybbud 发表于 2004-7-16 14:34:00

把下面的lisp文件load，输入zbb，就可以了


;1.标注大地坐标.<BR>(defun c:ZBB()<BR>               (setq pi 3.14159265359)<BR>               (setq TEXT_H (getvar "USERR1")) <BR>               (setq REPLY (strcat "\nEnter text height &lt;" (rtos TEXT_H 2 3) "&gt;:"))<BR>               (setq T_H (getreal REPLY))<BR>               (if (/= T_H nil) (setvar "USERR1" T_H) (setq T_H TEXT_H))<BR>               (setvar "OSMODE" 32)               <BR>               (setq p1 (getpoint "\nint-point:" ))<BR>               (setvar "OSMODE" 0)               <BR>               (setq n1 (nth 1 p1))<BR>               (setq e1 (nth 0 p1))<BR>               (setq nn (rtos n1 2 3))<BR>               (setq ee (rtos e1 2 3))<BR>               (setq nn (strcat "X_" nn))<BR>               (setq ee (STRCAT "Y_" ee))<BR>               (setq p2 (getpoint "\nsecond point:" ))<BR>               (setq fw (angle p1 p2))<BR>               (setq fw1 (/ pi 2))<BR>               (setq fw2 (/ (* pi 3) 2))<BR>               (if (and (&gt; fw fw1) (&lt; fw fw2)) (progn<BR>                                                                       (setq pe (polar p2 (* pi -1) (* 7.5 T_H)))<BR>                                                                       (setq pt (polar pe 0 0)))<BR>                                                                       ;else------------------------<BR>                                                                       (progn<BR>                                                                       (setq pe (polar p2 0 (* 7.5 T_H)))<BR>                                                                       (setq pt (polar p2 0 T_H)))<BR>                       );end if----------------------------<BR>                       (setq p3 (polar pt fw1 (* T_H 0.5)))<BR>                       (COMMAND "text" p3 T_H "0" nn)<BR>                       (setq p3 (polar pt fw2 (* T_H 1.5)))<BR>                       (command "text" p3 T_H "0" ee)<BR>                       (command "pline" p1 p2 pe "")<BR>                       (setvar "osmode" 35)<BR>)<BR>;End of ZBB().<BR>
页: 1 [2] 3
查看完整版本: 关于CAD里坐标标注问题?