Added GROUP, ZONE classes to handle Tasks and Zones

GROUP will be a class abstraction for the DCS Group class, incorporating
the Controller for tasks.

ZONE will be a class abstraction for a trigger zone.

Each of these classes will have properties to further emulate tasks, and
execute all kind of actions on the object.

Moose/Zone.lua

@@ -0,0 +1,57 @@
+--- ZONE Classes
+-- @classmod ZONE
+
+Include.File( "Routines" )
+Include.File( "Base" )
+Include.File( "Message" )
+
+ZONES = {}
+
+
+ZONE = {
+	ClassName="ZONE",
+	}
+	
+function ZONE:New( ZoneName )
+trace.f( self.ClassName, ZoneName )
+
+	local self = BASE:Inherit( self, BASE:New() )
+
+	local Zone = trigger.misc.getZone( ZoneName )
+	
+	if not Zone then
+		error( "Zone " .. ZoneName .. " does not exist." )
+		return nil
+	end
+	
+	self.Zone = Zone
+	self.ZoneName = ZoneName
+	
+	return self
+end
+
+function ZONE:GetRandomPoint()
+trace.f( self.ClassName, self.ZoneName )
+
+	local Point = {}
+
+	local Zone = trigger.misc.getZone( self.ZoneName )
+
+	Point.x = Zone.point.x + math.random( Zone.radius * -1, Zone.radius )
+	Point.y = Zone.point.z + math.random( Zone.radius * -1, Zone.radius )
+	
+	trace.i( self.ClassName, { Zone } )
+	trace.i( self.ClassName, { Point } )
+	
+	return Point
+end
+
+function ZONE:GetRadius()
+trace.f( self.ClassName, self.ZoneName )
+
+	local Zone = trigger.misc.getZone( self.ZoneName )
+
+	trace.i( self.ClassName, { Zone } )
+
+	return Zone.radius
+end