myDC.ru

Здравствуйте, гость ( Вход | Регистрация )

 
 
Ответить в данную темуНачать новую тему

> Скрипт при входе, помогите

Теги
Нет тегов для показа
ke(x)one
сообщение 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' помогите пожалуйста
Go to the top of the page
+Quote Post
Артём
сообщение 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 - забыли. big_smile.gif
Go to the top of the page
+Quote Post
ke(x)one
сообщение 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'
Go to the top of the page
+Quote Post
Артём
сообщение 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


Спасибо сказали:
Go to the top of the page
+Quote Post
ke(x)one
сообщение 6.2.2012, 14:02
Сообщение #5


Участник
**

Группа: Пользователи
Сообщений: 35
Регистрация: 16.2.2011
Пользователь №: 8 797
Спасибо сказали: 1 раз




Огромное спасибо
Go to the top of the page
+Quote Post
Артём
сообщение 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
не открывать
Ник бота страшный, почему-то читается как Рабочее_Очко beated.gif


Спасибо сказали:
Go to the top of the page
+Quote Post
Tsd
сообщение 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")
Go to the top of the page
+Quote Post
ke(x)one
сообщение 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: "'
Go to the top of the page
+Quote Post
Tsd
сообщение 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
Go to the top of the page
+Quote Post
ke(x)one
сообщение 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'
Go to the top of the page
+Quote Post
Tsd
сообщение 6.2.2012, 19:58
Сообщение #11


Продвинутый участник
****

Группа: Пользователи
Сообщений: 176
Регистрация: 11.7.2008
Пользователь №: 171
Спасибо сказали: 182 раза




Ты уверен что это на верли будет работать?
Go to the top of the page
+Quote Post
ke(x)one
сообщение 6.2.2012, 20:00
Сообщение #12


Участник
**

Группа: Пользователи
Сообщений: 35
Регистрация: 16.2.2011
Пользователь №: 8 797
Спасибо сказали: 1 раз




это птотакс
Go to the top of the page
+Quote Post
Tsd
сообщение 6.2.2012, 20:01
Сообщение #13


Продвинутый участник
****

Группа: Пользователи
Сообщений: 176
Регистрация: 11.7.2008
Пользователь №: 171
Спасибо сказали: 182 раза




Попробуй изменить строку
"\n\tCurrent user count: "..Core.GetUsersCount()
на
"\n\tCurrent user count: "..Core.GetUsersCount())

Пишу как говорится "с листа".
Go to the top of the page
+Quote Post
ke(x)one
сообщение 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 '..'
Go to the top of the page
+Quote Post
Tsd
сообщение 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()..")")
Go to the top of the page
+Quote Post
ke(x)one
сообщение 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



вот что получилось и снова ошибка
Go to the top of the page
+Quote Post
Tsd
сообщение 6.2.2012, 20:19
Сообщение #17


Продвинутый участник
****

Группа: Пользователи
Сообщений: 176
Регистрация: 11.7.2008
Пользователь №: 171
Спасибо сказали: 182 раза




Убери строку
"\n\tRunTime:\t"..ut..")")


Спасибо сказали:
Go to the top of the page
+Quote Post
ke(x)one
сообщение 6.2.2012, 20:21
Сообщение #18


Участник
**

Группа: Пользователи
Сообщений: 35
Регистрация: 16.2.2011
Пользователь №: 8 797
Спасибо сказали: 1 раз




работает, спасибо
Go to the top of the page
+Quote Post
Ksan
сообщение 6.2.2012, 21:41
Сообщение #19


Белый Волк
*********

Группа: Пользователи
Сообщений: 1 723
Регистрация: 11.9.2008
Из: г.Томск
Пользователь №: 516
Спасибо сказали: 657 раз




Вы тут что, совсем разучились пользоваться тэгами формы отправки сообщений или просто не умееете?
Go to the top of the page
+Quote Post

Ответить в данную темуНачать новую тему
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

Collapse

> Похожие темы

  Тема Ответов Автор Просмотров Последнее сообщение
No new Topic has attachmentsНерабочий скрипт ВИПа по шаре
16 Damaks 19 972 23.2.2023, 7:16 Посл. сообщение: mod
No new Topic has attachmentsMagneto - Бесплатный Скрипт Портала Обмена Dc-ссылками Для Локальной Сети
26 UserSide 41 167 27.8.2019, 11:01 Посл. сообщение: CyberGhost404
No New Posts От: Новогодний Скрипт
От темы с ID: 871
0 Евгений 3 178 15.10.2018, 21:44 Посл. сообщение: Евгений
No New Posts А бывают такой скрипт бота?
Скрипт который создает виртуалных юзеров, но с реальными шарами
5 MarkDark 8 112 26.12.2017, 10:47 Посл. сообщение: мамин_парень
No New Posts Скрипт: Бот который отвечает в лс
4 мамин_парень 7 797 11.11.2017, 5:57 Посл. сообщение: мамин_парень
No New Posts как сделать вот этот скрипт
12 мамин_парень 12 526 13.9.2017, 10:51 Посл. сообщение: dimetro
No New Posts Topic has attachmentsИщу скрипт переадресации (redirect)
Переадресация интернет-юзеров
3 AS_Com 7 199 27.8.2017, 8:05 Посл. сообщение: Ksan
No New Posts Topic has attachmentsСкрипт Thunder.lua
7 Евген76 15 297 9.8.2017, 11:48 Посл. сообщение: Ksan
No New Posts Требуется скрипт
Нужен скрипт запрета на подключение
5 Nikolaevich 9 472 20.8.2016, 19:52 Посл. сообщение: Ksan
No new ВАЖНО: Topic has attachmentsСкрипт банов для RusHub
тестим и комменьтруем
79 Wariner 104 378 28.9.2015, 13:34 Посл. сообщение: NeirRon
No New Posts Скрипт загрузки файла
1 FreeNas 6 420 21.7.2015, 10:58 Посл. сообщение: HackFresse
No new Как вызвать bash скрипт из Lua
14 Iskandark 17 252 3.3.2015, 12:42 Посл. сообщение: Iskandark
No new Topic has attachmentsНовогодний Скрипт
API2
22 Tsd 35 580 12.12.2014, 16:28 Посл. сообщение: Tsd
No New Posts Скрипт запрета видеть чат
запрет видеть чат
2 dimetro 7 282 5.12.2014, 17:37 Посл. сообщение: dimetro
No New Posts Topic has attachmentsпеределать скрипт kinozal.tv
6 BOKOREZ 12 990 30.10.2014, 18:29 Посл. сообщение: Dani_Filth

 



RSS Сейчас: 23.11.2024, 8:00