David Bethel 发表于 2022-7-6 09:19:27

感觉老了。。。

我在另一个线程中发布了一个旧例程,并在很久以前发现了这个宝石:
 

;;;Beep In DOS
(defun Beep (/ f)
(and (wcmatch (getvar "PLATFORM") "*DOS*")
   (setq f (open "con" "w"))
   (write-char '7 f)
   (close f)))

 
Dos_Lib现在有1个。
 
那时你可以(打开)很多东西-大卫

DANIEL 发表于 2022-7-6 10:16:48

你在说什么?

ReMark 发表于 2022-7-6 10:44:12

这太有趣了!
页: [1]
查看完整版本: 感觉老了。。。