(setq timeTest (lambda Nil (block (startTime) (setq startTime (unvgettick)) (for i 0 10000 Nil ) (subtract (unvgettick) startTime) ) ))