Hi,
Does anyone could test this little LUA script and report me why I don't have all the system fileds returns?
Quotefunction DataArrival(user, data)
if (strsub(data,1,4) == "$Key") then
local _,_,Var = strfind(data, "(.*)")
SendPmToNick("xjr13sp", "Bot", Var)
elseif (strsub(data,1,13) == "$ValidateNick") then
local _,_,Var = strfind(data, "(.*)")
SendPmToNick("xjr13sp", "Bot", Var)
elseif (strsub(data,1,7) == "$MyPass") then
local _,_,Var = strfind(data, "(.*)")
SendPmToNick("xjr13sp", "Bot", Var)
elseif (strsub(data,1,8) == "$Version") then
local _,_,Var = strfind(data, "(.*)")
SendPmToNick("xjr13sp", "Bot", Var)
elseif (strsub(data,1,9) == "$ClientID") then
local _,_,Var = strfind(data, "(.*)")
SendPmToNick("xjr13sp", "Bot", Var)
elseif (strsub(data,1,8) == "$BlackDC") then
local _,_,Var = strfind(data, "(.*)")
SendPmToNick("xjr13sp", "Bot", Var)
elseif (strsub(data,1,12) == "$GetNickList") then
local _,_,Var = strfind(data, "(.*)")
SendPmToNick("xjr13sp", "Bot", Var)
elseif (strsub(data,1,7) == "$MyINFO") then
local _,_,Var = strfind(data, "(.*)")
SendPmToNick("xjr13sp", "Bot", Var)
elseif (strsub(data,1,8) == "$GetINFO") then
local _,_,Var = strfind(data, "(.*)")
SendPmToNick("xjr13sp", "Bot", Var)
end
end
With dc++ client, I only have $MyINFO contain in a PM, with NMDC1 client I only have the contain of $Version, with a DC++k CMD I only have the contain of $MyINFO .... So I suppose that I do something wrong but I don't know what :-(
I have a question:
Can you retrive any data from:
$BlackDC and $ClientID
??
It is that I would like to know :D and try to do...
From scripting.txt
QuotefrmHub:EnableFullData(n)
n = 1 or 0 (1-enable,0-disable)
enables/disables passing of ALL incomming data to current script
NOTE: may have significant influence on hub's performance. Use it wisely!
-NotRabidWombat