Nikon Posted May 25, 2023 Posted May 25, 2023 I'm trying to add parameters to lisp, but only text works I want to create separate layers for dimensions and LEADER, Land add LINE, PLINE Please tell me what I'm doing wrong... http://LayerDirectorV1-9.lsp Original Lee Mac ;;-----------------------------------------------------------------------------------------------------------------------------------------------------;; ;; Command Pattern | Layer Name | Description | Colour | Linetype | Lineweight | Plot | Plot Style ;; ;;-----------------------------------------------------------------------------------------------------------------------------------------------------;; ;; [string] | [string] | [string] | 0 < int <256 | [string] | -3 = Default | 1 = Will Plot | [string] ;; ;; | | Use "" for none | | | 0 <= int <= 211 | 0 = Won't Plot | Use nil for CTB ;; ;;-----------------------------------------------------------------------------------------------------------------------------------------------------;; ("[DM]TEXT,TEXT" "TEXT" "Text Layer" 2 "Continuous" -3 1 nil ) ("DIM*,*LEADER" "DIMENSIONS" "Dimension Layer" 3 "Continuous" -3 1 nil ) ("*VPORT*" "DEFPOINTS" "" 7 "Continuous" -3 0 nil ) ("XLINE" "XLINE" "Construction Lines" 12 "HIDDEN" 0 0 nil ) modified 2 string, added 3, 6 strings ;;-----------------------------------------------------------------------------------------------------------------------------------------------------;; ;; Command Pattern | Layer Name | Description | Colour | Linetype | Lineweight | Plot | Plot Style ;; ;;-----------------------------------------------------------------------------------------------------------------------------------------------------;; ;; [string] | [string] | [string] | 0 < int <256 | [string] | -3 = Default | 1 = Will Plot | [string] ;; ;; | | Use "" for none | | | 0 <= int <= 211 | 0 = Won't Plot | Use nil for CTB ;; ;;-----------------------------------------------------------------------------------------------------------------------------------------------------;; ("[DM]TEXT,TEXT" "TEXT" "Text Layer" 152 "Continuous" -3 1 nil ) ("DIM" "DIMENSIONS" "Dimension Layer" 144 "Continuous" -3 1 nil ) ("LEADER" "MLEADER" "LEADER Layer" 182 "Continuous" -3 1 nil ) ("*VPORT*" "DEFPOINTS" "" 7 "Continuous" -3 0 nil ) ("XLINE" "XLINE" "Construction Lines" 12 "HIDDEN" 0 0 nil ) ("LINE,[XP]LINE" "LINE, PLINE" "Line Layer" 224 "Continuous" -3 1 nil ) ;;-----------------------------------------------------------------------------------------------------------------------------------------------------;; Quote
mhupp Posted May 26, 2023 Posted May 26, 2023 Your missing the "*" maybe? ("[DM]TEXT,TEXT" "TEXT" "Text Layer" 152 "Continuous" -3 1 nil ) ("DIM*" "DIMENSIONS" "Dimension Layer" 144 "Continuous" -3 1 nil ) ("*LEADER" "MLEADER" "LEADER Layer" 182 "Continuous" -3 1 nil ) ("*VPORT*" "DEFPOINTS" "" 7 "Continuous" -3 0 nil ) ("XLINE" "XLINE" "Construction Lines" 12 "HIDDEN" 0 0 nil ) ("LINE,[XP]LINE" "LINE, PLINE" "Line Layer" 224 "Continuous" -3 1 nil ) Quote
Nikon Posted May 26, 2023 Author Posted May 26, 2023 Is it all about the "*"??? Thanks, mhupp, it worked! Quote
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.
Note: Your post will require moderator approval before it will be visible.