on *:CONNECT:{
var %i = 1
while $var(%operline.server.*,%i) {
if $eval($ifmatch,2) == $server {
var %a = $gettok($var(%operline.server.*,%i),3,46)
oper $eval($+(%,operline.handel.,%a),2) $decode($eval($+(%,operline.password.,%a),2))
break
}
inc %i
}
}