Find file
Fetching contributors…
Cannot retrieve contributors at this time
68 lines (58 sloc) 2.23 KB
#!/usr/bin/env ruby
# Stupid Morse Code decoder because MSPA decided to do an entire story arc in Morse. Idiots.
decodes = {
".-" => "A",
"-..." => "B",
"-.-." => "C",
"-.." => "D",
"." => "E",
"..-." => "F",
"--." => "G",
"...." => "H",
".." => "I",
".---" => "J",
"-.-" => "K",
".-.." => "L",
"--" => "M",
"-." => "N",
"---" => "O",
".--." => "P",
"--.-" => "Q",
".-." => "R",
"..." => "S",
"-" => "T",
"..-" => "U",
"...-" => "V",
".--" => "W",
"-..-" => "X",
"-.--" => "Y",
"--.." => "Z",
".----" => "1",
"..---" => "2",
"...--" => "3",
"....-" => "4",
"....." => "5",
"-...." => "6",
"--..." => "7",
"---.." => "8",
"----." => "9",
"-----" => "0"
}
code1 = ".-- .... .- - / .- / -.. .- .-. .. -. --. / -.. .-. . .- --"
code2 = "- --- / -.-. --- -- -... .. -. . / - .... . / ..-. .. -. . ... - / --.- ..- .- .-.. .. - .. . ... / --- ..-. / .... ..- -- .- -. .. - -.-- / .-- .. - .... / - .... . / . .-.. . --. .- -. -.-. . / .- -. -.. / -. --- -... .. .-.. .. - -.-- / --- ..-. / - .... . / .- -. .. -- .- .-.. / -.- .. -. --. -.. --- --"
code3 = ".... --- .-- / -.-- --- ..- / .-- .. ... .... / -.-- --- ..- / -.-. --- ..- .-.. -.. / -.- -. --- .-- / - .... . .. .-. / .-- --- .-. .-.. -.."
code4 = "- --- / .... . .- .-. / --- -. . / -. .. --. .... - / - .... --- ... . / -- ..- - . -.. / .--. .- .-- .--. .- -.. ... / - .-. .- .. .--. ... . / ..- .--. / -.-- --- ..- .-. / ... - .- .. .-. ..."
code5 = ".- / .-.. --- .-- / -... ..- - / ..-. .-. .. . -. -.. .-.. -.-- / --. .-. --- .-- .-.. / ..- -. ... . - - .-.. . ... / -.-- --- ..- .-. / ... .-.. ..- -- -... . .-."
code6 = ".- -. -.. / .- ... / - .... . / ... --- .--. --- .-. / ... . . .--. ... / ..-. .-. --- -- / -.-- --- ..- .-. / . -.-- . ..."
code7 = "- .... . -.-- / -.. . - . -.-. - / .- / ... .... .- .-. .--. / .--. .- .. .-. / --- ..-. / . .- .-. ... / -.-. ..- - - .. -. --. / -- --- --- -. .-.. .. --. .... -"
code8 = ".- / -- -.-- ... - . .-. .. --- ..- ... / .-- --- .-.. ...- . -. / - --- -. --. ..- . / .. -. ...- .. - . ..."
c = code8
c = " #{c} "
decodes.each do |code, decode|
puts c
code = code.gsub(/\./, "\\.")
r = Regexp.new "(\s+)#{code}(\s+)"
c.gsub! r, " #{decode} "
c.gsub! r, " #{decode} "
end
puts c