ui:progress

说明:提供一个进度条功能函数,current 是当前进度 max-number 是进度总量调用完成之后,可以使用(GRTEXT) 清除进度

用法:
 (ui:progress current max-number)

参数:1 current : 未识别定义;2 max-number : 未识别定义;

返回值:无返回值

示例:
(SETQ CURRENT 0)(repeat 1000 (UI:PROGRESS (setq CURRENT (1+ CURRENT))      1000))(grtext)