Как написать счетчик времени на языке AutoLISP?
С помощью системной переменной CDATE (возможно использование других переменных).
В нужных местах программы следует прочитать текущие дату и время, которые возвращаются через системную переменную CDATE, например:
выражение (setq d1 (rtos (getvar "CDATE") 2 8)) возвратит (примерно) "20010528.14221139" (это соответствует 28 мая 2001 г., 14 час. 22 мин. 11,39 сек.).
В возвращаемом значении перед точкой - год (4 цифры), месяц (2 цифры) и день (2 цифры), после точки - часы (первые 2 цифры), минуты (2 цифры), секунды (2 цифры) и сотые доли секунды (2 последние цифры). Больше 8 десятичных знаков после точки в CDATE получить нельзя.
Обработайте таким образом показания часов в соответствующих местах работы программы, получите интересующие вас данные.