孤独客 发表于 2006-11-8 19:47:00

[LISP]怎样获得程序运行的时间

怎样获得程序运行的时间

479274135 发表于 2017-12-14 09:34:33

过来学习学习

rongyifei 发表于 2006-11-8 21:45:00

<P>(getvar"cdate")</P>
<P>可以获得当前时间!</P>

孤独客 发表于 2006-11-10 12:33:00

<P>我编一个函数,在函数的运行过程中,我怎么时时能够知道还有多长时间,函数运行结束</P>

孤独客 发表于 2006-11-15 12:26:00

我编一个自动处理的程序,大概需要四五分钟,怎样获得程序还有多长时间结束

wzz1968 发表于 2006-11-16 11:34:00

<P>没有办法知道最后的执行时间,但可以计算总执行时间.</P>
<P>因为不同的环境,运行速度是不同.</P>
<P>&nbsp;</P>

孤独客 发表于 2006-11-16 12:50:00

请问怎样才能计算总执行时间

oyxx1023 发表于 2006-11-16 14:48:00

开始时取一次时间，程序结束时取一次时间，减一下就可以了

highflybir 发表于 2006-11-16 17:55:00

<P><FONT face=宋体 color=#dd0000 size=2>&nbsp;方法一：</FONT></P>
<P><FONT face=宋体 color=#dd0000 size=2>(setq t1 (getvar "CDATE"));;计时开始------&nbsp;<BR>;;;你要测试的程序于此---------------------<BR>(setq t2 (getvar "CDATE"));;计时结束------&nbsp;<BR>(princ "\n<FONT color=#000000>程序共</FONT>用时=")&nbsp;<BR>(princ (* (- t2 t1) 1e6))&nbsp;<BR>(princ "秒") </FONT></P>
<P><FONT face=宋体 size=2>方法二：</FONT></P><FONT face=宋体 size=2>
<P><FONT face=宋体 size=2>(setq t0 (getvar "TDUSRTIMER"))</FONT></P>
<P><FONT color=#dd0000>;;;你要测试的程序于此---------------------</FONT></P>
<P><FONT face=宋体 size=2>(princ "\n程序共用时")</FONT></P></FONT>
<P><FONT face=宋体 size=2>(princ (* (- (getvar "TDUSRTIMER") t0) 86400))</FONT></P>
<P><FONT face=宋体 size=2>(princ "秒")</FONT></P>
<P><FONT face=宋体 size=2></FONT>&nbsp;</P>

mccad 发表于 2006-11-16 18:15:00

<P>如果是循环而且循环次数可知，则可以按照已经运行了的时间摹拟计算出预计还需要的时间。</P>
<P>Windows安装程序就是这样做的。</P>

tchen 发表于 2006-11-16 18:27:00

mccad 你说的这个 :
<P>如果是循环而且循环次数可知，则可以按照已经运行了的时间摹拟计算出预计还需要的时间。</P>
<P>Windows安装程序就是这样做的。</P>
<P>在LISP中可以模拟吗? 你用过这个方法吗? 我也想知道&nbsp; 比如说一个图面检查程序,如果能模拟出需要的时间的话,会比较直观,因为这种程序在很大的CAD图上运行是可能需要数时分钟,直观一点的话可以提供一个时间概念</P>
<P>&nbsp;</P>
页: [1] 2
查看完整版本: [LISP]怎样获得程序运行的时间