Sửa lỗi trong === nhiệm vụ làm thuyền rồng....

[jangminh254]

--description: Thuyen Phu
--author: Mr.Rezo
--date: 2009/12/20
--==============================================
--==============================================
Include("\\script\\Global\\sourcejx49.lua");

LONGDAU = 183
THANRONG = 184
XUONGRONG = 185
DUOIRONG = 186
MAICHEO = 187
BANHLAI = 188
TRONG = 189

function newyear()
SayEx({"<color="..colorS()..">Thuyen Phu<color>: Hoat dong su kien <color=green>Dua Thuyen<color> dang dien ra.","Dong Y./duathuyen","Thoat./out"});
end;

function duathuyen()
SayEx({"<color="..colorS()..">Thuyen Phu<color>: Dai hiep muon thuc hien viec gi ?",
"Che Tao./CheTao",
"Gui Nguyen Lieu Vao Kho./GuiNguyenLieu",
"Lay Nguyen Lieu Trong Kho./LayNguyenLieu",
"Huong Dan./HuongDan",
"Thoat./out"});
end;

function CheTaoThuyen()
SayEx({"<color="..colorS()..">Thuyen Phu<color>: Chon cap do muon che tao.",
"?Thuyen Rong [Cap 1]./chetao1",
"?Thuyen Rong [Cap 2]./chetao2",
"?Thuyen Rong [Cap 3]./chetao3",
"?Thuyen Rong [Cap 4]./chetao4",
"?Thuyen Rong [Cap 5]./chetao5",
"?Thuyen Rong [Cap 6]./chetao6",
"?Thuyen Rong [Max Op]./chetao7",
"?Thoat./out"});
end;

function chetao1()
if ( GetItemCount(184) >= 1)
and ( GetItemCount(185) >= 1)
and ( GetItemCount(186) >= 1)
and ( GetItemCount(187) >= 1)
and ( GetItemCount(188) >= 1)
and ( GetItemCount(189) >= 1)
and ( GetItemCount(190) >= 1)
and ( GetCash() >= 10000000) then
Pay(10000000)
DelItem(184)
DelItem(185)
DelItem(186)
DelItem(187)
DelItem(188)
DelItem(189)
DelItem(190)
AddEventItem(177)
Msg2Player("Ban nhan duoc Thuyen Rong [Cap 1].")
else
Talk(1,"","Ban khong mang du Nguyen Lieu.Neu kho khan hay doc lai Huong Dan.");
end
end;

function chetao2()
if ( GetItemCount(177) >= 1)
and ( GetItemCount(184) >= 2)
and ( GetItemCount(185) >= 2)
and ( GetItemCount(186) >= 2)
and ( GetItemCount(187) >= 2)
and ( GetItemCount(188) >= 2)
and ( GetItemCount(189) >= 2)
and ( GetItemCount(190) >= 2)
and ( GetCash() >= 20000000) then
Pay(20000000)
DelItem(177)
for i=1,2 do DelItem(184) end
for i=1,2 do DelItem(185) end
for i=1,2 do DelItem(186) end
for i=1,2 do DelItem(187) end
for i=1,2 do DelItem(188) end
for i=1,2 do DelItem(189) end
for i=1,2 do DelItem(190) end
AddEventItem(178)
Msg2Player("Ban nhan duoc Thuyen Rong [Cap 2].")
else
Talk(1,"","Ban khong mang du Nguyen Lieu.Neu kho khan hay doc lai Huong Dan.");
end
end;

function chetao3()
if ( GetItemCount(178) >= 1)
and ( GetItemCount(184) >= 3)
and ( GetItemCount(185) >= 3)
and ( GetItemCount(186) >= 3)
and ( GetItemCount(187) >= 3)
and ( GetItemCount(188) >= 3)
and ( GetItemCount(189) >= 3)
and ( GetItemCount(190) >= 3)
and ( GetCash() >= 30000000) then
Pay(30000000)
DelItem(178)
for i=1,3 do DelItem(184) end
for i=1,3 do DelItem(185) end
for i=1,3 do DelItem(186) end
for i=1,3 do DelItem(187) end
for i=1,3 do DelItem(188) end
for i=1,3 do DelItem(189) end
for i=1,3 do DelItem(190) end
AddEventItem(179)
Msg2Player("Ban nhan duoc Thuyen Rong [Cap 3].")
else
Talk(1,"","Ban khong mang du Nguyen Lieu.Neu kho khan hay doc lai Huong Dan.");
end
end;

function chetao4()
if ( GetItemCount(179) >= 1)
and ( GetItemCount(184) >= 4)
and ( GetItemCount(185) >= 4)
and ( GetItemCount(186) >= 4)
and ( GetItemCount(187) >= 4)
and ( GetItemCount(188) >= 4)
and ( GetItemCount(189) >= 4)
and ( GetItemCount(190) >= 4)
and ( GetCash() >= 40000000) then
Pay(40000000)
DelItem(179)
for i=1,4 do DelItem(184) end
for i=1,4 do DelItem(185) end
for i=1,4 do DelItem(186) end
for i=1,4 do DelItem(187) end
for i=1,4 do DelItem(188) end
for i=1,4 do DelItem(189) end
for i=1,4 do DelItem(190) end
AddEventItem(180)
Msg2Player("Ban nhan duoc Thuyen Rong [Cap 4].")
else
Talk(1,"","Ban khong mang du Nguyen Lieu.Neu kho khan hay doc lai Huong Dan.");
end
end;

function chetao5()
if ( GetItemCount(180) >= 1)
and ( GetItemCount(184) >= 5)
and ( GetItemCount(185) >= 5)
and ( GetItemCount(186) >= 5)
and ( GetItemCount(187) >= 5)
and ( GetItemCount(188) >= 5)
and ( GetItemCount(189) >= 5)
and ( GetItemCount(190) >= 5)
and ( GetCash() >= 50000000) then
Pay(50000000)
DelItem(180)
for i=1,5 do DelItem(184) end
for i=1,5 do DelItem(185) end
for i=1,5 do DelItem(186) end
for i=1,5 do DelItem(187) end
for i=1,5 do DelItem(188) end
for i=1,5 do DelItem(189) end
for i=1,5 do DelItem(190) end
AddEventItem(181)
Msg2Player("Ban nhan duoc Thuyen Rong [Cap 5].")
else
Talk(1,"","Ban khong mang du Nguyen Lieu.Neu kho khan hay doc lai Huong Dan.");
end
end;

function chetao6()
if ( GetItemCount(181) >= 1)
and ( GetItemCount(184) >= 6)
and ( GetItemCount(185) >= 6)
and ( GetItemCount(186) >= 6)
and ( GetItemCount(187) >= 6)
and ( GetItemCount(188) >= 6)
and ( GetItemCount(189) >= 6)
and ( GetItemCount(190) >= 6)
and ( GetCash() >= 60000000) then
Pay(60000000)
DelItem(181)r
for i=1,6 do DelItem(184) end
for i=1,6 do DelItem(185) end
for i=1,6 do DelItem(186) end
for i=1,6 do DelItem(187) end
for i=1,6 do DelItem(188) end
for i=1,6 do DelItem(189) end
for i=1,6 do DelItem(190) end
AddEventItem(182)
Msg2Player("Ban nhan duoc Thuyen Rong [Cap 6].")
else
Talk(1,"","Ban khong mang du Nguyen Lieu.Neu kho khan hay doc lai Huong Dan.");
end
end;

function chetao7()
if ( GetItemCount(182) >= 1)
and ( GetItemCount(184) >= 1)
and ( GetItemCount(185) >= 1)
and ( GetItemCount(186) >= 1)
and ( GetItemCount(187) >= 1)
and ( GetItemCount(188) >= 1)
and ( GetItemCount(189) >= 1)
and ( GetItemCount(190) >= 1)
and ( GetItemCount(7) >= 2) then
DelItem(182)
for i=1,2 do DelItem(7) end
DelItem(184)
DelItem(185)
DelItem(186)
DelItem(187)
DelItem(188)
DelItem(189)
DelItem(190)
AddEventItem(183)
Msg2Player("Ban nhan duoc Thuyen Rong [Cao Cap].")
else
Talk(1,"","Ban khong mang du Nguyen Lieu.Neu kho khan hay doc lai Huong Dan.");
end
end;

function GuiNguyenLieu()
SayEx({"<color="..colorS()..">Thuyen Phu<color>: Muon gui vat pham nao ?",
"Thuyen./doi1",
"Dau Thuyen./doi2",
"Than Thuyen./doi3",
"Khoang Thuyen./doi4",
"Duoi Thuyen./doi5",
"Mai Cheo./doi5",
"banh Lai./doi5",
"Trong./doi5",
"Thoat./out"});
end;

function doi1()
if (GetItemCount(MANGCAU) >= 5) then
AddOwnExp(50000)
Msg2Player("Ban nhan duoc 50.000 diem kinh nghiem.")
DelItem(MANGCAU)
DelItem(MANGCAU)
DelItem(MANGCAU)
DelItem(MANGCAU)
DelItem(MANGCAU)
end;
end;

function doi2()
if (GetItemCount(DUAXIEM) >= 5) then
AddOwnExp(50000)
Msg2Player("Ban nhan duoc 50.000 diem kinh nghiem.")
DelItem(DUAXIEM)
DelItem(DUAXIEM)
DelItem(DUAXIEM)
DelItem(DUAXIEM)
DelItem(DUAXIEM)
else
Msg2Player("Khong tim thay 5 Dua Xiem trong hanh trang.")
end
end;

function doi3()
if (GetItemCount(DUDU) >= 5) then
AddOwnExp(50000)
Msg2Player("Ban nhan duoc 50.000 diem kinh nghiem.")
DelItem(DUDU)
DelItem(DUDU)
DelItem(DUDU)
DelItem(DUDU)
DelItem(DUDU)
else
Msg2Player("Khong tim thay 5 Du Du trong hanh trang.")
end
end;

function doi4()
if (GetItemCount(XOAI) >= 5) then
AddOwnExp(50000)
Msg2Player("Ban nhan duoc 50.000 diem kinh nghiem.")
DelItem(XOAI)
DelItem(XOAI)
DelItem(XOAI)
DelItem(XOAI)
DelItem(XOAI)
else
Msg2Player("Khong tim thay 5 Xoai trong hanh trang.")
end
end;

function doi5()
if (GetItemCount(SUNG) >= 5) then
AddOwnExp(50000)
Msg2Player("Ban nhan duoc 50.000 diem kinh nghiem.")
DelItem(SUNG)
DelItem(SUNG)
DelItem(SUNG)
DelItem(SUNG)
DelItem(SUNG)
else
Msg2Player("Khong tim thay 5 Sung trong hanh trang.")
end
end;

function DungBanhTet()
SayEx({"<color="..colorS()..">Thuyen Phu<color>: Nguoi muon su dung loai banh nao ?",
"Banh Chung Thap Cam./b1",
"Banh Tet Nhan Dau./b2",
"Banh Tet Thap Cam./b3",
"Banh Chung Cao Cap./b4",
"Thoat./out"});
end;

function b1()
if (HaveItem(BANHCHUNGTHAPCAM) == 1)then
i = random(0,100)
if (i < 80) then
AddOwnExp(10000000)
Msg2Player("Nhan duoc 10 trieu diem kinh nghiem.")
DelItem(BANHCHUNGTHAPCAM)
elseif (i < 50) then
AddOwnExp(15000000)
Msg2Player("Nhan duoc 15 trieu diem kinh nghiem.")
DelItem(BANHCHUNGTHAPCAM)
elseif (i < 20) then
AddOwnExp(20000000)
Msg2Player("Nhan duoc 20 trieu diem kinh nghiem.")
DelItem(BANHCHUNGTHAPCAM)
end
end;
end;

function b2()
if (HaveItem(BANHTETNHANDAU) == 1)then
i = random(0,100)
if (i < 80) then
AddOwnExp(30000000)
Msg2Player("Nhan duoc 30 trieu diem kinh nghiem.")
DelItem(BANHTETNHANDAU)
elseif (i < 50) then
AddOwnExp(35000000)
Msg2Player("Nhan duoc 35 trieu diem kinh nghiem.")
DelItem(BANHTETNHANDAU)
elseif (i < 20) then
AddOwnExp(40000000)
Msg2Player("Nhan duoc 40 trieu diem kinh nghiem.")
DelItem(BANHTETNHANDAU)
end
end;
end;

function b3()
if (HaveItem(BANHTETTHAPCAM) == 1)then
i = random(0,100)
if (i < 80) then
AddOwnExp(50000000)
Msg2Player("Nhan duoc 50 trieu diem kinh nghiem.")
DelItem(BANHTETTHAPCAM)
elseif (i < 50) then
AddOwnExp(55000000)
Msg2Player("Nhan duoc 55 trieu diem kinh nghiem.")
DelItem(BANHTETTHAPCAM)
elseif (i < 20) then
AddOwnExp(60000000)
Msg2Player("Nhan duoc 60 trieu diem kinh nghiem.")
DelItem(BANHTETTHAPCAM)
end
end;
end;

function b4()
if (HaveItem(BANHCHUNGCAOCAP) == 1)then
i = random(0,100)
if (i < 80) then
for i=1,100 do AddOwnExp(80000000) end
Msg2Player("Nhan duoc 80 trieu diem kinh nghiem.")
DelItem(BANHCHUNGCAOCAP)
elseif (i < 50) then
for i=1,100 do AddOwnExp(90000000) end
Msg2Player("Nhan duoc 90 trieu diem kinh nghiem.")
DelItem(BANHCHUNGCAOCAP)
elseif (i < 20) then
for i=1,100 do AddOwnExp(100000000) end
Msg2Player("Nhan duoc 1 ty diem kinh nghiem.")
DelItem(BANHCHUNGCAOCAP)
end
end;
end;

function out()
end;

Lưu ý script đặt trong thẻ CODE

[[Lady]Pro-Bi]

thanked for share ! mặc dù chả biết là gì :-|

[jangminh254]

cái này ...của ai ko quan trọng....của ai ko bít nữa...nhưng xài bị lỗi...ai sửa dùm coi....

[[L]il [Z]ee™]

Tất nhiên đúng ID này là của tôi ... đúng chứ ... Bạn download Server nào về ? JXServer49 No Font ? JXServer của Ohishu Upload lên ? JXServer 6.0 bên CBGame ? Thưa bạn những Server đó đều đã được Edit lại rồi :-| Server gốc DNTMaster không còn LINK vì đơn giản nó leech qua CBGame ( mà CBGame lại đang DEAD ) ...
Nói chung trước khi nói câu ai làm ra vui lòng contact DNT để rõ nguồn gốc ;) Chỉ xin nhắc 1 điều EVENT Thuyền do tôi nghĩ ý tưởng và viết ra ... OKIE ;)
Lâu ngày không quay lại CLBGame thấy bạn Hòa chưa sửa được cái tính "ăn cơm trước kẻng" nhỉ :|
Từ cái vụ Ohishu vu oan tôi cậu chưa tỉnh à ? Giờ quay lại vụ đó nhé ...
Lúc đó Ohishu đưa cho cậu mấy tấm ảnh để cho cậu nghĩ rằng tôi lừa đảo ... Cậu chưa xác minh sự việc từ nhiều hướng đã vội vàng tung lên diễn đàn ... Tất nhiên là Mem CLB không ít rồi ... bàn luận này rõ cũng đến hơn 25 trang ( theo trí nhớ tôi ) nhưng người ta chỉ chú ý đến cái trang đầu tiên để xem sự việc chính của Topic ... đó cũng là chỗ cậu upload tấm ảnh vu oan tôi lừa đảo .Member không phải ai cũng rảnh hơi xem từng trang đâu ... và cuối cùng khi tôi được minh oan thì cũng đã nhiều bài rồi ... chả ai muốn ngó đến ... cậu chỉ làm 1 vài câu rằng "tôi vô tội" thế là xong :| topic bị xóa sau vài giờ đồng hồ ... thế thì còn ai đọc nữa ? người ta vẫn chỉ nghĩ đến tôi với 1 hình ảnh là thằng lừa đảo ... và lỗi đó là do ai ? do mấy MOD được coi là lâu năm của Forum như cậu đấy Hòa ạ ... Tôi ghét cậu ở cái tính không xem kỹ sự việc nhưng đã nói liều ... không chỉ cậu đâu ... còn bạn Phương Dung nữa đấy ;) 2 MOD mà tôi nghĩ không đáng SET ở CLB ... cùng lắm cho làm Thành Viên Tích Cực là quá to.
Đó chỉ là vài lời của tôi nhắn tới cậu ... ;) nếu còn danh dự thì quay mặt nhìn lại bản thân đi .

[kinkina2009]

il [Z]ee™;273463']Tất nhiên đúng ID này là của tôi ... đúng chứ ... Bạn download Server nào về ? JXServer49 No Font ? JXServer của Ohishu Upload lên ? JXServer 6.0 bên CBGame ? Thưa bạn những Server đó đều đã được Edit lại rồi :-| Server gốc DNTMaster không còn LINK vì đơn giản nó leech qua CBGame ( mà CBGame lại đang DEAD ) ...
Nói chung trước khi nói câu ai làm ra vui lòng contact DNT để rõ nguồn gốc ;) Chỉ xin nhắc 1 điều EVENT Thuyền do tôi nghĩ ý tưởng và viết ra ... OKIE ;)
Lâu ngày không quay lại CLBGame thấy bạn Hòa chưa sửa được cái tính "ăn cơm trước kẻng" nhỉ :|
Từ cái vụ Ohishu vu oan tôi cậu chưa tỉnh à ? Giờ quay lại vụ đó nhé ...
Lúc đó Ohishu đưa cho cậu mấy tấm ảnh để cho cậu nghĩ rằng tôi lừa đảo ... Cậu chưa xác minh sự việc từ nhiều hướng đã vội vàng tung lên diễn đàn ... Tất nhiên là Mem CLB không ít rồi ... bàn luận này rõ cũng đến hơn 25 trang ( theo trí nhớ tôi ) nhưng người ta chỉ chú ý đến cái trang đầu tiên để xem sự việc chính của Topic ... đó cũng là chỗ cậu upload tấm ảnh vu oan tôi lừa đảo .Member không phải ai cũng rảnh hơi xem từng trang đâu ... và cuối cùng khi tôi được minh oan thì cũng đã nhiều bài rồi ... chả ai muốn ngó đến ... cậu chỉ làm 1 vài câu rằng "tôi vô tội" thế là xong :| topic bị xóa sau vài giờ đồng hồ ... thế thì còn ai đọc nữa ? người ta vẫn chỉ nghĩ đến tôi với 1 hình ảnh là thằng lừa đảo ... và lỗi đó là do ai ? do mấy MOD được coi là lâu năm của Forum như cậu đấy Hòa ạ ... Tôi ghét cậu ở cái tính không xem kỹ sự việc nhưng đã nói liều ... không chỉ cậu đâu ... còn bạn Phương Dung nữa đấy ;) 2 MOD mà tôi nghĩ không đáng SET ở CLB ... cùng lắm cho làm Thành Viên Tích Cực là quá to.
Đó chỉ là vài lời của tôi nhắn tới cậu ... ;) nếu còn danh dự thì quay mặt nhìn lại bản thân đi .


nữa đi anh ơi :S :-o. Anh thật là giống đàn bà mồm mẻo ghe đấy

[[L]il [Z]ee™]

nữa đi anh ơi :S :-o. Anh thật là giống đàn bà mồm mẻo ghe đấy

xộc vào câu chuyện của người khác mới là giống đàn bà =))

[thaihoa91]

il [Z]ee™;273521']xộc vào câu chuyện của người khác mới là giống đàn bà =))

Ăn cơnm trước kẻng à ! Thế ai lấy cái Server gốc JX 49 Dev lên thế ! Cái đó ko gọi là ăn cơm trước à :)) Hay là ăn xong quên lau miệng =)) Mà quên lau miệng hay cố ý để miệng có dính thức ăn, để người ta bít mình ăn :D

[[L]il [Z]ee™]

Bạn đang trả lời vấn đề nào thế bạn Hòa ? Tớ nói rồi ... có gì gọi DNT lên ... tớ ko giải thích được nhiều ... vậy thôi :D

[thaihoa91]

il [Z]ee™;273534']Bạn đang trả lời vấn đề nào thế bạn Hòa ? Tớ nói rồi ... có gì gọi DNT lên ... tớ ko giải thích được nhiều ... vậy thôi :D

Đang trả lời phần này :


Lâu ngày không quay lại CLBGame thấy bạn Hòa chưa sửa được cái tính "ăn cơm trước kẻng" nhỉ :|Còn vấn đề :


2 MOD mà tôi nghĩ không đáng SET ở CLBTài đừng vội kết luận câu này ! Nghĩ lại mình xem rồi hãy nói người khác ! Đừng suy bụng ta ra bụng người !

Cùng lắm thì bỏ phiếu đi ! Sự việc sáng tỏ thôi ! Ít ra tui cũng giúp đỡ member nhìu hơn là Tài đấy ! Tài chỉ support cho Server Tài thôi ! Chứ member trong clbgamesvn hỏi thử xem dc bao nhiu người mà Tài đã giúp đỡ ! Và dc bao nhiu người bị Tài ăn cháo đá bát :)) Và dc bao nhiu người Tài cho người ta là ăn cháo đá bát !

Tui nhớ ko lầm Tài ở clbgamesvn này và gamevn đã nói 1 câu là member clbgamesvn toàn là ăn cháo đá bát ! Bên gamevn còn nói tui nên về cái xó clbgamesvn ! Tài xem clbgamesvn là 1 cái xó chứ ko phải 4rum !

Đã nói vậy thì đừng có kết luận đánh giá Set Mod ở đây ! Bản thân member của clbgamesvn mà Tài còn ko tôn trọng thì nói chi đánh giá MOD ! Tài ko đủ tư cách làm điều này !

[sangpronhat]

Topic script hay thế giờ toàn spam :|

Anh tài khẳng định CLB là 1 cái xó thì đừng có trở về đây nưa~ ở bên game vn mà ngủ đi nói thật nếu hong có cái CLB này thì sv anh đâu có được nhưng ngày nay !!
Đúng là ăn cháo đá bát !!

Sáng mai DEL hết tất cả những post nhảm okie b-(

Hòa đừng có tranh nữa ảnh "BRO" kệ ảnh mình gà lo phận gà he he !!!