text: fix error in mainprog: initialized apsi