neue Folder LAYOUT MENU und MODULE dazu

2025-04-14 16:56:58 +02:00
parent e6e1705f0d
commit 35f7b2d75e
935 changed files with 803964 additions and 0 deletions
@@ -0,0 +1,20 @@
+;;;MODE1.LSP
+(setvar "modemacro"
+	(strcat
+		"L:$(substr,$(getvar,clayer),1,8)"
+		"$(substr,        ,1,$(-,8,$(strlen,$(getvar,clayer)))) "
+		"<.."
+			"$(if,$(eq,$(getvar,dwgname),UNNAMED),"
+			  "UNNAMED,"
+			  "$(substr,$(getvar,dwgname),"
+			    "$(-,$(strlen,$(getvar,dwgprefix)),7),"
+			    "$(strlen,$(getvar,dwgname))"
+			  ")"
+			")"
+		">"
+		"$(if,$(getvar,orthomode), O, )"
+		"$(if,$(getvar,snapmode), S, )"
+		"$(if,$(getvar,tabmode), T, )"
+		"$(if,$(and,$(=,$(getvar,tilemode),0),$(=,$(getvar,cvport),1)), P)"
+	)
+)