Ragnarok World
Вы хотите отреагировать на этот пост ? Создайте аккаунт всего в несколько кликов или войдите на форум.
Последние темы
» Два и более сервера Eathena || Two and more servers Eathena
Gm__Status EmptyПн Окт 10, 2011 12:39 am автор LeLush16

» Aвтокликер || Autohotkey
Gm__Status EmptyВт Фев 08, 2011 7:41 am автор mrbib

» ////Kobans
Gm__Status EmptyПн Окт 25, 2010 10:15 am автор osiki

» Nice Stylist =)
Gm__Status EmptyСр Мар 24, 2010 8:11 pm автор Kill Spirit

» Novice VS Zombie (RFYL)
Gm__Status EmptyСр Мар 24, 2010 8:10 pm автор Kill Spirit

» Disguise Event =\
Gm__Status EmptyСр Мар 24, 2010 8:09 pm автор Kill Spirit

» Stop The Clok
Gm__Status EmptyСр Мар 24, 2010 8:08 pm автор Kill Spirit

» Warper || LastWarp
Gm__Status EmptyСр Мар 24, 2010 8:07 pm автор Kill Spirit

» Насчет грфок
Gm__Status EmptyСр Мар 24, 2010 8:04 pm автор Kill Spirit

Кто сейчас на форуме
Сейчас посетителей на форуме: 2, из них зарегистрированных: 0, скрытых: 0 и гостей: 2

Нет

Больше всего посетителей (59) здесь было Ср Авг 09, 2017 11:30 am
Самые активные пользователи
Kill Spirit
Gm__Status I_vote_lcapGm__Status I_voting_barGm__Status I_vote_rcap 
osiki
Gm__Status I_vote_lcapGm__Status I_voting_barGm__Status I_vote_rcap 
mrbib
Gm__Status I_vote_lcapGm__Status I_voting_barGm__Status I_vote_rcap 
LeLush16
Gm__Status I_vote_lcapGm__Status I_voting_barGm__Status I_vote_rcap 


Gm__Status

Перейти вниз

Gm__Status Empty Gm__Status

Сообщение  Kill Spirit Пн Мар 08, 2010 8:31 pm

Код:
rachel.gat,115,115,2  script  Гм Статус  837,{

L_gmcheck:
if (getgmlevel() == 99) { goto L_edit; }

L_start:
mes "[GM Status Checker]";
mes "Статус ГМ'ов-сервера:";
if (getarraysize($GM_Status$) == 0) { mes "No GM has been added to this list."; close; }
set .loop,0;

L_display:
if (getmapxy(.mapname$,.x,.y,0,$GM_Status$[.loop]) == 0) { mes "- "+$GM_Status$[.loop]+": ^00FF00Online^000000"; } else { mes "- "+$GM_Status$[.loop]+": ^FF0000Offline^000000"; }
set .loop,.loop + 1;
if (.loop >= getarraysize($GM_Status$)) { close; }
goto L_display;

L_edit:
mes "[GM Status Checker]";
mes "Привет,босс.Чего хочешь-то?";
menu "Покажи ГМов",-,"Добавить ГМ в лист.",L_add,"Удалить ГМ!",L_remove;
next;
goto L_start;

L_add:
next;
mes "[GM Status Checker]";
mes "Введи имя";
input .GM$;
mes "Ты уверен "+.GM$+" в имени и что хочешь его добавить?";
menu "Да",-,"Нет",L_add;
setarray $GM_Status$[getarraysize($GM_Status$)],.GM$;
mes "ГМ "+.GM$+" успешно добавлен.";
set .GM$,"";
next;
goto L_edit;

L_remove:
next;
mes "[GM Status Checker]";
mes "Введи имя ГМ";
input .GM$;
mes "Ты уверен "+.GM$+" что хочешь удалить его??";
menu "Да",-,"Нет",L_add;
set .loop,0;
goto L_remove2;

L_remove2:
if ($GM_Status$[.loop] == .GM$) { deletearray $GM_Status$[.loop],1; }
set .loop,.loop + 1;
if (.loop > getarraysize($GM_Status$)) { mes "GM named "+.GM$+" has been removed."; next; goto L_edit; }
goto L_remove2;

}
Kill Spirit
Kill Spirit
Администратор
Администратор

Сообщения : 34
Количество тем пользователя : 70
Дата регистрации : 2010-03-08

http://ragna-faq.forumgrad.ru

Вернуться к началу Перейти вниз

Вернуться к началу


 
Права доступа к этому форуму:
Вы не можете отвечать на сообщения