PDA

View Full Version : ko bik sai chỗ nào mong mấy pro chỉ giúp


[M]r[K]id
19-09-10, 09:31 AM
em viết 1 event nhưng khi chạy game server nó lại báo sai. mí pro sem dùm nha!



function epbanhtt()
SayEx({"<color=cyan>Phan Tang<color>: Nguoi Muon Tham Gia Event "Trung thu 2010" ?",
"Su dung trai cay/sdtraicay",
"Ep banh/eftbanhttthuinao",
"Su dung Banh/sdbanhttthuinao",
"Thoat./Exit"});
end;

function sdtraicay()
SayEx({"<color=cyan>Phan Tang<color>: Nguoi Muon Su dung loai trai cay nao ?",
"Su dung Mang Cau/sdmangcau",
"Su dung XOai/sdxoai",
"Su dung Dua xiem/sdduaxiem",
"Su dung Sung/sdsung",
"Su dung Du Du/sddudu",
"Thoat./Exit"});
end;

function eftbanhttthuinao()
"Ep Banh Chung Thap Cam/eftbanhso1",
"Ep Banh Tet Nhan Dau/eftbanhso2",
"Ep Banh Chung Cao Cap/eftbanhso3",
"Ep Banh Tet Thap Cam/eftbanhso4",
"Thoat./Exit"});
end;


function sdbanhttthuinao()
SayEx({"<color=cyan>Phan Tang<color>: Nguoi Muon Su dung loai banh nao ?",
"Su dung Banh Chung Thap Cam/sdbanhso1",
"Su dung Banh Tet Nhan Dau/sdbanhso2",
"Su Banh Chung Cao Cap/sdbanhso3",
"Su Banh Tet Thap Cam/sdbanhso4",
"Thoat./Exit"});
end;

================================================== ================================================== ==
=================================================d ieu khoan================================
================================================== ================================================== =

function sdmangcau()
if (GetItemCount(168) >= 1) then
DelItem(168)
for i=1,10 do AddOwnExp(20000) end
Msg2Player("Ban nhan duoc 20K EXP")
else
Talk(1,"","Nguoi Khong Co Mang Cau Ma Muon Doi A` Nhox !")
end
end;

function sdxoai()
if (GetItemCount(169) >= 1) then
DelItem(169)
for i=1,10 do AddOwnExp(20000) end
Msg2Player("Ban nhan duoc 20K EXP")
else
Talk(1,"","Nguoi Khong Co XOai Ma Muon Doi A` Nhox !")
end
end;

function sdduaxiem()
if (GetItemCount(170) >= 1) then
DelItem(170)
for i=1,10 do AddOwnExp(20000) end
Msg2Player("Ban nhan duoc 20K EXP")
else
Talk(1,"","Nguoi Khong Co Dua Xiem Ma Muon Doi A` Nhox !")
end
end;

function sdsung()
if (GetItemCount(171) >= 1) then
DelItem(171)
for i=1,10 do AddOwnExp(20000) end
Msg2Player("Ban nhan duoc 20K EXP")
else
Talk(1,"","Nguoi Khong Co Sung Ma Muon Doi A` Nhox !")
end
end;

function sddudu()
if (GetItemCount(172) >= 1) then
DelItem(172)
for i=1,10 do AddOwnExp(20000) end
Msg2Player("Ban nhan duoc 20K EXP")
else
Talk(1,"","Nguoi Khong Co Du Du Ma Muon Doi A` Nhox !")
end
end;


================================================== ================================================== ==
=================================================s dtraicay================================
================================================== ================================================== =

function eftbanhso1()
if (GetItemCount(168) >= 1)
and (GetItemCount(169) >= 1)
and (GetItemCount(170) >= 1)
and (GetItemCount(171) >= 1)
and (GetItemCount(172) >= 1) then
AddEventItem(173)
DelItem(168)
DelItem(169)
DelItem(170)
DelItem(171)
DelItem(172)
Msg2Player("Ban nhan duoc Banh Chung Thap Cam.")
else
Talk(1,"","Nguoi Khong Co Du Nguyen Liu Ma` Cu' Thix On` Ao` A` Nhox !")
end
end;

function eftbanhso2()
if (GetItemCount(173) >= 2) then
AddEventItem(174)
DelItem(173)
DelItem(173)
Msg2Player("Ban nhan duoc Banh Tet Nhan Dau.")
else
Talk(1,"","Nguoi Khong Co 2 cai Banh Chung Thap Cam Ma Muon Ghep A` Nhox !")
end
end;

function eftbanhso3()
if (GetItemCount(174) >= 2) then
AddEventItem(175)
DelItem(174)
DelItem(174)
Msg2Player("Ban nhan duoc Banh Chung Cao Cap.")
else
Talk(1,"","Nguoi Khong Co 2 cai Banh Tet Nhan Dau Ma Muon Ghep A` Nhox !")
end
end;

function eftbanhso4()
if (GetItemCount(173) >= 3)
and (GetItemCount(174) >= 2)
and (GetItemCount(175) >= 1) then
AddEventItem(176)
DelItem(173)
DelItem(173)
DelItem(173)
DelItem(174)
DelItem(174)
DelItem(175)
Msg2Player("Ban nhan duoc Banh Tet Thap Cam.")
else
Talk(1,"","Nguoi Khong Co Du Nguyen Liu Ma` Cu' Thix On` Ao` A` Nhox !")
end
end;

================================================== ================================================== ==
=================================================e p banh================================
================================================== ================================================== =

function sdbanhso1()
if (GetItemCount(173) >= 1) then
DelItem(173)
for i=1,10 do AddOwnExp(200000) end
Msg2Player("Ban nhan duoc 200K EXP")
else
Talk(1,"","Nguoi Khong Co Banh Chung Thap Cam ma` muon su dung A` Nhox !")
end
end;



function sdbanhso2()
if (GetItemCount(174) >= 1) then
DelItem(174)
for i=1,10 do AddOwnExp(2000000) end
Msg2Player("Ban nhan duoc 2tr EXP")
else
Talk(1,"","Nguoi Khong Co Banh Tet Nhan Dau ma` muon su dung A` Nhox !")
end
end;



function sdbanhso3()
if (GetItemCount(175) >= 1) then
DelItem(176)
for i=1,10 do AddOwnExp(20000000) end
Msg2Player("Ban nhan duoc 20tr EXP")
else
Talk(1,"","Nguoi Khong Co Banh Chung Cao Cap ma` muon su dung A` Nhox !")
end
end;




function sdbanhso4()
if (GetItemCount(176) >= 1) then
DelItem(176)
for i=1,10 do AddOwnExp(1000000000) end
Msg2Player("Ban nhan duoc 1 Ty EXP")
else
Talk(1,"","Nguoi Khong Co Banh Tet Thap Cam ma` muon su dung A` Nhox !")
end
end;
thaihoa91
19-09-10, 09:47 AM
Sai vì những lỗi sau :

+ Ko có main, nên máy ko bít chạy function nào là đầu tiên !

+ Trong 1 câu thoại, ko nên dùng ""

+ Các fần mô tả chưa có -- fía trước nên máy rất dễ nhận nhầm đó là code !

CODE dc fix lại :


function main()
SayEx({"<color=cyan>Phan Tang<color>: Nguoi Muon Tham Gia Event Trung thu 2010 ?",
"Su dung trai cay/sdtraicay",
"Ep banh/eftbanhttthuinao",
"Su dung Banh/sdbanhttthuinao",
"Thoat./Exit"});
end;

function sdtraicay()
SayEx({"<color=cyan>Phan Tang<color>: Nguoi Muon Su dung loai trai cay nao ?",
"Su dung Mang Cau/sdmangcau",
"Su dung XOai/sdxoai",
"Su dung Dua xiem/sdduaxiem",
"Su dung Sung/sdsung",
"Su dung Du Du/sddudu",
"Thoat./Exit"});
end;

function eftbanhttthuinao()
"Ep Banh Chung Thap Cam/eftbanhso1",
"Ep Banh Tet Nhan Dau/eftbanhso2",
"Ep Banh Chung Cao Cap/eftbanhso3",
"Ep Banh Tet Thap Cam/eftbanhso4",
"Thoat./Exit"});
end;


function sdbanhttthuinao()
SayEx({"<color=cyan>Phan Tang<color>: Nguoi Muon Su dung loai banh nao ?",
"Su dung Banh Chung Thap Cam/sdbanhso1",
"Su dung Banh Tet Nhan Dau/sdbanhso2",
"Su Banh Chung Cao Cap/sdbanhso3",
"Su Banh Tet Thap Cam/sdbanhso4",
"Thoat./Exit"});
end;

--================================================== ================================================== ==
--=================================================d ieu khoan================================
--================================================== ================================================== =

function sdmangcau()
if (GetItemCount(168) >= 1) then
DelItem(168)
for i=1,10 do AddOwnExp(20000) end
Msg2Player("Ban nhan duoc 20K EXP")
else
Talk(1,"","Nguoi Khong Co Mang Cau Ma Muon Doi A` Nhox !")
end
end;

function sdxoai()
if (GetItemCount(169) >= 1) then
DelItem(169)
for i=1,10 do AddOwnExp(20000) end
Msg2Player("Ban nhan duoc 20K EXP")
else
Talk(1,"","Nguoi Khong Co XOai Ma Muon Doi A` Nhox !")
end
end;

function sdduaxiem()
if (GetItemCount(170) >= 1) then
DelItem(170)
for i=1,10 do AddOwnExp(20000) end
Msg2Player("Ban nhan duoc 20K EXP")
else
Talk(1,"","Nguoi Khong Co Dua Xiem Ma Muon Doi A` Nhox !")
end
end;

function sdsung()
if (GetItemCount(171) >= 1) then
DelItem(171)
for i=1,10 do AddOwnExp(20000) end
Msg2Player("Ban nhan duoc 20K EXP")
else
Talk(1,"","Nguoi Khong Co Sung Ma Muon Doi A` Nhox !")
end
end;

function sddudu()
if (GetItemCount(172) >= 1) then
DelItem(172)
for i=1,10 do AddOwnExp(20000) end
Msg2Player("Ban nhan duoc 20K EXP")
else
Talk(1,"","Nguoi Khong Co Du Du Ma Muon Doi A` Nhox !")
end
end;


--================================================== ================================================== ==
--=================================================s dtraicay================================
--================================================== ================================================== =

function eftbanhso1()
if (GetItemCount(168) >= 1)
and (GetItemCount(169) >= 1)
and (GetItemCount(170) >= 1)
and (GetItemCount(171) >= 1)
and (GetItemCount(172) >= 1) then
AddEventItem(173)
DelItem(168)
DelItem(169)
DelItem(170)
DelItem(171)
DelItem(172)
Msg2Player("Ban nhan duoc Banh Chung Thap Cam.")
else
Talk(1,"","Nguoi Khong Co Du Nguyen Liu Ma` Cu' Thix On` Ao` A` Nhox !")
end
end;

function eftbanhso2()
if (GetItemCount(173) >= 2) then
AddEventItem(174)
DelItem(173)
DelItem(173)
Msg2Player("Ban nhan duoc Banh Tet Nhan Dau.")
else
Talk(1,"","Nguoi Khong Co 2 cai Banh Chung Thap Cam Ma Muon Ghep A` Nhox !")
end
end;

function eftbanhso3()
if (GetItemCount(174) >= 2) then
AddEventItem(175)
DelItem(174)
DelItem(174)
Msg2Player("Ban nhan duoc Banh Chung Cao Cap.")
else
Talk(1,"","Nguoi Khong Co 2 cai Banh Tet Nhan Dau Ma Muon Ghep A` Nhox !")
end
end;

function eftbanhso4()
if (GetItemCount(173) >= 3)
and (GetItemCount(174) >= 2)
and (GetItemCount(175) >= 1) then
AddEventItem(176)
DelItem(173)
DelItem(173)
DelItem(173)
DelItem(174)
DelItem(174)
DelItem(175)
Msg2Player("Ban nhan duoc Banh Tet Thap Cam.")
else
Talk(1,"","Nguoi Khong Co Du Nguyen Liu Ma` Cu' Thix On` Ao` A` Nhox !")
end
end;

--================================================== ================================================== ==
--=================================================e p banh================================
--================================================== ================================================== =

function sdbanhso1()
if (GetItemCount(173) >= 1) then
DelItem(173)
for i=1,10 do AddOwnExp(200000) end
Msg2Player("Ban nhan duoc 200K EXP")
else
Talk(1,"","Nguoi Khong Co Banh Chung Thap Cam ma` muon su dung A` Nhox !")
end
end;



function sdbanhso2()
if (GetItemCount(174) >= 1) then
DelItem(174)
for i=1,10 do AddOwnExp(2000000) end
Msg2Player("Ban nhan duoc 2tr EXP")
else
Talk(1,"","Nguoi Khong Co Banh Tet Nhan Dau ma` muon su dung A` Nhox !")
end
end;



function sdbanhso3()
if (GetItemCount(175) >= 1) then
DelItem(176)
for i=1,10 do AddOwnExp(20000000) end
Msg2Player("Ban nhan duoc 20tr EXP")
else
Talk(1,"","Nguoi Khong Co Banh Chung Cao Cap ma` muon su dung A` Nhox !")
end
end;




function sdbanhso4()
if (GetItemCount(176) >= 1) then
DelItem(176)
for i=1,10 do AddOwnExp(1000000000) end
Msg2Player("Ban nhan duoc 1 Ty EXP")
else
Talk(1,"","Nguoi Khong Co Banh Tet Thap Cam ma` muon su dung A` Nhox !")
end
end;
[M]r[K]id
19-09-10, 09:57 AM
về ngân cứu thêm về code đã
thanks bạn thaihoa91 nhé
[M]r[K]id
19-09-10, 09:59 AM
thật ra cái mian thì cái của mình sẽ mất
<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ái này bạn fix
function main()
còn của mình cũ
function epbanhtt()
cái kia mình viết là epbanhtt sửa thành mian ak` ???
thaihoa91
19-09-10, 10:02 AM
thật ra cái mian thì cái của mình sẽ mất
<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ái này bạn fix
function main()
còn của mình cũ
function epbanhtt()
cái kia mình viết là epbanhtt sửa thành mian ak` ???

Uhm` ! Vì nó là function chứa các function con ! Anh thấy nó là đầu tiên mới đúng !

Có 2 cách :

1) Dùng cách trên !

2) Thêm 1 đoạn code nữa là :

function main()
epbanhtt()
end;
[M]r[K]id
19-09-10, 10:06 AM
níu chỉnh theo bạn thì còn nhiều phần khác như event mẹ: tàng bảo đồ, hoàng kim thạch,.... sẽ nằm bên ngoài khi mình click vào nhân vật
vậy thì cái event con của event trung thu nằm bên ngoài mất ùi
có cách nào cho nó nằm trong phần Event mẹ là "Event trung thu" ko
thaihoa91
19-09-10, 10:11 AM
Có gì đâu mà khó hỉu bạn !

Thì ta làm 1 function main lựa chọn các event !

function main()
Say("Nguoi muon chon event nao???",4,"Event Trung Thu/epbanhtt","Tang Bao do/tbd","Hoang Kim THach/hkt","Ko co gi/no")
end;
[M]r[K]id
19-09-10, 10:14 AM
u`k thanks bạn nhé :D
cứ nghĩ khó lắm
ai ngờ đơn giản ghê :D