private struct point
real x1
real y1
real z1
real x2
real y2
real z2
real d
real a
real b
real roll
real pitch
real yaw
method Dist takes nothing returns nothing
set .d=SquareRoot((.x2-.x1)*(.x2-.x1)+(.y2-.y1)*(.y2-.y1)+(.z2-.z1)*(.z2-.z1))
endmethod

method Rotation1 takes nothing returns nothing
set .x2=.x1+.d*CosBJ(.a)
set .y2=.y1+.d*SinBJ(.a)
set .z2=.z1
endmethod

method Rotation2 takes nothing returns nothing
call this.Dist()
set .x2=.x1+.d*CosBJ(.a)
set .y2=.y1+.d*SinBJ(.a)
set .z2=.z1
endmethod

method AxisX takes nothing returns nothing
call this.Dist()
set .b=Atan2(SquareRoot((.z2-.z1)*(.z2-.z1)+(.y2-.y1)*(.y2-.y1)),.x2-.x1)
set .x2=.x1+.d*Cos(.b)
set .y2=.y1+.d*Sin(.b)*SinBJ(.a)
set .z2=.z1+.d*Sin(.b)*CosBJ(.a)
endmethod

method AxisY takes nothing returns nothing
call this.Dist()
set .b=Atan2(SquareRoot((.x2-.x1)*(.x2-.x1)+(.z2-.z1)*(.z2-.z1)),.y2-.y1)
set .x2=.x1+.d*Sin(.b)*CosBJ(.a)
set .y2=.y1+.d*Cos(.b)
set .z2=.z1+.d*Sin(.b)*SinBJ(.a)
endmethod

method AxisZ takes nothing returns nothing
call this.Dist()
set .b=Atan2(SquareRoot((.x2-.x1)*(.x2-.x1)+(.y2-.y1)*(.y2-.y1)),.z2-.z1)
set .x2=.x1+.d*Sin(.b)*CosBJ(.a)
set .y2=.y1+.d*Sin(.b)*SinBJ(.a)
set .z2=.z1+.d*Cos(.b)
endmethod

method Plane takes nothing returns nothing
call this.Rotation2()
call this.AxisX()
call this.AxisZ()
endmethod
endstruct

private struct point
unit u
...
static point array Points

globals
	integer array struct_array
	integer struct_count = 0
endglobals

private struct point
unit u	// твой юнит
real x1
real y1
real z1
real x2
real y2
real z2
//...
endstruct
//..
function some takes nothing returns nothing
	local point p = 0
	local integer i = 0
	loop
		exitwhen i >= struct_count
		set p = struct_array[i]
		// действия с структурой
		// например
		if ( p.x1 > 1. ) then
			KillUnit(p.u)
		endif
		set i = i + 1
	endloop
endfunction