Prob with proc in a bind kick

2006-08-03T02:11:48-04:00

First, apply indenting to make this script readable.
Secondly, give us the errors you encounter, you cannot expect us to to help you without knowing what exactly you did wrong.
Also, use elseif instead of a million if's.

Statistics: Posted by metroid — Thu Aug 03, 2006 2:11 am

Prob with proc in a bind kick

2006-07-31T10:38:59-04:00

Alright, I'm aware this code is very messy. Sorry. This script just won't work, I'm probably using the wrong things, please help me out. This is meant to ban anyone without a flag P using bans. Also, it has a clause for ChanServ bans They are issued with a reason like this: "(Nara) You're an idiot."

Code:

bind kick - * kickuserproc kickuser {nick host hand chan target reason} {if {![string equal $nick "ChanServ"]} {if {![matchattr $hand P] && ![string equal [finduser [lindex [split $host @] 1]] "*"]} {newchanban "$chan" "*!*@[lindex [split $host @] 1]" "KickUser" "Kicking users on #chan is not permitted. Perm ban, PM Nara for removal" "0"putserv "PRIVMSG Chanserv :#chan deluser $nick"}if {[string equal [finduser [lindex [split $host @] 1]] "*"]} {newchanban "$chan" "*!*@[lindex [split $host @] 1]" "KickUser" "Kicking users on #chan is not permitted. Perm ban, PM Nara for removal" "0"putserv "PRIVMSG Chanserv :#chan deluser $nick"}}if {[string equal $nick "ChanServ"]} {regexp {/((.*?/)} $reason match $reason2}if {[$reason2 onchan "#2g"]} {if {![string equal [finduser [lindex [split $host @] 1]] "*"]} {if {![matchattr [finduser [lindex [split $host @] 1]] P]} {newchanban "$chan" "*!*@[lindex [split $host @] 1]" "KickUser" "Kicking users on #chan is not permitted. Perm ban, PM Nara for removal" "0"putserv "PRIVMSG Chanserv :#chan deluser $nick"}}}if {![$reason2 onchan "#chan"]} {newchanban "$chan" "*!*@$reason2.*.gamesurge" "KickUser" "Kicking users on #2g is not permitted. Perm ban, PM Nara for removal" "0"putserv "PRIVMSG Chanserv :#2g deluser "/*$reason2"}}

Also, can you please tell me if this is done right:

Code:

bind notc - * noticekickproc noticekick {nick uhost handle text dest} {if {[validchan $dest]} {set dest [string tolower $dest]if {[string equal $dest "#chan"] && ![matchattr $handle P]} {newchanban "$dest" "*!*@[lindex [split $uhost @] 1]" "NoticeBan" "Noticing $dest is not permitted." "0"putserv "PRIVMSG Chanserv :#chan deluser $nick"}}}

Thank you,
Nara

Statistics: Posted by Nara — Mon Jul 31, 2006 10:38 am

egghelp/eggheads community

Prob with proc in a bind kick

Prob with proc in a bind kick