ShowMessage("һǧһԸ $Rev: 213 $")

--[[
[author]
descript="ÿԸ1"
]]--
perday_max=1
script_name="һǧһԸ"


local g_szMission = "һǧһԸ"
local g_nIndex = -1
local g_idMission = 0
local g_idScript = 0
local g_nParam = {}

local g_Pos = { 
	[0] = {szNpcName="ʿ", fX = 282 , fY = 275 , nSceneID=1 } ,
	[1] = {szNpcName="" , fX = 157 , fY = 185 , nSceneID=4}
}



function _SMain(...)

	while true do
			g_nIndex, g_idMission, g_idScript = DataPool:GetPlayerMission(g_szMission)	-- жǷѽ
		
			-- жԸȪ
			local nCount = DataPool:UserBag_CountItemByName("ԸȪ")

			if g_nIndex ~= -1 then
		
				-- ѽ
		
				for i=0,2 do
					g_nParam[i] = DataPool:GetPlayerMission_Variable(g_nIndex, i)
					DbgPrintf("[%d]%d", i, g_nParam[i])
				end
		
				-- жǷ
				if DataPool:IsMissionCanCommit(g_idMission) then
					MoveToNPC( g_Pos[0].fX , g_Pos[0].fY , g_Pos[0].nSceneID , g_Pos[0].szNpcName ) 
					QuestFrameOptionClicked(g_szMission, CMP_PART_MATCH)	-- ѡѡ
					QuestFrameMissionContinue()	-- 
					QuestFrameMissionComplete()	-- 
					QuestFrameMissionClose()
				else
					if nCount < 1 then
						ShowMessage("ԸȪ㣬ű")
						break
					end

					MoveTo(g_Pos[1].fX, g_Pos[1].fY, g_Pos[1].nSceneID, "", 1)
					Dismount()
					UseItem("ԸȪ")
				end
			else
				-- δ
		

				DbgPrintf("ԸȪ %d" , tonumber(nCount))
				-- ǰݽȥ
				MoveToNPC( g_Pos[0].fX , g_Pos[0].fY , g_Pos[0].nSceneID , g_Pos[0].szNpcName ) 
				QuestFrameOptionClicked(g_szMission, CMP_PART_MATCH)	-- ѡѡ
				
				local strType,_,_,_,szText = DataPool:GetNPCEventList_Item(0);

				if strType == "text" then
					if string.find(szText, "Ѿμӹ˻") then
						ShowMessage("ԸѾ")
						System:UpdateRecord( script_name )
						break	-- ˳ѭű
					end
				end

				if nCount < 5 then
					ShowMessage("ԸȪ㣬ű")
					break
				end
	
				QuestFrameAcceptClicked()
				QuestFrameMissionClose()
			end
	end
end

_SMain()