有没有办法延迟CLIPS中的执行

Question

我正在写一个经过for循环的剪辑代码，它会打印事实。 我想知道是否有一种方法可以在打印第一个事实后延迟执行10秒，然后在第二次迭代时再延迟10秒？ 那么有像java这样的延迟函数吗？

Answer 1

没有任何内置功能可让您在一段时间内完成CLIPS进程的休眠，但您可以编写一个在返回之前循环一段指定时间的函数：

CLIPS> 
(deffunction pause (?delay)
   (bind ?start (time))
   (while (< (time) (+ ?start ?delay)) do))
CLIPS> (pause 5)
FALSE
CLIPS>