'ProgramMode:RUN Locate 1,1,"LOADING CHUNK" ""->Str 1 (M-1)HW/J->D For 1->A To W Mat A[D+A,N->E I^J For 0->B To J-1 Ans/I Int (E/Ans->C E-CAns->E Str 1+StrMid(Str 9,C+1,1)->Str 1 Next Next