[FEAT] VF-Linienzug ohne GUI/Konsole baubar (Stufe 0) + hundm05-Testfall

Ziel: eine VF_n-Kette soll aus einem Stapel Eingabedaten gebaut werden
koennen - ohne Dialog, ohne Konsolenfrage. Fahrplan und Begruendungen in
doc/TODO-plan-vf-interactive.md. Alle Aenderungen sind No-Ops, solange
*ssg-gui-aus* und *vfl-headless* nil sind.

Produktion (Lisp/vf_linienzug.lsp, Lisp/vf_core.lsp):
- vfl-journal-reset im Dispatcher VOR die Modus-cond gezogen. Bisher nur im
  Modus-1-Zweig: ein frischer Modus-2-Lauf erbte das Journal des Vorlaufs und
  schrieb es in die XDATA, ein spaeterer Doppelklick spielte fremde Eingaben
  vor.
- Lokale Variable "member" in vf-linienzug-modus2 umbenannt. Sie verdeckte im
  selben Scope das Builtin member, das weiter unten gebraucht wird - jedes
  Kletterer-Segment waere in "bad function" gelaufen.
- Neu vfl-meldung: sammelt den Text nach *vfl-meldungen* + dbgmsg und zeigt
  ihn nur bei erlaubter GUI modal, sonst per princ. Die 12 Bau-Pfad-alerts
  darauf umgestellt; ein Alert blockierte sonst jeden Batch-Lauf, und sein
  Text ist die einzige Auskunft, WELCHE Sektion abgewiesen wurde. Die reinen
  Interaktiv-Alerts (fehlendes DCL, "nicht editierbar", "kein Journal")
  bleiben alert.
- Neu *vfl-headless* (+ vfl-headless-p/-abbruch/-notausgang/-ort, Diagnose
  *vfl-headless-fehler*, optionaler Antwort-Hook *vfl-headless-antwort-fn*):
  eine erschoepfte Replay-Queue ist damit ein harter Abbruch MIT Fundstelle
  (Art der Eingabe, Glied- und Eingabe-Nummer) statt eines stillen Rueckfalls
  auf Live-Eingabe. Eingebaut in vfl-in-value, vfl-in-value-p,
  vfl-in-selection und vfl-in-abstand.
- vfl-journal-reset loescht Meldungen und Diagnose mit (gehoeren zum Lauf);
  vfl-view-refresh ueberspringt headless _PLAN/_ZOOM.

Testfall HundM05 (5 echte Ketten aus data/polylines.dxf):
- tests/testdata/hundm05.json neu erzeugt aus den XDATA-Journalen der
  VF_n-Bloecke (lib/vf_journal_export.py) - flach, weil ssg-load-json
  zeilenweise liest. Die drei kopierten Ketten bekommen ihren echten
  Einfuegepunkt, nicht das veraltete HOEHE_VON-Attribut.
- tests/test_hundm05.lsp arbeitet jetzt per Journal-Replay statt mit
  Eingabe-Mocks: ein echtes Journal fuehrt die geerbte Fahrtrichtung nicht mit
  (vfl-in-abstand journalisiert hz nur beim ersten Segment), ein Mock kann sie
  also nicht kennen. Schaltet *vfl-headless* ein und schreibt prompts,
  headless_fehler und meldungen ins Ergebnis-JSON.
- Kettenschleife fangt je Kette: ein Fehler NACH dem Bau nimmt nicht mehr die
  restlichen Ketten mit.
- entprev gibt es in AutoLISP nicht (nur entnext/entlast) - die Suche nach dem
  fertigen Block laeuft vorwaerts ab dem Zeichnungsstand vor dem Bau. Dieselbe
  Falle in tests/test_mubea.lsp mitbehoben; sie schlug dort nie zu, weil
  entlast immer sofort traf.

Absicherung ohne CAD:
- tests/test_vf_headless_statisch.py: eingechecktes Inventar aller
  alert/get*/ssget/new_dialog-Fundstellen je Funktion (ein neues getreal in
  einer Bau-Funktion faellt auf, auch wenn sein Zweig im Test nie erreicht
  wird), Praesenz des Riegels in allen vier Wrappern, Diagnose-Reset und die
  Reset-Reihenfolge im Dispatcher. Dazu ein Waechter gegen erfundene
  AutoLISP-Funktionen (entprev u.a.) - diese Fehlerklasse kostet sonst jedes
  Mal einen CAD-Lauf.
- tests/test_hundm05.py prueft zusaetzlich prompts == 0, keine
  Headless-Abbrueche und keine Bau-Meldungen.

tests/alltests.json: hundm05-Zeile laedt VarioFoerderer (nicht KreiselInsert)
und bleibt bis zu einem gruenen CAD-Lauf abgeschaltet.

Co-Authored-By: Claude Opus 5 (1M context) <noreply@anthropic.com>

tests/test_mubea.lsp

@@ -69,18 +69,49 @@
 )
 
 
-;; --- Letzten INSERT mit Blocknamen-Praefix (rueckwaerts) suchen ---
-(defun mubea:last-insert-prefix (pref / ent found ed bn)
-  (setq ent (entlast))
-  (while (and ent (null found))
-    (setq ed (entget ent) bn (cdr (assoc 2 ed)))
-    (if (and (= (cdr (assoc 0 ed)) "INSERT") bn
-             (>= (strlen bn) (strlen pref))
-             (= (substr bn 1 (strlen pref)) pref))
-      (setq found ent))
-    (setq ent (entprev ent)))
-  found
-)
+;; --- Letzten INSERT mit Blocknamen-Praefix suchen ---
+;; AutoLISP kennt KEIN entprev (nur entnext und entlast) - rueckwaerts durch
+;; die Zeichnung laufen geht also nicht. Gesucht wird darum VORWAERTS, wobei
+;; der letzte Treffer gewinnt. Ein blosses (entlast) genuegt nicht: nach dem
+;; Bau koennen weitere Objekte entstehen (z.B. Beschriftungstexte), entlast
+;; ist dann nicht der gesuchte Block - genau daran scheiterte der Testlauf.
+;; ab-ent = Stand der Zeichnung VOR dem Bau. Damit prueft die Suche nur die
+;; neu entstandenen Objekte: schnell, und sie kann nicht versehentlich den
+;; Block eines frueheren Baus liefern (siehe Kommentar bei -ab).
+(defun mubea:insert-prefix-p (ent pref / ed bn)
+  (setq ed (entget ent)  bn (cdr (assoc 2 ed)))
+  (and ed (= (cdr (assoc 0 ed)) "INSERT") bn
+       (>= (strlen bn) (strlen pref))
+       (= (substr bn 1 (strlen pref)) pref)))
+
+;; Vorwaertslauf ab ab-ent (nil = ganze Zeichnung); der LETZTE Treffer
+;; gewinnt. Der entget-Test faengt ein inzwischen ungueltiges ab-ent ab
+;; (entget liefert dann nil, entnext wuerde einen Fehler werfen).
+(defun mubea:suche-vorwaerts (pref ab-ent / ent found)
+  (setq ent (if (and ab-ent (entget ab-ent)) (entnext ab-ent) (entnext)))
+  (while ent
+    (if (mubea:insert-prefix-p ent pref) (setq found ent))
+    (setq ent (entnext ent)))
+  found)
+
+(defun mubea:last-insert-prefix-ab (pref ab-ent / ent)
+  (if ab-ent
+    ;; MIT Marker nur die neu entstandenen Objekte pruefen - und BEWUSST
+    ;; ohne entlast-Kurzschluss: hat dieser Bau keinen Block erzeugt, waere
+    ;; entlast der Block eines FRUEHEREN Baus und das Ergebnis wuerde der
+    ;; falschen Kette zugeordnet. Kein Treffer = kein Block, das ist die
+    ;; richtige Antwort.
+    (mubea:suche-vorwaerts pref ab-ent)
+    (progn
+      ;; Ohne Marker: erst entlast (der haeufige Fall, das gerade
+      ;; eingefuegte Objekt), sonst die ganze Zeichnung.
+      (setq ent (entlast))
+      (if (and ent (mubea:insert-prefix-p ent pref))
+        ent
+        (mubea:suche-vorwaerts pref nil)))))
+
+(defun mubea:last-insert-prefix (pref)
+  (mubea:last-insert-prefix-ab pref nil))
 
 
 ;; ============================================================