Вопросы Разработчикам Скриптов, вопросы по скриптам (мелкие вопросы) Опции

[Setuper]

в новом апи такая возможность есть. Делается так:

Код

nTimerInterval1=60000 -- 1 мин
nTimerInterval2=72000 -- 1.2 мин
nTimerInterval3=90000 -- 1.5 мин

TmrMan.AddTimer(nTimerInterval1, "func1")
TmrMan.AddTimer(nTimerInterval2, "func2")
TmrMan.AddTimer(nTimerInterval3, "func3")

function func1()
    SendToAll("timer 1")
end

function func2()
    SendToAll("timer 2")
end

function func3()
    SendToAll("timer 3")
end

для старого апи такую функцию надо писать самому)))

[Wariner]

думаю переходить обратно я не буду, dllку скомпилить тоже врядли смогу(во всяком случае на данном жизненом этапе) значит остаётся два варианта искать глюки в существующей либе и обходить их либо ждать чего то нового. Кстати над этим работы какие нибудь ведутся?

CODE

if ( cmd=="!profile" and user.iProfile ~= nil ) then
_,_,usernme = string.find( data, "%b<>%s+%S+%s+(%S+)" )
if usernme ~= nil then
if Core.GetUser(usernme,true) then
nme = Core.GetUser(usernme)
if usernme.iProfile ~= -1 then
nme = (ProfMan.GetProfile(Core.GetUser(nme.sNick)) and ProfMan.GetProfile(Core.GetUser(nme.sNick).sProfileName).iProfile) -- ошибка тут
Core.SendToNick(user.sNick,"*** Пользователь <"..bnick.."> имеет профиль "..nme)
return true
else
Core.SendToNick(user.sNick,"*** Пользователь <"..usernme.."> не зарегистрирован")
return true
end
else
Core.SendToNick(user.sNick,"*** Пользователь <"..usernme.."> оффлайн!")
return true
end
else
Core.SendToNick(user.sNick,"*** Ошибка! Вы не указали ник!")
return true
end
end

как должно быть правильно?
[22:28] Синтаксис thunder_newapi.lua:253: bad argument #1 to 'GetProfile' (string or number expected, got 3552855)

[Setuper]

Вроде вот так:

Код

if (cmd=="!profile" and user.iProfile) then
    local _,_,usernme=string.find(data,"%b<>%s+%S+%s+(%S+)")
    if usernme then
        local nme=Core.GetUser(usernme)
        if nme then
            if nme.iProfile~=-1 then
                Core.SendToNick(user.sNick,"*** Пользователь <"..usernme.."> имеет профиль "..
                ProfMan.GetProfile(nme.iProfile).sProfileName)
            else
                Core.SendToNick(user.sNick,"*** Пользователь <"..usernme.."> не зарегистрирован")
            end
        else
            Core.SendToNick(user.sNick,"*** Пользователь <"..usernme.."> оффлайн!")
        end
    else
        Core.SendToNick(user.sNick,"*** Ошибка! Вы не указали ник!")
    end
    return true
end

[Wariner]

Код

        sMsg = sMsg:gsub("<!\[CDATA\[", " ")
        sMsg = sMsg:gsub("\]\]>", " ")

пишет [16:38] Синтаксис Bash_API2.lua:94: malformed pattern (missing ']')
я понимаю что это квадратные скобки но вроде я посттавил перед ними "\" Что не так?

[Nickolya]

Читай про магические символы, неужели забыл что перед ними не \ а % ставится?)
Мой открытый вариант скрипта ковырял?? http://mydc.ru/index.html?amp;showtopic=...post&p=2828

[Wariner]

Читай про магические символы, неужели забыл что перед ними не \ а % ставится?)

да с этим я что то тупанул...

Мой открытый вариант скрипта ковырял?? http://mydc.ru/index.html?amp;showtopic=...post&p=2828

я его посмотрел... во первых там в папке два файла с закрытым кодом, во вторых не дорос я ещё до таких скриптов... наверно

[Nickolya]

Файл Core.lua - с открытым кодом! Вроде не так уж и сложно всё там...
Строка 87:

Код

            local _,_, sData = string.find(sDescription, "<!%[CDATA%[(.*)%]%]")

[Wariner]

ладно может покапаюсь, а щас побежал на тренировку)))))

[Wariner]

2Setuper: Илюх, ты где то писал про сиистему(начальных букв у переменных), помоему венгерскую, но я что то потерял темку в которой ты это отписывал((( Можешь продублировать ещё раз?(поис мне не помог )

[Nickolya]

Странно, но я нашел в поиске: http://mydc.ru/ipb.html?s=&showtopic=3...post&p=2068

[Setuper]

Называется венгерская нотация)))))

Код

s - string
i - integer
n - number
l - long
b - boolean
p - pointer
h - handle
C - class
T - type
t - table
mt - metatable

В lua можно использовать следующие:

Код

s - string
i - integer
b - boolean
h - handle
t - table
mt - metatable

(iShareSize, bConnected, hFile, tTable, mtTable)

http://mydc.ru/ipb.html?s=&showtopic=3...post&p=2068

[Wariner]

в чём тут ошибка?

Код

function UserDisconnected(tUser)
    tUser[tUser.sIP].OffData = os.date("%d.%m.%Y %H:%M:%S")
    WriteTable(tUsers, "tUsers", sUser)
end

Синтаксис ххх.lua:46: attempt to index field '?' (a nil value)

[Nickolya]

В таблице tUser нет таблицы равной его ip: tUser[tUser.sIP] = nil, а ты пытаешься в такой таблице создать поле OffData, надо сначала объявить таблицу: tUser[tUser.sIP] = {}, или сразу поле в ней: tUser[tUser.sIP] = {OffData = os.date("%d.%m.%Y %H:%M:%S"),}

[Wariner]

таблица создаётся в функции юзерконнектед, выглядит так

CODE

tUsers = {
["10.2.100.240"] = {
["Nick"] = "-=Wariner=-",
["Shara"] = 12100841835,
["Msg"] = 0,
["OffData"] = 0,
["Downloads"] = 0,
["BanTop"] = 0,
["Ban"] = 0,
["OpBanTop"] = 0,
["GagTop"] = 0,
["Seach"] = 0,
["OpGagTop"] = 0,
["OldNick"] = {
},
["IP"] = "10.2.100.240",
},
}

после чего идёт описаный выше код, но дальше ошибка

[Sephiroth_Lukaw]

tUser[tUser.sIP].OffData = os.date("%d.%m.%Y %H:%M:%S")

Может ты тут tUsers имеешь в виду...?

WriteTable(tUsers, "tUsers", sUser)

А переменная sUser откудо?...
Да и в WriteTable ты tUser никак не используешь...

[Wariner]

2Sephiroth_Lukaw: вот код

CODE

sBot = "Protector"

function OnStartup()
sPath = Core.GetPtokaXPath():gsub("/", "\\").."scripts\\Protector\\"
sData = sPath.."Data\\"
sText = sPath.."Text\\"
sUser = sData.."User.tbl"
...

function UserConnected(tUser)
Core.GetUserAllData(tUser)
local Shara = tUser.iShareSize or 0
if tUsers[tUser.sIP] == nil then
tUsers[tUser.sIP] = {}
...
tUsers[tUser.sIP].OffData = 0
WriteTable(tUsers, "tUsers", sUser)
end
end

OpConnected = UserConnected
RegConnected = UserConnected

function UserDisconnected(tUser)
tUser[tUser.sIP].OffData = os.date("%d.%m.%Y %H:%M:%S") -- вот тут ошибка
WriteTable(tUsers, "tUsers", sUser)
end

OpDisconnected = UserDisconnected
RegDisconnected = UserDisconnected

function WriteTable(tTable, tablename, file)
local handle = io.open(file, "w")
Serialize(tTable, tablename, handle)
handle:close()
end

function Serialize(tTable, sTableName, hFile, sTab)
sTab = sTab or "";
hFile:write(sTab..sTableName.." = {\n" );
for key, value in pairs(tTable) do
local sKey = (type(key) == "string") and string.format("[%q]",key) or string.format("[%d]",key);
if(type(value) == "table") then
Serialize(value, sKey, hFile, sTab.."\t");
else
local sValue = (type(value) == "string") and string.format("%q",value) or tostring(value);
hFile:write(sTab.."\t"..sKey.." = "..sValue);
end
hFile:write(",\n");
end
hFile:write(sTab.."}");
end

если не всё ещё понятно объясню подробнее

[Sephiroth_Lukaw]

Ну, если ты сделаешь как сказал Nickolya, то ошибка в той строчке биться не должна...хотя не вижу в ней никакого смысла если честно) т.к. tUser всё-равно локальна и ты её больше нигде не используешь в данной функции..

[Setuper]

Код

function UserDisconnected(tUser)
  if tUsers[tUser.sIP] then
    tUsers[tUser.sIP].OffData = os.date("%d.%m.%Y %H:%M:%S")
  end
  WriteTable(tUsers, "tUsers", sUser)
end

[Wariner]

2Sephiroth_Lukaw я тебя не понимать....
2Setuper спасибо

[Nickolya]

tUser[tUser.sIP].OffData = os.date("%d.%m.%Y %H:%M:%S") -- вот тут ошибка

Да, тут ошибка и ошибка как всегда глупая, подумай сам:

Код

tUsers[tUser.sIP].OffData = 0
tUser[tUser.sIP].OffData = os.date("%d.%m.%Y %H:%M:%S")

Думаю разница теперь заметна

ЗЫ: я тормоз

ЗЗЫ: слишком сложно и накладно для самого человека показать человеку как надо делать, легче и полезнее заставить его думать