Lisp源码200例

laiz3000

谢谢分享

anhongjun

ddddddddddddd

caoweibinbin

了解一下。。。。。。。。。

pehgov

谢谢楼主的无私分享

hccad

谢谢楼主分享。。。。。。。。。。。。

tangzp5460

里面的说明，貌似室内设计用的

说明:
1. 按Shift-鼠标右键: end,int 捕捉方式
2. 按Ctrl-鼠标右键: nea 捕捉方式
3. 按Shift-Ctrl-鼠标右键: 启动"超级视图"
4. 按鼠标中键: 捕捉方式和常用绘图命令的切换(共两页)



---------------------------------------------------------------

下面是一业余版的二维建筑设计软件，其最大的特色为所绘的实体仅有
LINE、POLYLINE、CIRCLE和TEXT四种，修改容易。虽只有二十多个程序，
但确能帮您解决二维绘图中的一些问题。
ax.lsp --- 规则轴网绘制
chax.lsp --- 轴线线型由点划线到连续线的交替变换
wwall.lsp --- 外墙绘制
nwall.lsp --- 内墙绘制(beta)
gwall.lsp --- 隔墙绘制(beta)
ss.lsp --- 室外散水
chww.lsp --- 墙线加粗
chw0.lsp --- 墙线加粗恢复
dimw.lsp --- 标注墙厚
zhu.lsp --- 交点插柱
win.lsp --- 墙上插窗
wwin.lsp --- 无墙画窗
door.lsp --- 墙上插门

3dimzs.lsp --- 标注左边及上边的第三排尺寸线
3dimyx.lsp --- 标注右边及下边的第三排尺寸线

lt1.lsp --- 双跑楼梯平面
ltpm.lsp --- 双跑楼梯剖面(better)
wsj.lsp --- 卫生间布置
wsj1.lsp --- 单个侧开门卫生间
tj1.lsp --- 台阶绘制
pd.lsp --- 坡道绘制
sy1.lsp --- 索引1
sy2.lsp --- 索引2
lmw.lsp --- 立面窗
lmm.lsp --- 立面门

panbaa

谢谢楼主，下来看看。。。。。。

fly_hzq

学习一下，楼主辛苦了

applekis

谢谢楼主了,只是不知道怎么用这些源码

273504075

能贴个图吗？

井中小鸡

谢谢楼主的无私奉献

ambitionlj

感谢楼主分享！！很实用的LISP!

liuht441802

有什么好的功能吗

有我师

谢谢楼主分享

遗漏的十年

有详细说明就好了:$:$

ymfqjwl

里面有用的不多。

LIUJIAOYOU

谢谢楼主的无私分享!!!