--ÓøøÓè½çÃæʵÏÖ£¬ÓÃÎå¼þÎäÆ÷£¬°üº¬½ð¡¢Ä¾¡¢Ë®¡¢»ð¡¢ÍÁÎåÐи÷Ò»¼þ£¬¿É»»È¡Ò»¸öÀ¬»ø½äÖ¸
--designed by yangqi
--written by renbin

function weapon_ring()

	Say("GÇn ®©y vò khÝ quý trªn giang hå hiÕm, ta nh©n c¬ héi ®i häc ph­¬ng ph¸p lµm vò khÝ, chØ cÇn ng­¬i chuÈn bÞ mét bé vô khÝ cã ®ñ 5 thuéc tÝnh ngò hµnh vµ 10 v¹n l­îng, ta sÏ gióp ®æi mét vò khÝ thuéc tÝnh mµu xanh, ng­¬i muèn ®æi kh«ng?",3,"§­îc, ta ®ang cÇn mét mãn vò khÝ ®©y!/exchange_weapon","§Ó ta t×m hiÓu c¸i ®·!/weapon_help","Th«i bá ®i, ta cã råi!/no")

end

function exchange_weapon()

	GiveItemUI( "Vò khÝ ngò hµnh ®æi vò khÝ kh¸c", "B¹n cÇn chuÈn bÞ vò khÝ ngò hµnh ph©n biÖt cã Kim, Méc, Thñy, Háa, Thæ, chØ cÇn <color=blue>®Çy ®ñ ngò hµnh<color>, ®ång thêi ph¶i cã<color=blue> thuéc tÝnh mµu xanh<color>, th× cã thÓ ®æi ®­îc mét vò khÝ.<color=blue> §¼ng cÊp vò khÝ vµ chñng lo¹i kh«ng cã h¹n chÕ, mçi lÇn nh­ vËy chØ tèn 10 v¹n l­îng, x¸c suÊt 100%.<color>", "weapon_ring_Confirm", "onCancel" );
	
end

function weapon_ring_Confirm( nCount )

	onSeries = {1,1,1,1,1}
	if ( nCount ~= 5 ) then						--are there 5 weapons
		Say("Xin kiÓm tra kü, vò khÝ b¹n ®­a ta kh«ng phï hîp yªu cÇu!",0)
		return 0
	else
		for i = 1, nCount do
			local nItemIndex = GetGiveItemUnit( i )		--get itemindex
			ItemGenre, DetailType, ParticularType, Level, nSeries, Luck = GetItemProp(nItemIndex)
			magictype , p1, p2, p3 = GetItemMagicAttrib(nItemIndex, 1)	--get magic attrib
--			Msg2Player("nSeries = "..nSeries)
--			Msg2Player("magictype = "..magictype)
			if ( ItemGenre ~= 0 ) then
				Say("Xin kiÓm tra kü, vò khÝ b¹n ®­a ta kh«ng phï hîp yªu cÇu!",0)
				return 0
			elseif ( DetailType ~= 0 and DetailType ~= 1) then					--is it weapon
				Say("Xin kiÓm tra kü, vò khÝ b¹n ®­a ta kh«ng phï hîp yªu cÇu!",0)
				return 0
			elseif ( magictype == 0 ) then
				Say("Víi kinh nghiÖm bu«n b¸n l©u n¨m cña Ta muèn ®em trang bÞ mµu tr¾ng qua mÆt ta µh, kh«ng dÔ ®©u!",0)
				return 0
			elseif ( nSeries < 0 and nSeries > 4 ) then			--exception
				Say("Trang bÞ cña ng­¬i l¹ qu¸ ®i! Tr¶ l¹i cho ng­¬i!",0)
				return 0
			elseif ( onSeries[nSeries + 1] == 0 ) then				--ÎåÐÐÊôÐÔÊÇ·ñÆëÈ«
				Say("Xin kiÓm tra kü, vò khÝ ng­¬i ®­a ta kh«ng ®ñ thuéc tÝnh ngò hµnh!",0)
				return 0
			else
				onSeries[nSeries + 1] = 0
			end
		end
			onPay = 100000
			if ( GetCash() < onPay ) then
				Say("Kh«ng cã tiÒn th× kh«ng ®­îc råi, mÊy mãn ®å nµy sao ®æi ®­îc nhÉn ®©y!",0)
				return 0
			end
			for i = 1, nCount do
		
				nItemIndex = GetGiveItemUnit( i )
				k = RemoveItemByIndex( nItemIndex )
				if ( k ~= 1 ) then
					Say("ChuyÖn g× vËy, sao ng­¬i cã thÓ g¹t ta?",0)
					return 0
				end
			
			end
			Pay( onPay )
				--¹Ì¶¨µÄ½äÖ¸
			AddItem(0,random(0,1),random(0,2),random(8,10),random(0,4),random(100,200),random(5,10))     			--½äÖ¸
			Say("Uhm~®å cña ng­¬i ®· ®­îc x¸c ®Þnh, ta nhËn ®©y, vò khÝ nµy lµ cña ng­¬i!",0)
		
	end
	
end

function weapon_help()

	Say("B¹n cÇn chuÈn bÞ vò khÝ ngò hµnh ph©n biÖt cã Kim, Méc, Thñy, Háa, Thæ, chØ cÇn <color=blue>®Çy ®ñ ngò hµnh<color>, ®ång thêi ph¶i cã<color=blue> thuéc tÝnh mµu xanh<color>, th× cã thÓ ®æi ®­îc mét vò khÝ kh¸c.<color=blue> §¼ng cÊp vò khÝ vµ chñng lo¹i kh«ng cã h¹n chÕ, mçi lÇn nh­ vËy chØ tèn 10 v¹n l­îng, x¸c suÊt 100%.<color>",1,"Oh! Ta hiÓu råi, c¸m ¬n!/no")

end


function no()

end