// =============================
/* No Pet or Homunculus allowed: http://herc.ws/board/topic/14050-no-pet-or-homunculus-allowed/
    ----------------------------
    by: Legend
    compatible w/: Hercules
    ----------------------------
    Description:
    * Restricts pets & homunculus on a specific map
    ----------------------------
    Comments:
    * Please report to me if bugs were found:
      Contact: http://herc.ws/board/user/5387-legend/
*/
// =============================
-   script  request#9   FAKE_NPC,{
OnPCLoadMapEvent:
    if (petstat(PET_CLASS)) || (checkhomcall() == 0) {
        for (.@a = 0; .@a < getarraysize(.m$); ++.@a){
            if (strcharinfo(3) == .m$[.@a]) {
                dispbottom "Pets and Homunculus are not allowed on this area.",0xFF0000;
                sleep2 3000;
                warp "SavePoint",0,0;
                end;
            }
        }
        end;
    }
    end;
    
OnInit:
    setarray .m$[0],"prontera","payon";
    for (.@a = 0; .@a < getarraysize(.m$); ++.@a){
        setmapflag .m$[.@a],mf_loadevent;
    }
    end;
}