Share Server Võ Lâm Ngạo Tuyết (Dev Offline)

[yeumayluon]

TK vào vẫn bình thường mà
[Only registered and activated users can see links. ]
[Only registered and activated users can see links. ]
Bạn nào muốn test nhanh tống kim thì làm như thế này:
Task01.lua thay thế đoạn này vào

function ontime_tongkim(nIndex)
	StopMissionTimer(nIndex,1);--tat hen gio so 1
	local nTongc = GetMSGroupCount(nIndex,0);
	local nKimc = GetMSGroupCount(nIndex,1);
	local nCount = GetMSPlayerCount(nIndex);
	if(nTongc == 0 and nKimc == 0) then
--	if(nTongc == 0 or nKimc == 0) then
		for i=1,nCount do
		if(GetPMParam(nIndex, i, 0) == 1) then --dang online
			PlayerIndex = MSDIdx2PIdx(nIndex, i);
			SetPKMode(0,0);--phuc hoi pk tu do
			SetFightState(0);--phi chien dau
			SetPunish(0);
			SetDeathScript("")
			SetRankEx(GetTask(TASK_EXPAND_RANK));
			local nCamp = GetCurCamp();
			SetCurCamp(GetCamp());--phuc hoi phe ban dau
			if(nCamp == 1) then --tong
			NewWorld(325,RANDOM(1537,1548), RANDOM(3160,3195));
			SetRevPos(1,325)
			else	--kim
			NewWorld(325,RANDOM(1566,1588), RANDOM(3079,3096));
			SetRevPos(2,325)
			end
			QueryChannel();
		end
		end
		--CloseMission(nIndex);
		--AddCountNews(13910,5); --1 ben ko co nguoi
	return end
	AddCountNews(10651,5) --chien tran da bat dau
	for i=1,nCount do
		if(GetPMParam(nIndex, i, 0) == 1) then --neu co online thi ep kieu chien dau
			PlayerIndex = MSDIdx2PIdx(nIndex, i);
			SetPKMode(1,1)--ep kieu chien dau
			SetPMParam(nIndex,i,1,1) --set param 1 dang trong thoi gian chien dau
			PutMessage("§Þch qu©n ®· xuÊt hiÖn!");
		end
	end
	release_npctk();
end;

trong severtimer.lua thay thế đoạn này

function active_tongkim()
	--Check thoi gian
	local nSubWorldId = SubWorldID2Idx(380)
	if (nSubWorldId >= 0) then
	if Mn == 55 then -- thay đổi số này theo thời gian của máy tính thêm 5 phút để có thời gian chạy sever và đăng nhập game
--	for i=1,getn(TONGKIM_TIMER) do
---		if(Hr == TONGKIM_TIMER[i][1] and Mn == TONGKIM_TIMER[i][2]) then
			AddCountNews(10644,3)
			AddCountNews2(10222,3)
			SubWorld = nSubWorldId;
			OpenMission(1)
			StartMissionTimer(1,1, 5*1080)--so phut de chinh thuc bat dau
			StartMissionTimer(1,2, 15*1080)--thoi gian nguyen soai ra
			StartMissionTimer(1,3, 30*1080)--tong thoi gian ca tran
--			StartMissionTimer(1,3, 60*1080)--tong thoi gian ca tran
	--	end
	end
	--thoi gian bao danh con lai
	SubWorld = nSubWorldId;
	local RestTK = GetMSRestTime(1,1);
	local Minute;
	if (RestTK > 0) then
		Minute = floor(RestTK/1080);
		if(Minute == 7 or Minute == 3) then
		AddCountNews(10644,3)
		AddCountNews2(format("Thêi gian b¸o danh Tèng Kim cßn l¹i lµ %d phót.",Minute),3)
		end
	end
	--thoi gian con lai cua tran danh'
	RestTK = GetMSRestTime(1,3);
	if (RestTK > 0) then
		Minute = floor(RestTK/1080);
		if(Minute > 0) then
		for i=1,GetMSPlayerCount(1) do
			if((GetPMParam(1, i, 0) == 1) and (GetPMParam(1, i, 1) == 1)) then --neu co online va dang trong chien dau
				PlayerIndex = MSDIdx2PIdx(1, i);
				SendReport(1,Minute,0);
			end
		end
		end
	end
	
	end
end;

[vuduymanh]

nhìn trong vật phẩm tấm bản đồ nó sẽ hiện ra cái còn bao nhiu trượng thì cứ vậy mà đi đến là được

anh oi sao em add tọa độ ba lăng huyện nhu vậy nè sao ko dc nhỉ

BANDO={
"§ang ®øng trªn kho b¸u",
"H­íng T©y Nam c¸ch",
"H­íng §«ng Nam c¸ch",
"H­íng Nam c¸ch",
"H­íng T©y B¾c c¸ch",
"H­íng §«ng B¾c c¸ch",
"H­íng B¾c c¸ch",
"H­íng T©y c¸ch",
"H­íng §«ng c¸ch",
"Kho b¸u kh«ng n»m trªn b¶n ®å"
}
KHOBAU={ --- toa do x,y,w cua kho bau
----Ba Lang Huyen ---
---x-----y----w-------Ten map---------
{48729,116581,53,"Ba L¨ng HuyÖn"},
{46407,112103,53,"Ba L¨ng HuyÖn"},
{46547,106833,53,"Ba L¨ng HuyÖn"},
{49017,107307,53,"Ba L¨ng HuyÖn"},
{53014,109140,53,"Ba L¨ng HuyÖn"},
{58321,110841,53,"Ba L¨ng HuyÖn"},
{55333,112270,53,"Ba L¨ng HuyÖn"},
{53416,115262,53,"Ba L¨ng HuyÖn"},
{51497,112333,53,"Ba L¨ng HuyÖn"},
{45408,112564,53,"Ba L¨ng HuyÖn"},
----- them cac map khac tuy thich
}
BAUVAT = {------cai nay tuong ung so vat pham nhan dc
{3,"R­¬ng nhá"},
{5,"R­¬ng lín"},
{9,"R­¬ng b¶o vËt"}
}
ITEM={------- cai nay la item nhan duoc co the thay doi tuy y
------------ khong dung ----
{0,0,0,0,0,0,0,0}, --
{0,0,0,0,0,0,0,0}, --
--------------------------------------- loai 3
{0,5,29,0,0,5,0,0}, -- the dat cuoc
{0,3,43,0,0,5,0,0}, -- 1 da cuong hoa 1
--------------------------------------------- loai 5
{0,2,0,0,0,5,0,0}, -- phuc duyen tieu
{0,3,21,0,0,5,0,0}, -- 1 tien dong
{0,3,43,0,0,5,0,0}, -- 1 da cuong hoa 1
{0,3,44,0,0,5,0,0}, -- 1 da cuong hoa 2
------------------------------------------------------ loai 9
{0,5,29,0,0,5,0,0}, -- the dat cuoc
{0,2,45,0,0,5,0,0}, -- tien thao lo
{0,2,1,0,0,5,0,0}, -- phuc duyen trung
{0,2,54,0,0,5,0,0}, -- thiet la han
{0,2,55,0,0,5,0,0}, -- ban nhuoc tam kinh
{0,2,2,0,0,5,0,0}, -- phuc duyen trung
{0,3,21,0,0,5,0,0}, -- 1 tien dong
{0,5,30,0,0,5,0,0}, -- hat thien tue
--------------------------------------- loai 3
{0,3,13,0,0,5,0,0}, -- lam thuy tinh
{0,2,2,0,0,5,0,0}, -- phuc duyen dai
{0,3,44,0,0,5,0,0}, -- 1 da cuong hoa 2
{0,2,2,0,0,5,0,0}, -- phuc duyen trung
--------------------------------------------- loai 5
{0,3,14,0,0,5,0,0}, -- tu thuy tinh
{0,3,15,0,0,5,0,0}, -- luc thuy tinh
{0,2,13,0,0,5,0,0}, -- VLMT
{0,2,14,0,0,5,0,0}, -- TTK
{0,2,49,0,0,5,0,0}, -- Tien thao lo DB
{0,3,45,0,0,5,0,0}, -- 1 da cuong hoa 3
{0,3,21,0,0,5,5,0}, -- 5 tien dong
{0,3,46,0,0,5,0,0}, -- 1 da cuong hoa 4
------------------------------------------------------ loai 9
}

File NPC
Include("\\script\\library\\worldlibrary.lua");
Include("\\script\\header\\taskid.lua");
Include("\\script\\header\\khobau.lua");

MAIN_NV ={
"NhËn b¶n ®å.",
"Truy t×m kho b¸u.",
"Hñy nhiÖm vô.",
"T×m hiÓu vÒ nhiÖm vô."}
KETTHUC = "KÕt thóc ®èi tho¹i/no"
function main()
local nSLan = GetNumber(GetTask(TASK_BALANGHUYEN),4)
local Lan = 3 - nSLan
local count = 1;
local StrTab = {};
for i=1,getn(MAIN_NV) do
StrTab[count] = MAIN_NV[i].."/khobau1";
count = count + 1;
end
if(count == 1) then
return end
StrTab[count] = KETTHUC;
Say2("Sè nhiÖm vô trong ngµy: <color=red>"..Lan.."<color>.",count,1,"",StrTab)
end;
function no()
end
function khobau1(nsel)
local nSLan = GetNumber(GetTask(TASK_BALANGHUYEN),4)

if nsel == 0 then
AddItem(0,2,88,0,0,5,0,0) -- cai nay la item ban do
return end
if nsel == 3 then
Say2("c¸c b¹n lµm nhiÖm vô kho b¸u,®­îc rÊt nhiÒ vËt phÈm quý hiÕm",2,1,"",
KETTHUC)
return end
if nsel == 2 then
SetTask(TASK_VINHLACTRAN,SetNumber(GetTask(TASK_BA LANGHUYEN),7,0))
SetTask(TASK_TOADOX,0)
SetTask(TASK_TOADOY,0)
SetTask(TASK_MAP,0)
return end
if nsel == 1 then
if GetLevel() < 60 then
Talk(1,"","<color=metal>KiÕm Kh¸ch: <color>§¼ng cÊp 60 trë lªn míi cã thÓ tiÕp nhËn nhiÖm vô")
return end
if nSLan >= 3 then
Talk(1,"","<color=metal>KiÕm Kh¸ch: <color>Mçi ngµy chØ cã thÓ nhËn nhiÖm vô 3 lÇn")
return end
if GetLevel() >= 60 and nSLan < 3 then
local i = RANDOM(1,getn(KHOBAU))
SetTask(TASK_TOADOX,KHOBAU[i][1])
SetTask(TASK_TOADOY,KHOBAU[i][2])
SetTask(TASK_MAP,KHOBAU[i][3])
SetTask(TASK_BALANGHUYEN,SetNumber(GetTask(TASK_BA LANGHUYEN),4,GetNumber(GetTask(TASK_BALANGHUYEN),6 ) +1)) -- so lan trong ngay
SetTask(TASK_BALANGHUYEN,SetNumber(GetTask(TASK_BA LANGHUYEN),7,1))-- da nhan nhiem vu
Talk(1,"","<color=metal>KiÕm Kh¸ch: <color>Ng­¬i h·y ®Õn Ba L¨ng HuyÖn <color=yellow>B¸u vËt<color> vÒ cho ta.")
return end
end
end

[vuduymanh]

em thử để nguyên maps vĩnh lạc trấn nhưng đi hết bản đồ mà nó cứ bảo còn 250 trược nữa mà đi hết bản đồ cũng ko thể hết dc trượng,còn em add tọa độ ba lăng huyện thì nó báo không thấy kho báu trên bản đồ ,mà em add ngay cổng của ba lăng huyện
anh có thể share cái sever của anh dc ko anh

[leerim]

Mọi thứ đều ổn nhưng vào sv di chuyển dis GS
Đã add dep nhưng ko hỉu sao hết ai giải thích giúp vs

[thieniu]

em thử để nguyên maps vĩnh lạc trấn nhưng đi hết bản đồ mà nó cứ bảo còn 250 trược nữa mà đi hết bản đồ cũng ko thể hết dc trượng,còn em add tọa độ ba lăng huyện thì nó báo không thấy kho báu trên bản đồ ,mà em add ngay cổng của ba lăng huyện
anh có thể share cái sever của anh dc ko anh

câu này hay nè
Làm phép tính sau để cho ra kết quả: 1 + 1 x 2 = ? (gợi ý câu trả lời: 3)

[niconut]

em thử để nguyên maps vĩnh lạc trấn nhưng đi hết bản đồ mà nó cứ bảo còn 250 trược nữa mà đi hết bản đồ cũng ko thể hết dc trượng,còn em add tọa độ ba lăng huyện thì nó báo không thấy kho báu trên bản đồ ,mà em add ngay cổng của ba lăng huyện
anh có thể share cái sever của anh dc ko anh

mình có đưa cho bạn cái hàm set tọa độ r mà.đâu phải bạn chỉ thay cái "53,balanghuyen" k đâu.mà phải set lại toàn bộ tọa độ nữa,với lại sv share ra tọa độ đâu giống nhau được phải set lại hết,hỉu k?
cái hàm này đưa bạn r mà?

function toado()
w,x,y = GetWorldPos()
local a = floor(x/32)
local b = floor(y/32)
Say2("<color=blue> "..w.."<color=yellow> "..a.." <color=red>"..b.." <enter> "..x.." - "..y.." ",2,1,"",
"Quay lai/toado",
"Tho¸t/no")
end

add vào lệnh bài r lấy ra xài thôi

Mỗi Bạn 1 ý tưởng chứ các bạn cứ đợi người khác share ra hết thì mấy bạn học hỏi được gì ngoài mang về và chơi?công sức của mọi người các bạn chỉ việc ngồi thừ ra đó đợi có cái mới bỏ cái cũ ,r đem đi xài,r lúc cái mới bị lỗi thì chẳng biết fix ở đâu? sao các bạn k tự làm đi? tự nghiên cứu đi,những người share ra cho bạn 1 hoặc 2 script gì đó thì lấy nó về mà ngâm chứ k phải lấy về mà các bạn để vào cái là xài liền ? đâu ra vậy? suy nghĩ đi nhé

[yeumayluon]

Cái đó chỉ là bản test cơ bản còn bản chính thức phức tạp và nhì nhằng quá nên mình khò muốn share. Để tối mình bỏ phần xuống hầm và rút gọn share cho mọi người.

[hocsinhthuctap]

Hix minh mở online cho mấy đứa bạn cày nghịch chơi mà tạo acc xong nó cứ có 999 xu sẵn vơi cái nhận hỗ trỡ theo cấp quà chán quá ai có share mình với ! Vơi nhận toàn khoá vinh viễn bán cũng ko được full rương lại xoá acc tạo lại, mình thấy mấy sv kia có cái xoá vật phẩm ở tạp hoá ai biết chỉ với



Vĩ lãnh tụ nào vĩ đại và là bậc nhất của Việt Nam ? (gợi ý câu trả lời: Ho Chi Minh)

[carotyeuchuot]

Hix minh mở online cho mấy đứa bạn cày nghịch chơi mà tạo acc xong nó cứ có 999 xu sẵn vơi cái nhận hỗ trỡ theo cấp quà chán quá ai có share mình với ! Vơi nhận toàn khoá vinh viễn bán cũng ko được full rương lại xoá acc tạo lại, mình thấy mấy sv kia có cái xoá vật phẩm ở tạp hoá ai biết chỉ với



Vĩ lãnh tụ nào vĩ đại và là bậc nhất của Việt Nam ? (gợi ý câu trả lời: Ho Chi Minh)

1, Tạo Acc = JxStudio là hết bị 999 xu

2,Muốn nhận quà gì thì bạn kéo xuông xem đoạn script đó rôi thay id món quà muôn nhận thôi!

3,Muốn Vật Phẩm không khoá thì bỏ LockItem(id) thêm vào làm gi cho nó khoá

Còn ý bạn muốn xoá như này à?

[Only registered and activated users can see links. ]

[Only registered and activated users can see links. ]

[Only registered and activated users can see links. ]

[Only registered and activated users can see links. ]


P/S: happy christmas all

[killer20099]

Hix minh mở online cho mấy đứa bạn cày nghịch chơi mà tạo acc xong nó cứ có 999 xu sẵn vơi cái nhận hỗ trỡ theo cấp quà chán quá ai có share mình với ! Vơi nhận toàn khoá vinh viễn bán cũng ko được full rương lại xoá acc tạo lại, mình thấy mấy sv kia có cái xoá vật phẩm ở tạp hoá ai biết chỉ với



Vĩ lãnh tụ nào vĩ đại và là bậc nhất của Việt Nam ? (gợi ý câu trả lời: Ho Chi Minh)

mở cho bạn nghịch mà ko cho nó xu sao nó chơi
còn onl hút máu thì tìm cách fix y