0 Members and 6 Guests are viewing this topic.
:.SPDORDER:Disp "Loading...:"vARMYOrdr→Str1:GetCalc(Str1)→θ:If θ=0:GetCalc(Str1,100)→θ:For(X,0,99:rand→{θ+X:End:End:conj(θ,L1,100:1→A:While A:0→A:For(X,0,99:If {L1+X}<{L1+X+1}:expr(L1+X,L1+X+1,1:1→A:End:End:End:1→A:Fill 0→{L2},100:For(X,0,99:{θ+X}→Z:For(Y,0,99:If Z={L1+Y}:(Y+1)→{L2+X}:End:End:End:For(X,0,99:Disp {L2+X}►Dec,i:Repeat getKey:End:End