1 files changed, 97 insertions, 0 deletions
diff --git a/templates/_wagon.html.ep b/templates/_wagon.html.ep
new file mode 100644
index 0000000..dccecc0
--- /dev/null
+++ b/templates/_wagon.html.ep
@@ -0,0 +1,97 @@
+% my $bg = '';
+% my $extra_class = '';
+% if ($wagon->has_first_class) {
+%   $extra_class .= ' firstclass';
+% }
+% if ($wagon->is_locomotive or $wagon->is_powercar) {
+%   $extra_class .= ' powercar';
+% }
+% if ($wagon->is_closed) {
+%   $extra_class .= ' closed';
+% }
+% if ($group->train_no ne $train_no) {
+%   $extra_class .= ' nondestwagon';
+% }
+  <div class="wagon <%= $extra_class %>" style="
+  top: <%= $wagon->start_percent %>%; bottom: <%= 100 - $wagon->end_percent %>%; <%= $bg %>">
+%   if ($wagon->is_locomotive or $wagon->is_powercar) {
+%   }
+%   elsif ($wagon->is_closed) {
+      X
+%   }
+%   else {
+%=    $wagon->number // q{}
+%     if ($wagon->has_wheelchair_space) {
+        <i class="material-icons" style="font-size: 20px;">accessible</i>
+%     }
+%     if ($wagon->has_bistro) {
+        <i class="material-icons">restaurant</i>
+%     }
+%     if ($wagon->has_quiet_zone) {
+        <i class="tiny material-icons">volume_off</i>
+%     }
+%     if ($wagon->has_family_zone) {
+        <i class="material-icons">people</i>
+%     }
+%     if ($wagon->has_bahn_comfort) {
+        <i class="material-icons">star</i>
+%     }
+%   }
+  <div class="direction">
+%   if (not defined $wr->direction) {
+%   }
+%   elsif ($wr->direction == 100) {
+      <i class="material-icons">arrow_downward</i>
+%   }
+%   else {
+      <i class="material-icons">arrow_upward</i>
+%   }
+  </div>
+  </div>
+  <div class="details" style="
+  top: <%= $wagon->start_percent %>%; bottom: <%= 100 - $wagon->end_percent %>%;">
+%   if ($exit_dir ne 'right') {
+%     if (my $img = wagon_image($wr->train_type // '?', $wagon->type, $wagon->uic_id)) {
+        <a class="type" href="/w/<%= $img %>?n=<%= $wagon->number // '' %>&amp;s=<%= $wagon->section %>&amp;r=<%= $wref %>"><%= $wagon->type %></a>
+%     }
+%     else {
+        <span class="type">
+%=        $wagon->type
+        </span>
+%     }
+%   }
+%   my $uic_id = $wagon->uic_id;
+%   if (length($uic_id) != 12 and length($uic_id) != 14) {
+      <span class="uicunknown"><%= $uic_id %></span>
+%   }
+%   elsif (substr($uic_id, 0, 2) >= 90) {
+      <span class="uicexchange"><%= substr($uic_id, 0, 2) %></span><span class="uiccountry"><%= substr($uic_id, 2, 2) %></span><span class="uic5"><%= substr($uic_id, 4, 1) %></span><span class="uictype"><%= substr($uic_id, 5, 3) %></span><span class="uicno"><%= substr($uic_id, 8, 3) %></span><span class="uiccheck"><%= substr($uic_id, 11) %></span>
+%   }
+%   else {
+      <span class="uicexchange"><%= substr($uic_id, 0, 2) %></span><span class="uiccountry"><%= substr($uic_id, 2, 2) %></span><span class="uic56"><%= substr($uic_id, 4, 2) %></span><span class="uic78"><%= substr($uic_id, 6, 2) %></span><span class="uicno"><%= substr($uic_id, 8, 3) %></span><span class="uiccheck"><%= substr($uic_id, 11) %></span>
+%   }
+%   if ($exit_dir eq 'right') {
+%     if (my $img = wagon_image($wr->train_type // '?', $wagon->type, $wagon->uic_id)) {
+        <a class="type" href="/w/<%= $img %>?n=<%= $wagon->number // '' %>&amp;s=<%= $wagon->section %>&amp;r=<%= $wref %>"><%= $wagon->type %></a>
+%     }
+%     else {
+        <span class="type">
+%=        $wagon->type
+        </span>
+%     }
+%   }
+%   if ($multi and $first) {
+      <br/>
+      <span class="groupno">
+%       if (scalar $wr->train_numbers > 1) {
+          <%= $group->train_type %> <%= $group->train_no %>
+%       }
+%       if (scalar $wr->destinations > 1) {
+          → <%= $group->destination %>
+%       }
+      </span>
+      % if ($multi and $group->desc_short) {
+        <span class="grouptype"><%= $group->desc_short %></span>
+%     }
+%   }
+  </div>