Untitled

on $*:TEXT:[@!]E?XP-Agil(ity)?$*/Si:*: {
  /if ($left($1,1) == !) {
    set %XP-Reply-Agility notice $nick
  } 
  /if ($left($1,1) == @) {
    set %XP-Reply-Agility msg $chan
  } 
  /if ($regex($2-,/^(Full )? Gnome (Courses?)?$/Si)) { %XP-Reply-Agility 14The XP for a full time aroung the7 Gnome Course14 is:7 86.5 exp }
  /if ($regex($2-,/^(Full )? Pyramid (courses?)?$/Si)) { %XP-Reply-Agility 14The XP for a full time aroung the7 Pyramid Course14 is:7 1,014 exp }
  /if ($regex($2-,/^(Full )? Barbarian (Courses?)?$/Si)) { %XP-Reply-Agility 14The XP for a full time aroung the7 Barbarian Course14 is:7 139.5 exp }
  /if ($regex($2-,/^(Full )? Ape (Atoll?)? (Courses?)?$/Si)) { %XP-Reply-Agility 14The XP for a full time aroung the7 Ape Atoll Course14 is:7 580 exp }
  /if ($regex($2-,/^(Full )? Wild(y|erness)( courses?)?/Si)) { %XP-Reply-Agility 14The XP for a full time aroung the7 Wilderness Course14 is:7 571 exp }
  /if ($regex($2-,/^(Full )? Werewolf (Courses?)?$/Si)) { %XP-Reply-Agility 14The XP for a full time aroung the7 Werewolf Course14 is:7 540 exp }
  /else { %XP-Reply-Agility Error, please try again. }
  unset %XP-Reply-Agility
}