diff --git a/Lisp/vf_core.lsp b/Lisp/vf_core.lsp
index bb2a471..a7b7ccd 100644
--- a/Lisp/vf_core.lsp
+++ b/Lisp/vf_core.lsp
@@ -601,8 +601,11 @@
 ;; (princ + getstring, de/en ueber ssg-text). Gemeinsam genutzt von
 ;; Gefaellestrecke.lsp UND vf_linienzug.lsp.
 (defun vf-frage-element-winkel (headerkey / antwort)
+  ;; Wizard-Dialog nur, wenn Wizard-Modus aktiv, vflw-wahl geladen UND die GUI
+  ;; global nicht abgeschaltet ist (Tests: (ssg-gui-aus)) - sonst Konsole/getstring.
   (if (and (boundp '*vfl-wizard-mode*) *vfl-wizard-mode*
-           (car (atoms-family 1 '("VFLW-WAHL"))))
+           (car (atoms-family 1 '("VFLW-WAHL")))
+           (or (not (car (atoms-family 1 '("SSG-GUI-P")))) (ssg-gui-p)))
     (progn
       (setq antwort
         (vl-catch-all-apply 'vflw-wahl