It's an insult function in the right click menu on the nick list, it gets insults from www.pangloss.com/seidel/Shaker , a shakespearean (spellcheck please :p) insulter and messages them into the channel in the form of <victim's name>, . There are occasionally some html tags in the final display, i removed and
but if you get anymore tell me, or suggest a way that will clear any of them (if there are any more).

To use it, open Scripts Editor and click on remotes tab and paste the snippet in there (just incase you don't know)

Feedback please.

on *:SOCKOPEN:insult: {
  sockwrite -nt $sockname GET /seidel/Shaker/ HTTP/1.1 
  sockwrite -nt $sockname Host: www.pangloss.com 
  sockwrite -nt $sockname $crlf 
}
on *:SOCKREAD:insult: { 
  if ($sockerr) { halt } 
  else { 
    var %sockreader
    sockread %sockreader
    if (*</font>* iswm %sockreader ) { 
      var %insult = $replace(%sockreader,</font>,)
      var %insult = $remove(%insult,[,],<br>)
      msg %inschan %victim $+ , %insult
      unset %insultway* 
      unset %victim
      unset %inschan
      sockclose $sockname 
    } 
  } 
}
menu nicklist {
  -
  Insult:/sockopen insult www.pangloss.com 80 | set %victim $$1 | set %inschan $chan
  -
}