PDA

View Full Version : Mọi người giúp mình vs và cùng học hỏi về item



vippro0
17-05-11, 11:40 PM
<b><font color=red>[Chỉ có thành viên mới xem link được. <a href="register.php"> Nhấp đây để đăng ký thành viên......</a>]</font></b>

huuduyen_05
18-05-11, 08:31 AM
File obj/item/xiaoxishuidan.lua



-- 300043
-- СϴË赤
-- ʹÓÃÖ®ºó¿ÉÒÔ½«Ñ¡ÔñÊôÐԵķ ÖÅäµãÊýÖеÄ5µã±äΪDZÄÜ¡£


-- ½Å±¾ºÅ
x300043_g_scriptId = 300043
x300043_g_ItemId = 30008005 -- ҩˮID
x300043_g_UseScriptId = 300053
--**********************************
-- ʼþ½»»¥Èë¿Ú
--**********************************
function x300043_OnDefaultEvent( sceneId, selfId )
BeginEvent(sceneId)
AddText(sceneId, "#YTi¬u T¦y Tüy Ðan")
AddText(sceneId, " Sau khi sØ døng có th¬ mang b¤t kì 1 thuµc tính nào ðã ph¤n ph¯i l¤y #Y100 ði¬m#W biªn thành ti«m nång.")
AddNumText(sceneId, x300043_g_UseScriptId,"Chïnh 100 ði¬m C߶ng lñc", 0, 1)
AddNumText(sceneId, x300043_g_UseScriptId,"Chïnh 100 ði¬m Nµi lñc", 0, 2)
AddNumText(sceneId, x300043_g_UseScriptId,"Chïnh 100 ði¬m Th¬ lñc", 0, 3)
AddNumText(sceneId, x300043_g_UseScriptId,"Chïnh 100 ði¬m Trí lñc", 0, 4)
AddNumText(sceneId, x300043_g_UseScriptId,"Chïnh 100 ði¬m Thân pháp", 0, 5)
AddNumText(sceneId, x300043_g_UseScriptId,"Sau này hãy tính", 0, 6)
EndEvent(sceneId)
DispatchEventList(sceneId,selfId,-1)

end


--**********************************
--
--**********************************
function x300043_IsSkillLikeScript( sceneId, selfId)
return 0
end

function x300043_WashPoint(sceneId, selfId, nType, nPoint, szStr)
-- ¿Û³ýÏà¹ØµÄÎïÆ·
local ret = DelItem(sceneId, selfId, x300043_g_ItemId, 1)
if ret == 1 then
local nNumber = LuaFnWashSomePoints(sceneId, selfId, nType, nPoint)

BeginEvent(sceneId)
AddText(sceneId, "#YTi¬u T¦y Tüy Ðan")
AddText(sceneId, " Các hÕ mang thành công#Y" .. tonumber(nNumber) .. " ði¬m#W ðã phân ph¯i cüa #Y" .. szStr.. "#W thuµc tính biªn thành ti«m nång.")
EndEvent(sceneId)
DispatchEventList(sceneId,selfId,-1)
end

end



File obj/item/30008005.lua



-- 300053
-- СϴË赤
-- ʹÓÃÖ®ºó¿ÉÒÔ½«Ñ¡ÔñÊôÐԵķ ÖÅäµãÊýÖеÄ5µã±äΪDZÄÜ¡£


-- ½Å±¾ºÅ
x300053_g_scriptId = 300053
x300053_g_ItemId = 30008005 -- ҩˮID

--**********************************
-- ʼþ½»»¥Èë¿Ú
--**********************************
function x300053_OnDefaultEvent( sceneId, selfId )

-- ³ÔÒ©Ï´µã
if GetNumText() == 1 then

if LuaFnIsCanWashPiont(sceneId, selfId, 0) ~= 1 then
BeginEvent(sceneId)
AddText(sceneId, "#YTi¬u T¦y Tüy Ðan")
AddText(sceneId, " Thuµc tính C߶ng lñc ðã không còn ði¬m phân ph¯i dß, không th¬ tiªn hành chïnh ði¬m.")
EndEvent(sceneId)
DispatchEventList(sceneId,selfId,-1)

else
x300053_WashPoint(sceneId, selfId, 0, 100, "C߶ng lñc")

end
return

elseif GetNumText() == 2 then

if LuaFnIsCanWashPiont(sceneId, selfId, 1) ~= 1 then
BeginEvent(sceneId)
AddText(sceneId, "#YTi¬u T¦y Tüy Ðan")
AddText(sceneId, " Thuµc tính Nµi lñc ðã không còn ði¬m phân ph¯i dß, không th¬ tiªn hành chïnh ði¬m.")
EndEvent(sceneId)
DispatchEventList(sceneId,selfId,-1)

else
x300053_WashPoint(sceneId, selfId, 1, 100, "Nµi lñc")

end
return

elseif GetNumText() == 3 then

if LuaFnIsCanWashPiont(sceneId, selfId, 2) ~= 1 then
BeginEvent(sceneId)
AddText(sceneId, "#YTi¬u T¦y Tüy Ðan")
AddText(sceneId, " Thuµc tính Th¬ lñc ðã không còn ði¬m phân ph¯i dß, không th¬ tiªn hành chïnh ði¬m.")
EndEvent(sceneId)
DispatchEventList(sceneId,selfId,-1)

else
x300053_WashPoint(sceneId, selfId, 2, 100, "Th¬ lñc")

end
return

elseif GetNumText() == 4 then

if LuaFnIsCanWashPiont(sceneId, selfId, 3) ~= 1 then
BeginEvent(sceneId)
AddText(sceneId, "#YTi¬u T¦y Tüy Ðan")
AddText(sceneId, " Thuµc tính Trí lñc ðã không còn ði¬m phân ph¯i dß, không th¬ tiªn hành chïnh ði¬m.")
EndEvent(sceneId)
DispatchEventList(sceneId,selfId,-1)

else
x300053_WashPoint(sceneId, selfId, 3, 100, "Trí lñc")

end
return

elseif GetNumText() == 5 then

if LuaFnIsCanWashPiont(sceneId, selfId, 4) ~= 1 then
BeginEvent(sceneId)
AddText(sceneId, "#YTi¬u T¦y Tüy Ðan")
AddText(sceneId, " Thuµc tính Thân pháp ðã không còn ði¬m phân ph¯i dß, không th¬ tiªn hành chïnh ði¬m.")
EndEvent(sceneId)
DispatchEventList(sceneId,selfId,-1)

else
x300053_WashPoint(sceneId, selfId, 4, 100, "Thân pháp")

end
return

elseif GetNumText() == 6 then


-- ¹Ø±Õ½çÃæ
BeginUICommand(sceneId)
EndUICommand(sceneId)
DispatchUICommand(sceneId,selfId, 1000)
return

end

end

--**********************************
--
--**********************************
function x300053_IsSkillLikeScript( sceneId, selfId)
return 0
end

function x300053_WashPoint(sceneId, selfId, nType, nPoint, szStr)
-- ¿Û³ýÏà¹ØµÄÎïÆ·
local ret = DelItem(sceneId, selfId, x300053_g_ItemId, 1)
if ret == 1 then
local nNumber = LuaFnWashSomePoints(sceneId, selfId, nType, nPoint)

BeginEvent(sceneId)
AddText(sceneId, "#YTi¬u T¦y Tüy Ðan")
AddText(sceneId, " Các hÕ mang thành công#Y" .. tonumber(nNumber) .. "ði¬m#Wðã phân ph¯i cüa#Y" .. szStr.. "#Wthuµc tính biªn thành ti«m nång.")
EndEvent(sceneId)
DispatchEventList(sceneId,selfId,-1)
end

end

vippro0
22-05-11, 04:18 PM
HD sửa giùm cái mihnf nhé thành mình tại mình viết vội quá cho các bạn vào đọc :D tks