PDA

View Full Version : Giúp em về đoạn scrip này với!!!



mrr77641176
07-07-11, 06:31 PM
ai giúp em sữa đạon scrip này vs :




function moqd()
Say("<color=cyan>Nguoi Muon mo bao nhieu hop qua?<enter>Nguoi hay chon lua:",2,
"Mo 1个 hop/m7",
"Tro lai/mohopqua");
end

function m7()
if (GetTask(16) >= 1) then
SetTask(16,GetTask(16)-1)
dongaunhien7()
xu()
else
Talk(1,"","<color=red>Nguoi khong co du 1 『Hop May Man』Dai, khi nao co du hay quay lai tim ta")
end
end

function xu()
if (AddEventItem (131))
for i=1,3 do
end
end



function dongaunhien7()
if (GetLevel() >= 70) and (GetLevel() < 80) then
AddOwnExp(58836) -- 4
AddRepute(30)
elseif (GetLevel() >= 80) and (GetLevel() < 90) then
AddOwnExp(93380) --5
AddRepute(30)
elseif (GetLevel() >= 90) and (GetLevel() < 100) then
AddOwnExp(153756) ---6
AddRepute(30)
elseif (GetLevel() >= 100) and (GetLevel() < 120) then
AddOwnExp(243464) --8
AddRepute(30)
elseif (GetLevel() >= 120) and (GetLevel() < 140) then
AddOwnExp(425400) -- 15
AddRepute(30)
elseif (GetLevel() >= 140) and (GetLevel() < 160) then
AddOwnExp(989188)
AddRepute(30)
elseif (GetLevel() >= 160) and (GetLevel() < 200) then
AddOwnExp(8611704)
AddRepute(30)
end
end





em muốn mở 1 hộp quà nhận dc exp , danh vong và tiền xu random 1>4 đồng nhưng sao vào game mở chỉ dc 1 xu và không exp vs không có danh vong

DirectX
07-07-11, 07:55 PM
function xu()
if (AddEventItem (131))
for i=1,3 do
end
end
sửa lại như sau:

function xu()
for i=1,3 do
AddEventItem(131)
end
end;

còn phần dưới viết đúng rồi
để được xu, danh vong, kinh nghiệm bạn phải thỏa các điều kiện thì mới dc nhé. xem lại phần GetTask với SetTask đi

mrr77641176
07-07-11, 09:49 PM
bạn có yahoo không cho mình xin vs mình mới tập dev nên chưa rảnh lắm có j bạn giúp mình nha ^^
mình còn 1 bug nữa không buyk xữa lại như thế nào bạn giúp mình với :
Mình đả add scrip vào NPC và scrip đó đả được thực thi , nhưng khi dùng NPC đó vào Map chỉ định thì drop + exp map đó không được thực thi
Bạn có thế chỉ mình làm sao dùng hàm OnDeath để thực thi vào 1 map nào đó theo chỉ định của mình được không!

SaoThaiBinh72
07-07-11, 09:53 PM
function OnDeath()
---Muốn add cái gì thì viết vào đây, ví dụ:
---khi quái chết Add Kinh nghiệm + Tiền:
AddOwnExp(số KN)
Earn(số tiền)
-- thêm hàm Add item nếu muốn
end;

. .

mrr77641176
07-07-11, 10:04 PM
function OnDeath()
if (HaveItem(44) == 1) then
tlhnl = 25
elseif (HaveItem(43) == 1) then
tlhnl = 20
elseif (HaveItem(42) == 1) then
tlhnl = 15
elseif (HaveItem(41) == 1) then
tlhnl = 11
elseif (HaveItem(40) == 1) then
tlhnl = 9
elseif (HaveItem(39) == 1) then
tlhnl = 9
elseif (HaveItem(38) == 1) then
tlhnl = 5
elseif (HaveItem(37) == 1) then
tlhnl = 3
elseif (HaveItem(36) == 1) then
tlhnl = 2
elseif (HaveItem(35) == 1) then
tlhnl = 1
else
tlhnl=0
end

if (HaveItem(54) == 1) then
tlhsl = 25
elseif (HaveItem(53) == 1) then
tlhsl = 20
elseif (HaveItem(52) == 1) then
tlhsl = 15
elseif (HaveItem(51) == 1) then
tlhsl = 11
elseif (HaveItem(50) == 1) then
tlhsl = 9
elseif (HaveItem(49) == 1) then
tlhsl = 7
elseif (HaveItem(48) == 1) then
tlhsl = 5
elseif (HaveItem(47) == 1) then
tlhsl = 3
elseif (HaveItem(46) == 1) then
tlhsl = 2
elseif (HaveItem(45) == 1) then
tlhsl = 1
else
tlhsl=0
end


sl = random (1,100)
nl = random (1,100)


if (sl <= tlhsl) then
RestoreLife()
end
if (nl <= tlhnl) then
RestoreMana()
end


crht = random(1,20) ----Manh tang ban do tu 1-6
if (crht <= 10) then
p=random(210,215)
AddEventItem(p)
Msg2Player("Ban nhan duoc 1 tam bao do")
end

crlh = random(1,30) ---- Manh tang ban do tu 7-11
if (crlh <= 20) then
lh=random(216,220)
AddEventItem(lh)
Msg2Player("Ban nhan duoc 1 tam bao do")

end

crhh = random(1,80) ---- Phuc Duyen
if (crhh <= 45) then
th=random(106,107)
AddEventItem(th)
Msg2Player("Ban nhan duoc 1 binh phuc duyen")
end


AddExp(700*2,200,1)
Earn(9610/2)
AddRepute(30)



end;


đây là hàm đó nhưng Bản đồ mình vào ko dc thưc thi , làm sao để thực thi scrip này với bản đồ mình chỉ định ^^

SaoThaiBinh72
07-07-11, 10:08 PM
if (HaveItem(44) == 1) then
tlhnl = 25

nếu Item 44 bằng 1 thì ?? tlhnl = 25 là cái gì bạn ???

Lỗi là ở đây :

if (nl <= tlhnl) then
RestoreMana()
hàm RestoreMana() không có trong scripts.

mrr77641176
07-07-11, 10:45 PM
hix mình vẫn không hiểu d9aon5 scrip đó có sẵng từ sever bạn giúp mình sửa lại được không : YH mình : duemyeuai_emvanla_nguoianhyeu
bạn giúp mình teamwie dc không vậy

DirectX
07-07-11, 11:17 PM
cách viết của bạn đã sai.
nếu muốn đánh quái mà rớt ra tàng bảo đồ ngẫu nhiên có 2 cách
1 là chỉnh trong file drop
2 là gán script cho npc
ở đoạn script cho npc ta có thể viết như sau

function OnDeath()
AddOwnExp(3000)
Msg2Player("Chuc mung ban nhan duoc manh tang bao do so...")
l = random(1,2000)
if (l>==1) and (l<=100) then
AddEventItem("Manh Tang Bao Do So 1")
.........................................
elseif (l>=1900) and (l<=2000) then
AddEventItem("Manh Tang Bao Do So 12")
end
end;