Bezeichnung statt Name bei ILS KReisel und Eckrad verwendet. Eigene Spalte für Bezeichnung im Sivas Export dazu gebaut

Lisp/KreiselInsert.lsp

@@ -72,7 +72,7 @@
 
 ;; Attribut-Definitionen: ((TAG DEFAULT) ...)
 (setq *kreisel-attrib-defs*
-  '(("NAME"           "")
+  '(("Bezeichnung"    "")
     ("DREHRICHTUNG"     "UZS")
     ("ANZAHL_SEPARATOR" "2")
     ("KREISELART"       "STANDARD")
@@ -90,7 +90,7 @@
 
 ;; Eckrad Attribut-Definitionen: ((TAG DEFAULT) ...)
 (setq *eckrad-attrib-defs*
-  '(("NAME"           "")
+  '(("Bezeichnung"    "")
     ("DREHRICHTUNG"  "UZS")
     ("DREHUNG"       "0")
     ("NUMMER"        "0")
@@ -325,9 +325,9 @@
     )
   )
 
-  ;; NAME automatisch setzen: "KreiselN"
-  (setq attribs (subst (cons "NAME" (strcat "Kreisel" (itoa kreisel-nummer)))
-                        (assoc "NAME" attribs) attribs))
+  ;; Bezeichnung automatisch setzen: "KreiselN"
+  (setq attribs (subst (cons "Bezeichnung" (strcat "Kreisel" (itoa kreisel-nummer)))
+                        (assoc "Bezeichnung" attribs) attribs))
 
   ;; --- HÖHE BESTIMMEN ---
   ;; Priorität 1: Aus basePoint (wenn 3D Punkt mit Z > 0)
@@ -928,7 +928,7 @@
   )
 
   ;; Tiles initialisieren
-  (set_tile "name"     (cdr (assoc "NAME" attribs)))
+  (set_tile "name"     (cdr (assoc "Bezeichnung" attribs)))
   (set_tile "abstand"  (cdr (assoc "ABSTAND" attribs)))
   (set_tile "hoehe"    (cdr (assoc "HOEHE" attribs)))
 
@@ -976,8 +976,8 @@
       (setq newRotation (kreisel-idx-to-rotation (atoi dlg-ausrichtung)))
 
       ;; Attribute aktualisieren
-      (setq attribs (subst (cons "NAME"          dlg-name)
-                            (assoc "NAME" attribs) attribs))
+      (setq attribs (subst (cons "Bezeichnung"    dlg-name)
+                            (assoc "Bezeichnung" attribs) attribs))
       (setq attribs (subst (cons "HOEHE"         dlg-hoehe)
                             (assoc "HOEHE" attribs) attribs))
       (setq attribs (subst (cons "KREISELART"