8wDlpd.png
8wDFp9.png
8wDEOx.png
8wDMfH.png
8wDKte.png

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

小鹿黑科技 13天前 10

大家玩的小游戏大部分是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)
  )

 

 

下载地址

 

最新回复 (0)
    • 小白资源网
      2
        立即登录 立即注册 
返回
发新帖