Desynch
Desynch
- Code:
bind mode - * desynchmode
proc desynchmode { nick uhost hand chan modechange victim } {
global desynchnick desynchvictim desynchchan
if ![string compare $nick ""] {
if ![string compare $desynchvictim $victim]&&![string compare $chan $desynchchan] {
if [isop $desynchnick $chan] {
putserv "MODE $chan -ov $desynchnick $desynchnick"
} else {
putserv "KICK $chan $desynchnick Desynch, cycle please"
}
}
} else {
set desynchnick $nick
set desynchvictim $victim
set desynchchan $chan
}
}
putlog "Loaded : Desynch.Tcl Lucas <Lucas@eggdrop-fr.org> (22/7/99)"
Permission de ce forum:
Vous ne pouvez pas répondre aux sujets dans ce forum
|
|