Omniflo Dummy Routinen in eigene Datei getan

This commit is contained in:
2026-05-07 17:36:26 +02:00
parent d5856b5d9f
commit 2cdf9434e5
3 changed files with 150 additions and 140 deletions
-139
View File
@@ -137,144 +137,5 @@
(princ)
)
;; --- Omniflo / Boegen ---
(defun c:OMNI_APB_630_90 ()
(princ "\n[DUMMY] APB 110 R 630/90 800/800 (821104033)")
(princ)
)
(defun c:OMNI_APB_550_675 ()
(princ "\n[DUMMY] APB 110 R 550/67.5 432 (821104027)")
(princ)
)
(defun c:OMNI_APB_630_45 ()
(princ "\n[DUMMY] APB 110 R 630/45 400 (821104031)")
(princ)
)
(defun c:OMNI_APB_550_225 ()
(princ "\n[DUMMY] APB 110 R 550/22.5 84 (821104025)")
(princ)
)
(defun c:OMNI_APB_650_180 ()
(princ "\n[DUMMY] APB 110 R 650/180 L=150 (821104043)")
(princ)
)
;; --- Omniflo / Aluprofil Gerade ---
(defun c:OMNI_AP110 ()
(princ "\n[DUMMY] AP 110 Aluprofil Gerade")
(princ)
)
;; --- Omniflo / Weiche 90 Grad ---
(defun c:OMNI_W90_Einfach ()
(princ "\n[DUMMY] Einfach 90 700/700 links M (834372027)")
(princ)
)
(defun c:OMNI_W90_Doppel ()
(princ "\n[DUMMY] Doppel 90 700/700 M (834372109)")
(princ)
)
(defun c:OMNI_W90_Dreiwege ()
(princ "\n[DUMMY] Dreiwege 90 700/700 M (834372209)")
(princ)
)
;; --- Omniflo / Weiche 45 Grad ---
(defun c:OMNI_W45_Einfach ()
(princ "\n[DUMMY] Einfach 45 350/700 links M (834372001)")
(princ)
)
(defun c:OMNI_W45_Doppel ()
(princ "\n[DUMMY] Doppel 45 350/700 M (834372100)")
(princ)
)
(defun c:OMNI_W45_Dreiwege ()
(princ "\n[DUMMY] Dreiwege 45 350/700 M (834372200)")
(princ)
)
;; --- Omniflo / Weichen Parallel ---
(defun c:OMNI_WP_Einfach ()
(princ "\n[DUMMY] Einfach Parallel 200/750 links M (834372047)")
(princ)
)
(defun c:OMNI_WP_Doppel ()
(princ "\n[DUMMY] Doppel Parallel 200/750 M (834372115)")
(princ)
)
(defun c:OMNI_WP_Dreiwege ()
(princ "\n[DUMMY] Dreiwege Parallel 200/750 M (834372215)")
(princ)
)
;; --- Omniflo / Weichenkoerper ---
(defun c:OMNI_WK_Einfach ()
(princ "\n[DUMMY] Weichenkoerper Einfach 22.5 links M (834342011)")
(princ)
)
(defun c:OMNI_WK_Doppel ()
(princ "\n[DUMMY] Weichenkoerper Doppel 22.5 M (834342100)")
(princ)
)
(defun c:OMNI_WK_Dreiwege ()
(princ "\n[DUMMY] Weichenkoerper Dreiwege 22.5 M (834342200)")
(princ)
)
;; --- Omniflo / Weichenkombinationen ---
(defun c:OMNI_WKomb_Delta ()
(princ "\n[DUMMY] Delta 1400/700 M (834372400)")
(princ)
)
(defun c:OMNI_WKomb_Star ()
(princ "\n[DUMMY] Star 1400/1400 M (834372420)")
(princ)
)
;; --- Omniflo / TEF Elemente ---
(defun c:OMNI_TEF_UmlenkR ()
(princ "\n[DUMMY] Umlenkspannst. rechts fuer TEF links")
(princ)
)
(defun c:OMNI_TEF_UmlenkL ()
(princ "\n[DUMMY] Umlenkspannst. links fuer TEF rechts")
(princ)
)
(defun c:OMNI_TEF_AntriebL ()
(princ "\n[DUMMY] Antriebst. links fuer TEF links")
(princ)
)
(defun c:OMNI_TEF_AntriebR ()
(princ "\n[DUMMY] Antriebst. rechts fuer TEF rechts")
(princ)
)
(defun c:OMNI_TEF_Gerade ()
(princ "\n[DUMMY] TEF Gerade")
(princ)
)
;; --- Omniflo / KettenFoerderer ---
(defun c:OMNI_KettenFoerderer ()
(princ "\n[DUMMY] KettenFoerderer")
(princ)
)
(princ "\nSSG_LIB_Commands.lsp geladen - Dummy-Befehle registriert.")
(princ)