Автор: MEXAHuK 3.11.2008, 17:01
на моем хабе 9 профилей пользователей:
1)регенный
2)лейтенант
..
..
9)Адмирал(владелец)
мне бы очень хотелось что бы при входе им говорилось что у них такой-то профиль(отсылалось название профиля)
типо: Приветствуем Вас *название профиля* *ник*
было в главном чате + было видно только ему
заранее спасибо!
Автор: Setuper 3.11.2008, 17:07
Код
local tProfiles={
[-1]="незарегистрированный",
[0]="админ",
[1]="оператор",
[2]="вип",
[3]="пользователь"
}
function UserConnected(tUser)
Core.SendToUser(tUser,"Приветствуем Вас, "..tProfiles[tUser.iProfile].." "..tUser.sNick)
end
RegConnected=UserConnected
OpConnected=UserConnected
А вообще говоря таких скриптов полно. Не поленился бы и поискал в готовых скриптах (тот-же самый HelloBot)
Автор: Mol 3.11.2008, 17:54
Каждая вторая тема такая. Пора за это наказывать.
Автор: MEXAHuK 3.11.2008, 18:38
выложите поаста тут а то у меня деньги на инет на пределе и искать - значит потерять драгоценный трафик.... помогите поласта оч. прошу
Автор: MEXAHuK 4.11.2008, 17:37
положил таки деньгу на инет...
код Core.SendToUser(tUser,"Приветствуем Вас, "..tProfiles[tUser.iProfile].." "..tUser.sNick) это под какой апи?
и ещё: как реализовать чтобы разным профилям было разное привествие?
код встраиваю в скрипт StatPX 1.02 строка UserConnected = function(user)
или нужно отдельной function UserConnected(tUser) ??
птока 0.4.1.1
Setuper, попробовал твой код. спасибо. не работает.
может выложишь аналогичны рабочий скрипт, поласта...
ставил хелло бот да он оказался под апи1
Код
function UserConnected(user)
Core.GetUserData(user, 12)
if user.bUserCommand then
if (pCustom[user.iProfile] == 1) and string.lower(tVar.sRCEnable) == "on" then
Core.SendToUser(user, "$UserCommand 1 3 "..tVar.sRCName.."\\Помощь$<%[mynick]> !"..tCmd.sHelp.."|")
Core.SendToUser(user, "$UserCommand 1 3 "..tVar.sRCName.."\\Мои приветсвия$<%[mynick]> !"..tCmd.sShow.."|")
Core.SendToUser(user, "$UserCommand 1 3 "..tVar.sRCName.."\\Новое приветсвие$<%[mynick]> !"..tCmd.sAddIn.." %[line:Введи текст , * = Твой ник.]|")
Core.SendToUser(user, "$UserCommand 1 3 "..tVar.sRCName.."\\Новое прощание$<%[mynick]> !"..tCmd.sAddOut.." %[line:Введи текст , * = Твой ник.]|")
Core.SendToUser(user, "$UserCommand 1 3 "..tVar.sRCName.."\\Удалить приветвие$<%[mynick]> !"..tCmd.sDelIn.." %[line:Введи номер]|")
Core.SendToUser(user, "$UserCommand 1 3 "..tVar.sRCName.."\\Удалить прощание$<%[mynick]> !"..tCmd.sDelOut.." %[line:Введи номер]|")
end
if (pAdmin[user.iProfile] == 1) and string.lower(tVar.sRCEnable) == "on" then
Core.SendToUser(user, "$UserCommand 1 3 "..tVar.sRCName.."\\Админ\\Изм. начало приветсвий$<%[mynick]> !"..tCmd.sChHdr.." %[line:Введите текст, Текущ.: "..tVar.sHeader.."]|")
Core.SendToUser(user, "$UserCommand 1 3 "..tVar.sRCName.."\\Админ\\Изм. конец приветсвий$<%[mynick]> !"..tCmd.sChFtr.." %[line:Введите текст, Текущ.: "..tVar.sFooter.."]|")
Core.SendToUser(user, "$UserCommand 1 3 "..tVar.sRCName.."\\Админ\\Показать все приветсвия$<%[mynick]> !"..tCmd.sAll.."|")
Core.SendToUser(user, "$UserCommand 1 3 "..tVar.sRCName.."\\Админ\\Удалить..$<%[mynick]> !"..tCmd.sDel.." %[line:<cust/rand> , Случайное или чье-то приветсвие?] %[line:<in/out> , Приветсвие или прощание?] %[line:<#> , Номер?] %[line:<ник> , Ник пользователя?] %[line:<причина> , Будем писать причину?]|")
Core.SendToUser(user, "$UserCommand 1 3 "..tVar.sRCName.."\\Админ\\Доб. приветствие юзеру$<%[mynick]> !"..tCmd.sCAdd.." %[line:<in/out> , Приветсвие или прощание?] %[line:<ник> , Ник пользователя?] %[line:<текст> , * = ник юзера]|")
Core.SendToUser(user, "$UserCommand 1 3 "..tVar.sRCName.."\\Админ\\Доб. случ. приветсвие$<%[mynick]> !"..tCmd.sRAdd.." %[line:<in/out> , Приветсвие или прощание?] %[line:<текст> , * = ник юзера]|")
Core.SendToUser(user, "$UserCommand 1 3 "..tVar.sRCName.."\\Админ\\Изм. назв. профиля к нику$<%[mynick]> !"..tCmd.sProfile.." %[line:<master/op/vip/reg/unreg/cust1/cust2> профиль?] %[line:<текст> , Новое описание?]|")
end
end
sendGreeting(user,tMsgIn);
[b]Core.SendToUser(user,"Приветствуем Вас, "..tProfiles[user.iProfile].." "..user.sNick)[/b]
end
будущим скрипто-писателям: знайте что луа - язык регистро-чувствительный
всобачил то что хотел в Eh.Greeting.Bot теперь буду ****аться чтобы разным профилям было разное личное приветствие
Автор: Setuper 4.11.2008, 19:53
MEXAHuK, хорош чушь нести! Если ты встраивает этот код в StatPX, то проблемы совместимости функции - то твои проблемы. Я всего лишь написал рабочий скрипт, который работает сам по себе и не предполагает встраиваться в какой то другой (большой) скрипт. Учись, учись и ещё раз учись понимать синтаксис, тогда и вопросов будет меньше и всё будет работать на ура.
Автор: MEXAHuK 4.11.2008, 21:20
уже, уже и уже! )
встроил в Eh.Greeting.Bot
подскажи примерно как реализовать чтобы каждый профиль получал разное приветствие?