2006.8.1
今天完成了任意钢筋钢骨钢管组合截面的全过程分析的编程,心情非常愉快。
2006.7.25
最近喜欢上了分形和递归,网上也有好些分形的LISP, 如LIVER兄就写过分形与递归的好文章,还有好些画树的LSP.
感觉LISP应该很适合来做分形的,于是看了一些书,发现分形中除了递归算法,还有LS文法算法,迭代函数系统算法,逃逸时间算法
分形演化算法等有趣的东西. 个人觉得要实现更漂亮的实体涂色等等说不定用opengl之类会好些
于是先拣了一种比较适合用cad还画线的LS文法学习,发现还挺有趣的,于是按照
孙博文撰写的《分析算法与程序设计-Visual C++实现》 书里的文法思想撰写了画树的小程序
随后又考虑了多参数及JULIA集的算法,总算实现了在acad中绘制分形图形的做法,具体的图形可以看相册,具体程序可以看这里
http://www.theswamp.org/index.php?topic=11255.0
和这里:http://www.xdcad.net/forum/showthread.php?s=&threadid=579279
学习了catia,并用之建立大型复杂桁架结构的建模及导入到abaqus中进行分析,同时用ansys workbench进行了检验。
2006.7.05
完成了在diana中分析钢筋混凝土剪力墙的非线性分析
2006.5.29
以后的LISP更新准备在http://autolisper.googlepages.com进行
接下来准备放一堆Lisp程序,还有它的一些说明
CAD.02
-----------------------------------------------------------------------------------------------------------------------------------
首先是著名Cadalyst网站:www.cadalyst.com,有许多Lisp程序的集合,请到网站下载。我作了一个Excel表格,可以比较方便的找到所需程序。
程序说明:Excel文件
这个Excel文件如上图所示,它的竖列是按照Lisp函数的作用分类的,比如是针对Block的,针对Dimension的,比如你需要找关于 scale功能的程序,可以在里面查找scale,再慢慢看介绍,找到所需的文件,查看其所在期,比如2004年九月的,就去04年压缩包内查找sep的 这个文件,打开看看每期文件介绍,再找到Tip1714之类的就是所需了。虽然有点麻烦,但是它的内容还是相当丰富的。
-----------------------------------------------------------------------------------------------------------------------------------
cad.03
-----------------------------------------------------------------------------------------------------------------------------------
个人认为不错的Lisplink编辑器:lisplink
-----------------------------------------------------------------------------------------------------------------------------------
cad.04
-----------------------------------------------------------------------------------------------------------------------------------
一些不错的AutoLisp书籍
David M.Stein的Lisp圣经:[David M. Stein]-visual_lisp_bible
Afralisp的[Afralisp]:-The Autolisp Tutorials - Dcl
-----------------------------------------------------------------------------------------------------------------------------------
cad.05
1996年,在开始学习AUTOCAD一个星期的时候,看到了书上用Lisp编写画正弦曲线的例子,就开始学编了,Lisp是个奇怪的东西,有时候会上瘾,特别是mapcar, apply, eval等这些其他函数少见的功能,总让人如痴如醉。
在用纯Lisp编程到2004年之后,被迫学习Vlisp,发现好像又见到了一片新世界,于是努力的去学了不少新知识,虽然还不是高手,但是一般的问题也足够解决的了。
个人在xdcad的一些灌水
1)文字克隆:http://www.xdcad.net/forum/showthread.php?s=&threadid=24229
2)求区域面积http://www.xdcad.net/forum/showthread.php?s=&threadid=23679
3)动态更新的excel连续梁计算程序:http://www.xdcad.net/forum/showthread.php?s=&threadid=320076
4)autocad中的时钟:http://www.xdcad.net/forum/showthread.php?s=&threadid=448584
这个也给cadalyst2005年第10期收录,其实是个自我娱乐的程序而已
5)利用vla函数画抛物线:http://www.xdcad.net/forum/showthread.php?s=&threadid=463014
6)过一点平分不规则图形:http://www.xdcad.net/forum/showthread.php?s=&threadid=459466
7)stdlib函数的介绍:http://www.xdcad.net/forum/showthread.php?s=&threadid=477301
8)acad表格转为excel表格:http://www.xdcad.net/forum/showthread.php?s=&threadid=468541
9)cad2006菜单定制-翻译自cadalyst:http://www.xdcad.net/forum/showthread.php?s=&threadid=486970
10)结合trim和extend的有趣程序:http://www.xdcad.net/forum/showthread.php?s=&threadid=489936
11)方阵的逆矩阵函数及求解线性方程:http://www.xdcad.net/forum/showthread.php?s=&threadid=501512
12)最正宗的免费acad版本转换软件:http://www.xdcad.net/forum/showthread.php?s=&threadid=521801
13)选择物体进行等距分布:http://www.xdcad.net/forum/showthread.php?s=&threadid=520816
14)cadalyst的1400个lisp及自制说明下载:http://www.xdcad.net/forum/showthread.php?s=&threadid=527068
15)对theswmap.org的几个精彩函数做了转载:http://www.xdcad.net/forum/showthread.php?s=&threadid=558504
16)将选择的平面实体在交点处断开:http://www.xdcad.net/forum/showthread.php?s=&threadid=562737
17)xdcad的lisp区文章小集chm版(10M)http://www.xdcad.net/forum/showthread.php?s=&threadid=554475
18)对圆按照半径大小进行颜色渐变http://www.xdcad.net/forum/showthread.php?s=&threadid=555339&perpage=15&display=&pagenumber=2
19)采用LS文法及IFS迭代法绘制树(分形)
http://www.xdcad.net/forum/showthread.php?s=&threadid=579279
use LS gramma to Draw Fractal Tree
http://www.theswamp.org/index.php?topic=11255.0
20)[转载]:[TheSwamp]一些程序转载(总共七个) http://www.xdcad.net/forum/showthread.php?s=&threadid=558504
21)创建变宽度多线(不平行)
http://www.xdcad.net/forum/showthread.php?s=&threadid=572531
http://www.xdcad.net/forum/showthread.php?s=&threadid=571449
23)在平面相交线集中找出各个封闭区域
http://www.xdcad.net/forum/showthread.php?s=&threadid=571446
24)计算极惯性矩
http://www.xdcad.net/forum/showthread.php?s=&threadid=569205
25)所有平面线在所有交点处断开
http://www.xdcad.net/forum/showthread.php?s=&threadid=562737
也编写过一些把acad导入到ansys及ansys转sap2000的Lisp,不过不是很成熟,下面是其应用结果截图