动态的万花筒
本帖最后由 荒野孤行 于 2015-5-24 23:57 编辑请新建一份新的图档哦!效果请见图示:
重要提示:程序没把AutoCAD卡死的情况下,把鼠标点到AutoCAD窗口的外面就可以看到动态效果了。
丢上另一个连接:http://bbs.mjtd.com/forum.php?mod=viewthread&tid=39415&highlight=%CD%F2%BB%A8%CD%B2
;;;;;*********万花筒 程序开始*********
(defun c:wht ()
(setvar "cmdecho" 0)
(setvar "osmode" 0)
(princ "★功能:绘制万花筒.\n")
(while T
(setq i 0
n 122
)
;;;**** Hidden Message *****
(setvar "osmode" 15359)
(princ)
)
;;;;;*********万花筒 程序结束**********
谢谢分享,支持学习了 参观学习下! 参观学习,谢谢分享 感觉很好玩啊 感觉很好玩啊 学习学习!! dear sir,
nice 万花筒………… 恩,这个应该 是很早的程序了