Stuff

alias urban { 
  sockclose urban 
  sockopen urban urbandictionary.com 80 
  sockmark urban $1
} 


on *:text:!urban*:#: {
  sockclose urban 
  sockopen urban urbandictionary.com 80 
  sockmark urban $2
}
 
on *:sockopen:urban:{ 
  if ($sockerr) { echo -a THERE WAS AN ERROR YOU FAGGOT | return } 
  sockwrite -n $sockname GET /define.php?term= $+ $sock($sockname).mark $+ &r=f HTTP/1.0
  sockwrite -n $sockname Host: www.urbandictionary.com
  sockwrite -n $sockname Accept: */*
  sockwrite -n $sockname
} 
 
on *:sockread:urban:{ 
  var %t
  sockread %t 
  if ($regex(htmlfree,%t,/<p>(.*)<\/p>/)) { 
    if ($htmlfree($regml(htmlfree,1)) ) { bs say #raged $htmlfree($regml(htmlfree,1)) }
  }
} 
 
alias htmlfree {
  var %htmlfree = $1
 bs say #raged  -------------------
  return $replace(%htmlfree,&quot;,",&amp;,&)
}