Requesting Script

ZaKiR · Post by **ZaKiR** » Fri Jun 18, 2004 4:14 pm

Hi.. It's me again... I need ur kind help

If someone says bad words in particular channels bot will perfrom this command /kill nick bad word detected

there will be set badword"" and set channels"" in this script

Thanks a lot...

Alchera · Post by **Alchera** » Fri Jun 18, 2004 4:50 pm

Look here

ZaKiR · Post by **ZaKiR** » Sat Jun 19, 2004 12:17 am

Not working... can`t find anyone... kill on badwords... someone please help me...

awyeah · Post by **awyeah** » Sat Jun 19, 2004 8:37 am

There are many scripts in the egghelp tcl archive for this purpose.
But they will kick ban a user instead of killing him from the server.

You might want to change the lines in the scripts which contain

putserv "KICK $chan $nick .......
putserv "MODE $chan $nick .......
or
the same with "putquick", "pushmode"
or
maybe 'newchanban $chan $banmask .....' or 'newban $banmask ......'

You would have to replace these lines with the kill command
in the tcl script, making sure your bot has an oline and can disconnect
that user from the server as well.

ZaKiR · Post by **ZaKiR** » Sat Jun 19, 2004 9:36 am

Please I cant make it... help me out.... thanks

greenbear · Post by **greenbear** » Sat Jun 19, 2004 11:11 am

Umm nice attitude.

ZaKiR · Post by **ZaKiR** » Sat Jun 19, 2004 11:16 am

gb bro... iwill be greatful if u help me... thanks a lot

.. love ya...

dollar · Post by **dollar** » Sat Jun 19, 2004 12:04 pm

Instead of posting useless crap, go fix your problem yourself

ZaKiR · Post by **ZaKiR** » Sat Jun 19, 2004 12:21 pm

If someone says bad words in particular channels bot will perfrom this command /kill nick bad word detected

there will be set badword"" and set channels"" in this script...

This is a simple code to u guyz... but for me it's impossible... iw ill be greateful... please help me out...

strikelight · Post by **strikelight** » Sat Jun 19, 2004 2:04 pm

Nothing is impossible... You can't keep making requests for someone else to keep doing the simplest of scripts for you... If you are going to need as many scripts as you seem to be requesting, then you really need to learn Tcl for yourself...

http://www.suninet.nl/tclguide/

ZaKiR · Post by **ZaKiR** » Sat Jun 19, 2004 2:07 pm

Please help for the last time

shanks · Post by **shanks** » Sat Jun 19, 2004 3:12 pm

zakir... do you even read people's replies?

there are already loads of badword scripts... just get one of those and just change the line that tells the bot what to do

ZaKiR · Post by **ZaKiR** » Sat Jun 19, 2004 3:17 pm

I do read people's reply.. all i need is just help...

ZaKiR · Post by **ZaKiR** » Sat Jun 19, 2004 4:56 pm

Code: Select all

bind pub - "!list" evil_word
bind pub - "@locate" evil_word
bind pubm - "*!list*" evil_word
bind pubm - "*@locate*" evil_word

#Set your channel name under the 'el_chan' variable and modify reason and banreason 
#to suit your liking (especially if you changed the word).
set el_chan ""
set reason "We \037strictly\037 prohibit the usage of the !list or @locate command, enjoy a 1 hour ban."
set banreason "!list and @locate are for losers."

#Under newchanban, change the 60 to the specified time you want the ban to last (in minutes).

proc evil_word {nick host hand chan args} {
global botnick el_chan banreason reason
    if {$chan != $el_chan} {return 0}
    if {$nick == $botnick} {return 0}
    if {[isop $nick $chan]} {return 0}
    newchanban $chan [maskhost $host] $botnick $banreason 60
    putserv "KICK $chan $nick :$reason"
    puthelp "NOTICE $nick :$reason"

	}    
return 1
}

Please modify it for kill (instead of ban) --> /kill nick reason

Thanks a lot

]Kami[ · Post by **]Kami[** » Sat Jun 19, 2004 6:51 pm

*tip*

putserv "KILL $nick :$reason"

But you also need to remove thingie for banning