[JX] [Việt Hóa] Tổng hợp những gì VH anh em đóng góp vào đây. - Trang 64
Hello & Welcome to our community. Is this your first visit? Đăng Ký
Follow us on
Follow us on Facebook Follow us on Twitter Linked In Flickr Watch us on YouTube My Space Blogger
 
Trang 64 của 146 Đầu tiênĐầu tiên ... 14 54 62 63 64 65 66 74 114 ... CuốiCuối
Kết quả 631 đến 640 của 1454
  1. #631
    Thành Viên
    Ngày tham gia
    Aug 2008
    Bài viết
    175
    Thanks
    48
    Thanked 22 Times in 15 Posts

    Ðề: [Việt Hóa] Tổng hợp những gì VH anh em đóng góp vào đây.

    Trích dẫn Gửi bởi beongo26 [Only registered and activated users can see links. ]
    tiệm tạp hóa mình thấy #1 có người việt hóa rùi mà
    mình không thấy. bạn có không share cho mình đi
    Khách viếng thăm hãy cùng xnickx82 xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!

  2. #632
    Thành Viên
    Ngày tham gia
    Oct 2012
    Bài viết
    217
    Thanks
    20
    Thanked 13 Times in 11 Posts

    Ðề: [Việt Hóa] Tổng hợp những gì VH anh em đóng góp vào đây.

    Trích dẫn Gửi bởi xnickx82 [Only registered and activated users can see links. ]
    mình không thấy. bạn có không share cho mình đi
    nhầm cái đó là fjx tạp hóa , bạn cho hỏi là mấy thằng NPC tên ò ý e s mình sữa được không bạn
    Khách viếng thăm hãy cùng beongo26 xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!

  3. #633
    Thành Viên
    Ngày tham gia
    Aug 2008
    Bài viết
    175
    Thanks
    48
    Thanked 22 Times in 15 Posts

    Ðề: [Việt Hóa] Tổng hợp những gì VH anh em đóng góp vào đây.

    Trích dẫn Gửi bởi beongo26 [Only registered and activated users can see links. ]
    nhầm cái đó là fjx tạp hóa , bạn cho hỏi là mấy thằng NPC tên ò ý e s mình sữa được không bạn
    mình cũng chẳng biết nữa. có nhiều file việt hóa có font, mà server linux của mình no font nên cũng chẳng biết cài làm sao nữa.
    Khách viếng thăm hãy cùng xnickx82 xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!

  4. #634
    Moderator vipbk's Avatar
    Ngày tham gia
    May 2012
    Đang ở
    đây
    Bài viết
    5,112
    Thanks
    248
    Thanked 3,006 Times in 1,888 Posts

    Ðề: [Việt Hóa] Tổng hợp những gì VH anh em đóng góp vào đây.

    Trích dẫn Gửi bởi beongo26 [Only registered and activated users can see links. ]
    [Only registered and activated users can see links. ]
    có anh chị nào biết Thằng Áo Trắng này ở file nào để việt hóa k chỉ em với cảm ơn nhìu
    Bắc Đẩu Lão Nhân: script\event\springfestival08\allbrother\beidoulao ren.lua
    Khách viếng thăm hãy cùng vipbk xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!

  5. #635
    Thành Viên Tâm Huyết
    Ngày tham gia
    Aug 2008
    Bài viết
    959
    Thanks
    338
    Thanked 585 Times in 249 Posts

    Ðề: [Việt Hóa] Tổng hợp những gì VH anh em đóng góp vào đây.

    anh em dùng lại cái lang này nhé. qua phê phê up nhầm 1 file lên @@. nay up lại cho anh em ....
    File Kèm Theo File Kèm Theo
    Khách viếng thăm hãy cùng nhaodzo xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!

  6. The Following 4 Users Say Thank You to nhaodzo For This Useful Post:

    jxvietnam (09-05-14), Kimyuna (09-05-14), lengoctuandng (25-07-15), vipbk (09-05-14)

  7. #636
    Thành Viên
    Ngày tham gia
    Oct 2012
    Bài viết
    217
    Thanks
    20
    Thanked 13 Times in 11 Posts

    Ðề: [Việt Hóa] Tổng hợp những gì VH anh em đóng góp vào đây.

    Trích dẫn Gửi bởi vipbk [Only registered and activated users can see links. ]
    Bắc Đẩu Lão Nhân: script\event\springfestival08\allbrother\beidoulao ren.lua
    cảm ơn anh nhìu nha việt hóa hết chữ tàu là có tiếng việt phải không anh
    anh có file station không file ở #1 share viết thành 1 nùi không biết đường chỉnh sửa luôn
    Khách viếng thăm hãy cùng beongo26 xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!

  8. #637
    Moderator vipbk's Avatar
    Ngày tham gia
    May 2012
    Đang ở
    đây
    Bài viết
    5,112
    Thanks
    248
    Thanked 3,006 Times in 1,888 Posts

    Ðề: [Việt Hóa] Tổng hợp những gì VH anh em đóng góp vào đây.

    Trích dẫn Gửi bởi nhaodzo [Only registered and activated users can see links. ]
    anh em dùng lại cái lang này nhé. qua phê phê up nhầm 1 file lên @@. nay up lại cho anh em ....
    nhầm mà cũng khá ngon rồi đấy

    Trích dẫn Gửi bởi beongo26 [Only registered and activated users can see links. ]
    cảm ơn anh nhìu nha việt hóa hết chữ tàu là có tiếng việt phải không anh
    anh có file station không file ở #1 share viết thành 1 nùi không biết đường chỉnh sửa luôn
    Code:
    Include("\\script\\missions\\citywar_global\\head.lua");
    Include("\\script\\missions\\citywar_city\\head.lua");
    Include("\\script\\missions\\clearskill\\clearhole.lua");
    Include("\\script\\task\\tollgate\\messenger\\wagoner.lua");  --ÌØÊâÐÅʹµØͼ
    
    Include("\\script\\task\\newtask\\map_index.lua"); -- ÓÃÓÚ»ñÈ¡ÈÎÎñÁ´µØͼµÄÐÅÏ¢
    Include("\\script\\task\\tollgate\\messenger\\wagoner.lua") --ÓÃÓÚÁ¬½ÓÌØÊâÐÅʹÈÎÎñµÄ½Å±¾
    Include("\\script\\global\\judgeoffline_special.lua")	--ÓÃÓÚÎÞÃû¹È¡ª¡ªÍйܷþÎñÆ÷µØͼ
    
    Include("\\script\\activitysys\\g_activity.lua")
    Include("\\script\\dailogsys\\g_dialog.lua")
    Include("\\script\\activitysys\\playerfunlib.lua")
    Include("\\script\\event\\zhongqiu_jieri\\200909\\rongshu\\head.lua")
    
    Include("\\script\\event\\great_night\\great_night_head.lua")	--Ë«Áú¶´»Æ½ðÖ®ºË
    --§iÒu chØnh reset 5h ch¬i - Modified by DinhHQ - 20110630
    Include("\\script\\vng_feature\\challengeoftime\\npcNhiepThiTran.lua")
    szStationOp = 
    	{
    		"Nh÷ng n¬i ®· ®i qua/WayPointFun", 		-- 1
    		"Nh÷ng thµnh thÞ ®· ®i qua/StationFun",		-- 2
    		"Trë l¹i ®Þa ®iÓm cò/TownPortalFun", 	-- 3
    		"§i Hoa S¬n c¶nh kü tr­êng/go_HSBattle", 	-- 4
    		"§i c«ng thµnh chiÕn tr­êng/GoCityWar",			-- 5
    		"§i c«ng thµnh huÊn luyÖn chiÕn tr­êng/GoDemoWar",		-- 6
    		"§i ®¶o tÈy tñy/GotoClearSkillMap",	-- 7
    		"§i ®Õn n¬i lµm nhiÖm vô d· tÈu/tl_moveToTaskMap",			-- 8
    		"§i tíi n¬i lµm nhiÖm vô tÝn sø/messenger_wagoner",      -- 9
    		--"È¥ÎÞÃû¹È/GotoAnonymVale"			--10
    	};
    
    function return_1()
    	return 1
    end
    
    function return_0()
    	return 0
    end
    
    -- ¶ÔÓ¦ÉϸöÊý×éµÄÌõ¼þÅжÏ
    aryCondition = {
    
    	[1] = {checkState = return_1},     -- ¢·¾­µÄµØ·½
    	[2] = {checkState = return_1},     -- ¢·¾­µÄ³ÇÊÐ
    	[3] = {checkState = return_1},     -- ·µ»ØµÄµØµã
    	[4] = {checkState = return_1},     -- È¥»ªÉ½¾º¼¼³¡
    	[5] = {checkState = function()                      -- È¥¹¥³ÇÕ½³¡
    				return (WhichWarBegin()~= 0 and 1) or 0;
    		   end;
    		  },
    	[6] = {checkState = function()                      -- È¥¹¥³ÇѵÁ·Õ½³¡
    				return (GetGlbValue(2)==1 and 1) or 0;
    		   end;
    		  },
    	[7] = {checkState = return_1},     -- ȥϴË赺
    	[8] = {checkState = function()                      -- È¥Ò°ÛÅÈÎÎñËùÔÚµØ
    				return (GetTask(1021)==4 and 1) or 0;
    		   end;
    		  },
    	[9] = {checkState = function()                      -- È¥ÌØÊâÐÅʹÈÎÎñËùÔڵصã
    				return (GetTask(1204)~= 0 and 1) or 0;
    		   end;
    		  },
    	--[10] = {checkState = return_1},    -- ½øÈëÎÞÃû¹È
    	[10] = {checkState = return_1},     -- ¢·¾­µÄµØ·½
    	[11] = {checkState = return_1},
    	[12] = {checkState = return_1},
    }
    
    szStationOp_Cancel = "Kh«ng cÇn/StationOnCancel";
    
    function go_HSBattle()
    	Msg2Player("Ngåi yªn chóng ta ®i Hoa S¬n")
    	NewWorld(2,2605,3592)
    	SetProtectTime(18*3) --ÈýÃë±£»¤Ê±¼ä
    	AddSkillState(963, 1, 0, 18*3) 		
    end
    
    function WayPointFun()			-- ¼Ó·µ»ØÒª800Á½Òø×Ó£¨¶´¿Ú£©¡¡¡¡¡¡£¨BY£º Dan_Deng 2004-04-30£©
    	p1 = GetWayPoint(1);
    	p2 = GetWayPoint(2);
    	p3 = GetWayPoint(3);
    	HaveBin={};
    	i = 1;
    	if (p1 ~= 0)  then
    		name = GetWayPointName(p1);
    		name = name .."/SelWayPoint";
    		HaveBin[i]= name;
    		i = i + 1;
    	end;
    	if (p2 ~= 0)  then
    		name = GetWayPointName(p2);
    		name = name .."/SelWayPoint";
    		HaveBin[i]= name;
    		i = i + 1;
    	end;
    	if (p3 ~= 0)  then
    		name = GetWayPointName(p3);
    		name = name .."/SelWayPoint";
    		HaveBin[i]= name;
    		i = i + 1;
    	end;
    	HaveBin[i] = "Kh«ng muèn ®i ®©u c¶/OnCancel";
    	if (i == 1) then 
    		Say("ThËt xin lçi ta chØ cã thÓ ®­a ngµi tíi n¬i ngµi ®· ®i qua",0);
    	else
    		Say("Mêi lùa chän", i, HaveBin);
    	end;
    end;
    
    function WharfFun()
    Count = GetWharfCount(CurWharf);
    Num = Count;
    
    WharfB = {};
    nValidCount = 1;
    
    for i = 1, Num do
    WharfId = GetWharf(CurWharf, i);
    if (WharfId ~= 0) then
    	nPrice = GetWharfPrice(CurWharf, WharfId);
    	WharfB[nValidCount] = GetWharfName(WharfId) .. "[" .. nPrice .. "Á½]" .. "/SelWharf";
    	nValidCount = nValidCount + 1;
    end;
    end;
    
    WharfB[nValidCount] = "Kh«ng ®i/OnCancel";
    
    if (nValidCount == 1) then 
    Say("ThËt xin lçi n¬i ®ã ngµi ch­a ®i tíi", 0);
    else
    Say("ThuyÒn phu: ng­¬i nghÜ ®i chç nµo nha : ", nValidCount, WharfB);
    end;
    
    end;
    
    function SelWharf(nSel)
    
    nWharfId = GetWharf( CurWharf, nSel + 1);
    nPrice = 0;
    if 
    (nWharfId ~= 0) then 
    	nPrice = GetWharfPrice(CurWharf, nWharfId);
    else
    	return
    end;
    
    if (PrePay(nPrice) == 1 or GetCamp() == 6 ) then
    Msg2Player("Ngåi yªn chóng ta ®i nµo"..GetWharfName(nWharfId))
    nW , nX, nY = GetWharfPos(nWharfId);
    nResult = NewWorld(nW, nX , nY );
    	SetProtectTime(18*3) --ÈýÃë±£»¤Ê±¼ä
    	AddSkillState(963, 1, 0, 18*3) 		
    if (nResult == 2) then
    Msg2Player("Phôc vô khÝ chuyÓn ®æi trung...")
    end
    if (nResult == 0) then
    Msg2Player("TruyÒn tèng vµo ®iÓm cã sai lÇm")
    end
    else
    Say("ThËt ng¹i kh«ng cã tiÒn th× kh«ng thÓ ®i xe", 0);
    end;
    end;
    
    
    function StationFun()
    	for j = 1, 16 do
    		AddStation(j)
    	end
    	Count = GetStationCount();
    	Num = Count;
    	if (Count > 10) then
    		Num = 10
    	end
    	StationB = {}
    	nValidCount = 1
    
    	for i = 1, Num do
    		StationId = GetStation(i, CurStation)
    		if (StationId ~= 0) then
    			nPrice = GetPrice2Station(CurStation, StationId)
    	StationB[nValidCount] = GetStationName(StationId) .. "[" .. nPrice .. "l­îng]" .. "/SelStation";
    			nValidCount = nValidCount + 1
    		end
    	end
    StationB[nValidCount] = "Kh«ng muèn ®i n¬i nµo c¶//OnCancel";
    
    	if (nValidCount == 1) then 
    Say("ThËt xin lçi ta chØ cã thÓ ®­a ngµi tíi n¬i ngµi ®· ®i qua", 0);
    	else
    Say("Xin mêi chän ®Þa ®iÓm", nValidCount, StationB);
    	end
    end
    
    function SelStation(nSel)
    	Count = GetStationCount()
    	nStation = GetStation(nSel + 1, CurStation)
    	nPrice = GetPrice2Station(CurStation, nStation)
    	if (PrePay(nPrice) == 1 or GetCamp() == 6) then
    		nW, nX, nY = GetStationPos(nStation);
    		nResult = NewWorld(nW, nX , nY );
    	SetProtectTime(18*3) --ÈýÃë±£»¤Ê±¼ä
    	AddSkillState(963, 1, 0, 18*3) 		
    Msg2Player("Ngåi yªn chóng ta ®i nµo"..GetStationName(nStation))
    		if (nResult == 2) then
    			--Msg2Player("·þÎñÆ÷ת»»ÖÐ...")
    		end
    		if (nResult == 0) then
    Msg2Player("TruyÒn tèng tíi ®iÓm cã sai lÇm")
    		end
    	--§iÒu chØnh reset 5h ch¬i - Modified by DinhHQ - 20110630
    	local nSongJinCount = PlayerFunLib:GetTaskDailyCount(1926)
    	if nSongJinCount >= 1 or tbCOT_Party:GetDailyTaskCount() >= 1 then
    		SetTireTime(0)
    	end
    
    	else
    Say("ThËt ng¹i kh«ng cã tiÒn th× kh«ng thÓ ®i ®©u ®­îc", 0);
    	end
    end
    
    function TownPortalFun()			-- ·µ»ØÒª2000Á½Òø×Ó£¨Ô­µØµã£©¡¡¡¡£¨BY: Dan_Deng 2004-04-30£©
    --	if (PrePay(2000) == 1 or GetCamp() == 6) then
    		ReturnFromPortal()
    --	else
    --		Say("ThËt ng¹i kh«ng cã tiÒn th× kh«ng thÓ ®i ®©u ®­îc", 0)
    --	end
    end;
    
    function SelWayPoint(nSel)			-- ·µ»ØÒª1000Á½Òø×Ó£¨¶´¿Ú£©¡¡¡¡¡¡£¨BY£ºDan_Deng 2004-04-30£©
    --	if (PrePay(1000) == 1 or GetCamp() == 6) then
    		nWayPoint = GetWayPoint(nSel + 1);
    		if (nWayPoint ~= 0) then
    			nW, nX, nY = GetWayPointPos(nWayPoint)
    			nFightState = GetTerminiFState(nWayPoint)
    			nResult = NewWorld(nW, nX, nY)
    	SetProtectTime(18*3) --ÈýÃë±£»¤Ê±¼ä
    	AddSkillState(963, 1, 0, 18*3) 		
    			SetFightState(nFightState)
    --			Msg2Player("Goto"..GetWayPointName(nWayPoint)..nW..nX..nY);
    			if (nResult == 2) then
    --				Msg2Player("Phôc vô khÝ chuyÓn ®æi trung...")
    			end
    			if (nResult == 0) then
    --				Msg2Player("TruyÒn vµo ®iÓm cã sai lÇm.")
    			end
    		end;
    --	else									-- ²»¹»Ç®¾Í¾Ü¾ø
    --		Say("ThËt ng¹i kh«ng cã tiÒn th× kh«ng thÓ ®i u ®­îc", 0);
    --	end;
    end
    
    --³ÇÕ½ÊÇ·ñ¿ªÊ¼ÁË
    function WhichWarBegin()
    	for i = 1,7 do
    		if (HaveBeginWar(i) ~= 0) then
    			return i;
    		end;
    	end;
    	return 0;
    end;
    
    function CancelGoCityWar()
    	Say("C«ng thµnh chiÕn tr­êng lµ n¬i ®ao kiÕm v« t×nh, nÕu kh«ng tíi tham chiÕn th× h·y lÊy sinh m¹ng lµm träng, trë vÒ ®i", 0);
    end;
    
    function GoCityWar()
    	CityID = WhichWarBegin();
    	if (CityID >= 1 and CityID <= 7) then
    		Tong1, Tong2 = GetCityWarBothSides(CityID);
    		str = format("B©y giê %s c«ng thµnh chiÕn ®ang tiÕn hµnh, phe c«ng thµnh<%s>, phe thñ thµnh<%s>. Xin hái ngµi muèn gia nhËp phe nµo", GetCityAreaName(CityID), Tong1, Tong2);
    		Say(str , 3, "Phe c«ng thµnh/GoCityWarAttack", "Phe thñ thµnh/GoCityWarDefend", "Kh«ng ®i/CancelGoCityWar");
    	end;
    end;
    
    --È¥¹¥³ÇÕ½ÊØ·½Èë¿Ú
    function GoCityWarDefend()
    	CityID = WhichWarBegin();
    	if (CityID == 0 ) then 
    		return
    	end;
    
    	TongName, result = GetTong()
    	Tong1, Tong2 = GetCityWarBothSides(CityID);
    	if (Tong2 ~= TongName and GetItemCountEx(CardTab[CityID * 2]) < 1) then 
    		if (GetTask(TV_CITYID) ~= CityID or GetTask(TV_VALUE) ~= 1 or GetTask(TV_TASKID) ~= MISSIONID) then
    			Say("Th©n phËn kh«ng hîp lÖ, vui lßng trë vÒ!", 0);
    			return
    		end;
    	end;
    	
    	if (random(0,1) == 1) then
    		NewWorld(222, 1614, 3172);
    	SetProtectTime(18*3) --ÈýÃë±£»¤Ê±¼ä
    	AddSkillState(963, 1, 0, 18*3) 		
    	else
    		NewWorld(222, 1629, 3193);
    	SetProtectTime(18*3) --ÈýÃë±£»¤Ê±¼ä
    	AddSkillState(963, 1, 0, 18*3) 		
    	end;
    end;
    
    --È¥¹¥³ÇÕ½¹¥·½Èë¿Ú
    function GoCityWarAttack()
    	CityID = WhichWarBegin();
    	if (CityID == 0) then 
    		return
    	end;
    
    	TongName, result = GetTong()
    	Tong1, Tong2 = GetCityWarBothSides(CityID);
    	if (Tong1 ~= TongName and GetItemCountEx(CardTab[CityID * 2 - 1]) < 1) then
    		if (GetTask(TV_CITYID) ~= CityID or GetTask(TV_VALUE) ~= 2 or GetTask(TV_TASKID) ~= MISSIONID) then
    			Say("Th©n phËn kh«ng hîp lÖ, vui lßng trë vÒ!", 0);
    			return
    		end
    	end
    	
    	if (random(0,1) == 1) then
    		NewWorld(223, 1614, 3172);
    	SetProtectTime(18*3) --ÈýÃë±£»¤Ê±¼ä
    	AddSkillState(963, 1, 0, 18*3) 		
    	else
    		NewWorld(223, 1629, 3193);
    	SetProtectTime(18*3) --ÈýÃë±£»¤Ê±¼ä
    	AddSkillState(963, 1, 0, 18*3) 		
    	end;
    
    end;
    
    function GoDemoWar()
    	Say("C«ng thµnh tu luyÖn chiÕn b¾t ®Çu, ng­¬i thùc sù muèn tham gia??", 3,"Tham gia phe thñ thµnh!/GotoDefend", "Tham gia phe c«ng thµnh/GotoAttack", "Ta kh«ng muèn ®i/OnCancel") 
    
    end;
    
    function GotoDefend()
    if (random(0,1) == 1) then
    	NewWorld(222, 1614, 3172);
    	SetProtectTime(18*3) --ÈýÃë±£»¤Ê±¼ä
    	AddSkillState(963, 1, 0, 18*3) 		
    else
    	NewWorld(222, 1629, 3193);
    	SetProtectTime(18*3) --ÈýÃë±£»¤Ê±¼ä
    	AddSkillState(963, 1, 0, 18*3) 		
    end;
    end;
    
    function GotoAttack()
    	if (random(0,1) == 1) then
    		NewWorld(223, 1614, 3172);
    	SetProtectTime(18*3) --ÈýÃë±£»¤Ê±¼ä
    	AddSkillState(963, 1, 0, 18*3) 		
    	else
    		NewWorld(223, 1629, 3193);
    	SetProtectTime(18*3) --ÈýÃë±£»¤Ê±¼ä
    	AddSkillState(963, 1, 0, 18*3) 		
    	end;
    end;
    
    -- ȥϴµãµØͼ
    function GotoClearSkillMap()
    	-- ÔÝʱÆÁ±ÎȥϴµãµØͼµÄ¹¦ÄÜ
    	-- Say("³µ·ò£ºÃâ·ÑȥϴË赺µÄ»ú»áÖ»ÓÐÒ»´Î¡£Äã×îºÃ»¹ÊÇÏÈÊìϤһϢÕâ´ÎµÄ¼¼Äܵ÷Õû£¬³ÙÒ»µãÔÙÈ¥°É¡£", 1, "ÖªµÀÁË/gotocsm_no")
    
    	nSubWorldID = SubWorldIdx2ID();
    	nCityIndex = CSP_GetCityIndexByCityMap(nSubWorldID);
    	if (nCityIndex == -1) then
    		return -1;
    	end
    	
    	CSP_EnterClearMap(nCityIndex);	
    end;
    
    function gotocsm_no()
    end;
    
    function OnCancel()
    end;
    
    function goto_shijiangu()
    	NewWorld(949, floor(51264 / 32), floor(102368 / 32))
    end
    
    function _GoELangGu()
    	Msg2Player("§Õn ¸c lang cèc!")
    	local tbTargetMapList = {[11] = 950, [1] = 951, [37] = 952, 
    										[176] = 953, [162] = 954, [78] = 955, [80] = 956,}
    	local nMapId = GetWorldPos()
    	if tbTargetMapList[nMapId] then
     		NewWorld(tbTargetMapList[nMapId], 1592, 3195)
     	end
    end
    
    CITY_OPTIONS =
    {
    	{"Nh÷ng n¬i ®· ®i qua", 				WayPointFun}, 			-- 1
    	{"Nh÷ng thµnh thÞ ®· ®i qua",				StationFun},			-- 2
    	{"Trë l¹i ®Þa ®iÓm cò",				TownPortalFun}, 		-- 3
    	{"§i Hoa S¬n c¶nh kü tr­êng",			go_HSBattle}, 			-- 4
    	{"§i c«ng thµnh chiÕn tr­êng",				GoCityWar},				-- 5
    	{"§i c«ng thµnh huÊn luyÖn chiÕn tr­êng",			GoDemoWar},				-- 6
    	{"§i ®¶o tÈy tñy",				GotoClearSkillMap},		-- 7
    	{"§i ®Õn n¬i lµm nhiÖm vô d· tÈu",		tl_moveToTaskMap},		-- 8
    	{"§i tíi n¬i lµm nhiÖm vô tÝn sø",	messenger_wagoner},     -- 9
    	--{"È¥ÎÞÃû¹È",				GotoAnonymVale"			--10
    	--{"ȥТÁ½Ë®¶´",		OnGoToNewLiangShuiDong},-- 10
    	--{"È¥ÊÔ½£¹È",				goto_shijiangu},		-- 11
    	--{"È¥¶ñÀǹÈ",				_GoELangGu},
    }
    
    -- ³ÇÊгµ·òͨÓýű¾
    -- ×¢Ò⣺¹¥³ÇսδʹÓô˺¯ÊýµÄ½Å±¾ [script\missions\citywar_city\zhongzhuan_map\chefu.lua]
    function CityStationCommon(szMsg)
    	dofile("script/global/station.lua");
    	local nNpcIndex = GetLastDiagNpc();
    	local szNpcName = GetNpcName(nNpcIndex)
    	if NpcName2Replace then
    		szNpcName = NpcName2Replace(szNpcName)
    	end
    
    	local tbDailog = DailogClass:new(szNpcName)
    	
    	G_ACTIVITY:OnMessage("ClickNpc", tbDailog)
    	tbDailog.szTitleMsg = szMsg
    
    	--µ¯³ö¶Ô»°¿ò
    	for i = 1, getn(CITY_OPTIONS) do
    		local tb = CITY_OPTIONS[i]
    		-- µ÷Óà aryCondition ÄÚµÄ checkState ¹ý³Ì£¬¼ì²é´Ë¶Ô»°Ñ¡ÏîÊÇ·ñ·ûºÏÌõ¼þ
    		if aryCondition[i].checkState() == 1 then
    			tbDailog:AddOptEntry(tb[1], tb[2])
    		end
    	end
    	tbDailog:Show()
    end;
    
    -- ТÊÖ´å³µ·òͨÓýű¾ (×¢Ò⣺ÄÏÔÀÕò²»ÊÇТÊִ壬²»µ÷´Ëº¯Êý)
    function NewcomerStationCommon(szMsg)
    	dofile("script/global/station.lua");
    --	check_update()					-- ¼¼ÄܸüТ¡¢ÃÅÅɼӱêʶ£¨2004-05-31£©
    	if (GetLevel() >= 5) then
    		if (WhichWarBegin() ~= 0) then
    			Say(szMsg, 5, szStationOp[1], szStationOp[2], szStationOp[3], szStationOp[5], szStationOp_Cancel)
    		elseif (GetGlbValue(2) == 1) then -- ¹¥³ÇѵÁ·Õ½³¡
    			Say(szMsg, 5, szStationOp[1], szStationOp[2], szStationOp[3], szStationOp[6], szStationOp_Cancel)
    		else
    			if (GetTask(1021) == 4) then -- Èç¹û½ÓÊÜÁËÒ°ÛÅÈÎÎñÖÐÑ°ÕÒµØͼ־µÄÈÎÎñ
    				Say(szMsg, 5, szStationOp[1], szStationOp[2], szStationOp[3], szStationOp[8], szStationOp_Cancel)
    			else
    				Say(szMsg, 4, szStationOp[1], szStationOp[2], szStationOp[3], szStationOp_Cancel)
    			end
    		end;
    	else		
    		Talk(1,"","Xa phu: bªn ngoµi cã rÊt nhiÒu ng­êi gièng ng­¬i ®· ra ngoµi vµ uæng m¹ng. Ta kh«ng g¸nh v¸c næi chuyÖn nµy ®©u")
    	end
    end;
    
    function  StationOnCancel()
       Talk(1,"","Cã tiÒn th× h·y quay l¹i")
    end;
    
    ----------------------------------------------
    
    CP_MAPPOS_IN = {1508,3026}
    CP_MAPTAB = {
    				{396, 397, "ThiÕu l©m"},
    				{398, 399, "Thiªn v­¬ng"},
    				{400, 401, "§­êng m«n"},
    			 	{402, 403, "Ngò ®éc"},
    			 	{404, 405, "Nga my"},
    			 	{406, 407, "Thóy yªn"},
    			 	{408, 409, "C¸i bang"},
    			 	{410, 411, "Thiªn nhÉn"},
    			 	{412, 413, "Vâ ®ang"},
    			 	{414, 415, "C«n l«n"}
    			 }
    
    function transtoplace()
    	Say("Vâ l©m liªn ®Êu m«n ph¸i ®ang tiÕn hµnhi, ng­¬i muèn tiÕn vµo sao?", 2, "Ta muèn tiÕn vµo/transtoplace_sure", "§Ó ta suy nghÜ ®· /OnCancel")
    end
    
    function transtoplace_sure()
    
    	if (GetLastFactionNumber() == -1) then
    		Say("Minh chñ vâ l©m cã lÖnh: Liªn ®Êu m«n ph¸ii chØ giíi h¹n ë thËp ®¹i m«n ph¸i dù thi. Ng­¬i ë ®©y trong chèn vâ l©m kh«ng m«n kh«ng ph¸i, b©y giê kh«ng thÓ tham gia ®­îc, h·y gia nhËp m«n ph¸i sau ®ã, trë l¹i dù thi ®i", 0)
    		return
    	else
    		if(GetLastFactionNumber() == 0) then
    			NewWorld(CP_MAPTAB[1][1], CP_MAPPOS_IN[1], CP_MAPPOS_IN[2])--ÉÙÁÖ
    		elseif (GetLastFactionNumber() == 1) then
    			NewWorld(CP_MAPTAB[2][1], CP_MAPPOS_IN[1], CP_MAPPOS_IN[2])--ÌìÍõ
    		elseif (GetLastFactionNumber() == 2) then
    			NewWorld(CP_MAPTAB[3][1], CP_MAPPOS_IN[1], CP_MAPPOS_IN[2])--ÌÆÃÅ
    		elseif (GetLastFactionNumber() == 3) then
    			NewWorld(CP_MAPTAB[4][1], CP_MAPPOS_IN[1], CP_MAPPOS_IN[2])--Î嶾
    		elseif (GetLastFactionNumber() == 4) then
    			NewWorld(CP_MAPTAB[5][1], CP_MAPPOS_IN[1], CP_MAPPOS_IN[2])--¶ëáÒ
    		elseif (GetLastFactionNumber() == 5) then
    			NewWorld(CP_MAPTAB[6][1], CP_MAPPOS_IN[1], CP_MAPPOS_IN[2])--´äÑÌ
    		elseif (GetLastFactionNumber() == 6) then
    			NewWorld(CP_MAPTAB[7][1], CP_MAPPOS_IN[1], CP_MAPPOS_IN[2])--ؤ°ï
    		elseif (GetLastFactionNumber() == 7) then
    			NewWorld(CP_MAPTAB[8][1], CP_MAPPOS_IN[1], CP_MAPPOS_IN[2])--ÌìÈÌ
    		elseif (GetLastFactionNumber() == 8) then
    			NewWorld(CP_MAPTAB[9][1], CP_MAPPOS_IN[1], CP_MAPPOS_IN[2])--Îäµ±
    		elseif (GetLastFactionNumber() == 9) then
    			NewWorld(CP_MAPTAB[10][1], CP_MAPPOS_IN[1], CP_MAPPOS_IN[2])--À¥¢Ø
    		end
    		Msg2Player("§· tiÕn vµo ®Êu tr­êng vâ l©m liªn ®Êu m«n ph¸i")
    	end
    end
    
    -- ÓÃÓÚ´¦ÀíÒ»¶ÑÑ¡ÏîµÄ¶Ô»°º¯Êý Say(""...);
    -- Edited by peres
    function SelectSay(strSay)
    
    local strMsg,strSel = "","";
    local strNum = getn(strSay);
    
    	if strNum < 2 then
    		return
    	end;
    	
    	if strNum > 2 then
    		for i=2,strNum - 1 do
    			strSel = strSel..format("%q", strSay[i])..",";
    		end;
    		strSel = strSel..format("%q", strSay[strNum]);
    		strMsg = "Say("..format("%q", strSay[1])..","..(strNum - 1)..","..strSel..");";
    	elseif strNum == 2 then
    		strSel = format("%q", strSay[strNum]);
    		strMsg = "Say("..format("%q", strSay[1])..",1"..","..strSel..");";
    	end
    	dostring(strMsg)
    end
    Khách viếng thăm hãy cùng vipbk xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!

  9. #638
    Thành Viên
    Ngày tham gia
    Oct 2012
    Bài viết
    217
    Thanks
    20
    Thanked 13 Times in 11 Posts

    Ðề: [Việt Hóa] Tổng hợp những gì VH anh em đóng góp vào đây.

    Trích dẫn Gửi bởi vipbk [Only registered and activated users can see links. ]
    nhầm mà cũng khá ngon rồi đấy



    Code:
    Include("\\script\\missions\\citywar_global\\head.lua");
    Include("\\script\\missions\\citywar_city\\head.lua");
    Include("\\script\\missions\\clearskill\\clearhole.lua");
    Include("\\script\\task\\tollgate\\messenger\\wagoner.lua");  --ÌØÊâÐÅʹµØͼ
    
    Include("\\script\\task\\newtask\\map_index.lua"); -- ÓÃÓÚ»ñÈ¡ÈÎÎñÁ´µØͼµÄÐÅÏ¢
    Include("\\script\\task\\tollgate\\messenger\\wagoner.lua") --ÓÃÓÚÁ¬½ÓÌØÊâÐÅʹÈÎÎñµÄ½Å±¾
    Include("\\script\\global\\judgeoffline_special.lua")	--ÓÃÓÚÎÞÃû¹È¡ª¡ªÍйܷþÎñÆ÷µØͼ
    
    Include("\\script\\activitysys\\g_activity.lua")
    Include("\\script\\dailogsys\\g_dialog.lua")
    Include("\\script\\activitysys\\playerfunlib.lua")
    Include("\\script\\event\\zhongqiu_jieri\\200909\\rongshu\\head.lua")
    
    Include("\\script\\event\\great_night\\great_night_head.lua")	--Ë«Áú¶´»Æ½ðÖ®ºË
    --§iÒu chØnh reset 5h ch¬i - Modified by DinhHQ - 20110630
    Include("\\script\\vng_feature\\challengeoftime\\npcNhiepThiTran.lua")
    szStationOp = 
    	{
    		"Nh÷ng n¬i ®· ®i qua/WayPointFun", 		-- 1
    		"Nh÷ng thµnh thÞ ®· ®i qua/StationFun",		-- 2
    		"Trë l¹i ®Þa ®iÓm cò/TownPortalFun", 	-- 3
    		"§i Hoa S¬n c¶nh kü tr­êng/go_HSBattle", 	-- 4
    		"§i c«ng thµnh chiÕn tr­êng/GoCityWar",			-- 5
    		"§i c«ng thµnh huÊn luyÖn chiÕn tr­êng/GoDemoWar",		-- 6
    		"§i ®¶o tÈy tñy/GotoClearSkillMap",	-- 7
    		"§i ®Õn n¬i lµm nhiÖm vô d· tÈu/tl_moveToTaskMap",			-- 8
    		"§i tíi n¬i lµm nhiÖm vô tÝn sø/messenger_wagoner",      -- 9
    		--"È¥ÎÞÃû¹È/GotoAnonymVale"			--10
    	};
    
    function return_1()
    	return 1
    end
    
    function return_0()
    	return 0
    end
    
    -- ¶ÔÓ¦ÉϸöÊý×éµÄÌõ¼þÅжÏ
    aryCondition = {
    
    	[1] = {checkState = return_1},     -- ¢·¾­µÄµØ·½
    	[2] = {checkState = return_1},     -- ¢·¾­µÄ³ÇÊÐ
    	[3] = {checkState = return_1},     -- ·µ»ØµÄµØµã
    	[4] = {checkState = return_1},     -- È¥»ªÉ½¾º¼¼³¡
    	[5] = {checkState = function()                      -- È¥¹¥³ÇÕ½³¡
    				return (WhichWarBegin()~= 0 and 1) or 0;
    		   end;
    		  },
    	[6] = {checkState = function()                      -- È¥¹¥³ÇѵÁ·Õ½³¡
    				return (GetGlbValue(2)==1 and 1) or 0;
    		   end;
    		  },
    	[7] = {checkState = return_1},     -- ȥϴË赺
    	[8] = {checkState = function()                      -- È¥Ò°ÛÅÈÎÎñËùÔÚµØ
    				return (GetTask(1021)==4 and 1) or 0;
    		   end;
    		  },
    	[9] = {checkState = function()                      -- È¥ÌØÊâÐÅʹÈÎÎñËùÔڵصã
    				return (GetTask(1204)~= 0 and 1) or 0;
    		   end;
    		  },
    	--[10] = {checkState = return_1},    -- ½øÈëÎÞÃû¹È
    	[10] = {checkState = return_1},     -- ¢·¾­µÄµØ·½
    	[11] = {checkState = return_1},
    	[12] = {checkState = return_1},
    }
    
    szStationOp_Cancel = "Kh«ng cÇn/StationOnCancel";
    
    function go_HSBattle()
    	Msg2Player("Ngåi yªn chóng ta ®i Hoa S¬n")
    	NewWorld(2,2605,3592)
    	SetProtectTime(18*3) --ÈýÃë±£»¤Ê±¼ä
    	AddSkillState(963, 1, 0, 18*3) 		
    end
    
    function WayPointFun()			-- ¼Ó·µ»ØÒª800Á½Òø×Ó£¨¶´¿Ú£©¡¡¡¡¡¡£¨BY£º Dan_Deng 2004-04-30£©
    	p1 = GetWayPoint(1);
    	p2 = GetWayPoint(2);
    	p3 = GetWayPoint(3);
    	HaveBin={};
    	i = 1;
    	if (p1 ~= 0)  then
    		name = GetWayPointName(p1);
    		name = name .."/SelWayPoint";
    		HaveBin[i]= name;
    		i = i + 1;
    	end;
    	if (p2 ~= 0)  then
    		name = GetWayPointName(p2);
    		name = name .."/SelWayPoint";
    		HaveBin[i]= name;
    		i = i + 1;
    	end;
    	if (p3 ~= 0)  then
    		name = GetWayPointName(p3);
    		name = name .."/SelWayPoint";
    		HaveBin[i]= name;
    		i = i + 1;
    	end;
    	HaveBin[i] = "Kh«ng muèn ®i ®©u c¶/OnCancel";
    	if (i == 1) then 
    		Say("ThËt xin lçi ta chØ cã thÓ ®­a ngµi tíi n¬i ngµi ®· ®i qua",0);
    	else
    		Say("Mêi lùa chän", i, HaveBin);
    	end;
    end;
    
    function WharfFun()
    Count = GetWharfCount(CurWharf);
    Num = Count;
    
    WharfB = {};
    nValidCount = 1;
    
    for i = 1, Num do
    WharfId = GetWharf(CurWharf, i);
    if (WharfId ~= 0) then
    	nPrice = GetWharfPrice(CurWharf, WharfId);
    	WharfB[nValidCount] = GetWharfName(WharfId) .. "[" .. nPrice .. "Á½]" .. "/SelWharf";
    	nValidCount = nValidCount + 1;
    end;
    end;
    
    WharfB[nValidCount] = "Kh«ng ®i/OnCancel";
    
    if (nValidCount == 1) then 
    Say("ThËt xin lçi n¬i ®ã ngµi ch­a ®i tíi", 0);
    else
    Say("ThuyÒn phu: ng­¬i nghÜ ®i chç nµo nha : ", nValidCount, WharfB);
    end;
    
    end;
    
    function SelWharf(nSel)
    
    nWharfId = GetWharf( CurWharf, nSel + 1);
    nPrice = 0;
    if 
    (nWharfId ~= 0) then 
    	nPrice = GetWharfPrice(CurWharf, nWharfId);
    else
    	return
    end;
    
    if (PrePay(nPrice) == 1 or GetCamp() == 6 ) then
    Msg2Player("Ngåi yªn chóng ta ®i nµo"..GetWharfName(nWharfId))
    nW , nX, nY = GetWharfPos(nWharfId);
    nResult = NewWorld(nW, nX , nY );
    	SetProtectTime(18*3) --ÈýÃë±£»¤Ê±¼ä
    	AddSkillState(963, 1, 0, 18*3) 		
    if (nResult == 2) then
    Msg2Player("Phôc vô khÝ chuyÓn ®æi trung...")
    end
    if (nResult == 0) then
    Msg2Player("TruyÒn tèng vµo ®iÓm cã sai lÇm")
    end
    else
    Say("ThËt ng¹i kh«ng cã tiÒn th× kh«ng thÓ ®i xe", 0);
    end;
    end;
    
    
    function StationFun()
    	for j = 1, 16 do
    		AddStation(j)
    	end
    	Count = GetStationCount();
    	Num = Count;
    	if (Count > 10) then
    		Num = 10
    	end
    	StationB = {}
    	nValidCount = 1
    
    	for i = 1, Num do
    		StationId = GetStation(i, CurStation)
    		if (StationId ~= 0) then
    			nPrice = GetPrice2Station(CurStation, StationId)
    	StationB[nValidCount] = GetStationName(StationId) .. "[" .. nPrice .. "l­îng]" .. "/SelStation";
    			nValidCount = nValidCount + 1
    		end
    	end
    StationB[nValidCount] = "Kh«ng muèn ®i n¬i nµo c¶//OnCancel";
    
    	if (nValidCount == 1) then 
    Say("ThËt xin lçi ta chØ cã thÓ ®­a ngµi tíi n¬i ngµi ®· ®i qua", 0);
    	else
    Say("Xin mêi chän ®Þa ®iÓm", nValidCount, StationB);
    	end
    end
    
    function SelStation(nSel)
    	Count = GetStationCount()
    	nStation = GetStation(nSel + 1, CurStation)
    	nPrice = GetPrice2Station(CurStation, nStation)
    	if (PrePay(nPrice) == 1 or GetCamp() == 6) then
    		nW, nX, nY = GetStationPos(nStation);
    		nResult = NewWorld(nW, nX , nY );
    	SetProtectTime(18*3) --ÈýÃë±£»¤Ê±¼ä
    	AddSkillState(963, 1, 0, 18*3) 		
    Msg2Player("Ngåi yªn chóng ta ®i nµo"..GetStationName(nStation))
    		if (nResult == 2) then
    			--Msg2Player("·þÎñÆ÷ת»»ÖÐ...")
    		end
    		if (nResult == 0) then
    Msg2Player("TruyÒn tèng tíi ®iÓm cã sai lÇm")
    		end
    	--§iÒu chØnh reset 5h ch¬i - Modified by DinhHQ - 20110630
    	local nSongJinCount = PlayerFunLib:GetTaskDailyCount(1926)
    	if nSongJinCount >= 1 or tbCOT_Party:GetDailyTaskCount() >= 1 then
    		SetTireTime(0)
    	end
    
    	else
    Say("ThËt ng¹i kh«ng cã tiÒn th× kh«ng thÓ ®i ®©u ®­îc", 0);
    	end
    end
    
    function TownPortalFun()			-- ·µ»ØÒª2000Á½Òø×Ó£¨Ô­µØµã£©¡¡¡¡£¨BY: Dan_Deng 2004-04-30£©
    --	if (PrePay(2000) == 1 or GetCamp() == 6) then
    		ReturnFromPortal()
    --	else
    --		Say("ThËt ng¹i kh«ng cã tiÒn th× kh«ng thÓ ®i ®©u ®­îc", 0)
    --	end
    end;
    
    function SelWayPoint(nSel)			-- ·µ»ØÒª1000Á½Òø×Ó£¨¶´¿Ú£©¡¡¡¡¡¡£¨BY£ºDan_Deng 2004-04-30£©
    --	if (PrePay(1000) == 1 or GetCamp() == 6) then
    		nWayPoint = GetWayPoint(nSel + 1);
    		if (nWayPoint ~= 0) then
    			nW, nX, nY = GetWayPointPos(nWayPoint)
    			nFightState = GetTerminiFState(nWayPoint)
    			nResult = NewWorld(nW, nX, nY)
    	SetProtectTime(18*3) --ÈýÃë±£»¤Ê±¼ä
    	AddSkillState(963, 1, 0, 18*3) 		
    			SetFightState(nFightState)
    --			Msg2Player("Goto"..GetWayPointName(nWayPoint)..nW..nX..nY);
    			if (nResult == 2) then
    --				Msg2Player("Phôc vô khÝ chuyÓn ®æi trung...")
    			end
    			if (nResult == 0) then
    --				Msg2Player("TruyÒn vµo ®iÓm cã sai lÇm.")
    			end
    		end;
    --	else									-- ²»¹»Ç®¾Í¾Ü¾ø
    --		Say("ThËt ng¹i kh«ng cã tiÒn th× kh«ng thÓ ®i u ®­îc", 0);
    --	end;
    end
    
    --³ÇÕ½ÊÇ·ñ¿ªÊ¼ÁË
    function WhichWarBegin()
    	for i = 1,7 do
    		if (HaveBeginWar(i) ~= 0) then
    			return i;
    		end;
    	end;
    	return 0;
    end;
    
    function CancelGoCityWar()
    	Say("C«ng thµnh chiÕn tr­êng lµ n¬i ®ao kiÕm v« t×nh, nÕu kh«ng tíi tham chiÕn th× h·y lÊy sinh m¹ng lµm träng, trë vÒ ®i", 0);
    end;
    
    function GoCityWar()
    	CityID = WhichWarBegin();
    	if (CityID >= 1 and CityID <= 7) then
    		Tong1, Tong2 = GetCityWarBothSides(CityID);
    		str = format("B©y giê %s c«ng thµnh chiÕn ®ang tiÕn hµnh, phe c«ng thµnh<%s>, phe thñ thµnh<%s>. Xin hái ngµi muèn gia nhËp phe nµo", GetCityAreaName(CityID), Tong1, Tong2);
    		Say(str , 3, "Phe c«ng thµnh/GoCityWarAttack", "Phe thñ thµnh/GoCityWarDefend", "Kh«ng ®i/CancelGoCityWar");
    	end;
    end;
    
    --È¥¹¥³ÇÕ½ÊØ·½Èë¿Ú
    function GoCityWarDefend()
    	CityID = WhichWarBegin();
    	if (CityID == 0 ) then 
    		return
    	end;
    
    	TongName, result = GetTong()
    	Tong1, Tong2 = GetCityWarBothSides(CityID);
    	if (Tong2 ~= TongName and GetItemCountEx(CardTab[CityID * 2]) < 1) then 
    		if (GetTask(TV_CITYID) ~= CityID or GetTask(TV_VALUE) ~= 1 or GetTask(TV_TASKID) ~= MISSIONID) then
    			Say("Th©n phËn kh«ng hîp lÖ, vui lßng trë vÒ!", 0);
    			return
    		end;
    	end;
    	
    	if (random(0,1) == 1) then
    		NewWorld(222, 1614, 3172);
    	SetProtectTime(18*3) --ÈýÃë±£»¤Ê±¼ä
    	AddSkillState(963, 1, 0, 18*3) 		
    	else
    		NewWorld(222, 1629, 3193);
    	SetProtectTime(18*3) --ÈýÃë±£»¤Ê±¼ä
    	AddSkillState(963, 1, 0, 18*3) 		
    	end;
    end;
    
    --È¥¹¥³ÇÕ½¹¥·½Èë¿Ú
    function GoCityWarAttack()
    	CityID = WhichWarBegin();
    	if (CityID == 0) then 
    		return
    	end;
    
    	TongName, result = GetTong()
    	Tong1, Tong2 = GetCityWarBothSides(CityID);
    	if (Tong1 ~= TongName and GetItemCountEx(CardTab[CityID * 2 - 1]) < 1) then
    		if (GetTask(TV_CITYID) ~= CityID or GetTask(TV_VALUE) ~= 2 or GetTask(TV_TASKID) ~= MISSIONID) then
    			Say("Th©n phËn kh«ng hîp lÖ, vui lßng trë vÒ!", 0);
    			return
    		end
    	end
    	
    	if (random(0,1) == 1) then
    		NewWorld(223, 1614, 3172);
    	SetProtectTime(18*3) --ÈýÃë±£»¤Ê±¼ä
    	AddSkillState(963, 1, 0, 18*3) 		
    	else
    		NewWorld(223, 1629, 3193);
    	SetProtectTime(18*3) --ÈýÃë±£»¤Ê±¼ä
    	AddSkillState(963, 1, 0, 18*3) 		
    	end;
    
    end;
    
    function GoDemoWar()
    	Say("C«ng thµnh tu luyÖn chiÕn b¾t ®Çu, ng­¬i thùc sù muèn tham gia??", 3,"Tham gia phe thñ thµnh!/GotoDefend", "Tham gia phe c«ng thµnh/GotoAttack", "Ta kh«ng muèn ®i/OnCancel") 
    
    end;
    
    function GotoDefend()
    if (random(0,1) == 1) then
    	NewWorld(222, 1614, 3172);
    	SetProtectTime(18*3) --ÈýÃë±£»¤Ê±¼ä
    	AddSkillState(963, 1, 0, 18*3) 		
    else
    	NewWorld(222, 1629, 3193);
    	SetProtectTime(18*3) --ÈýÃë±£»¤Ê±¼ä
    	AddSkillState(963, 1, 0, 18*3) 		
    end;
    end;
    
    function GotoAttack()
    	if (random(0,1) == 1) then
    		NewWorld(223, 1614, 3172);
    	SetProtectTime(18*3) --ÈýÃë±£»¤Ê±¼ä
    	AddSkillState(963, 1, 0, 18*3) 		
    	else
    		NewWorld(223, 1629, 3193);
    	SetProtectTime(18*3) --ÈýÃë±£»¤Ê±¼ä
    	AddSkillState(963, 1, 0, 18*3) 		
    	end;
    end;
    
    -- ȥϴµãµØͼ
    function GotoClearSkillMap()
    	-- ÔÝʱÆÁ±ÎȥϴµãµØͼµÄ¹¦ÄÜ
    	-- Say("³µ·ò£ºÃâ·ÑȥϴË赺µÄ»ú»áÖ»ÓÐÒ»´Î¡£Äã×îºÃ»¹ÊÇÏÈÊìϤһϢÕâ´ÎµÄ¼¼Äܵ÷Õû£¬³ÙÒ»µãÔÙÈ¥°É¡£", 1, "ÖªµÀÁË/gotocsm_no")
    
    	nSubWorldID = SubWorldIdx2ID();
    	nCityIndex = CSP_GetCityIndexByCityMap(nSubWorldID);
    	if (nCityIndex == -1) then
    		return -1;
    	end
    	
    	CSP_EnterClearMap(nCityIndex);	
    end;
    
    function gotocsm_no()
    end;
    
    function OnCancel()
    end;
    
    function goto_shijiangu()
    	NewWorld(949, floor(51264 / 32), floor(102368 / 32))
    end
    
    function _GoELangGu()
    	Msg2Player("§Õn ¸c lang cèc!")
    	local tbTargetMapList = {[11] = 950, [1] = 951, [37] = 952, 
    										[176] = 953, [162] = 954, [78] = 955, [80] = 956,}
    	local nMapId = GetWorldPos()
    	if tbTargetMapList[nMapId] then
     		NewWorld(tbTargetMapList[nMapId], 1592, 3195)
     	end
    end
    
    CITY_OPTIONS =
    {
    	{"Nh÷ng n¬i ®· ®i qua", 				WayPointFun}, 			-- 1
    	{"Nh÷ng thµnh thÞ ®· ®i qua",				StationFun},			-- 2
    	{"Trë l¹i ®Þa ®iÓm cò",				TownPortalFun}, 		-- 3
    	{"§i Hoa S¬n c¶nh kü tr­êng",			go_HSBattle}, 			-- 4
    	{"§i c«ng thµnh chiÕn tr­êng",				GoCityWar},				-- 5
    	{"§i c«ng thµnh huÊn luyÖn chiÕn tr­êng",			GoDemoWar},				-- 6
    	{"§i ®¶o tÈy tñy",				GotoClearSkillMap},		-- 7
    	{"§i ®Õn n¬i lµm nhiÖm vô d· tÈu",		tl_moveToTaskMap},		-- 8
    	{"§i tíi n¬i lµm nhiÖm vô tÝn sø",	messenger_wagoner},     -- 9
    	--{"È¥ÎÞÃû¹È",				GotoAnonymVale"			--10
    	--{"ȥТÁ½Ë®¶´",		OnGoToNewLiangShuiDong},-- 10
    	--{"È¥ÊÔ½£¹È",				goto_shijiangu},		-- 11
    	--{"È¥¶ñÀǹÈ",				_GoELangGu},
    }
    
    -- ³ÇÊгµ·òͨÓýű¾
    -- ×¢Ò⣺¹¥³ÇսδʹÓô˺¯ÊýµÄ½Å±¾ [script\missions\citywar_city\zhongzhuan_map\chefu.lua]
    function CityStationCommon(szMsg)
    	dofile("script/global/station.lua");
    	local nNpcIndex = GetLastDiagNpc();
    	local szNpcName = GetNpcName(nNpcIndex)
    	if NpcName2Replace then
    		szNpcName = NpcName2Replace(szNpcName)
    	end
    
    	local tbDailog = DailogClass:new(szNpcName)
    	
    	G_ACTIVITY:OnMessage("ClickNpc", tbDailog)
    	tbDailog.szTitleMsg = szMsg
    
    	--µ¯³ö¶Ô»°¿ò
    	for i = 1, getn(CITY_OPTIONS) do
    		local tb = CITY_OPTIONS[i]
    		-- µ÷Óà aryCondition ÄÚµÄ checkState ¹ý³Ì£¬¼ì²é´Ë¶Ô»°Ñ¡ÏîÊÇ·ñ·ûºÏÌõ¼þ
    		if aryCondition[i].checkState() == 1 then
    			tbDailog:AddOptEntry(tb[1], tb[2])
    		end
    	end
    	tbDailog:Show()
    end;
    
    -- ТÊÖ´å³µ·òͨÓýű¾ (×¢Ò⣺ÄÏÔÀÕò²»ÊÇТÊִ壬²»µ÷´Ëº¯Êý)
    function NewcomerStationCommon(szMsg)
    	dofile("script/global/station.lua");
    --	check_update()					-- ¼¼ÄܸüТ¡¢ÃÅÅɼӱêʶ£¨2004-05-31£©
    	if (GetLevel() >= 5) then
    		if (WhichWarBegin() ~= 0) then
    			Say(szMsg, 5, szStationOp[1], szStationOp[2], szStationOp[3], szStationOp[5], szStationOp_Cancel)
    		elseif (GetGlbValue(2) == 1) then -- ¹¥³ÇѵÁ·Õ½³¡
    			Say(szMsg, 5, szStationOp[1], szStationOp[2], szStationOp[3], szStationOp[6], szStationOp_Cancel)
    		else
    			if (GetTask(1021) == 4) then -- Èç¹û½ÓÊÜÁËÒ°ÛÅÈÎÎñÖÐÑ°ÕÒµØͼ־µÄÈÎÎñ
    				Say(szMsg, 5, szStationOp[1], szStationOp[2], szStationOp[3], szStationOp[8], szStationOp_Cancel)
    			else
    				Say(szMsg, 4, szStationOp[1], szStationOp[2], szStationOp[3], szStationOp_Cancel)
    			end
    		end;
    	else		
    		Talk(1,"","Xa phu: bªn ngoµi cã rÊt nhiÒu ng­êi gièng ng­¬i ®· ra ngoµi vµ uæng m¹ng. Ta kh«ng g¸nh v¸c næi chuyÖn nµy ®©u")
    	end
    end;
    
    function  StationOnCancel()
       Talk(1,"","Cã tiÒn th× h·y quay l¹i")
    end;
    
    ----------------------------------------------
    
    CP_MAPPOS_IN = {1508,3026}
    CP_MAPTAB = {
    				{396, 397, "ThiÕu l©m"},
    				{398, 399, "Thiªn v­¬ng"},
    				{400, 401, "§­êng m«n"},
    			 	{402, 403, "Ngò ®éc"},
    			 	{404, 405, "Nga my"},
    			 	{406, 407, "Thóy yªn"},
    			 	{408, 409, "C¸i bang"},
    			 	{410, 411, "Thiªn nhÉn"},
    			 	{412, 413, "Vâ ®ang"},
    			 	{414, 415, "C«n l«n"}
    			 }
    
    function transtoplace()
    	Say("Vâ l©m liªn ®Êu m«n ph¸i ®ang tiÕn hµnhi, ng­¬i muèn tiÕn vµo sao?", 2, "Ta muèn tiÕn vµo/transtoplace_sure", "§Ó ta suy nghÜ ®· /OnCancel")
    end
    
    function transtoplace_sure()
    
    	if (GetLastFactionNumber() == -1) then
    		Say("Minh chñ vâ l©m cã lÖnh: Liªn ®Êu m«n ph¸ii chØ giíi h¹n ë thËp ®¹i m«n ph¸i dù thi. Ng­¬i ë ®©y trong chèn vâ l©m kh«ng m«n kh«ng ph¸i, b©y giê kh«ng thÓ tham gia ®­îc, h·y gia nhËp m«n ph¸i sau ®ã, trë l¹i dù thi ®i", 0)
    		return
    	else
    		if(GetLastFactionNumber() == 0) then
    			NewWorld(CP_MAPTAB[1][1], CP_MAPPOS_IN[1], CP_MAPPOS_IN[2])--ÉÙÁÖ
    		elseif (GetLastFactionNumber() == 1) then
    			NewWorld(CP_MAPTAB[2][1], CP_MAPPOS_IN[1], CP_MAPPOS_IN[2])--ÌìÍõ
    		elseif (GetLastFactionNumber() == 2) then
    			NewWorld(CP_MAPTAB[3][1], CP_MAPPOS_IN[1], CP_MAPPOS_IN[2])--ÌÆÃÅ
    		elseif (GetLastFactionNumber() == 3) then
    			NewWorld(CP_MAPTAB[4][1], CP_MAPPOS_IN[1], CP_MAPPOS_IN[2])--Î嶾
    		elseif (GetLastFactionNumber() == 4) then
    			NewWorld(CP_MAPTAB[5][1], CP_MAPPOS_IN[1], CP_MAPPOS_IN[2])--¶ëáÒ
    		elseif (GetLastFactionNumber() == 5) then
    			NewWorld(CP_MAPTAB[6][1], CP_MAPPOS_IN[1], CP_MAPPOS_IN[2])--´äÑÌ
    		elseif (GetLastFactionNumber() == 6) then
    			NewWorld(CP_MAPTAB[7][1], CP_MAPPOS_IN[1], CP_MAPPOS_IN[2])--ؤ°ï
    		elseif (GetLastFactionNumber() == 7) then
    			NewWorld(CP_MAPTAB[8][1], CP_MAPPOS_IN[1], CP_MAPPOS_IN[2])--ÌìÈÌ
    		elseif (GetLastFactionNumber() == 8) then
    			NewWorld(CP_MAPTAB[9][1], CP_MAPPOS_IN[1], CP_MAPPOS_IN[2])--Îäµ±
    		elseif (GetLastFactionNumber() == 9) then
    			NewWorld(CP_MAPTAB[10][1], CP_MAPPOS_IN[1], CP_MAPPOS_IN[2])--À¥¢Ø
    		end
    		Msg2Player("§· tiÕn vµo ®Êu tr­êng vâ l©m liªn ®Êu m«n ph¸i")
    	end
    end
    
    -- ÓÃÓÚ´¦ÀíÒ»¶ÑÑ¡ÏîµÄ¶Ô»°º¯Êý Say(""...);
    -- Edited by peres
    function SelectSay(strSay)
    
    local strMsg,strSel = "","";
    local strNum = getn(strSay);
    
    	if strNum < 2 then
    		return
    	end;
    	
    	if strNum > 2 then
    		for i=2,strNum - 1 do
    			strSel = strSel..format("%q", strSay[i])..",";
    		end;
    		strSel = strSel..format("%q", strSay[strNum]);
    		strMsg = "Say("..format("%q", strSay[1])..","..(strNum - 1)..","..strSel..");";
    	elseif strNum == 2 then
    		strSel = format("%q", strSay[strNum]);
    		strMsg = "Say("..format("%q", strSay[1])..",1"..","..strSel..");";
    	end
    	dostring(strMsg)
    end
    cảm ơn anh mà chép về lỗi font :L . Cái lang có công dụng jk vậy sao chép vô rùi mà thông báo vẫn ò ý e vậy
    Khách viếng thăm hãy cùng beongo26 xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!

  10. #639
    Thành Viên Tâm Huyết
    Ngày tham gia
    Aug 2008
    Bài viết
    959
    Thanks
    338
    Thanked 585 Times in 249 Posts

    Ðề: [Việt Hóa] Tổng hợp những gì VH anh em đóng góp vào đây.

    Trích dẫn Gửi bởi vipbk [Only registered and activated users can see links. ]
    nhầm mà cũng khá ngon rồi đấy



    Code:
    Include("\\script\\missions\\citywar_global\\head.lua");
    Include("\\script\\missions\\citywar_city\\head.lua");
    Include("\\script\\missions\\clearskill\\clearhole.lua");
    Include("\\script\\task\\tollgate\\messenger\\wagoner.lua");  --ÌØÊâÐÅʹµØͼ
    
    Include("\\script\\task\\newtask\\map_index.lua"); -- ÓÃÓÚ»ñÈ¡ÈÎÎñÁ´µØͼµÄÐÅÏ¢
    Include("\\script\\task\\tollgate\\messenger\\wagoner.lua") --ÓÃÓÚÁ¬½ÓÌØÊâÐÅʹÈÎÎñµÄ½Å±¾
    Include("\\script\\global\\judgeoffline_special.lua")    --ÓÃÓÚÎÞÃû¹È¡ª¡ªÍйܷþÎñÆ÷µØͼ
    
    Include("\\script\\activitysys\\g_activity.lua")
    Include("\\script\\dailogsys\\g_dialog.lua")
    Include("\\script\\activitysys\\playerfunlib.lua")
    Include("\\script\\event\\zhongqiu_jieri\\200909\\rongshu\\head.lua")
    
    Include("\\script\\event\\great_night\\great_night_head.lua")    --Ë«Áú¶´»Æ½ðÖ®ºË
    --§iÒu chØnh reset 5h ch¬i - Modified by DinhHQ - 20110630
    Include("\\script\\vng_feature\\challengeoftime\\npcNhiepThiTran.lua")
    szStationOp = 
        {
            "Nh÷ng n¬i ®· ®i qua/WayPointFun",         -- 1
            "Nh÷ng thµnh thÞ ®· ®i qua/StationFun",        -- 2
            "Trë l¹i ®Þa ®iÓm cò/TownPortalFun",     -- 3
            "§i Hoa S¬n c¶nh kü tr­êng/go_HSBattle",     -- 4
            "§i c«ng thµnh chiÕn tr­êng/GoCityWar",            -- 5
            "§i c«ng thµnh huÊn luyÖn chiÕn tr­êng/GoDemoWar",        -- 6
            "§i ®¶o tÈy tñy/GotoClearSkillMap",    -- 7
            "§i ®Õn n¬i lµm nhiÖm vô d· tÈu/tl_moveToTaskMap",            -- 8
            "§i tíi n¬i lµm nhiÖm vô tÝn sø/messenger_wagoner",      -- 9
            --"È¥ÎÞÃû¹È/GotoAnonymVale"            --10
        };
    
    function return_1()
        return 1
    end
    
    function return_0()
        return 0
    end
    
    -- ¶ÔÓ¦ÉϸöÊý×éµÄÌõ¼þÅжÏ
    aryCondition = {
    
        [1] = {checkState = return_1},     -- ¢·¾­µÄµØ·½
        [2] = {checkState = return_1},     -- ¢·¾­µÄ³ÇÊÐ
        [3] = {checkState = return_1},     -- ·µ»ØµÄµØµã
        [4] = {checkState = return_1},     -- È¥»ªÉ½¾º¼¼³¡
        [5] = {checkState = function()                      -- È¥¹¥³ÇÕ½³¡
                    return (WhichWarBegin()~= 0 and 1) or 0;
               end;
              },
        [6] = {checkState = function()                      -- È¥¹¥³ÇѵÁ·Õ½³¡
                    return (GetGlbValue(2)==1 and 1) or 0;
               end;
              },
        [7] = {checkState = return_1},     -- ȥϴË赺
        [8] = {checkState = function()                      -- È¥Ò°ÛÅÈÎÎñËùÔÚµØ
                    return (GetTask(1021)==4 and 1) or 0;
               end;
              },
        [9] = {checkState = function()                      -- È¥ÌØÊâÐÅʹÈÎÎñËùÔڵصã
                    return (GetTask(1204)~= 0 and 1) or 0;
               end;
              },
        --[10] = {checkState = return_1},    -- ½øÈëÎÞÃû¹È
        [10] = {checkState = return_1},     -- ¢·¾­µÄµØ·½
        [11] = {checkState = return_1},
        [12] = {checkState = return_1},
    }
    
    szStationOp_Cancel = "Kh«ng cÇn/StationOnCancel";
    
    function go_HSBattle()
        Msg2Player("Ngåi yªn chóng ta ®i Hoa S¬n")
        NewWorld(2,2605,3592)
        SetProtectTime(18*3) --ÈýÃë±£»¤Ê±¼ä
        AddSkillState(963, 1, 0, 18*3)         
    end
    
    function WayPointFun()            -- ¼Ó·µ»ØÒª800Á½Òø×Ó£¨¶´¿Ú£©¡¡¡¡¡¡£¨BY£º Dan_Deng 2004-04-30£©
        p1 = GetWayPoint(1);
        p2 = GetWayPoint(2);
        p3 = GetWayPoint(3);
        HaveBin={};
        i = 1;
        if (p1 ~= 0)  then
            name = GetWayPointName(p1);
            name = name .."/SelWayPoint";
            HaveBin[i]= name;
            i = i + 1;
        end;
        if (p2 ~= 0)  then
            name = GetWayPointName(p2);
            name = name .."/SelWayPoint";
            HaveBin[i]= name;
            i = i + 1;
        end;
        if (p3 ~= 0)  then
            name = GetWayPointName(p3);
            name = name .."/SelWayPoint";
            HaveBin[i]= name;
            i = i + 1;
        end;
        HaveBin[i] = "Kh«ng muèn ®i ®©u c¶/OnCancel";
        if (i == 1) then 
            Say("ThËt xin lçi ta chØ cã thÓ ®­a ngµi tíi n¬i ngµi ®· ®i qua",0);
        else
            Say("Mêi lùa chän", i, HaveBin);
        end;
    end;
    
    function WharfFun()
    Count = GetWharfCount(CurWharf);
    Num = Count;
    
    WharfB = {};
    nValidCount = 1;
    
    for i = 1, Num do
    WharfId = GetWharf(CurWharf, i);
    if (WharfId ~= 0) then
        nPrice = GetWharfPrice(CurWharf, WharfId);
        WharfB[nValidCount] = GetWharfName(WharfId) .. "[" .. nPrice .. "Á½]" .. "/SelWharf";
        nValidCount = nValidCount + 1;
    end;
    end;
    
    WharfB[nValidCount] = "Kh«ng ®i/OnCancel";
    
    if (nValidCount == 1) then 
    Say("ThËt xin lçi n¬i ®ã ngµi ch­a ®i tíi", 0);
    else
    Say("ThuyÒn phu: ng­¬i nghÜ ®i chç nµo nha : ", nValidCount, WharfB);
    end;
    
    end;
    
    function SelWharf(nSel)
    
    nWharfId = GetWharf( CurWharf, nSel + 1);
    nPrice = 0;
    if 
    (nWharfId ~= 0) then 
        nPrice = GetWharfPrice(CurWharf, nWharfId);
    else
        return
    end;
    
    if (PrePay(nPrice) == 1 or GetCamp() == 6 ) then
    Msg2Player("Ngåi yªn chóng ta ®i nµo"..GetWharfName(nWharfId))
    nW , nX, nY = GetWharfPos(nWharfId);
    nResult = NewWorld(nW, nX , nY );
        SetProtectTime(18*3) --ÈýÃë±£»¤Ê±¼ä
        AddSkillState(963, 1, 0, 18*3)         
    if (nResult == 2) then
    Msg2Player("Phôc vô khÝ chuyÓn ®æi trung...")
    end
    if (nResult == 0) then
    Msg2Player("TruyÒn tèng vµo ®iÓm cã sai lÇm")
    end
    else
    Say("ThËt ng¹i kh«ng cã tiÒn th× kh«ng thÓ ®i xe", 0);
    end;
    end;
    
    
    function StationFun()
        for j = 1, 16 do
            AddStation(j)
        end
        Count = GetStationCount();
        Num = Count;
        if (Count > 10) then
            Num = 10
        end
        StationB = {}
        nValidCount = 1
    
        for i = 1, Num do
            StationId = GetStation(i, CurStation)
            if (StationId ~= 0) then
                nPrice = GetPrice2Station(CurStation, StationId)
        StationB[nValidCount] = GetStationName(StationId) .. "[" .. nPrice .. "l­îng]" .. "/SelStation";
                nValidCount = nValidCount + 1
            end
        end
    StationB[nValidCount] = "Kh«ng muèn ®i n¬i nµo c¶//OnCancel";
    
        if (nValidCount == 1) then 
    Say("ThËt xin lçi ta chØ cã thÓ ®­a ngµi tíi n¬i ngµi ®· ®i qua", 0);
        else
    Say("Xin mêi chän ®Þa ®iÓm", nValidCount, StationB);
        end
    end
    
    function SelStation(nSel)
        Count = GetStationCount()
        nStation = GetStation(nSel + 1, CurStation)
        nPrice = GetPrice2Station(CurStation, nStation)
        if (PrePay(nPrice) == 1 or GetCamp() == 6) then
            nW, nX, nY = GetStationPos(nStation);
            nResult = NewWorld(nW, nX , nY );
        SetProtectTime(18*3) --ÈýÃë±£»¤Ê±¼ä
        AddSkillState(963, 1, 0, 18*3)         
    Msg2Player("Ngåi yªn chóng ta ®i nµo"..GetStationName(nStation))
            if (nResult == 2) then
                --Msg2Player("·þÎñÆ÷ת»»ÖÐ...")
            end
            if (nResult == 0) then
    Msg2Player("TruyÒn tèng tíi ®iÓm cã sai lÇm")
            end
        --§iÒu chØnh reset 5h ch¬i - Modified by DinhHQ - 20110630
        local nSongJinCount = PlayerFunLib:GetTaskDailyCount(1926)
        if nSongJinCount >= 1 or tbCOT_Party:GetDailyTaskCount() >= 1 then
            SetTireTime(0)
        end
    
        else
    Say("ThËt ng¹i kh«ng cã tiÒn th× kh«ng thÓ ®i ®©u ®­îc", 0);
        end
    end
    
    function TownPortalFun()            -- ·µ»ØÒª2000Á½Òø×Ó£¨Ô­µØµã£©¡¡¡¡£¨BY: Dan_Deng 2004-04-30£©
    --    if (PrePay(2000) == 1 or GetCamp() == 6) then
            ReturnFromPortal()
    --    else
    --        Say("ThËt ng¹i kh«ng cã tiÒn th× kh«ng thÓ ®i ®©u ®­îc", 0)
    --    end
    end;
    
    function SelWayPoint(nSel)            -- ·µ»ØÒª1000Á½Òø×Ó£¨¶´¿Ú£©¡¡¡¡¡¡£¨BY£ºDan_Deng 2004-04-30£©
    --    if (PrePay(1000) == 1 or GetCamp() == 6) then
            nWayPoint = GetWayPoint(nSel + 1);
            if (nWayPoint ~= 0) then
                nW, nX, nY = GetWayPointPos(nWayPoint)
                nFightState = GetTerminiFState(nWayPoint)
                nResult = NewWorld(nW, nX, nY)
        SetProtectTime(18*3) --ÈýÃë±£»¤Ê±¼ä
        AddSkillState(963, 1, 0, 18*3)         
                SetFightState(nFightState)
    --            Msg2Player("Goto"..GetWayPointName(nWayPoint)..nW..nX..nY);
                if (nResult == 2) then
    --                Msg2Player("Phôc vô khÝ chuyÓn ®æi trung...")
                end
                if (nResult == 0) then
    --                Msg2Player("TruyÒn vµo ®iÓm cã sai lÇm.")
                end
            end;
    --    else                                    -- ²»¹»Ç®¾Í¾Ü¾ø
    --        Say("ThËt ng¹i kh«ng cã tiÒn th× kh«ng thÓ ®i u ®­îc", 0);
    --    end;
    end
    
    --³ÇÕ½ÊÇ·ñ¿ªÊ¼ÁË
    function WhichWarBegin()
        for i = 1,7 do
            if (HaveBeginWar(i) ~= 0) then
                return i;
            end;
        end;
        return 0;
    end;
    
    function CancelGoCityWar()
        Say("C«ng thµnh chiÕn tr­êng lµ n¬i ®ao kiÕm v« t×nh, nÕu kh«ng tíi tham chiÕn th× h·y lÊy sinh m¹ng lµm träng, trë vÒ ®i", 0);
    end;
    
    function GoCityWar()
        CityID = WhichWarBegin();
        if (CityID >= 1 and CityID <= 7) then
            Tong1, Tong2 = GetCityWarBothSides(CityID);
            str = format("B©y giê %s c«ng thµnh chiÕn ®ang tiÕn hµnh, phe c«ng thµnh<%s>, phe thñ thµnh<%s>. Xin hái ngµi muèn gia nhËp phe nµo", GetCityAreaName(CityID), Tong1, Tong2);
            Say(str , 3, "Phe c«ng thµnh/GoCityWarAttack", "Phe thñ thµnh/GoCityWarDefend", "Kh«ng ®i/CancelGoCityWar");
        end;
    end;
    
    --È¥¹¥³ÇÕ½ÊØ·½Èë¿Ú
    function GoCityWarDefend()
        CityID = WhichWarBegin();
        if (CityID == 0 ) then 
            return
        end;
    
        TongName, result = GetTong()
        Tong1, Tong2 = GetCityWarBothSides(CityID);
        if (Tong2 ~= TongName and GetItemCountEx(CardTab[CityID * 2]) < 1) then 
            if (GetTask(TV_CITYID) ~= CityID or GetTask(TV_VALUE) ~= 1 or GetTask(TV_TASKID) ~= MISSIONID) then
                Say("Th©n phËn kh«ng hîp lÖ, vui lßng trë vÒ!", 0);
                return
            end;
        end;
        
        if (random(0,1) == 1) then
            NewWorld(222, 1614, 3172);
        SetProtectTime(18*3) --ÈýÃë±£»¤Ê±¼ä
        AddSkillState(963, 1, 0, 18*3)         
        else
            NewWorld(222, 1629, 3193);
        SetProtectTime(18*3) --ÈýÃë±£»¤Ê±¼ä
        AddSkillState(963, 1, 0, 18*3)         
        end;
    end;
    
    --È¥¹¥³ÇÕ½¹¥·½Èë¿Ú
    function GoCityWarAttack()
        CityID = WhichWarBegin();
        if (CityID == 0) then 
            return
        end;
    
        TongName, result = GetTong()
        Tong1, Tong2 = GetCityWarBothSides(CityID);
        if (Tong1 ~= TongName and GetItemCountEx(CardTab[CityID * 2 - 1]) < 1) then
            if (GetTask(TV_CITYID) ~= CityID or GetTask(TV_VALUE) ~= 2 or GetTask(TV_TASKID) ~= MISSIONID) then
                Say("Th©n phËn kh«ng hîp lÖ, vui lßng trë vÒ!", 0);
                return
            end
        end
        
        if (random(0,1) == 1) then
            NewWorld(223, 1614, 3172);
        SetProtectTime(18*3) --ÈýÃë±£»¤Ê±¼ä
        AddSkillState(963, 1, 0, 18*3)         
        else
            NewWorld(223, 1629, 3193);
        SetProtectTime(18*3) --ÈýÃë±£»¤Ê±¼ä
        AddSkillState(963, 1, 0, 18*3)         
        end;
    
    end;
    
    function GoDemoWar()
        Say("C«ng thµnh tu luyÖn chiÕn b¾t ®Çu, ng­¬i thùc sù muèn tham gia??", 3,"Tham gia phe thñ thµnh!/GotoDefend", "Tham gia phe c«ng thµnh/GotoAttack", "Ta kh«ng muèn ®i/OnCancel") 
    
    end;
    
    function GotoDefend()
    if (random(0,1) == 1) then
        NewWorld(222, 1614, 3172);
        SetProtectTime(18*3) --ÈýÃë±£»¤Ê±¼ä
        AddSkillState(963, 1, 0, 18*3)         
    else
        NewWorld(222, 1629, 3193);
        SetProtectTime(18*3) --ÈýÃë±£»¤Ê±¼ä
        AddSkillState(963, 1, 0, 18*3)         
    end;
    end;
    
    function GotoAttack()
        if (random(0,1) == 1) then
            NewWorld(223, 1614, 3172);
        SetProtectTime(18*3) --ÈýÃë±£»¤Ê±¼ä
        AddSkillState(963, 1, 0, 18*3)         
        else
            NewWorld(223, 1629, 3193);
        SetProtectTime(18*3) --ÈýÃë±£»¤Ê±¼ä
        AddSkillState(963, 1, 0, 18*3)         
        end;
    end;
    
    -- ȥϴµãµØͼ
    function GotoClearSkillMap()
        -- ÔÝʱÆÁ±ÎȥϴµãµØͼµÄ¹¦ÄÜ
        -- Say("³µ·ò£ºÃâ·ÑȥϴË赺µÄ»ú»áÖ»ÓÐÒ»´Î¡£Äã×îºÃ»¹ÊÇÏÈÊìϤһϢÕâ´ÎµÄ¼¼Äܵ÷Õû£¬³ÙÒ»µãÔÙÈ¥°É¡£", 1, "ÖªµÀÁË/gotocsm_no")
    
        nSubWorldID = SubWorldIdx2ID();
        nCityIndex = CSP_GetCityIndexByCityMap(nSubWorldID);
        if (nCityIndex == -1) then
            return -1;
        end
        
        CSP_EnterClearMap(nCityIndex);    
    end;
    
    function gotocsm_no()
    end;
    
    function OnCancel()
    end;
    
    function goto_shijiangu()
        NewWorld(949, floor(51264 / 32), floor(102368 / 32))
    end
    
    function _GoELangGu()
        Msg2Player("§Õn ¸c lang cèc!")
        local tbTargetMapList = {[11] = 950, [1] = 951, [37] = 952, 
                                            [176] = 953, [162] = 954, [78] = 955, [80] = 956,}
        local nMapId = GetWorldPos()
        if tbTargetMapList[nMapId] then
             NewWorld(tbTargetMapList[nMapId], 1592, 3195)
         end
    end
    
    CITY_OPTIONS =
    {
        {"Nh÷ng n¬i ®· ®i qua",                 WayPointFun},             -- 1
        {"Nh÷ng thµnh thÞ ®· ®i qua",                StationFun},            -- 2
        {"Trë l¹i ®Þa ®iÓm cò",                TownPortalFun},         -- 3
        {"§i Hoa S¬n c¶nh kü tr­êng",            go_HSBattle},             -- 4
        {"§i c«ng thµnh chiÕn tr­êng",                GoCityWar},                -- 5
        {"§i c«ng thµnh huÊn luyÖn chiÕn tr­êng",            GoDemoWar},                -- 6
        {"§i ®¶o tÈy tñy",                GotoClearSkillMap},        -- 7
        {"§i ®Õn n¬i lµm nhiÖm vô d· tÈu",        tl_moveToTaskMap},        -- 8
        {"§i tíi n¬i lµm nhiÖm vô tÝn sø",    messenger_wagoner},     -- 9
        --{"È¥ÎÞÃû¹È",                GotoAnonymVale"            --10
        --{"ȥТÁ½Ë®¶´",        OnGoToNewLiangShuiDong},-- 10
        --{"È¥ÊÔ½£¹È",                goto_shijiangu},        -- 11
        --{"È¥¶ñÀǹÈ",                _GoELangGu},
    }
    
    -- ³ÇÊгµ·òͨÓýű¾
    -- ×¢Ò⣺¹¥³ÇսδʹÓô˺¯ÊýµÄ½Å±¾ [script\missions\citywar_city\zhongzhuan_map\chefu.lua]
    function CityStationCommon(szMsg)
        dofile("script/global/station.lua");
        local nNpcIndex = GetLastDiagNpc();
        local szNpcName = GetNpcName(nNpcIndex)
        if NpcName2Replace then
            szNpcName = NpcName2Replace(szNpcName)
        end
    
        local tbDailog = DailogClass:new(szNpcName)
        
        G_ACTIVITY:OnMessage("ClickNpc", tbDailog)
        tbDailog.szTitleMsg = szMsg
    
        --µ¯³ö¶Ô»°¿ò
        for i = 1, getn(CITY_OPTIONS) do
            local tb = CITY_OPTIONS[i]
            -- µ÷Óà aryCondition ÄÚµÄ checkState ¹ý³Ì£¬¼ì²é´Ë¶Ô»°Ñ¡ÏîÊÇ·ñ·ûºÏÌõ¼þ
            if aryCondition[i].checkState() == 1 then
                tbDailog:AddOptEntry(tb[1], tb[2])
            end
        end
        tbDailog:Show()
    end;
    
    -- ТÊÖ´å³µ·òͨÓýű¾ (×¢Ò⣺ÄÏÔÀÕò²»ÊÇТÊִ壬²»µ÷´Ëº¯Êý)
    function NewcomerStationCommon(szMsg)
        dofile("script/global/station.lua");
    --    check_update()                    -- ¼¼ÄܸüТ¡¢ÃÅÅɼӱêʶ£¨2004-05-31£©
        if (GetLevel() >= 5) then
            if (WhichWarBegin() ~= 0) then
                Say(szMsg, 5, szStationOp[1], szStationOp[2], szStationOp[3], szStationOp[5], szStationOp_Cancel)
            elseif (GetGlbValue(2) == 1) then -- ¹¥³ÇѵÁ·Õ½³¡
                Say(szMsg, 5, szStationOp[1], szStationOp[2], szStationOp[3], szStationOp[6], szStationOp_Cancel)
            else
                if (GetTask(1021) == 4) then -- Èç¹û½ÓÊÜÁËÒ°ÛÅÈÎÎñÖÐÑ°ÕÒµØͼ־µÄÈÎÎñ
                    Say(szMsg, 5, szStationOp[1], szStationOp[2], szStationOp[3], szStationOp[8], szStationOp_Cancel)
                else
                    Say(szMsg, 4, szStationOp[1], szStationOp[2], szStationOp[3], szStationOp_Cancel)
                end
            end;
        else        
            Talk(1,"","Xa phu: bªn ngoµi cã rÊt nhiÒu ng­êi gièng ng­¬i ®· ra ngoµi vµ uæng m¹ng. Ta kh«ng g¸nh v¸c næi chuyÖn nµy ®©u")
        end
    end;
    
    function  StationOnCancel()
       Talk(1,"","Cã tiÒn th× h·y quay l¹i")
    end;
    
    ----------------------------------------------
    
    CP_MAPPOS_IN = {1508,3026}
    CP_MAPTAB = {
                    {396, 397, "ThiÕu l©m"},
                    {398, 399, "Thiªn v­¬ng"},
                    {400, 401, "§­êng m«n"},
                     {402, 403, "Ngò ®éc"},
                     {404, 405, "Nga my"},
                     {406, 407, "Thóy yªn"},
                     {408, 409, "C¸i bang"},
                     {410, 411, "Thiªn nhÉn"},
                     {412, 413, "Vâ ®ang"},
                     {414, 415, "C«n l«n"}
                 }
    
    function transtoplace()
        Say("Vâ l©m liªn ®Êu m«n ph¸i ®ang tiÕn hµnhi, ng­¬i muèn tiÕn vµo sao?", 2, "Ta muèn tiÕn vµo/transtoplace_sure", "§Ó ta suy nghÜ ®· /OnCancel")
    end
    
    function transtoplace_sure()
    
        if (GetLastFactionNumber() == -1) then
            Say("Minh chñ vâ l©m cã lÖnh: Liªn ®Êu m«n ph¸ii chØ giíi h¹n ë thËp ®¹i m«n ph¸i dù thi. Ng­¬i ë ®©y trong chèn vâ l©m kh«ng m«n kh«ng ph¸i, b©y giê kh«ng thÓ tham gia ®­îc, h·y gia nhËp m«n ph¸i sau ®ã, trë l¹i dù thi ®i", 0)
            return
        else
            if(GetLastFactionNumber() == 0) then
                NewWorld(CP_MAPTAB[1][1], CP_MAPPOS_IN[1], CP_MAPPOS_IN[2])--ÉÙÁÖ
            elseif (GetLastFactionNumber() == 1) then
                NewWorld(CP_MAPTAB[2][1], CP_MAPPOS_IN[1], CP_MAPPOS_IN[2])--ÌìÍõ
            elseif (GetLastFactionNumber() == 2) then
                NewWorld(CP_MAPTAB[3][1], CP_MAPPOS_IN[1], CP_MAPPOS_IN[2])--ÌÆÃÅ
            elseif (GetLastFactionNumber() == 3) then
                NewWorld(CP_MAPTAB[4][1], CP_MAPPOS_IN[1], CP_MAPPOS_IN[2])--Î嶾
            elseif (GetLastFactionNumber() == 4) then
                NewWorld(CP_MAPTAB[5][1], CP_MAPPOS_IN[1], CP_MAPPOS_IN[2])--¶ëáÒ
            elseif (GetLastFactionNumber() == 5) then
                NewWorld(CP_MAPTAB[6][1], CP_MAPPOS_IN[1], CP_MAPPOS_IN[2])--´äÑÌ
            elseif (GetLastFactionNumber() == 6) then
                NewWorld(CP_MAPTAB[7][1], CP_MAPPOS_IN[1], CP_MAPPOS_IN[2])--ؤ°ï
            elseif (GetLastFactionNumber() == 7) then
                NewWorld(CP_MAPTAB[8][1], CP_MAPPOS_IN[1], CP_MAPPOS_IN[2])--ÌìÈÌ
            elseif (GetLastFactionNumber() == 8) then
                NewWorld(CP_MAPTAB[9][1], CP_MAPPOS_IN[1], CP_MAPPOS_IN[2])--Îäµ±
            elseif (GetLastFactionNumber() == 9) then
                NewWorld(CP_MAPTAB[10][1], CP_MAPPOS_IN[1], CP_MAPPOS_IN[2])--À¥¢Ø
            end
            Msg2Player("§· tiÕn vµo ®Êu tr­êng vâ l©m liªn ®Êu m«n ph¸i")
        end
    end
    
    -- ÓÃÓÚ´¦ÀíÒ»¶ÑÑ¡ÏîµÄ¶Ô»°º¯Êý Say(""...);
    -- Edited by peres
    function SelectSay(strSay)
    
    local strMsg,strSel = "","";
    local strNum = getn(strSay);
    
        if strNum < 2 then
            return
        end;
        
        if strNum > 2 then
            for i=2,strNum - 1 do
                strSel = strSel..format("%q", strSay[i])..",";
            end;
            strSel = strSel..format("%q", strSay[strNum]);
            strMsg = "Say("..format("%q", strSay[1])..","..(strNum - 1)..","..strSel..");";
        elseif strNum == 2 then
            strSel = format("%q", strSay[strNum]);
            strMsg = "Say("..format("%q", strSay[1])..",1"..","..strSel..");";
        end
        dostring(strMsg)
    end
    bacs sửa xog cái lỗi báo ở bên s3relay chưa? ko thì cho t tên file về tự sửa cũng đc. mà cái thư mục lang đấy để làm j bác nhỉ @@. việt hóa xog mà chưa thấy nó tác dụng j :v

    --- Chế độ gộp bài viết ---

    Trích dẫn Gửi bởi beongo26 [Only registered and activated users can see links. ]
    cảm ơn anh mà chép về lỗi font :L . Cái lang có công dụng jk vậy sao chép vô rùi mà thông báo vẫn ò ý e vậy
    chép thử qua cả bên s3relay nữa xem bác
    Khách viếng thăm hãy cùng nhaodzo xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!

  11. #640
    Moderator vipbk's Avatar
    Ngày tham gia
    May 2012
    Đang ở
    đây
    Bài viết
    5,112
    Thanks
    248
    Thanked 3,006 Times in 1,888 Posts

    Ðề: [Việt Hóa] Tổng hợp những gì VH anh em đóng góp vào đây.

    Trích dẫn Gửi bởi nhaodzo [Only registered and activated users can see links. ]
    bacs sửa xog cái lỗi báo ở bên s3relay chưa? ko thì cho t tên file về tự sửa cũng đc. mà cái thư mục lang đấy để làm j bác nhỉ @@. việt hóa xog mà chưa thấy nó tác dụng j :v
    mấy cái thông báo như: đã max skill ko thể tăng thêm ...
    lỗi bên s3 là lỗi gọi boss hả, đang sửa, nếu ko còn lỗi thì mình post lên luôn
    Khách viếng thăm hãy cùng vipbk xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!

 

 
Trang 64 của 146 Đầu tiênĐầu tiên ... 14 54 62 63 64 65 66 74 114 ... CuốiCuối

Quyền viết bài

  • Bạn Không thể gửi Chủ đề mới
  • Bạn Không thể Gửi trả lời
  • Bạn Không thể Gửi file đính kèm
  • Bạn Không thể Sửa bài viết của mình
  •  
Múi giờ GMT +7. Bây giờ là 05:31 PM.
vBulletin®, Copyright ©2000-2011, Jelsoft Enterprises Ltd.
CLBGamesVN không chịu trách nhiệm về Luật Bản Quyền của các tài liệu, bài viết v.v...được đăng tải trên diễn đàn này.
Diễn đàn phát triển dưới sự đóng góp của tất cả thành viên. BQT chỉ là những người thành lập ra sân chơi, quản lý và duy trì về mặt kỹ thuật, nội dung khi hợp lệ.