Надо кое че подкрутить |
Здравствуйте, гость ( Вход | Регистрация )
Надо кое че подкрутить |
7.7.2009, 17:58
Сообщение
#1
|
|
Участник Группа: Пользователи Сообщений: 35 Регистрация: 7.7.2009 Из: Тула Пользователь №: 3 818 Спасибо сказали: 3 раза |
вот собсна скрипт:
Код function UserConnected(user) Core.GetUserAllData(user) GetCommands(user) end OpConnected = UserConnected function GetCommands(user) if (user.iProfile == 2) then UserCommands(user) end if (user.iProfile == 4) then UserCommands(user) end if (user.iProfile == 3) then UserCommands(user) end if (user.iProfile == 1) then UserCommands(user) end if (user.iProfile == 0) then UserCommands(user) end if (user.iProfile == -1) then UserCommands(user) end if (user.iProfile == 1) then OpsCommands(user) end if (user.iProfile == 0) then OpsCommands(user) end end wMenu = "меню админа" function OpsCommands(user) -- Бан Core.SendToNick(user.sNick,"$UserCommand 1 2 "..wMenu.."\\Меню бана\\Забанить$<%[mynick]> !nicktempban %[nick] 10m %[line:Введите Причину:]|") Core.SendToNick(user.sNick,"$UserCommand 1 2 "..wMenu.."\\Меню бана\\Забанить навсегда$<%[mynick]> !ban %[line:Введите IP:] %[line:Введите причину:]|") Core.SendToNick(user.sNick,"$UserCommand 1 3 "..wMenu.."\\Меню бана\\Список забаненых$<%[mynick]> !getbans|") Core.SendToNick(user.sNick,"$UserCommand 1 3 "..wMenu.."\\Меню бана\\Снять бан$<%[mynick]> !unban %[line:Введите ник или IP:]|") -- Гаг Core.SendToNick(user.sNick,"$UserCommand 1 2 "..wMenu.."\\Глушак$<%[mynick]> !gag %[line:Введите IP:] %[line:Введите причину:]|") Core.SendToNick(user.sNick,"$UserCommand 1 3 "..wMenu.."\\Снять глушак$<%[mynick]> !ungag %[line:Введите ник или IP:]|") -- Топик Core.SendToNick(user.sNick,"$UserCommand 1 3 "..wMenu.."\\Меню топика\\Установить новый топик$<%[mynick]> !topic %[line:Введите топик:]|") Core.SendToNick(user.sNick,"$UserCommand 1 3 "..wMenu.."\\Меню топика\\Удалить текущий топик$<%[mynick]> !topic off|") -- Сообщения Core.SendToNick(user.sNick,"$UserCommand 1 3 "..wMenu.."\\Сообщения\\Послать всем ЛС$<%[mynick]> !massmsg %[line:Введите текст:]|") Core.SendToNick(user.sNick,"$UserCommand 1 3 "..wMenu.."\\Сообщения\\Послать личку ОПам$<%[mynick]> !opmassmsg %[line:Введите текст:]|") -- Управление хабом curUser:SendData("$UserCommand 1 3 "..wMenu.."\\Общее управление\\Управление хабом\\Перезапустить хаб$<%[mynick]> !restart|") curUser:SendData("$UserCommand 1 3 "..wMenu.."\\Общее управление\\Управление хабом\\Управление скриптами\\Запустить скрипт$<%[mynick]> !startscript %[line:Введите имя файла скрипта]|") curUser:SendData("$UserCommand 1 3 "..wMenu.."\\Общее управление\\Управление хабом\\Управление скриптами\\Остановить скрипт$<%[mynick]> !stopscript %[line:Введите имя файла скрипта]|") curUser:SendData("$UserCommand 1 3 "..wMenu.."\\Общее управление\\Управление хабом\\Управление скриптами\\Перезапустить скрипт$<%[mynick]> !restartscript %[line:Введите имя файла скрипта]|") curUser:SendData("$UserCommand 1 3 "..wMenu.."\\Общее управление\\Управление хабом\\Управление скриптами\\Перезапустить все скрипты$<%[mynick]> !restartscripts %[line:Введите имя файла скрипта]|") curUser:SendData("$UserCommand 1 3 "..wMenu.."\\Общее управление\\Управление хабом\\Управление скриптами\\Список скриптов$<%[mynick]> !getscripts|") curUser:SendData("$UserCommand 1 3 "..wMenu.."\\Общее управление\\Управление хабом\\Перезапустить все текстовые файлы$<%[mynick]> !reloadtxt|") end RegConnected = UserConnected При подключении админа к хабу скрипт отрубается и выдает следующую ошибку Цитата 22: attempt to call global 'UserCommands' (a nil value) И ещё кое что, можно ли подкрутить к этому скрипту таблицу профилей которым будет разрешено пользоватся этим скриптом? Спасибо за помощь! |
|
|
7.7.2009, 18:01
Сообщение
#2
|
|
Местный Группа: Неактивированные Сообщений: 908 Регистрация: 26.12.2008 Пользователь №: 1 574 Спасибо сказали: 1406 раз |
Ответный вопрос.
Почему из всех скриптов, реализующих меню управления, нужно было выбрать самый кривой? PS. Движок форума портит скрипты, поэтому их надо не постить, а прикреплять файлом. |
|
|
Похожие темы
Тема | Ответов | Автор | Просмотров | Последнее сообщение | |
---|---|---|---|---|---|
очень надо скрипт скрипт |
3 | dimavolna | 7 127 | 23.2.2010, 21:49 Посл. сообщение: dimavolna | |
Переделать надо однако =) | 4 | Akaick | 7 951 | 31.10.2009, 18:49 Посл. сообщение: Jaska | |
Надо изменить | 7 | Akaick | 9 854 | 10.7.2009, 15:36 Посл. сообщение: fixx | |
Надо изменить | 0 | Akaick | 0 | 7.7.2009, 18:43 Посл. сообщение: Akaick |
|
Сейчас: 23.12.2024, 19:24 |