[The_Beast]

I just used what you had to test the function of it with a movepc.

sub EVENT_ENTERZONE {
    my @noncombatzones = ("freeportn", "runnyeye", "nexus");
    if ($zonesn = @noncombatzones) {
          ## do nothing
    }
    else {
        quest::movepc(152,0,0,-31);
    }
}