Kết quả 151 đến 160 của 229
Chủ đề: Share Sever Thehades Dev
-
14-09-12, 09:26 AM #151
- Ngày tham gia
- Jul 2008
- Bài viết
- 10
- Thanks
- 4
- Thanked 0 Times in 0 Posts
Ðề: Share Sever Thehades Dev
mình chơi được rồi.hix..nhưng bạn ơi.mảnh gép lá cờ việt nam dùng như thế nào vậy?.và boss hoàng kim đến giừo sao không thấy thông báo và cũngkhông có xuất hiện nhỉ?.lãnh địa làm nhiệm vụ ntn?.mong bạn sớm giải đáp
Lần sửa cuối bởi mozillaa, ngày 14-09-12 lúc 11:17 AM.
Khách viếng thăm hãy cùng mozillaa xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!
-
16-09-12, 04:31 PM #152
- Ngày tham gia
- Nov 2011
- Bài viết
- 164
- Thanks
- 23
- Thanked 138 Times in 16 Posts
Ðề: Share Sever Thehades Dev
Mảnh ghép lá cờ mình chưa làm .Cái này bạn tìm hiểu chút cũng tự làm được à .
Còn Boss HK bạn vào script\source\timerserver.lua xem thời gian nhé
Code này :function thoigianbosshk()
gio = tonumber(date("%H"))
phut = tonumber(date("%M"))
if gio >= 8 and gio <=10 then
if phut == 0 then
--if GetGlbMissionV(90) == 0 then
map = SubWorldID2Idx(53)
bosstieu1 = AddNpc(509,80,map,1513*32,3306*32)
SetNpcSeries(bosstieu1,random(0,4))
IsBoss(bosstieu1,2)
Msg2SubWorld("LiÔu Thanh Thanh ®· xuÊt hiÖn t¹i Ba L¨ng HuyÖn(188/206)")
----
bosstieu2 = AddNpc(510,80,map,1761*32,3206*32)
SetNpcSeries(bosstieu2,random(0,4))
IsBoss(bosstieu2,2)
Msg2SubWorld("DiÖu Nh ®· xuÊt hiÖn t¹i Ba L¨ng HuyÖn(220/200)")
----
bosstieu3 = AddNpc(511,80,map,1637*32,3057*32)
SetNpcSeries(bosstieu3,random(0,4))
IsBoss(bosstieu3,2)
Msg2SubWorld("Tr¬ng T«ng ChÝnh ®· xuÊt hiÖn t¹i Ba L¨ng HuyÖn(204/190)")
AddGlobalCountNews("Boss hoµng kim tiÓu ®· xuÊt hiÖn t¹i Ba L¨ng HuyÖn, c¸c nh©n sü h·y cÈn thËn",1)
--SetGlbMissionV(90,1)
--else
--Msg2SubWorld("LiÔu Thanh Thanh ®· xuÊt hiÖn t¹i Ba L¨ng HuyÖn(188/206)")
--Msg2SubWorld("DiÖu Nh ®· xuÊt hiÖn t¹i Ba L¨ng HuyÖn(220/200)")
--Msg2SubWorld("Tr¬ng T«ng ChÝnh ®· xuÊt hiÖn t¹i Ba L¨ng HuyÖn(204/190)")
--end
end
else
--SetGlbMissionV(90,0)
DelNpc(bosstieu1)
DelNpc(bosstieu2)
DelNpc(bosstieu3)
end
if gio >= 19 and gio <= 21 then
if phut == 0 then
--if GetGlbMissionV(90) == 0 then
map = SubWorldID2Idx(9)
bossdai1 = AddNpc(500,100,map,1721*32,3239*32)
SetNpcSeries(bossdai1,random(0,4))
IsBoss(bossdai1,2)
Msg2SubWorld("Gia LuËt TÞ Li ®· xuÊt hiÖn t¹i Sa M¹c II(215/201)")
map = SubWorldID2Idx(8)
bossdai2 = AddNpc(502,100,map,1569*32,3294*32)
SetNpcSeries(bossdai2,random(0,4))
IsBoss(bossdai2,2)
Msg2SubWorld("Cæ B¸ch ®· xuÊt hiÖn t¹i Sa M¹c I (195/205)")
bossdai3 = AddNpc(504,100,map,1398*32,3268*32)
SetNpcSeries(bossdai3,random(0,4))
IsBoss(bossdai3,2)
Msg2SubWorld("YÕn HiÓu Trai ®· xuÊt hiÖn t¹i Sa M¹c I (174/204)")
map = SubWorldID2Idx(8)
bossdai4 = AddNpc(503,100,map,1817*32,2813*32)
SetNpcSeries(bossdai4,random(0,4))
IsBoss(bossdai4,2)
Msg2SubWorld("TuyÒn C« Tö ®· xuÊt hiÖn t¹i M¹c Cao QuËt(226/175)")
map = SubWorldID2Idx(37)
bossdai5 = AddNpc(499,100,map,1399*32,3052*32)
SetNpcSeries(bossdai5,random(0,4))
IsBoss(bossdai5,2)
Msg2SubWorld("§¹o Th¹ch Ch©n Nh©n ®· xuÊt hiÖn t¹i T¬ng D¬ng(174/190)")
bossdai6 = AddNpc(501,100,map,1700*32,3355*32)
SetNpcSeries(bossdai6,random(0,4))
IsBoss(bossdai6,2)
Msg2SubWorld("Hµ Nh©n Ng· ®· xuÊt hiÖn t¹i T¬ng D¬ng(212/209)")
--map = SubWorldID2Idx(38)
--bossdai7 = AddNpc(506,100,map,1601*32,2819*32)
--SetNpcSeries(bossdai7,random(0,4))
--IsBoss(bossdai7,2)
--Msg2SubWorld("B¹ch Doanh Doanh ®· xuÊt hiÖn t¹i BiÖn Kinh(200/176)")
map = SubWorldID2Idx(36)
bossdai8 = AddNpc(507,100,map,1420*32,3270*32)
SetNpcSeries(bossdai8,random(0,4))
IsBoss(bossdai8,2)
Msg2SubWorld("Hµ Linh Phiªu ®· xuÊt hiÖn t¹i Phîng Têng(177/204)")
--map = SubWorldID2Idx(39)
-- bossdai9 = AddNpc(505,100,map,1550*32,3365*32)
-- SetNpcSeries(bossdai9,random(0,4))
-- IsBoss(bossdai9,2)
-- Msg2SubWorld("HuyÒn Gi¸c ®· xuÊt hiÖn t¹i D¬ng Ch©u(193/210)")
--SetGlbMissionV(90,1)
--else
---Msg2SubWorld("Gia Luat Ti Li tai Sa Mac II (215/201)")
--Msg2SubWorld("Co Bach da tai Sa Mac I (195/205)")
--Msg2SubWorld("Yen Hieu Trai tai Sa Mac I (174/204)")
--Msg2SubWorld("Tuyen Co Tu tai Mac Cao Quat (226/175)")
--Msg2SubWorld("Dao Thanh Chan Nhan tai Tuong Duong (174/190)")
-- Msg2SubWorld("Ha Nhan Nga tai Tuong Duong (212/209)")
--Msg2SubWorld("Bach Doanh Doanh tai Bien Kinh (200/176)")
-- Msg2SubWorld("Ha Linh Phieu tai Phuong Tuong (177/204)")
-- Msg2SubWorld("Huyen Giac Dai Su tai Duong Chau (193/210)")
--end
end
else
--SetGlbMissionV(90,0)
DelNpc(bossdai1)
DelNpc(bossdai2)
DelNpc(bossdai3)
DelNpc(bossdai4)
DelNpc(bossdai5)
DelNpc(bossdai6)
--DelNpc(bossdai7)
DelNpc(bossdai8)
--DelNpc(bossdai9)
end
endKhách viếng thăm hãy cùng TheHades xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!
-
Các thành viên gởi lời cảm ơn đến TheHades vì bài viết này !
mozillaa (18-09-12)
-
16-09-12, 04:46 PM #153
- Ngày tham gia
- Nov 2011
- Bài viết
- 164
- Thanks
- 23
- Thanked 138 Times in 16 Posts
Ðề: Share Sever Thehades Dev
Khách viếng thăm hãy cùng TheHades xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!
-
16-09-12, 05:15 PM #154
- Ngày tham gia
- Aug 2012
- Bài viết
- 49
- Thanks
- 11
- Thanked 2 Times in 2 Posts
Ðề: Share Sever Thehades Dev
[Only registered and activated users can see links. ]
[Only registered and activated users can see links. ][Only registered and activated users can see links. ]
giúp mình xóa cái này với nề , chơi offline mà kiểm tra làm gì , thank!!!!!!!!!!!!!!!!!
mà bạn Thehades Dev ơi, luôn tiện hỏi : đường dẫn nào vào ghi lệnh tạo npc addex... ấy . thankKhách viếng thăm hãy cùng loianhhua003 xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!
-
16-09-12, 05:21 PM #155
- Ngày tham gia
- Nov 2011
- Bài viết
- 164
- Thanks
- 23
- Thanked 138 Times in 16 Posts
Ðề: Share Sever Thehades Dev
bạn vào client -> config .Bạn share cái code của cái config qua cho mình với nhé (Rồi mình sẽ chỉ cách thấy skill 9x của CB Bỗng )
Còn cái kiểm tra bạn làm thế này nhé :
vào script kiếm file : gmscript.lua coyp đoạn code này vào
Include("\\script\\startup_remix.lua")
Include("\\script\\GetFaction.lua")
Include("\\script\\quanly.lua")
function logWrite(arg)
local fs_log = openfile(gm_Log, "a");
write(fs_log, date("%d-%m-%y_%H:%M:%S").."\t"..arg.."\n");
closefile(fs_log);
end;
idtaskruong = 43 ----- ID task ma ruong
idtasktempp = 37----- ID task luu ma ruong tam thoi
idtasktempp1 = 38 ---- ID Task so tang(floor)
idtasktempp2 = 39 ---- ID dieu kien lap mat khau va doi mat khau
a = 0
function main(sel)
if a == 0 then
a = 1
khoidong()
thongtinplay()
end
--if GetLevel() >= 120 then
-- if GetTask(17) < 1440 then
-- SetTimer(60*18,4)
-- end
--end
if GetTask(140) == 1 then
SetFightState(0)
SetTask(140,0)
end
if GetTask(141) == 1 then
SetFightState(0)
SetTask(141,0)
end
if GetTask(142) == 1 then
SetFightState(0)
SetTask(142,0)
end
if SAVEDATAKHILOGIN == 1 then
thongtinplay()
end
if MABAOMAT == 1 then
if GetLevel() >= LVDUOCDUNGMABAOMAT then
okok()
end
end
end
function okok()
if GetTask(206) == 1 then
Msg2Player("B¹n ®ang bÞ giam kh«ng thÓ sö dông chøc n¨ng nµy")
else
SetTaskTemp(19,3)
SetTaskTemp(idtasktempp,0)
SetTaskTemp(idtasktempp1,0)
SetTaskTemp(idtasktempp2,0)
Say("H·y lËp <color=yellow> M· b¶o vÖ <color> ®Ó tr¸ch bÞ mÊt ®å <enter>NÕu c¬ng quyÕt kh«ng thÝch lËp hËu qu¶ tù chÞu !\nNÕu kh«ng cã m· b¶o vÖ th× kh«ng vµo nh©n vËt ®îc",3,"NhËp m· b¶o vÖ./morp","§æi mËt khÈu./dmkp","Tho¸t./no")
end
end;
function thongtinplay()
end
function no()
SetTaskTemp(idtasktempp,0)
SetTaskTemp(idtasktempp1,0)
SetTaskTemp(idtasktempp2,0)
KickOutSelf()
end;
function morp()
SetTimer(60*18,4)
SetTimer(60*18,18)
SetTaskTemp(idtasktempp2,0)
SetTaskTemp(idtasktempp1,GetTaskTemp(idtasktempp1) +1)
Say("NÕu cha ®æi m· b¶o mËt, mËt khÈu mÆc ®Þnh sÏ lµ <color=yellow>000000<color>\nH·y nhËp sè thø <color=yellow>"..GetTaskTemp(idtasktempp1).."<colo r> trong mËt khÈu",11,"0/luupass","1/luupass","2/luupass","3/luupass","4/luupass","5/luupass","6/luupass","7/luupass","8/luupass","9/luupass","Tho¸t/no");
end
function dmkp()
SetTaskTemp(idtasktempp2,1)
SetTaskTemp(idtasktempp1,GetTaskTemp(idtasktempp1) +1)
Say("NÕu cha ®æi m· r¬ng, mËt khÈu mÆc ®Þnh sÏ lµ <color=yellow>000000<color>\nH·y nhËp sè thø <color=yellow>"..GetTaskTemp(idtasktempp1).."<colo r> trong mËt khÈu r¬ng cò",11,"0/luupass","1/luupass","2/luupass","3/luupass","4/luupass","5/luupass","6/luupass","7/luupass","8/luupass","9/luupass","Tho¸t/no");
end
function morp1()
local a,b,c,d,e,f = phantichpas(GetTask(idtaskruong))
local a1,b1,c1,d1,e1,f1 = phantichpas(GetTaskTemp(idtasktempp))
local tring1 = a..b..c..d..e..f -- chuoi ma ruong
local tring2 = a1..b1..c1..d1..e1..f1 -- chuoi ma ruong moi nhap(tuc thoi)
SetTaskTemp(idtasktempp,0)
SetTaskTemp(idtasktempp1,0)
SetTaskTemp(idtasktempp2,0)
if tring1 == tring2 then
Msg2Player("M· b¶o mËt chÝnh x¸c. B¹n cã thÓ ch¬i game ®îc råi")
SetRevPos(53,200*8,200*16)
Talk(1,"","C¸m ¬n b¹n ®· tham gia JXPO Team!");
else
Talk(1,"no","B¹n ®· nhËp sai m· b¶o mËt.\nNÕu quªn, h·y liªn hÖ GM ®Ó ®c hç trî !");
end
end
function dmkp1()
local a,b,c,d,e,f = phantichpas(GetTask(idtaskruong))
local a1,b1,c1,d1,e1,f1 = phantichpas(GetTaskTemp(idtasktempp))
local tring1 = a..b..c..d..e..f -- chuoi ma ruong
local tring2 = a1..b1..c1..d1..e1..f1 -- chuoi ma ruong moi nhap(tuc thoi)
SetTaskTemp(idtasktempp,0)
SetTaskTemp(idtasktempp1,0)
SetTaskTemp(idtasktempp2,0)
if tring1 == tring2 then
dmkp2()
else
Talk(1,"no","B¹n ®· nhËp sai m· b¶o mËt.\nNÕu quªn, h·y liªn hÖ GM ®Ó ®c hç trî !");
end
end
function dmkp2()
SetTaskTemp(idtasktempp2,2)
SetTaskTemp(idtasktempp1,GetTaskTemp(idtasktempp1) +1)
Say("ThiÕt lËp m· b¶o mËt míi\nH·y nhËp sè thø <color=yellow>"..GetTaskTemp(idtasktempp1).."<colo r> trong mËt khÈu r¬ng",11,"0/luupass","1/luupass","2/luupass","3/luupass","4/luupass","5/luupass","6/luupass","7/luupass","8/luupass","9/luupass","Tho¸t/no");
end
function dmkp3()
local a1,b1,c1,d1,e1,f1 = phantichpas(GetTaskTemp(idtasktempp))
local tring2 = a1..b1..c1..d1..e1..f1 -- chuoi ma ruong moi nhap(tuc thoi)
SetTask(idtaskruong,tonumber(tring2))
hoanthanh()
end
function luupass(sel)
local tang = GetTaskTemp(idtasktempp1)
if GetTaskTemp(idtasktempp2) == 0 then
if tang == 1 then
SetTaskTemp(idtasktempp,GetTaskTemp(idtasktempp)+s el*100000)
morp()
elseif tang == 2 then
SetTaskTemp(idtasktempp,GetTaskTemp(idtasktempp)+s el*10000)
morp()
elseif tang == 3 then
SetTaskTemp(idtasktempp,GetTaskTemp(idtasktempp)+s el*1000)
morp()
elseif tang == 4 then
SetTaskTemp(idtasktempp,GetTaskTemp(idtasktempp)+s el*100)
morp()
elseif tang == 5 then
SetTaskTemp(idtasktempp,GetTaskTemp(idtasktempp)+s el*10)
morp()
elseif tang == 6 then
SetTaskTemp(idtasktempp,GetTaskTemp(idtasktempp)+s el*1)
morp1()
else
no()
end
elseif GetTaskTemp(idtasktempp2) == 1 then
if tang == 1 then
SetTaskTemp(idtasktempp,GetTaskTemp(idtasktempp)+s el*100000)
dmkp()
elseif tang == 2 then
SetTaskTemp(idtasktempp,GetTaskTemp(idtasktempp)+s el*10000)
dmkp()
elseif tang == 3 then
SetTaskTemp(idtasktempp,GetTaskTemp(idtasktempp)+s el*1000)
dmkp()
elseif tang == 4 then
SetTaskTemp(idtasktempp,GetTaskTemp(idtasktempp)+s el*100)
dmkp()
elseif tang == 5 then
SetTaskTemp(idtasktempp,GetTaskTemp(idtasktempp)+s el*10)
dmkp()
elseif tang == 6 then
SetTaskTemp(idtasktempp,GetTaskTemp(idtasktempp)+s el*1)
dmkp1()
else
no()
end
elseif GetTaskTemp(idtasktempp2) == 2 then
if tang == 1 then
SetTaskTemp(idtasktempp,GetTaskTemp(idtasktempp)+s el*100000)
dmkp2()
elseif tang == 2 then
SetTaskTemp(idtasktempp,GetTaskTemp(idtasktempp)+s el*10000)
dmkp2()
elseif tang == 3 then
SetTaskTemp(idtasktempp,GetTaskTemp(idtasktempp)+s el*1000)
dmkp2()
elseif tang == 4 then
SetTaskTemp(idtasktempp,GetTaskTemp(idtasktempp)+s el*100)
dmkp2()
elseif tang == 5 then
SetTaskTemp(idtasktempp,GetTaskTemp(idtasktempp)+s el*10)
dmkp2()
elseif tang == 6 then
SetTaskTemp(idtasktempp,GetTaskTemp(idtasktempp)+s el*1)
dmkp3()
else
no()
end
end
end
function hoanthanh()
local a,b,c,d,e,f = phantichpas(GetTask(idtaskruong))
danh_sach_ma[getn(danh_sach_ma)+1] = {GetName(),a..b..c..d..e..f} --Name,MaRuong
local danhsachma = TaoBang(danh_sach_ma,"danh_sach_ma","")
SaveData("dulieu/mabaomat.lua",danhsachma)
Talk(1,"no","M· b¶o mËt míi : "..a..b..c..d..e..f.."")
end
function phantichpas(task) --- ham by chicken
--local x,len,a,b,c,d,e,f = GetTask(task),0,0,0,0,0,0,0
local x,len = task,0
local a,b,c,d,e,f = 0,0,0,0,0,0
x = tostring(x)
len = strlen(x)
if len < 6 then
for i=1,(6-len) do
x = "0"..x
end
end
a = tonumber(strsub(x,1,1))
b = tonumber(strsub(x,2,2))
c = tonumber(strsub(x,3,3))
d = tonumber(strsub(x,4,4))
e = tonumber(strsub(x,5,5))
f = tonumber(strsub(x,6,6))
return a,b,c,d,e,f
end
Include("\\script\\startup_remix.lua")
Include("\\script\\source\\sourcejx49.lua")
Include("\\script\\source\\antihack.lua")
a = 0
function main(sel)
if a == 0 then
a = 1
khoidong()
anticheatnv()
else
anticheatnv()
end
endKhách viếng thăm hãy cùng TheHades xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!
-
16-09-12, 05:27 PM #156
- Ngày tham gia
- Aug 2012
- Bài viết
- 143
- Thanks
- 19
- Thanked 13 Times in 11 Posts
Ðề: Share Sever Thehades Dev
Chũ thớt ơi update mới ko có hiển thỉ gì hết làm sao đây chủ thớt
Khách viếng thăm hãy cùngthienphuc072xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!
-
16-09-12, 05:28 PM #157
- Ngày tham gia
- Nov 2011
- Bài viết
- 164
- Thanks
- 23
- Thanked 138 Times in 16 Posts
Ðề: Share Sever Thehades Dev
Khách viếng thăm hãy cùng TheHades xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!
-
16-09-12, 05:31 PM #158
- Ngày tham gia
- Aug 2012
- Bài viết
- 49
- Thanks
- 11
- Thanked 2 Times in 2 Posts
Ðề: Share Sever Thehades Dev
Khách viếng thăm hãy cùng loianhhua003 xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!
-
16-09-12, 05:35 PM #159
- Ngày tham gia
- Aug 2012
- Bài viết
- 143
- Thanks
- 19
- Thanked 13 Times in 11 Posts
Ðề: Share Sever Thehades Dev
Khách viếng thăm hãy cùngthienphuc072xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!
-
17-09-12, 12:04 AM #160
- Ngày tham gia
- Jan 2009
- Bài viết
- 308
- Thanks
- 262
- Thanked 110 Times in 58 Posts
Ðề: Share Sever Thehades Dev
Cám ơn chủ topic nhá
hok biết là server bạn có tính năng hiển thị Tiền Vạn, điểm phúc duyên, danh vọng, Pk, trùng sinh ở trang F3 không nhỉ ?Khách viếng thăm hãy cùng tieudieuphong xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!
Các Chủ đề tương tự
-
[Share] Tất cả những Sever gì mình có và đã từng cài
Bởi blackcatyb trong diễn đàn Các Server Không Nằm Trong BoxTrả lời: 58Bài viết cuối: 27-02-15, 08:42 PM -
Ngọa Long sever private hoặc share sever cài offline
Bởi minlai1 trong diễn đàn Hỏi Đáp/ Yêu CầuTrả lời: 5Bài viết cuối: 29-07-14, 10:33 AM -
[KT] Share Sever Kiếm Thế Mới
Bởi kelly trong diễn đàn ReleasesTrả lời: 51Bài viết cuối: 23-05-12, 09:01 PM