Auto kill summon Help

[Giant Whisper]

I can not solve the script summon poring should not be able to enter the map summon when entering the map would have to die automatically

 

62068,Sporing,SPoring,1,0,,0,,,,,0xFFFFFFFF,63,2,,,,,,{ progressbar "0x00FF00",1; if(mobcount(strcharinfo(3) ,"Summon_NPC::OnSummon")) { killmonster strcharinfo(3),"Summon_NPC::OnSummon"; } else { summon "Slave Poring",26127,100*60000,"Summon_NPC::OnSummon"; } },{},{}

-    script    Summon_NPC    -1,{
OnInit:
    set .Map$,"prt_fild01";
    setmapflag .Map$,mf_loadevent;
end;
OnPCLoadMapEvent:
    if(strcharinfo(3) == .Map$ && mobcount( .Map$,"Summon_NPC::OnSummon") == 1 ){
        killmonster.Map$,"Summon_NPC::OnSummon";
    }
end;

OnSummon:
end;
}