打飞机(快捷键troy).lsp
[i]
俄罗斯方块(快捷键elsfk).lsp
[i]
五子棋（快捷键wzq）.fas
[i]
中国象棋（快捷键zgxq）.lsp
[i]
如果要问，好不好玩，只能说是能玩而已，在autocad里毕竟是以插件的形式存在的，只是给大家分享个不一样的小玩意。
下面附上下载链接：https://wwf.lanzouo.com/igGrv1w8kr8h
==========================================================================================================
在回复里有人问到，在autocad里面可不可以看TXT的小说，所以一番搜索后，发现还真可以，特分享出来。
使用命令rd1，读下一行的时候按空格或者回车即可。
把以下代码保存到文本文档里，后缀改为rd1,lsp,在cad里面加载，然后输入rd1命令，
按照提示找到txt格式的小说，然后就可以啦。
================================
(defun c:rd1 ( / ff1 fn i txt1 et )
(setq ff1 (getfiled "选择TXT文件" "" "txt" 2))
(setq olderr *error* *error* dragon)
(setq cn nil fn (open ff1 "r"))
(if (= cn nil)
(setq cn (getint "\n 确定起始行数：")) )
(repeat cn
(read-line fn)
)
(setq et "111" txt1 nil txt1 (read-line fn)) (princ txt1) (print)
(while (/= et "exit")
(setq txt1 (read-line fn))
(setq cn (1+ cn))
(if (and (/= txt1 "") (/= txt1 nil))
(progn
(princ txt1) (print) )
(progn
(setq cn (1+ cn))
(setq txt1 (read-line fn))
(princ txt1) (print)
));end if
(setq et (getstring ""))
);end while
(repeat 6 (princ "\n命令： ") )
(princ "\n行数： ") (princ cn)
(princ "\n命令： ")
(setq *error* olderr)
(princ)
)
(defun dragon (st)
(repeat 6 (princ "\n命令： ") )
(princ "\n行数： ") (princ cn)
(princ "\n命令： ")
(setq cn (1+ cn))
(setq *error* olderr)
(princ)
)
