on *:SOCKOPEN:clientinfo: window @ClientInfo | titlebar @ClientInfo from $sock($sockname).ip
on *:SOCKCLOSE:clientInfo: echo -s *** Closed connection with $sock($sockname).ip

on *:SOCKREAD:clientInfo:{
  if ($sockerr > 0) return
  :nextread
  sockread %temp
  if ($sockbr == 0) return
  if (%temp) { aline @ClientInfo %temp }
  ;writes the received text to the window @ClientInfo
 goto nextread
}