PDA

View Full Version : [JX] Cho em hỏi cách drop item hkmp cho từng con boss với ạ



YOLODC
23-03-20, 09:59 PM
Include("\\script\\lib\\worldlibrary.lua")
Include("\\script\\global\\droprate\\dropratehead.lua")

DROP_PER_BOSS = 36

function DropRate(NpcIndex)
local nPLuck = GetLucky(0)
local nMaxLv = MATH_Random(7,10)
if (MATH_Random(200) <= nPLuck) then
nMaxLv = 10
end

for i=1,DROP_PER_BOSS do
nRate = MATH_Random(350)
if (nRate == 299) then
DropItem(NpcIndex, AddItem(0,6,MATH_RandomA(27,28,33,34,35,36,37,38,3 9,40,41,42,43,45,46,47,48,49,50,51,52,53,54,55,56, 57,58,59),0,0,5,0,0) )--bikip
elseif(nRate == 199) then
DropItem(NpcIndex, AddItem(0,6,26,0,0,5,0,0)) --volammattich
elseif(nRate == 99) then
DropItem(NpcIndex, AddItem(0,6,22,0,0,5,0,0)) --taytuykinh
elseif(nRate == 98) then
DropItem(NpcIndex, AddItem(2,0,MATH_Random(115,124),0,0,0,150,0)) -- item hk vd
elseif(nRate == 97) then
DropItem(NpcIndex, AddItem(0,6,MATH_Random(121,123),0,0,5,0,0))--phuc duyen
elseif(nRate == 96) then
DropItem(NpcIndex, AddItem(0,4,MATH_Random(238,240),0,0,5,0,0)) --thuy tinh
elseif(nRate == 95) then
DropItem(NpcIndex, AddItem(0,4,353,0,0,5,0,0)) --tinh hong bao thach
else
local detail = MATH_Random(9)
local parti = MATH_RandomA(getn(PARTICULAR_RANDOM_MATRIX[detail+1]),PARTICULAR_RANDOM_MATRIX[detail+1])
DropItem(NpcIndex, AddItem(0,0,detail,parti,MATH_Random(9,10),GetNpcS eries(NpcIndex),nPLuck,
MATH_Random(5,nMaxLv),MATH_Random(5,nMaxLv),MATH_R andom(3,nMaxLv),MATH_Random(nMaxLv),MATH_Random(nM axLv),MATH_Random(nMaxLv)))
end
end
end

Mấy bác cho em hỏi đoạn script có sẵn trong server như vậy giờ em muốn nó drop item hkmp theo từng con boss thì làm ntn thế mấy bác , em thử tạo 1 bảng xong gán id boss rồi gọi nhưng cũng ko đc , bác nào biết thì xin hướng dẫn em với

JXDev
24-03-20, 07:46 AM
Trong script bossdeath.lua nó có 1 phần rớt đồ theo từng phái của boss đó bạn.

YOLODC
24-03-20, 08:00 PM
Trong script bossdeath.lua nó có 1 phần rớt đồ theo từng phái của boss đó bạn.

Hình như ko có bác ơi


function LastDamage(NpcIndex)
local nExp = 10000000
Name = GetName();
AddOwnExp(nExp)
local w = GetWorldPos()
AddNews("§¹i hiÖp<color=green> "..Name.."<color> t¹i "..GetWorldName(w).." ®· tiªu diÖt thµnh c«ng <color=red>"..GetNpcName(NpcIndex).."<color>")
Msg2Player("B¹n tiªu diÖt thµnh c«ng <color=Yellow>"..GetNpcName(NpcIndex).."<color> nhËn ®­îc "..nExp.." ®iÓm kinh nghiÖm")
end

function Revive(NpcIndex)
if (GetNpcValue(NpcIndex) == 1) then
local nSeries = GetNpcSeries(NpcIndex)
local nSTVL, nDoc, nBang, nHoa, nLoi = 0,0,0,0,0
if (nSeries == 0) then
nSTVL = 1500
elseif (nSeries == 1) then
nDoc = 500
elseif (nSeries == 2) then
SetNpcSkill(NpcIndex, 88, 1, 1)
SetNpcSkill(NpcIndex, 88, 1, 2)
SetNpcSkill(NpcIndex, 88, 1, 3)
SetNpcSkill(NpcIndex, 88, 1, 4)
nBang = 1500
elseif (nSeries == 3) then
nHoa = 1500
elseif (nSeries == 4) then
nLoi = 1500
else
nSTVL = 1500
end

SetNpcDmgEx(NpcIndex, nSTVL, nDoc, nBang, nHoa, nLoi ,0)
SetNpcDmgEx(NpcIndex, nSTVL, nDoc, nBang, nHoa, nLoi ,1)
SetNpcResist(NpcIndex, 75, 75, 75, 75, 75)
SetNpcHitRecover(NpcIndex,100)
end
end

function DeathSelf(NpcIndex)
DelNpc(NpcIndex)
end

function OnTimer(NpcIndex)
DelNpc(NpcIndex)
end

JXDev
24-03-20, 11:13 PM
Bạn xài Win hay Linux vậy. Nếu Linux Inbox em em đưa cho xài :)
Facebook em: <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>

YOLODC
24-03-20, 11:23 PM
Bạn xài Win hay Linux vậy. Nếu Linux Inbox em em đưa cho xài :)
Facebook em: <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>

Cám ơn bác , nhưng em jx win bác ạ ;)

YOLODC
25-03-20, 07:57 PM
Em mò ra rồi nên xin close topic nhé , thanks mấy bác đã xem o:-)