From b829170121d3657369904ec62d8065606777a9ce Mon Sep 17 00:00:00 2001 From: Aki Date: Fri, 1 Oct 2021 18:54:04 +0200 Subject: Removed doxygen generated docs They can be rebuild anytime and are considered a build artifact/binary. --- .../html/_campaign_plan_event_8cpp_source.html | 1393 -------------------- 1 file changed, 1393 deletions(-) delete mode 100644 Doc/doxygen/html/_campaign_plan_event_8cpp_source.html (limited to 'Doc/doxygen/html/_campaign_plan_event_8cpp_source.html') diff --git a/Doc/doxygen/html/_campaign_plan_event_8cpp_source.html b/Doc/doxygen/html/_campaign_plan_event_8cpp_source.html deleted file mode 100644 index b0f8ba8..0000000 --- a/Doc/doxygen/html/_campaign_plan_event_8cpp_source.html +++ /dev/null @@ -1,1393 +0,0 @@ - - - - - -Starshatter_Open: D:/SRC/StarshatterSVN/Stars45/CampaignPlanEvent.cpp Source File - - - - - - - - - - - - - -
-
- - - - - - -
-
Starshatter_Open -
-
Open source Starshatter engine
-
-
- - - - - -
-
- -
-
-
- -
- - - - -
- -
- -
-
-
CampaignPlanEvent.cpp
-
-
-Go to the documentation of this file.
1 /* Project Starshatter 4.5
-
2  Destroyer Studios LLC
-
3  Copyright © 1997-2004. All Rights Reserved.
-
4 
-
5  SUBSYSTEM: Stars.exe
-
6  FILE: CampaignPlanEvent.cpp
-
7  AUTHOR: John DiCamillo
-
8 
-
9 
-
10  OVERVIEW
-
11  ========
-
12  CampaignPlanEvent generates simulated combat
-
13  events based on a statistical analysis of the
-
14  combatants within the context of a dynamic
-
15  campaign.
-
16 */
-
17 
-
18 #include "MemDebug.h"
-
19 #include "CampaignPlanEvent.h"
-
20 #include "Campaign.h"
-
21 #include "Combatant.h"
-
22 #include "CombatAction.h"
-
23 #include "CombatAssignment.h"
-
24 #include "CombatEvent.h"
-
25 #include "CombatGroup.h"
-
26 #include "CombatUnit.h"
-
27 #include "CombatZone.h"
-
28 #include "Mission.h"
-
29 #include "Random.h"
-
30 #include "Ship.h"
-
31 #include "ShipDesign.h"
-
32 #include "FormatUtil.h"
-
33 
-
34 // +--------------------------------------------------------------------+
-
35 
-
36 CampaignPlanEvent::CampaignPlanEvent(Campaign* c)
-
37 : CampaignPlan(c), event_time(0)
-
38 {
-
39  if (campaign) {
-
40  event_time = (int) campaign->GetTime();
-
41  }
-
42 }
-
43 
-
44 CampaignPlanEvent::~CampaignPlanEvent()
-
45 { }
-
46 
-
47 // +--------------------------------------------------------------------+
-
48 
-
49 void
-
50 CampaignPlanEvent::ExecFrame()
-
51 {
-
52  if (campaign && campaign->IsActive()) {
-
53  if (!campaign->GetPlayerGroup())
-
54  return;
-
55 
-
56  // once every twenty minutes is plenty:
-
57  if (Campaign::Stardate() - exec_time < 1200)
-
58  return;
-
59 
-
60  if (!ExecScriptedEvents())
-
61  ExecStatisticalEvents();
-
62 
-
63  exec_time = Campaign::Stardate();
-
64  event_time = (int) campaign->GetTime();
-
65  }
-
66 }
-
67 
-
68 void
-
69 CampaignPlanEvent::SetLockout(int seconds)
-
70 {
-
71  exec_time = Campaign::Stardate() + seconds;
-
72 }
-
73 
-
74 // +--------------------------------------------------------------------+
-
75 
-
76 bool
-
77 CampaignPlanEvent::ExecScriptedEvents()
-
78 {
-
79  bool scripted_event = false;
-
80 
-
81  if (campaign) {
-
82  ListIter<CombatAction> iter = campaign->GetActions();
-
83  while (++iter) {
-
84  CombatAction* action = iter.value();
-
85 
-
86  if (action->IsAvailable()) {
-
87 
-
88  switch (action->Type()) {
-
89  case CombatAction::COMBAT_EVENT:
-
90  {
-
91  CombatEvent* event = new(__FILE__,__LINE__)
-
92  CombatEvent(campaign,
-
93  action->Subtype(),
-
94  (int) campaign->GetTime(),
-
95  action->GetIFF(),
-
96  action->Source(),
-
97  action->Region());
-
98 
-
99  if (!event)
-
100  return false;
-
101 
-
102  event->SetTitle(action->GetText());
-
103 
-
104  if (*action->Filename() != 0)
-
105  event->SetFilename(action->Filename());
-
106 
-
107  if (*action->ImageFile() != 0)
-
108  event->SetImageFile(action->ImageFile());
-
109 
-
110  if (*action->SceneFile() != 0)
-
111  event->SetSceneFile(action->SceneFile());
-
112 
-
113  event->Load();
-
114 
-
115  ProsecuteKills(action);
-
116  campaign->GetEvents().append(event);
-
117 
-
118  action->FireAction();
-
119  scripted_event = true;
-
120 
-
121  if (action->Subtype() == CombatEvent::CAMPAIGN_END) {
-
122  ::Print(">>>>> CAMPAIGN %d END (Action %03d) <<<<<\n", campaign->GetCampaignId(), action->Identity());
-
123  campaign->SetStatus(Campaign::CAMPAIGN_SUCCESS);
-
124  }
-
125 
-
126  else if (action->Subtype() == CombatEvent::CAMPAIGN_FAIL) {
-
127  ::Print(">>>>> CAMPAIGN %d FAIL (Action %03d) <<<<<\n", campaign->GetCampaignId(), action->Identity());
-
128  campaign->SetStatus(Campaign::CAMPAIGN_FAILED);
-
129  }
-
130  }
-
131  break;
-
132 
-
133  case CombatAction::STRATEGIC_DIRECTIVE:
-
134  {
-
135  CombatGroup* g = campaign->FindGroup(action->GetIFF(),
-
136  action->AssetType(),
-
137  action->AssetId());
-
138 
-
139  if (g) {
-
140  g->SetStrategicDirection(action->GetText());
-
141  action->FireAction();
-
142  }
-
143  else {
-
144  action->FailAction();
-
145  }
-
146 
-
147  scripted_event = true;
-
148  }
-
149  break;
-
150 
-
151  case CombatAction::CAMPAIGN_SITUATION:
-
152  {
-
153  campaign->SetSituation(action->GetText());
-
154  action->FireAction();
-
155  scripted_event = true;
-
156  }
-
157  break;
-
158 
-
159  case CombatAction::CAMPAIGN_ORDERS:
-
160  {
-
161  campaign->SetOrders(action->GetText());
-
162  action->FireAction();
-
163  scripted_event = true;
-
164  }
-
165  break;
-
166 
-
167  case CombatAction::INTEL_EVENT:
-
168  {
-
169  CombatGroup* g = campaign->FindGroup(action->GetIFF(),
-
170  action->AssetType(),
-
171  action->AssetId());
-
172 
-
173  if (g) {
-
174  g->SetIntelLevel(action->Subtype());
-
175  action->FireAction();
-
176  }
-
177  else {
-
178  ::Print("WARNING: Action %d (intel level) Could not find group (IFF:%d, type:%d, id:%d)\n",
-
179  action->Identity(),
-
180  action->GetIFF(),
-
181  action->AssetType(),
-
182  action->AssetId());
-
183 
-
184  action->FailAction();
-
185  }
-
186 
-
187  scripted_event = true;
-
188  }
-
189  break;
-
190 
-
191  case CombatAction::ZONE_ASSIGNMENT:
-
192  {
-
193  CombatGroup* g = campaign->FindGroup(action->GetIFF(),
-
194  action->AssetType(),
-
195  action->AssetId());
-
196 
-
197  if (g) {
-
198  bool found = false;
-
199 
-
200  if (*action->Region()) {
-
201  CombatZone* zone = campaign->GetZone(action->Region());
-
202 
-
203  if (zone) {
-
204  g->SetAssignedZone(zone);
-
205  g->SetZoneLock(true);
-
206  found = true;
-
207 
-
208  // don't announce the move unless it's for the player's team:
-
209  if (action->GetIFF() == campaign->GetPlayerIFF() && _stricmp(action->GetText(), "do-not-display")) {
-
210  CombatEvent* event = new(__FILE__,__LINE__)
-
211  CombatEvent(campaign,
-
212  CombatEvent::MOVE_TO,
-
213  (int) campaign->GetTime(),
-
214  action->GetIFF(),
-
215  CombatEvent::FORCOM,
-
216  action->Region());
-
217 
-
218  if (!event)
-
219  return false;
-
220 
-
221  Text title = Text(g->Name()) + " Orders: Proceed to " + action->Region() + " Sector";
-
222  event->SetTitle(title);
-
223 
-
224  double eta = campaign->GetTime() + 3600;
-
225  eta -= fmod(eta, 1800);
-
226 
-
227  char text[64];
-
228  FormatDayTime(text, eta);
-
229 
-
230  Text info = "ORDERS:\n\nEffective immediately, ";
-
231  info += g->GetDescription();
-
232  info += " and all associated units shall proceed to ";
-
233  info += action->Region();
-
234  info += " sector and commence spaceborne operations in that area. ETA rendevous point ";
-
235  info += text;
-
236  info += ".\n\nFleet Admiral A. Evars FORCOM\nCommanding";
-
237 
-
238  event->SetInformation(info);
-
239 
-
240  if (*action->ImageFile() != 0)
-
241  event->SetImageFile(action->ImageFile());
-
242 
-
243  if (*action->SceneFile() != 0)
-
244  event->SetSceneFile(action->SceneFile());
-
245 
-
246  event->Load();
-
247  campaign->GetEvents().append(event);
-
248  }
-
249  }
-
250  }
-
251 
-
252  if (!found) {
-
253  ::Print("WARNING: Action %d Could not find assigned zone '%s' for '%s'\n",
-
254  action->Identity(),
-
255  action->Region() ? action->Region() : "NULL",
-
256  g->Name().data());
-
257 
-
258  g->SetAssignedZone(0);
-
259  }
-
260 
-
261  action->FireAction();
-
262  }
-
263  else {
-
264  ::Print("WARNING: Action %d (zone assignment) Could not find group (IFF:%d, type:%d, id:%d)\n",
-
265  action->Identity(),
-
266  action->GetIFF(),
-
267  action->AssetType(),
-
268  action->AssetId());
-
269 
-
270  action->FailAction();
-
271  }
-
272 
-
273  scripted_event = true;
-
274  }
-
275  break;
-
276 
-
277  case CombatAction::SYSTEM_ASSIGNMENT:
-
278  {
-
279  CombatGroup* g = campaign->FindGroup(action->GetIFF(),
-
280  action->AssetType(),
-
281  action->AssetId());
-
282 
-
283  if (g) {
-
284  bool found = false;
-
285 
-
286  if (*action->System()) {
-
287  Text system = action->System();
-
288 
-
289  if (campaign->GetSystem(system)) {
-
290  g->SetAssignedSystem(system);
-
291  found = true;
-
292 
-
293  // don't announce the move unless it's for the player's team:
-
294  if (action->GetIFF() == campaign->GetPlayerIFF() && _stricmp(action->GetText(), "do-not-display")) {
-
295  CombatEvent* event = new(__FILE__,__LINE__)
-
296  CombatEvent(campaign,
-
297  CombatEvent::MOVE_TO,
-
298  (int) campaign->GetTime(),
-
299  action->GetIFF(),
-
300  CombatEvent::FORCOM,
-
301  action->Region());
-
302 
-
303  if (!event)
-
304  return false;
-
305 
-
306  Text title = Text(g->Name()) + " Orders: Proceed to " + action->System() + " System";
-
307  event->SetTitle(title);
-
308 
-
309  double eta = campaign->GetTime() + 3600;
-
310  eta -= fmod(eta, 1800);
-
311 
-
312  char text[64];
-
313  FormatDayTime(text, eta);
-
314 
-
315  Text info = "ORDERS:\n\nEffective immediately, ";
-
316  info += g->GetDescription();
-
317  info += " and all associated units shall proceed to the ";
-
318  info += action->System();
-
319  info += " star system and commence spaceborne operations in that area. ETA rendevous point ";
-
320  info += text;
-
321  info += ".\n\nFleet Admiral A. Evars FORCOM\nCommanding";
-
322 
-
323  event->SetInformation(info);
-
324 
-
325  if (*action->ImageFile() != 0)
-
326  event->SetImageFile(action->ImageFile());
-
327 
-
328  if (*action->SceneFile() != 0)
-
329  event->SetSceneFile(action->SceneFile());
-
330 
-
331  event->Load();
-
332  campaign->GetEvents().append(event);
-
333  }
-
334  }
-
335  }
-
336 
-
337  if (!found) {
-
338  ::Print("WARNING: Action %d Could not find assigned system '%s' for '%s'\n",
-
339  action->Identity(),
-
340  action->System() ? action->System() : "NULL",
-
341  g->Name().data());
-
342 
-
343  g->SetAssignedSystem("");
-
344  }
-
345 
-
346  action->FireAction();
-
347  }
-
348  else {
-
349  ::Print("WARNING: Action %d (system assignment) Could not find group (IFF:%d, type:%d, id:%d)\n",
-
350  action->Identity(),
-
351  action->GetIFF(),
-
352  action->AssetType(),
-
353  action->AssetId());
-
354 
-
355  action->FailAction();
-
356  }
-
357 
-
358  scripted_event = true;
-
359  }
-
360  break;
-
361 
-
362  case CombatAction::NO_ACTION:
-
363  action->FireAction();
-
364  scripted_event = true;
-
365  break;
-
366 
-
367  default:
-
368  break;
-
369  }
-
370  }
-
371  }
-
372  }
-
373 
-
374  return scripted_event;
-
375 }
-
376 
-
377 // +--------------------------------------------------------------------+
-
378 
-
379 void
-
380 CampaignPlanEvent::ProsecuteKills(CombatAction* action)
-
381 {
-
382  if (action->AssetKills().size() > 0) {
-
383  CombatGroup* g = campaign->FindGroup(action->GetIFF(),
-
384  action->AssetType(),
-
385  action->AssetId());
-
386 
-
387  if (g) {
-
388  ListIter<Text> iter = action->AssetKills();
-
389  while (++iter) {
-
390  Text* name = iter.value();
-
391  CombatUnit* asset = g->FindUnit(*name);
-
392 
-
393  if (asset) {
-
394  int value_killed = asset->Kill(1);
-
395 
-
396  ListIter<Combatant> iter = campaign->GetCombatants();
-
397  while (++iter) {
-
398  Combatant* c = iter.value();
-
399  if (c->GetIFF() > 0 && c->GetIFF() != asset->GetIFF()) {
-
400  // damage to neutral assets must be scored to bad guys:
-
401  if (asset->GetIFF() > 0 || c->GetIFF() > 1) {
-
402  c->AddScore(value_killed);
-
403  break;
-
404  }
-
405  }
-
406  }
-
407  }
-
408  }
-
409  }
-
410  }
-
411 
-
412  if (action->TargetKills().size() > 0) {
-
413  CombatGroup* g = campaign->FindGroup(action->TargetIFF(),
-
414  action->TargetType(),
-
415  action->TargetId());
-
416 
-
417  if (g) {
-
418  ListIter<Text> iter = action->TargetKills();
-
419  while (++iter) {
-
420  Text* name = iter.value();
-
421  CombatUnit* target = g->FindUnit(*name);
-
422 
-
423  if (target) {
-
424  int value_killed = target->Kill(1);
-
425 
-
426  ListIter<Combatant> iter = campaign->GetCombatants();
-
427  while (++iter) {
-
428  Combatant* c = iter.value();
-
429  if (c->GetIFF() > 0 && c->GetIFF() != target->GetIFF()) {
-
430  // damage to neutral assets must be scored to bad guys:
-
431  if (target->GetIFF() > 0 || c->GetIFF() > 1) {
-
432  c->AddScore(value_killed);
-
433  break;
-
434  }
-
435  }
-
436  }
-
437  }
-
438  }
-
439  }
-
440  }
-
441 }
-
442 
-
443 // +--------------------------------------------------------------------+
-
444 
-
445 bool
-
446 CampaignPlanEvent::ExecStatisticalEvents()
-
447 {
-
448  bool result = false;
-
449 
-
450  if (campaign) {
-
451  ListIter<Combatant> iter = campaign->GetCombatants();
-
452  while (++iter && !result) {
-
453  Combatant* c = iter.value();
-
454  CombatAssignment* a = ChooseAssignment(c->GetForce());
-
455 
-
456  // prefer assignments not in player's zone:
-
457  if (a) {
-
458  CombatGroup* objective = a->GetObjective();
-
459  CombatGroup* player = campaign->GetPlayerGroup();
-
460 
-
461  if (objective && player &&
-
462  objective->GetCurrentZone() == player->GetCurrentZone())
-
463  a = ChooseAssignment(c->GetForce());
-
464  }
-
465 
-
466  if (a) {
-
467  result = CreateEvent(a);
-
468  }
-
469  }
-
470  }
-
471 
-
472  return result;
-
473 }
-
474 
-
475 // +--------------------------------------------------------------------+
-
476 
-
477 bool
-
478 CampaignPlanEvent::CreateEvent(CombatAssignment* a)
-
479 {
-
480  CombatEvent* event = 0;
-
481 
-
482  if (campaign && a && a->GetResource() && RandomChance(1,2)) {
-
483  event_time = (int) Random(event_time, campaign->GetTime());
-
484 
-
485  CombatGroup* group = a->GetResource();
-
486 
-
487  if (group == campaign->GetPlayerGroup()) {
-
488 
-
489  if (group->Type() == CombatGroup::DESTROYER_SQUADRON ||
-
490  group->Type() == CombatGroup::BATTLE_GROUP ||
-
491  group->Type() == CombatGroup::CARRIER_GROUP) {
-
492 
-
493  return false;
-
494  }
-
495  }
-
496 
-
497  CombatGroup* target = a->GetObjective();
-
498 
-
499  if (target && target == campaign->GetPlayerGroup()) {
-
500 
-
501  if (target->Type() == CombatGroup::DESTROYER_SQUADRON ||
-
502  target->Type() == CombatGroup::BATTLE_GROUP ||
-
503  target->Type() == CombatGroup::CARRIER_GROUP) {
-
504 
-
505  return false;
-
506  }
-
507  }
-
508 
-
509  switch (a->Type()) {
-
510  case Mission::DEFEND:
-
511  event = CreateEventDefend(a);
-
512  break;
-
513 
-
514  case Mission::ASSAULT:
-
515  if (group->IsStarshipGroup())
-
516  event = CreateEventStarship(a);
-
517  else
-
518  event = CreateEventFighterAssault(a);
-
519  break;
-
520 
-
521  case Mission::STRIKE:
-
522  if (group->IsStarshipGroup())
-
523  event = CreateEventStarship(a);
-
524  else
-
525  event = CreateEventFighterStrike(a);
-
526  break;
-
527 
-
528  case Mission::SWEEP:
-
529  event = CreateEventFighterSweep(a);
-
530  break;
-
531  }
-
532 
-
533  if (event) {
-
534  campaign->GetEvents().append(event);
-
535  return true;
-
536  }
-
537  }
-
538 
-
539  return false;
-
540 }
-
541 
-
542 // +--------------------------------------------------------------------+
-
543 
-
544 static void FindAssignments(CombatGroup* g, List<CombatAssignment>& alist)
-
545 {
-
546  if (!g) return;
-
547 
-
548  alist.append(g->GetAssignments());
-
549 
-
550  ListIter<CombatGroup> iter = g->GetComponents();
-
551  while (++iter)
-
552  FindAssignments(iter.value(), alist);
-
553 }
-
554 
-
555 CombatAssignment*
-
556 CampaignPlanEvent::ChooseAssignment(CombatGroup* g)
-
557 {
-
558  List<CombatAssignment> alist;
-
559  FindAssignments(g, alist);
-
560 
-
561  int tries = 5;
-
562 
-
563  if (alist.size() > 0) {
-
564  while (tries-- > 0) {
-
565  int index = (int) Random(0, alist.size());
-
566 
-
567  if (index >= alist.size())
-
568  index = 0;
-
569 
-
570  CombatAssignment* a = alist[index];
-
571 
-
572  if (!a) continue;
-
573 
-
574  CombatGroup* resource = a->GetResource();
-
575  CombatGroup* objective = a->GetObjective();
-
576 
-
577  if (!resource || !objective)
-
578  continue;
-
579 
-
580  if (resource->IsReserve() || objective->IsReserve())
-
581  continue;
-
582 
-
583  if (resource->CalcValue() < 50 || objective->CalcValue() < 50)
-
584  continue;
-
585 
-
586  if (resource == campaign->GetPlayerGroup() || objective == campaign->GetPlayerGroup())
-
587  continue;
-
588 
-
589  return a;
-
590  }
-
591  }
-
592 
-
593  return 0;
-
594 }
-
595 
-
596 // +--------------------------------------------------------------------+
-
597 
-
598 CombatEvent*
-
599 CampaignPlanEvent::CreateEventDefend(CombatAssignment* a)
-
600 {
-
601  bool friendly = IsFriendlyAssignment(a);
-
602 
-
603  if (!friendly)
-
604  return 0;
-
605 
-
606  CombatEvent* event = 0;
-
607  CombatGroup* group = a->GetResource();
-
608  CombatGroup* obj = a->GetObjective();
-
609  CombatUnit* unit = group->GetRandomUnit();
-
610  CombatUnit* tgt = obj->GetRandomUnit();
-
611 
-
612  if (!unit || !tgt)
-
613  return 0;
-
614 
-
615  bool success = Success(a);
-
616  Text rgn = group->GetRegion();
-
617  Text title = Text(group->Name()) + " in Defensive Engagement";
-
618  Text info;
-
619 
-
620  event = new(__FILE__,__LINE__) CombatEvent(campaign,
-
621  CombatEvent::DEFEND,
-
622  event_time,
-
623  group->GetIFF(),
-
624  CombatEvent::TACNET,
-
625  rgn);
-
626 
-
627  if (!event)
-
628  return 0;
-
629 
-
630  int tgt_count = 0;
-
631  int unit_count = 0;
-
632 
-
633  if (!success) {
-
634  if (tgt) {
-
635  if (tgt->Kill(1) > 0)
-
636  tgt_count++;
-
637  Combatant* c = group->GetCombatant();
-
638  if (c) c->AddScore(tgt->GetSingleValue());
-
639  }
-
640 
-
641  if (unit && RandomChance(1,5)) {
-
642  if (unit->Kill(1) > 0)
-
643  unit_count++;
-
644  Combatant* c = obj->GetCombatant();
-
645  if (c) c->AddScore(unit->GetSingleValue());
-
646  }
-
647  }
-
648 
-
649  CombatGroup* us = group;
-
650  CombatGroup* them = obj;
-
651  int us_count = unit_count;
-
652  int them_count = tgt_count;
-
653 
-
654  if (obj->IsStrikeTarget()) {
-
655  info = Text("EVENT: ") + rgn + " Sector\n\n";
-
656  }
-
657 
-
658  else {
-
659  info = Text("MISSION: Escort ") + obj->Name() + ", " + rgn + " Sector\n\n";
-
660  }
-
661 
-
662  info += GetTeamName(group);
-
663  info += Text(" ") + group->GetDescription();
-
664 
-
665  if (success)
-
666  info += " successfully defended ";
-
667  else
-
668  info += " was unable to defend ";
-
669 
-
670  info += GetTeamName(obj);
-
671  info += Text(" ") + obj->GetDescription() + ".\n\n";
-
672 
-
673  // need to find an enemy group to do the attacking...
-
674 
-
675  event->SetTitle(title);
-
676  event->SetInformation(info);
-
677  return event;
-
678 }
-
679 
-
680 // +--------------------------------------------------------------------+
-
681 
-
682 CombatEvent*
-
683 CampaignPlanEvent::CreateEventFighterAssault(CombatAssignment* a)
-
684 {
-
685  CombatEvent* event = 0;
-
686  CombatGroup* group = a->GetResource();
-
687  CombatGroup* obj = a->GetObjective();
-
688  CombatUnit* unit = group->GetRandomUnit();
-
689  CombatUnit* tgt = obj->GetRandomUnit();
-
690 
-
691  if (!unit || !tgt)
-
692  return 0;
-
693 
-
694  bool success = Success(a);
-
695  Text rgn = group->GetRegion();
-
696  Text title = Text(group->Name());
-
697  Text info;
-
698 
-
699  event = new(__FILE__,__LINE__) CombatEvent(campaign,
-
700  CombatEvent::ATTACK,
-
701  event_time,
-
702  group->GetIFF(),
-
703  CombatEvent::TACNET,
-
704  rgn);
-
705 
-
706  if (!event)
-
707  return 0;
-
708 
-
709  title += Text(" Assault ") + obj->Name();
-
710 
-
711  int tgt_count = 0;
-
712  int unit_count = 0;
-
713 
-
714  if (success) {
-
715  if (tgt) {
-
716  int killed = tgt->Kill(1 + tgt->Count()/2);
-
717  if (killed > 0)
-
718  tgt_count += killed / tgt->GetSingleValue();
-
719  Combatant* c = group->GetCombatant();
-
720  if (c) c->AddScore(tgt->GetSingleValue());
-
721  }
-
722 
-
723  if (unit && RandomChance(1,5)) {
-
724  if (unit->Kill(1) > 0)
-
725  unit_count++;
-
726  Combatant* c = obj->GetCombatant();
-
727  if (c) c->AddScore(unit->GetSingleValue());
-
728  }
-
729  }
-
730  else {
-
731  for (int i = 0; i < 2; i++) {
-
732  if (unit && RandomChance(1,4)) {
-
733  if (unit->Kill(1) > 0)
-
734  unit_count++;
-
735  Combatant* c = obj->GetCombatant();
-
736  if (c) c->AddScore(unit->GetSingleValue());
-
737  }
-
738  }
-
739  }
-
740 
-
741  CombatGroup* us = group;
-
742  CombatGroup* them = obj;
-
743  int us_count = unit_count;
-
744  int them_count = tgt_count;
-
745 
-
746  bool friendly = IsFriendlyAssignment(a);
-
747 
-
748  if (friendly) {
-
749  info = Text("MISSION: Strike, ") + rgn + " Sector\n\n";
-
750  }
-
751 
-
752  else {
-
753  info = Text("EVENT: ") + rgn + " Sector\n\n";
-
754 
-
755  us = obj;
-
756  them = group;
-
757  us_count = tgt_count;
-
758  them_count = unit_count;
-
759  }
-
760 
-
761  info += GetTeamName(group);
-
762  info += Text(" ") + group->GetDescription();
-
763 
-
764  if (success)
-
765  info += " successfully assault ";
-
766  else if (!friendly)
-
767  info += " assault averted against ";
-
768  else
-
769  info += " attempted assault on ";
-
770 
-
771  info += GetTeamName(obj);
-
772  info += Text(" ") + obj->GetDescription() + ".\n\n";
-
773 
-
774  char text[256];
-
775 
-
776  if (them_count) {
-
777  if (friendly) {
-
778  if (them_count > 1)
-
779  sprintf_s(text, "ENEMY KILLED:\t %d %s destroyed\n", them_count, tgt->Name().data());
-
780  else
-
781  sprintf_s(text, "ENEMY KILLED:\t %s destroyed\n", tgt->Name().data());
-
782  } else {
-
783  sprintf_s(text, "ENEMY KILLED:\t %d %s destroyed\n", them_count, them->Name().data());
-
784  }
-
785 
-
786  info += text;
-
787  } else {
-
788  info += "ENEMY KILLED:\t 0\n";
-
789  }
-
790 
-
791  if (us_count) {
-
792  if (!friendly)
-
793  sprintf_s(text, "ALLIED LOSSES:\t %s destroyed\n", tgt->Name().data());
-
794  else
-
795  sprintf_s(text, "ALLIED LOSSES:\t %d %s destroyed", us_count, us->Name().data());
-
796 
-
797  info += text;
-
798  }
-
799  else {
-
800  info += "ALLIED LOSSES:\t 0";
-
801  }
-
802 
-
803 
-
804  event->SetTitle(title);
-
805  event->SetInformation(info);
-
806  return event;
-
807 }
-
808 
-
809 // +--------------------------------------------------------------------+
-
810 
-
811 CombatEvent*
-
812 CampaignPlanEvent::CreateEventFighterStrike(CombatAssignment* a)
-
813 {
-
814  CombatEvent* event = 0;
-
815  CombatGroup* group = a->GetResource();
-
816  CombatGroup* obj = a->GetObjective();
-
817  CombatUnit* unit = group->GetRandomUnit();
-
818  CombatUnit* tgt = obj->GetRandomUnit();
-
819 
-
820  if (!unit || !tgt)
-
821  return 0;
-
822 
-
823  bool success = Success(a);
-
824  Text rgn = group->GetRegion();
-
825  Text title = Text(group->Name());
-
826  Text info;
-
827 
-
828  event = new(__FILE__,__LINE__) CombatEvent(campaign,
-
829  CombatEvent::ATTACK,
-
830  event_time,
-
831  group->GetIFF(),
-
832  CombatEvent::TACNET,
-
833  rgn);
-
834 
-
835  if (!event)
-
836  return 0;
-
837 
-
838  if (unit)
-
839  title += Text(" ") + unit->GetDesign()->abrv + "s";
-
840 
-
841  if (success) {
-
842  title += " Successfully Strike " + obj->Name();
-
843  }
-
844  else {
-
845  title += " Attempt Strike on " + obj->Name();
-
846  }
-
847 
-
848  int tgt_count = 0;
-
849  int unit_count = 0;
-
850 
-
851  if (success) {
-
852  if (tgt) {
-
853  int killed = tgt->Kill(1 + tgt->Count()/2);
-
854  if (killed > 0)
-
855  tgt_count += killed / tgt->GetSingleValue();
-
856  Combatant* c = group->GetCombatant();
-
857  if (c) c->AddScore(tgt->GetSingleValue());
-
858  }
-
859 
-
860  if (unit && RandomChance(1,5)) {
-
861  if (unit->Kill(1) > 0)
-
862  unit_count++;
-
863  Combatant* c = obj->GetCombatant();
-
864  if (c) c->AddScore(unit->GetSingleValue());
-
865  }
-
866  }
-
867  else {
-
868  for (int i = 0; i < 2; i++) {
-
869  if (unit && RandomChance(1,4)) {
-
870  if (unit->Kill(1) > 0)
-
871  unit_count++;
-
872  Combatant* c = obj->GetCombatant();
-
873  if (c) c->AddScore(unit->GetSingleValue());
-
874  }
-
875  }
-
876  }
-
877 
-
878  CombatGroup* us = group;
-
879  CombatGroup* them = obj;
-
880  int us_count = unit_count;
-
881  int them_count = tgt_count;
-
882 
-
883  bool friendly = IsFriendlyAssignment(a);
-
884 
-
885  if (friendly) {
-
886  info = Text("MISSION: Strike, ") + rgn + " Sector\n\n";
-
887  }
-
888 
-
889  else {
-
890  info = Text("EVENT: ") + rgn + " Sector\n\n";
-
891 
-
892  us = obj;
-
893  them = group;
-
894  us_count = tgt_count;
-
895  them_count = unit_count;
-
896  }
-
897 
-
898  info += GetTeamName(group);
-
899  info += Text(" ") + group->GetDescription();
-
900 
-
901  if (success)
-
902  info += " successfully strike ";
-
903  else if (!friendly)
-
904  info += " strike against ";
-
905  else
-
906  info += " attempted strike on ";
-
907 
-
908  info += GetTeamName(obj);
-
909  info += Text(" ") + obj->GetDescription();
-
910 
-
911  if (!success && !friendly)
-
912  info += " averted.\n\n";
-
913  else
-
914  info += ".\n\n";
-
915 
-
916  char text[256];
-
917 
-
918  if (them_count) {
-
919  if (friendly) {
-
920  if (them_count > 1)
-
921  sprintf_s(text, "ENEMY KILLED:\t %d %s destroyed\n", them_count, tgt->Name().data());
-
922  else
-
923  sprintf_s(text, "ENEMY KILLED:\t %s destroyed\n", tgt->Name().data());
-
924  } else {
-
925  sprintf_s(text, "ENEMY KILLED:\t %d %s destroyed\n", them_count, them->Name().data());
-
926  }
-
927 
-
928  info += text;
-
929  } else {
-
930  info += "ENEMY KILLED:\t 0\n";
-
931  }
-
932 
-
933  if (us_count) {
-
934  if (!friendly)
-
935  sprintf_s(text, "ALLIED LOSSES:\t %s destroyed\n", tgt->Name().data());
-
936  else
-
937  sprintf_s(text, "ALLIED LOSSES:\t %d %s destroyed", us_count, us->Name().data());
-
938 
-
939  info += text;
-
940  } else {
-
941  info += "ALLIED LOSSES:\t 0";
-
942  }
-
943 
-
944  event->SetTitle(title);
-
945  event->SetInformation(info);
-
946  return event;
-
947 }
-
948 
-
949 // +--------------------------------------------------------------------+
-
950 
-
951 CombatEvent*
-
952 CampaignPlanEvent::CreateEventFighterSweep(CombatAssignment* a)
-
953 {
-
954  CombatEvent* event = 0;
-
955  CombatGroup* group = a->GetResource();
-
956  CombatGroup* obj = a->GetObjective();
-
957  CombatUnit* unit = group->GetRandomUnit();
-
958  CombatUnit* tgt = obj->GetRandomUnit();
-
959 
-
960  if (!unit || !tgt)
-
961  return 0;
-
962 
-
963  bool success = Success(a);
-
964  Text rgn = group->GetRegion();
-
965  Text title = Text(group->Name());
-
966  Text info;
-
967 
-
968  event = new(__FILE__,__LINE__) CombatEvent(campaign,
-
969  CombatEvent::ATTACK,
-
970  event_time,
-
971  group->GetIFF(),
-
972  CombatEvent::TACNET,
-
973  rgn);
-
974 
-
975  if (!event)
-
976  return 0;
-
977 
-
978  if (unit)
-
979  title += Text(" ") + unit->GetDesign()->abrv + "s";
-
980  else
-
981  title += " Fighters";
-
982 
-
983  if (RandomChance(1, 4)) title += " Clash with ";
-
984  else if (RandomChance(1, 4)) title += " Engage ";
-
985  else if (RandomChance(1, 4)) title += " Intercept ";
-
986  else title += " Encounter ";
-
987 
-
988  title += obj->Name();
-
989 
-
990  int tgt_count = 0;
-
991  int unit_count = 0;
-
992 
-
993  if (success) {
-
994  for (int i = 0; i < 2; i++) {
-
995  if (tgt && RandomChance(3,4)) {
-
996  if (tgt->Kill(1) > 0)
-
997  tgt_count++;
-
998  Combatant* c = group->GetCombatant();
-
999  if (c) c->AddScore(tgt->GetSingleValue());
-
1000  }
-
1001  }
-
1002 
-
1003  if (tgt_count > 1) {
-
1004  if (tgt && RandomChance(1,4)) {
-
1005  if (tgt->Kill(1) > 0)
-
1006  tgt_count++;
-
1007  Combatant* c = group->GetCombatant();
-
1008  if (c) c->AddScore(tgt->GetSingleValue());
-
1009  }
-
1010  }
-
1011 
-
1012  else {
-
1013  if (unit && RandomChance(1,5)) {
-
1014  if (unit->Kill(1) > 0)
-
1015  unit_count++;
-
1016  Combatant* c = obj->GetCombatant();
-
1017  if (c) c->AddScore(unit->GetSingleValue());
-
1018  }
-
1019  }
-
1020  }
-
1021  else {
-
1022  for (int i = 0; i < 2; i++) {
-
1023  if (unit && RandomChance(3,4)) {
-
1024  if (unit->Kill(1) > 0)
-
1025  unit_count++;
-
1026  Combatant* c = obj->GetCombatant();
-
1027  if (c) c->AddScore(unit->GetSingleValue());
-
1028  }
-
1029  }
-
1030 
-
1031  if (tgt && RandomChance(1,4)) {
-
1032  if (tgt->Kill(1) > 0)
-
1033  tgt_count++;
-
1034  Combatant* c = group->GetCombatant();
-
1035  if (c) c->AddScore(tgt->GetSingleValue());
-
1036  }
-
1037  }
-
1038 
-
1039  CombatGroup* us = group;
-
1040  CombatGroup* them = obj;
-
1041  int us_count = unit_count;
-
1042  int them_count = tgt_count;
-
1043 
-
1044  bool friendly = IsFriendlyAssignment(a);
-
1045 
-
1046  if (!friendly) {
-
1047  us = obj;
-
1048  them = group;
-
1049  us_count = tgt_count;
-
1050  them_count = unit_count;
-
1051  }
-
1052 
-
1053  if (friendly) {
-
1054  if (RandomChance())
-
1055  info = Text("MISSION: OCA Sweep, ") + rgn + " Sector\n\n";
-
1056  else
-
1057  info = Text("MISSION: FORCAP, ") + rgn + " Sector\n\n";
-
1058 
-
1059  info += GetTeamName(group);
-
1060  info += Text(" ") + group->GetDescription();
-
1061  info += Text(" engaged ") + GetTeamName(obj);
-
1062  info += Text(" ") + obj->GetDescription() + ".\n\n";
-
1063  }
-
1064  else {
-
1065  info = Text("MISSION: Patrol, ") + rgn + " Sector\n\n";
-
1066 
-
1067  info += GetTeamName(obj);
-
1068  info += Text(" ") + obj->GetDescription();
-
1069  info += Text(" engaged ") + GetTeamName(group);
-
1070  info += Text(" ") + group->GetDescription() + ".\n\n";
-
1071  }
-
1072 
-
1073  char text[256];
-
1074 
-
1075  if (them_count) {
-
1076  sprintf_s(text, "ENEMY KILLED:\t %d %s destroyed\n", them_count, them->Name().data());
-
1077 
-
1078  info += text;
-
1079  } else {
-
1080  info += "ENEMY KILLED:\t 0\n";
-
1081  }
-
1082 
-
1083  if (us_count) {
-
1084  sprintf_s(text, "ALLIED LOSSES:\t %d %s destroyed", us_count, us->Name().data());
-
1085  info += text;
-
1086  } else {
-
1087  info += "ALLIED LOSSES:\t 0";
-
1088  }
-
1089 
-
1090  event->SetTitle(title);
-
1091  event->SetInformation(info);
-
1092  return event;
-
1093 }
-
1094 
-
1095 // +--------------------------------------------------------------------+
-
1096 
-
1097 CombatEvent*
-
1098 CampaignPlanEvent::CreateEventStarship(CombatAssignment* a)
-
1099 {
-
1100  CombatEvent* event = 0;
-
1101  CombatGroup* group = a->GetResource();
-
1102  CombatGroup* obj = a->GetObjective();
-
1103  CombatUnit* unit = group->GetRandomUnit();
-
1104  CombatUnit* tgt = obj->GetRandomUnit();
-
1105 
-
1106  if (!unit || !tgt)
-
1107  return 0;
-
1108 
-
1109  bool success = Success(a);
-
1110  Text rgn = group->GetRegion();
-
1111  Text title = Text(group->Name());
-
1112  Text info;
-
1113 
-
1114  event = new(__FILE__,__LINE__) CombatEvent(campaign,
-
1115  CombatEvent::ATTACK,
-
1116  event_time,
-
1117  group->GetIFF(),
-
1118  CombatEvent::TACNET,
-
1119  group->GetRegion());
-
1120 
-
1121  if (!event)
-
1122  return 0;
-
1123 
-
1124  title += Text(" Assaults ") + a->GetObjective()->Name();
-
1125 
-
1126  int tgt_count = 0;
-
1127  int unit_count = 0;
-
1128 
-
1129  if (success) {
-
1130  if (tgt) {
-
1131  if (tgt->Kill(1) > 0)
-
1132  tgt_count++;
-
1133  Combatant* c = group->GetCombatant();
-
1134  if (c) c->AddScore(tgt->GetSingleValue());
-
1135  }
-
1136 
-
1137  if (unit && RandomChance(1,5)) {
-
1138  if (unit->Kill(1) > 0)
-
1139  unit_count++;
-
1140  Combatant* c = obj->GetCombatant();
-
1141  if (c) c->AddScore(unit->GetSingleValue());
-
1142  }
-
1143  }
-
1144  else {
-
1145  for (int i = 0; i < 2; i++) {
-
1146  if (unit && RandomChance(1,4)) {
-
1147  if (unit->Kill(1) > 0)
-
1148  unit_count++;
-
1149  Combatant* c = obj->GetCombatant();
-
1150  if (c) c->AddScore(unit->GetSingleValue());
-
1151  }
-
1152  }
-
1153  }
-
1154 
-
1155  CombatGroup* us = group;
-
1156  CombatGroup* them = obj;
-
1157  int us_count = unit_count;
-
1158  int them_count = tgt_count;
-
1159 
-
1160  bool friendly = IsFriendlyAssignment(a);
-
1161 
-
1162  if (friendly) {
-
1163  info = Text("MISSION: Fleet Action, ") + rgn + " Sector\n\n";
-
1164  }
-
1165 
-
1166  else {
-
1167  info = Text("EVENT: ") + rgn + " Sector\n\n";
-
1168 
-
1169  us = obj;
-
1170  them = group;
-
1171  us_count = tgt_count;
-
1172  them_count = unit_count;
-
1173  }
-
1174 
-
1175  info += GetTeamName(group);
-
1176  info += Text(" ") + group->GetDescription();
-
1177 
-
1178  if (success)
-
1179  info += " successfully assaulted ";
-
1180  else if (!friendly)
-
1181  info += " assault against ";
-
1182  else
-
1183  info += " attempted assault on ";
-
1184 
-
1185  info += GetTeamName(obj);
-
1186  info += Text(" ") + obj->GetDescription();
-
1187 
-
1188  if (!success && !friendly)
-
1189  info += " failed.\n\n";
-
1190  else
-
1191  info += ".\n\n";
-
1192 
-
1193  char text[256];
-
1194 
-
1195  if (them_count) {
-
1196  if (friendly) {
-
1197  if (tgt->Count() > 1) {
-
1198  sprintf_s(text, "ENEMY KILLED:\t %d %s destroyed\n", them_count, tgt->Name().data());
-
1199  } else {
-
1200  sprintf_s(text, "ENEMY KILLED:\t %s destroyed\n", tgt->Name().data());
-
1201  }
-
1202  } else {
-
1203  if (unit->Count() > 1) {
-
1204  sprintf_s(text, "ENEMY KILLED:\t %d %s destroyed\n", them_count, unit->Name().data());
-
1205  } else {
-
1206  sprintf_s(text, "ENEMY KILLED:\t %s destroyed\n", unit->Name().data());
-
1207  }
-
1208  }
-
1209 
-
1210  info += text;
-
1211  } else {
-
1212  info += "ENEMY KILLED:\t 0\n";
-
1213  }
-
1214 
-
1215  if (us_count) {
-
1216  if (!friendly)
-
1217  sprintf_s(text, "ALLIED LOSSES:\t %s destroyed\n", tgt->Name().data());
-
1218  else
-
1219  sprintf_s(text, "ALLIED LOSSES:\t %s destroyed", unit->Name().data());
-
1220 
-
1221  info += text;
-
1222  } else {
-
1223  info += "ALLIED LOSSES:\t 0";
-
1224  }
-
1225 
-
1226  event->SetTitle(title);
-
1227  event->SetInformation(info);
-
1228  return event;
-
1229 }
-
1230 
-
1231 // +--------------------------------------------------------------------+
-
1232 
-
1233 bool
-
1234 CampaignPlanEvent::IsFriendlyAssignment(CombatAssignment* a)
-
1235 {
-
1236  if (!campaign || !a || !a->GetResource())
-
1237  return false;
-
1238 
-
1239  int a_team = a->GetResource()->GetIFF();
-
1240  CombatGroup* player = campaign->GetPlayerGroup();
-
1241 
-
1242  if (player && (player->GetIFF() == a_team))
-
1243  return true;
-
1244 
-
1245  return false;
-
1246 }
-
1247 
-
1248 bool
-
1249 CampaignPlanEvent::Success(CombatAssignment* a)
-
1250 {
-
1251  if (!campaign || !a || !a->GetResource())
-
1252  return false;
-
1253 
-
1254  int odds = 6 - campaign->GetCampaignId();
-
1255 
-
1256  if (odds < 1)
-
1257  odds = 1;
-
1258 
-
1259  bool success = RandomChance(odds, 5);
-
1260 
-
1261  if (!IsFriendlyAssignment(a))
-
1262  success = !success;
-
1263 
-
1264  return success;
-
1265 }
-
1266 
-
1267 // +--------------------------------------------------------------------+
-
1268 
-
1269 Text
-
1270 CampaignPlanEvent::GetTeamName(CombatGroup* g)
-
1271 {
-
1272  while (g->GetParent())
-
1273  g = g->GetParent();
-
1274 
-
1275  return g->Name();
-
1276 }
-
-
- - - - -- cgit v1.1