
wyslalem ci pm z linkiem
Code: Select all
Starting
Begin
ComStop([groth,sroth,Hawk]);
SetAreaMapShow(Area01,1);
InGameOn;
CenterOnUnits(Dark);
Say(Dark,'dr1');
Say(Dark,'dr2');
SayRadio(Dark,'dr3');
SayRadio(Skott,'dr4');
SayRadio(Dark,'dr5');
SayRadio(Skott,'dr6');
SayRadio(Dark,'dr7');
SayRadio(Skott,'dr8');
Say(Dark,'dr9');
Wait(0$05);
SayRadio(Hawk,'dr10');
SayRadio(Skott,'dr11');
SayRadio(Hawk,'dr12');
SayRadio(Skott,'dr13');
SayRadio(Dark,'dr14');
InGameOff;
ChangeMissionObjectives('CM1');
SaveForQuickRestart;
end;
every 0$1 do
Begin
enable;
If IsDying(Dark) then
Begin
YouLost('Dark');
end;
end;
every 0$1 do
Begin
enable;
If IsDying(Hawk) then
Begin
AddMedal('zyjesz',-1);
end;
end;
every 0$1 trigger See(GetSide(Dark),Hawk) do
Begin
CenterOnUnits([Dark,Hawk]);
SetSide(Hawk,GetSide(Dark));
SetAttitude(1,2,att_enemy,true);
Say(Hawk,'dr15');
Say(Dark,'dr16');
AddMedal('hawk',1); //Tutaj też -, czyli nie dostajesz medalu.
end;
function somebody_alive;
var i,n;
begin
n:=0;
for i in FilterAllUnits([[f_type,unit_human],[f_side,2]]) do
if (i<>29) and IsOK(i) then
n:=n+1;
result:=n;
end;
every 0$01 trigger not somebody_alive do
begin
wait(0$01);
Say(Hawk,'dr17');
Say(Dark,'dr18');
Say(Hawk,'dr19');
end;
every 0$1 trigger IsInArea(Dark,Area01) do
Begin
Case Query('Zapytanie1') of
1 : begin
AddMedal('doszles',1);
AddMedal('zyjesz',-1);
If not GetSide(Dark)=GetSide(Hawk) then
AddMedal('hawk',-1);
GiveMedals('Main');
RewardPeople(Dark);
SaveCharacters(Dark,'Dark');
SaveVariable(GetLives(Dark),'Dark_live');
YouWin
end;
2: begin
end;
end;
end;
every 0$01 trigger IsInArea([Dark,Hawk],Area01) do
Begin
AddMedal('doszles',1);
AddMedal('zyjesz',1);
GiveMedals('Main');
RewardPeople(Dark);
SaveCharacters(Dark,'Dark');
SaveVariable(GetLives(Dark),'Dark_live');
RewardPeople(Hawk);
SaveCharacters(Hawk,'Hawk');
SaveVariable(GetLives(Hawk),'Hawk_live');
YouWin
end;
Nie widzę na razie takiej potrzeby :/ Nie jest to aż tak oblegane forum, aby musiało mieć szczególne zasady. Zasady stucuka zresztą też nie naleza do jakis wyjątkowych. Wystarczy, że będziecie się trzymać ogolnych zasad panujących na forach i netykiety ( no może z wyjątkiem bluźniecia od czasu do czasu ^_^)NNPlaya wrote: A swoją drogą to może któryś z adminów mógłby sformułować proste zasady dot. forum i zrobić z tego temat tak jak to jest na OWSupport?