| WOlF | Дата: Пятница, 22.01.2010, 22:07 | Сообщение # 1 |
|
Анубис
Группа: Администраторы
Сообщений: 136
Статус: Offline
| Code gonryun,154,181,4 script Devil Square 856,{
mes "[Devil Square Guard]"; mes "Добро пожаловать на ^FF0000Devil Square^000000"; mes "После Смерти, вы не сможете сюда больше попасть!"; next; menu "Войти",-,"Информация",Info,"Отмена",Cancel;
if(Baselevel < 70) goto LReq; if(Zeny < 20000) goto LReq; if($inf == 1) goto L_go; goto L_eror;
LReq: mes "[Devil Square Guard]"; mes "Минимальный уровень должен быть 70"; mes "Регистрация стоит 20к зени"; close;
L_go: if (getmapusers("ordeal_1-1.gat")==20) goto toomany; set Zeny,Zeny - 20000; announce ""+strcharinfo(0)+" Вошел(а) на Devil Square",8; percentheal 100,100; warp "ordeal_1-1.gat",174,149; end;
L_eror: mes "[Devil Square Guard]"; mes "Devil Square на данный момент закрыт!"; mes "Двери открываются в:"; mes "10.00, 15.00, 19.00"; close;
Info: mes "[Devil Square Guard]"; mes "3 волны монстров"; mes "С каждым разом все сильнее"; mes "Победив все 3 волны мобов, вы получаете 10 treasure box, вскрыть их можно только на Devil Square!!"; close; end;
toomany: mes "[Devil Square Guard]"; mes "Простите, но Devil Square переполнен"; mes "Максимальное кол-во людей равно 20"; set $inf,0; close; end;
Cancel: mes "[Devil Square Guard]"; mes "Досвидания"; close; end; }
////End Of Devil Square Entrance
ordeal_1-1.gat,182,183,5 script Cek -1,{
OnTimer30000: if (getmapusers("ordeal_1-1.gat") == 0) Announce "Все игроки погибли на Devil Square",8; if (getmapusers("ordeal_1-1.gat") == 0) set $status,1; if (getmapusers("ordeal_1-1.gat") == 0) killmonsterall "ordeal_1-1.gat"; if (getmapusers("ordeal_1-1.gat") == 0) end; Announce getmapusers("ordeal_1-1.gat") + " игроков живы на Devil Square",8; initnpctimer; end;
}
ordeal_1-1.gat,182,183,5 script HiddenNpc -1,{
OnClock1000: Announce "Devil Square Открыт!! 5 минут до начала!!",8; disablenpc "Exit"; initnpctimer; set $inf,1; set $status,0; killmonsterall "ordeal_1-1.gat"; end;
OnClock1500: Announce "Devil Square Открыт!! 5 минут до начала!!",8; disablenpc "Exit"; initnpctimer; set $inf,1; set $status,0; killmonsterall "ordeal_1-1.gat"; end;
OnClock1900: Announce "Devil Square Открыт!! 5 минут до начала!!",8; disablenpc "Exit"; initnpctimer; set $inf,1; set $status,0; killmonsterall "ordeal_1-1.gat"; end;
OnTimer60000: Announce "Devil Square осталось 4 минуты!!",8; end;
OnTimer120000: Announce "Devil Square осталось 3 минуты!!",8; end;
OnTimer180000: Announce "Devil Square осталось 2 минуты!!",8; end;
OnTimer240000: Announce "Devil Square осталось 1 минуты!!",8; end;
OnTimer300000: Announce "Devil Square начался!!",8; initnpctimer "Cek"; set $inf,0; set $mob,75; areamonster "ordeal_1-1.gat",149,148,150,149,"[DS] SOLDIER SKELETON",1028,10,"HiddenNpc::Ondevildead"; areamonster "ordeal_1-1.gat",149,148,150,149,"[DS] ORC ARCHER",1189,15,"HiddenNpc::Ondevildead"; areamonster "ordeal_1-1.gat",149,148,150,149,"[DS] SANDMAN",1165,10,"HiddenNpc::Ondevildead"; areamonster "ordeal_1-1.gat",149,148,150,149,"[DS] ARCHER SKELETON",1016,15,"HiddenNpc::Ondevildead"; areamonster "ordeal_1-1.gat",149,148,150,149,"[DS] MINOROUS",1149,15,"HiddenNpc::Ondevildead"; areamonster "ordeal_1-1.gat",149,148,150,149,"[DS] REQUIEM",1164,10,"HiddenNpc::Ondevildead"; end;
Ondevildead: if ($status == 1) end; set $mob,$mob-1; if($mob == 25) Announce "Devil Square : 25 мобов до победы",10; if($mob == 5) Announce "Devil Square : 5 мобов до победы",0; if($mob == 0) Announce "Поздравляем!! 1 волна мобов закончена",8; if($mob == 0) goto Ondevil2; end;
Ondevil2: set $mob,70; areamonster "ordeal_1-1.gat",149,148,150,149,"[DS] GARGOYLE",1253,15,"HiddenNpc::Ondevildead2"; areamonster "ordeal_1-1.gat",149,148,150,149,"[DS] ALARM",1193,10,"HiddenNpc::Ondevildead2"; areamonster "ordeal_1-1.gat",149,148,150,149,"[DS] HIGH ORC",1213,10,"HiddenNpc::Ondevildead2"; areamonster "ordeal_1-1.gat",149,148,150,149,"[DS] INJUSTICE",1257,10,"HiddenNpc::Ondevildead2"; areamonster "ordeal_1-1.gat",149,148,150,149,"[DS] MIMIC",1191,15,"HiddenNpc::Ondevildead2"; areamonster "ordeal_1-1.gat",149,148,150,149,"[DS] WRAITH",1192,10,"HiddenNpc::Ondevildead2"; end;
Ondevildead2: if ($status == 1) end; set $mob,$mob-1; if($mob == 25) Announce "Devil Square : 25 мобов до победы",10; if($mob == 5) Announce "Devil Square : 5 мобов до победы",0; if($mob == 0) Announce "Поздравляем!! 2 волна мобов закончена!!",8; if($mob == 0) goto Ondevil3; end;
Ondevil3: set $mob,28; areamonster "ordeal_1-1.gat",149,148,150,149,"[DS] ANOLIAN",1206,10,"HiddenNpc::Ondevildead3"; areamonster "ordeal_1-1.gat",149,148,150,149,"[DS] DEVIRUCHI",1109,5,"HiddenNpc::Ondevildead3"; areamonster "ordeal_1-1.gat",149,148,150,149,"[DS] JOKER",1131,10,"HiddenNpc::Ondevildead3"; areamonster "ordeal_1-1.gat",149,148,150,149,"[DS] MOONLIGHT",1150,1,"HiddenNpc::Ondevildead3"; areamonster "ordeal_1-1.gat",149,148,150,149,"[DS] DARK ILLUSION",1302,2,"HiddenNpc::Ondevildead3"; end;
Ondevildead3: if ($status == 1) end; set $mob,$mob-1; if($mob == 25) Announce "Devil Square : 25 мобов до победы",10; if($mob == 5) Announce "Devil Square : 5 мобов до победы",0; if($mob == 0) Announce "Devil Square : Наши Поздравления!! Теперь вы можете вскрыть сундуки",8; if($mob == 0) goto Ondevil4; end;
Ondevil4: set $mob,10; monster "ordeal_1-1.gat",149,166,"Treasure Box",1351,1,"HiddenNpc::Onboxdead"; monster "ordeal_1-1.gat",147,163,"Treasure Box",1328,1,"HiddenNpc::Onboxdead"; monster "ordeal_1-1.gat",145,160,"Treasure Box",1332,1,"HiddenNpc::Onboxdead"; monster "ordeal_1-1.gat",143,157,"Treasure Box",1336,1,"HiddenNpc::Onboxdead"; monster "ordeal_1-1.gat",140,154,"Treasure Box",1340,1,"HiddenNpc::Onboxdead"; monster "ordeal_1-1.gat",137,151,"Treasure Box",1344,1,"HiddenNpc::Onboxdead"; monster "ordeal_1-1.gat",134,148,"Treasure Box",1348,1,"HiddenNpc::Onboxdead"; monster "ordeal_1-1.gat",131,145,"Treasure Box",1352,1,"HiddenNpc::Onboxdead"; monster "ordeal_1-1.gat",128,142,"Treasure Box",1356,1,"HiddenNpc::Onboxdead"; monster "ordeal_1-1.gat",164,151,"Treasure Box",1360,1,"HiddenNpc::Onboxdead"; end;
Onboxdead: if ($status == 1) end; set $mob,$mob-1; Announce "Devil Square : " + strcharinfo(0) +" открыл(а) сундук",8; if($mob == 0) enablenpc "Exit"; end;
}
// -- Mapflags ordeal_1-1.gat mapflag nowarp ordeal_1-1.gat mapflag nowarpto ordeal_1-1.gat mapflag noteleport ordeal_1-1.gat mapflag nosave SavePoint ordeal_1-1.gat mapflag nomemo ordeal_1-1.gat mapflag nobranch ordeal_1-1.gat mapflag nopenalty // -- End of Mapflags
ordeal_1-1.gat,136,170,5 script Exit 856,{ warp "prontera.gat",62,61; close; }
|
| |
|
|