=== GlobalDB 1478: VP_DLWeichen_Sorter_A  [DB] ===
INTERFACE:
  Static:
    Datenlistenkopf : Struct
      KOPF : Word := 16#DA14                            // Datenliste-Kennnung (DA) / Datensatzlänge in Word (1 - 128)
      LAENGE : Int := 27                                // Länge der Datenliste (maximale Anzahl der Datensätze)
      STAMMDATEN : Int := 1                             // Stammdatenlänge in Word (1 - 9)
      INDDB : Int := 0                                  // Indizierter DB (nur bei Stammdaten = 1 erlaubt !!!)
      LAENGEINDDB : Int := 0                            // Länge des indizierten DB in Word (nur bei Stammdaten = 1 erlaubt !!!)
      OFFSETINDDATEN : Int := 0                         // Offset für indizierte Daten (nur bei Stammdaten = 1 erlaubt !!!)
      LETZTERZUGRIFF : Int := 1020                      // Speicherung des letzten Zugriffs
      Belegt14 : Int := 0                               // reserviert von Sort-Datenliste
      Reserve16 : Int := 0                              // Reserve
      Reserve18 : Int := 0                              // Reserve
    Synchron_BG3120 : Struct
      Sync_Nr : Int := 3120                             // Nummer des Synchron-Punkts
      Sync_Dyn_DB : Int := 1423                         // Dynamische Daten des Synchron-Punkts
      Sync_Dyn_DW : Int := 150                          // Dynamische Daten des Synchron-Punkts
      Sync_Typ : Int := 177                             // Synchron-Punkt-Typ = 177 (StartSync)
      Parameter : Struct
        Kein_Sync_B : Bool := FALSE
        InkSim : Bool := FALSE
        ET200 : Bool := FALSE
        Sick_ABS_single : Bool := FALSE
        Para04 : Bool := FALSE
        Para05 : Bool := FALSE
        Para06 : Bool := FALSE
        Para07 : Bool := FALSE
        Para10 : Bool := FALSE
        Para11 : Bool := FALSE
        Para12 : Bool := FALSE
        Para13 : Bool := FALSE
        Para14 : Bool := FALSE
        Para15 : Bool := FALSE
        Para16 : Bool := FALSE
        Para17 : Bool := FALSE
      Ink_DB : Int := 1483                              // DB-Nr des Inkremental-Gebers (Zählerbaugruppe) Neu-Sync-Zähler
      Ink_HW_Adress : Int := 0                          // Hardware-Adresse des Inkrementalgebers / Zählerbaugruppe
      TravelFIFO_DB : Int := 1480                       // Einsprung Travel-FIFO-DB
      TravelFIFO_DW : Int := 0                          // Einsprung Travel-FIFO-DW
      Hauptstrang_DL_DB : Int := 1481                   // Hauptstrang-Datenlisten-DB
      Hauptstrang_DL_DW : Int := 0                      // Hauptstrang-Datenlisten-DW
      Entprellung_B_Sync : DInt := 5                    // Entprellung Snyc-Sensor (in Inkremente)
      Abstand_StartSep : DInt := 50                     // Abstand Start-Separator <-> Sync-Sensor (in Inkremente)
      Reserve : Array[1..5] of Int                      // Reserve
    Weiche_VP1 : Struct
      Weichen_Nr : Int := 1                             // Nummer der Weiche
      Weichen_Dyn_DB : Int := 1423                      // Dynamische Daten Weiche
      En02_B : Int := 300                               // Dynamische Daten Weiche
      Weichen_Typ : Int := 178                          // Weichen-Typ = 178 (Weiche)
      Parameter : Struct
        Letzte_Weiche : Bool := FALSE                   // Letzte Weiche im Verbund
        Entlade_Weiche : Bool := FALSE                  // BT/MT wird entladen -> Leerziel übergeben
        Kontroll_B_Gerade : Bool := FALSE               // Kontroll-Sensor bei Weiterfahrt (gerade)
        Kontroll_B_Ausfahrt : Bool := TRUE              // Kontroll-Sensor bei Ausfahrt (abzweig)
        Quell_Schaltung : Bool := FALSE                 // Weiche aufgrund der Quelle schalten (Hauptstrang = Gerade, FIFO = Abzweig)
        Disable_PLC_Ziel : Bool := FALSE                // Bei Zielvorgabe von PLC nicht anfahren (Disabled)
        ErsatzZiel_bei_Stau : Bool := FALSE             // Bei Stau Ersatz-Ziel (s.u.) anfahren
        Para07 : Bool := FALSE
        Weichen_GST_gerade : Bool := TRUE               // Weiche wird ohne Daten auf gerade geschaltet
        Weichen_GST_abzweig : Bool := FALSE             // Weiche wird ohne Daten auf abzweig geschaltet
        IDX_an_Puffer : Bool := TRUE                    // IDX an Ziel-Puffer senden
        Para13 : Bool := FALSE
        Para14 : Bool := FALSE
        Para15 : Bool := FALSE
        Para16 : Bool := FALSE
        PC_Komm_aktiv : Bool := TRUE                    // PC-Kommunikation aktiv
      LeerZiel : Int := 0                               // Nach Entladen des BT/MT dieses Ziel übergeben
      PC_Send_FIFO : Int := 0                           // Send-FIFO für PC-Sndungen
      Hauptstrang_DL_DB : Int := 1481                   // Hauptstrang-Datenlisten-DB
      Hauptstrang_DL_DW : Int := 0                      // Hauptstrang-Datenlisten-DW
      Off_Ink : DInt := 42                              // Inkremente zum Weiche schalten
      Ink_DB : Int := 1483                              // DB-Nr des Inkremental-Geber
      Position_minus : Int := 3120                      // Position vorher (zwecks Datensuche)
      AbzweigZiel : Int := 101                          // Bei diesem Ziel Weiche auf Abzweig schalten + Carl
      GeradeZiel : Int := 0                             // Bei diesem Ziel Weiche auf Gerade schalten + Carl
      Kontroll_Zeit_gerade : Int := 0                   // Nach dieser Zeit muss BM bei Geradefahrt Weichenbereich verlassen haben [100ms]
      Kontroll_Zeit_abzweigen : Int := 100              // Nach dieser Zeit muss BM bei Abzweigen Weichenbereich verlassen haben [100ms]
      DraussenZeit_gerade : Int := 0                    // Nach dieser neg. Zeit [100ms] Error undef.BM, falls Kontroll-Sensor aktiv
      Ink_Schaltdauer : Int := 300                      // Inkremente, danach wird Weiche in GST geschaltet
      ErsatzZiel : Int := 0                             // Dieser Ziel bei Parameter 6 und Stau anfahren
    Weiche_VP2 : Struct
      Weichen_Nr : Int := 2                             // Nummer der Weiche
      Weichen_Dyn_DB : Int := 1423                      // Dynamische Daten Weiche
      Weichen_Dyn_DW : Int := 500                       // Dynamische Daten Weiche
      Weichen_Typ : Int := 178                          // Weichen-Typ = 178 (Weiche)
      Parameter : Struct
        Letzte_Weiche : Bool := FALSE                   // Letzte Weiche im Verbund
        Entlade_Weiche : Bool := FALSE                  // BT/MT wird entladen -> Leerziel übergeben
        Kontroll_B_Gerade : Bool := FALSE               // Kontroll-Sensor bei Weiterfahrt (gerade)
        Kontroll_B_Ausfahrt : Bool := TRUE              // Kontroll-Sensor bei Ausfahrt (abzweig)
        Quell_Schaltung : Bool := FALSE                 // Weiche aufgrund der Quelle schalten (Hauptstrang = Gerade, FIFO = Abzweig)
        Disable_PLC_Ziel : Bool := FALSE                // Bei Zielvorgabe von PLC nicht anfahren (Disabled)
        ErsatzZiel_bei_Stau : Bool := FALSE             // Bei Stau Ersatz-Ziel (s.u.) anfahren
        Para07 : Bool := FALSE
        Weichen_GST_gerade : Bool := TRUE               // Weiche wird ohne Daten auf gerade geschaltet
        Weichen_GST_abzweig : Bool := FALSE             // Weiche wird ohne Daten auf abzweig geschaltet
        IDX_an_Puffer : Bool := TRUE                    // IDX an Ziel-Puffer senden
        Para13 : Bool := FALSE
        Para14 : Bool := FALSE
        Para15 : Bool := FALSE
        Para16 : Bool := FALSE
        PC_Komm_aktiv : Bool := TRUE                    // PC-Kommunikation aktiv
      LeerZiel : Int := 0                               // Nach Entladen des BT/MT dieses Ziel übergeben
      PC_Send_FIFO : Int := 0                           // Send-FIFO für PC-Sndungen
      Hauptstrang_DL_DB : Int := 1481                   // Hauptstrang-Datenlisten-DB
      Hauptstrang_DL_DW : Int := 0                      // Hauptstrang-Datenlisten-DW
      Off_Ink : DInt := 65                              // Inkremente zum Weiche schalten
      Ink_DB : Int := 1483                              // DB-Nr des Inkremental-Geber
      Position_minus : Int := 1                         // Position vorher (zwecks Datensuche)
      AbzweigZiel : Int := 102                          // Bei diesem Ziel Weiche auf Abzweig schalten + Carl
      GeradeZiel : Int := 0                             // Bei diesem Ziel Weiche auf Gerade schalten + Carl
      Kontroll_Zeit_gerade : Int := 0                   // Nach dieser Zeit muss BM bei Geradefahrt Weichenbereich verlassen haben [100ms]
      Kontroll_Zeit_abzweigen : Int := 100              // Nach dieser Zeit muss BM bei Abzweigen Weichenbereich verlassen haben [100ms]
      DraussenZeit_gerade : Int := 0                    // Nach dieser neg. Zeit [100ms] Error undef.BM, falls Kontroll-Sensor aktiv
      Ink_Schaltdauer : Int := 300                      // Inkremente, danach wird Weiche in GST geschaltet
      ErsatzZiel : Int := 0                             // Dieser Ziel bei Parameter 6 und Stau anfahren
    Weiche_VP3 : Struct
      Weichen_Nr : Int := 3                             // Nummer der Weiche
      Weichen_Dyn_DB : Int := 1423                      // Dynamische Daten Weiche
      Weichen_Dyn_DW : Int := 700                       // Dynamische Daten Weiche
      Weichen_Typ : Int := 178                          // Weichen-Typ = 178 (Weiche)
      Parameter : Struct
        Letzte_Weiche : Bool := FALSE                   // Letzte Weiche im Verbund
        Entlade_Weiche : Bool := FALSE                  // BT/MT wird entladen -> Leerziel übergeben
        Kontroll_B_Gerade : Bool := FALSE               // Kontroll-Sensor bei Weiterfahrt (gerade)
        Kontroll_B_Ausfahrt : Bool := TRUE              // Kontroll-Sensor bei Ausfahrt (abzweig)
        Quell_Schaltung : Bool := FALSE                 // Weiche aufgrund der Quelle schalten (Hauptstrang = Gerade, FIFO = Abzweig)
        Disable_PLC_Ziel : Bool := FALSE                // Bei Zielvorgabe von PLC nicht anfahren (Disabled)
        ErsatzZiel_bei_Stau : Bool := FALSE             // Bei Stau Ersatz-Ziel (s.u.) anfahren
        Para07 : Bool := FALSE
        Weichen_GST_gerade : Bool := TRUE               // Weiche wird ohne Daten auf gerade geschaltet
        Weichen_GST_abzweig : Bool := FALSE             // Weiche wird ohne Daten auf abzweig geschaltet
        IDX_an_Puffer : Bool := TRUE                    // IDX an Ziel-Puffer senden
        Para13 : Bool := FALSE
        Para14 : Bool := FALSE
        Para15 : Bool := FALSE
        Para16 : Bool := FALSE
        PC_Komm_aktiv : Bool := TRUE                    // PC-Kommunikation aktiv
      LeerZiel : Int := 0                               // Nach Entladen des BT/MT dieses Ziel übergeben
      PC_Send_FIFO : Int := 0                           // Send-FIFO für PC-Sndungen
      Hauptstrang_DL_DB : Int := 1481                   // Hauptstrang-Datenlisten-DB
      Hauptstrang_DL_DW : Int := 0                      // Hauptstrang-Datenlisten-DW
      Off_Ink : DInt := 88                              // Inkremente zum Weiche schalten
      Ink_DB : Int := 1483                              // DB-Nr des Inkremental-Geber
      Position_minus : Int := 2                         // Position vorher (zwecks Datensuche)
      AbzweigZiel : Int := 103                          // Bei diesem Ziel Weiche auf Abzweig schalten + Carl
      GeradeZiel : Int := 0                             // Bei diesem Ziel Weiche auf Gerade schalten + Carl
      Kontroll_Zeit_gerade : Int := 0                   // Nach dieser Zeit muss BM bei Geradefahrt Weichenbereich verlassen haben [100ms]
      Kontroll_Zeit_abzweigen : Int := 100              // Nach dieser Zeit muss BM bei Abzweigen Weichenbereich verlassen haben [100ms]
      DraussenZeit_gerade : Int := 0                    // Nach dieser neg. Zeit [100ms] Error undef.BM, falls Kontroll-Sensor aktiv
      Ink_Schaltdauer : Int := 300                      // Inkremente, danach wird Weiche in GST geschaltet
      ErsatzZiel : Int := 0                             // Dieser Ziel bei Parameter 6 und Stau anfahren
    Weiche_VP4 : Struct
      Weichen_Nr : Int := 4                             // Nummer der Weiche
      Weichen_Dyn_DB : Int := 1423                      // Dynamische Daten Weiche
      Weichen_Dyn_DW : Int := 900                       // Dynamische Daten Weiche
      Weichen_Typ : Int := 178                          // Weichen-Typ = 178 (Weiche)
      Parameter : Struct
        Letzte_Weiche : Bool := FALSE                   // Letzte Weiche im Verbund
        Entlade_Weiche : Bool := FALSE                  // BT/MT wird entladen -> Leerziel übergeben
        Kontroll_B_Gerade : Bool := FALSE               // Kontroll-Sensor bei Weiterfahrt (gerade)
        Kontroll_B_Ausfahrt : Bool := TRUE              // Kontroll-Sensor bei Ausfahrt (abzweig)
        Quell_Schaltung : Bool := FALSE                 // Weiche aufgrund der Quelle schalten (Hauptstrang = Gerade, FIFO = Abzweig)
        Disable_PLC_Ziel : Bool := FALSE                // Bei Zielvorgabe von PLC nicht anfahren (Disabled)
        Para06 : Bool := FALSE
        Para07 : Bool := FALSE
        Weichen_GST_gerade : Bool := TRUE               // Weiche wird ohne Daten auf gerade geschaltet
        Weichen_GST_abzweig : Bool := FALSE             // Weiche wird ohne Daten auf abzweig geschaltet
        IDX_an_Puffer : Bool := TRUE                    // IDX an Ziel-Puffer senden
        Para13 : Bool := FALSE
        Para14 : Bool := FALSE
        Para15 : Bool := FALSE
        Para16 : Bool := FALSE
        PC_Komm_aktiv : Bool := TRUE                    // PC-Kommunikation aktiv
      LeerZiel : Int := 0                               // Nach Entladen des BT/MT dieses Ziel übergeben
      PC_Send_FIFO : Int := 0                           // Send-FIFO für PC-Sndungen
      Hauptstrang_DL_DB : Int := 1481                   // Hauptstrang-Datenlisten-DB
      Hauptstrang_DL_DW : Int := 0                      // Hauptstrang-Datenlisten-DW
      Off_Ink : DInt := 109                             // Inkremente zum Weiche schalten
      Ink_DB : Int := 1483                              // DB-Nr des Inkremental-Geber
      Position_minus : Int := 3                         // Position vorher (zwecks Datensuche)
      AbzweigZiel : Int := 104                          // Bei diesem Ziel Weiche auf Abzweig schalten + Carl
      GeradeZiel : Int := 0                             // Bei diesem Ziel Weiche auf Gerade schalten + Carl
      Kontroll_Zeit_gerade : Int := 0                   // Nach dieser Zeit muss BM bei Geradefahrt Weichenbereich verlassen haben [100ms]
      Kontroll_Zeit_abzweigen : Int := 100              // Nach dieser Zeit muss BM bei Abzweigen Weichenbereich verlassen haben [100ms]
      DraussenZeit_gerade : Int := 0                    // Nach dieser neg. Zeit [100ms] Error undef.BM, falls Kontroll-Sensor aktiv
      Ink_Schaltdauer : Int := 300                      // Inkremente, danach wird Weiche in GST geschaltet
      Frei38 : Int := 0
    Weiche_VP5 : Struct
      Weichen_Nr : Int := 5                             // Nummer der Weiche
      Weichen_Dyn_DB : Int := 1423                      // Dynamische Daten Weiche
      Weichen_Dyn_DW : Int := 1100                      // Dynamische Daten Weiche
      Weichen_Typ : Int := 178                          // Weichen-Typ = 178 (Weiche)
      Parameter : Struct
        Letzte_Weiche : Bool := FALSE                   // Letzte Weiche im Verbund
        Entlade_Weiche : Bool := FALSE                  // BT/MT wird entladen -> Leerziel übergeben
        Kontroll_B_Gerade : Bool := TRUE                // Kontroll-Sensor bei Weiterfahrt (gerade)
        Kontroll_B_Ausfahrt : Bool := TRUE              // Kontroll-Sensor bei Ausfahrt (abzweig)
        Quell_Schaltung : Bool := FALSE                 // Weiche aufgrund der Quelle schalten (Hauptstrang = Gerade, FIFO = Abzweig)
        Disable_PLC_Ziel : Bool := FALSE                // Bei Zielvorgabe von PLC nicht anfahren (Disabled)
        Para06 : Bool := FALSE
        Para07 : Bool := FALSE
        Weichen_GST_gerade : Bool := TRUE               // Weiche wird ohne Daten auf gerade geschaltet
        Weichen_GST_abzweig : Bool := FALSE             // Weiche wird ohne Daten auf abzweig geschaltet
        IDX_an_Puffer : Bool := TRUE                    // IDX an Ziel-Puffer senden
        Para13 : Bool := FALSE
        Para14 : Bool := FALSE
        Para15 : Bool := FALSE
        Para16 : Bool := FALSE
        PC_Komm_aktiv : Bool := TRUE                    // PC-Kommunikation aktiv
      LeerZiel : Int := 0                               // Nach Entladen des BT/MT dieses Ziel übergeben
      PC_Send_FIFO : Int := 0                           // Send-FIFO für PC-Sndungen
      Hauptstrang_DL_DB : Int := 1481                   // Hauptstrang-Datenlisten-DB
      Hauptstrang_DL_DW : Int := 0                      // Hauptstrang-Datenlisten-DW
      Off_Ink : DInt := 133                             // Inkremente zum Weiche schalten
      Ink_DB : Int := 1483                              // DB-Nr des Inkremental-Geber
      Position_minus : Int := 4                         // Position vorher (zwecks Datensuche)
      AbzweigZiel : Int := 105                          // Bei diesem Ziel Weiche auf Abzweig schalten + Carl
      GeradeZiel : Int := 0                             // Bei diesem Ziel Weiche auf Gerade schalten + Carl
      Kontroll_Zeit_gerade : Int := 150                 // Nach dieser Zeit muss BM bei Geradefahrt Weichenbereich verlassen haben [100ms]
      Kontroll_Zeit_abzweigen : Int := 100              // Nach dieser Zeit muss BM bei Abzweigen Weichenbereich verlassen haben [100ms]
      DraussenZeit_gerade : Int := -300                 // Nach dieser neg. Zeit [100ms] Error undef.BM, falls Kontroll-Sensor aktiv
      Ink_Schaltdauer : Int := 300                      // Inkremente, danach wird Weiche in GST geschaltet
      Frei38 : Int := 0
    Weiche_VP6 : Struct
      Weichen_Nr : Int := 6                             // Nummer der Weiche
      Weichen_Dyn_DB : Int := 1423                      // Dynamische Daten Weiche
      Weichen_Dyn_DW : Int := 1300                      // Dynamische Daten Weiche
      Weichen_Typ : Int := 178                          // Weichen-Typ = 178 (Weiche)
      Parameter : Struct
        Letzte_Weiche : Bool := FALSE                   // Letzte Weiche im Verbund
        Entlade_Weiche : Bool := FALSE                  // BT/MT wird entladen -> Leerziel übergeben
        Kontroll_B_Gerade : Bool := FALSE               // Kontroll-Sensor bei Weiterfahrt (gerade)
        Kontroll_B_Ausfahrt : Bool := TRUE              // Kontroll-Sensor bei Ausfahrt (abzweig)
        Quell_Schaltung : Bool := FALSE                 // Weiche aufgrund der Quelle schalten (Hauptstrang = Gerade, FIFO = Abzweig)
        Disable_PLC_Ziel : Bool := FALSE                // Bei Zielvorgabe von PLC nicht anfahren (Disabled)
        Para06 : Bool := FALSE
        Para07 : Bool := FALSE
        Weichen_GST_gerade : Bool := TRUE               // Weiche wird ohne Daten auf gerade geschaltet
        Weichen_GST_abzweig : Bool := FALSE             // Weiche wird ohne Daten auf abzweig geschaltet
        IDX_an_Puffer : Bool := TRUE                    // IDX an Ziel-Puffer senden
        Para13 : Bool := FALSE
        Para14 : Bool := FALSE
        Para15 : Bool := FALSE
        Para16 : Bool := FALSE
        PC_Komm_aktiv : Bool := TRUE                    // PC-Kommunikation aktiv
      LeerZiel : Int := 0                               // Nach Entladen des BT/MT dieses Ziel übergeben
      PC_Send_FIFO : Int := 0                           // Send-FIFO für PC-Sndungen
      Hauptstrang_DL_DB : Int := 1481                   // Hauptstrang-Datenlisten-DB
      Hauptstrang_DL_DW : Int := 0                      // Hauptstrang-Datenlisten-DW
      Off_Ink : DInt := 166                             // Inkremente zum Weiche schalten
      Ink_DB : Int := 1483                              // DB-Nr des Inkremental-Geber
      Position_minus : Int := 5                         // Position vorher (zwecks Datensuche)
      AbzweigZiel : Int := 106                          // Bei diesem Ziel Weiche auf Abzweig schalten + Carl
      GeradeZiel : Int := 0                             // Bei diesem Ziel Weiche auf Gerade schalten + Carl
      Kontroll_Zeit_gerade : Int := 0                   // Nach dieser Zeit muss BM bei Geradefahrt Weichenbereich verlassen haben [100ms]
      Kontroll_Zeit_abzweigen : Int := 100              // Nach dieser Zeit muss BM bei Abzweigen Weichenbereich verlassen haben [100ms]
      DraussenZeit_gerade : Int := 0                    // Nach dieser neg. Zeit [100ms] Error undef.BM, falls Kontroll-Sensor aktiv
      Ink_Schaltdauer : Int := 300                      // Inkremente, danach wird Weiche in GST geschaltet
      Frei38 : Int := 0
    Weiche_VP7 : Struct
      Weichen_Nr : Int := 7                             // Nummer der Weiche
      Weichen_Dyn_DB : Int := 1423                      // Dynamische Daten Weiche
      Weichen_Dyn_DW : Int := 1500                      // Dynamische Daten Weiche
      Weichen_Typ : Int := 178                          // Weichen-Typ = 178 (Weiche)
      Parameter : Struct
        Letzte_Weiche : Bool := FALSE                   // Letzte Weiche im Verbund
        Entlade_Weiche : Bool := FALSE                  // BT/MT wird entladen -> Leerziel übergeben
        Kontroll_B_Gerade : Bool := FALSE               // Kontroll-Sensor bei Weiterfahrt (gerade)
        Kontroll_B_Ausfahrt : Bool := TRUE              // Kontroll-Sensor bei Ausfahrt (abzweig)
        Quell_Schaltung : Bool := FALSE                 // Weiche aufgrund der Quelle schalten (Hauptstrang = Gerade, FIFO = Abzweig)
        Disable_PLC_Ziel : Bool := FALSE                // Bei Zielvorgabe von PLC nicht anfahren (Disabled)
        Para06 : Bool := FALSE
        Para07 : Bool := FALSE
        Weichen_GST_gerade : Bool := TRUE               // Weiche wird ohne Daten auf gerade geschaltet
        Weichen_GST_abzweig : Bool := FALSE             // Weiche wird ohne Daten auf abzweig geschaltet
        IDX_an_Puffer : Bool := TRUE                    // IDX an Ziel-Puffer senden
        Para13 : Bool := FALSE
        Para14 : Bool := FALSE
        Para15 : Bool := FALSE
        Para16 : Bool := FALSE
        PC_Komm_aktiv : Bool := TRUE                    // PC-Kommunikation aktiv
      LeerZiel : Int := 0                               // Nach Entladen des BT/MT dieses Ziel übergeben
      PC_Send_FIFO : Int := 0                           // Send-FIFO für PC-Sndungen
      Hauptstrang_DL_DB : Int := 1481                   // Hauptstrang-Datenlisten-DB
      Hauptstrang_DL_DW : Int := 0                      // Hauptstrang-Datenlisten-DW
      Off_Ink : DInt := 191                             // Inkremente zum Weiche schalten
      Ink_DB : Int := 1483                              // DB-Nr des Inkremental-Geber
      Position_minus : Int := 6                         // Position vorher (zwecks Datensuche)
      AbzweigZiel : Int := 107                          // Bei diesem Ziel Weiche auf Abzweig schalten + Carl
      GeradeZiel : Int := 0                             // Bei diesem Ziel Weiche auf Gerade schalten + Carl
      Kontroll_Zeit_gerade : Int := 0                   // Nach dieser Zeit muss BM bei Geradefahrt Weichenbereich verlassen haben [100ms]
      Kontroll_Zeit_abzweigen : Int := 100              // Nach dieser Zeit muss BM bei Abzweigen Weichenbereich verlassen haben [100ms]
      DraussenZeit_gerade : Int := 0                    // Nach dieser neg. Zeit [100ms] Error undef.BM, falls Kontroll-Sensor aktiv
      Ink_Schaltdauer : Int := 300                      // Inkremente, danach wird Weiche in GST geschaltet
      Frei38 : Int := 0
    Weiche_VP8 : Struct
      Weichen_Nr : Int := 8                             // Nummer der Weiche
      Weichen_Dyn_DB : Int := 1423                      // Dynamische Daten Weiche
      Weichen_Dyn_DW : Int := 1700                      // Dynamische Daten Weiche
      Weichen_Typ : Int := 178                          // Weichen-Typ = 178 (Weiche)
      Parameter : Struct
        Letzte_Weiche : Bool := FALSE                   // Letzte Weiche im Verbund
        Entlade_Weiche : Bool := FALSE                  // BT/MT wird entladen -> Leerziel übergeben
        Kontroll_B_Gerade : Bool := FALSE               // Kontroll-Sensor bei Weiterfahrt (gerade)
        Kontroll_B_Ausfahrt : Bool := TRUE              // Kontroll-Sensor bei Ausfahrt (abzweig)
        Quell_Schaltung : Bool := FALSE                 // Weiche aufgrund der Quelle schalten (Hauptstrang = Gerade, FIFO = Abzweig)
        Disable_PLC_Ziel : Bool := FALSE                // Bei Zielvorgabe von PLC nicht anfahren (Disabled)
        Para06 : Bool := FALSE
        Para07 : Bool := FALSE
        Weichen_GST_gerade : Bool := TRUE               // Weiche wird ohne Daten auf gerade geschaltet
        Weichen_GST_abzweig : Bool := FALSE             // Weiche wird ohne Daten auf abzweig geschaltet
        IDX_an_Puffer : Bool := TRUE                    // IDX an Ziel-Puffer senden
        Para13 : Bool := FALSE
        Para14 : Bool := FALSE
        Para15 : Bool := FALSE
        Para16 : Bool := FALSE
        PC_Komm_aktiv : Bool := TRUE                    // PC-Kommunikation aktiv
      LeerZiel : Int := 0                               // Nach Entladen des BT/MT dieses Ziel übergeben
      PC_Send_FIFO : Int := 0                           // Send-FIFO für PC-Sndungen
      Hauptstrang_DL_DB : Int := 1481                   // Hauptstrang-Datenlisten-DB
      Hauptstrang_DL_DW : Int := 0                      // Hauptstrang-Datenlisten-DW
      Off_Ink : DInt := 214                             // Inkremente zum Weiche schalten
      Ink_DB : Int := 1483                              // DB-Nr des Inkremental-Geber
      Position_minus : Int := 7                         // Position vorher (zwecks Datensuche)
      AbzweigZiel : Int := 108                          // Bei diesem Ziel Weiche auf Abzweig schalten + Carl
      GeradeZiel : Int := 0                             // Bei diesem Ziel Weiche auf Gerade schalten + Carl
      Kontroll_Zeit_gerade : Int := 0                   // Nach dieser Zeit muss BM bei Geradefahrt Weichenbereich verlassen haben [100ms]
      Kontroll_Zeit_abzweigen : Int := 100              // Nach dieser Zeit muss BM bei Abzweigen Weichenbereich verlassen haben [100ms]
      DraussenZeit_gerade : Int := 0                    // Nach dieser neg. Zeit [100ms] Error undef.BM, falls Kontroll-Sensor aktiv
      Ink_Schaltdauer : Int := 300                      // Inkremente, danach wird Weiche in GST geschaltet
      Frei38 : Int := 0
    Weiche_VP9 : Struct
      Weichen_Nr : Int := 9                             // Nummer der Weiche
      Weichen_Dyn_DB : Int := 1423                      // Dynamische Daten Weiche
      Weichen_Dyn_DW : Int := 1900                      // Dynamische Daten Weiche
      Weichen_Typ : Int := 178                          // Weichen-Typ = 178 (Weiche)
      Parameter : Struct
        Letzte_Weiche : Bool := FALSE                   // Letzte Weiche im Verbund
        Entlade_Weiche : Bool := FALSE                  // BT/MT wird entladen -> Leerziel übergeben
        Kontroll_B_Gerade : Bool := FALSE               // Kontroll-Sensor bei Weiterfahrt (gerade)
        Kontroll_B_Ausfahrt : Bool := TRUE              // Kontroll-Sensor bei Ausfahrt (abzweig)
        Quell_Schaltung : Bool := FALSE                 // Weiche aufgrund der Quelle schalten (Hauptstrang = Gerade, FIFO = Abzweig)
        Disable_PLC_Ziel : Bool := FALSE                // Bei Zielvorgabe von PLC nicht anfahren (Disabled)
        Para06 : Bool := FALSE
        Para07 : Bool := FALSE
        Weichen_GST_gerade : Bool := TRUE               // Weiche wird ohne Daten auf gerade geschaltet
        Weichen_GST_abzweig : Bool := FALSE             // Weiche wird ohne Daten auf abzweig geschaltet
        IDX_an_Puffer : Bool := TRUE                    // IDX an Ziel-Puffer senden
        Para13 : Bool := FALSE
        Para14 : Bool := FALSE
        Para15 : Bool := FALSE
        Para16 : Bool := FALSE
        PC_Komm_aktiv : Bool := TRUE                    // PC-Kommunikation aktiv
      LeerZiel : Int := 0                               // Nach Entladen des BT/MT dieses Ziel übergeben
      PC_Send_FIFO : Int := 0                           // Send-FIFO für PC-Sndungen
      Hauptstrang_DL_DB : Int := 1481                   // Hauptstrang-Datenlisten-DB
      Hauptstrang_DL_DW : Int := 0                      // Hauptstrang-Datenlisten-DW
      Off_Ink : DInt := 238                             // Inkremente zum Weiche schalten
      Ink_DB : Int := 1483                              // DB-Nr des Inkremental-Geber
      Position_minus : Int := 8                         // Position vorher (zwecks Datensuche)
      AbzweigZiel : Int := 109                          // Bei diesem Ziel Weiche auf Abzweig schalten + Carl
      GeradeZiel : Int := 0                             // Bei diesem Ziel Weiche auf Gerade schalten + Carl
      Kontroll_Zeit_gerade : Int := 0                   // Nach dieser Zeit muss BM bei Geradefahrt Weichenbereich verlassen haben [100ms]
      Kontroll_Zeit_abzweigen : Int := 100              // Nach dieser Zeit muss BM bei Abzweigen Weichenbereich verlassen haben [100ms]
      DraussenZeit_gerade : Int := 0                    // Nach dieser neg. Zeit [100ms] Error undef.BM, falls Kontroll-Sensor aktiv
      Ink_Schaltdauer : Int := 300                      // Inkremente, danach wird Weiche in GST geschaltet
      Frei38 : Int := 0
    Weiche_VP10 : Struct
      Weichen_Nr : Int := 10                            // Nummer der Weiche
      Weichen_Dyn_DB : Int := 1423                      // Dynamische Daten Weiche
      Weichen_Dyn_DW : Int := 2100                      // Dynamische Daten Weiche
      Weichen_Typ : Int := 178                          // Weichen-Typ = 178 (Weiche)
      Parameter : Struct
        Letzte_Weiche : Bool := FALSE                   // Letzte Weiche im Verbund
        Entlade_Weiche : Bool := FALSE                  // BT/MT wird entladen -> Leerziel übergeben
        Kontroll_B_Gerade : Bool := FALSE               // Kontroll-Sensor bei Weiterfahrt (gerade)
        Kontroll_B_Ausfahrt : Bool := TRUE              // Kontroll-Sensor bei Ausfahrt (abzweig)
        Quell_Schaltung : Bool := FALSE                 // Weiche aufgrund der Quelle schalten (Hauptstrang = Gerade, FIFO = Abzweig)
        Disable_PLC_Ziel : Bool := FALSE                // Bei Zielvorgabe von PLC nicht anfahren (Disabled)
        Para06 : Bool := FALSE
        Para07 : Bool := FALSE
        Weichen_GST_gerade : Bool := TRUE               // Weiche wird ohne Daten auf gerade geschaltet
        Weichen_GST_abzweig : Bool := FALSE             // Weiche wird ohne Daten auf abzweig geschaltet
        IDX_an_Puffer : Bool := TRUE                    // IDX an Ziel-Puffer senden
        Para13 : Bool := FALSE
        Para14 : Bool := FALSE
        Para15 : Bool := FALSE
        Para16 : Bool := FALSE
        PC_Komm_aktiv : Bool := TRUE                    // PC-Kommunikation aktiv
      LeerZiel : Int := 0                               // Nach Entladen des BT/MT dieses Ziel übergeben
      PC_Send_FIFO : Int := 0                           // Send-FIFO für PC-Sndungen
      Hauptstrang_DL_DB : Int := 1481                   // Hauptstrang-Datenlisten-DB
      Hauptstrang_DL_DW : Int := 0                      // Hauptstrang-Datenlisten-DW
      Off_Ink : DInt := 260                             // Inkremente zum Weiche schalten
      Ink_DB : Int := 1483                              // DB-Nr des Inkremental-Geber
      Position_minus : Int := 9                         // Position vorher (zwecks Datensuche)
      AbzweigZiel : Int := 110                          // Bei diesem Ziel Weiche auf Abzweig schalten + Carl
      GeradeZiel : Int := 0                             // Bei diesem Ziel Weiche auf Gerade schalten + Carl
      Kontroll_Zeit_gerade : Int := 0                   // Nach dieser Zeit muss BM bei Geradefahrt Weichenbereich verlassen haben [100ms]
      Kontroll_Zeit_abzweigen : Int := 100              // Nach dieser Zeit muss BM bei Abzweigen Weichenbereich verlassen haben [100ms]
      DraussenZeit_gerade : Int := 0                    // Nach dieser neg. Zeit [100ms] Error undef.BM, falls Kontroll-Sensor aktiv
      Ink_Schaltdauer : Int := 300                      // Inkremente, danach wird Weiche in GST geschaltet
      Frei38 : Int := 0
    Weiche_VP11 : Struct
      Weichen_Nr : Int := 11                            // Nummer der Weiche
      Weichen_Dyn_DB : Int := 1423                      // Dynamische Daten Weiche
      Weichen_Dyn_DW : Int := 2300                      // Dynamische Daten Weiche
      Weichen_Typ : Int := 178                          // Weichen-Typ = 178 (Weiche)
      Parameter : Struct
        Letzte_Weiche : Bool := FALSE                   // Letzte Weiche im Verbund
        Entlade_Weiche : Bool := FALSE                  // BT/MT wird entladen -> Leerziel übergeben
        Kontroll_B_Gerade : Bool := FALSE               // Kontroll-Sensor bei Weiterfahrt (gerade)
        Kontroll_B_Ausfahrt : Bool := TRUE              // Kontroll-Sensor bei Ausfahrt (abzweig)
        Quell_Schaltung : Bool := FALSE                 // Weiche aufgrund der Quelle schalten (Hauptstrang = Gerade, FIFO = Abzweig)
        Disable_PLC_Ziel : Bool := FALSE                // Bei Zielvorgabe von PLC nicht anfahren (Disabled)
        Para06 : Bool := FALSE
        Para07 : Bool := FALSE
        Weichen_GST_gerade : Bool := TRUE               // Weiche wird ohne Daten auf gerade geschaltet
        Weichen_GST_abzweig : Bool := FALSE             // Weiche wird ohne Daten auf abzweig geschaltet
        IDX_an_Puffer : Bool := TRUE                    // IDX an Ziel-Puffer senden
        Para13 : Bool := FALSE
        Para14 : Bool := FALSE
        Para15 : Bool := FALSE
        Para16 : Bool := FALSE
        PC_Komm_aktiv : Bool := TRUE                    // PC-Kommunikation aktiv
      LeerZiel : Int := 0                               // Nach Entladen des BT/MT dieses Ziel übergeben
      PC_Send_FIFO : Int := 0                           // Send-FIFO für PC-Sndungen
      Hauptstrang_DL_DB : Int := 1481                   // Hauptstrang-Datenlisten-DB
      Hauptstrang_DL_DW : Int := 0                      // Hauptstrang-Datenlisten-DW
      Off_Ink : DInt := 284                             // Inkremente zum Weiche schalten
      Ink_DB : Int := 1483                              // DB-Nr des Inkremental-Geber
      Position_minus : Int := 10                        // Position vorher (zwecks Datensuche)
      AbzweigZiel : Int := 111                          // Bei diesem Ziel Weiche auf Abzweig schalten + Carl
      GeradeZiel : Int := 0                             // Bei diesem Ziel Weiche auf Gerade schalten + Carl
      Kontroll_Zeit_gerade : Int := 0                   // Nach dieser Zeit muss BM bei Geradefahrt Weichenbereich verlassen haben [100ms]
      Kontroll_Zeit_abzweigen : Int := 100              // Nach dieser Zeit muss BM bei Abzweigen Weichenbereich verlassen haben [100ms]
      DraussenZeit_gerade : Int := 0                    // Nach dieser neg. Zeit [100ms] Error undef.BM, falls Kontroll-Sensor aktiv
      Ink_Schaltdauer : Int := 300                      // Inkremente, danach wird Weiche in GST geschaltet
      Frei38 : Int := 0
    Weiche_VP12 : Struct
      Weichen_Nr : Int := 12                            // Nummer der Weiche
      Weichen_Dyn_DB : Int := 1423                      // Dynamische Daten Weiche
      Weichen_Dyn_DW : Int := 2500                      // Dynamische Daten Weiche
      Weichen_Typ : Int := 178                          // Weichen-Typ = 178 (Weiche)
      Parameter : Struct
        Letzte_Weiche : Bool := FALSE                   // Letzte Weiche im Verbund
        Entlade_Weiche : Bool := FALSE                  // BT/MT wird entladen -> Leerziel übergeben
        Kontroll_B_Gerade : Bool := TRUE                // Kontroll-Sensor bei Weiterfahrt (gerade)
        Kontroll_B_Ausfahrt : Bool := TRUE              // Kontroll-Sensor bei Ausfahrt (abzweig)
        Quell_Schaltung : Bool := FALSE                 // Weiche aufgrund der Quelle schalten (Hauptstrang = Gerade, FIFO = Abzweig)
        Disable_PLC_Ziel : Bool := FALSE                // Bei Zielvorgabe von PLC nicht anfahren (Disabled)
        Para06 : Bool := FALSE
        Para07 : Bool := FALSE
        Weichen_GST_gerade : Bool := TRUE               // Weiche wird ohne Daten auf gerade geschaltet
        Weichen_GST_abzweig : Bool := FALSE             // Weiche wird ohne Daten auf abzweig geschaltet
        IDX_an_Puffer : Bool := TRUE                    // IDX an Ziel-Puffer senden
        Para13 : Bool := FALSE
        Para14 : Bool := FALSE
        Para15 : Bool := FALSE
        Para16 : Bool := FALSE
        PC_Komm_aktiv : Bool := TRUE                    // PC-Kommunikation aktiv
      LeerZiel : Int := 0                               // Nach Entladen des BT/MT dieses Ziel übergeben
      PC_Send_FIFO : Int := 0                           // Send-FIFO für PC-Sndungen
      Hauptstrang_DL_DB : Int := 1481                   // Hauptstrang-Datenlisten-DB
      Hauptstrang_DL_DW : Int := 0                      // Hauptstrang-Datenlisten-DW
      Off_Ink : DInt := 303                             // Inkremente zum Weiche schalten
      Ink_DB : Int := 1483                              // DB-Nr des Inkremental-Geber
      Position_minus : Int := 11                        // Position vorher (zwecks Datensuche)
      AbzweigZiel : Int := 112                          // Bei diesem Ziel Weiche auf Abzweig schalten + Carl
      GeradeZiel : Int := 0                             // Bei diesem Ziel Weiche auf Gerade schalten + Carl
      Kontroll_Zeit_gerade : Int := 150                 // Nach dieser Zeit muss BM bei Geradefahrt Weichenbereich verlassen haben [100ms]
      Kontroll_Zeit_abzweigen : Int := 100              // Nach dieser Zeit muss BM bei Abzweigen Weichenbereich verlassen haben [100ms]
      DraussenZeit_gerade : Int := -300                 // Nach dieser neg. Zeit [100ms] Error undef.BM, falls Kontroll-Sensor aktiv
      Ink_Schaltdauer : Int := 300                      // Inkremente, danach wird Weiche in GST geschaltet
      Frei38 : Int := 0
    Weiche_VP13 : Struct
      Weichen_Nr : Int := 13                            // Nummer der Weiche
      Weichen_Dyn_DB : Int := 1423                      // Dynamische Daten Weiche
      Weichen_Dyn_DW : Int := 2700                      // Dynamische Daten Weiche
      Weichen_Typ : Int := 178                          // Weichen-Typ = 178 (Weiche)
      Parameter : Struct
        Letzte_Weiche : Bool := FALSE                   // Letzte Weiche im Verbund
        Entlade_Weiche : Bool := FALSE                  // BT/MT wird entladen -> Leerziel übergeben
        Kontroll_B_Gerade : Bool := FALSE               // Kontroll-Sensor bei Weiterfahrt (gerade)
        Kontroll_B_Ausfahrt : Bool := TRUE              // Kontroll-Sensor bei Ausfahrt (abzweig)
        Quell_Schaltung : Bool := FALSE                 // Weiche aufgrund der Quelle schalten (Hauptstrang = Gerade, FIFO = Abzweig)
        Disable_PLC_Ziel : Bool := FALSE                // Bei Zielvorgabe von PLC nicht anfahren (Disabled)
        Para06 : Bool := FALSE
        Para07 : Bool := FALSE
        Weichen_GST_gerade : Bool := TRUE               // Weiche wird ohne Daten auf gerade geschaltet
        Weichen_GST_abzweig : Bool := FALSE             // Weiche wird ohne Daten auf abzweig geschaltet
        IDX_an_Puffer : Bool := TRUE                    // IDX an Ziel-Puffer senden
        Para13 : Bool := FALSE
        Para14 : Bool := FALSE
        Para15 : Bool := FALSE
        Para16 : Bool := FALSE
        PC_Komm_aktiv : Bool := TRUE                    // PC-Kommunikation aktiv
      LeerZiel : Int := 0                               // Nach Entladen des BT/MT dieses Ziel übergeben
      PC_Send_FIFO : Int := 0                           // Send-FIFO für PC-Sndungen
      Hauptstrang_DL_DB : Int := 1481                   // Hauptstrang-Datenlisten-DB
      Hauptstrang_DL_DW : Int := 0                      // Hauptstrang-Datenlisten-DW
      Off_Ink : DInt := 366                             // Inkremente zum Weiche schalten
      Ink_DB : Int := 1483                              // DB-Nr des Inkremental-Geber
      Position_minus : Int := 12                        // Position vorher (zwecks Datensuche)
      AbzweigZiel : Int := 113                          // Bei diesem Ziel Weiche auf Abzweig schalten + Carl
      GeradeZiel : Int := 0                             // Bei diesem Ziel Weiche auf Gerade schalten + Carl
      Kontroll_Zeit_gerade : Int := 0                   // Nach dieser Zeit muss BM bei Geradefahrt Weichenbereich verlassen haben [100ms]
      Kontroll_Zeit_abzweigen : Int := 100              // Nach dieser Zeit muss BM bei Abzweigen Weichenbereich verlassen haben [100ms]
      DraussenZeit_gerade : Int := 0                    // Nach dieser neg. Zeit [100ms] Error undef.BM, falls Kontroll-Sensor aktiv
      Ink_Schaltdauer : Int := 300                      // Inkremente, danach wird Weiche in GST geschaltet
      Frei38 : Int := 0
    Weiche_VP14 : Struct
      Weichen_Nr : Int := 14                            // Nummer der Weiche
      Weichen_Dyn_DB : Int := 1423                      // Dynamische Daten Weiche
      Weichen_Dyn_DW : Int := 2900                      // Dynamische Daten Weiche
      Weichen_Typ : Int := 178                          // Weichen-Typ = 178 (Weiche)
      Parameter : Struct
        Letzte_Weiche : Bool := FALSE                   // Letzte Weiche im Verbund
        Entlade_Weiche : Bool := FALSE                  // BT/MT wird entladen -> Leerziel übergeben
        Kontroll_B_Gerade : Bool := FALSE               // Kontroll-Sensor bei Weiterfahrt (gerade)
        Kontroll_B_Ausfahrt : Bool := TRUE              // Kontroll-Sensor bei Ausfahrt (abzweig)
        Quell_Schaltung : Bool := FALSE                 // Weiche aufgrund der Quelle schalten (Hauptstrang = Gerade, FIFO = Abzweig)
        Disable_PLC_Ziel : Bool := FALSE                // Bei Zielvorgabe von PLC nicht anfahren (Disabled)
        Para06 : Bool := FALSE
        Para07 : Bool := FALSE
        Weichen_GST_gerade : Bool := TRUE               // Weiche wird ohne Daten auf gerade geschaltet
        Weichen_GST_abzweig : Bool := FALSE             // Weiche wird ohne Daten auf abzweig geschaltet
        IDX_an_Puffer : Bool := TRUE                    // IDX an Ziel-Puffer senden
        Para13 : Bool := FALSE
        Para14 : Bool := FALSE
        Para15 : Bool := FALSE
        Para16 : Bool := FALSE
        PC_Komm_aktiv : Bool := TRUE                    // PC-Kommunikation aktiv
      LeerZiel : Int := 0                               // Nach Entladen des BT/MT dieses Ziel übergeben
      PC_Send_FIFO : Int := 0                           // Send-FIFO für PC-Sndungen
      Hauptstrang_DL_DB : Int := 1481                   // Hauptstrang-Datenlisten-DB
      Hauptstrang_DL_DW : Int := 0                      // Hauptstrang-Datenlisten-DW
      Off_Ink : DInt := 393                             // Inkremente zum Weiche schalten
      Ink_DB : Int := 1483                              // DB-Nr des Inkremental-Geber
      Position_minus : Int := 13                        // Position vorher (zwecks Datensuche)
      AbzweigZiel : Int := 114                          // Bei diesem Ziel Weiche auf Abzweig schalten + Carl
      GeradeZiel : Int := 0                             // Bei diesem Ziel Weiche auf Gerade schalten + Carl
      Kontroll_Zeit_gerade : Int := 0                   // Nach dieser Zeit muss BM bei Geradefahrt Weichenbereich verlassen haben [100ms]
      Kontroll_Zeit_abzweigen : Int := 100              // Nach dieser Zeit muss BM bei Abzweigen Weichenbereich verlassen haben [100ms]
      DraussenZeit_gerade : Int := 0                    // Nach dieser neg. Zeit [100ms] Error undef.BM, falls Kontroll-Sensor aktiv
      Ink_Schaltdauer : Int := 300                      // Inkremente, danach wird Weiche in GST geschaltet
      Frei38 : Int := 0
    Weiche_VP15 : Struct
      Weichen_Nr : Int := 15                            // Nummer der Weiche
      Weichen_Dyn_DB : Int := 1423                      // Dynamische Daten Weiche
      Weichen_Dyn_DW : Int := 3100                      // Dynamische Daten Weiche
      Weichen_Typ : Int := 178                          // Weichen-Typ = 178 (Weiche)
      Parameter : Struct
        Letzte_Weiche : Bool := FALSE                   // Letzte Weiche im Verbund
        Entlade_Weiche : Bool := FALSE                  // BT/MT wird entladen -> Leerziel übergeben
        Kontroll_B_Gerade : Bool := FALSE               // Kontroll-Sensor bei Weiterfahrt (gerade)
        Kontroll_B_Ausfahrt : Bool := TRUE              // Kontroll-Sensor bei Ausfahrt (abzweig)
        Quell_Schaltung : Bool := FALSE                 // Weiche aufgrund der Quelle schalten (Hauptstrang = Gerade, FIFO = Abzweig)
        Disable_PLC_Ziel : Bool := FALSE                // Bei Zielvorgabe von PLC nicht anfahren (Disabled)
        Para06 : Bool := FALSE
        Para07 : Bool := FALSE
        Weichen_GST_gerade : Bool := TRUE               // Weiche wird ohne Daten auf gerade geschaltet
        Weichen_GST_abzweig : Bool := FALSE             // Weiche wird ohne Daten auf abzweig geschaltet
        IDX_an_Puffer : Bool := TRUE                    // IDX an Ziel-Puffer senden
        Para13 : Bool := FALSE
        Para14 : Bool := FALSE
        Para15 : Bool := FALSE
        Para16 : Bool := FALSE
        PC_Komm_aktiv : Bool := TRUE                    // PC-Kommunikation aktiv
      LeerZiel : Int := 0                               // Nach Entladen des BT/MT dieses Ziel übergeben
      PC_Send_FIFO : Int := 0                           // Send-FIFO für PC-Sndungen
      Hauptstrang_DL_DB : Int := 1481                   // Hauptstrang-Datenlisten-DB
      Hauptstrang_DL_DW : Int := 0                      // Hauptstrang-Datenlisten-DW
      Off_Ink : DInt := 415                             // Inkremente zum Weiche schalten
      Ink_DB : Int := 1483                              // DB-Nr des Inkremental-Geber
      Position_minus : Int := 14                        // Position vorher (zwecks Datensuche)
      AbzweigZiel : Int := 115                          // Bei diesem Ziel Weiche auf Abzweig schalten + Carl
      GeradeZiel : Int := 0                             // Bei diesem Ziel Weiche auf Gerade schalten + Carl
      Kontroll_Zeit_gerade : Int := 0                   // Nach dieser Zeit muss BM bei Geradefahrt Weichenbereich verlassen haben [100ms]
      Kontroll_Zeit_abzweigen : Int := 100              // Nach dieser Zeit muss BM bei Abzweigen Weichenbereich verlassen haben [100ms]
      DraussenZeit_gerade : Int := 0                    // Nach dieser neg. Zeit [100ms] Error undef.BM, falls Kontroll-Sensor aktiv
      Ink_Schaltdauer : Int := 300                      // Inkremente, danach wird Weiche in GST geschaltet
      Frei38 : Int := 0
    Weiche_VP16 : Struct
      Weichen_Nr : Int := 16                            // Nummer der Weiche
      Weichen_Dyn_DB : Int := 1423                      // Dynamische Daten Weiche
      Weichen_Dyn_DW : Int := 3300                      // Dynamische Daten Weiche
      Weichen_Typ : Int := 178                          // Weichen-Typ = 178 (Weiche)
      Parameter : Struct
        Letzte_Weiche : Bool := FALSE                   // Letzte Weiche im Verbund
        Entlade_Weiche : Bool := FALSE                  // BT/MT wird entladen -> Leerziel übergeben
        Kontroll_B_Gerade : Bool := FALSE               // Kontroll-Sensor bei Weiterfahrt (gerade)
        Kontroll_B_Ausfahrt : Bool := TRUE              // Kontroll-Sensor bei Ausfahrt (abzweig)
        Quell_Schaltung : Bool := FALSE                 // Weiche aufgrund der Quelle schalten (Hauptstrang = Gerade, FIFO = Abzweig)
        Disable_PLC_Ziel : Bool := FALSE                // Bei Zielvorgabe von PLC nicht anfahren (Disabled)
        Para06 : Bool := FALSE
        Para07 : Bool := FALSE
        Weichen_GST_gerade : Bool := TRUE               // Weiche wird ohne Daten auf gerade geschaltet
        Weichen_GST_abzweig : Bool := FALSE             // Weiche wird ohne Daten auf abzweig geschaltet
        IDX_an_Puffer : Bool := TRUE                    // IDX an Ziel-Puffer senden
        Para13 : Bool := FALSE
        Para14 : Bool := FALSE
        Para15 : Bool := FALSE
        Para16 : Bool := FALSE
        PC_Komm_aktiv : Bool := TRUE                    // PC-Kommunikation aktiv
      LeerZiel : Int := 0                               // Nach Entladen des BT/MT dieses Ziel übergeben
      PC_Send_FIFO : Int := 0                           // Send-FIFO für PC-Sndungen
      Hauptstrang_DL_DB : Int := 1481                   // Hauptstrang-Datenlisten-DB
      Hauptstrang_DL_DW : Int := 0                      // Hauptstrang-Datenlisten-DW
      Off_Ink : DInt := 439                             // Inkremente zum Weiche schalten
      Ink_DB : Int := 1483                              // DB-Nr des Inkremental-Geber
      Position_minus : Int := 15                        // Position vorher (zwecks Datensuche)
      AbzweigZiel : Int := 116                          // Bei diesem Ziel Weiche auf Abzweig schalten + Carl
      GeradeZiel : Int := 0                             // Bei diesem Ziel Weiche auf Gerade schalten + Carl
      Kontroll_Zeit_gerade : Int := 0                   // Nach dieser Zeit muss BM bei Geradefahrt Weichenbereich verlassen haben [100ms]
      Kontroll_Zeit_abzweigen : Int := 100              // Nach dieser Zeit muss BM bei Abzweigen Weichenbereich verlassen haben [100ms]
      DraussenZeit_gerade : Int := 0                    // Nach dieser neg. Zeit [100ms] Error undef.BM, falls Kontroll-Sensor aktiv
      Ink_Schaltdauer : Int := 300                      // Inkremente, danach wird Weiche in GST geschaltet
      Frei38 : Int := 0
    Weiche_VP17 : Struct
      Weichen_Nr : Int := 17                            // Nummer der Weiche
      Weichen_Dyn_DB : Int := 1423                      // Dynamische Daten Weiche
      Weichen_Dyn_DW : Int := 3500                      // Dynamische Daten Weiche
      Weichen_Typ : Int := 178                          // Weichen-Typ = 178 (Weiche)
      Parameter : Struct
        Letzte_Weiche : Bool := FALSE                   // Letzte Weiche im Verbund
        Entlade_Weiche : Bool := FALSE                  // BT/MT wird entladen -> Leerziel übergeben
        Kontroll_B_Gerade : Bool := FALSE               // Kontroll-Sensor bei Weiterfahrt (gerade)
        Kontroll_B_Ausfahrt : Bool := TRUE              // Kontroll-Sensor bei Ausfahrt (abzweig)
        Quell_Schaltung : Bool := FALSE                 // Weiche aufgrund der Quelle schalten (Hauptstrang = Gerade, FIFO = Abzweig)
        Disable_PLC_Ziel : Bool := FALSE                // Bei Zielvorgabe von PLC nicht anfahren (Disabled)
        Para06 : Bool := FALSE
        Para07 : Bool := FALSE
        Weichen_GST_gerade : Bool := TRUE               // Weiche wird ohne Daten auf gerade geschaltet
        Weichen_GST_abzweig : Bool := FALSE             // Weiche wird ohne Daten auf abzweig geschaltet
        IDX_an_Puffer : Bool := TRUE                    // IDX an Ziel-Puffer senden
        Para13 : Bool := FALSE
        Para14 : Bool := FALSE
        Para15 : Bool := FALSE
        Para16 : Bool := FALSE
        PC_Komm_aktiv : Bool := TRUE                    // PC-Kommunikation aktiv
      LeerZiel : Int := 0                               // Nach Entladen des BT/MT dieses Ziel übergeben
      PC_Send_FIFO : Int := 0                           // Send-FIFO für PC-Sndungen
      Hauptstrang_DL_DB : Int := 1481                   // Hauptstrang-Datenlisten-DB
      Hauptstrang_DL_DW : Int := 0                      // Hauptstrang-Datenlisten-DW
      Off_Ink : DInt := 461                             // Inkremente zum Weiche schalten
      Ink_DB : Int := 1483                              // DB-Nr des Inkremental-Geber
      Position_minus : Int := 16                        // Position vorher (zwecks Datensuche)
      AbzweigZiel : Int := 117                          // Bei diesem Ziel Weiche auf Abzweig schalten + Carl
      GeradeZiel : Int := 0                             // Bei diesem Ziel Weiche auf Gerade schalten + Carl
      Kontroll_Zeit_gerade : Int := 0                   // Nach dieser Zeit muss BM bei Geradefahrt Weichenbereich verlassen haben [100ms]
      Kontroll_Zeit_abzweigen : Int := 100              // Nach dieser Zeit muss BM bei Abzweigen Weichenbereich verlassen haben [100ms]
      DraussenZeit_gerade : Int := 0                    // Nach dieser neg. Zeit [100ms] Error undef.BM, falls Kontroll-Sensor aktiv
      Ink_Schaltdauer : Int := 300                      // Inkremente, danach wird Weiche in GST geschaltet
      Frei38 : Int := 0
    Weiche_VP18 : Struct
      Weichen_Nr : Int := 18                            // Nummer der Weiche
      Weichen_Dyn_DB : Int := 1423                      // Dynamische Daten Weiche
      Weichen_Dyn_DW : Int := 3700                      // Dynamische Daten Weiche
      Weichen_Typ : Int := 178                          // Weichen-Typ = 178 (Weiche)
      Parameter : Struct
        Letzte_Weiche : Bool := FALSE                   // Letzte Weiche im Verbund
        Entlade_Weiche : Bool := FALSE                  // BT/MT wird entladen -> Leerziel übergeben
        Kontroll_B_Gerade : Bool := TRUE                // Kontroll-Sensor bei Weiterfahrt (gerade)
        Kontroll_B_Ausfahrt : Bool := TRUE              // Kontroll-Sensor bei Ausfahrt (abzweig)
        Quell_Schaltung : Bool := FALSE                 // Weiche aufgrund der Quelle schalten (Hauptstrang = Gerade, FIFO = Abzweig)
        Disable_PLC_Ziel : Bool := FALSE                // Bei Zielvorgabe von PLC nicht anfahren (Disabled)
        Para06 : Bool := FALSE
        Para07 : Bool := FALSE
        Weichen_GST_gerade : Bool := TRUE               // Weiche wird ohne Daten auf gerade geschaltet
        Weichen_GST_abzweig : Bool := FALSE             // Weiche wird ohne Daten auf abzweig geschaltet
        IDX_an_Puffer : Bool := TRUE                    // IDX an Ziel-Puffer senden
        Para13 : Bool := FALSE
        Para14 : Bool := FALSE
        Para15 : Bool := FALSE
        Para16 : Bool := FALSE
        PC_Komm_aktiv : Bool := TRUE                    // PC-Kommunikation aktiv
      LeerZiel : Int := 0                               // Nach Entladen des BT/MT dieses Ziel übergeben
      PC_Send_FIFO : Int := 0                           // Send-FIFO für PC-Sndungen
      Hauptstrang_DL_DB : Int := 1481                   // Hauptstrang-Datenlisten-DB
      Hauptstrang_DL_DW : Int := 0                      // Hauptstrang-Datenlisten-DW
      Off_Ink : DInt := 483                             // Inkremente zum Weiche schalten
      Ink_DB : Int := 1483                              // DB-Nr des Inkremental-Geber
      Position_minus : Int := 17                        // Position vorher (zwecks Datensuche)
      AbzweigZiel : Int := 118                          // Bei diesem Ziel Weiche auf Abzweig schalten + Carl
      GeradeZiel : Int := 0                             // Bei diesem Ziel Weiche auf Gerade schalten + Carl
      Kontroll_Zeit_gerade : Int := 150                 // Nach dieser Zeit muss BM bei Geradefahrt Weichenbereich verlassen haben [100ms]
      Kontroll_Zeit_abzweigen : Int := 100              // Nach dieser Zeit muss BM bei Abzweigen Weichenbereich verlassen haben [100ms]
      DraussenZeit_gerade : Int := -300                 // Nach dieser neg. Zeit [100ms] Error undef.BM, falls Kontroll-Sensor aktiv
      Ink_Schaltdauer : Int := 300                      // Inkremente, danach wird Weiche in GST geschaltet
      Frei38 : Int := 0
    Weiche_VP19 : Struct
      Weichen_Nr : Int := 19                            // Nummer der Weiche
      Weichen_Dyn_DB : Int := 1423                      // Dynamische Daten Weiche
      Weichen_Dyn_DW : Int := 3900                      // Dynamische Daten Weiche
      Weichen_Typ : Int := 178                          // Weichen-Typ = 178 (Weiche)
      Parameter : Struct
        Letzte_Weiche : Bool := FALSE                   // Letzte Weiche im Verbund
        Entlade_Weiche : Bool := FALSE                  // BT/MT wird entladen -> Leerziel übergeben
        Kontroll_B_Gerade : Bool := FALSE               // Kontroll-Sensor bei Weiterfahrt (gerade)
        Kontroll_B_Ausfahrt : Bool := TRUE              // Kontroll-Sensor bei Ausfahrt (abzweig)
        Quell_Schaltung : Bool := FALSE                 // Weiche aufgrund der Quelle schalten (Hauptstrang = Gerade, FIFO = Abzweig)
        Disable_PLC_Ziel : Bool := FALSE                // Bei Zielvorgabe von PLC nicht anfahren (Disabled)
        Para06 : Bool := FALSE
        Para07 : Bool := FALSE
        Weichen_GST_gerade : Bool := TRUE               // Weiche wird ohne Daten auf gerade geschaltet
        Weichen_GST_abzweig : Bool := FALSE             // Weiche wird ohne Daten auf abzweig geschaltet
        IDX_an_Puffer : Bool := TRUE                    // IDX an Ziel-Puffer senden
        Para13 : Bool := FALSE
        Para14 : Bool := FALSE
        Para15 : Bool := FALSE
        Para16 : Bool := FALSE
        PC_Komm_aktiv : Bool := TRUE                    // PC-Kommunikation aktiv
      LeerZiel : Int := 0                               // Nach Entladen des BT/MT dieses Ziel übergeben
      PC_Send_FIFO : Int := 0                           // Send-FIFO für PC-Sndungen
      Hauptstrang_DL_DB : Int := 1481                   // Hauptstrang-Datenlisten-DB
      Hauptstrang_DL_DW : Int := 0                      // Hauptstrang-Datenlisten-DW
      Off_Ink : DInt := 519                             // Inkremente zum Weiche schalten
      Ink_DB : Int := 1483                              // DB-Nr des Inkremental-Geber
      Position_minus : Int := 18                        // Position vorher (zwecks Datensuche)
      AbzweigZiel : Int := 119                          // Bei diesem Ziel Weiche auf Abzweig schalten + Carl
      GeradeZiel : Int := 0                             // Bei diesem Ziel Weiche auf Gerade schalten + Carl
      Kontroll_Zeit_gerade : Int := 0                   // Nach dieser Zeit muss BM bei Geradefahrt Weichenbereich verlassen haben [100ms]
      Kontroll_Zeit_abzweigen : Int := 100              // Nach dieser Zeit muss BM bei Abzweigen Weichenbereich verlassen haben [100ms]
      DraussenZeit_gerade : Int := 0                    // Nach dieser neg. Zeit [100ms] Error undef.BM, falls Kontroll-Sensor aktiv
      Ink_Schaltdauer : Int := 300                      // Inkremente, danach wird Weiche in GST geschaltet
      Frei38 : Int := 0
    Weiche_VP20 : Struct
      Weichen_Nr : Int := 20                            // Nummer der Weiche
      Weichen_Dyn_DB : Int := 1423                      // Dynamische Daten Weiche
      Weichen_Dyn_DW : Int := 4100                      // Dynamische Daten Weiche
      Weichen_Typ : Int := 178                          // Weichen-Typ = 178 (Weiche)
      Parameter : Struct
        Letzte_Weiche : Bool := FALSE                   // Letzte Weiche im Verbund
        Entlade_Weiche : Bool := FALSE                  // BT/MT wird entladen -> Leerziel übergeben
        Kontroll_B_Gerade : Bool := FALSE               // Kontroll-Sensor bei Weiterfahrt (gerade)
        Kontroll_B_Ausfahrt : Bool := TRUE              // Kontroll-Sensor bei Ausfahrt (abzweig)
        Quell_Schaltung : Bool := FALSE                 // Weiche aufgrund der Quelle schalten (Hauptstrang = Gerade, FIFO = Abzweig)
        Disable_PLC_Ziel : Bool := FALSE                // Bei Zielvorgabe von PLC nicht anfahren (Disabled)
        Para06 : Bool := FALSE
        Para07 : Bool := FALSE
        Weichen_GST_gerade : Bool := TRUE               // Weiche wird ohne Daten auf gerade geschaltet
        Weichen_GST_abzweig : Bool := FALSE             // Weiche wird ohne Daten auf abzweig geschaltet
        IDX_an_Puffer : Bool := TRUE                    // IDX an Ziel-Puffer senden
        Para13 : Bool := FALSE
        Para14 : Bool := FALSE
        Para15 : Bool := FALSE
        Para16 : Bool := FALSE
        PC_Komm_aktiv : Bool := TRUE                    // PC-Kommunikation aktiv
      LeerZiel : Int := 0                               // Nach Entladen des BT/MT dieses Ziel übergeben
      PC_Send_FIFO : Int := 0                           // Send-FIFO für PC-Sndungen
      Hauptstrang_DL_DB : Int := 1481                   // Hauptstrang-Datenlisten-DB
      Hauptstrang_DL_DW : Int := 0                      // Hauptstrang-Datenlisten-DW
      Off_Ink : DInt := 545                             // Inkremente zum Weiche schalten
      Ink_DB : Int := 1483                              // DB-Nr des Inkremental-Geber
      Position_minus : Int := 19                        // Position vorher (zwecks Datensuche)
      AbzweigZiel : Int := 120                          // Bei diesem Ziel Weiche auf Abzweig schalten + Carl
      GeradeZiel : Int := 0                             // Bei diesem Ziel Weiche auf Gerade schalten + Carl
      Kontroll_Zeit_gerade : Int := 0                   // Nach dieser Zeit muss BM bei Geradefahrt Weichenbereich verlassen haben [100ms]
      Kontroll_Zeit_abzweigen : Int := 100              // Nach dieser Zeit muss BM bei Abzweigen Weichenbereich verlassen haben [100ms]
      DraussenZeit_gerade : Int := 0                    // Nach dieser neg. Zeit [100ms] Error undef.BM, falls Kontroll-Sensor aktiv
      Ink_Schaltdauer : Int := 300                      // Inkremente, danach wird Weiche in GST geschaltet
      Frei38 : Int := 0
    Weiche_VP21 : Struct
      Weichen_Nr : Int := 21                            // Nummer der Weiche
      Weichen_Dyn_DB : Int := 1423                      // Dynamische Daten Weiche
      Weichen_Dyn_DW : Int := 4300                      // Dynamische Daten Weiche
      Weichen_Typ : Int := 178                          // Weichen-Typ = 178 (Weiche)
      Parameter : Struct
        Letzte_Weiche : Bool := FALSE                   // Letzte Weiche im Verbund
        Entlade_Weiche : Bool := FALSE                  // BT/MT wird entladen -> Leerziel übergeben
        Kontroll_B_Gerade : Bool := FALSE               // Kontroll-Sensor bei Weiterfahrt (gerade)
        Kontroll_B_Ausfahrt : Bool := TRUE              // Kontroll-Sensor bei Ausfahrt (abzweig)
        Quell_Schaltung : Bool := FALSE                 // Weiche aufgrund der Quelle schalten (Hauptstrang = Gerade, FIFO = Abzweig)
        Disable_PLC_Ziel : Bool := FALSE                // Bei Zielvorgabe von PLC nicht anfahren (Disabled)
        Para06 : Bool := FALSE
        Para07 : Bool := FALSE
        Weichen_GST_gerade : Bool := TRUE               // Weiche wird ohne Daten auf gerade geschaltet
        Weichen_GST_abzweig : Bool := FALSE             // Weiche wird ohne Daten auf abzweig geschaltet
        IDX_an_Puffer : Bool := TRUE                    // IDX an Ziel-Puffer senden
        Para13 : Bool := FALSE
        Para14 : Bool := FALSE
        Para15 : Bool := FALSE
        Para16 : Bool := FALSE
        PC_Komm_aktiv : Bool := TRUE                    // PC-Kommunikation aktiv
      LeerZiel : Int := 0                               // Nach Entladen des BT/MT dieses Ziel übergeben
      PC_Send_FIFO : Int := 0                           // Send-FIFO für PC-Sndungen
      Hauptstrang_DL_DB : Int := 1481                   // Hauptstrang-Datenlisten-DB
      Hauptstrang_DL_DW : Int := 0                      // Hauptstrang-Datenlisten-DW
      Off_Ink : DInt := 567                             // Inkremente zum Weiche schalten
      Ink_DB : Int := 1483                              // DB-Nr des Inkremental-Geber
      Position_minus : Int := 20                        // Position vorher (zwecks Datensuche)
      AbzweigZiel : Int := 121                          // Bei diesem Ziel Weiche auf Abzweig schalten + Carl
      GeradeZiel : Int := 0                             // Bei diesem Ziel Weiche auf Gerade schalten + Carl
      Kontroll_Zeit_gerade : Int := 0                   // Nach dieser Zeit muss BM bei Geradefahrt Weichenbereich verlassen haben [100ms]
      Kontroll_Zeit_abzweigen : Int := 100              // Nach dieser Zeit muss BM bei Abzweigen Weichenbereich verlassen haben [100ms]
      DraussenZeit_gerade : Int := 0                    // Nach dieser neg. Zeit [100ms] Error undef.BM, falls Kontroll-Sensor aktiv
      Ink_Schaltdauer : Int := 300                      // Inkremente, danach wird Weiche in GST geschaltet
      Frei38 : Int := 0
    Weiche_VP22 : Struct
      Weichen_Nr : Int := 22                            // Nummer der Weiche
      Weichen_Dyn_DB : Int := 1423                      // Dynamische Daten Weiche
      Weichen_Dyn_DW : Int := 4500                      // Dynamische Daten Weiche
      Weichen_Typ : Int := 178                          // Weichen-Typ = 178 (Weiche)
      Parameter : Struct
        Letzte_Weiche : Bool := FALSE                   // Letzte Weiche im Verbund
        Entlade_Weiche : Bool := FALSE                  // BT/MT wird entladen -> Leerziel übergeben
        Kontroll_B_Gerade : Bool := FALSE               // Kontroll-Sensor bei Weiterfahrt (gerade)
        Kontroll_B_Ausfahrt : Bool := TRUE              // Kontroll-Sensor bei Ausfahrt (abzweig)
        Quell_Schaltung : Bool := FALSE                 // Weiche aufgrund der Quelle schalten (Hauptstrang = Gerade, FIFO = Abzweig)
        Disable_PLC_Ziel : Bool := FALSE                // Bei Zielvorgabe von PLC nicht anfahren (Disabled)
        Para06 : Bool := FALSE
        Para07 : Bool := FALSE
        Weichen_GST_gerade : Bool := TRUE               // Weiche wird ohne Daten auf gerade geschaltet
        Weichen_GST_abzweig : Bool := FALSE             // Weiche wird ohne Daten auf abzweig geschaltet
        IDX_an_Puffer : Bool := TRUE                    // IDX an Ziel-Puffer senden
        Para13 : Bool := FALSE
        Para14 : Bool := FALSE
        Para15 : Bool := FALSE
        Para16 : Bool := FALSE
        PC_Komm_aktiv : Bool := TRUE                    // PC-Kommunikation aktiv
      LeerZiel : Int := 0                               // Nach Entladen des BT/MT dieses Ziel übergeben
      PC_Send_FIFO : Int := 0                           // Send-FIFO für PC-Sndungen
      Hauptstrang_DL_DB : Int := 1481                   // Hauptstrang-Datenlisten-DB
      Hauptstrang_DL_DW : Int := 0                      // Hauptstrang-Datenlisten-DW
      Off_Ink : DInt := 590                             // Inkremente zum Weiche schalten
      Ink_DB : Int := 1483                              // DB-Nr des Inkremental-Geber
      Position_minus : Int := 21                        // Position vorher (zwecks Datensuche)
      AbzweigZiel : Int := 122                          // Bei diesem Ziel Weiche auf Abzweig schalten + Carl
      GeradeZiel : Int := 0                             // Bei diesem Ziel Weiche auf Gerade schalten + Carl
      Kontroll_Zeit_gerade : Int := 0                   // Nach dieser Zeit muss BM bei Geradefahrt Weichenbereich verlassen haben [100ms]
      Kontroll_Zeit_abzweigen : Int := 100              // Nach dieser Zeit muss BM bei Abzweigen Weichenbereich verlassen haben [100ms]
      DraussenZeit_gerade : Int := 0                    // Nach dieser neg. Zeit [100ms] Error undef.BM, falls Kontroll-Sensor aktiv
      Ink_Schaltdauer : Int := 300                      // Inkremente, danach wird Weiche in GST geschaltet
      Frei38 : Int := 0
    Weiche_VP23 : Struct
      Weichen_Nr : Int := 23                            // Nummer der Weiche
      Weichen_Dyn_DB : Int := 1423                      // Dynamische Daten Weiche
      Weichen_Dyn_DW : Int := 4700                      // Dynamische Daten Weiche
      Weichen_Typ : Int := 178                          // Weichen-Typ = 178 (Weiche)
      Parameter : Struct
        Letzte_Weiche : Bool := FALSE                   // Letzte Weiche im Verbund
        Entlade_Weiche : Bool := FALSE                  // BT/MT wird entladen -> Leerziel übergeben
        Kontroll_B_Gerade : Bool := FALSE               // Kontroll-Sensor bei Weiterfahrt (gerade)
        Kontroll_B_Ausfahrt : Bool := TRUE              // Kontroll-Sensor bei Ausfahrt (abzweig)
        Quell_Schaltung : Bool := FALSE                 // Weiche aufgrund der Quelle schalten (Hauptstrang = Gerade, FIFO = Abzweig)
        Disable_PLC_Ziel : Bool := FALSE                // Bei Zielvorgabe von PLC nicht anfahren (Disabled)
        Para06 : Bool := FALSE
        Para07 : Bool := FALSE
        Weichen_GST_gerade : Bool := TRUE               // Weiche wird ohne Daten auf gerade geschaltet
        Weichen_GST_abzweig : Bool := FALSE             // Weiche wird ohne Daten auf abzweig geschaltet
        IDX_an_Puffer : Bool := TRUE                    // IDX an Ziel-Puffer senden
        Para13 : Bool := FALSE
        Para14 : Bool := FALSE
        Para15 : Bool := FALSE
        Para16 : Bool := FALSE
        PC_Komm_aktiv : Bool := TRUE                    // PC-Kommunikation aktiv
      LeerZiel : Int := 0                               // Nach Entladen des BT/MT dieses Ziel übergeben
      PC_Send_FIFO : Int := 0                           // Send-FIFO für PC-Sndungen
      Hauptstrang_DL_DB : Int := 1481                   // Hauptstrang-Datenlisten-DB
      Hauptstrang_DL_DW : Int := 0                      // Hauptstrang-Datenlisten-DW
      Off_Ink : DInt := 613                             // Inkremente zum Weiche schalten
      Ink_DB : Int := 1483                              // DB-Nr des Inkremental-Geber
      Position_minus : Int := 22                        // Position vorher (zwecks Datensuche)
      AbzweigZiel : Int := 123                          // Bei diesem Ziel Weiche auf Abzweig schalten + Carl
      GeradeZiel : Int := 0                             // Bei diesem Ziel Weiche auf Gerade schalten + Carl
      Kontroll_Zeit_gerade : Int := 0                   // Nach dieser Zeit muss BM bei Geradefahrt Weichenbereich verlassen haben [100ms]
      Kontroll_Zeit_abzweigen : Int := 100              // Nach dieser Zeit muss BM bei Abzweigen Weichenbereich verlassen haben [100ms]
      DraussenZeit_gerade : Int := 0                    // Nach dieser neg. Zeit [100ms] Error undef.BM, falls Kontroll-Sensor aktiv
      Ink_Schaltdauer : Int := 300                      // Inkremente, danach wird Weiche in GST geschaltet
      Frei38 : Int := 0
    Weiche_VP24 : Struct
      Weichen_Nr : Int := 24                            // Nummer der Weiche
      Weichen_Dyn_DB : Int := 1423                      // Dynamische Daten Weiche
      Weichen_Dyn_DW : Int := 4900                      // Dynamische Daten Weiche
      Weichen_Typ : Int := 178                          // Weichen-Typ = 178 (Weiche)
      Parameter : Struct
        Letzte_Weiche : Bool := FALSE                   // Letzte Weiche im Verbund
        Entlade_Weiche : Bool := FALSE                  // BT/MT wird entladen -> Leerziel übergeben
        Kontroll_B_Gerade : Bool := FALSE               // Kontroll-Sensor bei Weiterfahrt (gerade)
        Kontroll_B_Ausfahrt : Bool := TRUE              // Kontroll-Sensor bei Ausfahrt (abzweig)
        Quell_Schaltung : Bool := FALSE                 // Weiche aufgrund der Quelle schalten (Hauptstrang = Gerade, FIFO = Abzweig)
        Disable_PLC_Ziel : Bool := FALSE                // Bei Zielvorgabe von PLC nicht anfahren (Disabled)
        Para06 : Bool := FALSE
        Para07 : Bool := FALSE
        Weichen_GST_gerade : Bool := TRUE               // Weiche wird ohne Daten auf gerade geschaltet
        Weichen_GST_abzweig : Bool := FALSE             // Weiche wird ohne Daten auf abzweig geschaltet
        IDX_an_Puffer : Bool := TRUE                    // IDX an Ziel-Puffer senden
        Para13 : Bool := FALSE
        Para14 : Bool := FALSE
        Para15 : Bool := FALSE
        Para16 : Bool := FALSE
        PC_Komm_aktiv : Bool := TRUE                    // PC-Kommunikation aktiv
      LeerZiel : Int := 0                               // Nach Entladen des BT/MT dieses Ziel übergeben
      PC_Send_FIFO : Int := 0                           // Send-FIFO für PC-Sndungen
      Hauptstrang_DL_DB : Int := 1481                   // Hauptstrang-Datenlisten-DB
      Hauptstrang_DL_DW : Int := 0                      // Hauptstrang-Datenlisten-DW
      Off_Ink : DInt := 638                             // Inkremente zum Weiche schalten
      Ink_DB : Int := 1483                              // DB-Nr des Inkremental-Geber
      Position_minus : Int := 23                        // Position vorher (zwecks Datensuche)
      AbzweigZiel : Int := 124                          // Bei diesem Ziel Weiche auf Abzweig schalten + Carl
      GeradeZiel : Int := 0                             // Bei diesem Ziel Weiche auf Gerade schalten + Carl
      Kontroll_Zeit_gerade : Int := 0                   // Nach dieser Zeit muss BM bei Geradefahrt Weichenbereich verlassen haben [100ms]
      Kontroll_Zeit_abzweigen : Int := 100              // Nach dieser Zeit muss BM bei Abzweigen Weichenbereich verlassen haben [100ms]
      DraussenZeit_gerade : Int := 0                    // Nach dieser neg. Zeit [100ms] Error undef.BM, falls Kontroll-Sensor aktiv
      Ink_Schaltdauer : Int := 300                      // Inkremente, danach wird Weiche in GST geschaltet
      Frei38 : Int := 0
    Weiche_VP25 : Struct
      Weichen_Nr : Int := 25                            // Nummer der Weiche
      Weichen_Dyn_DB : Int := 1423                      // Dynamische Daten Weiche
      Weichen_Dyn_DW : Int := 5100                      // Dynamische Daten Weiche
      Weichen_Typ : Int := 178                          // Weichen-Typ = 178 (Weiche)
      Parameter : Struct
        Letzte_Weiche : Bool := FALSE                   // Letzte Weiche im Verbund
        Entlade_Weiche : Bool := FALSE                  // BT/MT wird entladen -> Leerziel übergeben
        Kontroll_B_Gerade : Bool := TRUE                // Kontroll-Sensor bei Weiterfahrt (gerade)
        Kontroll_B_Ausfahrt : Bool := TRUE              // Kontroll-Sensor bei Ausfahrt (abzweig)
        Quell_Schaltung : Bool := FALSE                 // Weiche aufgrund der Quelle schalten (Hauptstrang = Gerade, FIFO = Abzweig)
        Disable_PLC_Ziel : Bool := FALSE                // Bei Zielvorgabe von PLC nicht anfahren (Disabled)
        Para06 : Bool := FALSE
        Para07 : Bool := FALSE
        Weichen_GST_gerade : Bool := TRUE               // Weiche wird ohne Daten auf gerade geschaltet
        Weichen_GST_abzweig : Bool := FALSE             // Weiche wird ohne Daten auf abzweig geschaltet
        IDX_an_Puffer : Bool := TRUE                    // IDX an Ziel-Puffer senden
        Para13 : Bool := FALSE
        Para14 : Bool := FALSE
        Para15 : Bool := FALSE
        Para16 : Bool := FALSE
        PC_Komm_aktiv : Bool := TRUE                    // PC-Kommunikation aktiv
      LeerZiel : Int := 0                               // Nach Entladen des BT/MT dieses Ziel übergeben
      PC_Send_FIFO : Int := 0                           // Send-FIFO für PC-Sndungen
      Hauptstrang_DL_DB : Int := 1481                   // Hauptstrang-Datenlisten-DB
      Hauptstrang_DL_DW : Int := 0                      // Hauptstrang-Datenlisten-DW
      Off_Ink : DInt := 660                             // Inkremente zum Weiche schalten
      Ink_DB : Int := 1483                              // DB-Nr des Inkremental-Geber
      Position_minus : Int := 24                        // Position vorher (zwecks Datensuche)
      AbzweigZiel : Int := 125                          // Bei diesem Ziel Weiche auf Abzweig schalten + Carl
      GeradeZiel : Int := 0                             // Bei diesem Ziel Weiche auf Gerade schalten + Carl
      Kontroll_Zeit_gerade : Int := 600                 // Nach dieser Zeit muss BM bei Geradefahrt Weichenbereich verlassen haben [100ms]
      Kontroll_Zeit_abzweigen : Int := 100              // Nach dieser Zeit muss BM bei Abzweigen Weichenbereich verlassen haben [100ms]
      DraussenZeit_gerade : Int := 150                  // Nach dieser neg. Zeit [100ms] Error undef.BM, falls Kontroll-Sensor aktiv
      Ink_Schaltdauer : Int := 300                      // Inkremente, danach wird Weiche in GST geschaltet
      Frei38 : Int := -300
    Übergabe_B3003 : Struct
      Uebergabe_Nr : Int := 3003                        // Nummer der Übergabestelle
      Uebergabe_Dyn_DB : Int := 1423                    // Dynamische Daten Übergabe
      Uebergabe_Dyn_DW : Int := 5300                    // Dynamische Daten Übergabe
      Uebergabe_Typ : Int := 180                        // Uebergabe-Typ (180 = Übergabe an Travel-FIFO)
      Parameter : Struct
        Para00 : Bool := FALSE
        Para01 : Bool := FALSE
        Para02 : Bool := FALSE
        Para03 : Bool := FALSE
        Para04 : Bool := FALSE
        Para05 : Bool := FALSE
        Para06 : Bool := FALSE
        Para07 : Bool := FALSE
        Para10 : Bool := FALSE
        Para11 : Bool := FALSE
        Para12 : Bool := FALSE
        Para13 : Bool := FALSE
        Para14 : Bool := FALSE
        Para15 : Bool := FALSE
        Para16 : Bool := FALSE
        Para17 : Bool := FALSE
      Frei10 : Int := 0
      PC_Send_FIFO : Int := 0                           // Send-FIFO für PC-Sendungen
      Hauptstrang_DL_DB : Int := 1481                   // Hauptstrang-Datenlisten-DB
      Hauptstrang_DL_DW : Int := 0                      // Hauptstrang-Datenlisten-DW
      Off_Ink : DInt := 675                             // Inkremente zum Weiche schalten
      Ink_DB : Int := 1483                              // DB-Nr des Inkremental-Geber
      Travel_FIFO_DB_plus : Int := 1580                 // Travel-FIFO-DB +1
      Travel_FIFO_DW_plus : Int := 0                    // Travel-FIFO-DW +1
      Position_minus : Int := 25                        // Position vorher (zwecks Datensuche)
      Frei40 : Array[0..4] of Int                       // Entprellung Uebergabe-Sensor (in Inkremente)
    Endekennung : Word := 16#DAEE                       // Datensort-Ende-Kennung (DBEE)
