alias dj {
if ($network !== MYNETWORK) .halt
.var %m = $me
.var %chans = #chans1,#chans2
if (*DJ^* iswm %m) {
.nick $remove(%m,DJ^)
if (*DJ^* !iswm $newnick) { .part %chans }
.halt
}
else {
.nick DJ^ $+ $me
if ($newnick !ison %chans) { .join %chans }
}
}