Kết quả 91 đến 100 của 245
Chủ đề: CTC Team Dev Presents
-
29-04-12, 05:05 PM #91
- Ngày tham gia
- Oct 2011
- Đang ở
- https://t.me*********
- Bài viết
- 222
- Thanks
- 91
- Thanked 41 Times in 17 Posts
Ðề: CTC Team Dev Presents
Bạn bik làm cái % ép nguyên liệu hoàng kim không
nếu dc nhờ bạn làm 1 bản update về cái ép nguyên liệu % với tỉ lệ là 20%Khách viếng thăm hãy cùngBybaybongxây dựng diễn đàn CLBGAMESVN vững mạnh nhé!
-
29-04-12, 05:50 PM #92
- Ngày tham gia
- Aug 2010
- Bài viết
- 772
- Thanks
- 277
- Thanked 423 Times in 91 Posts
Ðề: CTC Team Dev Presents
Rogue bắt đầu với server mới đi :->
Khách viếng thăm hãy cùng quangken 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 quangken vì bài viết này !
Rogue (29-04-12)
-
29-04-12, 06:01 PM #93
- Ngày tham gia
- Jul 2011
- Bài viết
- 163
- Thanks
- 260
- Thanked 39 Times in 18 Posts
Ðề: CTC Team Dev Presents
Khách viếng thăm hãy cùng kakalot1 xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!
-
29-04-12, 06:09 PM #94
Ðề: CTC Team Dev Presents
Khách viếng thăm hãy cùng assaa 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 assaa vì bài viết này !
kakalot1 (29-04-12)
-
29-04-12, 08:31 PM #95
- Ngày tham gia
- Oct 2011
- Đang ở
- https://t.me*********
- Bài viết
- 222
- Thanks
- 91
- Thanked 41 Times in 17 Posts
Ðề: CTC Team Dev Presents
ai dev dùm chức năng ép đồ hoàng kim có % với
Khách viếng thăm hãy cùngBybaybongxây dựng diễn đàn CLBGAMESVN vững mạnh nhé!
-
29-04-12, 09:57 PM #96
- Ngày tham gia
- Jun 2007
- Bài viết
- 230
- Thanks
- 33
- Thanked 21 Times in 11 Posts
Ðề: CTC Team Dev Presents
Mình cần hướng dẫn để đi vượt ải một mình với server này.... mình đã thử làm theo giống trong hướng dẫn ở bên topic về server quà tết của jxvietnam nhưng vẫn không được... Server đã bỏ qua check số người trong tổ đội, nhưng vẫn yêu cầu người chơi phải tự tạo tổ đội mới được phép vượt ái, đến khi tạo được tổ đội rồi, thì lại báo lỗi không phải đội trưởng... chẳng hiểu lỗi ở chỗ nào nữa.
Đây là script mình sửa để đi vượt ải 1 mình.
Đầu tiên là file sugia.lua
Code:--Author: KingMax --Script Vuot Ai Lien hoan Include("\\script\\source\\sourcejx49.lua") Include("\\script\\lib\\thuvien.lua") SATTHULENH = 151 SOTODOICHOPHEP = 1 quai = {} function main() ngay = tonumber(date("%d")) gio = tonumber(date("%H")) phut = tonumber(date("%M")) giay = tonumber(date("%S")) --if GetName() == "TESTER_VUOTAI" then --NewWorld(26,196*8,201*16) --SetTaskTemp(25,1) --SetFightState(0) --elseif GetName() == "TESTER_VUOTAI2" then --NewWorld(27,196*8,201*16) --SetTaskTemp(26,1) --SetFightState(0) --else if gio == 1 or gio == 3 or gio == 7 or gio == 9 or gio == 11 or gio == 13 or gio == 15 or gio == 17 or gio == 19 or gio == 21 or gio == 23 and phut >= 45 then bdvuotai() else vuotaichuatoi() end end --end; function vuotaichuatoi() Say("<color=green>Sö gi¶ Vît ¶i<color>: C¸c h¹ gÆp ta cã chuyÖn g× nhê v¶ ch¨ng",5, "T×m hiÓu thêi gian vît ¶i/xemtime", "§iÒu kiÖn vît ¶i/xemtime", "Xem thêi gian cßn l¹i/xemtime", "T×m hiÓu phÇn thëng/xemtime", "Tho¸t/no") end function xemtime(nsel) gio = tonumber(date("%H")) phut = tonumber(date("%M")) giay = tonumber(date("%S")) i = nsel+1 if i == 1 then Talk(3,"","<color=red>B¸o danh<color>: 1h45, 3h45, 7h45, 9h45, 11h45, 13h45, 15h45, 17h45, 19h45, 21h45, 23h45", "<color=red>B¾t ®Çu<color>: 2h00, 4h00, 6h00, 8h00, 10h00, 12h00, 14h00,16h00, 18h00, 20h00, 22h00, 24h00", "Mçi trËn kÐo dµi <color=red>45 phót<color>. Thêi gian b¸o danh ®Õn khi b¾t ®Çu lµ <color=red>15 phót") elseif i == 2 then Talk(3,"","Tæ ®éi cã <color=red>6<color> thµnh viªn trë lªn, §¼ng cÊp yªu cÇu <color=red>80<color> trë lªn", "Trëng nhãm ph¶i mang theo <color=red>5<color> s¸t thñ gi¶n", "Trong nhãm kh«ng cã ai ®· tõng ®i vuît ¶i 1 lÇn trong ngµy") elseif i == 3 then if gio == 1 or gio == 3 or gio == 5 or gio == 7 or gio == 9 or gio == 11 or gio == 13 or gio == 15 or gio == 17 or gio == 19 or gio == 21 or gio == 23 then a = 44-phut b = 60-giay Talk(1,"","Thêi gian vît ¶i cßn: <color=red>"..a.."<color> phót <color=red>"..b.."<color> gi©y") else a = 60-phut b = 60-giay Talk(1,"","Thêi gian vît ¶i cßn: <color=red>1<color> giê <color=red>"..a.."<color> phót <color=red>"..b.."<color> gi©y") end elseif i == 4 then Talk(3,"","§¸nh qu¸i vît ¶i nhËn ®îc <color=red>50.000<color> kinh nghiÖm. X¸c suÊt thÊp nhËn ®îc <color=cyan>HuyÒn tinh", "Qua 1 ¶i sÏ nhËn ®îc kh¸ nhiÒu kinh nghiÖm + 30% nhËn ®îc <color=cyan>HuyÒn tinh", "Vît hÕt ¶i thø 18 sÏ nhËn ®îc <color=red>10.000.000<color> kinh nghiÖm vµ 1 <color=cyan>Hép lÔ vËt vît ¶i") end end function bdvuotai() if GetGlbMissionV(38) == 0 then Say("<color=green>Sö gi¶ Vît ¶i<color>: C¸c h¹ gÆp ta cã chuyÖn g× nhê v· ch¨ng",2, "Tham gia Vît ¶i./tmctddva", "Tho¸t./no") else Talk(1,"","<color=green>Sö gi¶ Vît ¶i<color>: §· cã 1 tæ ®é kh¸c vµo tríc nhãm b¹n") end end function tmctddva() if GetGlbMissionV(38) == 0 then if GetTeam() ~= nil then if GetTeamSize() >= 0 then if IsCaptain() == 1 then Say("<color=green>Sö gi¶ Vît ¶i<color>: Vît ¶i sÏ cÇn cã <color=red>5 S¸t thñ gi¶n<color> vµ tÊt c¶ thµnh viªn level trªn <color=red>80<color>. H·y t×m nhanh ®i !",2, "Ta ®· chuÈn bÞ ®ñ/tmctddva1", "§Ó ta t×m nã/no") else Talk(1,"","Ng¬i kh«ng ph¶i lµ<color=red> trëng nhãm<color>, kh«ng thÓ ®a tæ ®éi ®i") end else Talk(1,"","Tæ ®éi ph¶i cã <color=red>6 ngêi trë lªn<color> h·y t×m thªm ngêi råi ®Õn gÆp ta") end else Talk(1,"","Ng¬i cÇn ph¶i cã <color=red>tæ ®éi<color>, h·y t×m cho m×nh mét tæ ®éi råi ®Õn gÆp ta") end else Talk(1,"","<color=green>Sö gi¶ Vît ¶i<color>: §· cã mét tæ ®éi kh¸c vµo tríc nhãm b¹n") end end function tinhngay() ngay = tonumber(date("%d")) thang = tonumber(date("%m")) tinhngay1 = 0 for k=1,getn(mang) do if thang > mang[k][1] then tinhngay1 = tinhngay1 + mang[k][2] end end tinhngay1 = tinhngay1 + ngay return tinhngay1 end mang = { {1,31}, {2,28}, {3,31}, {4,30}, {5,31}, {6,30}, {7,31}, {8,31}, {9,30}, {10,31}, {11,30}, {12,31}, } function tmctddva1() ngay = tonumber(date("%d")) gio = tonumber(date("%H")) phut = tonumber(date("%M")) giay = tonumber(date("%S")) thoigianhide = (60-phut)*(60-giay)*18 if GetGlbMissionV(38) == 0 then idtd = GetTeam() name = GetName() if (idtd ~= nil) then if (GetTeamSize() >= 0) then if (IsCaptain() == 1) then yc = 0 idbt = PlayerIndex for i=1,1000 do PlayerIndex = i if (GetTeam() == idtd) then if (GetTask(185) == tinhngay()) then yc = 1 end end end PlayerIndex = idbt if (yc == 0) then if (GetItemCount(131) >= 5) then DelItem(131) DelItem(131) DelItem(131) DelItem(131) DelItem(131) idbt = PlayerIndex SetGlbMissionV(38,1) a = 60-phut DelNpc(boss5) DelNpc(boss1) for i=1,50 do DelNpc(quai[i]) ai = SubWorldID2Idx(26) bossid = random(529,533) bosslvl = 99 posx = toadomap[i][1] * 32 posy = toadomap[i][2] * 32 quai[i]=AddNpc(bossid,bosslvl,ai,posx,posy) SetNpcScript(quai[i], "\\script\\vuotai\\sugia.lua") HideNpc(quai[i],thoigianhide) end Msg2SubWorld("Nhãm cña "..name.." ®· ®¨ng ký Vît ¶i - T¬ng D¬ng thµnh c«ng!") for k=1,1000 do PlayerIndex = k if (GetTeam() == idtd) then SetTaskTemp(25,1) SetPunish(0) SetFightState(0) SetRevPos(19); SetGlbMissionV(41,0) SetGlbMissionV(40,0) SetGlbMissionV(39,0) SetTempRevPos(53,200*8*32,200*16*32); SetLogoutRV(1) toadox = 1569 - 8 + random(0,16) toadoy = 3217 - 16 + random(0,32) SetGlbMissionV(38,1) SetTask(185,tinhngay()) SetDeathScript("\\script\\vuotai\\playerdie.lua"); NewWorld(26, toadox, toadoy); AddGlobalCountNews("Nhãm cña "..name.." ®· ®¨ng ký Vît ¶i thµnh c«ng !",1) Msg2Player("B¹n vµ tæ ®éi ®· vµo khu vùc b¸o danh vît ¶i!"); Msg2Player("Tr¹ng th¸i hiÖn t¹i: LuyÖn c«ng") Msg2Player("Cßn "..a.." phót n÷a trÈn chiÕn sÏ b¾t ®Çu!!") end end else Talk(1,"no","Ng¬i kh«ng cã ®ñ 5 <color=red>S¸t thñ gi¶n<color> kh«ng thÓ ®a tæ ®éi ®i") end else Talk(1,"no","Trong tæ ®éi ®· cã thµnh viªn ®i Vît ¶i 1 lÇn trong ngµy råi. H·y chän ngêi kh¸c ®i") end else Talk(1,"no","Ng¬i kh«ng ph¶i lµ <color=red>Trëng nhãm,<color> kh«ng thÓ ®a tæ ®éi ®i") end else Talk(1,"no","Tæ ®éi ph¶i cã <color=red>6 ngêi trë lªn,<color> ng¬i h·y t×m thªm ngêi råi ®Õn gÆp ta") end else Talk(1,"no","Ng¬i cÇn ph¶i cã <color=red>tæ ®éi,<color> h·y t×m cho m×nh tæ ®éi råi ®Õn gÆp ta") end else Talk(1,"","<color=green>Sö gi¶ Vît ¶i<color>: §· cã mét tæ ®éi kh¸c vµo tríc nhãm b¹n") end end; function no() end; toadomap = { {1569,3194}, {1572,3197}, {1576,3205}, {1579,3206}, {1577,3200}, {1572,3214}, {1569,3207}, {1561,3206}, {1559,3201}, {1557,3205}, {1554,3212}, {1550,3209}, {1545,3220}, {1540,3223}, {1537,3222}, {1537,3227}, {1540,3239}, {1545,3239}, {1551,3247}, {1555,3250}, {1560,3253}, {1565,3256}, {1577,3265}, {1583,3263}, {1581,3259}, {1576,3272}, {1572,3251}, {1572,3245}, {1578,3242}, {1580,3235}, {1588,3231}, {1587,3224}, {1574,3241}, {1585,3238}, {1585,3233}, {1589,3232}, {1584,3223}, {1573,3207}, {1571,3199}, {1569,3190}, {1578,3214}, {1569,3210}, {1568,3201}, {1563,3228}, {1558,3227}, {1551,3217}, {1553,3211}, {1553,3241}, {1548,3235}, {1569,3237} } function quaai() w,X,Y = GetWorldPos() for q=1,1000 do PlayerIndex = q if GetTaskTemp(25) == 1 then Msg2Player("Nhãm cña b¹n ®· vît qua ¶i thø : "..GetGlbMissionV(41).." - "..mangten[GetGlbMissionV(41)][2].."") if GetGlbMissionV(39) ~= 0 then Msg2Player("Boss "..mangboss[GetGlbMissionV(39)][2].." xuÊt hiÖn. H·y tiªu diÖt nhanh!!!") end a = GetGlbMissionV(41) AddRepute(1) Msg2Player("B¹n nhËn ®îc 1 ®iÓm danh väng ") b = a*mangexp[level()][2] AddOwnExp(b) Msg2Player("B¹n nhËn ®îc "..b.." Kinh nghiÖm") s = random(1,3) if s == 2 then AddEventItem(random(4,5)) Msg2Player("B¹n nhËn ®îc 1 viªn HuyÒn tinh") end end end end mangexp = { {1,150000}, {2,200000}, {3,250000}, {4,300000}, {5,500000}, {6,800000}, {7,1000000} } function level() if GetLevel() < 100 then return 1 elseif GetLevel() >= 100 and GetLevel() < 110 then return 2 elseif GetLevel() >= 110 and GetLevel() < 120 then return 3 elseif GetLevel() >= 120 and GetLevel() < 130 then return 4 elseif GetLevel() >= 130 and GetLevel() < 140 then return 5 elseif GetLevel() >= 140 and GetLevel() < 150 then return 6 elseif GetLevel() >= 150 then return 7 else return 1 end end mangboss = { {1,"Thñ lÜnh ¶i - HÖ Kim"}, {2,"Thñ lÜnh ¶i - HÖ Méc"}, {3,"Thñ lÜnh ¶i - HÖ Thuû"}, {4,"Thñ lÜnh ¶i - HÖ Ho¶"}, {5,"Thñ lÜnh ¶i - HÖ Thæ"}, {6,"Thñ lÜnh ¶i - Cao CÊp"}, {7,"Thñ lÜnh ¶i - Cao CÊp"}, {8,"Thñ lÜnh ¶i - Cao CÊp"}, } mangten = { {1,"Qu¸i Nh©n Thêng"}, {2,"Qu¸i Nh©n Thêng"}, {3,"Qu¸i Nh©n Thêng"}, {4,"Qu¸i Nh©n Thêng"}, {5,"Qu¸i Nh©n HÖ Kim"}, {6,"Qu¸i Nh©n HÖ Méc"}, {7,"Qu¸i Nh©n HÖ Thuû"}, {8,"Qu¸i Nh©n HÖ Ho¶"}, {9,"Qu¸i Nh©n HÖ Thæ"}, {10,"Qu¸i Buff Bïa Gi¶m Kh¸ng"}, {11,"Qu¸i Buff Gi¶m Tèc §é"}, {12,"Qu¸i Buff Cho¸ng"}, {13,"Qu¸i HÖ Kim CÊp Cao"}, {14,"Qu¸i HÖ Méc - Thuû CÊp Cao"}, {15,"Qu¸i HÖ Ho¶ - Thæ CÊp Cao"}, {16,"Qu¸i Ph¶n Dame"}, {17,"Boss NhiÕp ThÝ TrÇn"} } function OnDeath() w,X,Y = GetWorldPos() if GetGlbMissionV(40) == 49 then for i=1,50 do DelNpc(quai[i]) ai = SubWorldID2Idx(26) bossid = random(529,533) bosslvl = 99 posx = toadomap[i][1] * 32 posy = toadomap[i][2] * 32 quai[i]=AddNpc(bossid,bosslvl,ai,posx,posy) SetNpcScript(quai[i], "\\script\\vuotai\\sugia.lua") end SetGlbMissionV(41,1) quaai() elseif GetGlbMissionV(40) == 99 then for i=1,50 do DelNpc(quai[i]) ai = SubWorldID2Idx(26) bossid = random(529,533) bosslvl = 99 posx = toadomap[i][1] * 32 posy = toadomap[i][2] * 32 quai[i]=AddNpc(bossid,bosslvl,ai,posx,posy) SetNpcScript(quai[i], "\\script\\vuotai\\sugia.lua") end SetGlbMissionV(41,2) quaai() elseif GetGlbMissionV(40) == 149 then for i=1,50 do DelNpc(quai[i]) ai = SubWorldID2Idx(26) bossid = random(529,533) bosslvl = 99 posx = toadomap[i][1] * 32 posy = toadomap[i][2] * 32 quai[i]=AddNpc(bossid,bosslvl,ai,posx,posy) SetNpcScript(quai[i], "\\script\\vuotai\\sugia.lua") end SetGlbMissionV(41,3) quaai() elseif GetGlbMissionV(40) == 199 then for i=1,50 do DelNpc(quai[i]) ai = SubWorldID2Idx(26) bossid = random(529,533) bosslvl = 99 posx = toadomap[i][1] * 32 posy = toadomap[i][2] * 32 quai[i]=AddNpc(bossid,bosslvl,ai,posx,posy) SetNpcScript(quai[i], "\\script\\vuotai\\sugia.lua") end SetGlbMissionV(41,4) quaai() elseif GetGlbMissionV(40) == 249 then for i=1,50 do DelNpc(quai[i]) ai = SubWorldID2Idx(26) bossid = random(534,538) bosslvl = 99 posx = toadomap[i][1] * 32 posy = toadomap[i][2] * 32 quai[i]=AddNpc(bossid,bosslvl,ai,posx,posy) SetNpcScript(quai[i], "\\script\\vuotai\\sugia.lua") end SetGlbMissionV(40,250) ai = SubWorldID2Idx(26) boss1=AddNpc(594,99,ai,196*8*32,201*16*32) IsBoss(boss1,2) SetNpcScript(boss1, "\\script\\vuotai\\boss1.lua") dem = 0 for i=1,1000 do PlayerIndex =i if GetTaskTemp(25) == 1 then dem = dem + 1 end end id_chon = random(1,dem) dem = 0 for i=1,1000 do PlayerIndex =i if GetTaskTemp(25) == 1 then dem = dem + 1 if dem == id_chon then SetNpcName(boss1,GetName()) break end end end SetGlbMissionV(39,1) SetGlbMissionV(41,5) quaai() elseif GetGlbMissionV(40) == 299 then for i=1,50 do DelNpc(quai[i]) ai = SubWorldID2Idx(26) bossid = random(539,543) bosslvl = 99 posx = toadomap[i][1] * 32 posy = toadomap[i][2] * 32 quai[i]=AddNpc(bossid,bosslvl,ai,posx,posy) SetNpcScript(quai[i], "\\script\\vuotai\\sugia.lua") end SetGlbMissionV(40,300) ai = SubWorldID2Idx(26) boss1=AddNpc(595,99,ai,196*8*32,201*16*32) IsBoss(boss1,2) SetNpcScript(boss1, "\\script\\vuotai\\boss1.lua") dem = 0 for i=1,1000 do PlayerIndex =i if GetTaskTemp(25) == 1 then dem = dem + 1 end end id_chon = random(1,dem) dem = 0 for i=1,1000 do PlayerIndex =i if GetTaskTemp(25) == 1 then dem = dem + 1 if dem == id_chon then SetNpcName(boss1,GetName()) break end end end SetGlbMissionV(39,2) SetGlbMissionV(41,6) quaai() elseif GetGlbMissionV(40) == 349 then for i=1,50 do DelNpc(quai[i]) ai = SubWorldID2Idx(26) bossid = random(544,548) bosslvl = 99 posx = toadomap[i][1] * 32 posy = toadomap[i][2] * 32 quai[i]=AddNpc(bossid,bosslvl,ai,posx,posy) SetNpcScript(quai[i], "\\script\\vuotai\\sugia.lua") end SetGlbMissionV(40,350) ai = SubWorldID2Idx(26) boss1=AddNpc(596,99,ai,196*8*32,201*16*32) IsBoss(boss1,2) SetNpcScript(boss1, "\\script\\vuotai\\boss1.lua") dem = 0 for i=1,1000 do PlayerIndex =i if GetTaskTemp(25) == 1 then dem = dem + 1 end end id_chon = random(1,dem) dem = 0 for i=1,1000 do PlayerIndex =i if GetTaskTemp(25) == 1 then dem = dem + 1 if dem == id_chon then SetNpcName(boss1,GetName()) break end end end SetGlbMissionV(39,3) SetGlbMissionV(41,7) quaai() elseif GetGlbMissionV(40) == 399 then for i=1,50 do DelNpc(quai[i]) ai = SubWorldID2Idx(26) bossid = random(549,553) bosslvl = 99 posx = toadomap[i][1] * 32 posy = toadomap[i][2] * 32 quai[i]=AddNpc(bossid,bosslvl,ai,posx,posy) SetNpcScript(quai[i], "\\script\\vuotai\\sugia.lua") end SetGlbMissionV(40,400) ai = SubWorldID2Idx(26) boss1=AddNpc(597,99,ai,196*8*32,201*16*32) IsBoss(boss1,2) SetNpcScript(boss1, "\\script\\vuotai\\boss1.lua") dem = 0 for i=1,1000 do PlayerIndex =i if GetTaskTemp(25) == 1 then dem = dem + 1 end end id_chon = random(1,dem) dem = 0 for i=1,1000 do PlayerIndex =i if GetTaskTemp(25) == 1 then dem = dem + 1 if dem == id_chon then SetNpcName(boss1,GetName()) break end end end SetGlbMissionV(39,4) SetGlbMissionV(41,8) quaai() elseif GetGlbMissionV(40) == 449 then for i=1,50 do DelNpc(quai[i]) ai = SubWorldID2Idx(26) bossid = random(554,558) bosslvl = 99 posx = toadomap[i][1] * 32 posy = toadomap[i][2] * 32 quai[i]=AddNpc(bossid,bosslvl,ai,posx,posy) SetNpcScript(quai[i], "\\script\\vuotai\\sugia.lua") end SetGlbMissionV(40,450) ai = SubWorldID2Idx(26) boss1=AddNpc(598,99,ai,196*8*32,201*16*32) IsBoss(boss1,2) SetNpcScript(boss1, "\\script\\vuotai\\boss1.lua") dem = 0 for i=1,1000 do PlayerIndex =i if GetTaskTemp(25) == 1 then dem = dem + 1 end end id_chon = random(1,dem) dem = 0 for i=1,1000 do PlayerIndex =i if GetTaskTemp(25) == 1 then dem = dem + 1 if dem == id_chon then SetNpcName(boss1,GetName()) break end end end SetGlbMissionV(39,5) SetGlbMissionV(41,9) quaai() elseif GetGlbMissionV(40) == 499 then for i=1,50 do DelNpc(quai[i]) ai = SubWorldID2Idx(26) bossid = random(559,563) bosslvl = 99 posx = toadomap[i][1] * 32 posy = toadomap[i][2] * 32 quai[i]=AddNpc(bossid,bosslvl,ai,posx,posy) SetNpcScript(quai[i], "\\script\\vuotai\\sugia.lua") end SetGlbMissionV(41,10) quaai() elseif GetGlbMissionV(40) == 549 then for i=1,50 do DelNpc(quai[i]) ai = SubWorldID2Idx(26) bossid = random(564,568) bosslvl = 99 posx = toadomap[i][1] * 32 posy = toadomap[i][2] * 32 quai[i]=AddNpc(bossid,bosslvl,ai,posx,posy) SetNpcScript(quai[i], "\\script\\vuotai\\sugia.lua") end SetGlbMissionV(41,11) quaai() elseif GetGlbMissionV(40) == 599 then for i=1,50 do DelNpc(quai[i]) ai = SubWorldID2Idx(26) bossid = random(569,573) bosslvl = 99 posx = toadomap[i][1] * 32 posy = toadomap[i][2] * 32 quai[i]=AddNpc(bossid,bosslvl,ai,posx,posy) SetNpcScript(quai[i], "\\script\\vuotai\\sugia.lua") end SetGlbMissionV(41,12) quaai() elseif GetGlbMissionV(40) == 649 then for i=1,50 do DelNpc(quai[i]) ai = SubWorldID2Idx(26) bossid = random(574,578) bosslvl = 99 posx = toadomap[i][1] * 32 posy = toadomap[i][2] * 32 quai[i]=AddNpc(bossid,bosslvl,ai,posx,posy) SetNpcScript(quai[i], "\\script\\vuotai\\sugia.lua") end ai = SubWorldID2Idx(26) SetGlbMissionV(40,650) ai = SubWorldID2Idx(26) boss1=AddNpc(599,99,ai,196*8*32,201*16*32) IsBoss(boss1,2) SetNpcScript(boss1, "\\script\\vuotai\\boss1.lua") dem = 0 for i=1,1000 do PlayerIndex =i if GetTaskTemp(25) == 1 then dem = dem + 1 end end id_chon = random(1,dem) dem = 0 for i=1,1000 do PlayerIndex =i if GetTaskTemp(25) == 1 then dem = dem + 1 if dem == id_chon then SetNpcName(boss1,GetName()) break end end end SetGlbMissionV(39,6) SetGlbMissionV(41,13) quaai() elseif GetGlbMissionV(40) == 699 then for i=1,50 do DelNpc(quai[i]) ai = SubWorldID2Idx(26) bossid = random(579,583) bosslvl = 99 posx = toadomap[i][1] * 32 posy = toadomap[i][2] * 32 quai[i]=AddNpc(bossid,bosslvl,ai,posx,posy) SetNpcScript(quai[i], "\\script\\vuotai\\sugia.lua") end ai = SubWorldID2Idx(26) SetGlbMissionV(40,700) ai = SubWorldID2Idx(26) boss1=AddNpc(random(600,601),99,ai,196*8*32,201*16*32) IsBoss(boss1,2) SetNpcScript(boss1, "\\script\\vuotai\\boss1.lua") dem = 0 for i=1,1000 do PlayerIndex =i if GetTaskTemp(25) == 1 then dem = dem + 1 end end id_chon = random(1,dem) dem = 0 for i=1,1000 do PlayerIndex =i if GetTaskTemp(25) == 1 then dem = dem + 1 if dem == id_chon then SetNpcName(boss1,GetName()) break end end end SetGlbMissionV(39,7) SetGlbMissionV(41,14) quaai() elseif GetGlbMissionV(40) == 749 then for i=1,50 do DelNpc(quai[i]) ai = SubWorldID2Idx(26) bossid = random(584,588) bosslvl = 99 posx = toadomap[i][1] * 32 posy = toadomap[i][2] * 32 quai[i]=AddNpc(bossid,bosslvl,ai,posx,posy) SetNpcScript(quai[i], "\\script\\vuotai\\sugia.lua") end ai = SubWorldID2Idx(26) SetGlbMissionV(40,750) ai = SubWorldID2Idx(26) boss1=AddNpc(random(602,603),99,ai,196*8*32,201*16*32) IsBoss(boss1,2) SetNpcScript(boss1, "\\script\\vuotai\\boss1.lua") dem = 0 for i=1,1000 do PlayerIndex =i if GetTaskTemp(25) == 1 then dem = dem + 1 end end id_chon = random(1,dem) dem = 0 for i=1,1000 do PlayerIndex =i if GetTaskTemp(25) == 1 then dem = dem + 1 if dem == id_chon then SetNpcName(boss1,GetName()) break end end end SetGlbMissionV(39,8) SetGlbMissionV(41,15) quaai() elseif GetGlbMissionV(40) == 799 then for i=1,50 do DelNpc(quai[i]) ai = SubWorldID2Idx(26) bossid = random(589,593) bosslvl = 99 posx = toadomap[i][1] * 32 posy = toadomap[i][2] * 32 quai[i]=AddNpc(bossid,bosslvl,ai,posx,posy) SetNpcScript(quai[i], "\\script\\vuotai\\sugia.lua") end SetGlbMissionV(41,16) quaai() elseif GetGlbMissionV(40) == 805 then for i=1,50 do DelNpc(quai[i]) ai = SubWorldID2Idx(26) bossid = random(529,533) bosslvl = 99 posx = toadomap[i][1] * 32 posy = toadomap[i][2] * 32 quai[i]=AddNpc(bossid,bosslvl,ai,posx,posy) SetNpcScript(quai[i], "\\script\\vuotai\\sugia.lua") end ai = SubWorldID2Idx(26) bossid = random(604,613) bosslvl = 99 posx = 196*8 * 32 posy = 201*16 * 32 boss5=AddNpc(bossid,bosslvl,ai,posx,posy) SetNpcScript(boss5, "\\script\\vuotai\\boss5.lua") IsBoss(boss1,2) SetGlbMissionV(41,17) quaai() Msg2Player("Boss NhiÕp ThÝ TrÇn XuÊt HiÖn !!!!!") end if GetGlbMissionV(39) == 0 then SetGlbMissionV(40,GetGlbMissionV(40)+1) end end;
Code:--Author: KingMax --Script Vuot Ai Lien hoan Include("\\script\\Global\\sourcejx49.lua") Include("\\script\\lib\\thuvien.lua") SATTHULENH = 151 SOTODOICHOPHEP = 1 quai2 = {} function main() ngay = tonumber(date("%d")) gio = tonumber(date("%H")) phut = tonumber(date("%M")) giay = tonumber(date("%S")) if GetName() == "TESTER_VUOTAI" then NewWorld(26,196*8,201*16) SetTaskTemp(25,1) SetFightState(0) elseif GetName() == "TESTER_VUOTAI2" then NewWorld(27,196*8,201*16) SetTaskTemp(26,1) SetFightState(0) else if gio == 1 or gio == 3 or gio == 7 or gio == 9 or gio == 11 or gio == 13 or gio == 15 or gio == 17 or gio == 19 or gio == 21 or gio == 23 and phut >= 45 then bdvuotai() else vuotaichuatoi() end end end; function vuotaichuatoi() Say("<color=green>Sö gi¶ Vît ¶i<color>: C¸c h¹ gÆp ta cã chuyÖn g× nhê v¶ ch¨ng",5, "T×m hiÓu thêi gian vît ¶i/xemtime", "§iÒu kiÖn vît ¶i/xemtime", "Xem thêi gian cßn l¹i/xemtime", "Tim hiÓu phÇn thëng/xemtime", "Tho¸t./no") end function xemtime(nsel) gio = tonumber(date("%H")) phut = tonumber(date("%M")) giay = tonumber(date("%S")) i = nsel+1 if i == 1 then Talk(3,"","<color=red>B¸o Danh<color>: 1h45, 3h45, 7h45, 9h45, 11h45, 13h45, 15h45, 17h45, 19h45, 21h45, 23h45", "<color=red>B¾t ®Çu<color>: 2h00, 4h00, 6h00, 8h00, 10h00, 12h00, 14h00,16h00, 18h00, 20h00, 22h00, 24h00", "Mçi trËn kÐo dµi <color=red>45 phót<color>. Thêi gian b¸o danh ®Õn khi b¾t ®Çu lµ <color=red>15 phót") elseif i == 2 then Talk(3,"","Tæ ®éi cã <color=red>6<color> thµnh viªn trë lªn, §¼ng cÊp yªu cÇu <color=red>80<color> trë lªn", "Trëng nhãm ph¶i mang tHÖo <color=red>5<color> S¸t thñ gi¶n", "Trong nhãm kh«ng cã ai ®· tõng ®i Vît ¶i 1 lÇn trong ngµy") elseif i == 3 then if gio == 1 or gio == 3 or gio == 5 or gio == 7 or gio == 9 or gio == 11 or gio == 13 or gio == 15 or gio == 17 or gio == 19 or gio == 21 or gio == 23 then a = 44-phut b = 60-giay Talk(1,"","Thêi gian Vît ¶i cßn: <color=red>"..a.."<color> phót <color=red>"..b.."<color> gi©y") else a = 60-phut b = 60-giay Talk(1,"","Thêi gian Vît ¶i cßn: <color=red>1<color> giê <color=red>"..a.."<color> phót <color=red>"..b.."<color> gi©y") end elseif i == 4 then Talk(3,"","§¸nh qu¸i vît ¶i nhËn ®îc <color=red>50.000<color> kinh nghiÖm. X¸c suÊt thÊp nhËn ®îc <color=cyan>HuyÒn tinh", "Qua 1 ¶i sÏ ®îc kh¸ nhiÒu kinh nghiÖm + 30% nhËn ®îc <color=cyan>HuyÒn tinh", "Vît hÕt ¶i thø 18 nhËn ®îc <color=red>10.000.000<color> kinh nghiÖm vµ 1 <color=cyan>Hép lÏ vËt vît ¶i") end end function bdvuotai() if GetGlbMissionV(34) == 0 then Say("<color=green>Sö gi¶ Vît ¶i<color>: C¸c h¹ gÆp ta cã chuyÖn g× nhê v¶ ch¨ng",2, "Tham gia Vît ¶i./tmctddva", "Tho¸t./no") else Talk(1,"","<color=green>Sö gi¶ Vît ¶i<color>: §· cã 1 tæ ®éi kh¸c vµo tríc nhãm b¹n") end end function tmctddva() if GetGlbMissionV(34) == 0 then if GetTeam() ~= nil then if GetTeamSize() >= 0 then if IsCaptain() == 1 then Say("<color=green>Sö gi¶ Vît ¶i<color>: Vît ¶i sÏ cÇn cã <color=red>5 S¸t thñ gi¶n<color> vµ tÊt c¶ thµnh viªn cã level trªn <color=red>80<color>. H·y t×m nhanh ®i !",2, "Ta ®· chuÈn bÞ ®ñ/tmctddva1", "§Ó ta ®i t×m/no") else Talk(1,"","Ng¬i kh«ng ph¶i lµ <color=red>trëng nhãm<color>, kh«ng thÒ ®a tæ ®éi ®i") end else Talk(1,"","Tæ ®éi ph¶i cã <color=red>6 ngêi trë lªn<color> H·y t×m thªm ngêi råi ®Õn gÆp ta") end else Talk(1,"","Ng¬i cÇn ph¶i cã <color=red>tæ ®éi<color>, H·y t×m cho m×nh tæ ®éi råi ®Õn gÆp ta") end else Talk(1,"","<color=green>Sö gi¶ Vît ¶i<color>: §· cã 1 tæ ®éi kh¸c vµo tríc nhãm b¹n") end end function tinhngay() ngay = tonumber(date("%d")) thang = tonumber(date("%m")) tinhngay1 = 0 for k=1,getn(mang) do if thang > mang[k][1] then tinhngay1 = tinhngay1 + mang[k][2] end end tinhngay1 = tinhngay1 + ngay return tinhngay1 end mang = { {1,31}, {2,28}, {3,31}, {4,30}, {5,31}, {6,30}, {7,31}, {8,31}, {9,30}, {10,31}, {11,30}, {12,31}, } function tmctddva1() ngay = tonumber(date("%d")) gio = tonumber(date("%H")) phut = tonumber(date("%M")) giay = tonumber(date("%S")) thoigianhide1 = (60-phut)*(60-giay)*18 if GetGlbMissionV(34) == 0 then idtd = GetTeam() name = GetName() if (idtd ~= nil) then if (GetTeamSize() >= 0) then if (IsCaptain() == 1) then yc = 0 idbt = PlayerIndex for i=1,1000 do PlayerIndex = i if (GetTeam() == idtd) then if (GetTask(185) == tinhngay()) then yc = 1 end end end PlayerIndex = idbt if (yc == 0) then if (GetItemCount(131) >= 5) then DelItem(131) DelItem(131) DelItem(131) DelItem(131) DelItem(131) idbt = PlayerIndex SetGlbMissionV(34,1) a = 60-phut DelNpc(boss25) DelNpc(boss21) for i=1,50 do DelNpc(quai2[i]) ai = SubWorldID2Idx(27) bossid = random(529,533) bosslvl = 99 posx = toadomap[i][1] * 32 posy = toadomap[i][2] * 32 quai2[i]=AddNpc(bossid,bosslvl,ai,posx,posy) SetNpcScript(quai2[i], "\\script\\vuotai\\sugia1.lua") HideNpc(quai2[i],thoigianhide1) end Msg2SubWorld("Nhãm cña "..name.." ®· ®¨ng ký Vît ¶i - Thµnh §« thµnh c«ng !") for k=1,1000 do PlayerIndex = k if (GetTeam() == idtd) then SetTaskTemp(26,1) SetPunish(1) SetFightState(0) SetRevPos(19); SetGlbMissionV(37,0) SetGlbMissionV(36,0) SetGlbMissionV(35,0) SetTempRevPos(53,200*8*32,200*16*32); SetLogoutRV(1) toadox = 1569 - 8 + random(0,16) toadoy = 3217 - 16 + random(0,32) SetGlbMissionV(34,1) SetTask(185,tinhngay()) SetDeathScript("\\script\\vuotai\\playerdie.lua"); NewWorld(27, toadox, toadoy); AddGlobalCountNews("Nhãm cña "..name.." ®· ®¨ng ký Vît ¶i thµnh c«ng!",1) Msg2Player("B¹n vµ tæ ®éi ®· vµo khu vùc b¸o danh vît ¶i"); Msg2Player("Tr¹ng th¸i hiÖn tai: LuyÖn c«ng") Msg2Player("Cßn "..a.." phót n÷a trËn chݪn sÏ b¾t ®Çu!!") end end else Talk(1,"no","Ng¬i kh«ng ®ñ 5 <color=red>S¸t Thñ Gi¶n<color> kh«ng thÓ ®a tæ ®éi ®i") end else Talk(1,"no","Trong tæ ®éi cã thµnh viªn ®· ®i vît ¶i 1 lÇn trong ngµy råi. H·y chän ngêi kh¸c ®i") end else Talk(1,"no","Ng¬i kh«ng ph¶i lµ <color=red>Trëng nhãm,<color> kh«ng thÓ ®a tæ ®éi ®i") end else Talk(1,"no","Tæ ®éi ph¶i cã <color=red>6 ngêi trë lªn,<color> ng¬i h·y t×m thªm ngêi råi ®Õ gÆp ta") end else Talk(1,"no","Ng¬i cÇn ph¶i cã <color=red>Tæ ®éi,<color> h·y t×m cho m×nh tæ ®éi råi ®Õn gÆp ta") end else Talk(1,"","<color=green>Sö gi¶ Vît ¶i<color>: §· cã 1 tæ ®éi kh¸c vµo tríc nhãm b¹n") end end; function no() end; toadomap = { {1569,3194}, {1572,3197}, {1576,3205}, {1579,3206}, {1577,3200}, {1572,3214}, {1569,3207}, {1561,3206}, {1559,3201}, {1557,3205}, {1554,3212}, {1550,3209}, {1545,3220}, {1540,3223}, {1537,3222}, {1537,3227}, {1540,3239}, {1545,3239}, {1551,3247}, {1555,3250}, {1560,3253}, {1565,3256}, {1577,3265}, {1583,3263}, {1581,3259}, {1576,3272}, {1572,3251}, {1572,3245}, {1578,3242}, {1580,3235}, {1588,3231}, {1587,3224}, {1574,3241}, {1585,3238}, {1585,3233}, {1589,3232}, {1584,3223}, {1573,3207}, {1571,3199}, {1569,3190}, {1578,3214}, {1569,3210}, {1568,3201}, {1563,3228}, {1558,3227}, {1551,3217}, {1553,3211}, {1553,3241}, {1548,3235}, {1569,3237} } function quaai() w,X,Y = GetWorldPos() for q=1,1000 do PlayerIndex = q if GetTaskTemp(26) == 1 then Msg2Player("Nhom cua ban da vuot qua ai thu: "..GetGlbMissionV(37).." - "..mangten[GetGlbMissionV(37)][2].."") if GetGlbMissionV(35) ~= 0 then Msg2Player("Boss "..mangboss[GetGlbMissionV(35)][2].." xuat hien. Hay tieu diet nhanh!!!") end a = GetGlbMissionV(37) AddRepute(1) Msg2Player("B¹n nhËn ®îc 1 ®iÓm danh väng ") b = a*mangexp[level()][2] AddOwnExp(b) Msg2Player("Ban Nhan Duoc "..b.." Kinh Nghiem") s = random(1,3) if s == 2 then AddEventItem(random(4,5)) Msg2Player("Ban Nhan Duoc 1 Vien Huyen Tinh") end end end end mangexp = { {1,150000}, {2,200000}, {3,250000}, {4,300000}, {5,500000}, {6,800000}, {7,1000000} } function level() if GetLevel() < 100 then return 1 elseif GetLevel() >= 100 and GetLevel() < 110 then return 2 elseif GetLevel() >= 110 and GetLevel() < 120 then return 3 elseif GetLevel() >= 120 and GetLevel() < 130 then return 4 elseif GetLevel() >= 130 and GetLevel() < 140 then return 5 elseif GetLevel() >= 140 and GetLevel() < 150 then return 6 elseif GetLevel() >= 150 then return 7 else return 1 end end mangboss = { {1,"Thñ LÜnh ¶i - HÖ Kim"}, {2,"Thñ LÜnh ¶i - HÖ Méc"}, {3,"Thñ LÜnh ¶i - HÖ Thuû"}, {4,"Thñ LÜnh ¶i - HÖ Ho¶"}, {5,"Thñ LÜnh ¶i - HÖ Thæ"}, {6,"Thñ LÜnh ¶i Cao CÊp"}, {7,"Thñ LÜnh ¶i Cao CÊp"}, {8,"Thñ LÜnh ¶i Cao CÊp"}, } mangten = { {1,"Qu¸i Nh©n Thêng"}, {2,"Qu¸i Nh©n Thêng"}, {3,"Qu¸i Nh©n Thêng"}, {4,"Qu¸i Nh©n Thêng"}, {5,"Qu¸i Nh©n Thêng"}, {6,"Qu¸i Nh©n HÖ Méc"}, {7,"Qu¸i Nh©n HÖ Thuû"}, {8,"Qu¸i Nh©n HÖ Ho¶"}, {9,"Qu¸i Nh©n HÖ Thæ"}, {10,"Qu¸i Buff Bïa Gi¶m Kh¸ng"}, {11,"Qu¸i Buff Bïa Gi¶m Tèc §é"}, {12,"Qu¸i Buff Cho¸ng"}, {13,"Qu¸i HÖ Kim CÊp Cao"}, {14,"Qu¸i HÖ Méc - Thuû CÊp Cao"}, {15,"Qu¸i HÖ Ho¶ - Thæ CÊp Cao"}, {16,"Qu¸i Ph¶n Dame"}, {17,"Boss Thñ LÜnh Vît ¶i"} } function OnDeath() w,X,Y = GetWorldPos() if GetGlbMissionV(36) == 49 then for i=1,50 do DelNpc(quai2[i]) ai = SubWorldID2Idx(27) bossid = random(529,533) bosslvl = 99 posx = toadomap[i][1] * 32 posy = toadomap[i][2] * 32 quai2[i]=AddNpc(bossid,bosslvl,ai,posx,posy) SetNpcScript(quai2[i], "\\script\\vuotai\\sugia1.lua") end SetGlbMissionV(37,1) quaai() elseif GetGlbMissionV(36) == 99 then for i=1,50 do DelNpc(quai2[i]) ai = SubWorldID2Idx(27) bossid = random(529,533) bosslvl = 99 posx = toadomap[i][1] * 32 posy = toadomap[i][2] * 32 quai2[i]=AddNpc(bossid,bosslvl,ai,posx,posy) SetNpcScript(quai2[i], "\\script\\vuotai\\sugia1.lua") end SetGlbMissionV(37,2) quaai() elseif GetGlbMissionV(36) == 149 then for i=1,50 do DelNpc(quai2[i]) ai = SubWorldID2Idx(27) bossid = random(529,533) bosslvl = 99 posx = toadomap[i][1] * 32 posy = toadomap[i][2] * 32 quai2[i]=AddNpc(bossid,bosslvl,ai,posx,posy) SetNpcScript(quai2[i], "\\script\\vuotai\\sugia1.lua") end SetGlbMissionV(37,3) quaai() elseif GetGlbMissionV(36) == 199 then for i=1,50 do DelNpc(quai2[i]) ai = SubWorldID2Idx(27) bossid = random(529,533) bosslvl = 99 posx = toadomap[i][1] * 32 posy = toadomap[i][2] * 32 quai2[i]=AddNpc(bossid,bosslvl,ai,posx,posy) SetNpcScript(quai2[i], "\\script\\vuotai\\sugia1.lua") end SetGlbMissionV(37,4) quaai() elseif GetGlbMissionV(36) == 249 then for i=1,50 do DelNpc(quai2[i]) ai = SubWorldID2Idx(27) bossid = random(534,538) bosslvl = 99 posx = toadomap[i][1] * 32 posy = toadomap[i][2] * 32 quai2[i]=AddNpc(bossid,bosslvl,ai,posx,posy) SetNpcScript(quai2[i], "\\script\\vuotai\\sugia1.lua") end SetGlbMissionV(36,250) ai = SubWorldID2Idx(27) boss21=AddNpc(594,99,ai,196*8*32,201*16*32) SetNpcScript(boss21, "\\script\\vuotai\\boss21.lua") dem = 0 for i=1,1000 do PlayerIndex =i if GetTaskTemp(26) == 1 then dem = dem + 1 end end id_chon = random(1,dem) dem = 0 for i=1,1000 do PlayerIndex =i if GetTaskTemp(26) == 1 then dem = dem + 1 if dem == id_chon then SetNpcName(boss21,GetName()) break end end end SetGlbMissionV(35,1) SetGlbMissionV(37,5) quaai() elseif GetGlbMissionV(36) == 299 then for i=1,50 do DelNpc(quai2[i]) ai = SubWorldID2Idx(27) bossid = random(539,543) bosslvl = 99 posx = toadomap[i][1] * 32 posy = toadomap[i][2] * 32 quai2[i]=AddNpc(bossid,bosslvl,ai,posx,posy) SetNpcScript(quai2[i], "\\script\\vuotai\\sugia1.lua") end SetGlbMissionV(36,300) ai = SubWorldID2Idx(27) boss21=AddNpc(595,99,ai,196*8*32,201*16*32) SetNpcScript(boss21, "\\script\\vuotai\\boss21.lua") dem = 0 for i=1,1000 do PlayerIndex =i if GetTaskTemp(26) == 1 then dem = dem + 1 end end id_chon = random(1,dem) dem = 0 for i=1,1000 do PlayerIndex =i if GetTaskTemp(26) == 1 then dem = dem + 1 if dem == id_chon then SetNpcName(boss21,GetName()) break end end end SetGlbMissionV(35,2) SetGlbMissionV(37,6) quaai() elseif GetGlbMissionV(36) == 349 then for i=1,50 do DelNpc(quai2[i]) ai = SubWorldID2Idx(27) bossid = random(544,548) bosslvl = 99 posx = toadomap[i][1] * 32 posy = toadomap[i][2] * 32 quai2[i]=AddNpc(bossid,bosslvl,ai,posx,posy) SetNpcScript(quai2[i], "\\script\\vuotai\\sugia1.lua") end SetGlbMissionV(36,350) ai = SubWorldID2Idx(27) boss21=AddNpc(596,99,ai,196*8*32,201*16*32) SetNpcScript(boss21, "\\script\\vuotai\\boss21.lua") dem = 0 for i=1,1000 do PlayerIndex =i if GetTaskTemp(26) == 1 then dem = dem + 1 end end id_chon = random(1,dem) dem = 0 for i=1,1000 do PlayerIndex =i if GetTaskTemp(26) == 1 then dem = dem + 1 if dem == id_chon then SetNpcName(boss21,GetName()) break end end end SetGlbMissionV(35,3) SetGlbMissionV(37,7) quaai() elseif GetGlbMissionV(36) == 399 then for i=1,50 do DelNpc(quai2[i]) ai = SubWorldID2Idx(27) bossid = random(549,553) bosslvl = 99 posx = toadomap[i][1] * 32 posy = toadomap[i][2] * 32 quai2[i]=AddNpc(bossid,bosslvl,ai,posx,posy) SetNpcScript(quai2[i], "\\script\\vuotai\\sugia1.lua") end SetGlbMissionV(36,400) ai = SubWorldID2Idx(27) boss21=AddNpc(597,99,ai,196*8*32,201*16*32) SetNpcScript(boss21, "\\script\\vuotai\\boss21.lua") dem = 0 for i=1,1000 do PlayerIndex =i if GetTaskTemp(26) == 1 then dem = dem + 1 end end id_chon = random(1,dem) dem = 0 for i=1,1000 do PlayerIndex =i if GetTaskTemp(26) == 1 then dem = dem + 1 if dem == id_chon then SetNpcName(boss21,GetName()) break end end end SetGlbMissionV(35,4) SetGlbMissionV(37,8) quaai() elseif GetGlbMissionV(36) == 449 then for i=1,50 do DelNpc(quai2[i]) ai = SubWorldID2Idx(27) bossid = random(554,558) bosslvl = 99 posx = toadomap[i][1] * 32 posy = toadomap[i][2] * 32 quai2[i]=AddNpc(bossid,bosslvl,ai,posx,posy) SetNpcScript(quai2[i], "\\script\\vuotai\\sugia1.lua") end SetGlbMissionV(36,450) ai = SubWorldID2Idx(27) boss21=AddNpc(598,99,ai,196*8*32,201*16*32) SetNpcScript(boss21, "\\script\\vuotai\\boss21.lua") dem = 0 for i=1,1000 do PlayerIndex =i if GetTaskTemp(26) == 1 then dem = dem + 1 end end id_chon = random(1,dem) dem = 0 for i=1,1000 do PlayerIndex =i if GetTaskTemp(26) == 1 then dem = dem + 1 if dem == id_chon then SetNpcName(boss21,GetName()) break end end end SetGlbMissionV(35,5) SetGlbMissionV(37,9) quaai() elseif GetGlbMissionV(36) == 499 then for i=1,50 do DelNpc(quai2[i]) ai = SubWorldID2Idx(27) bossid = random(559,563) bosslvl = 99 posx = toadomap[i][1] * 32 posy = toadomap[i][2] * 32 quai2[i]=AddNpc(bossid,bosslvl,ai,posx,posy) SetNpcScript(quai2[i], "\\script\\vuotai\\sugia1.lua") end SetGlbMissionV(37,10) quaai() elseif GetGlbMissionV(36) == 549 then for i=1,50 do DelNpc(quai2[i]) ai = SubWorldID2Idx(27) bossid = random(564,568) bosslvl = 99 posx = toadomap[i][1] * 32 posy = toadomap[i][2] * 32 quai2[i]=AddNpc(bossid,bosslvl,ai,posx,posy) SetNpcScript(quai2[i], "\\script\\vuotai\\sugia1.lua") end SetGlbMissionV(37,11) quaai() elseif GetGlbMissionV(36) == 599 then for i=1,50 do DelNpc(quai2[i]) ai = SubWorldID2Idx(27) bossid = random(569,573) bosslvl = 99 posx = toadomap[i][1] * 32 posy = toadomap[i][2] * 32 quai2[i]=AddNpc(bossid,bosslvl,ai,posx,posy) SetNpcScript(quai2[i], "\\script\\vuotai\\sugia1.lua") end SetGlbMissionV(37,12) quaai() elseif GetGlbMissionV(36) == 649 then for i=1,50 do DelNpc(quai2[i]) ai = SubWorldID2Idx(27) bossid = random(574,578) bosslvl = 99 posx = toadomap[i][1] * 32 posy = toadomap[i][2] * 32 quai2[i]=AddNpc(bossid,bosslvl,ai,posx,posy) SetNpcScript(quai2[i], "\\script\\vuotai\\sugia1.lua") end ai = SubWorldID2Idx(27) SetGlbMissionV(36,650) ai = SubWorldID2Idx(27) boss21=AddNpc(599,99,ai,196*8*32,201*16*32) SetNpcScript(boss21, "\\script\\vuotai\\boss21.lua") dem = 0 for i=1,1000 do PlayerIndex =i if GetTaskTemp(26) == 1 then dem = dem + 1 end end id_chon = random(1,dem) dem = 0 for i=1,1000 do PlayerIndex =i if GetTaskTemp(26) == 1 then dem = dem + 1 if dem == id_chon then SetNpcName(boss21,GetName()) break end end end SetGlbMissionV(35,6) SetGlbMissionV(37,13) quaai() elseif GetGlbMissionV(36) == 699 then for i=1,50 do DelNpc(quai2[i]) ai = SubWorldID2Idx(27) bossid = random(579,583) bosslvl = 99 posx = toadomap[i][1] * 32 posy = toadomap[i][2] * 32 quai2[i]=AddNpc(bossid,bosslvl,ai,posx,posy) SetNpcScript(quai2[i], "\\script\\vuotai\\sugia1.lua") end ai = SubWorldID2Idx(27) SetGlbMissionV(36,700) ai = SubWorldID2Idx(27) boss21=AddNpc(random(600,601),99,ai,196*8*32,201*16*32) SetNpcScript(boss21, "\\script\\vuotai\\boss21.lua") dem = 0 for i=1,1000 do PlayerIndex =i if GetTaskTemp(26) == 1 then dem = dem + 1 end end id_chon = random(1,dem) dem = 0 for i=1,1000 do PlayerIndex =i if GetTaskTemp(26) == 1 then dem = dem + 1 if dem == id_chon then SetNpcName(boss21,GetName()) break end end end SetGlbMissionV(35,7) SetGlbMissionV(37,14) quaai() elseif GetGlbMissionV(36) == 749 then for i=1,50 do DelNpc(quai2[i]) ai = SubWorldID2Idx(27) bossid = random(584,588) bosslvl = 99 posx = toadomap[i][1] * 32 posy = toadomap[i][2] * 32 quai2[i]=AddNpc(bossid,bosslvl,ai,posx,posy) SetNpcScript(quai2[i], "\\script\\vuotai\\sugia1.lua") end ai = SubWorldID2Idx(27) SetGlbMissionV(36,750) ai = SubWorldID2Idx(27) boss21=AddNpc(random(602,603),99,ai,196*8*32,201*16*32) SetNpcScript(boss21, "\\script\\vuotai\\boss21.lua") dem = 0 for i=1,1000 do PlayerIndex =i if GetTaskTemp(26) == 1 then dem = dem + 1 end end id_chon = random(1,dem) dem = 0 for i=1,1000 do PlayerIndex =i if GetTaskTemp(26) == 1 then dem = dem + 1 if dem == id_chon then SetNpcName(boss21,GetName()) break end end end SetGlbMissionV(35,8) SetGlbMissionV(37,15) quaai() elseif GetGlbMissionV(36) == 799 then for i=1,50 do DelNpc(quai2[i]) ai = SubWorldID2Idx(27) bossid = random(589,593) bosslvl = 99 posx = toadomap[i][1] * 32 posy = toadomap[i][2] * 32 quai2[i]=AddNpc(bossid,bosslvl,ai,posx,posy) SetNpcScript(quai2[i], "\\script\\vuotai\\sugia1.lua") end SetGlbMissionV(37,16) quaai() elseif GetGlbMissionV(36) == 805 then for i=1,50 do DelNpc(quai2[i]) ai = SubWorldID2Idx(27) bossid = random(529,533) bosslvl = 99 posx = toadomap[i][1] * 32 posy = toadomap[i][2] * 32 quai2[i]=AddNpc(bossid,bosslvl,ai,posx,posy) SetNpcScript(quai2[i], "\\script\\vuotai\\sugia1.lua") end ai = SubWorldID2Idx(27) bossid = random(604,613) bosslvl = 99 posx = 196*8 * 32 posy = 201*16 * 32 boss25=AddNpc(bossid,bosslvl,ai,posx,posy) SetNpcScript(boss25, "\\script\\vuotai\\boss25.lua") SetGlbMissionV(37,17) quaai() Msg2Player("Thu Linh Vuot Ai Da Xuat Hien !!!!!") end if GetGlbMissionV(35) == 0 then SetGlbMissionV(36,GetGlbMissionV(36)+1) end end;
Khách viếng thăm hãy cùng ngchienthang xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!
-
29-04-12, 10:30 PM #97
- Ngày tham gia
- Oct 2011
- Đang ở
- https://t.me*********
- Bài viết
- 222
- Thanks
- 91
- Thanked 41 Times in 17 Posts
Ðề: CTC Team Dev Presents
--- THO REN THAN BI
--- CHUC NANG : EP ITEM HK
--- TAC GIA : JXVIETNAM
Include("\\Script\\source\\sourcejx49.lua")
HKDP = 3
BKDP = 150
OKDP = 152
DOPHOHK = 14
DOPHOBK = 15
DOPHOOK = 16
HT7 = 4
HT8 = 11
HT9 = 12
function chetaolb()
SayEx({"Xin chao !","Che tao Hoang Kim Lenh/hk","Tim hieu/timhieu","Thoat/no"})
end
function timhieu()
Talk(1,"","Hoang Kim Lenh : Doi 1 trang bi Hoang Kim")
end
function no()
end
function hk()
SayEx({"Nguyen lieu che tao Hoang Kim Lenh : \n<color=yellow>+ Hoang Kim Dai Phap\n+ Do Pho Hoang Kim Lenh\n+ Huyen Tinh 1\n+ Ti le thanh cong 100%","Che tao/hk1","Suy nghi lai/no"})
end
function bk()
SayEx({"Nguyen lieu che tao Bach Kim Lenh : \n<color=yellow>+ Bach Kim Dai Phap\n+ Do Pho Bach Kim Lenh\n+ Huyen Tinh 8\n+ Ti le thanh cong 100%","Che tao/bk1","Suy nghi lai/no"})
end
function ok()
SayEx({"Nguyen lieu che tao O Kim Lenh : \n<color=yellow>+ O Kim Dai Phap\n+ Do Pho O Kim Lenh\n+ Huyen Tinh 9\n+ Ti le thanh cong 100%","Che tao/ok1","Suy nghi lai/no"})
end
function hk1()
a = GetItemCount(HKDP)
b = GetItemCount(DOPHOHK)
c = GetItemCount(HT7)
if GetItemCount(HKDP) >= 1 then
if GetItemCount(DOPHOHK) >= 1 then
if GetItemCount(HT7) >= 1 then
DelItem(HKDP)
DelItem(DOPHOHK)
DelItem(HT7)
if GetItemCount(HKDP) == (a - 1) and GetItemCount(DOPHOHK) == (b - 1) and GetItemCount(HT7) == (c - 1) then
AddEventItem(49)
--logWrite("Che tao Hoang Kim Lenh")
Talk(1,"no","Che tao <color=yellow>Hoang Kim Lenh<color> thanh cong !")
else
Talk(1,"","Hack ha cung yeu !")
end
else
Talk(1,"","Ban khong co <color=cyan>Huyen Tinh 1")
end
else
Talk(1,"","Ban khong co 1 <color=cyan>Do Pho Hoang Kim")
end
else
Talk(1,"","Ban khong co 1 <color=cyan>Hoang Kim Dai Phap")
end
end
function bk1()
a = GetItemCount(BKDP)
b = GetItemCount(DOPHOBK)
c = GetItemCount(HT8)
if GetItemCount(BKDP) >= 1 then
if GetItemCount(DOPHOBK) >= 1 then
if GetItemCount(HT8) >= 1 then
DelItem(BKDP)
DelItem(DOPHOBK)
DelItem(HT8)
if GetItemCount(BKDP) == (a - 1) and GetItemCount(DOPHOBK) == (b - 1) and GetItemCount(HT8) == (c - 1) then
AddEventItem(50)
-- logWrite("Che tao Bach Kim Lenh")
Talk(1,"no","Che tao <color=yellow>Bach Kim Lenh<color> thanh cong !")
else
Talk(1,"","Hack ha cung yeu !")
end
else
Talk(1,"","Ban khong co 1 <color=cyan>Huyen Tinh 8")
end
else
Talk(1,"","Ban khong co 1 <color=cyan>Do Pho Bach Kim")
end
else
Talk(1,"","Ban khong co 1 <color=cyan>Bach Kim Dai Phap")
end
end
function ok1()
a = GetItemCount(OKDP)
b = GetItemCount(DOPHOOK)
c = GetItemCount(HT9)
if GetItemCount(OKDP) >= 1 then
if GetItemCount(DOPHOOK) >= 1 then
if GetItemCount(HT9) >= 1 then
DelItem(OKDP)
DelItem(DOPHOOK)
DelItem(HT9)
if GetItemCount(OKDP) == (a - 1) and GetItemCount(DOPHOOK) == (b - 1) and GetItemCount(HT9) == (c - 1) then
AddEventItem(51)
--logWrite("Che tao O Kim Lenh")
Talk(1,"no","Che tao <color=yellow>O Kim Lenh<color> thanh cong !")
else
Talk(1,"","Hack ha cung yeu !")
end
else
Talk(1,"","Ban khong co 1 <color=cyan>Huyen Tinh 8")
end
else
Talk(1,"","Ban khong co 1 <color=cyan>Do Pho O Kim")
end
else
Talk(1,"","Ban khong co 1 <color=cyan>O Kim Dai Phap")
end
end
tỉ lệ ép là 20% - 30 %Khách viếng thăm hãy cùngBybaybongxây dựng diễn đàn CLBGAMESVN vững mạnh nhé!
-
29-04-12, 11:30 PM #98
- Ngày tham gia
- Sep 2010
- Bài viết
- 66
- Thanks
- 63
- Thanked 44 Times in 41 Posts
Ðề: CTC Team Dev Presents
tuyệt vời . cám ơn sever của bạn . đang theo dỏi và update từng ngày..
Khách viếng thăm hãy cùng authanhi 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 authanhi vì bài viết này !
tieumy (14-01-13)
-
30-04-12, 12:04 AM #99
- Ngày tham gia
- Apr 2012
- Bài viết
- 8
- Thanks
- 4
- Thanked 1 Time in 1 Post
Các bạn cho mình hỏi:
Update thì chỉ cần copy rồi paste vô server và client thôi à,có cần phải làm j khác thêm ko vậy. Mình chơi bình thường mà khi copy bản update bạn chủ theard vừa up thì chạy được server nhưng đăng nhập thì kêu là "kết nối thất bại".
Xin lỗi mình o rành về cái này cho lắm.
Xin mấy bạn cho biết nguyên nhân nghen.
Cám ơn tất cả mọi người và chúc ngủ ngon
Thân !
Ah mình đăng nhập được rồi. Thì ra phải thiết lập lại mới vào được.Lần sửa cuối bởi thaihoa91, ngày 30-04-12 lúc 08:37 AM.
Khách viếng thăm hãy cùng xgamefitvn xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!
-
30-04-12, 02:09 PM #100
- Ngày tham gia
- Oct 2011
- Đang ở
- https://t.me*********
- Bài viết
- 222
- Thanks
- 91
- Thanked 41 Times in 17 Posts
Ðề: CTC Team Dev Presents
sv này mặc đồ hk +8-10 k thấy thay đổi ai bik fix dùm dc không
Khách viếng thăm hãy cùngBybaybongxây dựng diễn đàn CLBGAMESVN vững mạnh nhé!
Các Chủ đề tương tự
-
Thông báo đã thành lập Team DEV SRO
Bởi kelly trong diễn đàn Hỏi Đáp/ Yêu CầuTrả lời: 32Bài viết cuối: 09-08-14, 02:36 PM -
[JX] SHARE 2 Server EWARD và Cyber Team [BY JXPO TEAM]
Bởi sky.light9530 trong diễn đàn Võ Lâm Truyền Kỳ (Jx Server)Trả lời: 2Bài viết cuối: 24-01-12, 09:00 AM -
ai giúp em cài web clb qua team
Bởi teen10x trong diễn đàn Hỏi Đáp/ Yêu CầuTrả lời: 2Bài viết cuối: 17-12-10, 03:41 PM -
Lập Team Việt Hóa Tiên Lữ
Bởi Kakarot96 trong diễn đàn Hỏi đáp - Yêu cầuTrả lời: 26Bài viết cuối: 18-09-10, 02:56 PM -
Cần người giúp đỡ việc cài VL off wa team
Bởi ganhcon trong diễn đàn Hỏi Đáp/ Yêu CầuTrả lời: 2Bài viết cuối: 10-08-10, 05:08 PM