0 Members and 2 Guests are viewing this topic.
√((⌊A(1)-⌊A(3))²+(⌊A(2)-⌊A(4))²)→⌊A(5)For(X,0,1,1⌊A(1+X)-(((⌊A(1+X)>⌊A(3+X))-1)/2)abs(⌊A(1+X)-⌊A(3+X))/⌊A(5)→⌊A(1+X)End
√(A-B)²+(C-D)²→EFor(X,0,1)-((({2*X+°A->Q}rr>{Q+4}rr)-1)/2)*abs({Q}rr-{Q+4}rr)/E→{Q}rrEnd
Ported as close as possible and decently optimized. Uses A, B, C, D, E:Code: [Select]√(A-B)²+(C-D)²→EFor(X,0,1)-((({2*X+°A->Q}rr>{Q+4}rr)-1)/2)*abs({Q}rr-{Q+4}rr)/E→{Q}rrEndBut I agree with DeepThought -- writing code in BASIC first is NOT the way to go. It's like writing a game in C and trying to port it line by line to JavaScript. Not two flavors that go together well. The only thing that Axe and BASIC have in common is that they both use TIOS tokens -- past there, you pretty much have to start learning it as if it's a whole new language -- which it is.