Kết quả 1 đến 1 của 1
-
13-08-15, 01:22 PM #1
- Ngày tham gia
- Jan 2015
- Bài viết
- 103
- Thanks
- 18
- Thanked 11 Times in 11 Posts
Cần lắm sự trợ giúp của mấy bác chuyên về Jx Linux về lỗi Liên Đấu
Em click vào con NPC nó hiện ra cái lỗi này . nhưng đọc không biết giải quyết ntn . mấy bác giúp hộ em với !!
[Only registered and activated users can see links. ]
Đây là toàn bộ code của file đó
Code:--ÎäÁÖÁªÈü¹ÙÔ± Include( "\\script\\missions\\leaguematch\\head.lua" ) Include( "\\script\\missions\\leaguematch\\npc\\head.lua" ) Include("\\script\\lib\\log.lua") --Ö÷¶Ô»°¿ò function main() local n_level = wlls_getcityinfo() if (not wlls_CheckIsOpen(n_level)) then return end local n_lid = LG_GetLeagueObjByRole(WLLS_LGTYPE, GetName()) if (not FALSE(n_lid)) then --¼ì²é²¢ÌáʾÕÒ´í¹ÙÔ±µÄÇé¿ö local n_mytype = LG_GetLeagueTask(n_lid, WLLS_LGTASK_STYPE) local n_mtype = LG_GetLeagueTask(n_lid, WLLS_LGTASK_MTYPE) local n_mylevel = WLLS_TAB[n_mytype].match_type[n_mtype].level if (n_mylevel ~= n_level) then wlls_descript("<enter> C¸c h¹ ®· gia nhËp<color=red>"..WLLS_LEVEL_DESC[n_mylevel].."<color> Ta lµ <color=red>"..WLLS_LEVEL_DESC[n_level].."<color>, cã ph¶i ®· t×m nhÇm ngêi?", wlls_add_option({}, "Kh«ng cã chuyÖn g× hÕt")) return end --ÅжÏÊÇ·ñÔ½¼¶ local str = wlls_levelcheck(GetName()) if (str) then Say(wlls_npcname()..str, 3, "Ta muèn rêi khái ®éi!/wlls_want2leaveleague", "Ta muèn l·nh thëng/wlls_wantaward", "Ta chØ tiÖn ghÐ qua/OnCancel") return end end local n_next = GetGlbValue(GLB_WLLS_NEXT) local str = "<enter> "..WLLS_TAB[n_next].text_main[n_level] local str_des = WLLS_LEVEL_DESC[n_level] local tb_option = {} tb_option[getn(tb_option) + 1] = "Ta muèn ®Õn "..str_des.." héi trêng/wlls_want2signmap" tb_option[getn(tb_option) + 1] = ""..str_des.." nhãm/wlls_mylg" tb_option[getn(tb_option) + 1] = "Ta muèn l·nh phÇn thëng liªn ®Êu/wlls_wantaward" tb_option[getn(tb_option) + 1] = "KiÓm tra ®iÓm vinh dù/wlls_ShowRespect" tb_option[getn(tb_option) + 1] = "T¾t më nhËn kinh nghiÖm/wlls_show_expswitch" wlls_descript(str, wlls_add_option(tb_option, "Ta chØ tiÖn ghÐ qua")) end --ÁìÈ¡½±Àø£¨¶Ô»°£© function wlls_wantaward() local n_matchphase = GetGlbValue( GLB_WLLS_PHASE ) local str_des = wlls_get_desc(1) local n_awardmin = wlls_get_award_min() local str = "<enter>#### Gi¶i thëng liªn ®Êu bao gåm ®iÓm <color=red>xÕp h¹ng<color> vµ ®iÓm <color=red>uy tÝn<color>. Sau khi kÕt thóc giai ®o¹n liªn ®Êu <color=red> dùa vµo sè trËn chiÕn th¾ng<color> ®Ó xÕp thø h¹ng. <color=red>"..n_awardmin.." ®éi xÕp h¹ng cao nhÊt<color> sÏ nhËn ®îc <color=red>phÇn thëng ®Æc biÖt<color>.Cã thÓ dïng ®iÓm vinh dù ®Ó mua vËt phÈm!" local tb_option = {} if (n_matchphase == 1) then tb_option[getn(tb_option)+1] = "Ta muèn nhËn phÇn thëng xÕp h¹ng!/wlls_wantaward_rank" tb_option[getn(tb_option)+1] = "Ta muèn nhËn phÇn thëng danh hiÖu!/wlls_wantaward_title" end tb_option[getn(tb_option)+1] = "Ta muèn ®æi ®iÓm vinh dù/wlls_buy_honour" -- tb_option[getn(tb_option)+1] = "Ta muèn ®æi ®iÓm uy tÝn/wlls_buy_Respect" tb_option[getn(tb_option)+1] = "Ta chØ tiÖn ghÐ qua/OnCancel" wlls_descript(str, tb_option) end --ÁìÈ¡ÅÅÃû½±Àø£¨¶Ô»°£© function wlls_wantaward_rank() --¼ì²éÅÅÃû½±Àø local nAward, nLevel, szLGName, nRank = wlls_checkaward_rank() if nAward then local str_des = wlls_get_desc(1) local n_type = GetGlbValue(GLB_WLLS_TYPE) local tb_award = WLLS_TAB[n_type].award_rank[nLevel][nAward] local str = "<enter> ChiÕn ®éi: <color=yellow>"..szLGName.."<color> trong "..str_des.." xÕp h¹ng <color=yellow>"..nRank.."<color>. NhËn ®îc "..tb_award[2].." ®iÓm danh väng." if (tb_award[3]) then --Óжӳ¤¶îÍâ½±Àø if (LG_GetMemberTask(WLLS_LGTYPE, szLGName, GetName(), WLLS_LGMTASK_JOB) == 1) then str = str.." ®éi trëng nhËn ®îc "..tb_award[3].." ®iÓm danh väng." end end str = str.." cã muèn lÜnh kh«ng ?" wlls_descript(str, "LÜnh thëng!/wlls_getaward_rank", "Trë vÒ!/OnCancel") return end end --¼ì²éÊÇ·ñ¿ÉÒÔÁìÈ¡ÅÅÃû½±Àø£¬·µ»Ø¿ÉÒÔÁìµÄÀµÐÍ£¬nilΪ²»¿ÉÁì function wlls_checkaward_rank(b_silent) if (GetGlbValue(GLB_WLLS_PHASE) ~= 1) then --¸ÕºÃÔÚ¿çÈü¼¾µÄʱºòÒªÁì½± if (not b_silent) then Msg2Player("HiÖn nay liªn ®Êu ®· tiÕn hµnh cuéc thi míi, kh«ng thÓ nhËn gi¶i thëng xÕp h¹ng liªn ®Êu lÇn tríc.") end return nil end local n_level, n_group = wlls_getcityinfo() local str_des = wlls_get_desc(1) local n_lid = wlls_check_player(GetName(), n_level) local n_awardmin = wlls_get_award_min() local n_rank = 0 if (not FALSE(n_lid)) then n_rank = LG_GetLeagueTask(n_lid, WLLS_LGTASK_RANK) end if (FALSE(n_lid) or n_rank <= 0 or n_rank > n_awardmin) then if (not b_silent) then wlls_descript("<enter> LÇn nµy"..str_des.." <color=red>"..n_awardmin.."<color> hiÖn ®· xÕp h¹ng, h×nh nh chiÕn ®éi cña C¸c h¹ kh«ng cã trong ®©y!"..n_awardmin.."®Ó ta gióp kiÓm tra l¹i") end return nil end local n_sid = GetGlbValue(GLB_WLLS_SID) local str_lgname = LG_GetLeagueInfo(n_lid) local n_addsid = LG_GetMemberTask(WLLS_LGTYPE, str_lgname, GetName(), WLLS_LGMTASK_ADDSID) if (n_addsid >= n_sid) then if (not b_silent) then wlls_descript("<enter> §õng tëng gia nhËp nhãm kh¸c lµ cã thÓ ®Õn gi¶ m¹o nhËn gi¶i thëng! Ta cha cã lÈm cÈm! Mïa thi ®Êu sau C¸c h¹ h·y quay l¹i!") end return nil end if (GetByte(GetTask(WLLS_TASKID_GOTAWARD), 1) >= n_sid) then if (not b_silent) then wlls_descript("<enter> C¸c h¹ ®· l·nh thëng råi! §Þnh g¹t ta n÷a ?") end return nil end local n_type = GetGlbValue(GLB_WLLS_TYPE) local tb_award = WLLS_TAB[n_type].award_rank[n_level] local n_award for i = getn(tb_award), 1, -1 do if (tb_award[i][1] >= n_rank) then n_award = i else break end end return n_award, n_level, str_lgname, n_rank end --ÁìÈ¡³ÆºÅ½±Àø function wlls_wantaward_title() if (GetGlbValue(GLB_WLLS_PHASE) ~= 1) then Msg2Player("§· tiÕn hµnh cuéc thi ®Êu míi, kh«ng thÓ nhËn gi¶i thëng!") return nil end local n_level, n_group = wlls_getcityinfo() local n_lid = wlls_check_player(GetName(), n_level) local n_rank if (not FALSE(n_lid)) then n_rank = LG_GetLeagueTask(n_lid, WLLS_LGTASK_RANK) end if (FALSE(n_lid) or n_rank <= 0 or n_rank > 4) then Say(wlls_npcname().." gi¶i thëng chØ giµnh cho "..wlls_get_desc(1).." xuÊt s¾c nhÊt(4 ®éi h¹ng ®Çu) . Ng¬i kh«ng thuéc trong nhãm ®ã, ®õng ph¸ rèi!", 0) return nil end local n_sid = GetGlbValue(GLB_WLLS_SID) local str_lgname = LG_GetLeagueInfo(n_lid) local n_addsid = LG_GetMemberTask(WLLS_LGTYPE, str_lgname, GetName(), WLLS_LGMTASK_ADDSID) if (n_addsid >= n_sid) then wlls_descript("<enter> §õng tëng gia nhËp nhãm kh¸c lµ cã thÓ ®Õn gi¶ m¹o nhËn gi¶i thëng! Ta cha cã lÈm cÈm! Mïa thi ®Êu sau C¸c h¹ h·y quay l¹i!") return nil end local n_title = WLLS_AWARD_TITLE[n_level] + n_rank - 1 if (n_level == 2) then if WLLS_AWARD_TITLE_EX[GetGlbValue(GLB_WLLS_TYPE)] then n_title = WLLS_AWARD_TITLE_EX[GetGlbValue(GLB_WLLS_TYPE)][n_rank] end end local nServerTime = GetCurServerTime()+ 1728000; --20*24*60*60 local nDate = FormatTime2Number(nServerTime); local nDay = floor(mod(nDate,1000000) / 10000); local nMon = mod(floor(nDate / 1000000) , 100) local nTime = nMon * 1000000 + nDay * 10000 -- ³ÖÐøµ½Ï¢½ìÁªÈü½áÊø _M("Title_AddTitle", n_title, nTime) --RemoveÎäÁÖÃËÖ÷ºÀ¹â£¬ÔÚaddТµÄºÀ¹â֮ǰ- Modified by DinhHQ - 20110524 if Title_GetActiveTitle() == 3000 then Title_RemoveTitle(3000) end if GetSkillState(1500) ~= -1 then RemoveSkillState(1500) end Title_AddTitle(n_title, 2, nTime) Title_ActiveTitle(n_title) SetTask(1122, n_title) --µ±Ç°Íæ¼ÒÁìÈ¡µÄÊÇÄĸöÍ·ÏÎID local tb = {"Qu¸n qu©n", "H¹ng 2", "H¹ng 3", "H¹ng 4"} Msg2Player("Chóc mõng b¹n ®¹t ®îc danh hiÖu <color=yellow>"..wlls_get_desc(1)..tb[n_rank].."<color>! Danh hiÖu nµy cã thÓ duy tr× trong <color=yellow>20<color> ngµy.") end --×îÖÕÁìÈ¡ÅÅÐн±Àø function wlls_getaward_rank() local n_award, n_level, str_lgname, nRank = wlls_checkaward_rank(); if (n_award) then local str_des = wlls_get_desc(1) local n_type = GetGlbValue(GLB_WLLS_TYPE) local tb_award = WLLS_TAB[n_type].award_rank[n_level][n_award] local n_got = GetGlbValue(GLB_WLLS_SID) n_got = SetByte(n_got, 4, n_type) n_got = SetByte(n_got, 3, n_level) n_got = SetByte(n_got, 2, n_award) SetTask(WLLS_TASKID_GOTAWARD, n_got) local nPoint = tb_award[2] Msg2Player("Chóc mõng b¹n ®¹t ®îc"..str_des.."PhÇn thëng xÕp h¹ng: ®iÓm vinh dù"..tb_award[2].."®iÓm") wlls_award_log(format("NhËn ®îc phÇn thëng xÕp h¹ng %s: ®iÓm vinh dù %d ®iÓm", str_des, tb_award[2])) if (tb_award[3]) then --Óжӳ¤¶îÍâ½±Àø --¸ÃÅжÏÖ»¶Ô¶Ó³¤²»ÄÜתÒƵÄÇé¿ö£¨Ê¦Í½Èü£©°²È« if (LG_GetMemberTask(WLLS_LGTYPE, str_lgname, GetName(), WLLS_LGMTASK_JOB) == 1) then nPoint = nPoint + tb_award[3] Msg2Player("Chóc mõng, b¹n ®¹t ®îc "..str_des.."danh hiÖu, gi¶i thëng(®éi trëng): Gi¸ trÞ uy tÝn "..tb_award[3].." ®iÓm") wlls_award_log(format("NhËn ®îc phÇn thëng xÕp h¹ng %s (®éi trëng): §iÓm vinh dù: %d ®iÓm", str_des, tb_award[3])) end end SetTask(WLLS_TASKID_HONOUR, GetTask(WLLS_TASKID_HONOUR) + nPoint) wlls_award_log(format("Tæng céng cã %d ®iÓm vinh dù", GetTask(WLLS_TASKID_HONOUR))) if (nRank == 1) then -- »ñµÃµÚÒ»Ãû ÈÙÓþÅÅÐаñ ÁªÈüÖµ¼Ó1 local nCurPoint = GetTask(2601); nCurPoint = nCurPoint + 1; SetTask(2601, nCurPoint); end SyncTaskValue(WLLS_TASKID_HONOUR) end end --¼ì²éÊÇ·ñ¿ÉÒÔ½¨Á¢Õ½¶Ó function wlls_cancreate(n_level) local n_mylevel = wlls_player_level() --µÈ¼¶ÏÞÖÆ if (n_mylevel ~= n_level) then if (n_level == 1) then if (n_mylevel < n_level) then wlls_descript("<enter> <color=red>Vâ l©m liªn ®Êu<color> héi tô tÊt cae c¸c anh hïng, nhng cÊp ®é cña b¹n kh«ng ®ñ! Ph¶i ®¹t level "..WLLS_LEVEL_JUNIOR.." trë lªn th× míi cã thÓ tham gia!") else wlls_descript("<enter> C¸c h¹ ®· lµ ®¹i hiÖp giang hå ®Ønh ®Ønh ®¹i danh, <color=red>liªn ®Êu Vâ l©m kiÖt xuÊt<color> lµ ®Ó chän ra nh÷ng tµi n¨ng trÎ, ng¬i cÇn g× ph¶i ra oai víi ®¸m hËu bèi chø? Hay lµ ng¬i tham gia <color=red>Vâ l©m liªn ®Êu<color> ®i!") end else wlls_descript("<enter> <color=red>Vâ l©m liªn ®Êu<color> vÉn lµ n¬i Anh hïng thiªn h¹ luËn kiÕm, ®¼ng cÊp cña ng¬i vÉn cha ®ñ!"..WLLS_LEVEL_SENIOR.."cÊp, anh hïng kh¾p n¬i tÒ tô, ngäa hæ tµng long, e r»ng ng¬i chØ lµ kÎ hËu bèi! Tèt h¬n nªn luyÖn tËp thªm!") end return nil end if (not FALSE(LG_GetLeagueObjByRole(WLLS_LGTYPE, GetName()))) then wlls_descript("<enter> C¸c h¹ ®· vµo nhãm råi, kh«ng thÓ thµnh lËp nhãm kh¸c!") return nil end return wlls_player_type() end --ÎÒµÄÕ½¶Ó function wlls_mylg() local n_lid = LG_GetLeagueObjByRole(WLLS_LGTYPE, GetName()) local n_type if (FALSE(n_lid)) then n_type = GetGlbValue(GLB_WLLS_NEXT) else n_type = LG_GetLeagueTask(n_lid, WLLS_LGTASK_STYPE) end WLLS_TAB[n_type].npc_mylg() end function wlls_want2create() local n_level = wlls_getcityinfo() local n_next = GetGlbValue(GLB_WLLS_NEXT) if (not wlls_cancreate(n_level)) then return end wlls_descript("<enter>"..WLLS_TAB[n_next].text_creat, "Ta muèn lËp ®éi!/wlls_inputstr_lgname", "Suy nghÜ l¹i/OnCancel") end --ÊäÈëÕ½¶ÓÃû function wlls_inputstr_lgname() local n_level = wlls_getcityinfo() if (not wlls_cancreate(n_level)) then return end AskClientForString("wlls_createleague", "", 1, 16, "NhËp vµo tªn nhãm") end --½¨Á¢Õ½¶Ó£¨×îÖÕ£© function wlls_createleague(str_lgname) if (not str_lgname) then str_lgname = GetName() end local n_level = wlls_getcityinfo() local n_mtype = wlls_cancreate(n_level) if (not n_mtype) then return end str_lgname = strsub(str_lgname,1,16) local forbidstr={" ","\"","/","#","|","\t","\n"} local str for i = 1, getn(forbidstr) do if (not FALSE(strfind(str_lgname,forbidstr[i]))) then str = "Xin lçi! Tªn kh«ng ®îc cã ký tù: " for i = 1, getn(forbidstr) do if (forbidstr[i]==" ") then str = str .. " [Space]" elseif (forbidstr[i]=="|") then str = str .. " [chôp h×nh]" elseif (forbidstr[i]=="\t") then str = str .. "[TAB]" elseif (forbidstr[i]=="\n") then str = str .. " [Enter]" else str = str .. forbidstr[i] end end break end end if (not str) then if (not FALSE(LG_GetLeagueObj(WLLS_LGTYPE, str_lgname))) then str = "Xin lçi! Tªn nhãm ®· ®îc sö dông" elseif (FALSE(ST_CheckTextFilter(str_lgname))) then str = "Xin lçi! Tªn nhãm cã ký tù kh«ng ®óng" end end if (str) then Say(wlls_npcname()..str, 2, "NhËp l¹i!/wlls_inputstr_lgname", "Kh«ng cÇn!/OnCancel") return end local n_next = GetGlbValue(GLB_WLLS_NEXT) local szParam = GetName().." "..n_next.." "..n_mtype.." "..str_lgname LG_ApplyDoScript(WLLS_LGTYPE, str_lgname, GetName(), "\\script\\leaguematch\\league.lua", "wlls_create", szParam , "", "") SetRespect(0) end --Ìí¼Ó³ÉÔ±£¨¶Ô»°£© function wlls_want2addmember() local teammember, _, str_lgname = wlls_checkteam() if (teammember == nil) then return end local str = wlls_npcname().."B¹n muèn nh÷ng ngêi díi ®©y"..getn(teammember).."gia nhËp nhãm cña b¹n ["..str_lgname.."] ph¶i kh«ng?<enter>"; for i = 1, getn(teammember) do str = str.." <color=yellow>"..teammember[i]; end Say(str, 2, "§óng råi! §¨ng ký ®Ó anh Êy (c« Êy) gia nhËp ®éi thi ®Êu/wlls_sure2addmember","Kh«ng cÇn!/OnCancel") end --Ìí¼Ó³ÉÔ±£¨×îÖÕ£© function wlls_sure2addmember() local teammember = wlls_checkteam() if (teammember == nil) then return end local n_lid = LG_GetLeagueObjByRole(WLLS_LGTYPE, GetName()) local str_lgname = LG_GetLeagueInfo(n_lid) for i = 1, getn(teammember) do local nPlayerIndex = SearchPlayer(teammember[i]) if nPlayerIndex > 0 then CallPlayerFunction(nPlayerIndex, SetRespect, 0) local szParam = teammember[i].." "..str_lgname.." "..GetName() LG_ApplyDoScript(WLLS_LGTYPE, str_lgname, teammember[i], "\\script\\leaguematch\\league.lua", "wlls_add", szParam , "", "") end end end --¼ì²é×é¶Ó¶ÓÔ±ÊÇ·ñ¿ÉÒÔ±»Ìí¼Óµ½µ±Ç°¶ÓÎéÖУ¬³É¹¦·µ»Ø×é¶Ó¶ÓÔ±Ãûµ¥¡¢Õ½¶ÓÀµÐÍ¡¢Õ½¶ÓÃû£¬·ñÔò·µ»Ønil function wlls_checkteam() if (IsCaptain() ~= 1) then Say(wlls_npcname().."Xin lçi! B¹n cÇn ph¶i lµ <color=red> ®éi trëng<color> trong <color=red>nhãm<color>, míi cã thÓ ®¨ng ký ®éi viªn gia nhËp chiÕn ®éi.",0) return nil end local teamsize = GetTeamSize() if (teamsize < 2) then Say(wlls_npcname().."Nhãm cña b¹n h×nh nh kh«ng cã thµnh viªn nhãm kh¸c? B¹n muèn cho ai vµo chiÕn ®éi cña m×nh?",0) return nil end local n_lid, n_mtype, n_job, str_lgname, n_mcount = wlls_lg_info() if (FALSE(n_lid)) then Say(wlls_npcname().."Xin lçi! B¹n cha lËp nhãm, kh«ng thÓ cho ngêi kh¸c vµo nhãm!", 0) return nil end if (n_job ~= 1) then Say(wlls_npcname().."Xin lçi! B¹n kh«ng ph¶i lµ ®éi trëng, kh«ng thÓ cho ngêi kh¸c vµo chiÕn ®éi!", 0) return nil end local n_next = GetGlbValue(GLB_WLLS_NEXT) local n_stype = LG_GetLeagueTask(n_lid, WLLS_LGTASK_STYPE) if (n_stype ~= n_next) then Say(wlls_npcname().."Xin lçi! Lo¹i h×nh liªn ®Êu kú sau ®· thay ®æi, chiÕn ®éi cña b¹n hiÖn t¹i ®· qu¸ h¹n, kh«ng thÓ tiÕp tôc sö dông.", 0) return nil end local n_maxmem = WLLS_TAB[n_next].max_member n_mcount = n_maxmem - n_mcount if (n_mcount <= 0) then Say(wlls_npcname().."Xin lçi! ChiÕn ®éi cña b¹n ["..str_lgname.."]®· ®ñ sè lîng, kh«ng thÓ gia nhËp thªm ®éi viªn!",0) return nil end if (GetTeamSize()-1 > n_mcount) then Say(wlls_npcname().."Xin lçi! ChiÕn ®éi cña b¹n ["..str_lgname.."]chØ cÇn nhËp l¹i "..n_mcount.." ngêi, kh«ng thÓ cho toµn bé thµnh viªn cña b¹n gia nhËp! Xin h·y cho thµnh viªn thõa t¹m thêi rêi khái nhãm!",0) return nil end local teammember = {} local str_capname = GetName() local n_capidx = PlayerIndex for i = 2 , teamsize do PlayerIndex = GetTeamMember(i) local membername = GetName() --±ÜÃâÖظ´¼ÓÈë¶ÓÔ± if (not FALSE(LG_GetLeagueObjByRole(WLLS_LGTYPE, membername))) then PlayerIndex = n_capidx Say(wlls_npcname().."Xin lçi! §éi viªn trong nhãm:"..membername.." ®· lµ thµnh viªn cña chiÕn ®éi kh¸c, cho nªn kh«ng thÓ vµo chiÕn ®éi cña b¹n!", 0) return nil end --¼ÓÈë¶ÓÔ±ÌØÊâ¼ì²é local str = wlls_check_addmem(n_capidx, n_lid, n_mtype) if (str) then PlayerIndex = n_capidx Say(wlls_npcname()..str, 0) return nil end teammember[i-1] = membername end PlayerIndex = n_capidx return teammember, n_mtype, str_lgname end --À뿪ս¶Ó£¨¶Ô»°£© function wlls_want2leaveleague() local n_lid, str = wlls_check_leavelg() if (FALSE(n_lid)) then Say(wlls_npcname()..str, 0) return end local str_lgname, _, n_memcount = LG_GetLeagueInfo(n_lid) local n_job = LG_GetMemberTask(WLLS_LGTYPE, str_lgname, GetName(), WLLS_LGMTASK_JOB) local str = wlls_npcname().."Ng¬i muèn rêi khái chiÕn ®éi ["..str_lgname.."]ph¶i kh«ng?" if(n_memcount <= 1) then str = str .. "B¹n hiÖn lµ <color=red>thµnh viªn duy nhÊt<color> cña chiÕn ®éi cña b¹n. NÕu nh b¹n rêi khái chiÕn ®éi, chiÕn ®éi sÏ bÞ gi¶i t¸n." elseif (not FALSE(n_job)) then local n_type = LG_GetLeagueTask(n_lid, WLLS_LGTASK_STYPE) if (n_type == 3) then --ʦͽÈü str = str .. "HiÖn t¹i b¹n lµ <color=red>®éi trëng (s phô)<color> cña chiÕn ®éi, nÕu b¹n rêi khái chiÕn ®éi, ®å ®Ö cña b¹n sÏ <color=red>kh«ng ®îc tham gia thi ®Êu<color>." else --ÆäËûÁªÈü str = str .. "B¹n hiÖn lµ <color=red>§éi trëng<color>, nÕu nh b¹n rêi khái nhãm, chøc §éi trëng sÏ ®îc chuyÓn cho thµnh viªn kh¸c." end end Say(str, 2, "§óng vËy!/wlls_sure2leaveleague","Kh«ng cÇn!/OnCancel") end --À뿪ս¶Ó£¨È·È϶Ի°£© function wlls_sure2leaveleague() local n_lid, str = wlls_check_leavelg() if not n_lid then Say(wlls_npcname()..str, 0) return end Say(wlls_npcname().."Sau khi b¹n rêi khái nhãm, sÏ <color=yellow>kh«ng thÓ l·nh gi¶i thëng cña chiÕn ®éi<color>, b¹n x¸c nhËn muèn rêi khái nhãm?", 2, "§óng vËy!/wlls_leaveleague_final","Kh«ng cÇn!/OnCancel") end --À뿪ս¶Ó£¨×îÖÕ£© function wlls_leaveleague_final() local n_lid, str = wlls_check_leavelg() if not n_lid then Say(wlls_npcname()..str, 0) return end LG_ApplyDoScript(WLLS_LGTYPE, "", GetName(), "\\script\\leaguematch\\league.lua", "wlls_leave", GetName() , "", "") end --½øÈë»á³¡£¨¶Ô»°£© function wlls_want2signmap() local n_matchphase = GetGlbValue(GLB_WLLS_PHASE) if (n_matchphase < 2) then Say(wlls_npcname().."Hiªn t¹i lµ thêi gian liªn ®Êu t¹m nghØ, héi trêng sÏ t¹m ®ãng cöa, b¹n h·y chê ®Õn kú thi ®Êu h·y quay l¹i!", 0) return end local n_level, n_group = wlls_getcityinfo() local n_lid, n_mtype = wlls_check_player(GetName(), n_level) local n_type = GetGlbValue(GLB_WLLS_TYPE) if (FALSE(n_lid)) then local str_des = wlls_get_desc(1) if (WLLS_TAB[n_type].max_member == 1) then wlls_descript("B¹n cha "..str_des.."chiÕn ®éi, nÕu tham gia thi ®Êu, hÖ thèng sÏ lËp cho b¹n 1 chiÕn ®éi. B¹n cã muèn lËp 1 chiÕn ®éi kh«ng?", "Ta muèn lËp chiÕn ®éi!/#wlls_createleague()", "Ta kh«ng muèn thi ®Êu!/OnCancel") else wlls_descript("<enter> LÇn nµy"..str_des.." cha thÊy b¸o danh chiÕn ®éi cña b¹n, cã nhÇm lÉn g× kh«ng? Quy ®Þnh cña Vâ l©m minh chñ nghiªm ngÆt, ta muèn gióp ng¬i còng kh«ng ®îc. §¹i hiÖp h·y ®i x¸c nhËn l¹i, råi h·y ®Õn t×m ta!") end return end if (not WLLS_TAB[n_type].match_type[n_mtype].map[n_group]) then n_group = 1 end --¼Ç¢¼È볡µØµã local x,y,z = GetWorldPos(); SetTask(WLLS_TASKID_FROMMAP, x); SetTask(WLLS_TASKID_FROM_X, y); SetTask(WLLS_TASKID_FROM_Y, z); --´«Ë͵½±¨ÃûµãµØͼ local n_signmap = wlls_get_mapid(1, n_mtype, n_group) NewWorld(n_signmap, WLLS_MAPPOS_SIGN[1], WLLS_MAPPOS_SIGN[2]) Msg2Player("B¹n ®Õn <color=yellow>"..wlls_get_desc(3, n_mtype, n_group).."<color> khu vùc liªn ®Êu") tbLog:PlayerActionLog("TinhNangKey","BaoDanhThamGiaLienDau") end --¼ì²éÊÇ·ñ¿ÉÒÔÀ뿪ս¶Ó¡£¿ÉÒÔ·µ»Øn_lid£¬·ñÔò·µ»Ønil,ÔÒò×Ö·û´® function wlls_check_leavelg() local n_lid = LG_GetLeagueObjByRole(WLLS_LGTYPE, GetName()) if(n_lid == 0) then return nil, "B¹n vÉn cha vµo chiÕn ®éi!" end local n_total = LG_GetLeagueTask(n_lid, WLLS_LGTASK_TOTAL) local n_phase = GetGlbValue(GLB_WLLS_PHASE) if(n_phase ~= 1 and n_total ~= 0) then return nil, "Do chiÕn ®éi cña b¹n ®ang thi ®Êu, b¹n kh«ng thÓ rêi khái chiÕn ®éi, h·y chê ®Õn lóc thi ®Êu xong h·y quay l¹i!" end if(n_phase > 3) then return nil, "§ang trong thi ®Êu, kh«ng thÓ rêi khái chiÕn ®éi, xin ®îi sau trËn ®Êu lóc thêi gian nghØ ng¬i míi rêi khái chiÕn ®éi." end return n_lid end --È¡µÃµ±Ç°ÁªÈüÅÅÃû½±ÀøÖÁÉÙÐèÒª¶µÉÙÃû function wlls_get_award_min() local n_type = GetGlbValue(GLB_WLLS_TYPE) local n_level = wlls_getcityinfo() local tb = WLLS_TAB[n_type].award_rank[n_level] return tb[getn(tb)][1] end --¾ÑéÁìÈ¡¿ª¹Ø function wlls_show_expswitch() local b_exps = GetBit(GetTask(WLLS_TASKID_SWITCH), 1) local str = "<enter> PhÇn thëng vâ l©m liªn ®Êu lÇn nµy phong phó l¾m! NÕu c¸c ng¬i kh«ng muèn sö dông ngay ®iÓm kinh nghiÖm th× ë chç ta cã thiÕt lËp nót ®ãng, më ®iÓm kinh nghiÖm, ng¬i cã thÓ khãa phÇn thëng ®iÓm kinh nghiÖm cña m×nh.<enter>" str = str.."<enter> Tr¹ng th¸i ®ãng/më hiÖn t¹i cña b¹n lµ:"..iif(b_exps == 0, "<color=red>më<color> (cã thÓ nhËn phÇn thëng kinh nghiÖm) ", "<color=red>®ãng<color> (kh«ng thÓ nhËn phÇn thëng kinh nghiÖm) ").."" wlls_descript(str, iif(b_exps == 0, "Ta muèn ®ãng phÇn thëng/#wlls_set_expswitch(1)", "Ta muèn më phÇn thëng/#wlls_set_expswitch(0)"), "§îc th«i! Ta ®· thiÕt lËp xong råi!/OnCancel") end --ÉèÖþÑéÁìÈ¡¿ª¹Ø function wlls_set_expswitch(b_exps) local n_switch = GetTask(WLLS_TASKID_SWITCH) SetTask(WLLS_TASKID_SWITCH, SetBit(n_switch, 1, b_exps)) Talk(1, "wlls_show_expswitch", "Thµnh c«ng"..iif(b_exps == 0, "më ", "§ãng").."phÇn thëng kinh nghiÖm liªn ®Êu!") end --ÓÃÈÙÓþ»»È¡ÉÌÆ· function wlls_buy_honour() if (CheckGlobalTradeFlag() == 0) then -- È«¾Ö¾¼Ãϵͳ½»Ò׿ª¹Ø return end Msg2Player("B¹n cã <color=yellow>"..GetTask(WLLS_TASKID_HONOUR).."<color> ®iÓm uy tÝn") if (GetBoxLockState() == 0) then Sale(146,11) -- É̵êµÄÈÙÓþ»ý·Ö±µºÅΪ11 else Say(wlls_npcname()..": më khãa r¬ng tríc khi mua! ", 0) end end function wlls_ShowRespect() Talk(1, "", "§iÓm vinh dù cña b¹n hiÖn t¹i lµ <color=yellow>"..GetRespect().."<color>") end --ÓÃÈÙÓþ»»È¡ÉÌÆ· function wlls_buy_Respect() if (CheckGlobalTradeFlag() == 0) then -- È«¾Ö¾¼Ãϵͳ½»Ò׿ª¹Ø return end --ÔÚÃûÍûÉ̵êÈ¡Ïû¢ôµÀ¾ßµÄÏÞÖÆ- Modified by DinhHQ - 20110429 -- local nDate = tonumber(GetLocalDate("%d")) -- if (nDate >= 8 and nDate <= 28) then -- Talk(1, "", "HiÖn t¹i kh«ng thÓ mua ®¹o cô danh väng") -- return -- end Msg2Player("B¹n ®ang cã <color=yellow>"..GetRespect().."<color> ®iÓm vinh dù") if (GetBoxLockState() == 0) then Sale(173,13) -- É̵êµÄÈÙÓþ»ý·Ö±µºÅΪ11 else Say(wlls_npcname()..": më khãa r¬ng tríc khi mua! ", 0) end end
Khách viếng thăm hãy cùng Slayer xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!
Các Chủ đề tương tự
-
[JX] Nhờ các Cao thủ chuyên về Linux viết giúp cẩm nang Ebook 1.0 sever linux
Bởi tvnnam trong diễn đàn Hỏi Đáp/ Yêu CầuTrả lời: 6Bài viết cuối: 15-02-17, 08:16 PM -
[JX] Xin đường dẫn file chuyển phái Linux
Bởi tapdevjxlinux trong diễn đàn Hỏi Đáp/ Yêu CầuTrả lời: 0Bài viết cuối: 16-06-15, 08:36 PM -
[JX] Hỏi về cải lão chuyển sinh JX linux
Bởi ngungucute1999 trong diễn đàn Hỏi Đáp/ Yêu CầuTrả lời: 0Bài viết cuối: 13-03-15, 11:14 PM -
[JX] Lấy spr của linux chuyển qua sv win.
Bởi voanhnhat20010 trong diễn đàn Hỏi Đáp/ Yêu CầuTrả lời: 2Bài viết cuối: 07-07-14, 07:07 PM -
[JX] Chuyển server linux VNG từ Linux sang máy Thật !!!
Bởi kenlucky2000 trong diễn đàn Hỏi Đáp/ Yêu CầuTrả lời: 6Bài viết cuối: 24-04-14, 07:44 PM