Share Server TLBB 3.0 có kèm Client hoàn chỉnh !

[sonhgc00016]

Đây là cái obj do tự tay mình Việt Hóa, không làm qua loa như trước mà làm rất chi tiết. Trong này chắc chắn ko còn chỗ nào là hàng tàu cả ( Trừ cái folder mylua là không cần thiết vì script trong đó chả để làm gì cả ).
Download về giải nén ra được Folder tên obj, Copy thằng folder này vào tlbb/Public/Data/Script ( đè lên Folder cũ )
Trong này đã add đầy đủ phụ bản Tứ Tuyệt Trang + PMP việt hóa + Thiếu Thất Sơn 100% nên có thể đi thoải mái không lo chữ tàu.
Vẫn còn một số event khác vẫn còn chữ tàu như Cờ, ác tặc, ác bá,Q123,... Nó trong folder event do không có time nên mình không làm được, thông cảm.


Còn cái này là mấy cái file event Thập Nhị Sát Tinh + Tu Luyện ( Xem hình bên dưới ), do mình chỉnh sửa và Việt Hóa. Xài được luôn không phải sửa lại gì hết.
Download về giải nén ra được Folder tên Event Data, vào copy tất cả các Folder con bên trong Folder Event Data vào tlbb/Public/Data/Script

[Only registered and activated users can see links. ]



Link này [Only registered and activated users can see links. ] km3dnd nó bị vi phạm từ ngữ cấm của diễn đàn => Các bạn xóa dấu cách đi dán vào trình duyệt là thấy link...

Còn cái event nữa, ai có lòng tốt việt hóa thì liên hệ trực tiếp qua mail nhé ( inbox ).
Nếu muốn hết chữ tàu nhanh thì chỉ còn mỗi cách này.

Quá tuyệt Thanks bạn rất nhiều

[thanhluan12a14]

--ÐÕi L?NPC
--ID:002098
--Script: Test code by Sói Kool and Fixed by vuhuy99v


x002098_g_scriptID = 002098

--**********************************
--Kh·i ðµng
--**********************************
function x002098_OnDefaultEvent( sceneId, selfId,targetId )
local nam = LuaFnGetName( sceneId, selfId )
	
	BeginEvent( sceneId )
		AddText(sceneId,"#GChào m×ng "..nam.." ðªn v¾i Thiên Long Bát B? Script test by Sói Kool...")
        AddNumText( sceneId, x002098_g_ScriptId, "Nh§n 99999999 kinh nghi®m",6, 2 )
        AddNumText( sceneId, x002098_g_ScriptId, "Nh§n Kim t?",6, 3 )
        AddNumText( sceneId, x002098_g_ScriptId, "Nh§n trang b?Trùng Lâu",6, 4 )				
	EndEvent( sceneId )
	DispatchEventList( sceneId, selfId, targetId )
end

--**********************************
--Ki¬m tra túi
--**********************************
function x002098_OnConditionCheck( sceneId, selfId )
local FreeSpace = LuaFnGetPropertyBagSpace( sceneId, selfId )

	if( FreeSpace < 2 ) then
	        local strNotice = "Túi ðeo thiªu không gian!"
		      x002098_ShowNotice( sceneId, selfId, strNotice)
	        return 0
	end
	
end

--**********************************
--Thân s?ki®n
--**********************************
function x002098_OnEventRequest( sceneId, selfId, targetId, eventId )
local	key	= GetNumText()
	
	if key == 2 then --Nh§n 9999999 kinh nghi®m
		x002098_EXP( sceneId, selfId, targetId )
	end
	
	if key == 3 then --Nh§n Kim T?
		
		BeginEvent( sceneId )
			AddText(sceneId,"Hãy ch÷n mµt loÕi Kim T?)
			AddNumText( sceneId, x002098_g_scriptID, "Nh§n 100 vÕn Kim Nguyên Bäo", 5, 5 )
			AddNumText( sceneId, x002098_g_scriptID, "Nh§n 100 vÕn Ði¬m T£ng", 5, 6 )
			AddNumText( sceneId, x002098_g_scriptID, "Nh§n 50000 Vàng", 5, 7 )
		EndEvent( sceneId )
		DispatchEventList( sceneId, selfId, targetId )
	end
		
	if key == 5 then --Nh§n KNB
		YuanBao( sceneId, selfId, targetId, 1, 1000000 )
		BeginEvent(sceneId)
		AddText(sceneId,"#gffff00Nh§n thành công 1000000 KNB.")
		EndEvent(sceneId)
		DispatchEventList(sceneId,selfId,targetId)
	end
		
	if key == 6 then --Nh§n Ði¬m T£ng
        ZengDian( sceneId, selfId, targetId, 1, 1000000 )
		BeginEvent(sceneId)
		AddText(sceneId,"#gffff00Nh§n thành công 1000000 ði¬m t£ng.")
		EndEvent(sceneId)
		DispatchEventList(sceneId,selfId,targetId)
	end
		
	if key == 7 then --Nh§n Ti«n
	    AddMoney( sceneId, selfId, 500000000 )
		BeginEvent(sceneId)
		    AddText(sceneId,"#gffff00Nh§n thành công 50000 ti«n.")
		EndEvent(sceneId)
		DispatchEventList(sceneId,selfId,targetId)
    end
	
	if key == 4 then --Nh§n trang b?Trùng Lâu
		BeginEvent( sceneId )
			AddText(sceneId,"Hãy ch÷n mµt loÕi trang b?)
			AddNumText( sceneId, x002098_g_scriptID, "Nh§n Trùng Lâu Gi¾i", 5, 8 )
			AddNumText( sceneId, x002098_g_scriptID, "Nh§n Trùng Lâu Ng÷c", 5, 9 )
			AddNumText( sceneId, x002098_g_scriptID, "Nh§n Trùng Lâu Liên", 5, 10 )
		EndEvent( sceneId )
		DispatchEventList( sceneId, selfId, targetId )
	end
		
	if key == 8 then --Nh§n Trùng Lâu Gi¾i
		BeginAddItem(sceneId)
		AddItem( sceneId,10422016,1)
		AddItem( sceneId,10422016,1)
		EndAddItem(sceneId,selfId)
		AddItemListToHuman(sceneId,selfId)
		x002098_NotifyFailTips( sceneId, selfId,"Nh§n ðßþc 2 cái Trùng Lâu Gi¾i." )
		DispatchEventList( sceneId, selfId, targetId )
	end
		
	if key == 9 then --Nh§n Trùng Lâu Ng÷c
		BeginAddItem(sceneId)
		AddItem( sceneId,10423026,1)
		AddItem( sceneId,10423026,1)
		EndAddItem(sceneId,selfId)
		AddItemListToHuman(sceneId,selfId)
		x002098_NotifyFailTips( sceneId, selfId, "Nh§n ðßþc 2 cái Trùng Lâu Ng÷c." )
		DispatchEventList( sceneId, selfId, targetId )
	end
		
	if key == 10 then --Nh§n Trùng Lâu Liên
		BeginAddItem(sceneId)
		AddItem( sceneId,10553237,1)
		EndAddItem(sceneId,selfId)
		AddItemListToHuman(sceneId,selfId)
		x002098_NotifyFailTips( sceneId, selfId,"Nh§n ðßþc 1 cái Trùng Lâu Liên." )
		DispatchEventList( sceneId, selfId, targetId )
	end	
	
end

--Kinh nghi®m
function x002098_EXP( sceneId, selfId, targetId )
		
	LuaFnAddExp( sceneId, selfId, 9999999 )
	x002098_NotifyFailTips( sceneId, selfId, "Nh§n ðßþc 9999999 Kinh Nghi®m." )
	
end

--Ghi lên tip
function x002098_NotifyFailTips( sceneId, selfId, Tip )

	BeginEvent( sceneId )
		AddText( sceneId, Tip )
	EndEvent( sceneId )
	DispatchMissionTips( sceneId, selfId )
	
end

Bạn nào xem lại giúp mình. Đây là file npc1.lua mình sửa chỗ nhận Kim tệ lên thành 50k vàng cho thì bh lỗi click vào NPC ko hiện lên gì cả nữa. NPC Sói Kool ở Đại Lý. :-(

Có thể là lổi chổ này:

AddText(sceneId,"Hãy ch÷n mµt loÕi Kim T?)

và

AddText(sceneId,"Hãy ch÷n mµt loÕi trang b?)

Nếu sau khi chuyển mã sang Window - 1252 mà vẫn thấy nó còn thiếu dấu " ở cuối thì thêm vào.
như thế này này:

AddText(sceneId,"Hãy ch÷n mµt loÕi Kim T®")

Theo kinh nghiệm của mình khi nhấn vào một NPC mà ko hiện gì cả thì có thể là:
1. NPC đó chưa có script hoặc là chưa đặt ScriptId cho hắn ở các file _monster.ini trong thư mục Scence
2. Có script rồi nhưng chưa có khai báo trong Script.dat
3. Script bị lổi.[COLOR="Silver"]

[Sói Đẹp Trai]

Có thể là lổi chổ này:

AddText(sceneId,"Hãy ch÷n mµt loÕi Kim T?)

và

AddText(sceneId,"Hãy ch÷n mµt loÕi trang b?)

Nếu sau khi chuyển mã sang Window - 1252 mà vẫn thấy nó còn thiếu dấu " ở cuối thì thêm vào.
như thế này này:

AddText(sceneId,"Hãy ch÷n mµt loÕi Kim T®")

Theo kinh nghiệm của mình khi nhấn vào một NPC mà ko hiện gì cả thì có thể là:
1. NPC đó chưa có script hoặc là chưa đặt ScriptId cho hắn ở các file _monster.ini trong thư mục Scence
2. Có script rồi nhưng chưa có khai báo trong Script.dat
3. Script bị lổi.[COLOR="Silver"]

Thì như mình nói rõ bên trên là edit sai => Lỗi hết font mà. ANSI ko lưu đc font Unicode hơn nữa sv cũng ko run đc font unicode => Lỗi là dễ hiểu

[sonhgc00016]

Thì như mình nói rõ bên trên là edit sai => Lỗi hết font mà. ANSI ko lưu đc font Unicode hơn nữa sv cũng ko run đc font unicode => Lỗi là dễ hiểu

Mình chưa hiểu rõ lắm. Mình đã chuyển Encoding sang Window-1252 rồi mà vẫn không được.

[Sói Đẹp Trai]

Mình chưa hiểu rõ lắm. Mình đã chuyển Encoding sang Window-1252 rồi mà vẫn không được.

Chuyển sang windows 1252 rồi hãy copy paste script gốc vào hoặc chỉnh sửa rồi save lại là ok

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

--ÐÕi Lý NPC
--ID:002098
--Script: Test code by Sói Kool and Fixed by vuhuy99v


x002098_g_scriptID = 002098

--**********************************
--Kh·i ðµng
--**********************************
function x002098_OnDefaultEvent( sceneId, selfId,targetId )
local nam = LuaFnGetName( sceneId, selfId )
	
	BeginEvent( sceneId )
		AddText(sceneId,"#GChào m×ng "..nam.." ðªn v¾i Thiên Long Bát Bµ. Script test by Sói Kool...")
        AddNumText( sceneId, x002098_g_ScriptId, "Nh§n 99999999 kinh nghi®m",6, 2 )
        AddNumText( sceneId, x002098_g_ScriptId, "Nh§n Kim t®",6, 3 )
        AddNumText( sceneId, x002098_g_ScriptId, "Nh§n trang b¸ Trùng Lâu",6, 4 )				
	EndEvent( sceneId )
	DispatchEventList( sceneId, selfId, targetId )
	
end

--**********************************
--Ki¬m tra túi
--**********************************
function x002098_OnConditionCheck( sceneId, selfId )
local FreeSpace = LuaFnGetPropertyBagSpace( sceneId, selfId )

	if( FreeSpace < 2 ) then
	        local strNotice = "Túi ðeo thiªu không gian!"
		      x002098_ShowNotice( sceneId, selfId, strNotice)
	        return 0
	end
	
end

--**********************************
--Thân sñ ki®n
--**********************************
function x002098_OnEventRequest( sceneId, selfId, targetId, eventId )
local	key	= GetNumText()
	
	if key == 2 then --Nh§n 9999999 kinh nghi®m
		x002098_EXP( sceneId, selfId, targetId )
	end
	
	if key == 3 then --Nh§n Kim T®
		
		BeginEvent( sceneId )
			AddText(sceneId,"Hãy ch÷n mµt loÕi Kim T®")
			AddNumText( sceneId, x002098_g_scriptID, "Nh§n 100 vÕn Kim Nguyên Bäo", 5, 5 )
			AddNumText( sceneId, x002098_g_scriptID, "Nh§n 100 vÕn Ði¬m T£ng", 5, 6 )
			AddNumText( sceneId, x002098_g_scriptID, "Nh§n 50000 Vàng", 5, 7 )
		EndEvent( sceneId )
		DispatchEventList( sceneId, selfId, targetId )
	end
		
	if key == 5 then --Nh§n KNB
		YuanBao( sceneId, selfId, targetId, 1, 1000000 )
		BeginEvent(sceneId)
		AddText(sceneId,"#gffff00Nh§n thành công 1000000 KNB.")
		EndEvent(sceneId)
		DispatchEventList(sceneId,selfId,targetId)
	end
		
	if key == 6 then --Nh§n Ði¬m T£ng
        ZengDian( sceneId, selfId, targetId, 1, 1000000 )
		BeginEvent(sceneId)
		AddText(sceneId,"#gffff00Nh§n thành công 1000000 ði¬m t£ng.")
		EndEvent(sceneId)
		DispatchEventList(sceneId,selfId,targetId)
	end
		
	if key == 7 then --Nh§n Ti«n
	    AddMoney( sceneId, selfId, 500000000 )
		BeginEvent(sceneId)
		    AddText(sceneId,"#gffff00Nh§n thành công 500000000 ti«n.")
		EndEvent(sceneId)
		DispatchEventList(sceneId,selfId,targetId)
    end
	
	if key == 4 then --Nh§n trang b¸ Trùng Lâu
		BeginEvent( sceneId )
			AddText(sceneId,"Hãy ch÷n mµt loÕi trang b¸")
			AddNumText( sceneId, x002098_g_scriptID, "Nh§n Trùng Lâu Gi¾i", 5, 8 )
			AddNumText( sceneId, x002098_g_scriptID, "Nh§n Trùng Lâu Ng÷c", 5, 9 )
			AddNumText( sceneId, x002098_g_scriptID, "Nh§n Trùng Lâu Liên", 5, 10 )
		EndEvent( sceneId )
		DispatchEventList( sceneId, selfId, targetId )
	end
		
	if key == 8 then --Nh§n Trùng Lâu Gi¾i
		BeginAddItem(sceneId)
		AddItem( sceneId,10422016,1)
		AddItem( sceneId,10422016,1)
		EndAddItem(sceneId,selfId)
		AddItemListToHuman(sceneId,selfId)
		x002098_NotifyFailTips( sceneId, selfId,"Nh§n ðßþc 2 cái Trùng Lâu Gi¾i." )
		DispatchEventList( sceneId, selfId, targetId )
	end
		
	if key == 9 then --Nh§n Trùng Lâu Ng÷c
		BeginAddItem(sceneId)
		AddItem( sceneId,10423026,1)
		AddItem( sceneId,10423026,1)
		EndAddItem(sceneId,selfId)
		AddItemListToHuman(sceneId,selfId)
		x002098_NotifyFailTips( sceneId, selfId, "Nh§n ðßþc 2 cái Trùng Lâu Ng÷c." )
		DispatchEventList( sceneId, selfId, targetId )
	end
		
	if key == 10 then --Nh§n Trùng Lâu Liên
		BeginAddItem(sceneId)
		AddItem( sceneId,10553237,1)
		EndAddItem(sceneId,selfId)
		AddItemListToHuman(sceneId,selfId)
		x002098_NotifyFailTips( sceneId, selfId,"Nh§n ðßþc 1 cái Trùng Lâu Liên." )
		DispatchEventList( sceneId, selfId, targetId )
	end	
	
end

--Kinh nghi®m
function x002098_EXP( sceneId, selfId, targetId )
		
	LuaFnAddExp( sceneId, selfId, 9999999 )
	x002098_NotifyFailTips( sceneId, selfId, "Nh§n ðßþc 9999999 Kinh Nghi®m." )
	
end

--Ghi lên tip
function x002098_NotifyFailTips( sceneId, selfId, Tip )

	BeginEvent( sceneId )
		AddText( sceneId, Tip )
	EndEvent( sceneId )
	DispatchMissionTips( sceneId, selfId )
	
end

[sonhgc00016]

Chuyển sang windows 1252 rồi hãy copy paste script gốc vào hoặc chỉnh sửa rồi save lại là ok

Mình sửa trực tiếp từ script gốc nên không còn script gốc nữa. Phiền bạn cho mình xin file npc1.lua với. Lần sau rút kinh nghiệm. @@

[Sói Đẹp Trai]

Mình sửa trực tiếp từ script gốc nên không còn script gốc nữa. Phiền bạn cho mình xin file npc1.lua với. Lần sau rút kinh nghiệm. @@

Ðã share bên dưới........................................... .........

[Sói Đẹp Trai]

Cho cái hình chứng minh

[Only registered and activated users can see links. ]

[Only registered and activated users can see links. ]

[sonhgc00016]

Chuyển sang windows 1252 rồi hãy copy paste script gốc vào hoặc chỉnh sửa rồi save lại là ok

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

--ÐÕi Lý NPC
--ID:002098
--Script: Test code by Sói Kool and Fixed by vuhuy99v


x002098_g_scriptID = 002098

--**********************************
--Kh·i ðµng
--**********************************
function x002098_OnDefaultEvent( sceneId, selfId,targetId )
local nam = LuaFnGetName( sceneId, selfId )
	
	BeginEvent( sceneId )
		AddText(sceneId,"#GChào m×ng "..nam.." ðªn v¾i Thiên Long Bát Bµ. Script test by Sói Kool...")
        AddNumText( sceneId, x002098_g_ScriptId, "Nh§n 99999999 kinh nghi®m",6, 2 )
        AddNumText( sceneId, x002098_g_ScriptId, "Nh§n Kim t®",6, 3 )
        AddNumText( sceneId, x002098_g_ScriptId, "Nh§n trang b¸ Trùng Lâu",6, 4 )				
	EndEvent( sceneId )
	DispatchEventList( sceneId, selfId, targetId )
	
end

--**********************************
--Ki¬m tra túi
--**********************************
function x002098_OnConditionCheck( sceneId, selfId )
local FreeSpace = LuaFnGetPropertyBagSpace( sceneId, selfId )

	if( FreeSpace < 2 ) then
	        local strNotice = "Túi ðeo thiªu không gian!"
		      x002098_ShowNotice( sceneId, selfId, strNotice)
	        return 0
	end
	
end

--**********************************
--Thân sñ ki®n
--**********************************
function x002098_OnEventRequest( sceneId, selfId, targetId, eventId )
local	key	= GetNumText()
	
	if key == 2 then --Nh§n 9999999 kinh nghi®m
		x002098_EXP( sceneId, selfId, targetId )
	end
	
	if key == 3 then --Nh§n Kim T®
		
		BeginEvent( sceneId )
			AddText(sceneId,"Hãy ch÷n mµt loÕi Kim T®")
			AddNumText( sceneId, x002098_g_scriptID, "Nh§n 100 vÕn Kim Nguyên Bäo", 5, 5 )
			AddNumText( sceneId, x002098_g_scriptID, "Nh§n 100 vÕn Ði¬m T£ng", 5, 6 )
			AddNumText( sceneId, x002098_g_scriptID, "Nh§n 50000 Vàng", 5, 7 )
		EndEvent( sceneId )
		DispatchEventList( sceneId, selfId, targetId )
	end
		
	if key == 5 then --Nh§n KNB
		YuanBao( sceneId, selfId, targetId, 1, 1000000 )
		BeginEvent(sceneId)
		AddText(sceneId,"#gffff00Nh§n thành công 1000000 KNB.")
		EndEvent(sceneId)
		DispatchEventList(sceneId,selfId,targetId)
	end
		
	if key == 6 then --Nh§n Ði¬m T£ng
        ZengDian( sceneId, selfId, targetId, 1, 1000000 )
		BeginEvent(sceneId)
		AddText(sceneId,"#gffff00Nh§n thành công 1000000 ði¬m t£ng.")
		EndEvent(sceneId)
		DispatchEventList(sceneId,selfId,targetId)
	end
		
	if key == 7 then --Nh§n Ti«n
	    AddMoney( sceneId, selfId, 500000000 )
		BeginEvent(sceneId)
		    AddText(sceneId,"#gffff00Nh§n thành công 500000000 ti«n.")
		EndEvent(sceneId)
		DispatchEventList(sceneId,selfId,targetId)
    end
	
	if key == 4 then --Nh§n trang b¸ Trùng Lâu
		BeginEvent( sceneId )
			AddText(sceneId,"Hãy ch÷n mµt loÕi trang b¸")
			AddNumText( sceneId, x002098_g_scriptID, "Nh§n Trùng Lâu Gi¾i", 5, 8 )
			AddNumText( sceneId, x002098_g_scriptID, "Nh§n Trùng Lâu Ng÷c", 5, 9 )
			AddNumText( sceneId, x002098_g_scriptID, "Nh§n Trùng Lâu Liên", 5, 10 )
		EndEvent( sceneId )
		DispatchEventList( sceneId, selfId, targetId )
	end
		
	if key == 8 then --Nh§n Trùng Lâu Gi¾i
		BeginAddItem(sceneId)
		AddItem( sceneId,10422016,1)
		AddItem( sceneId,10422016,1)
		EndAddItem(sceneId,selfId)
		AddItemListToHuman(sceneId,selfId)
		x002098_NotifyFailTips( sceneId, selfId,"Nh§n ðßþc 2 cái Trùng Lâu Gi¾i." )
		DispatchEventList( sceneId, selfId, targetId )
	end
		
	if key == 9 then --Nh§n Trùng Lâu Ng÷c
		BeginAddItem(sceneId)
		AddItem( sceneId,10423026,1)
		AddItem( sceneId,10423026,1)
		EndAddItem(sceneId,selfId)
		AddItemListToHuman(sceneId,selfId)
		x002098_NotifyFailTips( sceneId, selfId, "Nh§n ðßþc 2 cái Trùng Lâu Ng÷c." )
		DispatchEventList( sceneId, selfId, targetId )
	end
		
	if key == 10 then --Nh§n Trùng Lâu Liên
		BeginAddItem(sceneId)
		AddItem( sceneId,10553237,1)
		EndAddItem(sceneId,selfId)
		AddItemListToHuman(sceneId,selfId)
		x002098_NotifyFailTips( sceneId, selfId,"Nh§n ðßþc 1 cái Trùng Lâu Liên." )
		DispatchEventList( sceneId, selfId, targetId )
	end	
	
end

--Kinh nghi®m
function x002098_EXP( sceneId, selfId, targetId )
		
	LuaFnAddExp( sceneId, selfId, 9999999 )
	x002098_NotifyFailTips( sceneId, selfId, "Nh§n ðßþc 9999999 Kinh Nghi®m." )
	
end

--Ghi lên tip
function x002098_NotifyFailTips( sceneId, selfId, Tip )

	BeginEvent( sceneId )
		AddText( sceneId, Tip )
	EndEvent( sceneId )
	DispatchMissionTips( sceneId, selfId )
	
end

Làm đủ mọi cách rồi. Các bước như thế này: Tạo 1 file mới npc1.lua rồi chuyển Encoding->Character sets->Western European->Window-1252, copy đoạn code của bạn vào đó rồi save lại. Tiếp theo dùng WinSCP copy vào chỗ tlbb/Public/Data/Script/New mà không được. Khởi động lại server cũng không được. Điên mất. @@

[le_minh]

HH cho mình hỏi muốn chỉnh tỷ lệ rớt đồ thì mình chỉnh chổ nào và muốn quái rớt item mình muốn thì chỉnh file nào vậy ,bit chỉ dùm thanks nhiều lắm