Kết quả 41 đến 50 của 50
-
14-04-11, 06:55 AM #41
Ðề: Ai biết cách chỉnh đục lỗ ám khí pháp bảo không Hướng dẫn chú
[QUOTE=hanny;421478]chỉnh mỗi phần local tEquipGemTable = { 0, 1, 2, 3, 4, 5, 6, 7, 12, 14, 15,17,18 } thôi đồng chí ạ,
[/QUOT
chỉnh cái này ở file nào vậyKhách viếng thăm hãy cùng kakashiABC xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!
-
14-04-11, 07:40 AM #42
- Ngày tham gia
- Oct 2010
- Bài viết
- 610
- Thanks
- 196
- Thanked 218 Times in 99 Posts
Ðề: Ai biết cách chỉnh đục lỗ ám khí pháp bảo không Hướng dẫn chú
TLBB có nhiều cái hay lắm ...
Tốt nhất có phần mềm tìm kiếm từ khóa trong code đó ...
Và cái hay nhất là đọc được các file xml với ... ở client rồi đối chiếu với server phát triển thêm cái gì đó ^^~
Cứ tìm những số hoặc ID có liên quan là mò ra đc cái mới và hay
Giờ TLBB chưa có gì để nâng cấp thêm ... chờ ai đó public bản mới có đục 4 lỗ vs 7 skill + ... thôi
Chúc các bạn thành công !
p/s : lâu rồi không thấy a Black Dragon online nhỉKhách viếng thăm hãy cùng rikudo xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!
-
22-04-11, 02:42 AM #43
- Ngày tham gia
- Apr 2011
- Bài viết
- 72
- Thanks
- 8
- Thanked 44 Times in 21 Posts
Ðề: Ai biết cách chỉnh đục lỗ ám khí pháp bảo không Hướng dẫn chú
Thú cưỡi thì client nào cũng được. Chỉnh ở client và server như sau:
/home/tlbb/Public/Data/Script/event/stiletto/stiletto.lua :
[sp]
PHP Code:--×°±¸´ò¿×
--½Å±¾ºÅ
x311200_g_ScriptId = 311200
function x311200_OnStiletto( sceneId, selfId, idBagPos, idBagPosStuff )
--Các thiªt b¸ cho phép khoan
--0: vû khí , 1: mão , 2: y phøc , 3: thü sáo , 4: hài
--5: yêu ðái , 6: gi¾i chï , 7: hÕng liên , 8: Thu cuoi, 12: hµ phù , 14: hµ uy¬n, 16: Thoi trang
--15: hµ kiên, 17 : ám khí, 18: pháp bäo
local tEquipGemTable = { 0, 1, 2, 3, 4, 5, 6, 7, 8, 12, 14, 15, 16, 17, 18 }
local Bore_Count = GetBagGemCount( sceneId, selfId, idBagPos )
local nLevel = GetBagItemLevel( sceneId, selfId, idBagPos )
local EquipType = LuaFnGetBagEquipType( sceneId, selfId, idBagPos )
local find = 0
for i, gem in tEquipGemTable do
if gem == EquipType then
find = 1
end
end
if find == 0 then
x311200_NotifyTip( sceneId, selfId, "Trang b¸ này không th¬ khoan" )
return
end
--´ò¿×ÏûºÄ
ret = LuaFnStilettoCostExe( sceneId, selfId, nLevel*100+1+Bore_Count, idBagPosStuff )
if ret == -1 then
x311200_NotifyTip( sceneId, selfId, "Bäng ki¬m tra th¤t bÕi, höi kª hoÕch" )
return
elseif ret == -2 then
x311200_NotifyTip( sceneId, selfId, "Ngß½i không có nguyên li®u thích hþp, không th¬ tiªn hành thao tác này" )
return
elseif ret == -3 then
x311200_NotifyTip( sceneId, selfId, "Ngß½i không ðü ngân lßþng, không th¬ tiªn hành thao tác này" )
return
elseif ret == -4 then
x311200_NotifyTip( sceneId, selfId, "Ngß½i không ðü nguyên li®u, không th¬ tiªn hành thao tác này" )
return
end
--´ò¿×Ö´ÐÐ
ret = AddBagItemSlot( sceneId, selfId, idBagPos )
if ret == -1 then
x311200_NotifyTip( sceneId, selfId, "Trang b¸ khoan th¤t bÕi" )
elseif ret == -2 then
x311200_NotifyTip( sceneId, selfId, "Sai nghiêm tr÷ng" )
elseif ret == -3 then
x311200_NotifyTip( sceneId, selfId, "C¥n phäi ð£t vào mµt trang b¸" )
elseif ret == -4 then
x311200_NotifyTip( sceneId, selfId, "Không th¬ khoan ðßþc næa" )
elseif ret == 1 then
x311200_NotifyTip( sceneId, selfId, "Trang b¸ khoan thành công" )
end
end
--**********************************
--ÐÑÄ¿Ìáʾ
--**********************************
function x311200_NotifyTip( sceneId, selfId, Msg )
BeginEvent( sceneId )
AddText( sceneId, Msg )
EndEvent( sceneId )
DispatchMissionTips( sceneId, selfId )
end
Client Interface/Stiletto/Stiletto.lua:
[sp]
PHP Code:local EQUIP_BUTTONS;
local EQUIP_QUALITY = -1;
local MATERIAL_BUTTONS;
local MATERIAL_QUALITY = -1;
local Need_Item = 0
local Need_Money =0
local Need_Item_Count = 0
local Bore_Count=0
local objCared = -1;
local MAX_OBJ_DISTANCE = 3.0;
local g_Object = -1;
function Stiletto_PreLoad()
this:RegisterEvent("UPDATE_STILETTO");
this:RegisterEvent("UI_COMMAND");
this:RegisterEvent("OBJECT_CARED_EVENT");
this:RegisterEvent("PACKAGE_ITEM_CHANGED");
this:RegisterEvent("RESUME_ENCHASE_GEM");
end
function Stiletto_OnLoad()
EQUIP_BUTTONS = Stiletto_Item
MATERIAL_BUTTONS = Stiletto_Material
end
function Stiletto_OnEvent(event)
--PushDebugMessage(event)
if ( event == "UI_COMMAND" and tonumber(arg0) == 25) then
this:Show();
-- Çå¿ÕÎïÆ·²Û zchw
Stiletto_Clear();
local xx = Get_XParam_INT(0);
objCared = DataPool : GetNPCIDByServerID(xx);
AxTrace(0,1,"xx="..xx .. " objCared="..objCared)
if objCared == -1 then
PushDebugMessage("Dæ li®u cüa server truy«n tr· lÕi có v¤n ð«");
return;
end
BeginCareObject_Stiletto(objCared)
elseif (event == "OBJECT_CARED_EVENT" and this:IsVisible()) then
if(tonumber(arg0) ~= objCared) then
return;
end
--Èç¹ûºÍNPCµÄ¾àÀë´óÓÚÒ»¶¨¾àÀë»òÕß±»É¾³ý£¬×Ô¶¯¹Ø±Õ
if(arg1 == "distance" and tonumber(arg2)>MAX_OBJ_DISTANCE or arg1=="destroy") then
--È¡Ïû¹ØÐÄ
Stiletto_Cancel_Clicked()
end
elseif ( event == "PACKAGE_ITEM_CHANGED" and this:IsVisible() ) then
if( arg0~= nil and -1 == tonumber(arg0)) then
return;
end
if (EQUIP_QUALITY == tonumber(arg0) ) then
Stiletto_Clear()
Stiletto_Update(1,tonumber(arg0))
end
if (MATERIAL_QUALITY == tonumber(arg0) ) then
Stiletto_Clear()
Stiletto_Update(2,tonumber(arg0))
end
elseif ( event == "RESUME_STILETTO_EQUIP" ) then
Resume_Equip(1);
elseif( event == "UPDATE_STILETTO") then
AxTrace(0,1,"arg0="..arg0)
if arg0 == nil or arg1 == nil then
return
end
Stiletto_Update(tonumber(arg0),tonumber(arg1));
elseif( event == "RESUME_ENCHASE_GEM" and this:IsVisible() ) then
if(arg0~=nil and tonumber(arg0) == 3) then
Resume_Equip_Stiletto(1);
elseif(arg0~=nil and tonumber(arg0) == 35) then
Resume_Equip_Stiletto(2);
end
end
end
function Stiletto_OnShown()
Stiletto_Clear()
end
function Stiletto_Clear()
if(EQUIP_QUALITY ~= -1) then
EQUIP_BUTTONS : SetActionItem(-1);
LifeAbility : Lock_Packet_Item(EQUIP_QUALITY,0);
EQUIP_QUALITY = -1;
end
-- Stiletto_Material_Bak : SetProperty("Image", "set:CommonItem image:ActionBK");
-- Stiletto_Material_Bak : SetToolTip("")
if(MATERIAL_QUALITY ~= -1) then
MATERIAL_BUTTONS : SetActionItem(-1);
LifeAbility : Lock_Packet_Item(MATERIAL_QUALITY,0);
MATERIAL_QUALITY = -1;
end
Stiletto_Money : SetProperty("MoneyNumber", "");
Stiletto_State: SetText("")
end
function Stiletto_Update(pos1,pos0)
local pos_packet,pos_ui;
pos_packet = tonumber(pos0);
pos_ui = tonumber(pos1);
EquipPoint = LifeAbility : Get_Equip_Point(pos_packet);
local theAction = EnumAction(pos_packet, "packageitem");
if pos_ui == 1 then
if theAction:GetID() ~= 0 then
local Bore_Count1 = 0;
local Need_Item1 = -1;
local Need_Money1 = 0;
local Need_Item_Count1 =0;
--Need_Item,Need_Money,Need_Item_Count,Bore_Count=LifeAbility : Stiletto_Preparation(pos_packet);
Need_Item1,Need_Money1,Need_Item_Count1,Bore_Count1=LifeAbility : Stiletto_Preparation(pos_packet, 1); --1±íʾȡµÚÒ»×éÏûºÄÖµ
if Bore_Count1 > 2 then --add:lby 20080521
PushDebugMessage("— ðây chï có th¬ ðøc ðßþc 3 l²")
return
end
if (Need_Item1 < -1 and (EquipPoint ~= 8 and EquipPoint ~= 16 and EquipPoint ~= 17 and EquipPoint ~= 18))then
PushDebugMessage("V§t ph¦m này không có cách nào tång thêm máng lõm")
return
end
if Need_Item1 == -2 then
Need_Item1 = 0;
Bore_Count1 = 0;
end
Need_Item = Need_Item1
Need_Money = Need_Money1
Need_Item_Count = Need_Item_Count1
Bore_Count = Bore_Count1
--ÈÃ֮ǰµÄ¶«Î÷±äÁÁ
if EQUIP_QUALITY ~= -1 then
LifeAbility : Lock_Packet_Item(EQUIP_QUALITY,0);
Stiletto_Money : SetProperty("MoneyNumber", "");
Stiletto_State: SetText("")
end
EQUIP_BUTTONS:SetActionItem(theAction:GetID());
EQUIP_QUALITY = pos_packet;
LifeAbility : Lock_Packet_Item(EQUIP_QUALITY,1);
else
EQUIP_BUTTONS:SetActionItem(-1);
LifeAbility : Lock_Packet_Item(EQUIP_QUALITY,0);
EQUIP_QUALITY = -1;
Stiletto_Money : SetProperty("MoneyNumber", "");
Stiletto_State: SetText("")
return;
end
Stiletto_Money : SetProperty("MoneyNumber", tostring(Need_Money));
Stiletto_State : SetText("S¯ máng lõm hi®n tÕi: "..Bore_Count.."; có th¬ tång thêm s¯ máng lõm: "..tostring(3-Bore_Count))
elseif pos_ui == 2 then
local Item_Class = PlayerPackage : GetItemSubTableIndex(pos_packet,0)
local Item_Quality = PlayerPackage : GetItemSubTableIndex(pos_packet,1)
local Item_Type = PlayerPackage : GetItemSubTableIndex(pos_packet,2)
local itemindex = PlayerPackage : GetItemTableIndex(pos_packet)
if itemindex == 20109101 or itemindex == 20310111 then --add:lby 20080521µã½ðÖ®¼ä²»ÄÜ·ÅÈ룬º®Óñ¾«´â²»ÄÜ·ÅÈë
PushDebugMessage("V§t ph¦m này không th¬ sØ døng · ðây")
return
end
if Item_Class ~= 2 or Item_Quality ~= 1 or Item_Type ~= 9 then
return
end
if theAction:GetID() ~= 0 then
MATERIAL_BUTTONS:SetActionItem(theAction:GetID());
if MATERIAL_QUALITY ~= -1 then
LifeAbility : Lock_Packet_Item(MATERIAL_QUALITY,0);
end
--ÈÃ֮ǰµÄ¶«Î÷±äÁÁ
MATERIAL_QUALITY = pos_packet;
LifeAbility : Lock_Packet_Item(MATERIAL_QUALITY,1);
else
MATERIAL_BUTTONS:SetActionItem(-1);
LifeAbility : Lock_Packet_Item(MATERIAL_QUALITY,0);
MATERIAL_QUALITY = -1;
return;
end
end
--add here
end
function Stiletto_Buttons_Clicked()
if MATERIAL_QUALITY == -1 then
PushDebugMessage("M¶i thêm vào v§t li®u ðøc l²")
return
end
if EQUIP_QUALITY ~= -1 then
if Need_Item == -2 then
PushDebugMessage("V§t ph¦m này không có cách nào tång thêm máng lõm")
elseif Need_Item == -3 then
PushDebugMessage("Máng lõm ðã ðÕt ðªn s¯ lßþng to nh¤t")
-- elseif DataPool:GetPlayerMission_ItemCountNow(Need_Item) < Need_Item_Count then
-- PushDebugMessage("ȱÉÙ²ÄÁÏ")
elseif Player:GetData("MONEY") < Need_Money then
PushDebugMessage("Ngân lßþng không ðü")
else
Clear_XSCRIPT();
Set_XSCRIPT_Function_Name("OnStiletto");
Set_XSCRIPT_ScriptID(311200);
Set_XSCRIPT_Parameter(0,EQUIP_QUALITY);
Set_XSCRIPT_Parameter(1,MATERIAL_QUALITY);
Set_XSCRIPT_ParamCount(2);
Send_XSCRIPT();
end
else
PushDebugMessage("M¶i cho vào 1 thiªt b¸ l¡p ð£t.")
end
end
function Stiletto_Close()
--²¢ÉèÖã¬Èñ³°üÀïµÄλÖñäÁÁ
this:Hide();
Stiletto_Clear();
StopCareObject_Stiletto(objCared)
end
function Stiletto_Cancel_Clicked()
Stiletto_Close();
return;
end
--=========================================================
--¿ªÊ¼¹ØÐÄNPC£¬
--ÔÚ¿ªÊ¼¹ØÐÄ֮ǰÐèÒªÏÈÈ·¶¨Õâ¸ö½çÃæÊDz»ÊÇÒѾÓС°¹ØÐÄ¡±µÄNPC£¬
--Èç¹ûÓеĻ°£¬ÏÈÈ¡ÏûÒѾÓеġ°¹ØÐÄ¡±
--=========================================================
function BeginCareObject_Stiletto(objCaredId)
g_Object = objCaredId;
this:CareObject(g_Object, 1, "Stiletto");
end
--=========================================================
--Í£Ö¹¶ÔijNPCµÄ¹ØÐÄ
--=========================================================
function StopCareObject_Stiletto(objCaredId)
this:CareObject(objCaredId, 0, "Stiletto");
g_Object = -1;
end
function Resume_Equip_Stiletto(nIndex)
if( this:IsVisible() ) then
if(nIndex == 1) then
if(EQUIP_QUALITY ~= -1) then
LifeAbility : Lock_Packet_Item(EQUIP_QUALITY,0);
EQUIP_BUTTONS : SetActionItem(-1);
EQUIP_QUALITY = -1;
Stiletto_Money : SetProperty("MoneyNumber", "");
Stiletto_State: SetText("")
end
else
if(MATERIAL_QUALITY ~= -1) then
LifeAbility : Lock_Packet_Item(MATERIAL_QUALITY,0);
MATERIAL_BUTTONS : SetActionItem(-1);
MATERIAL_QUALITY = -1;
end
end
end
end
Chú ý:
1. Ở đây mới là đục lỗ thui hêy, và cũng chỉ mới được cho thú cưỡi thôi. Còn các thứ khác thì chưa thành công.
2. Cơ chế để đục được trang bị thì server qui định vào thuộc tính Equip_PointLần sửa cuối bởi huuduyen_05, ngày 22-04-11 lúc 07:54 AM.
Khách viếng thăm hãy cùng freelancer xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!
-
The Following 2 Users Say Thank You to freelancer For This Useful Post:
huuduyen_05 (22-04-11), vippro0 (22-04-11)
-
22-04-11, 07:51 PM #44
- Ngày tham gia
- Feb 2010
- Bài viết
- 125
- Thanks
- 9
- Thanked 1 Time in 1 Post
Ðề: Ai biết cách chỉnh đục lỗ ám khí pháp bảo không Hướng dẫn chú
chỉ cách khoá mở khoá nhận vật sử dụng chương trinh cấm đi freelance
Khách viếng thăm hãy cùng P0900 xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!
-
22-04-11, 08:14 PM #45
- Ngày tham gia
- Apr 2011
- Bài viết
- 72
- Thanks
- 8
- Thanked 44 Times in 21 Posts
Ðề: Ai biết cách chỉnh đục lỗ ám khí pháp bảo không Hướng dẫn chú
Khách viếng thăm hãy cùng freelancer xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!
-
22-04-11, 08:18 PM #46
- Ngày tham gia
- Feb 2010
- Bài viết
- 125
- Thanks
- 9
- Thanked 1 Time in 1 Post
Ðề: Ai biết cách chỉnh đục lỗ ám khí pháp bảo không Hướng dẫn chú
sau khi đăng nhập vào tới giao diện nhân vật nó hiện nhận vật ngừng hoạt động do sử dụng chương trình cấm đại loại như vậy, hoăc mình muốn khoá nhân vật nào như thế
Khách viếng thăm hãy cùng P0900 xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!
-
22-04-11, 11:22 PM #47
- Ngày tham gia
- Apr 2011
- Bài viết
- 72
- Thanks
- 8
- Thanked 44 Times in 21 Posts
Ðề: Ai biết cách chỉnh đục lỗ ám khí pháp bảo không Hướng dẫn chú
hiz hiz sory bạn cái này tớ cũng chưa được biết. Nhưng để khoá account thì bạn có thể set trong cơ sở dữ liệu ở bảng t_char : đặt giá trị isvalid = 0 (là nó cho toi nhân vật đó luôn). Nói thế thui chứ làm thế không hay cho lắm. Bạn ngâm cứu vấn đề này ở player_login.lua nghen và hàm kiểm tra nhân vật sử dụng chương trình bất hợp pháp là IsWaiGuaUser.
Cái này tớ sẽ ngâm cứu khi nào okie tớ sẽ chia sẻ.Khách viếng thăm hãy cùng freelancer xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!
-
23-04-11, 08:10 AM #48
- Ngày tham gia
- Feb 2010
- Bài viết
- 125
- Thanks
- 9
- Thanked 1 Time in 1 Post
Ðề: Ai biết cách chỉnh đục lỗ ám khí pháp bảo không Hướng dẫn chú
Khách viếng thăm hãy cùng P0900 xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!
-
23-04-11, 10:09 AM #49
- Ngày tham gia
- Oct 2010
- Bài viết
- 610
- Thanks
- 196
- Thanked 218 Times in 99 Posts
Ðề: Ai biết cách chỉnh đục lỗ ám khí pháp bảo không Hướng dẫn chú
Cố lên ...
Đào xới tất cả code từ client đến server và dịch ra tiếng việt ...
Mình bỏ TLBB lâu rồi ... nhưng thấy mọi người vẫn miệt mài thế này thì okKhông có gì là không thể
-
17-07-11, 09:12 PM #50
- Ngày tham gia
- Feb 2010
- Bài viết
- 111
- Thanks
- 24
- Thanked 7 Times in 6 Posts
Ðề: Ai biết cách chỉnh đục lỗ ám khí pháp bảo không Hướng dẫn chú
Khách viếng thăm hãy cùng linhkids xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!