0 Members and 1 Guest are viewing this topic.
Hi ronjonp i try to change it but i still have problem, can help me?Code - Auto/Visual Lisp: [Select];;< .. >
(defun LM:vl-Setattributevalue ( blk tag VAL) ;; the original routine content ... do not edit ) (defun c:test ( / local_variables) ;; DO YOUR STUFF ;; Call the external routine (setq result (LM:vl-Setattributevalue blkval tagval VALval) ) ;; DO YOUR STUFF with result if needed.)
Here is the block i have already uploaded in previous post
(lm:vl-setattributevalue b "D1" (strcat (rtos (/ scale 50) 2 0))) (lm:vl-setattributevalue b "D2" (strcat (rtos (/ scale 100) 2 0))) (lm:vl-setattributevalue b "D3" (strcat (rtos (/ scale 50) 2 0))) (lm:vl-setattributevalue b "D4" (strcat (rtos (* (/ scale 50) 2) 2 0))) (lm:vl-setattributevalue b "D5" (strcat (rtos (* (/ scale 50) 3) 2 0))) (lm:vl-setattributevalue b "D6" (strcat (rtos (* (/ scale 50) 4) 2 0))) (lm:vl-setattributevalue b "D7" (strcat (rtos (/ scale 10) 2 0))) (lm:vl-setattributevalue b "SCALE" (strcat (rtos scale 2 0)))
I change the maths and works < .. >Thanks
(cons "D2" (strcat (rtos (/ scale 100) 2 1)))