Something

alias fairyring.code.1 { 
  if ($regex($1,/^(a|b|c|d)$/Si)) { return $true } 
  else { return $false } 
} 
alias fairyring.code.2 { 
  if ($regex($1,/^(i|j|k|l)$/Si)) { return $true } 
  else { return $false } 
} 
alias fairyring.code.3 { 
  if ($regex($1,/^(p|q|r|s)$/Si)) { return $true } 
  else { return $false } 
} 
alias fairyring.location { 
  if ($1 == AIQ) { return Mudskipper Point } 
  if ($1 == AIR) { return Desert island (south of Ardougne port, east of the Necromancer tower) } 
  if ($1 == AJR) { return Fremennik Slayer Cave entrance } 
  if ($1 == AJS) { return Pengiun isle (north of Miscellania and Etceteria) } 
  if ($1 == AKQ) { return Piscatoris Fishing Colony } 
  if ($1 == AKS) { return Feldip Hills (near the gnome glider) } 
  if ($1 == ALR) { return Abyssal area (all abyssal monsters, including Abyssal Demons) } 
  if ($1 == ALS) { return McGrubor's Wood } 
  if ($1 == BIP) { return Island in the River Salve } 
  if ($1 == BIQ) { return Desert (Camels and Desert Wolves, southeast of the Kalphite Lair) } 
  if ($1 == BIS) { return Ardougne Zoo unicorn cage } 
  if ($1 == BJR) { return Fisher King's Realm (from the Holy Grail quest) } 
  if ($1 == BKP) { return Chompy hunting swamp (south of Castle Wars) } 
  if ($1 == BKQ) { return Enchanted Valley (with Centaurs, rabbits, and tree spirits) } 
  if ($1 == BKR) { return Northeastern Mort Myre Swamp (southeast of CKS) } 
  if ($1 == BLP) { return TzHaar } 
  if ($1 == BLR) { return Legends Guild } 
  if ($1 == CIP) { return Miscellania } 
  if ($1 == CIQ) { return South of the Tree Gnome Village } 
  if ($1 == CJR) { return Sinclair Mansion } 
  if ($1 == CKP) { return Higher Planes (Star Flower respawn) } 
  if ($1 == CKR) { return Karambwanji fishing spot (northwest of Shilo Village) } 
  if ($1 == CKS) { return Canifis Bittercap Mushroom patch } 
  if ($1 == CLP) { return Island northeast of the Wizards Tower } 
  if ($1 == CLS) { return Gnome Hazelmere's house } 
  if ($1 == DIR) { return Goraks and Cloud Banks } 
  if ($1 == DIS) { return Wizard Tower } 
  if ($1 == DJP) { return Necromancer Tower } 
  if ($1 == DJR) { return Northwest of Sinclair Mansion } 
  if ($1 == DKP) { return Karambwan fishing spot (north of the nature altar) } 
  if ($1 == DKR) { return Edgeville canoe station } 
  if ($1 == DKS) { return Snow Hunting Grounds (north of Keldagrim entrance) } 
  if ($1 == DLQ) { return Desert (lizards, north of Nardah) } 
  if ($1 == DLR) { return Isle in Isafdar Poison Waste } 
  if ($1 == DLS) { return Cavern near the Myreque } 
  else { return N/A } 
} 
on *:TEXT:!ring*:#: { 
  if ($len($2) != 3) { .notice $nick Error: must be a 3 letter code | halt } 
  if ($fairyring.code.1($mid($2,1,1)) == $false) { .notice $nick Error: !fairyring (abcd)(ijkl)(pqrs) | halt } 
  if ($fairyring.code.2($mid($2,2,1)) == $false) { .notice $nick Error: !fairyring (abcd)(ijkl)(pqrs) | halt } 
  if ($fairyring.code.3($mid($2,3,1)) == $false) { .notice $nick Error: !fairyring (abcd)(ijkl)(pqrs) | halt } 
  $iif($left($1,1) == @,msg $chan,notice $nick) $nick $upper($2) = $fairyring.location($2) 
}