[Windows] 加载运行在AUTOCAD下的小游戏四款

3dm_29183662

大家玩的小游戏大部分是exe格式的，或者flash类型的，今天给大家带来4款可以在autocad里面加载运行的lsp小游戏，按照常规插件的加载方式加载后，输入快捷键就可以愉快的玩耍了，快捷键都附在每个游戏文件名的括号里了，四款游戏分别为：

打飞机(快捷键troy).lsp
俄罗斯方块(快捷键elsfk).lsp
五子棋（快捷键wzq）.fas
中国象棋（快捷键zgxq）.lsp


如果要问，好不好玩，只能说是能玩而已，在autocad里毕竟是以插件的形式存在的，只是给大家分享个不一样的小玩意。
下面附上下载链接  夸克网盘链接






在回复里有人问到，在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)
  )

3dm_13234699

感谢！！

咖啡苦

象棋 五子棋 多年前在3dm这里下载过