-- Lua ½ºÅ©¸³Æ® ¾Ïȣȭ
function get_module_name()
             return "NPC_Buff"
end

   --============================================================
   --===============		½ÃÅ©·çÆ® ¸¶µµ»ç Ä«¸£Æ®
   --============================================================
   
-- Áßµ¿Á¦¿Ü Àû¿ë
function NPC_Secroute_mage_init()
	cprint( "!¸¶µµ»ç Ä«¸£Æ® °¡µ¿" )
	set_npc_name(  "@90702500"  )
end

function NPC_Secroute_mage_contact1()

	-- ´ÙÀ̾ó·Î±× Ãâ·Â
	dlg_title( "@90702501" )
	if is_premium() then
		dlg_text( "@90610219" )
	else
		dlg_text( "@90700118" )
	end

	-- ½ÃÅ©·çÆ® ÇÁ¸®Æнº°¡ È°¼ºÈ­µÈ »óÅÂ(ÇÁ¸®¹Ì¾ö ȸ¿ø)
	if is_premium() then
		dlg_menu( "@90610218", "nomal_charge_Buff_operation1()" ) -- Bienfaits du Village Cache (7 000 Rupys)
		dlg_menu( "Bienfaits du Village Cache (Free Test)", "nomal_charge_Buff_operation1_free()" ) -- Bienfaits du Village Cache (7 000 Rupys)
	end
	-- ´ëÈ­Á¾·á 
	dlg_menu( "@90010002", " " )
 
	dlg_show()

end

-- ½ÃÅ©·çÆ® °­È­ ¹öÇÁ °É±â
function nomal_charge_Buff_operation1()

	local gold = get_value( "gold" )	
		if gold >= 7000 then
				add_state( 1066, 7, 900000 ) -- ½ÃÅ©·çÆ® °­È­ ¹öÇÁ
				add_cstate( 1066, 7, 900000 ) -- ½ÃÅ©·çÆ® °­È­ ¹öÇÁ
				set_value( "gold", gold - 7000 )
				update_gold_chaos()
		else
			-- ´ÙÀ̾ó·Î±× Ãâ·Â
			dlg_title( "@90702501" )
			dlg_text( "@90702504" )
			--µ¹¾Æ°¡±â
			dlg_menu( "@90010003", "NPC_Secroute_mage_contact1()" )
			-- ´ëÈ­Á¾·á 
			dlg_menu( "@90010002", " " )
			dlg_show()
		end	
		
end

-- ½ÃÅ©·çÆ® °­È­ ¹öÇÁ °É±â
function nomal_charge_Buff_operation1_free()
add_state( 1066, 7, 900000 )
add_cstate( 1066, 7, 900000 )		
end

--=================================
-- Áßµ¿Àû¿ë
 function NPC_Secroute_mage_contact()

	-- ´ÙÀ̾ó·Î±× Ãâ·Â
	dlg_title( "@90702501" )
	if is_premium() then
		dlg_text( "@90702502" )
	else
		dlg_text( "@90700118" )
	end

	-- ½ÃÅ©·çÆ® ÇÁ¸®Æнº°¡ È°¼ºÈ­µÈ »óÅÂ(ÇÁ¸®¹Ì¾ö ȸ¿ø)
	if is_premium() then
	
	-- ÀÏ¹Ý ¸¶¹ý
	dlg_menu( "@90010197", "nomal_Buff()" )
	-- Áßø ¸¶¹ý
	dlg_menu( "@90010198", "reiterate_Buff()" )
	-- ¸ðµç ¸¶¹ý Ãë¼Ò
	dlg_menu( "@690000078", "Secroute_Buff_cancel()" )
	
	end
	-- ´ëÈ­Á¾·á 
	dlg_menu( "@90010002", " " )
 
	dlg_show()

end

function nomal_Buff()
	-- ´ÙÀ̾ó·Î±× Ãâ·Â
	dlg_title( "@90702501" )
	if is_premium() then
		dlg_text( "@90702505" )
	else
		dlg_text( "@90700118" )
	end
		
	-- ½ÃÅ©·çÆ® ÇÁ¸®Æнº°¡ È°¼ºÈ­µÈ »óÅÂ(ÇÁ¸®¹Ì¾ö ȸ¿ø)
	if is_premium() then
	-- ÀÏ¹Ý ¹«·á ¸¶¹ý
	dlg_menu( "@90010130", "nomal_no_charge_Buff()" )
	-- ÀÏ¹Ý À¯·á ¸¶¹ý
	dlg_menu( "@90010131", "nomal_charge_Buff()" )
	-- ÀÏ¹Ý À¯·á ¸¶¹ý Ãë¼ÒÇϱâ
	dlg_menu( "@90010212", "nomal_charge_Buff_cancel()" )
	
	end
	-- ´ëÈ­Á¾·á 
	dlg_menu( "@90010002", " " )
 
	dlg_show()

end

function reiterate_Buff()
	-- ´ÙÀ̾ó·Î±× Ãâ·Â
	dlg_title( "@90702501" )
	if is_premium() then
		dlg_text( "@90702506" )
	else
		dlg_text( "@90700118" )
	end
		
	-- ½ÃÅ©·çÆ® ÇÁ¸®Æнº°¡ È°¼ºÈ­µÈ »óÅÂ(ÇÁ¸®¹Ì¾ö ȸ¿ø)
	if is_premium() then
	-- Áßø ¹«·á ¸¶¹ý
	dlg_menu( "@90010130", "reiterate_no_charge_Buff()" )
	-- Áßø À¯·á ¸¶¹ý
	dlg_menu( "@90010131", "reiterate_charge_Buff()" )			
	-- Áßø À¯·á ¸¶¹ý Ãë¼Ò
	dlg_menu( "@90010212", "reiterate_charge_Buff_cancel()" )
	end
	-- ´ëÈ­Á¾·á 
	dlg_menu( "@90010002", " " )
 
	dlg_show()

end



-- ÀÏ¹Ý ¹«·á ¹öÇÁ
function nomal_no_charge_Buff()

	-- ´ÙÀ̾ó·Î±× Ãâ·Â
	dlg_title( "@90702501" )
	dlg_text( "@90702503" )

	-- °ø¼Ó Áõ°¡ lv3
	dlg_menu( "@90010199", "nomal_no_charge_Buff_operation(1)" )
	-- °ø°Ý·Â Áõ°¡ lv3
	dlg_menu( "@90010200", "nomal_no_charge_Buff_operation(2)" )			
	-- ¹æ¾î·Â Áõ°¡ lv3
	dlg_menu( "@90010201", "nomal_no_charge_Buff_operation(3)" )			
	-- ¸¶·Â Áõ°¡ lv3
	dlg_menu( "@90010202", "nomal_no_charge_Buff_operation(4)" )			
	-- ¸¶¹ý¹æ¾î·Â Áõ°¡ lv3
	dlg_menu( "@90010203", "nomal_no_charge_Buff_operation(5)" )			
	-- ½ÃÀü¼Óµµ Áõ°¡ lv3
	dlg_menu( "@90010204", "nomal_no_charge_Buff_operation(6)" )				
	--1~6¹ø 6Á¾ ¹öÇÁ Çѹø¿¡ ¹Þ±â	
	dlg_menu( "@90010249", "nomal_no_charge_Buff_operation(7)" )				
	
	--µ¹¾Æ°¡±â
	dlg_menu( "@90010003", "NPC_Secroute_mage_contact()" )	

	-- ´ëÈ­Á¾·á 
	dlg_menu( "@90010002", " " )
	dlg_show()

end	


-- ÀÏ¹Ý À¯·á ¹öÇÁ
function nomal_charge_Buff()

	-- ´ÙÀ̾ó·Î±× Ãâ·Â
	dlg_title( "@90702501" )
	dlg_text( "@90702503" )

	-- °ø¼Ó Áõ°¡ lv6
	dlg_menu( "@90010205", "nomal_charge_Buff_operation(1)" )
	-- °ø°Ý·Â Áõ°¡ lv6
	dlg_menu( "@90010206", "nomal_charge_Buff_operation(2)" )			
	-- ¹æ¾î·Â Áõ°¡ lv6
	dlg_menu( "@90010207", "nomal_charge_Buff_operation(3)" )			
	-- ¸¶·Â Áõ°¡ lv6
	dlg_menu( "@90010208", "nomal_charge_Buff_operation(4)" )			
	-- ¸¶¹ý¹æ¾î·Â Áõ°¡ lv6
	dlg_menu( "@90010209", "nomal_charge_Buff_operation(5)" )			
	-- À̵¿¼Óµµ Áõ°¡ lv6
	dlg_menu( "@90010210", "nomal_charge_Buff_operation(6)" )			
	-- ½ÃÀü¼Óµµ Áõ°¡ lv6
	dlg_menu( "@90010211", "nomal_charge_Buff_operation(7)" )				
	--1~7¹ø 7Á¾ ¹öÇÁ Çѹø¿¡ ¹Þ±â	
	dlg_menu( "@90010250", "nomal_charge_Buff_operation(8)" )				
	
	
	--µ¹¾Æ°¡±â
	dlg_menu( "@90010003", "NPC_Secroute_mage_contact()" )	

	-- ´ëÈ­Á¾·á 
	dlg_menu( "@90010002", " " )
	dlg_show()

end	



-- ÀÏ¹Ý À¯·á ¹öÇÁ Ãë¼ÒÇϱâ
function nomal_charge_Buff_cancel()

	-- ´ÙÀ̾ó·Î±× Ãâ·Â
	dlg_title( "@90702501" )
	dlg_text( "@90702507" )

	-- °ø¼Ó Áõ°¡ lv6 Ãë¼Ò
	dlg_menu( "@90010213", "nomal_charge_Buff_cancel_operation(1)" )
	-- °ø°Ý·Â Áõ°¡ lv6 Ãë¼Ò
	dlg_menu( "@90010214", "nomal_charge_Buff_cancel_operation(2)" )			
	-- ¹æ¾î·Â Áõ°¡ lv6 Ãë¼Ò
	dlg_menu( "@90010215", "nomal_charge_Buff_cancel_operation(3)" )			
	-- ¸¶·Â Áõ°¡ lv6 Ãë¼Ò
	dlg_menu( "@90010216", "nomal_charge_Buff_cancel_operation(4)" )			
	-- ¸¶¹ý¹æ¾î·Â Áõ°¡ lv6 Ãë¼Ò
	dlg_menu( "@90010217", "nomal_charge_Buff_cancel_operation(5)" )			
	-- À̵¿¼Óµµ Áõ°¡ lv6 Ãë¼Ò
	dlg_menu( "@90010218", "nomal_charge_Buff_cancel_operation(6)" )			
	-- ½ÃÀü¼Óµµ Áõ°¡ lv6 Ãë¼Ò
	dlg_menu( "@90010219", "nomal_charge_Buff_cancel_operation(7)" )				
	
	--µ¹¾Æ°¡±â
	dlg_menu( "@90010003", "NPC_Secroute_mage_contact()" )	

	-- ´ëÈ­Á¾·á 
	dlg_menu( "@90010002", " " )
	dlg_show()

end	

-- ÀÏ¹Ý ¹«·á ¹öÇÁ °É±â
function nomal_no_charge_Buff_operation( magic_set )
	-- ¹öÇÁ 7Á¾ ¹Þ¾Æ¿À±â
	local state_level_1 = get_state_level( 1011 )
	local state_level_2 = get_state_level( 1007 )
	local state_level_3 = get_state_level( 1009 )
	local state_level_4 = get_state_level( 1008 )
	local state_level_5 = get_state_level( 1010 )
	local state_level_6 = get_state_level( 1012 )
	
	if magic_set == 1 and state_level_1 == 0 then
		add_state( 1055, 3, 540000 ) -- °ø¼Ólv3 Áõ°¡
		nomal_no_charge_Buff()
		return
	else
		dlg_title( "@90702501" )	
		dlg_text( "@90702508" )
	end		
		
	if magic_set == 2 and state_level_2 == 0 then
			add_state( 1051, 3, 540000 ) -- °ø°Ý·Âlv3 Áõ°¡
			nomal_no_charge_Buff()
			return
	else
		dlg_title( "@90702501" )	
		dlg_text( "@90702508" )
	end		
	
	if magic_set == 3 and state_level_3 == 0 then
			add_state( 1053, 3, 540000 ) -- ¹æ¾î·Âlv3 Áõ°¡
			nomal_no_charge_Buff()
			return
	else
		dlg_title( "@90702501" )	
		dlg_text( "@90702508" )
	end		
	if magic_set == 4 and state_level_4 == 0 then
			add_state( 1052, 3, 540000 ) -- ¸¶·Âlv3 Áõ°¡
			nomal_no_charge_Buff()
			return
	else
		dlg_title( "@90702501" )	
		dlg_text( "@90702508" )
	end		
	if magic_set == 5 and state_level_5 == 0 then
			add_state( 1054, 3, 540000 ) -- ¸¶¹ý¹æ¾î·Âlv3 Áõ°¡
			nomal_no_charge_Buff()
			return
	else
		dlg_title( "@90702501" )	
		dlg_text( "@90702508" )
	end		
	if magic_set == 6 and state_level_6 == 0 then
			add_state( 1056, 3, 540000 ) -- ½ÃÀü¼Óµµlv3 Áõ°¡
			nomal_no_charge_Buff()
			return
	else
		dlg_title( "@90702501" )	
		dlg_text( "@90702508" )
	end		
	if magic_set == 7 and state_level_1 == 0 and state_level_2 == 0 and state_level_3 == 0 and state_level_4 == 0 and state_level_5 == 0 and state_level_6 == 0 then
			add_state( 1051, 3, 540000 )
			add_state( 1052, 3, 540000 )
			add_state( 1053, 3, 540000 )
			add_state( 1054, 3, 540000 )
			add_state( 1055, 3, 540000 )
			add_state( 1056, 3, 540000 )
			nomal_no_charge_Buff()
			return
	else
		dlg_title( "@90702501" )	
		dlg_text( "@90702508" )
	end	
	
	--µ¹¾Æ°¡±â
	dlg_menu( "@90010003", "NPC_Secroute_mage_contact()" )	
	-- ´ëÈ­Á¾·á 
	dlg_menu( "@90010002", " " )
	dlg_show()

end	




-- ÀÏ¹Ý À¯·á ¹öÇÁ °É±â
function nomal_charge_Buff_operation( magic_set )
	local gold = get_value( "gold" )
	-- ¹öÇÁ 7Á¾ ¹Þ¾Æ¿À±â
	local state_level_1 = get_state_level( 1011 )
	local state_level_2 = get_state_level( 1007 )
	local state_level_3 = get_state_level( 1009 )
	local state_level_4 = get_state_level( 1008 )
	local state_level_5 = get_state_level( 1010 )
	local state_level_6 = get_state_level( 1013 )
	local state_level_7 = get_state_level( 1012 )
	
		if gold >= 1000 then
			if magic_set == 1 and state_level_1 == 0 then
				add_state( 1055, 7, 900000 ) -- °ø¼Ólv7 Áõ°¡
				set_value( "gold", gold - 1000 )
				update_gold_chaos()
				nomal_charge_Buff()		
				return
			else
				dlg_title( "@90702501" )	
				dlg_text( "@90702508" )
			end
				
			if magic_set == 2 and state_level_2 == 0 then
				add_state( 1051, 7, 900000 ) -- °ø°Ý·Âlv7 Áõ°¡
				set_value( "gold", gold - 1000 )
				update_gold_chaos()
				nomal_charge_Buff()		
				return
			else
				dlg_title( "@90702501" )		
				dlg_text( "@90702508" )
			end
			
			if magic_set == 3 and state_level_3 == 0 then
				add_state( 1053, 7, 900000 ) -- ¹æ¾î·Âlv7 Áõ°¡
				set_value( "gold", gold - 1000 )
				update_gold_chaos()
				nomal_charge_Buff()		
				return
			else
				dlg_title( "@90702501" )		
				dlg_text( "@90702508" )
			end
			
			if magic_set == 4 and state_level_4 == 0 then
				add_state( 1052, 7, 900000 ) -- ¸¶·Âlv7 Áõ°¡
				set_value( "gold", gold - 1000 )
				update_gold_chaos()
				nomal_charge_Buff()		
				return
			else
				dlg_title( "@90702501" )		
				dlg_text( "@90702508" )
			end
			
			if magic_set == 5 and state_level_5 == 0 then
				add_state( 1054, 7, 900000 ) -- ¸¶¹ý¹æ¾î·Âlv7 Áõ°¡
				set_value( "gold", gold - 1000 )
				update_gold_chaos()
				nomal_charge_Buff()		
				return
			else	
				dlg_title( "@90702501" )	
				dlg_text( "@90702508" )
			end
			
			if magic_set == 6 and state_level_6 == 0 then
				add_state( 1057, 7, 900000 ) -- À̵¿¼Óµµlv7 Áõ°¡
				set_value( "gold", gold - 1000 )
				update_gold_chaos()
				nomal_charge_Buff()		
				return
			else
				dlg_title( "@90702501" )		
				dlg_text( "@90702508" )
			end
			
			if magic_set == 7 and state_level_7 == 0 then
				add_state( 1056, 7, 900000 ) -- ½ÃÀü¼Óµµlv7 Áõ°¡
				set_value( "gold", gold - 1000 )
				update_gold_chaos()
				nomal_charge_Buff()		
				return
			else
				dlg_title( "@90702501" )		
				dlg_text( "@90702508" )
			end
			if gold >= 7000 then
				if magic_set == 8 and state_level_1 == 0 and state_level_2 == 0 and state_level_3 == 0 and state_level_4 == 0 and state_level_5 == 0 and state_level_6 == 0 and state_level_7 == 0  then
					add_state( 1051, 7, 900000 )
					add_state( 1052, 7, 900000 )
					add_state( 1053, 7, 900000 )
					add_state( 1054, 7, 900000 )
					add_state( 1055, 7, 900000 )
					add_state( 1056, 7, 900000 )
					add_state( 1057, 7, 900000 )
					set_value( "gold", gold - 7000 )
					update_gold_chaos()
					nomal_charge_Buff()		
				return				
				end	
			else
				dlg_title( "@90702501" )	
				dlg_text( "@90702508" )
			end
		else
		-- ´ÙÀ̾ó·Î±× Ãâ·Â
		dlg_title( "@90702501" )
		dlg_text( "@90702504" )
		

		end
		--µ¹¾Æ°¡±â
		dlg_menu( "@90010003", "NPC_Secroute_mage_contact()" )
		-- ´ëÈ­Á¾·á 
		dlg_menu( "@90010002", " " )
		dlg_show()	
end

-- ÀÏ¹Ý À¯·á ¹öÇÁ °É±â Ãë¼ÒÇϱâ
function nomal_charge_Buff_cancel_operation( magic_set )

		if magic_set == 1 then
			remove_state( 1055, 7 ) -- °ø¼Ólv7 Ãë¼Ò
		elseif magic_set == 2 then
			remove_state( 1051, 7 ) -- °ø°Ý·Âlv7 Ãë¼Ò
		elseif magic_set == 3 then
			remove_state( 1053, 7 ) -- ¹æ¾î·Âlv7 Ãë¼Ò
		elseif magic_set == 4 then
			remove_state( 1052, 7 ) -- ¸¶·Âlv7 Ãë¼Ò
		elseif magic_set == 5 then
			remove_state( 1054, 7 ) -- ¸¶¹ý¹æ¾î·Âlv7 Ãë¼Ò
		elseif magic_set == 6 then
			remove_state( 1057, 7 ) -- À̵¿¼Óµµlv7 Ãë¼Ò
		else
			remove_state( 1056, 7 ) -- ½ÃÀü¼Óµµlv7 Ãë¼Ò

		end
	nomal_charge_Buff_cancel()
end


-- Áßø ¹«·á ¸¶¹ý ´ë»ç
function reiterate_no_charge_Buff()

	-- ´ÙÀ̾ó·Î±× Ãâ·Â
	dlg_title( "@90702501" )
	dlg_text( "@90702503" )

	-- °ø¼Ó Áõ°¡ lv3
	dlg_menu( "@90010132", "reiterate_no_charge_Buff_operation(1)" )
	-- °ø°Ý·Â Áõ°¡ lv3
	dlg_menu( "@90010133", "reiterate_no_charge_Buff_operation(2)" )			
	-- ¹æ¾î·Â Áõ°¡ lv3
	dlg_menu( "@90010134", "reiterate_no_charge_Buff_operation(3)" )			
	-- ¸¶·Â Áõ°¡ lv3
	dlg_menu( "@90010135", "reiterate_no_charge_Buff_operation(4)" )			
	-- ¸¶¹ý¹æ¾î·Â Áõ°¡ lv3
	dlg_menu( "@90010136", "reiterate_no_charge_Buff_operation(5)" )			
	-- ½ÃÀü¼Óµµ Áõ°¡ lv3
	dlg_menu( "@90010138", "reiterate_no_charge_Buff_operation(6)" )				
	--1~6¹ø 6Á¾ ¹öÇÁ Çѹø¿¡ ¹Þ±â	
	dlg_menu( "@90010249", "reiterate_no_charge_Buff_operation(7)" )			
	
		
	
	--µ¹¾Æ°¡±â
	dlg_menu( "@90010003", "NPC_Secroute_mage_contact()" )	

	-- ´ëÈ­Á¾·á 
	dlg_menu( "@90010002", " " )
	dlg_show()

end	


-- Áßø À¯·á ¸¶¹ý ´ë»ç
function reiterate_charge_Buff()

	-- ´ÙÀ̾ó·Î±× Ãâ·Â
	dlg_title( "@90702501" )
	dlg_text( "@90702503" )

	-- °ø¼Ó Áõ°¡ lv6
	dlg_menu( "@90010139", "reiterate_charge_Buff_operation(1)" )
	-- °ø°Ý·Â Áõ°¡ lv6
	dlg_menu( "@90010140", "reiterate_charge_Buff_operation(2)" )			
	-- ¹æ¾î·Â Áõ°¡ lv6
	dlg_menu( "@90010141", "reiterate_charge_Buff_operation(3)" )			
	-- ¸¶·Â Áõ°¡ lv6
	dlg_menu( "@90010142", "reiterate_charge_Buff_operation(4)" )			
	-- ¸¶¹ý¹æ¾î·Â Áõ°¡ lv6
	dlg_menu( "@90010143", "reiterate_charge_Buff_operation(5)" )			
	-- À̵¿¼Óµµ Áõ°¡ lv6
	dlg_menu( "@90010144", "reiterate_charge_Buff_operation(6)" )			
	-- ½ÃÀü¼Óµµ Áõ°¡ lv6
	dlg_menu( "@90010145", "reiterate_charge_Buff_operation(7)" )				
	--1~7¹ø 7Á¾ ¹öÇÁ Çѹø¿¡ ¹Þ±â	
	dlg_menu( "@90010250", "reiterate_charge_Buff_operation(8)" )				
		
	--µ¹¾Æ°¡±â
	dlg_menu( "@90010003", "NPC_Secroute_mage_contact()" )	

	-- ´ëÈ­Á¾·á 
	dlg_menu( "@90010002", " " )
	dlg_show()

end	



-- ÀÏ¹Ý À¯·á ¹öÇÁ Ãë¼ÒÇϱâ
function reiterate_charge_Buff_cancel()

	-- ´ÙÀ̾ó·Î±× Ãâ·Â
	dlg_title( "@90702501" )
	dlg_text( "@90702507" )

	-- °ø¼Ó Áõ°¡ lv6 Ãë¼Ò
	dlg_menu( "@90010213", "reiterate_charge_Buff_cancel_operation(1)" )
	-- °ø°Ý·Â Áõ°¡ lv6 Ãë¼Ò
	dlg_menu( "@90010214", "reiterate_charge_Buff_cancel_operation(2)" )			
	-- ¹æ¾î·Â Áõ°¡ lv6 Ãë¼Ò
	dlg_menu( "@90010215", "reiterate_charge_Buff_cancel_operation(3)" )			
	-- ¸¶·Â Áõ°¡ lv6 Ãë¼Ò
	dlg_menu( "@90010216", "reiterate_charge_Buff_cancel_operation(4)" )			
	-- ¸¶¹ý¹æ¾î·Â Áõ°¡ lv6 Ãë¼Ò
	dlg_menu( "@90010217", "reiterate_charge_Buff_cancel_operation(5)" )			
	-- À̵¿¼Óµµ Áõ°¡ lv6 Ãë¼Ò
	dlg_menu( "@90010218", "reiterate_charge_Buff_cancel_operation(6)" )			
	-- ½ÃÀü¼Óµµ Áõ°¡ lv6 Ãë¼Ò
	dlg_menu( "@90010219", "reiterate_charge_Buff_cancel_operation(7)" )				
	
	
	--µ¹¾Æ°¡±â
	dlg_menu( "@90010003", "NPC_Secroute_mage_contact()" )	

	-- ´ëÈ­Á¾·á 
	dlg_menu( "@90010002", " " )
	dlg_show()

end	




-- Áßø ¹«·á ¸¶¹ý °É±â	
function reiterate_no_charge_Buff_operation( magic_set )

	-- ¹öÇÁ 7Á¾ ¹Þ¾Æ¿À±â
	local state_level_1 = get_state_level( 1055 )
	local state_level_2 = get_state_level( 1051 )
	local state_level_3 = get_state_level( 1053 )
	local state_level_4 = get_state_level( 1052 )
	local state_level_5 = get_state_level( 1054 )
	local state_level_6 = get_state_level( 1056 )

	
	if magic_set == 1 and state_level_1 == 0 then
		add_state( 1011, 3, 540000 ) -- °ø¼Ólv3 Áõ°¡
		reiterate_no_charge_Buff()	
		return
	else
		dlg_title( "@90702501" )	
		dlg_text( "@90702509" )
	end		
		
		
	if magic_set == 2 and state_level_2 == 0 then
			add_state( 1007, 3, 540000 ) -- °ø°Ý·Âlv3 Áõ°¡
		reiterate_no_charge_Buff()	
		return
	else
		dlg_title( "@90702501" )	
		dlg_text( "@90702509" )
	end		
	if magic_set == 3 and state_level_3 == 0 then
			add_state( 1009, 3, 540000 ) -- ¹æ¾î·Âlv3 Áõ°¡
		reiterate_no_charge_Buff()	
		return
	else
		dlg_title( "@90702501" )	
		dlg_text( "@90702509" )
	end		
	if magic_set == 4 and state_level_4 == 0 then
			add_state( 1008, 3, 540000 ) -- ¸¶·Âlv3 Áõ°¡
		reiterate_no_charge_Buff()	
		return
	else
		dlg_title( "@90702501" )	
		dlg_text( "@90702509" )
	end		
	if magic_set == 5 and state_level_5 == 0 then
			add_state( 1010, 3, 540000 ) -- ¸¶¹ý¹æ¾î·Âlv3 Áõ°¡
		reiterate_no_charge_Buff()	
		return
	else
		dlg_title( "@90702501" )	
		dlg_text( "@90702509" )
	end		
	if magic_set == 6 and state_level_6 == 0 then
			add_state( 1012, 3, 540000 ) -- ½ÃÀü¼Óµµlv3 Áõ°¡
		reiterate_no_charge_Buff()	
		return
	else
		dlg_title( "@90702501" )	
		dlg_text( "@90702509" )
	end
	
	if magic_set == 7 and state_level_1 == 0 and state_level_2 == 0 and state_level_3 == 0 and state_level_4 == 0 and state_level_5 == 0 and state_level_6 == 0 then
			add_state( 1007, 3, 540000 )
			add_state( 1008, 3, 540000 )
			add_state( 1009, 3, 540000 )
			add_state( 1010, 3, 540000 )
			add_state( 1011, 3, 540000 )
			add_state( 1012, 3, 540000 )
			nomal_no_charge_Buff()
			return
	else
		dlg_title( "@90702501" )	
		dlg_text( "@90702508" )
	end	
	
	--µ¹¾Æ°¡±â
	dlg_menu( "@90010003", "NPC_Secroute_mage_contact()" )	
	-- ´ëÈ­Á¾·á 
	dlg_menu( "@90010002", " " )
	dlg_show()
	
end




-- Áßø À¯·á ¸¶¹ý °É±â	
function reiterate_charge_Buff_operation( magic_set )
	local gold = get_value( "gold" )
	-- ¹öÇÁ 7Á¾ ¹Þ¾Æ¿À±â
	local state_level_1 = get_state_level( 1055 )
	local state_level_2 = get_state_level( 1051 )
	local state_level_3 = get_state_level( 1053 )
	local state_level_4 = get_state_level( 1052 )
	local state_level_5 = get_state_level( 1054 )
	local state_level_6 = get_state_level( 1057 )
	local state_level_7 = get_state_level( 1056 )

	
		if gold >= 1000 then
			if magic_set == 1 and state_level_1 == 0 then
				add_state( 1011, 7, 900000 ) -- °ø¼Ólv7 Áõ°¡
				set_value( "gold", gold - 1000 )
				update_gold_chaos()
				reiterate_charge_Buff()
				return
			else
				dlg_title( "@90702501" )	
				dlg_text( "@90702509" )
			end
				
			if magic_set == 2 and state_level_2 == 0 then
				add_state( 1007, 7, 900000 ) -- °ø°Ý·Âlv7 Áõ°¡
				set_value( "gold", gold - 1000 )
				update_gold_chaos()
				reiterate_charge_Buff()		
				return
			else
				dlg_title( "@90702501" )		
				dlg_text( "@90702509" )
			end
			
			if magic_set == 3 and state_level_3 == 0 then
				add_state( 1009, 7, 900000 ) -- ¹æ¾î·Âlv7 Áõ°¡
				set_value( "gold", gold - 1000 )
				update_gold_chaos()
				reiterate_charge_Buff()		
				return
			else
				dlg_title( "@90702501" )		
				dlg_text( "@90702509" )
			end
			
			if magic_set == 4 and state_level_4 == 0 then
				add_state( 1008, 7, 900000 ) -- ¸¶·Âlv7 Áõ°¡
				set_value( "gold", gold - 1000 )
				update_gold_chaos()
				reiterate_charge_Buff()		
				return
			else
				dlg_title( "@90702501" )		
				dlg_text( "@90702509" )
			end
			
			if magic_set == 5 and state_level_5 == 0 then
				add_state( 1010, 7, 900000 ) -- ¸¶¹ý¹æ¾î·Âlv7 Áõ°¡
				set_value( "gold", gold - 1000 )
				update_gold_chaos()
				reiterate_charge_Buff()		
				return
			else	
				dlg_title( "@90702501" )	
				dlg_text( "@90702509" )
			end
			
			if magic_set == 6 and state_level_6 == 0 then
				add_state( 1013, 7, 900000 ) -- À̵¿¼Óµµlv7 Áõ°¡
				set_value( "gold", gold - 1000 )
				update_gold_chaos()
				reiterate_charge_Buff()		
				return
			else
				dlg_title( "@90702501" )		
				dlg_text( "@90702509" )
			end
			
			if magic_set == 7 and state_level_7 == 0 then
				add_state( 1012, 7, 900000 ) -- ½ÃÀü¼Óµµlv7 Áõ°¡
				set_value( "gold", gold - 1000 )
				update_gold_chaos()
				reiterate_charge_Buff()		
				return
			else
				dlg_title( "@90702501" )		
				dlg_text( "@90702509" )
			end
						
			if gold >= 7000 then
				if magic_set == 8 and state_level_1 == 0 and state_level_2 == 0 and state_level_3 == 0 and state_level_4 == 0 and state_level_5 == 0 and state_level_6 == 0 and state_level_7 == 0  then
					add_state( 1007, 7, 900000 )
					add_state( 1008, 7, 900000 )
					add_state( 1009, 7, 900000 )
					add_state( 1010, 7, 900000 )
					add_state( 1011, 7, 900000 )
					add_state( 1012, 7, 900000 )
					add_state( 1013, 7, 900000 )
					set_value( "gold", gold - 7000 )
					update_gold_chaos()
					nomal_charge_Buff()		
				return
				end	
			else
				dlg_title( "@90702501" )	
				dlg_text( "@90702508" )
			end
		else
		-- ´ÙÀ̾ó·Î±× Ãâ·Â
		dlg_title( "@90702501" )
		dlg_text( "@90702504" )
		
		end
		--µ¹¾Æ°¡±â
		dlg_menu( "@90010003", "NPC_Secroute_mage_contact()" )
	-- ´ëÈ­Á¾·á 
	dlg_menu( "@90010002", " " )
	dlg_show()
end


-- ÀÏ¹Ý À¯·á ¹öÇÁ °É±â Ãë¼ÒÇϱâ
function reiterate_charge_Buff_cancel_operation( magic_set )

		if magic_set == 1 then
			remove_state( 1011, 7 ) -- °ø¼Ólv7 Ãë¼Ò
		elseif magic_set == 2 then
			remove_state( 1007, 7 ) -- °ø°Ý·Âlv7 Ãë¼Ò
		elseif magic_set == 3 then
			remove_state( 1009, 7 ) -- ¹æ¾î·Âlv7 Ãë¼Ò
		elseif magic_set == 4 then
			remove_state( 1008, 7 ) -- ¸¶·Âlv7 Ãë¼Ò
		elseif magic_set == 5 then
			remove_state( 1010, 7 ) -- ¸¶¹ý¹æ¾î·Âlv7 Ãë¼Ò
		elseif magic_set == 6 then
			remove_state( 1013, 7 ) -- À̵¿¼Óµµlv7 Ãë¼Ò
		else
			remove_state( 1012, 7 ) -- ½ÃÀü¼Óµµlv7 Ãë¼Ò

		end
	reiterate_charge_Buff_cancel()
end

-- ¸ðµç ½ÃÅ©·çÆ® ¹öÇÁ(ÀϹÝ/Áßø) Çѹø¿¡ Ãë¼ÒÇϱâ
function Secroute_Buff_cancel()

		-- ½ÃÅ©·çÆ® ÀÏ¹Ý ¹öÇÁ Ãë¼ÒÇϱâ
		remove_state( 1011, 7 ) -- °ø¼Ólv7 Ãë¼Ò
		remove_state( 1007, 7 ) -- °ø°Ý·Âlv7 Ãë¼Ò
		remove_state( 1009, 7 ) -- ¹æ¾î·Âlv7 Ãë¼Ò
		remove_state( 1008, 7 ) -- ¸¶·Âlv7 Ãë¼Ò
		remove_state( 1010, 7 ) -- ¸¶¹ý¹æ¾î·Âlv7 Ãë¼Ò
		remove_state( 1013, 7 ) -- À̵¿¼Óµµlv7 Ãë¼Ò
		remove_state( 1012, 7 ) -- ½ÃÀü¼Óµµlv7 Ãë¼Ò

		-- ½ÃÅ©·çÆ® Áßø ¹öÇÁ Ãë¼ÒÇϱâ
		remove_state( 1055, 7 ) -- °ø¼Ólv7 Ãë¼Ò
		remove_state( 1051, 7 ) -- °ø°Ý·Âlv7 Ãë¼Ò
		remove_state( 1053, 7 ) -- ¹æ¾î·Âlv7 Ãë¼Ò
		remove_state( 1052, 7 ) -- ¸¶·Âlv7 Ãë¼Ò
		remove_state( 1054, 7 ) -- ¸¶¹ý¹æ¾î·Âlv7 Ãë¼Ò
		remove_state( 1057, 7 ) -- À̵¿¼Óµµlv7 Ãë¼Ò
		remove_state( 1056, 7 ) -- ½ÃÀü¼Óµµlv7 Ãë¼Ò

end

---------------------------------------------------------------------------------------
---------------------------------------------------------------------------------------
-------------------------------- ÇØ¿Ü ½ÃÅ©·çÆ® ¹öÇÁ ------------------------------------
---------------------------------------------------------------------------------------
---------------------------------------------------------------------------------------

function NPC_Foreign_Secroute_mage_contact()

	-- ´ÙÀ̾ó·Î±× Ãâ·Â
	dlg_title( "@90702501" )
	if is_premium() then
		dlg_text( "@90999607" )	--½ÃÅ©·çÆ®°¡ ÀÖ´Â »ç¶÷
	else
		dlg_text( "@90700118" )	--½ÃÅ©·çÆ®°¡ ¾ø´Â »ç¶÷
	end

	-- ½ÃÅ©·çÆ® ÇÁ¸®Æнº°¡ È°¼ºÈ­µÈ »óÅÂ(ÇÁ¸®¹Ì¾ö ȸ¿ø)
	if is_premium() then
	-- Áßø ¸¶¹ý
	dlg_menu( "@90010198", "Foreign_reiterate_charge_Buff()" )
	-- Áßø À¯·á ¸¶¹ý Ãë¼Ò
	dlg_menu( "@90010212", "Foreign_reiterate_charge_Buff_cancel()" )
	
	end
	-- ´ëÈ­Á¾·á 
	dlg_menu( "@90010002", " " )
	dlg_show()
end

-- Áßø À¯·á ¸¶¹ý ´ë»ç
function Foreign_reiterate_charge_Buff()

	-- ´ÙÀ̾ó·Î±× Ãâ·Â
	dlg_title( "@90702501" )
	dlg_text( "@90702503" )

	-- °ø¼Ó Áõ°¡ lv6
	dlg_menu( "@90999609", "Foreign_reiterate_charge_Buff_operation(1)" )
	-- °ø°Ý·Â Áõ°¡ lv6
	dlg_menu( "@90999610", "Foreign_reiterate_charge_Buff_operation(2)" )			
	-- ¹æ¾î·Â Áõ°¡ lv6
	dlg_menu( "@90999611", "Foreign_reiterate_charge_Buff_operation(3)" )			
	-- ¸¶·Â Áõ°¡ lv6
	dlg_menu( "@90999612", "Foreign_reiterate_charge_Buff_operation(4)" )			
	-- ¸¶¹ý¹æ¾î·Â Áõ°¡ lv6
	dlg_menu( "@90999613", "Foreign_reiterate_charge_Buff_operation(5)" )			
	-- À̵¿¼Óµµ Áõ°¡ lv6
	dlg_menu( "@90999614", "Foreign_reiterate_charge_Buff_operation(6)" )			
	-- ½ÃÀü¼Óµµ Áõ°¡ lv6
	dlg_menu( "@90999615", "Foreign_reiterate_charge_Buff_operation(7)" )				
	--1~7¹ø 7Á¾ ¹öÇÁ Çѹø¿¡ ¹Þ±â	
	dlg_menu( "@90999616", "Foreign_reiterate_charge_Buff_operation(8)" )				
		
	--µ¹¾Æ°¡±â
	dlg_menu( "@90010003", "NPC_Foreign_Secroute_mage_contact()" )	

	-- ´ëÈ­Á¾·á 
	dlg_menu( "@90010002", " " )
	dlg_show()

end	

-- Áßø À¯·á ¸¶¹ý °É±â	
function Foreign_reiterate_charge_Buff_operation( magic_set )
	local gold = get_value( "gold" )
	-- ¹öÇÁ 7Á¾ ¹Þ¾Æ¿À±â
	local state_level_1 = get_state_level( 1055 )
	local state_level_2 = get_state_level( 1051 )
	local state_level_3 = get_state_level( 1053 )
	local state_level_4 = get_state_level( 1052 )
	local state_level_5 = get_state_level( 1054 )
	local state_level_6 = get_state_level( 1057 )
	local state_level_7 = get_state_level( 1056 )

	
		if gold >= 3000 then
			if magic_set == 1 and state_level_1 == 0 then
				add_state( 1011, 7, 360000 ) -- °ø¼Ó lv7 Áõ°¡
				set_value( "gold", gold - 3000 )
				update_gold_chaos()
				Foreign_reiterate_charge_Buff()
				return
			else
				dlg_title( "@90702501" )	
				dlg_text( "@90702509" )
			end
				
			if magic_set == 2 and state_level_2 == 0 then
				add_state( 1007, 7, 360000 ) -- °ø°Ý·Â lv7 Áõ°¡
				set_value( "gold", gold - 3000 )
				update_gold_chaos()
				Foreign_reiterate_charge_Buff()		
				return
			else
				dlg_title( "@90702501" )		
				dlg_text( "@90702509" )
			end
			
			if magic_set == 3 and state_level_3 == 0 then
				add_state( 1009, 7, 360000 ) -- ¹æ¾î·Âlv7 Áõ°¡
				set_value( "gold", gold - 3000 )
				update_gold_chaos()
				Foreign_reiterate_charge_Buff()
				return
			else
				dlg_title( "@90702501" )		
				dlg_text( "@90702509" )
			end
			
			if magic_set == 4 and state_level_4 == 0 then
				add_state( 1008, 7, 360000 ) -- ¸¶·Âlv7 Áõ°¡
				set_value( "gold", gold - 3000 )
				update_gold_chaos()
				Foreign_reiterate_charge_Buff()
				return
			else
				dlg_title( "@90702501" )		
				dlg_text( "@90702509" )
			end
			
			if magic_set == 5 and state_level_5 == 0 then
				add_state( 1010, 7, 360000 ) -- ¸¶¹ý¹æ¾î·Âlv7 Áõ°¡
				set_value( "gold", gold - 3000 )
				update_gold_chaos()
				Foreign_reiterate_charge_Buff()
				return
			else	
				dlg_title( "@90702501" )	
				dlg_text( "@90702509" )
			end
			
			if magic_set == 6 and state_level_6 == 0 then
				add_state( 1013, 7, 360000 ) -- À̵¿¼Óµµlv7 Áõ°¡
				set_value( "gold", gold - 3000 )
				update_gold_chaos()
				Foreign_reiterate_charge_Buff()
				return
			else
				dlg_title( "@90702501" )		
				dlg_text( "@90702509" )
			end
			
			if magic_set == 7 and state_level_7 == 0 then
				add_state( 1012, 7, 360000 ) -- ½ÃÀü¼Óµµlv7 Áõ°¡
				set_value( "gold", gold - 3000 )
				update_gold_chaos()
				Foreign_reiterate_charge_Buff()
				return
			else
				dlg_title( "@90702501" )		
				dlg_text( "@90702509" )
			end
						
			if gold >= 21000 then
				if magic_set == 8 and state_level_1 == 0 and state_level_2 == 0 and state_level_3 == 0 and state_level_4 == 0 and state_level_5 == 0 and state_level_6 == 0 and state_level_7 == 0  then
					add_state( 1007, 7, 360000 )
					add_state( 1008, 7, 360000 )
					add_state( 1009, 7, 360000 )
					add_state( 1010, 7, 360000 )
					add_state( 1011, 7, 360000 )
					add_state( 1012, 7, 360000 )
					add_state( 1013, 7, 360000 )
					set_value( "gold", gold - 21000 )
					update_gold_chaos()
					nomal_charge_Buff()		
				return
				end	
			else
				dlg_title( "@90702501" )	
				dlg_text( "@90702508" )
			end
		else
		-- ´ÙÀ̾ó·Î±× Ãâ·Â
		dlg_title( "@90702501" )
		dlg_text( "@90702504" )
		
		end
		--µ¹¾Æ°¡±â
		dlg_menu( "@90010003", "NPC_Foreign_Secroute_mage_contact()" )
	-- ´ëÈ­Á¾·á 
	dlg_menu( "@90010002", " " )
	dlg_show()
end

-- ÀÏ¹Ý À¯·á ¹öÇÁ Ãë¼ÒÇϱâ
function Foreign_reiterate_charge_Buff_cancel()

	-- ´ÙÀ̾ó·Î±× Ãâ·Â
	dlg_title( "@90702501" )
	dlg_text( "@90702507" )

	-- °ø¼Ó Áõ°¡ lv6 Ãë¼Ò
	dlg_menu( "@90010213", "Foreign_reiterate_charge_Buff_cancel_operation(1)" )
	-- °ø°Ý·Â Áõ°¡ lv6 Ãë¼Ò
	dlg_menu( "@90010214", "Foreign_reiterate_charge_Buff_cancel_operation(2)" )			
	-- ¹æ¾î·Â Áõ°¡ lv6 Ãë¼Ò
	dlg_menu( "@90010215", "Foreign_reiterate_charge_Buff_cancel_operation(3)" )			
	-- ¸¶·Â Áõ°¡ lv6 Ãë¼Ò
	dlg_menu( "@90010216", "Foreign_reiterate_charge_Buff_cancel_operation(4)" )			
	-- ¸¶¹ý¹æ¾î·Â Áõ°¡ lv6 Ãë¼Ò
	dlg_menu( "@90010217", "Foreign_reiterate_charge_Buff_cancel_operation(5)" )			
	-- À̵¿¼Óµµ Áõ°¡ lv6 Ãë¼Ò
	dlg_menu( "@90010218", "Foreign_reiterate_charge_Buff_cancel_operation(6)" )			
	-- ½ÃÀü¼Óµµ Áõ°¡ lv6 Ãë¼Ò
	dlg_menu( "@90010219", "Foreign_reiterate_charge_Buff_cancel_operation(7)" )				
	-- ¸ðµç ¹öÇÁ Ãë¼Ò
	dlg_menu( "@690000078", "Foreign_reiterate_charge_Buff_cancel_operation(8)" )	
	
	--µ¹¾Æ°¡±â
	dlg_menu( "@90010003", "NPC_Foreign_Secroute_mage_contact()" )	

	-- ´ëÈ­Á¾·á 
	dlg_menu( "@90010002", " " )
	dlg_show()

end	

-- ÀÏ¹Ý À¯·á ¹öÇÁ °É±â Ãë¼ÒÇϱâ
function Foreign_reiterate_charge_Buff_cancel_operation( magic_set )

		if magic_set == 1 then
			remove_state( 1011, 7 ) -- °ø¼Ólv7 Ãë¼Ò
		elseif magic_set == 2 then
			remove_state( 1007, 7 ) -- °ø°Ý·Âlv7 Ãë¼Ò
		elseif magic_set == 3 then
			remove_state( 1009, 7 ) -- ¹æ¾î·Âlv7 Ãë¼Ò
		elseif magic_set == 4 then
			remove_state( 1008, 7 ) -- ¸¶·Âlv7 Ãë¼Ò
		elseif magic_set == 5 then
			remove_state( 1010, 7 ) -- ¸¶¹ý¹æ¾î·Âlv7 Ãë¼Ò
		elseif magic_set == 6 then
			remove_state( 1013, 7 ) -- À̵¿¼Óµµlv7 Ãë¼Ò
		elseif magic_set == 7 then
			remove_state( 1012, 7 ) -- ½ÃÀü¼Óµµlv7 Ãë¼Ò
		else
			remove_state( 1011, 7 ) -- °ø¼Ólv7 Ãë¼Ò
			remove_state( 1007, 7 ) -- °ø°Ý·Âlv7 Ãë¼Ò
			remove_state( 1009, 7 ) -- ¹æ¾î·Âlv7 Ãë¼Ò
			remove_state( 1008, 7 ) -- ¸¶·Âlv7 Ãë¼Ò
			remove_state( 1010, 7 ) -- ¸¶¹ý¹æ¾î·Âlv7 Ãë¼Ò
			remove_state( 1013, 7 ) -- À̵¿¼Óµµlv7 Ãë¼Ò
			remove_state( 1012, 7 ) -- ½ÃÀü¼Óµµlv7 Ãë¼Ò
			
		end
	Foreign_reiterate_charge_Buff_cancel()
end