怎样直接画已知弧长的弧

carolwa · 发表于 2006-7-20 15:00:00

在不要计算的情况下，可不可以直接画出已知半径和弧长的弧，

xiaochizi · 发表于 2006-7-20 15:52:00

我也想知道

Joseflin · 发表于 2006-7-20 16:56:00

请参考：

dada4102 · 发表于 2006-7-30 20:07:00

看不懂

yu10cheng2 · 发表于 2006-7-30 21:49:00

可以先用已知半径随便画个圆弧,再用LENGTH(快捷键LEN)命令下的T,再输入弧长即可!可以自己试试,具体看命令提示!

zgzzsn · 发表于 2006-8-1 06:17:00

用这个ｌｉｓｐ

可以直接画出已知半径和弧长的弧.

依次点选，端点、圆心，输入弧长值，即可

(defun C:ARCH (/ os pa pb h xa ya xb yb r xL a)
(setq os (getvar "osmode"))
(setvar "osmode" 32)
(setq pa (getpoint "\n duan dian 端点:"))
(setq pb (getpoint "\n yuan xin 圆心:"))
(setq h (getreal "\n hu chang 弧长:"))
(setq xa (car pa) ya (cadr pa))
(setq xb (car pb) yb (cadr pb))
(setq r (sqrt (+ (* (- xa xb) (- xa xb)) (* (- ya yb) (- ya yb)))))
;(setq xL (* 2 r (sin (/ h (* 2 r)))))
(setq a (* (/ h r) (/ 180 pi)))
(setvar "osmode" os)
;(command "arc" pa "c" pb "L" xL)
(command "arc" pa "c" pb "A" a)
)

li_derun · 发表于 2006-8-2 16:22:00

5楼说的可以解决

asong83 · 发表于 2006-8-12 16:51:00

lisp好像不能用哦

hnxieliang · 发表于 2006-8-14 12:41:00

晕，有这么复杂吗？

用圆弧命令画已知半径任意圆弧，再用len命令确定圆弧长度不就OK？

fifaeric · 发表于 2007-10-18 11:04:00

我试用了，5楼6楼都不错，谢谢

账号		自动登录	找回密码
密码			注册

怎样直接画已知弧长的弧

相关帖子

本帖子中包含更多资源