[ADD] Gerüstoptionen werden nun mit dem Befehl GERUEST in Bricscad aufgerufen; Über ein Dropdown in den Oberflächen kann zwischen verschiedenen Arten (Säulen, Abhänger,...) umgeschaltet werden, dann erscheint ein neues Menü; Zusammenstellung der Anbauteile über die Oberfläche mit Anzahl und Checkbox; Speichern von konfigurierten Zusammenstellungen noch fehlerhaft

Lisp/ssg_core.lsp

@@ -1767,6 +1767,33 @@
   (cdr (assoc key obj))
 )
 
+;; String fuer die Ausgabe in JSON maskieren (Gegenstueck zu ssg-json-string).
+;; Der Backslash MUSS zuerst geprueft werden, sonst wuerde die Maskierung der
+;; Anfuehrungszeichen gleich wieder mitmaskiert.
+;; Hinweis: csv:json-escape in export.lsp leistet dasselbe, ist aber modul-lokal
+;; am Export-Modul - bewusst nicht zusammengelegt, das waere ein eigener Schritt.
+(defun ssg-json-escape (s / i c erg)
+  (if (null s) (setq s ""))
+  (setq erg "" i 1)
+  (while (<= i (strlen s))
+    (setq c (substr s i 1))
+    (setq erg
+      (strcat erg
+        (cond
+          ((= c "\\") "\\\\")
+          ((= c "\"") "\\\"")
+          ((= c (chr 10)) "\\n")
+          ((= c (chr 13)) "\\r")
+          ((= c (chr 9))  "\\t")
+          (T c)
+        )
+      )
+    )
+    (setq i (1+ i))
+  )
+  erg
+)
+
 
 ;; Verschachteltes JSON-Objekt parsen (1 Ebene tief)
 ;; {"section": {"key": val, ...}, ...}