Search found 342 matches

Re: vlax-for issue

Hi, Try using standard AutoLISP instead. (entget (namedobjdict)) ((-1 . <Entity name: 400a16a0>) (0 . "DICTIONARY") (5 . "C") (330 . <Entity name: 0>) (100 . "AcDbDictionary") (281 . 1) (3 . "{24DE2741-47F6-4298-B91B-737E814BAE3E}") (350 . <Entity name: 3f6f8e...

Re: Reactors

Hi, Yes, something is wrong when running the function " pn ". The LO-changed function fired but the function " pn " didn't. (defun LO-changed (LO-data LO-callback / ) (alert (strcat "Layout Switched to " (getvar "ctab") ".")) (pn "LO-data")...

Re: Cond help

Hi Steve, The "(cond (/= eit 0)" should be "(cond ( (/= eit 0)" Please refer this : (defun DRAW_INS () ;---------- ; Draw Insulation recangle (cond ((/= eit 0) (progn ; do something ) ;end progn ) ; end (/= eit 0) );END COND (INS_MB) ) ;end DRAW_INS

Re: Layer Transparency

Please try this: (defun C:entmakeLayer () (regapp "accmtransparency") (entmakex (list (cons 0 "LAYER") (cons 100 "AcDbSymbolTableRecord") (cons 100 "AcDbLayerTableRecord") (cons 2 "LayerTranparence") ;layer name (cons 6 "Continuous") ;linet...

Go to advanced search