Transliterate English text using the Greek alphabet: Difference between revisions

Content added Content deleted
No edit summary
m (more double letter substitutions)
Line 102: Line 102:
"""I was looking at some rhododendrons in my back garden,
"""I was looking at some rhododendrons in my back garden,
dressed in my khaki shorts, when the telephone rang.
dressed in my khaki shorts, when the telephone rang.

As I answered it, I cheerfully glimpsed that the July sun
As I answered it, I cheerfully glimpsed that the July sun
caused a fragment of black pine wax to ooze on the velvet quilt
caused a fragment of black pine wax to ooze on the velvet quilt
Line 110: Line 110:
const replacements = [
const replacements = [
"ch" => "χ", "th" => "θ", "ps" => "ψ", "ph" => "f", r"s(\W)" => s"ς\1",
"ch" => "χ", "th" => "θ", "ps" => "ψ", "ph" => "f", r"s(\W)" => s"ς\1",
"Ch" => "Χ", "Th" => "Θ", "Ps" => "Ψ", "Ph" => "F", "a" => "α", "b" => "β",
"Ch" => "Χ", "Th" => "Θ", "Ps" => "Ψ", "Ph" => "F", "ee" => "h",
"ck" => "k", "rh" => "r", "kh" => "χ", "oo" => "w", "a" => "α", "b" => "β",
"d" => "δ", "e" => "ε", "f" => "φ", "g" => "γ", "h" => "η", "i" => "ι",
"d" => "δ", "e" => "ε", "f" => "φ", "g" => "γ", "h" => "η", "i" => "ι",
"j" => "ι", "l" => "λ", "m" => "μ", "n" => "ν", "o" => "ο", "p" => "π",
"j" => "ι", "l" => "λ", "m" => "μ", "n" => "ν", "o" => "ο", "p" => "π",
"q" => "κ", "r" => "ρ", "s" => "σ", "t" => "τ", "u" => "υ", "w" => "ω",
"q" => "κ", "r" => "ρ", "s" => "σ", "t" => "τ", "u" => "υ", "w" => "ω",
"x" => "ξ", "z" => "ζ", "A" => "Α", "B" => "Β", "D" => "Δ", "E" => "Ε",
"x" => "ξ", "z" => "ζ", "A" => "Α", "B" => "Β", "D" => "Δ", "E" => "Ε",
"F" => "Φ", "G" => "Γ", "H" => "Η", "I" => "Ι", "J" => "I", "L" => "Λ",
"F" => "Φ", "G" => "Γ", "H" => "Η", "I" => "Ι", "J" => "I", "L" => "Λ",
"M" => "Μ", "N" => "Ν", "O" => "Ο", "P" => "Π", "Q" => "Κ", "R" => "Ρ",
"M" => "Μ", "N" => "Ν", "O" => "Ο", "P" => "Π", "Q" => "Κ", "R" => "Ρ",
"S" => "Σ", "T" => "Τ", "U" => "Υ", "W" => "Ω", "X" => "Ξ", "Z" => "Ζ"]
"S" => "Σ", "T" => "Τ", "U" => "Υ", "W" => "Ω", "X" => "Ξ", "Z" => "Ζ"]

for txt in texts
for txt in texts
println("$txt\n=>")
println("$txt\n=>")
Line 126: Line 127:
println("$txt\n", "="^65)
println("$txt\n", "="^65)
end
end
</lang>{{out}}Same as first part of Wren entry.
</lang>{{out}}
<pre>
The quick brown fox jumped over the lazy dog.
=>
Θε κυιk βροων φοξ ιυμπεδ οvερ θε λαζy δογ.
=================================================================
I was looking at some rhododendrons in my back garden,
dressed in my khaki shorts, when the telephone rang.

As I answered it, I cheerfully glimpsed that the July sun
caused a fragment of black pine wax to ooze on the velvet quilt
laying in my patio.
=>
Ι ωας λωkινγ ατ σομε ροδοδενδρονς ιν μy βαk γαρδεν,
δρεσσεδ ιν μy χαkι σηορτς, ωηεν θε τελεφονε ρανγ.


Ας Ι ανσωερεδ ιτ, Ι χηρφυλλy γλιμψεδ θατ θε Iυλy συν
cαυσεδ α φραγμεντ οφ βλαk πινε ωαξ το ωζε ον θε vελvετ κυιλτ
λαyινγ ιν μy πατιο.
=================================================================
sphinx of black quartz, judge my vow.
=>
σφινξ οφ βλαk κυαρτζ, ιυδγε μy vοω.
=================================================================
</pre>


=={{header|Wren}}==
=={{header|Wren}}==
Retrieved from "https://rosettacode.org/wiki/Transliterate_English_text_using_the_Greek_alphabet"