thaihoa91
06-01-12, 09:02 PM
ý mình là bây giờ cần add 1 chủ tiệm tạp hóa nữa ở Ba Lăng Huyện nhưng với tên khác, hình ảnh thì thế nào cũng được, và 1 tọa độ nào đó.
ví dụ như: Tạp Hóa Thương - Ba Lăng Huyện - 210.215 chẳng hạn.
cái chỗ tọa độ này làm ở đâu?
và như cái long ngũ của hòa làm thì 2 số 5 và 6 kia có ý nghĩa gì?
AddNPCEx(nId,nLevel, nMap,nX,nY,nOffsetX,nOffsetY,nScript,nCurCamp)
nID : ID trong \Settings\NpcS.txt (Mở bằng Excel, ví dụ con Kim Miêu ở dòng số 10 trong Excel thì lấy 10 trừ 2, sẽ ra dc 8, và 8 chính là ID)
nLevel : Cấp độ của quái, ví dụ add con quái để nhân vật luyện cấp 90 thì nLevel = 90, đối với NPC đối thoại thì cho bao nhiu cũng dc !
nMap : ID Maps xem trong \Settings\MapList.ini
nX : tọa độ X trong game
nY : tọa độ Y trong game
nOffsetX và nOffsetY : tọa độ lệch x, y trong game, cái này cho là 0 cũng dc !
nScript : đường dẫn file .lua
nCurCamp : nếu thêm quái thì để là 5, nếu thêm Npc đối thoại thì để là 6
Ví dụ : Add Long Ngũ có ID Npc là 29, vào ba lăng huyện (ID = 53), tại tọa độ trong game là 202/198 với đường dẫn script là \script\longngu.lua
Thì hàm sẽ là : AddNPCEx(29,1,53,202,198,0,0,"\\script\\longngu.lua",6)
Chi tiết lắm rùi đó, fần còn lại là bạn tự code để vọc để hỉu hơn thui !
mình cũng bị lỗi y như Edward_Newgate (<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>) script thì đúng nhưng không biết sao lại kích vào vẫn đứng trơ trơ. trong khi đó add bằng tool thì lại được mới lạ
đây là nội dung script đó
---The Script (c) By SV Thach Cuong Long Version 2.0Include("\\script\\source\\sourcejx49.lua");Include("\\script\\quanly.lua")
function main()if HIEUTHUOC == 0 thenTalk(1,"","Chøc n¨ng t¹m thêi ®ãng cöa ®Ó b¶o tr× !")elseSay("<color=yellow>HiÖu Thuèc<color>: Ng¬i muèn mua g× ?",3,"Giao dÞch/gd","Mua nhanh/dpq","Kh«ng giao dÞch/no");endend
function gd()Sale(3); end;
function muathuoc()Say("<color=yellow>HiÖu Thuèc : <color>Xin mêi chän lo¹i thuèc muèn mua nhanh ?", 3, "Dîc phÈm ®¹i/dpd","Dîc phÈm tèng kim/dpq", "Tho¸t/no")
end;
function dpd()Say("<color=yellow>HiÖu Thuèc: <color>Xin mêi chän !",4,"Håi thiªn ®an/ksdd","§¹i bæ t¸n/hndd","Håi phôc m¸u vµ mana/cddd","Tho¸t/no");end;
function dpq()Say("<color=yellow>HiÖu Thuèc: <color>Xin mêi chän !",4,"Cöu chuyÓn hoµn hån ®an/cst","¤ ®Çu hoa thÇn ®an/tnt","Ngò hoa ngäc lé hoµn/nht","Tho¸t/no");end;
function ksdd()Say("<color=yellow>HiÖu Thuèc: <color>Xin mêi chän sè lîng <color=fire>Håi Thiªn §an<color> muèn mua",4,"10 b×nh (5000 lîng)/ksdd10","20 b×nh (10000 lîng)/ksdd20","30 b×nh (15000 lîng)/ksdd30","Tho¸t/no");end;
function hndd()Say("<color=yellow>HiÖu Thuèc: <color>Xin mêi chän sè lîng <color=fire>§¹i Bæ T¸n<color> muèn mua",4,"10 b×nh (5000 lîng)/hndd10","20 b×nh (10000 lîng)/hndd20","30 b×nh (15000 lîng)/hndd30","Tho¸t/no");end;
function cddd()Say("<color=yellow>HiÖu Thuèc: <color>Xin mêi chän sè lîng <color=fire>Bæ T©m §an<color> muèn mua",4,"10 b×nh (7500 lîng)/cddd10","20 b×nh (15000 lîng)/cddd20","30 b×nh (22500 lîng)/cddd30","Tho¸t/no");end;
function cst()Say("<color=yellow>HiÖu Thuèc: <color>Xin mêi chän sè lîng <color=fire>Cöu chuyÓn hoµn hån ®an<color> muèn mua",4,"10 b×nh (20000 lîng)/cst10","20 b×nh (40000 lîng)/cst20","30 b×nh (60000 lîng)/cst30","Tho¸t/no");end;
function tnt()Say("<color=yellow>HiÖu Thuèc: <color>Xin mêi chän sè lîng <color=fire>¤ ®Çu hoa thÇn ®an<color> muèn mua",4,"10 b×nh (20000 lîng)/tnt10","20 b×nh (40000 lîng)/tnt20","30 b×nh (60000 lîng)/tnt30","Tho¸t/no");end;
function nht()Say("<color=yellow>HiÖu Thuèc: <color>Xin mêi chän sè lîng <color=fire>Ngò hoa ngäc lé hoµn<color> muèn mua",4,"10 b×nh (30000 lîng)/nht10","20 b×nh (60000 lîng)/nht20","30 b×nh (90000 lîng)/nht30","Tho¸t/no");end;
function ksdd10()nl = GetCash() if (GetCash() >= 5000) then Pay(5000) if GetCash() == nl - 5000 then for i=1,10 do AddItem(1,0,0,4,0,0,0) end Msg2Player("NhËn ®îc 10 Håi Thiªn §an") else Talk(1,"","Hack a cung !") end else Talk(1,"no","C¸c h¹ kh«ng ®ñ <color=red>5000 lîng<color>, kh«ng thÓ mua") endend;
function ksdd20()nl = GetCash() if (GetCash() >= 10000) then Pay(10000) if GetCash() == nl - 10000 then for i=1,20 do AddItem(1,0,0,4,0,0,0) end Msg2Player("NhËn ®îc 20 Håi Thiªn §an") else Talk(1,"","Hack a cung !") end else Talk(1,"no","C¸c h¹ kh«ng ®ñ <color=red>10000 lîng<color>, kh«ng thÓ mua") endend;
function ksdd30()nl = GetCash() if (GetCash() >= 15000) then Pay(15000) if GetCash() == nl - 15000 then for i=1,30 do AddItem(1,0,0,4,0,0,0) end Msg2Player("NhËn ®îc 30 Håi Thiªn §an") else Talk(1,"","Hack a cung !") end else Talk(1,"no","C¸c h¹ kh«ng ®ñ <color=red>15000 lîng<color>, kh«ng thÓ mua") endend;
function hndd10()nl = GetCash() if (GetCash() >= 5000) then Pay(5000) if GetCash() == nl - 5000 then for i=1,10 do AddItem(1,1,0,4,0,0,0) end Msg2Player("NhËn ®îc 10 §¹i Bæ T¸n") else Talk(1,"","Hack a cung !") end else Talk(1,"no","C¸c h¹ kh«ng ®ñ <color=red>5000 lîng<color>, kh«ng thÓ mua") endend;
function hndd20()nl = GetCash() if (GetCash() >= 10000) then Pay(10000) if GetCash() == nl - 10000 then for i=1,20 do AddItem(1,1,0,4,0,0,0) end Msg2Player("NhËn ®îc 20 §¹i Bæ T¸n") else Talk(1,"","Hack a cung !") end else Talk(1,"no","C¸c h¹ kh«ng ®ñ <color=red>10000 lîng<color>, kh«ng thÓ mua") endend;
function hndd30()nl = GetCash() if (GetCash() >= 15000) then Pay(15000) if GetCash() == nl - 15000 then for i=1,30 do AddItem(1,1,0,4,0,0,0) end Msg2Player("NhËn ®îc 30 §¹i Bæ T¸n")else Talk(1,"","Hack a cung !")end else Talk(1,"no","C¸c h¹ kh«ng ®ñ <color=red>15000 lîng<color>, kh«ng thÓ mua") endend;
function cddd10()nl = GetCash() if (GetCash() >= 7500) then Pay(7500) if GetCash() == nl - 7500 then for i=1,10 do AddItem(1,2,0,4,0,0,0) end Msg2Player("NhËn ®îc 10 Bæ T©m §an")else Talk(1,"","Hack a cung !") end else Talk(1,"no","C¸c h¹ kh«ng ®ñ <color=red>7500 lîng<color>, kh«ng thÓ mua") endend;
function cddd20()nl = GetCash() if (GetCash() >= 15000) then Pay(15000) if GetCash() == nl - 15000 then for i=1,20 do AddItem(1,2,0,4,0,0,0) end Msg2Player("NhËn ®îc 20 Bæ T©m §an") else Talk(1,"","Hack a cung !") end else Talk(1,"no","C¸c h¹ kh«ng ®ñ <color=red>15000 lîng<color>, kh«ng thÓ mua") endend;
function cddd30()nl = GetCash() if (GetCash() >= 22500) then Pay(22500) if GetCash() == nl - 22500 then for i=1,30 do AddItem(1,2,0,4,0,0,0) end Msg2Player("NhËn ®îc 30 Bæ T©m §an") else Talk(1,"","Hack a cung !") end else Talk(1,"no","C¸c h¹ kh«ng ®ñ <color=red>22500 lîng<color>, kh«ng thÓ mua") endend;
function cst10()nl = GetCash() if (GetCash() >= 20000) then Pay(20000) if GetCash() == nl - 20000 then for i=1,10 do AddItem(1,0,0,5,0,0,0) end Msg2Player("NhËn ®îc 10 Cöu ChuyÓn ®an") else Talk(1,"","Hack a cung !") end else Talk(1,"no","C¸c h¹ kh«ng ®ñ <color=red>20000 lîng<color>, kh«ng thÓ mua") endend;
function cst20()nl = GetCash() if (GetCash() >= 40000) then Pay(40000) if GetCash() == nl - 40000 then for i=1,20 do AddItem(1,0,0,5,0,0,0) end Msg2Player("NhËn ®îc 20 Cöu ChuyÓn ®an") else Talk(1,"","Hack a cung !") end else Talk(1,"no","C¸c h¹ kh«ng ®ñ <color=red>40000 lîng<color>, kh«ng thÓ mua") endend;
function cst30()nl = GetCash() if (GetCash() >= 60000) then Pay(60000) if GetCash() == nl - 60000 then for i=1,30 do AddItem(1,0,0,5,0,0,0) end Msg2Player("NhËn ®îc 30 Cöu ChuyÓn ®an") else Talk(1,"","Hack a cung !") end else Talk(1,"no","C¸c h¹ kh«ng ®ñ <color=red>60000 lîng<color>, kh«ng thÓ mua") endend;
function tnt10()nl = GetCash() if (GetCash() >= 20000) then Pay(20000) if GetCash() == nl - 20000 then for i=1,10 do AddItem(1,1,0,5,0,0,0) end Msg2Player("NhËn ®îc 10 ¤ §Çu Hoµn") else Talk(1,"","Hack a cung !") end else Talk(1,"no","C¸c h¹ kh«ng ®ñ <color=red>20000 lîng<color>, kh«ng thÓ mua") endend;
function tnt20()nl = GetCash() if (GetCash() >= 40000) then Pay(40000) if GetCash() == nl - 40000 then for i=1,20 do AddItem(1,1,0,5,0,0,0) end Msg2Player("NhËn ®îc 20 ¤ §Çu Hoµn") else Talk(1,"","Hack a cung !") end else Talk(1,"no","C¸c h¹ kh«ng ®ñ <color=red>40000 lîng<color>, kh«ng thÓ mua") endend;
function tnt30()nl = GetCash() if (GetCash() >= 60000) then Pay(60000) if GetCash() == nl - 60000 then for i=1,30 do AddItem(1,1,0,5,0,0,0) end Msg2Player("NhËn ®îc 30 ¤ §Çu Hoµn") else Talk(1,"","Hack a cung !") end else Talk(1,"no","C¸c h¹ kh«ng ®ñ <color=red>60000 lîng<color>, kh«ng thÓ mua") endend;
function nht10()nl = GetCash() if (GetCash() >= 30000) then Pay(30000) if GetCash() == nl - 30000 then for i=1,10 do AddItem(1,2,0,5,0,0,0) end Msg2Player("NhËn ®îc 10 Ngò Hoa T¸n") else Talk(1,"","Hack a cung !") end else Talk(1,"no","C¸c h¹ kh«ng ®ñ <color=red>30000 lîng<color>, kh«ng thÓ mua") endend;
function nht20()nl = GetCash() if (GetCash() >= 60000) then Pay(60000) if GetCash() == nl - 60000 then for i=1,20 do AddItem(1,2,0,5,0,0,0) end Msg2Player("NhËn ®îc 20 Ngò Hoa T¸n") else Talk(1,"","Hack a cung !") end else Talk(1,"no","C¸c h¹ kh«ng ®ñ <color=red>60000 lîng<color>, kh«ng thÓ mua") endend;
function nht30()nl = GetCash() if (GetCash() >= 90000) then Pay(90000) if GetCash() == nl - 90000 then for i=1,30 do AddItem(1,2,0,5,0,0,0) end Msg2Player("NhËn ®îc 30 Ngò Hoa T¸n") else Talk(1,"","Hack a cung !") end else Talk(1,"no","C¸c h¹ kh«ng ®ñ <color=red>90000 lîng<color>, kh«ng thÓ mua") endend;
function no()end
Powered by vBulletin® Version 4.2.0 Copyright © 2024 vBulletin Solutions, Inc. All rights reserved.