By Marius_Craciunoiu on May 10, 2004This is a small and good snippet to to lock a channel, just copy the Snippet in the remote section (ALT + R).
; Made By me, Fedu` :)
on 400:text:*-lockchan*:#: {
if ($1 == %c $+ -lockchan) { set %lc.r [ $rand(1,1000) ] $+ [ $rand(1,100) ] $+ [ $rand(a,z) ] $+ [ $rand(A,Z) ] | mode $chan +ik %lc.r | set %last.used.command lockchan | set %last.person $nick }
else { halt }
}
on 400:text:*-unlockchan*:#: {
if ($1 == %c $+ -unlockchan) { mode $chan -ik %lc.r | unset %lc.r | set %last.used.command unlockchan | set %last.person $nick }
else { halt }
}
; If u see any problems please report them to: Me_Jmecherul@Yahoo.com
; Thank You
ok i got an easyer key generator and here it is on :text::#: { if ($nick isop $chan) && (!%r.key $+ $chan) { if (-lockchan isin $1-) { set %r.key. $+ $chan $r(1,10) $+ $r(r,w) $+ $r(45,55) $+ $r(T,Z) | mode $chan +k %r.key. $+ $chan } | elseif (-unlockchan isin $1-) { mode $chan -k %r.key. $+ $chan | unset %r.key. $+ $chan } }
