sub main t=timemilli q=0 i=0 sol=0 cls print "Recherche..." while i<>-2 q=q+1 if q=9 then call dessin else r(q)=1 end if i=-1 while i=-1 if q<9 then s(q)=q+r(q) d(q)=q-r(q) i=1 p=q while i