明经CAD社区

 找回密码
 注册

QQ登录

只需一步,快速开始

搜索
分享 世界工业综合实力对比[转]
soly2006 2012-9-13 12:49
钓鱼岛事件,好多人对我国工业不甚了解,怕打,看看有哪些优劣: 1)核弹:   美国、俄罗斯、法国、中国、英国、(印度、巴基斯坦、朝鲜)。   2)核武器小型化技术:   美国、俄罗斯、法国、中国、英国。   没这个的一般不能上导弹。   3)中子弹技术:   美国、俄罗斯、法国、中国   中子弹 ...
1802 次阅读|0 个评论 热度 4
分享 表排序
caoyin 2012-8-11 01:02
可应用于点集排序 要求见: http://bbs.mjtd.com/thread-95905-1-1.html (defun PointList-sort (PNTLST / REC) (defun REC (A B);;递归 (cond ((equal (car A) (car B) 1E-4) (REC (cdr A) (cdr B))) (T ( (car A) (car B))) &nbs ...
2747 次阅读|3 个评论 热度 11
分享 风管分节程序
jicqj 2012-8-5 18:56
;;;作者jicqj 2012.5于龙岩 (setq myjuli 1160) (defun c:q1( / myjuliT) (setq myjuli (if (setq myjuliT (GETINT (strcat "请输入标准节距离" (itoa myjuli) "\n" ))) myjuliT myjuli ) ) ) (defun c:q( / pt0 pt1 fuzz pt0temp pt1temp mybeishu strT) ...
1711 次阅读|0 个评论 热度 3
分享 计算线加总长度
jicqj 2012-8-5 18:50
;;;----------------------------------------------------- ;;;计算线加总长度 ;;;----------------------------------------------------- (defun C:zz (/ CURVE TLEN SS N SUMLEN) (vl-load-com) (setq SUMLEN 0) (setq SS (ssget '((0 . "CIRCLE,ELLIPSE,LINE,*POLYLINE,SPLINE,ARC")))) (setq N 0) (repeat (s ...
1438 次阅读|1 个评论 热度 4
分享 造句:恳求...要求...[经典方言版]
自贡黄明儒 2012-7-6 12:24
妈妈炖了一锅排骨 , 爸爸说: 啃求不动! 妈妈说:谁要(四声)求你啃!
1308 次阅读|2 个评论 热度 5
分享 快乐的一天
VBALISPER 2012-7-4 19:11
其实我原来不会LISP编程的,在这里,认识了明经,认识了明经里的很多朋友,他们给了我很多帮助.教会了我一些LISP编程的基础知识.相信他们在帮助我的时候,他们很快乐! 我今天也有能力帮助一些需要帮助的人了,今天我也很快乐!希望我帮助过的朋友将这种互相帮助,体会快乐的精神继续发扬下去.在你们有能力的时候,抽出一点时间,帮助 ...
1587 次阅读|0 个评论 热度 7
分享 LISP表处理函数——进阶之道[二]
cabinsummer 2012-5-9 20:14
用LISP处理二维数据。例如:在文件test.txt里保存以下内容: Index para1 para2 para3 A 1 2 3 B45 6 C78 9 D 1011 12 读取内容的通用函数: ( defun get_para ( filename id / fn para val ) ( setq fn ( open ( findfile filename ) ...
3098 次阅读|1 个评论 热度 16
分享 减少图层----根据线型
自贡黄明儒 2012-5-4 16:34
;;;******************************************************************************* ;;;功能: 将同种线型归为同一层,目的是减少层的数量 (defun C:DecreaseLayers (/ *BLK CMDECHO1 LTYPES) ;;1 解冻 解锁 开 所有图层 (defun HH:Mylayer () (acet-layerp-mode T)   ...
1671 次阅读|1 个评论 热度 8
分享 [自制散曲] 荒唐够·明明人间
caoyin 2012-5-3 04:25
荒唐够·明明人间 ---------------------------------------------------------- 明明这人间, 看却似殷殷邈渺生灵始无计。 红男绿女乱糟糟、奔忙兮, 为咋地? 蝇营狗苟皆因那孔方去。 谁知那投机方正道,乱法是为赢? 惹得这平厚白身、忠良黎庶漫撒气。 休唏嘘!休唏嘘! 说不定哪 ...
2896 次阅读|6 个评论 热度 9
分享 [转]不走寻常路的常识逻辑学家 - Lisp之父约翰·麦卡锡
cabinsummer 2012-4-30 10:34
  一个5岁的小女孩在玩一辆塑料玩具卡车,把它推来推去,嘴里模仿着喇叭声。她知道不能在餐桌上玩它,也不能用它去打弟弟的头。去学校之前,她会把卡车放到弟弟够不着的地方。放学回家后,她也知道在原来的地方可以找到自己的玩具车。   引导她的行为和期望的推理非常简单,任何一个同龄的小孩都能理解。但是大多数 ...
2330 次阅读|0 个评论 热度 4

小黑屋|手机版|CAD论坛|CAD教程|CAD下载|联系我们|关于明经|明经通道 ( 粤ICP备05003914号 )  
©2000-2023 明经通道 版权所有 本站代码,在未取得本站及作者授权的情况下,不得用于商业用途

GMT+8, 2024-4-30 00:12 , Processed in 0.345296 second(s), 8 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

返回顶部