[Event] Злобные монстры

[nejiko]

Суть думаю всем ясна!

В опр. время появляется 100 мобов на рандомной локации!

Кто убил последнего победил!

Создателя не знаю так как скрипт нашёл на компе!

prontera.gat,50,50,5	script	MonsterSpawn	-1,{
OnClock0800:
OnClock1430:
OnClock2130:
if(gettime(4)==1) end;
set $map,rand(5);
set $status,1;
if ($map == 1) goto Map1;
if ($map == 2) goto Map2;
if ($map == 3) goto Map3;
if ($map == 4) goto Map4;
if ($map == 5) goto Map5;
OnClock2340:
OnClock1140:
OnClock1340:
OnClock1840:
if(gettime(4) == 1) end;
if($status == 1) {
set $status,0;
Announce "Никто не смог победить злобных монстров. Эвент выключен",8;
//if ($map == 1) killmonster2 "prt_fild08.gat";
//if ($map == 2) killmonster2 "cmd_fild04.gat";
//if ($map == 3) killmonster2 "gef_fild07.gat";
//if ($map == 4) killmonster2 "pay_fild01.gat";
//if ($map == 5) killmonster2 "hu_fild06.gat";
end;
}

Map1:
Announce "Внимание, чуть ниже города пронтеры(prt_fild08.gat 50,50) появилась злая армия из 100 Мобов",8;
set $mob,100;
areamonster "prt_fild08.gat",50,50,50,50,"[Event] Atk Crystal",1395,20,"MonsterSpawn::OnAEDead";
areamonster "prt_fild08.gat",50,50,50,50,"[Event] MAtk Crystal",1396,20,"MonsterSpawn::OnAEDead";
areamonster "prt_fild08.gat",50,50,50,50,"[Event] HP Crystal",1397,60,"MonsterSpawn::OnAEDead";
end;
Map2:
Announce "Внимание, на полях Комодо(cmd_fild04.gat 100,100) появилась злая армия из 100 Мобов",8;
set $mob,100;
areamonster "cmd_fild04.gat",100,100,100,100,"[Event] Atk Crystal",1395,30,"MonsterSpawn::OnAEDead";
areamonster "cmd_fild04.gat",100,100,100,100,"[Event] MAtk Crystal",1396,30,"MonsterSpawn::OnAEDead";
areamonster "cmd_fild04.gat",100,100,100,100,"[Event] HP Crystal",1397,40,"MonsterSpawn::OnAEDead";
end;
Map3:
Announce "Внимание, чуть ниже города Геффен(gef_fild07.gat 50,50) появилась злая армия из 100 Мобов",8;
set $mob,100;
areamonster "gef_fild07.gat",50,50,50,50,"[Event] Atk Crystal",1395,20,"MonsterSpawn::OnAEDead";
areamonster "gef_fild07.gat",50,50,50,50,"[Event] MAtk Crystal",1396,30,"MonsterSpawn::OnAEDead";
areamonster "gef_fild07.gat",50,50,50,50,"[Event] HP Crystal",1397,50,"MonsterSpawn::OnAEDead";
end;
Map4:
Announce "Внимание, около города Пайон(pay_fild01.gat 50,50) появилась злая армия из 100 Мобов",8;
set $mob,100;
areamonster "pay_fild01.gat",50,50,50,50,"[Event] Atk Crystal",1395,30,"MonsterSpawn::OnAEDead";
areamonster "pay_fild01.gat",50,50,50,50,"[Event] MAtk Crystal",1396,30,"MonsterSpawn::OnAEDead";
areamonster "pay_fild01.gat",50,50,50,50,"[Event] HP Crystal",1397,40,"MonsterSpawn::OnAEDead";
end;
Map5:
Announce "Внимание, чуть ниже города Хагель(hu_fild06.gat 50,50) появилась злая армия из 100 Мобов",8;
set $mob,100;
areamonster "hu_fild06.gat",50,50,50,50,"[Event] Atk Crystal",1395,40,"MonsterSpawn::OnAEDead";
areamonster "hu_fild06.gat",50,50,50,50,"[Event] MAtk Crystal",1396,10,"MonsterSpawn::OnAEDead";
areamonster "hu_fild06.gat",50,50,50,50,"[Event] HP Crystal",1397,50,"MonsterSpawn::OnAEDead";
end;

OnAEDead:
set $mob,$mob-1;
announce strcharinfo(0) + " убил поганца!",3;
if ($mob == 0) goto EventEnd;
Announce "Внимание, на карте осталось " + $mob + " Монстров",8;
end;
EventEnd:
set $status,0;
set @getitem,rand(1,3);
if(@getitem==1){ getitem 7227,1; }
if(@getitem==2){ getitem 20257,2; }
if(@getitem==3){ getitem 12103,3; }
warp "SavePoint",0,0;
Announce "Всё, вы спасли поля",8;
end;
} 

Изменено 14 октября, 2012 пользователем nejiko

[kadze]

реализация на 2

[nejiko]

почему? где ошибки и что не так? извините!

Изменено 14 октября, 2012 пользователем Sanasol
вина

[botka4aet]

1. goto
   
2. убил(а)
   
3. if($status == 1) {
   
4. set $map,rand(5);
   
5. set $mob,100;
   

[nejiko]

а ну скрипт не мой) копирайты я не знаю!

[Kubix!]

О Господи, этому скрипту лет 100!

Изменить, быстро!