not a single socket script I try to use, they never work frown
Here's a very recent example I got from zad0909.

Code:
on *:TEXT:!clan*:#:{
  var %sckid = $right($ticks,5)
  if ($2 == $null) { set %clan.nick. $nick }
  if ($2 != $null) { set %clan.nick. $replace($2- ,$chr(32),_) }
  if ($left($1,1) == !) set %clan.way. notice $nick
  if ($left($1,1) == @) set %clan.way. msg $chan
  sockopen clan. [ $+ [ %sckid ] ] runehead.com 80
}
on *:SOCKOPEN:clan.*: {
  sockwrite -nt $sockname GET /feeds/lowtech/searchuser.php?user= $+ %clan.nick. $+ &type=2 HTTP/1.1
  sockwrite -nt $sockname Host: runehead.com
  sockwrite -nt $sockname $crlf
}
on *:SOCKREAD:clan.*: { 
  if ($sockerr) { 
    %clan.way. Socket Error: $sockname $+ . Error code: $sockerr Please inform $me of this error message. 
    return 
  } 
  else { 
    var %sockreader 
    sockread %sockreader 
    if (*|* iswm %sockreader) { 
      noop $regex(%sockreader,/(.*?)\|(.*)/Si)
      set %clan.name $regml(1) 
      set %clan.url $regml(2) 
      %clan.way. Clan: %clan.name URL: %clan.url 
      sockclose $sockname 
    } 
    elseif (*Not Found* iswm %sockreader) { 
      %clan.way. ERROR: %clan.nick. isn't in any clanlist. 
      sockclose $sockname 
    } 
  } 
}

If anyone has any idea why, please tell me. Is it because my version isn't registered (yet)?