Non e` facile capire il tuo codice.
Non e` formattato in maniera umana (ad esempio indentazioni), ci sono piu` istruzioni sulla stessa riga, usa un carattere proporzionale.

Se provi a postarlo in maniera formattata, magari limitando ad una routine particolare ed inserendolo tra i tag [==code] ... [==/code] (senza ==) forse qualcuno puo` capirci qualcosa.