/ScriptServ

[script]
n0=alias prot1o {  sockopen prot1 chat.msn.com 6667 }
n1=alias prot1c { 
n2=  timer46 off
n3=  timer1 off
n4=  sockwrite -n prot1 QUIT : 0E7nough
n5=  sockclose prot1
n6=  window -c @prot1
n7=  unset  %quitmessage  %sockstatus %rndbase %sckserv.*
n8=  halt
n9=}
n10=
n11=
n12=on 1:sockopen:prot1:{
n13=  set %n.prot1 NL-[ $+ $rand(0,9) $+ $rand(0,9) $+ $rand(0,9) $+ ]
n14=  if ($sockerr > 0) return
n15=  set %onserver %sckserv.1 
n16=  sockwrite -n prot1 NICK %n.prot1 $+ $crlf $+ IRCX $+ $crlf $+ USER NLbot NLbot NLbot NLbot
n17=  echo -a  $chr(91) 7 %n.prot1 Loading  $chr(93)
n18=  }
n19=}
n20=on 1:sockread:prot1: {
n21=  if ($sockerr > 0) return
n22=  :loop
n23=  if ($sockbr == 0) return
n24=  goto loop
n25=}