0 Members and 1 Guest are viewing this topic.
:Lbl 2:randInt(iPart(Xmin),iPart(Xmax))→A:randInt(iPart(Ymin),iPart(Ymax))→B:mean({Xmin,Xmax})→X:mean({Ymin,Ymax})→Y:Lbl 1:Pt-On(X,Y:Pt-On(A,B:If A≥Xmax or A≤Xmin or B≥Ymax or B≤Ymin:Goto 2:A→P:B→Q:If X>B:1→Z:If X>B:-1→Z:If Y>A:1→V:If Y>A:-1→V:A+Z→A:If (Y-B)=0:B+1→B:B+Vabs(((X-Z)-A)/(Y-B))→B:If √((A-P)²+(B-Q)²)≥200:Goto 2 //200 is how long a streak could be (max.):Line(A,B,P,Q:Goto 1
:If X>B:1→Z:If X>B:-1→Z:If Y>A:1→V:If Y>A:-1→V
Why do you want to convert everything to axe. Axe is not ment for these thing. Axe is a language especially for games.