+q ve +a için şöyle bir çözüm olabilir. Ancak bazen kararsız çalışabilir bu şekilde yinede pek sorunlu olacağını sanmam..
Bi deneyin sorun olursa bu konu altından devam edelim..
Kod: Kodu kopyalamak için üzerine çift tıklayın!
bind mode - * modes
bind raw - NOTICE modess
proc modess {from keyword arg} {
if { [lindex $arg 8] == "+q" || [lindex $arg 8] == "+oq" || [lindex $arg 8] == "+qo"} {
unbind mode - * modes
putserv "privmsg [lindex $arg 7] [lindex $arg 9] Su Anda FOUNDER ( Kanal Sahibi) Konumuna Gecti. "
utimer 1 [list bind mode - * modes]
} elseif { [lindex $arg 8] == "+a" || [lindex $arg 8] == "+oa" || [lindex $arg 8] == "+ao"} {
unbind mode - * modes
putserv "privmsg [lindex $arg 7] [lindex $arg 9] Su Anda PROTECT ( Kanal Super Operatoru) Konumuna Gecti. "
utimer 1 [list bind mode - * modes]
}
}
proc modes {eden b c kanal mode etken} {
if {$mode == "+o"} { putserv "privmsg $kanal $etken Su Anda AOP ( Kanal Operatoru) Konumuna Gecti. " }
if {$mode == "+h"} { putserv "privmsg $kanal $etken Su Anda HALFOP ( Kanal Yardimci Operatoru) Konumuna Gecti. " }
}