2006年8月15日星期二

一些灌水

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

2006.07.17

学习了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

22)确定包含平面点集的最小直径圆
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

26)使Visual LISP编程窗口的文字打印出来后也是彩色http://www.xdcad.net/forum/showthread.php?s=&threadid=542615

也编写过一些把acad导入到ansys及ansys转sap2000的Lisp,不过不是很成熟,下面是其应用结果截图