Updated the Eittlandic runic alphabet

This commit is contained in:
Lucien Cartier-Tilet 2020-08-22 13:04:51 +02:00
parent 9d29817ef1
commit 103d096091
Signed by: phundrak
GPG Key ID: BD7789E705CB8DCA

View File

@ -201,78 +201,75 @@ corresponding runes during org-mode export"
(conlanging//replace-string-by-char t-text conlanging//matter-latin-to-runes))) (conlanging//replace-string-by-char t-text conlanging//matter-latin-to-runes)))
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; Eittlanda ; ; Eittlandic ;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(defvar conlanging//eittlanda-latin-to-latex '((", *" . "\\\\tripledot") (defvar conlanging//eittlandic-latin-to-latex '((", *\\|\\. *" . "\\\\tripledot")
("\\. *" . "\\\\tripledot")
(" +" . ":") (" +" . ":")
("hv" . "x") ("hv" . "x")
("ø" . "\\\\o") ("í" . "i")
("œ" . "\\\\oO") ("é" . "\\\\e")
("v" . "w") ("ę\\" . "æ")
("ó" . "v") ("ý" . "y")
("ń" . "\\\\ndot")) ("œ" . "ø")
("ú" . "u")
("ó" . "o")
("á\\" . "a")
("j" . "i"))
"Equivalence between the Eittlandic orthography in the Latin "Equivalence between the Eittlandic orthography in the Latin
script and the LaTeX code for the Runic script. The first element script and the LaTeX code for the Runic script. The first element
of a pair is the Latin script orthography, the second is the of a pair is the Latin script orthography, the second is the
Runic LaTeX code equivalent.") Runic LaTeX code equivalent.")
(defvar conlanging//eittlanda-latin-to-runes '((", *" . "") (defvar conlanging//eittlandic-latin-to-runes '((", *\\|\\. *" . "")
("\\. *" . "") (" +\\|:" . "")
(" +" . "")
(":" . "")
("hv" . "") ("hv" . "")
("i" . "") ("i\\\\|j" . "")
("y" . "") ("é" . "")
("u" . "") ("e\\\\" . "")
("e" . "") ("y\\" . "")
("ø" . "") ("ø\\" . "")
("o" . "") ("u\\\\|v\\|w" . "")
("œ" . "") ("o\\" . "")
("ó" . "") ("a\\\\" . "")
("æ" . "")
("a" . "")
("m" . "")
("n" . "")
("ń" . "")
("p" . "") ("p" . "")
("b" . "") ("b" . "")
("f" . "")
("t" . "") ("t" . "")
("d" . "") ("d" . "")
("k" . "")
("g" . "")
("f" . "")
("þ" . "") ("þ" . "")
("ð" . "") ("ð" . "")
("s" . "") ("s" . "")
("k" . "")
("g" . "")
("h" . "") ("h" . "")
("v" . "") ("m" . "")
("n" . "")
("r" . "") ("r" . "")
("l" . "")) ("l" . ""))
"Equivalence between the Eittlandic orthography in the Latin "Equivalence between the Eittlandic orthography in the Latin
script and the Runic script. The first element of a pair is the script and the Runic script. The first element of a pair is the
Latin script orthography, the second is the Runic equivalent.") Latin script orthography, the second is the Runic equivalent.")
(defun conlanging/eittlanda-to-runes () (defun conlanging/eittlandic-to-runes ()
"Replaces transliterated Eittlandic with its runic writing system" "Replaces transliterated Eittlandic with its runic writing system"
(interactive) (interactive)
(conlanging//replace-char-by-table conlanging//eittlanda-latin-to-runes)) (conlanging//replace-char-by-table conlanging//eittlandic-latin-to-runes))
(defun conlanging/eittlanda-to-latex () (defun conlanging/eittlandic-to-latex ()
"Replaces transliterated Eittlandic with its corresponding runes" "Replaces transliterated Eittlandic with its corresponding runes"
(interactive) (interactive)
(conlanging//replace-char-by-table conlanging//eittlanda-latin-to-latex)) (conlanging//replace-char-by-table conlanging//eittlandic-latin-to-latex))
(defun conlanging/eittlanda-org-export-runes (t-text) (defun conlanging/eittlandic-org-export-runes (t-text)
"Replaces transliterated Eittlandic with its corresponding "Replaces transliterated Eittlandic with its corresponding
runes during org-mode export" runes during org-mode export"
(interactive) (interactive)
(if (org-export-derived-backend-p org-export-current-backend (if (org-export-derived-backend-p org-export-current-backend
'latex) 'latex)
(concat "\\textarm{" (concat "\\textarm{"
(conlanging//replace-string-by-char t-text conlanging//eittlanda-latin-to-latex) (conlanging//replace-string-by-char t-text conlanging//eittlandic-latin-to-latex)
"}") "}")
(conlanging//replace-string-by-char t-text conlanging//eittlanda-latin-to-runes))) (conlanging//replace-string-by-char t-text conlanging//eittlandic-latin-to-runes)))
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; Ñyqy ; ; Ñyqy ;