Il codice è un po' lunghetto (10000 righe) quindi non posso postarlo.
Comunque in pratica è un sottoprocesso di un altro codice.