TTFIL zsz_citys.ttt

   1  # { [ (
   2
   3  {FILELEVEL=1?
   4    $SPOOL N=CITMODE; SEQ=C;
   5      AB=25;                                                                                              \
   6        BL=20; VAR=BGTYPE=3,BGUP=83; DIS=20; ST=1;
   7    $ENDPOOL
   8
   9    $OPTGDEF 1
  10    $BGCOLOR #000000
  11    $VAR BGTYPE=3,BGUP=83;
  12    $ABOVE 25
  13    $ST 0.5
  14    ?;                                                                                                    \
  15
  16    $REQUIRE GETOPT.TTT
  17    $CSET CY5 0
  18    $CSET CY4 0
  19    $CSET CY2 0
  20    $CSET CY0 0
  21  }
  22   
  23  $REQUIRE ZSZ_DEF.TTT
  24  $REQUIRE BG_DEF.TTT
  25  $REQUIRE FIXTRAIN.TTT
  26
  27  #--------------------------------------------------------------------------
  28  # Hungary:  Budapest, Debrecen, Miskolc, Szeged
  29  # Germany:  Berlin, Dresden, Dortmund, Duisburg, Düsseldorf, Essen, Frankfurt/Main,
  30  #           Freiburg, Halle, Hamburg, Hannover, Karlsruhe, Köln, Leipzig, Mülheim/Ruhr
  31  #           München, Nordhausen, Passau, Reutlingen, Rhein-Neckar, Solingen
  32  #           Stuttgart, Wuppertal
  33  # Swiss:    Basel, Zürich
  34  # Austria:  Wien
  35  # UK:       London
  36  # France:   Paris
  37  # Netherlands: Rotterdam
  38  # Denmark:  Kopenhagen
  39  # Italy:    Milano, Roma, Torino
  40  # Poland:   Bydgoszcz
  41  # Russia:   St. Petersburg
  42  # USA:      New York
  43  # China:    Hong Kong
  44  #--------------------------------------------------------------------------
  45  $SECTION                                                                                                \
  46      NAME=CITYS;                                                                                         \
  47      LC=1; AB=30; POOL=CITMODE; LT=25; %SECFIN;
  48  #==============================================================================
  49    {H?
  50  #
  51  # Budapest
  52  #
  53      $SECTION                                                                                            \
  54          NAME=H_BUDAPEST;                                                                                \
  55          SEQ=D; AB=20; WT=$FLG(T,ENV_WAYO,ENV_WAYT1); %SECFIN;%TITLE(Budapest);
  56        {BUS?
  57          $GROUP                                                                                          \
  58              NAME=H_BP_B1;                                                                               \
  59              LC=1; %GBG(STBGAU,ENV_WAYA);
  60            M=FOLLOW;                                                                                     \
  61              C=3*(LO(1|2),BP_OMNI(1|2));                                                                 \
  62              D=R; V=0.7-1.1;
  63            M=FOLLOW;                                                                                     \
  64              C=(SZAU_N2HZ;SZAU_N2HY;SZAU_N2HX;SZAU_N2H9Z;SZAU_N2H9Y;SZAU_N26Z;SZAU_N26Y; SZAU_N266Z;     \
  65                SZAU_N268Z; SZAU_N268Y;SZAU_NI56Z;SZAU_NI56Y;SZAU_NI56X);                                 \
  66              D=R;
  67            M=FOLLOW;                                                                                     \
  68              C=(SZAU_N2HZL;SZAU_N2HYL;SZAU_N2HXL;SZAU_N2H9ZL;SZAU_N2H9YL;SZAU_N26ZL; SZAU_N26YL;         \
  69                SZAU_N266ZL; SZAU_N266YL;SZAU_N268ZL;SZAU_N268YL;SZAU_NI56ZL; SZAU_NI56YL;SZAU_NI56XL;    \
  70                SZAU_NI56VL);                                                                             \
  71              D=L;
  72            M=FOLLOW;                                                                                     \
  73              C=(BP_MAVAG;BP_GANZ;MTB82;IK60T;AMGT_S;ZIU5;ITC600T;IC662T;ZIU9;IK260T; IK280T;IK435T);     \
  74              D=R;                                                                                        \
  75              F=T;
  76            M=FOLLOW;                                                                                     \
  77              C=(BP_MAVAGL;BP_GANZL;MTB82L;IK60TL;AMGT_SL;ZIU5L;ITC600TL;IC662TL;ZIU9L; IK260TL;          \
  78                IK280TL; IK435TL);                                                                        \
  79              D=L;                                                                                        \
  80              F=T;
  81            TX=Ikarus 280;                                                                                \
  82              M=FOLLOW;                                                                                   \
  83              C=(BKV_IK280TD;BKV_IK280TA;BKV_IK280TB;BKV_IK280TC;BKV_IK280T_199);                         \
  84              D=R;                                                                                        \
  85              F=T;
  86            TX=Ikarus 280;                                                                                \
  87              C=BKV_IK280TAL;                                                                             \
  88              F=T;
  89            TX=Ikarus 435;                                                                                \
  90              M=FOLLOW;                                                                                   \
  91              C=(BKV_IK435TA;BKV_IK435TB;BKV_IK435TC;BKV_IK435TD);                                        \
  92              D=R;                                                                                        \
  93              F=T;
  94            TX=Ikarus 435;                                                                                \
  95              C=BKV_IK435TAL;                                                                             \
  96              F=T;
  97          $ENDGROUP
  98        }
  99        {TRAM?
 100          $GROUP                                                                                          \
 101              NAME=H_BP_T1;                                                                               \
 102              LC=1; %GBG(STBGAU,ENV_WAYT1);
 103            M=FOLLOW;                                                                                     \
 104              C=6*(LO(1|2),BP_LOV(1|2|3|4|5|6|7|8|9|10|G));                                               \
 105              D=L; V=0.7-1.1;
 106            M=FOLLOW;                                                                                     \
 107              C=(BBVV_A;BBVV_A1X,BBVV_A;BBVV_A2,BBVV_P5;BBVV_A2,BBVV_SX1|BBVV_SX2;BBVV_A,BBVV_A1X;        \
 108                BBVV_A1[!L]; BBVV_A1; BBVV_A1[!L],BBVV_A1X);
 109            M=FOLLOW;                                                                                     \
 110              C=((L00,4*BLVV_1900X9);BLVV_1900M6[!L];BLVV_1900M6;BLVV_1900M9;BLVV_1900M9,BLVV_1900X6;     \
 111                (BLVV_1900M9,2*BLVV_1900X6);BLVV_1900M9,BLVV_1910X; <BLVV_G9[!L],BLVV_G9;                 \
 112                <FVV_CI1[!L],FVV_CI1; <FVV_CI1[!L],FVV_CP,FVV_CI1);
 113            C=BSZK_ADEL;
 114            M=FOLLOW;                                                                                     \
 115              C=(BLVV_1911;BLVV_1911,BLVV_1914;BLVV_CI2[!L],BLVV_CI2;FVV_CI2[!L],FVV_CI2);                \
 116              D=L;
 117            M=FOLLOW;                                                                                     \
 118              C=((F1Z,2*DPZ);F1AZ,EPZ;RVZU;DVP,RVZU;RVZU,DVPL;OPIU,DPZ,OPID;RVYU,RVYD);                   \
 119              D=L;
 120            M=FOLLOW;                                                                                     \
 121              C=(F1Z,DPZ;(F1AZ,2*EPZ);OPIU,OPID;RVZU,DPZ,RVYD;RVX,DPY,RVX,DPY,RVX;DVP,RVZU;RVYU,DVPL);    \
 122              D=R;
 123            M=FOLLOW;                                                                                     \
 124              C=(UZZUR;TMUL,EPZ;TVL,TV;UVCS;UV2ZL,FP,UV2Z;UV5L,UVP,UV5;MUVL,MUV;CSM1L; CSM4;CSMG2;        \
 125                KCSV7L; T5C5L,T5C5,T5C5[PU]);                                                             \
 126              D=L;
 127            M=FOLLOW;                                                                                     \
 128              C=(UZYUL;TMU;TV,TVP,TVL;UV2Y,EPY,UV2YL;MUV;CSM5L;CSM1;CSM4L;CSMG2L,CSMG2; T5C5,T5C5L);      \
 129              D=R;
 130          $ENDGROUP
 131        }
 132        {BUS?
 133          $GROUP                                                                                          \
 134              NAME=H_BP_B2;                                                                               \
 135              LC=1; %GBG(STBGAU,ENV_WAYA);
 136            M=FOLLOW;                                                                                     \
 137              C=(FAU_TR35L;FAU_TR5L;FAU_IK30L;FAU_IK30L,FAU_IK30PL;FAU_IK60ZL;FAU_IK60YL,FAU_AMGL;        \
 138                FAU_IK66(|A)L; FAU_ITC600L;FAU_IC660L;FAU_IK620L;FAU_IC620L; FAU_IC622L);                 \
 139              D=L;
 140            M=FOLLOW;                                                                                     \
 141              C=($DIR(FAU_IK60XL,FAU_IK60X);$DIR(FAU_IK60VL,FAU_IK60V); $DIR(FAU_IK620BL,FAU_IK620B));    \
 142              D=L|R;
 143            M=FOLLOW;                                                                                     \
 144              C=(BKV_IK556L;BKV_IK180AL;BKV_IK260L;BKV_IK280L;BKV_IK405L;BKV_IK415L; BKV_IK435L;          \
 145                BKV_IK521L; VAROSNL;MIKROL);                                                              \
 146              D=L;
 147            M=FOLLOW;                                                                                     \
 148              C=(FAU_TR35;FAU_TR5;FAU_IK30;FAU_IK30,FAU_IK30P;FAU_IK60Z;FAU_IK60Y,FAU_AMG; FAU_IK66(|A);  \
 149                FAU_ITC600;FAU_IC660;FAU_IK620;FAU_IC620;FAU_IC622);                                      \
 150              D=R;
 151            M=FOLLOW;                                                                                     \
 152              C=(BKV_IK556;BKV_IK180(A|B);BKV_IK260;BKV_IK280;BKV_IK405;BKV_IK415; BKV_IK435;BKV_IK521;   \
 153                VAROSN; MIKRO);                                                                           \
 154              D=R;
 155            C=VONTATO1,BKV_IK415;                                                                         \
 156              D=R;
 157            M=FOLLOW;                                                                                     \
 158              C=(BKV_IK260R;BKV_IK280FR;GYROS;BKV_IK435F;BKV_IK412);                                      \
 159              D=R;
 160            C=LB280;                                                                                      \
 161              D=R;
 162            C=LB280L;                                                                                     \
 163              D=L;
 164          $ENDGROUP
 165        }
 166        {CRAIL?
 167          $GROUP                                                                                          \
 168              NAME=H_BP_C;                                                                                \
 169              LC=1;                                                                                       \
 170              ENV=$CBG(WT,STBGAU,ENV_WAYT1),$CBG(WR,(STBGAU|STBGFO),ENV_WAY),                             \
 171              $CBG(WE,(STBGAU|STBGFO),ENV_WAYT6),$CBG(WM,(STBGUB|STBGFO),ENV_WAYM);
 172            TX=Metro M2/M3;                                                                               \
 173              C=<BKV_EVXL,3*BKV_EVX,BKV_EVXM;
 174            TX=Metro M2/M3;                                                                               \
 175              C=<2*(BKV_EVL,BKV_EV);
 176            TX=Metro M2/M3;                                                                               \
 177              C=<BKV_81714EL,3*BKV_81717E;
 178            TX=Metro M2 Alstom Metropolis;                                                                \
 179              C=<BKV_ALSTOMF[!L],3*BKV_ALSTOMM,BKV_ALSTOMF;
 180            TX=BKV ACSEV;                                                                                 \
 181              C=BKV_ACSEVM,BKV_ACSEVP;
 182            TX=BKV 448;                                                                                   \
 183              C=BKV_448;
 184            TX=BKV MIXA;                                                                                  \
 185              C=(<BKV_MIXA2FL,2*BKV_MIXA2M,BKV_MIXA2F)|(<BKV_MXAFL,BKV_MXAM,BKV_MXAF);
 186            TX=BKV MX;                                                                                    \
 187              C=<BKV_MXFL,2*BKV_MXM,BKV_MXF;
 188            TX=Budapesti Helyiérdekû Vasút L07;                                                           \
 189              C=BHEV_L07;
 190            TX=Budapesti Helyiérdekû Vasút M08;                                                           \
 191              C=BHEV_M08J;
 192            TX=Milleneumi Földalatti Vasút M1;                                                            \
 193              C=FAVP|FAVS|(<FAVSZ,FAVPOT|MFAVDR);                                                         \
 194              W=F;
 195            TX=[N=Rack railway;G=Zahnradbahn;H=Fogaskerek‡0171;P=Kolej z‡0119bata;                        \
 196                F=Chemin de fer ‡0155 cr‡00E9maill‡010Dre;NL=Tandradbaan;];                               \
 197              C=(<F_01,FTP1)|(<F_14,FPS1);                                                                \
 198              D=R; V=2;
 199            TX=[N=Rack railway;G=Zahnradbahn;H=Fogaskerek‡0171;P=Kolej z‡0119bata;                        \
 200                F=Chemin de fer ‡0155 cr‡00E9maill‡010Dre;NL=Tandradbaan;];                               \
 201              C=FOGAS|(<FOGAS,FOGASPOT)|SGP;                                                              \
 202              D=R; V=2;
 203            TX=[N=Rack railway;G=Zahnradbahn;H=Fogaskerek‡0171;P=Kolej z‡0119bata;                        \
 204                F=Chemin de fer ‡0155 cr‡00E9maill‡010Dre;NL=Tandradbaan;];                               \
 205              C=<BKV_SGPM,BKV_SGPP;                                                               \
 206               V=2;
 207          $ENDGROUP
 208        }
 209        {TRAM?
 210          $GROUP                                                                                          \
 211              NAME=H_BP_T2;                                                                               \
 212              LC=1; %GBG(STBGAU,ENV_WAYT1);
 213            TX=T5C5;                                                                                      \
 214              C=(BKV_T5C5_4037K[#D:R],BKV_T5C5_4038KL[!PD])|\
 215               (BKV_T5C5_4038KL[#D:L],BKV_T5C5_4037K[!PD]);
 216            TX=Tw 1500;                                                                                   \
 217              C=BKV_TW6000E;
 218            TX=Combino;                                                                                   \
 219              C=BKV_COMBINO;
 220            TX=Urbos;                                                                                     \
 221              C=BKV_URBOS9;
 222            M=FOLLOW;                                                                                     \
 223              C=(FVV_761;<BKV_7661L,BKV_7661;BKV_UVT2;BKV_ICST(1|2);                                      \
 224                (<BKV_7680L,BKV_7680)|(BKV_T5T1,BKV_T5T2));                                               \
 225              D=R;
 226            M=FOLLOW;                                                                                     \
 227              C=(FVV_SINCSISZ2;FVV_MERO;FVV_SINCSISZ1;BKV_7077A;FVV_2002;FVV_7080;                        \
 228                BKV_MUKI(2|23|3|34)(~GA|~HB); BKV_MUKI4;FVV_HOZ;FVV_7117;FVV_7117; MUKIHO1;MUKIHO4);
 229          $ENDGROUP
 230        }
 231      $ENDSECTION
 232  #--------------------------------------------------------------------------
 233  #
 234  # Debrecen
 235  #
 236      {TRAM|BUS?
 237        $SECTION                                                                                          \
 238            NAME=H_DEBRECEN;                                                                              \
 239            AB=15; %SECFIN;%TITLE(Debrecen);
 240          {TRAM?
 241            $GROUP                                                                                        \
 242                NAME=H_D_T;                                                                               \
 243                LC=3; %GBG(STBGAU,ENV_WAYT1);
 244              M=FOLLOW;                                                                                   \
 245                C=(DKV_1884; DKV_1884,DKV_1984; DKV_2500);                                                \
 246                D=R;
 247              M=FOLLOW;                                                                                   \
 248                C=(DKV_H3A; DKV_H3B; DKV_H5A; DKV_H5B; DKV_H6AL; DKV_H6A; DKV_H6BL; DKV_H6B);             \
 249                D=R;
 250              M=FOLLOW;                                                                                   \
 251                C=(DKV_H5AL; DKV_H5BL; DKV_H6AL; DKV_H6A; DKV_H6BL; DKV_H6B);                             \
 252                D=L;
 253              M=FOLLOW;                                                                                   \
 254                C=(DKV_H3C; DKV_284; DKV_289; DKV_384; DKV_486; DKV_492; DKV_H10E);                       \
 255                D=R;
 256              M=FOLLOW;                                                                                   \
 257                C=(KCSV6P; KCSV6A);                                                                       \
 258                D=L;
 259              C=D101,D303;
 260            $ENDGROUP
 261          }
 262          {BUS?
 263            $GROUP                                                                                        \
 264                NAME=H_D_B;                                                                               \
 265                LC=3; %GBG(STBGAU,ENV_WAYA);
 266              M=FOLLOW;                                                                                   \
 267                C=(HAJ_IK260R;HAJ_IK260B2;HAJ_IK260B;HAJ_IK260A;HAJ_IK280E;HAJ_IK280A; HAJ_IK280;         \
 268                  HAJ_IK280F; HAJ_IK280C;HAJ_IK280D);                                                     \
 269                D=R;
 270              M=FOLLOW;                                                                                   \
 271                C=(HAJ_IK284;HAJ_IK280_MET;HAJ_IK280_MET2;HAJ_IK415;HAJ_RSZ;HAJ_RCS;HAJ_MAN; HAJ_MAN2;    \
 272                  HAJ_MAN1; HAJ_MAN3);                                                                    \
 273                D=R;
 274            $ENDGROUP
 275          }
 276        $ENDSECTION
 277      }
 278  #--------------------------------------------------------------------------
 279  #
 280  #  Miskolc
 281  #
 282      {TRAM|BUS?
 283        $SECTION                                                                                          \
 284            NAME=H_MISKOLC;                                                                               \
 285            AB=15; %SECFIN;%TITLE(Miskolc);
 286          {TRAM?
 287            $GROUP                                                                                        \
 288                NAME=H_M_T1;                                                                              \
 289                LC=3; %GBG(STBGAU,ENV_WAYT1);
 290              C=MDV_GM,MDV_P17G;
 291              C=MDV_GM,MDV_P18G1,MDV_P18G2;
 292              C=MVK_40;
 293              M=FOLLOW;                                                                                   \
 294                C=(MVK_H3A;MVK_100;MVK_H5;MVK_154;MVK_162;MVK_165A;MVK_165B;MVK_173; MVK_H10E;MVK_130);   \
 295                D=R;
 296              M=FOLLOW;                                                                                   \
 297                C=(MVK_H5L;MVK_130L;MVK_172;MVK_KT8D5A;MVK_KT8D5B;MVK_KT8D5C);                            \
 298                D=L;
 299            $ENDGROUP
 300            $GROUP                                                                                        \
 301                NAME=H_M_T2;                                                                              \
 302                LC=3; %GBG(STBGAU,ENV_WAYT1);
 303              TX=KT8;                                                                                     \
 304                M=FOLLOW;                                                                                 \
 305                C=(MVK_KT8D5_1;MVK_KT8D5_1M;MVK_KT8D5_2;MVK_KT8D5_2M);                                    \
 306                D=R;
 307              TX=KT8;                                                                                     \
 308                C=MVK_KT8D5_1ML|MVK_KT8D5_2ML;
 309              TX=E1,c3;                                                                                   \
 310                C=(MVK_E1L[#D:L],MVK_C3L)|(MVK_E1[#D:R],MVK_C3);
 311              C=MUKIHO2;                                                                                  \
 312                D=R;
 313              C=MUKIHOM;                                                                                  \
 314                D=L;
 315            $ENDGROUP
 316          }
 317          {BUS?
 318            $GROUP                                                                                        \
 319                NAME=H_M_B;                                                                               \
 320                LC=2; %GBG(STBGAU,ENV_WAYA);
 321              M=FOLLOW;                                                                                   \
 322                C=(MVK_IK260R;MVK_IK260B;MVK_IK280R;MVK_IK280B;IK415_93;MVK_IK415; MVK_IK415F);           \
 323                D=R;
 324              M=FOLLOW;                                                                                   \
 325                C=(MVK_IK435F;MVK_IK412;MVK_IK412A;MVK_RP091A;MVK_RP091;MVK_RP291;MVK_NL223; MVK_SL223;   \
 326                  MVK_SG263; IK546K;IK435_93R;MVK_IK435);                                                 \
 327                D=R;
 328            $ENDGROUP
 329          }
 330        $ENDSECTION
 331      }
 332  #--------------------------------------------------------------------------
 333  #
 334  #  Szeged
 335  #
 336      {TRAM|BUS?
 337        $SECTION                                                                                          \
 338            NAME=H_SZEGED;                                                                                \
 339            AB=15; %SECFIN;%TITLE(Szeged);
 340          {TRAM?
 341            $GROUP                                                                                        \
 342                NAME=H_SZ_T;                                                                              \
 343                LC=3; %GBG(STBGAU,ENV_WAYT1);
 344              C=SZKT_313,SZKT_314;                                                                        \
 345                D=R;
 346              C=<SZKT_2500A[!L],SZKT_2500A;
 347              C=<SZKT_2500B[!L],SZKT_2500B;
 348              M=FOLLOW;                                                                                   \
 349                C=(SZKT_CS1;SZKT_CS2;SZKT_CS3);                                                           \
 350                D=L;
 351              M=FOLLOW;                                                                                   \
 352                C=(SZKT_H3A;SZKT_H3B;SZKT_607;SZKT_H3C;SZKT_609;SZKT_H5A;SZKT_H5B;SZKT_H5C; SZKT_H5D);    \
 353                D=R;
 354              M=FOLLOW;                                                                                   \
 355                C=(SZKT_607L;SZKT_609L;SZKT_H5AL;SZKT_H5BL;SZKT_H5CL; SZKT_H5DL);                         \
 356                D=L;
 357              M=FOLLOW;                                                                                   \
 358                C=(SZKT_H10A;SZKT_H10B;SZKT_H3P;SZKT_H3D;SZKT_806;SZKT_812;SZKT_H10E);                    \
 359                D=R;
 360              C=SZKT_T6;
 361              C=SZKT_T6L;
 362              C=SZKT_5A|SZKT_5B|SZKT_5CL|SZKT_5C;
 363              C=SZKT_6L|SZKT_6;
 364            $ENDGROUP
 365          }
 366          {BUS?
 367            $GROUP                                                                                        \
 368                NAME=H_SZ_B;                                                                              \
 369                LC=3; ENV=$EBG(STBGAU),$EWX(WT,ENV_WAYO),$EWX(WA,ENV_WAYA);
 370              M=FOLLOW;                                                                                   \
 371                C=(SZKT_T130;SZKT_ZIU1;SZKT_T137;SZKT_ZIU2;SZKT_ZIUT;SZKT_SK14R;SZKT_SK14K; SZKT_SK15R;   \
 372                  SZKT_SK15);                                                                             \
 373                D=R;                                                                                      \
 374                F=T;
 375              M=FOLLOW;                                                                                   \
 376                C=(SZKT_T130L;SZKT_T137L;SZKT_T506L;SZKT_T282L);                                          \
 377                D=L;                                                                                      \
 378                F=T;
 379              M=FOLLOW;                                                                                   \
 380                C=(IK280TP;SZKT_280T;SZKT_280T3;SZKT_T281;SZKT_T6281;SZKT_T7281;SZKT_T282; SZKT_T502;     \
 381                  SZKT_280T2; SZKT_280T4;SZKT_280T5);                                                     \
 382                D=R;
 383              M=FOLLOW;                                                                                   \
 384                C=3*(SZKT_CITAROL|SZKT_IK280L);                                                           \
 385                D=L;
 386              M=FOLLOW;                                                                                   \
 387                C=3*(SZKT_CITARO|SZKT_IK280);                                                             \
 388                D=R;
 389            $ENDGROUP
 390          }
 391        $ENDSECTION
 392      }
 393    }
 394    {D|DDR|BRD?
 395  #--------------------------------------------------------------------------
 396  #
 397  # Berlin
 398  #
 399      $SECTION                                                                                            \
 400          NAME=D_BERLIN;                                                                                  \
 401          SEQ=D; AB=30; %SECFIN;%TITLE(Berlin);
 402
 403  #
 404  # Tram
 405  #
 406
 407        {TRAM?
 408  # Tram gemischt
 409          $GROUP                                                                                          \
 410              NAME=D_B_TM;                                                                                \
 411              LC=3;                                                                                       \
 412              POOL=POOL_BLN_T1; %GBG(STBGEU,ENV_WAYT1);
 413            POOL=POOL_BLN_T2;
 414            POOL=POOL_BLN_T3;
 415          $ENDGROUP
 416  # Tram EP 2
 417          $GROUP                                                                                          \
 418              NAME=D_B_T2;                                                                                \
 419              LC=3; ENV=[TX-=1930-1940:[SP]]; %GBG(STBGEU,ENV_WAYT1);
 420            TX=TD08 + B24;                                                                                \
 421              C=BVG_TD08,BVG_2B24;
 422            TX=TF21s + B21;                                                                               \
 423              C=BVG_TF21_2,BVG_BF21_2;
 424            TX=T24 + B24;                                                                                 \
 425              C=BVG_2T24,BVG_2B25;
 426            TX=T25 + B24;                                                                                 \
 427              C=BVG_2T25,BVG_2B24;
 428            TX=TG29;                                                                                      \
 429              C=BVG_2TG29;
 430            TX=Tm31 + BDM26;                                                                              \
 431              C=BVG_2TM31,BVG_2BDM26;
 432            TX=T33u + B25;                                                                                \
 433              C=BVG_2T33U,BVG_2B25;
 434            TX=TM34 + BM28;                                                                               \
 435              C=BVG_2TM34,BVG_2BM28;
 436            TX=TM36 + TM36;                                                                               \
 437              C=BVG_TM2DL,BVG_TM2;
 438            TX=TM36 + TM36;                                                                               \
 439              C=(BVG_2TM36[#D:R],BVG_2TM36L[PD])|(BVG_2TM36L[#D:L],BVG_2TM36[PD]);
 440            TX=Gel.Tw CapeHope (Versuch);                                                                 \
 441              C=BVG_GT4_CAPEHOPE(|L);
 442            TX=TF40 + BF40;                                                                               \
 443              C=BVG_2TF40,BVG_2BF40;
 444            TX=TU13 (maintenance);                                                                        \
 445              C=BVG_ATU3_2;
 446          $ENDGROUP
 447  # Tram EP 3W
 448          $GROUP                                                                                          \
 449              NAME=D_B_T3W;                                                                               \
 450              LC=3; ENV=[TX-=[N=West Berlin ; D=West-Berlin ; H=Nyugat-Berlin ;]1949-1967:[SP]]; %GBG(STBGEU,ENV_WAYT1);
 451            TX=TD08 + B24;                                                                                \
 452              C=BVG_3TD08,BVG_3B24;
 453            TX=TF21s + B21;                                                                               \
 454              C=BVG_3TF21,BVG_3BF21;
 455            TX=TG29 + B24;                                                                                \
 456              C=BVG_3TG29,BVG_3B24;
 457            TX=T24 + B24;                                                                                 \
 458              C=BVG_3T24,BVG_3B24;
 459            TX=Tm31 + BDM26;                                                                              \
 460              C=BVG_3TM31,BVG_3BDM26;
 461            TX=T33u + B25;                                                                                \
 462              C=BVG_3T33U,BVG_3B25;
 463            TX=TM34 + BM28;                                                                               \
 464              C=BVG_3TM34,BVG_3BM28;                                                                      \
 465              AB=15;
 466            TX=TM36 + TM36;                                                                               \
 467              C=[PHU]BVG_3TM36,BVG_3TM36[PD];
 468            TX=TM36 + TM33;                                                                               \
 469              C=([PHU]BVG_3TM36,BVG_3TM33[PD])|([PHU]BVG_3TM33,BVG_3TM36[PD]);
 470          $ENDGROUP
 471
 472  # Tram EP 34O
 473          $GROUP                                                                                          \
 474              NAME=D_B_T34O;                                                                              \
 475              LC=3; ENV=[TX-=[N=East Berlin ; D=Ost-Berlin ; H=Kelet-Berlin ;](DDR)1949-1970:[SP]]; %GBG(STBGEU,ENV_WAYT1);
 476            TX=T25 + B24 + B24;                                                                           \
 477              C=BVG_3T25,BVG_3B24;
 478            TX=TE 59 + BE 59;                                                                             \
 479              C=(BVG_TE59AL,2*BVG_BE59AL)|(BVG_TE59A,2*BVG_BE59A);
 480            TX=TE 59 + B4E 61;                                                                            \
 481              C=(BVG_T2REKO1,BVG_61)|(BVG_T2REKO1L,BVG_61L);
 482            TX=T4-61 + B4-61;                                                                             \
 483              C=(BVG_3T462L,BVG_3B462L)|(BVG_3T462,BVG_3B462);
 484            TX=Atw SCH1,2;                                                                                \
 485              C=BVG_SCH1L|BVG_SCH1|BVG_SCH2L|BVG_SCH2;
 486            TX=Atw Reko;                                                                                  \
 487              C=BVG_ATZ,BVG_WG1,BVG_WG;
 488          $ENDGROUP
 489
 490  # Tram E45
 491          $GROUP                                                                                          \
 492              NAME=D_B_T45;                                                                               \
 493              LC=3; ENV=[TX-=[N=East Berlin ; D=Ost-Berlin ; H=Kelet-Berlin;](DDR)1970-1989:[SP]]; %GBG(STBGEU,ENV_WAYT(1|2|3));
 494            TX=TE 59 + BE 59;                                                                             \
 495              C=(BVG_TE59AL,2*BVG_BE59AL)|(BVG_TE59A,2*BVG_BE59A);
 496            TX=TE 59 + BE 59;                                                                             \
 497              C=BVG_TE59C,2*BVG_BE59C;
 498            TX=T4 62 +B4 61;                                                                              \
 499              C=(BVG_T4GOTHAL,BVG_B4GOTHAL)|(BVG_T4GOTHA,BVG_B4GOTHA)|(BVG_4T462CL,BVG_4B462CL)|          \
 500                (BVG_4T462C,BVG_4B462C);
 501            TX=Kt4D;                                                                                      \
 502              C=(BVG_KT4D1L,BVG_KT4D1L[PD])|(BVG_KT4D1,BVG_KT4D1[PD]);
 503            TX=Kt4D;                                                                                      \
 504              C=(BVG_KT4D1SL,BVG_KT4D1SL[PD])|(BVG_KT4D1S,BVG_KT4D1S[PD]);
 505            TX=Kt4D;                                                                                      \
 506              C=([PHU]2*BVG_4KT4DE)|([PHU]2*BVG_4KT4DEL)|([PHU]2*BVG_4KT4DS)|([PHU]2*BVG_4KT4DSL);
 507            TX=T6A2 + B6A2;                                                                               \
 508              C=(BVG_T6A2_B750YL,BVG_T6A2_B750YL[PD],BVG_B6A2_B750YL)|                                    \
 509                (BVG_T6A2_B750Y,BVG_T6A2_B750Y[PD],BVG_B6A2_B750Y);
 510            TX=T6A2 + T6A2 + B6A2;                                                                        \
 511              C=([PHU]2*BVG_4T6A2E,BVG_4B6A2)|([PHU]2*BVG_4T6A2EL,BVG_4B6A2L)|                            \
 512                ([PHU]2*BVG_4T6A2S,BVG_4B6A2)|([PHU]2*BVG_4T6A2SL,BVG_4B6A2L);
 513            TX=Atw Reko;                                                                                  \
 514              C=BVG_ATZ;
 515          $ENDGROUP
 516
 517  # Tram E6
 518          $GROUP                                                                                          \
 519              NAME=D_B_T6;                                                                                \
 520              LC=3; ENV=[TX-=after 1995 ;[SP]]; %GBG(STBGEU,ENV_WAYT(1|2|3));
 521            TX=Kt4D;                                                                                      \
 522              C=(BVG_KT4D3L,BVG_KT4D3L[PD])|(BVG_KT4D3,BVG_KT4D3[PD]);
 523            TX=Kt4D;                                                                                      \
 524              C=(BVG_KT4D4L,BVG_KT4D4L[PD])|(BVG_KT4D4,BVG_KT4D4[PD]);
 525            TX=Kt4D;                                                                                      \
 526              C=([PHU]2*BVG_5KT4DMEL)|([PHU]2*BVG_5KT4DME);
 527            TX=T6A2;                                                                                      \
 528              C=(BVG_T6ML,BVG_B6ML)|(BVG_T6M,BVG_B6M);
 529            TX=T6A2;                                                                                      \
 530              C=(BVG_T6ML,BVG_T6ML[PD])|(BVG_T6M,BVG_T6M[PD]);                                            \
 531              AB=15;
 532            TX=T6A2 + B6A2;                                                                               \
 533              C=((BVG_5T6A2MSL|BVG_5T6A2MEL),BVG_5B6A2ML)|((BVG_5T6A2MS|BVG_5T6A2ME),BVG_5B6A2M);
 534            TX=Gt6N 1000;                                                                                 \
 535              C=BVG_GT6N2L|BVG_GT6N2;
 536            TX=Gt6N 1000;                                                                                 \
 537              C=BVG_GT6NL|BVG_GT6N;
 538            TX=GtN-ZR-Serie 2000;                                                                         \
 539              C=BVG_GT6N1L|BVG_GT6N1;
 540            TX=GtN-ZR-Serie 2000;                                                                         \
 541              C=BVG_GT6NZ|BVG_GT6NZL;
 542            TX=Atw 4556;                                                                                  \
 543              C=BVG_4556L|BVG_4556;
 544            TX=Atw Kt4D;                                                                                  \
 545              C=BVG_AKT4D~CG;
 546            TX=BVG 3000;                                                                                  \
 547              C=BVG_F6E_Z_3001(|L);
 548            TX=BVG 4000;                                                                                  \
 549              C=BVG_F6E_Z_4001(|L);
 550            TX=BVG 8000;                                                                                  \
 551              C=BVG_F8E_Z_8001(|L);
 552            TX=BVG 9000;                                                                                  \
 553              C=BVG_F8E_Z_9001(|L);
 554          $ENDGROUP
 555        }
 556  #
 557  # U-Bahn
 558  #
 559        {CRAIL?
 560          $GROUP                                                                                          \
 561              NAME=D_B_U;                                                                                 \
 562              LC=3; %GBG((STBGUB|STBGFO),ENV_WAYM);
 563            TX=BVG A1;                                                                                    \
 564              C=<BVG_A1_7_1908YL,                                                                         \
 565                (|BVG_A1_7_1908MY|BVG_A1_7_1908MR|(BVG_A1_7_1908MY,BVG_A1_7_1908MR)|                      \
 566                (BVG_A1_7_1908MR,BVG_A1_7_1908MY)),BVG_A1_7_1908Y;
 567            TX=BVG A1;                                                                                    \
 568              C=<BVG_A1_7_1926YL,                                                                         \
 569                (BVG_A1_7_1926MY|BVG_A1_7_1926MR|(BVG_A1_7_1926MY,BVG_A1_7_1926MR)|                       \
 570                (BVG_A1_7_1926MR,BVG_A1_7_1926MY)),BVG_A1_7_1926Y;
 571            TX=BVG B1;                                                                                    \
 572              C=<BVG_U_BI2N,BVG_U_BI2RL,BVG_U_BI2N,BVG_U_BI2NL,BVG_U_BI2N,BVG_U_BI2RL;
 573            TX=BVG U-Bahn A3L;                                                                            \
 574              C=BVG_A3_5,BVG_A3L_3,BVG_A3L_5;
 575            TX=BVG U-Bahn A3L;                                                                            \
 576              C=3*BVG_A3L92A;
 577            TX=BVG U-Bahn H99;                                                                            \
 578              C=BVG_H|BVG_H99T;
 579            TX=BVG U-Bahn BI;                                                                             \
 580              C=1-2*(<BVG_BIFYL,BVG_BIY,BVG_BIR,BVG_BIFY);
 581            TX=BVG U-Bahn A3;                                                                             \
 582              C=2-4*(BVG_A3_3|BVG_A3_5|BVG_A3L_3|BVG_A3L_5|BVG_A3L82|BVG_A3L92);
 583            TX=BVG U-Bahn D/DL;                                                                           \
 584              C=3*BVG_D3;
 585            TX=BVG U-Bahn D/DL;                                                                           \
 586              C=3*BVG_D5;
 587            TX=[N=East-Berlin; D=Ost-Berlin; H=Kelet-Berlin;]U-Bahn D;                                    \
 588              C=3*(<BVG_DI2L,BVG_DI2);
 589            TX=[N=East-Berlin; D=Ost-Berlin; H=Kelet-Berlin;]U-Bahn E;                                    \
 590              C=(<BVG_E3_4CL,BVG_E3_4DL,BVG_E3_4D,BVG_E3_4C)|(<BVG_E3_5CL,BVG_E3_4DL,BVG_E3_4D,BVG_E3_5C);
 591            TX=BVG_E3;                                                                                    \
 592              C=<BVG_E3L,BVG_E3ML,BVG_E3M,BVG_E3;
 593            TX=BVG U-Bahn F74 + 79;                                                                       \
 594              C=3@(BVG_F74_4|BVG_F74_5|BVG_F76_4|BVG_F76_56);
 595            TX=BVG F 84;                                                                                  \
 596              C=3@(BVG_F84);
 597            TX=BVG F 92;                                                                                  \
 598              C=3@(<BVG_F92AL,BVG_F92A);
 599            TX=[N=East-Berlin; D=Ost-Berlin; H=Kelet-Berlin;]U-Bahn GI;                                   \
 600              C=2@(BVG_GI1_4);
 601            TX=BVG U-Bahn GI;                                                                             \
 602              C=2@(BVG_GI1_5|BVG_GI1_6);
 603            TX=BVG U-Bahn H;                                                                              \
 604              C=BVG_H;
 605            TX=BVG U-Bahn HK;                                                                             \
 606              C=BVG_HK;
 607          $ENDGROUP
 608        }
 609        {BUS?
 610          $GROUP                                                                                          \
 611              NAME=D_B_B1;                                                                                \
 612              LC=3; %GBG(STBGEU,ENV_WAYA);
 613            M=FOLLOW;                                                                                     \
 614              C=4-6*BVG_(MAN1974|O305|O405NA|O405NC|PF14R|PS14R);                                         \
 615              D=R;
 616            M=FOLLOW;                                                                                     \
 617              C=6-8*(BVG_DE70L|BVG_D2U55L|BVG_D2U55_PERSILL|BVG_D2U56L|BVG_D2U56_HAGL|BVG_D3U52L|         \
 618                BVG_D3U52_SALAMANDERL|BVG_D3U52_SALAMANDERL|BVG_DS60L|BVG_SD74L|BVG_50TRUTZL|             \
 619                BVG_50TRUTZ_VIVILL|BVG_D38_ATAL|BVG_D38_CHLORL|BVG_D38_ESSOL|BVG_D38_LUXL|                \
 620                BVG_D38_PERSILL|BVG_D38_SALAMANDERL|BVG_D38_SAROTTIL|BVG_D38_VIVILL|BVG_SENATORL|         \
 621                BVG_SD200CL|BVG_SD200L|BVG_SD202CL|BVG_SD202L|BVG_VOLVO_B10L);                            \
 622              D=L;
 623            M=FOLLOW;                                                                                     \
 624              C=4-6*(BVG_NL233CNG|BVG_O405N|BVG_CITO|BVG_SD222|BVG_ND272|BVG_ND353|BVG_DN|                \
 625                BEROLINA_SD200|BEROLINA_N122);                                                            \
 626              D=R;
 627            TX=BVG Ost DO56;                                                                              \
 628              C=BVBD_DO56;
 629            M=FOLLOW;                                                                                     \
 630              C=4-6*BVG_(MAN1974|O305|O405NA|O405NC|PF14R|PS14R)L;                                        \
 631              D=L;
 632            M=FOLLOW;                                                                                     \
 633              C=6-8*(BVG_DE70|BVG_D2U|BVG_D2U55|BVG_D2U55_PERSIL|BVG_D2U56|BVG_D2U56_HAG|BVG_DF|          \
 634                BVG_D3U52|BVG_D3U52_SALAMANDER|BVG_DS60|BVG_DE74|BVG_SD74|BVG_DDO|BVG_50TRUTZ|            \
 635                BVG_50TRUTZ_VIVIL|BVG_D38_ATA|BVG_D38_LUX|BVG_D38_PERSIL|BVG_D38_ESSO|BVG_D38_CHLOR|      \
 636                BVG_D38_SALAMANDER|BVG_D38_SAROTTI|BVG_D38_VIVIL|BVG_SENATOR|BVG_SD202C|BVG_SD202|BVG_1); \
 637              D=R;
 638            TX=BVG Ost;                                                                                   \
 639              C=BVBD_IMK108L|BVBD_IL5572;
 640            M=FOLLOW;                                                                                     \
 641              C=4-6*(BVBD_IK280_023|BVBD_IK280_02B|BVBD_IAK048|BVBD_IK280_02A|BVBD_IK284|BVBD_IK180_10|   \
 642                BVBD_IC8091|BVBD_IK260_02|BVBD_IK260|BVBD_BV5091|BVBD_IK280_02|BVG_BV5129|BVG_BV5555|     \
 643                BVG_IK280_02M|BVG_BV5678|BVBD_IC6072|BVBD_IK280_03|BVBD_IK280_02C|BVBD_IK280_02I);        \
 644              D=R;
 645            M=FOLLOW;                                                                                     \
 646              C=4-6*(BVG_NL233CNGL|BVG_O405NL|BVG_CITOL|BVG_CITO1L|BVG_SD222L|BVG_ND272L|BVG_ND353L|      \
 647                BVG_DNL|BVG_O530ARTEMSL|BEROLINA_SD200L|BEROLINA_N122L);                                  \
 648              D=L;
 649          $ENDGROUP
 650        }
 651  #
 652  # S-Bahn
 653  #
 654        {CRAIL?
 655
 656  # S-Bahn Epoche 6
 657          $SCENE                                                                                          \
 658              NAME=D_B_S6;                                                                                \
 659              DY=110;
 660            $PATH Y=10; LC=2;                                                                             \
 661                FG=(TRBED25:..,^0;SBERLIN_3FG:..,-3,#);
 662              M=STOP; POOL=POOL_BLN_S6; D=R; V=10; A=.25; P=*50+10; TE=3-9;
 663            $ENDPATH
 664            $PATH Y=10; LC=2;                                                                             \
 665                BG=(MR_SBOX5:<4;D_WARNEMUNDE;BGCITYD(A|M)1:..,0,#; 1-40*1,TREES_SUMMER:..,0,#;            \
 666                BGCITYD(A|M)2:..,0,#;SKYMIX2);                                                            \
 667                FG=(B_PLF1E,14@B_PLF(1|2),#B_PLF1E:,^8;                                                   \
 668                PLF_GASTEIZ3[BT:0,0,89,65][BT:0,0,92,53],8*PLF_GASTEIZ3,                                  \
 669                PLF_GASTEIZ3[BT:6,0,89,65][BT:3,0,92,53]:,-6;D_OBHBF6,480,D_OBHBF6,:,38;                  \
 670                PAS15,16,D_OBHBF6S,30,LAMP01,40,PAS13,20,PAS08,5,PLF_J2D,10,PAS25,15,PERS05,20,           \
 671                B_SHELTER,26,#PAS05,15,DBAG_6STREU,4,PASG03,10,DBAG_6TICKET,DBAG_6INFO3,5,PLF_J2D,20,     \
 672                DBAG_6INFO3,PASG02,20,DBAG_STAIRS,30,PASG01,25,PAS11,DUSTBIN1,11,PLF_J2D,25,BANK8,15,     \
 673                BANK8,20,PAS05,28,PAS23,20,BANK8,35,DUSTBIN1,4,DBAG_6TICKET,16,PASG05,15,BANK04,30,       \
 674                B_SHELTER,26,PAS03,35,BANK01,DUSTBIN1,15,PAS05,12,LAMP01,15,D_OBHBF6S,12,PERS01,20,       \
 675                PERS03,:,8;100,D_BERAUFS1,:,8);                                                           \
 676                W=X;
 677              M=OPEN; POOL=POOL_BLN_S6; D=L; V=10; A=.25; P=*50-10; TB=3-9;
 678            $ENDPATH
 679          $ENDSCENE
 680
 681  # S-Bahn Epoche 5
 682          $SCENE                                                                                          \
 683              NAME=D_B_S5;                                                                                \
 684              DY=110;
 685            $PATH Y=10; LC=2;                                                                             \
 686                FG=(TRBED25:..,^0;SBERLIN_3FG:..,-3,#);
 687              M=STOP; POOL=POOL_BLN_S5; D=R; V=10; A=.25; P=*50+10; TE=3-9;
 688            $ENDPATH
 689            $PATH Y=10; LC=2;                                                                             \
 690                BG=(MR_SBOX5:<4;D_WARNEMUNDE;BGCITYD(A|M)1:..,0,#; 1-40*1,TREES_SUMMER:..,0,#;            \
 691                BGCITYD(A|M)2:..,0,#;SKYMIX2);                                                            \
 692                FG=(B_PLF1E,14@B_PLF(1|2),#B_PLF1E:,^8;                                                   \
 693                PLF_GASTEIZ3[BT:0,0,89,65][BT:0,0,92,53],8*PLF_GASTEIZ3,                                  \
 694                PLF_GASTEIZ3[BT:6,0,89,65][BT:3,0,92,53]:,-6;D_DUHBF5,480,D_DUHBF5,:,38;                  \
 695                PAS15,16,D_BLN5,30,LAMP01,40,PAS13,20,PAS08,5,PLF_J2D,10,PAS25,15,PERS05,20,B_SHELTER,    \
 696                26,#PAS05,25,PASG03,10,J_TICKET,5,I_TIMTAB1,,5,PLF_J2D,20,PASG02,20,DBAG_STAIRS,30,       \
 697                PASG01,25,PAS11,DUSTBIN1,11,PLF_J2D,25,BANK8,15,BANK8,20,PAS05,28,PAS23,20,BANK8,35,      \
 698                DUSTBIN1,4,J_TICKET,16,PASG05,15,BANK04,30,B_SHELTER,26,PAS03,35,BANK01,DUSTBIN1,15,      \
 699                PAS05,12,LAMP01,15,D_BLN5,12,PERS01,20,PERS03,:,8;100,D_BERAUFS1,:,8);                    \
 700                W=X;
 701              M=OPEN; POOL=POOL_BLN_S5; D=L; V=10; A=.25; P=*50-10; TB=3-9;
 702            $ENDPATH
 703          $ENDSCENE
 704
 705  # S-Bahn Epoche 4
 706          $SCENE                                                                                          \
 707              NAME=D_B_S4;                                                                                \
 708              DY=110;
 709            $PATH Y=10; LC=2;                                                                             \
 710                FG=(TRBED25:..,^0;SBERLIN_3FG:..,-3,#);
 711              M=STOP; POOL=POOL_BLN_S4; D=R; V=10; A=.25; P=*50+10; TE=3-9;
 712            $ENDPATH
 713            $PATH Y=10; LC=2;                                                                             \
 714                BG=(MR_SBOX5:<4;D_WARNEMUNDE;BGCITYD(A|M)1:..,0,#; 1-40*1,TREES_SUMMER:..,0,#;            \
 715                BGCITYD(A|M)2:..,0,#;SKYMIX2);                                                            \
 716                FG=(B_PLF1E,14@B_PLF(1|2),#B_PLF1E:,^8;                                                   \
 717                PLF_GASTEIZ3[BT:0,0,89,65][BT:0,0,92,53],8*PLF_GASTEIZ3,                                  \
 718                PLF_GASTEIZ3[BT:6,0,89,65][BT:3,0,92,53]:,-6;D_RUCK4,480,D_RUCK4,:,38;                    \
 719                PAS15,16,D_RUCK4S,30,LAMP01,40,PAS13,20,PAS08,5,PLF_J2D,10,PAS25,15,PERS05,20,B_SHELTER,  \
 720                26,#PAS05,25,PASG03,10,5,I_TIMTAB1,,5,PLF_J2D,20,PASG02,20,DBAG_STAIRS,30,PASG01,25,      \
 721                PAS11,DUSTBIN1,11,PLF_J2D,25,BANK8,15,BANK8,20,PAS05,28,PAS23,20,BANK8,35,DUSTBIN1,4,16,  \
 722                PASG05,15,BANK04,30,B_SHELTER,26,PAS03,35,BANK01,DUSTBIN1,15,PAS05,12,LAMP01,15,          \
 723                D_RUCK4S,12,PERS01,20,PERS03,:,8;100,D_BERAUFS1,:,8);                                     \
 724                W=X;
 725              M=OPEN; POOL=POOL_BLN_S4; D=L; V=10; A=.25; P=*50-10; TB=3-9;
 726            $ENDPATH
 727          $ENDSCENE
 728
 729  # S-Bahn Epoche 3
 730          $SCENE                                                                                          \
 731              NAME=D_B_S3;                                                                                \
 732              DY=110;
 733            $PATH Y=10; LC=2;                                                                             \
 734                FG=(TRBED25:..,^0;SBERLIN_3FG:..,-3,#);
 735              M=STOP; POOL=POOL_BLN_S3; D=R; V=10; A=.25; P=*50+10; TE=3-9;
 736            $ENDPATH
 737            $PATH Y=10; LC=2;                                                                             \
 738                BG=(MR_SBOX5:<4;D_WARNEMUNDE;BGCITYD(A|M)1:..,0,#; 1-40*1,TREES_SUMMER:..,0,#;            \
 739                BGCITYD(A|M)2:..,0,#;SKYMIX2);                                                            \
 740                FG=(B_PLF1E,14@B_PLF(1|2),#B_PLF1E:,^8;                                                   \
 741                PLF_GASTEIZ3[BT:0,0,89,65][BT:0,0,92,53],8*PLF_GASTEIZ3,                                  \
 742                PLF_GASTEIZ3[BT:6,0,89,65][BT:3,0,92,53]:,-6;D_BOEDERITZ3,480,D_BOEDERITZ3,:,38;          \
 743                PAS15,16,D_BOEDERITZ3S,30,LAMP01,40,PAS13,20,PAS08,5,PLF_J2D,10,PAS25,15,PERS05,20,       \
 744                B_SHELTER,26,#PAS05,25,PASG03,10,5,I_TIMTAB1,,5,PLF_J2D,20,PASG02,20,DBAG_STAIRS,30,      \
 745                PASG01,25,PAS11,DUSTBIN1,11,PLF_J2D,25,BANK8,15,BANK8,20,PAS05,28,PAS23,20,BANK8,35,      \
 746                DUSTBIN1,4,16,PASG05,15,BANK04,30,B_SHELTER,26,PAS03,35,BANK01,DUSTBIN1,15,PAS05,12,      \
 747                LAMP01,15,D_BOEDERITZ3S,12,PERS01,20,PERS03,:,8;100,D_BERAUFS1,:,8);                      \
 748                W=X;
 749              M=OPEN; POOL=POOL_BLN_S3; D=L; V=10; A=.25; P=*50-10; TB=3-9;
 750            $ENDPATH
 751          $ENDSCENE
 752
 753  # S-Bahn Epoche 2
 754          $SCENE                                                                                          \
 755              NAME=D_B_S2;                                                                                \
 756              DY=110;
 757            $PATH Y=10; LC=2;                                                                             \
 758                FG=(TRBED25:..,^0;SBERLIN_3FG:..,-3,#);
 759              M=STOP; POOL=POOL_BLN_S2; D=R; V=10; A=.25; P=*50+10; TE=3-9;
 760            $ENDPATH
 761            $PATH Y=10; LC=2;                                                                             \
 762                BG=(MR_SBOX5:<4;D_WARNEMUNDE;BGCITYD(A|M)1:..,0,#; 1-40*1,TREES_SUMMER:..,0,#;            \
 763                BGCITYD(A|M)2:..,0,#;SKYMIX2);                                                            \
 764                FG=(B_PLF1E,14@B_PLF(1|2),#B_PLF1E:,^8;                                                   \
 765                PLF_GASTEIZ3[BT:0,0,89,65][BT:0,0,92,53],8*PLF_GASTEIZ3,                                  \
 766                PLF_GASTEIZ3[BT:6,0,89,65][BT:3,0,92,53]:,-6;D_BOEDERITZ3,480,D_BOEDERITZ3,:,38;          \
 767                PAS15,16,D_BOEDERITZ3S,30,LAMP01,40,PAS13,20,PAS08,5,PLF_J2D,10,PAS25,15,PERS05,20,       \
 768                B_SHELTER,26,#PAS05,25,PASG03,10,5,I_TIMTAB1,,5,PLF_J2D,20,PASG02,20,DBAG_STAIRS,30,      \
 769                PASG01,25,PAS11,DUSTBIN1,11,PLF_J2D,25,BANK8,15,BANK8,20,PAS05,28,PAS23,20,BANK8,35,      \
 770                DUSTBIN1,4,16,PASG05,15,BANK04,30,B_SHELTER,26,PAS03,35,BANK01,DUSTBIN1,15,PAS05,12,      \
 771                LAMP01,15,D_BOEDERITZ3S,12,PERS01,20,PERS03,:,8;100,D_BERAUFS1,:,8);                      \
 772                W=X;
 773              M=OPEN; POOL=POOL_BLN_S2; D=L; V=10; A=.25; P=*50-10; TB=3-9;
 774            $ENDPATH
 775          $ENDSCENE
 776
 777  # S-Bahn Epoche 1
 778          $SCENE                                                                                          \
 779              NAME=D_B_S1;                                                                                \
 780              DY=110;
 781            $PATH Y=10; LC=2;                                                                             \
 782                FG=(TRBED25:..,^0;);
 783              M=STOP; POOL=POOL_BLN_S1; D=R; V=10; A=.25; P=*50+10; TE=3-9;
 784            $ENDPATH
 785            $PATH Y=10; LC=2;                                                                             \
 786                BG=(MR_SBOX5:<4;D_WARNEMUNDE;BGCITYD(A|M)1:..,0,#; 1-40*1,TREES_SUMMER:..,0,#;            \
 787                BGCITYD(A|M)2:..,0,#;SKYMIX2);                                                            \
 788                FG=(B_PLF1E,14@B_PLF(1|2),#B_PLF1E:,^8;                                                   \
 789                PLF_GASTEIZ3[BT:0,0,89,65][BT:0,0,92,53],8*PLF_GASTEIZ3,                                  \
 790                PLF_GASTEIZ3[BT:6,0,89,65][BT:3,0,92,53]:,-6;D_BOEDERITZ3,480,D_BOEDERITZ3,:,38;          \
 791                PAS15,16,D_BOEDERITZ3S,30,LAMP01,40,PAS13,20,PAS08,5,PLF_J2D,10,PAS25,15,PERS05,20,       \
 792                B_SHELTER,26,#PAS05,25,PASG03,10,5,I_TIMTAB1,,5,PLF_J2D,20,PASG02,20,DBAG_STAIRS,30,      \
 793                PASG01,25,PAS11,DUSTBIN1,11,PLF_J2D,25,BANK8,15,BANK8,20,PAS05,28,PAS23,20,BANK8,35,      \
 794                DUSTBIN1,4,16,PASG05,15,BANK04,30,B_SHELTER,26,PAS03,35,BANK01,DUSTBIN1,15,PAS05,12,      \
 795                LAMP01,15,D_BOEDERITZ3S,12,PERS01,20,PERS03,:,8;100,D_BERAUFS1,:,8);                      \
 796                W=X;
 797              M=STOP; POOL=POOL_BLN_S1; D=L; V=10; A=.25; P=*50-10; TB=3-9;
 798            $ENDPATH
 799          $ENDSCENE
 800        }
 801      $ENDSECTION
 802  #--------------------------------------------------------------------------
 803  #
 804  #  Dresden
 805  #
 806      {TRAM|BUS?
 807        $SECTION                                                                                          \
 808            NAME=D_DRESDEN;                                                                               \
 809            SEQ=D; AB=30; %SECFIN;%TITLE([N=Dresden;H=Drezda;]);
 810          {TRAM?
 811            $GROUP                                                                                        \
 812                NAME=D_DD_T1;                                                                             \
 813                LC=1; %GBG(STBGEU,ENV_WAYT1);
 814              TX=Tw 307 + Bw 937;                                                                         \
 815                C=DVB_307,DVB_937;
 816              C=DVB_309~WSI,0-2*DVB_309B~WSI;
 817              C=DVB_MGDSG,|DVB_MGDSGB;
 818              C=DVB_309~PAB,0-2*DVB_309B~PAB;
 819              TX=Tw 308 + Bw 87;                                                                          \
 820                C=(VBD_3_309(|L),VBD_87)|(VBD_4_309(|L),VBD_87);
 821              C=DVB_KLTW~WSI,|DVB_KLBW~WSI;
 822              C=DVB_4012;
 823              C=DVB_644S,|DVB_644SB;
 824              C=DVB_KLTW~PAB,|DVB_KLBW~PAB;
 825              C=DVB_1652,|DVB_1652B;
 826              C=DVB_1660,|DVB_1660B;
 827              TX=Tw 2501;                                                                                 \
 828                C=DVB_2501~WSI;
 829              TX=Tw 2502;                                                                                 \
 830                C=DVB_2501A;
 831              TX=2501;                                                                                    \
 832                C=DVB_2501B|DVB_2501Y|VBD_2501|DVB_2501A~WSI|DVB_2501~WSI;
 833              TX=2502,2503;                                                                               \
 834                C=DVB_2502B|VBD_2502|DVB_2502A~WSI|DVB_2502~WSI|DVB_2502Y|DVB_2503;
 835            $ENDGROUP
 836            $GROUP                                                                                        \
 837                NAME=D_DD_T2;                                                                             \
 838                LC=1; %GBG(STBGEU,ENV_WAYT1);
 839              TX=Tw 1644 + Bw 1135;                                                                       \
 840                C=DVB_MAN~WSI,DVB_MANB~WSI;
 841              TX=MAN 600ff/1000ff,1971 =203 xxx/253 xxx;                                                  \
 842                C=(DVB_T2MANE,2*DVB_B2MANE)|(DVB_T2MAN2,2*DVB_B2MAN2);
 843              TX=MAN 600ff/1000ff,1971 =201 xxx/251 xxx;                                                  \
 844                C=DVB_T2MAN,2*DVB_B2MAN1;
 845              TX=MAN 600ff/1000ff,1971 =201 xxx/251 xxx;                                                  \
 846                C=DVB_MAN~PAB,|DVB_MANB~PAB;
 847              TX=MAN 600ff,1971 =201 xxx;                                                                 \
 848                C=DVB_MAN~SK;
 849            $ENDGROUP
 850            $GROUP                                                                                        \
 851                NAME=D_DD_T3;                                                                             \
 852                LC=1; %GBG(STBGEU,ENV_WAYT1);
 853              TX=Großer Hechtwagen 1701-1733  + Bw 1310-1334;                                             \
 854                C=(DVB_HECHT_TW~SK,DVB_HECHT_BW~SK)|DVB_HECHTL;
 855              C=DVB_KHECHT1|DVB_KHECHT2;
 856              C=DVB_HECHT_TWL~JB,|DVB_HECHT_BWL~JB;
 857              C=DVB_HECHT_TW~JB,|DVB_HECHT_BW~JB;
 858            $ENDGROUP
 859          }
 860          {BUS?
 861            $GROUP                                                                                        \
 862                NAME=D_DD_B1;                                                                             \
 863                LC=1; %GBG(STBGEU,[WT=ENV_WAYO][WA=ENV_WAYA]);
 864              M=FOLLOW;                                                                                   \
 865                C=(DVB_B3GL7;DVB_NAG900N;DVB_500N;DVB_BUSSING);                                           \
 866                D=R;
 867              C=DVB_B6GLN56L;
 868              C=DVB_SKODA_OBUS;
 869            $ENDGROUP
 870          }
 871          {TRAM?
 872            $GROUP                                                                                        \
 873                NAME=D_DD_T4;                                                                             \
 874                LC=1; %GBG(STBGEU,ENV_WAYT1);
 875              C=DVB_LOWA,|DVB_LOWAB;
 876              C=DVB_T50,|DVB_B50;
 877              C=DVB_ET50,|DVB_EB50;
 878              TX=T54 + B54;                                                                               \
 879                C=DVB_3ET54,2*DVB_3EB54;
 880              C=(DVB_ET54L,|DVB_EB54L)|(DVB_ET54,|DVB_EB54);
 881              TX=ET54 + EB54;                                                                             \
 882                C=(DVB_ET54E,2*DVB_EB54E)|(DVB_ET54EL,2*DVB_EB54EL);
 883              C=DVB_ET57A|DVB_ET57C,0-2*DVB_EB57A|DVB_EB57C;
 884              C=DVB_ET57E,0-2*DVB_EB57E;
 885              C=(DVB_ET57L,0-2*DVB_EB57L)|(DVB_ET57,0-2*DVB_EB57);
 886              TX=ET 57 Zr. - 213/263;                                                                     \
 887                C=DVB_T57_1984,DVB_B57_1984;
 888              TX=ET57 + EB57;                                                                             \
 889                C=DVB_T57MUSEUM,DVB_B57MUSEUM;
 890              TX=T4-62 + B4-61;                                                                           \
 891                C=(DVB_GOTHA,DVB_GOTHAB)|(DVB_GOTHAL,DVB_GOTHABL);
 892              TX=2500;                                                                                    \
 893                C=DVB_G4_2500A[#D:R]|DVB_G4_2500AL[#D:L];
 894            $ENDGROUP
 895          }
 896          {BUS?
 897            $GROUP                                                                                        \
 898                NAME=D_DD_B2;                                                                             \
 899                LC=1; %GBG(STBGEU,ENV_WAYA);
 900              M=FOLLOW;                                                                                   \
 901                C=5-8*(VBD_IK66|VBD_YK8503|VBD_RP9253|VBD_RP9253Z|DVB_IK66C|DVB_IK66M);
 902            $ENDGROUP
 903            $GROUP                                                                                        \
 904                NAME=D_DD_B3;                                                                             \
 905                LC=1; %GBG(STBGEU,ENV_WAYA);
 906              M=FOLLOW;                                                                                   \
 907                C=5-8*(DVB_H6BS|DVB_H6BL|DVB_IK55|DVB_IK66|DVB_IK66UE|DVB_IK556|DVB_IK556|DVB_IK180|      \
 908                  DVB_IK180A|DVB_IK180_22|DVB_IK260|DVB_IK280BU|DVB_IK280D|DVB_IK255|DVB_O404D|           \
 909                  DVB_O405D|DVB_O405O);
 910            $ENDGROUP
 911            $GROUP                                                                                        \
 912                NAME=D_DD_B4;                                                                             \
 913                LC=1; %GBG(STBGEU,ENV_WAYA);
 914              M=FOLLOW;                                                                                   \
 915                C=5-8*(VBD_IK180_10|VBD_IK180_10Z|DVB_IK180B|DVB_IK260R|DVB_DDVK133|DVB_DDVK151|          \
 916                  DVB_DDVK182)|                                                                           \
 917                  (VBD_IK280_02ML|DVB_DDVK144L|DVB_DDVK158L|DVB_DDVK165L|DVB_DDVK175L|DVB_DDVK210L);
 918            $ENDGROUP
 919            $GROUP                                                                                        \
 920                NAME=D_DD_B5;                                                                             \
 921                LC=1; %GBG(STBGEU,ENV_WAYA);
 922              M=FOLLOW;                                                                                   \
 923                C=5-8*(DVB_MB405NG|DVB_IK417D|DVB_AGG300)|(DVB_MB405NGL|DVB_CITAROL);
 924            $ENDGROUP
 925          }
 926          {TRAM?
 927            $GROUP                                                                                        \
 928                NAME=D_DD_T5;                                                                             \
 929                LC=1; %GBG(STBGEU,ENV_WAYT1);
 930              TX=T4D + T4D Pionier-Express;                                                               \
 931                C=[PU](2*DVB_T4DPL)|(2*DVB_T4DP);
 932              TX=T4D + B4D alt;                                                                           \
 933                C=(DVB_T4DA~JP,DVB_B4DA~JP)|(DVB_T4DAL~JP,DVB_B4DAL~JP);
 934              TX=T4D + T4D + B4D alt;                                                                     \
 935                C=[PU](2*DVB_T4DA~JP,DVB_B4DA~JP)|(2*DVB_T4DAL~JP,DVB_B4DAL~JP);
 936              TX=T4D + B4D Wendezug;                                                                      \
 937                C=<DVB_T4DZ~PAB,DVB_B4DZ~PAB,DVB_T4DZL~PAB;
 938              TX=T4D + B4D neu;                                                                           \
 939                C=(DVB_T4D~JP,DVB_B4D~JP)|(DVB_T4DL~JP,DVB_B4DL~JP);                                      \
 940                AB=15;
 941              TX=T4D + T4D alt;                                                                           \
 942                C=[PU](2*DVB_T4DA~JP)|(2*DVB_T4DAL~JP);
 943              TX=T4D + T4D neu;                                                                           \
 944                C=[PU](2*DVB_T4D~JP)|(2*DVB_T4DL~JP);
 945              TX=T4D + T4D + B4D;                                                                         \
 946                C=[PU](2*DVB_T4D~JP,DVB_B4D~JP)|(2*DVB_T4DL~JP,DVB_B4DL~JP);
 947              TX=T4DM + T4DM + B4DM neu;                                                                  \
 948                M=FOLLOW;                                                                                 \
 949                C=[PU](2*DVB_T4DM~JP,DVB_B4DM~JP)|(2*DVB_T4DML~JP,DVB_B4DML~JP);                          \
 950                D=R;
 951              C=DVB_T6A2L~JPD,|DVB_B6A2L~JPD;
 952              C=DVB_T6A2~JPD,|DVB_B6A2~JPD;
 953              C=DVB_T6A2~PAB,|DVB_B6A2~PAB;
 954            $ENDGROUP
 955            $GROUP                                                                                        \
 956                NAME=D_DD_T6;                                                                             \
 957                LC=1; %GBG(STBGEU,ENV_WAYT1);
 958              TX=NGT6DD + NGT6DD;                                                                         \
 959                C=(2*DVB_NGT6DDL~WSI)|(2*DVB_NGT6DD~WSI);
 960              TX=NGT6DD;                                                                                  \
 961                C=DVB_NGT6DDL~WSI|DVB_NGT6DD~WSI|DVB_NGT6DD_DNN(|L)~JB;
 962              TX=NTG6DD-Z;                                                                                \
 963                C=DVB_NGT6DDZ~WSI;
 964              TX=NGT8DD;                                                                                  \
 965                C=DVB_NGT8DDL~WSI|DVB_NGT8DD~WSI;
 966              C=DVB_CITADIS_A1;
 967              TX=NGT12;                                                                                   \
 968                C=DVB_NGT8DDL~WSI|DVB_NGT8DD~WSI;
 969            $ENDGROUP
 970            $GROUP                                                                                        \
 971                NAME=D_DD_T7;                                                                             \
 972                LC=1; %GBG(STBGEU,ENV_WAYT1);
 973              TX=ATw201;                                                                                  \
 974                C=DVB_TW_201(|L);
 975              TX=ATW aus ET 57;                                                                           \
 976                C=DVB_ATZ57;
 977              TX=ATZ57 neu;                                                                               \
 978                C=DVB_ATZ57N;
 979              C=DVB_T4DSO;
 980              C=DVB_T4DSNL;
 981              C=DVB_T4DSN;
 982              TX=AT4D alt;                                                                                \
 983                C=DVB_AT4D~JP|DVB_AT4DL~JP;
 984              TX=AT4D Fahrleitungsinspektion neu;                                                         \
 985                C=DVB_201_002L|DVB_201_002|DVB_201_003L|DVB_201_003;
 986              TX=AT4D;                                                                                    \
 987                C=DVB_GT4DL~JP,DVB_GT4D~JP;
 988              TX=ET 57;                                                                                   \
 989                M=BACK;                                                                                   \
 990                C=DVB_ATZ57;                                                                              \
 991                T=2,PD,5,PU,2;
 992              TX=CarGoTram;                                                                               \
 993                C=DVB_CARGOL|DVB_CARGO(|L);
 994            $ENDGROUP
 995          }
 996          {BUS?
 997            $GROUP                                                                                        \
 998                NAME=D_DD_B6;                                                                             \
 999                LC=1; %GBG(STBGEU,ENV_WAYA);
1000              M=FOLLOW;                                                                                   \
1001                C=4-6*DVB_(500N|B3GL7|BUSSING|H6BL|H6BS|IK180(|A|_22)|IK55|IK556|IK66(|UE)|NAG900N);
1002              M=FOLLOW;                                                                                   \
1003                C=3-5*DVB_(CITARO|IK280LEARN|IK417|INFOMOBIL|MB405NG|O404D|O405(D|O));
1004            $ENDGROUP
1005          }
1006        $ENDSECTION
1007      }
1008  #-----------------------------------------------------------------------------
1009  #
1010  # Dortmund
1011  #
1012      {TRAM|BUS?
1013        $SECTION                                                                                          \
1014            NAME=D_DORTMUND;                                                                              \
1015            SEQ=D; AB=30; %SECFIN;%TITLE(Dortmund);
1016          {TRAM?
1017  # Epoche 3
1018            $GROUP                                                                                        \
1019                NAME=D_DORTMUND1;                                                                         \
1020                LC=3; %GBG(STBGEU,ENV_WAYT1);
1021  #             LC=3; ENV=$EBG(STBGEU),                                                                   &\
1022  #             $EWX(WT,$FLG(X,ENV_WAYT3,ENV_WAYT1)),                                                     &\
1023  #             $EWX(WA,ENV_WAYA);
1024              TX=Dortmund T4 1-10 + Bw 801ff SL 5;                                                        \
1025                C=DO_2T4_1,DO_2B4_800;
1026              TX=Dortmund T2 200 - 242 + B2 1921;                                                         \
1027                C=DO_3T2_25,DO_3B2_21;
1028              TX=Dortmund T2 243 - 275 + B2 1930;                                                         \
1029                C=DO_3T2_250C,DO_3B2_660C;
1030              TX=Dortmund T2 275 + B2 KSW 680;                                                            \
1031                C=DO_3A_T2,DO_3B2_680;
1032              TX=Dortmund T2 275 + B2 KSW 680;                                                            \
1033                C=DO_3A_T2,DO_3B2_680;
1034              TX=Dortmund T4 301 + B4 811;                                                                \
1035                C=(DO_3T4AL,DO_3B4AL)|(DO_3T4A,DO_3B4A);
1036              TX=Dortmund T2 200 - 242 + B2 1921;                                                         \
1037                C=DO_4_T2_25,DO_4B2_21;
1038              TX=Dortmund T2 243 - 275 + B2 1930;                                                         \
1039                C=DO_3T2_250B~JMU,DO_3B2_660B;
1040              TX=Dortmund T2 + B2;                                                                        \
1041                C=DO_3B_T2_182|DO_4T2~JMU,DO_4B2;
1042              TX=Dortmund T3 + B2;                                                                        \
1043                C=DO_4A_279|DO_3B_T2_182|DO_4A_T3,DO_4B2;
1044              TX=Dortmund T4 301 + B4 811;                                                                \
1045                C=(DO_3T4L|DO_4T4L~JMU,DO_3B4L)|(DO_3T4|DO_4T4~JMU,DO_3B4);
1046              TX=Dortmund GT4 411;                                                                        \
1047                C=DO_3GT4(|L);
1048              TX=Dortmund GT8;                                                                            \
1049                C=DO_GT8_(45_1960B|61_1960B|71_1964B|76_1965B);
1050              TX=Dortmund GT8;                                                                            \
1051                C=DO_GT8_52_1959B(|L);
1052              TX=Dortmund GT8;                                                                            \
1053                C=DO_GT8_(62_1959B|7_1969B)(|[!L]);
1054            $ENDGROUP
1055  # Epoche 4
1056            $GROUP                                                                                        \
1057                NAME=D_DORTMUND2;                                                                         \
1058                LC=3; %GBG(STBGEU,ENV_WAYT1);
1059  #             LC=3; ENV=$EBG(STBGEU),                                                                   &\
1060  #             $EWX(WT,$FLG(X,ENV_WAYT3,ENV_WAYT1)),                                                     &\
1061  #             $EWX(WA,ENV_WAYA);
1062              TX=Dortmund N8;                                                                             \
1063                C=DO_N8C101_1978(|[!L]);
1064              TX=Dortmund N8;                                                                             \
1065                C=(DO_4N8B|DO_4N8_127)(|[!L]);
1066              TX=Dortmund T4 203/303 + B4 812;                                                            \
1067                C=(DO_T4_303L|DO_T4_203L,DO_B4_812L)|(DO_T4_303|DO_T4_203,DO_B4_812);
1068              TX=Dortmund GT4 + B2;                                                                       \
1069                C=DO_4GT4(|L)~JMU,DO_4B2~JMU;
1070              TX=Dortmund T2 217 + 598;                                                                   \
1071                C=DO_4T2_217,DO_4B2_598;
1072              TX=Dortmund T2 259 + 677;                                                                   \
1073                C=DO_4T2_259,DO_4B2_677;
1074              TX=Dortmund GT4 435;                                                                        \
1075                C=DO_GT435R(|L);
1076              TX=Dortmund ATw 910 Fahrschule;                                                             \
1077                C=DO_5FAHRSCHULE(|L)~JMU;
1078              TX=Dortmund GT8;                                                                            \
1079                C=DO_4GT8_3B(|L)|DO_GT8_55_1978B(|L)|DO_GT8_58_1976B(|L);
1080              TX=Dortmund GT8;                                                                            \
1081                C=DO_GT8_(5_1988B|36_1985B|76_1981B|84_1987B|60_1980B|41_1981B);
1082              TX=Dortmund GT8;                                                                            \
1083                C=DO_GT8_(59_1974B|53_1974B|48_1974B|72_1974B|72_1974B|76_1974B|91_1977B);
1084              TX=Dortmund GT8;                                                                            \
1085                C=DO_GT8_(8_1985B|31_1974B|52_1981|87_1985L|89_1983B)(|[!L]);
1086              TX=Dortmund GT8;                                                                            \
1087                C=(DO_4GT8_45B|DO_4GT8_19B)(|[!L]);
1088            $ENDGROUP
1089  # Epoche 5-6
1090            $GROUP                                                                                        \
1091                NAME=D_DORTMUND3;                                                                         \
1092                LC=3; %GBG(STBGEU,ENV_WAYT3);
1093  #             LC=3; ENV=$EBG(STBGEU),                                                                   &\
1094  #             $EWX(WT,$FLG(X,ENV_WAYT3,ENV_WAYT1)),                                                     &\
1095  #             $EWX(WA,ENV_WAYA);
1096              TX=Dortmund GT8 221 1996;                                                                   \
1097                C=DO_GT8_221_1996;
1098              TX=Dortmund GT8;                                                                            \
1099                C=DO_5GT8_(7|5)B(|[!L]);
1100              TX=Dortmund GT8;                                                                            \
1101                C=DO_GT8_2_1995B|DO_5GT8_1B;
1102              TX=Dortmund GT8;                                                                            \
1103                C=DO_5GT8_(15|12|13)B;
1104              TX=Dortmund GT8 DO_6GT8_(5|14);                                                             \
1105                C=DO_5N8_148(|[!L]);
1106              TX=Dortmund N8C 2000;                                                                       \
1107                C=1-2*((DO_5N8B|DO_5N8_116|DO_5N8_137)(|[!L]));
1108              TX=Dortmund N8C 2000;                                                                       \
1109                C=1-2*((DO_5N8_113|DO_5N8_116|DO_5N8_137)(|[!L]));
1110              TX=Dortmund N8C 2005;                                                                       \
1111                C=1-2*(DO_5N8_148(|[!L])|DO_6N8(|[!L]));
1112              TX=Dortmund N8 116 2008;                                                                    \
1113                C=DO_6N8_116(|[!L]);
1114              TX=Dortmund N8 111 2008;                                                                    \
1115                C=DO_6N8_111(|[!L]);
1116              TX=Dortmund N8 132 2009;                                                                    \
1117                C=DO_5N8_132(|[!L]);
1118              TX=Dortmund N8 112 2006;                                                                    \
1119                C=DO_5N8_112(|[!L]);
1120              TX=Dortmund Flexity Classic 1ff;                                                            \
1121                C=DO_FLEXITY_CLASSIC;
1122              TX=Dortmund B80;                                                                            \
1123                C=2*DO_4B80(|L);                                                                          \
1124                F=X;
1125              TX=Dortmund B80;                                                                            \
1126                C=DO_B8~WSI;                                                                              \
1127                F=X;
1128              TX=Dortmund B80;                                                                            \
1129                C=2*DO_6B80;                                                                              \
1130                F=X;
1131              TX=Dortmund ATW 902;                                                                        \
1132                C=DO_6A902(|L);                                                                           \
1133                F=X;
1134            $ENDGROUP
1135  # Museum Mooskamp
1136            $GROUP                                                                                        \
1137                NAME=D_DORTMUND4;                                                                         \
1138                LC=3; %GBG(STBGDE01O,ENV_WAYT17);
1139  #             LC=3; ENV=$EBG(STBGDE01O),                                                                &\
1140  #             $EWX(ENV_WAYT17);
1141              TX=Dortmund Museum Mooskamp KLV 51 + GT8 13;                                                \
1142                C=DO_MOOS_KLV51_2022(|L),DO_MOOS_13[PD](|L);
1143              TX=Dortmund Museum Mooskamp KLV 51 + GT8 87;                                                \
1144                C=DO_MOOS_KLV51_2022(|L),DO_MOOS87[PD](|[!L]);
1145              TX=Dortmund Museum Mooskamp KLV 51 + T4 304;                                                \
1146                C=DO_MOOS_KLV51(|L),DO_MOOS_304(|L)[PD](|[!L]);
1147              TX=Dortmund Museum Mooskamp 431 + 915;                                              \
1148                C=(<DO_MOOS_GT4_431L,DO_MOOS_ABW915L)|(>DO_MOOS_GT4_431,DO_MOOS_ABW915);
1149            $ENDGROUP
1150          }
1151          {BUS?
1152            $GROUP                                                                                        \
1153                NAME=D_DORTMUND5;                                                                         \
1154                LC=3; %GBG(STBGEU,ENV_WAYA);
1155  #             LC=3; ENV=$EBG(STBGEU),                                                                   &\
1156  #             $EWX(WA,ENV_WAYA);
1157              TX=Dortmunder Stadtwerke AG;                                                                \
1158                M=FOLLOW;                                                                                 \
1159                C=5*DO_(SL200(A|B|C)|SL202_LEARN|NM223|NL202|NL223|SG242H|NG263|NG313_POCO|2:NG272(|_2)|  \
1160                  2:O405(GN|N)|A360|AG300|2:N4421_ERDGAS(|2));                                            \
1161                D=R;
1162              TX=Dortmund,Quecke-Reisen;                                                                  \
1163                M=FOLLOW;                                                                                 \
1164                C=(QUECKE_S315NF;QUECKE_O405N;QUECKE_NL242);
1165              TX=Dortmund,TRD-Reisen;                                                                     \
1166                M=FOLLOW;                                                                                 \
1167                C=(TRD_NL263;TRD_N4014;TRD_AGORA);
1168              TX=Dortmund. Verkehrsgesellschaft Breitenbach;                                              \
1169                M=FOLLOW;                                                                                 \
1170                C=(VGB_NL202;VGB_NL202_SCHULTE;VGB_NL263;VGB_NG272_1567);
1171              TX=Dortmund,Zeretzke-Reisen;                                                                \
1172                M=FOLLOW;                                                                                 \
1173                C=(ZERE_NL202;ZERE_TEAMSTAR;ZERE_N4014;ZERE_N4015;ZERE_S215SL;ZERE_S315NF);
1174            $ENDGROUP
1175          }
1176        $ENDSECTION
1177      }
1178  #--------------------------------------------------------------------------
1179  #
1180  #  Duisburg
1181  #
1182      {TRAM|BUS?
1183        $SECTION                                                                                          \
1184            NAME=D_DUISBURG;                                                                              \
1185            SEQ=D; AB=30; %SECFIN;%TITLE(Duisburg);
1186          {TRAM?
1187            $GROUP                                                                                        \
1188                NAME=D_DUISBURG1;                                                                         \
1189                TX=Duisburg;                                                                              \
1190                LC=3; %GBG(STBGEU,ENV_WAYT1);
1191  #             LC=3; ENV=$EBG(STBGEU),                                                                   &\
1192  #             $EWX(WT,$FLG(X,ENV_WAYT3,ENV_WAYT1)),                                                     &\
1193  #             $EWX(WA,ENV_WAYA);
1194              TX=Duisburg 6xERGelTw 176 - 177,Harkortwagen,ex ZR Bj. 1926 / 1926-1950;                    \
1195                C=DU_2HARKORT;
1196              TX=Duisburg 2xTw 178 - 202 + Bw 299 - 313 Bj. 1927-29;                                      \
1197                C=DU_2T2,DU_2B2;
1198              TX=Duisburg 2xTw 178 - 202 + 4x GR BW 259 - 261;                                            \
1199                C=DU_2T2,DU_3B4ZR;
1200              TX=Duisburg 2xTw 178 - 202 + 4x GrBw;                                                       \
1201                C=DU_2T2,DU_3B4ZR;
1202              TX=Duisburg Tw 402;                                                                         \
1203                C=DU_1T2;
1204              TX=Duisburg 4xGrTw;                                                                         \
1205                C=DU_3T4A(|L);
1206              TX=Duisburg ATW + Schneepflug;                                                              \
1207                C=<DU_4AT2SO,DU_4AB2S;                                                                    \
1208                D=R;
1209            $ENDGROUP
1210            $GROUP                                                                                        \
1211                NAME=D_DUISBURG2;                                                                         \
1212                TX=Duisburg;                                                                              \
1213                LC=3; %GBG(STBGEU,ENV_WAYT1);
1214  #             LC=3; ENV=$EBG(STBGEU),                                                                   &\
1215  #             $EWX(WT,$FLG(X,ENV_WAYT3,ENV_WAYT1)),                                                     &\
1216  #             $EWX(WA,ENV_WAYA);
1217              TX=Duisburg 4xGelTw 1168 - 1169 U 1963;                                                     \
1218                C=DU_3GT4_1B;
1219              TX=Duisburg 4xGelTw 1221 - 1227 U 1957;                                                     \
1220                C=DU_3GT4_4(|L);
1221              TX=Duisburg 4xGelTw 1218 - 1220 U 1957;                                                     \
1222                C=DU_4GT4_5L|DU_3GT4_4;
1223              TX=Duisburg 4xGelTw 1168 - 1169 Bj. 1960;                                                   \
1224                C=DU_3GT4_1A(|L);
1225              TX=Duisburg 4xZRGelTw 1166 - 1167 Bj. 1960;                                                 \
1226                C=DU_3GT4_3;
1227              TX=Duisburg Tw 1156 - 1165;                                                                 \
1228                C=DU_4GT4AL|DU_4GT4A;
1229              TX=Duisburg 6xERGelTw 1229 - 1230 / 1964;                                                   \
1230                C=DU_3GT6_1A(|L);
1231              TX=Duisburg 6xERGelTw 1229 - 1230 / 1970;                                                   \
1232                C=DU_4GT6_1A(|L);
1233              TX=Duisburg 6xERGelTw 1231 - 1232;                                                          \
1234                C=DU_4GT6_1B(|L);
1235              TX=Duisburg 6x TW 1233-1245;                                                                \
1236                C=DU_4GT6_2(|L);
1237            $ENDGROUP
1238            $GROUP                                                                                        \
1239                NAME=D_DUISBURG3;                                                                         \
1240                TX=Duisburg;                                                                              \
1241                LC=3; %GBG(STBGEU,ENV_WAYT1);
1242  #             LC=3; ENV=$EBG(STBGEU),                                                                   &\
1243  #             $EWX(WT,$FLG(X,ENV_WAYT3,ENV_WAYT1)),                                                     &\
1244  #             $EWX(WA,ENV_WAYA);
1245              TX=Duisburg 6x TW 1046 - 1076;                                                              \
1246                C=DU_4GT6_3(|L);
1247              TX=Duisburg 8xERGelTw 1017 - 1018 + Bw 2264 - 2265 - Linie D;                               \
1248                C=(DU_4GT8_DSL,DU_4GT8_B4DL)|(DU_4GT8_DS,DU_4GT8_B4D);
1249              TX=Duisburg 8xERGelTw 1019 Linie D;                                                         \
1250                C=DU_4GT8_D2(|L);
1251              TX=Duisburg 8xERGelTw 1020;                                                                 \
1252                C=DU_4GT8_1020(|L);
1253              TX=Duisburg 8xERGelTw 1229 - 1230;                                                          \
1254                C=DU_4GT8_1A(|L);
1255              TX=Duisburg 8xERGelTw 1231 - 1232;                                                          \
1256                C=DU_4GT8_1B(|L);
1257              TX=Duisburg 8xERGelTw 1046 - 1076 + 2xBw ex Neuss;                                          \
1258                C=(DU_4GT8,DU_4B2)|(DU_4GT8L,DU_4B2L);
1259              TX=Duisburg 8xERGelTw 1046 - 1076 + 4xBw;                                                   \
1260                C=(DU_4GT8L,DU_4B4L)|(DU_4GT8,DU_4B4);
1261              TX=Duisburg Tw 1077 - 1079 / 1972;                                                          \
1262                C=DU_4GT8_4(|L);
1263              TX=Duisburg 10xERGelTw 1231 - 1232 / 1972;                                                  \
1264                C=DU_4GT10(|L);
1265            $ENDGROUP
1266            $GROUP                                                                                        \
1267                NAME=D_DUISBURG4;                                                                         \
1268                TX=Duisburg;                                                                              \
1269                LC=3; %GBG(STBGEU,ENV_WAYT3);
1270  #             LC=3; ENV=$EBG(STBGEU),                                                                   &\
1271  #             $EWX(WT,$FLG(X,ENV_WAYT3,ENV_WAYT1)),                                                     &\
1272  #             $EWX(WA,ENV_WAYA);
1273              TX=Duisburg Tw 1208;                                                                        \
1274                C=DU_5GT4L|DU_5GT4;
1275              TX=Duisburg 8xERGelTw 1019;                                                                 \
1276                C=DU_5GT8_1019(|L);
1277              TX=Duisburg 8xERGelTw 1020;                                                                 \
1278                C=DU_5GT8_1020(|L);
1279              TX=Duisburg 8xERGelTw 1229 - 1230;                                                          \
1280                C=DU_5GT8_1A(|L);
1281              TX=Duisburg 8xERGelTw 1231 - 1232;                                                          \
1282                C=DU_5GT8_1B(|L);
1283              TX=Duisburg 8xERGelTw 1046 - 1076 + 2xZRBw;                                                 \
1284                C=DU_4GT8(|L),DU_4B2;
1285              TX=Duisburg 8x TW 1059;                                                                     \
1286                C=DU_6GT8KOPIL|DU_6GT8KOPI;
1287              TX=Duisburg 8x TW 1233-1245;                                                                \
1288                C=DU_5GT8_2|DU_5GT8_2L;
1289              TX=Duisburg 8x 1046-1076 + 2x Bw 2334-2339;                                                 \
1290                C=(DU_5GT8_3,DU_5B2V)|(DU_5GT8_2L,DU_5B2VL);
1291              TX=Duisburg 8x TW 1046-1076;                                                                \
1292                C=DU_5GT8_3|DU_5GT8_2L;
1293            $ENDGROUP
1294            $GROUP                                                                                        \
1295                NAME=D_DUISBURG5;                                                                         \
1296                TX=Duisburg;                                                                              \
1297                LC=3; %GBG(STBGEU,ENV_WAYT3);
1298  #             LC=3; ENV=$EBG(STBGEU),                                                                   &\
1299  #             $EWX(WT,$FLG(X,ENV_WAYT3,ENV_WAYT1)),                                                     &\
1300  #             $EWX(WA,ENV_WAYA);
1301              TX=Duisburg 8xERGelTw 1077 - 1094 Bj. 1971-74mit 4xERGrBw 2259 - 2265 Bj. 1960-72;          \
1302                C=(DU_G82L~WSI,DU_5B4AL)|(DU_G82~WSI,DU_5B4A);
1303              TX=Duisburg 8x TW 1059;                                                                     \
1304                C=DU_6GT8_3(|L);
1305              TX=Duisburg 8x TW 1077;                                                                     \
1306                C=DU_6GT8_4(|L);
1307              TX=Duisburg 8x TW 1000;                                                                     \
1308                C=DU_5GT8_1000;
1309              TX=Duisburg 8xZRGelTw 1001 - 1040,GT8N Bj. 1986-92;                                         \
1310                C=DU_5N8C;
1311              TX=Duisburg 10x TW 1000;                                                                    \
1312                C=DU_6NF10_1000;
1313              TX=Duisburg N10C-DU;                                                                        \
1314                C=DU_6NF10|DU_6NF10W;
1315              TX=Duisburg Variobahn;                                                                      \
1316                C=DU_NF~WSI|DU_VARIO1996;
1317              TX=Duisburg NF8;                                                                            \
1318                C=DU_6NF8;
1319              TX=Duisburg B80 Speisewagen;                                                                \
1320                C=DU_B80_B~WSI(|[!L]),DU_6B80A(|L);                                                       \
1321                F=X;
1322            $ENDGROUP
1323          }
1324          {BUS?
1325            $GROUP                                                                                        \
1326                NAME=D_DUISBURG6;                                                                         \
1327                TX=Duisburg;                                                                              \
1328                LC=3; %GBG(STBGEU,ENV_WAYA);
1329  #             LC=3; ENV=$EBG(STBGEU),                                                                   &\
1330  #             $EWX(WT,$FLG(X,ENV_WAYT3,ENV_WAYT1)),                                                     &\
1331  #             $EWX(WA,ENV_WAYA);
1332              M=FOLLOW;                                                                                   \
1333                C=6*DU_(O305|O405(|N2|O)|NL223(|K)|NG312|AG300(|_FIELMANN)|O405(GN_CNG|N_REAL)|           \
1334                  O530(|G|K)|N4020);
1335            $ENDGROUP
1336          }
1337        $ENDSECTION
1338      }
1339  #--------------------------------------------------------------------------
1340  #
1341  #  Düsseldorf
1342  #
1343        {TRAM|BUS?
1344          $SECTION                                                                                        \
1345              NAME=D_DUSSELDORF;                                                                          \
1346              SEQ=D; AB=30; %SECFIN;%TITLE(Düsseldorf);
1347            {TRAM?
1348              $GROUP                                                                                      \
1349                  NAME=D_D_T1;                                                                            \
1350                  LC=1; %GBG(STBGEU,ENV_WAYT1);
1351                C=HORSE(1|2),D_HW(1|2);                                                                   \
1352                  V=1;
1353                C=D_T2,2-4*D_1HWG2;
1354                TX=Städtische Straßenbahn 2xTw 78-94 + Bw;                                                \
1355                  C=D_1T2Y,D_1HW;
1356                TX=Städtische Straßenbahn 2xTw 78-94 + Bw;                                                \
1357                  C=D_1T2G,D_1_B2G1|D_1_B2G2;
1358                TX=Rheinische Bahngesellschaft AG 4x Tw 200-205 mit Bw;                                   \
1359                  C=D_1K2T,D_1K2TB;
1360                TX=Rheinische Bahngesellschaft AG 2xZRTw mit Bw;                                          \
1361                  C=D_1RBOT2,D_1RBOB2;
1362                TX=Rheinische Bahngesellschaft AG 2xTw 31-37 + Bw;                                        \
1363                  C=D_1RBOT30,D_1RBOB2;
1364                TX=Rheinische Bahngesellschaft AG 2xTw 100-110 + Bw;                                      \
1365                  C=D_RBO_100;
1366                TX=Rheinische Bahngesellschaft AG 2xTw 150-158 + Bw;                                      \
1367                  C=D_RBO_150,D_RBO_150B;
1368                TX=Rheinische Bahngesellschaft AG 2xZRTw mit Bw;                                          \
1369                  C=D_1RBOT2,D_1RBOB2;
1370                TX=Städtische Straßenbahn 2xZRTw 78 - 100 Bj. 1895-97;                                    \
1371                  C=D_1_101,D_1_101B,D_1HWG3;
1372                TX=Städtische Straßenbahn 2xTw Bj. 1899-1902 + Sommer-Bw;                                 \
1373                  C=D_1T2;
1374                TX=Städtische Straßenbahn 2xZRTw 101 - 240 + 2xZR Sommer-Bw,                              \
1375                    offene Plattformen Bj. 1899-1902;                                                     \
1376                  C=D_1_101A,D_1_101B;
1377                TX=Städtische Straßenbahn 2xZRTw 101 - 240 + 2xZRBw 351 - 400,                            \
1378                    offene Plattformen Bj. 1899-1902;                                                     \
1379                  C=D_1_101G,D_1_101BG;
1380                TX=Städtische Straßenbahn 2xZRTw 101 - 240 + Sommerwagen;                                 \
1381                  C=D_1_101G,D_1HWG2,D_1HWG4;
1382                TX=Städtische Straßenbahn 2xTw 400 + Bw 600;                                              \
1383                  C=D_1_500,D_1_500B;
1384                TX=Städtische Straßenbahn Sprengwagen;                                                    \
1385                  C=D_1SPRGC;
1386                TX=Düsseldorf-Duisburger Kleinbahn 1-21 + Bw;                                             \
1387                  C=D_1DDKT,D_1DDKB;
1388              $ENDGROUP
1389              $GROUP                                                                                      \
1390                  NAME=D_D_T2;                                                                            \
1391                  LC=1; %GBG(STBGEU,ENV_WAYT1);
1392                TX=4xZRTw 21 - 30 + 4xZRBw 51,52 Bj. 1898-99;                                             \
1393                  C=D_2KT1,2*D_2KB1;
1394                TX=4xZRTw 21 - 30 + 4xZRBw 51,52 Bj. 1898-99;                                             \
1395                  C=D_1KT4,2*D_1KB4;
1396                TX=Düsseldorf-Duisburg 4xZRTw 12 - 21 + 4xZRBw 56 - 62 Bj. 1926;                          \
1397                  C=D_2T4D,2*D_2B4D;
1398                TX=2xZRTw 101 - 240 Bj. 1899-1902 + 2xZRBw 670 - 830 Bj. 1918-25;                         \
1399                  C=D_2_101A,2*D_2_101BA;
1400                TX=Tw 1120;                                                                               \
1401                  C=D_2_1120;
1402                TX=Tw 1131 + Bw;                                                                          \
1403                  C=D_2_1130,D_2_101BA;
1404                TX=Tw 1-10 Mettmanner Netz 1937;                                                          \
1405                  C=D_2_ME;
1406                TX=500ff + 700ff;                                                                         \
1407                  C=D_2_500,2*D_2_700;
1408                TX=2xTw 1935,Niederflur-Prototyp Bj. 1935;                                                \
1409                  C=D_2_1935;
1410              $ENDGROUP
1411              $GROUP                                                                                      \
1412                  NAME=D_D_T3;                                                                            \
1413                  LC=1; %GBG(STBGEU,ENV_WAYT1);
1414                TX=2xZRTw 241 + 242,Mitteleinstiegs-Zwillingszug,Bj. 1928;                                \
1415                  C=[PBD](<D_2_241L,D_2_241);
1416                TX=2xZRTw 243 + 244,Zwillingszug;                                                         \
1417                  C=[PBD](<D_2_243L,D_2_243);
1418                TX=929ff + 831ff;                                                                         \
1419                  C=D_2_900,D_2_800;
1420                TX=Tw 929ff  + 831ff + Bw 241;                                                            \
1421                  C=D_2_900,D_2_800,D_2_900M;
1422                TX=2xZRTw 1936,Niederflur-Prototyp Bj. 1935 + 2xZRBw 300 - 339 Bj. 1937-43;               \
1423                  C=D_2_1936,D_2_316;
1424                TX=Niederflurzug,Tw 250-296,350-364 + Bw 300 - 339;                                       \
1425                  C=D_2_267,1-2*D_2_316;
1426                TX=Benrather Netz (1000 mm)4xZRTw 106 - 119 Bj. 1935-36 + 2x- Bw Serie 1180 Meterspur;    \
1427                  C=D_2V,2*D_2VB;
1428              $ENDGROUP
1429              $GROUP                                                                                      \
1430                  NAME=D_D_T4;                                                                            \
1431                  LC=1; %GBG(STBGEU,ENV_WAYT4);
1432                TX=4xZRTw 1011 - 1013 + 4xZRBw 1069 - 1080;                                               \
1433                  C=D_2KT3(|L),2*D_2KB2;
1434                TX=4xZRTw 1001 - 1003 + 4xZRBw 1069 - 1080,tlw. Speisewagen Bj. 1925;                     \
1435                  C=D_2KT2(|L),D_2KB3,D_2KB2;
1436                TX=Düsseldorf-Duisburg 4xZRTw 12 - 21 + 4xZRBw 56 - 62,tlw. Speisewagen Bj. 1926;         \
1437                  C=D_2T4D,D_2B4DSP,D_2B4D;
1438                TX=4xZRTw 1011 - 1013 + 4xZRBw 1069 - 1080,tlw. Speisewagen Bj. 1925;                     \
1439                  C=D_2KT2,D_2KB3,D_2KB4|D_2KB5;
1440                TX=4xZRGrTw 1251 - 1258 + 4xZRGrBw 1201 - 1204,Typ K53 Bj. 1953;                          \
1441                  C=(D_3K53CT|D_3K53CT[!L]),D_3K53CB,([PD](D_3K53CT|D_3K53CT[!L]));
1442                TX=4xTw ex DDK + 4xBw ex DDK,1965;                                                        \
1443                  C=D_3DT4,2*D_3DB4;
1444                TX=4xZRTw 1011 - 1013 + 4xZRBw 1069 - 1080,1955;                                          \
1445                  C=D_3K2,D_2KB2,D_2KB3;
1446                TX=4xZRGrTw 1251 - 1258 + 4xZRGrBw 1201 - 1204,Typ K53Bj. 1953;                           \
1447                  C=((D_3K53GT|D_3K53GT[!L]),D_3K53GB,((D_3K53GT|D_3K53GT[!L])[PD]))|                     \
1448                    ((D_3K53SGT|D_3K53SGT[!L]),D_3K53SGB,([PD](D_3K53SGT|D_3K53SGT[!L])));
1449                TX=4xZRGrTw 1251 - 1258 + 4xZRGrBw 1201 - 1204,Typ K53 Bj. 1953;                          \
1450                  C=(<D_3K53CTL[#D=L],D_3K53CB|D_3K53SB,D_3K53CT[PD])|                                    \
1451                    (<D_3K53CTL[PD][#D=R],D_3K53CB|D_3K53SB,D_3K53CT);
1452                TX=8xZRGelTw 1261 - 1264,ex 1251 - 1258,Typ K53U Umbau 1964;                              \
1453                  C=(D_5K53U,D_5K53UB)|(D_4K53U,D_4K53UB);
1454                TX=K53U + Speisewagen;                                                                    \
1455                  C=D_4K53U,D_3K53SB;
1456                TX=K 66;                                                                                  \
1457                  C=D_4K66,D_4B66;
1458              $ENDGROUP
1459              $GROUP                                                                                      \
1460                  NAME=D_D_T15;                                                                           \
1461                  TX=4x GrTw + 4xGrBw 1965;                                                               \
1462                  LC=2;                                                                                   \
1463                  C=(D_4XGR_KA3L[!E3],D_B4_16GPEL)|(D_4XGR_KA3[!E3],D_B4_16GPE[!E3])|                     \
1464                  (D_4XGR_DOL[!E3],D_4B4AL)|(D_4XGR_DO[!E3],D_4B4A[!E3]); %GBG(STBGEU,ENV_WAYT1);
1465                TX=4x GrTw + 4xGrBw 1970;                                                                 \
1466                  C=(D_4XGR_PE3L,D_B4_16GPEL)|(D_4XGR_PE3,D_B4_16GPE);
1467                TX=6x GelTw + 4x GrBw 1617-1632 / 1965;                                                   \
1468                  C=(D_GT6E_PE3L[!E3],D_4B4AL)|(D_GT6E_PE3[!E3],D_4B4A[!E3]);
1469                TX=6x GelTw 1963 + 4x GrBw 2201;                                                          \
1470                  C=(D_GT6E_DEL,D_3B422L)|(D_GT6E_DE,D_3B422);
1471                TX=6x GelTw 1974;                                                                         \
1472                  C=D_2312GBR(|L);
1473                TX=6x GelTw + Bw 2001 ff / 1974;                                                          \
1474                  C=(D_GT6E_RHL,D_B4_20PEL)|(D_GT6E_RH,D_B4_20PE);
1475                TX=6x GelTw 1974 + Bw 1633 ff;                                                            \
1476                  C=(D_GT6E_RCL,D_4B4L)|(D_GT6E_RC,D_4B4);
1477                TX=8x GelTw 23xx - 25xx;                                                                  \
1478                  C=D_4GT8_4TJ(|L)|D_GT8E_AL(|L);
1479                TX=8x GelTw 23xx - 25xx + 4x GrBw;                                                        \
1480                  C=(D_GT8E_(BO|MA|JA)L,D_(3B422|4B4A|4B4)L)|(D_GT8E_(BO|MA|JA),D_(3B422|4B4A|4B4)[!E3]);
1481              $ENDGROUP
1482              $GROUP                                                                                      \
1483                  NAME=D_D_T5;                                                                            \
1484                  LC=2; %GBG(STBGEU,ENV_WAYT1);
1485                TX=2xZRTw 9 - 11 + 2xZRBw 22,ex Gummersbach Bj. 1915;                                     \
1486                  C=D_3GUT,D_3GUB;
1487                TX=2xZRTw 1 - 8,ex Mettmann,Bj. 1924;                                                     \
1488                  C=D_1_3;
1489                TX=2xTw 500 + Bw 700;                                                                     \
1490                  C=D_3_500,D_3_700A,D_3_700;
1491                TX=2xTw 900 + Bw 800;                                                                     \
1492                  C=D_3_900,D_3_800;
1493                TX=2xZRTw 24 - 30,ex Siegen Bj. 1929;                                                     \
1494                  C=D_3SI;
1495                TX=KSW-Zug,Tw 11-16 + Bw 30-42,332,333;                                                   \
1496                  C=D_3KSWT,2*D_3KSWB;
1497                TX=Verbandstyp-Zug TW 365-394 + 4x GRBw 1603-1616 + Bw 341-348,600-655;                   \
1498                  C=(D_3_380[#D=L],D_3G380L,D_3_643)|(D_3_380[#D=R],D_3G380,D_3_643);
1499                TX=Verbandstyp-Zug TW 365-394 + Bw 341-348,600-655 + Bw 300 - 339;                        \
1500                  C=D_3_380,D_3_643,D_2_316;
1501                TX=Verbandstyp-Zug ex Siegen 10 + 43 + 44;                                                \
1502                  C=D_3SIAFBT,2*D_3SIAFBB;
1503                TX=4xZRTw Serie 1400 Bj. 1898-99;                                                         \
1504                  C=D_3K1;
1505                TX=Benrather Netz (1000 mm)4xZRTw 106 - 119 Bj. 1935-36 + 2x Bw Serie 800 Bj. 1928;       \
1506                  C=D_3VT(|L),D_3VB;
1507                TX=Benrather Netz (1000 mm)2x ATw 121 + Bw;                                               \
1508                  C=D_3V121,D_2VB;
1509                TX=4xERGrTw 22,25,26 + 4xERGrBw 62,65,Prototypen Bj. 1951;                                \
1510                  C=(D_3T4P,D_3B4P)|(D_3T4PL,D_3B4PL);
1511                TX=4xERGrTw 2001 - 2032 + 4xERGrBw 2000/2200 Bj. 1952-55;                                 \
1512                  C=(D_4T4_PONYL,D_4B4AL)|(D_4T4_PONY,D_4B4A)|(D_4T4L,D_4B4AL)|(D_4T4,D_4B4A);
1513                TX=8xERGelTw 2151,ex 4xGrTw + 4xGrBw Umbau 1966 / 1984;                                   \
1514                  C=D_2151RJ(|L);
1515                TX=6xERGelTw 2301 - 2623 Bj. 1956-65 + 4xERGrBw 1617 - 1632 Bj. 1954-55;                  \
1516                  C=D_4GT6L|D_4GT6,D_4B4AL[#D:L]|D_4B4A[#D:R];
1517                TX=6xZRGelTw 1281 - 1283,ex Neuss Bj. 1961;                                               \
1518                  C=D_4GT6NE;
1519                TX=8xERGelTw 2351 - 2559;                                                                 \
1520                  C=D_4GT8_4TL|D_4GT8_4T;
1521                TX=Tw 2498;                                                                               \
1522                  C=(D_4GT8DL,D_4B4DL)|(D_4GT8D,D_4B4D);                                                  \
1523                  D=R;
1524                TX=8xERGelTw 2651 - 2968 Bj. 1969-74;                                                     \
1525                  C=(D_4GT8_5TL,D_4B4L)|(D_4GT8_5T,D_4B4);
1526              $ENDGROUP
1527            }
1528            {BUS?
1529              $GROUP                                                                                      \
1530                  NAME=D_D_B1;                                                                            \
1531                  LC=1; %GBG(STBGEU,ENV_WAYA);
1532                M=FOLLOW;                                                                                 \
1533                  C=4*(D_TU10L|D_PRAFEKTL|D_750HOML|D_SLE200L|(D_SLE200L,D_SLE200T)|D_SL192L|D_SG192L|    \
1534                    D_S80L);
1535                M=FOLLOW;                                                                                 \
1536                  C=5*(D_TU10|D_PRAFEKT|D_750HOM|D_750HOM_8921|D_750HO~LDV|D_750HO~AXS|D_SLE200|          \
1537                    (D_SLE200,D_SLE200T)|D_SL192|D_SG192|D_SG192F|D_S80);
1538              $ENDGROUP
1539              $GROUP                                                                                      \
1540                  NAME=D_D_B2;                                                                            \
1541                  LC=1; %GBG(STBGDRA,ENV_WAYO);
1542                TX=O-Bus Mettmann - Gruiten;                                                              \
1543                  C=D_(2_O1_2|3_O1_2)(|L);
1544              $ENDGROUP
1545            }
1546            {TRAM?
1547              $GROUP                                                                                      \
1548                  NAME=D_D_T6;                                                                            \
1549                  LC=3; %GBG(STBGEU,ENV_WAYT1);
1550                TX=Großraumzug Tw 2001ff + Bw 1601 ff;                                                    \
1551                  C=(D_4XGR_KA3L,D_4B4AL)|(D_4XGR_KA3,D_4B4A);
1552                TX=Großraumzug Tw 2101ff + Bw 1801 ff;                                                    \
1553                  C=(D_4XGR_PE3L,D_3B422L)|(D_4XGR_PE3,D_3B422);
1554                TX=Großraumzug Tw 2101ff + Bw 1801 ff;                                                    \
1555                  C=(D_4XGR_DOL,D_B4_16GPEL[!E3],D_B4_20PEL)|(D_4XGR_DOL,D_B4_16GPE[!E3],D_B4_20PE[!E3]);
1556                TX=6x GelTw 2312;                                                                         \
1557                  C=D_2312GBR(|L);
1558                TX=8x GelTw Düwag 2651 ... 2967 + Bw 1633 ff;                                             \
1559                  C=(D_GT8E_ALL,D_4B4L)|(D_GT8E_AL,D_4B4);
1560                TX=8x GelTw Düwag 2351 ... 2558;                                                          \
1561                  C=(D_GT8E_BO|D_GT8E_MA|D_GT8E_JA)(|L);
1562                TX=6x GelTw 23xx - 25xx;                                                                  \
1563                  C=(D_GT6E_PE3|D_GT6E_DE,D_4B4)|(D_GT6E_PE3L|D_GT6E_DEL,D_4B4L);
1564                TX=6x GelTw 23xx - 25xx;                                                                  \
1565                  C=(D_GT6E_RC|D_GT6E_RH)(|L);
1566                TX=Tw 23xx + Bw 16xx;                                                                     \
1567                  C=(D_5GT6_PERSILL,D_5B4_PERSILL)|(D_5GT6_PERSIL,D_5B4_PERSIL)|(D_5GT6,|D_5B4(A|B))|     \
1568                    (D_5GT6L,|D_5B4(A|B)L)|(D_GT6L~GW,D_5B4BL)|(D_GT6~GW,D_5B4B);
1569                TX=6xERGelTw 2701 - 2703,ex 1281 - 1283,Umbau zu ERTw;                                    \
1570                  C=(D_5GT6NE,D_5B4B)|(D_5GT6NEL,D_5B4BL);
1571                TX=2014 + 1609;                                                                           \
1572                  C=D_3T4,D_3B4;
1573                TX=Tw 2265-2269 (K66);                                                                    \
1574                  C=D_5K66|D_2265;
1575                TX=Tw 235x-255x;                                                                          \
1576                  C=D_5GT8_5T(|L)|D_5GT8_4T(|L);
1577                TX=Tw 28xx + Bw 16xx;                                                                     \
1578                  C=(D_5GT8_5T,D_5B4C)|(D_5GT8_5TL,D_5B4CL);
1579                C=D_5GT6_PERSILL,|D_5B4_PERSILL;
1580              $ENDGROUP
1581
1582              $GROUP                                                                                      \
1583                  NAME=D_D_T10;                                                                           \
1584                  LC=2; %GBG(STBGEU,ENV_WAYT1);
1585                TX=Tw 2116 + Bw 1831 / 1988;                                                              \
1586                  C=(D_T4_2111,D_4B4_1812RPE2)|(D_T4_2111L,D_4B4_1812RPE2L);
1587                TX=Tw 2101 + Bw 1804 / 1988;                                                              \
1588                  C=(D_T4_2107,D_5B4C)|(D_T4_2107L,D_5B4CL);
1589                TX=Tw 2105 + Bw 1827 / 1988;                                                              \
1590                  C=(D_5T4,D_4B4_1828RPE1)|(D_4B4_1828RPE1L);
1591                TX=Tw 2107 + Bw 1803 / 1986;                                                              \
1592                  C=(D_T4_2112,D_B4_1808RGR)|(D_T4_2112L,D_B4_1808RGRL);
1593                TX=Tw 2104 + Bw 1828 / 1986;                                                              \
1594                  C=(D_T4_2104,D_4B4_1828RPE1)|(D_T4_2104L,D_4B4_1828RPE1L);
1595                TX=Tw 2113 + Bw 1827 / 1986;                                                              \
1596                  C=(D_T4_2113,D_4B4_1828RPE1)|(D_T4_2113L,D_4B4_1828RPE1L);
1597                TX=Tw 2101 + Bw 1619 / 1981;                                                              \
1598                  C=(D_T4_2101RGR,D_4B4_1619RPE1)|(D_T4_2101RGRL,D_4B4_1619RPE1L);
1599                TX=Tw 2519 + Bw 1633 / 1987;                                                              \
1600                  C=(D_GT6E_2316RAR,D_4_B1633P)|(D_GT6E_2316RARL,D_4_B1633PL);
1601                TX=Tw 2508 + Bw 1206/ 1988;                                                               \
1602                  C=(D_GT6_2318RPI,D_1205RJ)|(D_GT6_2318RPIL,D_1205RJL);
1603                TX=Tw 2415 + 1666;                                                                        \
1604                  C=(D_GT6_2415RWO,D_B4_1666RGR)|(D_GT6_2415RWOL,D_B4_1666RGRL);
1605                TX=Tw 2318 + 1625 / 1988;                                                                 \
1606                  C=(D_GT6_2318RPI,D_4B4_1625RPE2)|(D_GT6_2318RPIL,D_4B4_1625RPE2L);
1607                TX=6x Tw Er Düwag + 4x GRBw 1621;                                                         \
1608                  C=(D_GT6E_HD,D_5B4A_1621RSP)|(D_GT6E_HDL,D_5B4A_1621RSPL);
1609                TX=6x Tw Er Düwag + 4x GRBw 1621;                                                         \
1610                  C=(D_GT6E_HD,D_5B4A_1621RSP)|(D_GT6E_HDL,D_5B4A_1621RSPL);
1611                TX=6x Tw Er Düwag 2502 + 4x GRBw;                                                         \
1612                  C=(D_GT6E_2502RWUV,D_5B4B)|(D_GT6E_2502RWUVL,D_5B4BL);
1613                TX=6x Tw Er Düwag 2503 + 4x GRBw;                                                         \
1614                  C=(D_2503RWZ,D_4_B1633P)|(D_2503RWZL,D_4_B1633PL);
1615                TX=6x Tw Er Düwag + 4x GRBw;                                                              \
1616                  C=(D_GT6E_LBS|D_GT6E_CA,D_5B4B)|(D_GT6E_LBSL|D_GT6E_CAL,D_5B4BL);
1617                TX=Tw 2411 + 1662 / 1988;                                                                 \
1618                  C=(D_GT6E_2411RSCA,D_5B4B_1662RSP)|(D_GT6E_2411RSCL,D_5B4B_1662RSPL);
1619                TX=Tw 2601 + 4x GRBw;                                                                     \
1620                  C=(D_GT6E_2601RST,D_4B4)|(D_GT6E_2601RSTL,D_4B4L);
1621                TX=Tw 2519 + 4x GRBw;                                                                     \
1622                  C=(D_2519RMA,D_5B4PE)|(D_2519RMAL,D_5B4PEL);
1623                TX=6x Tw Er Düwag;                                                                        \
1624                  C=(D_5GT6_GATZ|D_GT6_WG)(|L);
1625              $ENDGROUP
1626
1627              $GROUP                                                                                      \
1628                  NAME=D_D_T11;                                                                           \
1629                  LC=2; %GBG(STBGEU,ENV_WAYT1);
1630                TX=Tw 2498 + Bw 1637 / 1988;                                                              \
1631                  C=(D_2498SA,D_5B4B_1662RSP)|(D_2498SAL,D_5B4B_1662RSPL);
1632                TX=Tw 2499 / 1988;                                                                        \
1633                  C=D_2498SA(|L);
1634                TX=8x GelTw Düwag 2351 ... 2558;                                                          \
1635                  C=D_GT8E_VA(|L),D_GT8E_FA(|L)|D_GT8E_WZ(|L);
1636                TX=8x GelTw Düwag 2651 ... 2967;                                                          \
1637                  C=D_GT8E_FU(|L)|D_GT8E_SK(|L)|D_GT8E_TI(|L);
1638                TX=8x GelTw Düwag 2651 ... 2967 + Bw 1633 - 1700;                                         \
1639                  C=(D_GT8E_STH|D_GT8E_SA|D_GT8E_SP4,D_5B4B)|(D_GT8E_STHL|D_GT8E_SAL|D_GT8E_SP4L,D_5B4BL);
1640                TX=8x GelTw Düwag 2651 ... 2967;                                                          \
1641                  C=D_GT8E_VA5(|L)|D_GT8E_GA(|L)|D_GT8E_GE(|L);
1642                TX=8x GelTw Düwag 2351 ... 2558;                                                          \
1643                  C=D_GT8E_SH(|L),D_GT8E_STP(|L)|D_GT8E_ALG(|L);
1644                TX=8x GelTw Düwag 2452;                                                                   \
1645                  C=D_GT8E_2452RSCH(|L);
1646                TX=8x GelTw Düwag 2454;                                                                   \
1647                  C=D_GT8E_2454RTR(|L);
1648                TX=8x GelTw Düwag 2758 + Bw 1700;                                                         \
1649                  C=(D_GT8E_2758RSI,D_5B4B_1700RJA)|(D_GT8E_2758RSIL,D_5B4B_1700RJAL);
1650                TX=8x GelTw Düwag 2666 + Bw 1801;                                                         \
1651                  C=(D_GT8E_2666RMF,D_1801RJ)|(D_GT8E_2666RMF,D_1801RJ);
1652                TX=8x GelTw Düwag 2651 ... 2967;                                                          \
1653                  C=D_GT8E_ST(|L)|D_GT8E_GS(|L)|D_GT8E_SP4(|L);
1654                TX=8x GelTw Düwag 2351 ... 2558;                                                          \
1655                  C=D_GT8E_JU(|L),D_GT8E_ER(|L);
1656                TX=8x GelTw Düwag 2351 ... 2558;                                                          \
1657                  C=D_GT8E_DO(|L),D_GT8E_SP(|L)|D_GT8E_DU(|L);
1658                TX=8x GelTw Düwag 2651 ... 2967;                                                          \
1659                  C=D_GT8E_STH(|L)|D_GT8E_SHB(|L)|D_GT8E_SA(|L);
1660              $ENDGROUP
1661              $GROUP                                                                                      \
1662                  NAME=D_D_T7;                                                                            \
1663                  LC=1; %GBG((STBGMD|STBGFO),ENV_WAYT3);
1664                TX=Gt8S Bj. 1973-1975,Speisewagen 76 1980;                                                \
1665                  C=D_5GT8S_R(|L),D_5GT8S(|L);
1666                TX=GT8SU 3101 76 1985;                                                                    \
1667                  C=D_6GT8SU2(|L),D_5GT8SUS(|L);
1668                TX=GT8SU U75 1995;                                                                        \
1669                  C=D_6GT8SU3(|L),D_6GT8SU(|L);
1670                TX=Tw B 80 4000;                                                                          \
1671                  C=2*D_6B80S;
1672                TX=B 80 Serie 4100 + 4200;                                                                \
1673                  C=<(D_6B80_BISTROL|D_6B80_BISTRO),D_6B80A(|L)|D_6B80A_MAGGI;
1674                TX=B80;                                                                                   \
1675                  C=2*D_6B80MS;
1676                TX=Flexity HF6 43xx;                                                                      \
1677                  C=2*D_6HF(|L);
1678              $ENDGROUP
1679            }
1680            {BUS?
1681              $GROUP                                                                                      \
1682                  NAME=D_D_B3;                                                                            \
1683                  LC=1; %GBG(STBGEU,ENV_WAYA);
1684                M=FOLLOW;                                                                                 \
1685                  C=4-6*(D_SL200L~WSI|D_SL202L~WSI|D_SG242L|D_SG242HL|D_O405L~WSI|D_O405NL~WSI|D_O405GL|  \
1686                    D_O405GNRL|D_NL202L~WSI|D_NG262RL|D_B10LL);                                           \
1687                  D=L;
1688                M=FOLLOW;                                                                                 \
1689                  C=6-9*(D_SL200~WSI|D_SL202~WSI|D_SL202~AXS|D_SG242|D_SG242H|D_SG242H1|D_SU240~WSI|      \
1690                    D_SU240~AXS|D_SU242|D_O305~WSI|D_O305~AXS|D_O305G~WSI|D_O305G~AXS|D_O405~WSI|         \
1691                    D_O405~AXS|D_O405N~WSI|D_O405N~AXS|D_O405G|D_O405G1|D_O405GNR|D_O405G2|D_O405GNR1|    \
1692                    D_NL202~WSI|D_NL202~AXS|D_NG262R|D_NG272R|D_N416|D_N4016NF~LDV|D_N4016NF~AXS|D_B10L); \
1693                  D=R;
1694              $ENDGROUP
1695            }
1696            {TRAM?
1697              $GROUP                                                                                      \
1698                  NAME=D_D_T8;                                                                            \
1699                  LC=1; %GBG(STBGMD,ENV_WAYT3);
1700                TX=Tw 2001;                                                                               \
1701                  C=D_6NF10(|L);                                                                          \
1702                  D=R;
1703                TX=VDV-Prototyp;                                                                          \
1704                  C=D_6VDV(|L);
1705                TX=Tw 2201;                                                                               \
1706                  C=D_6NF8(|L);
1707                TX=NF8U 33xx - Wehrhahnlinie;                                                             \
1708                  C=<D_NF8UL,D_NF8U;
1709              $ENDGROUP
1710            }
1711            {BUS?
1712              $GROUP                                                                                      \
1713                  NAME=D_D_B4;                                                                            \
1714                  LC=1; %GBG(STBGEU,ENV_WAYA);
1715                M=FOLLOW;                                                                                 \
1716                  C=3-5*(D_O405NEL|D_O405GNL|D_O530G1L|D_O530G2L|D_NL223L~WSI|D_NL232CNGL~WSI|D_NG262EL|  \
1717                    D_NG313L);                                                                            \
1718                  D=L;
1719                M=FOLLOW;                                                                                 \
1720                  C=4-6*(D_O405NE|D_O405GN1|D_O530G1|D_O530G2|D_0530MU|D_O530G3|D_O530G4|D_N4407~AXS|     \
1721                    D_NL202E|D_NL202_100J|D_NL222|D_NL223~WSI|D_NL223~AXS|D_NL232CNG~WSI|D_NL232CNG~AXS|  \
1722                    D_NG262E|D_NG263|D_NG272|D_NG312|D_NG313|D_N4407~LDV);                                \
1723                  D=R;
1724              $ENDGROUP
1725            }
1726            {TRAM?
1727              $GROUP                                                                                      \
1728                  NAME=D_D_T9;                                                                            \
1729                  LC=2; %GBG(STBGEU,ENV_WAYT1);
1730                TX=Atw 569;                                                                               \
1731                  C=D_A569,D_3DB4;
1732                TX=E-Lok 100 + Abw;                                                                       \
1733                  C=D_4_5100,D_4SAND;
1734                TX=E-Lok 100 + Abw;                                                                       \
1735                  C=D_5_5100|D_4_5100,D_4SAND;
1736                TX=Tw 11-16 KSW als Atw;                                                                  \
1737                  C=D_KSWATWGR;
1738                TX=2xZRTw 546 - 599,901 - 927 als Atw Bj. 1918-25 + Abw;                                  \
1739                  C=D_4_5050;
1740                TX=Tw 5133 + Bw 5331;                                                                     \
1741                  C=(D_5133[#D=R],D_5133B)|(D_5133[#D=L],D_5133BL);                                       \
1742                  TB=ON;
1743                TX=Tw 5151;                                                                               \
1744                  C=D_5_5151,D_5_5151B;                                                                   \
1745                  D=L;
1746                TX=Tw 5162;                                                                               \
1747                  C=D_4_5162;
1748                TX=Sprengwagen 5151;                                                                      \
1749                  C=D_4_5151[!ON];
1750                TX=Tw 5221 + Bw 5305;                                                                     \
1751                  C=D_5ATW,D_5_SALZ;                                                                      \
1752                  D=L;
1753                TX=Fahrschulwagen 5103;                                                                   \
1754                  C=D_5103~WSI;                                                                           \
1755                  D=R;
1756                TX=Atw 5144 + Bw 16xx;                                                                    \
1757                  C=(D_4_5144[#D=L],D_4_B1633PL[!S])|(D_4_5144L[#D=R],D_4_B1633P[!S]);                    \
1758                  D=L; TB=ON;
1759                TX=Atw 5111;                                                                              \
1760                  C=D_5111(|L)~WSI;                                                                       \
1761                  TB=ON;
1762                TX=2xZR ATw,ex Gummersbach Bj. 1915 - Schneepflug;                                        \
1763                  C=D_5112(|L);                                                                           \
1764                  TB=ON;
1765                TX=Fahrschulwagen 5102;                                                                   \
1766                  C=D_4_5102;
1767                TX=Fahrschulwagen 5101;                                                                   \
1768                  C=D_5101L~WSI|D_5101~WSI;
1769                TX=Atw 5164;                                                                              \
1770                  C=D_5164~WSI;
1771                TX=Arbeitswagenzug 5221 + 5305;                                                           \
1772                  C=D_5ATW,D_5321|D_5_SALZ;                                                               \
1773                  D=L;
1774                TX=Gütertw 90=241=1241 mit Güterzug;                                                      \
1775                  C=D_2KG,0-3*D_2G1|D_2G2|D_2G3;
1776              $ENDGROUP
1777            }
1778          $ENDSECTION
1779        }
1780  #--------------------------------------------------------------------------
1781  #
1782  #  Essen
1783  #
1784        {TRAM|BUS?
1785          $SECTION                                                                                        \
1786              NAME=D_ESSEN; %SECFIN;%TITLE(Essen);
1787            {BUS?
1788              $GROUP                                                                                      \
1789                  NAME=D_E_B1;                                                                            \
1790                LC=1; %GBG(STBGEU,ENV_WAYO);
1791  #               LC=1; %GBG(STBGEU,[WT=ENV_WAYO][WA=ENV_WAYA]);
1792                TX=O-Bus;                                                                                 \
1793                  C=(E_O421|E_O21)(|L);
1794              $ENDGROUP
1795            }
1796            {TRAM?
1797              $GROUP                                                                                      \
1798                  NAME=D_E_T1;                                                                            \
1799                LC=3; %GBG(STBGEU,ENV_WAYT1);
1800                  TX=Tw 1 + Bw 271;                                                                       \
1801                  LC=2;                                                                                   \
1802                  C=E_1|E_1A,E_271|E_271A; 
1803                TX=501 + 506;                                                                             \
1804                  C=(E_505,E_506),E_301;
1805                TX=505;                                                                                   \
1806                  C=E_T2VEST144;
1807                TX=144 (Vestische);                                                                       \
1808                  C=E_500A;
1809                TX=500;                                                                                   \
1810                  C=E_500A;
1811                TX=502ff;                                                                                 \
1812                  C=(E_511L|E_502L|E_502|E_511),E_301;
1813                TX=503,504;                                                                               \
1814                  C=E_503|E_504;
1815                TX=901 + 301;                                                                             \
1816                  C=E_901|E_901A,E_301|E_301A;
1817                TX=871 + 301;                                                                             \
1818                  C=E_871|E_871A,E_301|E_301A;
1819                TX=921 + 301;                                                                             \
1820                  C=E_921,E_301|E_301A;
1821                TX=Tw 921 + Bw 351;                                                                       \
1822                  C=E_921A,E_351;
1823                TX=Tw 1301 + Bw 2301;                                                                     \
1824                  C=E_1301A,E_2301A;
1825                TX=888 + 351;                                                                             \
1826                  C=E_888|E_351;
1827                TX=1301 + 2301;                                                                           \
1828                  C=E_1301,E_2301;
1829                TX=Tw 1351;                                                                               \
1830                  C=E_1351A;
1831                TX=1351 + 2301;                                                                           \
1832                  C=E_1351|E_2301;
1833                TX=Tw 1900/01 + Bw 2901;                                                                  \
1834                  C=(E_190(1|2),E_2901)|(E_190(1|2)L,E_2901L);
1835                TX=Tw 1951;                                                                               \
1836                  C=E_1951;
1837              $ENDGROUP
1838              $GROUP                                                                                      \
1839                  NAME=D_E_T2;                                                                            \
1840                  LC=2; %GBG(STBGEU,ENV_WAYT1);
1841                TX=Großraumwagen Tw 513ff;                                                                \
1842                  C=E_514|E_513|E_514L;                                                                   \
1843                TX=Großraumzug Tw 1540 + Bw 2901;                                                         \
1844                  C=E_1540B,E_2901;
1845                TX=4x GelTw Tw 1701ff;                                                                    \
1846                  C=E_4GT4;
1847                TX=6x GelTw Tw 1721ff;                                                                    \
1848                  C=E_4GT6ZB;
1849                C=E_G6L,|E_5B4L;
1850                C=E_G6,|E_5B4;
1851                C=E_G81L;
1852                C=E_G81;
1853                C=E_5GT8Z;
1854              $ENDGROUP
1855            }
1856            {BUS?
1857              $GROUP                                                                                      \
1858                  NAME=D_E_B2;                                                                            \
1859                  LC=1; %GBG(STBGEU,ENV_WAYA);
1860                M=FOLLOW;                                                                                 \
1861                  C=2-4*(E_O317|E_S130S|E_SL200|E_O305|E_O305G);                                          \
1862                  D=R;
1863                C=E_O305_INFO;
1864              $ENDGROUP
1865            }
1866            {TRAM?
1867              $GROUP                                                                                      \
1868                  NAME=D_E_T5;                                                                            \
1869                  LC=2; %GBG(STBGEU,ENV_WAYT2);
1870                TX=6x GelTw 1721;                                                                         \
1871                  C=E_GT6Z1721GB;
1872
1873                C=E_GT6,|E_B2;
1874                C=E_GT6COKE;
1875                C=E_GT8;
1876                C=E_M8R;
1877                C=E_1615TESTL;
1878                C=E_1615TEST;
1879                TX=6xERGelTw 1601 - 1678 + 4xERGrBw 2521 - 2531 Bj. 1958-63;                              \
1880                  C=(E_G6~WSI,E_5B4)|(E_G6L~WSI,E_5B4L);
1881                TX=4x Tw 1700;                                                                            \
1882                  C=E_4GT4;
1883                TX=6x TwZr 1721-1730;                                                                     \
1884                  C=E_1721;
1885                TX=8x Tw Zr. 1751-1760 Umbau;                                                             \
1886                  C=E_5GT8Z;
1887                TX=Tw Serie 1800;                                                                         \
1888                  C=E_G81L~WSI|E_G81~WSI;
1889                TX=M8 1400;                                                                               \
1890                  C=E_M8_LI~WSI;
1891                TX=1500 NF;                                                                               \
1892                  C=E_NF~WSI;
1893                TX=614 + 731;                                                                             \
1894                  C=E_TW614,E_BW731;
1895              $ENDGROUP
1896              $GROUP                                                                                      \
1897                  NAME=D_E_T3;                                                                            \
1898                  LC=2; %GBG(STBGEU,ENV_WAYT2);
1899                C=E_GT6,|E_B2;
1900                C=E_GT6COKE;
1901                C=E_GT8;
1902                C=E_M8R;
1903                C=E_1615TESTL;
1904                C=E_1615TEST;
1905                TX=6xERGelTw 1601 - 1678 + 4xERGrBw 2521 - 2531 Bj. 1958-63;                              \
1906                  C=(E_G6~WSI,E_5B4)|(E_G6L~WSI,E_5B4L);
1907                TX=4x Tw 1700;                                                                            \
1908                  C=E_4GT4;
1909                TX=6x TwZr 1721-1730;                                                                     \
1910                  C=E_1721;
1911                TX=8x Tw Zr. 1751-1760 Umbau;                                                             \
1912                  C=E_5GT8Z;
1913                TX=Tw Serie 1800;                                                                         \
1914                  C=E_G81L~WSI|E_G81~WSI;
1915                TX=M8 1400;                                                                               \
1916                  C=E_M8_LI~WSI;
1917                TX=1500 NF;                                                                               \
1918                  C=E_NF~WSI;
1919                TX=614 + 731;                                                                             \
1920                  C=E_TW614,E_BW731;
1921              $ENDGROUP
1922            }
1923            {BUS?
1924              $GROUP                                                                                      \
1925                  NAME=D_E_B3;                                                                            \
1926                  LC=1; %GBG(STBGMD,ENV_WAYA);
1927  #               LC=1; %GBG(STBGMD,[WT=ENV_WAYO][WA=ENV_WAYA]);
1928                M=FOLLOW;                                                                                 \
1929                  C=3-5*(E_S215SL|E_S300NC3|E_NL202|E_O405|E_O405N|E_O405N2|E_O405GN|E_O405GN_CE);        \
1930                  D=R;
1931                M=FOLLOW;                                                                                 \
1932                  C=3-5*(E_NL222Y|E_NG262|E_O405N3|E_O405GN2|E_0530_4|E_O530_6|E_O530G4|E_0530G6);        \
1933                  D=R;
1934                C=E_O530G(|L);
1935
1936              $ENDGROUP
1937            }
1938            {TRAM?
1939              $GROUP                                                                                      \
1940                  NAME=D_E_T4;                                                                            \
1941                  LC=2; %GBG(STBGMD,ENV_WAYT3);
1942                TX=Typ 5200 ex London/Docklands;                                                          \
1943                  C=E_6DOCKLAND;
1944                TX=Typ 5200 ex London/Docklands P89;                                                      \
1945                  C=E_P89;
1946                C=E_P05;
1947                TX=B80;                                                                                   \
1948                  C=E_B80C;
1949                TX=B80;                                                                                   \
1950                  C=E_B80D;
1951                TX=B100;                                                                                  \
1952                  C=E_B100S;
1953                TX=Typ 5200 ex London/Docklands;                                                          \
1954                  C=2*E_6DOCKLAND;
1955                TX=B80;                                                                                   \
1956                  C=E_6B80;
1957                TX=P86;                                                                                   \
1958                  C=E_P86U1|E_P86U1;
1959              $ENDGROUP
1960            }
1961            {BUS?
1962              $GROUP                                                                                      \
1963                  NAME=D_E_B4;                                                                            \
1964                  LC=1; %GBG(STBGMD,ENV_WAYO);
1965  #               LC=2; %GBG(STBGMD,[WT=ENV_WAYO][WA=ENV_WAYA]);
1966                TX=Duobus O405;                                                                           \
1967                  C=E_O405GTD(|L)|E_O405GTD1(|L)|EVAG_O405GTD(|L);
1968              $ENDGROUP
1969            }
1970          $ENDSECTION
1971        }
1972  #--------------------------------------------------------------------------
1973  #
1974  #  Frankfurt/Main
1975  #
1976        $SECTION                                                                                          \
1977            NAME=D_FRANKFURT_M;                                                                           \
1978            AB=30; %SECFIN;%TITLE(Frankfurt am Main);
1979          {CRAIL?
1980            $GROUP                                                                                        \
1981                NAME=D_F_C1;                                                                              \
1982                LC=1; %GBG((STBGMD|STBGFO),ENV_WAYT4);
1983              TX=Frankfurter Lokalbahn T2;                                                                \
1984                C=FLAG_T2G|FLAG_T2S|VGF_T2M;
1985              TX=Frankfurter Lokalbahn 19=2019;                                                           \
1986                C=FLAG_19|VGF_2019,VGF_FS;
1987              TX=Typ V mit v;                                                                             \
1988                C=FLAG_V1|VGF_V2|FLAG_V3,(3*VGF_VB)|(VGF_VB,FLAG_VBN);
1989              C=FLAG_V4,(3*VGF_VB)|(VGF_VB,FLAG_VBN);
1990            $ENDGROUP
1991          }
1992          {TRAM?
1993            $GROUP                                                                                        \
1994                NAME=D_F_T1;                                                                              \
1995                LC=1; %GBG((STBGMD|STBGFO),ENV_WAYT1);
1996              TX=Pferdebahn/Horsetram;                                                                    \
1997                M=FOLLOW;                                                                                 \
1998                C=(FTG_HT;VGF_HT);                                                                        \
1999                V=1;
2000              TX=Milano 1500 Test;                                                                        \
2001                C=F_23;
2002              TX=Typ A mit s;                                                                             \
2003                C=(VGF_A(1|2),VGF_SOB)|(VGF_A3,VGF_HTB);
2004              TX=Typ A mit a;                                                                             \
2005                C=(VGF_A4,VGF_AB1)|(VGF_A3,VGF_AB3);
2006              TX=Typ C + c;                                                                               \
2007                C=VGF_C(1|2),2@(VGF_CB|VGF_CUB);
2008              TX=Typ D + d;                                                                               \
2009                C=VGF_D(1|2|3),2@(VGF_DB|VGF_DUB);
2010              TX=Typ DD;                                                                                  \
2011                C=VGF_DD1L|VGF_DD1|VGF_DD2;
2012              TX=Typ E + e;                                                                               \
2013                C=VGF_E1,VGF_EB;
2014              TX=Typ E + cu;                                                                              \
2015                C=VGF_E,VGF_CUB;
2016              TX=Typ F + f;                                                                               \
2017                C=VGF_F(1|2|3),1-2@(VGF_FB(1|2));
2018              TX=Typ G + g 1946;                                                                          \
2019                C=VGF_G_US,1-2*VGF_GB_US;
2020              TX=Typ H + h;                                                                               \
2021                C=VGF_H,VGF_HB;
2022              TX=Typ H + gk;                                                                              \
2023                C=VGF_H,VGF_GKB;
2024              TX=Typ H + h 1946;                                                                          \
2025                C=VGF_H_US,0-2*VGF_HB_US;
2026              TX=Typ HkAB=15;                                                                             \
2027                C=VGF_HK1972;
2028              TX=Typ I + e + e;                                                                           \
2029                C=VGF_I,2*VGF_EB;
2030              TX=Typ I + e + e;                                                                           \
2031                C=VGF_I,2*VGF_IB;
2032              TX=Typ K + gk Aufbauwagen;                                                                  \
2033                C=VGF_AUFBAU,2*VGF_AUFBAUB;
2034              TX=Typ K + k Aufbauwagen;                                                                   \
2035                C=VGF_K,VGF_KB;
2036              TX=Typ K + k Aufbauwagen;                                                                   \
2037                C=VGF_K,0-2*VGF_KB|VGF_KAB11|VGF_KOB;
2038              TX=Typ K Ebbelweiexpress;                                                                   \
2039                C=VGF_5KEE|VGF_6KEE;
2040              TX=Typ K 101-125 + k + k;                                                                   \
2041                C=SSF_34K,2*(SSF_34K|SSF_34KB1|SSF_34KB2|SSF_34KB3);
2042            $ENDGROUP
2043            $GROUP                                                                                        \
2044                NAME=D_F_T2;                                                                              \
2045                LC=1; %GBG(STBGEU,ENV_WAYT2);
2046              TX=Typ L + l;                                                                               \
2047                C=(SSF_3LL,SSF_3LBL)|(SSF_3L,SSF_3LB);
2048              TX=Typ L + l;                                                                               \
2049                C=(SWF_4L,SWF_4LB)|(SWF_4LL,SWF_4LBL);
2050              TX=Typ L + l;                                                                               \
2051                C=(VGF_L3,VGF_L3B)|(VGF_L3L,VGF_L3BL)|(VGF_5L124|VGF_5L1242,SWF_4LB);
2052              TX=Typ L + l;                                                                               \
2053                C=(SSF_L1,SSF_L1B)|(SSF_L1L,SSF_L1BL);
2054              TX=Typ L mit ka;                                                                            \
2055                C=(VGF_KAB30,VGF_L2~WSI)|(VGF_L2L~WSI,VGF_KAB31);
2056              TX=Typ M + m;                                                                               \
2057                C=(SWF_M1L,SSF_MB1L)|(SWF_M1,SSF_MB1);
2058              TX=Typ M + m;                                                                               \
2059                C=(SSF_34M1L|SSF_34M2L|SSF_34MVL|SSF_M1L,SSF_MB1L)|                                       \
2060                  (SSF_M1|SSF_34MV|SSF_34M2|SSF_34M1,SSF_MB1);
2061              TX=Typ M;                                                                                   \
2062                C=SWF_45M600|SWF_45M600L|SWF_45M1|SWF_45M2L|SWF_45M2;
2063              TX=Typ M;                                                                                   \
2064                C=((SSF_4MT1L|SSF_4MT2L),SSF_MB1L)|((SSF_4MT1|SSF_4MT2),SSF_MB1);
2065              TX=Typ M + m;                                                                               \
2066                C=((SWF_4MT1L|SWF_4MT2L),SWF_MB1L)|((SWF_4MT1|SWF_4MT2),SWF_MB1);
2067              TX=Typ N;                                                                                   \
2068                C=SSF_34NL|SSF_34N;
2069              TX=Typ N;                                                                                   \
2070                C=SWF_N828_WERTKAUFL|SWF_N828_WERTKAUF|SWF_N830_SAUDIL|SWF_N830_SAUDI|VGF_N802_TMOBILEL|  \
2071                  VGF_N802_TMOBILE|VGF_N808_FRL|VGF_N808_FR|VGF_N812_WERTKAUF98L|VGF_N812_WERTKAUF98|     \
2072                  VGF_N815_KICKERL|VGF_N815_KICKER|VGF_N817_FAZL|VGF_N817_FAZ;
2073              TX=Typ N mit ka;                                                                            \
2074                C=(VGF_N1L,VGF_KAB11)|(VGF_KAB10,VGF_N1)|(VGF_N2L~TIS,VGF_KAB21)|(VGF_KAB20,VGF_N2~TIS);
2075              TX=Typ N;                                                                                   \
2076                C=SWF_4NL|SWF_4N|SWF_56NL|SWF_56N;
2077              TX=Typ N;                                                                                   \
2078                C=VGF_6N1L|VGF_6N1|VGF_6N2L|VGF_6N2;
2079              TX=Typ O;                                                                                   \
2080                C=SWF_46O;
2081              TX=Typ O;                                                                                   \
2082                C=SSF_34O;
2083              TX=Typ O;                                                                                   \
2084                C=VGF_6O1|VGF_6O2;
2085              TX=Typ O;                                                                                   \
2086                C=VGF_6O902|VGF_O901BBOCK|VGF_O902COLA|VGF_O904_HR3~PHG|SWF_O905_1985|                    \
2087                  VGF_O908_CARLSBERG|SWF_O905_1985|VGF_O907ABELE97|VGF_O907ABELE02;
2088            $ENDGROUP
2089            $GROUP                                                                                        \
2090                NAME=D_F_T3;                                                                              \
2091                TX=Typ P;                                                                                 \
2092                LC=1;                                                                                     \
2093                C=VGF_P_1A|VGF_P_1B|VGF_P_2; %GBG(STBGMD,ENV_WAYT2);
2094              TX=Typ R;                                                                                   \
2095                C=VGF_ZR|VGF_ZR;
2096              TX=Typ S;                                                                                   \
2097                C=VGF_S1|VGF_SA;
2098            $ENDGROUP
2099            $GROUP                                                                                        \
2100                NAME=D_F_T4;                                                                              \
2101                LC=1; %GBG((STBGMD|STBGFO),ENV_WAYT3);
2102              TX=Typ Pt;                                                                                  \
2103                C=2@VGF_PT_1A|VGF_PT_1A|VGF_PT_1B|VGF_PT_1B|VGF_PT_2A|VGF_PT_2A|VGF_PT_2B|VGF_PT_2B;
2104              TX=Typ Ptb;                                                                                 \
2105                C=3*(VGF_PTB_1A|VGF_PTB_1A|VGF_PTB_1B|VGF_PTB_1B);
2106              TX=Typ Ptb;                                                                                 \
2107                C=3*(VGF_PTB_2A|VGF_PTB_2A|VGF_PTB_2B|VGF_PTB_2B);
2108              TX=U2;                                                                                      \
2109                C=VGF_U2A;
2110              TX=U2;                                                                                      \
2111                C=3*VGF_U2B~FLE;
2112              TX=U2;                                                                                      \
2113                C=3*VGF_U2C~FLE;
2114              TX=U3;                                                                                      \
2115                C=3*VGF_U3_2~WSI;
2116              TX=U3;                                                                                      \
2117                C=3*VGF_U3_3~WSI;
2118              TX=U4;                                                                                      \
2119                C=3*VGF_U4~FLE;
2120            $ENDGROUP
2121  # maintenance
2122            $GROUP                                                                                        \
2123                NAME=D_F_T5;                                                                              \
2124                LC=1; %GBG(STBGEU,ENV_WAYT2);
2125              TX=TYP K 2000;                                                                              \
2126                C=VGF_6K2000;
2127              TX=TYP K 2001;                                                                              \
2128                C=VGF_K2001;
2129              TX=GÜTERLOK 2020;                                                                           \
2130                C=VGF_2020,VGF_TRANSPORT;
2131              TX=POSTSTRAßENBAHN;                                                                         \
2132                C=VGF_POST(1|2|3|4);
2133              TX=TYP K MIT SCHNEEPFLUG;                                                                   \
2134                C=<VGF_SP,VGF_KAW;
2135              TX=AKKULOK;                                                                                 \
2136                C=VGF_AKKULOK,VGF_TUNNEL;
2137              TX=WERBEWAGEN;                                                                              \
2138                C=WGF_SUNILT,WGF_SUNILB;
2139            $ENDGROUP
2140          }
2141          {TRAM?
2142            TX=Frankfurt-Offenbacher Trambahn;                                                            \
2143              C=FOTG_TW(|L),0-2*FOTG_BW; %LBG(STBGEU,ENV_WAYT1);
2144          }
2145          {BUS?
2146            $GROUP                                                                                        \
2147                NAME=D_F_B1;                                                                              \
2148                LC=1; %GBG(STBGEU,ENV_WAYA);
2149              M=FOLLOW;                                                                                   \
2150                C=(SWF_BUSSINGL;SWF_BUSSING_MFL;SWF_P26L);                                                \
2151                D=L;
2152              M=FOLLOW;                                                                                   \
2153                C=(SWF_BUSSING;SWF_BUSSING_MF;SWF_BUE_EEX;SWF_P26);                                       \
2154                D=R;
2155              C=SWF_STEYR_CITY(|L);
2156              C=VGF_O405(|L);
2157              M=FOLLOW;                                                                                   \
2158                C=(VGF_O405NL;VGF_O530L~TIS;VGF_O530GL;VGF_CITOL;ICB_CITOL;KRONBERG_CITOL);               \
2159                D=L;
2160              M=FOLLOW;                                                                                   \
2161                C=(VGF_O405N;VGF_O530~TIS;VGF_O530G;VGF_CITO;ICB_CITO;KRONBERG_CITO);                     \
2162                D=R;
2163              C=ASB_UNFALLHILF;                                                                           \
2164                TB=ON;
2165            $ENDGROUP
2166          }
2167        $ENDSECTION
2168  #--------------------------------------------------------------------------
2169  #
2170  # Freiburg
2171  #
2172        {TRAM|BUS?
2173          $SECTION                                                                                        \
2174              NAME=D_FREIBURG;                                                                            \
2175              AB=30; %SECFIN;%TITLE(Freiburg);
2176            {TRAM?
2177              $GROUP                                                                                      \
2178                  NAME=D_FR_T1;                                                                           \
2179                  LC=1; %GBG(STBGEU,ENV_WAYT1);
2180                TX=Tw 7;                                                                                  \
2181                  C=FVAG_7;
2182                TX=Tw 2;                                                                                  \
2183                  C=FVAG_2;
2184                TX=Tw 39;                                                                                 \
2185                  C=FVAG_39;
2186                TX=Tw 38;                                                                                 \
2187                  C=FVAG_38;
2188                TX=Tw 45;                                                                                 \
2189                  C=FVAG_45;
2190                TX=Tw 49;                                                                                 \
2191                  C=FVAG_49;
2192                TX=Tw 56;                                                                                 \
2193                  C=FVAG_56;
2194                TX=Tw 59;                                                                                 \
2195                  C=FVAG_59;
2196                TX=Tw 60;                                                                                 \
2197                  C=FVAG_60;
2198              $ENDGROUP
2199              $GROUP                                                                                      \
2200                  NAME=D_FR_T2;                                                                           \
2201                  TX=Verbandstyp 61-74;                                                                   \
2202                  LC=1; %GBG(STBGEU,ENV_WAYT1);
2203                C=FVAG_66,1-2*(FVAG_129|FVAG_142);
2204                C=FVAG_VBTW;
2205              $ENDGROUP
2206              $GROUP                                                                                      \
2207                  NAME=D_FR_T3;                                                                           \
2208                  TX=GT4 Sputnik 100-102;                                                                 \
2209                  LC=1; %GBG(STBGEU,ENV_WAYT1);
2210                C=FVAG_GT4AL;
2211                C=FVAG_GT4A;
2212                C=FVAG_GT4A1;
2213                C=FVAG_GT4ZC;
2214              $ENDGROUP
2215              $GROUP                                                                                      \
2216                  NAME=D_FR_T4;                                                                           \
2217                  TX=GT4 103-122;                                                                         \
2218                  LC=2; %GBG(STBGEU,ENV_WAYT1);
2219                C=FVAG_103;
2220                C=FVAG_GT4BL;
2221                C=FVAG_GT4B;
2222                C=FVAG_GT4B1;
2223                C=FVAG_GT4C;
2224                C=FVAG_GT4Z;
2225                C=FVAG_106;
2226                C=FVAG_107;
2227                C=FVAG_109;
2228                C=FVAG_109UMSONST;
2229                C=FVAG_121;
2230                C=FVAG_121FP;
2231              $ENDGROUP
2232              $GROUP                                                                                      \
2233                  NAME=D_FR_T5;                                                                           \
2234                  TX=GT4 Stuttgart 151-160;                                                               \
2235                  LC=2; %GBG(STBGEU,ENV_WAYT1);
2236                C=FVAG_GT4Y1L;
2237                C=FVAG_GT4Y1;
2238                C=FVAG_GT4Y2L;
2239                C=FVAG_GT4Y2;
2240                C=FVAG_154GL;
2241                C=FVAG_154G;
2242                C=FVAG_155GL;
2243                C=FVAG_155G;
2244                C=FVAG_156SL;
2245                C=FVAG_156S;
2246              $ENDGROUP
2247              $GROUP                                                                                      \
2248                  NAME=D_FR_T6;                                                                           \
2249                  TX=201-204;                                                                             \
2250                  LC=1; %GBG(STBGEU,ENV_WAYT1);
2251                C=FVAG_GT8A(|L)~WSI;
2252                C=FVAG_GT8A(|L)~FLE;
2253
2254                C=FVAG_201L|FVAG_204L;
2255                C=FVAG_201|FVAG_204;
2256              $ENDGROUP
2257            }
2258            {BUS?
2259              $GROUP                                                                                      \
2260                  NAME=D_FR_B1;                                                                           \
2261                  LC=1; %GBG(STBGEU,ENV_WAYA);
2262                M=FOLLOW;                                                                                 \
2263                  C=4-6*FVAG_(913L|914L|922L|S315NFL|S315NF_BADENAUTOL|S315NF_LIELL|S315NF_SWR1|          \
2264                    SG219SLL|_917L);                                                                      \
2265                  D=L;
2266                M=FOLLOW;                                                                                 \
2267                  C=4-6*FVAG_(913|914|922|S315NF|SG219SL|_917);                                           \
2268                  D=R;
2269              $ENDGROUP
2270            }
2271            {TRAM?
2272              $GROUP                                                                                      \
2273                  NAME=D_FR_T7;                                                                           \
2274                  LC=1; %GBG(STBGEU,ENV_WAYT3);
2275                TX=205-214;                                                                               \
2276                  C=FVAG_GT8B(|L)~WSI;
2277                TX=205-214;                                                                               \
2278                  C=FVAG_GT8B(|L)~FLE;
2279                TX=205-214;                                                                               \
2280                  C=FVAG_212L;
2281                TX=205-214;                                                                               \
2282                  C=FVAG_212;
2283              $ENDGROUP
2284              $GROUP                                                                                      \
2285                  NAME=D_FR_T8;                                                                           \
2286                  LC=1; %GBG(STBGEU,ENV_WAYT3);
2287                TX=221-231;                                                                               \
2288                  C=FVAG_GT8C(|L)~FLE;
2289                TX=221-231;                                                                               \
2290                  C=FVAG_GT8C(|L)~WSI;
2291              $ENDGROUP
2292            }
2293            {BUS?
2294              $GROUP                                                                                      \
2295                  NAME=D_FR_B2;                                                                           \
2296                  LC=1; %GBG(STBGEU,ENV_WAYA);
2297                M=FOLLOW;                                                                                 \
2298                  C=4-6*(12:FVAG_(834L|835IKEAL|                                                          \
2299                    10:O405(AL|BL|L|N1_WERTKAUFL|N2_HERBOLZHEIML|N_BAUHAUSL|REALL|_HERZL|_REGIOMAGAZINL))| \
2300                    MBO405N_825L);                                                                        \
2301                  D=L;
2302                M=FOLLOW;                                                                                 \
2303                  C=4-6*FVAG_(834|835IKEA|                                                                \
2304                    10:O405(|A|B|N1_WERTKAUF|N2_HERBOLZHEIM|N2_HEROLD|N_BADDAT|N_BAUHAUS|REAL|_HERZ|      \
2305                    _REGIOMAGAZIN));                                                                      \
2306                  D=R;
2307              $ENDGROUP
2308            }
2309            {TRAM?
2310              $GROUP                                                                                      \
2311                  NAME=D_FR_T9;                                                                           \
2312                  TX=GT8Z;                                                                                \
2313                  LC=1; %GBG(STBGEU,ENV_WAYT3);
2314                C=FVAG_241~KRE;
2315                C=FVAG_242;
2316                C=FVAG_242MOBIL;
2317                C=FVAG_245BBBANK;
2318                C=FVAG_246;
2319                C=FVAG_246W;
2320                C=FVAG_246SALEWA;
2321                C=FVAG_247;
2322                C=FVAG_248OSCHWALD;
2323                C=FVAG_248EUPARK;
2324                C=FVAG_249REWA;
2325                C=FVAG_GT8Z_251;
2326                C=FVAG_GT8Z_EXPO;
2327                C=FVAG_GT8Z_MANN;
2328                C=FVAG_GT8Z_PYRAMID;
2329                C=FVAG_253SV;
2330                C=FVAG_255;
2331                C=FVAG_258;
2332                C=FVAG_261;
2333                C=FVAG_255VOLKSBANK;
2334                C=FVAG_2XX_LOTTO;
2335                C=FVAG_256;
2336                C=FVAG_259;
2337                C=FVAG_260;
2338                C=FVAG_260A;
2339                C=FVAG_260SALEWA;
2340                C=FVAG_261N;
2341                C=FVAG_262SWR1;
2342                C=FVAG_262NETZ;
2343                C=FVAG_263BADENOVA;
2344                C=FVAG_264PALAZZO;
2345                C=FVAG_266MILCH;
2346                C=FVAG_266ROSE;
2347                C=FVAG_266SPARKASSE;
2348                C=FVAG_266COUPON;
2349                C=FVAG_GT8ZBAROCK;
2350                C=FVAG_GTBZBOLLYWOOD;
2351              $ENDGROUP
2352            }
2353            {BUS?
2354              $GROUP                                                                                      \
2355                  NAME=D_FR_B3;                                                                           \
2356                  LC=1; %GBG(STBGEU,ENV_WAYA);
2357                M=FOLLOW;                                                                                 \
2358                  C=3-5*(8:FVAG_O530(L|SEBL|_AUSBILDUNGL|_CLEANL|_EASYJETL|_HERZL|_SPARKASSEL|_SWR1L)|    \
2359                    TUNIBERG120_L);                                                                       \
2360                  D=L;
2361                M=FOLLOW;                                                                                 \
2362                  C=4-6*FVAG_O405GN(1L|1_EASYJETL|L|_932L|_BADENOVAL|_BERGWELTL|_BIRKENMAIERL|_EASYJETL|  \
2363                    _HOCHDORFL|_HUBERL|_JAGERL|_LIEL|_REGIOMOBILCARDL|_SPARKASSEL|_W1);                   \
2364                  D=L;
2365                M=FOLLOW;                                                                                 \
2366                  C=4-6*FVAG_O405GN(|1|_932|_BERGWELT|_BIRKENMAIER|_EASYJET|_HOCHDORF|_HUBER|_JAGER);     \
2367                  D=R;
2368              $ENDGROUP
2369            }
2370            {TRAM?
2371              $GROUP                                                                                      \
2372                  NAME=D_FR_T10;                                                                          \
2373                  TX=Combino;                                                                             \
2374                  LC=1; %GBG(STBGEU,ENV_WAYT3);
2375                C=FVAG_271;
2376                C=FVAG_271VAG;
2377                C=FVAG_272;
2378                C=FVAG_273;
2379                C=FVAG_273MAMORIT;
2380                C=FVAG_273MAMORITTAG;
2381                C=FVAG_275;
2382                C=FVAG_276A;
2383                C=FVAG_276B;
2384                C=FVAG_276;
2385                C=FVAG_277;
2386                C=FVAG_278;
2387                C=FVAG_278G;
2388                C=FVAG_278FREIBURGER;
2389                C=FVAG_279;
2390                C=FVAG_281~KRE;
2391                C=FVAG_281~OR;
2392                C=FVAG_281BREISNET;
2393                C=FVAG_282~OR;
2394                C=FVAG_282~KRE;
2395                C=FVAG_282SPARKASSE;
2396                C=FVAG_283KAISER;
2397                C=FVAG_284~KRE;
2398                C=FVAG_284~OR;
2399                C=FVAG_285~KRE;
2400                C=FVAG_285~OR;
2401                C=FVAG_285CLEAN;
2402                C=FVAG_286JAKO;
2403                C=FVAG_287VISUMED;
2404                C=FVAG_COMBINO_WIEHLEL;
2405                C=FVAG_COMBINO_WIEHLE;
2406                C=FVAG_COMBINO_BAROCK;
2407              $ENDGROUP
2408            }
2409            {BUS?
2410              $GROUP                                                                                      \
2411                  NAME=D_FR_B4;                                                                           \
2412                  LC=3; %GBG(STBGEU,ENV_WAYA);
2413                M=FOLLOW;                                                                                 \
2414                  C=2-3*(FVAG_O530|FVAG_O530_SPARKASSE|TUNIBERG_120);                                     \
2415                  D=R;
2416              $ENDGROUP
2417            }
2418          $ENDSECTION
2419        }
2420  #--------------------------------------------------------------------------
2421  #
2422  # Halle
2423  #
2424        {TRAM|BUS?
2425          $SECTION                                                                                        \
2426              NAME=D_HALLE; %SECFIN;%TITLE(Halle/Saale);
2427            {TRAM?
2428              $GROUP                                                                                      \
2429                  NAME=D_HAL_T1;                                                                          \
2430                  LC=2; %GBG(STBGEU,ENV_WAYT2);
2431                C=[PHU](VBHA_T4D(|E),|VBHA_T4D)|(VBHA_T4D(|E)L,|VBHA_T4DL);
2432                C=1-2@VBHA_T4DE(|L);
2433                C=VBHA_1030L,|VBHA_150,VBHA_1031;
2434                C=VBHA_980(|L);
2435              $ENDGROUP
2436              $GROUP                                                                                      \
2437                  NAME=D_HAL_T2;                                                                          \
2438                  LC=2; %GBG(STBGEU,ENV_WAYT2);
2439                TX=T4D alt;                                                                               \
2440                  C=(HVAG_1025,HVAG_1030)|(HVAG_1025L,HVAG_1030L);
2441                TX=T4D + B4D alt;                                                                         \
2442                  C=(1-2*HVAG_T4DL,HVAG_B4DL~JP)|(1-2*HVAG_T4D,HVAG_B4D~JP);
2443                TX=T4D 1070,1071;                                                                         \
2444                  C=(HVAG_1070L,HVAG_1071L)|(HVAG_1070,HVAG_1071);
2445                C=<HVAG_T4DZL[P1U],|HVAG_ZB4DL~JP|HVAG_ZB4D~JP,HVAG_T4DZ[P1U];
2446                C=HVAG_ZT4DL~JP;
2447                TX=T4D + B4D neu;                                                                         \
2448                  C=(2*HVAG_T4DN,HVAG_B4DN)|(2*HVAG_T4DNL,HVAG_B4DNL);
2449                TX=T4D + T4D neu;                                                                         \
2450                  C=(2*HVAG_T4DN)|(2*HVAG_T4DNL);
2451                TX=ZT4D alt;                                                                              \
2452                  C=HVAG_901;
2453                TX=ZT4D neu;                                                                              \
2454                  C=HVAG_ZT4DN(|L);
2455                TX=T4DM + T4DM + B4DM neu;                                                                \
2456                  C=(HVAG_T4DM,HVAG_B4DM)|(HVAG_T4DML,HVAG_B4DML);
2457              $ENDGROUP
2458              $GROUP                                                                                      \
2459                  NAME=D_HAL_T3;                                                                          \
2460                  TX=GT4;                                                                                 \
2461                  LC=2; %GBG(STBGEU,ENV_WAYT2);
2462                C=HVAG_GT4L~BL;
2463                C=(2*HVAG_GT4L~TIS)|(2*HVAG_GT4~TIS);
2464                C=HVAG_GT4L~KRE;
2465                C=HVAG_GT4WL~BL;
2466                C=HVAG_GT4WL~WSI;
2467                C=HVAG_GT4AL~BL;
2468                C=HVAG_GT4BL;
2469                C=HVAG_GT4CL;
2470                C=HVAG_851SL;
2471                C=HVAG_851TL;
2472                C=HVAG_853ML;
2473                C=HVAG_854L;
2474                C=HVAG_862HL;
2475                C=HVAG_864ML;
2476                C=HVAG_869HL;
2477                C=HVAG_870ML;
2478                C=HVAG_872EL;
2479                C=HVAG_873KL;
2480                C=HVAG_874KL;
2481                C=HVAG_875ML;
2482                C=HVAG_876L;
2483                C=HVAG_877L;
2484                C=HVAG_877ML;
2485                C=HVAG_878LOL;
2486                C=HVAG_880FL;
2487                C=HVAG_882HL;
2488                C=HVAG_886LL;
2489                C=HVAG_887BL;
2490                C=HVAG_887DL;
2491                C=HVAG_888FL;
2492                C=HVAG_888UL;
2493                C=HVAG_890ML;
2494                C=HVAG_890SL;
2495                C=HVAG_874K;
2496                C=HVAG_875M;
2497                C=HVAG_876;
2498                C=HVAG_877;
2499                C=HVAG_877M;
2500                C=HVAG_878LO;
2501                C=HVAG_880F;
2502                C=HVAG_882H;
2503                C=HVAG_886L;
2504                C=HVAG_887B;
2505                C=HVAG_887D;
2506                C=HVAG_888F;
2507                C=HVAG_888U;
2508                C=HVAG_890M;
2509                C=HVAG_890S;
2510                C=HVAG_GT4~BL;
2511                C=HVAG_GT4~TIS;
2512                C=HVAG_GT4~KRE;
2513                C=HVAG_GT4A~TIS;
2514                C=HVAG_GT4W~BL;
2515                C=HVAG_GT4W~WSI;
2516                C=HVAG_GT4A~BL;
2517                C=HVAG_GT4B;
2518                C=HVAG_GT4C;
2519                C=HVAG_851S;
2520                C=HVAG_851T;
2521                C=HVAG_853M;
2522                C=HVAG_854;
2523                C=HVAG_862H;
2524                C=HVAG_864M;
2525                C=HVAG_869H;
2526                C=HVAG_870M;
2527                C=HVAG_872E;
2528                C=HVAG_873K;
2529              $ENDGROUP
2530              $GROUP                                                                                      \
2531                  NAME=D_HAL_T4;                                                                          \
2532                  LC=2; %GBG(STBGEU,ENV_WAYT2);
2533                TX=MGT6D 501ff;                                                                           \
2534                  C=HVAG_MGT6_500(A|B|C);
2535                TX=MGT6D 601 ff;                                                                          \
2536                  C=1-2*(HVAG_MGT6_600);
2537                C=HVAG_MGT6DL;
2538                C=HVAG_GT6Z;
2539                TX=GT6Z;                                                                                  \
2540                  C=<HVAG_MGT6K,HVAG_MGT6KL;
2541                C=HVAG_MGT6D;
2542                C=HVAG_GT6ZL;
2543              $ENDGROUP
2544              $GROUP                                                                                      \
2545                  NAME=D_HAL_T5;                                                                          \
2546                  LC=2; %GBG(STBGEU,ENV_WAYT2);
2547                C=HVAG_033(|L);
2548                C=HVAG_034(|L),|HVAG_ROBEL;
2549                C=HVAG_035(|L),|HVAG_ROBEL;
2550              $ENDGROUP
2551            }
2552            {BUS?
2553              $GROUP                                                                                      \
2554                  NAME=D_HAL_B1;                                                                          \
2555                  LC=2; %GBG(STBGEU,ENV_WAYA);
2556                M=FOLLOW;                                                                                 \
2557                  C=(VBHA_HALR267;VBHA_IK260_02;HVAG_IK280_02B;HVAG_HALR247; OBSH_IK256; OBSH_IK280_3;    \
2558                    HVAG_IK280_2);
2559              $ENDGROUP
2560            }
2561          $ENDSECTION
2562        }
2563  #--------------------------------------------------------------------------
2564  #
2565  # Hamburg
2566  #
2567        $SECTION                                                                                          \
2568            NAME=D_HAMBURG;                                                                               \
2569            SEQ=D; AB=30; %SECFIN;%TITLE(Hamburg);
2570  #
2571  # S-Bahn
2572  #
2573          {CRAIL?
2574  # S-Bahn Epoche 6
2575            $SCENE                                                                                        \
2576                NAME=D_HH_S6;                                                                             \
2577                DY=110;
2578              $PATH Y=10; LC=2;                                                                           \
2579                  FG=(TRBED25:..,^0;SHAMBURG_3FG:..,-2,#;                                                 \
2580                  2*FL_DBQT,FL_DBQB,2*FL_DBQT,FL_DBQA,2*FL_DBQT:..,-4;);
2581                M=STOP; POOL=POOL_HMB_S6; D=R; V=10; A=.25; P=*50+10; TE=3-9;
2582              $ENDPATH
2583              $PATH Y=10; LC=2;                                                                           \
2584                  BG=(MR_SBOX5:<4;D_WORPSWEDE;BGCITYD(A|M)1:..,0,#; 1-40*1,TREES_SUMMER:..,0,#;           \
2585                  BGCITYD(A|M)2:..,0,#;SKYMIX2);                                                          \
2586                  FG=(B_PLF1E,14@B_PLF(1|2),#B_PLF1E:,^8;                                                 \
2587                  PLF_GASTEIZ3[BT:0,0,89,65][BT:0,0,92,53],8*PLF_GASTEIZ3,                                \
2588                  PLF_GASTEIZ3[BT:6,0,89,65][BT:3,0,92,53]:,-6;D_OBHBF6,480,D_OBHBF6,:,38;                \
2589                  PAS15,16,D_OBHBF6S,30,LAMP01,40,PAS13,20,PAS08,5,PLF_J2D,10,PAS25,15,PERS05,20,         \
2590                  B_SHELTER,26,#PAS05,15,DBAG_6STREU,4,PASG03,10,DBAG_6TICKET,DBAG_6INFO3,5,PLF_J2D,20,   \
2591                  DBAG_6INFO3,PASG02,20,DBAG_STAIRS,30,PASG01,25,PAS11,DUSTBIN1,11,PLF_J2D,25,BANK8,15,   \
2592                  BANK8,20,PAS05,28,PAS23,20,BANK8,35,DUSTBIN1,4,DBAG_6TICKET,16,PASG05,15,BANK04,30,     \
2593                  B_SHELTER,26,PAS03,35,BANK01,DUSTBIN1,15,PAS05,12,LAMP01,15,D_OBHBF6S,12,PERS01,20,     \
2594                  PERS03,:,8;90,D_HHAUFS1,:,8);                                                           \
2595                  W=X;
2596                M=OPEN; POOL=POOL_HMB_S6; D=L; V=10; A=.25; P=*50-10; TB=3-9;
2597              $ENDPATH
2598            $ENDSCENE
2599  # S-Bahn Epoche 5
2600            $SCENE                                                                                        \
2601                NAME=D_HH_S5;                                                                             \
2602                DY=110;
2603              $PATH Y=10; LC=2;                                                                           \
2604                  FG=(TRBED25:..,^0;SHAMBURG_3FG:..,-3,#;                                                 \
2605                  2*FL_DBQT,FL_DBQB,2*FL_DBQT,FL_DBQA,2*FL_DBQT:..,-4;);
2606                M=STOP; POOL=POOL_HMB_S5; D=R; V=10; A=.25; P=*50+10; TE=3-9;
2607              $ENDPATH
2608              $PATH Y=10; LC=2;                                                                           \
2609                  BG=(MR_SBOX5:<4;D_WORPSWEDE;BGCITYD(A|M)1:..,0,#; 1-40*1,TREES_SUMMER:..,0,#;           \
2610                  BGCITYD(A|M)2:..,0,#;SKYMIX2);                                                          \
2611                  FG=(B_PLF1E,14@B_PLF(1|2),#B_PLF1E:,^8;                                                 \
2612                  PLF_GASTEIZ3[BT:0,0,89,65][BT:0,0,92,53],8*PLF_GASTEIZ3,                                \
2613                  PLF_GASTEIZ3[BT:6,0,89,65][BT:3,0,92,53]:,-6;D_DUHBF5,480,D_DUHBF5,:,38;                \
2614                  PAS15,16,D_BLN5,30,LAMP01,40,PAS13,20,PAS08,5,PLF_J2D,10,PAS25,15,PERS05,20,B_SHELTER,  \
2615                  26,#PAS05,25,PASG03,10,J_TICKET,5,I_TIMTAB1,,5,PLF_J2D,20,PASG02,20,DBAG_STAIRS,30,     \
2616                  PASG01,25,PAS11,DUSTBIN1,11,PLF_J2D,25,BANK8,15,BANK8,20,PAS05,28,PAS23,20,BANK8,35,    \
2617                  DUSTBIN1,4,J_TICKET,16,PASG05,15,BANK04,30,B_SHELTER,26,PAS03,35,BANK01,DUSTBIN1,15,    \
2618                  PAS05,12,LAMP01,15,D_BLN5,12,PERS01,20,PERS03,:,8;100,D_HHAUFS1,:,8);                   \
2619                  W=X;
2620                M=OPEN; POOL=POOL_HMB_S5; D=L; V=10; A=.25; P=*50-10; TB=3-9;
2621              $ENDPATH
2622            $ENDSCENE
2623  # S-Bahn Epoche 4
2624            $SCENE                                                                                        \
2625                NAME=D_HH_S4;                                                                             \
2626                DY=110;
2627              $PATH Y=10; LC=2;                                                                           \
2628                  FG=(TRBED25:..,^0;SHAMBURG_3FG:..,-3,#;                                                 \
2629                  2*FL_DBQT,FL_DBQB,2*FL_DBQT,FL_DBQA,2*FL_DBQT:..,-4;);
2630                M=STOP; POOL=POOL_HMB_S4; D=R; V=10; A=.25; P=*50+10; TE=3-9;
2631              $ENDPATH
2632              $PATH Y=10; LC=2;                                                                           \
2633                  BG=(MR_SBOX5:<4;D_WORPSWEDE;BGCITYD(A|M)1:..,0,#; 1-40*1,TREES_SUMMER:..,0,#;           \
2634                  BGCITYD(A|M)2:..,0,#;SKYMIX2);                                                          \
2635                  FG=(B_PLF1E,14@B_PLF(1|2),#B_PLF1E:,^8;                                                 \
2636                  PLF_GASTEIZ3[BT:0,0,89,65][BT:0,0,92,53],8*PLF_GASTEIZ3,                                \
2637                  PLF_GASTEIZ3[BT:6,0,89,65][BT:3,0,92,53]:,-6;D_RUCK4,480,D_RUCK4,:,38;                  \
2638                  PAS15,16,D_RUCK4S,30,LAMP01,40,PAS13,20,PAS08,5,PLF_J2D,10,PAS25,15,PERS05,20,          \
2639                  B_SHELTER,26,#PAS05,25,PASG03,10,5,I_TIMTAB1,,5,PLF_J2D,20,PASG02,20,DBAG_STAIRS,30,    \
2640                  PASG01,25,PAS11,DUSTBIN1,11,PLF_J2D,25,BANK8,15,BANK8,20,PAS05,28,PAS23,20,BANK8,35,    \
2641                  DUSTBIN1,4,16,PASG05,15,BANK04,30,B_SHELTER,26,PAS03,35,BANK01,DUSTBIN1,15,PAS05,12,    \
2642                  LAMP01,15,D_RUCK4S,12,PERS01,20,PERS03,:,8;100,D_HHAUFS1,:,8);                          \
2643                  W=X;
2644                M=OPEN; POOL=POOL_HMB_S4; D=L; V=10; A=.25; P=*50-10; TB=3-9;
2645              $ENDPATH
2646            $ENDSCENE
2647  # S-Bahn Epoche 3
2648            $SCENE                                                                                        \
2649                NAME=D_HH_S3;                                                                             \
2650                DY=110;
2651              $PATH Y=10; LC=2;                                                                           \
2652                  FG=(TRBED25:..,^0;SHAMBURG_3FG:..,-3,#;FL_DRG_F:..,-4,#;);
2653                M=STOP; POOL=POOL_HMB_S3; D=R; V=10; A=.25; P=*50+10; TE=3-9;
2654              $ENDPATH
2655              $PATH Y=10; LC=2;                                                                           \
2656                  BG=(MR_SBOX5:<4;D_WORPSWEDE;BGCITYD(A|M)1:..,0,#; 1-40*1,TREES_SUMMER:..,0,#;           \
2657                  BGCITYD(A|M)2:..,0,#;SKYMIX2);                                                          \
2658                  FG=(B_PLF1E,14@B_PLF(1|2),#B_PLF1E:,^8;                                                 \
2659                  PLF_GASTEIZ3[BT:0,0,89,65][BT:0,0,92,53],8*PLF_GASTEIZ3,                                \
2660                  PLF_GASTEIZ3[BT:6,0,89,65][BT:3,0,92,53]:,-6;D_BOEDERITZ3,480,D_BOEDERITZ3,:,38;        \
2661                  PAS15,16,D_BOEDERITZ3S,30,LAMP01,40,PAS13,20,PAS08,5,PLF_J2D,10,PAS25,15,PERS05,20,     \
2662                  B_SHELTER,26,#PAS05,25,PASG03,10,5,I_TIMTAB1,,5,PLF_J2D,20,PASG02,20,DBAG_STAIRS,30,    \
2663                  PASG01,25,PAS11,DUSTBIN1,11,PLF_J2D,25,BANK8,15,BANK8,20,PAS05,28,PAS23,20,BANK8,35,    \
2664                  DUSTBIN1,4,16,PASG05,15,BANK04,30,B_SHELTER,26,PAS03,35,BANK01,DUSTBIN1,15,PAS05,12,    \
2665                  LAMP01,15,D_BOEDERITZ3S,12,PERS01,20,PERS03,:,8;70,D_HHAUFS1,:,8);                      \
2666                  W=X;
2667                M=OPEN; POOL=POOL_HMB_S3; D=L; V=10; A=.25; P=*50-10; TB=3-9;
2668              $ENDPATH
2669            $ENDSCENE
2670  # S-Bahn Epoche 2
2671            $SCENE                                                                                        \
2672                NAME=D_HH_S2;                                                                             \
2673                DY=110;
2674              $PATH Y=10; LC=2;                                                                           \
2675                  FG=(TRBED25:..,^0;SHAMBURG_3FG:..,-3,#;FL_DRG_F:..,-4,#;);
2676                M=STOP; POOL=POOL_HMB_S2; D=R; V=10; A=.25; P=*50+10; TE=3-9;
2677              $ENDPATH
2678              $PATH Y=10; LC=2;                                                                           \
2679                  BG=(MR_SBOX5:<4;D_WORPSWEDE;BGCITYD(A|M)1:..,0,#; 1-40*1,TREES_SUMMER:..,0,#;           \
2680                  BGCITYD(A|M)2:..,0,#;SKYMIX2);                                                          \
2681                  FG=(B_PLF1E,14@B_PLF(1|2),#B_PLF1E:,^8;                                                 \
2682                  PLF_GASTEIZ3[BT:0,0,89,65][BT:0,0,92,53],8*PLF_GASTEIZ3,                                \
2683                  PLF_GASTEIZ3[BT:6,0,89,65][BT:3,0,92,53]:,-6;D_RUCK4,480,D_RUCK4,:,38;                  \
2684                  PAS15,16,D_RUCK4S,30,LAMP01,40,PAS13,20,PAS08,5,PLF_J2D,10,PAS25,15,PERS05,20,          \
2685                  B_SHELTER,26,#PAS05,25,PASG03,10,5,I_TIMTAB1,,5,PLF_J2D,20,PASG02,20,DBAG_STAIRS,30,    \
2686                  PASG01,25,PAS11,DUSTBIN1,11,PLF_J2D,25,BANK8,15,BANK8,20,PAS05,28,PAS23,20,BANK8,35,    \
2687                  DUSTBIN1,4,16,PASG05,15,BANK04,30,B_SHELTER,26,PAS03,35,BANK01,DUSTBIN1,15,PAS05,12,    \
2688                  LAMP01,15,D_RUCK4S,12,PERS01,20,PERS03,:,8;100,D_HHAUFS1,:,8);                          \
2689                  W=X;
2690                M=OPEN; POOL=POOL_HMB_S2; D=L; V=10; A=.25; P=*50-10; TB=3-9;
2691              $ENDPATH
2692            $ENDSCENE
2693  #
2694  # Hamburger Hochbahn
2695  #
2696            $GROUP                                                                                        \
2697                NAME=D_HH_H1;                                                                             \
2698                LC=1; %GBG((STBGFO|STBGUB),ENV_WAYM);
2699              TX=Hamburger Hochbahn (Metro)TU1;                                                           \
2700                C=<HH_TUH1,HH_TUH2;                                                                       \
2701                F=RM3;
2702              TX=Hamburger Hochbahn (Metro)TU1;                                                           \
2703                C=<1-2@(HH_T1L~KK,HH_T1~KK)|(HH_T1L~WSI|HH_T1~WSI);
2704              TX=Hamburger Hochbahn (Metro)TU1;                                                           \
2705                C=<1-3@(HH_TU2L,HH_TU2);
2706              TX=Hamburger Hochbahn (Metro)TU1;                                                           \
2707                C=<1-3*HH_TU1L,HH_TU1;
2708            $ENDGROUP
2709            $GROUP                                                                                        \
2710                NAME=D_HH_H2;                                                                             \
2711                TX=Hamburger Hochbahn (Metro)DT1;                                                         \
2712                LC=1;                                                                                     \
2713                C=2-3*(<HHA_DT1505L,HHA_DT1505); %GBG((STBGFO|STBGUB),ENV_WAYM);
2714              TX=Hamburger Hochbahn (Metro)DT1;                                                           \
2715                C=1-3*HH_DT1A~FA|HH_516;
2716              TX=Hamburger Hochbahn (Metro)DT1;                                                           \
2717                C=1-3*HH_DT1B~FA;                                                                         \
2718                F=RM4;
2719              TX=Hamburger Hochbahn (Metro)DT1;                                                           \
2720                C=1-3*HH_DT1B~KK;                                                                         \
2721                F=RM4;
2722              TX=Hamburger Hochbahn (Metro)DT1;                                                           \
2723                C=1-3*HH_DT1A~KK|HHA_HANSEAT;
2724            $ENDGROUP
2725            $GROUP                                                                                        \
2726                NAME=D_HH_H3;                                                                             \
2727                TX=Hamburger Hochbahn (Metro)DT2;                                                         \
2728                LC=1;                                                                                     \
2729                C=1:1|3:2|5:3*HHA_DT2_2; %GBG((STBGFO|STBGUB),ENV_WAYM);
2730              TX=Hamburger Hochbahn (Metro)DT2;                                                           \
2731                C=1:1|3:2|5:3*HHA_DT2_3;
2732              TX=Hamburger Hochbahn (Metro)DT2;                                                           \
2733                C=1:1|3:2|5:3*HHA_DT2_4;
2734              TX=Hamburger Hochbahn (Metro)DT2;                                                           \
2735                C=1:1|3:2|5:3*DT2E_1;
2736              TX=Hamburger Hochbahn (Metro)DT2;                                                           \
2737                C=1:1|3:2|5:3*DT2E_2;
2738            $ENDGROUP
2739            $GROUP                                                                                        \
2740                NAME=D_HH_H4;                                                                             \
2741                TX=Hamburger Hochbahn (Metro)DT3;                                                         \
2742                LC=1;                                                                                     \
2743                C=2*HHA_DT3; %GBG((STBGFO|STBGUB),ENV_WAYM);
2744              TX=Hamburger Hochbahn (Metro)DT4;                                                           \
2745                C=1-2*DT4_101~FA|DT4_101~HS|DT4_114|DT4_411;
2746              TX=Hamburger Hochbahn (Metro)DT5;                                                           \
2747                C=1-2*HHA_DT5;
2748            $ENDGROUP
2749            $GROUP                                                                                        \
2750                NAME=D_HH_H5;                                                                             \
2751                LC=1; %GBG((STBGFO|STBGUB),ENV_WAYM);
2752              TX=Hamburger Hochbahn (Metro)Arbeitszug;                                                    \
2753                C=HHA_DL2(|L),0-2*HHA_(8160KB1|8160LB3|8161KB1|LORE_LB2|LORE_LB3|LORE_LB4|SB3);
2754              TX=Hamburger Hochbahn (Metro)Arbeitszug;                                                    \
2755                C=HHA_AL015,HHA_ABW4[O:FRMATHHA,,15];
2756              TX=Hamburger Hochbahn (Metro)Arbeitszug;                                                    \
2757                C=HHA_AL010,HHA_ABW4K[O:RAIL7,,15]|HHA_ABW4K2[O:BALLAST(10|22),,15];
2758              TX=Hamburger Hochbahn (Metro)DT1 - Arbeitszug;                                              \
2759                C=(<HHA_AT4_026AL,HHA_AT4_026B)|(<HHA_AT5_027AL,HHA_AT5_027B)|                            \
2760                  (<HHA_AT6_028AL,HHA_ASB3_061,HHA_AT6_028B);
2761            $ENDGROUP
2762          }
2763          {TRAM?
2764            $GROUP                                                                                        \
2765                NAME=D_HH_T1;                                                                             \
2766                LC=1; %GBG(STBGEU,ENV_WAYT1);
2767              TX=Hamburg Typ Z1;                                                                          \
2768                C=VHH_Z1T,VHH_Z1B|(VHH_Z1T1,0-2*VHH_Z1B(1|2))|(VHH_Z1T1C,VHH_Z1B2C);
2769              TX=Hamburg Typ Z2;                                                                          \
2770                C=(VHH_Z2T,VHH_Z2B)|(VHH_Z2T1,VHH_Z2B1);
2771              TX=Hamburg HHA V2;                                                                          \
2772                C=VHH_V2T,|VHH_V2B;
2773              TX=Hamburg HHA V5;                                                                          \
2774                C=(HHA_V5,HHA_B5)|(HHA_V5L,HHA_B5L);
2775              TX=Hamburg HHA V6;                                                                          \
2776                C=(HHA_V6T,|HHA_V7B)|(HHA_V6TL,|HHA_V7BL)|HHA_3587L|HHA_3587|                             \
2777                  (HHA_V(6E|6ERR|6ERC|6E|6O)L,|2:HHA_(B6A|B6B|B6C|B6O|V6BE)L)|                            \
2778                  (HHA_V(6E|6ERR|6EA|6EE|6ERR|6O),|2:HHA_(B5|B6B|B6C|B6O|B7O|V6BE));
2779              TX=Hamburg HHA V7;                                                                          \
2780                C=(VHH_4V7EL,|VHH_4V7BL)|(VHH_4V7E,|VHH_4V7B);
2781              TX=Hamburg Typ VG;                                                                          \
2782                C=(HHA_VGL,HHA_Z4L)|(VHH_4VGL,VHH_4VBL)|(HHA_VG,HHA_Z4)|(VHH_4VG,VHH_4VB);
2783            $ENDGROUP
2784
2785            $GROUP                                                                                        \
2786                NAME=D_HH_T2;                                                                             \
2787                LC=1; %GBG(STBGEU,ENV_WAYT1);
2788              TX=Hamburg AT 3060;                                                                         \
2789                C=HHA_3060(|L);
2790              TX=Hamburg AT 3082;                                                                         \
2791                C=HHA_3982;
2792              TX=Hamburg AT 3099;                                                                         \
2793                C=HHA_3999(|L);
2794            $ENDGROUP
2795            $GROUP                                                                                        \
2796                NAME=D_HH_T3;                                                                             \
2797                LC=1; %GBG(STBGFO,ENV_WAYT1);
2798              TX=Hamburg Typ K2 Altrahlstedt - Wohldorf;                                                  \
2799                C=VHH_K2;                                                                                 \
2800                AB=25;
2801            $ENDGROUP
2802          }
2803          {BUS?
2804            $GROUP                                                                                        \
2805                NAME=D_HH_B1;                                                                             \
2806                LC=1; %GBG(STBGEU,ENV_WAYA);
2807              M=FOLLOW;                                                                                   \
2808                C=(ELBING_B900NL;VHH_BUSSING_P13DL;VHH_BUSSING_P14L);                                     \
2809                D=L;
2810              M=FOLLOW;                                                                                   \
2811                C=(ELBING_B900N;VHH_BUSSING_P13D;VHH_BUSSING_P14);                                        \
2812                D=R;
2813              C=VHH_O405NL;
2814              C=VHH_O405N;
2815              C=VHH_O530L~FA|VHH_0530L~ECK;
2816              C=VHH_O530~FA|VHH_0530~ECK;
2817              C=HHA_O530GL|HHA_O530G_BONPRIXL;
2818              C=HHA_O530G|HHA_O530G_BONPRIX;
2819            $ENDGROUP
2820
2821            $GROUP                                                                                        \
2822                NAME=D_HH_B2;                                                                             \
2823                LC=1; %GBG(STBGEU,ENV_WAYO);
2824              TX=O-Bus 331;                                                                               \
2825                C=HHA_331(|L);
2826              TX=O-Bus 301;                                                                               \
2827                C=HHA_301(|L);
2828            $ENDGROUP
2829          }
2830        $ENDSECTION
2831  #--------------------------------------------------------------------------
2832  #
2833  # Hannover
2834  #
2835        {TRAM|BUS?
2836          $SECTION                                                                                        \
2837              NAME=D_HANNOVER;                                                                            \
2838              AB=30; %SECFIN;%TITLE(Hannover);
2839            {BUS?
2840              $GROUP                                                                                      \
2841                  NAME=D_H_B1;                                                                            \
2842                  LC=1; %GBG(STBGEU,ENV_WAYA);
2843                M=FOLLOW;                                                                                 \
2844                  C=3-5*UES_O305(G1|G2|G3|G4|G5|G6|G98|G99|_1);
2845                M=FOLLOW;                                                                                 \
2846                  C=2-4*UES_O405(|G1|G2|N|NE|NE1);
2847                M=FOLLOW;                                                                                 \
2848                  C=2-4*UES_(EXPOB|EXPOBG|O530|O530A|O530C|O530G_91);
2849                M=FOLLOW;                                                                                 \
2850                  C=2-3*UES_(EXPOB|EXPOBG|O530G_91)L;
2851              $ENDGROUP
2852            }
2853            {TRAM?
2854              $SCENE                                                                                      \
2855                  NAME=D_H_T1;                                                                            \
2856                  DY=100; YDIR=U;
2857                $PATH Y=10; LC=2;                                                                         \
2858                    FG=65*PLF1O:50,-3;
2859                  M=OPEN;                                                                                 \
2860                    C=1-2*UES_60(01|09|10|12|16|22);                                                      \
2861                    D=R; P=>50+300;
2862                $ENDPATH
2863                $PATH Y=10; LC=2;                                                                         \
2864                    FG=(TRBED25:..,^0;FL_DRG_B:..,-4,#);
2865                  M=STOP;                                                                                 \
2866                    C=1-2*UES_60(00|01|03|04|05|06|07|09|10|12|13|14|15|16|17|18|22|23);                  \
2867                    D=L; P=<50-300;
2868                $ENDPATH
2869              $ENDSCENE
2870              $GROUP                                                                                      \
2871                  NAME=D_H_T2;                                                                            \
2872                  LC=3; %GBG(STBGEU,ENV_WAYT1);
2873                C=UES_(177|178|178A|178B|178C|179|180|191),0-2*UES_(1119|1127|1178);
2874                C=UES_23(0|1|2|3|4),0-2*UES_123(0|1|2|3|4);
2875              $ENDGROUP
2876              $GROUP                                                                                      \
2877                  NAME=D_H_T3;                                                                            \
2878                  LC=2; %GBG(STBGEU,ENV_WAYT1);
2879                C=UES_40(0|1),UES_40(0|1)B;
2880                C=UES_52(0|1|2);
2881                C=UES_717,UES_717B;
2882                C=UES_719,UES_719B;
2883              $ENDGROUP
2884              $GROUP                                                                                      \
2885                  NAME=D_H_T4;                                                                            \
2886                  TX=6x Tw 500 + 4x Bw 1500;                                                              \
2887                  LC=2; %GBG(STBGEU,ENV_WAYT1);
2888                C=UES_503L;
2889                M=OPEN;                                                                                   \
2890                  C=UES_503;
2891                C=UES_501L,UES_1501L;
2892                M=OPEN;                                                                                   \
2893                  C=UES_501,UES_1501;
2894                C=UES_502,UES_1502;
2895                C=UES_50(1|3|6),UES_150(5|6);
2896                C=UES_503A;
2897                C=UES_504;
2898                C=UES_505;
2899                C=UES_507;
2900                C=UES_508;
2901                C=UES_509,UES_1509;
2902                C=UES_520|UES_521|UES_522;
2903                C=UES_522A;
2904              $ENDGROUP
2905              $GROUP                                                                                      \
2906                  NAME=D_H_T5;                                                                            \
2907                  LC=2; %GBG(STBGEU,ENV_WAYT1);
2908                C=UES_716L,UES_716B;
2909                C=UES_716,UES_716B;
2910                C=UES_718L,UES_718B;
2911                C=UES_718,UES_718B;
2912              $ENDGROUP
2913            }
2914            {BUS?
2915              $GROUP                                                                                      \
2916                  NAME=D_H_B2; %GBG(STBGEU,ENV_WAYA);
2917                M=FOLLOW;                                                                                 \
2918                  C=3-5*UES_O305(G1|G2|G3|G4|G5|G6|G98|G99|_1);
2919                M=FOLLOW;                                                                                 \
2920                  C=2-4*UES_O405(|G1|G2|N|NE|NE1);
2921              $ENDGROUP
2922            }
2923            {TRAM?
2924              $SCENE                                                                                      \
2925                  NAME=D_H_T6;                                                                            \
2926                  DY=100; YDIR=U;                                                                         \
2927                  FG=65*PLF1O:50,7;
2928                $PATH Y=10; LC=2;
2929                  M=OPEN;                                                                                 \
2930                    C=1-2*UES_60(01|09|10|12|16|22);                                                      \
2931                    D=R; P=>50+300;
2932                $ENDPATH
2933                $PATH Y=10; LC=2; W=T;
2934                  M=STOP;                                                                                 \
2935                    C=1-2*UES_60(00|01|03|04|05|06|07|09|10|12|13|14|15|16|17|18|22|23);                  \
2936                    D=L; P=<50-300;
2937                $ENDPATH
2938              $ENDSCENE
2939              $GROUP                                                                                      \
2940                  NAME=D_H_T7;                                                                            \
2941                  TX=6000;                                                                                \
2942                  LC=2; AB=25; %GBG(STBGEU,ENV_WAYT3);
2943                C=UES_TW6000(B|M|R);
2944                C=2*(UES_6001|UES_TW6000GW~HDR|UES_6017|UES_6023|UES_6014|UES_6016|UES_6013|UES_6015|     \
2945                    UES_6004|UES_6006|UES_6005|UES_6018|UES_6003);
2946              $ENDGROUP
2947              $GROUP                                                                                      \
2948                  NAME=D_H_T8;                                                                            \
2949                  LC=2; AB=25; %GBG(STBGEU,ENV_WAYT3);
2950                TX=Tw Serie 2000 + 2500;                                                                  \
2951                  C=UES_TW2000~HDR,USE_TW2500~HDR;
2952                C=UES_TW2500EXPO;
2953                C=UES_TW2500~HS;
2954                C=UES_TW2000~HS;
2955              $ENDGROUP
2956              $GROUP                                                                                      \
2957                  NAME=D_H_T9;                                                                            \
2958                  LC=1; %GBG(STBGEU,ENV_WAYT2);
2959                TX=Atw 801;                                                                               \
2960                  C=UES_801;
2961                TX=Atw 802;                                                                               \
2962                  C=UES_802;
2963                TX=Atw 803;                                                                               \
2964                  C=UES_803;
2965                TX=Atw 804;                                                                               \
2966                  C=UES_804;
2967                TX=Atw 806;                                                                               \
2968                  C=UES_806;
2969                TX=Atw 808;                                                                               \
2970                  C=UES_808;
2971                TX=Atw 809;                                                                               \
2972                  C=UES_809;
2973                TX=Atw 821;                                                                               \
2974                  C=UES_821;
2975                TX=Atw 822;                                                                               \
2976                  C=UES_822;
2977                TX=Atw 823;                                                                               \
2978                  C=UES_823;
2979                TX=Atw 825;                                                                               \
2980                  C=UES_825;
2981                TX=Atw 841;                                                                               \
2982                  C=UES_841;
2983                TX=Atw 841;                                                                               \
2984                  C=UES_841V;
2985              $ENDGROUP
2986            }
2987            {BUS?
2988              $GROUP                                                                                      \
2989                  NAME=D_H_B3; %GBG(STBGEU,ENV_WAYA);
2990                M=FOLLOW;                                                                                 \
2991                  C=2-4*UES_(EXPOB|EXPOBG|O530|O530A|O530C|O530G_91);
2992                M=FOLLOW;                                                                                 \
2993                  C=2-3*UES_(EXPOB|EXPOBG|O530G_91)L;
2994              $ENDGROUP
2995            }
2996          $ENDSECTION
2997        }
2998  #--------------------------------------------------------------------------
2999  #
3000  # Karlsruhe
3001  #
3002        $SECTION                                                                                          \
3003            NAME=D_KARLSRUHE;                                                                             \
3004            AB=30; %SECFIN;%TITLE(Karlsruhe);
3005          {TRAM?
3006            $GROUP                                                                                        \
3007                NAME=D_KA_T1;                                                                             \
3008                LC=1; %GBG(STBGEU,ENV_WAYT1);
3009              TX=Frankfurt Typ G als Buga Tw 1967;                                                        \
3010                C=VGF_G_BUGA1967;
3011              TX=14;                                                                                      \
3012                C=TW014~KVV;
3013              TX=KSW 482;                                                                                 \
3014                C=TW482~KVV;
3015              TX=94-113;                                                                                  \
3016                C=TW485~KVV,BW299GE~KVV;
3017              TX=94-113;                                                                                  \
3018                C=TW100~KVV,BW298WE~KVV,BW299WE~KVV;
3019              TX=Tw 100 + 298;                                                                            \
3020                C=VBK_100,VBK_298;
3021              TX=Tw 100 + 298 + 299;                                                                      \
3022                C=VBK_100,VBK_298,VBK_299;
3023              TX=Tw 80 - Arbeitswagen Albtalbahn;                                                         \
3024                C=VBK_80;                                                                                 \
3025                AB=15;
3026              TX=Spiegelwagen modernisiert;                                                               \
3027                C=VBK_95,VBK_299O;
3028              TX=115 + 299;                                                                               \
3029                C=KA_KSW,VBK_299O;
3030            $ENDGROUP
3031          }
3032          {TRAM?
3033            $GROUP                                                                                        \
3034                NAME=D_KA_T2;                                                                             \
3035                TX=Großraumzug,Tw 134-141 + Bw 309-315 =434-441;                                          \
3036                LC=2; AB=15; %GBG(STBGEU,ENV_WAYT2);
3037              C=(VBK_6_139L,VBK_6_439L)|(VBK_6_139,VBK_6_439);
3038              C=TW144GEL~KVV;
3039              C=TW144GE~KVV;
3040              C=TW108AVL~KVV;
3041              C=TW108AV~KVV;
3042              C=F_TW155L~KVV;
3043              C=F_TW155~KVV;
3044            $ENDGROUP
3045            $GROUP                                                                                        \
3046                NAME=D_KA_T3;                                                                             \
3047                TX=GT6 144-173;                                                                           \
3048                LC=2; %GBG(STBGEU,ENV_WAYT2);
3049              C=VBK_GT6L;
3050              C=VBK_GT6;
3051              C=AVG_GT6L;
3052              C=AVG_GT6;
3053              C=VBK_GT6BL;
3054              C=VBK_GT6B;
3055            $ENDGROUP
3056            $GROUP                                                                                        \
3057                NAME=D_KA_T4;                                                                             \
3058                TX=GT8 173-215;                                                                           \
3059                LC=2; %GBG(STBGEU,ENV_WAYT2);
3060              C=VBK_214SPARKASSE(|L)|VBK_209(|L);
3061              C=VBK_(199K|202R|203B|204R|206R|207B|208B|208O)(|L);
3062              C=VBK_(209G|210B|211G|212R|213B|214S|215S)(|L);
3063              C=AVG_GT8BL~TIS;
3064              C=AVG_GT8B~TIS;
3065              C=AVG_GT8W1L;
3066              C=AVG_GT8W1;
3067            $ENDGROUP
3068            $GROUP                                                                                        \
3069                NAME=D_KA_T5;                                                                             \
3070                TX=Albtalbahn 1-21 =101-121;                                                              \
3071                LC=1; %GBG(STBGEU,ENV_WAYT3);
3072              TX=AVG 1-21;                                                                                \
3073                C=AVG_GT8B~FLE|AVG_GT8BL~FLE;
3074              C=VBK_GT8A(|L);
3075              C=VBK_119SCHULERTAGE(|L);
3076            $ENDGROUP
3077            $GROUP                                                                                        \
3078                NAME=D_KA_T6;                                                                             \
3079                TX=Albtalbahn 22-25 =122-125;                                                             \
3080                LC=1; %GBG(STBGEU,ENV_WAYT3);
3081              C=VBK_GT8_70C;
3082              C=AVG_GT8_70C,AVG_GT8_70C;
3083            $ENDGROUP
3084            $GROUP                                                                                        \
3085                NAME=D_KA_T7;                                                                             \
3086                TX=221-265;                                                                               \
3087                LC=1; %GBG(STBGEU,ENV_WAYT3);
3088              TX=Tw 231;                                                                                  \
3089                C=VBK_231L|VBK_231;
3090              TX=Tw Serie 221-240;                                                                        \
3091                C=VBK_GT6_70DNL|VBK_GT6_70DN;
3092              C=VBK_248;
3093              C=VBK_229(|L);
3094            $ENDGROUP
3095            $GROUP                                                                                        \
3096                NAME=D_KA_T8;                                                                             \
3097                TX=Niederflur lang;                                                                       \
3098                LC=1; %GBG(STBGEU,ENV_WAYT3);
3099              TX=Tw Serie 301-325;                                                                        \
3100                C=VBK_GT8_70DNL|VBK_GT8_70DN;
3101              TX=Tw Serie 326-350;                                                                        \
3102                C=VBK_326(|L);
3103              C=VBK_309L;
3104            $ENDGROUP
3105            $GROUP                                                                                        \
3106                NAME=D_KA_T9;                                                                             \
3107                TX=GT6-80 (501-540);                                                                      \
3108                LC=1; AB=25; GBGSTBGEU,ENV_WAYT3;
3109              C=AVG_GT6_80C1L;
3110              C=AVG_GT6_80C1;
3111              C=AVG_GT6_80C2L;
3112              C=AVG_GT6_80C2;
3113              C=AVG_GT6_80C3L;
3114              C=AVG_GT6_80C3;
3115              C=AVG_501AL;
3116              C=AVG_501A;
3117              C=AVG_501L;
3118              C=AVG_501;
3119              C=AVG_501MINI;
3120              C=AVG_514;
3121            $ENDGROUP
3122          }
3123          {BUS?
3124            $GROUP                                                                                        \
3125                NAME=D_KA_B1; %GBG(STBGEU,ENV_WAYA);
3126              C=OLDBUS2L~KVV|OLDBUS2~KVV;
3127              M=FOLLOW;                                                                                   \
3128                C=3-6*(N4016BA|N4021BA|O405GA|O405GNB|O405GNV|O405SWA|O405VBK|O408AVG|O408VBK|S315)~KVV;  \
3129                D=R;
3130              M=FOLLOW;                                                                                   \
3131                C=3-6*(N4016BA|N4021BA|O405GA|O405GNB|O405GNV|O405SWA|O405VBK|O408AVG|O408VBK|S315)L~KVV; \
3132                D=L;
3133            $ENDGROUP
3134          }
3135          {TRAM?
3136            $GROUP                                                                                        \
3137                NAME=D_KA_T10;                                                                            \
3138                TX=GT8 80C 551-590;                                                                       \
3139                LC=2; %GBG(STBGEU,ENV_WAYT3);
3140              C=AVG_GT8_80CL;
3141              C=AVG_GT8_80C;
3142              TX=Tw 563;                                                                                  \
3143                C=AVG_563L|AVG_563;
3144              C=AVG_574L;
3145              C=AVG_574;
3146              C=AVG_GT8PAL;
3147              C=AVG_GT8PA;
3148              C=AVG_581JOCKL;
3149              C=AVG_581JOCK;
3150              C=AVG_570L;
3151              C=AVG_570;
3152              C=AVG_579L;
3153              C=AVG_579;
3154            $ENDGROUP
3155            $GROUP                                                                                        \
3156                NAME=D_KA_T11;                                                                            \
3157                TX=Tramtrain 801-922;                                                                     \
3158                LC=2; %GBG(STBGEU,ENV_WAYT3);
3159              C=AVG_837;
3160              C=AVG_GT8_100PA1;
3161              C=AVG_GT8_100PA2;
3162              C=AVG_GT8_100C;
3163              C=AVG_GT8_100D;
3164              TX=TW 860 + 870;                                                                            \
3165                C=AVG_GT8_100PB;
3166              TX=848;                                                                                     \
3167                C=AVG_848;
3168              TX=Tw 880;                                                                                  \
3169                C=AVG_880;
3170              TX=Tw 832;                                                                                  \
3171                C=AVG_832;
3172              C=AVG_836;
3173              C=AVG_GT8_BISTRO;
3174              C=AVG_565L;
3175              C=AVG_813;
3176              C=AVG_871;
3177              C=AVG_882;
3178              C=AVG_916;
3179              C=AVG_898;
3180              C=AVG_925;
3181            $ENDGROUP
3182            $GROUP                                                                                        \
3183                NAME=D_KA_T12;                                                                            \
3184                LC=1; %GBG(STBGEU,ENV_WAYT1);
3185              TX=AT 490;                                                                                  \
3186                C=TW490ROL~KVV;                                                                           \
3187                D=L;
3188              TX=AT 490;                                                                                  \
3189                C=TW490RO~KVV;                                                                            \
3190                D=R;
3191              TX=AT 489;                                                                                  \
3192                C=TW489~KVV;
3193              TX=AT 492;                                                                                  \
3194                C=TW492GEL~KVV;
3195              TX=AT 492;                                                                                  \
3196                C=TW492GE~KVV;
3197              TX=AT 495;                                                                                  \
3198                C=VBK_495;
3199              TX=AT 496;                                                                                  \
3200                C=TW496GEL~KVV;
3201              TX=AT 496;                                                                                  \
3202                C=TW496GE~KVV;
3203              TX=AT 80;                                                                                   \
3204                C=AVG_80;
3205            $ENDGROUP
3206          }
3207          {CRAIL?
3208            $GROUP                                                                                        \
3209                NAME=D_KA_T13;                                                                            \
3210                LC=1; %GBG(STBGFO,ENV_WAYT5);
3211              TX=Albtalbahn ET 1-8;                                                                       \
3212                C=ATBTW1~KVV,ATBES104~KVV,ATBTW1~KVV;
3213              TX=Albtalbahn E 1-3;                                                                        \
3214                C=ATBELOK1~KVV,2-3*ATBES104~KVV;
3215            $ENDGROUP
3216          }
3217        $ENDSECTION
3218  #--------------------------------------------------------------------------
3219  #
3220  # Köln
3221  #
3222        $SECTION                                                                                          \
3223            NAME=D_KOLN;                                                                                  \
3224            TX=$(LABEL);                                                                                  \
3225            TXC=#AAAAAA; TXB=#000000; TXX=*; TXY=19; SEQ=D; AB=10; BL=35; %TITLE([N=Köln;E=Cologne;]);%SECFIN;
3226          {TRAM?
3227            $GROUP                                                                                        \
3228                NAME=D_K_T1;                                                                              \
3229                TX=5100;                                                                                  \
3230                LC=1; %GBG(STBGEU,ENV_WAYA);
3231              TX=Köln Pferdebahn/horsetram;                                                               \
3232                M=1:STOP|2:SIMPLE;                                                                        \
3233                C=(HORSEB|HORSEE|HORSEW),KVB_211;                                                         \
3234                D=R; V=0.7-1.1;
3235              TX=407;                                                                                     \
3236                M=1:STOP|2:SIMPLE;                                                                        \
3237                C=KVB_407|KVB_1T2;                                                                        \
3238                D=R;
3239            $ENDGROUP
3240            $GROUP                                                                                        \
3241                NAME=D_K_T2;                                                                              \
3242                TX=$(SIGN)Finchen (KFBE)P. Herbrand & Co 1911;                                            \
3243                LC=1; SEQ=RSEQ; AB=15; DY=105; %GBG(STBGEU,ENV_WAYT1);
3244              M=1:STOP|2:SIMPLE;                                                                          \
3245                C=KFBE_1286(|[!L]);
3246              M=CUT;                                                                                      \
3247                C1=<KFBE_1286[!L],KFBE_MID;                                                               \
3248                D1=L;                                                                                     \
3249                C2=KFBE_1286;
3250              M=1:STOP|2:SIMPLE;                                                                          \
3251                C=<KFBE_1286[!L],KFBE_MID,KFBE_1286;
3252              M=UNIT;                                                                                     \
3253                C1=KFBE_1286[!L];                                                                         \
3254                C2=KFBE_MID,KFBE_1286;                                                                    \
3255                D2=L; P=>95;
3256              M=1:STOP|2:SIMPLE;                                                                          \
3257                C=KFBE_1286[!L],KFBE_MID;                                                                 \
3258                D=L;
3259              M=CUT;                                                                                      \
3260                C1=<KFBE_1286[!L];                                                                        \
3261                C2=<KFBE_MID,KFBE_1286;                                                                   \
3262                D2=R;
3263              M=1:STOP|2:SIMPLE;                                                                          \
3264                C=KFBE_1286,KFBE_MID;                                                                     \
3265                D=R;
3266              M=UNIT;                                                                                     \
3267                C1=KFBE_1286;                                                                             \
3268                C2=<KFBE_1286[!L],KFBE_MID;                                                               \
3269                D2=R; P=<5;
3270            $ENDGROUP
3271            $GROUP                                                                                        \
3272                NAME=D_K_T3;                                                                              \
3273                TX=Köln Tram;                                                                             \
3274                LC=1; SEQ=RSEQ; AB=15; DY=105; %GBG(STBGEU,ENV_WAYT1);
3275              TX=Köln 4x Tw KFBE;                                                                         \
3276                C=KFBE_T4;
3277              TX=Köln 4x Tw + Bw Zug Serie 1001/2001;                                                     \
3278                C=2*KFBE_DT8;
3279              TX=Köln Vorortzug Linie P;                                                                  \
3280                C=K2000F3L;                                                                               \
3281                D=L;
3282              TX=Köln 2xZRTw 915 - 968 + 2xZRBw Bj. 1928-30;                                              \
3283                C=KVB_2RINGT,KVB_2RINGB,KVB_2RINGT;
3284              TX=Köln 3x Tw 1800/2800;                                                                    \
3285                C=(KVB_3T3L,KVB_3B3L)|(KVB_3T3,KVB_3B3);
3286              TX=Köln KSW;                                                                                \
3287                C=KVB_3KSW,KVB_3B2;
3288              TX=Köln Aufbauwagen;                                                                        \
3289                C=KVB_3T2_AFB,KVB_3B2_AFB,KVB_3T2_AFB;
3290              TX=Köln 2xERTw 1601 - 1650 + 2xERBw;                                                        \
3291                C=(KVB_4T2L,2*KVB_4B2L)|(KVB_4T2,2*KVB_4B2);
3292              TX=Köln 1732;                                                                               \
3293                M=1:STOP|2:SIMPLE;                                                                        \
3294                C=KVB_1732;
3295              TX=Köln 1872;                                                                               \
3296                M=1:STOP|2:SIMPLE;                                                                        \
3297                C=KVB_1872;                                                                               \
3298                D=R;
3299              M=1:OPEN|2:SIMPLE;                                                                          \
3300                C=KVB_1019;
3301            $ENDGROUP
3302          }
3303          {BUS?
3304            $GROUP                                                                                        \
3305                NAME=D_K_B1;                                                                              \
3306                LC=1; %GBG(STBGMD,ENV_WAYA);
3307              C=BUS1_5DECL;
3308              C=BUS1_5DEC;
3309              C=BUS1_5DEC1L;
3310              C=BUS1_5DEC1;
3311            $ENDGROUP
3312          }
3313          {TRAM?
3314            $GROUP                                                                                        \
3315                NAME=D_K_T4;                                                                              \
3316                LC=1; SEQ=RSEQ; AB=15; DY=105; %GBG(STBGMD,ENV_WAYT1);
3317              TX=Köln Tram;                                                                               \
3318                M=1:STOP|2:SIMPLE;                                                                        \
3319                C=(KVB_1824,0-1*KVB_2825)|(KVB_1824L,0-1*KVB_2825L);
3320            $ENDGROUP
3321            $GROUP                                                                                        \
3322                NAME=D_K_T5;                                                                              \
3323                TX=1300;                                                                                  \
3324                LC=1; SEQ=RSEQ; AB=15; DY=105;
3325              M=1:STOP|2:SIMPLE;                                                                          \
3326                C=1-2@KVB_1321L|KVB_1321; %GBG(STBGMD,ENV_WAYT3);
3327              M=CUT; D=L;                                                                                 \
3328                C1=KVB_1321L;                                                                             \
3329                D1=L;                                                                                     \
3330                C2=KVB_1321L[PD];                                                                         \
3331                D2=L; T2=P1U,2;
3332              M=UNIT; D=R;                                                                                \
3333                C1=KVB_1321;                                                                              \
3334                D1=R;                                                                                     \
3335                C2=KVB_1321;                                                                              \
3336                D2=R; T2=2,C2.PD,2;
3337            $ENDGROUP
3338            $GROUP                                                                                        \
3339                NAME=D_K_T6;                                                                              \
3340                TX=1100;                                                                                  \
3341                LC=1; SEQ=RSEQ; AB=15; DY=105; %GBG(STBGMD,ENV_WAYT3);
3342              M=1:OPEN|1:SIMPLE;                                                                          \
3343                C=KVB_1100,0-1*KVB_1100L;                                                                 \
3344                D=R;
3345              M=1:STOP|2:SIMPLE;                                                                          \
3346                C=KVB_1100L,0-1*KVB_1100;                                                                 \
3347                D=L;
3348              M=OPEN;                                                                                     \
3349                C=<(KVB_1100L,KVB_1100)|KVB_1019;                                                         \
3350                D=R; P=*50; W=2E;                                                                         \
3351                FG=3*(5*PLF1O,PLF1L),5*PLF1O:50,-9;                                                       \
3352                BG_GRAS1:..,-9;
3353              C=<KVB_1100L~WSI,KVB_1100~WSI;
3354            $ENDGROUP
3355            $GROUP                                                                                        \
3356                NAME=D_K_T7;                                                                              \
3357                LC=1; SEQ=RSEQ; AB=15; DY=105; %GBG(STBGMD,ENV_WAYT1);
3358              TX=Köln Tw 3501;                                                                            \
3359                M=1:STOP|2:SIMPLE;                                                                        \
3360                C=KVB_3501L|KVB_3501;
3361              TX=Köln Tw Serie 3400;                                                                      \
3362                M=1:STOP|2:SIMPLE;                                                                        \
3363                C=KVB_3413L|KVB_3413;
3364              TX=Köln Tw Serie 3500;                                                                      \
3365                M=1:STOP|2:SIMPLE;                                                                        \
3366                C=KVB_3501L|KVB_3501;
3367              TX=Köln 8x Tw Serie 3000 (A5);                                                              \
3368                M=1:STOP|2:SIMPLE;                                                                        \
3369                C=KVB_A5_BGL|KVB_A5_BG;
3370              TX=Köln Tw 3000 ff;                                                                         \
3371                C=KVB_4GT8L|KVB_4GT8;
3372              TX=Köln Tw Serie 3400;                                                                      \
3373                C=(KVB_4GT4L,KVB_4B2L)|(KVB_4GT4,KVB_4B2);
3374              TX=Köln 8x Tw 3000;                                                                         \
3375                C=KVB_A5_HRWL~WSI|KVB_A5_HRW~WSI;                                                         \
3376                D=L;
3377            $ENDGROUP
3378            $GROUP                                                                                        \
3379                NAME=D_K_T8;                                                                              \
3380                TX=8x Tw A5;                                                                              \
3381                LC=1; SEQ=RSEQ; AB=15; DY=105; %GBG(STBGMD,ENV_WAYT3);
3382              M=1:STOP|2:SIMPLE;                                                                          \
3383                C=KVB_A5_RWL|KVB_A5_HRWL|KVB_A5U_RWL|KVB_A5U_HRWL;                                        \
3384                D=L; TB=|C<|C>;
3385              M=1:STOP|2:SIMPLE;                                                                          \
3386                C=KVB_A5_RW|KVB_A5_HRW|KVB_A5U_RW|KVB_A5U_HRW;                                            \
3387                D=R; TB=|C<|C>;
3388              M=1:STOP|2:SIMPLE;                                                                          \
3389                C=(A5L,A5UL)|(A5UL,A5L)|(2*A5UL);
3390              M=1:STOP|2:SIMPLE;                                                                          \
3391                C=(A5,A5U)|(A5U,A5)|(2*A5U);
3392            $ENDGROUP
3393            $GROUP                                                                                        \
3394                NAME=D_K_T9;                                                                              \
3395                LC=1; AB=25; %GBG(STBGMD,ENV_WAYT3);
3396              TX=Köln Tw B 100 2000;                                                                      \
3397                C=(2*KVB_2000)|(2*KVB_2000_HR);
3398              TX=Köln Tw B 80 2100;                                                                       \
3399                C=KVB_2000_HR;
3400              TX=Köln Tw B 80 2200;                                                                       \
3401                C=<KVB_2200L~WSI,KVB_2200~WSI;
3402              TX=Köln Typ B 80 2300;                                                                      \
3403                C=KVB_2300;
3404            $ENDGROUP
3405            $GROUP                                                                                        \
3406                NAME=D_K_T10;                                                                             \
3407                LC=1; SEQ=RSEQ; AB=15; DY=105; %GBG(STBGMD,ENV_WAYT3);
3408              M=CUT;                                                                                      \
3409                C1=K2L;                                                                                   \
3410                D1=L;                                                                                     \
3411                C2=K2R;                                                                                   \
3412                D2=R;
3413              M=1:STOP|3:SIMPLE|1:UNIT;                                                                   \
3414                C=K2L|K2R;                                                                                \
3415                C1=K2R;                                                                                   \
3416                C2=K2L;                                                                                   \
3417                D2=R;
3418              M=OPEN;                                                                                     \
3419                C=<K2L,K2R;                                                                               \
3420                D=R; P=50+280; W=2;                                                                       \
3421                BG=FL_SBBR_M1,FL_SBB_F2:..,-4;                                                            \
3422                FG=4*PLF1O,6*(PLF1L,8*PLF1O),PLF1L,4*PLF1O:50,-4;                                         \
3423                AB=30;
3424              M=1:STOP|3:SIMPLE|1:UNIT;                                                                   \
3425                C=<K2L,K2R;                                                                               \
3426                D=X;                                                                                      \
3427                C1=K2L;                                                                                   \
3428                C2=K2R;                                                                                   \
3429                D2=L;
3430            $ENDGROUP
3431            $GROUP                                                                                        \
3432                NAME=D_K_T11;                                                                             \
3433                TX=4000/4100;                                                                             \
3434                LC=1; SEQ=RSEQ; AB=15; DY=105; %GBG(STBGMD,ENV_WAYT1);
3435              M=1:STOP|2:SIMPLE;                                                                          \
3436                C=(3:KVB_4000|1:KVB_4100_125)(|[!L]);                                                     \
3437                T=>OPEN,4,CLOSE,W;
3438              M=1:STOP|2:SIMPLE;                                                                          \
3439                C=3:(KVB_4000(|[!L]),KVB_4000(|[!L]))|1:(KVB_4100_125(|[!L]),KVB_4000(|[!L]))|            \
3440                  1:(KVB_4000(|[!L]),KVB_4100_125(|[!L]));                                                \
3441                T=>OPEN,4,CLOSE,W;
3442              M=UNIT|CUT2;                                                                                \
3443                C1=KVB_4000(|[!L]);                                                                       \
3444                C2=(3:KVB_4000|1:KVB_4100_125)(|[!L]);                                                    \
3445                T2C=1,CL.C>,W,1,CR.C<,W,1;                                                                \
3446                T1C=(1,CR.C<:BW,W,1)|(1,CL.C>:BW,W,1);
3447            $ENDGROUP
3448            $GROUP                                                                                        \
3449                NAME=D_K_T12;                                                                             \
3450                TX=4000;                                                                                  \
3451                LC=1; AB=25; %GBG(STBGMD,ENV_WAYT3);
3452              C=KVB_4000T;
3453              C=KVB_4000_1FCKOLN;
3454              C=KVB_4000L~FLE|KVB_4000L~FLE|KVB_4000WR2~FLE|KVB_4000WR2~FLE|KVB_4000WR~FLE|KVB_4000WR~FLE;
3455              C=KVB_4000_HAIE;
3456              C=KVB_4000GY;
3457              C=KVB_4000_MAGGI;
3458              C=KVB_4000_MAYERSCHE;
3459              C=KVB_4000RC;
3460              C=KVB_4000YP;
3461            $ENDGROUP
3462            $GROUP                                                                                        \
3463                NAME=D_K_T13;                                                                             \
3464                TX=5100;                                                                                  \
3465                LC=1; %GBG(STBGMD,ENV_WAYT3);
3466              M=1:STOP|2:SIMPLE;                                                                          \
3467                C=(KVB_5100|KVB_5101|KVB_5100RW)(|[!L]);                                                  \
3468                T=>OPEN,4,CLOSE,W;
3469              M=1:STOP|2:SIMPLE;                                                                          \
3470                C=(KVB_5100(|[!L]),(KVB_5101)(|[!L]))|(KVB_5101(|[!L]),(KVB_5100)(|[!L]));                \
3471                T=>OPEN,4,CLOSE,W;
3472              M=UNIT|CUT2;                                                                                \
3473                C1=KVB_5100(|[!L]);                                                                       \
3474                C2=(KVB_5101|KVB_5100RW)(|[!L]);                                                          \
3475                T2C=1,CL.C>:FW,W,1,CR.C<:FW,W,1;                                                          \
3476                T1C=1,CR.C<:BW,W,1,CL.C>:BW,W,1;
3477            $ENDGROUP
3478            $GROUP                                                                                        \
3479                NAME=D_K_T14;                                                                             \
3480                TX=5000;                                                                                  \
3481                LC=1; %GBG(STBGMD,ENV_WAYT3);
3482              C=KVB_5000~WSI;
3483              C=KVB_5000_HUK;
3484              C=KVB_5000_2010;
3485              C=KVB_5000_LOTTO;
3486              C=KVB_5000_RHEIN_ENERGIE;
3487              C=KVB_5000_WHOSPERFECT;
3488            $ENDGROUP
3489            $GROUP                                                                                        \
3490                NAME=D_K_T15;                                                                             \
3491                TX=5000;                                                                                  \
3492                LC=1; %GBG(STBGMD,ENV_WAYT3);
3493              TX=Köln Partywagen 1877;                                                                    \
3494                M=1:STOP|2:SIMPLE;                                                                        \
3495                C=KVB_1877|KVB_1877L;
3496              TX=3900;                                                                                    \
3497                C=K3900W(|L);
3498            $ENDGROUP
3499          }
3500          {CRAIL?
3501            $GROUP                                                                                        \
3502                NAME=D_K_C1;                                                                              \
3503                TX=Köln-Bonner Eisenbahn;                                                                 \
3504                LC=2; %GBG(STBGEU,ENV_WAYT3);
3505              C=KBE_ET201;
3506              C=KBE_ET210;
3507              C=KBE_ET56,KBE_ES152;
3508              C=KBE_ET56R,KBE_ES152R;
3509              C=1-2*P36|P38;
3510            $ENDGROUP
3511          }
3512          {BUS?
3513            $GROUP                                                                                        \
3514                NAME=D_K_B2;                                                                              \
3515                TX=Linienbusse der Kölner Verkehrs-Betriebe AG;                                           \
3516                LC=2; AB=25;
3517              M=FOLLOW;                                                                                   \
3518                C=2-4*4:KVB_BUS|4:KVB_BUSG|1:KVB_SC6F58;                                                  \
3519                D=R; %GBG(STBGEU,ENV_WAYA);
3520              M=1:STOP|2:SIMPLE;                                                                          \
3521                C=KVB_BUSL|KVB_BUSG|KVB_BUS|KVB_BUSG|KVB_SC6F58L|KVB_SC6F58;
3522              TX=Linienbusse der Kölner Verkehrs-Betriebe AG;                                             \
3523                M=FOLLOW;                                                                                 \
3524                C=2-4*4:KVB_BUSL|4:KVB_BUSGL|1:KVB_SC6F58L;                                               \
3525                D=L;
3526              TX=Regionalverkehr Köln GmbH;                                                               \
3527                M=FOLLOW;                                                                                 \
3528                C=4-6*RVK_(EL202|NG312|NL202|O305G|O307|O405|O405G|O405N1|O405N2|O405N2W|O407|SG180U|     \
3529                  SG312|SL200|SL202|SU240|UL242|UL272);                                                   \
3530                D=R;
3531              C=RVK_LIONSSTAR|RVK_N4011_EUSKIRCHEN|RVK_N4011_HUERTH|RVK_O405N2_STADTBUS;
3532            $ENDGROUP
3533          }
3534        $ENDSECTION
3535  #--------------------------------------------------------------------------
3536  #
3537  # Leipzig
3538  #
3539        {TRAM|BUS?
3540          $SECTION                                                                                        \
3541              NAME=D_LEIPZIG;                                                                             \
3542              AB=30; %SECFIN;%TITLE([N=Leipzig; H=Lipcse;]);
3543            {TRAM?
3544              $GROUP                                                                                      \
3545                  NAME=D_L_T1;                                                                            \
3546                  LC=1; %GBG(STBGEU,ENV_WAYT1);
3547                TX=Tw Typ 22;                                                                             \
3548                  C=LVB_22C;
3549                TX=Tw Typ 22s + Gotha BE 62;                                                              \
3550                  C=(LVB_22SL,2*LVB_4EB50ML)|(LVB_22S,2*LVB_4EB50M);
3551                TX=Typ 22;                                                                                \
3552                  C=LVB_22;
3553                TX=Tw Typ 29 + Bw Typ 61;                                                                 \
3554                  C=LVB_T29,LVB_B61,LVB_B61A;
3555              $ENDGROUP
3556              $GROUP                                                                                      \
3557                  NAME=D_L_T2;                                                                            \
3558                  LC=1; %GBG(STBGEU,ENV_WAYT1);
3559                TX=AT57s + GB57s 5071 + 5571 Sandmännchen;                                                \
3560                  C=(LVB_AT57S_5071L|LVB_AT57S_5071),LVB_GB57OL|LVB_GB57O;
3561                TX=AT57 + GB57s 5072 + 5572 Sandmänchen;                                                  \
3562                  C=(LVB_AT57S_5021AL,LVB_GB57S_5572L)|(LVB_AT57S_5021A,LVB_GB57S_5572);
3563                C=LVB_RT57|LVB_AT57S_5071L|LVB_AT57S_5071|LVB_RTZ70,0-2*LVB_GB57K_RL|LVB_GB57K_R;
3564                TX=RT57 5069;                                                                             \
3565                  C=LVB_RT57;
3566                C=LVB_AT57S_5021L|LVB_AT57S_5072L,|LVB_GB57S_5572L|LVB_GB57OL;
3567                C=LVB_AT57S_5021|LVB_AT57S_5072,|LVB_GB57S_5572|LVB_GB57O;
3568                TX=RTZ 70;                                                                                \
3569                  C=LVB_RTZ70;
3570              $ENDGROUP
3571              $GROUP                                                                                      \
3572                  NAME=D_L_T3;                                                                            \
3573                  TX=ET50 + EB 50;                                                                        \
3574                  LC=1; %GBG(STBGEU,ENV_WAYT1);
3575                C=LVB_ET50_1601L,0-2*LVB_EB50_803L;
3576                C=LVB_ET50_1601,0-2*LVB_EB50_803;
3577                C=LVB_ET50A,0-2*LVB_EB50A;
3578              $ENDGROUP
3579              $GROUP                                                                                      \
3580                  NAME=D_L_T4;                                                                            \
3581                  LC=1; %GBG(STBGEU,ENV_WAYT1);
3582                TX=ET50/54 + EB50/54;                                                                     \
3583                  C=(LVB_4ET50,LVB_4EB50)|(LVB_4ET50L,LVB_4EB50L);
3584                TX=ET50 + EB50 1601 + 803;                                                                \
3585                  C=(LVB_3ET50,LVB_3EB50)|(LVB_3ET50L,LVB_3EB50L);
3586                TX=ET57 + BE69;                                                                           \
3587                  C=(LVB_ET57L~JP,LVB_BE69L)|(LVB_ET57~JP,LVB_BE69);
3588                TX=ET57 + EB57 + EB57;                                                                    \
3589                  C=(LVB_3ET57L,LVB_3EB57L)|(LVB_3ET57,LVB_4EB57)|(LVB_3ET57L,LVB_4EB57L)|                \
3590                    (LVB_3ET57,LVB_3EB57);
3591                C=LVB_ET50L,0-2*LVB_EB50L;
3592                C=LVB_ET50,0-2*LVB_EB50;
3593                C=LVB_ET57L,0-2*LVB_EB57L;
3594                C=LVB_ET57,0-2*LVB_EB57;
3595                TX=ET60 Historischer Leipziger;                                                           \
3596                  C=(LVB_ET60_1332L,LVB_EB57L~JP)|(LVB_ET60_1332,LVB_EB57~JP);
3597                C=LVB_ET60_1332L,0-2*LVB_BE69L;
3598                C=LVB_ET60_1332,0-2*LVB_BE69;
3599                C=LVB_ET60_1323L,0-2*LVB_EB57L;
3600                C=LVB_ET60_1323,0-2*LVB_EB57;
3601                C=LVB_T57,0-2*LVB_B57;
3602              $ENDGROUP
3603              $GROUP                                                                                      \
3604                  NAME=D_L_T5;                                                                            \
3605                  TX=T4/62 + Bw;                                                                          \
3606                  LC=1; %GBG(STBGEU,ENV_WAYT1);
3607                C=(LVB_G4A(1)L,LVB_B57AL)|(LVB_G4A,LVB_B57A)|(LVB_G4BL,LVB_B57BL)|(LVB_G4B,LVB_B57B)|     \
3608                    (LVB_G4A(|L)~SAND)|(LVB_G4B(|L)~SAND)|(LVB_G4(|L)~JP)|(LVB_G4~AC);
3609                TX=G4 + EB 57;                                                                            \
3610                  C=LVB_G4A~FLE|LVB_G4A1L[#D:L];
3611                TX=G4 + EB57;                                                                             \
3612                  C=(LVB_G4A~FLE,LVB_B57B~FLE)|(LVB_G4A1L,LVB_B57BL~FLE);
3613                TX=G4 + EB57;                                                                             \
3614                  C=(LVB_G461,LVB_4EB57)|(LVB_G461L,LVB_4EB57L);
3615                TX=GT4-61 + EB 57;                                                                        \
3616                  C=(LVB_G4B~FLE,LVB_B57B~FLE)|(LVB_G4BL~FLE,LVB_B57BL~FLE);
3617              $ENDGROUP
3618              $GROUP                                                                                      \
3619                  NAME=D_L_T6;                                                                            \
3620                  TX=T4D/B4D;                                                                             \
3621                  LC=1; %GBG(STBGEU,ENV_WAYT1);
3622                C=LVB_AT4DL;
3623                C=LVB_AT4D;
3624                C=LVB_T4DCL;
3625                C=LVB_T4DC;
3626              $ENDGROUP
3627              $GROUP                                                                                      \
3628                  NAME=D_L_T7;                                                                            \
3629                  TX=T4D/B4D;                                                                             \
3630                  LC=1; %GBG(STBGEU,ENV_WAYT1);
3631                C=[P1U]LVB_(1-2*T|(1-2*T,B))4D(|L)(~JP|~JPD|~AC);
3632                C=[P1U]LVB_(1-2*T|(1-2*T,B))4D(1|2|4)(|L);
3633              $ENDGROUP
3634              $GROUP                                                                                      \
3635                  NAME=D_L_T8;                                                                            \
3636                  TX=TD4 + B4DZ;                                                                          \
3637                  LC=1; %GBG(STBGEU,ENV_WAYT1);
3638                C=<LVB_T4DZL,LVB_B4DZ(|L),LVB_T4DZ;
3639              $ENDGROUP
3640              $GROUP                                                                                      \
3641                  NAME=D_L_T9;                                                                            \
3642                  TX=KT4D;                                                                                \
3643                  LC=1; %GBG(STBGEU,ENV_WAYT1);
3644                C=(LVB_KT4D3L~JP,LVB_KT4D3L~JP[PU])|(LVB_KT4D3~JP,LVB_KT4D3~JP[PU]);
3645                C=(LVB_KT4D1L,LVB_KT4D1L[PU])|(LVB_KT4D1,LVB_KT4D1[PU]);
3646                C=(LVB_KT4D2L~JP,LVB_KT4D2L~JP[PU])|(LVB_KT4D2~JP,LVB_KT4D2~JP[PU]);
3647                C=LVB_KT4D_1306L|LVB_KT4D_1306;
3648                C=LVB_KT4D1L;
3649                C=LVB_KT4D1;
3650              $ENDGROUP
3651            }
3652            {BUS?
3653              $GROUP                                                                                      \
3654                  NAME=D_L_B1;                                                                            \
3655                  LC=1; %GBG(STBGEU,ENV_WAYA);
3656                M=FOLLOW;                                                                                 \
3657                  C=(VKL_IK280_02A;VKL_IK280_02B;VKL_IK280_02C;LVB_LNV1202;LVB_IK280_02A; LVB_IK280_3);   \
3658                  D=R;
3659              $ENDGROUP
3660            }
3661            {TRAM?
3662              $GROUP                                                                                      \
3663                  NAME=D_L_T10;                                                                           \
3664                  TX=ATw;                                                                                 \
3665                  LC=2; %GBG(STBGEU,ENV_WAYT1);
3666                TX=AT4D 5001;                                                                             \
3667                  C=LVB_5001L|LVB_5001;
3668                TX=AT4D 5002;                                                                             \
3669                  C=LVB_5002L|LVB_5002;
3670                TX=Schleifwagen;                                                                          \
3671                  C=LVB_SGT6O|LVB_SGT6;
3672                TX=AT4D Fahrschule;                                                                       \
3673                  C=LVB_AT4DL1|LVB_AT4DL1L;
3674                TX=AT4D + GB57o neu;                                                                      \
3675                  C=(LVB_5033GL|LVB_5033G),(LVB_GB57K1|LVB_GB57K2);
3676                TX=AT4D-L1 alt 5004 Fahrschule;                                                           \
3677                  C=LVB_AT4DL2L|LVB_AT4DL2;
3678                C=LVB_AT4DIOL;
3679                C=LVB_AT4DI;
3680                C=LVB_SGT6;
3681                C=LVB_AT4DIO;
3682                C=LVB_AT4DIL;
3683                TX=AT4D + AT4D;                                                                           \
3684                  C=LVB_5033GL|LVB_5033G|LVB_5062AL|LVB_5062A|LVB_5062BL|LVB_5062B|LVB_5031AL|LVB_5031A|  \
3685                    LVB_5031BL|LVB_5031B|LVB_5032AL|LVB_5032A|LVB_5032BL|LVB_5032B|LVB_5033L|LVB_5033;
3686              $ENDGROUP
3687              $GROUP                                                                                      \
3688                  NAME=D_L_T11;                                                                           \
3689                  TX=T6A2/B6A2;                                                                           \
3690                  LC=1; %GBG(STBGEU,ENV_WAYT1);
3691                C=[P1U](1-2*LVB_T6A21L~JP,|LVB_B6A21L~JP)|(1-2*LVB_T6A21~JP,|LVB_B6A21~JP)|               \
3692                    (1-2*LVB_T6A21L~JPD,|LVB_B6A21L~JPD)|(1-2*LVB_T6A21~JPD,|LVB_B6A21~JPD);
3693                C=(LVB_T6A2ML,LVB_B6A2ML)|(LVB_T6A2M,LVB_B6A2M);
3694                TX=T6A2 + B6A2;                                                                           \
3695                  C=(LVB_T6A2_1[PD],LVB_T6A2_1[PU],LVB_B6A2_1)|                                           \
3696                    (LVB_T6A2_1L[PD],LVB_T6A2_1L[PU],LVB_B6A2_1L)|                                        \
3697                    (LVB_T6A2_2[PD],LVB_T6A2_2[PU],LVB_B6A2_2)|                                           \
3698                    (LVB_T6A2_2L[PD],LVB_T6A2_2L[PU],LVB_B6A2_2L);
3699              $ENDGROUP
3700            }
3701            {BUS?
3702              $GROUP                                                                                      \
3703                  NAME=D_L_B2;                                                                            \
3704                  LC=1; %GBG(STBGEU,ENV_WAYA);
3705                M=FOLLOW;                                                                                 \
3706                  C=(LVB_IK260;LVB_IK263;LVB_IK280;LVB_IK280A);
3707              $ENDGROUP
3708            }
3709            {TRAM?
3710              $GROUP                                                                                      \
3711                  NAME=D_L_T12;                                                                           \
3712                  TX=T4D/B4D modern;                                                                      \
3713                  LC=1; %GBG(STBGEU,ENV_WAYT1);
3714                C=[P1U]LVB_(1-2*T|(1-2*T,B))4DMA(|L)(~JP|~JPD);
3715                C=[P1U]1-2*LVB_T4DM(1|1A|2)(|L);
3716              $ENDGROUP
3717              $GROUP                                                                                      \
3718                  NAME=D_L_T13;                                                                           \
3719                  LC=1; %GBG(STBGEU,ENV_WAYT1);
3720                TX=T4D/B4D modern;                                                                        \
3721                  C=[PFU]                                                                                 \
3722                    ((LVB_T4DMB,LVB_T4DMB,LVB_B4D4)|(LVB_T4DM2,LVB_T4DM2,LVB_B4D4)|                       \
3723                    (LVB_T4DN~FLE,LVB_T4DN~FLE[PD],LVB_B4DM~FLE)|(LVB_T4DM4,LVB_T4DM4,LVB_B4DM~FLE)|      \
3724                    (LVB_T4DMBL,LVB_T4DMBL,LVB_B4D4L)|(LVB_T4DM2L,LVB_T4DM2L,LVB_B4D4L)|                  \
3725                    (LVB_T4DNL~FLE,LVB_T4DNL~FLE,LVB_B4DML~FLE)|(LVB_T4DM4L,LVB_T4DM4L,LVB_B4DML~FLE));
3726                TX=T4D modern mit NB4;                                                                    \
3727                  C=(LVB_T4DML|LVB_T4DMTL,LVB_NB4L)|(LVB_T4DM|LVB_T4DMT,LVB_NB4);
3728              $ENDGROUP
3729              $GROUP                                                                                      \
3730                  NAME=D_L_T14;                                                                           \
3731                  TX=T4D/B4D Stadtrundfahrt/Sight-Seeing;                                                 \
3732                  LC=1; %GBG(STBGEU,ENV_WAYT1);
3733                C=LVB_T4DM_4BSL;
3734                C=LVB_(1(7|8)00,B4DMG(|2))(|L);
3735                C=LVB_(1(7|8)00,B4DMN)(|L);
3736                TX=Offener Leipziger;                                                                     \
3737                  C=LVB_T4DCL~SAND|LVB_T4DC~SAND|LVB_T4DMCL|LVB_T4DMC;
3738              $ENDGROUP
3739              $GROUP                                                                                      \
3740                  NAME=D_L_T15;                                                                           \
3741                  TX=NGT8;                                                                                \
3742                  LC=1; %GBG(STBGEU,ENV_WAYT1);
3743                TX=1100 NGT8;                                                                             \
3744                  C=LVB_NGT8(|A|B)(|L);
3745              $ENDGROUP
3746            }
3747            {BUS?
3748              $GROUP                                                                                      \
3749                  NAME=D_L_B3;                                                                            \
3750                  LC=1; %GBG(STBGEU,ENV_WAYA);
3751                M=FOLLOW;                                                                                 \
3752                  C=(LVB_O405;LVB_CITO;LVB_VOLVO_B10L);
3753              $ENDGROUP
3754            }
3755            {TRAM?
3756              $GROUP                                                                                      \
3757                  NAME=D_L_T16;                                                                           \
3758                  TX=1300 Leoliner;                                                                       \
3759                  LC=1; %GBG(STBGEU,ENV_WAYT1);
3760                C=LVB_LEOLINERL~WSI;
3761                TX=Leoliner1303;                                                                          \
3762                  C=LVB_1303|LVB_1303L;
3763                TX=NGTw6 1301 Leoliner;                                                                   \
3764                  C=(2*LVB_LEOLINERL~WSI)|(2*LVB_LEOLINER~WSI)|(2*LVB_1301L)|(2*LVB_1301);
3765              $ENDGROUP
3766              $GROUP                                                                                      \
3767                  NAME=D_L_T17;                                                                           \
3768                  TX=1200 Flexity;                                                                        \
3769                  LC=1; %GBG(STBGEU,ENV_WAYT2);
3770                C=LVB_1201P;
3771                C=LVB_FLEXITY;
3772                C=LVB_FLEXITYL;
3773              $ENDGROUP
3774              $GROUP                                                                                      \
3775                  NAME=D_L_T18;                                                                           \
3776                  LC=1; %GBG(STBGEU,ENV_WAYT1);
3777                TX=Test Erfurt 632;                                                                       \
3778                  C=EVAG_632_LVB(|L);
3779                TX=Test Dresden NGT12 2802;                                                               \
3780                  C=LVB_NGT12DD_2802_TEST(|L);
3781              $ENDGROUP
3782            }
3783            {BUS?
3784              $GROUP                                                                                      \
3785                  NAME=D_L_B4;                                                                            \
3786                  LC=1; %GBG(STBGEU,ENV_WAYA);
3787                C=LVB_CITOL;
3788                C=LVB_O530GL|LVB_O530G;
3789              $ENDGROUP
3790            }
3791          $ENDSECTION
3792        }
3793  #--------------------------------------------------------------------------
3794  #
3795  # Mülheim an der Ruhr
3796  #
3797        {TRAM|BUS?
3798          $SECTION                                                                                        \
3799              NAME=D_MULHEIM_RUHR;                                                                        \
3800              AB=30; %SECFIN;%TITLE(Mülheim an der Ruhr);
3801            {TRAM?
3802              $GROUP                                                                                      \
3803                  NAME=D_MH_T1;                                                                           \
3804                  LC=1; %GBG(STBGEU,ENV_WAYT1);
3805                TX=Tw Serie 209-218 + Bw Serie 161-180 Bj. 1927-1928;                                     \
3806                  C=MADR_216,MADR_B2_161;
3807                TX=801 + 1501;                                                                            \
3808                  C=MADR_TW801,MADR_BW1501;
3809                TX=3x Tw + Bw ex Oberhausen;                                                              \
3810                  C=MADR_T3,MADR_B3;
3811                TX=3x Tw ex Oberhausen Museumswagen;                                                      \
3812                  C=MADR_T3MUS;
3813              $ENDGROUP
3814            }
3815            {BUS?
3816              $GROUP                                                                                      \
3817                  NAME=D_MH_B1;                                                                           \
3818                  LC=1; %GBG(STBGEU,ENV_WAYA);
3819                C=MADR_MANSG192(|L);
3820              $ENDGROUP
3821            }
3822            {TRAM?
3823              $GROUP                                                                                      \
3824                  NAME=D_MH_T2;                                                                           \
3825                  LC=1; %GBG(STBGEU,ENV_WAYT1);
3826                TX=220-230 + 181-191;                                                                     \
3827                  C=(MADR_T4OL,MADR_B4OL)|(MADR_T4O,MADR_B4O);
3828                TX=250-262;                                                                               \
3829                  C=MADR_G6O(|L);
3830                TX=KSW Umbau TW 260-264 =240 - 244;                                                       \
3831                  C=MADR_KSWL[#D:L]|MADR_KSW[#D:R];
3832                TX=Schleifwagen Schörling 402;                                                            \
3833                  C=MADR_402;
3834              $ENDGROUP
3835              $GROUP                                                                                      \
3836                  NAME=D_MH_T3;                                                                           \
3837                  TX=220-230 + 181-198;                                                                   \
3838                  LC=1; %GBG(STBGEU,ENV_WAYT1);
3839                C=(MADR_T4NL~FL,MADR_B4NL~FL)|(MADR_T4N~FL,MADR_B4N~FL);
3840                C=(MADR_T4L~WSI,MADR_B4L~WSI)|(MADR_T4~WSI,MADR_B4~WSI);
3841                C=MADR_T4NL~WSI,MADR_B4NL~WSI;
3842                C=MADR_T4N~WSI,MADR_B4N~WSI;
3843                C=MADR_T4NL~FL,MADR_B4NL~FL;
3844                C=MADR_T4N~FL,MADR_B4N~FL;
3845              $ENDGROUP
3846              $GROUP                                                                                      \
3847                  NAME=D_MH_T4;                                                                           \
3848                  LC=1; %GBG(STBGEU,ENV_WAYT1);
3849                TX=Tw Serie 250-262 + Bw Serie 194-198;                                                   \
3850                  C=(MADR_GT6N,MADR_B4N~FL)|(MADR_GT6NL,MADR_B4NL~FL);
3851                TX=Tw Serie 250-262;                                                                      \
3852                  C=MADR_GT6N2L;
3853              $ENDGROUP
3854            }
3855            {BUS?
3856              $GROUP                                                                                      \
3857                  NAME=D_MH_B2;                                                                           \
3858                  LC=1; %GBG(STBGEU,ENV_WAYA);
3859                M=FOLLOW;                                                                                 \
3860                  C=2-5*MADR_MAN(263|NG312|NG313~FL|NL223MH|NL272|SL202~FL);
3861                M=FOLLOW;                                                                                 \
3862                  C=2-5*MADR_MAN(263|NG312|NG313|NL223MH|NL272|SL202)L;
3863              $ENDGROUP
3864            }
3865            {TRAM?
3866              $GROUP                                                                                      \
3867                  NAME=D_MH_T5;                                                                           \
3868                  LC=1; %GBG(STBGEU,ENV_WAYT1);
3869                TX=Mülheim/Ruhr M6;                                                                       \
3870                  C=[PFU]MADR_M6~WSI|MADR_M6~FL;
3871                TX=Mülheim/Ruhr M8;                                                                       \
3872                  C=[PFU]MADR_M8~WSI|MADR_M8~FL;
3873                TX=Mülheim/Ruhr NGT6;                                                                     \
3874                  C=MADR_NF6D~WSI;
3875                TX=M-Wagen + Niederflurmittelteil;                                                        \
3876                  C=[PFU]MADR_M8NF;
3877                C=MADR_NF6D~FL;
3878              $ENDGROUP
3879            }
3880            {BUS?
3881              $GROUP                                                                                      \
3882                  NAME=D_MH_B3;                                                                           \
3883                  LC=1; %GBG(STBGEU,ENV_WAYA);
3884                M=FOLLOW;                                                                                 \
3885                  C=2-5*MADR_(MANNG313~AXS|MANSL202~AXS|NG272|NL223|O305G|SL200);
3886              $ENDGROUP
3887            }
3888            {TRAM?
3889              $GROUP                                                                                      \
3890                  NAME=D_MH_T6;                                                                           \
3891                  TX=B80;                                                                                 \
3892                  LC=1; AB=25; %GBG(STBGEU,ENV_WAYT3);
3893                C=2@MADR_B80|MADR_B100MH;
3894                C=2*MADR_B100;
3895              $ENDGROUP
3896            }
3897          $ENDSECTION
3898        }
3899  #--------------------------------------------------------------------------
3900  #
3901  # München
3902  #
3903        $SECTION                                                                                          \
3904            NAME=D_MUNCHEN;                                                                               \
3905            AB=30; %SECFIN;%TITLE([N=Munich; D=München; H=München]);
3906          {TRAM?
3907            $GROUP                                                                                        \
3908                NAME=D_M_T1;                                                                              \
3909                LC=2;                                                                                     \
3910                V=0.6; %GBG(STBGEU,ENV_WAYT1);
3911              TX=Pferdebahn /Horse-tramway;                                                               \
3912                C=(MUN_0PFERD0BL,MUN_8A141A0RL|MUN_HTL)|(MUN_0PFERD0B,MUN_HT|MUN_8A141A0R);
3913              TX=Dampfstraßenbahn / Steam-tramway;                                                        \
3914                C=MUN_0D002A00(|L),2-4*MUN_8(B244A00|O000A00|O000A01);                                    \
3915                V=3;
3916            $ENDGROUP
3917            $GROUP                                                                                        \
3918                NAME=D_M_T2;                                                                              \
3919                LC=2; %GBG(STBGEU,ENV_WAYT1);
3920              TX=A;                                                                                       \
3921                C=MUN_4Z031A1NL;
3922              TX=A;                                                                                       \
3923                C=MUN_Z122T1~BL2;
3924              TX=Z;                                                                                       \
3925                C=MUN_4Z324A1WL;
3926              TX=A;                                                                                       \
3927                C=MUN_A101T1~BL2,MUN_8A141B10;
3928              TX=Z;                                                                                       \
3929                C=MUN_4Z031A1N;
3930              TX=Z;                                                                                       \
3931                C=MUN_Z122T1L~BL2;
3932              TX=Z;                                                                                       \
3933                C=MUN_4Z324A1W;
3934              TX=A;                                                                                       \
3935                C=MUN_A101T1L~BL2,MUN_8A141B10L;
3936            $ENDGROUP
3937            $GROUP                                                                                        \
3938                NAME=D_M_T3;                                                                              \
3939                LC=4; %GBG(STBGEU,ENV_WAYT1);
3940              TX=Typ A + c;                                                                               \
3941                C=(MUN_A301T1L~BL2,MUN_8C126H21L)|(MUN_A301T1~BL2,MUN_8C126H21);
3942              TX=Typ Z;                                                                                   \
3943                C=(MUN_4Z402H01L)|(MUN_4Z402H01);
3944              TX=Typ B + c;                                                                               \
3945                C=MUN_TB3,MUN_BC3;
3946              TX=Typ B + c;                                                                               \
3947                C=(MUN_B203T3L~BL2,MUN_8C126H30L)|(MUN_B203T3~BL2,MUN_8C126H30);
3948              TX=Typ D + d;                                                                               \
3949                C=(MUN_4D206E31L,MUN_8C126H30L)|(MUN_4D206E31,MUN_8C126H30);
3950              TX=Typ D + d;                                                                               \
3951                C=(MUN_D505T3L~BL2,MUN_8C126H20L)|(MUN_D505T3~BL2,MUN_8C126H20);
3952              TX=Typ D + d + d;                                                                           \
3953                C=MUN_TD3,MUN_BD3;
3954              TX=Typ E + e;                                                                               \
3955                C=MUN_TE3,MUN_BE3;
3956              TX=Typ F + f;                                                                               \
3957                C=MUN_TF3L,MUN_BF3L;
3958              TX=Typ I KSW,Bw i (KSW/Verbandstyp);                                                        \
3959                C=(MUN_J1S|MUN_J1SL),(2*MUN_I4A)|(2*MUN_I1B);
3960              TX=Typ I KSW,Bw i (KSW/Verbandstyp);                                                        \
3961                C=(MUN_J1BL,MUN_I1L|MUN_I4EL)|(MUN_J1B,MUN_I1B|MUN_I4A);
3962            $ENDGROUP
3963            $GROUP                                                                                        \
3964                NAME=D_M_T4;                                                                              \
3965                TX=Typ H ex Milano;                                                                       \
3966                LC=2; %GBG(STBGEU,ENV_WAYT1);
3967              C=MUN_601L,|MUN_8C126H30L;
3968              C=MUN_601,|MUN_8C126H30;
3969              C=MUN_602L,|MUN_8C126H30L;
3970              C=MUN_602,|MUN_8C126H30;
3971              C=MUN_603L,|MUN_8C126H30L;
3972              C=MUN_603,|MUN_8C126H30;
3973              C=MUN_604L,|MUN_8C126H30L;
3974              C=MUN_604,|MUN_8C126H30;
3975              TX=Typ H + c;                                                                               \
3976                C=MUN_TH3,MUN_BC3;
3977              TX=Typ H;                                                                                   \
3978                C=MUN_603L;                                                                               \
3979                D=L;
3980            $ENDGROUP
3981            $GROUP                                                                                        \
3982                NAME=D_M_T5;                                                                              \
3983                TX=Typ X ex Roma;                                                                         \
3984                LC=1; %GBG(STBGEU,ENV_WAYT1);
3985              C=MUN_4X100A20L,MUN_8X100A00L;
3986              C=MUN_4X100A20,MUN_8X100A00;
3987              C=MUN_4X600A00L;
3988              C=MUN_4X600A00;
3989            $ENDGROUP
3990            $GROUP                                                                                        \
3991                NAME=D_M_T6;                                                                              \
3992                LC=1; %GBG(STBGEU,ENV_WAYT1);
3993              TX=Poststraßenbahn;                                                                         \
3994                C=(MUN_7P208H11L,MUN_9P248H01L,MUN_7P208H10L)|(MUN_7P208H11,MUN_9P248H01,MUN_7P208H10);
3995              TX=Poststraßenbahn;                                                                         \
3996                C=[PBD],MUN_TPOST3,MUN_BPOST3,MUN_TPOST3;
3997              TX=122;                                                                                     \
3998                C=MUN_7W122BL0(|L);
3999            $ENDGROUP
4000            $GROUP                                                                                        \
4001                NAME=D_M_T7;                                                                              \
4002                LC=2; %GBG(STBGEU,ENV_WAYT1);
4003              TX=J + i;                                                                                   \
4004                C=MUN_J1B,MUN_I1B;
4005              TX=D + d;                                                                                   \
4006                C=MUN_D603T5L~BL2,MUN_E148B0L~BL2;
4007              TX=E + e;                                                                                   \
4008                C=MUN_D603T5~BL2,MUN_E148B0~BL2;
4009              TX=E + e;                                                                                   \
4010                C=MUN_E108T0L~BL2,MUN_E148B0L~BL2;
4011              TX=E + e;                                                                                   \
4012                C=MUN_E108T0~BL2,MUN_E148B0~BL2;
4013              TX=E + e;                                                                                   \
4014                C=MUN_E108T2L~BL2,MUN_E148B0L~BL2;
4015              TX=E + e;                                                                                   \
4016                C=MUN_E108T2~BL2,MUN_E148B0~BL2;
4017            $ENDGROUP
4018            $GROUP                                                                                        \
4019                NAME=D_M_T8;                                                                              \
4020                LC=2; %GBG(STBGEU,ENV_WAYT2);
4021              TX=Typ M1 + m1;                                                                             \
4022                C=((MUN_M162T2L,MUN_M162B2L)[#D:L])|((MUN_M162T2,MUN_M162B2)[#D:R]);
4023              TX=Typ M2 + m2;                                                                             \
4024                C=((MUN_M263T3L,MUN_M263B2L)[#D:L])|((MUN_M263T3,MUN_M263B2)[#D:R]);
4025              TX=Typ M3 + m3;                                                                             \
4026                C=(MUN_4M364I50,MUN_M364B)|(MUN_4M364I50L,MUN_M364BL);
4027              TX=Typ M4 + m4;                                                                             \
4028                C=MUN_M4TMT,MUN_M4BMT[#D:R];
4029              TX=Typ M4 + m4;                                                                             \
4030                C=(MUN_M4TMT,MUN_M4BMT)|{V3?MUN_M465~V3|MUN_M465L~V3};
4031              TX=Typ M5 + m5;                                                                             \
4032                C=(MUN_M565T1L~BL2,MUN_M565B1L~BL2)|(MUN_M565T1~BL2,MUN_M565B1~BL2)|                      \
4033                  (MUN_M565T2L~BL2,MUN_M565B1L~BL2)|(MUN_M565T2~BL2,MUN_M565B1~BL2);
4034            $ENDGROUP
4035            $GROUP                                                                                        \
4036                NAME=D_M_T9;                                                                              \
4037                TX=P + p;                                                                                 \
4038                LC=2; %GBG(STBGEU,ENV_WAYT2);
4039              C=MUN_P316L~BL2,MUN_P317L~BL2;
4040              C=MUN_P316~BL2,MUN_P317~BL2;
4041              C=MUN_PPT,MUN_PPB;
4042              TX=Typ P + p Buga-livery;                                                                   \
4043                C=MUN_PPT_BUGA,MUN_PPB_BUGA;
4044            $ENDGROUP
4045            $GROUP                                                                                        \
4046                NAME=D_M_T10;                                                                             \
4047                LC=1; %GBG(STBGEU,ENV_WAYT2);
4048              TX=Typ R;                                                                                   \
4049                C=MUN_R2_MVGL|MUN_R202L~BL2|MUN_R202~BL2|MUN_R2_SEGL{V3?|MUN_R202L~V3|MUN_R202~V3};
4050              TX=Typ R 3.3 2201 - 2220;                                                                   \
4051                C=MUN_R3|MUN_R3MVG|MUN_R3SWML|MUN_R3SCHL|MUN_GT8NL~TIS|MUN_GT8N~TIS|MUN_GT8NL~BL2|        \
4052                  MUN_GT8N~BL2;
4053              TX=Variobahn;                                                                               \
4054                C=MUN_S_VARIOBAHNL[#D:L]|MUN_S_VARIOBAHN[#D:R];
4055            $ENDGROUP
4056            $GROUP                                                                                        \
4057                NAME=D_M_T11;                                                                             \
4058                TX=Jubiläumsparade;                                                                       \
4059                LC=1;                                                                                     \
4060                V=6; %GBG(STBGEU,ENV_WAYT2);
4061              M=FOLLOW;                                                                                   \
4062                C=(MUN_256L;MUN_490JUBL,MUN_1401JUBL;MUN_670JUBL,MUN_1334JUBL; MUN_721JUBL,MUN_1509JUBL;  \
4063                  MUN_2412JUBL;MUN_2006JUBL;MUN_2143JUBL; MUN_2219JUBL; WIEN_ULF_MUNJUBL;                 \
4064                  POT_COMB_MUNJUBL);                                                                      \
4065                D=L;
4066              M=FOLLOW;                                                                                   \
4067                C=(MUN_256;MUN_490JUB,MUN_1401JUB;MUN_670JUB,MUN_1334JUB; MUN_721JUB,MUN_1509JUB;         \
4068                  MUN_2412JUB; MUN_2006JUB;MUN_2143JUB; MUN_2219JUB,WIEN_ULF_MUNJUB,POT_COMB_MUNJUB);     \
4069                D=R;
4070            $ENDGROUP
4071          }
4072          {CRAIL?
4073            $GROUP                                                                                        \
4074                NAME=D_M_U1;                                                                              \
4075                TX=U-Bahn;                                                                                \
4076                LC=1; %GBG((STBGFO|STBGUB),ENV_WAYM);
4077              TX=U-Bahn Typ C;                                                                            \
4078                C=<MUN_UCFL~LIP,3*MUN_UCM~LIP,MUN_UCF~LIP;
4079            $ENDGROUP
4080          }
4081          {BUS?
4082            $GROUP                                                                                        \
4083                NAME=D_M_B1;                                                                              \
4084                LC=1; %GBG(STBGEU,ENV_WAYA);
4085              TX=Olympiabus;                                                                              \
4086                C=MUN_OLYMP(|L);
4087              TX=Bus;                                                                                     \
4088                M=FOLLOW;                                                                                 \
4089                C=4-6*MUN_(EG272|EL202|N416|N421SG2|N421SG2_3N|NG272|NL202|O405G|O405GN2|O405GN|O405N2|   \
4090                  O405N|SG242|SGG280|SL202);                                                              \
4091                D=R;
4092            $ENDGROUP
4093          }
4094        $ENDSECTION
4095  #--------------------------------------------------------------------------
4096  #
4097  # Nordhausen
4098  #
4099        {TRAM|BUS?
4100          $SECTION                                                                                        \
4101              NAME=D_NORDHAUSEN;                                                                          \
4102              AB=30; %SECFIN;%TITLE(Nordhausen);
4103            {TRAM?
4104              $GROUP                                                                                      \
4105                  NAME=D_NDH_T1;                                                                          \
4106                  TX=ET 57;                                                                               \
4107                  LC=1; %GBG(STBGEU,ENV_WAYT1);
4108                C=SWN_ET57G;
4109                C=SWN_ET57_40;
4110                C=SWN_ET57;
4111              $ENDGROUP
4112              $GROUP                                                                                      \
4113                  NAME=D_NDH_T2;                                                                          \
4114                  LC=1; %GBG(STBGEU,ENV_WAYT1);
4115                TX=Tw 21;                                                                                 \
4116                  C=SWN_21;
4117                TX=Tw 23;                                                                                 \
4118                  C=SWN_23;
4119                TX=Atw 03;                                                                                \
4120                  C=SWN_ATW03;
4121                TX=G4;                                                                                    \
4122                  C=SWN_G4SWN(|L);
4123              $ENDGROUP
4124              $GROUP                                                                                      \
4125                  NAME=D_NDH_T3;                                                                          \
4126                  LC=2; %GBG(STBGEU,ENV_WAYT1);
4127                C=SWN_GT4L~BL;
4128                C=SWN_GT4L~PH;
4129                C=SWN_GT4~TIS;
4130                C=SWN_GT4BL;
4131                C=SWN_GT4A;
4132                C=SWN_GT4~WSI;
4133                C=SWN_75HL;
4134                C=SWN_77IKK;
4135                C=SWN_77INNL;
4136                C=SWN_81C;
4137                C=SWN_81EL;
4138                C=SWN_82;
4139                C=SWN_GT4L~WSI;
4140                C=SWN_GT4~PH;
4141                C=SWN_GT4L~TIS;
4142                C=SWN_GT4B;
4143                C=SWN_GT4AL;
4144                C=SWN_75H;
4145                C=SWN_GT4~BL;
4146                C=SWN_77IKKL;
4147                C=SWN_77INN;
4148                C=SWN_81CL;
4149                C=SWN_81E;
4150                C=SWN_82L;
4151              $ENDGROUP
4152              $GROUP                                                                                      \
4153                  NAME=D_NDH_T4;                                                                          \
4154                  TX=GT4;                                                                                 \
4155                  LC=1; %GBG(STBGEU,ENV_WAYT1);
4156                C=SWN_GT4Z~PH;
4157                C=SWN_GT4Z~WSI;
4158                C=SWN_GT4ZL;
4159                C=SWN_GT4ZW;
4160                C=SWN_GT4Z1;
4161                C=SWR_GT4Z2;
4162              $ENDGROUP
4163              $GROUP                                                                                      \
4164                  NAME=D_NDH_T5;                                                                          \
4165                  TX=GT4 72 Test;                                                                         \
4166                  LC=2; AB=15; %GBG(STBGEU,ENV_WAYT1);
4167                M=STOP;                                                                                   \
4168                  C=SWN_(72TWINO|GT4_TWINO1|GT4_TWINO)L;                                                  \
4169                  D=L; V=6; P=*50; T=4,PD,3;
4170                M=STOP;                                                                                   \
4171                  C=SWN_(72TWINO|GT4_TWINO|GT4_TWINO1);                                                   \
4172                  D=R; V=6; P=*50; TB=PD; T=4,P1U,3;
4173              $ENDGROUP
4174              $GROUP                                                                                      \
4175                  NAME=D_NDH_T6;                                                                          \
4176                  TX=Combino;                                                                             \
4177                  LC=2; %GBG(STBGEU,ENV_WAYT1);
4178                C=SWN_COMBINOL~WSI;
4179                C=SWN_COMBINO~WSI;
4180                C=SWN_COMBINOL~TIS;
4181                C=SWN_COMBINO~TIS;
4182                C=SWN_COMBINOL~PH;
4183                C=SWN_COMBINO~PNR;
4184              $ENDGROUP
4185              $GROUP                                                                                      \
4186                  NAME=D_NDH_T7;                                                                          \
4187                  TX=Combino Duo;                                                                         \
4188                  LC=2; AB=15; %GBG(STBGEU,ENV_WAYT1);
4189                M=STOP;                                                                                   \
4190                  C=SWN_DUO(|L);                                                                          \
4191                  D=L; V=6; P=*50; T=4,PD,3;
4192                M=STOP;                                                                                   \
4193                  C=SWN_DUO(|L);                                                                          \
4194                  D=R; V=6; P=*50; TB=PD; T=4,P1U,3;
4195              $ENDGROUP
4196            }
4197            {BUS?
4198              $GROUP                                                                                      \
4199                  NAME=D_NDH_B1;                                                                          \
4200                  LC=2; %GBG(STBGEU,ENV_WAYA);
4201                TX=SG 219S;                                                                               \
4202                  C=SWN_SG219SL(|L);
4203              $ENDGROUP
4204            }
4205          $ENDSECTION
4206        }
4207  #--------------------------------------------------------------------------
4208  #
4209  # Passau
4210  #
4211        {BUS?
4212          $SECTION                                                                                        \
4213              NAME=D_PASSAU;                                                                              \
4214              AB=30;                                                                                      \
4215               %SECFIN;%TITLE(Passau);
4216            $GROUP                                                                                        \
4217                NAME=D_PA_B1;                                                                             \
4218                LC=2; %GBG(STBGEU,ENV_WAYA);
4219              TX=Stadtwerke Passau;                                                                       \
4220                M=FOLLOW;                                                                                 \
4221                C=3-5*SWPA_O3(17K_W1A|17K_W1|21H_W12|21H_W15|21H_W4|500_W8)L;                             \
4222                D=L;
4223              TX=Stadtwerke Passau;                                                                       \
4224                M=FOLLOW;                                                                                 \
4225                C=3-5*SWPA_(2:O305_W(14|14O|17|17A|21A|25A|5)|O317K_W23(|A)|O322_W(18A|20)|S215SL_W21|    \
4226                  SL200_W6(|A));                                                                          \
4227                D=R;
4228              TX=Stadtwerke Passau;                                                                       \
4229                M=FOLLOW;                                                                                 \
4230                C=3-5*SWPA_(N416_W29(|A)|O305G_W51|O405_W32(|A)|SL202_W31(|A))L;                          \
4231                D=L;
4232              TX=Stadtwerke Passau;                                                                       \
4233                M=FOLLOW;                                                                                 \
4234                C=4-6*SWPA_(N4014NF_W47|NL202_W46|O307_HUBINGER|O405G_W5(5|8)|O405N2_W(42|45|62)|         \
4235                  O405(NK|N_W38|N_W39A|_W30)|O530G_W54|O530_W(12|8A|9|9A)|S300NC_W48|SM182);              \
4236                D=R;
4237              TX=Eichberger,Passau;                                                                       \
4238                M=FOLLOW;                                                                                 \
4239                C=4-6*EICH_(N122|N4007CNG|N4016NF2|N4016NF2_2005|N4409|N4411A|N4411|N4416|N4416_2005|     \
4240                  O530)L;                                                                                 \
4241                D=L;
4242              TX=Niedermeyer,Passau;                                                                      \
4243                M=FOLLOW;                                                                                 \
4244                C=2-4*NIEM_(750HO|O305A|O305G1|O305G|O305|O307N);                                         \
4245                D=R;
4246              TX=Niedermeyer,Passau;                                                                      \
4247                M=FOLLOW;                                                                                 \
4248                C=4-6*NIEM_(N3016_N2(4|9|9H)|N4014NF_(N13|N14|N15|N18|RICHTER)|                           \
4249                  N4016(|T2|T3|_N25|_N25I|_N25N)|N416_EXN12|N4416_(JIMMYZ|N31|N32)|O530_M(2|3)|           \
4250                  S215SL_S(3|6|7)|S215UL_S4|S300NC_(314|670))L;                                           \
4251                D=L;
4252              TX=Stadtwerke Passau;                                                                       \
4253                M=FOLLOW;                                                                                 \
4254                C=3-5*SWPA_O3(17K_W1A|17K_W1|21H_W12|21H_W15|21H_W4|500_W8);                              \
4255                D=R;
4256              TX=Stadtwerke Passau;                                                                       \
4257                M=FOLLOW;                                                                                 \
4258                C=3-5*SWPA_(2:O305_W(14|14O|17|17A|21A|25A|5)|O317K_W23(|A)|O322_W(18A|20)|S215SL_W21|    \
4259                  SL200_W6(|A))L;                                                                         \
4260                D=L;
4261              TX=Stadtwerke Passau;                                                                       \
4262                M=FOLLOW;                                                                                 \
4263                C=3-5*SWPA_(N416_W29(|A)|O305G_W51|O405_W32(|A)|SL202_W31(|A));                           \
4264                D=R;
4265              TX=Stadtwerke Passau;                                                                       \
4266                M=FOLLOW;                                                                                 \
4267                C=4-6*SWPA_(N4014NF_W47|NL202_W46|O307_HUBINGER|O405G_W5(5|8)|O405N2_W(42|45|62)|         \
4268                  O405(NK|N_W38|N_W39A|_W30)|O530G_W54|O530_W(12|8A|9|9A)|S300NC_W48|SM182)L;             \
4269                D=L;
4270              TX=Eichberger,Passau;                                                                       \
4271                M=FOLLOW;                                                                                 \
4272                C=4-6*EICH_(N122|N4007CNG|N4016NF2|N4016NF2_2005|N4409|N4411A|N4411|N4416|N4416_2005|     \
4273                  O530);                                                                                  \
4274                D=R;
4275              TX=Niedermeyer,Passau;                                                                      \
4276                M=FOLLOW;                                                                                 \
4277                C=2-4*NIEM_(750HO|O305A|O305G1|O305G|O305|O307)L;                                         \
4278                D=L;
4279              TX=Niedermeyer,Passau;                                                                      \
4280                M=FOLLOW;                                                                                 \
4281                C=4-6*NIEM_(N3016_N2(4|9|9H)|N4014NF_(N13|N14|N15|N18|RICHTER)|                           \
4282                  N4016(|T2|T3|_N25|_N25I|_N25N)|N416_EXN12|N4416_(JIMMYZ|N31|N32)|O530_M(2|3)|           \
4283                  S215SL_S(3|6|7)|S215UL_S4|S300NC_(314|670));                                            \
4284                D=R;
4285            $ENDGROUP
4286          $ENDSECTION
4287        }
4288  #--------------------------------------------------------------------------
4289  #
4290  # Reutlingen
4291  #
4292        {TRAM?
4293          $SECTION                                                                                        \
4294              NAME=D_REUTLINGEN;                                                                          \
4295              AB=30; %SECFIN;%TITLE(Reutlingen);
4296            $GROUP                                                                                        \
4297                NAME=D_RT_T1;                                                                             \
4298                LC=1; %GBG(STBGEU,ENV_WAYT1);
4299              TX=1899;                                                                                    \
4300                C=RT_D01_1899(|L),2-3*RT_A0(1|2|3|4)_1899,(|RT_A51_1899(|L));
4301              TX=1912;                                                                                    \
4302                C=RT_A21_WRB1,(|RT_B11_1916|RT_A02_1912),(|RT_A02_1912);
4303              TX=1916;                                                                                    \
4304                C=RT_A21_WRB1A|RT_A25_1912A|RT_A25_STWKA,|RT_B11_1916A|RT_A02_1912A,|RT_A02_1912A;
4305              TX=1928;                                                                                    \
4306                C=RT_(B28_(DKAU|DOKT|MTMM|STRB)|B29_(MART|ONKO|WERB)|B30_1935|G51_(1928|SCPF)|            \
4307                  G52_(DOKT|SCPF)|G53_SPKV|G54_(DOFE|DOKT|MBEC)),RT_29B;
4308              TX=1929;                                                                                    \
4309                C=RT_H55_(1929|AFRI|AFRIL|DOKT|JMST|STRB),2*RT_29B;
4310            $ENDGROUP
4311            $GROUP                                                                                        \
4312                NAME=D_RT_T2;                                                                             \
4313                LC=1; %GBG(STBGEU,ENV_WAYT1);
4314              TX=1950;                                                                                    \
4315                C=RT_A21_(1950|1956|STR1|WRB2),|RT_B1(1_1940|2_1940|2_1956|3_WERB),|RT_A03_1941;
4316              TX=1966;                                                                                    \
4317                C=RT_A2(1_1966|1_STAU|1_STEP|1_STR2|2_SCPF|3_1969|3_AFRI|3_GUMM|4_1969|4_DOFE|4_DOFEL|    \
4318                  5_DOKT|5_LEER|5_STEP|6_DOAF|6_WERB|7_AFRI|7_DOAF|7_FSCB),                               \
4319                  |RT_B13_1962|RT_C14_1962|RT_C14_WERB|RT_D15_1964,|RT_A07_1956;
4320              TX=1966;                                                                                    \
4321                C=RT_A21_SCMM|RT_A23_JMAF|RT_A23_JMST|RT_A24_FBJM|RT_A25_DOJM,|RT_B11_JMST;
4322              TX=1950;                                                                                    \
4323                C=RT_C30_(1968|DOKT|JMST|STRB|VOJM),                                                      \
4324                  0-2*RT_H36_ONK(1|2)|RT_H38_ON(JM|KO)|RT_I40_(FISC|SPKH|SPKHL)|                          \
4325                  RT_I41_(MBEH|MBEHL|ONBJ|ONKO)|RT_I42_ONPC;
4326              TX=1955;                                                                                    \
4327                C=RT_(I56_(1962|IKMH|IKMM|IKOL)|I57_(DOKT|KAHO(|L))|I57_WERB|I58_AFBL(|L)),               \
4328                  2*RT_(K43_1956|K44_BOEH|K44_DOKT|L45_MBEH|L46_WRB1|L46_WRB2|L47_BOJM|M48_DKOL|M49_FRUC);
4329            $ENDGROUP
4330            $GROUP                                                                                        \
4331                NAME=D_RT_T3;                                                                             \
4332                LC=1; %GBG(STBGEU,ENV_WAYT1);
4333              TX=1962;                                                                                    \
4334                C=RT_(E34_196(2|9)|F35_(1960|MART|MARTL|MTOH)),RT_O77_1963|RT_O77_ONKO|RT_O78_ONJM;
4335              TX=1964;                                                                                    \
4336                C=RT_K(59_1964|59_AFBL|60_SCHH|60_SCHU|61_MBEC)(|L),                                      \
4337                  |RT_(K43_1956|K44_BOEH|K44_DOKT|L45_MBEH|L46_WRB1|L46_WRB2|L47_BOJM|M48_DKOL|M49_FRUC);
4338              TX=1968;                                                                                    \
4339                C=RT_L62_1966|RT_L62_MBEC|RT_L63_ALLI,|RT_P79_1969,|$DIR(RT_P79_NUMML,RT_P79_NUMM);
4340              TX=2x Tw 51-55,Esslingen 1928/29;                                                           \
4341                C=RT_G54_DOFE;
4342            $ENDGROUP
4343            $GROUP                                                                                        \
4344                NAME=D_RT_T4;                                                                             \
4345                LC=1; %GBG(STBGEU,ENV_WAYT1);
4346              C=RT_E01_1913,$DIR(RT_U09_GTWGL,RT_U09_GTWG);
4347              C=RT_E01_1954,$DIR(RT_U09_STRBL,RT_U09_STRB);
4348              C=RT_A27_TWGO(|L),0-2*RT_A06_WKSO|RT_A02_SLZO(|L);
4349              C=RT_(C31_WK(A|S)E|D32_TWGE(|L)|D33_WKSG),                                                  \
4350                  0-3*RT_(G01_TRA0|G02_TR(A0|B0|B0L|KG|KGL)|T02_TRME|T05_TRME(|L)|U01_TLDE(|L)|           \
4351                  Z01_SCHG(|L));
4352              C=RT_(A27_TWGO|A27_TWGOL|C30_WKSO|C31_WKAF|C31_WKSO|D32_TWGO|D32_TWGOL|D33_WKSO),           \
4353                  0-3*RT_(G01_TRA1|G02_TRK0(|L)|T01_OFLT(|L)|T02_TRMO|T05_TRMO(|L)|U01_TLDO(|L)|          \
4354                  Z01_SCHO(|L));
4355            $ENDGROUP
4356          $ENDSECTION
4357        }
4358  #--------------------------------------------------------------------------
4359  #
4360  # Rhein-Neckar-Verkehr GmbH
4361  #
4362        {TRAM?
4363          $SECTION                                                                                        \
4364              NAME=D_MA_LU_HD;                                                                            \
4365              AB=30; %SECFIN;%TITLE(Rhein-Neckar-Verkehrs GmbH (Mannheim, Ludwigshafen, Heidelberg));
4366  # Ludwigshafen
4367            $GROUP                                                                                        \
4368                NAME=D_LU_T1;                                                                             \
4369                LC=1;
4370              TX=Ludwigshafen GT6;                                                                        \
4371                C=VBL_GT6~FLE|VBL_GT6L~FLE;
4372              TX=Ludwigshafen GT8;                                                                        \
4373                C=VBL_GT8~FLE|VBL_GT8L~FLE;
4374              TX=Ludwigshafen 6MGT;                                                                       \
4375                C=VBL_6MGTL|VBL_6MGT;
4376              TX=Ludwigshafen Variobahn 201 - 215;                                                        \
4377                C=VBL_VARIOBAHNL[#D:L]|VBL_VARIOBAHN[#D:R]|(VBL_215(|L));
4378            $ENDGROUP
4379  # Heidelberg
4380            $GROUP                                                                                        \
4381                NAME=D_HD_T1;                                                                             \
4382                LC=1; %GBG(STBGEU,ENV_WAYT1);
4383              TX=Heidelberg KSW + Bw Verbandstyp II;                                                      \
4384                C=HSBR_KSW,HSBR_VB2BW;
4385              TX=Heidelberg Aufwauwagen + BW Verbandstyp II;                                              \
4386                C=HSBR_VBTW,HSBR_VB2BW;
4387              TX=Heidelberg Verbandstyp II;                                                               \
4388                C=HSBR_T2,2*HSBR_VB2BW;
4389              TX=Heidelberg 6x Tw;                                                                        \
4390                C=HSBR_GT6~WSI;
4391              TX=Heidelberg 6x Tw Traktion;                                                               \
4392                C=<HSBR_GT6S,HSBR_GT6_5;
4393            $ENDGROUP
4394            $GROUP                                                                                        \
4395                NAME=D_HD_T2;                                                                             \
4396                LC=1; %GBG(STBGEU,ENV_WAYT1);
4397              TX=Heidelberg 6x Er. Tw;                                                                    \
4398                C=HSBR_GT6(|L)~FLE|(HSBR_GT6209(|L));
4399              TX=Heidelberg GT8;                                                                          \
4400                C=HSBR_201;
4401              TX=Heidelberg M8C;                                                                          \
4402                C=HSBR_M8|HSBR_M8C;
4403              TX=Heidelberg NF6;                                                                          \
4404                C=HSBR_NF6;
4405              TX=Heidelberg Variobahn;                                                                    \
4406                C=HSBR_VARIOBAHN[#D:R]|HSBR_VARIOBAHNL[#D:L];
4407            $ENDGROUP
4408  # Mannheim
4409            $GROUP                                                                                        \
4410                NAME=D_MA_T1;                                                                             \
4411                LC=1; %GBG(STBGEU,ENV_WAYT1);
4412              TX=Mannheim Tw 1302;                                                                        \
4413                C=MVG_1302;
4414              TX=Mannheim Typ Mannheim;                                                                   \
4415                C=MVG_GT6L|MVG_GT6;
4416              TX=Mannheim 318 ... 450;                                                                    \
4417                C=MVG_5GT6|MVG_5GT6L|MVG_GT6J[#D:R]|MVG_GT6JL[#D:L]|MVG_4GT6L|MVG_4GT6|(MVG_GT6A(|L));    \
4418                $ENDGROUP;
4419            $ENDGROUP
4420            $GROUP                                                                                        \
4421                NAME=D_MA_T2;                                                                             \
4422                LC=1; %GBG(STBGEU,ENV_WAYT1);
4423              TX=Mannheim 501-523;                                                                        \
4424                C=MVG_GT8N|MVG_GT8NL|MVG_GT8N2|MVG_GT8N2L;
4425              TX=Mannheim 501-523;                                                                        \
4426                C=MVG_GT8NFL|MVG_GT8NF;
4427              TX=Mannheim 601-650;                                                                        \
4428                C=MVG_6MGT2(|L)|MVG_6MGT(|L)~FLE;
4429              TX=Mannheim Variobahn 701 ff;                                                               \
4430                C=RNVG_VARIOBAHN1(|L)|MVG_NGT8_701(|L);
4431              TX=Mannheim Variobahn 701 ff;                                                               \
4432                C=MVG_VARIOBAHN2[#D:L]|MVG_VARIOBAHN2L[#D:R]|RNVG_VARIOBAHN1[#D:L]|RNVG_VARIOBAHN1L[#D:R];
4433            $ENDGROUP
4434  # Mannheim OEG
4435            $GROUP                                                                                        \
4436                NAME=D_MA_T3;                                                                             \
4437                TX=OEG Dampfzug;                                                                          \
4438                LC=1; %GBG(STBGEU,ENV_WAYT1);
4439              C=OEG_102,OEG_112,OEG_131;
4440              C=OEG_56,OEG_112,OEG_131;
4441            $ENDGROUP
4442            $GROUP LC=1; %GBG(STBGEU,ENV_WAYT4);
4443              TX=OEG18;                                                                                   \
4444                C=OEG_18,1-3*OEG_134|OEG_114,|OEG_228;
4445              TX=OEG 8;                                                                                   \
4446                C=OEG_8;
4447              TX=OEG Tw 21-40;                                                                            \
4448                C=2*OEG_2T4S4;
4449              TX=OEG T4 mit Bw 221;                                                                       \
4450                C=(OEG_T4~TV,)|OEG_359;
4451              TX=OEG T4,OEG_221;                                                                          \
4452                C=(OEG_T4~TV,3*OEG_B4~TV)|OEG_359;
4453              TX=OEG 80/81;                                                                               \
4454                C=OEG_80|OEG_81;
4455              TX=OEG Atw 4;                                                                               \
4456                C=OEG_5AT4,OEG_G1|OEG_G2;                                                                 \
4457                D=L;
4458              TX=OEG Halbzug Partywagen;                                                                  \
4459                C=OEG_5T4S4;
4460            $ENDGROUP
4461            $GROUP                                                                                        \
4462                NAME=D_MA_T4;                                                                             \
4463                LC=1; AB=30; %GBG(STBGEU,ENV_WAYT3);
4464              TX=OEG GT8;                                                                                 \
4465                C=OEG_GT8;
4466              TX=OEG 82ff;                                                                                \
4467                C=[PFU](OEG_GT8A~FLE|OEG_GT8A1~FLE);
4468              TX=OEG Tw 111 ff;                                                                           \
4469                C=OEG_GT8_3|OEG_GT8_4;
4470              TX=OEG Vario-Bahn;                                                                          \
4471                C=OEG_RNV6AL|OEG_RNV6A|OEG_RNV6BL|OEG_RNV6B;
4472              TX=OEG Vario-Bahn;                                                                          \
4473                C=OEG_123|OEG_NGT6Z;
4474            $ENDGROUP
4475  # Rhein-Haardtbahn
4476            $GROUP                                                                                        \
4477                NAME=D_MA_T5;                                                                             \
4478                TX=Rhein-Haardtbahn GT6 + GB6; %GBG(STBGEU,ENV_WAYT3);
4479              C=RHBA_GT6AL,RHBA_GB6AL;
4480              C=RHBA_GT6A,RHBA_GB6A;
4481              C=RHBA_GT6BL~TIS,RHBA_GB6BL~TIS;
4482              C=RHBA_GT6B~TIS,RHBA_GB6B~TIS;
4483              C=RHBA_GT6BL~WSI,RHBA_GB6BL~WSI;
4484              C=RHBA_GT6B~WSI,RHBA_GB6B~WSI;
4485            $ENDGROUP
4486            $GROUP                                                                                        \
4487                NAME=D_MA_T6;                                                                             \
4488                LC=1; %GBG(STBGEU,ENV_WAYT3);
4489              TX=Rhein-Haardt-Bahn GT12 1019-1022;                                                        \
4490                C=RHBA_GT12(|L)~TIS|RHBA_GT12(|L)~WSI;
4491              TX=Rhein-Haardt-Bahn 8MGT;                                                                  \
4492                C=RHBA_8MGT(|L)~TIS|RHBA_8MGT(|L)~WSI;
4493            $ENDGROUP
4494          $ENDSECTION
4495        }
4496  #--------------------------------------------------------------------------
4497  #
4498  # Solingen
4499  #
4500        {BUS?
4501          $SECTION                                                                                        \
4502              NAME=D_SOLINGEN;                                                                            \
4503              AB=30; %SECFIN;%TITLE(Solingen);
4504            $GROUP                                                                                        \
4505                NAME=D_SG_O1;                                                                             \
4506                LC=1; %GBG(STBGDRM,[WT=ENV_WAYO][WA=ENV_WAYA]);
4507              C=SOL_TS1;
4508              C=SOL_TS2;
4509              C=SOL_TS3;
4510              C=SOL_UH3S~FEY,SOL_UH3SB;
4511              M=FOLLOW;                                                                                   \
4512                C=(SOL_HS160;SOL_HS160G);
4513            $ENDGROUP
4514            $GROUP                                                                                        \
4515                NAME=D_SG_O2;                                                                             \
4516                LC=2; %GBG(STBGDRM,[WT=ENV_WAYO][WA=ENV_WAYA]);
4517              C=SOL_OBUSOL;
4518              C=SOL_OBUSO;
4519              C=SOL_OBUSL;
4520              C=SOL_OBUS;
4521              C=SOL_42L;
4522              C=SOL_42;
4523              C=SOL_26L;
4524              C=SOL_46L;
4525              C=SOL_50L;
4526              C=SOL_59L;
4527              C=SOL_64L;
4528              C=SOL_65;
4529              C=SOL_67L;
4530              C=SOL_OBUS2L;
4531              C=SOL_MAN_SG200HOL;
4532              C=SOL_MAN_SG200HO~FEY;
4533            $ENDGROUP
4534            $GROUP                                                                                        \
4535                NAME=D_SG_O3;                                                                             \
4536                LC=2; %GBG(STBGDRM,[WT=ENV_WAYO][WA=ENV_WAYA]);
4537              C=SOL_OBUS1L;
4538              C=SOL_OBUS1;
4539              C=SOL_MAN_SG200HONL;
4540              C=SOL_MAN_SG200HON;
4541              C=SOL_5L;
4542              C=SOL_5;
4543              C=SOL_10L;
4544              C=SOL_13L;
4545              C=SOL_16L;
4546              C=SOL_20;
4547              C=SOL_BERKHOFL;
4548              C=SOL_BERKHOF;
4549            $ENDGROUP
4550            $GROUP                                                                                        \
4551                NAME=D_SG_O4;                                                                             \
4552                LC=2; %GBG(STBGDRM,[WT=ENV_WAYO][WA=ENV_WAYA]);
4553              C=SOL_175L;
4554              C=SOL_175;
4555              C=SOL_176L;
4556              C=SOL_176;
4557              C=SOL_177;
4558              C=SOL_BERKHOFSTL;
4559              C=SOL_BERKHOFST;
4560              C=SOL_AG300TL~FEY;
4561              C=SOL_AG300T~FEY;
4562              C=SOL_AG300T~AXS;
4563              C=SOL_252L;
4564              C=SOL_253;
4565              C=SOL_254L;
4566              C=SOL_255L;
4567              C=SOL_256L;
4568            $ENDGROUP
4569            $GROUP                                                                                        \
4570                NAME=D_SG_O5;                                                                             \
4571                LC=2; %GBG(STBGDRM,[WT=ENV_WAYO][WA=ENV_WAYA]);
4572              C=SOL_SL172HO;
4573              C=SOL_SL172HON~AXS;
4574              C=SOL_SG200HO~AXS;
4575              C=SOL_SG200HON~AXS;
4576              C=SOL_BERKHOF_AT18~AXS;
4577            $ENDGROUP
4578            $GROUP                                                                                        \
4579                NAME=D_SG_O6;                                                                             \
4580                LC=1; %GBG(STBGDRM,[WT=ENV_WAYO][WA=ENV_WAYA]);
4581              C=SOL_SL172OHL;
4582              C=SOL_SL172OH;
4583              C=SOL_SL172HONL~GW;
4584              C=SOL_SL172HON~GW;
4585              C=SOL_SG200HOL~GW;
4586              C=SOL_SG200HO~GW;
4587              C=SOL_SG200HONL;
4588              C=SOL_SG200HON~GW;
4589              C=SOL_BERKHOF_AT18L~GW;
4590              C=SOL_HESS959;
4591              C=SOL_HESS959L;
4592              C=SOL_BERKHOF_AT18~GW;
4593              C=SOL_AG300TL~GW;
4594              C=SOL_AG300T~GW;
4595            $ENDGROUP
4596            $GROUP                                                                                        \
4597                NAME=D_SG_M1;                                                                             \
4598                LC=1; %GBG(STBGDRM,[WT=ENV_WAYO][WA=ENV_WAYA]);
4599              C=SOL_CHEF;                                                                                 \
4600                TB=ON;
4601              C=SOL_100;                                                                                  \
4602                TB=ON;
4603              C=SOL_VWT1(|L);
4604              C=SOL_VWCADDY;
4605              C=SOL_WERKSTATT;
4606              C=SOL_MAN1;
4607            $ENDGROUP
4608            $GROUP                                                                                        \
4609                NAME=D_SG_M2;                                                                             \
4610                TX=Solingen Bus;                                                                          \
4611                LC=1; %GBG(STBGDRM,[WT=ENV_WAYO][WA=ENV_WAYA]);
4612              C=SOL_STEIGER1;
4613              C=SOL_STEIGER2;
4614              C=SOL_TURM1;
4615              C=SOL_TURM2;
4616              C=SOL_MB1928C;
4617            $ENDGROUP
4618          $ENDSECTION
4619        }
4620  #--------------------------------------------------------------------------
4621  #
4622  # Stuttgart
4623  #
4624        {TRAM|BUS?
4625          $SECTION                                                                                        \
4626              NAME=D_STUTTGART;                                                                           \
4627              AB=30; %SECFIN;%TITLE(Stuttgart);
4628            {TRAM?
4629              $GROUP                                                                                      \
4630                  NAME=D_S_T1;                                                                            \
4631                  LC=3; %GBG(STBGEU,ENV_WAYT1);
4632  # Feuerbach
4633                TX=Staedische Strassenbahn Feuerbach;                                                     \
4634                  C=SSF_13|SSF_15,SSF_22;
4635  # ex Filderbahn
4636                TX=130;                                                                                   \
4637                  C=SSB_130;
4638                TX=158;                                                                                   \
4639                  C=SSB_158[#D:R];
4640              $ENDGROUP
4641              $GROUP                                                                                      \
4642                  NAME=D_S_T2;                                                                            \
4643                  LC=3; %GBG(STBGEU,ENV_WAYT1);
4644                TX=141;                                                                                   \
4645                  C=<SSB_141(|L);
4646                TX=143;                                                                                   \
4647                  C=<SSB_143(|L);
4648                TX=144;                                                                                   \
4649                  C=SSB_144(|L);
4650                TX=143;                                                                                   \
4651                  C=SSB_143(|L);
4652                TX=146 + 199;                                                                             \
4653                  C=SSB_146(|L),SSB_199;
4654                TX=148 + 199;                                                                             \
4655                  C=SSB_148(|L),SSB_199;
4656              $ENDGROUP
4657  # 2x
4658              $GROUP                                                                                      \
4659                  NAME=D_S_T3;                                                                            \
4660                  LC=3; %GBG(STBGEU,ENV_WAYT1);
4661                TX=16;                                                                                    \
4662                  C=SSB_(16A(|L)|16B);
4663                TX=24;                                                                                    \
4664                  C=SSB_24_2;
4665                TX=327...449 (26);                                                                        \
4666                  C=SSB_340P|SSB_326O|SSB_340|SSB_394|SSB_451L|SSB_451;
4667                TX=201-300 + 1201-1320;                                                                   \
4668                  C=SSB_(0259|0298|0301|222|229|229L|231J|247|251|270|296B),(SSB_1(210|253|303));
4669                TX=864;                                                                                   \
4670                  C=SSB_864S;
4671                TX=726-748 - KSW + Bw 1294-1400 - Typ 81;                                                 \
4672                  C=SSB_(4:27_1(A|AL|B|C)|683P|874C|875K|882U),|5:SSB_B81;
4673                TX=726-748 - KSW;                                                                         \
4674                  C=SSB_KSW;
4675                TX=1-6 - Typ 28;                                                                          \
4676                  C=SSB_28_(1|1M|3|3M|4)(|L);
4677                TX=701-823 - Typ 29 mit 1501-1646 - Typ 82;                                               \
4678                  C=10:(SSB_(12:29_1(A|B|BL|C|CL|D|J|K|KL|R|RL|S|W)|4:29_2(|D|DL|L)|722J|722W|751G|752S|  \
4679                    752S2|802A|802AL|809D|809DL|814R|814RL|821D),|5:SSB_B82)|(SSB_3T2,SSB_3B2);
4680                TX=701-823 - Typ 29 mit 1501-1646 - Typ 82;                                               \
4681                  C=SSB_3T2,SSB_3B2;
4682              $ENDGROUP
4683  # Gel
4684              $GROUP                                                                                      \
4685                  NAME=D_S_T4;                                                                            \
4686                  LC=3; %GBG(STBGEU,ENV_WAYT1);
4687                TX=GT4;                                                                                   \
4688                  C=(<SSB_GT4KULTURNACHT,SSB_GT4~TIS)|(<SSB_GT4KULTURNACHTL,SSB_GT4L~TIS);
4689                TX=GT4 mit Bw;                                                                            \
4690                  C=2@SSB_G6(|L),3:|SSB_B82;
4691                C=2@SSB_G7(|L);
4692                C=2@SSB_G8(|L);
4693                TX=SSB DoT4 901 - 935 + B82;                                                              \
4694                  C=SSB_DT2,|2:SSB_B82;
4695                TX=maintenance 2002;                                                                      \
4696                  C=SSB_2002;
4697                TX=maintenance 2033;                                                                      \
4698                  C=SSB_2033;
4699                TX=maintenance 3 + O1;                                                                    \
4700                  C=SSB_3,|SSB_O1;
4701                TX=Zahnradbahn ZT4;                                                                       \
4702                  C=SSB_ZT4(|A|B),|SSB_BIKE;
4703              $ENDGROUP
4704  # Stadtbahn
4705              $GROUP                                                                                      \
4706                  NAME=D_S_T5;                                                                            \
4707                  LC=3; %GBG(STBGEU,ENV_WAYT3);
4708                TX=Stadtbahn DT8;                                                                         \
4709                  C=SSB_DT8(D|U);
4710                TX=Stadtbahn DT8;                                                                         \
4711                  C=1-2*(<SSB_DT8A1L,SSB_DT8B1)|(<SSB_DT8B1L,SSB_DT8A1);
4712              $ENDGROUP
4713            }
4714            {BUS?
4715              $GROUP                                                                                      \
4716                  NAME=D_S_B1;                                                                            \
4717                  LC=1;
4718                TX=Bus;                                                                                   \
4719                  C=SSB_O(317|405GNDE|530_KOREA)(|L);                                                     \
4720                  LC=1;
4721                C=SSB_O305_1980|SSB_O305G_1984;                                                           \
4722                  LC=1;
4723                C=SSB_O405G1|SSB_O405GNDEL|SSB_O405GNDE;                                                  \
4724                  LC=1;
4725              $ENDGROUP
4726            }
4727          $ENDSECTION
4728        }
4729
4730  #--------------------------------------------------------------------------
4731  #
4732  # Wuppertal
4733  #
4734        $SECTION                                                                                          \
4735            NAME=D_WUPPERTAL;                                                                             \
4736            AB=30; %SECFIN;%TITLE(Wuppertal);
4737          {CRAIL?
4738  # Wuppertal Schwebebahn
4739
4740  # DEF
4741            $SCENE                                                                                        \
4742                NAME=D_W_S1;                                                                              \
4743                DY=110; YDIR=U; SEQ=2;                                                                    \
4744                BG=(BGCITYDR3:..,0,#; 1-40*1,TREES_SUMMER:..,0,#;BGCITYDR4:..,0,#;                        \
4745                TREE83,10,TREE38,85:,-7; TREE80:,+6;TREE65,1839,TREE65;; WUPPERTAL2:..,0,<=>;);   \
4746                FG=(FENCE8:..,-4;STREET01:..,-4; LAMP10,300:..,-14; (Schwebpillar2):..,-10,-983);         \
4747                LC=5;
4748              $PATH Y=31; LC=3;
4749                POOL=POOL_WUP1900R; D=R;
4750              $ENDPATH
4751              $PATH Y=31; LC=3;                                                                           \
4752                  FG=WSCHWEB3TR8:..,43,-683;
4753                TX=Wuppertal Schwebebahn 1900-1950;                                                       \
4754                  POOL=POOL_WUP1900L; D=L;
4755              $ENDPATH
4756            $ENDSCENE
4757
4758            $SCENE                                                                                        \
4759                NAME=D_W_S2;                                                                              \
4760                DY=110; YDIR=U; SEQ=2;                                                                    \
4761                BG=(BGCITYDR3:..,+6,#; 1-40*1,TREES_SUMMER:..,0,#;BGCITYDR4:..,+6,#;                      \
4762                TREE83,10,TREE38,85:,-7; TREE80:,+6; TREE65,1839,TREE65; WUPPERTAL2:..,0,<=>;);   \
4763                FG=(25*FENCE8,140,75*FENCE8,140,3*FENCE8,30,70*FENCE8,140,63*FENCE8,11:,-4;               \
4764                STREET01:..,-4;                                                                           \
4765                D_FABRIK01A,80,D_FABRIK01A,2075,D_FABRIK01A,80,D_FABRIK01A,2045,D_FABRIK01A,80,           \
4766                D_FABRIK01A,1035:,-40; LAMP10,300:..,-14;WUP_ST_WERTHERBRB,304,:,-4;                      \
4767                598,(Schwebpillar2,Schwebpillar1,Schwebpillar2):,-10;);                                   \
4768                V=5-7;                                                                                    \
4769                LC=5;
4770              $PATH Y=31; LC=3;
4771                M=STOP; POOL=POOL_WUP(1950|1958|1964|1966|1972)R; D=R; P=*-140;
4772              $ENDPATH
4773              $PATH Y=31; LC=3;                                                                           \
4774                  FG=2*WSCHWEB3TR8,20,2*WSCHWEB3TR8:,43;
4775                TX=Wuppertal Schwebebahn 1954-1980;                                                       \
4776                  M=STOP; POOL=POOL_WUP(1950|1958|1964|1966|1972|1985)L; D=L; P=*-140;
4777              $ENDPATH
4778            $ENDSCENE
4779
4780            $SCENE                                                                                        \
4781                NAME=D_W_S3;                                                                              \
4782                DY=110; YDIR=U; SEQ=2;                                                                    \
4783                BG=(BGCITYDR3:..,+6,#; 1-40*1,TREES_SUMMER:..,0,#;BGCITYDR4:..,+6,#;                      \
4784                TREE83,10,TREE38,85:,-7; TREE80:,+6; TREE65,1839,TREE65; WUPPERTAL2:..,0,<=>;);   \
4785                FG=(25*FENCE8,140,75*FENCE8,140,3*FENCE8,30,70*FENCE8,140,63*FENCE8,11:,-4;               \
4786                STREET01:..,-4;                                                                           \
4787                D_FABRIK01A,80,D_FABRIK01A,2075,D_FABRIK01A,80,D_FABRIK01A,2045,D_FABRIK01A,80,           \
4788                D_FABRIK01A,1035:,-40; LAMP10,300:..,-14;WUP_ST_WERTHERBR(|4),304,:,-4;                   \
4789                598,(Schwebpillar2,Schwebpillar1,Schwebpillar2):,-10;);                                   \
4790                V=5-7;                                                                                    \
4791                LC=5;
4792              $PATH Y=31; LC=3;
4793                M=STOP; POOL=POOL_WUP(1985|2000)R; D=R; P=*-140;
4794              $ENDPATH
4795              $PATH Y=31; LC=3;                                                                           \
4796                  FG=2*WSCHWEB3TR8,20,2*WSCHWEB3TR8:,43;
4797                TX=Wuppertal Schwebebahn 1984-2005;                                                       \
4798                  M=STOP; POOL=POOL_WUP(1985|2000)L; D=L; P=*-140;
4799              $ENDPATH
4800            $ENDSCENE
4801
4802            $SCENE                                                                                        \
4803                NAME=D_W_S4;                                                                              \
4804                DY=115; YDIR=U; SEQ=2;                                                                    \
4805                BG=(BGCITYDR5:..,0,#; 1-40*1,TREES_SUMMER:..,0,#;BGCITYDR6:..,0,#;                        \
4806                TREE83,10,TREE38,85:,-7; TREE80:,+6;TREE65,1839,TREE65;; WUPPERTAL2:..,0,<=>;);   \
4807                FG=(STREET01:..,-4; LAMP10,300:..,-14; (Schwebpillar5,Schwebpillar6):..,0,-1026);         \
4808                LC=5;
4809              $PATH Y=34; LC=3;
4810                POOL=POOL_WUP20(16|00)R; D=R;
4811              $ENDPATH
4812              $PATH Y=34; LC=3;                                                                           \
4813                  FG=WSCHWEB6TR8:..,43,-734;
4814                TX=Wuppertal Schwebebahn 2005-2016 Landstrecke;                                           \
4815                  POOL=POOL_WUP20(16|00)L; D=L;
4816              $ENDPATH
4817            $ENDSCENE
4818          }
4819          {TRAM?
4820            $GROUP                                                                                        \
4821                NAME=D_W_T1;                                                                              \
4822                LC=1; %GBG(STBGDRA,ENV_WAYT1);
4823              TX=Wuppertal 239 + 529;                                                                     \
4824                C=WUP_3_239,WUP_515;
4825              TX=Wuppertal 3239;                                                                          \
4826                C=WUP_4_3239;
4827              TX=Wuppertal 3241;                                                                          \
4828                C=WUP_3241O;
4829              TX=Tw 240;                                                                                  \
4830                C=WUP_240;
4831              TX=Tw 245-264;                                                                              \
4832                C=WUP_250|WUP_262,|2:WUP_B1;
4833              TX=Tw 265 + KS-Bw;                                                                          \
4834                C=WUP_265,|2:WUP_534;
4835              TX=Wuppertal,Tw 239;                                                                        \
4836                C=WUP_3T2;
4837              TX=Tw Serie 151ff;                                                                          \
4838                C=WUP_2T4;
4839              TX=Tw Serie 151ff;                                                                          \
4840                C=WUP_3T4;
4841              TX=Bergbahn;                                                                                \
4842                C=WUP_BERGBAHN;
4843            $ENDGROUP
4844            $GROUP                                                                                        \
4845                NAME=D_W_T2;                                                                              \
4846                LC=1; %GBG(STBGDRM,ENV_WAYT1);
4847              TX=E 609;                                                                                   \
4848                C=WUP_E609,WUP_GW4N;
4849              TX=Tw 4501-4507;                                                                            \
4850                C=WUP_4GT4L|WUP_4GT4;
4851              TX=Tw 1005-1020;                                                                            \
4852                C=WUP_1006(|L);
4853              TX=Tw 1001-1004 =3001-3004;                                                                 \
4854                C=WUP_3001(|L);
4855              TX=Wuppertal 3401-3408;                                                                     \
4856                C=WUP_340(1|3|4|5|6|7|8)B;
4857            $ENDGROUP
4858            $GROUP                                                                                        \
4859                NAME=D_W_T3;                                                                              \
4860                LC=1; %GBG(STBGDRM,ENV_WAYT1);
4861              TX=Tw 3801-3816;                                                                            \
4862                C=WUP_38(01O|01OV|04O|11O1|11O2|13O|14O|15O1|15O2|02O|03B|05B|07B|08R|08G|10B|12D|12K|    \
4863                  16B)(|L); %GBG(STBGDRM,ENV_WAYT1);
4864              TX=Tw 3817-3822;                                                                            \
4865                C=WUP_38(17O|18O|18B|18OC|20B|21O|21B|22F|22G)(|L); %GBG(STBGDRM,ENV_WAYT1);
4866              TX=3823-3831;                                                                               \
4867                C=WUP_38(23A|23O|24D|24B|25D|25B|26B|26OB|28D3|28D5|28O|29K|30D|30G|31O); %GBG(STBGDRM,ENV_WAYT1);
4868            $ENDGROUP
4869          }
4870          {BUS?
4871            $GROUP                                                                                        \
4872                NAME=D_W_B1;                                                                              \
4873                LC=2; %GBG(STBGDRM,[WT=ENV_WAYO][WA=ENV_WAYA]);
4874              C=WUP_OBUS;
4875              M=FOLLOW;                                                                                   \
4876                C=2-3*WUP_(O305A|SG192A1|SG192A2|SL200A|V110SL);
4877              M=FOLLOW;                                                                                   \
4878                C=4-6*WUP_(0405C|L811D|N4015|NG272|NL202C1|NL202C2|O305G|O305|O405GC|O405GNC|SG192B1|     \
4879                  SG192B2|SG292C1|SL200B|SL202C);
4880              M=FOLLOW;                                                                                   \
4881                C=3-5*WUP_(O530GC2BL|NG312|NG313|NL202D|NL263|NM222|NM223|O405D|O405GD|                   \
4882                  O405GN2_SPARKASSE|O405GND|O405GNE|O405ND|SG292D1|SL202D);
4883              M=FOLLOW;                                                                                   \
4884                C=3-5*WUP_(O530GC2B|IK405|IK417|IK417A|NG313CE|NL263CE|O405GCE|O530G|O530GCE|             \
4885                  SG221UL_STINNES|SG292CE);
4886              TX=Schwebebahntransport;                                                                    \
4887                M=FOLLOW;                                                                                 \
4888                C=(WUP_TRAS1;WUP_TRAS2;WUP_TRAS3);
4889              C=WIRZIUS_MAN41603;
4890            $ENDGROUP
4891          }
4892        $ENDSECTION
4893      }
4894
4895      {CH?
4896  #--------------------------------------------------------------------------
4897  #
4898  # Basel
4899  #
4900        {TRAM|BUS?
4901          $SECTION                                                                                        \
4902              NAME=CH_BASEL;                                                                              \
4903              LC=8; AB=30; %TITLE(Basel);
4904            {TRAM?
4905              $GROUP                                                                                      \
4906                  NAME=CH_BS_T1;                                                                          \
4907                  LC=3; %GBG(STBGEU,ENV_WAYT1);
4908                C=BVB_4,BVB_281;
4909                C=BVB_126,$DIR(BVB_309L,BVB_309);
4910                C=BVB_126|BVB_163,0-2*BVB_1077|BVB_331|BVB_371|BVB_331;
4911                C=BVB_126|BVB_163,2:|BVB_331|BVB_371,BVB_702;
4912                C=BVB_(125|162|181|190|192L|205G|205GL|47|51|69),|BVB_1077|BVB_1046,|BVB_1046;
4913                C=BVB_(125|162|181|190|192L|205G|205GL|47|51|69),|BVB_1303,|BVB_1163|BVB_1187|BVB_1193;
4914                C=BVB_(125|162|181|190|192L|205G|205GL|47|51|69),|BVB_1401($DIR(L,));
4915                C=BVB_162,BVB_1332,BVB_181;
4916                C=BVB_205,BVB_708;
4917              $ENDGROUP
4918              $GROUP                                                                                      \
4919                  NAME=CH_BS_T2;                                                                          \
4920                  LC=3; %GBG(STBGEU,ENV_WAYT1);
4921                C=BVB_72,|BVB_702;
4922                C=BVB_301;
4923                C=BVB_302V,|BVB_1302;
4924                C=BVB_303(|L);
4925                C=BVB_450(|L),|BVB_371,|BVB_702,|BVB_1303;
4926                C=BVB_400(|A|B|L),|BVB_1400;
4927              $ENDGROUP
4928              $GROUP                                                                                      \
4929                  NAME=CH_BS_T3;                                                                          \
4930                  LC=3; %GBG(STBGEU,ENV_WAYT1);
4931                C=BVB_25(1|2)(|L);
4932                C=(BVB_15,BVB_B4B1|BVB_B4B2|BVB_B4S|(0-2*BVB_1241))(|L);
4933                C=(BVB_409,BVB_1471)(|L);
4934                C=(BVB_426,BVB_1408)(|L);
4935                TX=BVB BE 4/4;                                                                            \
4936                  C=(BVB_BE441,BVB_BE441)|(BVB_BE442,BVB_BE442);
4937                TX=BVB BE 4/4;                                                                            \
4938                  C=(2*BVB_BE441)|(2*BVB_BE442)|(2*BVB_BE441L)|(2*BVB_BE442L);
4939                C=BVB_457,BLT_B4B;
4940                TX=BVB BE 4/4 Standardwagen;                                                              \
4941                  C=BVB_BE44_413VCS(|L)|BVB_BE44_437|BVB_BE44_413|BVB_BE44_401(|L);
4942                TX=BVB BE 4/4 Standardwagen;                                                              \
4943                  C=BVB_BE44_413FASN|BVB_BE44_413W(|L)|BVB_BE44_413MALARIAL;
4944              $ENDGROUP
4945              $GROUP                                                                                      \
4946                  NAME=CH_BS_T4;                                                                          \
4947                  LC=3; %GBG(STBGEU,ENV_WAYT1);
4948                C=(BVB_(480|BE44IIIB),BVB_B4(B0|B1|B2|S),BVB_(480|BE44IIIB))(|L);
4949                C=(BVB_(480|BE44IIIB),0-2*BVB_B4(B0|B1|B2|S))(|L);
4950                C=(BVB_477,BVB_483)(|L);
4951                C=(BVB_498,BVB_1492,BVB_499)(|L);
4952                TX=Basel Flexity 2 - 5-teilig;                                                            \
4953                  C=BVB_FLEXITY2_5G(|L);
4954                TX=Basel Flexity 2 - 7-teilig;                                                            \
4955                  C=BVB_FLEXITY2_7G(|L);
4956              $ENDGROUP
4957            }
4958            {BUS?
4959              $GROUP                                                                                      \
4960                  NAME=CH_BS_B1;                                                                          \
4961                  LC=3;                                                                                   \
4962                  F=T; %GBG(STBGEU,[WT=ENV_WAYO][WA=ENV_WAYA]);
4963                C=BVB_FBW_350(|L);
4964                C=BVB_SAURER_352(|L);
4965                C=BVB_SAURER_354(|L);
4966                C=BVB_FBW_356(|L);
4967                C=BVB_REINBOLT_357(|L);
4968                C=BVB_FBW_901(|L);
4969                C=BVB_FBW_911(|L);
4970                C=BVB_FBW_912(|L);
4971                C=BVB_FBW_913(|L);
4972                C=BVB_O305G_921(|L);
4973                C=BVB_NEOP_933(|L);
4974                C=BVB_N6020(|L);
4975              $ENDGROUP
4976            }
4977            {TRAM?
4978              $GROUP                                                                                      \
4979                  NAME=CH_BS_T5;                                                                          \
4980                  LC=3; %GBG(STBGEU,ENV_WAYT1);
4981                C=(BVB_BE46DWG1,BVB_B4B(0|1|2)|BVB_BE46DWG1)(|L);
4982                C=BVB_(617,617|1477)(|L);
4983                TX=BVB BE 4/6 Duewag;                                                                     \
4984                  C=1-2@BVB_BE46DWG(2|3)(|L);
4985                C=BVB_BE46DWG1,BVB_1331;
4986                C=BVB_638(|L);
4987                C=BVB_BE46HAI(|L);
4988              $ENDGROUP
4989              $GROUP                                                                                      \
4990                  NAME=CH_BS_T6;                                                                          \
4991                  LC=3; %GBG(STBGEU,ENV_WAYT1);
4992                C=[C:(40,33),#FFFFFF|#8C0000|#00FFFF|#0000FF|#FF5400|#FFFF00](BVB_8,BVB_B4B2)(|L);
4993                C=[C:(40,33),#FFFFFF|#8C0000|#00FFFF|#0000FF|#FF5400|#FFFF00](BVB_659,BVB_B4B2)(|L);
4994                C=[C:(40,33),#FFFFFF|#8C0000|#00FFFF|#0000FF|#FF5400|#FFFF00](BVB_659,BVB_498)(|L);
4995                C=[C:(40,33),#FFFFFF|#8C0000|#00FFFF|#0000FF|#FF5400|#FFFF00](1-3*BVB_659)(|L);
4996                C=[C:(40,33),#FFFFFF|#8C0000|#00FFFF|#0000FF|#FF5400|#FFFF00](BVB_659,BVB_8)(|L);
4997                TX=BVB BE 4/6;                                                                            \
4998                  C=BVB_BE46N(1|2)(|L);
4999              $ENDGROUP
5000              $GROUP                                                                                      \
5001                  NAME=CH_BS_T7;                                                                          \
5002                  TX=Baselland Transport;                                                                 \
5003                  LC=3; %GBG(STBGEU,ENV_WAYT3);
5004                C=STHF_23110;
5005                TX=BLT Be 4/8;                                                                            \
5006                  C=(BLT_BE46CL,BLT_B4BL)|(BLT_BE46C,BLT_B4B);
5007                TX=BLT Be 4/8 + 4/6;                                                                      \
5008                  C=(BLT_BE48L,BLT_BE46L)|(BLT_BE48,BLT_BE46);
5009                C=(BLT_BE48B,BLT_1322)(|L);
5010                TX=BLT Be 4/6 + B4;                                                                       \
5011                  C=(BLT_BE46CL,BLT_B4BL)|(BLT_BE46C,BLT_B4B);
5012                C=BLT_123(|L);
5013                C=(BLT_123,BVB_B4B0)(|L);
5014                C=(BLT_123,BVB_BE46DWG1)(|L);
5015                C=(BLT_123,BLT_B4B)(|L);
5016                C=(2*BLT_123)(|L);
5017                C=(BLT_123,BLT_1338)(|L);
5018                TX=BLT Tango;                                                                             \
5019                  C=BLT_TANGO|BLT_TANGOL;
5020                TX=BLT Tango;                                                                             \
5021                  C=BLT_15(1W|3|3W|1A)(|L);
5022              $ENDGROUP
5023              $GROUP                                                                                      \
5024                  NAME=CH_BS_T8;                                                                          \
5025                  LC=3; %GBG(STBGEU,ENV_WAYT3);
5026                TX=BVB Combino;                                                                           \
5027                  C=BVB_COMBINO~FLE[#D:R]|BVB_COMBINOL~FLE[#D:L];
5028                C=BVB_COMBOLINO(|L);
5029                C=BVB_COMBINOB(|L);
5030                C=BVB_COMBINO1(|L)~MBG;
5031                C=BVB_302|BVB_310L|BVB_310;
5032                C=BVB_COMBOLINO~OR;
5033                C=BVB_411(|L);
5034              $ENDGROUP
5035              $GROUP                                                                                      \
5036                  NAME=CH_BS_T9;                                                                          \
5037                  LC=1; %GBG(STBGEU,ENV_WAYT2);
5038                C=BVB_2017|BVB_2018,|BVB_2205;
5039                C=BVB_2051;
5040              $ENDGROUP
5041            }
5042            {BUS?
5043              $GROUP                                                                                      \
5044                  NAME=CH_BS_B2;                                                                          \
5045                  LC=3; %GBG(STBGEU,[WT=ENV_WAYO][WA=ENV_WAYA]);
5046                M=FOLLOW;                                                                                 \
5047                  C=2-4*BVB_(FBW_5|FBW_6|FBW_7|FBW_8|SAURER_2|SAURER_3);
5048                M=FOLLOW;                                                                                 \
5049                  C=3-5*BVB_(FBW_23|FBW_30|FBW_40|FBW_41|FBW_48|FBW_78|SAURER_13)L;
5050                M=FOLLOW;                                                                                 \
5051                  C=2-3*BVB_O305G_7(01|02|11|20);
5052                M=FOLLOW;                                                                                 \
5053                  C=2-3*BVB_O(405G_722|405G_722A|405_801|530|530AIRLINE)L;
5054                C=BVB_VW_KUTSENITS(|L);
5055                M=FOLLOW;                                                                                 \
5056                  C=2-4*BVB_(FBW_5|FBW_6|FBW_7|FBW_8|SAURER_2|SAURER_3)L;
5057                M=FOLLOW;                                                                                 \
5058                  C=3-5*BVB_(FBW_23|FBW_30|FBW_40|FBW_41|FBW_48|FBW_78|SAURER_13);
5059                M=FOLLOW;                                                                                 \
5060                  C=2-3*BVB_O305G_7(01|02|11|20)L;
5061                M=FOLLOW;                                                                                 \
5062                  C=2-3*BVB_O(405G_722|405G_722A|405_801|530|530AIRLINE);
5063              $ENDGROUP
5064            }
5065          $ENDSECTION
5066        }
5067  #--------------------------------------------------------------------------
5068  #
5069  # Zürich
5070  #
5071        {TRAM|BUS?
5072          $SECTION                                                                                        \
5073              NAME=CH_ZURICH;                                                                             \
5074              TX=Zürich; %SECFIN;%TITLE(Zürich);
5075            {TRAM?
5076              $GROUP                                                                                      \
5077                  NAME=CH_ZH_T1;                                                                          \
5078                  LC=1; %GBG(STBGEU,ENV_WAYT1);
5079                TX=Elefant;                                                                               \
5080                  C=((VBZ_1301L,VBZ_QUER)[#D:L])|((VBZ_1301,VBZ_QUER)[#D:R]);
5081                TX=301 + Bw;                                                                              \
5082                  C=TMZ_301(|L),0-2*TMZ_QUER;
5083              $ENDGROUP
5084            }
5085            {BUS?
5086              $GROUP                                                                                      \
5087                  NAME=CH_ZH_B1;                                                                          \
5088                  LC=1; %GBG(STBGEU,ENV_WAYA);
5089                TX=Hochlenker;                                                                            \
5090                  C=VBZ_HOCHLENKER(|L);
5091              $ENDGROUP
5092            }
5093            {TRAM?
5094              $GROUP                                                                                      \
5095                  NAME=CH_ZH_T2;                                                                          \
5096                  LC=3; %GBG(STBGEU,ENV_WAYT2);
5097                TX=Karpfen;                                                                               \
5098                  C=VBZ_KARPFEN(T,B)(|L);
5099                TX=Mirage;                                                                                \
5100                  C=((VBZ_BE46TWL[#D:L],VBZ_BE46BWL))|((VBZ_BE46TW[#D:R],VBZ_BE46BW))|                    \
5101                    (VBZ_(MIRAGE|(MIRAGE,BLINDE_KUH))(|L));
5102                TX=Mirage;                                                                                \
5103                  C=(VBZ_BE46_1675L,VBZ_BE46_1693L)|(VBZ_BE46_1675,VBZ_BE46_1693)|                        \
5104                    (VBZ_BE46_160(1|7),VBZ_BE46_1691)|VBZ_BE46_1673(|L)|VBZ_BE46_1618|VBZ_BE46_1616;
5105                TX=Mirage;                                                                                \
5106                  C=VBZ_BE46_1690REGL|VBZ_BE46_1691REGL|VBZ_BE46_1651CHINAL|VBZ_BE46_1651KUNST|           \
5107                    VBZ_BE46_1689(|L)|VBZ_BE46_1685;
5108                TX=Tram 2000;                                                                             \
5109                  C=(VBZ_T2000~FLE,VBZ_B2000~FLE)|(VBZ_T2000L~FLE,VBZ_B2000L~FLE)|                        \
5110                    VBZ_(T2000(|W1)|(T2000(|W1),B2000))(|L)|VBZ_T2000S(|W1)(|L);
5111                TX=Tram 2000;                                                                             \
5112                  C=VBZ_BE46_T2000|VBZ_BE461_2002(|L)|(VBZ_BE462_2071,VBZ_BE24_2415)|VBZ_BE462_2071L|     \
5113                    (VBZ_BE461_2035,VBZ_BE24_2425)|(VBZ_BE461_2029,VBZ_BE461_2306)|VBZ_BE461_20(02|35)L|;
5114                TX=Tram 2000 + NF-Mittelteil;                                                             \
5115                  C=((VBZ_TRAM2000S1L)[#D:L])|((VBZ_TRAM2000S1)[#D:R]);
5116                TX=Typ Cobra;                                                                             \
5117                  C=VBZ_COBRA(1|V|V_NOCHNIE|V_WBG)(|L)|VBZ_COBRA2(|L)|VBZ_3087(|L);
5118                TX=Typ Cobra;                                                                             \
5119                  C=VBZ_(BE442,B4)(|O)(|L);
5120                TX=Typ Cobra Glattal;                                                                     \
5121                  C=VBZ_3072L[#D:L]|VBZ_3072[#D:R];
5122                C=4:VBZ_BE24(|N)(|L)|VBZ_BE24_KUNSTHAUS;
5123                C=VBZ_BE46(|L)~PNR,|VBZ_BE46BK($DIR(L,));
5124                C=VBZ_BE46_CHINAL;
5125                C=VBZ_BE46_KUNST;
5126                C=VBZ_SILBERTRAM1,VBZ_SILBERTRAM2;
5127              $ENDGROUP
5128            }
5129            {BUS?
5130              $GROUP                                                                                      \
5131                  NAME=CH_ZH_B2;                                                                          \
5132                  LC=1; %GBG(STBGEU,ENV_WAYO);
5133                TX=O 405;                                                                                 \
5134                  C=VBZ_O405GNTD(|L)~GW|VBZ_O405GNTD~RK;                                                  \
5135                  F=T;
5136              $ENDGROUP
5137            }
5138            {TRAM?
5139              $GROUP                                                                                      \
5140                  NAME=CH_ZH_T4;                                                                          \
5141                  LC=1; %GBG(STBGEU,ENV_WAYT2);
5142                TX=Kurbeli;                                                                               \
5143                  C=(VBZ_BE44_1392L,VBZ_B4_722L)|(VBZ_BE44_1392,VBZ_B4_721)|VBZ_BE44_370;
5144                TX=Kurbeli;                                                                               \
5145                  C=(VBZ_BE44_1389,VBZ_B4_738)|VBZ_BE44_407|VBZ_BE44_1506(|L)|VBZ_BE44_1353(|L);
5146                TX=Kurbeli;                                                                               \
5147                  C=(VBZ_BE44_1393,VBZ_B4_722)|VBZ_BE44_1393L;
5148                TX=Karpfen;                                                                               \
5149                  C=VBZ_KARPFEN(T,B)(|L);
5150                TX=1801;                                                                                  \
5151                  C=VBZ_BE66_1801(|O);
5152                TX=XE 4/4 922;                                                                            \
5153                  C=VBZ_XE44_1922;
5154              $ENDGROUP
5155              $GROUP                                                                                      \
5156                  NAME=CH_ZH_T5;                                                                          \
5157                  LC=3; %GBG(STBGEU,ENV_WAYT2);
5158                C=VBZ_BE462B_ELFI;
5159                C=VBZ_BE462_RADIO24L;
5160                C=VBZ_BE462_SBB;
5161                M=OPEN;                                                                                   \
5162                  C=VBZ_BE462R,|VBZ_BE462R_NP;
5163                C=VBZ_BE46RB(|L);
5164                C=VBZ_BE462RB_ELFI;
5165                C=VBZ_BE462R_SBB;
5166                C=VBZ_BE66;
5167                C=VBZ_BE48SB(|L);
5168              $ENDGROUP
5169            }
5170          $ENDSECTION
5171        }
5172      }
5173      {A?
5174  #--------------------------------------------------------------------------
5175  #
5176  # Wien
5177  #
5178        $SECTION                                                                                          \
5179            NAME=A_WIEN;                                                                                  \
5180            SEQ=D; AB=30; V=4; %SECFIN;%TITLE([N=Wien;E=Vienna;H=Bécs;]);
5181          {CRAIL?
5182  # Wien Stadtbahn
5183            $GROUP                                                                                        \
5184                NAME=A_W_S1;                                                                              \
5185                LC=3; %GBG(STBGFT,ENV_WAYT4);
5186              TX=Stadtbahn N + n;                                                                         \
5187                C=(WIEN_N,3*WIEN_N1,WIEN_N,3*WVB_NC,WIEN_N)|                                              \
5188                  (WIEN_NL,3*WTM_N1_5786L,WIEN_NL,3*WIEN_N1~VEF,WIEN_NL);
5189              TX=Stadtbahn N1 + n2;                                                                       \
5190                C=WVB_N1_2872|WVB_N1O1|WVB_N1O2,2*(WVB_N2O|WVB_N2_5993),WVB_N1_2872|WVB_N1O1|WVB_N1O2,    \
5191                  2*(WVB_N2O|WVB_N2_5993),WVB_N1_2872|WVB_N1O1|WVB_N1O2;
5192              TX=Stadtbahn E6 + c6;                                                                       \
5193                C=(<WIEN_E6A,2*WIEN_C6A,WIEN_E6AL)|(<WIEN_E6AL,2*WIEN_C6A,WIEN_E6A)|                      \
5194                  (<WIEN_E6_4901,2*WIEN_C6A,WIEN_E6_4901);
5195              TX=U6 E6 + c6 + T + c6 + E6;                                                                \
5196                C=WIEN_E6AL,WIEN_C6A,WIEN_U6N,WIEN_C6A,WIEN_E6A;
5197              TX=U6 Typ T;                                                                                \
5198                C=4*(WIEN_U6N|WIEN_U6NL);
5199              TX=U6 E6 + c6 + T + c6 + E6;                                                                \
5200                C=WIEN_E6AL,WIEN_C6A,WIEN_U6N,WIEN_C6A,WIEN_E6A;
5201            $ENDGROUP
5202  # Wien U-Bahn
5203            $GROUP                                                                                        \
5204                NAME=A_W_U1;                                                                              \
5205                LC=2; %GBG((STBGFO|STBGUB),ENV_WAYM);
5206              TX=U-Bahn U;                                                                                \
5207                M=STOP;                                                                                   \
5208                C=3*WIEN_U;                                                                               \
5209                P=*50; T=1,OPEN,5,CLOSE,W;                                                                \
5210                FG=116*PLF1O:50,-3;
5211              TX=U-Bahn Wien U;                                                                           \
5212                C=3*(<WIEN_UAL,WIEN_UA);
5213              TX=U-Bahn Wien V;                                                                           \
5214                C=(<WIEN_VFL~FLE,4*WIEN_VF~FLE,WIEN_VM~FLE)|(<WIEN_VPFL,4*WIEN_VPM,WIEN_VPF);
5215            $ENDGROUP
5216          }
5217          {TRAM?
5218            $GROUP                                                                                        \
5219                NAME=A_W_T1;                                                                              \
5220                LC=3; %GBG(STBGAU,[WT=ENV_WAYT1][WA=ENV_WAYA][WR=ENV_WAYA]);
5221  # Wien DT
5222              TX=Wien,Dampftramwayzug;                                                                    \
5223                C=(WIEN_DT11,2*VEF_72)|(WIEN_DT11_72[#D:R],WIEN_72);                                      \
5224                F=DP1;
5225  # Wien EP 1,2
5226              TX=A + q;                                                                                   \
5227                C=MTM_A7M,MTM_MQ1020;
5228              TX=D + s2;                                                                                  \
5229                C=(WIEN_D244),WIEN_S1504;
5230              TX=D + s2;                                                                                  \
5231                C=WIEN_D314,VEF_S2_1504;
5232              TX=D + s2;                                                                                  \
5233                C=MTM_D299|VEF_D244EM,VEF_S2_1504;
5234              TX=D1 + u2;                                                                                 \
5235                C=(WIEN_D1K,WIEN_U2C)|(WIEN_D1KL,WIEN_U2CL);
5236              TX=D1 + d2;                                                                                 \
5237                C=VEF_D1_314,VEF_D2_5064;
5238              TX=D1 + d2;                                                                                 \
5239                C=WIEN_D1K,WIEN_D5064;
5240              TX=D1;                                                                                      \
5241                C=WIEN_D1B;
5242              TX=E Stockwagen;                                                                            \
5243                C=WIEN_E_D|WIEN_E_DL;
5244              TX=G + g;                                                                                   \
5245                C=(WIEN_G1,WIEN_BG)|(WIEN_G1L,WIEN_BGL);
5246              TX=G + s2;                                                                                  \
5247                C=WIEN_GK,WTM_S2_1504;
5248              TX=G2 + a;                                                                                  \
5249                C=(WIEN_G2A|WIEN_G2AL),WIEN_BA,WIEN_BA2;
5250              TX=L2 + u3;                                                                                 \
5251                C=(WIEN_L2,WIEN_U3)|(WIEN_L2L,WIEN_U3L);
5252            $ENDGROUP
5253  # Wien G
5254            $GROUP                                                                                        \
5255                NAME=A_W_T2;                                                                              \
5256                LC=3; %GBG(STBGAU,ENV_WAYT1);
5257              TX=G + h;                                                                                   \
5258                C=(WIEN_GA|WIEN_GAL),WIEN_HA;
5259              TX=G + k;                                                                                   \
5260                C=(WIEN_G1|WIEN_G1L),WIEN_BK1;
5261              TX=G 2003 + d2;                                                                             \
5262                C=(WIEN_G2C,2*WIEN_D2)|(WIEN_G2CL,2*WIEN_D2L);
5263              TX=G 2003 + d2;                                                                             \
5264                C=(WIEN_G2003|WIEN_G2003L),WIEN_D5032;
5265              TX=G 2003 + u;                                                                              \
5266                C=(WIEN_G2C|WIEN_G2CL),WIEN_U2A;
5267              TX=G 2101;                                                                                  \
5268                C=WIEN_G2101|WIEN_G2101L|VEF_2101L|VEF_2101;
5269              TX=G2 + k3;                                                                                 \
5270                C=(WIEN_G2051L,WIEN_K3442L)|(WIEN_G2051,WIEN_K3442);
5271              TX=G2 + k3 + k3;                                                                            \
5272                C=(WIEN_G2A,2*WIEN_K3)|(WIEN_G2AL,2*WIEN_K3L);
5273              TX=G2;                                                                                      \
5274                C=MTM_G2_2067|MTM_G2_2067;
5275              TX=G2 + k2;                                                                                 \
5276                C=(WIEN_G2BL,WIEN_BK2L|WIEN_K2L)|(WIEN_G2B,WIEN_BK2|WIEN_K2);
5277              TX=G3 + k2;                                                                                 \
5278                C=(WIEN_G3|WIEN_G3L),WIEN_K2;
5279              TX=G4 + k5;                                                                                 \
5280                C=(WIEN_G4,WIEN_K5)|(WIEN_G4L,WIEN_K5L);
5281            $ENDGROUP
5282  # Wien H,I,J,K,L
5283            $GROUP                                                                                        \
5284                NAME=A_W_T3;                                                                              \
5285                LC=3; %GBG(STBGAU,ENV_WAYT1);
5286              TX=H + k;                                                                                   \
5287                C=(WIEN_H,WIEN_BK1)|(WIEN_HL,WIEN_BK1L);
5288              TX=H + u2;                                                                                  \
5289                C=MSTM_H2237L[#D:L]|MSTM_H2237[#D:R],WIEN_U3802;
5290              TX=H1 + u3;                                                                                 \
5291                C=(WIEN_H1,WIEN_U2B,WIEN_U2A)|(WIEN_H1L,WIEN_U2AL,WIEN_U2BL);
5292              TX=H2 + k8;                                                                                 \
5293                C=(WIEN_H2,WIEN_K8)|(WIEN_H2L,WIEN_K8L);
5294              TX=K + k3neu + k3neu;                                                                       \
5295                C=(WIEN_KB,2*WIEN_K3N)|(WIEN_KBL,2*WIEN_K3NL);
5296              TX=K + u2;                                                                                  \
5297                C=(WIEN_KD|WIEN_KDL),WIEN_U2B,WIEN_U2A|VEF_U2_3802|WTM_U2_3882O;
5298              TX=K + k;                                                                                   \
5299                C=WIEN_KA,2*WIEN_K3442;
5300              TX=K + l;                                                                                   \
5301                C=(WIEN_KC,2*WIEN_L)|(WIEN_KCL,2*WIEN_LL);
5302              TX=K + l;                                                                                   \
5303                C=(WIEN_KCL|WIEN_KC),(WIEN_LL|WIEN_L);
5304              TX=L1 + K8;                                                                                 \
5305                C=(WIEN_L1,WIEN_K8)|(WIEN_L1L,WIEN_K8L);
5306              TX=L2 + c3;                                                                                 \
5307                C=(WIEN_L2,WIEN_C3_1960G)|(WIEN_L2L,WIEN_C3_1960GL);
5308            $ENDGROUP
5309  # Wien M,N,P,A,B,T;%GBG(STBGAU,ENV_WAYT1);
5310            $GROUP                                                                                        \
5311                NAME=A_W_T4;                                                                              \
5312                LC=3;
5313              TX=M + m2;                                                                                  \
5314                C=(WIEN_MB,2*WIEN_M2)|(WIEN_MBL,2*WIEN_M2L);
5315              TX=M + m2;                                                                                  \
5316                C=(WIEN_MB,2*WIEN_M2)|(WIEN_MBL,2*WIEN_M2L);
5317              TX=M + c3;                                                                                  \
5318                C=(WIEN_MA[#D:R],WVB_C3_1110)|(WIEN_M[#D:L],WVB_C3_1110L);
5319              TX=M1 + m3;                                                                                 \
5320                C=(WIEN_M1[#D:R],2*WIEN_M3B[#D:R])|(WIEN_M1L[#D:L],2*WIEN_M3BL[#D:L]);
5321              TX=N + n1;                                                                                  \
5322                C=(WIEN_NB,2*WIEN_N1B)|(WIEN_NBL,2*WIEN_N1BL);
5323              TX=P;                                                                                       \
5324                C=WIEN_P_L[#D:L]|WIEN_P_LL[#D:L];
5325              TX=P2 + h;                                                                                  \
5326                C=(WIEN_P2,WIEN_HA)|(WIEN_P2L,WIEN_HAL);
5327              TX=A;                                                                                       \
5328                C=MTM_A2L[#D:L]|MTM_A2[#D:R];
5329              TX=A + m3;                                                                                  \
5330                C=(WIEN_AH[#D:R],WIEN_M3B[#D:R])|(WIEN_AHL[#D:L],WIEN_M3BL[#D:L]);
5331              TX=B + b;                                                                                   \
5332                C=WIEN_B2,2*WIEN_BB;
5333              TX=T1 + m3;                                                                                 \
5334                C=WIEN_T1,WIEN_M3[#D:R]|WIEN_M3A[#D:L];
5335              TX=T1 + k6;                                                                                 \
5336                C=WIEN_T1,2*WIEN_K6;
5337            $ENDGROUP
5338  # Wien Z, T2, L
5339            $GROUP                                                                                        \
5340                NAME=A_W_T5;                                                                              \
5341                LC=3; %GBG(STBGAU,ENV_WAYT1);
5342              TX=Z;                                                                                       \
5343                C=WIEN_Z4208;
5344              TX=L + l;                                                                                   \
5345                C=(WIEN_LNEUT[#D:R],WIEN_LNEUB)|(WIEN_LNEUTL[#D:L],WIEN_LNEUBL);
5346            $ENDGROUP
5347  # Wien C, D, F
5348            $GROUP                                                                                        \
5349                NAME=A_W_T6;                                                                              \
5350                LC=3; %GBG(STBGAU,ENV_WAYT1);
5351              TX=C + c;                                                                                   \
5352                C=(WVB_C101[#D:R],WVB_C1201)|(WVB_C101L[#D:L],WVB_C1201L);
5353              TX=C1 + c1;                                                                                 \
5354                C=(WVB_C1F,WVB_C1G[#D:R])|(WVB_C1FL,WVB_C1GL[#D:L])|(WIEN_C1A,WIEN_C1C[#D:R])|            \
5355                  (WIEN_C1AL,WIEN_C1CL[#D:L])|(WVB_C1DL,WVB_C1EL)|(WVB_C1D,WVB_C1E);
5356              TX=C3 + c4;                                                                                 \
5357                C=(WIEN_C3_2TL,WIEN_C4_1974L)|(WIEN_C3_2T,WIEN_C4_1974)|(WIEN_C3_3TL,WIEN_C4_1978L)|      \
5358                  (WIEN_C3_3T,WIEN_C4_1975);
5359              TX=D;                                                                                       \
5360                C=WIEN_D_1|WIEN_D_1L;
5361              TX=D1;                                                                                      \
5362                C=WIEN_D1_1A|WIEN_D1_1AL|WIEN_D1_1B|WIEN_D1_1BL|WIEN_D1_2|WIEN_D1_2L|WIEN_D1MUS|          \
5363                  WIEN_D1MUSL;
5364              TX=F Prototyp;                                                                              \
5365                C=WIEN_F_TEST;
5366              TX=F (+ l3);                                                                                \
5367                C=((WIEN_F_1|WIEN_F_2A|(WIEN_F_2B,WIEN_I3_1)|WIEN_F_3|WIEN_F_4))|                         \
5368                  ((WIEN_F_1L|WIEN_F_2AL|(WIEN_F_2BL,WIEN_I3_1L)|WIEN_F_3L|WIEN_F_4L));
5369            $ENDGROUP
5370  # Wien E, E2
5371            $GROUP                                                                                        \
5372                NAME=A_W_T7;                                                                              \
5373                LC=3; %GBG(STBGAU,ENV_WAYT(1|2));
5374              TX=E;                                                                                       \
5375                C=WIEN_E_1970|WIEN_E4401L|WIEN_E4401|WIEN_E_1970L;
5376              TX=E1 + c;                                                                                  \
5377                C=(WIEN_E1_1984,WIEN_C_B)|(WIEN_E1_1984L,WIEN_C_BL);
5378              TX=E1 + c2;                                                                                 \
5379                C=(WIEN_E1C[#D:R],WIEN_C2C[#D:R])|(WIEN_E1CL[#D:L],WIEN_C2CL[#D:L]);
5380              TX=E1 + c3;                                                                                 \
5381                C=(WIEN_E1_2005,WIEN_C3_2005)|(WIEN_E1DL,WIEN_C3_2005L)|(WIEN_E1C,WIEN_C3_1960)|          \
5382                  (WIEN_E1CL,WIEN_C3_1L)|(WIEN_E1_1975,WIEN_C3_1975)|(WIEN_E1_1975L,WIEN_C3_2L)|          \
5383                  (WIEN_E1D,WIEN_C3_1983)|(WIEN_E1DL,WIEN_C3_1985L)|(WIEN_E1_1975,WIEN_C3_1975)|          \
5384                  (WIEN_E1_1970L,WIEN_C3_2BL)|(WIEN_E1_1970,WIEN_C3_2B)|(WIEN_E1_1976,WIEN_C3_1975)|      \
5385                  (WIEN_E1_1977,WIEN_C3_2B)|(WIEN_E1_1981A|WIEN_E1_1981,WIEN_C3_1981)|                    \
5386                  (WIEN_E1_1983,WIEN_C3_4)|(WIEN_E1_1983L,WIEN_C3_4L)|(WIEN_E1_1983,WIEN_C3_2)|           \
5387                  (WIEN_E1_1983L,WIEN_C3_3L)|(WIEN_E1_1979,WIEN_C3_3B)|(WIEN_E1DL,WIEN_C3_3BL)|           \
5388                  (WIEN_E1_1984,WIEN_C3_1985);
5389              TX=E1 + c4;                                                                                 \
5390                C=(WIEN_E1_1982[#D:R],WIEN_C4_1982[#D:R])|(WIEN_E1DL[#D:L],WIEN_C4_1982L[#D:L])|          \
5391                  (WIEN_E1_1974[#D:R],WIEN_C4_1974[#D:R])|                                                \
5392                  (WIEN_E1_1984[#D:R],WIEN_C4A|WIEN_C4C|WIEN_C4B[#D:R])|                                  \
5393                  (WIEN_E1_1974L[#D:L],WIEN_C4_1974L[#D:L])|(WIEN_E1_1984L[#D:L],WIEN_C4CL[#D:L])|        \
5394                  (WIEN_E1_1978L,WIEN_C4_1978L)|(WIEN_E1_1978S|WIEN_E1_1978,WIEN_C4_1978)|                \
5395                  (WIEN_E1_1980AL|WIEN_E1_1980L,WIEN_C4AL)|                                               \
5396                  (WIEN_E1_1980A|WIEN_E1_1980,WIEN_C4_1980|WIEN_C4_1981)|(WIEN_E1_2005,WIEN_C4D);
5397              TX=E2 + c5;                                                                                 \
5398                C=(WIEN_E2F,WIEN_C5F)|(WIEN_E2A,WIEN_C5A)|(WIEN_E2DL|WIEN_E2EL,WIEN_C5DL)|                \
5399                  (WIEN_E2AL,WIEN_C5AL)|(WIEN_E2E,WIEN_C5E)|(WIEN_E2D,WIEN_C5D)|                          \
5400                  (WIEN_E2C|WIEN_E2B,WIEN_C5B);
5401            $ENDGROUP
5402  # Wien A, B
5403            $GROUP                                                                                        \
5404                NAME=A_W_T8;                                                                              \
5405                LC=1; %GBG(STBGAU,ENV_WAYT(1|2));
5406              TX=A;                                                                                       \
5407                C=WIEN_A|WIEN_AL;
5408              TX=B;                                                                                       \
5409                C=WIEN_B|WIEN_BL;
5410            $ENDGROUP
5411  # Wien AT
5412            $GROUP                                                                                        \
5413                NAME=A_W_T9;                                                                              \
5414                LC=3; %GBG(STBGAU,ENV_WAYT1);
5415              TX=BH;                                                                                      \
5416                C=WIEN_BH;
5417              TX=CH;                                                                                      \
5418                C=WIEN_CH6160L[#D:L],WIEN_CH6160[#D:R];
5419              TX=FR + cg;                                                                                 \
5420                C=(WIEN_FR6161L,WIEN_CG7161L)|(WIEN_FR6161,WIEN_CG7161);
5421              TX=GS1 6859;                                                                                \
5422                C=WVB_GS1_6859L[#D:L]|WVB_GS1_6859[#D:R];
5423              TX=LH;                                                                                      \
5424                C=WVB_LH;
5425              TX=MR 6150;                                                                                 \
5426                C=WIEN_MR6150;
5427              C=WIEN_MANN,WIEN_MANNB;
5428            $ENDGROUP
5429  # Wien Follow
5430            $GROUP                                                                                        \
5431                NAME=A_W_T10;                                                                             \
5432                LC=3; %GBG(STBGAU,ENV_WAYT1);
5433              M=FOLLOW;                                                                                   \
5434                C=5*(WIEN_D1BL|WIEN_FL|WIEN_FAL|WIEN_EL|WIEN_E1L|WIEN_E1AL|WIEN_E2L|WIEN_E2WL|WVB_AL|     \
5435                  WVB_BL|(WIEN_L4L,0-1*WIEN_L3L)|(WIEN_C1L,0-1*WIEN_C1BL)|(WIEN_C3AL,0-1*WIEN_C2BL));     \
5436                D=L;
5437              M=FOLLOW;                                                                                   \
5438                C=5*(WIEN_D1B|WIEN_F|WIEN_FA|WIEN_E_R|WIEN_E|WIEN_E1|WIEN_E1A|WIEN_E2|WIEN_E2W|WVB_A|     \
5439                  WVB_B|(WIEN_L4,0-1*WIEN_L3)|(WIEN_C1,0-1*WIEN_C1B)|(WIEN_C3A,0-1*WIEN_C2C));            \
5440                D=R;
5441              M=FOLLOW;                                                                                   \
5442                C=5*((WIEN_NL,0-2*WIEN_N1L)|(WIEN_MA,0-2*WIEN_M3)|(WIEN_M,0-2*WIEN_M3A)|                  \
5443                  (WIEN_B2,0-2*WIEN_BB)|(WIEN_T1,0-2*WIEN_K3A)|(WIEN_BK2,0-2*WIEN_K3A)|WIEN_Z4208|        \
5444                  (WIEN_G2051,0-2*WIEN_K3442L));                                                          \
5445                D=L;
5446              M=FOLLOW;                                                                                   \
5447                C=WIEN_TH6502;                                                                            \
5448                D=R;                                                                                      \
5449                WIEN_BH;                                                                                  \
5450                WVB_CH;
5451            $ENDGROUP
5452  # Wien Lokalbahn
5453  # EP II + III
5454            $GROUP                                                                                        \
5455                NAME=A_WLB1;                                                                              \
5456                LC=3; %GBG(STBGAU,ENV_WAYT1);
5457              TX=Wiener Lokalbahn Tw 200 + Bw;                                                            \
5458                C=WLB_200;
5459              TX=Wiener Lokalbahn 200 + Bw;                                                               \
5460                C=WLB_200A,1-2*WLB_250A;
5461              TX=Wiener Lokalbahn 200 + Bw;                                                               \
5462                C=WLB_200B,WLB_300A;
5463              TX=Wiener Lokalbahn 200;                                                                    \
5464                C=WLB_200C;
5465              TX=Wiener Lokalbahn Tw 208 + Bw 120;                                                        \
5466                C=WLB_208D,WLB_120D;
5467              C=WLB_208D;
5468              TX=Wiener Lokalbahn 210 + Bw;                                                               \
5469                C=WLB_210D,WLB_300D;
5470              TX=Wiener Lokalbahn 220 + Bw;                                                               \
5471                C=WLB_220,(WLB_302,1-3*WLB_220,WLB_302)|(WLB_302,WLB_251);
5472              TX=Wiener Lokalbahn 220 + Bw;                                                               \
5473                C=WLB_220A,(1-2*WLB_300A)|(WLB_309A,WLB_120A)|(WLB_250B,2*WLB_120A)|(2*WLB_300B);
5474              TX=Wiener Lokalbahn 220 + Bw;                                                               \
5475                C=WLB_220C;
5476              TX=Wiener Lokalbahn Tw 223;                                                                 \
5477                C=WLB_223;
5478              TX=Wiener Lokalbahn 240 + Bw;                                                               \
5479                C=WLB_240A,(WLB_280,WLB_240C,WLB_280,WLB_240B)|(WLB_280,WLB_240A);
5480            $ENDGROUP
5481  # EP IV Old
5482            $GROUP                                                                                        \
5483                NAME=A_WLB2;                                                                              \
5484                LC=3; %GBG(STBGFO,ENV_WAYT3);
5485              TX=Wiener Lokalbahn 20 + Bw;                                                                \
5486                C=WLB_20,                                                                                 \
5487                  (WLB_40SGPSA,2*WLB_40SGPSA)|(,WLB_40GSSA,WLB_40SGPSA,WLB_40SGPS)|(2*WLB_40GSS)|         \
5488                  (WLB_40A)|(WLB_40A,WLB_70,WLB_60A)|(WLB_40A,WLB_40SGP,WLB_40GSA)|                       \
5489                  (WLB_40GSA,WLB_75,WLB_60A)|(WLB_40SGPA,WLB_40GS,WLB_40SGPSA)|                           \
5490                  (WLB_20,WLB_40SGPA,WLB_40GS,WLB_70A);
5491              TX=Wiener Lokalbahn 20 + Bw;                                                                \
5492                C=2*WLB_20,(3-4*WLB_40SGPSA);
5493              TX=Wiener Lokalbahn Tw Tw 20ff + Bw 40ff;                                                   \
5494                C=WLB_IV_20AL|WLB_IV_20L,2*(WLB_40GSS|WLB_40GSSA|WLB_40SGPS|WLB_40SGPSA);
5495              TX=Wiener Lokalbahn Tw Tw 20ff + Bw 40ff,70 + 75;                                           \
5496                C=WLB_IV_20,2*(WLB_40A|WLB_40GS|WLB_40GSA|WLB_40SGP|WLB_40SGPA);
5497              TX=Wiener Lokalbahn Tw 20ff + Bw 40ff;                                                      \
5498                C=WLB_IV_20A,2*(WLB_75|WLB_60A|WLB_70|WLB_70A);
5499              TX=Wiener Lokalbahn Tw 230;                                                                 \
5500                C=MTM_230;
5501              TX=Wiener Lokalbahn Tw 200;                                                                 \
5502                C=VEF_200;
5503              TX=Wiener Lokalbahn E 1001;                                                                 \
5504                C=WLB_1001;
5505            $ENDGROUP
5506  # EP IV neu
5507            $GROUP                                                                                        \
5508                NAME=A_WLB3;                                                                              \
5509                LC=3; %GBG(STBGAU,ENV_WAYT1);
5510              TX=Wiener Lokalbahn 11 + 91;                                                                \
5511                C=2*(WLB_20,WLB_40SGPSA);
5512              TX=WLB 11 + 91;                                                                             \
5513                C=(WLB_11NL,WLB_91NL)|(WLB_11L,WLB_91);
5514              TX=Wiener Lokalbahn Tw 10ff + Steuerwagen 90 ff;                                            \
5515                C=<WLB_10OL,WLB_10O,WLB_90OL,WLB_10O;
5516              TX=Wiener Lokalbahn Tw 10ff + Steuerwagen 90 ff;                                            \
5517                C=(<WLB_90NL,WLB_10N,WLB_10NL,WLB_10N)|(<WLB_10NL,WLB_10N,WLB_10NL,WLB_90N);
5518            $ENDGROUP
5519  # EP V/VI
5520            $GROUP                                                                                        \
5521                NAME=A_WLB4;                                                                              \
5522                LC=3; %GBG(STBGFO,ENV_WAYT2);
5523              TX=Wiener Lokalbahn 100;                                                                    \
5524                M=UNIT|CUT;                                                                               \
5525                C1=WLB_100;                                                                               \
5526                C2=WLB_100;
5527              TX=Wiener Lokalbahn 100;                                                                    \
5528                C=1-2*WLB_100~FLE;
5529              TX=Wiener Lokalbahn 117;                                                                    \
5530                C=WLB_117~FLE;
5531              TX=WLB 401ff;                                                                               \
5532                C=WLB_400;
5533              TX=Wiener Lokalbahn 400;                                                                    \
5534                C=1-2*WLB_400~FLE;
5535            $ENDGROUP
5536          }
5537        $ENDSECTION
5538      }
5539      {GB?
5540  #--------------------------------------------------------------------------
5541  #
5542  # London
5543  #
5544        $SECTION                                                                                          \
5545            NAME=GB_LONDON; %SECFIN;%TITLE(London);
5546          {CRAIL?
5547            $GROUP                                                                                        \
5548                NAME=GB_L_U1;                                                                             \
5549                LC=3; %GBG((STBGFO|STBGUB),ENV_WAYM);
5550              TX=Underground A 60;                                                                        \
5551                C=<1-2@LT_A60_(1A|1B|2|3|4)(DL,T,T,D);
5552              TX=Underground D 78;                                                                        \
5553                C=<LT_D78(A|B)(DL,T,D|M,DL|M,T,D);
5554              TX=Underground C 69;                                                                        \
5555                C=<LT_C69(A|B|C|D|E|F)((DL,D,DL,T,T,D)|(DL,T,T,D,DL,D));
5556              TX=Underground C S8 - Sub Surface Lines;                                                    \
5557                C=<LT_S8_EL,LT_S8_M1L,LT_S8_M2L,LT_S8_M3L,LT_S8_M3,LT_S8_M2,LT_S8_M1,LT_S8_E;
5558              TX=Dockland Railways P 89;                                                                  \
5559                C=LT_P89;
5560              TX=Dockland Railways B07;                                                                   \
5561                C=LT_DLR_B07;
5562            $ENDGROUP
5563          }
5564          {TRAM?
5565            $GROUP                                                                                        \
5566                NAME=GB_L_T1;                                                                             \
5567                LC=1;                                                                                     \
5568                STBGUB; %GBG(STBGGB,ENV_WAYT2);
5569              TX=Stadtbahn Croydon Flexity;                                                               \
5570                C=LT_FLEXITY;
5571              TX=Z;                                                                                       \
5572                C=LT_Z;
5573            $ENDGROUP
5574          }
5575          {BUS?
5576            $GROUP                                                                                        \
5577                NAME=GB_L_B1920;                                                                          \
5578                LC=3;
5579              %FAK(H0_LON1920K,(London 1920-30s, Typ: K))
5580              %FAK(H0_LON1920LB,(London 1920-30s, Typ: LB))
5581              %FAK(H0_LON1920S,(London 1920-30s, Typ: S))
5582              %FAK(H0_LON1920PS,(London 1920-30s, Typ: PS))
5583              %FAK(H0_LON1920O,(London 1920-30s, Typ: O))
5584              %FAK(H0_LON1920NS,(London 1920-30s, Typ: NS))
5585              %FAK(H0_LON1920LS,(London 1920-30s, Typ: LS))
5586              %FAK(H0_LON1920R,(London 1920-30s, Typ: R))
5587              %FAK(H0_LON1920AJS,(London 1920-30s, Typ: AJS))
5588              %FAK(H0_LON1920ADC,(London 1920-30s, Typ: ADC))
5589              %FAK(H0_LON1920DE,(London 1920-30s, Typ: DE))
5590              %FAK(H0_LON1920DM,(London 1920-30s, Typ: DM))
5591              %FAK(H0_LON1920NY,(London 1920-30s, Typ: NY))
5592              %FAK(H0_LON1920LN,(London 1920-30s, Typ: LN))
5593              TX=London 1920-30;                                                                          \
5594                M=FOLLOW;                                                                                 \
5595                C=(LGOC_YN3797L;LT_MANCHESTERL)![SS:10];
5596            $ENDGROUP
5597            $GROUP                                                                                        \
5598                NAME=GB_L_B1930;                                                                          \
5599                LC=4;
5600              %FAK(H0_LON1930LT,(London Transport 1930-40s, Typ: LT))
5601              %FAK(H0_LON1930CC,(London Transport 1930-40s, Typ: CC))
5602              %FAK(H0_LON1930LTL,(London Transport 1930-40s, Typ: LTL))
5603              %FAK(H0_LON1930LTC,(London Transport 1930-40s, Typ: LTC))
5604              %FAK(H0_LON1930ST,(London Transport 1930-40s, Typ: ST AEC Regent))
5605              %FAK(H0_LON1930T,(London Transport 1930-40s, Typ: T))
5606              %FAK(H0_LON1930CB,(London Transport 1930-40s, Typ: CB))
5607              %FAK(H0_LON1930DL,(London Transport 1930-40s, Typ: DL))
5608              %FAK(H0_LON1930DT,(London Transport 1930-40s, Typ: DT))
5609              %FAK(H0_LON1930DA,(London Transport 1930-40s, Typ: DA))
5610              %FAK(H0_LON1930GF,(London Transport 1930-40s, Typ: GF))
5611              %FAK(H0_LON1930DC,(London Transport 1930-40s, Typ: DC))
5612              %FAK(H0_LON1930M,(London Transport 1930-40s, Typ: MY,ML,M Maudslay))
5613              %FAK(H0_LON1930TD,(London Transport 1930-40s, Typ: TD))
5614              %FAK(H0_LON1930TR,(London Transport 1930-40s, Typ: TR))
5615              %FAK(H0_LON1930STL,(London Transport 1930-40s, Typ: STL))
5616              %FAK(H0_LON1930STD,(London Transport 1930-40s, Typ: STD))
5617              %FAK(H0_LON1930BD,(London Transport 1930-40s, Typ: BD))
5618              %FAK(H0_LON1930C,(London Transport 1930-40s, Typ: C))
5619              %FAK(H0_LON1930Q,(London Transport 1930-40s, Typ: Q))
5620              %FAK(H0_LON1930TF,(London Transport 1930-40s, Typ: TF))
5621              %FAK(H0_LON1930CR,(London Transport 1930-40s, Typ: CR))
5622            $ENDGROUP
5623            $GROUP                                                                                        \
5624                NAME=GB_L_B1940;                                                                          \
5625                LC=2;
5626              %FAK(H0_LON1940B,(London Transport 1940-50s, Typ: B))
5627              %FAK(H0_LON1940G,(London Transport 1940-50s, Typ: G))
5628              %FAK(H0_LON1940D,(London Transport 1940-50s, Typ: D))
5629              %FAK(H0_LON1940TD,(London Transport 1940-50s, Typ: TD))
5630            $ENDGROUP
5631            $GROUP                                                                                        \
5632                NAME=GB_L_B1950A;                                                                         \
5633                LC=2;
5634              %FAK(H0_LON1950RT,(London Transport 1950-70s, Typ: RT))
5635              %FAK(H0_LON1950RTL,(London Transport 1950-70s, Typ: RTL))
5636              %FAV(LT_RTW-LT_SRT,(London Transport 1950-70s))
5637              %FAK(H0_LON1950RF,(London Transport 1950-70s, Typ: RF))
5638              %FAV(LT_GSL-LT_RLH_RED,(London Transport 1950-70s))
5639            $ENDGROUP
5640            $GROUP                                                                                        \
5641                NAME=GB_L_B1950B;                                                                         \
5642                LC=3;
5643              %FAK(H0_LON1950RM,(London Transport 1950-90s, RM: Routemaster))
5644              %FAK(H0_LON1950RMC,(London Transport 1950-90s, RMC: Coach Routemaster))
5645              %FAK(H0_LON1950RCL,(London Transport 1950-90s, RCL: Routemaster Long Coach))
5646              %FAK(H0_LON1950RML,(London Transport 1950-90s, RML: Routemaster Long Bus))
5647              %FAK(H0_LON1950RMF,(London Transport 1950-90s, RMF: Forward Entrance Routemaster))
5648              %FAK(H0_LON1950RMA,(London Transport 1950-90s, BEA Routemaster))
5649              %FAK(H0_LON1950FRM,(London Transport 1950-90s, FRM: Front Entrance Routemaster))
5650              %FAV(LT_RX1L-LT_RCGRN,(London Transport 1950-90s))
5651            $ENDGROUP
5652            $GROUP                                                                                        \
5653                NAME=GB_L_B1960;                                                                          \
5654                LC=2;
5655              %FAK(H0_LON1960XF,(London Transport 1960-70s, XF: Experimental Fleetline, XA: Experimental Atlantean))
5656              %FAK(H0_LON1960MB,(London Transport 1960-70s, MB, MBF: Merlin))
5657              %FAK(H0_LON1960SM,(London Transport 1960-70s, SM: Swift))
5658              %FAK(H0_LON1960DMS,(London Transport 1960-70s, DMS: Daimler Fleetline))
5659              %FAK(H0_LON1960FS,(London Transport 1960-70s, FS: Ford Transit))
5660            $ENDGROUP
5661            $GROUP                                                                                        \
5662                NAME=GB_L_B1970;                                                                          \
5663                LC=2;
5664              %FAK(H0_LON1970MS,(London Transport 1970-90s, MS: MetroScania single-decker))
5665              %FAK(H0_LON1970LS,(London Transport 1970-90s, LS: National))
5666              %FAK(H0_LON1970GLS,(London Transport 1970-90s, GLS: Greenway))
5667              %FAK(H0_LON1970BS,(London Transport 1970-90s, BS, BL: Bristol HD))
5668              %FAK(H0_LON1970MD,(London Transport 1970-90s, MD: Metro-Scania Metropolitan))
5669            $ENDGROUP
5670            $GROUP                                                                                        \
5671                NAME=GB_L_B1980;                                                                          \
5672                LC=2;
5673              %FAK(H0_LON1980T,(London Transport 1980-00s, T: Leyland Titan))
5674              %FAK(H0_LON1980M,(London Transport 1980-00s, M: Metrobus))
5675              %FAK(H0_LON1980V,(London Transport 1980-00s, V: Volvo Ailsa))
5676              %FAV(LT_C1-LT_OV,(London Transport 1980-00s))
5677            $ENDGROUP
5678            $GROUP                                                                                        \
5679                NAME=GB_L_B1;                                                                             \
5680                LC=3; %GBG(STBGGB,ENV_WAYA);
5681              M=FOLLOW;                                                                                   \
5682                C=(LT_O405NH;LT_O405NKH;LTFR_O530;LTST_O530G;LTST_O530G1; LT_O530G)!|L;
5683              M=FOLLOW;                                                                                   \
5684                C=3-5*(LT_FRM1L|LT_LEYLAND_PD2_1|LTLG_AECRM|LTAR_AECRM|LTST_B7TL|LTMB_MCW|FIRST_B7TL);
5685              M=FOLLOW;                                                                                   \
5686                C=LT_CRL4|LT_RCL;
5687            $ENDGROUP
5688          }
5689        $ENDSECTION
5690      }
5691      {F?
5692  #--------------------------------------------------------------------------
5693  #
5694  # Paris
5695  #
5696        $SECTION                                                                                          \
5697            NAME=F_PARIS;                                                                                 \
5698            SEQ=D; AB=30; %SECFIN;%TITLE(Paris);
5699          {CRAIL?
5700  # RER Line
5701            $GROUP                                                                                        \
5702                NAME=F_RER1;                                                                              \
5703                LC=3; %GBG((STBGFO|STBGEU),ENV_WAYT9);
5704  #             LC=3; ENV=$CBG(WM,(STBGFO|STBGEU),ENV_WAYM),                                              &\
5705  #             $CBG(WE,(STBGFO|STBGEU),ENV_WAYT9);
5706  # E4A
5707  ;RER A
5708              TX=RATP MS61A  RER A;                                                                       \
5709                C=2-3*(3:RATP_MS61A_BG|1:RATP_MS61C_BG);                                                  \
5710                V=10;                                                                                     \
5711                F=EGPRU4;
5712  ;RER B
5713              TX=RATP Z S1  RER B;                                                                        \
5714                C=1-2*(<RATP_Z_S1B1ABL,RATP_Z_S1B1B(|L),RATP_Z_S1B1AB);                                   \
5715                V=10;                                                                                     \
5716                F=EGPRU4;
5717              TX=RATP MS61A  RER B;                                                                       \
5718                C=1-3@RATP_MS61A_BG;                                                                      \
5719                V=10;                                                                                     \
5720                F=EGPRU4;
5721  # E4B
5722  ;RER A
5723              TX=RATP MS61A  RER A;                                                                       \
5724                M=STOP;                                                                                   \
5725                C=2-3*(RATP_MS61A_BG|RATP_MS61C_BG);                                                      \
5726                V=10; P=>95; T=OPEN,W,1,CLOSE;                                                            \
5727                F=EGPR4;
5728  ;RER B
5729              TX=RATP Z S1  RER B;                                                                        \
5730                C=(2*(<(3:RATP_Z_S1B2XABL|1:RATP_Z_S2B2XABL),RATP_Z_S1B2ABL,RATP_Z_S1B2BL,                \
5731                  (3:RATP_Z_S1B2XAB|1:RATP_Z_S2B2XAB)))|                                                  \
5732                  (2*(>(3:RATP_Z_S1B2XAB|1:RATP_Z_S2B2XAB),RATP_Z_S1B2AB,RATP_Z_S1B2B,                    \
5733                  (3:RATP_Z_S1B2XABL|1:RATP_Z_S2B2XABL)));                                                \
5734                V=10;                                                                                     \
5735                F=EGPRU4;
5736              TX=RATP MS61A  RER B;                                                                       \
5737                C=1-3@RATP_MS61A_BG;                                                                      \
5738                V=10;                                                                                     \
5739                F=EGPR4U;
5740  ;RER C
5741              TX=SNCF Z 5300 + RER C;                                                                     \
5742                C=1-2@Z5300_2S_RERC_4V;                                                                   \
5743                V=12;                                                                                     \
5744                F=EGPRU4;
5745              TX=SNCF Z 5300 + RER C;                                                                     \
5746                C=(Z5300_1S_4VSP_R,5:Z5300_2S_RERC_4V_R|1:Z5300_1S_4V_R|1:Z5300_2S_4V_R)|                 \
5747                  (Z5300_1S_4VSP_L,5:Z5300_2S_RERC_4V_L|1:Z5300_1S_4V_L|1:Z5300_2S_4V_L);                 \
5748                V=12;                                                                                     \
5749                F=EGPRU4;
5750              TX=SNCF Z 5600 + Z 8800 RER C;                                                              \
5751                C=2*(Z5600_IDF2_4V_(R|L)|Z8800_IDF2_4V_(R|L));                                            \
5752                V=12;                                                                                     \
5753                F=EGPRU4;
5754  # RER E5 A
5755  ;RER A
5756              TX=RATP MS 61  RER A;                                                                       \
5757                C=2-3*(3:RATP_MS61A_IDF|3:RATP_MS61C_IDF|1:RATP_MS61A_BG|1:RATP_MS61C_BG);                \
5758                V=10;                                                                                     \
5759                F=EPRU5;
5760              TX=RATP MI 84  RER A;                                                                       \
5761                C=2@RATP_MI84_IDF_AB;                                                                     \
5762                V=10;                                                                                     \
5763                F=EPRU5;
5764  ;RER B
5765              TX=SNCF Z 8100  RER B;                                                                      \
5766                C=1-2*Z8100_IDF;                                                                          \
5767                V=12;                                                                                     \
5768                F=EGPRU5;
5769  ;RER C
5770              TX=SNCF Z 5300  RER C;                                                                      \
5771                C=1-2@Z5300_2S_RERCE5_4V;                                                                 \
5772                V=12;                                                                                     \
5773                F=EGPR5;
5774              TX=SNCF Z 5600  RER C;                                                                      \
5775                C=2*(Z5600_IDF2_4V_L|Z8800_IDF2_4V_L);                                                    \
5776                V=14;                                                                                     \
5777                F=EGPRU5;
5778              TX=SNCF Z 20500  RER C;                                                                     \
5779                C=1-2@Z20500_1S_IDF1_4V;                                                                  \
5780                V=12;                                                                                     \
5781                F=EPRU5;
5782  ;RER D
5783              TX=SNCF Z 20500  RER D;                                                                     \
5784                C=[PA](2@Z20500_2S_IDF1_4V);                                                              \
5785                V=12;                                                                                     \
5786                F=EPRU5;
5787            $ENDGROUP
5788  # RER E5 B
5789            $GROUP                                                                                        \
5790                NAME=F_RER2;                                                                              \
5791                LC=3; ENV=$CBG(WM,(STBGFO|STBGEU),ENV_WAYM),                                              &\
5792                $CBG(WE,(STBGFO|STBGEU),ENV_WAYT9);
5793  ;RER A
5794              TX=RATP MS 61  RER A;                                                                       \
5795                C=2-3*(RATP_MS61A_IDFCU|RATP_MS61C_IDFCU);                                                \
5796                V=10;                                                                                     \
5797                F=EPRU5;
5798              TX=RATP MI84  RER A;                                                                        \
5799                C=3:(2-3*(RATP_MS61A_IDFCU|RATP_MS61C_IDFCU))|1:(2@RATP_MI84_IDF);                        \
5800                V=10;                                                                                     \
5801                F=EPRU5;
5802              TX=RATP MI2N  RER A;                                                                        \
5803                C=2*RATP_MI2N;                                                                            \
5804                V=10;                                                                                     \
5805                F=EPRU5;
5806  ;RER B
5807              TX=SNCF Z 8100  RER B;                                                                      \
5808                C=1-2*Z8100_IDF;                                                                          \
5809                V=10;                                                                                     \
5810                F=EGPRU5;
5811  ;RER C
5812              TX=SNCF Z 5600  RER C;                                                                      \
5813                C=2@(Z5600_IDF3_4V|Z8800_IDF3_4V);                                                        \
5814                V=10;                                                                                     \
5815                F=EGPRU5;
5816              TX=SNCF Z 5600  RER C;                                                                      \
5817                C=Z5600_IDF3_6V;                                                                          \
5818                V=10;                                                                                     \
5819                F=EGPRU5;
5820              TX=SNCF Z 20500  RER C;                                                                     \
5821                C=[PA]2*(4:Z20500_1S_IDFC_4V|2:Z20500_2S_IDFC_4V|1:Z20500_1S_TRANS_4V);                   \
5822                V=10;
5823  ;RER D
5824              TX=SNCF Z 20500  RER D;                                                                     \
5825                M=STOP;                                                                                   \
5826                C=[PA](1-2*(1:Z20500_1S_IDFC_5VAB|3:Z20500_2S_IDFC_5VAB));                                \
5827                V=10; P=>95; T=OPEN,W,1,CLOSE;                                                            \
5828                F=EPROUT5;
5829              TX=SNCF Z 20500  RER D;                                                                     \
5830                C=[PA]2*(2:Z20500_1S_IDFC_5V|4:Z20500_2S_IDFC_5V|1:Z20500_2S_TRANS_5V);                   \
5831                V=12;                                                                                     \
5832                F=EPRU5;
5833  # RER E6
5834  ;;RER A
5835              TX=RATP MS 61  RER A;                                                                       \
5836                C=2-3*(1:RATP_MS61A_IDFCU|1:RATP_MS61C_IDFCU|2:RATP_MS61RG_IDF2);                         \
5837                V=10;                                                                                     \
5838                F=EPROUT6;
5839              TX=RATP MI84  RER A;                                                                        \
5840                C=2*RATP_MI84_IDF;                                                                        \
5841                V=10;                                                                                     \
5842                F=EPRU6;
5843              TX=RATP MI2N  RER A;                                                                        \
5844                C=2*RATP_MI2N;                                                                            \
5845                V=10;                                                                                     \
5846                F=EPRU6;
5847              TX=RATP MI09  RER A;                                                                        \
5848                C=2*RATP_MI09;                                                                            \
5849                V=10;                                                                                     \
5850                F=EPRU6;
5851  ;RER B
5852              TX=SNCF Z 8100  RER B;                                                                      \
5853                C=2*Z8100_STIF;                                                                           \
5854                V=12;                                                                                     \
5855                F=EGPRU6;
5856  ;RER C
5857              TX=SNCF Z 5600  RER C;                                                                      \
5858                C=2@(Z5600_IDFI_4V|Z8800_IDFI_4V);                                                        \
5859                V=10;                                                                                     \
5860                F=EGPRU6;
5861              TX=SNCF Z 5600  RER C;                                                                      \
5862                C=[PA]Z5600_TRANS_6V|Z5600_STIF_6V;                                                       \
5863                V=10;                                                                                     \
5864                F=EGPRU6;
5865              TX=SNCF Z 20500  RER C;                                                                     \
5866                C=[PA]                                                                                    \
5867                  2*(3:Z20500_1S_IDFI_4V|1:Z20500_1S_IDFI_4V|3:Z20500_1S_TRANS_4V|1:Z20500_2S_TRANS_4V);  \
5868                V=10;                                                                                     \
5869                F=EGPRU6;
5870              TX=SNCF Z 20900  RER C;                                                                     \
5871                C=[PA](2*(1:Z20900_1S_IDFTI|2:Z20900_2S_IDFTI|1:Z20900_2S_TRANSI));                       \
5872                V=10;                                                                                     \
5873                F=EGPRU6;
5874              TX=SNCF Z 8800  RER C;                                                                      \
5875                C=Z8800_STIF_4V,Z20500_1S_STIF_4V;                                                        \
5876                V=12;                                                                                     \
5877                F=EGPRU6;
5878              TX=SNCF Z 20900  RER C;                                                                     \
5879                C=[PA](Z20900_1S_STIF,Z20900_2S_IDFT);                                                    \
5880                V=10;                                                                                     \
5881                F=EGPRU6;
5882              TX=SNCF Z 20900  RER C;                                                                     \
5883                M=STOP;                                                                                   \
5884                C=[PA](Z20900_1S_IDFM,Z20500_2S_TRANS_4V|Z20900_2S_IDFT);                                 \
5885                V=10; P=<10; T=OPEN,W,1,CLOSE;                                                            \
5886                F=EGPROUT6;
5887  ;RER_D
5888              TX=SNCF Z 20500  RER_D;                                                                     \
5889                C=2*Z20500_1S_IDFI_5V[PU];                                                                \
5890                V=12;                                                                                     \
5891                F=EPRU6;
5892              TX=SNCF Z 20500  RER_D;                                                                     \
5893                C=Z20500_TRANS_H5V[PU];                                                                   \
5894                V=12;                                                                                     \
5895                F=EPRU6;
5896            $ENDGROUP
5897  # RER Station
5898  # E4B
5899            $GROUP                                                                                        \
5900                NAME=F_RER3;                                                                              \
5901                LC=3; ENV=$CBG(WM,(STBGFO|STBGEU),ENV_WAYM),                                              &\
5902                $CBG(WE,(STBGFO|STBGEU),ENV_WAYT9);
5903  ;RER A
5904              TX=RATP MS61A  RER A;                                                                       \
5905                M=STOP;                                                                                   \
5906                C=2-3*(RATP_MS61A_BG|RATP_MS61C_BG);                                                      \
5907                V=10; P=>95; T=OPEN,W,1,CLOSE;                                                            \
5908                F=EGPR4;
5909  ;RER B
5910              TX=SNCF Z 8100 RER B;                                                                       \
5911                M=STOP;                                                                                   \
5912                C=1-2*Z8100_IDF;                                                                          \
5913                V=12; P=>95; T=OPEN,W,1,CLOSE;                                                            \
5914                F=EGPRU4;
5915  ;RER C
5916              TX=SNCF Z 5300 + RER C;                                                                     \
5917                M=STOP;                                                                                   \
5918                C=1-2@(2:Z5300_2S_RERC_4V_R|1:Z5300_1S_4V_R);                                             \
5919                V=12; P=<10; T=OPEN,W,1,CLOSE;                                                            \
5920                F=EGPRU4;
5921              TX=SNCF Z 5600 + RER C;                                                                     \
5922                M=STOP;                                                                                   \
5923                C=2*(Z5600_IDF2_4V_L|Z8800_IDF2_4V_L);                                                    \
5924                V=12; P=>97; T=OPEN,W,1,CLOSE;                                                            \
5925                F=EGPRU4;
5926  # RER E5 A
5927  ;RER A
5928              TX=RATP MS 61  RER A;                                                                       \
5929                M=STOP;                                                                                   \
5930                C=3*(5:RATP_MS61A_IDF|5:RATP_MS61C_IDF|1:RATP_MS61A_BG|1:RATP_MS61C_BG);                  \
5931                V=10; P=>95; T=OPEN,W,1,CLOSE;                                                            \
5932                F=EPROUT5;
5933  ;RER B
5934              TX=SNCF Z 8100  RER B;                                                                      \
5935                M=STOP;                                                                                   \
5936                C=1-2*Z8100_IDF;                                                                          \
5937                V=12; P=>95; T=OPEN,W,1,CLOSE;                                                            \
5938                F=EGPRU5;
5939  ;RER C
5940              TX=SNCF Z 5300  RER C;                                                                      \
5941                M=STOP;                                                                                   \
5942                C=1-2@Z5300_2S_RERCE5_4V;                                                                 \
5943                V=12; P=<10; T=OPEN,W,1,CLOSE;                                                            \
5944                F=EGPROUT5;
5945              TX=SNCF Z 5600  RER C;                                                                      \
5946                M=STOP;                                                                                   \
5947                C=2*(Z5600_IDF2_4V_R|Z8800_IDF2_4V_R);                                                    \
5948                V=14; P=>97; T=OPEN,W,1,CLOSE;                                                            \
5949                F=EGPROUT5;
5950              TX=SNCF Z 20500  RER C;                                                                     \
5951                M=STOP;                                                                                   \
5952                C=1-2@Z20500_1S_IDF1_4V;                                                                  \
5953                V=12; P=>95; T=OPEN,W,1,CLOSE;                                                            \
5954                F=EPROUT5;
5955              TX=SNCF Z 20500  RER C;                                                                     \
5956                M=STOP;                                                                                   \
5957                C=[PA]Z20500_40A_IDFP;                                                                    \
5958                V=12; P=<20; T=OPEN,W,1,CLOSE;                                                            \
5959                F=EPROUT5;
5960            $ENDGROUP
5961  # RER E5 B
5962            $GROUP                                                                                        \
5963                NAME=F_RER4;                                                                              \
5964                LC=3; ENV=$CBG(WM,(STBGFO|STBGEU),ENV_WAYM),                                              &\
5965                $CBG(WE,(STBGFO|STBGEU),ENV_WAYT9);
5966  ;RER A
5967              TX=RATP MS 61  RER A;                                                                       \
5968                M=STOP;                                                                                   \
5969                C=3*(RATP_MS61A_IDFCU|RATP_MS61C_IDFCU);                                                  \
5970                V=10; P=>95; T=OPEN,W,1,CLOSE;                                                            \
5971                F=EPROUT5;
5972  ;RER B
5973              TX=SNCF Z 8100  RER B;                                                                      \
5974                M=STOP;                                                                                   \
5975                C=2*Z8100_IDF;                                                                            \
5976                V=10; P=>95; T=OPEN,W,1,CLOSE;                                                            \
5977                F=EGPROUT5;
5978  ;RER C
5979              TX=SNCF Z 5600  RER C;                                                                      \
5980                M=STOP;                                                                                   \
5981                C=1-2*(Z5600_IDF3_4V|Z8800_IDF3_4V);                                                      \
5982                V=10; P=>95; T=OPEN,W,1,CLOSE;                                                            \
5983                F=EGPROUT5;
5984              TX=SNCF Z 20500  RER C;                                                                     \
5985                M=STOP;                                                                                   \
5986                C=[PA](1-2*(2:Z20500_1S_IDFC_4VAB|1:Z20500_2S_IDFC_4VAB));                                \
5987                V=10; P=>85; T=OPEN,W,1,CLOSE;                                                            \
5988                F=EGPROUT5;
5989              TX=SNCF Z 20500  RER C;                                                                     \
5990                M=STOP;                                                                                   \
5991                C=[PA]                                                                                    \
5992                  (2:Z20500_1S_IDFC_4V|1:Z20500_2S_IDFC_4V|1:Z20500_40A_IDFC,                             \
5993                  0-1*(2:Z20500_1S_IDFC_4V|1:Z20500_2S_IDFC_4V));                                         \
5994                V=10; P=<10; T=OPEN,W,1,CLOSE;                                                            \
5995                F=EGPROUT5;
5996              TX=SNCF Z 20900  RER C;                                                                     \
5997                M=STOP;                                                                                   \
5998                C=[PA](2*(2:Z20900_1S_IDFT|4:Z20900_2S_IDFT|1:Z20900_2S_TRANS));                          \
5999                V=10; P=>90; T=OPEN,W,1,CLOSE;                                                            \
6000                F=EGPROUT5;
6001  ;RER D
6002              TX=SNCF Z 20500  RER D;                                                                     \
6003                M=STOP;                                                                                   \
6004                C=[PA](1-2*(1:Z20500_1S_IDFC_5VAB|3:Z20500_2S_IDFC_5VAB));                                \
6005                V=10; P=>95; T=OPEN,W,1,CLOSE;                                                            \
6006                F=EPROUT5;
6007              TX=SNCF Z 20500  RER D;                                                                     \
6008                M=STOP;                                                                                   \
6009                C=[PA](1-2*(1:Z20500_1S_IDFC_5V|3:Z20500_2S_IDFC_5V));                                    \
6010                V=10; P=<5; T=OPEN,W,1,CLOSE;                                                             \
6011                F=EPROUT5;
6012              TX=SNCF Z 20500  RER D;                                                                     \
6013                M=STOP;                                                                                   \
6014                C=1-2*Z20500_IDFI_5V;                                                                     \
6015                V=10; P=>95; T=OPEN,W,1,CLOSE;                                                            \
6016                F=EPROUT5;
6017  # RER E6
6018  ;;RER A
6019              TX=RATP MS 61  RER A;                                                                       \
6020                M=STOP;                                                                                   \
6021                C=3*RATP_MS61RG_IDF2;                                                                     \
6022                V=10; P=>95; T=OPEN,W,1,CLOSE;                                                            \
6023                F=EPROUT6;
6024  ;RER B
6025              TX=SNCF Z 8100  + RER B RER B;                                                              \
6026                M=STOP;                                                                                   \
6027                C=2*(Z8100_STIF|Z8100_IDF);                                                               \
6028                V=12; P=>95; T=OPEN,W,1,CLOSE;                                                            \
6029                F=EGPROUT6;
6030              TX=RATP MI84  RER B;                                                                        \
6031                M=STOP;                                                                                   \
6032                C=RATP_MI84_IDF,Z8100_STIF;                                                               \
6033                V=12; P=<10; T=OPEN,W,1,CLOSE;                                                            \
6034                F=EGPROUT6;
6035  ;RER C
6036              TX=SNCF Z 5600  RER C;                                                                      \
6037                M=STOP;                                                                                   \
6038                C=1-2*(Z5600_IDFI_4V|Z8800_IDFI_4V|Z5600_TRANS_4V|Z8800_TRANS_4V);                        \
6039                V=10; P=>95; T=OPEN,W,1,CLOSE;                                                            \
6040                F=EGPROUT6;
6041              TX=SNCF Z 5600  RER C;                                                                      \
6042                M=STOP;                                                                                   \
6043                C=[PA]Z5600_STIF_4V,Z20900_1S_IDFTI|Z20900_2S_IDFTI;                                      \
6044                V=10; P=>95; T=OPEN,W,1,CLOSE;                                                            \
6045                F=EGPROUT6;
6046              TX=SNCF Z 20900  RER C;                                                                     \
6047                M=STOP;                                                                                   \
6048                C=[PA](Z20900_1S_IDFM,Z20500_2S_TRANS_4V|Z20900_2S_IDFT);                                 \
6049                V=10; P=<10; T=OPEN,W,1,CLOSE;                                                            \
6050                F=EGPROUT6;
6051              TX=SNCF Z 20500  RER C;                                                                     \
6052                M=STOP;                                                                                   \
6053                C=Z20500_1S_STIF_4V[PU];                                                                  \
6054                V=12; P=>95; T=OPEN,W,1,CLOSE;                                                            \
6055                F=EGPROUT6;
6056              TX=SNCF Z 20500  RER C;                                                                     \
6057                C=2*(Z20500_1S_IDFI_4V[PU]|Z20500_1S_TRANS_4V[PU]);                                       \
6058                V=12; P=>95; T=OPEN,W,1,CLOSE;                                                            \
6059                F=EGPROUT6;
6060  ;RER_D
6061              TX=SNCF Z 20500  RER_D;                                                                     \
6062                M=STOP;                                                                                   \
6063                C=1-2*Z20500_1S_IDFI_5V[PU];                                                              \
6064                V=12; P=>95; T=OPEN,W,1,CLOSE;                                                            \
6065                F=EPROUT6;
6066              TX=SNCF Z 20500  RER_D;                                                                     \
6067                M=STOP;                                                                                   \
6068                C=3:(2*Z20500_1S_Trans_5V[PU])|1:(Z20500_1S_Trans_5V[PU],Z20500_1S_IDFI_5V[PU])|          \
6069                  1:(Z20500_1S_IDFI_5V[PU],Z20500_1S_Trans_5V[PU]);                                       \
6070                V=12; P=>95; T=OPEN,W,1,CLOSE;                                                            \
6071                F=EPROUT6;
6072            $ENDGROUP
6073
6074  ;TRAM-TRAIN
6075  ;----------
6076            $GROUP                                                                                        \
6077                NAME=F_75_TT1;                                                                            \
6078                LC=3; %GBG((STBGFO|STBGEU),ENV_WAYT9);
6079  ; T4
6080              TX=SNCF U25500  Paris T4;                                                                   \
6081                C=SNCF_U25500_IDFT;                                                                       \
6082                V=8;                                                                                      \
6083                F=EPRU6;
6084  ;T11
6085              TX=SNCF U53600  Paris T11;                                                                  \
6086                M=STOP;                                                                                   \
6087                C=1-2*(1:SNCF_IF_U53600_CARMSTIF|7:SNCF_IF_U53600_CARM);                                  \
6088                V=8; P=>95; T=OPEN,W,1,CLOSE;                                                             \
6089                F=EPRU6;
6090              TX=SNCF U53600  Paris T11;                                                                  \
6091                C=1-2*(1:SNCF_IF_U53600_CARMSTIFL|7:SNCF_IF_U53600_CARML);                                \
6092                V=8;                                                                                      \
6093                F=EPRU6;
6094            $ENDGROUP
6095  # Metro 1,4,6,11,14 Gummiräder
6096            $GROUP                                                                                        \
6097                NAME=F_75_M1;                                                                             \
6098                LC=2; %GBG(STBGUB,ENV_WAYMG);
6099  #LIGNE 1;
6100              TX=RATP MP 59 - LIGNE 1;                                                                    \
6101                M=STOP;                                                                                   \
6102                C=<RATP_MP59M1L,RATP_MP55N1L,(RATP_MP59AB1L,RATP_MP59A1)|(RATP_MP59A1,RATP_MP59AB1),      \
6103                  RATP_MP55N1,RATP_MP59M1;                                                                \
6104                P=>85; T=OPEN,W,2,CLOSE;                                                                  \
6105                F=MOUT; %LBG(STBGUB,ENV_WAYMGP);
6106              TX=RATP MP 59 - LIGNE 1;                                                                    \
6107                C=<RATP_MP59M2L,RATP_MP55N2L,(RATP_MP59AB2L,RATP_MP59A2)|(RATP_MP59A2,RATP_MP59AB2),      \
6108                  RATP_MP55N2,RATP_MP59M2;                                                                \
6109                V=6;                                                                                      \
6110                F=MU;
6111              TX=RATP MP 59 - LIGNE 1;                                                                    \
6112                M=STOP;                                                                                   \
6113                C=<RATP_MP59M3L,RATP_MP59N3L,RATP_MP59B3L,RATP_MP59B3,RATP_MP59N3,RATP_MP59M3;            \
6114                P=>85; T=OPEN,W,2,CLOSE;                                                                  \
6115                F=MOUT;  %LBG(STBGUB,ENV_WAYMGP);
6116              TX=RATP MP 59 - LIGNE 1;                                                                    \
6117                C=<RATP_MP59M4L,RATP_MP59N4L,RATP_MP59B4L,RATP_MP59B4,RATP_MP59N4,RATP_MP59M4;            \
6118                V=6;                                                                                      \
6119                F=MU;
6120              TX=Paris Metro MP 89;                                                                       \
6121                C=<RATP_MP89CC_RXL,4*RATP_MP89_M,RATP_MP89CC_RX;                                          \
6122                V=7;                                                                                      \
6123                F=MU;
6124
6125  ;LIGNE 4
6126              TX=RATP MP 59 - LIGNE 4;                                                                    \
6127                C=<RATP_MP59M1L,RATP_MP55N1L,(RATP_MP59AB1L,RATP_MP59A1)|(RATP_MP59A1,RATP_MP59AB1),      \
6128                  RATP_MP55N1,RATP_MP59M1;                                                                \
6129                V=6;                                                                                      \
6130                F=MU;
6131              TX=RATP MP 59 - LIGNE 4;                                                                    \
6132                M=STOP;                                                                                   \
6133                C=<RATP_MP59M2L,RATP_MP55N2L,(RATP_MP59AB2L,RATP_MP59A2)|(RATP_MP59A2,RATP_MP59AB2),      \
6134                  RATP_MP55N2,RATP_MP59M2;                                                                \
6135                P=>85; T=OPEN,W,2,CLOSE;  %LBG(STBGUB,ENV_WAYMGP);                                                                \
6136                F=MOUT;
6137              TX=RATP MP 59 - LIGNE 4;                                                                    \
6138                M=STOP;                                                                                   \
6139                C=<RATP_MP59M4L,RATP_MP59N4L,RATP_MP59B4L,RATP_MP59B4,RATP_MP59N4,RATP_MP59M4;            \
6140                P=>85; T=OPEN,W,2,CLOSE;                                                          \
6141                F=MOUT;                   %LBG(STBGUB,ENV_WAYMGP);
6142  ;Ligne 6
6143              TX=RATP Ligne 6 - MP 59;                                                                    \
6144                C=<RATP_MP73BML,                                                                          \
6145                  (RATP_MP73BNL,RATP_MP73BA,RATP_MP73BB)|(RATP_MP73BB,RATP_MP73BA,RATP_MP73BN),           \
6146                  RATP_MP73BM;
6147              TX=RATP Ligne 6 - MP 59;                                                                    \
6148                M=STOP;                                                                                   \
6149                C=<RATP_MP73G2ML,(RATP_MP73GNL,2*RATP_MP73GB)|(2*RATP_MP73GB,RATP_MP73GN),RATP_MP73G2M;   \
6150                V=6; P=>85; T=OPEN,W,1,CLOSE;F=MOUT;  %LBG(STBGUB,ENV_WAYMGP);
6151  ;LIGNE 11
6152              TX=RATP MP 55 - LIGNE 11;                                                                   \
6153                M=STOP;                                                                                   \
6154                C=<RATP_MP55M1L,(RATP_MP55AB1L,RATP_MP55N1)|(RATP_MP55N1L,RATP_MP55AB1),RATP_MP55M1;      \
6155                P=<5; T=OPEN,W,2,CLOSE;                                                                   \
6156                F=MOUT;      %LBG(STBGUB,ENV_WAYMGP);
6157              TX=RATP MP 55 - LIGNE 11;                                                                   \
6158                M=STOP;                                                                                   \
6159                C=<4:(RATP_MP55M2L,(RATP_MP55AB2L,RATP_MP55N2)|(RATP_MP55N2L,RATP_MP55AB2),RATP_MP55M2)|  \
6160                  1:((RATP_MP55M1L,RATP_MP55AB1L,RATP_MP55N2,RATP_MP55M2)|                                \
6161                  (RATP_MP55M2L,RATP_MP55N2L,RATP_MP55AB1,RATP_MP55M1));                                  \
6162                P=>80; T=OPEN,W,2,CLOSE;                                                                  \
6163                F=MOU;
6164              TX=RATP MP 59 - LIGNE 11;                                                                   \
6165                M=STOP;                                                                                   \
6166                C=<RATP_MP59M4L,(RATP_MP59N4L,RATP_MP59B4)|(RATP_MP59B4L,RATP_MP59N4),RATP_MP59M4;        \
6167                P=>85; T=OPEN,W,2,CLOSE;                                                                  \
6168                F=MOUT;      %LBG(STBGUB,ENV_WAYMGP);
6169  ;LIGNE 14
6170              TX=Paris Metro MP 89 - LIGNE 14;                                                            \
6171                C=<RATP_MP89CA_RXL,4*RATP_MP89_M,RATP_MP89CA_RX;                                          \
6172                F=MU;
6173            $ENDGROUP
6174  # Metro 2, 3, 3bis, 7, 7 bis - Stahlräder
6175
6176            $GROUP                                                                                        \
6177                NAME=F_75_M2;                                                                             \
6178                LC=2; %GBG(STBGUB,ENV_WAYM);
6179  ;LIGNE 2
6180              TX=RATP MF 67 - LIGNE 2;                                                                    \
6181                C=<RATP_MF67BML,RATP_MF67BN,RATP_MF67JA,RATP_MF67BB,RATP_MF67BM;                          \
6182                V=6;                                                                                      \
6183                F=MU;
6184              TX=RATP MF 67 - LIGNE 2;                                                                    \
6185                M=STOP;                                                                                   \
6186                C=<RATP_MF67BBML,RATP_MF67BBN,RATP_MF67BBA,RATP_MF67BBB,RATP_MF67BBM;                     \
6187                P=>85; T=OPEN,W,1,CLOSE;                                                                  \
6188                F=MOUT; %LBG(STBGUB,ENV_WAYMP);
6189              TX=RATP MF 67 - LIGNE 2;                                                                    \
6190                C=<RATP_MF67GWML,RATP_MF67GWN,RATP_MF67GWB,RATP_MF67GWB,RATP_MF67GWM;                     \
6191                V=6;                                                                                      \
6192                F=MU;
6193              TX=RATP MF 67 - LIGNE 3;                                                                    \
6194                M=STOP;                                                                                   \
6195                C=<RATP_MF67GWML,RATP_MF67GWB,RATP_MF67GWN,RATP_MF67GWB,RATP_MF67GWM;                     \
6196                P=>85; T=OPEN,W,1,CLOSE;                                                                  \
6197                F=MOUT; %LBG(STBGUB,ENV_WAYMP);
6198  ;LIGNE 3
6199              TX=RATP MF 67 - LIGNE 3;                                                                    \
6200                C=<RATP_MF67BML,RATP_MF67BN,RATP_MF67JN,RATP_MF67BN,RATP_MF67BM;                          \
6201                V=6;                                                                                      \
6202                F=MU;
6203              TX=RATP MF 67 - LIGNE 3;                                                                    \
6204                M=STOP;                                                                                   \
6205                C=<RATP_MF67BBML,RATP_MF67BBB,RATP_MF67BBNA,RATP_MF67BBB,RATP_MF67BBM;                    \
6206                P=<15; T=OPEN,W,1,CLOSE;                                                                  \
6207                F=MOUT; %LBG(STBGUB,ENV_WAYMP);
6208              TX=RATP MF 67 - LIGNE 3;                                                                    \
6209                M=STOP;                                                                                   \
6210                C=<RATP_MF67GW2ML,RATP_MF67GWB,RATP_MF67GWN,RATP_MF67GWB,RATP_MF67GW2M;                   \
6211                V=6; P=>85; T=OPEN,W,1,CLOSE;                                                             \
6212                F=MOUT; %LBG(STBGUB,ENV_WAYMP);
6213
6214  ;LIGNE 3 BIS
6215              TX=RATP MF 67 - LIGNE 3 BIS;                                                                \
6216                M=STOP;                                                                                   \
6217                C=<RATP_MF67BML,RATP_MF67BB1|RATP_MF67BB1L,RATP_MF67BM;                                   \
6218                P=<25; T=OPEN,W,1,CLOSE;                                                                  \
6219                F=MOUT;  %LBG(STBGUB,ENV_WAYMP);
6220              TX=RATP MF 67 - LIGNE 3 BIS;                                                                \
6221                C=<RATP_MF67GWML,RATP_MF67GWB,RATP_MF67GWM;                                               \
6222                V=6;                                                                                      \
6223                F=MU;
6224  ;Ligne 7
6225              TX=RATP MF 67 (ligne 7);                                                                            \
6226                C=<RATP_MF67BML,RATP_MF67BN,RATP_MF67JN,RATP_MF67BN,RATP_MF67BM;
6227            TX=RATP MF 77 (ligne 7);                                                                      \
6228              C=<RATP_MF77_IDFMFL,3*RATP_MF77_IDFMM,RATP_MF77_IDFMF;                                      \
6229              V=8;                                                                                        \
6230              F=MPR5;
6231  ;LIGNE 7 BIS
6232              TX=RATP MF 67 - LIGNE 7 BIS;                                                                \
6233                C=<RATP_MF67BBML,RATP_MF67BBN,RATP_MF67BBA,RATP_MF67BBM;
6234              TX=RATP MF 67 - LIGNE 7 BIS;                                                                \
6235                M=STOP;                                                                                   \
6236                C=<RATP_MF67BML,RATP_MF67JA,RATP_MF67BN,RATP_MF67BM;                                      \
6237                P=>85; T=OPEN,W,1,CLOSE;                                                                  \
6238                F=MOUT; %LBG(STBGUB,ENV_WAYMP);
6239              TX=RATP Ligne 7 bis - MF 77;                                                                \
6240                C=<RATP_MF77_IDFMFL,3*RATP_MF77_IDFMM,RATP_MF77_IDFMF;                                    \
6241                V=8;                                                                                      \
6242                F=MPR5;
6243              TX=RATP MF 88 (ligne 7 bis);                                                                \
6244                C=<RATP_MF88GWML,RATP_MF88GWR,RATP_MF88GWM;                                               \
6245                V=8;                                                                                      \
6246                F=MPR5;
6247
6248            $ENDGROUP
6249
6250  # Metro 8, 9,10, 12, 13 -Stahlräder
6251            $GROUP                                                                                        \
6252                NAME=F_75_M3;                                                                             \
6253                LC=2; %GBG(STBGUB,ENV_WAYM);
6254  ;LIGNE 8
6255              TX=Paris Metro MF 77 - LIGNE 8;                                                             \
6256                C=<RATP_MF77F1L,RATP_MF77M1,RATP_MF77M1|RATP_MF77MA1,RATP_MF77M1,RATP_MF77F1;             \
6257                V=6;                                                                                      \
6258                F=MU;
6259              TX=Paris Metro MF 77 - LIGNE 8;                                                             \
6260                C=<RATP_MF77F2L,3*RATP_MF77M2,RATP_MF77F2;                                                \
6261                V=6;                                                                                      \
6262                F=MU;
6263  ;LIGNE 9
6264              TX=RATP MF 67;                                                                              \
6265                C=<RATP_MF67PIML,RATP_MF67PIN,RATP_MF67PINA,RATP_MF67PIN,RATP_MF67PIM;
6266              TX=RATP MF 67 - LIGNE 9;                                                                    \
6267                M=STOP;                                                                                   \
6268                C=<RATP_MF67BSL,RATP_MF67BN,RATP_MF67JN,RATP_MF67BN,RATP_MF67BS;                          \
6269                P=>85; T=OPEN,W,1,CLOSE;                                                                  \
6270                F=MOUT;  %LBG(STBGUB,ENV_WAYMP);
6271              TX=RATP MF 67 - LIGNE 9;                                                                    \
6272                C=<RATP_MF67BBSL,RATP_MF67BBN,RATP_MF67BBNA,RATP_MF67BBN,RATP_MF67BBS;
6273              TX=RATP MF 67 - LIGNE 9;                                                                    \
6274                C=<RATP_MF67GWSL,3*RATP_MF67GWN,RATP_MF67GWS;
6275  ;LIGNE 10
6276              TX=RATP MA - LIGNE 10;                                                                      \
6277                M=STOP;                                                                                   \
6278                C=<(RATP_MA_B_BB,RATP_MA_AB_BBL)|(RATP_MA_AB_BB,RATP_MA_B_BB);                            \
6279                P=>85; T=OPEN,W,1,CLOSE;                                                                  \
6280                F=MOUT;  %LBG(STBGUB,ENV_WAYMP);
6281  ;LIGNE 13
6282              TX=RATP MA - LIGNE 13;                                                                      \
6283                M=STOP;                                                                                   \
6284                C=5:(1-2@(RATP_MA_BV2|RATP_MA_BV2L))|1:(1-2*RATP_MA_BV1);                                 \
6285                P=>85; T=OPEN,W,1,CLOSE;                                                                  \
6286                F=MOUT; %LBG(STBGUB,ENV_WAYMP);
6287            $ENDGROUP
6288          }
6289  # Translohr
6290          {BUS?
6291            $GROUP                                                                                        \
6292                NAME=F_75_TL1;                                                                            \
6293                LC=3; %GBG(STBGEU|STBGMD,ENV_WAYTT);
6294              TX=RATP T5 STE3;                                                                            \
6295                C=RATP_STE3;
6296              TX=RATP T6 STE6;                                                                            \
6297                C=RATP_STE6;
6298            $ENDGROUP
6299          }
6300  # Tram
6301          {TRAM?
6302  #   T1
6303            $GROUP                                                                                        \
6304                NAME=F_75_T1;                                                                             \
6305                LC=2; %GBG((STBGEU|STBGMD),ENV_WAYTF);
6306              TX=RATP T1 TFS2;                                                                            \
6307                C=RATP_TFS2E;
6308              TX=RATP T1 TFS2;                                                                            \
6309                C=RATP_TFS2G;
6310            $ENDGROUP
6311  #   T2
6312            $GROUP                                                                                        \
6313                NAME=F_75_T2;                                                                             \
6314                LC=2; %GBG((STBGEU|STBGMD,ENV_WAYTP2));
6315              TX=RATP T2 TFS2;                                                                            \
6316                C=RATP_TFS2G;
6317              TX=RATP T2 Citadis 302;                                                                     \
6318                C=RATP_CITADIS_L2;
6319              TX=RATP T2 Citadis 302;                                                                     \
6320                C=2*RATP_CITADIS_L2B;
6321              TX=RATP T2 Citadis 302 STIF;                                                                \
6322                C=2*RATP_CITADIS302B_T2STIF;
6323              TX=RATP T2 Citadis 302;                                                                     \
6324                C=PAR_CITADIS~WSI|PAR_CITADIS~FLE;
6325            $ENDGROUP
6326  #   T3
6327            $GROUP                                                                                        \
6328                NAME=F_75_T3;                                                                             \
6329                LC=2; %GBG((STBGEU|STBGMD,ENV_WAYTP3));
6330              TX=RATP T3 Citadis402 T3;                                                                   \
6331                C=RATP_CITADIS_L3;
6332              TX=RATP T3 Citadis402 T3 STIF;                                                              \
6333                C=RATP_CITADIS402_T3STIF;
6334            $ENDGROUP
6335  #   T8
6336            $GROUP                                                                                        \
6337                NAME=F_75_T4;                                                                             \
6338                LC=2; %GBG((STBGEU|STBGMD,ENV_WAYTP8));
6339              TX=RATP T7/T8 Citadis 302 T7;                                                               \
6340                C=RATP_CITADIS302_T7;
6341            $ENDGROUP
6342          }
6343          {BUS?
6344            $GROUP                                                                                        \
6345                NAME=F_75_B1;
6346              %FAK(Q_RATP)
6347            $ENDGROUP
6348          }
6349        $ENDSECTION
6350      }
6351
6352      {NL?
6353  #--------------------------------------------------------------------------
6354  #
6355  # Rotterdam
6356  #
6357        $SECTION                                                                                          \
6358            NAME=NL_ROTTERDAM;                                                                            \
6359            SEQ=D; AB=30; %SECFIN;%TITLE(Rotterdam);
6360          {CRAIL?
6361            $GROUP                                                                                        \
6362                NAME=NL_ROT_C1;                                                                           \
6363                LC=3; %GBG((STBGFO|STBGUB),[WM=ENV_WAYM][WE=ENV_WAYT3]);
6364              TX=Metro 5051;                                                                              \
6365                C=1-3@ROT_5051~WSI|ROT_5051~FV;
6366              TX=Metro 5201;                                                                              \
6367                C=1-3@ROT_5201~WSI|ROT_5201~FV;
6368              TX=Metro 5064;                                                                              \
6369                C=ROT_5064;
6370              TX=Metro 5064;                                                                              \
6371                C=1-3@ROT_MO;
6372              TX=Stadtbahn G2;                                                                            \
6373                C=2-3@ROT_MG2;
6374              TX=Stadtbahn G2;                                                                            \
6375                C=2-3@ROT_SG2;
6376            $ENDGROUP
6377          }
6378          {TRAM?
6379            $GROUP                                                                                        \
6380                NAME=NL_ROT_T1;                                                                           \
6381                LC=3; %GBG(STBGNL,ENV_WAYT1);
6382              TX=Tram 523 + 1375 + 418;                                                                   \
6383                C=<ROT_523L,ROT_1375,ROT_418;                                                             \
6384                AB=25;
6385              C=ROT_1(|L);                                                                                \
6386                AB=25;
6387              TX=Tram 231,600;                                                                            \
6388                C=ROT_(231|TO|600A|600)(|L);                                                              \
6389                AB=25;
6390              TX=Tram 700;                                                                                \
6391                C=ROT_(T|700|701)(|L);                                                                    \
6392                AB=25;
6393              TX=Tram 700;                                                                                \
6394                C=ROT_700W(|L);                                                                           \
6395                AB=25;
6396              TX=Tw 12;                                                                                   \
6397                C=ROT_12;                                                                                 \
6398                D=R;
6399              TX=Tw 155;                                                                                  \
6400                C=ROT_155B;
6401              TX=174;                                                                                     \
6402                C=HAAG_174;
6403            $ENDGROUP
6404            $GROUP                                                                                        \
6405                NAME=NL_ROT_T2;                                                                           \
6406                LC=3; %GBG(STBGNL,ENV_WAYT1);
6407              TX=1600;                                                                                    \
6408                C=ROT_ALLAN,ROT_ALLANT;                                                                   \
6409                D=R;
6410              TX=600;                                                                                     \
6411                C=ROT_617;                                                                                \
6412                D=R;
6413              TX=600;                                                                                     \
6414                C=ROT_617L;                                                                               \
6415                D=L;
6416              TX=500 + Abw;                                                                               \
6417                C=ROT_523L,ROT_ZOUT;
6418              TX=500 + 4x Bw;                                                                             \
6419                C=ROT_523L,ROT_4AS1T;
6420              TX=400;                                                                                     \
6421                C=ROT_4AS;
6422              TX=418 + 2x Bw 1375;                                                                        \
6423                C=ROT_418,ROT_1375;
6424              TX=235;                                                                                     \
6425                C=ROT_235;                                                                                \
6426                D=R;
6427              TX=300;                                                                                     \
6428                C=ROT_376_1;                                                                              \
6429                D=R;
6430              TX=300;                                                                                     \
6431                C=ROT_373;                                                                                \
6432                D=L;
6433            $ENDGROUP
6434            $GROUP                                                                                        \
6435                NAME=NL_ROT_T3;                                                                           \
6436                LC=3; %GBG(STBGNL,ENV_WAYT1);
6437              TX=ATw 2403;                                                                                \
6438                C=ROT_2403;
6439              TX=ATw 2301;                                                                                \
6440                C=ROT_2301;
6441              TX=ATw 2202;                                                                                \
6442                C=ROT_2202;
6443              TX=Tw 207;                                                                                  \
6444                C=ROT_207;
6445              TX=Tw 207;                                                                                  \
6446                C=ROT_210;                                                                                \
6447                D=L;
6448              TX=Tw 177 + Bw 404;                                                                         \
6449                C=ROT_177A,ROT_404;                                                                       \
6450                D=L;
6451              TX=Tw 2050;                                                                                 \
6452                C=ROT_2050;                                                                               \
6453                D=R;
6454              TX=Tw 2101;                                                                                 \
6455                C=ROT_2101A;                                                                              \
6456                D=R;
6457            $ENDGROUP
6458            $GROUP                                                                                        \
6459                NAME=NL_ROT_T4;                                                                           \
6460                LC=3; %GBG(STBGNL,ENV_WAYT2);
6461              TX=1600;                                                                                    \
6462                C=ROT_1633;                                                                               \
6463                D=R;
6464              TX=1600;                                                                                    \
6465                C=ROT_1600A(|L);
6466              TX=600;                                                                                     \
6467                C=ROT_600A;
6468              TX=1600;                                                                                    \
6469                C=ROT_1600(G|W)(|L);
6470              TX=Citadis;                                                                                 \
6471                C=ROT_CITADIS(|L);
6472              TX=Tram 1600;                                                                               \
6473                C=ROT_1600(G|W)(|L);
6474              TX=Tram 2301;                                                                               \
6475                C=ROT_2301;
6476              TX=Tram 2403;                                                                               \
6477                C=ROT_2403;
6478              TX=Tram 2202;                                                                               \
6479                C=ROT_2202,|ROT_ZOUT;
6480              TX=Citadis 302C;                                                                            \
6481                C=$DIR(ROT_CIT302CL,ROT_CIT302C);
6482            $ENDGROUP
6483          }
6484          {BUS?
6485            $GROUP                                                                                        \
6486                NAME=NL_ROT_B1;                                                                           \
6487                LC=1; %GBG(STBGNL,[WT=ENV_WAYO][WA=ENV_WAYA]);
6488              C=ROT_OBUS(|L);
6489              C=ROT_NBUS(|L);
6490            $ENDGROUP
6491          }
6492        $ENDSECTION
6493      }
6494  #--------------------------------------------------------------------------
6495      {DK?
6496  #
6497  # Kopenhagen
6498  #
6499        {CRAIL|TRAM?
6500          $SECTION                                                                                        \
6501              NAME=DK_COPENHAGEN;                                                                         \
6502              SEQ=D; BL=16; %SECFIN;%TITLE([N=Copenhagen; D=Kopenhagen; H=Koppenhága;]);
6503            {CRAIL?
6504              $GROUP                                                                                      \
6505                  NAME=DK_COP_S1;                                                                         \
6506                  TX=S-Bahn (DSB); %GBG(STBGFO,ENV_WAYT7);
6507                C=<DSB_MM0L,DSB_FM0,DSB_MM0;
6508                C=<2@(DSB_MM1(|A)L,DSB_FS1);
6509                C=<1-2*(DSB_FC3L,DSB_MC3L,DSB_MC3,DSB_FC3);
6510                C=<DSB_MM2DL,DSB_AS2D|DSB_FS2D;
6511                C=<DSB_MM2AL,DSB_FS2F,DSB_MM2AL,DSB_FSA2A;
6512                C=<2-4*(DSB_MM2L,DSB_FS2);
6513                C=<DSB_MM2L,DSB_FU2,DSB_MU2,DSB_FS2|DSB_FSM2A|DSB_FS2F;
6514                C=<DSB_MM2L,DSB_FU2,DSB_MU2,DSB_FS2,0-2*(DSB_MM2L,DSB_FS2);
6515                C=1-2@DSB_STOGA|DSB_STOG_B|DSB_STOG_E|DSB_STOG~BAH|DSB_STOG~LED|DSB_STOG~HS;
6516                C=1-2*(<DSB__STOG2AL,DSB__STOG2B,DSB__STOG2C,DSB__STOG2D);
6517              $ENDGROUP
6518            }
6519            {TRAM?
6520              $GROUP                                                                                      \
6521                  NAME=DK_COP_P1; %GBG(STBGEU,ENV_WAYA);
6522                TX=Pferdebahn;                                                                            \
6523                  C=(HORSED_PB,KS_1)|(HORSE_PB,KS_NES1)|(HORSE_TWIN_PB,KS_20)|(HORSE_PB_MM,KS_389L)|      \
6524                    (HORSE_PB,KS_389);                                                                    \
6525                  V=3;
6526              $ENDGROUP                                                                                           
6527              $GROUP                      \               
6528                  NAME=DK_COP_T1; %GBG(STBGEU,[WT=ENV_WAYT1][WA=ENV_WAYA]);
6529                TX=1;                                                                                     \
6530                  C=KS_1E2|KS_1E;
6531                TX=20;                                                                                    \
6532                  C=KS_20E|KS_20EC;
6533                TX=Kopenhagen;                                                                            \
6534                  C=KS_50(|L);
6535                TX=575 + 389;                                                                             \
6536                  C=KS_575,KS_389L|KS_389;
6537                TX=377 + 90;                                                                              \
6538                  C=KS_377L|KS_377,KS_90|KS_90C;
6539                TX=901 + 951;                                                                             \
6540                  C=(KS_901L,KS_951GL)|(KS_901,KS_951G);
6541                TX=275 + 1280;                                                                            \
6542                  C=KS_275S,KS_1268O;
6543                TX=327 + 951;                                                                             \
6544                  C=(KS_327GL,KS_951GL)|(KS_327G,KS_951G);
6545                TX=275 + 1268;                                                                            \
6546                  C=(KS_275GL,KS_1268GL)|(KS_275G,KS_1268G);
6547                TX=575 + 1321;                                                                            \
6548                  C=KS_575S,KS_1321O;
6549                TX=20+1268;                                                                               \
6550                  C=(KS_20GL,KS_1268GL)|(KS_20G,KS_1268G);
6551                TX=305+1321;                                                                              \
6552                  C=(KS_305GL,KS_1321GL)|(KS_305G,KS_1321G);
6553                TX=327+1268;                                                                              \
6554                  C=(KS_327OL,KS_1268GL)|(KS_327O,KS_1268G);
6555                TX=305+1321;                                                                              \
6556                  C=(KS_305GL,KS_1321GL)|(KS_305G,KS_1321G);
6557                TX=20 + 1268;                                                                             \
6558                  C=(KS_20NL,KS_1268L)|(KS_20N,KS_1268);
6559                TX=305;                                                                                   \
6560                  C=KS_305SL|KS_305S;
6561                TX=575+1268;                                                                              \
6562                  C=KS_575S,KS_1268O;
6563                TX=901+1321;                                                                              \
6564                  C=KS_901S,KS_1321O;
6565              $ENDGROUP
6566              $GROUP                                                                                      \
6567                  NAME=DK_COP_T2; %GBG(STBGEU,ENV_WAYT1);
6568                TX=327 + 1268;                                                                            \
6569                  C=(KS_327L,KS_1268L)|(KS_327,KS_1268);
6570                TX=305 + 1321;                                                                            \
6571                  C=(KS_305L,KS_1321L)|(KS_305,KS_1321);
6572                TX=275 + 1460;                                                                            \
6573                  C=(KS_275L,KS_1460L)|(KS_275,KS_1460);
6574                TX=437 + 1460;                                                                            \
6575                  C=(KS_437L,KS_1460GL)|(KS_437,KS_1460G);
6576                TX=701 + 1502;                                                                            \
6577                  C=(KS_701L,KS_1502ME)|(KS_701,KS_1502M);
6578                TX=470 + 1065;                                                                            \
6579                  C=(KS_470L,KS_1065L)|(KS_470,KS_1065);
6580                TX=502 + 1502;                                                                            \
6581                  C=(KS_502L,KS_1502ML)|(KS_502,KS_1502|KS_1502M)|(KS_502ML,KS_1502ML)|                   \
6582                    (KS_502M,KS_1502MEN|KS_1502MN);
6583                TX=371 maintenace;                                                                        \
6584                  C=KS_371AL|KS_371A;
6585                TX=Hamburg 3060;                                                                          \
6586                  C=KS_HHA3060L|KS_HHA3060;
6587                TX=Sightseeing;                                                                           \
6588                  C=(KS_705TL|KS_529TL,KS_1502TL)|(KS_705T|KS_529T,KS_1502T)|KS_802TL|KS_802T;            \
6589                  AB=15;
6590                TX=Duesseldorf 2412;                                                                      \
6591                  C=KS_2412L|KS_2412;
6592              $ENDGROUP
6593            }
6594          $ENDSECTION
6595        }
6596      }
6597      {I?
6598  #--------------------------------------------------------------------------
6599  #
6600  # Milano
6601  #
6602        $SECTION                                                                                          \
6603            NAME=I_MILANO;                                                                                \
6604            SEQ=D; BL=16; %SECFIN;%TITLE([N=Milano;D=Mailand;H=Milánó;]);
6605          {CRAIL?
6606            $GROUP                                                                                        \
6607                NAME=I_MI_M1;                                                                             \
6608                LC=3; AB=25; %GBG((STBGFO|STBGUB),ENV_WAYT8);
6609              TX=Metro 1 + 3;                                                                             \
6610                C=<1-2*ATM_MM(1|3)(AL,B,A);                                                               \
6611                V=6-9;
6612              TX=Metro 1 + 3;                                                                             \
6613                C=1-2*(<ATM_MM1RAL,ATM_MM1RB);                                                            \
6614                V=6-9;
6615              TX=Metro 2;                                                                                 \
6616                C=<ATM_MM2AL,ATM_MM2B,ATM_MM2A;                                                           \
6617                V=6-9;
6618              TX=Metro Maintenance;                                                                       \
6619                C=(ATM_BADONI|ATM_NA00091,ATM_N012|ATM_US1_10)|(ATM_MCAR|ATM_EM60);                       \
6620                V=6-9;
6621            $ENDGROUP
6622          }
6623          {TRAM?
6624            $GROUP                                                                                        \
6625                NAME=I_MI_T1;                                                                             \
6626                LC=3; %GBG(STBGES,[WT=ENV_WAYT1][WA=ENV_WAYA][WR=ENV_WAYT1][WA=ENV_WAY]);
6627              TX=A.1-A.3 battery operated Monza-Trezzo-Bergamo;                                           \
6628                C=ATM_MTB1;
6629              TX=Pferdetram/horse tramway;                                                                \
6630                C=SAO;                                                                                    \
6631                V=2; W=A;
6632              TX=Tram 1;                                                                                  \
6633                C=ATM_1(|L);
6634              TX=152-299 + Trailer;                                                                       \
6635                C=ATM_(152|157|217|222|291|299),2:|ATM_R;
6636              TX=860-966 + 1301;                                                                          \
6637                C=ATM_601(|L),|ATM_1301;
6638              TX=601 + Trailer;                                                                           \
6639                C=ATM_(850|867|961|966),ATM_5(78|95);
6640              TX=600 + Bw;                                                                                \
6641                C=ATM_605,2*ATM_1302;                                                                     \
6642                D=R;
6643              TX=954;                                                                                     \
6644                C=ATM_954L|ATM_954;
6645            $ENDGROUP
6646            $GROUP                                                                                        \
6647                NAME=I_MI_T2;                                                                             \
6648                LC=3; %GBG(STBGES,ENV_WAYT1);
6649              TX=619 + Abw;                                                                               \
6650                C=ATM_619,ATM_(B|P);                                                                      \
6651                D=R;
6652              TX=620 + Abw;                                                                               \
6653                C=ATM_620,ATM_A;                                                                          \
6654                D=R;
6655              TX=609;                                                                                     \
6656                C=ATM_609;
6657              TX=705;                                                                                     \
6658                C=ATM_705|ATM_705SP;
6659              TX=711;                                                                                     \
6660                C=ATM_711L[#D:L]|ATM_711[#D:R];
6661              TX=700 + rail transport;                                                                    \
6662                C=ATM_619,2*ATM_P;                                                                        \
6663                D=R;
6664              TX=37 Atw + Güterwagen;                                                                     \
6665                C=ATM_AT37,2*ATM_A;                                                                       \
6666                D=R;
6667              TX=61 + 101 / 111;                                                                          \
6668                C=ATM_61,|ATM_101,|ATM_111;
6669              TX=283;                                                                                     \
6670                C=ATM_283;
6671            $ENDGROUP
6672            $GROUP                                                                                        \
6673                NAME=I_MI_T3;                                                                             \
6674                LC=3; %GBG(STBGES,ENV_WAYT1);
6675              TX=1844 1946;                                                                               \
6676                C=ATM_1509L[#D:L]|ATM_1509[#D:R];                                                         \
6677                D=R;
6678              TX=1500;                                                                                    \
6679                C=ATM_1501L|ATM_WITT5L|MI1928B|ATM_1501|ATM_WITT1L|ATM_WITT1|ATM_WITT1AL|ATM_WITT1A|      \
6680                  ATM_1503EL|ATM_1503E;
6681              TX=1500;                                                                                    \
6682                C=ATM_1702L|ATM_1702;
6683              TX=1500;                                                                                    \
6684                C=ATM_1928OL[#D:L]|ATM_1928O[#D:R]|ATM_1504L|ATM_1504|ATM_1505L|ATM_1505|ATM_1506L|       \
6685                  ATM_1506|ATM_1507L|ATM_1507|ATM_1508L|ATM_1508|ATM_1512L|ATM_1512|ATM_1513L|ATM_1513|   \
6686                  ATM_1514BL|ATM_WITT3L|ATM_WITT3|ATM_1723L|ATM_1723|MI1928|MI1928WL|MI1928W|             \
6687                  ATM_1500_ADV5L|ATM_1515|ATM_1516L|ATM_1516|ATM_1517L|ATM_1517|ATM_1524|ATM_1518L|       \
6688                  ATM_1518|MI1928CL|MI1928C|ATM_1928A1|ATM_WITT4L|ATM_WITT4|ATM_WITT5AL;
6689              TX=1500;                                                                                    \
6690                C=ATM_1928O1L[#D:L]|ATM_1928O1[#D:R];
6691              TX=1500 1929;                                                                               \
6692                C=ATM_1503L[#D:L]|ATM_1503[#D:R]|MI1503[#D:R];
6693            $ENDGROUP
6694            $GROUP                                                                                        \
6695                NAME=I_MI_T4;                                                                             \
6696                LC=3; %GBG(STBGES,ENV_WAYT1);
6697              TX=2500;                                                                                    \
6698                C=ATM_2500_1948|ATM_2501|ATM_2501L|ATM_2500_1951|ATM_2500_1951L;
6699              TX=3000;                                                                                    \
6700                C=ATM_3000W|ATM_3000|ATM_3001;
6701              TX=4000;                                                                                    \
6702                C=ATM_4000L[#D:L]|ATM_4000[#D:R];
6703              TX=4500;                                                                                    \
6704                C=ATM_4502L|ATM_4502|ATM_4500L|ATM_4500|ATM_4501L|ATM_4501|ATM_4500G2;
6705              TX=4500;                                                                                    \
6706                C=ATM_4500OL~VIA|ATM_4500O~VIA|ATM_4500OL~PH|ATM_4500O~PH;
6707            $ENDGROUP
6708            $GROUP                                                                                        \
6709                NAME=I_MI_T5;                                                                             \
6710                LC=3; %GBG(STBGES,ENV_WAYT1);
6711              TX=5000;                                                                                    \
6712                C=ATM_5001L|ATM_5001|ATM_5000L|ATM_5000|ATM_5002L|ATM_5002|ATM_5003L|ATM_5003|ATM_5000V;
6713              TX=5100;                                                                                    \
6714                C=ATM_5100|ATM_5101L|MI5100L|MI5100|ATM_5101;
6715              TX=5100;                                                                                    \
6716                C=ATM_5102L[#D:L]|ATM_5102[#D:R]|MI5100A;
6717              TX=5137;                                                                                    \
6718                C=ATM_5137;
6719              TX=5200;                                                                                    \
6720                C=ATM_5200L|ATM_5200|ATM_5200A;
6721              TX=5300;                                                                                    \
6722                C=ATM_5300G|ATM_5301L|ATM_5301;
6723              TX=5400;                                                                                    \
6724                C=ATM_5400_58|ATM_5400_70|ATM_5451L|ATM_5451;
6725            $ENDGROUP
6726            $GROUP                                                                                        \
6727                NAME=I_MI_T6;                                                                             \
6728                LC=3; %GBG(STBGES,ENV_WAYT1);
6729              TX=4600;                                                                                    \
6730                C=ATM_4600V[#D:R]|ATM_4602[#D:R]|ATM_4602L[#D:L];
6731              TX=4700;                                                                                    \
6732                C=ATM_4703|ATM_4700A|ATM_4704|ATM_4705L|ATM_4705|ATM_4708;
6733              TX=4800;                                                                                    \
6734                C=ATM_(4800|4800AL|4800A~PH|4800BL|4800C|4800L|4800S|4800SL|4801|4801_70|4802|4802_1970|  \
6735                  4803|4810_1980|4800TL|4900L|4900);
6736              TX=4800;                                                                                    \
6737                C=ATM_4800EL|ATM_4800NL;
6738              TX=4900 »Jumbotram«;                                                                        \
6739                C=ATM_4900~VIA[#D:R]|ATM_4900L~GI[#D:L];
6740            $ENDGROUP
6741            $GROUP                                                                                        \
6742                NAME=I_MI_T7;                                                                             \
6743                LC=3; %GBG(STBGES,ENV_WAYT(1|2));
6744              TX=7000;                                                                                    \
6745                C=ATM_7000L~FLE[#D:L]|ATM_7000~FLE[#D:R]|ATM_7000L~VIA[#D:L]|ATM_7000~VIA[#D:R];
6746              TX=7100;                                                                                    \
6747                C=ATM_7100|ATM_7100L|ATM_MISCALAL|ATM_MISCALA;
6748              TX=7100;                                                                                    \
6749                C=ATM_7100G|ATM_7100GL;
6750              TX=7500;                                                                                    \
6751                C=ATM_7500G|ATM_7500GL;
6752              TX=7600;                                                                                    \
6753                C=ATM_7600Y|ATM_7600YL|ATM_7600G|ATM_7600GL;
6754            $ENDGROUP
6755            $GROUP                                                                                        \
6756                NAME=I_MI_T8;                                                                             \
6757                LC=3; %GBG(STBGES,ENV_WAYT(1|2));
6758              TX=1500;                                                                                    \
6759                C=ATM_WITT5A;
6760              TX=7500;                                                                                    \
6761                C=ATM_7500;                                                                               \
6762                D=R;
6763              TX=Milano;                                                                                  \
6764                C=ATM_SOCIMI1989(|L);
6765            $ENDGROUP
6766  # interurban
6767            $GROUP                                                                                        \
6768                NAME=I_MI_I1;                                                                             \
6769                TX=Stel 110;                                                                              \
6770                LC=3;                                                                                     \
6771                C=STEL_110,STEL_110B; %GBG((STBGFO|STBGEU),ENV_WAYT8);
6772              TX=40 + 180...;                                                                             \
6773                C=ATM_LITTORINAOMS_2000,ATM_R5;                                                           \
6774                D=R;
6775              TX=49 + Zug Milano - Limbiate;                                                              \
6776                C=ATM_49B,2*ATM_R4;
6777              TX=44-49 Desio;                                                                             \
6778                C=ATM_49A|ATM_49,2@ATM_R(1|2);
6779              TX=44-49 »Desio«;                                                                           \
6780                C=ATM_49B;
6781              TX=Desio + Carovana;                                                                        \
6782                C=ATM_DESIO48_2000,2*ATM_RIMORCHIOCAROVANA_1980;
6783              TX=44-49 »Desio« + trailers;                                                                \
6784                C=ATM_49A,ATM_R1,ATM_R2,ATM_R3,ATM_R2;                                                    \
6785                D=R;
6786              TX=85-92 »Reggio Emilia« + trailers;                                                        \
6787                C=ATM_92,2*ATM_R4;                                                                        \
6788                D=L;
6789              TX=92;                                                                                      \
6790                C=ATM_92;
6791            $ENDGROUP
6792            $GROUP                                                                                        \
6793                NAME=I_MI_I2;                                                                             \
6794                TX=116-123 »Littorina OEFT« + Costamasnaga trailer;                                       \
6795                LC=3; D=L; C=ATM_122,ATM_R3; %GBG((STBGFO|STBGEU),ENV_WAYT8);
6796              TX=116-123 »Littorina OEFT« + Costamasnaga trailer;                                         \
6797                C=ATM_124A,2*ATM_R2;
6798              TX=124 + 200;                                                                               \
6799                C=ATM_124,3*ATM_R2;                                                                       \
6800                D=R;
6801              TX=124 »Littorina OMS«;                                                                     \
6802                C=ATM_124;
6803              TX=128,OMS;                                                                                 \
6804                C=ATM_124,ATM_345;
6805              TX=130;                                                                                     \
6806                C=ATM_130,2*ATM_COSTAMASNAGA;
6807              TX=135;                                                                                     \
6808                C=ATM_135;
6809              TX=135 + BW Costamano;                                                                      \
6810                C=ATM_COSTAMB[#D:L],2*ATM_R1;
6811            $ENDGROUP
6812            $GROUP                                                                                        \
6813                NAME=I_MI_I3;                                                                             \
6814                TX=401;                                                                                   \
6815                LC=3;                                                                                     \
6816                C=STEL_401O[PFU]; %GBG((STBGFO|STBGEU),ENV_WAYT8);
6817              TX=401 experimental 'blocked' train;                                                        \
6818                C=ATM_401;                                                                                \
6819                D=L;
6820              TX=500;                                                                                     \
6821                C=ATM_500;
6822              TX=500 'blocked' train;                                                                     \
6823                C=ATM_500O;                                                                               \
6824                D=L;
6825              TX=500 'blocked' train + trailers;                                                          \
6826                C=ATM_500O,2*ATM_R3;                                                                      \
6827                D=R;
6828              TX=800 'blocked' train;                                                                     \
6829                C=ATM_800Y1[PFU];
6830              TX=800 bi-current 'blocked' train;                                                          \
6831                C=ATM_800YBC[PFU];
6832              TX=835;                                                                                     \
6833                C=STEL_835Y[PFU];
6834            $ENDGROUP
6835  # follow
6836            $GROUP                                                                                        \
6837                NAME=I_MI_T9;                                                                             \
6838                LC=3; %GBG(STBGES,ENV_WAYT1);
6839              TX=Year 1946;                                                                               \
6840                M=follow;                                                                                 \
6841                C=((ATM_5000G|ATM_4000|MI1928W); (ATM_5000G|ATM_4000|MI1928W);                            \
6842                  (ATM_5000G|ATM_4000|MI1928W));                                                          \
6843                D=r;
6844              TX=1960's;                                                                                  \
6845                M=follow;                                                                                 \
6846                C=((ATM_5000G|ATM_4000|FIAT_600Y[#D:R]|MULTIPLA2|ATM_4600V|FIAT_850[#D:R]|                \
6847                  CIT_DS_W1[#D:R]|FIAT1[#D:R]|ATM_VIBG|MULTIPLAG|FIAT_500R[#D:R]|ATM_1514|ATM_5100);      \
6848                  (ATM_5000G|ATM_4000|FIAT_600Y[#D:R]|MULTIPLA2|ATM_4600V|FIAT_850[#D:R]|                 \
6849                  CIT_DS_W1[#D:R]|FIAT1[#D:R]|ATM_VIBG|MULTIPLAG|FIAT_500R[#D:R]|ATM_1514|ATM_5100);      \
6850                  (ATM_5000G|ATM_4000|FIAT_600Y[#D:R]|MULTIPLA2|ATM_4600V|FIAT_850[#D:R]|                 \
6851                  CIT_DS_W1[#D:R]|FIAT1[#D:R]|ATM_VIBG|MULTIPLAG|FIAT_500R[#D:R]|ATM_1514|ATM_5100));     \
6852                D=r;
6853              TX=1975 (mixed orange/green);                                                               \
6854                M=follow;                                                                                 \
6855                C=((ATM_1928A|ATM_5102|CIT_DS_W1[#D:R]|FIAT1[#D:R]|FIAT_500R[#D:R]|ATM_1514|ATM_4600V|    \
6856                  ATM_5100);                                                                              \
6857                  (ATM_1928A|ATM_5102|CIT_DS_W1[#D:R]|FIAT1[#D:R]|FIAT_500R[#D:R]|ATM_1514|ATM_4600V|     \
6858                  ATM_5100);                                                                              \
6859                  (ATM_1928A|ATM_5102|CIT_DS_W1[#D:R]|FIAT1[#D:R]|FIAT_500R[#D:R]|ATM_1514|ATM_4600V|     \
6860                  ATM_5100));                                                                             \
6861                D=r;
6862              TX=1980's;                                                                                  \
6863                M=follow;                                                                                 \
6864                C=((ATM_5102|(ATM_619,ATM_B)|ATM_4810_1980|ATM_4700A|ATM_VIBA|ATM_WITT5);                 \
6865                  (ATM_5102|(ATM_619,ATM_B)|ATM_4810_1980|ATM_4700A|ATM_VIBA|ATM_WITT5);                  \
6866                  (ATM_5102|(ATM_619,ATM_B)|ATM_4810_1980|ATM_4700A|ATM_VIBA|ATM_WITT5));                 \
6867                D=r;
6868              TX=Present day;                                                                             \
6869                M=follow;                                                                                 \
6870                C=((1:(ATM_619,ATM_B)|3:ATM_4810_1980|5:ATM_WITT5);                                       \
6871                  (1:(ATM_619,ATM_B)|3:ATM_4810_1980|5:ATM_WITT5);                                        \
6872                  (1:(ATM_619,ATM_B)|3:ATM_4810_1980|5:ATM_WITT5));                                       \
6873                D=r;
6874            $ENDGROUP
6875          }
6876          {BUS?
6877            $GROUP                                                                                        \
6878                NAME=I_MI_B1;                                                                             \
6879                LC=3; %GBG(STBGES,[WT=ENV_WAYT2][WA=ENV_WAYA]);
6880              C=ATM_718L|ATM_215_1963GL|ATM_215_1963G;                                                    \
6881                F=T;
6882              C=ATM_215_1963OL|ATM_215_1963O|ATM_341_1961OL;                                              \
6883                F=T;
6884              C=ATM_718_1951L|ATM_718_1951;                                                               \
6885                F=T;
6886              C=ATM_721_1976L|ATM_721_1976;                                                               \
6887                F=T;
6888              C=ATM_921_1985L|ATM_921_1985;                                                               \
6889                F=T;
6890              C=ATM_501_1939;                                                                             \
6891                F=T;
6892              C=ATM_510_1940L|ATM_510_1940;                                                               \
6893                F=T;
6894              C=ATM_583_1990L|ATM_583_1990;                                                               \
6895                F=T;
6896              C=ATM_VIBG;                                                                                 \
6897                F=T;
6898              C=ATM_VIBA;                                                                                 \
6899                F=T;
6900              C=ATM_400L|ATM_400;                                                                         \
6901                F=T;
6902            $ENDGROUP
6903            $GROUP                                                                                        \
6904                NAME=I_MI_B2;                                                                             \
6905                LC=3; %GBG(STBGES,[WT=ENV_WAYT2][WA=ENV_WAYA]);
6906              C=ATM_MAC18;
6907              C=MI_BUS|ATM_3500L;
6908            $ENDGROUP
6909          }
6910        $ENDSECTION
6911  #--------------------------------------------------------------------------
6912  #
6913  # Roma
6914  #
6915        $SECTION                                                                                          \
6916            NAME=I_ROMA;                                                                                  \
6917            SEQ=D; BL=16; %SECFIN;%TITLE(Roma);
6918          {CRAIL?
6919            $GROUP                                                                                        \
6920                NAME=I_ROMA_C1;                                                                           \
6921                LC=3; AB=25;                                                                              \
6922                \ TX=Società Romana Ferrovie del Nord (Roma-Viterbo)1913-1921 STFE,1921-1970:SRFN,        \
6923                1970-1976 STEFER,1976-1993 ACOTRAL,1993-2000 COTRAL,2000-2001 Metroferro,2001 MetRo; %GBG((STBGFO|STBGEU),ENV_WAYT8);%GBG((STBGFO|STBGEU),ENV_WAYT8);
6924              TX=Merci Viterbo - Roma,locomotiva 01-04 + carri 1960;                                      \
6925                C=SRFN_01AL,DB_3B_GMHS53EL,KPEV_W4BL,NS_GTMKHE;
6926              TX=Locale Roma - Viterbo,                                                                   \
6927                  classica M.R.R.RP con elettromotrici ECD 21-30 e rimorchi C 71-78,C 79-82 (pilota)1960; \
6928                C=<SRFN_ECD21,SRFN_C71L,SRFN_ECD21L,SRFN_C79;
6929              TX=Locale Roma - Viterbo,locomotiva 01-04 + rimorchio AC 51-58 + due rimorchi C 71-78 1960; \
6930                C=SRFN_01B,SRFN_AC51L,2*SRFN_C71L;
6931              TX=Locale Roma - Viterbo,                                                                   \
6932                  complesso elettromotrice 102-112 (solo pari)                                            \
6933                  + rimorchio 201-210 + pilota 101-119 (solo dispari)2000;                                \
6934                C=<SRFN_102L,SRFN_101,SRFN_201;
6935            $ENDGROUP
6936            $GROUP                                                                                        \
6937                NAME=I_ROMA_C2;                                                                           \
6938                TX=Roma,Line to Lido;                                                                     \
6939                LC=3; AB=25; %GBG((STBGFO|STBGEU),ENV_WAYT8);
6940              TX=Stefer Rom MR;                                                                           \
6941                C=2-3*(<ATAC_LIDO_MR302BL,ATAC_LIDO_MR302A);
6942              TX=Stefer Rom MM;                                                                           \
6943                C=2-3*(<ATAC_MMBL,ATAC_MMA);
6944              TX=Stefer Rom MR 101;                                                                       \
6945                C=<STEFER_MR101_001,2*STEFER_LM4,STEFER_MR101_001;
6946              TX=Metro Rom;                                                                               \
6947                C=<ATAC_CAF1AL,3*ATAC_CAF1B,ATAC_CAF1A;
6948              TX=Metro Rom C;                                                                             \
6949                C=<ATAC_CAF1AL,4*ATAC_CAF1B,ATAC_CAF1A;
6950              TX=Metro Rom C;                                                                             \
6951                C=<ATAC_C_AL,4*ATAC_C_B,ATAC_C_A;
6952              TX=Metro Rom MA 100;                                                                        \
6953                C=2*(<ATAC_LIDO_MA100L,ATAC_LIDO_MA100);
6954            $ENDGROUP
6955            $GROUP                                                                                        \
6956                NAME=I_ROMA_C3;                                                                           \
6957                TX=Ferrovia Roma-Fiuggi-Alatri-Frosinone;                                                 \
6958                LC=3; AB=25; %GBG((STBGFO|STBGEU),ENV_WAYT8);
6959              TX=Stefer E1;                                                                               \
6960                C=STEFER_E1(B|C|M|SRV);
6961              TX=Stefer 462 mit 114;                                                                      \
6962                C=<STEFER_462,STEFER_114;
6963              TX=Stefer 422;                                                                              \
6964                C=(<STEFER_ET421A,STEFER_ET421B,STEFER_ET421A)|                                           \
6965                  (<STEFER_TRENO_422A,STEFER_TRENO_422B,STEFER_TRENO_422C);
6966              TX=Stefer 083 mit 103 mit 084;                                                              \
6967                C=STEFER_083,STEFER_103,STEFER_084;
6968              TX=Stefer 462 und 114;                                                                      \
6969                C=<STEFER_462,STEFER_114;
6970              TX=Stefer 422-424 mit 052,064;                                                              \
6971                C=<STEFER_064,STEFER_42(2|4),STEFER_052;
6972              TX=Stefer 101 mit Bw104;                                                                    \
6973                C=STEFER_101,STEFER_104;
6974              TX=Stefer 470 mit Bw;                                                                       \
6975                C=STEFER_470,STEFER_1(04|07|21|23);
6976              TX=Stefer 801;                                                                              \
6977                C=STEFER_801;
6978              TX=Stefer 802,812;                                                                          \
6979                C=STEFER_(80|81|E81)2;
6980              TX=Stefer 820;                                                                              \
6981                C=ATAC_DL820;
6982              TX=Stefer 830;                                                                              \
6983                C=ATAC_83(0|2);
6984            $ENDGROUP
6985            $GROUP                                                                                        \
6986                NAME=I_ROMA_C4;                                                                           \
6987                TX=SFV:Ferrovia Roma-Fiuggi-Alatri-Frosinone EP1-2;                                       \
6988                LC=3; AB=25; %GBG((STBGFO|STBGEU),ENV_WAYT8);
6989              TX=SFV 1915:elettromotrice 200-209 allo stato di origine;                                   \
6990                C=SFV_200A(|L);
6991              TX=SFV elettromotrice 420 + carrozze 050;                                                   \
6992                C=SFV_420A(|L),SFV_050A;
6993              TX=SFV elettromotrice 420 + carrozze 11 + 21;                                               \
6994                C=SFV_420B(|L),SFV_011C,SFV_021C;
6995              TX=SFV Merci con locomotiva 1-4 + carri P 100-198 + carri L 301-350 + carro F 201-265 1930; \
6996                C=SFV_1A,2*SFV_P100BL,SFV_L301(A|B|C|D)(|L),SFV_P100B,SFV_F201BL,SFV_L301(A|B|C|D)(|L),   \
6997                  SFV_P100AL;                                                                             \
6998                D=R;
6999              TX=SFV Rapido Roma-Fiuggi - locomotiva 11-13 + le tre carrozze 01-03 (carrozze con tre porte, \
7000                  01-02 -I- con un vestibolo con buvette,03 -III- con vestibolo con ritirata)1930;        \
7001                C=SFV_11AL,SFV_001AL,SFV_001A,SFV_003AL;                                                  \
7002                D=L;
7003              TX=SFV Locale Roma-Frosinone - locomotiva 1-4 + carrozza 011-016 (con porte)                \
7004                  + carrozza 021-026 (con cancelletti)+ carrozza 011-016 modificata con carrelli 1930;    \
7005                C=SFV_1A,SFV_011A,SFV_021A,SFV_011B;
7006              TX=SFV Locale Fiuggi Città-Fiuggi Fonte;                                                    \
7007                C=SFV_400AL,SFV_032A;                                                                     \
7008                ELETTROMOTRICE 401-410+CARROZZA 032-042NUMERI SOLO PARI,TERZA CLASSE1930;
7009              TX=SFV Locale misto Alatri-Frosinone;                                                       \
7010                C=SFV_430AL,SFV_021B,SFV_F201B;                                                           \
7011                ELETTROMOTRICE 431-436+CARROZZA 021-026 CON CARRELLI+F 201-265 1930;
7012            $ENDGROUP
7013            $GROUP                                                                                        \
7014                NAME=I_ROMA_C5;                                                                           \
7015                TX=Stefer Roma-Fiuggi-Alatri-Frosinone,950 mm E3;                                         \
7016                LC=3; AB=25; %GBG((STBGFO|STBGEU),ENV_WAYT8);
7017              TX=Italien STEFER:Ferrovia Roma-Fiuggi-Alatri-Frosinone E 460;                              \
7018                C=SFV_E460_1;                                                                             \
7019                F=ENP3;
7020              TX=STEFER 1945 - primi cinque treni bloccati extra-urbani 200 modificata + 080 attrezzata + 200 modificata; \
7021                C=(<STEFER_200EL,STEFER_080B,STEFER_200)|(<<STEFER_200L,STEFER_080B,STEFER_200E);
7022              TX=ACOTRAL Locale Roma-Frosinone - elettromotrice 01 + semipilota 121 1965;                 \
7023                C=(<STEFER_01CL,STEFER_121C)|(STEFER_121CL,STEFER_01C);
7024              TX=STEFER Locale Roma-Frosinone - bloccato 100 sp + 100 m + 080 p 1960;                     \
7025                C=(<STEFER_100L,STEFER_100E,STEFER_080)|(STEFER_080,STEFER_100EL,STEFER_100);
7026              TX=STEFER Locale Roma-Zagarolo con locomotiva 1-4 + 2 carrozze 011-016 + carrozza 031-041 (numeri solo dispari, \
7027                  mista I-III)+ carrozza 050-073 1960;                                                    \
7028                C=STEFER_E1B,2*SFV_F201A,2*SFV_F201B,SFV_F201A;
7029              TX=STEFER Merci con locomotiva 1-4 + carri F 201-265 con e senza garritta 1960;             \
7030                C=STEFER_1A(|L),2*SFV_011C,SFV_031BL,SFV_050B;
7031              TX=STEFER Merci con locomotiva 1-4 + carri F 201-265 con e senza garritta 1960;             \
7032                C=STEFER_E1B,2*SFV_F201A(|L),2*SFV_F201B,SFV_F201A;
7033              TX=STEFER Locale Fiuggi-Roma con elettromotrice 451-456 (attrezzata aperture porte pneumatiche) \
7034                  + carrozze 101-110;                                                                     \
7035                C=(STEFER_451A,STEFER_101A,3*STEFER_101AL)|(STEFER_451AL,STEFER_101AL,3*STEFER_101A);
7036              TX=STEFER 1955,                                                                             \
7037                  primo bloccato urbano:elettromotrice 421 + rimorchio 051 semi-pilota + rimorchio 057 pilota; \
7038                C=(<STEFER_420ML,STEFER_051A,STEFER_057A)|(<STEFER_057AL,STEFER_051AL,STEFER_420M);
7039              TX=STEFER Locale Roma-Fiuggi 1955;                                                          \
7040                C=(<STEFER_460AL,STEFER_470A)|(<STEFER_470BL,STEFER_460B)|(<STEFER_470AL,STEFER_460A)|    \
7041                  (<STEFER_460BL,STEFER_470B);
7042              TX=STEFER 1952 - entrano in servizio gli elettrotreni 801-803;                              \
7043                C=(2*STEFER_801AL)|(2*STEFER_801A);                                                       \
7044                DOPPIA COMPOSIZIONE ROMA-FIUGGI;
7045              TX=STEFER elettromotrice 451-458 ricostruita + pilota 081-086 1965;                         \
7046                C=<STEFER_451B,STEFER_080;
7047              TX=STEFER 1965,                                                                             \
7048                  primo bloccato urbano:elettromotrice 421 + rimorchio 051 semi-pilota + rimorchio 057 pilota; \
7049                C=(<STEFER_420CML,STEFER_051C,STEFER_057C)|(<STEFER_057CL,STEFER_051CL,STEFER_420CM);
7050              TX=STEFER Locale Roma-Fiuggi 1965;                                                          \
7051                C=(<STEFER_460CL,STEFER_470C)|(<STEFER_470CL,STEFER_460C);
7052              TX=ACOTRAL Merci con locomotiva 1-4 1965;                                                   \
7053                C=STEFER_1B(|L),2*SFV_F201A,2*SFV_F201B,SFV_F201A;
7054              TX=ACOTRAL Locale Roma-Pantano - elettrotreno 801-803,810 1965;                             \
7055                C=STEFER_8(01B|10)(|L);
7056              TX=ACOTRAL Locale Roma-Pantano - elettromotrice 431-436 ricostruita 1965;                   \
7057                C=STEFER_430B(|L);
7058            $ENDGROUP
7059            $GROUP                                                                                        \
7060                NAME=I_ROMA_C6;                                                                           \
7061                TX=ACOTRAL Roma-Pantano,950 mm E4;                                                        \
7062                LC=3; AB=25; %GBG((STBGFO|STBGEU),ENV_WAYT8);
7063              TX=ACOTRAL Merci con locomotiva 1-4 1975;                                                   \
7064                C=ACOTRAL_1A(|L),3*SFV_P100(B|A|BL),2*SFV_F201(A|B);
7065              TX=ACOTRAL Merci con locomotiva 1-4 1980;                                                   \
7066                C=ACOTRAL_1B(|L),STEFER_1B,2*SFV_F201A,2*SFV_F201B,SFV_F201A;
7067              TX=ACOTRAL Locale Roma-Pantano - elettromotrice 01 + semipilota 121 1990;                   \
7068                C=(<ACOTRAL_121L,ACOTRAL_01)|(<ACOTRAL_01L,ACOTRAL_121);
7069              TX=ACOTRAL Locale Roma-Pantano - bloccato 100 sp + 100 m + 080 p 1990;                      \
7070                C=(<ACOTRAL_100L,ACOTRAL_100E,ACOTRAL_080)|(<ACOTRAL_080,ACOTRAL_100EL,ACOTRAL_100);
7071              TX=ACOTRAL Locale Roma-Pantano - - elettromotrice 100 + semipilota 100 1980;                \
7072                C=(<ACOTRAL_100L,ACOTRAL_100E)|(<ACOTRAL_100EL,ACOTRAL_100);
7073              TX=ACOTRAL Locale Roma-Pantano - complesso bloccato 420+051+057 ricolorato 1990;            \
7074                C=(<ACOTRAL_420L,ACOTRAL_051,ACOTRAL_057)|(<ACOTRAL_057L,ACOTRAL_051L,ACOTRAL_420);
7075              TX=ACOTRAL Locale Roma-Pantano - elettromotrice 460-462 + semipilota 111-116 1990;          \
7076                C=(<ACOTRAL_460EL,ACOTRAL_100)|(<ACOTRAL_100L,ACOTRAL_460E);
7077              TX=ACOTRAL Locale Roma-Pantano - elettromotrice 470 + semipilota 460 1990;                  \
7078                C=(<ACOTRAL_460L,ACOTRAL_470E)|(<ACOTRAL_470EL,ACOTRAL_100);
7079              TX=ACOTRAL Locale Roma-Pantano - elettrotreno 801-803,810 1990;                             \
7080                C=ACOTRAL_8(01|10)(|L);                                                                   \
7081                F=EPNU4;
7082            $ENDGROUP
7083            $GROUP                                                                                        \
7084                NAME=I_ROMA_C7;                                                                           \
7085                TX=ACOTRAL-Met.Ro Roma-Pantano,950 mm E5-6;                                               \
7086                LC=3; AB=25; %GBG(STBGES,ENV_WAYT8);
7087              TX=Met.Ro. Locale Roma-Giardinetti -  bloccato 100 sp + 100 m + 080 p 2005;                 \
7088                C=<(ATAC_080L,ATAC_100_100L)|(ATAC_100_100,ATAC_80);
7089              TX=Met.Ro.Locale Roma-Giardinetti- elettrotreno 831-836 2005;                               \
7090                C=ATAC_830C(|L);                                                                          \
7091                F=EPNU6;
7092              TX=ACOTRAL Locale Roma-Pantano - elettrotreno 820-822-823-824-825 2000;                     \
7093                C=ACOTRAL_820(|L);                                                                        \
7094                F=EPNU5;
7095            $ENDGROUP
7096          }
7097          {TRAM?
7098            $GROUP                                                                                        \
7099                NAME=I_ROMA_T1;                                                                           \
7100                LC=3; %GBG(STBGES,ENV_WAYT1);
7101              TX=Roma MSR 2x;                                                                             \
7102                C=MUN_4X100A20(|L),MUN_8X100A00(|L);
7103              TX=Roma MSR 2001;                                                                           \
7104                C=ATAC_MRS(|L);
7105              TX=Roma Stefer 301;                                                                         \
7106                C=STEFER_312(|L);
7107              TX=Roma Stefer 401;                                                                         \
7108                C=STEFER_401(|L);
7109            $ENDGROUP
7110          }
7111        $ENDSECTION
7112  #--------------------------------------------------------------------------
7113  #
7114  # Torino
7115  #
7116        $SECTION                                                                                          \
7117            NAME=I_TORINO;                                                                                \
7118            SEQ=D; BL=16; %SECFIN;%TITLE(Torino);
7119          {CRAIL?
7120            $GROUP                                                                                        \
7121                NAME=I_TO_M1;                                                                             \
7122                LC=3; %GBG(STBGUB,ENV_WAYV);
7123              TX=VAL-Metro;                                                                               \
7124                C=GTT_VAL;
7125            $ENDGROUP
7126          }
7127          {TRAM?
7128  # Sassi-Superga
7129            $GROUP                                                                                        \
7130                NAME=I_TO_T1;                                                                             \
7131                LC=3; %GBG(STBGFO,ENV_WAYM);
7132              TX=Sassi-Superga D1;                                                                        \
7133                C=ATMT_D1A|ATMT_D1A|ATMT_D1B|ATMT_D1B;
7134              TX=Sassi-Superga D2;                                                                        \
7135                C=ATMT_D2A|ATMT_D2A|ATMT_D2B|ATMT_D2B;
7136              TX=Sassi-Superga D2;                                                                        \
7137                C=<ATMT_D2C|ATMT_D2C,ATMT_D11B|ATMT_D13B;
7138              TX=Sassi-Superga D2;                                                                        \
7139                C=<ATMT_D2D|ATMT_D2D,ATMT_D11D|ATMT_D13D|ATMT_D15;
7140              TX=Sassi-Superga Locomotore 1884;                                                           \
7141                C=<ATMT_AGUDIOL|ATMT_AGUDIO,(ATMT_2A|ATMT_701|ATMT_D11A|ATMT_D13A);
7142              TX=Tram D.3 rack line Sassi-Superga;                                                        \
7143                C=ATMT_SUPERGA;
7144            $ENDGROUP
7145            $GROUP                                                                                        \
7146                NAME=I_TO_T2;                                                                             \
7147                LC=3; %GBG(STBGES,[WT=ENV_WAYT1][WA=ENV_WAYA]);
7148  # horsetram
7149              TX=Pferdebahn/horsetram;                                                                    \
7150                C=ATMT_197;                                                                               \
7151                V=2;
7152  # TRAM
7153              TX=101 + Bw 237;                                                                            \
7154                C=ATMT_101(|L),ATMT_237;
7155              TX=116 + Bw 237;                                                                            \
7156                C=ATMT_116,ATMT_237;
7157              TX=209/446 + 701;                                                                           \
7158                C=ATMT_209(|L)|ATMT_446A(|L),ATMT_701;
7159              TX=501;                                                                                     \
7160                C=ATMT_501(|L)|ATMT_502(|L);
7161              TX=501;                                                                                     \
7162                C=ATMT_501(|L)|ATMT_502(|L);
7163            $ENDGROUP
7164            $GROUP                                                                                        \
7165                NAME=I_TO_T3;                                                                             \
7166                LC=3; %GBG(STBGES,ENV_WAYT1);
7167              TX=2001;                                                                                    \
7168                C=ATMT_2001L|ATMT_2001(|L);
7169              TX=2101;                                                                                    \
7170                C=ATMT_2100L|ATMT_2100(|L);
7171              TX=2593;                                                                                    \
7172                C=ATMT_2593(|L);
7173              TX=2700;                                                                                    \
7174                C=ATMT_2700A(|L);
7175              TX=2700;                                                                                    \
7176                C=ATMT_2759(|L);
7177              TX=2700;                                                                                    \
7178                C=ATMT_2700B(|L);
7179              TX=2801;                                                                                    \
7180                C=ATMT_2800G(|L);
7181              TX=2807;                                                                                    \
7182                C=ATMT_2807(|L);
7183              TX=2800;                                                                                    \
7184                C=ATMT_2800G(|L);
7185              TX=2800;                                                                                    \
7186                C=ATMT_2847(|L);
7187              TX=2800;                                                                                    \
7188                C=ATMT_2800A|ATMT_2800B(|L)|ATMT_2800|ATMT_2800C(|L)|ATMT_2858(|L);
7189            $ENDGROUP
7190            $GROUP                                                                                        \
7191                NAME=I_TO_T4;                                                                             \
7192                LC=3; %GBG(STBGES,ENV_WAYT(1|2));
7193              TX=3001;                                                                                    \
7194                C=ATMT_3001(|L);
7195              TX=3101;                                                                                    \
7196                C=ATMT_3100G(|L);
7197              TX=3101;                                                                                    \
7198                C=ATMT_3100B(|L);
7199              TX=3101;                                                                                    \
7200                C=ATMT_3104(|L);
7201              TX=3201;                                                                                    \
7202                C=ATMT_3203(|L)|ATMT_3279L|ATMT_3279(|L);
7203              TX=3501;                                                                                    \
7204                C=ATMT_3501(|L);
7205            $ENDGROUP
7206            $GROUP                                                                                        \
7207                NAME=I_TO_T5;                                                                             \
7208                LC=3; %GBG(STBGES,ENV_WAYT(1|2));
7209              TX=5000;                                                                                    \
7210                C=ATMT_50TT(|L)~MRT|ATMT_50TTL~GI;                                                        \
7211                D=L;
7212              TX=5000;                                                                                    \
7213                C=ATMT_(5000|5000_1989|50TT)(|L);
7214              TX=5500;                                                                                    \
7215                C=ATMT_5500_1989(|L);
7216              TX=CITYWAY 6000;                                                                            \
7217                C=ATMT_6000(Z_CITYWAY|_CITYWAY|_CITYWAYL)|GTT_6000(A|B)(|L);
7218              TX=7000;                                                                                    \
7219                C=ATMT_7000;                                                                              \
7220                D=R;
7221              TX=7000 GTT;                                                                                \
7222                C=ATMT_70TT~GI;                                                                           \
7223                D=R;
7224              TX=7001;                                                                                    \
7225                C=ATMT_70TT(|L)~MRT;
7226            $ENDGROUP
7227            $GROUP                                                                                        \
7228                NAME=I_TO_T6;                                                                             \
7229                LC=3; %GBG(STBGES,ENV_WAYT(1|2));
7230              TX=T411;                                                                                    \
7231                C=ATMT_T411(|L)|ATMT_T450B(|L),2*(ATMT_S21(|L));
7232              TX=T450;                                                                                    \
7233                C=ATMT_T450B(|L),1-2*(ATMT_S21(|L));
7234              TX=T450;                                                                                    \
7235                C=ATMT_T450A(|L),ATMT_S21(|L)[O:CLAY1,3,12];
7236            $ENDGROUP
7237  # follow
7238            $GROUP                                                                                        \
7239                NAME=I_TO_T7;                                                                             \
7240                LC=3; %GBG(STBGES,ENV_WAYT1);
7241              TX=Torino,anni ottanta;                                                                     \
7242                M=follow;                                                                                 \
7243                C=(TRAM_TO_IV;TRAM_TO_IV;TRAM_TO_IV);                                                     \
7244                D=r;                                                                                      \
7245                AB=25;
7246              TX=ai giorni nostri;                                                                        \
7247                M=follow;                                                                                 \
7248                C=(TRAM_TO_V;TRAM_TO_V;TRAM_TO_V);                                                        \
7249                D=L;                                                                                      \
7250                AB=25;
7251            $ENDGROUP
7252          }
7253          {BUS?
7254            $GROUP                                                                                        \
7255                NAME=I_TO_B1;                                                                             \
7256                LC=3; %GBG(STBGES,[WT=ENV_WAYT2][WA=ENV_WAYA]);
7257              C=ATMT_(1100|1112)(|L);                                                                     \
7258                F=T;
7259              C=ATMT_1200(|L);                                                                            \
7260                F=T;
7261              C=ATMT_B14(|L);
7262              C=ATMT_B(1600|1668)(|L);
7263              C=ATMT_B1820(|L);
7264              C=ATMT_B2001(|L);
7265              C=ATMT_B2100(|L);
7266              C=ATMT_(421|B2300|B2300L|B4000|B4000L);
7267              TX=Rivoli Filobus;                                                                          \
7268                M=FOLLOW;                                                                                 \
7269                C=(CTREA_F31;CTREA_F1)!|L;                                                                \
7270                F=T;
7271            $ENDGROUP
7272          }
7273        $ENDSECTION
7274      }
7275      {PL?
7276  #--------------------------------------------------------------------------
7277  #
7278  # Bydgoszcz
7279  #
7280        $DEF BUS_BYD=4:BYD_IK260_(01|02|03|04|05|06|07|08|09|92)|                                         \
7281            6:BYD_IK280_(01|02|03|04|34|35|37|50|51|52|53|54|55|71|72|73|74|75|76|77|78|79|80|81)|        \
7282            2:BYD_IK160_(01|02|03|04|06|98|99)|2:BYD_JE11_(01|02|46|47|48|49)|BYD_O305_0(1|2)|            \
7283            BYD_IK255_0(1|2)
7284        {TRAM|BUS?
7285          $SECTION                                                                                        \
7286              NAME=PL_BYDGOSZCZ;                                                                          \
7287              SEQ=D; BL=16; %SECFIN;%TITLE(Bydgoszcz);
7288            {TRAM?
7289              $GROUP                                                                                      \
7290                  NAME=PL_BYD_T1;                                                                         \
7291                  LC=3; %GBG(STBGEO,ENV_WAYT1);
7292                TX=805N;                                                                                  \
7293                  C=(BYD_805NA(1|2|3)(|(,B))(|L))|(BYD_805NM_01,BYD_805NMD_01);
7294                TX=105N;                                                                                  \
7295                  C=BYD_(105NW_0(0|1)|5:805N_(00|01|03|46|47|48|49|50|98|99));
7296                TX=803N;                                                                                  \
7297                  C=BYD_803N_0(0|1|2|3);
7298                TX=N1;                                                                                    \
7299                  C=BYD_5N_1,BYD_5ND_1;
7300                TX=N1 maintenance;                                                                        \
7301                  C=(BYD_5N_5(0|1|2))|(BYD_(5N_60|5N_61|803N_99));
7302              $ENDGROUP
7303            }
7304            {BUS?
7305              $GROUP                                                                                      \
7306                  NAME=PL_BYD_B1;                                                                         \
7307                  LC=3; %GBG(STBGEO,ENV_WAYA);
7308                M=FOLLOW;                                                                                 \
7309                  C=5-7*BUS_BYD;
7310                C=BYD_IK280_S(1|2|3),BYD_IK280_SH,BUS_BYD;
7311                M=OPEN;                                                                                   \
7312                  C=BYD_IK260_(01|02|03|04|05|06|07|08|09|92)|BYD_IK280_(01|02|04|35|37);                 \
7313                  P=30-70;
7314              $ENDGROUP
7315            }
7316          $ENDSECTION
7317        }
7318      }
7319      {RZD|SU?
7320  #--------------------------------------------------------------------------
7321  #
7322  # St. Petersburg
7323  #
7324        {TRAM?
7325          $SECTION                                                                                        \
7326              NAME=RU_ST_PETERSBURG;                                                                      \
7327              SEQ=D; BL=16; %SECFIN;%TITLE([N=St.Petersburg; H=Szentpétervár;]);
7328            $GROUP                                                                                        \
7329                NAME=RU_SPE_T1;                                                                           \
7330                LC=1; %GBG(STBGRU,ENV_WAYT1);
7331              TX=LM33;                                                                                    \
7332                C=STP_L(M,P)33_(01|02|03|04|07|08)(|L);
7333              TX=LM36;                                                                                    \
7334                C=STP_L(M,P)36_01(|L);
7335            $ENDGROUP
7336            $GROUP                                                                                        \
7337                NAME=RU_SPE_T2;                                                                           \
7338                LC=2; %GBG(STBGRU,ENV_WAYT1);
7339              TX=LM47;                                                                                    \
7340                C=STP_LM47BN_35(43|51)(|L);
7341              TX=LM47;                                                                                    \
7342                C=STP_L(M,P)47_(01|02)(|L);
7343              TX=LM47;                                                                                    \
7344                C=STP_L(M47P|M68M_RCB39|VSG90)(|L);
7345              TX=LM47;                                                                                    \
7346                C=STP_LM(47KR|47KR_3538|47KR_3541|68M_RCB|68M_RCB2|68M_RCB3|68M_RCB69)(|L);
7347              TX=LM49;                                                                                    \
7348                C=STP_LM(49TG_02|68M_B1|68M_PC001|68M_PC002|93TG)(|L);
7349              TX=LM49;                                                                                    \
7350                C=STP_L(M,P)49_(01|02|03|04)(|L);
7351              TX=LM57;                                                                                    \
7352                C=STP_LM57_(01|02|03|04|05|06|07|5001|P01|P02)(|L);
7353            $ENDGROUP
7354            $GROUP                                                                                        \
7355                NAME=RU_SPE_T3;                                                                           \
7356                LC=2; %GBG(STBGRU,ENV_WAYT(1|2));
7357              TX=LM67;                                                                                    \
7358                C=STP_LM67_5210(|L);
7359              TX=LM68;                                                                                    \
7360                C=STP_(LM68M_01,LP49_(01|02))(|L);
7361              TX=LM68;                                                                                    \
7362                C=STP_LM68_0(1|2|3|4|6|7|8)(|L)(1:|4:(,[PU])|1:(,[PU],[PD]));
7363              TX=LM68;                                                                                    \
7364                C=STP_LM68M_(01|02|03|04|05|06|07|08|09|10|11|12|13|14|15|16|17|18|19|20|21|22|23|24)     \
7365                  (|L)(1:|4:(,[PU])|1:(,[PU],[PD]));
7366              TX=LM68;                                                                                    \
7367                C=(2*STP_LM68M_(01|02|03|04|05|06|07|08|09|10|11|12|13|14|15|16|17|18|19|20|21|22|23|24)) \
7368                  (|L)[PU];
7369            $ENDGROUP
7370            $GROUP                                                                                        \
7371                NAME=RU_SPE_T4;                                                                           \
7372                LC=2; %GBG(STBGRU,ENV_WAYT(1|2));
7373              TX=LM93;                                                                                    \
7374                C=(1-2*STP_LM93_01)(|L)[PU];
7375              TX=LM99;                                                                                    \
7376                C=(1-2*STP_LM99_0(1|2|3|4|5|6|7))(|L)[PU];
7377              TX=LM99AV/AVN;                                                                              \
7378                C=1-2@STP_LM99AV(|N)(1|2|3)(|L);
7379              TX=LV66;                                                                                    \
7380                C=STP_LVS66_100(1|2|3|4)(|L);
7381              TX=LV86;                                                                                    \
7382                C=STP_LVS86K_(01|02|03|04|05|06|07|08|09|10|11|12|13|14|15|16|17)(|L);
7383              TX=LV86;                                                                                    \
7384                C=STP_LVS86_(2200|7030)(|L);
7385              TX=LV89;                                                                                    \
7386                C=STP_LVS89(|_02)(|L);
7387            $ENDGROUP
7388            $GROUP                                                                                        \
7389                NAME=RU_SPE_T5;                                                                           \
7390                LC=1; %GBG(STBGRU,ENV_WAYT(1|2));
7391              TX=LV93;                                                                                    \
7392                C=STP_LVS93(|L);
7393              TX=LV97;                                                                                    \
7394                C=STP_LVS97_(01|02|03|04|05|06|07|08|09|10|11|12|13|14|15|16|17|18|19|20|21|6108)(|L);
7395              TX=LV97a;                                                                                   \
7396                C=STP_LVS97A_0(1|2|3|4)|STP_LVS97TISU_0(1|2|3);
7397            $ENDGROUP
7398          $ENDSECTION
7399        }
7400      }
7401      {USA?
7402  #--------------------------------------------------------------------------
7403  #
7404  # New York
7405  #
7406        {CRAIL?
7407          $SECTION                                                                                        \
7408              NAME=US_NEW_YORK;                                                                           \
7409              SEQ=D; BL=16; %SECFIN;%TITLE(New York);
7410            $GROUP                                                                                        \
7411                NAME=US_NY_S1;                                                                            \
7412                LC=1; %GBG((STBGFO|STBGUB),ENV_WAYM);
7413              TX=GIBBS;                                                                                   \
7414                C=3*(IRT_GIBBS_MOD_G|IRT_GIBBS_MOD_G);
7415              TX=GIBBS;                                                                                   \
7416                C=6*(IRT_GIBBS_2DR|IRT_GIBBS_4DR|IRT_GIBBS_MOD_EARLY|IRT_GIBBS_MOD|IRT_GIBBS_MUDC);
7417              TX=Deck Roof;                                                                               \
7418                C=(6*IRT_DECKROOF)|(6*IRT_DECKROOF_GN);
7419              TX=Headley;                                                                                 \
7420                C=(6*(IRT_HI_V_HEADLEY_EARLY|IRT_HI_V_HEADLEY|IRT_HI_V_TRAILER|IRT_HI_V_HEADLEY_MUDC))|   \
7421                  (6*(IRT_HI_V_HEADLEY_MUDC_G|IRT_HI_V_TRAILER_G));
7422              TX=Steinway;                                                                                \
7423                C=(6*(IRT_LO_V_MOTOR|IRT_LO_V_TRAILER_MUDC|IRT_LO_V_MOTOR_MUDC))|                         \
7424                  (6*(IRT_LO_V_MOTOR_G|IRT_LO_V_MOTOR_MUDC_G|IRT_LO_V_TRAILER_MUDC_G|BMT_LO|BMT_LO_4581|  \
7425                  IRT_LO_V_WF));
7426            $ENDGROUP
7427            $GROUP                                                                                        \
7428                NAME=US_NY_S2;                                                                            \
7429                LC=1; %GBG((STBGFO|STBGUB),ENV_WAYM);
7430              TX=R12;                                                                                     \
7431                C=(6*IRT_R12TR)|(6*IRT_R12_1948)|(6*NYCS_R12SB);
7432              TX=R15;                                                                                     \
7433                C=(6*NYCS_R15SB)|(6*IRT_R15O)|(6*IRT_R15G);
7434              TX=R17;                                                                                     \
7435                C=6*(IRT_R17M);
7436              TX=R21;                                                                                     \
7437                C=(6*NYCS_R21SB)|(6*NYCS_R21W)|(6*IRT_R21G);
7438              TX=R29;                                                                                     \
7439                C=(6*IRT_R29TR1|IRT_R29TR2)|(6*NYCS_R29SB1|NYCS_R29SB2)|(6*NYCS_R29W1|NYCS_R29W2)|        \
7440                  (6*NYCS_R29FR1|NYCS_R29FR2);
7441            $ENDGROUP
7442            $GROUP                                                                                        \
7443                NAME=US_NY_S3;                                                                            \
7444                LC=1; %GBG((STBGFO|STBGUB),ENV_WAYM);
7445              TX=R33;                                                                                     \
7446                C=(6*(IRT_R33G1|IRT_R33G2))|(6*(NYCS_R33WF_1964|NYCS_R36WF_1964A|NYCS_R36WF_1964B))|      \
7447                  (6*(NYCS_R33WF_W|NYCS_R36WF_W1|NYCS_R36WF_W2))|                                         \
7448                  (6*(NYCS_R33WF_FR|NYCS_R36WF_FR1|NYCS_R36WF_FR2))|(6*(NYCS_R36WF_SB1|NYCS_R36WF_SB2));
7449              TX=R 62;                                                                                    \
7450                C=6*NYCS_R62|NYCS_R62S|NYCS_R62DBL|NYCS_R62DB|NYCS_R62DBM;
7451            $ENDGROUP
7452            $GROUP                                                                                        \
7453                NAME=US_NY_S4;                                                                            \
7454                LC=2; %GBG((STBGFO|STBGUB),ENV_WAYM);
7455              TX=BMT 200-2600;                                                                            \
7456                C=(5*(BMT_STD_2000|BMT_STD_2400|BMT_STD_2500|BMT_STD_2600|BMT_STD_4000))|                 \
7457                  (6*(BMT_STD_2400_GN|BMT_STD_2500_GN|BMT_STD_2600_GN));
7458              TX=BMT Triplex;                                                                             \
7459                C=2*(BMT_TRI_EARLY|BMT_TRI_LATE);
7460              TX=BMT Q;                                                                                   \
7461                C=(6*(BMT_Q_1939A|BMT_Q_1939B|BMT_Q_1939C|BMT_QX_1939B|BMT_QX_1939C))|                    \
7462                  (6*(BMT_Q_1945A|BMT_Q_1945B|BMT_Q_1945C|BMT_QX_1945B|BMT_QX_1945C))|                    \
7463                  (6*(BMT_Q_1950A|BMT_Q_1950B|BMT_Q_1950C))|(6*(BMT_Q_1958A|BMT_Q_1958B|BMT_Q_1958C));
7464              TX=BMT Pullmann;                                                                            \
7465                C=2*BMT_EXP_PULLMAN;
7466              TX=BMT Budd;                                                                                \
7467                C=2*BMT_EXP_BUDD;
7468              TX=BMT Multi;                                                                               \
7469                C=2*BMT_MULTI;
7470              TX=BMT Compt;                                                                               \
7471                C=3*BMT_COMPT;
7472              TX=BMT R16;                                                                                 \
7473                C=(5*BMT_R16G)|(5*BMT_R16_5TH_AVE)|(5*BMT_R16TR);
7474            $ENDGROUP
7475            $GROUP                                                                                        \
7476                NAME=US_NY_S5;                                                                            \
7477                LC=2; %GBG((STBGFO|STBGUB),ENV_WAYM);
7478              TX=IND R1;                                                                                  \
7479                C=5*(IND_R1_100L|IND_R1_100|IND_R1_200L|IND_R1_200);
7480              TX=IND R4;                                                                                  \
7481                C=5*(IND_R4L|IND_R4)|(5*(NYCS_R4MTAL|NYCS_R4MTA));
7482              TX=IND R10;                                                                                 \
7483                C=(5*IND_R10TR)|(5*IND_R10_1964)|(5*NYCS_R10SB)|(5*IND_R10G);
7484              TX=IND R11;                                                                                 \
7485                C=5*(IND_R11);
7486              TX=IRT R26;                                                                                 \
7487                C=<NYCS_R26B1,9*NYCS_R26B2|NYCS_R26B3|NYCS_R26B4|NYCS_R26B5|NYCS_R26B6;
7488              TX=IRT R26;                                                                                 \
7489                C=<NYCS_R26R1,9*NYCS_R26R2|NYCS_R26R3|NYCS_R26R4|NYCS_R26R5|NYCS_R26R6;
7490              TX=IRT R26;                                                                                 \
7491                C=<NYCS_R26W1,9*NYCS_R26W2|NYCS_R26W3|NYCS_R26W4|NYCS_R26W5|NYCS_R26W6;
7492            $ENDGROUP
7493            $GROUP                                                                                        \
7494                NAME=US_NY_S6;                                                                            \
7495                LC=2; %GBG((STBGFO|STBGUB),ENV_WAYM);
7496              TX=NYC IRT R26;                                                                             \
7497                C=<NYCS_R26WB1,9*NYCS_R26WB2|NYCS_R26WB3|NYCS_R26WB4|NYCS_R26WB5|NYCS_R26WB6;
7498              TX=IND R30;                                                                                 \
7499                C=(5*(IND_R30G1|IND_R30G2))|(5*(IND_R30TR1|IND_R30TR2))|(5*(NYCS_R30SB1,NYCS_R30SB2))|    \
7500                  (5*(NYCS_R30FR1|NYCS_R30FR2));
7501              TX=NYCTA R32;                                                                               \
7502                C=<NYCS_R32A1,7*NYCS_R32A2|NYCS_R32A3|NYCS_R32A4|NYCS_R32A4|NYCS_R32A5;
7503              TX=IND R32;                                                                                 \
7504                C=(5*NYCS_R32O)|(5*NYCS_R32GOH);
7505              TX=IND R38;                                                                                 \
7506                C=5*(NYCS_R38O|NYCS_R38AC|NYCS_R38GOH);
7507              TX=IND R34;                                                                                 \
7508                C=5*(NYCS_R34);
7509              TX=R38;                                                                                     \
7510                TXY=15;                                                                                   \
7511                C=<NYCS_R38A1,7*NYCS_R38A2|NYCS_R38A3|NYCS_R38A4|NYCS_R38A5;
7512              TX=R 40;                                                                                    \
7513                C=(4*(<NYCS_R40M1,NYCS_R40M2))|(4*(<NYCS_R40M_GOH1,NYCS_R40M_GOH2))|                      \
7514                  (<NYCS_R40A,6*(<NYCS_R40GOH2,NYCS_R40GOH1),NYCS_R40B);
7515              TX=R 40;                                                                                    \
7516                C=4*(<NYCS_R40M1,NYCS_R40M2)|(4*(<NYCS_R40M_GOH1,NYCS_R40M_GOH2));
7517            $ENDGROUP
7518            $GROUP                                                                                        \
7519                NAME=US_NY_S7;                                                                            \
7520                LC=2; %GBG((STBGFO|STBGUB),ENV_WAYM);
7521              TX=R 42;                                                                                    \
7522                C=(3*(<NYCS_R42A,NYCS_R42B))|(3*(<NYCS_R42_GOH1,NYCS_R42_GOH2));
7523              TX=R 46;                                                                                    \
7524                C=(<NYCS_R46A_JFKL,4*NYCS_R46B_JFKL,NYCS_R46A_JFK)|                                       \
7525                  (<NYCS_R46A_GOHL,3*NYCS_R46B_BICEN,NYCS_R46A_BICEN)|                                    \
7526                  (<NYCS_R46A_GOHL,NYCS_R46B_GOHL,NYCS_R46B_GOH,NYCS_R46A_GOH)|                           \
7527                  (<NYCS_R46A_MTAL,NYCS_R46B_MTAL,NYCS_R46B_MTA,NYCS_R46A_MTA);
7528              TX=R46;                                                                                     \
7529                C=<NYCS_R46AFL,6*NYCS_R46A1,NYCS_R46AF;
7530              TX=R62;                                                                                     \
7531                C=<NYCS_R62FL,8*NYCS_R62M,NYCS_R62F;
7532              TX=R 68;                                                                                    \
7533                C=3*(<NYCS_R68,NYCS_R68_GOH);
7534              TX=NYCTA R110;                                                                              \
7535                C=<NYCS_R110FL,8*NYCS_R110M1|NYCS_R110M2|NYCS_R110M3,NYCS_R110F;
7536              TX=NYCTA R142;                                                                              \
7537                C=<NYCS_R142FL,8*NYCS_R142M1|NYCS_R142M2|NYCS_R142M3,NYCS_R142F;
7538              TX=SIRT;                                                                                    \
7539                C=(5*SIRT_ME1B)|(5*BMT_ME1)|(5*SIRT_ME1G);
7540            $ENDGROUP
7541            $GROUP                                                                                        \
7542                NAME=US_NY_SM;                                                                            \
7543                LC=1; %GBG((STBGFO|STBGUB),ENV_WAYM);
7544              TX=Arbeitswagen/maintenance;                                                                \
7545                C=NYCTA_LO_V_RIDER|NYCTA_LO_V_WKM|NYCTA_R12_WM|NYCTA_R127|NYCTA_R134|NYCTA_R15_RIDER|     \
7546                  NYCTA_R30_RAC|NYCTA_R33_MONEY|NYCTA_R33_PUMP|NYCTA_R33_RIDER;
7547              TX=IND R1;                                                                                  \
7548                C=5*(IND_R1_100L|IND_R1_100|IND_R1_200L|IND_R1_200);
7549              TX=IND R1;                                                                                  \
7550                C=5*(IND_R1_100L|IND_R1_100|IND_R1_200L|IND_R1_200);
7551              TX=BMT R16;                                                                                 \
7552                C=(5*BMT_R16G)|(5*BMT_R16_5TH_AVE)|(5*BMT_R16TR);
7553              TX=BMT R16;                                                                                 \
7554                C=(5*BMT_R16G)|(5*BMT_R16_5TH_AVE)|(5*BMT_R16TR);
7555            $ENDGROUP
7556          $ENDSECTION
7557        }
7558      }
7559      {CN?
7560  #--------------------------------------------------------------------------
7561  #
7562  # Hong Kong
7563  #
7564        $SECTION                                                                                          \
7565            NAME=HK_HONG_KONG;                                                                            \
7566            SEQ=D; %SECFIN;%TITLE(Hong Kong);
7567          {CRAIL?
7568            $GROUP                                                                                        \
7569                NAME=HK_C1;                                                                               \
7570                LC=2; %GBG(STBGFO,ENV_WAYT6);
7571              C=KCR_ALSTOM1;
7572              C=KCR_ALSTOM2;
7573              C=<KCR_YEL1L,KCR_YEL2,KCR_YEL3,KCR_YEL2L,KCR_YEL4,KCR_YEL1L,KCR_YEL2,KCR_YEL3,KCR_YEL2L,    \
7574                  KCR_YEL1;
7575              C=<KCR_MLR1L,KCR_MLR2,KCR_MLR3,KCR_MLR2L,KCR_MLR4L,KCR_MLR1;
7576              C=<KCR_MLR1L,KCR_MLR4,KCR_MLR2,KCR_MLR3L,KCR_MLR2L,KCR_MLR1;
7577              C=<KCR_MLRS1L,KCR_MLRS2,KCR_MLRS3,KCR_MLRS2L,KCR_MLRS4L,KCR_MLRS1;
7578              C=<KCR_MLRS1L,KCR_MLRS4,KCR_MLRS2,KCR_MLRS3L,KCR_MLRS2L,KCR_MLRS1;
7579              C=<KCR_SP1L,KCR_SP2L,KCR_SP3,KCR_SP2,KCR_SP4L,KCR_SP1;
7580              C=<KCR_SP1L,KCR_SP4,KCR_SP2L,KCR_SP3L,KCR_SP2,KCR_SP1;
7581            $ENDGROUP
7582            $GROUP                                                                                        \
7583                NAME=HK_C2;                                                                               \
7584                LC=1;                                                                                     \
7585                GBGSTBGFO,ENV_WAYT6;
7586              C=KCR_KTT2L,KCR_KTTT1L,KCR_KTTT2L,KCR_KTTT3L,KCR_KTTT4L;                                    \
7587                D=L;
7588              C=KCR_KTT2,KCR_KTTT1,KCR_KTTT2,KCR_KTTT3,KCR_KTTT4;                                         \
7589                D=R;
7590            $ENDGROUP
7591            $GROUP                                                                                        \
7592                NAME=HK_C3;                                                                               \
7593                LC=1;                                                                                     \
7594                GBGSTBGFO,ENV_WAYT6;
7595              C=<MTR_AEL1L,MTR_AEL2,MTR_AEL3,MTR_AEL2,MTR_AEL1;
7596              C=<MTR_TCL1L,MTR_TCL2,MTR_TCL3,MTR_TCL3L,MTR_TCL1;
7597              C=<MTR_DISNEY1L,MTR_DISNEY1;
7598              C=<MTR_K1L,MTR_K2,MTR_K3,MTR_K3L,MTR_K1;
7599              C=<MTR_M1(|P2)L,MTR_M2,MTR_M3L,MTR_M3,MTR_M1(|P2);
7600              C=<MTR_O1L,MTR_O2,MTR_O3L,MTR_O3,MTR_O1;
7601            $ENDGROUP
7602          }
7603          {TRAM?
7604            $GROUP                                                                                        \
7605                NAME=HK_T1;                                                                               \
7606                LC=1; %GBG(STBGMD,ENV_WAYT1);
7607              C=1-2@JWR_P(1O|2O)(|L);
7608              C=1-2@JWR_P(1|3)(A|B)(|L);
7609              C=JWR_P2(O,OT)(|L);
7610              C=JWR_P2(A,AT)(|L);
7611            $ENDGROUP
7612            $GROUP                                                                                        \
7613                NAME=HK_T2;                                                                               \
7614                LC=1;                                                                                     \
7615                GBGSTBGMD,ENV_WAYT1;
7616              M=STOP;                                                                                     \
7617                C=HKONG_TRAM(B|G0|G1|G2|G3|K|NEW|O|OLD|P|R|SPEC|TRICOLOR|W|X1|X2|Y);                      \
7618                VH=65;
7619              M=FOLLOW;                                                                                   \
7620                C=$SELECT(SAMECAT=HKONG_TRAMG0-HKONG_TRAM170MILLENIUM;WAY=T;MAX=7;D=S;DELIM=";");         \
7621                VH=65;
7622              M=FOLLOW;                                                                                   \
7623                C=$SELECT(SAMECAT=HKONG_TRAMG0-HKONG_TRAM170MILLENIUM;WAY=T;MAX=7;D=S;DELIM=";");         \
7624                VH=65;
7625              M=FOLLOW;                                                                                   \
7626                C=$SELECT(SAMECAT=HKONG_TRAMG0-HKONG_TRAM170MILLENIUM;WAY=T;MAX=7;D=S;DELIM=";");         \
7627                VH=65;
7628            $ENDGROUP
7629          }
7630          {BUS?
7631            $GROUP                                                                                        \
7632                NAME=HK_B1;                                                                               \
7633                LC=1; %GBG(STBGMD,ENV_WAYA);
7634              M=FOLLOW;                                                                                   \
7635                C=(HKONG_KOWLOONL;HKONG_CITYL;HKONG_NWFL);
7636              M=FOLLOW;                                                                                   \
7637                C=(HKONG_KOWLOON;HKONG_CITY;HKONG_NWF);
7638            $ENDGROUP
7639          }
7640          {TRAM?
7641            $GROUP                                                                                        \
7642                NAME=HK_PT;                                                                               \
7643                LC=1; %GBG(STBGMD,ENV_WAYT1);
7644              C=HK_OLDPEAKTRAM(|L);
7645              C=HK_PEAKTRAM11;
7646            $ENDGROUP
7647          }
7648          {CRAIL?
7649            $GROUP                                                                                        \
7650                NAME=HK_A1;                                                                               \
7651                LC=1; %GBG(STBGFO,ENV_WAYT6);
7652              C=HK_AMP_IHI;
7653              C=HK_AMP_MITSU;
7654            $ENDGROUP
7655          }
7656        $ENDSECTION
7657      }
7658    $ENDSECTION
7659  # ) ] }