Marco87″ post=79011Ciao a tutti,
torno ancora a domandare riguardo alla scrittura in greco. Sto scrivendo una parte di testo in greco antico. La parola che devo scrivere è:
οτι (“omicron” “tau” “iota”, inglese “that”)
Sulla “omicron” compare sia lo spirito aspro che l’accento acuto (nell’ordine in cui li ho scritti, ovvero a sinistra lo spirito e a destra l’accento).
Se scrivo
`\documentclass[a5paper,10pt,openany,twocolumn]{memoir}% !TEX encoding = UTF-8
% !TEX program = xelatex\usepackage{etex}
\usepackage{etoolbox}
% Lingue
\usepackage{polyglossia}
\setmainlanguage{italian}
\setotherlanguage[variant=ancient]{greek}% Greco
\usepackage{gfsporson}\newenvironment{transgreek}
{\catcode`\~=12 \begin{otherlanguage}{greek}%
\addfontfeature{Mapping=asciitogreek}}
{\end{otherlanguage}}
\newenvironment{transgreek*}
{\catcode`\~=12 \begin{otherlanguage*}{greek}%
\addfontfeature{Mapping=asciitogreek}}
{\end{otherlanguage*}}
\newcommand{\texttransgreek}{\begingroup
\catcode`\~=12 \innertexttransgreek}
\newcommand*{\innertexttransgreek}[1]{%
\begin{transgreek*}#1\end{transgreek*}\endgroup}% Interlineare
\newcommand{\interl}[2]{%
\begin{tabular}[t]{@{}c@{}}
{\footnotesize\begin{transgreek}\scantokens{#1\empty}\end{transgreek}}\\
{\scriptsize #2}\\
\end{tabular}}\XeTeXinputnormalization=1
% Font
\defaultfontfeatures{Ligatures=TeX}
\setmainfont[Numbers=OldStyle]{Palatino Linotype}
\setsansfont[Numbers={OldStyle,Proportional},Scale=MatchLowercase]{Fontin Regular}
\setmonofont[Numbers=OldStyle,Scale=MatchLowercase]{Liberation Mono}
\newfontfamily{\fonttitolo}[Numbers=OldStyle,Scale=MatchLowercase]{Scriptina Pro}
\newfontfamily{\fontsfsc}[Numbers=OldStyle,Scale=MatchLowercase]{Fontin}\begin{document}
\interl{<'oti}{that} \end{document}` non ottengo quello che desidero. C'è modo di scrivere la parola così come compare nel testo che sto copiando? Grazie e buon week end, Marco. P.S. Il file "asciitogreek" lo ha gentilmente fornito Enrico in questa discussione.
Naturalmente asciitogreek serve per font caricati con fontspec; per il tuo è del tutto inutile.
`\documentclass[a5paper,10pt,openany,twocolumn]{memoir}
% !TEX encoding = UTF-8
% !TEX program = xelatex
\usepackage{etex}
\usepackage{etoolbox}
% Lingue
\usepackage{polyglossia}
\setmainlanguage{italian}
% Greco
\usepackage[LGR,EU1]{fontenc}
\usepackage{gfsporson}
\usepackage{fontspec}
\defaultfontfeatures{Ligatures=TeX}
\setmainfont[Numbers=OldStyle]{Palatino Linotype}
\setsansfont[Numbers={OldStyle,Proportional},Scale=MatchLowercase]{Fontin Regular}
\setmonofont[Numbers=OldStyle,Scale=MatchLowercase]{Liberation Mono}
\newfontfamily{\fonttitolo}[Numbers=OldStyle,Scale=MatchLowercase]{Scriptina Pro}
\newfontfamily{\fontsfsc}[Numbers=OldStyle,Scale=MatchLowercase]{Fontin}
\newenvironment{transgreek}
{\catcode`\~=12 \fontencoding{LGR}\fontfamily{porson}\selectfont}
{}
% Interlineare
\newcommand{\interl}[2]{%
\begin{tabular}[t]{@{}c@{}}
{\footnotesize\begin{transgreek}\scantokens{#1\empty}\end{transgreek}}\\
{\scriptsize #2}\\
\end{tabular}}
% Font
\begin{document}
Ecco quello che succede \interl{<'oti}{that} se uso il comando \verb|\interl| con un numero di parole sufficienti per far andare a capo la riga. \end{document}` Ciao Enrico