ShowMessage("领取波斯玫瑰 $Rev: 214 $")

--[[
[author]
descript="每天可领取1次"
]]--
perday_max=1
script_name="领取波斯玫瑰"


function OnMission()
	while true do
		-- 移动到 大理 巴盖里 182 69处
		MoveToNPC(182, 69, DataBase:GetSceneID("大理"), "巴盖里")
		-- 选择 领取波斯玫瑰 接任务
		local g_szMission = "领取波斯玫瑰"
		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
	end
end

function _SMain(...)
	OnMission()
end

_SMain()