////////////////////////////////////////////////////
//----idea by ryo---------------------------------//
//----Script by Daredevil-------------------------//
//----Help Edit some part by Nameless2you---------//
//----Version Changlog----------------------------//
// 1.1- Remove get stapo card Free                //
// 1.2- Add msg,information,shop function         //
////////////////////////////////////////////////////

prontera,156,176,4	script	Caster War Arena	414,{

mes "Weclome to S.Caster War Arena.";
mes "Hi, I'am SCW Staff. Nice to meet you.";
mes "I'm the in charge of S.Caster War Arena";
mes "What can I serve you?";
switch(select("Enter War:Caster Shop:Instruction Guide:Cancel")){
case 1:
	next;
		if (Class == Job_Novice) {
		if(BaseLevel > 30) goto L_End;
		if (countitem(4424) < 1);
		mes "Select a map?";
		set .@menu,select("Map 01");				// Add new map names here
		//set .@menu,select("Map 01","Map 02");		// Example for 2 maps
		sc_end SC_CP_WEAPON;
		sc_end SC_CP_ARMOR;
		sc_end SC_CP_HELM;
		sc_end SC_CP_SHIELD;
		nude;
		sc_start SC_STRIPWEAPON,6000000,5; // you can change the duration
		sc_start SC_STRIPARMOR,6000000,5; // you can change the duration
		sc_start SC_STRIPSHIELD,6000000,5; // you can change the duration
		sc_start SC_STRIPHELM,6000000,5; // you can change the duration
		sleep2 500;
		switch(.@menu) {	// Add map warps here
			case 1: warp "poring_c02",0,0; break;	
			//case 2: warp <map>,<x>,<y>; break;	// Example for second map
		}
		end;
		} else {
			mes "[SCW Staff]";
			mes "Sorry! Only Novice Character are Allow to Enter";
		close;
		}
		
case 2:
	next;
		callshop "Caster Shop",1;
	close;
case 3:
	next;
		mes "[Stone Caster War Arena]";
		mes "\\\\\\\\\\[Information]\\\\\\\\\\";
		mes "This is a difference Mini PvP Game. Have Fun.";
		mes "There will be 4 Healer Npc. and can be Re-use Every 1 minit.";
		mes "Requirement: Equip Stapo Card. Level Below 30.";
		mes "Disable: Skill,Equipment,Healing Item.";
		mes "Allow: Apple,Accessories.";
		mes "How to play?";
		mes "Just pick up the Stone and trow to kill your opponent.";

	close;
case 4:
	close;

}
}

poring_c02	mapflag	restricted 2
poring_c02	mapflag	pvp
poring_c02	mapflag	noexp
poring_c02	mapflag	nomemo
poring_c02	mapflag	nowarp
poring_c02	mapflag	nowarpto
poring_c02	mapflag	noteleport
poring_c02	mapflag	nosave SavePoint
poring_c02	mapflag	nomemo
poring_c02	mapflag	nobranch

// Add these mapflags and duplicates for every new map
/*
<map>	mapflag	restricted 2
<map>	mapflag	pvp
<map>	mapflag	noexp
<map>	mapflag	nomemo
<map>	mapflag	nowarp
<map>	mapflag	nowarpto
<map>	mapflag	noteleport
<map>	mapflag	nosave SavePoint
<map>	mapflag	nomemo
<map>	mapflag	nobranch
*/

/*
<map>,<x>,<y>,4	duplicate(Light Priest01)	Light Priest01#01	414
<map>,<x>,<y>,4	duplicate(Light Priest02)	Light Priest02#01	414
<map>,<x>,<y>,4	duplicate(Light Priest03)	Light Priest03#01	414
<map>,<x>,<y>,4	duplicate(Light Priest04)	Light Priest04#01	414
*/

//-----------------Shop--------------------//
-	shop	Caster Shop	-1,4424:100000,7049:2,

//-----------Healer Npc--------------------//
poring_c02,94,123,4	script	Light Priest01	414,{
        callfunc "F_ClearGarbage",0;
        mes "[Light Priest]";
        mes "What can i help you?";
        mes "You look like a person who needs Help";
        mes "I can Heal your wound.";
        next;
        switch(select("Heal:No thanks")) {
        case 1:
                mes "[Healer]";
                if ((@PC_LAST_HEAL_TIME +60) > gettimetick(2)) {
                        mes "Huh? I'm Sorry i need some Rest. Please Wait " + (@PC_LAST_HEAL_TIME +60 - gettimetick(2)) + " seconds.";
                } else {
                        set @PC_LAST_HEAL_TIME, gettimetick(2);
                        percentheal 10,10;
                        mes "you are now healed!.";
                        mes "Have fun on S-Caster War!!";
                }
                break;
        case 2:
                mes "[Light Priest]";
                mes "Alright, come back if you need a heal.";
                break;
        }
        close;
}

poring_c02,144,123,4	script	Light Priest02	414,{
        callfunc "F_ClearGarbage",0;
        mes "[Light Priest]";
        mes "What can i help you?";
        mes "You look like a person who needs Help";
        mes "I can Heal your wound.";
        next;
        switch(select("Heal:No thanks")) {
        case 1:
                mes "[Healer]";
                if ((@PC_LAST_HEAL_TIME +60) > gettimetick(2)) {
                        mes "Huh? I'm Sorry i need some Rest. Please Wait " + (@PC_LAST_HEAL_TIME +60 - gettimetick(2)) + " seconds.";
                } else {
                        set @PC_LAST_HEAL_TIME, gettimetick(2);
                        percentheal 10,10;
                        mes "you are now healed!.";
                        mes "Have fun on S-Caster War!!";
                }
                break;
        case 2:
                mes "[Light Priest]";
                mes "Alright, come back if you need a heal.";
                break;
        }
        close;
}

poring_c02,146,43,4	script	Light Priest03	414,{
        callfunc "F_ClearGarbage",0;
        mes "[Light Priest]";
        mes "What can i help you?";
        mes "You look like a person who needs Help";
        mes "I can Heal your wound.";
        next;
        switch(select("Heal:No thanks")) {
        case 1:
                mes "[Healer]";
                if ((@PC_LAST_HEAL_TIME +60) > gettimetick(2)) {
                        mes "Huh? I'm Sorry i need some Rest. Please Wait " + (@PC_LAST_HEAL_TIME +60 - gettimetick(2)) + " seconds.";
                } else {
                        set @PC_LAST_HEAL_TIME, gettimetick(2);
                        percentheal 10,10;
                        mes "you are now healed!.";
                        mes "Have fun on S-Caster War!!";
                }
                break;
        case 2:
                mes "[Light Priest]";
                mes "Alright, come back if you need a heal.";
                break;
        }
        close;
}

poring_c02,91,43,4	script	Light Priest04	414,{
        callfunc "F_ClearGarbage",0;
        mes "[Light Priest]";
        mes "What can i help you?";
        mes "You look like a person who needs Help";
        mes "I can Heal your wound.";
        next;
        switch(select("Heal:No thanks")) {
        case 1:
                mes "[Healer]";
                if ((@PC_LAST_HEAL_TIME +60) > gettimetick(2)) {
                        mes "Huh? I'm Sorry i need some Rest. Please Wait " + (@PC_LAST_HEAL_TIME +60 - gettimetick(2)) + " seconds.";
                } else {
                        set @PC_LAST_HEAL_TIME, gettimetick(2);
                        percentheal 10,10;
                        mes "you are now healed!.";
                        mes "Have fun on S-Caster War!!";
                }
                break;
        case 2:
                mes "[Light Priest]";
                mes "Alright, come back if you need a heal.";
                break;
        }
        close;
}