Hello, i am new here!
I want request an script, if`s posseble to create it. :D
I am not use an Channelbot ore securitybot ...like robocop becurse i use little scripts.(i found for robo already)
But wat i need is an script ware i can edit my own commands for the little scripts with an sub main Menu with his own name wat i like (Withouth Robo ore some kind like it) ? is that posseble ?
It wil be very nice if you can look for an Bot hider Script to (i have seen mutch hubs with 15 bots) i want thake care that on my hub on the biggining not more Bots than users online being online than :=).
Ore an cind of it to hide Bots and ops
thanks for atention .... :))
just use the same botname for all scripts... if the commands are different that is.
then only one bot shows in the userlist.
i tryt to run the sript from Rightclicker for Robo .. but he doned work. i do not use robo! .... that script was thinking it is only for robo .. isn`t ?
-- 1=on / 0=off
SendTo = {
- = 1, -- Masters
[1] = 1, -- Operators
[2] = 1, -- Vips
[3] = 1, -- Regs
[-1] = 1, -- Users
}
sMenu = "RC"
-- End Editable Settings --
assert(dofile("tbl/checklevel.tbl"),"tbl/checklevel.tbl not found")
function OpConnected(user)
customCMDs(user)
if (SendTo[user.iProfile]==1) then
GetRightClickComs(user)
user:SendData(" Enhanced Right Click Support for [RoboCop] is available!")
end
end
function NewUserConnected(user)
customCMDs(user)
if (SendTo[user.iProfile]==1) then
GetRightClickComs(user)
user:SendData(" Enhanced Right Click Support for [RoboCop] is available!")
end
end
function GetRightClickComs(user)
TCopy={}
for cmd,_ in LevelCheck do
if LevelCheck[cmd][user.iProfile] == 1 then
for value,command in RightClick do
if cmd == value then
tinsert(TCopy,{value,command})
end end end end
sort(TCopy,function(a,b) return (a[1] < b[1]) end)
for t = 1, getn(TCopy) do
if TCopy[t] then user:SendData(TCopy[t][2])
end end TCopy={} collectgarbage() flush()
end
function customCMDs(user)
user:SendData("$UserCommand 1 3 "..sMenu.."\\play a round\\punch$<%[mynick]> !punch %[nick]||") -- punch
user:SendData("$UserCommand 1 3 "..sMenu.."\\play a round\\slapper$<%[mynick]> !slap %[nick]||") -- slap
user:SendData("$UserCommand 1 3 "..sMenu.."\\play a round\\Aliens$<%[mynick]> !Alien %[nick]||") -- Alien
user:SendData("$UserCommand 1 3 "..sMenu.."\\play a round\\farting$<%[mynick]> !fart %[nick]||") -- fart
user:SendData("$UserCommand 1 3 "..sMenu.."\\play a round\\cunt munching$<%[mynick]> !cunt %[nick]||") -- cunt
user:SendData("$UserCommand 1 3 "..sMenu.."\\play a round\\dick$<%[mynick]> !dick %[nick]||") -- dick
user:SendData("$UserCommand 1 3 "..sMenu.."\\play a round\\kiss$<%[mynick]> !kiss %[nick]||") -- kiss
user:SendData("$UserCommand 1 3 "..sMenu.."\\play a round\\love$<%[mynick]> !love %[nick]||") -- love
end
RightClick = {
[10]="$UserCommand 1 3 "..sMenu.."\\KICK/BAN\\Kick User$<%[mynick]> !kick %[nick] %[line:Reason]||", -- kick
[20]="$UserCommand 1 3 "..sMenu.."\\KICK/BAN\\Ban
........ the message is to long i can not post the whole script :((
hai Acidpadd
trey this one
---------------------------------------------------------------------
-- rightclicker
Bot = "Richtclik" -- your main bot here
SendComm = 1 -- Send user command [right click] "1"=yes "0"=no
fMenu = "-=( Rightcklik )=-" -- funMenu Name
SetTo = {
- = 1, -- Masters
[1] = 1, -- Operators
[2] = 1, -- Vips
[3] = 1, -- Regs
[4] = 1, -- Moderator
[5] = 1, -- NetFounder
[-1] = 1, -- Users
}
--------------------------------------------------------------------------------------------------------------------
--$UserCommand 1 X Where -> 1=Hub Menu 2=User Menu 3=Hub/User Menu
--
function NewUserConnected(user)
if SendComm == 1 and SetTo[user.iProfile] == 1 then
user:SendData("$UserCommand 1 3 "..fMenu.."\\play a round\\punch$<%[mynick]> !punch %[nick]||") -- punch
user:SendData("$UserCommand 1 3 "..fMenu.."\\play a round\\slapper$<%[mynick]> !slap %[nick]||") -- slap
user:SendData("$UserCommand 1 3 "..fMenu.."\\play a round\\Aliens$<%[mynick]> !Alien %[nick]||") -- Alien
user:SendData("$UserCommand 1 3 "..fMenu.."\\play a round\\farting$<%[mynick]> !fart %[nick]||") -- fart
user:SendData("$UserCommand 1 3 "..fMenu.."\\play a round\\cunt munching$<%[mynick]> !cunt %[nick]||") -- cunt
user:SendData("$UserCommand 1 3 "..fMenu.."\\play a round\\dick$<%[mynick]> !dick %[nick]||") -- dick
user:SendData("$UserCommand 1 3 "..fMenu.."\\play a round\\kiss$<%[mynick]> !kiss %[nick]||") -- kiss
user:SendData("$UserCommand 1 3 "..fMenu.."\\play a round\\love$<%[mynick]> !love %[nick]||") -- love
end
end
OpConnected = NewUserConnected
function Main()
--frmHub:RegBot(Bot)
end
This can only work if robocop profiles are installed or he has the exact same levels....