function report_appendix(appTS,appNW,yesTL,yesIPL,yesIPLHR,yesTLH,yesPCL,yesTLHR,yesTLHRH,yesPCLHR,...
    yesPL,yesBL,yesTuL,yesRaL,yesThL,yesKL,yesKLHR,yesRL,yesLL,yesPrL,yesPT100,...
    yesCrL,yes3DCrL,yesEL,yes3DEL,yesWEL,yesMPBEL,yesTrL,nCAM,yesWL,yesPE,PL_A,PL_D,Font_section,...
    Font_caption,Font_tools,FIG,FIG_ENG,dim,appendice,appendice_ENG,colonna4,colonna6,...
    rpt,rpt_ENG,activeEN,FileName)

fileID = fopen(FileName,'a');
fmt = '%s \r';
text = 'report_appendix function started';
fprintf(fileID,fmt,text);

import mlreportgen.dom.*
import mlreportgen.report.*

% Make sure DOM is compilable
makeDOMCompilable()

%% Appendice - Elaborazione dati
partecomune = 0;
partecomune_ENG = 1;
ElabTitle = 0;
Titolo = Section();

testoTilt = Paragraph(['I dati immagazzinati dalla centralina (punti ADC) vengono '...
    'definiti ''grezzi'' e devono essere opportunamente elaborati per tradurre '...
    'i valori di accelerazione in spostamenti. In questa fase, ' char(232) ' inoltre possibile '...
    'identificare e ridurre eventuali derive strumentali, spike '...
    'e rumore del segnale. A questo scopo ' char(232) ' stato sviluppato (in ambiente Matlab) '...
    'un opportuno software, definito ''Tilt'', che fornisce il risultato cercato. '...
    'Occorre sottolineare come gli strumenti tradizionali siano caratterizzati da '...
    'un numero esiguo di letture, per le quali non ' char(232) ' possibile affrontare una trattazione '...
    'statistica dell''errore strumentale. Al contrario, la costituzione di un database popolato da '...
    'numerose misure permette di valutare l''evoluzione temporale dei fenomeni e di '...
    'validare l''attendibilit' char(224) ' dei dati elaborati.']);

testoATD = Paragraph(['I dati immagazzinati dalla centralina (punti ADC) vengono '...
    'definiti ''grezzi'' e devono essere opportunamente elaborati per tradurre '...
    'i valori di accelerazione in spostamenti. In questa fase, ' char(232) ' inoltre '...
    'possibile identificare e ridurre eventuali derive strumentali, spike '...
    'e rumore del segnale. A questo scopo ' char(232) ' stato sviluppato (in '...
    'ambiente Matlab) un opportuno software, definito ''ATD'', che fornisce il '...
    'risultato cercato. Occorre sottolineare come gli strumenti tradizionali '...
    'siano caratterizzati da un numero esiguo di letture, per le quali non ' char(232)...
    ' possibile affrontare una trattazione statistica dell''errore strumentale. '...
    'Al contrario, la costituzione di un database popolato da '...
    'numerose misure permette di valutare l''evoluzione temporale dei fenomeni e di '...
    'validare l''attendibilit' char(224) ' dei dati elaborati.']);

testoRIS = Paragraph(['I dati raccolti in sito dalla centralina vengono trasmessi '...
    'al database di ASE, dal quale il software importa i dati grezzi e i parametri '...
    'di calibrazione. La procedura descritta ' char(232) ' completamente automatizzata: '...
    'nel momento in cui il dato viene ricevuto, ' char(232) ' trasformato in '...
    'unit' char(224) ' fisiche con conseguente calcolo degli spostamenti finali. '...
    'I risultati sono caricati in un tempo brevissimo su piattaforma dinamica web '...
    'ad accesso controllato, dove l''utente pu' char(242) ' visionarli e scaricarli.']);

testoTilt.HAlign = 'justify';
testoATD.HAlign = 'justify';
testoRSN.HAlign = 'justify';
testoMUSA.HAlign = 'justify';
testoRIS.HAlign = 'justify';

% --- ENG ---

if activeEN == 1
    
    Titolo_ENG = Section();
    testoTilt_ENG = Paragraph(['ADC points stored in the SD card are defined ''raw data'' and they need '...
        'to be properly elaborated in order to convert acceleration data into displacement values. '...
        'Moreover, in this stage it is also possible to identify and correct any issue related to '...
        'data drifting, spike and/or instrumental noises. These results are achieved thanks to a '...
        'dedicated MATLAB-based software, named ''Tilt''. It should be taken into account that traditional '...
        'monitoring devices usually feature a sampling frequency that is too low to allow the '...
        'application of statistical analyses aimed to reduce any tool-related data noise. On the '...
        'other hand, the definition of a database including a great number of monitoring data permits '...
        'to evaluate the phenomena evolution over time and to assess the results reliability.']);
    
    testoATD_ENG = Paragraph(['ADC points stored in the SD card are defined ''raw data'' and they need '...
        'to be properly elaborated in order to convert acceleration data into displacement values. '...
        'Moreover, in this stage it is also possible to identify and correct any issue related to '...
        'data drifting, spike and/or instrumental noises. These results are achieved thanks to a '...
        'dedicated MATLAB-based software, named ''ATD''. It should be taken into account that traditional '...
        'monitoring devices usually feature a sampling frequency that is too low to allow the '...
        'application of statistical analyses aimed to reduce any tool-related data noise. On the '...
        'other hand, the definition of a database including a great number of monitoring data permits '...
        'to evaluate the phenomenon evolution over time and to assess the results reliability.']);
    
    testoRIS_ENG = Paragraph(['After collecting the monitoring data on-site, the datalogger sends them '...
        'to the ASE database, from where the software imports raw data and calibration parameters. '...
        'This is a completely automatic procedure: after receiveng new data, the elaboration centre '...
        'converts them into physical units, thus obtaining the actual displacement measured on-site. '...
        'After the results uploading phase, which takes a very short amount of time, the user can access '...
        'and download all monitoring data through the web-based platform.']);
    
    testoTilt_ENG.HAlign = 'justify';
    testoATD_ENG.HAlign = 'justify';
    testoRSN_ENG.HAlign = 'justify';
    testoMUSA_ENG.HAlign = 'justify';
    testoRIS_ENG.HAlign = 'justify';
end

% --- Vertical Array ---
if sum(yesTL) >= 1 || sum(yesTLHR) >= 1
    elabTL = Section();
    if ElabTitle == 0
        app = Heading2('Elaborazione dati');
        app.Style = {OuterMargin('0in','0in','0.2in','0.2in'),FontSize(Font_section),HAlign('justify')}; % Sx-Dx-Alto-Basso
        Titolo.Title = app;
        if activeEN == 1
            app_ENG = Heading2('Data elaboration');
            app_ENG.Style = {OuterMargin('0in','0in','0.2in','0.2in'),FontSize(Font_section),HAlign('justify')}; % Sx-Dx-Alto-Basso
            Titolo_ENG.Title = app_ENG;
        end
        ElabTitle = 1;
    end
    sezVA = Heading3('Vertical Array');
    sezVA.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
    elabTL.Title = sezVA;
    testo = Paragraph(['Ciascun nodo ' char(232) ' caratterizzato da una particolare giacitura'...
        ' nello spazio, ricostruibile sulla base delle grandezze fisiche acquisite'...
        ' dal sensore MEMS 3D (accelerometro, magnetometro e sensore di temperatura).'...
        ' In particolare, mediante l''accelerometro si ' char(232) ' in grado di conoscere l''inclinazione'...
        ' del sensore: a titolo di esempio, se un nodo fosse perfettamente verticale, asse'...
        ' X e asse Y dell''accelerometro restituirebbero 0 g, mentre l''asse Z fornirebbe un'...
        ' valore pari a 1 g. Mediante l''utilizzo del magnetometro ' char(232) ' possibile ricostruire'...
        ' la direzione dello spostamento occorso. Confrontando le nuove posizioni con quelle'...
        ' iniziali, si ' char(232) ' in grado di ricavare l''angolo di rotazione di ciascun nodo nello spazio:'...
        ' essendo nota la distanza tra i nodi, ' char(232) ' immediato calcolare le componenti di' ...
        ' spostamento in corrispondenza di ciascun sensore della catena.']);
    img = Image(('vert.jpg'));
    img.Style = {Height('7cm'),HAlign('center')};
    ionhcaption = Paragraph(['Fig. ' num2str(FIG) ' - Esempio di spostamento e nuova configurazione del sensore']);
    FIG = FIG+1;
    ionhcaption.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
    testo.HAlign = 'justify';
    add(elabTL,testo);
    add(elabTL,testoTilt);
    add(elabTL,img);
    add(elabTL,ionhcaption);
    add(elabTL,testoRIS);
    add(appendice,elabTL);
    br = PageBreak();
    add(appendice,br);
    
    %---ENG---
    if activeEN == 1
        elabTL_ENG = Section();
        sezVA_ENG = Heading3('Vertical Array');
        sezVA_ENG.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
        elabTL_ENG.Title = sezVA_ENG;
        testo = Paragraph(['When a displacement occurs, the node changes its position in order to '...
            'follow the slope movement. After been read, every tilt sensor records the new position '...
            'as an electrical signal (raw data) and sends the information to the control unit. '...
            'The datalogger saves the information on a volatile memory (SD card) and then transmits '...
            'them to the elaboration centre, where a software processes the electrical signals (ADC points) '...
            'to return information about the real displacement of the node (physical units). The accelerometer '...
            'gives information about the rotation of the node, referring to the constant gravity acceleration g. '...
            'The magnetometer allows to obtain the displacement direction of each node, referring to NED '...
            'reference system (North-East-Down). Finally, the on-board thermometer is necessary to correct the '...
            'thermal effects on the accelerometer, using the calibration values. This sensor also provides '...
            'the temperature along the vertical.']);
        img = Image(('vert.jpg'));
        img.Style = {Height('7cm'),HAlign('center')};
        ionhcaption_ENG = Paragraph(['Fig. ' num2str(FIG_ENG) ' - Effect of displacement on the tool and new configuration of the Array']);
        FIG_ENG = FIG_ENG+1;
        ionhcaption_ENG.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
        testo.HAlign = 'justify';
        add(elabTL_ENG,testo);
        add(elabTL_ENG,testoTilt_ENG);
        add(elabTL_ENG,img);
        add(elabTL_ENG,ionhcaption_ENG);
        add(elabTL_ENG,testoRIS_ENG);
        add(appendice_ENG,elabTL_ENG);
        br = PageBreak();
        add(appendice_ENG,br);
    end
    partecomune = 1;
    partecomune_ENG = 1;
end

% --- In Place Array ---
if sum(yesIPL) >= 1
    elabIPL = Section();
    if ElabTitle == 0
        app = Heading2('Elaborazione dati');
        app.Style = {OuterMargin('0in','0in','0.2in','0.2in'),FontSize(Font_section),HAlign('justify')}; % Sx-Dx-Alto-Basso
        Titolo.Title = app;
        if activeEN == 1
            app_ENG = Heading2('Data elaboration');
            app_ENG.Style = {OuterMargin('0in','0in','0.2in','0.2in'),FontSize(Font_section),HAlign('justify')}; % Sx-Dx-Alto-Basso
            Titolo_ENG.Title = app_ENG;
        end
        ElabTitle = 1;
    end
    sezIPA = Heading3('In Place Array');
    sezIPA.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
    elabIPL.Title = sezIPA;
    testo = Paragraph(['Ciascun nodo ' char(232) ' caratterizzato da una particolare giacitura'...
        ' nello spazio, ricostruibile sulla base delle grandezze fisiche acquisite'...
        ' dal sensore MEMS 3D (accelerometro, magnetometro e sensore di temperatura).'...
        ' In particolare, mediante l''accelerometro si ' char(232) ' in grado di conoscere l''inclinazione'...
        ' del sensore: a titolo di esempio, se un nodo fosse perfettamente verticale, asse'...
        ' X e asse Y dell''accelerometro restituirebbero 0 g, mentre l''asse Z fornirebbe un'...
        ' valore pari a 1 g. Mediante l''utilizzo del magnetometro ' char(232) ' possibile ricostruire'...
        ' la direzione dello spostamento occorso. Confrontando le nuove posizioni con quelle'...
        ' iniziali, si ' char(232) ' in grado di ricavare l''angolo di rotazione di ciascun nodo nello spazio:'...
        ' essendo nota la distanza tra i nodi, ' char(232) ' immediato calcolare le componenti di' ...
        ' spostamento in corrispondenza di ciascun sensore della catena.']);
    img = Image(('vert.jpg'));
    img.Style = {Height('7cm'),HAlign('center')};
    imgcaption = Paragraph(['Fig. ' num2str(FIG) ' - Esempio di spostamento e nuova configurazione del sensore']);
    FIG = FIG+1;
    imgcaption.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
    testo.HAlign = 'justify';
    add(elabIPL,testo);
    add(elabIPL,img);
    add(elabIPL,imgcaption);
    if partecomune == 0
        add(elabIPL,testoTilt);
        add(elabIPL,testoRIS);
        partecomune = 1;
    end
    add(appendice,elabIPL);
    br = PageBreak();
    add(appendice,br);
    
    %---ENG---
    if activeEN == 1
        elabIPL_ENG = Section();
        sezIPA_ENG = Heading3('In Place Array');
        sezIPA_ENG.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
        elabIPL_ENG.Title = sezIPA_ENG;
        testo = Paragraph(['When a displacement occurs, the node changes its position in order to '...
            'follow the slope movement. After been read, every tilt sensor records the new position '...
            'as an electrical signal (raw data) and sends the information to the control unit. '...
            'The datalogger saves the information on a volatile memory (SD card) and then transmits '...
            'them to the elaboration centre, where a software processes the electrical signals (ADC points) '...
            'to return information about the real displacement of the node (physical units). The accelerometer '...
            'gives information about the rotation of the node, referring to the constant gravity acceleration g. '...
            'The magnetometer allows to obtain the displacement direction of each node, referring to NED '...
            'reference system (North-East-Down). Finally, the on-board thermometer is necessary to correct the '...
            'thermal effects on the accelerometer, using the calibration values. This sensor also provides '...
            'the temperature along the vertical.']);
        img = Image(('vert.jpg'));
        img.Style = {Height('7cm'),HAlign('center')};
        imgcaption_ENG = Paragraph(['Fig. ' num2str(FIG_ENG) ' - - Effect of displacement on the tool and new configuration of the Array']);
        FIG_ENG = FIG_ENG+1;
        ionhcaption_ENG.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
        testo.HAlign = 'justify';
        add(elabIPL_ENG,testo);
        add(elabIPL_ENG,img);
        add(elabIPL_ENG,imgcaption_ENG);
        if partecomune_ENG == 0
            add(elabIPL_ENG,testoTilt_ENG);
            add(elabIPL_ENG,testoRIS_ENG);
            partecomune_ENG = 1;
        end
        add(appendice_ENG,elabIPL_ENG);
        br = PageBreak();
        add(appendice_ENG,br);
    end
end

nodoTunnel = 0;
nodoTunnel_ENG = 0;
% --- Cir Array ---
if sum(yesTuL) >= 1
    elabCIR = Section();
    if ElabTitle == 0
        app = Heading2('Elaborazione dati');
        app.Style = {OuterMargin('0in','0in','0.2in','0.2in'),FontSize(Font_section),HAlign('justify')}; % Sx-Dx-Alto-Basso
        Titolo.Title = app;
        if activeEN == 1
            app_ENG = Heading2('Data elaboration');
            app_ENG.Style = {OuterMargin('0in','0in','0.2in','0.2in'),FontSize(Font_section),HAlign('justify')}; % Sx-Dx-Alto-Basso
            Titolo_ENG.Title = app_ENG;
        end
        ElabTitle = 1;
    end
    sezCA = Heading3('Cir Array');
    sezCA.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
    elabCIR.Title = sezCA;
    testo = Paragraph(['Ciascun nodo ' char(232) ' caratterizzato da una '...
        'particolare giacitura nello spazio, ricostruibile sulla base delle '...
        'grandezze fisiche acquisite dal sensore MEMS 3D, equipaggiato con '...
        'accelerometro e sensore di temperatura. In particolare, mediante '...
        'l''accelerometro si ' char(232) ' in grado di conoscere l''inclinazione '...
        'del sensore: a titolo di esempio, se un nodo fosse perfettamente verticale, '...
        'asse X e asse Y dell''accelerometro restituirebbero 0 g, mentre l''asse Z '...
        'fornirebbe un valore pari a 1 g. Confrontando le nuove posizioni con quelle '...
        'iniziali, si ' char(232) ' in grado di ricavare l''angolo di rotazione di '...
        'ciascun nodo nello spazio: essendo note le distanze tra i nodi e le loro '...
        'posizioni di installazione all''interno della sezione, ' char(232) ' immediato '...
        'calcolare le componenti di spostamento in corrispondenza di ciascun sensore '...
        'della catena. Il termometro presente ' char(232) ' utilizzato per la correzione '...
        'degli effetti termici che incidono sul sensore accelerometrico, '...
        'previa calibrazione in camera climatica, fornendo inoltre la temperatura '...
        'lungo la catena.']);
    testo2 = Paragraph(['Il sensore MEMS ' char(232) ' posizionato al centro di ogni nodo '...
        'e misura le tre componenti del campo gravitazionale terrestre nel proprio sistema '...
        'di riferimento, riferendosi ad una configurazione iniziale, o lettura di zero. '...
        'Nel momento in cui avviene uno spostamento, la variazione delle tre componenti '...
        'di gravit' char(224) ' permette di determinarne l''entit' char(224) ' '...
        'e la direzione: in questo modo ' char(232) ' possibile valutare la rotazione '...
        'del tunnel e gli spostamenti locali di ogni nodo rispetto al precedente, '...
        'dai quali pu' char(242) ' essere infine costruita la curva cumulata e la '...
        'conseguente deformata 3D della sezione monitorata. In aggiunta, il software '...
        'determina la variazione di lunghezza di segmenti di convergenza predefiniti, '...
        'unendo determinati punti di calcolo, come avviene usualmente nel caso della '...
        'topografia. Ogni Tunnel Link ha il proprio segmento di pertinenza che viene '...
        'assunto infinitamente rigido e si estende dal punto medio tra il nodo '...
        'considerato ed il precedente fino al punto medio con il suo successivo. '...
        'La distanza tra i vari Tunnel Link pu' char(242) ' essere personalizzata '...
        'in base alle esigenze sito specifiche. Distanze minori comportano risultati '...
        'maggiormente attendibili e precisi.']);
    img = Image(('cir.png'));
    img.Style = {Height('7cm'),HAlign('center')};
    imgcaption = Paragraph(['Fig. ' num2str(FIG) ' - Rappresentazione grafica del segmento di pertinenza '...
        'del sensore Tunnel Link e sistema di installazione in calotta']);
    FIG = FIG+1;
    imgcaption.Style = {HAlign('justify'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
    testo.HAlign = 'justify';
    testo2.HAlign = 'justify';
    if nodoTunnel==0
        add(elabCIR,testo);
        nodoTunnel = 1;
    end
    add(elabCIR,testo);
    add(elabCIR,testo2);
    add(elabCIR,img);
    add(elabCIR,imgcaption);
    if partecomune == 0
        add(elabCIR,testoATD);
        add(elabCIR,testoRIS);
        partecomune = 1;
    end
    add(appendice,elabCIR);
    
    % --- ENG ---
    if activeEN == 1
        elabCIR_ENG = Section();
        sezCA_ENG = Heading3('Cir Array');
        sezCA_ENG.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
        elabCIR_ENG.Title = sezCA_ENG;
        testo = Paragraph(['When a displacement occurs, the node changes its position in order to '...
            'follow the section movement. After been read, every tilt sensor records the new position '...
            'as an electrical signal (raw data) and sends the information to the control unit. '...
            'The datalogger saves the information on a volatile memory (SD card) and then transmits '...
            'them to the elaboration centre, where a software processes the electrical signals (ADC points) '...
            'to return information about the real displacement of the node (physical units). The accelerometer '...
            'gives information about the rotation of the node, referring to the constant gravity acceleration g. '...
            'The on-board thermometer is necessary to correct the '...
            'thermal effects on the accelerometer, using the calibration values. This sensor also provides '...
            'the temperature along the array.']);
        testo2 = Paragraph(['MEMS sensor is located at the centre of each Link and measures the three '...
            'components of the gravitational field in its own reference system, starting from an initial '...
            'configuration (zero reading). When a movement arises, the variation of the different gravity '...
            'components gives back the information of the displacement. In this way, it is possible to '...
            'calculate the tunnel rotation and the local displacement of each Link, and finally compute '...
            'a curve of cumulated displacements and the three-dimensional variation of the monitored section. '...
            'Moreover, the software determines the length variation of predefined convergence segments, created '...
            'by connecting specific calculation points with an approach similar to topography applications. '...
            'Each Tunnel Link has a Segment of Relevance, which is assumed as infinitely rigid, that starts from the middle '...
            'point between the considered and the previous Link and ends at the medium distance between the '...
            'considered and the following Link. It is possible to customize the distance between Links according to '...
            'specific monitoring necessities (smaller distances lead to more reliable and accurate results).']);
        img = Image(('cir.png'));
        img.Style = {Height('7cm'),HAlign('center')};
        imgcaption_ENG = Paragraph(['Fig. ' num2str(FIG_ENG) ' - Tunnel Link Segment of Relevance and '...
            'installation system']);
        FIG_ENG = FIG_ENG+1;
        imgcaption_ENG.Style = {HAlign('justify'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
        testo.HAlign = 'justify';
        testo2.HAlign = 'justify';
        if nodoTunnel_ENG==0
            add(elabCIR_ENG,testo);
            nodoTunnel_ENG = 1;
        end
        add(elabCIR_ENG,testo);
        add(elabCIR_ENG,testo2);
        add(elabCIR_ENG,img);
        add(elabCIR_ENG,imgcaption_ENG);
        if partecomune_ENG == 0
            add(elabCIR_ENG,testoATD_ENG);
            add(elabCIR_ENG,testoRIS_ENG);
            partecomune_ENG = 1;
        end
        add(appendice_ENG,elabCIR_ENG);
    end
end

% --- Rad Array ---
if sum(yesRaL) >= 1
    elabRAD = Section();
    if ElabTitle == 0
        app = Heading2('Elaborazione dati');
        app.Style = {OuterMargin('0in','0in','0.2in','0.2in'),FontSize(Font_section),HAlign('justify')}; % Sx-Dx-Alto-Basso
        Titolo.Title = app;
        if activeEN == 1
            app_ENG = Heading2('Data elaboration');
            app_ENG.Style = {OuterMargin('0in','0in','0.2in','0.2in'),FontSize(Font_section),HAlign('justify')}; % Sx-Dx-Alto-Basso
            Titolo_ENG.Title = app_ENG;
        end
        ElabTitle = 1;
    end
    sezRA = Heading3('Rad Array');
    sezRA.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
    elabRAD.Title = sezRA;
    testo = Paragraph(['Ciascun nodo ' char(232) ' caratterizzato da una '...
        'particolare giacitura nello spazio, ricostruibile sulla base delle '...
        'grandezze fisiche acquisite dal sensore MEMS 3D, equipaggiato con '...
        'accelerometro e sensore di temperatura. In particolare, mediante '...
        'l''accelerometro si ' char(232) ' in grado di conoscere l''inclinazione '...
        'del sensore: a titolo di esempio, se un nodo fosse perfettamente verticale, '...
        'asse X e asse Y dell''accelerometro restituirebbero 0 g, mentre l''asse Z '...
        'fornirebbe un valore pari a 1 g. Confrontando le nuove posizioni con quelle '...
        'iniziali, si ' char(232) ' in grado di ricavare l''angolo di rotazione di '...
        'ciascun nodo nello spazio: essendo note le distanze tra i nodi e le loro '...
        'posizioni di installazione all''interno della sezione, ' char(232) ' immediato '...
        'calcolare le componenti di spostamento in corrispondenza di ciascun sensore '...
        'della catena. Il termometro presente ' char(232) ' utilizzato per la correzione '...
        'degli effetti termici che incidono sul sensore accelerometrico, '...
        'previa calibrazione in camera climatica, fornendo inoltre la temperatura '...
        'lungo la catena.']);
    testo2 = Paragraph(['Il sensore MEMS ' char(232) ' posizionato al centro di ogni nodo '...
        'e misura le tre componenti del campo gravitazionale terrestre nel proprio sistema '...
        'di riferimento, riferendosi ad una configurazione iniziale, o lettura di zero. '...
        'Nel momento in cui avviene uno spostamento, la variazione delle tre componenti '...
        'di gravit' char(224) ' ne permette di determinarne l''entit' char(224) ...
        ' e la direzione: in questo modo ' char(232) ' possibile valutare le deformazioni '...
        'tridimensionali dell''ammasso roccioso al di fuori della sezione scavata. '...
        'Ogni nodo fornisce un''informazione locale secondo il sistema di riferimento X (larghezza), '...
        'Y (profondit' char(224) ') e Z (altezza). Sommando i singoli contributi si ' char(232) ...
        ' in grado di risalire agli spostamenti cumulati e alla deformata 3D nello spazio. '...
        'Mettendo insieme le informazioni fornite dal Rad Array con quelle di un estensimetro '...
        'multibase, si ' char(232) ' in grado di determinare e distinguere le componenti di '...
        'deformazione radiale da quelle operanti nelle restanti direzioni. '...
        'Ogni sensore Radial Link ha il proprio segmento di pertinenza che viene '...
        'assunto infinitamente rigido e si estende dal punto medio tra il nodo '...
        'considerato ed il precedente fino al punto medio con il suo successivo. '...
        'La distanza tra i vari Radial Link pu' char(242) ' essere personalizzata '...
        'in base alle esigenze sito specifiche. Distanze minori comportano risultati '...
        'maggiormente attendibili e precisi.']);
    img = Image(('rad.png'));
    img.Style = {Height('7.5cm'),HAlign('center')};
    imgcaption = Paragraph(['Fig. ' num2str(FIG) ' - Rappresentazione grafica di due Rad Array '...
        'installati nella parte sommitale della sezione monitorata, con un''inclinazione di 45 '...
        'gradi rispetto all''orizzontale.']);
    FIG = FIG+1;
    imgcaption.Style = {HAlign('justify'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
    testo.HAlign = 'justify';
    testo2.HAlign = 'justify';
    if nodoTunnel==0
        add(elabRAD,testo);
        nodoTunnel = 1;
    end
    add(elabRAD,testo2);
    add(elabRAD,img);
    add(elabRAD,imgcaption);
    if partecomune == 0
        add(elabRAD,testoATD);
        add(elabRAD,testoRIS);
        partecomune = 1;
    end
    add(appendice,elabRAD);
    
    % --- ENG ---
    if activeEN == 1
        elabRAD_ENG = Section();
        sezRA_ENG = Heading3('Rad Array');
        sezRA_ENG.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
        elabRAD_ENG.Title = sezRA_ENG;
        testo = Paragraph(['When a displacement occurs, the node changes its position in order to '...
            'follow the rock mass movement. After been read, every tilt sensor records the new position '...
            'as an electrical signal (raw data) and sends the information to the control unit. '...
            'The datalogger saves the information on a volatile memory (SD card) and then transmits '...
            'them to the elaboration centre, where a software processes the electrical signals (ADC points) '...
            'to return information about the real displacement of the node (physical units). The accelerometer '...
            'gives information about the rotation of the node, referring to the constant gravity acceleration g. '...
            'The on-board thermometer is necessary to correct the '...
            'thermal effects on the accelerometer, using the calibration values. This sensor also provides '...
            'the temperature along the array.']);
        testo2 = Paragraph(['MEMS sensor is located at the centre of each Link and measures the three '...
            'components of the gravitational field in its own reference system, starting from an initial '...
            'configuration (zero reading). When a movement arises, the variation of the different gravity '...
            'components gives back the information of the displacement. In this way, it is possible to '...
            'calculate the 3D displacement surrounding the monitored section. '...
            'Each single node provides a local information according to the 3D reference system X-Y-Z (respectively '...
            'width, depth and height). The resultant of these components allows to determine the cumulative displacement '...
            'and the three-dimensional position variation of the monitored element. Moreover, it is possible to couple a Rad '...
            'Array with a multi-point borehole extensometer in order to separate radial deformations from components acting '...
            'along other directions. '...
            'Each Radial Link has a Segment of Relevance, which is assumed as infinitely rigid, that starts from the middle '...
            'point between the considered and the previous Link and ends at the medium distance between the '...
            'considered and the following Link. It is possible to customize the distance between Links according to '...
            'specific monitoring necessities (smaller distances lead to more reliable and accurate results).']);
        img = Image(('rad.png'));
        img.Style = {Height('7.5cm'),HAlign('center')};
        imgcaption_ENG = Paragraph(['Fig. ' num2str(FIG_ENG) ' - Graphical illustration of two Rad Arrays located '...
            'on the upper part of the monitorign section and installed with a 45-degree tilt.']);
        FIG_ENG = FIG_ENG+1;
        imgcaption_ENG.Style = {HAlign('justify'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
        testo.HAlign = 'justify';
        testo2.HAlign = 'justify';
        if nodoTunnel_ENG==0
            add(elabRAD_ENG,testo);
            nodoTunnel_ENG = 1;
        end
        add(elabRAD_ENG,testo2);
        add(elabRAD_ENG,img);
        add(elabRAD_ENG,imgcaption_ENG);
        if partecomune_ENG == 0
            add(elabRAD_ENG,testoATD_ENG);
            add(elabRAD_ENG,testoRIS_ENG);
            partecomune_ENG = 1;
        end
        add(appendice_ENG,elabRAD_ENG);
    end
end

% --- PreConv Array ---
if sum(yesPCL) >= 1
    elabPCL = Section();
    if ElabTitle == 0
        app = Heading2('Elaborazione dati');
        app.Style = {OuterMargin('0in','0in','0.2in','0.2in'),FontSize(Font_section),HAlign('justify')}; % Sx-Dx-Alto-Basso
        Titolo.Title = app;
        if activeEN == 1
            app_ENG = Heading2('Data elaboration');
            app_ENG.Style = {OuterMargin('0in','0in','0.2in','0.2in'),FontSize(Font_section),HAlign('justify')}; % Sx-Dx-Alto-Basso
            Titolo_ENG.Title = app_ENG;
        end
        ElabTitle = 1;
    end
    sezPCA = Heading3('PreConv Array');
    sezPCA.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
    elabPCL.Title = sezPCA;
    testo = Paragraph(['Ciascun nodo ' char(232) ' caratterizzato da una '...
        'particolare giacitura nello spazio, ricostruibile sulla base delle '...
        'grandezze fisiche acquisite dal sensore MEMS 3D, equipaggiato con '...
        'accelerometro e sensore di temperatura. In particolare, mediante '...
        'l''accelerometro si ' char(232) ' in grado di conoscere l''inclinazione '...
        'del sensore rispetto all''orizzontale: a titolo di esempio, se un nodo '...
        'di questa tipologia fosse perfettamente orizzontale, asse X e asse Y '...
        'dell''accelerometro restituirebbero 0 g, mentre l''asse Z '...
        'fornirebbe un valore pari a 1 g. Confrontando le nuove posizioni con quelle '...
        'iniziali, si ' char(232) ' in grado di ricavare l''angolo di rotazione di '...
        'ciascun nodo nello spazio: essendo note le distanze tra i nodi, ' char(232) ' immediato '...
        'calcolare le componenti di spostamento verticale in corrispondenza di ciascun sensore '...
        'della catena. Il termometro presente ' char(232) ' utilizzato per la correzione '...
        'degli effetti termici che incidono sul sensore accelerometrico, '...
        'previa calibrazione in camera climatica, fornendo inoltre la temperatura '...
        'dei singoli nodi.']);
    testo2 = Paragraph(['Il sensore MEMS ' char(232) ' posizionato al centro di ogni nodo '...
        'e misura le tre componenti del campo gravitazionale terrestre nel proprio sistema '...
        'di riferimento, riferendosi ad una configurazione iniziale, o lettura di zero. '...
        'Nel momento in cui avviene uno spostamento, la variazione delle tre componenti '...
        'di gravit' char(224) ' permette di determinarne l''entit' char(224) ' '...
        'e la direzione: in questo modo ' char(232) ' possibile valutare l''eventuale movimento '...
        'di pre-convergenza della sezione ancora da scavare, la rotazione dei sensori su s' char(232) ' stessi '...
        'e gli spostamenti locali di ogni nodo rispetto al precedente, dai quali pu' char(242) ' '...
        'essere costruita la curva cumulata dei movimenti. Ogni PreConv Link ha il proprio '...
        'segmento di pertinenza che viene assunto infinitamente rigido e si estende dal punto medio tra il nodo '...
        'considerato ed il precedente fino al punto medio con il suo successivo. '...
        'La distanza tra i vari sensori pu' char(242) ' essere personalizzata '...
        'in base alle esigenze sito specifiche. Distanze minori comportano risultati '...
        'maggiormente attendibili e precisi.']);
    img1 = Image(('PCA.png'));
    img2 = Image(('PCA2.jpg'));
    img1.Style = {Height('6cm'),HAlign('center')};
    imgcaption = Paragraph(['Fig. ' num2str(FIG) ' - Rappresentazione grafica '...
        'del comportamento deformativo atteso in seguito ad uno scavo in sotterraneo']);
    FIG = FIG+1;
    imgcaption.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
    img2.Style = {Height('14cm'),HAlign('center')};
    img2caption = Paragraph(['Fig. ' num2str(FIG) ' - Esempio di fasi di scavo successive '...
        'con installazione del sistema MUMS PreConv Array']);
    FIG = FIG+1;
    img2caption.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
    testo.HAlign = 'justify';
    testo2.HAlign = 'justify';
    if nodoTunnel == 0
        add(elabPCL,testo);
        nodoTunnel = 1;
    end
    add(elabPCL,img1);
    add(elabPCL,imgcaption);
    add(elabPCL,testo2);
    add(elabPCL,img2);
    add(elabPCL,img2caption);
    if partecomune == 0
        add(elabPCL,testoATD);
        add(elabPCL,testoRIS);
        partecomune = 1;
    end
    add(appendice,elabPCL);
    
    % --- ENG ---
    if activeEN == 1
        elabPCL_ENG = Section();
        sezPCA_ENG = Heading3('PreConv Array');
        sezPCA_ENG.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
        elabPCL_ENG.Title = sezPCA_ENG;
        testo = Paragraph(['When a displacement occurs, the node changes its position in order to '...
            'follow the rock mass movement. After been read, every tilt sensor records the new position '...
            'as an electrical signal (raw data) and sends the information to the control unit. '...
            'The datalogger saves the information on a volatile memory (SD card) and then transmits '...
            'them to the elaboration centre, where a software processes the electrical signals (ADC points) '...
            'to return information about the real displacement of the node (physical units). The accelerometer '...
            'gives information about the rotation of the node, referring to the constant gravity acceleration g. '...
            'The on-board thermometer is necessary to correct the '...
            'thermal effects on the accelerometer, using the calibration values. This sensor also provides '...
            'the temperature along the array.']);
        testo2 = Paragraph(['MEMS sensor is located at the centre of each Link and measures the three '...
            'components of the gravitational field in its own reference system, starting from an initial '...
            'configuration (zero reading). When a movement arises, the variation of the different gravity '...
            'components gives back the information of the displacement. In this way, it is possible to '...
            'calculate the pre-convergence component ahead of the tunnel face and the local displacement of each Link, '...
            'thus allowing to compute a curve of cumulated displacements.'...
            'Each PreConv Link has a Segment of Relevance, which is assumed as infinitely rigid, that starts from the middle '...
            'point between the considered and the previous Link and ends at the medium distance between the '...
            'considered and the following Link. It is possible to customize the distance between Links according to '...
            'specific monitoring necessities (smaller distances lead to more reliable and accurate results).']);
        img1 = Image(('PCA.png'));
        img2 = Image(('PCA2.jpg'));
        img1.Style = {Height('6cm'),HAlign('center')};
        imgcaption_ENG = Paragraph(['Fig. ' num2str(FIG_ENG) ' - Graphical representation '...
            'of the expected deformation behaviour induced by underground excavation']);
        FIG_ENG = FIG_ENG+1;
        imgcaption_ENG.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
        img2.Style = {Height('14cm'),HAlign('center')};
        img2caption_ENG = Paragraph(['Fig. ' num2str(FIG_ENG) ' - MUMS PreConv Array installation example']);
        FIG_ENG = FIG_ENG+1;
        img2caption_ENG.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
        testo.HAlign = 'justify';
        testo2.HAlign = 'justify';
        if nodoTunnel_ENG == 0
            add(elabPCL_ENG,testo_ENG);
            nodoTunnel_ENG = 1;
        end
        add(elabPCL_ENG,img1);
        add(elabPCL_ENG,imgcaption_ENG);
        add(elabPCL_ENG,testo2);
        add(elabPCL_ENG,img2);
        add(elabPCL_ENG,img2caption_ENG);
        if partecomune_ENG == 0
            add(elabPCL_ENG,testoATD_ENG);
            add(elabPCL_ENG,testoRIS_ENG);
            partecomune_ENG = 1;
        end
        add(appendice_ENG,elabPCL_ENG);
    end
end

% --- Analog Array ---
if sum(yesLL)>=1 || sum(yesPrL)>=1 || sum(yesPT100)>=1 || sum(yesCrL)>=1 || ...
        sum(yes3DCrL)>=1 || sum(yesEL)>=1 || sum(yes3DEL)>=1 || sum(yesWEL)>=1 || sum(yesMPBEL)>=1
    elabAA = Section();
    if ElabTitle == 0
        app = Heading2('Elaborazione dati');
        app.Style = {OuterMargin('0in','0in','0.2in','0.2in'),FontSize(Font_section),HAlign('justify')}; % Sx-Dx-Alto-Basso
        Titolo.Title = app;
        if activeEN == 1
            app_ENG = Heading2('Data elaboration');
            app_ENG.Style = {OuterMargin('0in','0in','0.2in','0.2in'),FontSize(Font_section),HAlign('justify')}; % Sx-Dx-Alto-Basso
            Titolo_ENG.Title = app_ENG;
        end
        ElabTitle = 1;
    end
    sezAA = Heading3('Analog Array');
    sezAA.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
    elabAA.Title = sezAA;
    testo = Paragraph(['Gli Analog Array sono costituiti da sensori analogici tradizionali, '...
        'letti mediante centralina ASE801 e multiplexer analogico-digitale GMUX o centralina '...
        'ASE201. Tali datalogger permettono il campionamento di ogni tipologia di sensoristica '...
        'presente sul mercato e letta con grandezze quali Hz, mV/V, 0-5 V, 0-10 V, VW, 4-20 mA, NTC, PT100, etc.']);
    testo2 = Paragraph(['Ogni sensore viene collegato nel canale designato e letto in automatico secondo '...
        'il periodo di campionamento impostato.']);
    img = Image(('G201.png'));
    img.Style = {Height('3cm'),HAlign('center')};
    imgcaption = Paragraph(['Fig. ' num2str(FIG) ' - Centralina ASE201 in grado di leggere '...
        'ogni tipologia di sensore analogico tradizionale, convertendo il segnale in ingresso '...
        'in un''uscita digitale.']);
    FIG = FIG+1;
    imgcaption.Style = {HAlign('justify'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
    testo.HAlign = 'justify';
    testo2.HAlign = 'justify';
    add(elabAA,testo);
    add(elabAA,testo2);
    add(elabAA,img);
    add(elabAA,imgcaption);
    if partecomune == 0
        add(elabAA,testoATD);
        add(elabAA,testoRIS);
        partecomune = 1;
    end
    add(appendice,elabAA);
    
    %---ENG---
    if activeEN == 1
        elabAA_ENG = Section();
        sezAA_ENG = Heading3('Analog Array');
        sezAA_ENG.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
        elabAA_ENG.Title = sezAA_ENG;
        testo = Paragraph(['Analog Arrays are composed of traditional analog sensors, connected to the ASE801 '...
            'datalogger thanks to a dedicated GMUX module that converts an analog '...
            'signal into a digital one, or by installing an ASE201 control unit. '...
            'This datalogger is able to read any traditional sensors featuring different '...
            'output signals (e.g. Hz, mV/V, 0-5 V, 0-10 V, VW, 4-20 mA, NTC, PT100, etc.).']);
        testo2 = Paragraph(['Each single sensor is connected to a dedicated channel, and the recording process is performed '...
            'automatically according to the appropriate sampling frequency.']);
        img = Image(('G201.png'));
        img.Style = {Height('3cm'),HAlign('center')};
        imgcaption_ENG = Paragraph(['Fig. ' num2str(FIG_ENG) ' - ASE201 control unit, designed to read any traditional analog '...
            'monitoring device by converting its signal into a digital output']);
        FIG_ENG = FIG_ENG+1;
        imgcaption_ENG.Style = {HAlign('justify'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
        testo.HAlign = 'justify';
        testo2.HAlign = 'justify';
        add(elabAA_ENG,testo);
        add(elabAA_ENG,testo2);
        add(elabAA_ENG,img);
        add(elabAA_ENG,imgcaption_ENG);
        if partecomune_ENG == 0
            add(elabAA_ENG,testoATD_ENG);
            add(elabAA_ENG,testoRIS_ENG);
            partecomune_ENG = 1;
        end
        add(appendice_ENG,elabAA_ENG);
    end
end

%% Appendice sensori
% ---Tilt Link HR 3D V---
elabSE = Section();
SE = Section();
app = Heading2('Descrizione sensori');
app.Style = {OuterMargin('0in','0in','0.2in','0.2in'),FontSize(Font_section),HAlign('justify')}; % Sx-Dx-Alto-Basso
elabSE.Title = app;
add(appendice,elabSE);
if activeEN == 1
    elabSE_ENG = Section();
    SE_ENG = Section();
    app_ENG = Heading2('Sensors description');
    app_ENG.Style = {OuterMargin('0in','0in','0.2in','0.2in'),FontSize(Font_section),HAlign('justify')}; % Sx-Dx-Alto-Basso
    elabSE_ENG.Title = app_ENG;
    add(appendice_ENG,elabSE_ENG);
end
TL3D = 0;
for a = 1:dim
    [dimC,~] = size(colonna6{a,1});
    if dimC == 1
        if strcmp(colonna6(a,1),'Tilt Link HR 3D V') == 1
            if TL3D == 0
                SE = Section();
            end
            sezTilt = Heading3('Tilt Link HR 3D V');
            sezTilt.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
            SE.Title = sezTilt;
            text = Paragraph(['I Tilt Link HR 3D V sono caratterizzati dalla presenza '...
                'simultanea di una coppia di sensori nella medesima scheda elettronica. Il primo, '...
                'di tipo MEMS 3D, ' char(232) ' equipaggiato con accelerometro, magnetometro e termometro, '...
                'con inclinazioni dei sensori registrate dal primo elemento. La seconda tipologia, '...
                'cella elettrolitica 2D, ' char(232) ' in grado di fornire lo spostamento lungo gli assi strumentali '...
                'X e Y, a partire dalle inclinazioni ottenute mediante un''elettrolivella. La cella elettrolitica '...
                '' char(232) ' orientata mediante il magnetometro del MEMS, dal momento che gli assi '...
                'strumentali X e Y dei due sensori possono ritenersi coincidenti. Nel dettaglio, '...
                'il sensore MEMS dispone di una portata teoricamente infinita (pu' char(242) ' essere ruotato in '...
                'ogni direzione dello spazio senza particolari problemi) e nasce per misurare spostamenti significativi, '...
                'mentre per quanto riguarda le piccole deformazioni risente dei disturbi legati al proprio '...
                'rumore di fondo di natura elettrica. La cella elettrolitica ha una sensibilit' char(224) ' molto elevata, '...
                'tale da percepire vibrazioni anche molto piccole, con il difetto di finire fuori scala per '...
                'valori di inclinazione assoluta pari a ' char(177) ' 25' char(176) ' (in tal senso ' char(232) ' importante sottolineare che, '...
                'se al momento dell''installazione il sensore presenta gi' char(224) ' un''inclinazione verso valle di '...
                'qualche grado, la portata del sensore ne risulter' char(224) ' conseguentemente ridotta).']);
            text.HAlign = 'justify';
            
            %---ENG---
            if activeEN == 1
                if TL3D == 0
                    SE_ENG = Section();
                end
                sezTilt_ENG = Heading3('Tilt Link HR 3D V');
                sezTilt_ENG.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                SE_ENG.Title = sezTilt_ENG;
                text_ENG = Paragraph(['Tilt Link HR 3D V follows the same working principle of Tilt Link V. '...
                    'The main improvement refers to the 2D electrolytic cell, which permits to monitor small '...
                    'displacements with a 10 times higher accuracy. Contrary to the MEMS sensor, which has a theoretically '...
                    'infinite measure range, the electrolytic cell is limited to a ' char(177) '25' char(186) ' absolute tilt range. Since the '...
                    'instrumental axes X and Y of this sensor coincide '...
                    'with the two corresponding MEMS axes, the MEMS magnetometer can be used to define also the electrolytic cell '...
                    'orientation. The simultaneous presence of two different '...
                    'type of sensors in the same Link gives redundancy to results, which is fundamental to reduce '...
                    'the uncertainties and have a robust interpretation of the occurring phenomenon.']);
                text_ENG.HAlign = 'justify';
            end
            if TL3D == 0
                add(SE,text);
                imgTL = Image(('Tilt Link HR 3D V.tif'));
                add(SE,imgTL);
                imgTL.Style = {Height('5cm'),HAlign('center')};
                imgTLcaption = Paragraph(['Fig. ' num2str(FIG) ' - Sensore Tilt Link HR 3D V']);
                imgTLcaption.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                add(SE,imgTLcaption);
                FIG = FIG+1;
                if activeEN == 1
                    add(SE_ENG,text_ENG);
                    imgTL = Image(('Tilt Link HR 3D V.tif'));
                    add(SE_ENG,imgTL);
                    imgTL.Style = {Height('5cm'),HAlign('center')};
                    imgTLcaption_ENG = Paragraph(['Fig. ' num2str(FIG_ENG) ' - Tilt Link HR 3D V sensor']);
                    imgTLcaption_ENG.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                    add(SE_ENG,imgTLcaption_ENG);
                    FIG_ENG = FIG_ENG+1;
                end
                TL3D = 1;
            end
            break
        end
    else
        for aC = 1:dimC
            if strcmp(colonna6{a, 1}{aC, 1},'Tilt Link HR 3D V') == 1
                if TL3D == 0
                    SE = Section();
                end
                sezTilt = Heading3('Tilt Link HR 3D V');
                sezTilt.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                SE.Title = sezTilt;
                text = Paragraph(['I Tilt Link HR 3D V sono caratterizzati dalla presenza '...
                    'simultanea di una coppia di sensori nella medesima scheda elettronica. Il primo, '...
                    'di tipo MEMS 3D, ' char(232) ' equipaggiato con accelerometro, magnetometro e termometro, '...
                    'con inclinazioni dei sensori registrate dal primo elemento. La seconda tipologia, '...
                    'cella elettrolitica 2D, ' char(232) ' in grado di fornire lo spostamento lungo gli assi strumentali '...
                    'X e Y, a partire dalle inclinazioni ottenute mediante un''elettrolivella. La cella elettrolitica '...
                    char(232) ' orientata mediante il magnetometro del MEMS, dal momento che gli assi '...
                    'strumentali X e Y dei due sensori possono ritenersi coincidenti. Nel dettaglio, '...
                    'il sensore MEMS dispone di una portata teoricamente infinita (pu' char(242) ' essere ruotato in '...
                    'ogni direzione dello spazio senza particolari problemi) e nasce per misurare spostamenti significativi, '...
                    'mentre per quanto riguarda le piccole deformazioni risente dei disturbi legati al proprio '...
                    'rumore di fondo di natura elettrica. La cella elettrolitica ha una sensibilit' char(224) ' molto elevata, '...
                    'tale da percepire vibrazioni anche molto piccole, con il difetto di finire fuori scala per '...
                    'valori di inclinazione assoluta pari a ' char(177) ' 25' char(176) ' (in tal senso ' char(232) ' importante sottolineare che, '...
                    'se al momento dell''installazione il sensore presenta gi' char(224) ' un''inclinazione verso valle di '...
                    'qualche grado, la portata del sensore ne risulter' char(224) ' conseguentemente ridotta).']);
                text.HAlign = 'justify';
                
                %---ENG---
                if activeEN == 1
                    if TL3D == 0
                        SE_ENG = Section();
                    end
                    sezTilt_ENG = Heading3('Tilt Link HR 3D V');
                    sezTilt_ENG.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                    SE_ENG.Title = sezTilt_ENG;
                    text_ENG = Paragraph(['Tilt Link HR 3D V follows the same working principle of Tilt Link V. '...
                        'The main improvement refers to the 2D electrolytic cell, which permits to monitor small '...
                        'displacements with a 10 times higher accuracy. Contrary to the MEMS sensor, which has a theoretically '...
                        'infinite measure range, the electrolytic cell is limited to a ' char(177) '25' char(186) ' absolute tilt range. Since the '...
                        'instrumental axes X and Y of this sensor coincide '...
                        'with the two corresponding MEMS axes, the MEMS magnetometer can be used to define also the electrolytic cell '...
                        'orientation. The simultaneous presence of two different '...
                        'type of sensors in the same Link gives redundancy to results, which is fundamental to reduce '...
                        'the uncertainties and have a robust interpretation of the occurring phenomenon.']);
                    text_ENG.HAlign = 'justify';
                end
                if TL3D == 0
                    add(SE,text);
                    imgTL = Image(('Tilt Link HR 3D V.tif'));
                    add(SE,imgTL);
                    imgTL.Style = {Height('5cm'),HAlign('center')};
                    imgTLcaption = Paragraph(['Fig. ' num2str(FIG) ' - Sensore Tilt Link HR 3D V']);
                    imgTLcaption.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                    add(SE,imgTLcaption);
                    FIG = FIG+1;
                    if activeEN == 1
                        add(SE_ENG,text);
                        imgTL = Image(('Tilt Link HR 3D V.tif'));
                        add(SE_ENG,imgTL);
                        imgTL.Style = {Height('5cm'),HAlign('center')};
                        imgTLcaption_ENG = Paragraph(['Fig. ' num2str(FIG_ENG) ' - Tilt Link HR 3D V sensor']);
                        imgTLcaption_ENG.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                        add(SE_ENG,imgTLcaption_ENG);
                        FIG_ENG = FIG_ENG+1;
                    end
                    TL3D = 1;
                end
                break
            end
        end
    end
end
add(appendice,SE);
if activeEN == 1
    add(appendice_ENG,SE_ENG);
end

% --- Tilt Link V ---
TL = 0;
ST = Section();
if activeEN == 1
    ST_ENG = Section();
end

for a = 1:dim
    [dimC,~] = size(colonna6{a,1});
    if dimC == 1
        if strcmp(colonna6(a,1),'Tilt Link V') == 1
            if TL == 0
                ST = Section();
            end
            sezTilt = Heading3('Tilt Link V');
            sezTilt.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
            ST.Title = sezTilt;
            text = Paragraph(['I Tilt Link V sono caratterizzati dalla presenza '...
                'del sensore MEMS 3D, equipaggiato con accelerometro, magnetometro e termometro. Il primo '...
                'elemento registra le inclinazioni del sensore, mentre il secondo definisce la direzione '...
                'di inclinazione. Il termometro ' char(232) ' utilizzato per la compensazione termica delle singole misure. '...
                'Nel dettaglio, il sensore dispone di una portata teoricamente infinita (pu' char(242) ' essere ruotato in '...
                'ogni direzione dello spazio senza particolari problemi) e nasce per misurare spostamenti significativi, '...
                'mentre per quanto riguarda le piccole deformazioni risente dei disturbi legati al proprio '...
                'rumore di fondo di natura elettrica.']);
            
            %--ENG--
            if activeEN == 1
                if TL_ENG == 0
                    ST_ENG = Section();
                end
                sezTilt_ENG = Heading3('Tilt Link V');
                sezTilt_ENG.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                ST_ENG.Title = sezTilt_ENG;
                text_ENG = Paragraph(['Each Tilt Link V features a 3D MEMS sensor, which equips an accelerometer, a '...
                    'magnetometer, and a thermometer. The first element is able to record the sensor tilt, '...
                    'while the second one defines its direction. The thermometer provides the sensor temperature, and it '...
                    'is used to correct the thermal effects on the accelerometer. Form a theoretical point of view, '...
                    'the MEMS features an infinite range of tilt measure, while small variations in its '...
                    'position are influenced by electrical noises.']);
            end
            if TL == 0
                text.HAlign = 'justify';
                add(ST,text);
                img = Image(('Tilt Link V.tif'));
                img.Style = {Height('5cm'),HAlign('center')};
                add(ST,img);
                ionhcaption = Paragraph(['Fig. ' num2str(FIG) ' - Sensore Tilt Link V']);
                FIG = FIG+1;
                ionhcaption.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                add(ST,ionhcaption);
                if activeEN == 1
                    text_ENG.HAlign = 'justify';
                    add(ST_ENG,text_ENG);
                    img = Image(('Tilt Link V.tif'));
                    img.Style = {Height('5cm'),HAlign('center')};
                    add(ST,img);
                    ionhcaption_ENG = Paragraph(['Fig. ' num2str(FIG_ENG) ' - Tilt Link V sensor']);
                    FIG_ENG = FIG_ENG+1;
                    ionhcaption_ENG.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                    add(ST,ionhcaption_ENG);
                end
                TL = 1;
            end
            break
        end
    else
        for aC = 1:dimC
            if strcmp(colonna6{a, 1}{aC, 1},'Tilt Link V') == 1
                if TL == 0
                    ST = Section();
                end
                sezTilt = Heading3('Tilt Link V');
                sezTilt.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                ST.Title = sezTilt;
                text = Paragraph(['I Tilt Link V sono caratterizzati dalla presenza '...
                    'del sensore MEMS 3D, equipaggiato con accelerometro, magnetometro e termometro. Il primo '...
                    'elemento registra le inclinazioni del sensore, mentre il secondo definisce la direzione '...
                    'di inclinazione. Il termometro ' char(232) ' utilizzato per la compensazione termica delle singole misure. '...
                    'Nel dettaglio, il sensore dispone di una portata teoricamente infinita (pu' char(242) ' essere ruotato in '...
                    'ogni direzione dello spazio senza particolari problemi) e nasce per misurare spostamenti significativi, '...
                    'mentre per quanto riguarda le piccole deformazioni risente dei disturbi legati al proprio '...
                    'rumore di fondo di natura elettrica.']);
                %--ENG--
                if activeEN == 1
                    if TL_ENG == 0
                        ST_ENG = Section();
                    end
                    sezTilt_ENG = Heading3('Tilt Link V');
                    sezTilt_ENG.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                    ST_ENG.Title = sezTilt_ENG;
                    text_ENG = Paragraph(['Each Tilt Link V features a 3D MEMS sensor, which equips an accelerometer, a '...
                        'magnetometer, and a thermometer. The first element is able to record the sensor tilt, '...
                        'while the second one defines its direction. The thermometer provides the sensor temperature, and it '...
                        'is used to correct the thermal effects on the accelerometer. Form a theoretical point of view, '...
                        'the MEMS features an infinite range of tilt measure, while small variations in its '...
                        'position are influenced by electrical noises.']);
                end
                if TL == 0
                    text.HAlign = 'justify';
                    add(ST,text);
                    img = Image(('Tilt Link V.tif'));
                    img.Style = {Height('5cm'),HAlign('center')};
                    add(ST,img);
                    ionhcaption = Paragraph(['Fig. ' num2str(FIG) ' - Sensore Tilt Link V']);
                    FIG = FIG+1;
                    ionhcaption.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                    add(ST,ionhcaption);
                    if activeEN == 1
                        text_ENG.HAlign = 'justify';
                        add(ST_ENG,text_ENG);
                        img = Image(('Tilt Link V.tif'));
                        img.Style = {Height('5cm'),HAlign('center')};
                        add(ST,img);
                        ionhcaption_ENG = Paragraph(['Fig. ' num2str(FIG_ENG) ' - Tilt Link V sensor']);
                        FIG_ENG = FIG_ENG+1;
                        ionhcaption_ENG.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                        add(ST,ionhcaption_ENG);
                    end
                    TL = 1;
                end
                break
            end
        end
    end
end
add(appendice,ST);
if activeEN == 1
    add(appendice_ENG,ST_ENG);
end

% --- In Place Link HR 3D ---
SIPI3D = Section();
if activeEN == 1
    SIPI3D_ENG = Section();
end
IPL3D = 0;
for a = 1:dim
    [dimC,~] = size(colonna6{a,1});
    if dimC == 1
        if strcmp(colonna6(a,1),'In Place Link HR 3D') == 1
            if IPL3D == 0
                SIPI3D = Section();
            end
            sezIPI = Heading3('In Place Link HR 3D');
            sezIPI.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
            SIPI3D.Title = sezIPI;
            text = Paragraph(['Gli In Place Link HR sono caratterizzati dalla presenza '...
                'simultanea di una coppia di sensori nella medesima scheda elettronica. Il primo, '...
                'di tipo MEMS 3D, ' char(232) ' equipaggiato con accelerometro, magnetometro e termometro, '...
                'con inclinazioni dei sensori registrate dal primo elemento. La seconda tipologia, '...
                'cella elettrolitica 2D, ' char(232) ' in grado di fornire lo spostamento lungo gli assi strumentali '...
                'X e Y, a partire dalle inclinazioni ottenute mediante un''elettrolivella. La cella elettrolitica '...
                '' char(232) ' orientata mediante il magnetometro del MEMS, dal momento che gli assi '...
                'strumentali X e Y dei due sensori possono ritenersi coincidenti. Nel dettaglio, '...
                'il sensore MEMS dispone di una portata teoricamente infinita (pu' char(242) ' essere ruotato in '...
                'ogni direzione dello spazio senza particolari problemi) e nasce per misurare spostamenti significativi, '...
                'mentre per quanto riguarda le piccole deformazioni risente dei disturbi legati al proprio '...
                'rumore di fondo di natura elettrica. La cella elettrolitica ha una sensibilit' char(224) ' molto elevata, '...
                'tale da percepire vibrazioni anche molto piccole, con il difetto di finire fuori scala per '...
                'valori di inclinazione assoluta pari a ' char(177) ' 25' char(176) ' (in tal senso ' char(232) ' importante sottolineare che, '...
                'se al momento dell''installazione il sensore presenta gi' char(224) ' un''inclinazione verso valle di '...
                'qualche grado, la portata del sensore ne risulter' char(224) ' conseguentemente ridotta).']);
            text.HAlign = 'justify';
            
            %--ENG--
            if activeEN == 1
                if IPL3D == 0
                    SIPI3D_ENG = Section();
                end
                sezIPI_ENG = Heading3('In Place Link HR 3D');
                sezIPI_ENG.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                SIPI3D_ENG.Title = sezIPI_ENG;
                text_ENG = Paragraph(['In Place HR 3D follows the same working principle of In Place Link. '...
                    'The main improvement refers to the 2D electrolytic cell, which permits to monitor small '...
                    'displacements with a 10 times higher accuracy. Contrary to the MEMS sensor, which has a theoretically '...
                    'infinite measure range, the electrolytic cell is limited to a ' char(177) '25' char(186) ' absolute tilt range. Since the '...
                    'instrumetal axes X and Y of this sensor coincide '...
                    'with the two corresponding MEMS axes, the MEMS magnetometer can be used to define also the electrolytic cell '...
                    'orientation. The simultaneous presence of two different '...
                    'type of sensors in the same link gives redundancy to results, which is fundamental to reduce '...
                    'the uncertainties and have a robust interpretation of the occurring phenomenon.']);
                text_ENG.HAlign = 'justify';
            end
            if IPL3D == 0
                add(SIPI3D,text);
                imgIPL = Image(('Tilt Link HR 3D V.tif'));
                add(SIPI3D,imgIPL);
                imgIPL.Style = {Height('5cm'),HAlign('center')};
                imgIPLcaption = Paragraph(['Fig. ' num2str(FIG) ' - Sensore In Place Link HR 3D']);
                imgIPLcaption.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                add(SIPI3D,imgIPLcaption);
                FIG = FIG+1;
                if activeEN == 1
                    add(SIPI3D_ENG,text_ENG);
                    imgIPL = Image(('Tilt Link HR 3D V.tif'));
                    add(SIPI3D_ENG,imgIPL);
                    imgIPL.Style = {Height('5cm'),HAlign('center')};
                    imgIPLcaption_ENG = Paragraph(['Fig. ' num2str(FIG_ENG) ' - In Place Link HR 3D sensor']);
                    FIG_ENG = FIG_ENG+1;
                    imgIPLcaption_ENG.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                    add(SIPI3D,imgIPLcaption_ENG);
                end
                IPL3D = 1;
            end
            break
        end
    else
        for aC = 1:dimC
            if strcmp(colonna6{a, 1}{aC, 1},'In Place Link HR 3D') == 1
                if IPL3D == 0
                    SIPI3D = Section();
                end
                sezIPI = Heading3('In Place Link HR 3D');
                sezIPI.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                SIPI3D.Title = sezIPI;
                text = Paragraph(['Gli In Place Link HR 3D sono caratterizzati dalla presenza '...
                    'simultanea di una coppia di sensori nella medesima scheda elettronica. Il primo, '...
                    'di tipo MEMS 3D, ' char(232) ' equipaggiato con accelerometro, magnetometro e termometro, '...
                    'con inclinazioni dei sensori registrate dal primo elemento. La seconda tipologia, '...
                    'cella elettrolitica 2D, ' char(232) ' in grado di fornire lo spostamento lungo gli assi strumentali '...
                    'X e Y, a partire dalle inclinazioni ottenute mediante un''elettrolivella. La cella elettrolitica '...
                    char(232) ' orientata mediante il magnetometro del MEMS, dal momento che gli assi '...
                    'strumentali X e Y dei due sensori possono ritenersi coincidenti. Nel dettaglio, '...
                    'il sensore MEMS dispone di una portata teoricamente infinita (pu' char(242) ' essere ruotato in '...
                    'ogni direzione dello spazio senza particolari problemi) e nasce per misurare spostamenti significativi, '...
                    'mentre per quanto riguarda le piccole deformazioni risente dei disturbi legati al proprio '...
                    'rumore di fondo di natura elettrica. La cella elettrolitica ha una sensibilit' char(224) ' molto elevata, '...
                    'tale da percepire vibrazioni anche molto piccole, con il difetto di finire fuori scala per '...
                    'valori di inclinazione assoluta pari a ' char(177) ' 25' char(176) ' (in tal senso ' char(232) ' importante sottolineare che, '...
                    'se al momento dell''installazione il sensore presenta gi' char(224) ' un''inclinazione verso valle di '...
                    'qualche grado, la portata del sensore ne risulter' char(224) ' conseguentemente ridotta).']);
                text.HAlign = 'justify';
                %--ENG--
                if activeEN == 1
                    if IPL3D == 0
                        SIPI3D_ENG = Section();
                    end
                    sezIPI_ENG = Heading3('In Place Link HR 3D');
                    sezIPI_ENG.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                    SIPI3D_ENG.Title = sezIPI_ENG;
                    text_ENG = Paragraph(['In Place HR 3D follows the same working principle of In Place Link. '...
                        'The main improvement refers to the 2D electrolytic cell, which permits to monitor small '...
                        'displacements with a 10 times higher accuracy. Contrary to the MEMS sensor, which has a theoretically '...
                        'infinite measure range, the electrolytic cell is limited to a ' char(177) '25' char(186) ' absolute tilt range. Since the '...
                        'instrumetal axes X and Y of this sensor coincide '...
                        'with the two corresponding MEMS axes, the MEMS magnetometer can be used to define also the electrolytic cell '...
                        'orientation. The simultaneous presence of two different '...
                        'type of sensors in the same link gives redundancy to results, which is fundamental to reduce '...
                        'the uncertainties and have a robust interpretation of the occurring phenomenon.']);
                    text_ENG.HAlign = 'justify';
                end
                if IPL3D == 0
                    add(SIPI3D,text);
                    imgIPL = Image(('Tilt Link HR 3D V.tif'));
                    add(SIPI3D,imgIPL);
                    imgIPL.Style = {Height('5cm'),HAlign('center')};
                    imgIPLcaption = Paragraph(['Fig. ' num2str(FIG) ' - Sensore In Place Link HR 3D']);
                    FIG = FIG+1;
                    imgIPLcaption.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                    add(SIPI3D,imgIPLcaption);
                    if activeEN == 1
                        add(SIPI3D_ENG,text_ENG);
                        imgIPL = Image(('Tilt Link HR 3D V.tif'));
                        add(SIPI3D_ENG,imgIPL);
                        imgIPL.Style = {Height('5cm'),HAlign('center')};
                        imgIPLcaption_ENG = Paragraph(['Fig. ' num2str(FIG_ENG) ' - In Place Link HR 3D sensor']);
                        FIG_ENG = FIG_ENG+1;
                        imgIPLcaption_ENG.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                        add(SIPI3D,imgIPLcaption_ENG);
                    end
                    IPL3D = 1;
                end
                break
            end
        end
    end
end
add(appendice,SIPI3D);
if activeEN == 1
    add(appendice_ENG,SIPI3D_ENG);
end

% --- In Place Link ---
IPL = 0;
SIPI = Section();
if activeEN == 1
    SIPI_ENG = Section();
end
for a = 1:dim
    [dimC,~] = size(colonna6{a,1});
    if dimC == 1
        if strcmp(colonna6(a,1),'In Place Link') == 1
            if IPL == 0
                SIPI = Section();
            end
            sezIPI = Heading3('In Place Link');
            sezIPI.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
            SIPI.Title = sezIPI;
            text = Paragraph(['Gli In Place Link sono caratterizzati dalla presenza '...
                'del sensore MEMS 3D, equipaggiato con accelerometro, magnetometro e termometro. Il primo '...
                'elemento registra le inclinazioni del sensore, mentre il secondo definisce la direzione '...
                'di inclinazione. Il termometro ' char(232) ' utilizzato per la compensazione termica delle singole misure. '...
                'Nel dettaglio, il sensore dispone di una portata teoricamente infinita (pu' char(242) ' essere ruotato in '...
                'ogni direzione dello spazio senza particolari problemi) e nasce per misurare spostamenti significativi, '...
                'mentre per quanto riguarda le piccole deformazioni risente dei disturbi legati al proprio '...
                'rumore di fondo di natura elettrica.']);
            
            %--ENG--
            if activeEN == 1
                if IPL == 0
                    SIPI_ENG = Section();
                end
                sezIPI_ENG = Heading3('In Place Link');
                sezIPI_ENG.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                SIPI_ENG.Title = sezIPI_ENG;
                text_ENG = Paragraph(['Each In Place Link features a 3D MEMS sensor, which equips an accelerometer, a '...
                    'magnetometer, and a thermometer. The first element is able to record the node tilt, '...
                    'while the second one defines its direction. The thermometer provides the sensor temperature, and it '...
                    'is used to correct the thermal effects on the accelerometer. From a theoretical point of view, '...
                    'the MEMS features an infinite range of tilt measure, while small variations in its '...
                    'position are influenced by electrical noises.']);
            end
            if IPL == 0
                text.HAlign = 'justify';
                add(SIPI,text);
                img = Image(('Tilt Link V.tif'));
                img.Style = {Height('5cm'),HAlign('center')};
                add(SIPI,img);
                ionhcaption = Paragraph(['Fig. ' num2str(FIG) ' - Sensore In Place Link']);
                FIG = FIG+1;
                ionhcaption.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                add(SIPI,ionhcaption);
                if activeEN == 1
                    text_ENG.HAlign = 'justify';
                    add(SIP_ENGI,text_ENG);
                    img = Image(('Tilt Link V.tif'));
                    img.Style = {Height('5cm'),HAlign('center')};
                    add(SIPI,img);
                    ionhcaption_ENG = Paragraph(['Fig. ' num2str(FIG_ENG) ' - In Place Link sensor']);
                    FIG_ENG = FIG_ENG+1;
                    ionhcaption_ENG.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                    add(SIPI_ENG,ionhcaption_ENG);
                end
                IPL = 1;
            end
            break
        end
    else
        for aC = 1:dimC
            if strcmp(colonna6{a, 1}{aC, 1},'In Place Link') == 1
                if IPL == 0
                    SIPI = Section();
                end
                sezIPI = Heading3('In Place Link');
                sezIPI.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                SIPI.Title = sezIPI;
                text = Paragraph(['Gli In Place Link sono caratterizzati dalla presenza '...
                    'del sensore MEMS 3D, equipaggiato con accelerometro, magnetometro e termometro. Il primo '...
                    'elemento registra le inclinazioni del sensore, mentre il secondo definisce la direzione '...
                    'di inclinazione. Il termometro ' char(232) ' utilizzato per la compensazione termica delle singole misure. '...
                    'Nel dettaglio, il sensore dispone di una portata teoricamente infinita (pu' char(242) ' essere ruotato in '...
                    'ogni direzione dello spazio senza particolari problemi) e nasce per misurare spostamenti significativi, '...
                    'mentre per quanto riguarda le piccole deformazioni risente dei disturbi legati al proprio '...
                    'rumore di fondo di natura elettrica.']);
                %--ENG--
                if activeEN == 1
                    if IPL == 0
                        SIPI_ENG = Section();
                    end
                    sezIPI_ENG = Heading3('In Place Link');
                    sezIPI_ENG.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                    SIPI_ENG.Title = sezIPI_ENG;
                    text_ENG = Paragraph(['Each In Place Link features a 3D MEMS sensor, which equips an accelerometer, a '...
                        'magnetometer, and a thermometer. The first element is able to record the node tilt, '...
                        'while the second one defines its direction. The thermometer provides the sensor temperature, and it '...
                        'is used to correct the thermal effects on the accelerometer. From a theoretical point of view, '...
                        'the MEMS features an infinite range of tilt measure, while small variations in its '...
                        'position are influenced by electrical noises.']);
                end
                if IPL == 0
                    text.HAlign = 'justify';
                    add(SIPI,text);
                    img = Image(('Tilt Link V.tif'));
                    img.Style = {Height('5cm'),HAlign('center')};
                    add(SIPI,img);
                    ionhcaption = Paragraph(['Fig. ' num2str(FIG) ' - Sensore In Place Link']);
                    FIG = FIG+1;
                    ionhcaption.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                    add(SIPI,ionhcaption);
                    
                    if activeEN == 1
                        text_ENG.HAlign = 'justify';
                        add(SIP_ENGI,text_ENG);
                        img = Image(('Tilt Link V.tif'));
                        img.Style = {Height('5cm'),HAlign('center')};
                        add(SIPI,img);
                        ionhcaption_ENG = Paragraph(['Fig. ' num2str(FIG_ENG) ' - In Place Link sensor']);
                        FIG_ENG = FIG_ENG+1;
                        ionhcaption_ENG.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                        add(SIPI_ENG,ionhcaption_ENG);
                    end
                    IPL = 1;
                end
                break
            end
        end
    end
end
add(appendice,SIPI);
if activeEN == 1
    add(appendice_ENG,SIPI_ENG);
end

% --- In Place Link HR ---
if yesIPL == 0
    IPLHR = 0;
    SIPIHR = Section();
    if activeEN == 1
        SIPIHR_ENG = Section();
    end
    for a = 1:dim
        [dimC,~] = size(colonna6{a,1});
        if dimC == 1
            if strcmp(colonna6(a,1),'In Place Link HR') == 1
                if IPLHR == 0
                    SIPIHR = Section();
                end
                sezIPIHR = Heading3('In Place Link HR');
                sezIPIHR.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                SIPIHR.Title = sezIPIHR;
                text = Paragraph(['Gli In Place Link HR sono caratterizzati dalla simultanea presenza '...
                    'del sensore elettrolitico 2D e di un termometro. Il primo '...
                    'elemento registra le inclinazioni assolute del sensore rispetto al piano orizzontale, mentre '...
                    'il termometro fornisce il dato di temperatura, molto utile nell''individuazione degli effetti termici. '...
                    'A seconda delle impostazioni definite al momento dell''installazione, il sensore va fuori scala '...
                    'per un determinato angolo assoluto positivo o negativo.']);
                
                %--ENG--
                if activeEN == 1
                    if IPLHR == 0
                        SIPIHR = Section();
                    end
                    sezIPIHR = Heading3('In Place Link HR');
                    sezIPIHR.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                    SIPIHR.Title = sezIPIHR;
                    text_ENG = Paragraph(['Each In Place Link HR features a 2D electrolytic tilt sensor and a thermometer. '...
                        'The first element is able to record the absolute tilt of the node, '...
                        'while the thermometer provides the sensor temperature, and it '...
                        'is used to correct the thermal effects on the tilt sensor. Depending on the installation '...
                        'configuration, the elctrolytic sensor could reach out-of-range positions for specific values '...
                        'of absolute tilt of the node (both positive and/or negative). ']);
                end
                if IPLHR == 0
                    text.HAlign = 'justify';
                    add(SIPIHR,text);
                    img = Image(('IPLHR.jpg'));
                    img.Style = {Height('3cm'),HAlign('center')};
                    add(SIPIHR,img);
                    ionhcaption = Paragraph(['Fig. ' num2str(FIG) ' - Sensore In Place Link HR']);
                    FIG = FIG+1;
                    ionhcaption.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                    add(SIPIHR,ionhcaption);
                    if activeEN == 1
                        text_ENG.HAlign = 'justify';
                        add(SIPIHR_ENG,text_ENG);
                        img = Image(('IPLHR.jpg'));
                        img.Style = {Height('3cm'),HAlign('center')};
                        add(SIPIHR_ENG,img);
                        ionhcaption_ENG = Paragraph(['Fig. ' num2str(FIG_ENG) ' - In Place Link HR sensor']);
                        FIG_ENG = FIG_ENG+1;
                        ionhcaption_ENG.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                        add(SIPIHR,ionhcaption_ENG);
                    end
                    IPLHR = 1;
                end
                break
            end
        else
            for aC = 1:dimC
                if strcmp(colonna6{a, 1}{aC, 1},'In Place Link HR') == 1
                    if IPLHR == 0
                        SIPIHR = Section();
                    end
                    sezIPIHR = Heading3('In Place Link HR');
                    sezIPIHR.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                    SIPIHR.Title = sezIPIHR;
                    text = Paragraph(['Gli In Place Link HR sono caratterizzati dalla simultanea presenza '...
                        'del sensore elettrolitico 2D e di un termometro. Il primo '...
                        'elemento registra le inclinazioni assolute del sensore rispetto al piano orizzontale, mentre '...
                        'il termometro fornisce il dato di temperatura, molto utile nell''individuazione degli effetti termici. '...
                        'A seconda delle impostazioni definite al momento dell''installazione, il sensore va fuori scala '...
                        'per un determinato angolo assoluto positivo o negativo.']);
                    %--ENG--
                    if activeEN == 1
                        if IPLHR == 0
                            SIPIHR = Section();
                        end
                        sezIPIHR = Heading3('In Place Link HR');
                        sezIPIHR.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                        SIPIHR.Title = sezIPIHR;
                        text_ENG = Paragraph(['Each In Place Link HR features a 2D electrolytic tilt sensor and a thermometer. '...
                            'The first element is able to record the absolute tilt of the node, '...
                            'while the thermometer provides the sensor temperature, and it '...
                            'is used to correct the thermal effects on the tilt sensor. Depending on the installation '...
                            'configuration, the elctrolytic sensor could reach out-of-range positions for specific values '...
                            'of absolute tilt of the node (both positive and/or negative). ']);
                    end
                    if IPLHR == 0
                        text.HAlign = 'justify';
                        add(SIPIHR,text);
                        img = Image(('IPLHR.jpg'));
                        img.Style = {Height('3cm'),HAlign('center')};
                        add(SIPIHR,img);
                        ionhcaption = Paragraph(['Fig. ' num2str(FIG) ' - Sensore In Place Link HR']);
                        FIG = FIG+1;
                        ionhcaption.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                        add(SIPIHR,ionhcaption);
                        if activeEN == 1
                            text_ENG.HAlign = 'justify';
                            add(SIPIHR_ENG,text_ENG);
                            img = Image(('IPLHR.jpg'));
                            img.Style = {Height('3cm'),HAlign('center')};
                            add(SIPIHR_ENG,img);
                            ionhcaption_ENG = Paragraph(['Fig. ' num2str(FIG_ENG) ' - In Place Link HR sensor']);
                            FIG_ENG = FIG_ENG+1;
                            ionhcaption_ENG.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                            add(SIPIHR,ionhcaption_ENG);
                        end
                        IPLHR = 1;
                    end
                    break
                end
            end
        end
    end
    add(appendice,SIPIHR);
    if activeEN == 1
        add(appendice_ENG,SIPIHR_ENG);
    end
end

if sum(yesPL) >= 1
    % --- Piezo Link ---
    PL = 0;
    if isempty(PL_A) == 1 && isempty(PL_D) == 1
        tipoPL = 'assoluta ';
        figuraPL = 'Piezo Link D.jpg';
        capPL = 'digitale';
        baroPL = ', accoppiati con un sensore barometrico, ';
    else
        if sum(PL_A) > 0 && sum(PL_D) > 0
            tipoPL = 'assoluta (digitali) e relativa (analogici) ';
            figuraPL = 'Piezo Link DA.jpg';
            capPL = 'digitale (a sinistra) e analogico (a destra)';
            baroPL = ' ';
        elseif sum(PL_A) > 0
            tipoPL = 'relativa ';
            figuraPL = 'Piezo Link A.png';
            capPL = 'analogico';
            baroPL = ' ';
        elseif sum(PL_D) > 0
            tipoPL = 'assoluta ';
            figuraPL = 'Piezo Link D.jpg';
            capPL = 'digitale';
            baroPL = ', accoppiati con un sensore barometrico, ';
        end
    end
    
    if activeEN == 1
        if isempty(PL_A) == 1 && isempty(PL_D) == 1
            tipoPL_ENG = 'absolute ';
            figuraPL = 'Piezo Link D.jpg';
            capPL_ENG = 'digitale';
            baroPL_ENG = ', coupled with a barometer, it also allows ';
        else
            if sum(PL_A) > 0 && sum(PL_D) > 0
                tipoPL_ENG = 'absolute (digital) and relative (analog) ';
                figuraPL = 'Piezo Link DA.jpg';
                capPL_ENG = 'digital (left) and analog (right)';
                baroPL_ENG = ' ';
            elseif sum(PL_A) > 0
                tipoPL_ENG = 'relative ';
                figuraPL = 'Piezo Link A.png';
                capPL_ENG = 'analog';
                baroPL_ENG = ' ';
            elseif sum(PL_D) > 0
                tipoPL_ENG = 'absolute ';
                figuraPL = 'Piezo Link D.jpg';
                capPL_ENG = 'digital';
                baroPL_ENG = ', coupled with a barometer, it also allows ';
            end
        end
    end
    for a = 1:dim
        [dimC,~] = size(colonna6{a,1});
        if dimC == 1
            if strcmp(colonna6(a,1),'Piezo Link') == 1
                if PL == 0
                    PE = Section();
                end
                sezTilt = Heading3('Piezo Link');
                sezTilt.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                PE.Title = sezTilt;
                text = Paragraph(['I sensori Piezo Link sono rilevatori di pressione ' tipoPL...
                    'che' baroPL 'permettono di calcolare la pressione '...
                    'interstiziale e, conoscendo la profondit' char(224) ' del piezometro, la stima della colonna d''acqua.']);
                %--ENG--
                if activeEN == 1
                    if PL == 0
                        PE_ENG = Section();
                    end
                    sezTilt_ENG = Heading3('Piezo Link');
                    sezTilt_ENG.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                    PE_ENG.Title = sezTilt_ENG;
                    text_ENG = Paragraph(['Piezo Link is a sensor able to measure the ' tipoPL_ENG 'pressure and'  baroPL_ENG ...
                        'to calculate the water table level.']);
                end
                
                if PL == 0
                    text.HAlign = 'justify';
                    add(PE,text);
                    imgPL = Image(figuraPL);
                    imgPL.Style = {Height('5.5cm'),HAlign('center')};
                    add(PE,imgPL);
                    PLcaption = Paragraph(['Fig. ' num2str(FIG) ' - Sensore Piezo Link ' capPL]);
                    FIG = FIG+1;
                    PLcaption.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                    add(PE,PLcaption);
                    if activeEN == 1
                        text_ENG.HAlign = 'justify';
                        add(PE_ENG,text_ENG);
                        imgPL = Image(figuraPL);
                        imgPL.Style = {Height('5.5cm'),HAlign('center')};
                        add(PE_ENG,imgPL);
                        PLcaption_ENG = Paragraph(['Fig. ' num2str(FIG_ENG) ' - Piezo Link sensor, ' capPL_ENG]);
                        FIG_ENG = FIG_ENG+1;
                        PLcaption_ENG.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                        add(PE_ENG,PLcaption_ENG);
                    end
                    PL = 1;
                end
                break
            end
        else
            for aC = 1:dimC
                if strcmp(colonna6{a, 1}{aC, 1},'Piezo Link') == 1
                    if PL == 0
                        PE = Section();
                    end
                    sezTilt = Heading3('Piezo Link');
                    sezTilt.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                    PE.Title = sezTilt;
                    text = Paragraph(['I sensori Piezo Link sono rilevatori di pressione ' tipoPL...
                        'che' baroPL 'permettono di calcolare la pressione '...
                        'interstiziale e, conoscendo la profondit' char(224) ' del piezometro, la stima della colonna d''acqua.']);
                    %--ENG--
                    if activeEN == 1
                        if PL == 0
                            PE_ENG = Section();
                        end
                        sezTilt_ENG = Heading3('Piezo Link');
                        sezTilt_ENG.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                        PE_ENG.Title = sezTilt_ENG;
                        text_ENG = Paragraph(['Piezo Link is a sensor able to measure the ' tipoPL_ENG 'pressure and'  baroPL_ENG ...
                            'to calculate the water table level.']);
                    end
                    if PL == 0
                        text.HAlign = 'justify';
                        add(PE,text);
                        imgPL = Image(figuraPL);
                        imgPL.Style = {Height('5.5cm'),HAlign('center')};
                        add(PE,imgPL);
                        PLcaption = Paragraph(['Fig. ' num2str(FIG) ' - Sensore Piezo Link ' capPL]);
                        FIG = FIG+1;
                        PLcaption.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                        add(PE,PLcaption);
                        if activeEN == 1
                            text_ENG.HAlign = 'justify';
                            add(PE_ENG,text_ENG);
                            imgPL = Image(figuraPL);
                            imgPL.Style = {Height('5.5cm'),HAlign('center')};
                            add(PE_ENG,imgPL);
                            PLcaption_ENG = Paragraph(['Fig. ' num2str(FIG_ENG) ' - Piezo Link sensor, ' capPL_ENG]);
                            FIG_ENG = FIG_ENG+1;
                            PLcaption_ENG.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                            add(PE_ENG,PLcaption_ENG);
                        end
                        PL = 1;
                    end
                    break
                end
            end
        end
    end
    % ---Baro Link---
    if sum(yesBL) >= 1
        BL = 0;
        for a = 1:dim
            [dimC,~] = size(colonna6{a,1});
            if dimC == 1
                if strcmp(colonna6(a,1),'Baro Link') == 1
                    if BL == 0
                        BE = Section();
                    end
                    sezTilt = Heading3('Baro Link');
                    sezTilt.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                    BE.Title = sezTilt;
                    text = Paragraph(['Il sensore Baro Link ' char(232) ' un rilevatore di pressione assoluta. '...
                        'Le informazioni che si ottengono permettono di stimare le condizioni '...
                        'meteorologiche del sito  e calcolare la pressione interstiziale, se '...
                        'accoppiato alle informazioni di un piezometro assoluto']);
                    
                    if activeEN == 1
                        if BL == 0
                            BE_ENG = Section();
                        end
                        sezTilt_ENG = Heading3('Baro Link');
                        sezTilt_ENG.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                        BE_ENG.Title = sezTilt_ENG;
                        text_ENG = Paragraph(['Baro Link is a sensor designed to measure the atmospheric pressure, allowing to '...
                            'evaluate the meteorological conditions of the monitored site and to estimate the pore water pressure, '...
                            'when coupled with a piezometer.']);
                    end
                    if BL == 0
                        text.HAlign = 'justify';
                        add(BE,text);
                        imgBL = Image(('Barometro.png'));
                        imgBL.Style = {Height('2.8cm'),HAlign('center')};
                        add(BE,imgBL);
                        BLcaption = Paragraph(['Fig. ' num2str(FIG) ' - Sensore Baro Link']);
                        FIG = FIG+1;
                        BLcaption.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                        add(BE,BLcaption);
                        if activeEN ==1
                            text_ENG.HAlign = 'justify';
                            add(BE_ENG,text_ENG);
                            imgBL = Image(('Barometro.png'));
                            imgBL.Style = {Height('2.8cm'),HAlign('center')};
                            add(BE_ENG,imgBL);
                            BLcaption_ENG = Paragraph(['Fig. ' num2str(FIG_ENG) ' - Baro Link sensor']);
                            FIG_ENG = FIG_ENG+1;
                            BLcaption_ENG.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                            add(BE_ENG,BLcaption_ENG);
                        end
                        BL = 1;
                    end
                    break
                end
            else
                for aC = 1:dimC
                    if strcmp(colonna6{a, 1}{aC, 1},'Baro Link') == 1
                        if BL == 0
                            BE = Section();
                        end
                        sezTilt = Heading3('Baro Link');
                        sezTilt.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                        BE.Title = sezTilt;
                        text = Paragraph(['Il sensore Baro Link ' char(232) ' un rilevatore di pressione assoluta. '...
                            'Le informazioni che si ottengono permettono di stimare le condizioni '...
                            'meteorologiche del sito  e calcolare la pressione interstiziale, se '...
                            'accoppiato alle informazioni di un piezometro assoluto.']);
                        if activeEN == 1
                            if BL == 0
                                BE_ENG = Section();
                            end
                            sezTilt_ENG = Heading3('Baro Link');
                            sezTilt_ENG.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                            BE_ENG.Title = sezTilt_ENG;
                            text_ENG = Paragraph(['Baro Link is a sensor designed to measure the atmospheric pressure, allowing to '...
                                'evaluate the meteorological conditions of the monitored site and to estimate the pore water pressure, '...
                                'when coupled with a piezometer.']);
                        end
                        if BL == 0
                            text.HAlign = 'justify';
                            add(BE,text);
                            imgBL = Image(('Barometro.png'));
                            imgBL.Style = {Height('2.8cm'),HAlign('center')};
                            add(BE,imgBL);
                            BLcaption = Paragraph(['Fig. ' num2str(FIG) ' - Sensore Baro Link']);
                            FIG = FIG+1;
                            BLcaption.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                            add(BE,BLcaption)
                            if activeEN ==1
                                text_ENG.HAlign = 'justify';
                                add(BE_ENG,text_ENG);
                                imgBL = Image(('Barometro.png'));
                                imgBL.Style = {Height('2.8cm'),HAlign('center')};
                                add(BE_ENG,imgBL);
                                BLcaption_ENG = Paragraph(['Fig. ' num2str(FIG_ENG) ' - Baro Link sensor']);
                                FIG_ENG = FIG_ENG+1;
                                BLcaption_ENG.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                                add(BE_ENG,BLcaption_ENG);
                            end
                            BL = 1;
                        end
                        break
                    end
                end
            end
        end
        add(appendice,BE);
        if activeEN == 1
            add(appendice_ENG,BE_ENG);
        end
    end
    add(appendice,PE);
    if activeEN == 1
        add(appendice_ENG,PE_ENG);
    end
end

% ---Klino Link---
if sum(yesKL) >= 1
    KL = 0;
    for a = 1:dim
        [dimC,~] = size(colonna6{a,1});
        if dimC == 1
            if strcmp(char(colonna4(a,1)),'Klino Array D2W') == 1 % Clinometro Wi-Fi
                if KL == 0
                    KE = Section();
                end
                sezKlino = Heading3('Klino Link');
                sezKlino.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                KE.Title = sezKlino;
                text = Paragraph(['I sensori Klino Link D2W sono clinometri Wi-Fi '...
                    'caratterizzati dalla presenza di un sensore MEMS 2D '...
                    'ed un termometro. I dispositivi sono in grado di monitorare '...
                    'l''inclinazione assoluta e differenziale della struttura a cui sono fissati, '...
                    'oltre alla temperatura della stessa.']);
                
                %--ENG--
                if activeEN == 1
                    if KL == 0
                        KE_ENG = Section();
                    end
                    sezKlino_ENG = Heading3('Klino Link');
                    sezKlino_ENG.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                    KE_ENG.Title = sezKlino_ENG;
                    text_ENG = Paragraph(['Klino Link D2W are wireless tilt sensors, '...
                        'integrating a 2D MEMS and a thermometer. These devices are able to measure the '...
                        'the absolute and relative tilt of the monitored structure, providing also '...
                        'a temperature value.']);
                end
                
                if KL == 0
                    text.HAlign = 'justify';
                    add(KE,text);
                    imgKL = Image(('ClinometroES.jpg'));
                    imgKL.Style = {Height('3cm'),HAlign('center')};
                    add(KE,imgKL);
                    KEcaption = Paragraph(['Fig. ' num2str(FIG) ' - Sensore Klino Link D2W']);
                    FIG = FIG+1;
                    KEcaption.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                    add(KE,KEcaption);
                    if activeEN == 1
                        text_ENG.HAlign = 'justify';
                        add(KE_ENG,text);
                        imgKL = Image(('ClinometroES.jpg'));
                        imgKL.Style = {Height('3cm'),HAlign('center')};
                        add(KE_ENG,imgKL);
                        KEcaption_ENG = Paragraph(['Fig. ' num2str(FIG_ENG) ' - Klino Link D2W sensor']);
                        FIG_ENG = FIG_ENG+1;
                        KEcaption_ENG.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                        add(KE_ENG,KEcaption_ENG);
                    end
                    KL = 1;
                end
                break
            else
                if strcmp(colonna6(a,1),'Klino Link HR 3D') == 1
                    if KL == 0
                        KE = Section();
                    end
                    sezKlino = Heading3('Klino Link HR 3D');
                    sezKlino.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                    KE.Title = sezKlino;
                    text = Paragraph(['I sensori Klino Link HR 3D sono clinometri '...
                        'caratterizzati dalla simultanea presenza di un sensore MEMS 3D '...
                        'ed un sensore elettrolitico 2D, in grado di monitorare '...
                        'l''inclinazione della struttura a cui sono fissati, '...
                        'oltre alla temperatura della stessa.']);
                    
                    %--ENG--
                    if activeEN == 1
                        if KL == 0
                            KE_ENG = Section();
                        end
                        sezKlino_ENG = Heading3('Klino Link HR 3D');
                        sezKlino_ENG.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                        KE_ENG.Title = sezKlino_ENG;
                        text_ENG = Paragraph(['Klino Link HR 3D is a sensor that integrates a 3D MEMS sensor and an electrolytic '...
                            'tilt sensor, able to measure the tilt of the element on which is installed. It also '...
                            'includes a thermometer to collect temperature values.']);
                    end
                    
                    if KL == 0
                        text.HAlign = 'justify';
                        add(KE,text);
                        imgKL = Image(('Klino.png'));
                        imgKL.Style = {Height('3cm'),HAlign('center')};
                        add(KE,imgKL);
                        KEcaption = Paragraph(['Fig. ' num2str(FIG) ' - Sensore Klino Link HR 3D']);
                        FIG = FIG+1;
                        KEcaption.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                        add(KE,KEcaption);
                        if activeEN == 1
                            text_ENG.HAlign = 'justify';
                            add(KE_ENG,text);
                            imgKL = Image(('Klino.jpg'));
                            imgKL.Style = {Height('3cm'),HAlign('center')};
                            add(KE_ENG,imgKL);
                            KEcaption_ENG = Paragraph(['Fig. ' num2str(FIG_ENG) ' - Klino Link HR 3d sensor']);
                            FIG_ENG = FIG_ENG+1;
                            KEcaption_ENG.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                            add(KE_ENG,KEcaption_ENG);
                        end
                        KL = 1;
                    end
                    break
                end
            end
        else
            for aC = 1:dimC
                if strcmp(char(colonna4(m+1,1)),'Klino Array D2W') == 1 % Clinometro Wi-Fi
                    if KL == 0
                        KE = Section();
                    end
                    sezKlino = Heading3('Klino Link');
                    sezKlino.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                    KE.Title = sezKlino;
                    text = Paragraph(['I sensori Klino Link D2W sono clinometri Wi-Fi '...
                        'caratterizzati dalla presenza di un sensore MEMS 2D '...
                        'ed un termometro. I dispositivi sono in grado di monitorare '...
                        'l''inclinazione assoluta e differenziale della struttura a cui sono fissati, '...
                        'oltre alla temperatura della stessa.']);
                    %--ENG--
                    if activeEN == 1
                        if KL == 0
                            KE_ENG = Section();
                        end
                        sezKlino_ENG = Heading3('Klino Link');
                        sezKlino_ENG.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                        KE_ENG.Title = sezKlino_ENG;
                        text_ENG = Paragraph(['Klino Link D2W are wireless tilt sensors, '...
                            'integrating a 2D MEMS and a thermometer. These devices are able to measure the '...
                            'the absolute and relative tilt of the monitored structure, providing also '...
                            'a temperature value.']);
                    end
                    if KL == 0
                        text.HAlign = 'justify';
                        add(KE,text);
                        imgKL = Image(('ClinometroES.png'));
                        imgKL.Style = {Height('4cm'),HAlign('center')};
                        add(KE,imgKL);
                        KEcaption = Paragraph(['Fig. ' num2str(FIG) ' - Sensore Klino Link D2W']);
                        FIG = FIG+1;
                        KEcaption.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                        add(KE,KEcaption);
                        if activeEN == 1
                            text_ENG.HAlign = 'justify';
                            add(KE_ENG,text);
                            imgKL = Image(('ClinometroES.png'));
                            imgKL.Style = {Height('3cm'),HAlign('center')};
                            add(KE_ENG,imgKL);
                            KEcaption_ENG = Paragraph(['Fig. ' num2str(FIG_ENG) ' - Klino Link D2W sensor']);
                            FIG_ENG = FIG_ENG+1;
                            KEcaption_ENG.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                            add(KE_ENG,KEcaption_ENG);
                        end
                        KL = 1;
                    end
                    break
                else
                    if strcmp(colonna6{a, 1}{aC, 1},'Klino Link HR 3D') == 1
                        if KL == 0
                            KE = Section();
                        end
                        sezKlino = Heading3('Klino Link HR 3D');
                        sezKlino.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                        KE.Title = sezKlino;
                        text = Paragraph(['I sensori Klino Link HR 3D sono clinometri '...
                            'caratterizzati dalla simultanea presenza di un sensore MEMS 3D '...
                            'ed un sensore elettrolitico 2D, in grado di monitorare '...
                            'l''inclinazione della struttura a cui sono fissati, '...
                            'oltre alla temperatura della stessa.']);
                        
                        %--ENG--
                        if activeEN == 1
                            if KL == 0
                                KE_ENG = Section();
                            end
                            sezKlino_ENG = Heading3('Klino Link HR 3D');
                            sezKlino_ENG.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                            KE_ENG.Title = sezKlino_ENG;
                            text_ENG = Paragraph(['Klino Link HR 3D is a sensor that integrates a 3D MEMS sensor and an electrolytic '...
                                'tilt sensor, able to measure the tilt of the element on which is installed. It also '...
                                'includes a thermometer to collect temperature values.']);
                        end
                        if KL == 0
                            text.HAlign = 'justify';
                            add(KE,text);
                            imgKL = Image(('Klino.png'));
                            imgKL.Style = {Height('5cm'),HAlign('center')};
                            add(KE,imgKL);
                            KEcaption = Paragraph(['Fig. ' num2str(FIG) ' - Sensore Klino Link HR 3D']);
                            FIG = FIG+1;
                            KEcaption.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                            add(KE,KEcaption);
                            if activeEN == 1
                                text_ENG.HAlign = 'justify';
                                add(KE_ENG,text);
                                imgKL = Image(('Klino.jpg'));
                                imgKL.Style = {Height('3cm'),HAlign('center')};
                                add(KE_ENG,imgKL);
                                KEcaption_ENG = Paragraph(['Fig. ' num2str(FIG_ENG) ' - Klino Link HR 3D sensor']);
                                FIG_ENG = FIG_ENG+1;
                                KEcaption_ENG.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                                add(KE_ENG,KEcaption_ENG);
                            end
                            KL = 1;
                        end
                        break
                    end
                end
            end
        end
    end
    add(appendice,KE);
    if activeEN == 1
        add(appendice_ENG,KE_ENG);
    end
end

% ---Klino Link HR---
if sum(yesKL) == 0 && sum(yesKLHR) >= 1
    KLHR = 0;
    for a = 1:dim
        [dimC,~] = size(colonna6{a,1});
        if dimC == 1
            if strcmp(colonna6(a,1),'Klino Link HR') == 1
                if KLHR == 0
                    KLE = Section();
                end
                sezKlinoHR = Heading3('Klino Link HR');
                sezKlinoHR.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                KLE.Title = sezKlinoHR;
                text = Paragraph(['I sensori Klino Link HR sono clinometri '...
                    'caratterizzati dalla presenza di un sensore elettrolitico 2D, '...
                    'in grado di monitorare l''inclinazione della struttura a cui sono fissati, '...
                    'oltre alla temperatura della stessa.']);
                
                %--ENG--
                if activeEN == 1
                    if KLHR == 0
                        KLE_ENG = Section();
                    end
                    sezKlinoHR_ENG = Heading3('Klino Link HR');
                    sezKlinoHR_ENG.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                    KLE_ENG.Title = sezKlinoHR_ENG;
                    text_ENG = Paragraph(['Klino Link HR is a sensor that integrates an electrolytic '...
                        'tilt sensor, able to measure the tilt of the element on which is installed. It also '...
                        'includes a thermometer to collect temperature data.']);
                end
                
                if KLHR == 0
                    text.HAlign = 'justify';
                    add(KLE,text);
                    imgKL = Image(('KlinoHR.png'));
                    imgKL.Style = {Height('3.7cm'),HAlign('center')};
                    add(KLE,imgKL);
                    KEcaption = Paragraph(['Fig. ' num2str(FIG) ' - Sensore Klino Link HR']);
                    FIG = FIG+1;
                    KEcaption.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                    add(KLE,KEcaption);
                    if activeEN == 1
                        text_ENG.HAlign = 'justify';
                        add(KLE_ENG,text_ENG);
                        imgKL = Image(('KlinoHR.png'));
                        imgKL.Style = {Height('3.7cm'),HAlign('center')};
                        add(KLE_ENG,imgKL);
                        KEcaption_ENG = Paragraph(['Fig. ' num2str(FIG_ENG) ' - Klino Link HR sensor']);
                        FIG_ENG = FIG_ENG+1;
                        KEcaption_ENG.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                        add(KLE_ENG,KEcaption_ENG);
                    end
                    KLHR = 1;
                end
                break
            end
        else
            for aC = 1:dimC
                if strcmp(colonna6{a, 1}{aC, 1},'Klino Link HR') == 1
                    if KLHR == 0
                        KLE = Section();
                    end
                    sezKlinoHR = Heading3('Klino Link HR');
                    sezKlinoHR.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                    KLE.Title = sezKlinoHR;
                    text = Paragraph(['I sensori Klino Link HR sono clinometri '...
                        'caratterizzati dalla presenza di un sensore elettrolitico 2D, '...
                        'in grado di monitorare l''inclinazione della struttura a cui sono fissati, '...
                        'oltre alla temperatura della stessa.']);
                    
                    %--ENG--
                    if activeEN == 1
                        if KLHR == 0
                            KLE_ENG = Section();
                        end
                        sezKlinoHR_ENG = Heading3('Klino Link HR');
                        sezKlinoHR_ENG.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                        KLE_ENG.Title = sezKlinoHR_ENG;
                        text_ENG = Paragraph(['Klino Link HR is a sensor that integrates an electrolytic '...
                            'tilt sensor, able to measure the tilt of the element on which is installed. It also '...
                            'includes a thermometer to collect temperature data.']);
                    end
                    
                    if KLHR == 0
                        text.HAlign = 'justify';
                        add(KLE,text);
                        imgKL = Image(('KlinoHR.png'));
                        imgKL.Style = {Height('3.7cm'),HAlign('center')};
                        add(KLE,imgKL);
                        KEcaption = Paragraph(['Fig. ' num2str(FIG) ' - Sensore Klino Link HR']);
                        FIG = FIG+1;
                        KEcaption.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                        add(KLE,KEcaption);
                        if activeEN == 1
                            text_ENG.HAlign = 'justify';
                            add(KLE_ENG,text_ENG);
                            imgKL = Image(('KlinoHR.png'));
                            imgKL.Style = {Height('3.7cm'),HAlign('center')};
                            add(KLE_ENG,imgKL);
                            KEcaption_ENG = Paragraph(['Fig. ' num2str(FIG_ENG) ' - Klino Link HR sensor']);
                            FIG_ENG = FIG_ENG+1;
                            KEcaption_ENG.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                            add(KLE_ENG,KEcaption_ENG);
                        end
                        KLHR = 1;
                    end
                    break
                end
            end
        end
    end
    add(appendice,KLE);
    if activeEN == 1
        add(appendice_ENG,KLE_ENG);
    end
end

% --- Therm Link ---
if sum(yesThL) >= 1
    ThL = 0;
    for a = 1:dim
        [dimC,~] = size(colonna6{a,1});
        if dimC == 1
            if strcmp(colonna6(a,1),'Therm Link') == 1
                if ThL == 0
                    ThE = Section();
                end
                sezTherm = Heading3('Therm Link');
                sezTherm.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                ThE.Title = sezTherm;
                text = Paragraph(['I sensori Therm Link sono termometri '...
                    'ad alta precisione e ripetibilit' char(224) ', in grado di monitorare '...
                    'la temperatura a differenti profondit' char(224) ', sfruttando un '...
                    'unico cavo elettrico quadripolare.']);
                
                %--ENG--
                if activeEN == 1
                    if ThL == 0
                        ThE_ENG = Section();
                    end
                    sezTherm_ENG = Heading3('Therm Link');
                    sezTherm_ENG.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                    ThE_ENG.Title = sezTherm_ENG;
                    text_ENG = Paragraph(['Therm Link sensor is composed of a thermometer '...
                        'featuring high accuracy and repeatability, '...
                        'able to measure temperature values at different depths by '...
                        'exploiting a single quadrupole cable that '...
                        'connects different Links in a single array.']);
                end
                
                if ThL == 0
                    text.HAlign = 'justify';
                    add(ThE,text);
                    imgThL = Image(('Tilt Link.jpg'));
                    imgThL.Style = {Height('5cm'),HAlign('center')};
                    add(ThE,imgThL);
                    ThEcaption = Paragraph(['Fig. ' num2str(FIG) ' - Sensore Therm Link']);
                    FIG = FIG+1;
                    ThEcaption.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                    add(ThE,ThEcaption);
                    if activeEN == 1
                        text_ENG.HAlign = 'justify';
                        add(ThE_ENG,text_ENG);
                        imgThL = Image(('Tilt Link.jpg'));
                        imgThL.Style = {Height('5cm'),HAlign('center')};
                        add(ThE_ENG,imgThL);
                        ThEcaption_ENG = Paragraph(['Fig. ' num2str(FIG_ENG) ' - Therm Link sensor']);
                        FIG_ENG = FIG_ENG+1;
                        ThEcaption_ENG.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                        add(ThE_ENG,ThEcaption_ENG);
                    end
                    ThL = 1;
                end
                break
            end
        else
            for aC = 1:dimC
                if strcmp(colonna6{a, 1}{aC, 1},'Therm Link') == 1
                    if ThL == 0
                        ThE = Section();
                    end
                    sezTherm = Heading3('Therm Link');
                    sezTherm.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                    ThE.Title = sezTherm;
                    text = Paragraph(['I sensori Therm Link sono termometri '...
                        'ad alta precisione e ripetibilit' char(224) ', in grado di monitorare '...
                        'la temperatura a differenti profondit' char(224) ', sfruttando un '...
                        'unico cavo elettrico quadripolare.']);
                    
                    %--ENG--
                    if activeEN == 1
                        if ThL == 0
                            ThE_ENG = Section();
                        end
                        sezTherm_ENG = Heading3('Therm Link');
                        sezTherm_ENG.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                        ThE_ENG.Title = sezTherm_ENG;
                        text_ENG = Paragraph(['Therm Link sensor is composed of a thermometer '...
                            'featuring high accuracy and repeatability, '...
                            'able to measure temperature values at different depths by '...
                            'exploiting a single quadrupole cable that '...
                            'connects different Links in a single array.']);
                    end
                    if ThL == 0
                        text.HAlign = 'justify';
                        add(ThE,text);
                        imgThL = Image(('Tilt Link.jpg'));
                        imgThL.Style = {Height('5cm'),HAlign('center')};
                        add(ThE,imgThL);
                        ThEcaption = Paragraph(['Fig. ' num2str(FIG) ' - Sensore Therm Link']);
                        FIG = FIG+1;
                        ThEcaption.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                        add(ThE,ThEcaption);
                        if activeEN == 1
                            text_ENG.HAlign = 'justify';
                            add(ThE_ENG,text_ENG);
                            imgThL = Image(('Tilt Link.jpg'));
                            imgThL.Style = {Height('5cm'),HAlign('center')};
                            add(ThE_ENG,imgThL);
                            ThEcaption_ENG = Paragraph(['Fig. ' num2str(FIG_ENG) ' - Therm Link sensor']);
                            FIG_ENG = FIG_ENG+1;
                            ThEcaption_ENG.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                            add(ThE_ENG,ThEcaption_ENG);
                        end
                        ThL = 1;
                    end
                    break
                end
            end
        end
    end
    add(appendice,ThE);
    if activeEN == 1
        add(appendice_ENG,ThE_ENG);
    end
end

% --- PT100 Link ---
if sum(yesPT100) >= 1
    PT100 = 0;
    for a = 1:dim
        [dimC,~] = size(colonna6{a,1});
        if dimC == 1
            if strcmp(colonna6(a,1),'PT100 Link') == 1
                if PT100 == 0
                    PT100E = Section();
                end
                sezPT100 = Heading3('PT100 Link');
                sezPT100.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                PT100E.Title = sezPT100;
                text = Paragraph(['I sensori PT100 sono termoresistenze al platino '...
                    'che sfruttano la variazione di resistivit' char(224) ' del materiale per '...
                    'rilevare la temperatura mediante un legame lineare. Questa tipologia '...
                    'di sensori non richiede calibrazione.']);
                
                %--ENG--
                if activeEN == 1
                    if PT100 == 0
                        PT100E_ENG = Section();
                    end
                    sezPT100_ENG = Heading3('PT100 Link');
                    sezPT100_ENG.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                    PT100E_ENG.Title = sezPT100_ENG;
                    text_ENG = Paragraph(['PT100 is a platinum resistance thermometer that exploits the material resistivity '...
                        'variation to evaluate the temperature with a linear correlation. This type of sensor does not need '...
                        'any calibration.']);
                end
                if PT100 == 0
                    text.HAlign = 'justify';
                    add(PT100E,text);
                    imgPT100 = Image(('PT100.jpg'));
                    imgPT100.Style = {Height('3cm'),HAlign('center')};
                    add(PT100E,imgPT100);
                    PT100caption = Paragraph(['Fig. ' num2str(FIG) ' - Sensore PT100 Link']);
                    FIG = FIG+1;
                    PT100caption.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                    add(PT100E,PT100caption);
                    if activeEN == 1
                        text_ENG.HAlign = 'justify';
                        add(PT100E_ENG,text_ENG);
                        imgPT100 = Image(('PT100.jpg'));
                        imgPT100.Style = {Height('3cm'),HAlign('center')};
                        add(PT100E_ENG,imgPT100);
                        PT100caption_ENG = Paragraph(['Fig. ' num2str(FIG_ENG) ' - PT100 Link sensor']);
                        FIG_ENG = FIG_ENG+1;
                        PT100caption_ENG.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                        add(PT100E_ENG,PT100caption_ENG);
                    end
                    PT100 = 1;
                end
                break
            end
        else
            for aC = 1:dimC
                if strcmp(colonna6{a, 1}{aC, 1},'PT100 Link') == 1
                    if PT100 == 0
                        PT100E = Section();
                    end
                    sezPT100 = Heading3('PT100 Link');
                    sezPT100.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                    PT100E.Title = sezPT100;
                    text = Paragraph(['I sensori PT100 sono termoresistenze al platino '...
                        'che sfruttano la variazione di resistivit' char(224) ' del materiale per '...
                        'rilevare la temperatura mediante un legame lineare. Questa tipologia '...
                        'di sensori non richiede calibrazione.']);
                    %--ENG--
                    if activeEN == 1
                        if PT100 == 0
                            PT100E_ENG = Section();
                        end
                        sezPT100_ENG = Heading3('PT100 Link');
                        sezPT100_ENG.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                        PT100E_ENG.Title = sezPT100_ENG;
                        text_ENG = Paragraph(['PT100 is a platinum resistance thermometer that exploits the material resistivity '...
                            'variation to evaluate the temperature with a linear correlation. This type of sensor does not need '...
                            'any calibration.']);
                    end
                    if PT100 == 0
                        text.HAlign = 'justify';
                        add(PT100E,text);
                        imgPT100 = Image(('PT100.jpg'));
                        imgPT100.Style = {Height('3cm'),HAlign('center')};
                        add(PT100E,imgPT100);
                        PT100caption = Paragraph(['Fig. ' num2str(FIG) ' - Sensore PT100 Link']);
                        FIG = FIG+1;
                        PT100caption.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                        add(PT100E,PT100caption);
                        if activeEN == 1
                            text_ENG.HAlign = 'justify';
                            add(PT100E_ENG,text_ENG);
                            imgPT100 = Image(('PT100.jpg'));
                            imgPT100.Style = {Height('3cm'),HAlign('center')};
                            add(PT100E_ENG,imgPT100);
                            PT100caption_ENG = Paragraph(['Fig. ' num2str(FIG_ENG) ' - PT100 Link sensor']);
                            FIG_ENG = FIG_ENG+1;
                            PT100caption_ENG.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                            add(PT100E_ENG,PT100caption_ENG);
                        end
                        PT100 = 1;
                    end
                    break
                end
            end
        end
    end
    add(appendice,PT100E);
    if activeEN == 1
        add(appendice_ENG,PT100E_ENG);
    end
end

% --- Tunnel Link ---
TuL = 0;
if sum(yesTuL) >= 1
    for a = 1:dim
        [dimC,~] = size(colonna6{a,1});
        if dimC == 1
            if strcmp(colonna6(a,1),'Tunnel Link') == 1
                if TuL == 0
                    STu = Section();
                end
                sezTunnel = Heading3('Tunnel Link');
                sezTunnel.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                STu.Title = sezTunnel;
                text = Paragraph(['I Tunnel Link sono caratterizzati dalla presenza '...
                    'di un sensore MEMS 3D, equipaggiato con accelerometro e termometro. Il primo '...
                    'elemento registra le inclinazioni del sensore, mentre Il termometro '...
                    char(232) ' utilizzato per la compensazione termica delle singole misure. '...
                    'Nel dettaglio, il sensore dispone di una portata teoricamente infinita '...
                    '(pu' char(242) ' essere ruotato in ogni direzione dello spazio senza '...
                    'particolari problemi) e nasce per misurare spostamenti significativi, '...
                    'mentre per quanto riguarda le deformazioni sub-millimetriche risente dei disturbi '...
                    'legati al proprio rumore di fondo di natura elettrica.']);
                
                %--ENG--
                if activeEN == 1
                    if TuL == 0
                        STu_ENG = Section();
                    end
                    sezTunnel_ENG = Heading3('Tunnel Link');
                    sezTunnel_ENG.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                    STu_ENG.Title = sezTunnel_ENG;
                    text_ENG = Paragraph(['Each Tunnel Link features a 3D MEMS sensor, which equips an accelerometer '...
                        'and a thermometer. The first element is able to record the node tilt, '...
                        'while the second one provides the sensor temperature and it '...
                        'is used to correct the thermal effects on the accelerometer. From a theoretical point of view, '...
                        'the MEMS features an infinite range of tilt measure, while small variations in its '...
                        'position are influenced by electrical noises.']);
                end
                if TuL == 0
                    text.HAlign = 'justify';
                    add(STu,text);
                    img = Image(('Tunnel Link.png'));
                    img.Style = {Height('4.5cm'),HAlign('center')};
                    add(STu,img);
                    ionhcaption = Paragraph(['Fig. ' num2str(FIG) ' - Sensore Tunnel Link']);
                    FIG = FIG+1;
                    ionhcaption.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                    add(STu,ionhcaption);
                    if activeEN == 1
                        text_ENG.HAlign = 'justify';
                        add(STu_ENG,text_ENG);
                        img = Image(('Tunnel Link.png'));
                        img.Style = {Height('4.5cm'),HAlign('center')};
                        add(STu_ENG,img);
                        ionhcaption_ENG = Paragraph(['Fig. ' num2str(FIG_ENG) ' - Tunnel Link sensor']);
                        FIG_ENG = FIG_ENG+1;
                        ionhcaption_ENG.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                        add(STu_ENG,ionhcaption_ENG);
                    end
                    TuL = 1;
                end
                break
            end
        else
            for aC = 1:dimC
                if strcmp(colonna6{a, 1}{aC, 1},'Tunnel Link') == 1
                    if TuL == 0
                        STu = Section();
                    end
                    sezTunnel = Heading3('Tunnel Link');
                    sezTunnel.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                    STu.Title = sezTunnel;
                    text = Paragraph(['I Tunnel Link sono caratterizzati dalla presenza '...
                        'di un sensore MEMS 3D, equipaggiato con accelerometro e termometro. Il primo '...
                        'elemento registra le inclinazioni del sensore, mentre. Il termometro '...
                        char(232) ' utilizzato per la compensazione termica delle singole misure. '...
                        'Nel dettaglio, il sensore dispone di una portata teoricamente infinita '...
                        '(pu' char(242) ' essere ruotato in ogni direzione dello spazio senza '...
                        'particolari problemi) e nasce per misurare spostamenti significativi, '...
                        'mentre per quanto riguarda le deformazioni sub-millimetriche risente dei disturbi '...
                        'legati al proprio rumore di fondo di natura elettrica.']);
                    %--ENG--
                    if activeEN == 1
                        if TuL == 0
                            STu_ENG = Section();
                        end
                        sezTunnel_ENG = Heading3('Tunnel Link');
                        sezTunnel_ENG.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                        STu_ENG.Title = sezTunnel_ENG;
                        text_ENG = Paragraph(['Each Tunnel Link features a 3D MEMS sensor, which equips an accelerometer '...
                            'and a thermometer. The first element is able to record the node tilt, '...
                            'while the second one provides the sensor temperature and it '...
                            'is used to correct the thermal effects on the accelerometer. From a theoretical point of view, '...
                            'the MEMS features an infinite range of tilt measure, while small variations in its '...
                            'position are influenced by electrical noises.']);
                    end
                    if TuL == 0
                        text.HAlign = 'justify';
                        add(STu,text);
                        img = Image(('Tunnel Link.png'));
                        img.Style = {Height('4.5cm'),HAlign('center')};
                        add(STu,img);
                        ionhcaption = Paragraph(['Fig. ' num2str(FIG) ' - Sensore Tunnel Link']);
                        FIG = FIG+1;
                        ionhcaption.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                        add(STu,ionhcaption);
                        if activeEN == 1
                            text_ENG.HAlign = 'justify';
                            add(STu_ENG,text_ENG);
                            img = Image(('Tunnel Link.png'));
                            img.Style = {Height('4.5cm'),HAlign('center')};
                            add(STu_ENG,img);
                            ionhcaption_ENG = Paragraph(['Fig. ' num2str(FIG_ENG) ' - Tunnel Link sensor']);
                            FIG_ENG = FIG_ENG+1;
                            ionhcaption_ENG.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                            add(STu_ENG,ionhcaption_ENG);
                        end
                        TuL = 1;
                    end
                    break
                end
            end
        end
    end
    add(appendice,STu);
    if activeEN == 1
        add(appendice,STu);
    end
end

% --- Radial Link ---
RaL = 0;
if sum(yesRaL) >= 1
    for a = 1:dim
        [dimC,~] = size(colonna6{a,1});
        if dimC == 1
            if strcmp(colonna6(a,1),'Radial Link') == 1
                if RaL == 0
                    SRaL = Section();
                end
                sezRadial = Heading3('Radial Link');
                sezRadial.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                SRaL.Title = sezRadial;
                text = Paragraph(['I Radial Link sono caratterizzati dalla presenza '...
                    'di un sensore MEMS 3D, equipaggiato con accelerometro e termometro. Il primo '...
                    'elemento registra le inclinazioni del sensore, mentre Il termometro '...
                    char(232) ' utilizzato per la compensazione termica delle singole misure. '...
                    'Nel dettaglio, il sensore dispone di una portata teoricamente infinita '...
                    '(pu' char(242) ' essere ruotato in ogni direzione dello spazio senza '...
                    'particolari problemi) e nasce per misurare spostamenti significativi, '...
                    'mentre per quanto riguarda le deformazioni sub-millimetriche risente dei disturbi '...
                    'legati al proprio rumore di fondo di natura elettrica.']);
                %--ENG--
                if activeEN == 1
                    if RaL == 0
                        SRaL_ENG = Section();
                    end
                    sezRadial_ENG = Heading3('Radial Link');
                    sezRadial_ENG.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                    SRaL_ENG.Title = sezRadial_ENG;
                    text_ENG = Paragraph(['Each Radial Link features a 3D MEMS sensor, which equips an accelerometer '...
                        'and a thermometer. The first component is able to record the node tilt, '...
                        'while the second one provides the sensor temperature and it '...
                        'is used to correct the thermal effects on the accelerometer. Form a theoretical point of view, '...
                        'the MEMS features an infinite range of tilt measure, while small variations in its '...
                        'position are influenced by electrical noises.']);
                end
                
                if RaL == 0
                    text.HAlign = 'justify';
                    add(SRaL,text);
                    img = Image(('Tunnel Link.png'));
                    img.Style = {Height('4.5cm'),HAlign('center')};
                    add(SRaL,img);
                    ionhcaption = Paragraph(['Fig. ' num2str(FIG) ' - Sensore Radial Link']);
                    FIG = FIG+1;
                    ionhcaption.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                    add(SRaL,ionhcaption);
                    if activeEN == 1
                        text_ENG.HAlign = 'justify';
                        add(SRaL_ENG,text_ENG);
                        img = Image(('Tunnel Link.png'));
                        img.Style = {Height('4.5cm'),HAlign('center')};
                        add(SRaL_ENG,img);
                        ionhcaption_ENG = Paragraph(['Fig. ' num2str(FIG_ENG) ' - Radial Link sensor']);
                        FIG_ENG = FIG_ENG+1;
                        ionhcaption_ENG.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                        add(SRaL_ENG,ionhcaption_ENG);
                    end
                    RaL = 1;
                end
                break
            end
        else
            for aC = 1:dimC
                if strcmp(colonna6{a, 1}{aC, 1},'Radial Link') == 1
                    if RaL == 0
                        SRaL = Section();
                    end
                    sezRadial = Heading3('Radial Link');
                    sezRadial.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                    SRaL.Title = sezRadial;
                    text = Paragraph(['I Radial Link sono caratterizzati dalla presenza '...
                        'di un sensore MEMS 3D, equipaggiato con accelerometro e termometro. Il primo '...
                        'elemento registra le inclinazioni del sensore, mentre. Il termometro '...
                        char(232) ' utilizzato per la compensazione termica delle singole misure. '...
                        'Nel dettaglio, il sensore dispone di una portata teoricamente infinita '...
                        '(pu' char(242) ' essere ruotato in ogni direzione dello spazio senza '...
                        'particolari problemi) e nasce per misurare spostamenti significativi, '...
                        'mentre per quanto riguarda le deformazioni sub-millimetriche risente dei disturbi '...
                        'legati al proprio rumore di fondo di natura elettrica.']);
                    
                    %--ENG--
                    if activeEN == 1
                        if RaL == 0
                            SRaL_ENG = Section();
                        end
                        sezRadial_ENG = Heading3('Radial Link');
                        sezRadial_ENG.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                        SRaL_ENG.Title = sezRadial_ENG;
                        text_ENG = Paragraph(['Each Radial Link features a 3D MEMS sensor, which equips an accelerometer '...
                            'and a thermometer. The first component is able to record the node tilt, '...
                            'while the second one provides the sensor temperature and it '...
                            'is used to correct the thermal effects on the accelerometer. Form a theoretical point of view, '...
                            'the MEMS features an infinite range of tilt measure, while small variations in its '...
                            'position are influenced by electrical noises.']);
                    end
                    if RaL == 0
                        text.HAlign = 'justify';
                        add(SRaL,text);
                        img = Image(('Tunnel Link.png'));
                        img.Style = {Height('4.5cm'),HAlign('center')};
                        add(SRaL,img);
                        ionhcaption = Paragraph(['Fig. ' num2str(FIG) ' - Sensore Radial Link']);
                        FIG = FIG+1;
                        ionhcaption.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                        add(SRaL,ionhcaption);
                        if activeEN == 1
                            text_ENG.HAlign = 'justify';
                            add(SRaL_ENG,text_ENG);
                            img = Image(('Tunnel Link.png'));
                            img.Style = {Height('4.5cm'),HAlign('center')};
                            add(SRaL_ENG,img);
                            ionhcaption_ENG = Paragraph(['Fig. ' num2str(FIG_ENG) ' - Radial Link sensor']);
                            FIG_ENG = FIG_ENG+1;
                            ionhcaption_ENG.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                            add(SRaL_ENG,ionhcaption_ENG);
                        end
                        RaL = 1;
                    end
                    break
                end
            end
        end
    end
    add(appendice,SRaL);
    if activeEN == 1
        add(appendice_ENG,SRaL_ENG);
    end
end

% --- PreConv Link ---
PCL = 0;
if sum(yesPCL) >= 1
    for a = 1:dim
        [dimC,~] = size(colonna6{a,1});
        if dimC == 1
            if strcmp(colonna6(a,1),'PreConv Link') == 1
                if PCL == 0
                    SPCL = Section();
                end
                sezPCL = Heading3('PreConv Link');
                sezPCL.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                SPCL.Title = sezPCL;
                text = Paragraph(['I PreConv Link sono sensori caratterizzati dalla presenza '...
                    'di un MEMS 3D, equipaggiato con accelerometro e termometro. Il primo '...
                    'elemento registra le inclinazioni del nodo rispetto all''orizzontale, mentre Il termometro '...
                    'viene utilizzato per la compensazione termica delle singole misure. '...
                    'Nel dettaglio, il sensore dispone di una portata teoricamente infinita '...
                    '(pu' char(242) ' essere ruotato in ogni direzione dello spazio senza '...
                    'particolari problemi) e nasce per misurare spostamenti nell''ordine dei 0.2 mm/m, '...
                    'mentre deformazioni pi' char(249) ' piccole sono indistinguibili '...
                    'dal proprio rumore di fondo di natura elettrica.']);
                %--ENG--
                if activeEN == 1
                    if PCL == 0
                        SPCL_ENG = Section();
                    end
                    sezPCL_ENG = Heading3('PreConv Link');
                    sezPCL_ENG.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                    SPCL_ENG.Title = sezPCL_ENG;
                    text_ENG = Paragraph(['Each PreConv Link features a 3D MEMS sensor, which equips an accelerometer '...
                        'and a thermometer. The first element is able to record the node tilt, '...
                        'while the second one provides the sensor temperature and it '...
                        'is used to correct the thermal effects on the accelerometer. Form a theoretical point of view, '...
                        'the MEMS features an infinite range of tilt measure, while small variations in its '...
                        'position are influenced by electrical noises.']);
                end
                if PCL == 0
                    text.HAlign = 'justify';
                    add(SPCL,text);
                    img = Image(('Klino.png'));
                    img.Style = {Height('4cm'),HAlign('center')};
                    add(SPCL,img);
                    ionhcaption = Paragraph(['Fig. ' num2str(FIG) ' - Sensore PreConv Link']);
                    FIG = FIG+1;
                    ionhcaption.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                    add(SPCL,ionhcaption);
                    if activeEN == 1
                        text_ENG.HAlign = 'justify';
                        add(SPCL_ENG,text_ENG);
                        img = Image(('Klino.png'));
                        img.Style = {Height('4cm'),HAlign('center')};
                        add(SPCL_ENG,img);
                        ionhcaption_ENG = Paragraph(['Fig. ' num2str(FIG_ENG) ' - PreConv Link sensor']);
                        FIG_ENG = FIG_ENG+1;
                        ionhcaption_ENG.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                        add(SPCL_ENG,ionhcaption_ENG);
                    end
                    PCL = 1;
                end
                break
            end
        else
            for aC = 1:dimC
                if strcmp(colonna6{a, 1}{aC, 1},'PreConv Link') == 1
                    if PCL == 0
                        SPCL = Section();
                    end
                    sezPCL = Heading3('PreConv Link');
                    sezPCL.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                    SPCL.Title = sezPCL;
                    text = Paragraph(['I PreConv Link sono sensori caratterizzati dalla presenza '...
                        'di un MEMS 3D, equipaggiato con accelerometro e termometro. Il primo '...
                        'elemento registra le inclinazioni del nodo rispetto all''orizzontale, mentre Il termometro '...
                        'viene utilizzato per la compensazione termica delle singole misure. '...
                        'Nel dettaglio, il sensore dispone di una portata teoricamente infinita '...
                        '(pu' char(242) ' essere ruotato in ogni direzione dello spazio senza '...
                        'particolari problemi) e nasce per misurare spostamenti nell''ordine dei 0.2 mm/m, '...
                        'mentredeformazioni pi' char(242) ' piccole sono indistinguibili '...
                        'dal proprio rumore di fondo di natura elettrica.']);
                    %--ENG--
                    if activeEN == 1
                        if PCL == 0
                            SPCL_ENG = Section();
                        end
                        sezPCL_ENG = Heading3('PreConv Link');
                        sezPCL_ENG.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                        SPCL_ENG.Title = sezPCL_ENG;
                        text_ENG = Paragraph(['Each PreConv Link features a 3D MEMS sensor, which equips an accelerometer '...
                            'and a thermometer. The first element is able to record the node tilt, '...
                            'while the second one provides the sensor temperature and it '...
                            'is used to correct the thermal effects on the accelerometer. Form a theoretical point of view, '...
                            'the MEMS features an infinite range of tilt measure, while small variations in its '...
                            'position are influenced by electrical noises.']);
                    end
                    if PCL == 0
                        text.HAlign = 'justify';
                        add(SPCL,text);
                        img = Image(('Klino.png'));
                        img.Style = {Height('4cm'),HAlign('center')};
                        add(SPCL,img);
                        ionhcaption = Paragraph(['Fig. ' num2str(FIG) ' - Sensore PreConv Link']);
                        FIG = FIG+1;
                        ionhcaption.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                        add(SPCL,ionhcaption);
                        if activeEN == 1
                            text_ENG.HAlign = 'justify';
                            add(SPCL_ENG,text_ENG);
                            img = Image(('Klino.png'));
                            img.Style = {Height('4cm'),HAlign('center')};
                            add(SPCL_ENG,img);
                            ionhcaption_ENG = Paragraph(['Fig. ' num2str(FIG_ENG) ' - PreConv Link sensor']);
                            FIG_ENG = FIG_ENG+1;
                            ionhcaption_ENG.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                            add(SPCL_ENG,ionhcaption_ENG);
                        end
                        PCL = 1;
                    end
                    break
                end
            end
        end
    end
    add(appendice,SPCL);
    if activeEN == 1
        add(appendice_ENG,SPCL_ENG);
    end
end

% --- Rain Link ---
if sum(yesRL) >= 1
    RL = 0;
    for a = 1:dim
        [dimC,~] = size(colonna6{a,1});
        if dimC == 1
            if strcmp(colonna6(a,1),'Rain Link') == 1
                if RL == 0
                    RLE = Section();
                end
                sezRain = Heading3('Rain Link');
                sezRain.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                RLE.Title = sezRain;
                text = Paragraph(['Il sensore Rain Link ' char(232) ' un pluviometro '...
                    'in grado di misurare l''altezza di pioggia secondo il '...
                    'periodo di campionamento specificato.']);
                %--ENG--
                if activeEN == 1
                    if RL == 0
                        RLE_ENG = Section();
                    end
                    sezRain_ENG = Heading3('Rain Link');
                    sezRain_ENG.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                    RLE_ENG.Title = sezRain_ENG;
                    text_ENG = Paragraph(['Rain Link is a rain gauge sensor able to collect rainfall data '...
                        'with a predefined sampling period.']);
                end
                if RL == 0
                    text.HAlign = 'justify';
                    add(RLE,text);
                    imgRL = Image(('Rain.png'));
                    imgRL.Style = {Height('3.5cm'),HAlign('center')};
                    add(RLE,imgRL);
                    REcaption = Paragraph(['Fig. ' num2str(FIG) ' - Sensore Rain Link']);
                    FIG = FIG+1;
                    REcaption.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                    add(RLE,REcaption);
                    if activeEN == 1
                        text_ENG.HAlign = 'justify';
                        add(RLE_ENG,text_ENG);
                        imgRL = Image(('Rain.png'));
                        imgRL.Style = {Height('3.5cm'),HAlign('center')};
                        add(RLE_ENG,imgRL);
                        REcaption_ENG = Paragraph(['Fig. ' num2str(FIG_ENG) ' - Rain Link sensor']);
                        FIG_ENG = FIG_ENG+1;
                        REcaption_ENG.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                        add(RLE_ENG,REcaption_ENG);
                    end
                    RL = 1;
                end
                break
            end
        else
            for aC = 1:dimC
                if strcmp(colonna6{a, 1}{aC, 1},'Rain Link') == 1
                    if RL == 0
                        RLE = Section();
                    end
                    sezRain = Heading3('Rain Link');
                    sezRain.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                    RLE.Title = sezRain;
                    text = Paragraph(['Il sensore Rain Link ' char(232) ' un pluviometro '...
                        'in grado di misurare l''altezza di pioggia secondo il '...
                        'periodo di campionamento specificato.']);
                    %--ENG--
                    if activeEN == 1
                        if RL == 0
                            RLE_ENG = Section();
                        end
                        sezRain_ENG = Heading3('Rain Link');
                        sezRain_ENG.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                        RLE_ENG.Title = sezRain_ENG;
                        text_ENG = Paragraph(['Rain Link is a rain gauge sensor able to collect rainfall data '...
                            'with a predefined sampling period.']);
                    end
                    if RL == 0
                        text.HAlign = 'justify';
                        add(RLE,text);
                        imgRL = Image(('Rain.png'));
                        imgRL.Style = {Height('3.5cm'),HAlign('center')};
                        add(RLE,imgRL);
                        REcaption = Paragraph(['Fig. ' num2str(FIG) ' - Sensore Rain Link']);
                        FIG = FIG+1;
                        REcaption.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                        add(RLE,REcaption);
                        if activeEN == 1
                            text_ENG.HAlign = 'justify';
                            add(RLE_ENG,text_ENG);
                            imgRL = Image(('Rain.png'));
                            imgRL.Style = {Height('3.5cm'),HAlign('center')};
                            add(RLE_ENG,imgRL);
                            REcaption_ENG = Paragraph(['Fig. ' num2str(FIG_ENG) ' - Rain Link sensor']);
                            FIG_ENG = FIG_ENG+1;
                            REcaption_ENG.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                            add(RLE_ENG,REcaption_ENG);
                        end
                        RL = 1;
                    end
                    break
                end
            end
        end
    end
    add(appendice,RLE);
    if activeEN == 1
        add(appendice_ENG,RLE_ENG);
    end
end

% --- Crack Link ---
if sum(yesCrL) >= 1
    CrL = 0;
    for a = 1:dim
        [dimC,~] = size(colonna6{a,1});
        if dimC == 1
            if strcmp(colonna6(a,1),'Crack Link') == 1
                if CrL == 0
                    CrE = Section();
                end
                sezCrack = Heading3('Crack Link');
                sezCrack.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                CrE.Title = sezCrack;
                text = Paragraph(['I sensori Crack Link sono fessurimetri analogici '...
                    'che vengono letti mediante un modulo GMUX, convertitore di segnale '...
                    'da analogico a digitale, o centralina ASE201. I fessurimetri vengono '...
                    'posti perpendicolarmente a cavallo di fessure esistenti '...
                    'o nelle zone in cui con maggiore probabilit' char(224) ' '...
                    'potrebbero svilupparsi delle fessurazioni.']);
                
                %--ENG--
                if activeEN == 1
                    if CrL == 0
                        CrE_ENG = Section();
                    end
                    sezCrack_ENG = Heading3('Crack Link');
                    sezCrack_ENG.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                    CrE_ENG.Title = sezCrack_ENG;
                    text_ENG = Paragraph(['Crack Link sensor is an analog crack meter, read by implementing '...
                        'a GMUX module able to convert its signal into a digital one, or by connecting it to a dedicated ASE201 '...
                        'control unit. Crack meters are located across surface cracks, or in specific areas '...
                        'where the generation of surface fissures is expected.']);
                end
                if CrL == 0
                    text.HAlign = 'justify';
                    add(CrE,text);
                    imgKL = Image(('Crack.jpg'));
                    imgKL.Style = {Height('4.5cm'),HAlign('center')};
                    add(CrE,imgKL);
                    KEcaption = Paragraph(['Fig. ' num2str(FIG) ' - Sensore Crack Link']);
                    FIG = FIG+1;
                    KEcaption.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                    add(CrE,KEcaption);
                    if activeEN == 1
                        text_ENG.HAlign = 'justify';
                        add(CrE_ENG,text_ENG);
                        imgKL = Image(('Crack.jpg'));
                        imgKL.Style = {Height('4.5cm'),HAlign('center')};
                        add(CrE_ENG,imgKL);
                        KEcaption_ENG = Paragraph(['Fig. ' num2str(FIG_ENG) ' - Crack Link sensor']);
                        FIG_ENG = FIG_ENG+1;
                        KEcaption_ENG.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                        add(CrE_ENG,KEcaption_ENG);
                    end
                    CrL = 1;
                end
                break
            end
        else
            for aC = 1:dimC
                if strcmp(colonna6{a, 1}{aC, 1},'Crack Link') == 1
                    if CrL == 0
                        CrE = Section();
                    end
                    sezCrack = Heading3('Crack Link');
                    sezCrack.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                    CrE.Title = sezCrack;
                    text = Paragraph(['I sensori Crack Link sono fessurimetri analogici '...
                        'che vengono letti mediante un modulo GMUX, convertitore di segnale '...
                        'da analogico a digitale, o centralina ASE201. I fessurimetri vengono '...
                        'posti perpendicolarmente a cavallo di fessure esistenti '...
                        'o nelle zone in cui con maggiore probabilit' char(224) ' '...
                        'potrebbero svilupparsi delle fessurazioni.']);
                    %--ENG--
                    if activeEN == 1
                        if CrL == 0
                            CrE_ENG = Section();
                        end
                        sezCrack_ENG = Heading3('Crack Link');
                        sezCrack_ENG.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                        CrE_ENG.Title = sezCrack_ENG;
                        text_ENG = Paragraph(['Crack Link sensor is an analog crack meter, read by implementing '...
                            'a GMUX module able to convert its signal into a digital one, or by connecting it to a dedicated ASE201 '...
                            'control unit. Crack meters are located across surface cracks, or in specific areas '...
                            'where the generation of surface fissures is expected.']);
                    end
                    if CrL == 0
                        text.HAlign = 'justify';
                        add(CrE,text);
                        imgKL = Image(('Crack.jpg'));
                        imgKL.Style = {Height('4.5cm'),HAlign('center')};
                        add(CrE,imgKL);
                        KEcaption = Paragraph(['Fig. ' num2str(FIG) ' - Sensore Crack Link']);
                        FIG = FIG+1;
                        KEcaption.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                        add(CrE,KEcaption);
                        if activeEN == 1
                            text_ENG.HAlign = 'justify';
                            add(CrE_ENG,text_ENG);
                            imgKL = Image(('Crack.jpg'));
                            imgKL.Style = {Height('4.5cm'),HAlign('center')};
                            add(CrE_ENG,imgKL);
                            KEcaption_ENG = Paragraph(['Fig. ' num2str(FIG_ENG) ' - Crack Link sensor']);
                            FIG_ENG = FIG_ENG+1;
                            KEcaption_ENG.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                            add(CrE_ENG,KEcaption_ENG);
                        end
                        CrL = 1;
                    end
                    break
                end
            end
        end
    end
    add(appendice,CrE);
    if activeEN == 1
        add(appendice_ENG,CrE_ENG);
    end
end

% --- 3D Crack Link ---
if sum(yes3DCrL) >= 1
    CrL3D = 0;
    for a = 1:dim
        [dimC,~] = size(colonna6{a,1});
        if dimC == 1
            if strcmp(colonna6(a,1),'3D Crack Link') == 1
                if CrL3D == 0
                    Cr3DE = Section();
                end
                sezCrack3D = Heading3('3D Crack Link');
                sezCrack3D.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                Cr3DE.Title = sezCrack3D;
                text = Paragraph(['I sensori 3D Crack Link sono fessurimetri tridimensionali analogici, '...
                    'letti mediante un modulo GMUX, convertitore di segnale '...
                    'da analogico a digitale, o una centralina ASE201. I fessurimetri '...
                    'vengono posti perpendicolarmente a cavallo di fessure esistenti o nelle zone in cui '...
                    'con maggiore probabilit' char(224) 'potrebbero svilupparsi delle fessurazioni lungo '...
                    'tre dimensioni fra loro perpendicolari.']);
                %--ENG--
                if activeEN == 1
                    if CrL3D == 0
                        Cr3DE_ENG = Section();
                    end
                    sezCrack3D_ENG = Heading3('3D Crack Link');
                    sezCrack3D_ENG.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                    Cr3DE_ENG.Title = sezCrack3D_ENG;
                    text_ENG = Paragraph(['3D Crack Link sensor is a three-dimension analog crack meter, read by implementing '...
                        'a GMUX module able to convert its signal into a digital one, or by connecting it to a dedicated ASE201 '...
                        'control unit. 3D Crack meters are located across surface cracks, or in specific areas '...
                        'where the generation of surface fissures is expected.']);
                end
                if CrL3D == 0
                    text.HAlign = 'justify';
                    add(Cr3DE,text);
                    imgKL = Image(('3DCrack.jpg'));
                    imgKL.Style = {Height('5cm'),HAlign('center')};
                    add(Cr3DE,imgKL);
                    KEcaption = Paragraph(['Fig. ' num2str(FIG) ' - Sensore 3D Crack Link (fonte: Pizzi Instruments)']);
                    FIG = FIG+1;
                    KEcaption.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                    add(Cr3DE,KEcaption);
                    if activeEN == 1
                        text_ENG.HAlign = 'justify';
                        add(Cr3DE_ENG,text_ENG);
                        imgKL = Image(('3DCrack.jpg'));
                        imgKL.Style = {Height('5cm'),HAlign('center')};
                        add(Cr3DE_ENG,imgKL);
                        KEcaption_ENG = Paragraph(['Fig. ' num2str(FIG_ENG) ' - 3D Crack Link sensor (source: Pizzi Instruments)']);
                        FIG_ENG = FIG_ENG+1;
                        KEcaption_ENG.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                        add(Cr3DE_ENG,KEcaption_ENG);
                    end
                    CrL3D = 1;
                end
                break
            end
        else
            for aC = 1:dimC
                if strcmp(colonna6{a, 1}{aC, 1},'3D Crack Link') == 1
                    if CrL3D == 0
                        Cr3DE = Section();
                    end
                    sezCrack3D = Heading3('3D Crack Link');
                    sezCrack3D.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                    Cr3DE.Title = sezCrack3D;
                    text = Paragraph(['I sensori 3D Crack Link sono fessurimetri tridimensionali analogici, '...
                        'letti mediante un modulo GMUX, convertitore di segnale '...
                        'da analogico a digitale, o una centralina ASE201. I fessurimetri '...
                        'vengono posti perpendicolarmente a cavallo di fessure esistenti o nelle zone in cui '...
                        'con maggiore probabilit' char(224) 'potrebbero svilupparsi delle fessurazioni lungo '...
                        'tre dimensioni fra loro perpendicolari.']);
                    %--ENG--
                    if activeEN == 1
                        if CrL3D == 0
                            Cr3DE_ENG = Section();
                        end
                        sezCrack3D_ENG = Heading3('3D Crack Link');
                        sezCrack3D_ENG.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                        Cr3DE_ENG.Title = sezCrack3D_ENG;
                        text_ENG = Paragraph(['3D Crack Link sensor is a three-dimension analog crack meter, read by implementing '...
                            'a GMUX module able to convert its signal into a digital one, or by connecting it to a dedicated ASE201 '...
                            'control unit. 3D Crack meters are located across surface cracks, or in specific areas '...
                            'where the generation of surface fissures is expected.']);
                    end
                    if CrL3D == 0
                        text.HAlign = 'justify';
                        add(Cr3DE,text);
                        imgKL = Image(('3DCrack.jpg'));
                        imgKL.Style = {Height('5cm'),HAlign('center')};
                        add(Cr3DE,imgKL);
                        KEcaption = Paragraph(['Fig. ' num2str(FIG) ' - Sensore 3D Crack Link (fonte: Pizzi Instruments)']);
                        FIG = FIG+1;
                        KEcaption.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                        add(Cr3DE,KEcaption);
                        if activeEN == 1
                            text_ENG.HAlign = 'justify';
                            add(Cr3DE_ENG,text_ENG);
                            imgKL = Image(('3DCrack.jpg'));
                            imgKL.Style = {Height('5cm'),HAlign('center')};
                            add(Cr3DE_ENG,imgKL);
                            KEcaption_ENG = Paragraph(['Fig. ' num2str(FIG_ENG) ' - 3D Crack Link sensor (source: Pizzi Instruments)']);
                            FIG_ENG = FIG_ENG+1;
                            KEcaption_ENG.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                            add(Cr3DE_ENG,KEcaption_ENG);
                        end
                        CrL3D = 1;
                    end
                    break
                end
            end
        end
    end
    add(appendice,Cr3DE);
    if activeEN == 1
        add(appendice_ENG,r3DE_ENG);
    end
end

% --- Extensometer Link ---
if sum(yesEL) >= 1
    EL = 0;
    for a = 1:dim
        [dimC,~] = size(colonna6{a,1});
        if dimC == 1
            if strcmp(colonna6(a,1),'Extensometer Link') == 1
                if EL == 0
                    EE = Section();
                end
                sezExtensometer = Heading3('Extensometer Link');
                sezExtensometer.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                EE.Title = sezExtensometer;
                text = Paragraph(['I sensori Extensometer Link sono barrette estensimetriche analogiche '...
                    'che vengono lette mediante un modulo GMUX, convertitore di segnale '...
                    'da analogico a digitale, o centralina ASE201. Le barrette vengono poste a cavallo '...
                    'delle zone da monitorare e rilevano microfessurazioni '...
                    'adimensionalizzate rispetto alla lunghezza della barretta stessa.']);
                
                %--ENG--
                if activeEN == 1
                    if EL == 0
                        EE_ENG = Section();
                    end
                    sezExtensometer_ENG = Heading3('Extensometer Link');
                    sezExtensometer_ENG.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                    EE_ENG.Title = sezExtensometer_ENG;
                    text_ENG = Paragraph(['Extensometer Link is a sensor composed of an analog extensometer, read by implementing '...
                        'a GMUX module able to convert its signal into a digital one, or by connecting it to a dedicated ASE201 '...
                        'control unit. Extensometers are located in specific areas in order to '...
                        'detect the formation of micro-fractures, which are measured with a parameter that depends on the '...
                        'length of the monitoring tool.']);
                end
                if EL == 0
                    text.HAlign = 'justify';
                    add(EE,text);
                    imgKL = Image(('Extensometer.png'));
                    imgKL.Style = {Height('2.7cm'),HAlign('center')};
                    add(EE,imgKL);
                    KEcaption = Paragraph(['Fig. ' num2str(FIG) ' - Sensore Extensometer Link (fonte: Earth System)']);
                    FIG = FIG+1;
                    KEcaption.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                    add(EE,KEcaption);
                    if activeEN == 1
                        text_ENG.HAlign = 'justify';
                        add(EE_ENG,text_ENG);
                        imgKL = Image(('Extensometer.png'));
                        imgKL.Style = {Height('2.7cm'),HAlign('center')};
                        add(EE_ENG,imgKL);
                        KEcaption_ENG = Paragraph(['Fig. ' num2str(FIG_ENG) ' - Extensometer Link sensor (source: Earth System)']);
                        FIG_ENG = FIG_ENG+1;
                        KEcaption_ENG.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                        add(EE_ENG,KEcaption_ENG);
                    end
                    EL = 1;
                end
                break
            end
        else
            for aC = 1:dimC
                if strcmp(colonna6{a, 1}{aC, 1},'Extensometer Link') == 1
                    if EL == 0
                        EE = Section();
                    end
                    sezExtensometer = Heading3('Extensometer Link');
                    sezExtensometer.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                    EE.Title = sezExtensometer;
                    text = Paragraph(['I sensori Extensometer Link sono barrette estensimetriche analogiche '...
                        'che vengono lette mediante un modulo GMUX, convertitore di segnale '...
                        'da analogico a digitale, o centralina ASE201. Le barrette vengono poste a cavallo '...
                        'delle zone da monitorare e rilevano microfessurazioni '...
                        'adimensionalizzate rispetto alla lunghezza della barretta stessa.']);
                    %--ENG--
                    if activeEN == 1
                        if EL == 0
                            EE_ENG = Section();
                        end
                        sezExtensometer_ENG = Heading3('Extensometer Link');
                        sezExtensometer_ENG.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                        EE_ENG.Title = sezExtensometer_ENG;
                        text_ENG = Paragraph(['Extensometer Link is a sensor composed of an analog extensometer, read by implementing '...
                            'a GMUX module able to convert its signal into a digital one, or by connecting it to a dedicated ASE201 '...
                            'control unit. Extensometers are located in specific areas in order to '...
                            'detect the formation of micro-fractures, which are measured with a parameter that depends on the '...
                            'length of the monitoring tool.']);
                    end
                    if EL == 0
                        text.HAlign = 'justify';
                        add(EE,text);
                        imgKL = Image(('Extensometer.png'));
                        imgKL.Style = {Height('2.7cm'),HAlign('center')};
                        add(EE,imgKL);
                        KEcaption = Paragraph(['Fig. ' num2str(FIG) ' - Sensore Extensometer Link (fonte: Earth System)']);
                        FIG = FIG+1;
                        KEcaption.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                        add(EE,KEcaption);
                        if activeEN == 1
                            text_ENG.HAlign = 'justify';
                            add(EE_ENG,text_ENG);
                            imgKL = Image(('Extensometer.png'));
                            imgKL.Style = {Height('2.7cm'),HAlign('center')};
                            add(EE_ENG,imgKL);
                            KEcaption_ENG = Paragraph(['Fig. ' num2str(FIG_ENG) ' - Extensometer Link sensor (source: Earth System)']);
                            FIG_ENG = FIG_ENG+1;
                            KEcaption_ENG.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                            add(EE_ENG,KEcaption_ENG);
                        end
                        EL = 1;
                    end
                    break
                end
            end
        end
    end
    add(appendice,EE);
    if activeEN == 1
        add(appendice_ENG,EE_ENG);
    end
end

% --- 3D Extensometer Link ---
if sum(yes3DEL) >= 1
    EL3D = 0;
    for a = 1:dim
        [dimC,~] = size(colonna6{a,1});
        if dimC == 1
            if strcmp(colonna6(a,1),'3D Extensometer Link') == 1
                if EL3D == 0
                    EE = Section();
                end
                sez3DExtensometer = Heading3('3D Extensometer Link');
                sez3DExtensometer.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                EE.Title = sez3DExtensometer;
                text = Paragraph(['I sensori 3D Extensometer Link sono terne di '...
                    'barrette estensimetriche analogiche, lette mediante modulo GMUX, '...
                    'convertitore di segnale da analogico a digitale, o centralina ASE201. '...
                    'Le barrette vengono poste a cavallo delle zone da monitorare e rilevano '...
                    'microfessurazioni adimensionalizzate rispetto alla lunghezza della barretta '...
                    'stessa. A seconda della tipologia di impiego, si distinguono in barrette '...
                    'da calcestruzzo o a saldare.']);
                %--ENG--
                if acriveEN == 1
                    if EL3D == 0
                        EE_ENG = Section();
                    end
                    sez3DExtensometer_ENG = Heading3('3D Extensometer Link');
                    sez3DExtensometer_ENG.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                    EE_ENG.Title = sez3DExtensometer_ENG;
                    text_ENG = Paragraph(['3D Extensometer Link is a sensor composed of three analog strain gauges, read by implementing '...
                        'a GMUX module able to convert its signal into a digital one, or by connecting it to a dedicated ASE201 '...
                        'control unit. Strain gauges are located in specific areas in order to '...
                        'detect the formation of micro-fractures, which are measured with a parameter that depends on the '...
                        'length of the monitoring tool.']);
                end
                if EL3D == 0
                    text.HAlign = 'justify';
                    add(EE,text);
                    imgKL = Image(('3DExtensometer.png'));
                    imgKL.Style = {Height('4cm'),HAlign('center')};
                    add(EE,imgKL);
                    KEcaption = Paragraph(['Fig. ' num2str(FIG) ' - Sensore 3D Extensometer Link (fonte: Earth System)']);
                    FIG = FIG+1;
                    KEcaption.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                    add(EE,KEcaption);
                    if activeEN == 1
                        text_ENG.HAlign = 'justify';
                        add(EE_ENG,text_ENG);
                        imgKL = Image(('3DExtensometer.png'));
                        imgKL.Style = {Height('4cm'),HAlign('center')};
                        add(EE_ENG,imgKL);
                        KEcaption_ENG = Paragraph(['Fig. ' num2str(FIG_ENG) ' - 3D Extensometer Link sensor (source: Earth System)']);
                        FIG_ENG = FIG_ENG+1;
                        KEcaption_ENG.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                        add(EE_ENG,KEcaption_ENG);
                    end
                    EL3D = 1;
                end
                break
            end
        else
            for aC = 1:dimC
                if strcmp(colonna6{a, 1}{aC, 1},'3D Extensometer Link') == 1
                    if EL3D == 0
                        EE = Section();
                    end
                    sez3DExtensometer = Heading3('3D Extensometer Link');
                    sez3DExtensometer.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                    EE.Title = sez3DExtensometer;
                    text = Paragraph(['I sensori 3D Extensometer Link sono terne di '...
                        'barrette estensimetriche analogiche, lette mediante modulo GMUX, '...
                        'convertitore di segnale da analogico a digitale, o centralina ASE201. '...
                        'Le barrette vengono poste a cavallo delle zone da monitorare e rilevano '...
                        'microfessurazioni adimensionalizzate rispetto alla lunghezza della barretta '...
                        'stessa. A seconda della tipologia di impiego, si distinguono in barrette '...
                        'da calcestruzzo o a saldare.']);
                    %--ENG--
                    if acriveEN == 1
                        if EL3D == 0
                            EE_ENG = Section();
                        end
                        sez3DExtensometer_ENG = Heading3('3D Extensometer Link');
                        sez3DExtensometer_ENG.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                        EE_ENG.Title = sez3DExtensometer_ENG;
                        text_ENG = Paragraph(['3D Extensometer Link is a sensor composed of three analog strain gauges, read by implementing '...
                            'a GMUX module able to convert its signal into a digital one, or by connecting it to a dedicated ASE201 '...
                            'control unit. Strain gauges are located in specific areas in order to '...
                            'detect the formation of micro-fractures, which are measured with a parameter that depends on the '...
                            'length of the monitoring tool.']);
                    end
                    if EL3D == 0
                        text.HAlign = 'justify';
                        add(EE,text);
                        imgKL = Image(('3DExtensometer.png'));
                        imgKL.Style = {Height('4cm'),HAlign('center')};
                        add(EE,imgKL);
                        KEcaption = Paragraph(['Fig. ' num2str(FIG) ' - Sensore 3D Extensometer Link (fonte: Earth System)']);
                        FIG = FIG+1;
                        KEcaption.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                        add(EE,KEcaption);
                        if activeEN == 1
                            text_ENG.HAlign = 'justify';
                            add(EE_ENG,text_ENG);
                            imgKL = Image(('3DExtensometer.png'));
                            imgKL.Style = {Height('4cm'),HAlign('center')};
                            add(EE_ENG,imgKL);
                            KEcaption_ENG = Paragraph(['Fig. ' num2str(FIG_ENG) ' - 3D Extensometer Link sensor (source: Earth System)']);
                            FIG_ENG = FIG_ENG+1;
                            KEcaption_ENG.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                            add(EE_ENG,KEcaption_ENG);
                        end
                        EL3D = 1;
                    end
                    break
                end
            end
        end
    end
    add(appendice,EE);
    if activeEN == 1
        add(appendice_ENG,EE_ENG);
    end
end

% --- Wire Extensometer Link ---
if sum(yesWEL) >= 1
    WEL = 0;
    for a = 1:dim
        [dimC,~] = size(colonna6{a,1});
        if dimC == 1
            if strcmp(colonna6(a,1),'Wire Extensometer Link') == 1
                if WEL == 0
                    EE = Section();
                end
                sezWireExtensometer = Heading3('Wire Extensometer Link');
                sezWireExtensometer.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                EE.Title = sezWireExtensometer;
                text = Paragraph(['I sensori Wire Extensometer Link sono estensimetri a filo analogici, '...
                    'letti mediante modulo GMUX, convertitore di segnale da analogico a digitale, o centralina ASE201. '...
                    'Lo strumento viene posto a cavallo delle zone da monitorare, con la base '...
                    'da un lato della fessura ed il filo fissato dall''altro lato e rileva '...
                    'l''allungamento o l''accorciamento del filo stesso, indice dell''apertura '...
                    'o chiusura della fessura presente nella zona monitorata. ']);
                %--ENG--
                if activeEN == 1
                    if WEL == 0
                        EE_ENG = Section();
                    end
                    sezWireExtensometer_ENG = Heading3('Wire Extensometer Link');
                    sezWireExtensometer_ENG.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                    EE_ENG.Title = sezWireExtensometer_ENG;
                    text_ENG = Paragraph(['Wire Extensometer Link is an analog wire extensometer sensor, read by implementing '...
                        'a GMUX module able to convert its signal into a digital one, or by connecting it to a dedicated ASE201 '...
                        'control unit. The device is placed in specific areas where fissures are observed, by installing the '...
                        'base on one side and fixing the wire on the other one. The aim is to determine the crack opening/closing '...
                        'according to the wire length variation.']);
                end
                if WEL == 0
                    text.HAlign = 'justify';
                    add(EE,text);
                    imgKL = Image(('wire.png'));
                    imgKL.Style = {Height('4cm'),HAlign('center')};
                    add(EE,imgKL);
                    KEcaption = Paragraph(['Fig. ' num2str(FIG) ' - Sensore Wire Extensometer Link (fonte: Earth System)']);
                    FIG = FIG+1;
                    KEcaption.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                    add(EE,KEcaption);
                    if activeEN == 1
                        text_ENG.HAlign = 'justify';
                        add(EE_ENG,text_ENG);
                        imgKL = Image(('wire.png'));
                        imgKL.Style = {Height('4cm'),HAlign('center')};
                        add(EE_ENG,imgKL);
                        KEcaption_ENG = Paragraph(['Fig. ' num2str(FIG_ENG) ' - Wire Extensometer Link sensor (source: Earth System)']);
                        FIG_ENG = FIG_ENG+1;
                        KEcaption_ENG.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                        add(EE_ENG,KEcaption_ENG);
                    end
                    WEL = 1;
                end
                break
            end
        else
            for aC = 1:dimC
                if strcmp(colonna6{a, 1}{aC, 1},'Wire Extensometer Link') == 1
                    if WEL == 0
                        EE = Section();
                    end
                    sezWireExtensometer = Heading3('Wire Extensometer Link');
                    sezWireExtensometer.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                    EE.Title = sezWireExtensometer;
                    text = Paragraph(['I sensori Wire Extensometer Link sono estensimetri a filo analogici, '...
                        'letti mediante modulo GMUX, convertitore di segnale da analogico a digitale, o centralina ASE201. '...
                        'Lo strumento viene posto a cavallo delle zone da monitorare, con la base '...
                        'da un lato della fessura ed il filo fissato dall''altro lato e rileva '...
                        'l''allungamento o l''accorciamento del filo stesso, indice dell''apertura '...
                        'o chiusura della fessura presente nella zona monitorata. ']);
                    %--ENG--
                    if activeEN == 1
                        if WEL == 0
                            EE_ENG = Section();
                        end
                        sezWireExtensometer_ENG = Heading3('Wire Extensometer Link');
                        sezWireExtensometer_ENG.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                        EE_ENG.Title = sezWireExtensometer_ENG;
                        text_ENG = Paragraph(['Wire Extensometer Link is an analog wire extensometer sensor, read by implementing '...
                            'a GMUX module able to convert its signal into a digital one, or by connecting it to a dedicated ASE201 '...
                            'control unit. The device is placed in specific areas where fissures are observed, by installing the '...
                            'base on one side and fixing the wire on the other one. The aim is to determine the crack opening/closing '...
                            'according to the wire length variation.']);
                    end
                    if WEL == 0
                        text.HAlign = 'justify';
                        add(EE,text);
                        imgKL = Image(('wire.png'));
                        imgKL.Style = {Height('4cm'),HAlign('center')};
                        add(EE,imgKL);
                        KEcaption = Paragraph(['Fig. ' num2str(FIG) ' - Sensore Wire Extensometer Link (fonte: Earth System)']);
                        FIG = FIG+1;
                        KEcaption.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                        add(EE,KEcaption);
                        if activeEN == 1
                            text_ENG.HAlign = 'justify';
                            add(EE_ENG,text_ENG);
                            imgKL = Image(('wire.png'));
                            imgKL.Style = {Height('4cm'),HAlign('center')};
                            add(EE_ENG,imgKL);
                            KEcaption_ENG = Paragraph(['Fig. ' num2str(FIG_ENG) ' - Wire Extensometer Link sensor (source: Earth System)']);
                            FIG_ENG = FIG_ENG+1;
                            KEcaption_ENG.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                            add(EE_ENG,KEcaption_ENG);
                        end
                        WEL = 1;
                    end
                    break
                end
            end
        end
    end
    add(appendice,EE);
    if activeEN == 1
        add(appendice_ENG,EE_ENG);
    end
end

% --- MultiPoint Borehole Extensometer ---
if sum(yesMPBEL) >= 1
    MPBEL = 0;
    for a = 1:dim
        [dimC,~] = size(colonna6{a,1});
        if dimC == 1
            if strcmp(colonna6(a,1),'Multi Point Borehole Extensometer Link') == 1
                if MPBEL == 0
                    EE = Section();
                end
                sezMPBEL = Heading3('Multi Point Borehole Rod Extensometer');
                sezMPBEL.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                EE.Title = sezMPBEL;
                text = Paragraph(['I sensori Multi Point Borehole Rod Extensometer sono estensimetri multibase '...
                    'analogici, letti mediante modulo GMUX, convertitore di segnale da analogico a digitale, o '...
                    'centralina ASE201. Lo strumento viene posto all''interno di perforazioni radiali '...
                    'ed ' char(232) ' caratterizzato dalla presenza di una o pi' char(250) ' basi a lunghezza differente. '...
                    'Comparando le deformazioni delle singole basi, si ' char(232) ' in grado di risalire '...
                    'alla zona in cui si sono sviluppati i movimenti radiali.']);
                %--ENG--
                if activeEN == 1
                    if MPBEL == 0
                        EE_ENG = Section();
                    end
                    sezMPBEL_ENG = Heading3('Multi Point Borehole Rod Extensometer');
                    sezMPBEL_ENG.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                    EE_ENG.Title = sezMPBEL_ENG;
                    text_ENG = Paragraph(['Multi Point Borehole Extensometer Link is '...
                        'an analog multi point borehole rod extensometer '...
                        'sensor, read by implementing '...
                        'a GMUX module able to convert its signal into a digital one, or by connecting it to a dedicated ASE201 '...
                        'control unit. The device is placed inside a radial drilling borehole, and  features one or more rods in different positions. '...
                        'The tool allows to identify the areas experiencing higher deformations, by comparing data coming from different rods.']);
                end
                if MPBEL == 0
                    text.HAlign = 'justify';
                    add(EE,text);
                    imgKL = Image(('MPBEL.png'));
                    imgKL.Style = {Height('4cm'),HAlign('center')};
                    add(EE,imgKL);
                    KEcaption = Paragraph(['Fig. ' num2str(FIG) ' - Sensore Multi Point Borehole Rod Extensometer Link (fonte: Earth System)']);
                    FIG = FIG+1;
                    KEcaption.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                    add(EE,KEcaption);
                    if activeEN == 1
                        text_ENG.HAlign = 'justify';
                        add(EE_ENG,text_ENG);
                        imgKL = Image(('MPBEL.png'));
                        imgKL.Style = {Height('4cm'),HAlign('center')};
                        add(EE_ENG,imgKL);
                        KEcaption_ENG = Paragraph(['Fig. ' num2str(FIG_ENG) ' - Multi Point Borehole Rod Extensometer Link sensor (source: Earth System)']);
                        FIG_ENG = FIG_ENG+1;
                        KEcaption_ENG.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                        add(EE_ENG,KEcaption_ENG);
                    end
                    MPBEL = 1;
                end
                break
            end
        else
            for aC = 1:dimC
                if strcmp(colonna6{a, 1}{aC, 1},'Multi Point Borehole Extensometer Link') == 1
                    if MPBEL == 0
                        EE = Section();
                    end
                    sezMPBEL = Heading3('Multi Point Borehole Rod Extensometer');
                    sezMPBEL.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                    EE.Title = sezMPBEL;
                    text = Paragraph(['I sensori Multi Point Borehole Rod Extensometer sono estensimetri multibase '...
                        'analogici, letti mediante modulo GMUX, convertitore di segnale da analogico a digitale, o '...
                        'centralina ASE201. Lo strumento viene posto all''interno di perforazioni radiali '...
                        'ed ' char(232) ' caratterizzato dalla presenza di una o pi' char(250) ' basi a lunghezza differente. '...
                        'Comparando le deformazioni delle singole basi, si ' char(232) ' in grado di risalire '...
                        'alla zona in cui si sono sviluppati i movimenti radiali.']);
                    %--ENG--
                    if activeEN == 1
                        if MPBEL == 0
                            EE_ENG = Section();
                        end
                        sezMPBEL_ENG = Heading3('Multi Point Borehole Rod Extensometer');
                        sezMPBEL_ENG.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                        EE_ENG.Title = sezMPBEL_ENG;
                        text_ENG = Paragraph(['Multi Point Borehole Extensometer Link is '...
                            'an analog multi point borehole rod extensometer '...
                            'sensor, read by implementing '...
                            'a GMUX module able to convert its signal into a digital one, or by connecting it to a dedicated ASE201 '...
                            'control unit. The device is placed inside a radial drilling borehole, and  features one or more rods in different positions. '...
                            'The tool allows to identify the areas experiencing higher deformations, by comparing data coming from different rods.']);
                    end
                    if MPBEL == 0
                        text.HAlign = 'justify';
                        add(EE,text);
                        imgKL = Image(('MPBEL.png'));
                        imgKL.Style = {Height('4cm'),HAlign('center')};
                        add(EE,imgKL);
                        KEcaption = Paragraph(['Fig. ' num2str(FIG) ' - Sensore Multi Point Borehole Rod Extensometer Link (fonte: Earth System)']);
                        FIG = FIG+1;
                        KEcaption.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                        add(EE,KEcaption);
                        if activeEN == 1
                            text_ENG.HAlign = 'justify';
                            add(EE_ENG,text_ENG);
                            imgKL = Image(('MPBEL.png'));
                            imgKL.Style = {Height('4cm'),HAlign('center')};
                            add(EE_ENG,imgKL);
                            KEcaption_ENG = Paragraph(['Fig. ' num2str(FIG_ENG) ' - Multi Point Borehole Rod Extensometer Link sensor (source: Earth System)']);
                            FIG_ENG = FIG_ENG+1;
                            KEcaption_ENG.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                            add(EE_ENG,KEcaption_ENG);
                        end
                        MPBEL = 1;
                    end
                    break
                end
            end
        end
    end
    add(appendice,EE);
    if activeEN == 1
        add(appendice_ENG,EE_ENG);
    end
end

% --- Load Link ---
if sum(yesLL)>=1
    LL = 0;
    for a = 1:dim
        [dimC,~] = size(colonna6{a,1});
        if dimC == 1
            if strcmp(colonna6(a,1),'Load Link') == 1
                if LL == 0
                    SL = Section();
                end
                sezLL = Heading3('Load Link');
                sezLL.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                SL.Title = sezLL;
                text = Paragraph(['I sensori Load Link sono celle di carico '...
                    'analogiche, lette mediante modulo GMUX, convertitore di segnale da analogico a digitale, o '...
                    'centralina ASE201/G201. Lo strumento, a seconda della tipologia, misura il carico di compressione '...
                    'o trazione che agisce perpendicolarmente rispetto allo stesso.']);
                
                %--ENG--
                if activeEN == 1
                    if LL == 0
                        SL_ENG = Section();
                    end
                    sezLL_ENG = Heading3('Load Link');
                    sezLL_ENG.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                    SL_ENG.Title = sezLL_ENG;
                    text = Paragraph(['Load Link is an analog load sensor, '...
                        'read by implementing a GMUX module able to convert its signal into '...
                        'a digital one, or by connecting it to a dedicated ASE201 '...
                        'control unit. Depending on the sensor working principle, the device is able to measure '...
                        'compression or traction loads acting in perpendicular direction.']);
                end
                if LL == 0
                    text.HAlign = 'justify';
                    add(SL,text);
                    imgLL = Image(('LL.jpg'));
                    imgLL.Style = {Height('4cm'),HAlign('center')};
                    add(SL,imgLL);
                    LLcaption = Paragraph(['Fig. ' num2str(FIG) ' - Sensore Load Link (fonte: Earth System)']);
                    FIG = FIG+1;
                    LLcaption.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                    add(SL,LLcaption);
                    LL = 1;
                    if activeEN == 1
                        text_ENG.HAlign = 'justify';
                        add(SL_ENG,text_ENG);
                        imgLL = Image(('LL.jpg'));
                        imgLL.Style = {Height('4cm'),HAlign('center')};
                        add(SL_ENG,imgLL);
                        LLcaption_ENG = Paragraph(['Fig. ' num2str(FIG_ENG) ' - Load Link sensor (source: Earth System)']);
                        FIG_ENG = FIG_ENG+1;
                        LLcaption_ENG.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                        add(SL_ENG,LLcaption_ENG);
                        LL = 1;
                    end
                end
                break
            end
        else
            for aC = 1:dimC
                if strcmp(colonna6{a, 1}{aC, 1},'Load Link') == 1
                    if LL == 0
                        SL = Section();
                    end
                    sezLL = Heading3('Load Link');
                    sezLL.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                    SL.Title = sezLL;
                    text = Paragraph(['I sensori Load Link sono celle di carico '...
                        'analogiche, lette mediante modulo GMUX, convertitore di segnale da analogico a digitale, o '...
                        'centralina ASE201/G201. Lo strumento, a seconda della tipologia, misura il carico di compressione '...
                        'o trazione che agisce perpendicolarmente rispetto allo stesso.']);
                    %--ENG--
                    if activeEN == 1
                        if LL == 0
                            SL_ENG = Section();
                        end
                        sezLL_ENG = Heading3('Load Link');
                        sezLL_ENG.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                        SL_ENG.Title = sezLL_ENG;
                        text = Paragraph(['Load Link is an analog load sensor, '...
                            'read by implementing a GMUX module able to convert its signal into '...
                            'a digital one, or by connecting it to a dedicated ASE201 '...
                            'control unit. Depending on the sensor working principle, the device is able to measure '...
                            'compression or traction loads acting in perpendicular direction.']);
                    end
                    if LL == 0
                        text.HAlign = 'justify';
                        add(SL,text);
                        imgLL = Image(('LL.jpg'));
                        imgLL.Style = {Height('4cm'),HAlign('center')};
                        add(SL,imgLL);
                        LLcaption = Paragraph(['Fig. ' num2str(FIG) ' - Sensore Load Link (fonte: Earth System)']);
                        FIG = FIG+1;
                        LLcaption.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                        add(SL,LLcaption);
                        if activeEN == 1
                            
                            text_ENG.HAlign = 'justify';
                            add(SL_ENG,text_ENG);
                            imgLL = Image(('LL.jpg'));
                            imgLL.Style = {Height('4cm'),HAlign('center')};
                            add(SL_ENG,imgLL);
                            LLcaption_ENG = Paragraph(['Fig. ' num2str(FIG_ENG) ' - Load Link sensor (source: Earth System)']);
                            FIG_ENG = FIG_ENG+1;
                            LLcaption_ENG.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                            add(SL_ENG,LLcaption_ENG);
                        end
                        LL = 1;
                    end
                    break
                end
            end
        end
    end
    add(appendice,SL);
    if activeEN == 1
        add(appendice_ENG,SL_ENG);
    end
end

% --- Trigger Link ---
if sum(yesTrL)>=1
    % Trigger standard
    if appTS == 1
        FC = 0;
        for a = 1:dim
            [dimC,~] = size(colonna6{a,1});
            if dimC == 1
                if strcmp(colonna6(a,1),'Trigger Link') == 1
                    if FC == 0
                        TRL = Section();
                    end
                    sezTRL = Heading3('Trigger Link');
                    sezTRL.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                    TRL.Title = sezTRL;
                    text = Paragraph(['Il Trigger Link ' char(232) ' un sensore analogico costituito da un finecorsa elettro-meccanico, '...
                        'la cui attivazione serve a inizializzare una serie di procedure predefinite sulla centralina a cui '...
                        char(232) ' collegato (e.g. lettura dei sensori, trasmissione dati, ecc.).']);
                    
                    %--ENG--
                    if activeEN == 1
                        if FC == 0
                            TRL_ENG = Section();
                        end
                        sezTRL_ENG = Heading3('Trigger Link');
                        sezTRL_ENG.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                        TRL_ENG.Title = sezTRL_ENG;
                        text_ENG = Paragraph(['Trigger Link is an analog sensor integrating an electro-mechanical switch, '...
                            'whose activation leads to the initialization of predefined procedures involving the control unit '...
                            'to which it is connected (e.g. sensors reading, data transmission, etc.).']);
                    end
                    if FC == 0
                        text.HAlign = 'justify';
                        add(TRL,text);
                        imgTRL = Image(('TRL.jpg'));
                        imgTRL.Style = {Height('4cm'),HAlign('center')};
                        add(TRL,imgTRL);
                        TRLcaption = Paragraph(['Fig. ' num2str(FIG) ' - Sensore Trigger Link']);
                        FIG = FIG+1;
                        TRLcaption.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                        add(TRL,TRLcaption);
                        if activeEN == 1
                            text_ENG.HAlign = 'justify';
                            add(TRL_ENG,text_ENG);
                            imgTRL = Image(('TRL.jpg'));
                            imgTRL.Style = {Height('4cm'),HAlign('center')};
                            add(TRL_ENG,imgTRL);
                            TRLcaption_ENG = Paragraph(['Fig. ' num2str(FIG_ENG) ' - Trigger Link sensor']);
                            FIG_ENG = FIG_ENG+1;
                            TRLcaption_ENG.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                            add(TRL_ENG,TRLcaption_ENG);
                        end
                        FC = 1;
                    end
                    break
                end
            else
                for aC = 1:dimC
                    if strcmp(colonna6{a, 1}{aC, 1},'Trigger Link') == 1
                        if FC == 0
                            TRL = Section();
                        end
                        sezTRL = Heading3('Trigger Link');
                        sezTRL.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                        TRL.Title = sezTRL;
                        text = Paragraph(['Il Trigger Link ' char(232) ' un sensore analogico costituito da un finecorsa elettro-meccanico, '...
                            'la cui attivazione serve a inizializzare une serie di procedure predefinite sulla centralina a cui '...
                            char(232) ' collegato (e.g. lettura dei sensori, trasmissione dati, ecc.).']);
                        
                        %--ENG--
                        if activeEN == 1
                            if FC == 0
                                TRL_ENG = Section();
                            end
                            sezTRL_ENG = Heading3('Trigger Link');
                            sezTRL_ENG.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                            TRL_ENG.Title = sezTRL_ENG;
                            text_ENG = Paragraph(['Trigger Link is an analog sensor integrating an electro-mechanical switch, '...
                                'whose activation leads to the initialization of predefined procedures involving the control unit '...
                                'to which it is connected (e.g. sensors reading, data transmission, etc.).']);
                        end
                        if FC == 0
                            text.HAlign = 'justify';
                            add(TRL,text);
                            imgTRL = Image(('TRL.jpg'));
                            imgTRL.Style = {Height('4cm'),HAlign('center')};
                            add(TRL,imgTRL);
                            TRLcaption = Paragraph(['Fig. ' num2str(FIG) ' - Sensore Trigger Link']);
                            FIG = FIG+1;
                            TRLcaption.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                            add(TRL,TRLcaption);
                            if activeEN == 1
                                text_ENG.HAlign = 'justify';
                                add(TRL_ENG,text_ENG);
                                imgTRL = Image(('TRL.jpg'));
                                imgTRL.Style = {Height('4cm'),HAlign('center')};
                                add(TRL_ENG,imgTRL);
                                TRLcaption_ENG = Paragraph(['Fig. ' num2str(FIG_ENG) ' - Trigger Link sensor']);
                                FIG_ENG = FIG_ENG+1;
                                TRLcaption_ENG.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                                add(TRL_ENG,TRLcaption_ENG);
                            end
                            FC = 1;
                        end
                        break
                    end
                end
            end
        end
        add(appendice,TRL);
        if activeEN == 1
            add(appendice_ENG,TRL_ENG);
        end
    end
    % Corda a strappo Nesa
    if appNW == 1
        NW = 0;
        for a = 1:dim
            [dimC,~] = size(colonna6{a,1});
            if dimC == 1
                if strcmp(colonna6(a,1),'Trigger Link') == 1
                    if NW == 0
                        NL = Section();
                    end
                    sezNL = Heading3('Corda a strappo');
                    sezNL.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                    NL.Title = sezNL;
                    text = Paragraph(['La corda a strappo ' char(232) ' uno strumento di monitoraggio che viene installato in corrispondenza '...
                        'di un punto dove ' char(232) ' previsto il passaggio di una colata di detrito. La rottura del cavo segnala che il fenomeno '...
                        char(232) ' in atto e permette di allertare le autorit' char(224) ' preposte alla gestione del sito monitorato.']);
                    
                    %--ENG--
                    if activeEN == 1
                        if NW == 0
                            NL_ENG = Section();
                        end
                        sezNL_ENG = Heading3('Wire sensor');
                        sezNL_ENG.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                        NL_ENG.Title = sezNL_ENG;
                        text_ENG = Paragraph(['The wire sensor is a monitoring device installed in an area where the occurence of '...
                            'a debris flow is expected. The cut of the wire sensor indicates that the event is currently ongoing, and '...
                            'allows to send alert messages to authorities responsible of the monitored site.']);
                    end
                    if NW == 0
                        text.HAlign = 'justify';
                        add(NL,text);
                        imgNL = Image(('corda.jpg'));
                        imgNL.Style = {Height('4cm'),HAlign('center')};
                        add(NL,imgNL);
                        NLcaption = Paragraph(['Fig. ' num2str(FIG) ' - Corda a strappo e centralina di acquisizione (fonte: Nesa Srl)']);
                        FIG = FIG+1;
                        NLcaption.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                        add(NL,NLcaption);
                        if activeEN == 1
                            text_ENG.HAlign = 'justify';
                            add(NL_ENG,text_ENG);
                            imgNL = Image(('corda.jpg'));
                            imgNL.Style = {Height('4cm'),HAlign('center')};
                            add(NL_ENG,imgNL);
                            NLcaption_ENG = Paragraph(['Fig. ' num2str(FIG_ENG) ' - Wire sensor and data logger (source: Nesa Srl']);
                            FIG_ENG = FIG_ENG+1;
                            NLcaption_ENG.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                            add(NL_ENG,NLcaption_ENG);
                        end
                        NW = 1;
                    end
                    break
                end
            else
                for aC = 1:dimC
                    if strcmp(colonna6{a, 1}{aC, 1},'Trigger Link') == 1
                        if NW == 0
                            NL = Section();
                        end
                        sezNL = Heading3('Trigger Link');
                        sezNL.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                        NL.Title = sezNL;
                        text = Paragraph(['La corda a strappo ' char(232) ' uno strumento di monitoraggio che viene installato in corrispondenza '...
                            'di un punto dove ' char(232) ' previsto il passaggio di una colata di detrito. La rottura del cavo segnala che il fenomeno '...
                            char(232) ' in atto e permette di allertare le autorit' char(224) ' preposte alla gestione del sito monitorato.']);
                        
                        %--ENG--
                        if activeEN == 1
                            if NW == 0
                                NL_ENG = Section();
                            end
                            sezNL_ENG = Heading3('Wire sensor');
                            sezNL_ENG.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                            NL_ENG.Title = sezNL_ENG;
                            text_ENG = Paragraph(['The wire sensor is a monitoring device installed in an area where the occurence of '...
                                'a debris flow is expected. The cut of the wire sensor indicates that the event is currently ongoing, and '...
                                'allows to send alert messages to authorities responsible of the monitored site.']);
                        end
                        if NW == 0
                            text.HAlign = 'justify';
                            add(NL,text);
                            imgNL = Image(('corda.jpg'));
                            imgNL.Style = {Height('4cm'),HAlign('center')};
                            add(NL,imgNL);
                            NLcaption = Paragraph(['Fig. ' num2str(FIG) ' - Corda a strappo e centralina di acquisizione (fonte: Nesa Srl)']);
                            FIG = FIG+1;
                            NLcaption.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                            add(NL,NLcaption);
                            if activeEN == 1
                                text_ENG.HAlign = 'justify';
                                add(NL_ENG,text_ENG);
                                imgNL = Image(('corda.jpg'));
                                imgNL.Style = {Height('4cm'),HAlign('center')};
                                add(NL_ENG,imgNL);
                                NLcaption_ENG = Paragraph(['Fig. ' num2str(FIG_ENG) ' - Wire sensor and data logger (source: Nesa Srl']);
                                FIG_ENG = FIG_ENG+1;
                                NLcaption_ENG.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                                add(NL_ENG,NLcaption_ENG);
                            end
                            NW = 1;
                        end
                        break
                    end
                end
            end
        end
        add(appendice,NL);
        if activeEN == 1
            add(appendice_ENG,NL_ENG);
        end
    end
end

% --- ASECam ---
if nCAM >= 1
    CM = 0;
    for a = 1:dim
        [dimC,~] = size(colonna6{a,1});
        if dimC == 1
            if strcmp(colonna6(a,1),'Camera') == 1
                if CM == 0
                    SCM = Section();
                end
                sezCM = Heading3('ASE Cam');
                sezCM.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                SCM.Title = sezCM;
                text = Paragraph(['ASECam ' char(232) ' una videocamera ad alta risoluzione, appositamente sviluppata per uso esterno, '...
                    ' in grado di acquisire immagini '...
                    'dell''area monitorata con cadenza periodica o al verificarsi di un evento critico.']);
                
                %--ENG--
                if activeEN == 1
                    if CM == 0
                        SCM_ENG = Section();
                    end
                    sezCM_ENG = Heading3('ASE Cam');
                    sezCM_ENG.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                    SCM_ENG.Title = sezCM_ENG;
                    text = Paragraph(['ASECam is a high resolution video camera, specifically developed for outdoor use. '...
                        'It is able to acquire images of the monitored area with '...
                        'a predefined sampling frequency, or at the occurrence of a critical event.']);
                end
                if CM == 0
                    text.HAlign = 'justify';
                    add(SCM,text);
                    imgCAM = Image(('ASECam.jpg'));
                    imgCAM.Style = {Height('4cm'),HAlign('center')};
                    add(SCM,imgCAM);
                    CAMcaption = Paragraph(['Fig. ' num2str(FIG) ' - Videocamera ASECam']);
                    FIG = FIG+1;
                    CAMcaption.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                    add(SCM,CAMcaption);
                    CM = 1;
                    if activeEN == 1
                        text_ENG.HAlign = 'justify';
                        add(SCM_ENG,text_ENG);
                        imgCAM = Image(('ASECam.jpg'));
                        imgCAM.Style = {Height('4cm'),HAlign('center')};
                        add(SCM_ENG,imgCAM);
                        CAMcaption_ENG = Paragraph(['Fig. ' num2str(FIG_ENG) ' - ASECam video camera']);
                        FIG_ENG = FIG_ENG+1;
                        CAMcaption_ENG.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                        add(SCM_ENG,CAMcaption_ENG);
                        CM = 1;
                    end
                end
                break
            end
        else
            for aC = 1:dimC
                if strcmp(colonna6{a, 1}{aC, 1},'Camera') == 1
                    if CM == 0
                        SCM = Section();
                    end
                    sezCM = Heading3('ASE Cam');
                    sezCM.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                    SCM.Title = sezCM;
                    text = Paragraph(['ASECam ' char(232) ' una videocamera ad alta risoluzione, appositamente sviluppata per uso esterno, '...
                        ' in grado di acquisire immagini '...
                        'dell''area monitorata con cadenza periodica o al verificarsi di un evento critico.']);
                    %--ENG--
                    if activeEN == 1
                        if CM == 0
                            SCM_ENG = Section();
                        end
                        sezCM_ENG = Heading3('ASE Cam');
                        sezCM_ENG.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                        SCM_ENG.Title = sezCM_ENG;
                        text = Paragraph(['ASECam is a high resolution video camera, specifically developed for outdoor use. '...
                            'It is able to acquire images of the monitored area with '...
                            'a predefined sampling frequency, or at the occurrence of a critical event.']);
                    end
                    if CM == 0
                        text.HAlign = 'justify';
                        add(SCM,text);
                        imgCAM = Image(('ASECam.jpg'));
                        imgCAM.Style = {Height('4cm'),HAlign('center')};
                        add(SCM,imgCAM);
                        CAMcaption = Paragraph(['Fig. ' num2str(FIG) ' - Videocamera ASECam']);
                        FIG = FIG+1;
                        CAMcaption.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                        add(SCM,CAMcaption);
                        if activeEN == 1
                            text_ENG.HAlign = 'justify';
                            add(SCM_ENG,text_ENG);
                            imgCAM = Image(('ASECam.jpg'));
                            imgCAM.Style = {Height('4cm'),HAlign('center')};
                            add(SCM_ENG,imgCAM);
                            CAMcaption_ENG = Paragraph(['Fig. ' num2str(FIG_ENG) ' - ASECam video camera']);
                            FIG_ENG = FIG_ENG+1;
                            CAMcaption_ENG.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                            add(SCM_ENG,CAMcaption_ENG);
                        end
                        CM = 1;
                    end
                    break
                end
            end
        end
    end
    add(appendice,SCM);
    if activeEN == 1
        add(appendice_ENG,SCM_ENG);
    end
end

% --- Weir Link ---
if sum(yesWL) >= 1
    WeirL = 0;
    for a = 1:dim
        [dimC,~] = size(colonna6{a,1});
        if dimC == 1
            if strcmp(colonna6(a,1),'Weir Link') == 1
                if WeirL == 0
                    WeirLE = Section();
                end
                sezWeirL = Heading3('Weir Link');
                sezWeirL.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                WeirLE.Title = sezWeirL;
                text = Paragraph(['Il sensore Weir Link ' char(232) ' un idrometro '...
                    'in grado di misurare l''altezza del livello d''acqua '...
                    'tramite un trasduttore finestrato a corda vibrante combinato con '...
                    'un contrappeso cilindrico sospeso.']);
                %--ENG--
                if activeEN == 1
                    if WeirL == 0
                        WeirLE_ENG = Section();
                    end
                    sezWeirL_ENG = Heading3('Weir Link');
                    sezWeirL_ENG.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                    WeirLE_ENG.Title = sezWeirL_ENG;
                    text_ENG = Paragraph(['Weir Link is a sensor that utilises a vented vibrating wire force '...
                        'transducer in combination with a cylindrical weight suspended '...
                        'from it to monitor water levels.']);
                end
                if WeirL == 0
                    text.HAlign = 'justify';
                    add(WeirLE,text);
                    imgWL = Image(('Weir.png'));
                    imgWL.Style = {Height('3.5cm'),HAlign('center')};
                    add(WeirLE,imgWL);
                    WeirLcaption = Paragraph(['Fig. ' num2str(FIG) ' - Sensore Weir Link']);
                    FIG = FIG+1;
                    WeirLcaption.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                    add(WeirLE,WeirLcaption);
                    if activeEN == 1
                        text_ENG.HAlign = 'justify';
                        add(WeirLE_ENG,text_ENG);
                        imgWL = Image(('Weir.png'));
                        imgWL.Style = {Height('3.5cm'),HAlign('center')};
                        add(WeirLE_ENG,imgWL);
                        WeirLcaption_ENG = Paragraph(['Fig. ' num2str(FIG_ENG) ' - Weir Link sensor']);
                        FIG_ENG = FIG_ENG+1;
                        WeirLcaption_ENG.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                        add(WeirLE_ENG,WeirLcaption_ENG);
                    end
                    WeirL = 1;
                end
                break
            end
        else
            for aC = 1:dimC
                if strcmp(colonna6{a, 1}{aC, 1},'Weir Link') == 1
                    if WeirL == 0
                        WeirLE = Section();
                    end
                    sezWeirL = Heading3('Weir Link');
                    sezWeirL.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                    WeirLE.Title = sezWeirL;
                    text = Paragraph(['Il sensore Weir Link ' char(232) ' un idrometro '...
                        'in grado di misurare l''altezza del livello d''acqua '...
                        'tramite un trasduttore finestrato a corda vibrante combinato con '...
                        'un contrappeso cilindrico sospeso.']);
                    %--ENG--
                    if activeEN == 1
                        if WeirL == 0
                            WeirLE_ENG = Section();
                        end
                        sezWeirL_ENG = Heading3('Weir Link');
                        sezWeirL_ENG.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                        WeirLE_ENG.Title = sezWeirL_ENG;
                        text_ENG = Paragraph(['Weir Link is a sensor that utilises a vented vibrating wire force '...
                            'transducer in combination with a cylindrical weight suspended '...
                            'from it to monitor water levels.']);
                    end
                    if WeirL == 0
                        text.HAlign = 'justify';
                        add(WeirLE,text);
                        imgWL = Image(('Weir.png'));
                        imgWL.Style = {Height('3.5cm'),HAlign('center')};
                        add(WeirLE,imgWL);
                        WeirLcaption = Paragraph(['Fig. ' num2str(FIG) ' - Sensore Weir Link']);
                        FIG = FIG+1;
                        WeirLcaption.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                        add(WeirLE,WeirLcaption);
                        if activeEN == 1
                            text_ENG.HAlign = 'justify';
                            add(WeirLE_ENG,text_ENG);
                            imgWL = Image(('Weir.png'));
                            imgWL.Style = {Height('3.5cm'),HAlign('center')};
                            add(WeirLE_ENG,imgWL);
                            WeirLcaption_ENG = Paragraph(['Fig. ' num2str(FIG_ENG) ' - Weir Link sensor']);
                            FIG_ENG = FIG_ENG+1;
                            WeirLcaption_ENG.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                            add(WeirLE_ENG,WeirLcaption_ENG);
                        end
                        WeirL = 1;
                    end
                    break
                end
            end
        end
    end
    add(appendice,WeirLE);
    if activeEN == 1
        add(appendice_ENG,WeirLE_ENG);
    end
end

% --- Pendulum ---
if sum(yesPE) >= 1
    PNDL = 0;
    for a = 1:dim
        [dimC,~] = size(colonna6{a,1});
        if dimC == 1
            if strcmp(colonna6(a,1),'Pendulum') == 1
                if PNDL == 0
                    PN = Section();
                end
                sezPendulum = Heading3('Pendolo');
                sezPendulum.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                PN.Title = sezPendulum;
                text = Paragraph(['Il pendolo ' char(232) ' un sensore '...
                    'per la misura degli spostamenti nel piano orizzontale, eseguita '...
                    'grazie a un filo verticale tensionato di cui viene registrata la '...
                    'posizione all''interno di un sistema di riferimento predefinito.']);
                %--ENG--
                if activeEN == 1
                    if PNDL == 0
                        PN_ENG = Section();
                    end
                    sezPendulum_ENG = Heading3('Pendulum');
                    sezPendulum_ENG.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                    PN_ENG.Title = sezPendulum_ENG;
                    text_ENG = Paragraph(['The Pendulum system is a sensor able to measure displacements '...
                        'eperienced by the structure in the horizontal plane. The working principle exploits a '...
                        'tensioned vertical wire, recording its position in a planar reference system.']);
                end
                if PNDL == 0
                    text.HAlign = 'justify';
                    add(PN,text);
                    imgPE = Image(('Pendulum.png'));
                    imgPE.Style = {Height('3.5cm'),HAlign('center')};
                    add(PN,imgPE);
                    Pendcaption = Paragraph(['Fig. ' num2str(FIG) ' - Pendolo']);
                    FIG = FIG+1;
                    Pendcaption.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                    add(PN,Pendcaption);
                    if activeEN == 1
                        text_ENG.HAlign = 'justify';
                        add(PN_ENG,text_ENG);
                        imgPE = Image(('Pendulum.png'));
                        imgPE.Style = {Height('3.5cm'),HAlign('center')};
                        add(PN_ENG,imgPE);
                        Pendcaption_ENG = Paragraph(['Fig. ' num2str(FIG_ENG) ' - Pendulum system']);
                        FIG_ENG = FIG_ENG+1;
                        Pendcaption_ENG.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                        add(PN_ENG,Pendcaption_ENG);
                    end
                    PNDL = 1;
                end
                break
            end
        else
            for aC = 1:dimC
                if strcmp(colonna6{a, 1}{aC, 1},'Pendulum') == 1
                    if PNDL == 0
                        PN = Section();
                    end
                    sezPendulum = Heading3('Pendolo');
                    sezPendulum.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                    PN.Title = sezPendulum;
                    text = Paragraph(['Il pendolo ' char(232) ' un sensore '...
                        'per la misura degli spostamenti nel piano orizzontale, eseguita '...
                        'grazie a un filo verticale tensionato di cui viene registrata la '...
                        'posizione all''interno di un sistema di riferimento predefinito.']);
                    %--ENG--
                    if activeEN == 1
                        if PNDL == 0
                            PN_ENG = Section();
                        end
                        sezPendulum_ENG = Heading3('Pendulum');
                        sezPendulum_ENG.Style = {OuterMargin('0in','0in','0.15in','0in'),FontSize(Font_tools),Bold(1),Italic(1)};
                        PN_ENG.Title = sezPendulum_ENG;
                        text_ENG = Paragraph(['The Pendulum system is a sensor able to measure displacements '...
                            'eperienced by the structure in the horizontal plane. The working principle exploits a '...
                            'tensioned vertical wire, recording its position in a planar reference system.']);
                    end
                    if PNDL == 0
                        text.HAlign = 'justify';
                        add(PN,text);
                        imgPE = Image(('Pendulum.png'));
                        imgPE.Style = {Height('3.5cm'),HAlign('center')};
                        add(PN,imgPE);
                        Pendcaption = Paragraph(['Fig. ' num2str(FIG) ' - Pendolo']);
                        FIG = FIG+1;
                        Pendcaption.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                        add(PN,Pendcaption);
                        if activeEN == 1
                            text_ENG.HAlign = 'justify';
                            add(PN_ENG,text_ENG);
                            imgPE = Image(('Pendulum.png'));
                            imgPE.Style = {Height('3.5cm'),HAlign('center')};
                            add(PN_ENG,imgPE);
                            Pendcaption_ENG = Paragraph(['Fig. ' num2str(FIG_ENG) ' - Pendulum system']);
                            FIG_ENG = FIG_ENG+1;
                            Pendcaption_ENG.Style = {HAlign('center'),FontSize(Font_caption),Italic(1),Color('midnightblue')};
                            add(PN_ENG,Pendcaption_ENG);
                        end
                        PNDL = 1;
                    end
                    break
                end
            end
        end
    end
    add(appendice,PN);
    if activeEN == 1
        add(appendice_ENG,PN_ENG);
    end
end

add(rpt,appendice);
template(rpt);
if activeEN == 1
    add(rpt_ENG,appendice_ENG);
    template(rpt_ENG);
end

text = 'report_appendix function executed correctly. report_appendix function closed';
fprintf(fileID,fmt,text);
fclose(fileID);

end