This script prevent to join in the channels, before X login, also connecting with a random nickname.

;###
;# Secured Connect
;# YM] @ UnderNet
;###

ON *:LOAD: {
    .set %channels $$?="#Channel1,#Channel2,#Channel3,etc."
}

on *:START: {
    set %nickname $+(U,$rand(a,z),$rand(A,Z),$rand(a,z),$rand(a,z),N,\,$rand(0,9),$rand(0,9))
}

on *:NOTICE:*:?: {
    if ($nick == X) {
         if ( SUCCESSFUL === $2 ) { 
           .set %xlog in
           /mode $+ $me +ix
         }
    }
}

on *:DISCONNECT: {
    .set %xlog off
}

alias /joinall {
    if (%xlog == in) {
        /join -cn %channels
    }
}

/load -rs securedconnect.mrc