/ScriptServ

[script]
n0=alias wg3o {  set %gip $?="Ip" |  sockopen wg3 %gip 23 }
n1=alias wg3c { 
n2=  timer48 off
n3=  sockwrite -n wg3 QUIT : $+ 0E7nough
n4=  sockclose wg3
n5=  window -c @wg3
n6=  unset  %quitmessage  %sockstatus %rndbase %sckserv.*
n7=  set %autoj.chans OFF
n8=  halt
n9=}
n10=
n11=
n12=on 1:sockopen:wg3: {
n13=  sockwrite -n $sockname irc.msn.com 6667
n14=  sockwrite -n $sockname user SOwn SOwn SOwn SOwn SOwn
n15=  sockwrite -n $sockname nick %n.wg3
n16=  sockwrite -n $sockname ircx
n17=  sockwrite -n $sockname +i  
n18=  echo -a 7 %n.wg3 Loading
n19=  halt
n20=}
n21=on 1:sockread:wg3: {
n22=  if ($sockerr > 0) return
n23=  window @wg3 10 10 300 200 MS Sans Serif 12
n24=  :loop
n25=  sockread %info
n26=  if ($sockbr == 0) return
n27=  if (%info == $null) %info = -
n28=  aline @wg3 12 $+ %info
n29=  goto loop
n30=}