[求助]求教这种标注方式相关的东西。谢

blackhold

听说是台湾的图纸。。。有人出过这样的图纸吗？

这样的标注方式比较直观。。

想知道其标注方式与一些需注意的问题

再问一个。。能用程序来实现吗？。。。。

现在领导要求我用这一种标注方式。。说直观。。便于生产。。。但我到处都找不到关于这种标注方式的资料。。。

哪位可以帮帮我呢。。。先谢谢。。。。。

这图是以一使用面为基准的坐标式标注法。。。
底端0点。。。

顶端顶点。。。。

It's 机械零件图。。。但这样标注方式不知道是哪种图的。。 在标注中应注意什么问题。。

是否有人用过这种方式的标注？？？想知道这一些相关的资料。。。。谢。。。
是否有外挂或编程实现？

 

hecsxl

原点标注法，日本也喜欢此种标注，适合数控机床加工

blackhold

是否有其相关资料呢？？？？？

ZZXXQQ

写了个程序，楼主先试试。

2. (DEFUN C:DDC (/ OLDOS OLDZIN P1 P2 PC R RR PX PY H V P3)
3. (SETVAR "CMDECHO" 0)
4. (COMMAND ".UNDO" "BE")
5. (SETQ OLDOS (GETVAR "OSMODE") OLDZIN (GETVAR "DIMZIN"))
6. (SETQ V (ATOI (GETVAR "ACADVER")))
7. (SETQ H (GETVAR "DIMSCALE"))
8. (SETQ H (* (IF (> H 0) H 1) (+ (GETVAR "DIMTXT") (* (GETVAR "DIMGAP") 2))))
9. (SETVAR "DIMZIN" 8) (SETVAR "OSMODE" 0)
10. (COMMAND ".UNDO" "BE")
11. (WHILE (SETQ P1 (ENTSEL "\nSelect Circle or Arc 选择圆或圆弧 :"))
12.   (SETQ ENT (ENTGET (CAR P1))        L  (CDR (ASSOC 0 ENT))
13.         PC (CDR (ASSOC 10 ENT))      R (CDR (ASSOC 40 ENT)))
14.   (IF (SETQ P2 (GETPOINT PC "\nText Point 文字点 :")) (PROGN
15.    (SETQ RR (STRCAT (IF (= L "CIRCLE") "%%c" "M") (RTOS (+ R R) 2 4))
16.          PX (STRCAT "X=" (RTOS (CAR PC) 2 4))
17.          PY (STRCAT "Y=" (RTOS (CADR PC) 2 4)))
18.    (SETQ P3 (POLAR P2 (/ PI (IF (> V 14) 2 -2)) H))
19.    (COMMAND "LEADER" PC P2 "" RR PX PY "" "ZOOM" "C" PC (* R 4))
20.    (IF (> V 14)
21.     (COMMAND "STRETCH" "C" P2 P2 "" P2 P3)
22.     (COMMAND "STRETCH" "C" "END" P3 P2 "" "END" P3 "INS" P2)
23.    )
24.    (COMMAND "ZOOM" "P")
25.   ))
26. )
27. (COMMAND ".UNOD" "E")
28. (SETVAR "OSMODE" OLDOS)
29. (SETVAR "DIMZIN" OLDZIN)
30. (SETVAR "CMDECHO" 1)
31. (PRINC)
32. )

复制代码

blackhold

如何使用呢？我把代码复制到记事本，保存成bbb.lsp,加载了却说bbb 未知命令“BBB”。按 F1 查看帮助。

还有我希望能知道其标注方式上应注意的问题。。。。

blackhold

问题如：在标注公差方面是怎么个标注法？还有其它等等。。。。。

陈伯雄

Command: dimordinate

blackhold

请问陈老师，你所给的是基准式标注吧，不过我想问您是否用过这类的标注？我想知道其如公差方面是如何标注的，或其它。。。。。。。。。

wewyhy

塑料模具和级进模具的图纸用的