0 Members and 4 Guests are viewing this topic.
°S→A8While 1End!If Select(-1,Select({+S},*2/10Store())^5Store())Lbl Store→{A-2→A}ʳReturn
°S→A8While 1End!If Select(-1,{+S}-(Select(/5,Store())*5)Store())Lbl Store→{A-2→A}ʳReturn
Pt-On(C*9+1,D*9+1,Pic1)Pt-On(E*9+1,F*9+1,Pic1)Pt-On(G*9+1,H*9+1,Pic2)Pt-On(I*9+1,J*9+1,Pic2)Pt-On(K*9+1,L*9+1,Pic3)Pt-On(M*9+1,N*9+1,Pic3)Pt-On(O*9+1,P*9+1,Pic4)Pt-On(Q*9+1,R*9+1,Pic4)