- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report
the following code causes error
where's the bug??
(defun fnSetLayerColor ( laname col )
(if (tblsearch "layer" laname)
(Command "_.layer" "c" col laname "")
)
(princ)
)
(defun c:lh ( / d )
;
(fnSetLayerColor "0" 6)
(fnSetLayerColor "A-COLUMNS" 1)
(fnSetLayerColor "PELMA_THEM" 7)
(fnSetLayerColor "PEN_1" 5)
(fnSetLayerColor "PEN_2" 7)
(fnSetLayerColor "PEN_3" 7)
(fnSetLayerColor "PEN_4" 7)
(fnSetLayerColor "PEN_5" 5)
(fnSetLayerColor "PEN_7" 5)
(fnSetLayerColor "PEN_8" 254);;253
(fnSetLayerColor "TEXT_1" 7)
(fnSetLayerColor "DETAIL Rebars" 5)
(fnSetLayerColor "Leader Lines" 5)
(fnSetLayerColor "IRON_SLAB" 7)
(fnSetLayerColor "Z-Z221-T_Text _25" 7)
(fnSetLayerColor "T-Z22-T_Title_Text_Secondary" )
(fnSetLayerColor "ÔÅ×Ô COLUMN_1" 7)
(fnSetLayerColor "dokaria" 3)
(fnSetLayerColor "BEAM_TEXT" 7)
(fnSetLayerColor "DETTXT" 7)
(fnSetLayerColor "SLAB_REINFORCEMENT" 7)
(fnSetLayerColor "SLAB_REINFORCEMENT_TEXT" 7)
(fnSetLayerColor "SLABBAR_NAME" 7)
(fnSetLayerColor "SLABBAR_LINE" 3)
(fnSetLayerColor "KATAKLISEIS"5)
(fnSetLayerColor "BEAM_PREFIX_NAME_BETON" 7)
(fnSetLayerColor "STAIRS-2D" 5)
(fnSetLayerColor "BRIGHTWHITE" 7)
(fnSetLayerColor "PINAKIDA" 5)
(fnSetLayerColor "COLTXT1" 7)
(fnSetLayerColor "COLTXT2" 7)
(fnSetLayerColor "DETSYND" 12)
(fnSetLayerColor "DETIRON" 3)
(fnSetLayerColor "DETOTHERS" 5)
(fnSetLayerColor "DETC" 7)
(fnSetLayerColor "DETDIST" 231)
(fnSetLayerColor "diastaseis" 231)
(fnSetLayerColor "DISTTXT" 7)
(fnSetLayerColor "iron beam text" 7)
(fnSetLayerColor "TITLES-2D" 5)
(fnSetLayerColor "STAIRS-2D" 5)
;
(princ)
)
Solved! Go to Solution.