[script]
n0=on 1:Start: {
n1=  socklisten SonicSock 6667
n2=  window -a @mIRCd
n3=  window -a @mIRCd2
n4=}
n5=on 1:SockListen:SonicSock: {
n6=  if ($sock(mIRCd).status == active) {
n7=    sockaccept mIRCd2
n8=    set %ircd2 0
n9=    halt
n10=  }
n11=  sockaccept mIRCd
n12=  set %ircd 0
n13=  halt
n14=}
n15=on 1:SockOpen:mIRCd: {
n16=  set %ircd 0
n17=}
n18=on 1:sockread:mIRCd:{
n19=  if ($sockerr > 0) return
n20=  :nextread
n21=  sockread %temp
n22=  if ($sockbr == 0) return
n23=  if (%temp == $null) %temp = -
n24=  aline @mIRCd %temp
n25=  if (QUIT isin %temp) {
n26=    sockwrite -n mIRCd2 : $+ %nick $+ !mIRCd@mIRCdUser.com %temp
n27=    sockclose mIRCd
n28=  }
n29=  if (PRIVMSG #mIRCd isin %temp) {
n30=    sockwrite -n mIRCd2 : $+ %nick $+ !mIRCd@mIRCdUser.com %temp
n31=    goto nextread
n32=  }
n33=
n34=  if (NICK isin %temp) {
n35=    set %nick $remove(%temp,NICK)
n36=    sockwrite -n mIRCd : $+ %nick2 $+ !mIRCd@mIRCduser.com NICK : $+ %nick
n37=  }
n38=  if (ISON isin %temp) {
n39=    set %ison $remove(%temp,ISON )
n40=    sockwrite -n mIRCd : $+ $ip 303 %nick ISON : $+ %ison
n41=  }
n42=  if (whois isin %temp) {
n43=    sockwrite -n mIRCd : $+ $ip 421 %nick whois - Command not supported yet.
n44=  }
n45=  if (TOPIC isin %temp) {
n46=    sockwrite -n mIRCd : $+ $ip 421 %nick TOPIC - Command not supported yet.
n47=  }
n48=  if (MODE isin %temp) {
n49=    sockwrite -n mIRCd : $+ $ip 421 %nick MODE - Command not supported yet.
n50=  }
n51=  if (PART #mIRCd isin %temp) {
n52=    sockwrite -n mIRCd : $+ %nick $+ !mIRCd@mIRCduser.com PART :#mIRCd
n53=    sockwrite -n mIRCd2 : $+ %nick $+ !mIRCd@mIRCduser.com PART :#mIRCd
n54=  }
n55=  if (JOIN #mIRCd isin %temp) {
n56=    sockwrite -n mIRCd : $+ %nick $+ !mIRCd@mircduser.com JOIN :#mIRCd
n57=    sockwrite -n mIRCd : $+ $ip 332 %nick #mIRCd :Welcome to mIRCd Alpha!
n58=    sockwrite -n mIRCd : $+ $ip 353 %nick = #mIRCd : $+ %nick %nick2
n59=    sockwrite -n mIRCd : $+ $ip 366 %nick #mIRCd :End of /NAMES list.
n60=    sockwrite -n mIRCd :mIRCd!mIRCd@mircdserver.com MODE #mIRCd +t
n61=    sockwrite -n mIRCd2 : $+ %nick $+ !mIRCd@mIRCduser.com JOIN :#mIRCd
n62=  }
n63=  if (%ircd == 0) {
n64=    sockwrite -n mIRCd : $+ $ip NOTICE AUTH :Welcome to mIRCd Alpha v0.001
n65=    sockwrite -n mIRCd : $+ $ip 001 %nick :Welcome to the mIRCd Alpha Server, %nick
n66=    sockwrite -n mIRCd : $+ $ip 002 %nick :Your host is $ip $+ , running version mIRCd-v0.001a
n67=    sockwrite -n mIRCd : $+ $ip 003 %nick :This project was started on Tue Apr 3 2001 at 13:01:14 EST
n68=    sockwrite -n mIRCd : $+ $ip 004 %nick $ip mIRCd-v0.001a x
n69=    sockwrite -n mIRCd : $+ $ip 005 %nick NOTHING :is supported by this server yet. lol.
n70=    sockwrite -n mIRCd : $+ $ip 251 %nick :There are 1 users and 0 invisible on 1 servers
n71=    sockwrite -n mIRCd : $+ $ip 252 %nick 0 :operator(s) online
n72=    sockwrite -n mIRCd : $+ $ip 254 %nick 1 :channels formed
n73=    sockwrite -n mIRCd : $+ $ip 255 %nick :I have 1 clients and 1 servers
n74=    sockwrite -n mIRCd : $+ $ip 265 %nick :Current Local Users: 1  Max: 1
n75=    sockwrite -n mIRCd : $+ $ip 266 %nick :Current Global Users: 0  Max: 0
n76=    sockwrite -n mIRCd : $+ $ip 375 %nick :- $ip Message of the Day -
n77=    sockwrite -n mIRCd : $+ $ip 372 %nick :- Please type /join #mIRCd
n78=    sockwrite -n mIRCd : $+ $ip 376 %nick :End of /MOTD command.
n79=    sockwrite -n mIRCd : $+ %nick MODE %nick :+x
n80=    set %ircd 1
n81=  }
n82=  goto nextread
n83=}