Someone

ON $*:TEXT:/^[!.@]grat(z|s)?\s/Si:#:{ 
  if ($3 && $2 isnum) { 
    set %skill $Skills($remove($3,@,!,.)) 
    if (%skill == Overall) { 
      /msg $chan 15,14 ! 15,144 ! 15,14 ! 15,144Congratulations on your 8»12 $+ $2 $+ 8«4 %skill level15,14 ! 15,144 ! 15,14 !  
      halt 
    } 
    elseif ($2 > 99) { 
      /notice $nick 15,144You're unable to get level12 $2 4in %skill | .timer 1 1 /notice $nick 15,144are you sure you 12play4 Runescape?  
      halt 
    } 
    elseif (%skill == $null) { 
      /notice $nick 15,144 $+ Sorry $nick but12 $3- 4 isn't a skill. 
      halt 
    } 
    else { 
      /msg $chan 15,14 ! 15,144 ! 15,14 ! 15,144Congratulations on your 8»12 $+ $2 $+ 8«4 %skill level15,14 ! 15,144 ! 15,14 ! 
    } 
  } 
  else { 
    /notice $nick Error: 15,144 $+ $1 4<Number> <Skill> 
  } 
} 
alias -l Skills { 
  if ($1 == 0) || ($regex($1,/^(st|(skill)?total|overall)$/Si)) return Overall 
  elseif ($1 == 1) || ($regex($1,/^at(t|tack)$/Si)) return Attack 
  elseif ($1 == 2) || ($regex($1,/^def(ence)?$$/Si)) return Defence 
  elseif ($1 == 3) || ($regex($1,/^str(ength)?$/Si)) return Strength 
  elseif ($1 == 4) || ($regex($1,/^hp|hit(s|points?)?$/Si)) return Hitpoints 
  elseif ($1 == 5) || ($regex($1,/^rang(er|ed|ing)?$/Si)) return Ranged 
  elseif ($1 == 6) || ($regex($1,/^Pray(er)?$$/Si)) return Prayer 
  elseif ($1 == 7) || ($regex($1,/^mag(e|ic)$$/Si)) return Magic 
  elseif ($1 == 8) || ($regex($1,/^cook(ing)?$/Si)) return Cooking 
  elseif ($1 == 9) || ($regex($1,/^wc|wood(cut(ting)?)?$/Si)) return Woodcutting 
  elseif ($1 == 10) || ($regex($1,/^fletch(ing)?$/Si)) return Fletching 
  elseif ($1 == 11) || ($regex($1,/^fish(ing)?$/Si)) return Fishing 
  elseif ($1 == 12) || ($regex($1,/^(fire|fm)(make?(ing)?|ing)?$/Si)) return Firemaking 
  elseif ($1 == 13) || ($regex($1,/^craft(ing)?$/Si)) return Crafting 
  elseif ($1 == 14) || ($regex($1,/^(smith|smelt)(ing)?$/Si)) return Smithing 
  elseif ($1 == 15) || ($regex($1,/^min(ing)?$/Si)) return Mining 
  elseif ($1 == 16) || ($regex($1,/^herb(lore)?$/Si)) return Herblore 
  elseif ($1 == 17) || ($regex($1,/^agil(ity)?$/Si)) return Agility 
  elseif ($1 == 18) || ($regex($1,/^(th(ie)[fv](ing)?)$/Si)) return Thieving 
  elseif ($1 == 19) || ($regex($1,/^slay(er|ing)?$/Si)) return Slayer 
  elseif ($1 == 20) || ($regex($1,/^farm(er|ing)?$/Si)) return Farming 
  elseif ($1 == 21) || ($regex($1,/^(rc|runecraft)(er|ing)?$/Si)) return Runecrafting 
  elseif ($1 == 22) || ($regex($1,/^(con)(struct)(ion|ing)?$/si)) return Construction 
  elseif ($1 == 23) || ($regex($1,/^(hunt)(en|ing)?$/si)) return Hunting 
}