this is a welcome messes that show at login
-- welcomemesses script by AmsterdamBulldogs
login = {
["BotName"] = "CarinaLUA5",
["Hubowner"] = "[MCO][Hubowner]AmsterdamBulldogs",
["Roboversion"] = "v10.01a",
["webadres"] = "http://www.jimenmickeclub.dyndns.info",
["Forumadres"] = "http://www.jimenmickeclubforum.dyndns.info",
["minsharehub"] = "7 GB",
["helpcommand"] = "!help",
}
local kb = "1024"
local mb = kb*kb
local gb = mb*kb
local tb = gb*kb
function Main()
frmHub:RegBot(login.BotName)
end
function NewUserConnected(user)
Message(user)
end
function OpConnected(user)
Message(user)
end
--// Profile Counter
function ProfileCounter(profile)
local table, count = GetUsersByProfile(profile), 0
for i, User in table do
if GetItemByName(User) then
count = count + 1
end
end
return count
end
function Message(user)
local timeanddate = os.date("%d-%m-%Y %H:%M:%S")
local tmp = os.clock()
local weeks, days, hours, minutes, seconds = math.floor(tmp/604800), math.floor(math.mod(tmp/86400, 7)), math.floor(math.mod(tmp/3600, 24)), math.floor(math.mod(tmp/60, 60)), math.floor(math.mod(tmp/1, 60))
if frmHub:GetHubTopic() == nil then
topic = "No topic set"
else
topic = frmHub:GetHubTopic()
end
if user.sMyInfoString then
local disp = ""
doGetProfile = GetProfileName(user.iProfile) or "Not registerd (reg your self white !regme )"
hubshare = string.format("%0.3f", frmHub:GetCurrentShareAmount()/(tb)).." TB"
local _,_,share = string.find(user.sMyInfoString, "^%$MyINFO %$ALL [^ ]+ [^$]*%$ $[^$]+[^$]%$[^$]*%$%s*(%d+)%$" )
if share then
minshare = string.format("%0.3f", tonumber(share)/gb).." GB"
else
minshare = "Corrupt"
end
border1 = " <=========================Welcome messeage for: "..user.sName.."================================>"
border2 = " <================and have mutch chat and downlouad fun "..user.sName.."=========================>"
disp = "\r\n\r\n"..border1.."\r\n"
disp = disp.." ?hubname: "..frmHub:GetHubName().."\r\n"
disp = disp.." ?Description: "..frmHub:GetHubDescr().."\r\n"
disp = disp.." ?Local date and time: "..timeanddate.."\r\n"
disp = disp.." ?Hub Topic: "..topic.."\r\n"
disp = disp.."\r\n"
disp = disp.." ?your ip: "..user.sIP.."\r\n"
disp = disp.." ?your sharesize: "..minshare.."\r\n"
disp = disp.." ?Minshare for users: "..login.minsharehub.."\r\n"
disp = disp.." ?your profile: "..doGetProfile.."\r\n"
disp = disp.." ?total share in this hub: "..hubshare.."\r\n"
disp = disp.." ?Hubowner: "..login.Hubowner.."\r\n"
disp = disp.." ?Hubadress: "..frmHub:GetHubAddress()..":"..frmHub:GetHubPort().."\r\n"
disp = disp.." ?Webadress: "..login.webadres.."\r\n"
disp = disp.." ?Forumadress: "..login.Forumadres.."\r\n"
disp = disp.." ?there are: "..ProfileCounter("NetFounder").." netfoudner(s), "..ProfileCounter("Operator").." Operator(s),\r\n"
disp = disp.." "..ProfileCounter("master").." Master(s), "..ProfileCounter("moderator").." Moderator(s),\r\n"
disp = disp.." "..ProfileCounter("Vip").." Vip(s), "..ProfileCounter("reg")..", Registered user(s).\r\n\r\n"
disp = disp.." ?there are now "..frmHub:GetUsersCount().." of the "..frmHub:GetMaxUsers().." users online after "..weeks.." week(s) "..days.." day(s) "..hours.." hour(s) "..minutes.." minutes and "..seconds.." seconds\r\n\r\n"
disp = disp.." ?Show the main commands "..login.helpcommand.."\r\n"
disp = disp.." ?This hub is Powered by: RoboCop? "..login.Roboversion.." - Made by Optimus?\r\n"..border2.."\r\n"
user:SendData(login.BotName, disp)
disp = nil
end
end
great script i have modified and enhanced info give it a try :)
code:
------------------------------------------------------------------------------- -- welcomemesses script by AmsterdamBulldogs-modifications by [uk]Andy-66?? andysplace2.no-ip.com
please edit setting to your hub ie robo vers address web adress and hub name etc.......
login = {
["BotName"] = "?Mr-Heckles?",
["Hubowner"] = "[uk]Andy-66??",
["Roboversion"] = "v10.01e",
["webadres"] = "http://www.hublist.org/?p=hub&id=97893",
["Forumadres"] = "http://www.jimenmickeclubforum.dyndns.info",
["minsharehub"] = "1 GB",
["helpcommand"] = "!help",
}
local kb = "1024"
local mb = kb*kb
local gb = mb*kb
local tb = gb*kb
function Main()
frmHub:RegBot(login.BotName)
end
function NewUserConnected(user)
Message(user)
end
function OpConnected(user)
Message(user)
end
--// Profile Counter
function ProfileCounter(profile)
local table, count = GetUsersByProfile(profile), 0
for i, User in table do
if GetItemByName(User) then
count = count + 1
end
end
return count
end
function Message(user)
local timeanddate = os.date("%d-%m-%Y %H:%M:%S")
local tmp = os.clock()
local weeks, days, hours, minutes, seconds = math.floor(tmp/604800), math.floor(math.mod(tmp/86400, 7)), math.floor(math.mod(tmp/3600, 24)), math.floor(math.mod(tmp/60, 60)), math.floor(math.mod(tmp/1, 60))
if frmHub:GetHubTopic() == nil then
topic = "No topic set"
else
topic = frmHub:GetHubTopic()
end
if user.sMyInfoString then
local disp = ""
doGetProfile = GetProfileName(user.iProfile) or "Not registerd (reg your self type !regme and a password of your choice in main)"
hubshare = string.format("%0.3f", frmHub:GetCurrentShareAmount()/(tb)).." TB"
local _,_,share = string.find(user.sMyInfoString, "^%$MyINFO %$ALL [^ ]+ [^$]*%$ $[^$]+[^$]%$[^$]*%$%s*(%d+)%$" )
if share then
minshare = string.format("%0.3f", tonumber(share)/gb).." GB"
else
minshare = "Corrupt"
end
border1 = " ?????????????????????Welcome To The F? R? I? E ?N? D? S Hub: "..user.sName.." ?????????????????????????"
border2 = " ?????????????????????????Enjoy Your Stay At Central-Perk "..user.sName.." ?????????????????????????"
disp = "\r\n\r\n"..border1.."\r\n"
disp = disp.." Hubname: "..frmHub:GetHubName().."\r\n"
disp = disp.." Hub date and time: "..timeanddate.."\r\n"
disp = disp.." Your ip: "..user.sIP.."\r\n"
disp = disp.." Your sharesize: "..minshare.."\r\n"
disp = disp.." Your profile: "..doGetProfile.."\r\n"
disp = disp.." Your description is: "..user.sDescription.."\r\n"
disp = disp.." Your connection is: "..user.sConnection.."\r\n"
disp = disp.." Your email is: "..user.sEmail.."\r\n"
disp = disp.." Your client is: "..user.sClient.."\r\n"
disp = disp.." Your client version is: "..user.sClientVersion.."\r\n"
disp = disp.." Your total hubs are: "..user.iHubs.."\r\n"
disp = disp.." Your open slots are: "..user.iSlots.."\r\n"
disp = disp.." Minshare for users: "..login.minsharehub.."\r\n"
disp = disp.." Total share in this hub: "..hubshare.."\r\n"
disp = disp.." Hubowner: "..login.Hubowner.."\r\n"
disp = disp.." Hubadress: "..frmHub:GetHubAddress()..":"..frmHub:GetHubPort().."\r\n"
disp = disp.." Webadress: "..login.webadres.."\r\n"
disp = disp.." There are: "..ProfileCounter("NetFounder").." netfoudner(s),"..ProfileCounter("master").." Master(s),"..ProfileCounter("Operator").." Operator(s),"..ProfileCounter("Vip").." Vip(s),"..ProfileCounter("reg")..", Registered user(s).\r\n\r\n"
disp = disp.." There are now: "..frmHub:GetUsersCount().." of the "..frmHub:GetMaxUsers().." users online after "..weeks.." week(s) "..days.." day(s) "..hours.." hour(s) "..minutes.." minutes and "..seconds.." seconds\r\n\r\n"
disp = disp.." Show the main commands: "..login.helpcommand.."\r\n"
disp = disp.." This hub is Powered by: RoboCop? "..login.Roboversion.." - Made by Optimus?\r\n"..border2.."\r\n"
user:SendData(login.BotName, disp)
disp = nil
end
end--------------------------------------------------------------------------------
how i doing this script in pm not in main chat?
Find this:
user:SendData(login.BotName, disp)
Replace to:
user:SendPM(login.BotName, disp)
tnx bro