Estoy usando el código proporcionado porMark Wibrow(Espirales de texto con TikZ) para generar un texto en espiral que podría incluir como portada de un informe.
El siguiente código funciona perfectamente bien cuando se utilizan caracteres latinos. Sin embargo, necesito poder escribir textos en griego. ¿Cómo puedo adaptar/arreglar este código para permitir la escritura griega?
\documentclass[tikz,border=5]{standalone}
\usepackage{ucs}
\usepackage[utf8x]{inputenc}
\usepackage[english, greek]{babel}
\newcommand{\en}{\selectlanguage{english}}
\newcommand{\gr}{\selectlanguage{greek}}
\usetikzlibrary{decorations.text}
\begin{document}
\begin{tikzpicture}[
decoration={
reverse path,
text effects along path,
text={Κείμενο στα ελληνικά.}, %text in greek
text effects/.cd,
text along path,
character count=\i, character total=\n,
characters={scale=1-\i/\n}
}
]
\draw [decorate] (0,0)
\foreach \i [evaluate={\r=(\i/2000)^2;}] in {0,5,...,2880}{ -- (\i:\r)};
\end{tikzpicture}
\end{document}
Debo mencionar que incluí dos nuevos comandos para cambiar de idioma más fácilmente además de los habitualesBabelpaquete para habilitar la escritura griega.
Respuesta1
Como hablante ignorante y monolingüe de inglés británico, mi experiencia con fuentes no inglesas y el babel
paquete LaTeX
es prácticamente nula, por lo que no tengo idea de cuán práctica/útil es esta solución. Además, no estoy seguro de que los caracteres se cuenten correctamente. Debe cumplirse lualatex
o xelatex
.
\documentclass[tikz,border=5]{standalone}
\usepackage{fontspec}
% Select appropriate font
\setmainfont{TeX Gyre Pagella}
\usetikzlibrary{decorations.text}
\begin{document}
\begin{tikzpicture}[
decoration={
reverse path,
text effects along path,
text={%
Βρυτε λεγερε συ μει. Φιμ συ αλτερα εριπυιτ σενσιβυς.
Ατ δεσωρε αλικυαμ εαμ. Ιυς αν θιμεαμ ομιθταντυρ,
ετ μολεστιε σορρυμπιθ εαμ, σινθ αδμοδυμ φιερενθ αδ πρι.
Φελ συ πυτανθ φιθυπεραθα, αεκυε ερρεμ ευμ συ. Νο ευισμοδ
μενθιτυμ πραεσενθ νες, πρω ελιγενδι σοτιδιεκυε σωνσλυδαθυρκυε ιν.
Ιδ μεα δισιθ φολυπθατιβυς. Ηομερω ρεπρεχενδυντ μελ νε,
αθκυι μελιυς προδεσεθ αν μει. Πρι ει δωσενδι νεγλεγενθυρ,
κυαεστιο ρεπριμικυε ατ φελ.
}, %text in greek
text effects/.cd,
text along path,
character count=\i, character total=\n,
characters={scale=1-\i/\n}
}
]
\path [decorate] (0,0)
\foreach \i [evaluate={\r=(\i/2000)^2;}] in {0,5,...,2880}{ -- (\i:\r)};
\end{tikzpicture}
\end{document}
Respuesta2
(Mientras publicaba esto, vi que hay una solución Lua-/XeTeX, que preferiría. Sin embargo, aquí hay un método pdfTeX).
Recuerde que cada letra (en este tipo de imagen de TikZ) está compuesta por su propia letra \hbox
, lo que permite muchos efectos, pero tiene un costo. Los caracteres griegos también son un problema que no puedo explicar.
Pero puedes utilizar el método más antiguo de transliteración. Sólo asegúrese de envolver los glifos de varios caracteres tal como lo haría con otros acentos (por ejemplo, {\"u}ber
). Tenga en cuenta que este \hbox
método parece hacer que sigma sea considerado como un sigma final, que puede "arreglarlo" agrupándolo:
\documentclass[tikz,border=5]{standalone}
\usepackage{ucs}
\usepackage[utf8x]{inputenc}
% Also works with these
%\usepackage[T1]{fontenc}
%\usepackage[utf8]{inputenc}
\usepackage[english, greek]{babel}
\newcommand{\en}{\selectlanguage{english}}
\newcommand{\gr}{\selectlanguage{greek}}
\usetikzlibrary{decorations.text}
\begin{document}
\selectlanguage{greek}
\begin{tikzpicture}[
decoration={
reverse path,
text effects along path,
% text={Κε{ί}μενο στα ελληνικ{ά}.}, %text in greek
text={Ke{'i}meno {sta} ellhnik{'a}.},
text effects/.cd,
text along path,
character count=\i, character total=\n,
characters={scale=1-\i/\n}
}
]
\draw [decorate] (0,0)
\foreach \i [evaluate={\r=(\i/2000)^2;}] in {0,5,...,2880}{ -- (\i:\r)};
\end{tikzpicture}
% Something a little more elaborate...
\begin{tikzpicture}[
decoration={%
reverse path, %
text effects along path, %
% text={Κε{ί}μενο στα ελληνικ{ά}.}, %text in greek
text={{<H}dona{`i} ka{`i} l{~u}pai f{'o}boi te ka{`i} j{'a}rrh
{>e}pijum{'i}ai te ka{`i} {>a}postpofa{`i} ka{`i} t{`o}
{>a}lge{~i}n t{'i}nos {>`a}n {e>~ien}? {>`H} g{`a}r yuq{~h}s,
{>`h} qrwm{'e}nhs fuq{~h}s {s'w}mati, {>`h} tr{'i}tou tin{`o}s
{>ex} {>a}mfo{~i}n.
% Diq~ws d`e ka`i to~uto; >`h g`ar t`o m~igma, >`h >`allo <'eteron
% >ek to~u m'igmatos. <Omo'iws d`e ka`i t`a >ek to'utwn t~wn
% pajhm'atwn gin'omena ka`i pratt'omena ka`i doxaz'omena.
}, %
text effects/.cd, %
text along path, %
character count=\i, character total=\n, %
characters={scale=1-\i/\n} %
}
]
\draw [decorate] (0,0) \foreach \i [evaluate={\r=(\i/2000)^2;}] in
{0,5,...,2880}{ -- (\i:\r)};
\end{tikzpicture}
\end{document}