cthulhu.cr

module Cthulhu
  extend self
  def fools!(data : String)
    data.split(' ').map do |word|
      R[word]? || word
    end.join(' ')
  end

  #  ah          action, e.g. greet, eat, do
  R = {
    "place"                => "-agl",
    "greet"                => "ah",
    "eat"                  => "ah",
    "do"                   => "ah",
    "speak"                => "'ai",
    "call"                 => "'ai",
    "sign"                 => "athg",
    "agree"                => "athg",
    "body"                 => "'bthnk",
    "essence"              => "'bthnk",
    "go"                   => "bug",
    "our"                  => "c-",
    "we"                   => "c-",
    "cross over"           => "ch'",
    "travel"               => "ch'",
    "brotherhood"          => "chtenff",
    "society"              => "chtenff",
    "pit"                  => "ebumna",
    "answers"              => "ee",
    "integrity"            => "ehye",
    "cohesion"             => "ehye",
    "after"                => "ep",
    "hai"                  => "ep",
    "later"                => "ep",
    "then"                 => "ep",
    "they"                 => "f'-",
    "their"                => "f'-",
    "mother"               => "'fhalma",
    "wait"                 => "fhtagn",
    "sleep"                => "fhtagn",
    "burn"                 => "fm'latgh",
    "boundary"             => "ftaghu",
    "skin"                 => "ftaghu",
    "here"                 => "geb",
    "father"               => "gnaiih",
    "children"             => "gof'nn",
    "grant"                => "goka",
    "wish"                 => "gotha",
    "lost one"             => "grah'n",
    "larva"                => "grah'n",
    "it"                   => "h'-",
    "its"                  => "h'-",
    "priest"               => "hafh'drn",
    "summoner"             => "hafh'drn",
    "now"                  => "hai",
    "heretic"              => "hlirgh",
    "followers"            => "hrii",
    "born of"              => "hupadgh",
    "expect"               => "ilyaa",
    "await"                => "ilyaa",
    "share"                => "k'yarnak",
    "exchange"             => "k'yarnak",
    "understand"           => "kadishtu",
    "know"                 => "kadishtu",
    "question"             => "kn'a",
    "on pain of"           => "li'hee",
    "at"                   => "llll",
    "beside"               => "llll",
    "mind"                 => "lloig",
    "psyche"               => "lloig",
    "dream"                => "lw'nafh",
    "transmit"             => "lw'nafh",
    "yet"                  => "mg",
    "worthless"            => "mnahn'",
    "death"                => "n'gha",
    "darkness"             => "n'ghft",
    "not"                  => "nafl-",
    "and"                  => "ng-",
    "then"                 => "ng-",
    "threshold"            => "nglui",
    "everything"           => "nilgh'ri",
    "anything"             => "nilgh'ri",
    "protect"              => "nnn-",
    "watch"                => "nnn-",
    "come"                 => "nog",
    "head"                 => "nw",
    "place"                => "nw",
    "servant"              => "-nyth",
    "visit"                => "ooboshu",
    "aspect"               => "-or",
    "force"                => "-or",
    "soul"                 => "orr'e",
    "spirit"               => "orr'e",
    "native"               => "-oth",
    "over"                 => "ph'-",
    "beyond"               => "ph'-",
    "realm"                => "phlegeth",
    "secret"               => "r'luh",
    "hidden"               => "r'luh",
    "religion"             => "ron",
    "cult"                 => "ron",
    "pact"                 => "s'uhn",
    "share space"          => "sgn'wahl",
    "dreams"               => "shagg",
    "darkness"             => "shogg",
    "notify"               => "shtunggli",
    "contact"              => "shtunggli",
    "Earth"                => "shugg",
    "invite"               => "sll'ha",
    "ask"                  => "stell'bsna",
    "pray"                 => "stell'bsna",
    "eternity"             => "syha'h",
    "bring"                => "tharanak",
    "promise"              => "tharanak",
    "tremble"              => "throd",
    "crowd"                => "uh'e",
    "people"               => "uh'e",
    "summon"               => "uln",
    "call"                 => "uln",
    "pray"                 => "vulgtlagln",
    "prayer"               => "vulgtm",
    "reside"               => "wgah'n",
    "control"              => "wgah'n",
    "amen"                 => "y'hah",
    "I"                    => "y-",
    "my"                   => "y-",
    "I"                    => "ya",
    "time"                 => "-yar",
    "moment"               => "-yar",
    "lift"                 => "zhro",
  }
end

puts Cthulhu.fools!(
"I am the great one, I am on Earth to bring terror byond the people for eternity in my name.
tremble before me.
watch me my servent, call my soul, call for my visit, and pray for my darkness, ask for your death")

ya am the great one, ya am on shugg to tharanak terror byond the uh'e for syha'h in y- name.
tremble before me.
watch me y- servent, uln y- soul, uln for y- visit, ng- vulgtlagln for y- darkness, stell'bsna for your n'gha