Unverified Commit 23cd71fc authored by Lili Urban's avatar Lili Urban Committed by GitHub
Browse files

Extend train names and rolling stock models

parent c3e2e5ad

lib/Travel/Status/DE/DBRIS/Formation/Group.pm

+13 −0
Original line number Diff line number Diff line
@@ -283,9 +283,12 @@ my %ice_name = ( 
	9202 => 'Schleswig-Holstein',

	9203 => 'Stendal',

	9205 => 'Biosphärengebiet Schwäbische Alb',

	9207 => 'Altenbeken',

	9208 => 'Nationalpark Bayrischer Wald',

	9212 => 'Braunschweig',

	9220 => 'Steiermark',

	9223 => '75 Jahre Bundespolizei',

	9229 => 'Zwickau',

	9234 => 'Ruhr',

	9237 => 'Spree',

	9457 => 'Bundesrepublik Deutschland',
@@ -327,6 +330,7 @@ my %model_name = ( 
	'429'      => [ 'FLIRT', 'BR 429' ],

	'1430'     => [ 'FLIRT', 'BR 1430' ],

	'430'      => ['BR 430'],

	'1440'     => [ 'Coradia Continental', 'BR 1440' ],

	'440'      => [ 'Coradia Continental', 'BR 440' ],

	'442'      => [ 'Talent 2',            'BR 442' ],

	'445'      => [ 'Twindexx Vario',      'BR 445' ],
@@ -334,6 +338,7 @@ my %model_name = ( 
	'445446'   => [ 'Stadler KISS',        'BR 445' ],

	'462'      => [ 'Desiro HC',           'BR 462' ],

	'463'      => [ 'Mireo',               'BR 463' ],

	'464'      => [ 'Mireo Smart',         'BR 464' ],

	'475'      => [ 'TGV',                 'BR 475' ],

	'526'      => [ 'FLIRT Akku',          'BR 526' ],

	'563'      => [ 'Mireo Plus B',        'BR 563' ],
@@ -467,6 +472,7 @@ sub parse_model { 
		'429'      => 0,

		'1430'     => 0,

		'430'      => 0,

		'1440'     => 0,

		'440'      => 0,

		'442'      => 0,

		'445'      => 0,
@@ -474,6 +480,7 @@ sub parse_model { 
		'445446'   => 0,

		'462'      => 0,

		'463'      => 0,

		'464'      => 0,

		'475'      => 0,

		'526'      => 0,

		'563'      => 0,
@@ -584,6 +591,9 @@ sub parse_model { 
			elsif ( $carriage->model == 430 or $carriage->model == 431 ) {

				$ml{'430'}++;

			}

			elsif (substr( $carriage->uic_id, 5, 4 ) eq '1440' or substr( $carriage->uic_id, 5, 4 ) eq '1441' ) {

			    $ml{'1440'}++;

			}

			elsif ($carriage->model == 440

				or $carriage->model == 441

				or $carriage->model == 841 )
@@ -604,6 +614,9 @@ sub parse_model { 
				or $carriage->model == 863 )

			{

				$ml{'463'}++;

			}

			elsif ($carriage->model == 464 ) {

            	$ml{'464'}++;

            }

			elsif ( substr( $carriage->uic_id, 5, 4 ) =~ m{ 44 [56] [16] }x ) {

				$ml{'445446'}++;