
function voto_pdf

% INTESTAZIONE.

% DATA ESAME
giorno=4;
mese='Febbraio';
anno=2015;

% STRINGA VISIONE COMPITO.
data_visione_string=' Martedi'' 10 febbraio';
visione_string=', ore 9, aula 2 AB 45, secondo piano del Dipartimento di Matematica, via Trieste 63, accanto a Economia, di fronte alla passerella sul Piovego.';

% PARTECIPANTI.
partecipanti=52;

% MATRICOLA CORSO.
matricola_corso_string=': Dispari.'





% NON TOCCARE SOTTO.

ss=clock; date_string=datestr(ss,30);
nomefile=strcat('risultati_',date_string,'.tex');
diary (nomefile)
diary on;
preambolo(giorno,mese,anno,matricola_corso_string);

for persona=1:partecipanti
    [nome,cognome,matricola,prevoto,votoA,votoB,ritirato]=lista_esami(persona);
    voto_finale=assembla_voto_finale(prevoto,votoA,votoB);
    it_is_strange=odd_check(prevoto,votoA,votoB);
    if ritirato == 1
        voto_finale='{\mbox{Ritirato}}';
    else
        if voto_finale > 33
            voto_finale='{\mbox{30 e lode}}';
        else
            if voto_finale > 30
                voto_finale='30';
            else
                if voto_finale < 16
                    voto_finale='{\mbox{Insuff.}}';
                else
                    if voto_finale < 18
                        voto_finale=num2str(voto_finale);
                        voto_finale=strcat('{\mbox{',voto_finale,'{\mbox{ (orale)}}','}}');
                    else
                        voto_finale=num2str(voto_finale);
                    end
                end
            end
        end
    end
   
    stampa_voto(nome,cognome,matricola,voto_finale,ritirato,it_is_strange);
    
    if rem(persona,30) == 0
        fprintf('\n');
        disp('\hline')
        disp('\end{tabular}');
        disp('\end{center}')
        
        disp('\newpage');
        
        
        disp('\begin{center}')
        disp('\begin{tabular}{l | l | c | c}');
        disp('{\mbox{Cognome}} & {\mbox{Nome}} & {\mbox{Matricola}} &  {\mbox{Voto}} \\');
        disp('\hline')
        disp(' ');
    end
    
end

chiusura(visione_string,data_visione_string)

diary off;














function preambolo(giorno,mese,anno,matricola_corso_string)
fprintf('\n \n \n');
disp('\documentclass[12 pt]{article}')

disp('\font\medgrass=cmbx10 scaled \magstep2');

disp('\begin{document}');


disp('\centerline{\medgrass ISTITUZIONI DI ANALISI MATEMATICA}');
fprintf('\n');
disp('\centerline{\bf Commissione P. Mannucci, A. Sommariva, a.a. 2014-2015}');
fprintf('\n');
disp('\centerline {Corsi di Laurea in Scienze Statistiche}');
disp(strcat('\centerline {Matricola',matricola_corso_string,'}'));


giorno_str=num2str(giorno);
mese_str=num2str(mese);
anno_str=num2str(anno);
data_string=strcat('${\mbox{ }}$',giorno_str,'${\mbox{ }}$',mese_str,'${\mbox{ }}$',anno_str,' ');
final_data_string=strcat('\centerline {\sl{Appello del ',...
    ' ',data_string,'}} ');
disp(final_data_string)
disp('\begin{center}')
disp('\begin{tabular}{l | l | c | c}');
disp('{\mbox{Cognome}} & {\mbox{Nome}} & {\mbox{Matricola}} &  {\mbox{Voto}} \\');
disp('\hline')
disp(' ');





function stampa_voto(nome,cognome,matricola,voto,ritirato,it_is_strange)
matricola_string=num2str(matricola);
voto_string=voto;
if it_is_strange == 1
    output_string=strcat('{\mbox{',cognome,'}}',' & ','{\mbox{',nome,'}}','& ',...
        '$',matricola_string,'$',' & ','$',voto_string,'{\mbox{ (orale, AB)}}','$ \\ ');
else
    output_string=strcat('{\mbox{',cognome,'}}',' & ','{\mbox{',nome,'}}','& ',...
        '$',matricola_string,'$',' & ','$',voto_string,'$ \\ ');
end
fprintf('\t')
disp(output_string)







function chiusura(visione_string,data_visione_string)
fprintf('\n');
disp('\hline')
disp('\end{tabular}');
disp('\end{center}')
fprintf('\n');
fprintf('\n');
disp('\vspace{0.5cm}')
fprintf('\n');
fprintf('\n');

disp('\begin{center}')
disp('{\bf{Alcune note}}')
disp('\end{center}')

disp('\begin{enumerate}')
visione_string_fin=strcat('\item Visione del compito: ',data_visione_string,visione_string);
disp(visione_string_fin);
disp('\item Alcuni esami orali si svolgeranno perch\`e') 
disp('\begin{itemize}')
disp('\item il voto finale \`e inferiore a 18 e si usa la sigla {\mbox{(orale)}}');
disp('\item per insufficienza di uno dei due temi e si usa la sigla {\mbox{(orale, AB)}}.')
disp('\end{itemize}')
disp('\item Con la sigla Insuff. si intendono voti da 0 a 16 escluso.') 
next_string=strcat('\item Gli studenti convocati per l''esame orale dovranno sostenere il giorno della suddetta visione dei compiti,',...
data_visione_string,', una o due domande di teoria e un commento sul compito.');
disp(next_string);
next_string=strcat('\item Chi deve sostenere l''orale ma non si presenta allo stesso il giorno della suddetta visione del compito,',...
data_visione_string,', avr\''a quale valutazione finale 16/30.');
disp(next_string);
disp('\item I voti comprendono il bonus dovuto alla valutazione dei precorsi.');
disp('\end{enumerate}')


disp('\end{document}');