Code:
alias orbital3 {
  Sockclose Orbital3
  SockOpen Orbital3 www.orbital.pt 80
}

On *:sockopen:Orbital3:{
  if ($sockerr) {
    echo -s XBC Socket Error Falha na conecção (# $+ $sock($sockname).wserr $+ ) $sock($sockname).wsmsg
    return
  }
  sockwrite -n Orbital3 GET /atocar.php HTTP/1.0
  sockwrite Orbital3 Host: www.orbital.pt $+ $str($crlf,2)
}

on *:sockread:Orbital3: {
  sockread 900 &data
  echo -s $SockName
  echo -s $bvar(&data,1-).text
}

on *:sockclose:Orbital3: {
  echo -s $SockName close
}