Here a Script Noobs try ;D
Not quite sure where to place the StartTimer(Delay*1000) so here 2 possibilities - maybe 1 is correct ^^
Try Nr. 1
--Killbot LUA5
--
--by American Idiot
--
--Removes a bot from main user listing by typing
--!killbot <botname>
--in main or...
--!listbot <botname>
--to restore botname.
SendMenu = "yes" -- Send Command Menu? "yes"/"no"
Delay = 3 -- Delay in Seconds
--Set your profiles here
--[profileidx#] = 0 or 1
--0=No Menu, No Command / 1=Send Menu & Can use Command
Profiles = {
[-1] = 0, --Unregistered User
[0] = 1, --Master
[1] = 1, --Operator
[2] = 0, --Vip
[3] = 0, --Registered User
[4] = 1, --Moderator
[5] = 1, --NetFounder
}
--Set menu name or leave as is for hubname set in PtokaX
HubMenu = frmHub:GetHubBotName()
function NewUserConnected(user)
if SendMenu == "yes" then
if Profiles[user.iProfile] ==1 then
customCMDS(user)
end
end
end
OpConnected = NewUserConnected
--$UserCommand 1 X Where -> 1=Hub Menu 2=User Menu 3=Hub/User Menu
function customCMDS(user)
--user:SendData("$UserCommand 255 7") --clear the menu first
user:SendData("$UserCommand 1 1 "..HubMenu.."\\Bot Admin\\Remove Bot $<%[mynick]> !killbot %[line:BotNick]||")
user:SendData("$UserCommand 1 2 "..HubMenu.."\\Bot Admin\\Remove Bot $<%[mynick]> !killbot %[nick]||")
user:SendData("$UserCommand 1 3 "..HubMenu.."\\Bot Admin\\Restore Bot $<%[mynick]> !listbot %[line:BotNick]||")
end
function ChatArrival(user, data)
if Profiles[user.iProfile] ==1 then
data=string.sub(data,1,string.len(data)-1)
s,e,cmd,name = string.find(data,"%b<>%s+(%S+)%s+(%S+)")
StartTimer(Delay*1000)
if cmd=="!killbot" then
OnTimer()
frmHub:UnregBot(name)
StopTimer()
return 1
elseif cmd=="!listbot" then
OnTimer()
frmHub:RegBot(name)
StopTimer()
return 1
end
end
end
or
Try Nr. 2
--Killbot LUA5
--
--by American Idiot
--
--Removes a bot from main user listing by typing
--!killbot <botname>
--in main or...
--!listbot <botname>
--to restore botname.
SendMenu = "yes" -- Send Command Menu? "yes"/"no"
Delay = 3 -- Delay in Seconds
--Set your profiles here
--[profileidx#] = 0 or 1
--0=No Menu, No Command / 1=Send Menu & Can use Command
Profiles = {
[-1] = 0, --Unregistered User
[0] = 1, --Master
[1] = 1, --Operator
[2] = 0, --Vip
[3] = 0, --Registered User
[4] = 1, --Moderator
[5] = 1, --NetFounder
}
--Set menu name or leave as is for hubname set in PtokaX
HubMenu = frmHub:GetHubBotName()
function NewUserConnected(user)
if SendMenu == "yes" then
if Profiles[user.iProfile] ==1 then
customCMDS(user)
end
end
end
OpConnected = NewUserConnected
--$UserCommand 1 X Where -> 1=Hub Menu 2=User Menu 3=Hub/User Menu
function customCMDS(user)
--user:SendData("$UserCommand 255 7") --clear the menu first
user:SendData("$UserCommand 1 1 "..HubMenu.."\\Bot Admin\\Remove Bot $<%[mynick]> !killbot %[line:BotNick]||")
user:SendData("$UserCommand 1 2 "..HubMenu.."\\Bot Admin\\Remove Bot $<%[mynick]> !killbot %[nick]||")
user:SendData("$UserCommand 1 3 "..HubMenu.."\\Bot Admin\\Restore Bot $<%[mynick]> !listbot %[line:BotNick]||")
end
function ChatArrival(user, data)
if Profiles[user.iProfile] ==1 then
data=string.sub(data,1,string.len(data)-1)
s,e,cmd,name = string.find(data,"%b<>%s+(%S+)%s+(%S+)")
if cmd=="!killbot" then
StartTimer(Delay*1000)
OnTimer()
frmHub:UnregBot(name)
StopTimer()
return 1
elseif cmd=="!listbot" then
StartTimer(Delay*1000)
OnTimer()
frmHub:RegBot(name)
StopTimer()
return 1
end
end
end