TTFIL zsz_citys.ttt

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