factor part of CBotEDoc::CalcShipOrders()
refactor colonization part in CBotEDoc::CalcShipOrders()