Font greci “stile codice” dentro un codice listing

Ciao a tutti.

Il seguente:
`\documentclass{scrreprt}
\usepackage{classicthesis-ldpkg}
\usepackage[beramono]{classicthesis}
\usepackage[polutonikogreek,italian]{babel}

\newcommand{\greco}[1]{%
\begin{otherlanguage*}{greek}#1\end{otherlanguage*}}

\lstset{basicstyle=\normalfont\ttfamily,frame=lines}
\lstset{escapeinside={£*}{*£}}

\lstnewenvironment{codice}%
{\setkeys{lst}{columns=fullflexible,keepspaces=true}%
\lstset{basicstyle=\small\ttfamily,escapeinside={£*}{*£}}%
}%
{}

\begin{document}
\begin{codice}
abc £*\greco{abc}*£
\end{codice}
\end{document}`
fa quello che deve fare, ovvero produce caratteri greci dentro un codice prodotto con listings. Vorrei però cambiare il font dei caratteri greci. Mi piacerebbe impostarne uno diverso, diciamo sans serif, o neretto: insomma, uno che dia l’idea di “codice” e non di “typeset” (caratteri greci typewrtiter non esistono, giusto?).

Come si fa?

Grazie anticipate,
Lorenzo

`\newcommand{\greco}[1]{%
\begin{otherlanguage*}{greek}
\ifincode\greekcodefont\fi#1
\end{otherlanguage*}}
\newcommand{\greekcodefont}{\fontfamily{neohellenic}\selectfont}
\newif\ifincode

\lstset{basicstyle=\normalfont\ttfamily,frame=lines}
\lstset{escapeinside={£*}{*£}}

\lstnewenvironment{codice}%
{\incodetrue\setkeys{lst}{columns=fullflexible,keepspaces=true}%
\lstset{basicstyle=\small\ttfamily,escapeinside={£*}{*£}}%
}%
{} `
Ti faccio notare che, nell’ultima versione di ClassicThesis, Miede ha tolto il caricamento di listings.

Ciao
Enrico

Be’, i caratteri greci con le grazie sulle minuscole li ho visti solo per certe riviste, dove notoriamente i redattori si sbizzarriscono con tutto quello che possono; per la verità non sono brutti, ma non sono a spaziatura fissa.
Certo anche le macchine da scrivere greche scrivono/scrivevano a spaziatura fissa, ma non ne mai avuto sottomano nessun esemplare.

I font tt del greco hanno gli stessi parametri di nerezza e dimensioni dei font tt latini delle famiglie standard CM. EC, LM e varianti. Non sono un granché, ne sono convinto anch’io, ma onestamante oggi come oggi non me la sentirei di rimettere le mani sul codice per creare una nuova famiglia che oltre ad essere disegnata con gli stessi paramentri del tt latino abbia anche le grazie sul minuscolo.

Certo potesti ridefinirti il comando \greco in modo che scriva in sf per esempio; il tratto è uniforme, come nei tt, ma sono a spaziatura variabile; grazie a questa spaziatura variabile non sono così male come i tt. possono assomigliare a font per codici, ma restano a spaziatura variabile.

Ciao
Claudio

`
\newcommand{\greco}[1]{%
\begin{otherlanguage*}{greek}\sffamily#1\end{otherlanguage*}}
`

Tieni sempre presente che sto parlando di font CBgreek, distriuiti di default e funzionanti con l’encoding LGR. Se vuoi usare XeLaTeX, invece di pdfLaTeX hai la possibilit`à di usare il font monaco per la famiglia a spaziatura fissa, e quel font OpenType contiene anche il greco nello stesso stile. Purtroppo non puoi usare facilmente la parte greca del monaco in pdfLaTeX (font virtuali, creazione dei font tfm, inserimento nelle mappe, eccetera.) Io non sono capace di farlo; per lo meno preferirei usare XeLaTeX e in quattro e quattr’otto sarei a posto. 😉

Con arsclassica i font sans serif sono della famiglia iwona. il file lgriwona.fd non esiste, quindi non puoi usare nello stesso documento gli iwona e i sanserif greci della collezione CBgreek. Ma…

…ma si può fare. Quindi leggiti la documentazione del pacchetto teubner; fai come descritto e lui ti crea il file lgriwona.fd di cui hai bisogno.

Senza il dispositivo di cui ci si può servire con teubner (che poi, una volta usato presumibilmente non ti serve più) i font CBgreek funzianano solo con le famiglie dei fontCM e LM; teubenr di suo crea i file per farli andar bene con il palatino dei psfonts; per i times della collezione txfonts concede due diverse soluzioni, ma quella che fa riferimento ai font greci postscript messia disposizione di Tsolimitis funziona solo (essenzialmente, direi) con lo spelling monotoniko che usano i greci e che Tsolomitis ha controllato, ma non funzionano correttamente con lo spelling plytoniko classico. Poi teubner mette a disposizione dell’utente anche i meccanismi per prodursi i file necessari per fare andare d’accordo i font CBgreek con qualsiasi altro font latino con grazie, senza grazie o a spaziatura fissa. “D’accordo” non singifica che stiano bene assieme, ma che si possono usare con i comandi LaTeX per la gestione dei font che funzionano correttamente.

Naturalmente con quella definizione di \greco, i font greci ti usciranno sempre sans serif; se vuoi giostrare anche con le altre famiglie, devi usare quel \greco per i listing e un altro comando, tipo \testogreco da usare fuori del listing. Oppure modifichei il comando \greco in modo che accetti una opzione con i valori testo e lista, dove il secondo esclude il primo. Oppure ti adatti a specificare sempre dentro \greco prima del testo la dichiarazione \sffamily quando compili del codice con listing.

Ciao
Claudio

Ho trovato il busillis. Il comando suggerito da Claudio, che funziona e fa quello che mi serve, non va più bene se carico anche ArsClassica.
`\documentclass{scrreprt}
\usepackage[writefile]{listings}
\usepackage{classicthesis-ldpkg}
\usepackage[beramono]{classicthesis}
\usepackage[polutonikogreek,italian]{babel}
\usepackage[italian]{arsclassica}

\newcommand{\greco}[1]{%
\begin{otherlanguage*}{greek}\sffamily#1\end{otherlanguage*}}

\lstset{basicstyle=\normalfont\ttfamily,frame=lines}
\lstset{escapeinside={£*}{*£}}

\lstnewenvironment{codice}%
{\setkeys{lst}{columns=fullflexible,keepspaces=true}%
\lstset{basicstyle=\small\ttfamily,escapeinside={£*}{*£}}%
}%
{}

\begin{document}
\begin{codice}
abc £*\greco{abc}*£
\end{codice}
\end{document}`
Se si commenta ArsClassica, tutto ok. Come posso fare per avere i font greci sans serif con ArsClassica?

Grazie davvero: è un punto importante, vedrete a breve perché… 😉

Ciao,
L.

Come osserva OldClaudio, il problema è nella famiglia che definisci per il sans serif. Ora però devi decidere se vuoi i caratteri CBgreek senza grazie sempre o solo nelle parti di codice. Se è solo nelle parti di codice, la soluzione è quella che ti ho già proposto:
`\newcommand{\greco}[1]{%
\begin{otherlanguage*}{greek}
\ifincodice\greekcodefont\fi#1
\end{otherlanguage*}}
\newcommand{\greekcodefont}{\fontencoding{LGR}\fontfamily{cmss}\selectfont}

\lstset{basicstyle=\normalfont\ttfamily,frame=lines}
\lstset{escapeinside={£*}{*£}}

\newif\ifincodice
\lstnewenvironment{codice}%
{\incodicetrue
\setkeys{lst}{columns=fullflexible,keepspaces=true}%
\lstset{basicstyle=\small\ttfamily,escapeinside={£*}{*£}}%
}%
{}`
Se non vuoi che appaia l’avviso che un certo font non è definito e si deve usare una sostituzione, puoi aggiungere
`\DeclareFontFamily{LGR}{\ttdefault}{}
\DeclareFontShape{LGR}{\ttdefault}{m}{n}{<->cmtt10}{}`
Se vuoi greco anche nelle parti in Iwona, la faccenda è più complicata.

Ciao
Enrico

…
Se vuoi greco anche nelle parti in Iwona, la faccenda è più complicata.

`\newcommand{\greco}[1]{%
\begin{otherlanguage*}{greek}
\testfamily#1%
\end{otherlanguage*}}
\newcommand{\greeksf}{\fontfamily{cmss}\selectfont}
\makeatletter
\edef\grs@sans{\sfdefault}
\edef\grs@tt{\ttdefault}
\def\testfamily{%
\ifx\f@family\grs@sans\greeksf\fi
\ifx\f@family\grs@tt\greeksf\fi}
\makeatother
\DeclareFontFamily{LGR}{\ttdefault}{}
\DeclareFontShape{LGR}{\ttdefault}{m}{n}{<->cmtt10}{}
\DeclareFontFamily{LGR}{\sfdefault}{}
\DeclareFontShape{LGR}{\sfdefault}{m}{n}{<->cmss10}{}

\lstset{basicstyle=\normalfont\ttfamily,frame=lines}
\lstset{escapeinside={£*}{*£}}

\lstnewenvironment{codice}%
{\setkeys{lst}{columns=fullflexible,keepspaces=true}%
\lstset{basicstyle=\small\ttfamily,escapeinside={£*}{*£}}%
}%
{} `
Ciao
Enrico

Mmmmm….
Premetto che non ho controllato le tue macro in azione, quindi la domanda potrebbe sembrare blasfema, ma tu le hai provate? Posso star prendendo una papera madornale, ma a me sembra che tu associ all’encoding LGR e alle famiglie tt e sf nella serie media e forma normale (upright) i font latini cmss10 e cmtt10. Era questo che volevi dire quando chiedevi se volevi i font greci anche usando iwona?

Io ho la sensazione che Lorenzo possa rimanere confuso da tutti i suggerimenti che gli abbiamo mandato. Io non aggiungo altro, salvo che quello che gli ho suggerito funziona, visto che l;ho dovuto controllare tante volte mentre mettevo a punto l’ultima versione di teubner.

Mmmmm….
Premetto che non ho controllato le tue macro in azione, quindi la domanda potrebbe sembrare blasfema, ma tu le hai provate? Posso star prendendo una papera madornale, ma a me sembra che tu associ all’encoding LGR e alle famiglie tt e sf nella serie media e forma normale (upright) i font latini cmss10 e cmtt10. Era questo che volevi dire quando chiedevi se volevi i font greci anche usando iwona?

Quei quattro comandi \DeclareFont… servono solo per evitare messaggi di sostituzione di font. Sono innocui perché dentro a \greco il font scelto non ha nulla a che fare né con Beramono né con Iwona; il problemino è che LaTeX esegue un controllo sui font nella codifica appena scelta (LGR) e naturalmente non trova nulla per LGR+fvb e LGR+iwona. Quelle righe possono essere omesse, adattandosi a vedere ogni volta l’innocuo avviso.

Io ho la sensazione che Lorenzo possa rimanere confuso da tutti i suggerimenti che gli abbiamo mandato. Io non aggiungo altro, salvo che quello che gli ho suggerito funziona, visto che l;ho dovuto controllare tante volte mentre mettevo a punto l’ultima versione di teubner.

L’ultima mia versione tocca solo \greco.

Ciao
Enrico

Cari Enrico e Claudio, permettetemi di chiedervi ancora qualche chiarimento.

Ricapitolo: nel mio documento (che per la cronaca non può usare teubner, visto che usa pesantemente amsmath) ho bisogno di due comandi: uno, diciamo \greco, per inserire il testo greco “normale”, e l’altro, diciamo \grecosf, da usare esclusivamente all’interno di codici ottenuti con listings, che produca font greci sans serif.

Come primo tentativo avevo pensato a questo codice (compilabile):
`\documentclass{scrreprt}
\usepackage[writefile]{listings}
\usepackage{classicthesis-ldpkg}
\usepackage[beramono]{classicthesis}
\usepackage[polutonikogreek,italian]{babel}
\usepackage[italian]{arsclassica}

\newcommand{\greco}[1]{%
\begin{otherlanguage*}{greek}#1\end{otherlanguage*}}

\newcommand{\grecosf}[1]{%
\begin{otherlanguage*}{greek}\sffamily#1\end{otherlanguage*}}

\lstset{basicstyle=\normalfont\ttfamily,frame=lines}
\lstset{escapeinside={£*}{*£}}

\lstnewenvironment{codice}%
{\setkeys{lst}{columns=fullflexible,keepspaces=true}%
\lstset{basicstyle=\small\ttfamily,escapeinside={£*}{*£}}%
}%
{}

\begin{document}
\greco{abc}
\begin{codice}
£*\grecosf{abc}*£
\end{codice}
\end{document}`
Come vedete, mentre \greco è perfetto, \grecosf non funziona: la colpa è di ArsClassica (se lo si commenta funziona benissimo).

Adesso provo con il codice suggerito da Enrico.
`\documentclass{scrreprt}
\usepackage[writefile]{listings}
\usepackage{classicthesis-ldpkg}
\usepackage[beramono]{classicthesis}
\usepackage[polutonikogreek,italian]{babel}
\usepackage[italian]{arsclassica}

\newcommand{\greco}[1]{%
\begin{otherlanguage*}{greek}
\testfamily#1%
\end{otherlanguage*}}

\newcommand{\greeksf}{\fontfamily{cmss}\selectfont}
\makeatletter
\edef\grs@sans{\sfdefault}
\edef\grs@tt{\ttdefault}
\def\testfamily{%
\ifx\f@family\grs@sans\greeksf\fi
\ifx\f@family\grs@tt\greeksf\fi}
\makeatother
\DeclareFontFamily{LGR}{\ttdefault}{}
\DeclareFontShape{LGR}{\ttdefault}{m}{n}{<->cmtt10}{}
\DeclareFontFamily{LGR}{\sfdefault}{}
\DeclareFontShape{LGR}{\sfdefault}{m}{n}{<->cmss10}{}

\lstset{basicstyle=\normalfont\ttfamily,frame=lines}
\lstset{escapeinside={£*}{*£}}

\lstnewenvironment{codice}%
{\setkeys{lst}{columns=fullflexible,keepspaces=true}%
\lstset{basicstyle=\small\ttfamily,escapeinside={£*}{*£}}%
}%
{}

\begin{document}
\greco{abc}
\begin{codice}
£*\greco{abc}*£
\end{codice}

\greeksf{abc}
\begin{codice}
£*\greeksf{abc}*£
\end{codice}

\end{document}`
Mi pare che il comando \greeksf non faccia niente (a me vengono fuori lettere latine, non greche), mentre \greco vada bene: fuori da listings produce greco normale, dentro listings produce greco sans serif. Ho capito bene?

Non sarebbe possibile avere due comandi distinti, \greco e \grecosf? A me questo \greco
`\newcommand{\greco}[1]{%
\begin{otherlanguage*}{greek}#1\end{otherlanguage*}}
`
va benissimo, e (se possibile) non vorrei toccarlo: è di \grecosf che ho bisogno…

Grazie,
L.

Devi usare solo \greco; il comando \grecosf serve internamente. Prova
`\greco{abs}
\begin{codice}
abs £*\greco{abs}*£
\end{codice}

\textsf{abs \greco{abs}}`
Ciao
Enrico

Bene Enrico, quasi perfetto. Per ragioni Artistiche, mi sono permesso di cambiare il nome del tuo comando in \grecosf. Per il resto il codice è identico.
`\documentclass{scrreprt}
\usepackage[writefile]{listings}
\usepackage{classicthesis-ldpkg}
\usepackage[beramono]{classicthesis}
\usepackage[polutonikogreek,italian]{babel}
\usepackage[italian]{arsclassica}

\newcommand{\grecosf}[1]{%
\begin{otherlanguage*}{greek}%
\testfamily#1%
\end{otherlanguage*}}

\newcommand{\greeksf}{\fontfamily{cmss}\selectfont}
\makeatletter
\edef\grs@sans{\sfdefault}
\edef\grs@tt{\ttdefault}
\def\testfamily{%
\ifx\f@family\grs@sans\greeksf\fi
\ifx\f@family\grs@tt\greeksf\fi}
\makeatother
\DeclareFontFamily{LGR}{\ttdefault}{}
\DeclareFontShape{LGR}{\ttdefault}{m}{n}{<->cmtt10}{}
\DeclareFontFamily{LGR}{\sfdefault}{}
\DeclareFontShape{LGR}{\sfdefault}{m}{n}{<->cmss10}{}

\lstset{basicstyle=\normalfont\ttfamily,frame=lines}
\lstset{escapeinside={£*}{*£}}

\lstnewenvironment{codice}%
{\setkeys{lst}{columns=fullflexible,keepspaces=true}%
\lstset{basicstyle=\small\ttfamily,escapeinside={£*}{*£}}%
}%
{}

\begin{document}

\begin{codice}
\begin{otherlanguage}{greek}
£*\grecosf{Th| p'anta dido'ush| ka`i >apolambano'ush| f'usei id'hmwn l'egei; <ap'olabe, <`o j'eleic>>. L'egei d`e to~uto o>u}*£
£*\grecosf{katajrasun'omenos, >all`a peijarq~wn m'onon ka`i e>uno~wn a>uth|.}*£
\end{otherlanguage}
\end{codice}
\end{document}`
Come vedi, il testo greco presenta un piccolo rientro nel margine sinistro. È voluto? Non sarebbe possibile eliminarlo?

Grazie mille Enrico: come faremmo senza di te? 😉
L.

Il problema è che manca un % nella definizione, l’ho messo in rosso nel codice riportato.

Perché rinominare il comando? ❓ Non capisco. Con la definizione che ti ho dato hai il comportamento che ritengo quello voluto: in ambiente “normale” \greco compone con i font greci “serif”; in ambiente “sans serif” o “dattilografico” \greco compone con i font greci “sans serif”.

Ciao
Enrico