I am looking for !help script.
I whant that help is shown in PM and ptokax help won't show.
If it's posible to show for each profile each help?
For masters, for operators, for vips, regs and standart users.
If it is posible, then please can you give me that script?
Can somebody help me? Please!!!
:D
OK! I found one but it doesn't work.
Kos = "LV"
function Main()
frmHub:RegBot(Kos)
end
function DataArrival(user, data)
if (strsub(data,1,1) == "<") then
data = strsub(data,1,strlen(data)-1)
local s,e,cmd = nil
s,e,cmd = strfind(data, "%b<>%s+(%S+)")
if cmd == "+help" then
local _,_,type = strfind(data,"%b<>%s+%S+%s+(%S+)")
user:SendPM(Kos, Help(user, type))
end
end
end
function Help(user)
local disp = "\r\n\r\n"
if (user.iProfile == 5) then
disp = disp.."~~ COMANDI PER GLI UTENTI: ~~\r\n\r\n"
disp = disp.."\r\n"
disp = disp.." !report - Spedisce un messaggio agli Operatori\r\n"
disp = disp.." !changepass - Cambia la tua attuale password\r\n"
disp = disp.." !me - Fai un discorso in terza persona\r\n"
disp = disp.." +help - Visualizza questa finestra\r\n"
disp = disp.."\r\n"
elseif (user.iProfile == 2) then
disp = disp.."\r\n"
disp = disp.."~~ COMANDI PER GLI OPERATORI: ~~\r\n\r\n"
disp = disp.."\r\n"
disp = disp.." !boom - Banna un utente\r\n"
disp = disp.." !disconnect - Disconnette un utente\r\n"
disp = disp.." !addreg - Registra un utente (livello consentito Reg)\r\n"
disp = disp.." !delreg - Deregistra un utente (livello consentito Reg)\r\n"
disp = disp.." !mass - Spedisce un messaggio a tutti (comando abbreviato !mm)\r\n"
disp = disp.."\r\n"
elseif (user.iProfile == 4) then
disp = disp.."\r\n"
disp = disp.."~~ COMANDI PER I MODERATORI: ~~\r\n\r\n"
disp = disp.."\r\n"
disp = disp.." !getbanlist - Mostra la lista dei bannati\r\n"
disp = disp.." !getinfo - Mostra le informazioni di un nick\r\n"
disp = disp.." !gag - Imbavaglia un utente\r\n"
disp = disp.." !ungag - Leva il bavaglio\r\n"
disp = disp.." !clrtempban - Cancella lista dei ban temporanei\r\n"
disp = disp.." !clrpermban - Cancella la lista dei ban permanenti\r\n"
disp = disp.."\r\n"
elseif (user.iProfile == 0) then
disp = disp.."\r\n"
disp = disp.."~~ COMANDI PER I MASTER: ~~\r\n\r\n"
disp = disp.."\r\n"
disp = disp.." !reloadtxt - Fai ripartire tutti i textfiles\r\n"
disp = disp.."\r\n"
elseif (user.iProfile == 1) then
disp = disp.."\r\n"
disp = disp.."~~ COMANDI PER GLI ADMIN: ~~\r\n\r\n"
disp = disp.."\r\n"
disp = disp.." !restartscripts - Resetta gli script\r\n"
disp = disp.." !stat - Mostra le statisctiche dell'hub\r\n"
disp = disp.." !topic - Setta un nuovo topic. O !topic off per cancellare il topic\r\n"
disp = disp.." !ipinfo - Mostra tutte le informazioni di un ip\r\n"
disp = disp.." !iprangeinfo - Mostra le informazioni di un iprange\r\n"
disp = disp.." !userinfo - Mostra le visite di un certo utente\r\n"
disp = disp.."\r\n"
elseif (user.iProfile == 0) then
disp = disp.."\r\n"
disp = disp.."~~ COMANDI PER GLI OWNER: ~~\r\n\r\n"
disp = disp.."\r\n"
disp = disp.." !hubname - Cambia il nome dell'hub\r\n"
disp = disp.." !hubdescr - Cambia la descrizione dell'hub\r\n"
disp = disp.." !setredirect - Setta l'indirizzo di redirect\r\n"
disp = disp.." !setredirectall - Setta l'indirizzo dove redirettare tutti\r\n"
disp = disp.." !setredirectfull - Setta l'indirizzo del redirect nel caso in cui l'hub sia pieno\r\n"
disp = disp.." !setregserver - Setta l'indirizzo del Server dove registrare l'hub\r\n"
disp = disp.." !setminshare - Setta lo share minimo (grandezza: 0=byte 1=KB 2=MB 3=GB)\r\n"
disp = disp.." !setmaxuser - Setta il numero massimo di utenti\r\n"
disp = disp.." !setmaxslots - Setta il numero massimo di slots che un utente pu? tenere aperti\r\n"
disp = disp.." !setminslots - Setta il numero minimo di slots che un utente pu? tenere aperti\r\n"
disp = disp.." !setslotratio - Setta il numero di slots aperti in relazione agli hub aperti\r\n"
disp = disp.." !setmaxhub - Setta il numero massimo di hub in cui un utente pu? stare\r\n"
disp = disp.." !op - Permette di creare un op temporaneo fino a quendo non si sconnette\r\n"
disp = disp.." !restart - Fai ripartire l'hub\r\n"
disp = disp.."\r\n"
end
return disp
end
Can somebody fix this script?
Hi,
That script was made to a certain bot i belive, nad have differents profiles. Give us all ptokax commands and we can do that.
Best regards, nErBoS
wouldn't using a bot like robocop look after this?
But I don't whant to use robocop. I whant it seperately.
QuoteOriginally posted by Janhouse
But I don't whant to use robocop. I whant it seperately.
the problem is that the help menu is depending on the bot you are running.
having a standalone help menu is always in someway gone fail.
but what would make it the easyest for you is a kind of texter bot, showing different files on the same command.
that way you can just mod the text files 2 show the commands for the users level.
plop
Ploop can you give me that script?
This works :D
Just add in the commands you want users to see.
Hope you know how to do that ;)
**************************************
Modyfied by: (=CyberPimp=)
Made by: ?
**************************************
Bot = "Commands"
function Main()
frmHub:RegBot(Bot)
end
function DataArrival(user, data)
if (strsub(data,1,1) == "<")or (strsub(data,1,5+strlen(Bot))=="$To: "..Bot) then
data = strsub(data,1,strlen(data)-1)
local s,e,cmd = nil
s,e,cmd = strfind(data, "%b<>%s+(%S+)")
if cmd == "+help" then
local _,_,type = strfind(data,"%b<>%s+%S+%s+(%S+)")
user:SendPM(Bot, Help(user, type))
end
end
end
function Help(user)
local disp = "\r\n\r\n"
if (user.iProfile == 0) then
disp = disp.."\r\n"
disp = disp.." MASTER COMMANDS \r\n\r\n"
disp = disp.." !rules - Shows you the rules of the hub\r\n"
disp = disp.." \r\n"
disp = disp.."\r\n"
elseif (user.iProfile == 1) then
disp = disp.."\r\n"
disp = disp.." OPPERATOR \r\n\r\n"
disp = disp.." \r\n"
disp = disp.." \r\n"
disp = disp.."\r\n"
elseif (user.iProfile == 2) then
disp = disp.."\r\n"
disp = disp.." V.I.P User COMMANDS\r\n\r\n"
disp = disp.." \r\n"
disp = disp.." \r\n"
disp = disp.."\r\n"
elseif (user.iProfile == 3) then
disp = disp.."\r\n"
disp = disp.." Registerd User COMMANDS\r\n\r\n"
disp = disp.." \r\n"
disp = disp.." \r\n"
disp = disp.."\r\n"
elseif (user.iProfile == 4) then
disp = disp.."\r\n"
disp = disp.." User \r\n\r\n"
disp = disp.." \r\n"
disp = disp.." \r\n"
disp = disp.."\r\n"
elseif (user.iProfile == 5) then
disp = disp.."\r\n"
disp = disp.." 5 \r\n\r\n"
disp = disp.." \r\n"
disp = disp.." \r\n"
disp = disp.."\r\n"
end
return disp
end
untested modded version of my texterbot V1.
-- help texter bot by plop.
-- thx 2 chilla for the faster routine for opening the files.
-- shows help files per user level.
-- doesn't mather what prefix is used.
-- help.txt
-- examples:
-- help-1.txt for unregged users.
-- help0.txt for masters.
Bot = "something"
FDFolder = "text"
function Main()
frmHub:RegBot(Bot)
end
function DataArrival(user, data)
data=strsub(data,1,strlen(data)-1)
if( strsub(data, 1, 1) == "<" ) then
s,e,cmd = strfind(data,"%b<>%s+(%S+)")
cmd = strsub(cmd, 2,strlen(cmd))
if cmd == "help" then
showtext(user)
return 1
end
elseif(strsub(data, 1, 4) == "$To:") then
s,e,cmd = strfind(data,"$To:%s+%S+%s+From:%s+%S+%s+$%b<>%s+(%S+)")
cmd = strsub(cmd, 2,strlen(cmd))
if cmd == "help" then
showtext(user)
return 1
end
end
end
function showtext(user)
local handle = openfile(FDFolder.."/help"..(user.iProfile or "")..".txt", "r")
local contents = gsub(read(handle, "*a"),strchar(10), "\r\n")
closefile (handle)
user:SendPM(Bot, "\r\n"..contents.."\r\n|")
endplop
It doesn't work. Maybe that I am using PtokaX DC Hub 0.3.3.0 build 15.25 [debug] helps.
QuoteOriginally posted by Janhouse
It doesn't work. Maybe that I am using PtokaX DC Hub 0.3.3.0 build 15.25 [debug] helps.
which 1 doesn't work?
plop
both of them
just tested my version and it works 100%.
remember that you need 2 make a folder called text in the scripts directory.
after that you make the help text files for every level in that text folder.
help0.txt -- master help.
help1.txt -- operator help.
help2.txt -- vip help.
help3.txt -- user help.
help-1.txt -- unreg user help.
all of them user the same command +help/!help to view it.
plop
Thanx... I will try!