I WonT To BeLiVe
Домашняя ] Вверх ]
All what you wont, Last update 12.08.07.


Upload

In Da Forum форум сайта смотрим тут


Новости Сайта

12.08.07 Доработан дизайн.


03.07.07 Добавлены разделы.

02.07.07 Новый дизайн.

22.11.06 Обновление.

10.07.06 Форум упал.

20.06.06 Новый форум.

17.06.06 Форум удален.
 

10.06.06 Новый дизайн.


________________
Происшествия
________________
Предложения и пожелания,нашли неработающую ссылку?

Напишите об этом Администратору
Спасибо !!!
 

 

Про то, как банить. Азы сриптирования.








Когда я начинал свою эпопею гмаскриптера, столкнулся с такой проблемой: чтоб забанить или разбанить аккаунт, мне приходилось править accounts.txt, перезагружать сервер... Так как в стандартных скриптахкомандах я НЕ нашел ничего подходящего для банаунбана..

Естественно, меня такой подход не устроил. И тогда родились эти два маленьких скрипта-близнеца -)

[ scripts/textcmd/gm.]


ban.src



use uo;



program ban(who, acc)// Заголовок

var account := FindAccount( acc );// поиск акка по имени

if (account.ban())// Одновременно и бан, и проверка, забанился ли?

SendSysMessage(who, "Аккаунт "+ acc + " забанен.");// Ну тут понятно

else// Если нет

SendSysMessage(who, "Аккаунт "+ acc + " НЕ забанен.");// То нет..

endif

endprogram// Конец -) А кто слушал - молодец..





unban.src



use uo;



program unban(who, acc)

var account := FindAccount( acc );

if (account.unban())

SendSysMessage(who, "Аккаунт "+ acc + " разбанен.");

else
SendSysMessage(who, "Аккаунт "+ acc + " НЕ разбанен.");

endif

endprogram




Все просто и понятно. И жить стало намного легче -)

.ban имяаккаунта , .unban имя акаунта...
 


 

Новое из разделов:


Юмор:
Комментатор

 


Тюнинг:
Самое мощное авто

 


Web дизайн:
Хитрости

 


Мобильник:
Сервисные коды

 

 


История дня:

Звони по 0,01$


 

 
Hosted by uCoz