http://sjgau.javaeye.com 最近，有网友想透过网路跟我学习 AutoLISP 程式设计。 我准备透过 上面的 部落格 从事这项活动。 独乐乐，不如众乐乐。 教一个人 和教一堆人，应该是没有什麽差别。 有兴趣的朋友，可以经常前往 上面的网站看看 有问题，有心得，都可以在上面 发言。 我的教学大纲，大概如下 ㄧ AutoCAD 2004 安装 二 2D + 3D 快速 demo 三 复习 2D 四 AutoLISP 教学 1 "hello, world!\n" 2 注解 ; --- ;| --- --- |; 3 变数之一 x= 4.0*atan(1.0); x= exp(1.0); 变数之二 x= x + 1 变数之三 swap x, y 4 sequential select if cond loop while repeat 5 function swap(x, y); rtod(r1); dtor(d1); recursive 费氏数列(no) (defun c:xxx( / ) ; ) 6 作中垂线的范例 7 作分角线的范例 8 其他有趣的，或是网友随时提出的范例 完全免费，完整分享。 大台北地区的朋友，如果有需要， 亦可免费面授 ※ 引述《sjgau (sjgau)》之铭言： : 我以前的作法是：自己算 : 先定义：点 (x, y) : 线 (x1, y1, x2, y2) : 圆 (xc, yc, R) : 弧 (xc, yc, R, t1, t2) ; 采用右手定则来计算角度 : t1 < t2 : 接下来，开始写副程式 : 线和线，求交点 : 线和圆，求交点 : 圆和圆，求交点。 : 弧，是圆的一部份，求出交点的角度 tt 以後 : 看看 tt 是否 ((tt >= t1) and (tt <= t2)) : 看看以上，有哪些是你不会的， : 再继续讨论 : ※ 引述《ggg888 (g8)》之铭言： : : 想请教各位 : : 似乎没有指令可以指直求arc与line的交点？ --

※ 发信站: 批踢踢实业坊(ptt.cc) ◆ From: 123.194.156.130