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