|
Здравствуйте, гость ( Вход | Регистрация )
  |
|
 30.10.2009, 20:47
Сообщение
#1
|
|
 Site Reliability Engineer  Группа: Модераторы Сообщений: 1 772 Регистрация: 27.6.2009 Из: Чувашия, г. Чебоксары Пользователь №: 3 719 Спасибо сказали: 479 раз  |
помогите переделать скрипт. хочу зделать чтобы выбираеш пункт меню, нажимаеш и в гл чат выходит сообщение: Иформация отправлена в ЛС и сообщение с инфой отсылалось в лс
Раскрывающийся текст sBot = SetMan.GetString(21) -- имя бота tProfile = { [-1] = 1, [0] = 1, [1] = 1, [2] = 1, [3] = 1, [4] = 1, } -- кому доступно меню function UserConnected(user) Core.GetUserAllData(user) if tProfile[user.iProfile] == 1 then Core.SendToNick(user.sNick,"$UserCommand 1 3 Меню хаба\\Информация для "..user.sNick.."\\Ресурсы Etherway\\игровые сервера\\Warcraft III, DotA, Starcraft $<%[mynick]> !wds||") Core.SendToNick(user.sNick,"$UserCommand 1 3 Меню хаба\\Информация для "..user.sNick.."\\Ресурсы Etherway\\игровые сервера\\Team Fortress 2 Сервер (ew+ic+il) $<%[mynick]> !tf||") Core.SendToNick(user.sNick,"$UserCommand 1 3 Меню хаба\\Информация для "..user.sNick.."\\Ресурсы Etherway\\игровые сервера\\San Andreas - Multiplayer, Круглосуточно (Test)$<%[mynick]> !sanandr|") Core.SendToNick(user.sNick,"$UserCommand 1 3 Меню хаба\\Информация для "..user.sNick.."\\Ресурсы Etherway\\игровые сервера\\Etherway NFS: Pro Street Server$<%[mynick]> !nfspro|") -- пункты меню Core.SendToNick(user.sNick,"$UserCommand 1 3 Меню хаба\\Информация для "..user.sNick.."\\Ресурсы Etherway\\игровые сервера\\Call of Duty 2$<%[mynick]> !cod2||") Core.SendToNick(user.sNick,"$UserCommand 1 3 Меню хаба\\Информация для "..user.sNick.."\\Ресурсы Etherway\\игровые сервера\\WoW Reincarnation $<%[mynick]> !wow||") Core.SendToNick(user.sNick,"$UserCommand 1 3 Меню хаба\\Информация для "..user.sNick.."\\Ресурсы Etherway\\игровые сервера\\Prey $<%[mynick]> !prey||") Core.SendToNick(user.sNick,"$UserCommand 1 3 Меню хаба\\Информация для "..user.sNick.."\\Ресурсы Etherway\\игровые сервера\\Ranger Battlefield 2 Server $<%[mynick]> !bf|") Core.SendToNick(user.sNick,"$UserCommand 1 3 Меню хаба\\Информация для "..user.sNick.."\\Ресурсы Etherway\\Ресурсы сети$<%[mynick]> !klan||") Core.SendToNick(user.sNick,"$UserCommand 1 3 Меню хаба\\Информация для "..user.sNick.."\\Ресурсы Etherway\\Избранные хабы$<%[mynick]> !fhubs||") Core.SendToNick(user.sNick,"$UserCommand 1 3 Меню хаба\\Информация для "..user.sNick.."\\Ресурсы Etherway\\Сайты$<%[mynick]> !sites||") Core.SendToNick(user.sNick,"$UserCommand 1 3 Меню хаба\\Информация для "..user.sNick.."\\Ресурсы Etherway\\Радио$<%[mynick]> !radio||") Core.SendToNick(user.sNick,"$UserCommand 1 3 Меню хаба\\Информация для "..user.sNick.."\\Поисковики$<%[mynick]> !screan||") Core.SendToNick(user.sNick,"$UserCommand 1 3 Меню хаба\\Информация для "..user.sNick.."\\Ресурсы в инете$<%[mynick]> !resursin||") Core.SendToNick(user.sNick,"$UserCommand 1 3 Меню хаба\\Информация для "..user.sNick.."\\Благодарности юзерам$<%[mynick]> !doc||") Core.SendToNick(user.sNick,"$UserCommand 1 3 Меню хаба\\Информация для "..user.sNick.."\\Информация о нашем хабе$<%[mynick]> !hubinfa||") Core.SendToNick(user.sNick,"$UserCommand 1 3 Меню хаба\\Информация для "..user.sNick.."\\Правила хаба$<%[mynick]> !pravila||") Core.SendToNick(user.sNick,"$UserCommand 1 3 Меню хаба\\Информация для "..user.sNick.."\\Вэб статистика хаба$<%[mynick]> !webstat||") Core.SendToNick(user.sNick,"$UserCommand 1 3 Меню хаба\\Информация для "..user.sNick.."\\Вэб лог чата$<%[mynick]> !weblog||") Core.SendToNick(user.sNick,"$UserCommand 1 3 Меню хаба\\Информация для "..user.sNick.."\\Список наших серверов$<%[mynick]> !nasservera||") Core.SendToNick(user.sNick,"$UserCommand 1 3 Меню хаба\\Информация для "..user.sNick.."\\Спонсоры$<%[mynick]> !спонсоры||") Core.SendToNick(user.sNick,"$UserCommand 1 3 Меню хаба\\Информация для "..user.sNick.."\\Реквизиты$<%[mynick]> !реквизиты||") Core.SendToNick(user.sNick,"$UserCommand 1 3 Меню хаба\\Информация для "..user.sNick.."\\Наши админы$<%[mynick]> !admins||") Core.SendToNick(user.sNick,"$UserCommand 1 3 Меню хаба\\Информация для "..user.sNick.."\\Информация о настройках\\ICQ$<%[mynick]> !icq||") Core.SendToNick(user.sNick,"$UserCommand 1 3 Меню хаба\\Информация для "..user.sNick.."\\Информация о настройках\\Настройка DC++$<%[mynick]> !dc||") Core.SendToNick(user.sNick,"$UserCommand 1 3 Меню хаба\\Информация для "..user.sNick.."\\Информация о настройках\\Необходимый минимум настроек uTorrent$<%[mynick]> !uTorrent|") Core.SendToNick(user.sNick,"$UserCommand 1 3 Меню хаба\\Информация для "..user.sNick.."\\Информация о настройках\\Распространенные ошибки VPN, причины и способы устранения$<%[mynick]> !vpn|") -- пункты меню Core.SendToNick(user.sNick,"$UserCommand 1 3 Меню хаба\\Информация для "..user.sNick.."\\Правовая оговорка$<%[mynick]> !pog||") Core.SendToNick(user.sNick,"$UserCommand 1 3 Меню хаба\\Информация для "..user.sNick.."\\Сообщение от хаба$<%[mynick]> !meshub||") end end OpConnected = UserConnected RegConnected = UserConnected |
 |
 
|
|
31.10.2009, 9:42
Сообщение
#2
|
|
 Самый главный активист :-D Группа: Модераторы Сообщений: 2 790 Регистрация: 29.6.2008 Из: г. Тула Пользователь №: 97 Спасибо сказали: 440 раз |
А с какой целью? человек может не увидеть открывшуюся личку?!
|
|
|
|
|
31.10.2009, 10:13
Сообщение
#3
|
|
|
Site Reliability Engineer Группа: Модераторы Сообщений: 1 772 Регистрация: 27.6.2009 Из: Чувашия, г. Чебоксары Пользователь №: 3 719 Спасибо сказали: 479 раз |
Цитата(Wariner @ 31.10.2009, 11:42)  А с какой целью? человек может не увидеть открывшуюся личку?! не повериш!, но да. был юзер у которова личка в фоновом режиме открывалась, так тот в моё недолгое отсутствие завалил притензиями мою личку, а потом начал писать на форум. |
|
|
|
|
8.11.2009, 22:44
Сообщение
#4
|
|
 Освоившийся участник Группа: Модераторы Сообщений: 352 Регистрация: 25.7.2009 Пользователь №: 3 960 Спасибо сказали: 73 раза |
И тишина..))
|
|
|
|
|
9.11.2009, 9:42
Сообщение
#5
|
|
 Главный ра******й тут... Группа: Главные администраторы Сообщений: 1 727 Регистрация: 18.5.2008 Из: RF, 2la Пользователь №: 1 Спасибо сказали: 776 раз |
По-моему тут надо искать проблему не в скриптах, а в головах людей... Но если так интересно, можно вписать фразу в этот скрипт, если сами не сделаете - пишите в ту тему, скажу куда и что. Или же есть вариант с простым скриптом, который, к примеру, отлавливает команду и отсылает сообщение:
Код -- таблица с командами:
tCmds = { ["wds"] = true, ["nfspro"] = true, ["someanothercmd"] = true, } -- фраза для отправки: sSendPhrase = "вам отправлено личное приватное сообщение, прочтите его!" function OnStartup() sBot = SetMan.GetString(21) end function ChatArrival(tUser, sData) local sCmd = sData:match("^%b<>%s+%p(%S+).*|$") if sCmd then sCmd = sCmd:lower() if tCmds[sCmd] then Core.SendToUser(tUser, "<"..sBot.."> *** "..tUser.sNick..", "..sSendPhrase) end end end |
|
|
|
|
Похожие темы
|
Сейчас: 23.11.2024, 10:09 |
