summaryrefslogtreecommitdiff
path: root/lib/Enigmatic/RotorBox.pm
diff options
context:
space:
mode:
Diffstat (limited to 'lib/Enigmatic/RotorBox.pm')
-rw-r--r--lib/Enigmatic/RotorBox.pm20
1 files changed, 10 insertions, 10 deletions
diff --git a/lib/Enigmatic/RotorBox.pm b/lib/Enigmatic/RotorBox.pm
index 08a6b22..57f0a47 100644
--- a/lib/Enigmatic/RotorBox.pm
+++ b/lib/Enigmatic/RotorBox.pm
@@ -17,16 +17,16 @@ has rotorset => (
sub _build_rotorset {
my %rotors = (
- I => 'EKMFLGDQVZNTOWYHXUSPAIBRCJ',
- II => 'AJDKSIRUXBLHWTMCQGZNPYFVOE',
- III => 'BDFHJLCPRTXVZNYEIWGAKMUSQO',
- IV => 'ESOVPZJAYQUIRHXLNFTGKDCMWB',
- V => 'VZBRGITYUPSDNHLXAWMJQOFECK',
- VI => 'JPGVOUMFYQBENHZRDKASXLICTW',
- VII => 'NZJHGRCXMYSWBOUFAIVLPEKQDT',
- VIII => 'FKQHTLXOCBJSPDZRAMEWNIUYGV',
- Beta => 'LEYJVCNIXWPBQMDRTAKZGFUHOS',
- Gamma => 'FSOKANUERHMBTIYCWLQPZXVGJD',
+ I => { wiring => 'EKMFLGDQVZNTOWYHXUSPAIBRCJ', notches => ['Q'] },
+ II => { wiring => 'AJDKSIRUXBLHWTMCQGZNPYFVOE', notches => ['E'] },
+ III => { wiring => 'BDFHJLCPRTXVZNYEIWGAKMUSQO', notches => ['V'] },
+ IV => { wiring => 'ESOVPZJAYQUIRHXLNFTGKDCMWB', notches => ['J'] },
+ V => { wiring => 'VZBRGITYUPSDNHLXAWMJQOFECK', notches => ['Z'] },
+ VI => { wiring => 'JPGVOUMFYQBENHZRDKASXLICTW', notches => ['M','Z'] },
+ VII => { wiring => 'NZJHGRCXMYSWBOUFAIVLPEKQDT', notches => ['M','Z'] },
+ VIII => { wiring => 'FKQHTLXOCBJSPDZRAMEWNIUYGV', notches => ['M','Z'] },
+ Beta => { wiring => 'LEYJVCNIXWPBQMDRTAKZGFUHOS', notches => [] },
+ Gamma => { wiring => 'FSOKANUERHMBTIYCWLQPZXVGJD', notches => [''] },
);
$_ = Enigmatic::Rotor->new($_) for values %rotors;