EXPORT unit,nau1,nau2,dowodca; \\ blackmen i apeman1 stworzeni w edytorze
STARTING
begin
resetfog;
uc_side := 4;
hc_class := 1;
unit := CreateHuman;
PlaceHumanInUnit(unit,B1);
uc_side := 4;
hc_class := 4;
hc_skills := [0,1,0,3];
nau1 := CreateHuman;
PlaceUnitArea(nau1,AreaNau1,false);
uc_side := 4;
hc_class := 4;
hc_skills := [0,0,1,2];
nau2 := CreateHuman;
PlaceHumanInUnit(nau2,lab1);
hc_name := ('Brett Davidson');
hc_class := 1;
uc_side := 4;
hc_skills := [7,4,5,2];
dowodca := CreateHuman;
PlaceUnitArea(dowodca,AreaDowodca,false);
ComTurnUnit(nau1,dowodca);
ComTurnUnit(dowodca,nau1);
CenterOnUnits(dowodca);
InGameOn;
DialogueOn;
Say(nau1,'N1-1');
Say(dowodca,'D1-1');
Say(nau1,'N1-2');
CenterOnUnits(apeman1);
Wait(0$2);
CenterOnUnits(dowodca);
Say(dowodca,'D1-2');
Say(nau1,'N1-3');
Say(dowodca,'D1-3');
Say(nau1,'N1-4');
Say(nau1,'N1-5');
Say(apeman1,'A1-1');
DialogueOff;
InGameOff;
ChangeMissionObjectives('CEL1');
SaveForQuickRestart;
end;
every 0$1 trigger IsInArea(blackmen,AreaBaza) do
begin
ChangeMissionObjectives('CEL1W');
DialogueOn;
Say(blackmen,'B1-1');
Say(dowodca,'D1-4');
Say(nau1,'N1-6');
DialogueOff;
ChangeMissionObjectives('CEL2');
SetAreaMapShow(AreaEON,true);
end;
every 0$1 trigger IsInArea(blackmen,AreaEON) and IsInArea(apeman1,AreaEON) do
begin
SetAreaMapShow(AreaEON,false);
DialogueOn;
SayRadio(nau1,'N1-7');
DialogueOff;
ChangeMap('1','%_cont');
end;