noon2/~SL.txt

14 lines
201 B
Plaintext
Executable File

'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