//==============================================
// תְ
// д by FPE (2006.6.27)
// Jathena++ ̳http://www.foxofice.net/bbs
//----------------------------------------------

payon_in02.gat,64,71,4	script	ֹԱ	85,{
	if(@test_AR!=0)
	{
		mes "[ֹԱ]";
		mes "ô׼ûˣ";
		next;
		if(select("...Ҫ","Ѿ֦")==1)
		{
			mes "[ֹԱ]";
			mes "˲ԵǺðɣٸһΡ";
			next;
			mes "[ֹԱ]";
			mes "ֵתְǱҪ^FF0000֦^000000֦Ϊ4༶ᣬһ";
			mes "ˣܵ40^0000FFټ25 ^000000ſתְΪ֡";
			next;
			mes "[ֹԱ]";
			mes "һʾ֦ǴӮ''ȡãȻǺǿĵ֣ҲҪġ";
			close;
			end;
		}
		mes "[ֹԱ]";
		mes "ҾͿʼΪ֦ķ";
		next;
		set @Trunk1,countitem(1066);
		set @Trunk2,countitem(1067);
		set @Trunk3,countitem(1068);
		set @Trunk4,countitem(1019);
		if (@Trunk1==0 || @Trunk2==0 || @Trunk3==0 || @Trunk4==0)
		{
			mes "[ֹԱ]";
			mes "ûнָ֦";
			close;
			end;
		}
		set @archer_item1,@Trunk1*5;
		set @archer_item2,@Trunk2*3;
		set @archer_item3,@Trunk3*2;
		set @archer_item4,@Trunk4;
		set @Total_Trunk,@archer_item1+@archer_item2+@archer_item3+@archer_item4;
		mes "[ֹԱ]";
		mes  "  ȼ S :  "+@Trunk1+"  /  :  "+@archer_item1;
		mes  "  ȼ A :  "+@Trunk2+"  /  :  "+@archer_item2;
		mes  "  ȼ B :  "+@Trunk3+"  /  :  "+@archer_item3;
		mes  "  ȼ C :  "+@Trunk4+"  /  :  "+@archer_item4;
		mes " ";
		mes  "  ܵ :  ^0000FF"+@Total_Trunk+"^000000 / 40";
		next;
		mes "[ֹԱ]";
		if(@Total_Trunk<25)
		{
			mes "Բܵ25㣬Ҫ25ſͨŬɣ";
			close;
			end;
		}
		if(@Total_Trunk>40) mes "ۣ40ϣǺϸˣ";
		if(@Total_Trunk>30) mes "30ϣǺϸˣ̫ˡ";
		if(@Total_Trunk>=25) mes "Ӵ~ ĵûϸˣˡ";
		next;
		mes "[ֹԱ]";
		mes "ҿ.";
		next;
		if(Joblevel<10)
		{
			mes "[ֹԱ]";
			mes "Ļܵȼٿתְܵȼ9";
			close;
			end;
		}
		if(Skillpoint!=0)
		{
			mes "[ֹԱ]";
			mes "Ȱļܵתְɡ";
			close;
			end;
		}
		mes "[ֹԱ]";
		mes "ţɴ˿ѾȫϹתְھϸתְ";
		next;
		JobChange 3,Upper;
		set ReClass,3;
		mes "[ֹԱ]";
		mes "ĵףתְΪ֣빭ֹĻ";
		mes ", Ѿˣա";
		mes "˹ͼᣬڿԳΪʵĹˡ";
		getitem 1702,1;
		getitem 1750,100;
		delitem 1066,100;
		delitem 1067,100;
		delitem 1068,100;
		delitem 1019,100;
		set @Trunk1,0;
		set @Trunk2,0;
		set @Trunk3,0;
		set @Trunk4,0;
		set @archer_item1,0;
		set @archer_item2,0;
		set @archer_item3,0;
		set @archer_item4,0;
		set @Total_Trunk,0;
		set @test_AR,0;
		next;
		mes "[ֹԱ]";
		mes "ô, ˡϣнܳı֡";
		close;
		end;
	}

	mes "[ֹԱ]";
	mes "ãǹֹᣬʲô԰";
	next;
	switch(select("תְΪ","ѯתְ","뿪"))
	{
	case 1:
		if(Class==3)
		{
			mes "[ֹԱ]";
			mes "Ѿǹˡ";
			close;
			end;
		}
		if(Class!=0)
		{
			mes "[ֹԱ]";
			mes "ӿǳѧ..Ѿѡְҵ޷תְΪ֡";
			close;
			end;
		}
		if(upper==1)
		{
			mes "[ֹԱ]";
			mes "ǳѽѾת!ǺðɣҲ鿴һ";
			next;
			if(Joblevel<10)
			{
				mes "[ֹԱ]";
				mes "ĻܵȼʹתˣҪǲܸıġ";
				close;
				end;
			}
			if(Skillpoint!=0)
			{
				mes "[ֹԱ]";
				mes "Ȱļܵתְɡ";
				close;
				end;
			}
			JobChange 3,Upper;
			mes "[ֹԱ]";
			mes "ϲŶѾתְΪ׹";
			close;
			end;
		}
		mes "[ֹԱ]";
		mes "ҪתְΪôͨǵһԡ";
		next;
		if(select("μӲ","")==1)
		{
			if(Joblevel<10)
			{
				mes "[ֹԱ]";
				mes "Ļܵȼٿתְܵȼ9";
				close;
				end;
			}
			if(Skillpoint!=0)
			{
				mes "[ֹԱ]";
				mes "Ȱļܵתְɡ";
				close;
				end;
			}
			mes "[ֹԱ]";
			mes "ǩ߱תְĻϸתְ";
			set @test_AR,1;
			next;
			mes "[ֹԱ]";
			mes "Ĵ"+ strcharinfo(0) +"ɣҽΪĲԸָǷܹɹתְΪһȫרġ";
			next;
			mes "[ֹԱ]";
			mes "ֵתְǱҪ^FF0000֦^000000֦Ϊ4༶ᣬһ";
			mes "ˣܵ40^0000FFټ25 ^000000ſתְΪ֡";
			next;
			mes "[ֹԱ]";
			mes "һʾ֦ǴӮ''ȡãȻǺǿĵ֣ҲҪġ";
			close;
			end;
		}

		mes "[ֹԱ]";
		mes ".. ౣء";
		close;
		end;
		break;
	case 2:
		mes "[ֹԱ]";
		if(Class!=0) 
		{
			mes "ǣѾְҵѽ";
			close;
			end;
		}
		if(Class==3)
		{
			mes "ǣѾΪˡ";
			next;
		}
		mes "[ֹԱ]";
		mes "ǣΪ˵ֵתְ";
		next;
		mes "[ֹԱ]";
		mes "ȣѧ߻ܵȼ9ϡ";
		mes "⣬ҪΪֱرǸ߶ȵļǹֹ᲻Ժ㲻״ˡ";
		next;
		mes "[ֹԱ]";
		mes "ֵתְǱҪ^FF0000֦^000000 ";
		mes "֦Ϊ4༶ᣬһ";
		mes "ˣܵ40^0000FFټ25^000000ſתְΪ֡";
		next;
		mes "[ֹԱ]";
		mes "֦ǴӮ''ԾȡãȻǺǿĵ֣ҲҪˡ";
		close;
		end;
		break;
	case 3:
		mes "[ֹԱ]";
		mes "Ǻðɣӭʱص";
		close;
		end;
		break;
	}
}