//===== rAthena Script ======================================= 
//= Payon Guides
//===== By: ================================================== 
//= L0ne_W0lf
//===== Current Version: ===================================== 
//= 1.1
//===== Compatible With: ===================================== 
//= rAthena SVN
//===== Description: ========================================= 
//= [Official Conversion]
//= Guides for the city of Payon.
//===== Additional Comments: ================================= 
//= 1.0 First version, Renewal guides.
//= 1.1 Fixed and optimized. [Euphy]
//============================================================ 

payon,163,64,3	script	#01payon::GuidePayon	708,{
	cutin "pay_soldier",2;
	mes "[ﵼ]";
	mes "ӭ ɽ֮^8B4513^000000,";
	mes "Ҫ򵼷Ļʱң";
	next;
	while (1) {
		switch(select("[ Ҫʩ ]:[ ̵ & С ]:ɾСͼı:Ի")) {
		case 1:
			set .@loop,1;
			while (.@loop) {
				switch(select("[ ִ ]:[ ߵ ]:[  & ߵ ]:[ õ & Сƹ ]:[ 빬 ]:[ ǰͥ ]:[ ŷ ]:ϲ˵")) {
				case 1:
					mes "[ﵼ]";
					mes "^B9062Fִ^000000 ǹֹڵ,";
					mes "ɾɱ׶˵ǰ.";
					mes "Ҫ?";
					viewpoint 1,227,328,0,0xFF0000;
					next;
					break;
				case 2:
					callsub L_Mark,"^0000FFߵ";
					viewpoint 1,144,85,1,0x0A82FF;
					next;
					break;
				case 3:
					callsub L_Mark,"^FF5400 & ߵ";
					viewpoint 1,139,159,2,0xFFB400;
					next;
					break;
				case 4:
					callsub L_Mark,"^006400õ & Сƹ";
					viewpoint 1,220,117,3,0xAAFF00;
					next;
					break;
				case 5:
					callsub L_Mark,"^7F3300빬";
					viewpoint 1,155,245,4,0xD2691E;
					next;
					break;
				case 6:
					callsub L_Mark,"^800080ǰͥ";
					viewpoint 1,107,325,5,0xDA70D6;
					next;
					break;
				case 7:
					callsub L_Mark,"^B9062Fŷ";
					viewpoint 1,154,325,6,0xFF0000;
					next;
					break;
				case 8:
					set .@loop,0;
					break;
				}
			}
			break;
		case 2:
			set .@loop,1;
			while (.@loop) {
				switch(select("[ ԰ʦ ]:[ ̵ ]:[ ά / ʦ ]:[ ְԱ ]:[ ר ]:[ ǲ ]:[ ǲ ]:[ ˵ ]:[  ]:[  ]:һѡ")) {
				case 1:
					callsub L_Mark,"^0000FF԰ʦ";
					viewpoint 1,177,111,7,0x0A82FF;
					next;
					break;
				case 2:
					callsub L_Mark,"^FF5400רMM";
					viewpoint 1,164,157,8,0xFFB400;
					next;
					break;
				case 3:
					callsub L_Mark,"^006400ά & ʦ";
					viewpoint 1,144,170,9,0xAAFF00;
					next;
					break;
				case 4:
					callsub L_Mark,"^7F3300ְԱ";
					viewpoint 1,181,104,10,0xD2691E;
					viewpoint 1,175,226,11,0xD2691E;
					next;
					break;
				case 5:
					callsub L_Mark,"^800080ר";
					viewpoint 1,123,109,12,0xDA70D6;
					next;
					break;
				case 6:
					mes "[ﵼ]";
					mes "^B9062Fǲ^000000";
					mes "ṩ^0000FF^000000";
					mes "רҵԱ,";
					mes "ֻǲе";
					mes "!";
					mes "Ҫ?";
					viewpoint 1,140,151,13,0xFF0000;
					next;
					break;
				case 7:
					mes "[ﵼ]";
					mes "^0000FFǲ^000000";
					mes "ṩ^0000FF^000000";
					mes "רҵԱ,";
					mes "ֻǲе";
					mes "!";
					mes "Ҫ?";
					viewpoint 1,236,199,14,0x0A82FF;
					next;
					break;
				case 8:
					mes "[ﵼ]";
					mes "^FF5400˵^000000";
					mes "ǽʽ^FF5400ħʯ^000000";
					mes "ṩķ,";
					mes "Ҫ?";
					viewpoint 1,173,238,15,0xFFB400;
					next;
					break;
				case 9:
					callsub L_Mark,"^006400";
					viewpoint 1,177,131,16,0xAAFF00;
					next;
					break;
				case 10:
					callsub L_Mark,"^7F3300";
					viewpoint 1,206,119,17,0xD2691E;
					next;
					break;
				case 11:
					set .@loop,0;
					break;
				}
			}
			break;
		case 3:
			mes "[ﵼ]";
			mes "ɾ,";
			mes "Ҫ?";
			viewpoint 2,1,1,0,0xFFFF00;
			viewpoint 2,1,1,1,0x000000;
			viewpoint 2,1,1,2,0xFF0000;
			viewpoint 2,1,1,3,0xFFFF00;
			viewpoint 2,1,1,4,0xFFFF00;
			viewpoint 2,1,1,5,0xFFFF00;
			viewpoint 2,1,1,6,0xFFFF00;
			viewpoint 2,1,1,7,0xFFFF00;
			viewpoint 2,1,1,8,0xFFFF00;
			viewpoint 2,1,1,9,0xFFFF00;
			viewpoint 2,1,1,10,0xFFFF00;
			viewpoint 2,1,1,11,0xFFFF00;
			viewpoint 2,1,1,12,0xFFFF00;
			viewpoint 2,1,1,13,0xFFFF00;
			viewpoint 2,1,1,14,0xFFFF00;
			viewpoint 2,1,1,15,0xFFFF00;
			viewpoint 2,1,1,16,0xFFFF00;
			viewpoint 2,1,1,17,0xFFFF00;
			next;
			break;
		case 4:
			mes "[ﵼ]";
			mes "ף;!";
			close2;
			cutin "pay_soldier",255;
			end;
		}
	}
	end;
L_Mark:
	mes "[ﵼ]";
	mes "Сͼϱһ";
	mes getarg(0)+"^000000";
	mes "λ.";
	mes "㻹Ҫȷλ?";
	return;
}

payon,151,182,6	duplicate(GuidePayon)	#02payon	708
payon,221,85,6	duplicate(GuidePayon)	#03payon	708
payon,233,324,4	duplicate(GuidePayon)	#04payon	708

pay_arche,86,33,4	script	#05payon	708,{
	cutin "pay_soldier",2;
	mes "[ﵼ]";
	mes "ӭ!";
	mes "ɽ֮";
	mes "^8B4513ִ^000000,";
	mes "ҪΪ?";
	next;
	set .@str$,"Ҫ?";
	while (1) {
		switch(select("[ Թ ]:[ ֹ ]:[ ߵ ]:[ ְԱ ]:[ ӶԱ ]:[ ʦԱ ]:[ ԰ʦ ]:ɾСͼı:Ի")) {
		case 1:
			mes "[ﵼ]";
			mes "^B9062FԹ^000000";
			mes "λѾ";
			mes "Сͼ,";
			mes .@str$;
			viewpoint 1,38,131,0,0xFF0000;
			next;
			break;
		case 2:
			mes "[ﵼ]";
			mes "^0000FFֹ^000000";
			mes "ҪתְΪֵ";
			mes "ðռǱ";
			mes "ط,";
			mes .@str$;
			viewpoint 1,143,164,1,0x0A82FF;
			next;
			break;
		case 3:
			mes "[ﵼ]";
			mes "^FF5400ߵ^000000";
			mes "λѾ";
			mes "Сͼ,";
			mes .@str$;
			viewpoint 1,72,156,2,0xFFB400;
			next;
			break;
		case 4:
			mes "[ﵼ]";
			mes "^006400ְԱ^000000";
			mes "λСͼϵͼʾͿ,";
			mes .@str$;
			viewpoint 1,55,123,3,0xAAFF00;
			next;
			break;
		case 5:
			mes "[ﵼ]";
			mes "^7F3300ӶԱ^000000";
			mes "^7F3300Ӷ^000000";
			mes "λѾ";
			mes "Сͼ,";
			mes .@str$;
			viewpoint 1,101,166,4,0xD2691E;
			next;
			break;
		case 6:
			mes "[ﵼ]";
			mes "^800080ʦԱ^000000";
			mes "λѾ";
			mes "Сͼ,";
			mes .@str$;
			viewpoint 1,127,113,5,0xDA70D6;
			next;
			break;
		case 7:
			mes "[ﵼ]";
			mes "^0000FF԰ʦ^000000";
			mes "Ŀǰλڹֵ";
			mes "¥,";
			mes .@str$;
			viewpoint 1,143,164,6,0x0A82FF;
			next;
			break;
		case 8:
			mes "[ﵼ]";
			mes "ɾ,";
			mes .@str$;
			viewpoint 2,1,1,0,0xFFFF00;
			viewpoint 2,1,1,1,0x000000;
			viewpoint 2,1,1,2,0xFF0000;
			viewpoint 2,1,1,3,0xFFFF00;
			viewpoint 2,1,1,4,0xFFFF00;
			viewpoint 2,1,1,5,0xFFFF00;
			viewpoint 2,1,1,6,0xFFFF00;
			next;
			break;
		case 9:
			mes "[ﵼ]";
			mes "ף;!";
			close2;
			cutin "pay_soldier",255;
			end;
		}
	}
}
