yang686526

为何实现不了直线与圆交点的捕捉？急救！
www.dimcax.com
为何实现不了直线与圆交点的捕捉？急救！

通过工具菜单->加载应用程序 可加载该程序，然后可直接在命令行输入相关命令运行。如需要每次启动时均加载该程序，则可以将该文件放在启动组中。
文件预览:
d
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
( c:cc ()
( g7 430
g6 180
bl 0.5
)
( "circle" ( ( 60 ( bl 0.5 g7)) 60) "d" ( bl g7))
( y ( (- ( g7 g7 0.25) ( g6 g6 0.25))))
( "zoom" "35,100" "140,20")
( "line"
( 60 (- 60 ( bl y)))
( ( 60 ( bl g7)) (- 60 ( bl y)))
""
)
(
x1 (
( ( ( 60 ( bl g7 0.5)) (- 60 ( bl y))) -3.14 2)
"int"
)
)
( x2 (
( ( ( 60 ( bl g7 0.5)) (- 60 ( bl y))) 0 2)
"int"
)
)
( "erase" () "")
( "break" x1 x2 "")
)
(setq g7 430 g6 180 bl 0.5)
没看懂您那些变量赋值的用意
学程序一定得学一学调试
单步调试验证出 x1 x2 皆是 nil
(osnap pt mode)
osnap 的 pt点&所指的实体 需可见
依揣测 x1 & x2 可直接算出
给个图样加说明可乎
d