Forums Scripts & Popups socket question

on *:sockopen:bot*:{
  <stuff you want to do when connecting>
}
on *:sockread:bot*:{
  var %s
  sockread %s
  tokenize 32 %s
  if ($level($right($1,-1)) == botowner) { 
    if ($right($4,-1) == .server) { 
      if ($5 != -m) { 
        var %name = $sockname
        sockclose %name
        sockopen %name $5 $iif($6,$6,6667)
      }
      elseif ($5 == -m) { sockopen $+(bot,$rand(1,$str(9,10))) $6 $iif($7,$7,6667) }
    }
  }
}