tomclegg.net |
25-pair colour code Posted September 18, 2004 A 25-pair category 3 telephone cable contains 50 wires. There are 5 groups: white, red, black, yellow, and violet. Each group contains 5 pairs: blue, orange, green, brown, and slate (grey). In each pair, the first wire is group-coloured with a pair-coloured stripe, and the second wire is pair-coloured with a group-coloured stripe. Thus, the first wire of the first pair of the first group is white with a blue stripe. The second wire is blue with a white stripe. --------first wire-------- --------second wire------- pair# wire colour stripe colour wire colour stripe colour 1 white blue blue white 2 white orange orange white 3 white green green white 4 white brown brown white 5 white slate slate white 6 red blue blue red 7 red orange orange red 8 red green green red 9 red brown brown red 10 red slate slate red 11 black blue blue black 12 black orange orange black 13 black green green black 14 black brown brown black 15 black slate slate black 16 yellow blue blue yellow 17 yellow orange orange yellow 18 yellow green green yellow 19 yellow brown brown yellow 20 yellow slate slate yellow 21 violet blue blue violet 22 violet orange orange violet 23 violet green green violet 24 violet brown brown violet 25 violet slate slate violet
#!/usr/bin/perl @gcolour = qw(white red black yellow violet); @pcolour = qw(blue orange green brown slate); $n = 0; print " --------first wire-------- --------second wire-------\n"; print "pair# wire colour stripe colour wire colour stripe colour\n"; for $g (@gcolour) { for $p (@pcolour) { ++$n; printf ("%5d %-11s %-13s %-11s %-13s\n", $n, $g, $p, $p, $g); } } |