bind join - * madalin

proc madalin {nick uhost hand chan} { 
global botnick settings
if {[string equal -nocase $nick $botnick]} {return}
if {[string equal -nocase $chan $settings(homechan)]} {return}
if {[matchattr $hand N|- $chan]} {puthelp "PRIVMSG $chan :\001ACTION 12A intrat 3->> 14 $nick  3<<- 12Este 4Manager3 pe $settings(suppchan)\001"; return} 
if {[matchattr $hand n|- $chan]} {puthelp "PRIVMSG $chan :\001ACTION 12A intrat 3->> 14 $nick  3<<- 12Este 4Owner3 pe $settings(suppchan) \001"; return} 
if {[matchattr $hand m|- $chan]} {puthelp "PRIVMSG $chan :\001ACTION 12A intrat 3->> 14 $nick  3<<- 12Este 4Master3 pe $settings(suppchan) \001"; return} 

if {[matchattr $hand -|N $chan]} {puthelp "PRIVMSG $chan :\001ACTION 12HooPaa a Intrat 3->> 14 $nick  3<<- 12Este 4Manager3 pe $chan \001"; return} 
if {[matchattr $hand -|n $chan]} {puthelp "PRIVMSG $chan :\001ACTION 12HooPaa a Intrat 3->> 14 $nick  3<<- 12Este 4Owner3 pe $chan \001"; return} 
if {[matchattr $hand -|m $chan]} {puthelp "PRIVMSG $chan :\001ACTION 12HooPaa a Intrat 3->> 14 $nick  3<<- 12Este 4Master3 pe $chan \001"; return} 
if {[matchattr $hand -|v $chan]} {puthelp "PRIVMSG $chan :\001ACTION 12HooPaa a Intrat 3->> 14 $nick  3<<- 12Este 4Voice3 pe $chan \001"; return}

if {[matchattr $hand v|- $chan]} {puthelp "PRIVMSG $chan :\001ACTION 12A intrat 3->> 3->> 14 $nick  3<<- 12Este 4Voice3 pe $settings(suppchan) \001"; return} 

}