ShowMessage("ȡʦͽ $Rev: 214 $")

--[[
[author]
descript="ÿȡ1"
]]--
perday_max=1
script_name="ȡʦͽ"

function _SMain(...)

	if PlayerPackage:GetEmptySlot(0) < 1 then
		ShowMessage("ռ䲻!")
		return
	end

	while true do

		MoveToNPC(139, 132, DataBase:GetSceneID(""), "")

		QuestFrameOptionClicked( "ʦͽ" , CMP_PART_MATCH)
		
		System:Sleep(1500)

		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

_SMain()

