elseif ($1 == USER) { eircd.info nick $sockname %eircd if (!$eircd.user($sockname,2)) { hadd users $sockname $eircd.user($sockname,1) $2 $sock($sockname).ip + $remove($3,") $sock($sockname).ip $5- eircd.write $sockname : $+ $eircd.set(server,server) 001 $eircd.user($sockname,1) :Welcome to the $eircd.set(server,name) $eircd.host($sockname) eircd.write $sockname : $+ $eircd.set(server,server) 002 $eircd.user($sockname,1) :Your host is $eircd.set(server,server) running EIRCD v2.3.7 eircd.write $sockname : $+ $eircd.set(server,server) 003 $eircd.user($sockname,1) :This server was created $eircd.set(dontedit,created) eircd.write $sockname : $+ $eircd.set(server,server) 004 $eircd.user($sockname,1) $eircd.set(server,name) EIRCD v2.3.7 xiSawc tmsiklOxNnHhUuRrCcASovb if (!$hget(eircd,modes)) { var %a 1 | while ($gettok($eircd.set(server,modes),%a,32)) && ($gettok($eircd.set(server,prefixs),%a,32)) { hadd eircd modes $hget(eircd,modes) $gettok($eircd.set(server,modes),%a,32) | hadd eircd prefixs $hget(eircd,prefixs) $v1 | inc %a } } eircd.write $sockname : $+ $eircd.set(server,server) 005 $eircd.user($sockname,1) $+(PREFIX=,$chr(40),$remove($hget(eircd,modes),$chr(32)),$chr(41),$remove($hget(eircd,prefixs),$chr(32)) CHANTYPES=# CHANMODES=b,$chr(44),k,$chr(44),l,$chr(44),tmsiOxNnHhUuRrCcASov MAXCHANNELS=,$eircd.set(server,maxchans) :are supported by this server.) eircd.write $sockname : $+ $eircd.set(server,server) 005 $eircd.user($sockname,1) $+(NICKLEN=,$eircd.set(server,maxnicklen) NETWORK=,$eircd.set(server,name) TOPICLEN=,$eircd.set(server,maxparamlen) KICKLEN=,$eircd.set(server,maxparamlen) AWAYLEN=,$eircd.set(server,maxparamlen) CHANNELLEN=,$eircd.set(server,maxchanlen) :are supported by this server.) eircd.write $sockname : $+ $eircd.set(server,server) 251 $eircd.user($sockname,1) :There are $calc($hget(users,0).item + $hget(ircops,0).item) users out of the max $eircd.set(server,maxusers) users on the server eircd.write $sockname : $+ $eircd.set(server,server) 252 $eircd.user($sockname,1) $hget(ircops,0).item :operator $+ $iif($hget(channels,$hget(ircops,0)) != 1,s) online eircd.write $sockname : $+ $eircd.set(server,server) 254 $eircd.user($sockname,1) $hget(channels,0).item :channel $+ $iif($hget(channels,0) != 1,s) formed if (!$hget(eircd,nickallow)) { var %i 1 | while %i <= $gettok($eircd.set(server,nickallow),0,32) { if ($gettok($eircd.set(server,nickallow),%i,32) isnum 1-255) && (!$istok(32 9 13 10 64 43,$gettok($eircd.set(server,nickallow),%i,32),32)) { hadd eircd nickallow $hget(eircd,nickallow) $chr($gettok($eircd.set(server,nickallow),%i,32)) } | inc %i } } enotice $sockname $eircd.set(server,server) The valid nickname characters are: $hget(eircd,nickallow) eircd.motd $sockname } }