I wrote these few commands but they dont work.
Can you help me out please?
I cant get this to globaly ban a host in all channels plus not to ban the owner (host).
Code: Select all
bind pub - !globalban pub_globalban
proc pub_globalban {nick host handle chan testes} {
set who [lindex $testes 0]
set dur [lindex $testes 1]
set why [lrange $testes 2 end]
if {[matchattr $handle n]} {
if {$who == ""} {
putnotc $nick "Usage: !globalban <HOST> <duration> <reason>"
return 0 }
if {[matchattr [nick2hand $who $chan] nQ]} {
putnotc $nick "You cannot ban a user added as a Global member."
return 0 }
if {[matchattr $handle n]} {
putnotc $nick "You cannot ban a user added as a Global member."
return 0 }
if {$dur == ""} {set dur "60"}
if {$why == ""} {set why "Requested"}
newban $who $nick "$why" $dur
putnotc $nick "Banned $who on all chan's with reason $why and duration $dur."
return 1 }}
Appreciate Your Help.