I made a script for this but my timers are off it sts a random FML ever two mins i would like it every 4 mins or 10 mins i can post the code..
here is mine -
on :sockopen:fml-:{
tokenize 94 $sock(fml-).mark
if $sockerr { $5 Connection Error has Persisted! | return }
$1-2 | $1 $3 | $1 $4 | $1
}
on :sockread:fml-:{
tokenize 94 $sock(fml-).mark
if $sockerr { $5 Reading Error has Persisted! | return }
var %fml | sockread %fml
if $regex(%fml,/(Today.?)FML<\/a>/i) {
$5 $regsubex($regml(1),/<[^>]>|"/g,) 14[4 $+ FML $+ 14]
sockclose fml-
}
}
on :text:$($iif(!fml = $strip($1),$1))::{
if !%ffml { inc -u3 %ffml | set -u3 %fml- $+(fml,.,$ticks,.)
if $sock(fml-) { sockclose $v1 }
sockopen fml- www.fmylife.com 80
sockmark fml- $+(sockwrite -nt fml-,^,$&
GET /random HTTP/1.0,^,Host: $sock(fml-).addr,$&
^,Connection: clos,^,.msg $iif(#,#,$nick)) 14,1[4Fuck My Life14]15
}
}
alias timerfml {
if !%ffml { inc -u3 %ffml | set -u3 %fml- $+(fml,.,$ticks,.)
if $sock(fml-) { sockclose $v1 }
sockopen fml- www.fmylife.com 80
sockmark fml- $+(sockwrite -nt fml-,^,$&
GET /random HTTP/1.0,^,Host: $sock(fml-).addr,$&
^,Connection: close,^,.msg $iif(#,#,$nick)) #irc 14,1[4Fuck My Life14]15
}
}
on :TEXT:!CFML:#:{
if ($2 == $null) {
if ($($+(%,FMLTimer,$network),2) == on) { msg $Chan FML Timer is already on! If you want to clear the timer and variables type: !CFML Clear | halt }
if ($($+(%,FMLTimer,$network),2) == $null) { set %FMLTimer $+ $network on | timer $+ $network 0 480 timerfml | msg $Chan 4,1Auto-FML Quotes every0 2 4Minutes0. 4Enjoy them hosted by 0dma | halt }
}
if ($2 == Clear) { timers off | unset %FMLTimer $+ $network | msg $Chan All timers and variables are now cleared. Please Type !cfml again to Start Auto-FML | halt }
}
ON *:JOIN:#irc:{ if ($nick == $me) { .timer $+ $network $+ fml 0 120 timerfml } }