(return: _move:x,y,len,phi,cos,sin) o sub (not_a_subfile) # = #1 # = #2 # = #3 (=0 degrees) # = #4 (=1) # = #5 (=0 after rotation) # = #6 (=0 after rotation) o if [0] (for offsetting before rotation) # = [# + #] # = [# + #] o endif o call [0][0][#][#] # = #<_line:len> # = #<_line:phi> # = #<_line:cos> # = #<_line:sin> # = [# + # * # * COS[# + #]] # = [# + # * # * SIN[# + #]] o call [0][0][#][#] #<_move:len> = #<_line:len> #<_move:phi> = #<_line:phi> #<_move:cos> = #<_line:cos> #<_move:sin> = #<_line:sin> #<_move:x> = # #<_move:y> = # o endsub