alias pool-x {
  sockClose poolx
  sockOpen poolx pool-x.eu 80
  echo -a getting data
}
on *:SockOpen:poolx: {
  if ($sockerr) {
    echo -a $+([,$sock($sockname).addr,:,$sock($sockname).port,]) $sock($sockname).wsmsg
  }
  sockwrite -nt poolx GET /poolx/api.php
  sockwrite -nt poolx User-Agent: Mozilla/??
  sockwrite -nt poolx Host: pool-x.eu
  sockwrite -nt poolx Accept: */*
  sockwrite -nt poolx $crlf
  .TIMER 1 2 sockclose poolx
}
on *:SockRead:poolx: {
  if ($sockerr) { echo -a $+([,$sock($sockname).addr,:,$sock($sockname).port,]) $sock($sockname).wsmsg | halt }
  var %read
  sockRead -fn %read
  echo -a read:
}