Code:
sub EVENT_SAY
{
if ($text =~ /hail/i){
quest::say("Greetings $name! Where can I take you to?");}
if($text != "acrylia" || "airplane" || "akanon" || "akheva" || "arena" || "bazaar" || "befallen" || "beholder" || "blackburrow" || "bothunder" || "burningwood" || "butcher" || "cabeast" || "cabwest" || "cauldron" || "cazicthule" || "charasis" || "chardok" || "citymist" || "cobaltscar" || "commons" || "crushbone" || "crystal" || "cshome" || "dalnir" || "dawnshroud" || "dreadlands" || "droga" || "eastkarana" || "eastwastes" || "echo" || "ecommons" || "emeraldjungle" || "erudnext" || "erudnint" || "erudsxing" || "everfrost" || "fearplane" || "feerrott" || "felwithea" || "felwitheb" || "fieldofbone" || "firiona" || "freporte" || "freportn" || "freportw" || "frontiermtns" || "frozenshadow" || "fungusgrove" || "gfaydark" || "greatdivide" || "griegsend" || "grimling" || "grobb" || "growthplane" || "gukbottom" || "guktop" || "halas" || "hateplane" || "highkeep" || "highpass" || "hohonora" || "hole" || "hollowshade" || "iceclad" || "innothule" || "kael" || "kaesora" || "kaladima" || "kaladimb" || "karnor" || "katta" || "kedge" || "kerraridge" || "kithicor" || "kurn" || "lakeofillomen" || "lakerathe" || "lavastorm" || "letalis" || "lfaydark" || "load" || "maiden" || "mischiefplane" || "mistmoore" || "misty" || "mseru" || "najena" || "necropolis" || "nektulos" || "neriaka" || "neriakb" || "neriakc" || "netherbian" || "nexus" || "northkarana" || "nurga" || "oasis" || "oggok" || "oot" || "overthere" || "paineel" || "paludal" || "paw" || "permafrost" || "powar" || "poearth" || "pofire" || "powater" || "poinnovation" || "podisease" || "pojustice" || "ponightmare" || "potranquility" || "potimea" || "potimeb" || "povalor" || "postorms" || "poknowledge" || "potorment" || "qcat" || "qey2hh1" || "qeynos" || "qeynos2" || "qeytoqrg" || "qrg" || "rathemtn" || "rivervale" || "runnyeye" || "scarlet" || "sebilis" || "shadeweaver" || "shadowhaven" || "sharvahl" || "sirens" || "skyfire" || "skyshrine" || "sleeper" || "soldunga" || "soldungb" || "solrotower" || "soltemple" || "southkarana" || "sro" || "sseru" || "ssratemple" || "steamfont" || "stonebrunt" || "swampofnohope" || "templeveeshan" || "tenebrous" || "thedeep" || "thegrey" || "thurgadina" || "thurgadinb" || "timorous" || "tox" || "trakanon" || "tutorial" || "twilight" || "umbral" || "unrest" || "veeshan" || "velketor" || "vexthal" || "wakening" || "warrens" || "warslikswood" || "westwastes" || arena2")
{
quest::say("Sorry $name, I do not recognise that zone.");}
else{
quest::movepc($text,0,0,0);
}
if($text=~ /!list/i){
quest::say(" acrylia , airplane , akanon , akheva , arena , bazaar , befallen , beholder , blackburrow , bothunder , burningwood , butcher , cabeast , cabwest , cauldron , cazicthule , charasis , chardok , citymist , cobaltscar , commons , crushbone , crystal , cshome , dalnir , dawnshroud , dreadlands , droga , eastkarana , eastwastes , echo , ecommons , emeraldjungle , erudnext , erudnint , erudsxing , everfrost , fearplane , feerrott , felwithea , felwitheb , fieldofbone , firiona , freporte , freportn , freportw , frontiermtns , frozenshadow , fungusgrove , gfaydark , greatdivide , griegsend , grimling , grobb , growthplane , gukbottom , guktop , halas , hateplane , highkeep , highpass , hohonora , hole , hollowshade , iceclad , innothule , kael , kaesora , kaladima , kaladimb , karnor , katta , kedge , kerraridge , kithicor , kurn , lakeofillomen , lakerathe , lavastorm , letalis , lfaydark , load , maiden , mischiefplane , mistmoore , misty , mseru , najena , necropolis , nektulos , neriaka , neriakb , neriakc , netherbian , nexus , northkarana , nurga , oasis , oggok , oot , overthere , paineel , paludal , paw , permafrost , powar , poearth , pofire , powater , poinnovation , podisease , pojustice , ponightmare , potranquility , potimea , potimeb , povalor , postorms , poknowledge , potorment , qcat , qey2hh1 , qeynos , qeynos2 , qeytoqrg , qrg , rathemtn , rivervale , runnyeye , scarlet , sebilis , shadeweaver , shadowhaven , sharvahl , sirens , skyfire , skyshrine , sleeper , soldunga , soldungb , solrotower , soltemple , southkarana , sro , sseru , ssratemple , steamfont , stonebrunt , swampofnohope , templeveeshan , tenebrous , thedeep , thegrey , thurgadina , thurgadinb , timorous , tox , trakanon , tutorial , twilight , umbral , unrest , veeshan , velketor , vexthal , wakening , warrens , warslikswood , westwastes , arena2");
}
}
## Coded by Scary. - Please do not remove this! ##
If not, you can just do what Cisc did, but do it for every single zone -- that WOULD work - I was just trying a shorter way
Alternatively, you could give them the #zone command -- though a quest is customisable (eg. if $level > 20 && $text =~ /la/ etc. etc.)