//===== eAthena Script =======================================
//= Poring Event
//===== By: ==================================================
//= Wild Karrd
//===== Translate By: ===========================================
//= VansClub
//===== Current Version: =====================================
//= 1.0
//===== Compatible With: =====================================
//= eAthena 12426
//===== Description: =========================================
//= Find correct poring Event
//===== Additional Comments: =================================
//= no mapflags needed
//============================================================


-   script   poring_event   -1,{

Onclock0400:
Onclock0800:
Onclock1100:
Onclock1800:
Onclock2200:
announce "[Poring Catcher] : ได้เริ่มต้นขึ้นแล้ว..!!! มีเวลาตามหา Poring 5 นาที..!!!",bc_all,0xFA0080;
   donpcevent "Poringcatcher::OnWarp";
}

payon.gat,170,216,3   script   Poringcatcher   1002,{

OnTouch:
   mes "[Poringcatcher]";
   mes "ดีจ้า "+strcharinfo(0)+" ต้องการอะไรหรอ ?";
   next;
   menu "เข้าร่วมกิจกรรม",L_enter,"ดูรายละเอียด",L_info,"ไม่มีไรละ ขอบคุณ",bye;
   close;

L_enter:
   mes "[Poringcatcher]";
   mes "ไปลุยกัน เลย!";
   next;
   warp "poring_w01",   100,   100;   end;

L_info:
   mes "[Poringcatcher]";
   mes "กิจกรรมตามหาโปริ่ง ในเวลา";
   mes "ที่ประตูมิติเปิดจะมีปีศาจหลุดเข้ามา 100 ตัว";
   mes "ในนั้นจะมี Poring";
   mes "เพื่อนของข้าเจ้าต้องหาให้เจอ";
   mes "แล้วข้าจะให้ของตอบแทนกับเจ้า";
   next;
   mes "[Poringcatcher]";
   mes "เวลาที่ประตูมิติเปิดออก";
   mes "เวลา 04:00";
   mes "เวลา 08:00";
   mes "เวลา 11:00";
   mes "เวลา 18:00";
   mes "เวลา 22:00";
   close;
bye:
   mes "[Poringcatcher]";
   mes "แล้วพบกันใหม่ .";
   close;   

OnInit:
   disablenpc "Poringcatcher";
   end;

OnWarp:
   initnpctimer;
   enablenpc "Poringcatcher";
   donpcevent "Poringsummoner::OnSummon";
   end;

OnTimer600000:
   stopnpctimer;
   disablenpc "Poringcatcher";
   killmonster "poring_w01.gat","All";
   mapwarp "poring_w01","payon",171,201;
   end;
}

-   script   Poringsummoner   -1,{

OnSummon:
   monster "poring_w01.gat",0,0,"Poring",1002,1,"poringwin::OnMobKilled";
   monster "poring_w01.gat",0,0,"Pouring",1002,10,"poringlose::OnMobKilled";
   monster "poring_w01.gat",0,0,"Proing",1002,10,"poringlose::OnMobKilled";
   monster "poring_w01.gat",0,0,"Poirng",1002,10,"poringlose::OnMobKilled";
   monster "poring_w01.gat",0,0,"Poing",1002,10,"poringlose::OnMobKilled";
   monster "poring_w01.gat",0,0,"I'm not a Poring",1002,5,"poringlose::OnMobKilled";
   monster "poring_w01.gat",0,0,"Gnirop",1002,1,"poringlose::OnMobKilled";
   monster "poring_w01.gat",0,0,"Poring",1113,1,"poringlose::OnMobKilled";
   monster "poring_w01.gat",0,0,"Poring",1062,1,"poringlose::OnMobKilled";
   monster   "poring_w01.gat",0,0,"Por|ng",1002,10,"poringlose::OnMobKilled";
   monster   "poring_w01.gat",0,0,"Por1ng",1002,10,"poringlose::OnMobKilled";
   monster   "poring_w01.gat",0,0,"Porong",1002,10,"poringlose::OnMobKilled";
   monster   "poring_w01.gat",0,0,"P0ring",1002,10,"poringlose::OnMobKilled";
   monster   "poring_w01.gat",0,0,"P@ring",1002,10,"poringlose::OnMobKilled";
   monster   "poring_w01.gat",0,0,"Porng",1002,1,"poringlose::OnMobKilled";end;
}
-   script   poringwin   -1,{
OnMobKilled:
   dispbottom "เย่ๆ ขอบคุณท่าน, ที่มาช่วยข้า !";
   //set @coupon,1;
   Announce "Experium : คุณ " + strcharinfo(0) + " ได้รางวัลแล้วค่ะ",8;
   //atcommand strcharinfo(0)+"@setbattleflag base_exp_rate 5000";
   //atcommand strcharinfo(0)+"@setbattleflag job_exp_rate 5000";
   //atcommand strcharinfo(0)+"@reloadmobdb";
   //set Zeny,zeny+100000;
   getitem 7037,1;
   mapwarp "poring_w01","payon",171,201;
   killmonster "poring_w01.gat","All";
   donpcevent "Poringsummoner::OnStart";
   end;
}
-   script   poringlose   -1,{
OnMobKilled:
   dispbottom "อ่าาส์.., ท่านฆ่าผิดตัวแล้ว";
   percentheal -99,-99;
   warp "payon",167,221;
   end;
}