Korvin Wrote:

make one for shoot.com, itl be much harder

Here is the socket for Shi My Dad Says
May not be right for +G rated channels**
trigger is @smds
example:

<@napa182> @smds
<@Sick0> :[Sh** My Dad Says]: "It's never the right time to have kids, but it's always the right time for screwing. God's not a dumbshit. He knows how it works."

<@napa182> @smds
<@Sick0> :[Sh** My Dad Says]: "I just don't wanna celebrate a bullshit holiday. I'm plenty romantic. I own a home and have never shit my pants. Two things you can't say."

on $*:text:/^@smds$/iS:#: {
  if (!$hget(smds,c)) {
    if ($sock(smds)) sockclose smds
    sockopen smds api.twitter.com 80
    sockmark smds $r(1,20) $&
      $+(/1/statuses/user_timeline/shitmydadsays.rss?page=,$r(1,6))$&
      msg # 09:[04Sh** My Dad Says09]:
  }
}
on *:load:{
  echo 12 -a You Have Just Loaded Napa182's Sh** My Dad Says Snippet 
  echo 04 -a An Irc.EzzyChat.Com Production.
  echo -a 08!!04WARNING08 This snippet may04/08will say curse04/08foul words 04WARNING08!!
}
on *:sockopen:smds: {
  sockwrite -nt smds GET $gettok($sock(smds).mark,2,32) HTTP/1.1
  sockwrite -nt smds Host: $+($sock(smds).addr,$str($crlf,2))
}
alias -l smds return $regsubex($1-,/("|&)|\46\43(\d+)\73/g,$iif(\1 isnum,$chr(\1),$iif(\1 = ",",&)))
on *:sockread:smds: {
  var %smds | sockread %smds
  if ($regex(%smds,/<title>.+\72(.+?)<\/title>/)) { 
    .hinc -mu3 smds c 1  
    if ($hget(smds,c) = $gettok($sock(smds).mark,1,32)) { 
      $gettok($sock(smds).mark,3-,32) $smds($regml(1)) 
      sockclose smds 
    }
  }
}

um replace shoot.rss with sh****itmydadsays.rss
=/