Hello guys, I have been searching for FML snippets a while ago, I have check almost all of the fml snippets which are posted on hawkee, and I tired about 95 percents of they aren't wokring or working that good, so yeah I have decided to make a new one which is wroking perfectly good, I have tested it myself in more than one network and it doesn't lag or anything and it'll be flexible with your bot.
This snippet is just based on Trev's onem I have check it out and it doesn't work.
So I have edited and fixed it to make it work perfectly, just copy it and paste if on your remote.
Feedback are welcomed!
If the snippet stopped working you can catch me on: irc.tl:667 > #Paris > Diablo

Here you go:

;;FML snippet re-coded by Diesel
;;Trigger '!fml'
Alias cc1 return $+($chr(3),1,$1-)
Alias cc2 return $+($chr(3),1,$1-)
Alias lg return $1
On $*:Text:/^[!.@]FML/Si:#: { 
  sockopen FML. rscript.org 80 
  set %fml.temp $iif($mid($1,1,1) == $chr(64),msg #,msg #)
}
On *:SOCKOPEN:FML.: {
  sockwrite -n $sockname GET /lookup.php?type=fml HTTP/1.1 
  sockwrite -n $sockname Host: rscript.org
  sockwrite -n $sockname $crlf 
}
On *:SOCKREAD:FML.: {
  if ($sockerr) { halt }
  Else {
    var %fml 
    sockread %fml
    if (Text:* iswm %fml) {
      tokenize 32 %fml
      set %fml.text $cc2($2-) 
      %fml.temp $lg(4Fuck My Life:01) %fml.text 
      unset %fml.*
      sockclose FML.
    }
  }
}   

I have made all the triggers send msgs to the channel, you can replace the 2nd "msg #" with "notice $nick" in case to make the !fml trigger sends notice.

set %fml.temp $iif($mid($1,1,1) == $chr(64),msg #,notice $nick)