Автор: Hatzel: Дата: 02.10.2009

Блин.. опять бред какойт пишу *crazy*.
Но эту штуку я допишу.
С вас идеи по улучшению, господа))

//============== eAthena script ======================

// - Помощник ГМа

//============== By ===============================

// - Telets 

//============== Version ===========================

// - 1.0

//================================================

prontera.gat,154,177,2 script Closed 769,{

set @npcname$,"[Менеджер]";



if (!(gmlvl < 99))

{

 mes @npcname$;

 mes "Не для игроков..";

}

 mes @npcname$;

 mes "Выбери опцию:";

next;

menu "Серверные команды",srv,"Прочее",rnd;

srv: 

 mes @npcname$;

 mes "Выбери действие:";

next;

 menu "Общий перезапуск",rldall,"Перезапуск итем-сервера",rlditm;

 

rldall:

 atcommand "@reloadscript";

close;

 

rlditm:

 atcommand "@reloaditemdb";

close;



rnd:

 mes @npcname$;

 mes "Выбери опцию";

menu "Получить предмет",itm,"Варпнуть чара к себе.",lvl,"Включить гв",woe;

    itm:

 mes @npcname$;

 mes "Введи ид шмотки.";

 input $itm;

next;

 mes @npcname$;

 mes "Введи кол-во";

 input $vl;

next;

 getitem $itm,$vl;

close;



    lvl:

 mes @npcname$;

 mes "Введи имя чара";

 input @charname$;

 atcommand "@recall "[EMAIL="+@charname$"]+@charname$[/EMAIL];

close;

    woe:



if(select("Не..","Да") ==1)

{

 mes @npcname$;

 mes "Ну ок.";

 close;

} else {

 mes @npcname$;

 mes "Включить или выключить?";

if(select("Включить","Выключить") == 1)

{

 atcommand "@agitstart";

 announce "Началось ГВ",bc_yellow|bc_all;

 mes @npcname$;

 mes "Готово.";

 close;

} else {

 atcommand "@agitend";

 announce "ГВ окончено",bc_yellow|bc_all;

 mes @npcname$;

 mes "Готово.";

 close;



}



}}

Автор: : Дата: 01.01.1970