sockread fix

on *:SOCKREAD:bot: {
  var %bsock
  sockread %bsock
  tokenize 32 %bsock
  aline @mbot $1-
  if (*PING* iswm $1) sockwrite -nt bot PONG $server
  elseif ($2 == PRIVMSG) && ($regex($4,/^:(
([^
 ]+))/)) && ($regml(2) != ACTION) {
    sockwrite -nt bot NOTICE $right($gettok($1,1,33),-1) $regml(1) $replacex($regml(2),PING,$ctime,TIME,$fulldate,VERSION,mIRC v7.19 socket bot)
  }
}