Скрипт при входе, помогите |
Здравствуйте, гость ( Вход | Регистрация )
Скрипт при входе, помогите |
6.2.2012, 13:37
Сообщение
#1
|
|
Участник Группа: Пользователи Сообщений: 35 Регистрация: 16.2.2011 Пользователь №: 8 797 Спасибо сказали: 1 раз |
sBot = "Рабочее_Око"
function UserConnected(tUser) local Profile = (ProfMan.GetProfile(tUser.iProfile) and ProfMan.GetProfile(tUser.iProfile).sProfileName) or "Unreg" Core.SendToUser(tUser,"<"..sBot.."> Добро пожаловать на Russia Hub . \r\n".. end RegConnected = UserConnected OpConnected = UserConnected что тут не правильно? ошибка вот [14:37] Синтаксис E:\Documents and Settings\Admin\Рабочий стол\0.4.1.2\scripts\motd0.lua:7: unexpected symbol near 'end' помогите пожалуйста |
|
|
6.2.2012, 13:47
Сообщение
#2
|
|
Наруто на аваторке Группа: Пользователи Сообщений: 2 606 Регистрация: 11.10.2008 Из: Харькова Пользователь №: 771 Спасибо сказали: 774 раза |
Код function UserConnected(tUser) local Profile = (ProfMan.GetProfile(tUser.iProfile) and ProfMan.GetProfile(tUser.iProfile).sProfileName) or "Unreg" Core.SendToUser(tUser,"<"..sBot.."> Добро пожаловать на Russia Hub . \r\n") end end end - забыли. |
|
|
6.2.2012, 13:50
Сообщение
#3
|
|
Участник Группа: Пользователи Сообщений: 35 Регистрация: 16.2.2011 Пользователь №: 8 797 Спасибо сказали: 1 раз |
[14:49] Синтаксис E:\Documents and Settings\Admin\Рабочий стол\0.4.1.2\scripts\motd0.lua:6: unexpected symbol near 'end'
|
|
|
6.2.2012, 14:00
Сообщение
#4
|
|
Наруто на аваторке Группа: Пользователи Сообщений: 2 606 Регистрация: 11.10.2008 Из: Харькова Пользователь №: 771 Спасибо сказали: 774 раза |
Код sBot = "Рабочее_Око"
UserConnected = function(tUser) local Profile = (ProfMan.GetProfile(tUser.iProfile) and ProfMan.GetProfile(tUser.iProfile).sProfileName) or "Unreg" Core.SendToUser(tUser, "<"..sBot.."> "..tUser.sNick..", Добро пожаловать на Russia Hub. \n\tВаш профиль:\t"..Profile.."\n\tСейчас на хабе:\t"..Core.GetUsersCount().." юзеров ") end RegConnected = UserConnected OpConnected = UserConnected |
|
|
6.2.2012, 14:02
Сообщение
#5
|
|
Участник Группа: Пользователи Сообщений: 35 Регистрация: 16.2.2011 Пользователь №: 8 797 Спасибо сказали: 1 раз |
Огромное спасибо
|
|
|
6.2.2012, 14:16
Сообщение
#6
|
|
Наруто на аваторке Группа: Пользователи Сообщений: 2 606 Регистрация: 11.10.2008 Из: Харькова Пользователь №: 771 Спасибо сказали: 774 раза |
тЫц Код sBot = "Рабочее_Око" UserConnected = function(tUser) local ut = Convert(os.time() - Core.GetUpTime()) local Profile = (ProfMan.GetProfile(tUser.iProfile) and ProfMan.GetProfile(tUser.iProfile).sProfileName) or "Unreg" Core.SendToUser(tUser, "<"..sBot.."> "..tUser.sNick..", Добро пожаловать на Russia Hub.".. "\n\tВаш профиль:\t"..Profile.."\n\tСейчас на хабе:\t"..Core.GetUsersCount().." юзеров ".. "\n\tНепрерывное время работы хаба:\t"..ut.."") end RegConnected = UserConnected OpConnected = UserConnected Convert = function(time) if time then local s,x,n = "",0,os.time() local tab = {{31556926, " лет", " год"},{2592000, " мес."},{604800, " нед."}, {86400, "дн."},{3600, " ч."},{60, " мин."},{1, " сек."}} if time > 0 then if time < 2145876659 then if n > time then time = n - time elseif n < time then time = time - n end for i,v in ipairs(tab) do if time > v[1] then x = math.floor(time/v[1]) if x > 1 then v[2] = v[2].."" end if x > 0 then s = s..x.." "..v[2]..", " time = time-x*v[1] end end end collectgarbage("collect") return s:sub(1,-3) else return "Invalid date or time supplied. [must be pre 12/31/2037]" end else return "Invalid date or time supplied. [must be post 01/01/1970]" end else return "Invalid date or time supplied." end end По просьбе ТС через ЛС на хабе mydc не открывать Ник бота страшный, почему-то читается как Рабочее_Очко |
|
|
6.2.2012, 14:43
Сообщение
#7
|
|
Продвинутый участник Группа: Пользователи Сообщений: 176 Регистрация: 11.7.2008 Пользователь №: 171 Спасибо сказали: 182 раза |
Ошибка была в строке
Core.SendToUser(tUser,"<"..sBot.."> Добро пожаловать на Russia Hub . \r\n".. Надо было так: Core.SendToUser(tUser,"<"..sBot.."> Добро пожаловать на Russia Hub . \n") |
|
|
6.2.2012, 19:38
Сообщение
#8
|
|
Участник Группа: Пользователи Сообщений: 35 Регистрация: 16.2.2011 Пользователь №: 8 797 Спасибо сказали: 1 раз |
Раскрывающийся текст sBot = "VerliHub" UserConnected = function(tUser) local ut = Convert(os.time() - Core.GetUpTime()) local Profile = (ProfMan.GetProfile(tUser.iProfile) and ProfMan.GetProfile(tUser.iProfile).sProfileName) or "Unreg" Core.SendToUser(tUser, "<"..sBot.."> This hub is running version 1.1.0b (Friday Januar 30 2012) of VerliHub (RunTime .".. "\n\tRunTime:\t"..ut..")" "\n\tCurrent user count:\t"..Core.GetUsersCount().." ".. end RegConnected = UserConnected OpConnected = UserConnected Convert = function(time) if time then local s,x,n = "",0,os.time() local tab = {{31556926, " лет", " год"},{2592000, " months."},{604800, " weeks."}, {86400, "дн."},{3600, " hours."},{60, " minutes."},{1, " with."}} if time > 0 then if time < 2145876659 then if n > time then time = n - time elseif n < time then time = time - n end for i,v in ipairs(tab) do if time > v[1] then x = math.floor(time/v[1]) if x > 1 then v[2] = v[2].."" end if x > 0 then s = s..x.." "..v[2]..", " time = time-x*v[1] end end end collectgarbage("collect") return s:sub(1,-3) else return "Invalid date or time supplied. [must be pre 12/31/2037]" end else return "Invalid date or time supplied. [must be post 01/01/1970]" end else return "Invalid date or time supplied." end end я вот что хотел сделать и ошибка [20:35] Синтаксис E:\Documents and Settings\Admin\Рабочий стол\0.4.1.2\scripts\1005001.lua:7: ')' expected (to close '(' at line 6) near '" Current user count: "' |
|
|
6.2.2012, 19:51
Сообщение
#9
|
|
Продвинутый участник Группа: Пользователи Сообщений: 176 Регистрация: 11.7.2008 Пользователь №: 171 Спасибо сказали: 182 раза |
Изменить блок
Core.SendToUser(tUser, "<"..sBot.."> This hub is running version 1.1.0b (Friday Januar 30 2012) of VerliHub (RunTime .".. "\n\tRunTime:\t"..ut..")" "\n\tCurrent user count:\t"..Core.GetUsersCount().." ".. end на Core.SendToUser(tUser, "<"..sBot.."> This hub is running version 1.1.0b (Friday Januar 30 2012) of VerliHub.".. "\n\tRunTime: "..ut.. "\n\tCurrent user count: "..Core.GetUsersCount() end |
|
|
6.2.2012, 19:56
Сообщение
#10
|
|
Участник Группа: Пользователи Сообщений: 35 Регистрация: 16.2.2011 Пользователь №: 8 797 Спасибо сказали: 1 раз |
20:53] Синтаксис E:\Documents and Settings\Admin\Рабочий стол\0.4.1.2\scripts\1005001.lua:8: unfinished string near '"'
неа [20:56] Синтаксис E:\Documents and Settings\Admin\Рабочий стол\0.4.1.2\scripts\1005001.lua:9: ')' expected (to close '(' at line 6) near 'end' |
|
|
6.2.2012, 19:58
Сообщение
#11
|
|
Продвинутый участник Группа: Пользователи Сообщений: 176 Регистрация: 11.7.2008 Пользователь №: 171 Спасибо сказали: 182 раза |
Ты уверен что это на верли будет работать?
|
|
|
6.2.2012, 20:00
Сообщение
#12
|
|
Участник Группа: Пользователи Сообщений: 35 Регистрация: 16.2.2011 Пользователь №: 8 797 Спасибо сказали: 1 раз |
это птотакс
|
|
|
6.2.2012, 20:01
Сообщение
#13
|
|
Продвинутый участник Группа: Пользователи Сообщений: 176 Регистрация: 11.7.2008 Пользователь №: 171 Спасибо сказали: 182 раза |
Попробуй изменить строку
"\n\tCurrent user count: "..Core.GetUsersCount() на "\n\tCurrent user count: "..Core.GetUsersCount()) Пишу как говорится "с листа". |
|
|
6.2.2012, 20:03
Сообщение
#14
|
|
Участник Группа: Пользователи Сообщений: 35 Регистрация: 16.2.2011 Пользователь №: 8 797 Спасибо сказали: 1 раз |
неа
[21:03] Синтаксис E:\Documents and Settings\Admin\Рабочий стол\0.4.1.2\scripts\1005001.lua:7: unexpected symbol near '..' |
|
|
6.2.2012, 20:11
Сообщение
#15
|
|
Продвинутый участник Группа: Пользователи Сообщений: 176 Регистрация: 11.7.2008 Пользователь №: 171 Спасибо сказали: 182 раза |
Core.SendToUser(tUser, "<"..sBot.."> This hub is running version 1.1.0b (Friday Januar 30 2012) of VerliHub (RunTime: "..ut.."). (Current user count: "..Core.GetUsersCount()..")")
|
|
|
6.2.2012, 20:15
Сообщение
#16
|
|
Участник Группа: Пользователи Сообщений: 35 Регистрация: 16.2.2011 Пользователь №: 8 797 Спасибо сказали: 1 раз |
sBot = "VerliHub"
UserConnected = function(tUser) local ut = Convert(os.time() - Core.GetUpTime()) local Profile = (ProfMan.GetProfile(tUser.iProfile) and ProfMan.GetProfile(tUser.iProfile).sProfileName) or "Unreg" Core.SendToUser(tUser, "<"..sBot.."> This hub is running version 1.1.0b (Friday Januar 30 2012) of VerliHub (RunTime: "..ut.."). (Current user count: "..Core.GetUsersCount()..")") "\n\tRunTime:\t"..ut..")") end RegConnected = UserConnected OpConnected = UserConnected Convert = function(time) if time then local s,x,n = "",0,os.time() local tab = {{31556926, " лет", " год"},{2592000, " months."},{604800, " weeks."}, {86400, "дн."},{3600, " hours."},{60, " minutes."},{1, " with."}} if time > 0 then if time < 2145876659 then if n > time then time = n - time elseif n < time then time = time - n end for i,v in ipairs(tab) do if time > v[1] then x = math.floor(time/v[1]) if x > 1 then v[2] = v[2].."" end if x > 0 then s = s..x.." "..v[2]..", " time = time-x*v[1] end end end collectgarbage("collect") return s:sub(1,-3) else return "Invalid date or time supplied. [must be pre 12/31/2037]" end else return "Invalid date or time supplied. [must be post 01/01/1970]" end else return "Invalid date or time supplied." end end вот что получилось и снова ошибка |
|
|
6.2.2012, 20:19
Сообщение
#17
|
|
Продвинутый участник Группа: Пользователи Сообщений: 176 Регистрация: 11.7.2008 Пользователь №: 171 Спасибо сказали: 182 раза |
Убери строку
"\n\tRunTime:\t"..ut..")") |
|
|
6.2.2012, 20:21
Сообщение
#18
|
|
Участник Группа: Пользователи Сообщений: 35 Регистрация: 16.2.2011 Пользователь №: 8 797 Спасибо сказали: 1 раз |
работает, спасибо
|
|
|
6.2.2012, 21:41
Сообщение
#19
|
|
Белый Волк Группа: Пользователи Сообщений: 1 723 Регистрация: 11.9.2008 Из: г.Томск Пользователь №: 516 Спасибо сказали: 657 раз |
Вы тут что, совсем разучились пользоваться тэгами формы отправки сообщений или просто не умееете?
|
|
|
Похожие темы
|
Сейчас: 10.11.2024, 22:24 |