#my @trbs = (56, 72, 99, 73, 74, 104, 97, 59, 89, 57);
my $map = {
- 0 => { trb => 72, sys => "TRB 00" },
-# 1 => { trb => 99, sys => "MCP 01" },
- 1 => { trb => 73, sys => "TRB 01" },
-# 2 => { trb => 74, sys => "MCP 03" },
- 2 => { trb => 104, sys => "TRB 02" },
-# 5 => { trb => 97, sys => "TOF 1" },
-# 6 => { trb => 59, sys => "TOF 2" },
-# 7 => { trb => 89, sys => "HODO" },
- 3 => { trb => 57, sys => "AUX" },
+ 0 => { trb => 99, sys => "MCP 00" },
+ 1 => { trb => 73, sys => "MCP 01" },
+ 2 => { trb => 72, sys => "MCP 02" },
+ 3 => { trb => 104, sys => "MCP 03" },
+ 4 => { trb => 57, sys => "AUX" },
+# 5 => { trb => 97, sys => "TOF 1" },
+# 6 => { trb => 59, sys => "TOF 2" },
+# 7 => { trb => 83, sys => "HODO" },
-1 => { trb => 56, sys => "CTS" },
};