| WOlF | Дата: Понедельник, 16.03.2009, 08:44 | Сообщение # 1 |
|
Анубис
Группа: Администраторы
Сообщений: 136
Статус: Offline
| Code prontera.gat,50,50,5 script MonsterSpawn -1,{ OnClock1100: //OnClock1800: 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; OnClock2055: 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 "Внимание, чуть ниже города пронтеры появилась злая армия из 10 Мобов",8; set $mob,10; areamonster "prt_fild08.gat",50,50,50,50,"[Event] Atk Crystal",1395,2,"MonsterSpawn::OnAEDead"; areamonster "prt_fild08.gat",50,50,50,50,"[Event] MAtk Crystal",1396,2,"MonsterSpawn::OnAEDead"; areamonster "prt_fild08.gat",50,50,50,50,"[Event] HP Crystal",1397,6,"MonsterSpawn::OnAEDead"; end; Map2: Announce "Внимание, на полях Комодо появилась злая армия из 10 Мобов",8; set $mob,10; areamonster "cmd_fild04.gat",100,100,100,100,"[Event] Atk Crystal",1395,3,"MonsterSpawn::OnAEDead"; areamonster "cmd_fild04.gat",100,100,100,100,"[Event] MAtk Crystal",1396,3,"MonsterSpawn::OnAEDead"; areamonster "cmd_fild04.gat",100,100,100,100,"[Event] HP Crystal",1397,4,"MonsterSpawn::OnAEDead"; end; Map3: Announce "Внимание, чуть ниже города Геффен появилась злая армия из 10 Мобов",8; set $mob,10; areamonster "gef_fild07.gat",50,50,50,50,"[Event] Atk Crystal",1395,2,"MonsterSpawn::OnAEDead"; areamonster "gef_fild07.gat",50,50,50,50,"[Event] MAtk Crystal",1396,3,"MonsterSpawn::OnAEDead"; areamonster "gef_fild07.gat",50,50,50,50,"[Event] HP Crystal",1397,5,"MonsterSpawn::OnAEDead"; end; Map4: Announce "Внимание, около города Пайон появилась злая армия из 10 Мобов",8; set $mob,10; areamonster "pay_fild01.gat",50,50,50,50,"[Event] Atk Crystal",1395,3,"MonsterSpawn::OnAEDead"; areamonster "pay_fild01.gat",50,50,50,50,"[Event] MAtk Crystal",1396,3,"MonsterSpawn::OnAEDead"; areamonster "pay_fild01.gat",50,50,50,50,"[Event] HP Crystal",1397,4,"MonsterSpawn::OnAEDead"; end; Map5: Announce "Внимание, чуть ниже города Хагель появилась злая армия из 10 Мобов",8; set $mob,10; areamonster "hu_fild06.gat",50,50,50,50,"[Event] Atk Crystal",1395,4,"MonsterSpawn::OnAEDead"; areamonster "hu_fild06.gat",50,50,50,50,"[Event] MAtk Crystal",1396,1,"MonsterSpawn::OnAEDead"; areamonster "hu_fild06.gat",50,50,50,50,"[Event] HP Crystal",1397,5,"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; Announce "Всё, вы спасли поля",8; end; } ЭВЕНТ заключается в том что В назначеное время генерируется число случайным образом. В соответствии с числом генерируется карта. На карте появляются заданные монстры. После того, как ктото убивает моба - пишется, что осталось столько то мобов. После того, как все мобы убиты - закрывается эвент.
|
| |
|
|