Ai biết cách chỉnh đục lỗ ám khí pháp bảo không Hướng dẫn chút đi [Lưu trữ]

hanny

10-03-11, 08:58 AM

nhiêu anh em cũng thắc mắc muốn có đục lỗ ám khí pháp bảo ai biết cách có thể hưỡng dẫn đc không? Thank nhiều!

lekhanh456

10-03-11, 11:08 AM

ủa pháp bảo vs ám khí đục lỗ dc nữa à
ai làm dc hướng dẫn ae với
mình thấy tụi TQ vẫn chưa làm dc mà,ở VN có ai làm dc chưa vậy
hay anh hanny thấy ai làm dc rồi nên mới hỏi

vippro0

10-03-11, 11:10 AM

boomboom đục đc đó các bạn thử hỏi xem =))

hanny

11-03-11, 07:49 AM

kô ai quan tâm nghiên cứu cái này nhỉ buồn quá, nhỉ

duchung145

11-03-11, 02:18 PM

Thực ra là đã có người làm được rồi
Hôm trước hỏi thằng GM của Server Rồng Đen(đệ tử của BlackDragon) nó bảo là phải tự hiểu hết tất cả thì sẽ làm được
Hồi trước đã thử "đục lỗ bằng Navicat" trên Pháp bảo nhưng không khảm được bảo thạch

Item trong TLBB được phân thành nhiều loại(type):
Trang bị có thể chia thành đồ phòng ngự(mão, y phục...) đồ tấn công(vũ khí, giới chỉ...) và trang bị khác(thời trang, thú cưỡi...)
Mỗi trang bị lại có quy định riêng về khả năng đục lỗ và khảm bảo thạch

Phần này thì mình chịu

huuduyen_05

11-03-11, 03:14 PM

Thực ra là đã có người làm được rồi
Hôm trước hỏi thằng GM của Server Rồng Đen(đệ tử của BlackDragon) nó bảo là phải tự hiểu hết tất cả thì sẽ làm được
Hồi trước đã thử "đục lỗ bằng Navicat" trên Pháp bảo nhưng không khảm được bảo thạch

Item trong TLBB được phân thành nhiều loại(type):
Trang bị có thể chia thành đồ phòng ngự(mão, y phục...) đồ tấn công(vũ khí, giới chỉ...) và trang bị khác(thời trang, thú cưỡi...)
Mỗi trang bị lại có quy định riêng về khả năng đục lỗ và khảm bảo thạch

Phần này thì mình chịu

Hic mới đọc tưởng bạn này đã tìm ra phương thức và chia sẽ cách chứ :D

Vấn đề này mình chưa tìm hiểu (vì thấy nó không cần thiết lắm).
Bạn thử xem trong file EquipBase.txt xem xét cột thứ 4 (Item type) và cột thứ 6 (EquipPoint) giữa item cho phép đục lỗ và item không cho phép đục lỗ.

Sau khi copy sự điều chỉnh ở phía server thì cũng nhớ điều chỉnh ở client (nếu không sẽ bị chặn từ phía client trước khi gửi thông tin đến server)

Có kết quả thì reply :)

hanny

11-03-11, 03:14 PM

Thực ra là đã có người làm được rồi
Hôm trước hỏi thằng GM của Server Rồng Đen(đệ tử của BlackDragon) nó bảo là phải tự hiểu hết tất cả thì sẽ làm được
Hồi trước đã thử "đục lỗ bằng Navicat" trên Pháp bảo nhưng không khảm được bảo thạch

Item trong TLBB được phân thành nhiều loại(type):
Trang bị có thể chia thành đồ phòng ngự(mão, y phục...) đồ tấn công(vũ khí, giới chỉ...) và trang bị khác(thời trang, thú cưỡi...)
Mỗi trang bị lại có quy định riêng về khả năng đục lỗ và khảm bảo thạch

Phần này thì mình chịu
cái đấy thì hiểu nó sẽ wuy định ở EquipBase.txt ma 10 dòng đầu là..
Index class(基本类型) Quality(品质) Type(类别) Index(物品号) EquipPoint(装备点) Visual 适应规则套装编号套装效果值
mà trong đấy là
Chỉ số class (các loaij cơ bản) Quality(chất lượng) Type(kiểu) Index(mục số) EquipPoint(thiết bị, điểm) Visual quy định Đặt số Đặt giá trị hiệu lực
vậy chỉnh nó ở dòng nào.
dòng chỉ số la ID ko tinh loại.
dòng class loại cở bản : là loại đồ đặt nó là gì thì khi đeo nó sẽ ở vị trí đó.
Quality(chất lượng)chắc là giám định rồi
Type(kiểu) chắc là chỉnh cái này nhỉ ...
các cái còn lại ai test xem thế nào ... ai nghịch đc kết quả porrt lên đây mọi người cùng thảo luận. nhiều ngươi thử sẽ thành công nhanh hơn 1 ngươi. không ai share dấu nghề thì chúng ta mò vậy.

huuduyen_05

11-03-11, 03:38 PM

Vậy là hanny vẫn chưa test à ? hôm bữa hỏi ở y!m tưởng đã test rồi chứ..?

hanny

11-03-11, 03:48 PM

test rồi nhưng chưa thành công. chỉnh toàn bị đeo vào các chỗ lung tung. ám khí cầm vào thì nó chạy vào ô vũ khí :)). nên ngại chưa chỉnh tiếp , giờ mới rảnh lôi ra đây mọi người cùng bàn luận cho nhanh. mọi người một tay ...

huuduyen_05

11-03-11, 04:06 PM

test rồi nhưng chưa thành công. chỉnh toàn bị đeo vào các chỗ lung tung. ám khí cầm vào thì nó chạy vào ô vũ khí :)). nên ngại chưa chỉnh tiếp , giờ mới rảnh lôi ra đây mọi người cùng bàn luận cho nhanh. mọi người một tay ...

Chỉnh như đã post ở trên là được thôi, chắc không khó khăn gì đâu ;) mặc dù chưa test :)

kobihoang1

11-03-11, 06:17 PM

anh hannny sao ko qua hỏi sv rông đen sem em thấy bên đó đục lỗ đc rồi mà
mà anh sem lại mấy cộng tác viên nha pm lấy lauch thi đưa tai khoản để xác nhận rồi mà ko đưa lauch chán thật

hanny

11-03-11, 06:39 PM

Chỉnh như đã post ở trên là được thôi, chắc không khó khăn gì đâu ;) mặc dù chưa test :)
chỉnh thì đã chỉnh rồi đục lỗ ngon rồi nhưng vấn đề ở đây vẫn là vị trí đeo bị linh tinh. ...

vippro0

11-03-11, 06:42 PM

chỉnh thì đã chỉnh rồi đục lỗ ngon rồi nhưng vấn đề ở đây vẫn là vị trí đeo bị linh tinh. ...là sao hanny mình ko hiểu bạn có thể share file đó ko !

huuduyen_05

11-03-11, 06:58 PM

chỉnh thì đã chỉnh rồi đục lỗ ngon rồi nhưng vấn đề ở đây vẫn là vị trí đeo bị linh tinh. ...

Vị trí sai vậy chắc do item type qui định đó, sửa lại như cũ là ok.

hanny

11-03-11, 08:04 PM

Vị trí sai vậy chắc do item type qui định đó, sửa lại như cũ là ok.
nhuwng mà chỉ chỉnh đc chỗ cột này là đục đc thôi.
Chỉnh Vị trí cột thứ 6 về type 0(là cột đối chiếu thêo Vũ khí) thì đục lỗ đc nhưng suy ra khi cầm lên nó chền vào ô vũ khí...

hanny

11-03-11, 09:05 PM

chỉnh thì đã chỉnh rồi đục lỗ ngon rồi nhưng vấn đề ở đây vẫn là vị trí đeo bị linh tinh. ...là sao hanny mình ko hiểu bạn có thể share file đó ko !
đang thử mà đã thanh công đâu mà share hả bạn

Long_222

11-03-11, 09:17 PM

Hi vọng là thành công.Thế đã ai biết đục lỗ cực hạn chưa nhỉ.Nghiên cứu luôn nhé.Thanks

lekhanh456

11-03-11, 10:50 PM

Hi vọng là thành công.Thế đã ai biết đục lỗ cực hạn chưa nhỉ.Nghiên cứu luôn nhé.Thanks

đục lỗ cực hag hình như các sv đã có rồi mà bạn :d
bạn nói đục lỗ cực hạng là sao nữa,bạn dùng link game 2.0 là sẽ thấy đục lỗ cực hạng thôi mà

huuduyen_05

12-03-11, 08:28 AM

nhuwng mà chỉ chỉnh đc chỗ cột này là đục đc thôi.
Chỉnh Vị trí cột thứ 6 về type 0(là cột đối chiếu thêo Vũ khí) thì đục lỗ đc nhưng suy ra khi cầm lên nó chền vào ô vũ khí...

Chỉnh cột thứ 6 là equippoint mà. Chỉnh cột 6 thôi, không chỉnh cột 4(item type)

Thêm một chút thông tin là cần phải xem phải qui định đục lỗ này là hiểu

--Script khoan trang bị

--no script

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 , 12: hộ phù , 14: hộ uyển
--15: hộ kiên, 17 : ám khí, 18: pháp bảo
local tEquipGemTable = { 0, 1, 2, 3, 4, 5, 6, 7, 12, 14, 15,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

--**********************************
--script thông báo
--**********************************
function x311200_NotifyTip( sceneId, selfId, Msg )

BeginEvent( sceneId )
AddText( sceneId, Msg )
EndEvent( sceneId )
DispatchMissionTips( sceneId, selfId )

end

hanny

12-03-11, 09:53 AM

Chỉnh cột thứ 6 là equippoint mà. Chỉnh cột 6 thôi, không chỉnh cột 4(item type)

Thêm một chút thông tin là cần phải xem phải qui định đục lỗ này là hiểu

--Script khoan trang bị

--no script

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 , 12: hộ phù , 14: hộ uyển
--15: hộ kiên, 17 : ám khí, 18: pháp bảo
local tEquipGemTable = { 0, 1, 2, 3, 4, 5, 6, 7, 12, 14, 15,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

--**********************************
--script thông báo
--**********************************
function x311200_NotifyTip( sceneId, selfId, Msg )

BeginEvent( sceneId )
AddText( sceneId, Msg )
EndEvent( sceneId )
DispatchMissionTips( sceneId, selfId )

end

đây mới đúng lad cái cần tìm :)) thank Huuduyen để thử đã

hanny

12-03-11, 12:19 PM

:(( vẫn chưa đc ! chỉnh côt thứ 6 thì sẽ bị đeo linh tinh. vi trí là từ 0 đếm 18 quy định. như ở trên số nào tưong ứng với chỗ đấy . phải còn 1 chỗ nào đấy quy định cái 0 đến 18 cho đục lỗ hay không. đã chỉnh local tEquipGemTable = { 0, 1, 2, 3, 4, 5, 6, 7, 12, 14, 15,17,18 } rồi không ăn thua.
trong đó 17 18 là quy định ám khí.
làm xong nó vẫn báo không thể tăng thêm mãng lõm
mà chỉnh lại cột 6 thành 1 2 3 4 hoặc 0 thì đục lỗ ngon lành. nhưng nó đeo vào vị trí tưog ứng vói ID.
còn 1 scrip khác quy định nữa .... không biết chỗ nào.

huuduyen_05

12-03-11, 04:20 PM

:(( vẫn chưa đc ! chỉnh côt thứ 6 thì sẽ bị đeo linh tinh. vi trí là từ 0 đếm 18 quy định. như ở trên số nào tưong ứng với chỗ đấy . phải còn 1 chỗ nào đấy quy định cái 0 đến 18 cho đục lỗ hay không. đã chỉnh local tEquipGemTable = { 0, 1, 2, 3, 4, 5, 6, 7, 12, 14, 15,17,18 } rồi không ăn thua.
trong đó 17 18 là quy định ám khí.
làm xong nó vẫn báo không thể tăng thêm mãng lõm
mà chỉnh lại cột 6 thành 1 2 3 4 hoặc 0 thì đục lỗ ngon lành. nhưng nó đeo vào vị trí tưog ứng vói ID.
còn 1 scrip khác quy định nữa .... không biết chỗ nào.

Nó báo "không thể tăng thêm mãng lõm" --> cái này do client chặn lại đó, không phải phía server đâu. Ở phía server không có dòng thông báo này.

Nên chỉnh lại client cho hợp.

Nếu không được thì thử "ngâm cứu" đoạn này

--------------------------- kiểm tra trang bị có thể khoan
for i, gem in tEquipGemTable do
if gem == EquipType then --có trong danh sách trang bị khoan
find = 1
end
end
if find == 0 then -- không cho phép khoan
----------------------------

Đầu tiên cứ cho find =1 bỏ điều kiện gem == EquipType

hanny

12-03-11, 08:16 PM

Nó báo "không thể tăng thêm mãng lõm" --> cái này do client chặn lại đó, không phải phía server đâu. Ở phía server không có dòng thông báo này.

Nên chỉnh lại client cho hợp.

Nếu không được thì thử "ngâm cứu" đoạn này

--------------------------- kiểm tra trang bị có thể khoan
for i, gem in tEquipGemTable do
if gem == EquipType then --có trong danh sách trang bị khoan
find = 1
end
end
if find == 0 then -- không cho phép khoan
----------------------------

Đầu tiên cứ cho find =1 bỏ điều kiện gem == EquipType
if gem == EquipType then --có trong danh sách trang bị khoan (ko biết danh sách này ở chỗ nào nhỉ

hanny

13-03-11, 05:56 PM

Tình Hình là rất tình hình ,.... 0 1 1 0 suôt không ăn thua bác HD à. còn phương án nào không ?
chẳng nhẽ lại pos tay :(

huuduyen_05

13-03-11, 08:19 PM

Tình Hình là rất tình hình ,.... 0 1 1 0 suôt không ăn thua bác HD à. còn phương án nào không ?
chẳng nhẽ lại pos tay :(

Giờ thì nó báo lỗi gì ? có chỉnh ở client lại chưa ?

hanny

13-03-11, 08:25 PM

Giờ thì nó báo lỗi gì ? có chỉnh ở client lại chưa ?

không thể tăng thêm mãng lõm" Client thì lấy cả của SV có đục lỗ đc ám khí pháp bảo rồi không ăn thua vẫn báo không thể tăng thêm mãng lõm".
unback EQbase so sánh Item không thấy có gì khác chắc chỉ chỉhn trên SV thôi.

huuduyen_05

13-03-11, 08:31 PM

Trên server đã tìm kỹ, không có chỗ nào có script thông báo dòng không thể tăng thêm mãng lõm

Nếu đã lấy client có thể đục lỗ ám khí, pháp bảo mà báo thông báo đó thì chắc là client đọc ở server trong file txt rồi xuất dòng thông báo ở client.

Có thể liệt kê các trường hợp và kết quả mà bạn đã test không ?
Chỉnh ở file nào cột nào (chi tiết) -> kết quả thành công/không thành công? có thông báo ?

hanny

13-03-11, 08:39 PM

Trên server đã tìm kỹ, không có chỗ nào có script thông báo dòng không thể tăng thêm mãng lõm

Nếu đã lấy client có thể đục lỗ ám khí, pháp bảo mà báo thông báo đó thì chắc là client đọc ở server trong file txt rồi xuất dòng thông báo ở client.

Có thể liệt kê các trường hợp và kết quả mà bạn đã test không ?
Chỉnh ở file nào cột nào (chi tiết) -> kết quả thành công/không thành công? có thông báo ?

mình đã chỉnh tất cả các cột trong eqbase nghi ngờ là quy dịnh dục lỗ .
cột 4 ( không phải) chỉnh thế nào cũng thế
cột 6 (chỉnh từ 0 đến 10) ==> chỉnh số naod tương ứng với đồ đeo trên ngươi thì ám khí pháp bảo đeo vào chỗ đấy (đục lỗ đc)
chỉnh mấy cái find như bạn nói không ăn thua. vẫn báo là đồ không thể đục lỗ,....

huuduyen_05

13-03-11, 09:06 PM

mình đã chỉnh tất cả các cột trong eqbase nghi ngờ là quy dịnh dục lỗ .
cột 4 ( không phải) chỉnh thế nào cũng thế
cột 6 (chỉnh từ 0 đến 10) ==> chỉnh số naod tương ứng với đồ đeo trên ngươi thì ám khí pháp bảo đeo vào chỗ đấy (đục lỗ đc)
chỉnh mấy cái find như bạn nói không ăn thua. vẫn báo là đồ không thể đục lỗ,....

Thử chỉnh file EquipBase.txt ở client cột thứ 6 giá trị 0~10, ở server thì cứ giữ nguyên là 17 (ám khí)

Trong script đục lỗ thêm 17 vào như ở trang 2 mình có ghi

hanny

13-03-11, 09:47 PM

Thử chỉnh file EquipBase.txt ở client cột thứ 6 giá trị 0~10, ở server thì cứ giữ nguyên là 17 (ám khí)

Trong script đục lỗ thêm 17 vào như ở trang 2 mình có ghi

đã thử như vậy rồi . vẫn báo như thế . để tui Up thử client lên 2.0 chạy xem thế nào . Hay là do 1.1 ko đc.

hanny

14-03-11, 11:16 AM

đã thử như vậy rồi . vẫn báo như thế . để tui Up thử client lên 2.0 chạy xem thế nào . Hay là do 1.1 ko đc.
vấn đề ở đây hêt sưc buồn cười . Thú cưỡi đã đục lỗ đc rồi mà ám khí pháp bảo không đuc đc...không hiểu tại sao.

huuduyen_05

14-03-11, 12:10 PM

vấn đề ở đây hêt sưc buồn cười . Thú cưỡi đã đục lỗ đc rồi mà ám khí pháp bảo không đuc đc...không hiểu tại sao.

Tức là sử dụng client 2.x thì đục lỗi được thú cưỡi mà ko qua chỉnh sửa gì hết ? Hay có chỉnh ? Và chỉnh những gì ?

hanny

14-03-11, 11:37 PM

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í ạ,

Long0

15-03-11, 04:49 PM

Pic này phải thật không nhỉ thấy thằng GM sv kia nó send qua :)
[Chỉ có thành viên mới xem link được. <a href="register.php"> Nhấp đây để đăng ký thành viên......</a>]
Pic To :)
[Chỉ có thành viên mới xem link được. <a href="register.php"> Nhấp đây để đăng ký thành viên......</a>]

hanny

16-03-11, 02:25 PM

Pic này phải thật không nhỉ thấy thằng GM sv kia nó send qua :)
[Chỉ có thành viên mới xem link được. <a href="register.php"> Nhấp đây để đăng ký thành viên......</a>]
Pic To :)
[Chỉ có thành viên mới xem link được. <a href="register.php"> Nhấp đây để đăng ký thành viên......</a>]
add thi có nhiều cách để add, lam miễn cưỡng thì vẫn đục đc lỗ. đang muón chỉnh để add bình thương cơ.

vippro0

18-03-11, 09:38 AM

ko thể làm đc đã có ai làm đc chưa :(( ai có thể share file ko làm ơn

vippro0

03-04-11, 05:28 PM

mình làm r°i nhßng vçn ko ðøc ðc :((

duchung145

05-04-11, 08:48 PM

Không làm được thì ta cứ đục lỗ trên 1 cái item khác rồi chuyển itemtype về với Fabao thôi

Ví dụ như thế này, cái không có bảo thạch là Fabao bình thường, cái có bảo thạch là Fabao "chuyển giới"

[Chỉ có thành viên mới xem link được. <a href="register.php"> Nhấp đây để đăng ký thành viên......</a>]

[Chỉ có thành viên mới xem link được. <a href="register.php"> Nhấp đây để đăng ký thành viên......</a>]

vippro0

06-04-11, 12:44 PM

làm vậy thì cũng đc nhưng ý mình là đục bình thường đc như những đồ kia cơ axx
Không làm được thì ta cứ đục lỗ trên 1 cái item khác rồi chuyển itemtype về với Fabao thôi

Ví dụ như thế này, cái không có bảo thạch là Fabao bình thường, cái có bảo thạch là Fabao "chuyển giới"

[Chỉ có thành viên mới xem link được. <a href="register.php"> Nhấp đây để đăng ký thành viên......</a>]

[Chỉ có thành viên mới xem link được. <a href="register.php"> Nhấp đây để đăng ký thành viên......</a>]

vippro0

08-04-11, 08:12 PM

Tiếc nhỉ ko ai thèm trả lời sax muốn học hỏi mà cũng ko nổi :( .................................................. ......................! vậy tự mò vậy

kakashiABC

14-04-11, 06:55 AM

[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ậy

rikudo

14-04-11, 07:40 AM

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ỉ

freelancer

22-04-11, 02:42 AM

Tức là sử dụng client 2.x thì đục lỗi được thú cưỡi mà ko qua chỉnh sửa gì hết ? Hay có chỉnh ? Và chỉnh những gì ?
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 :

--×°±¸´ò¿×

--½Å±¾ºÅ
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:

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=Li feAbility : Stiletto_Preparation(pos_packet);
Need_Item1,Need_Money1,Need_Item_Count1,Bore_Count 1=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£¬
--ÔÚ¿ªÊ¼¹ØÐÄÖ®Ç°ÐèÒªÏÈÈ·¶¨Õ â¸ö½çÃæÊÇ²»ÊÇÒÑ¾ÓÐ¡°¹ØÐÄ ¡±µÄNPC£¬
--Èç¹ûÓÐµÄ»°£¬ÏÈÈ¡ÏûÒÑ¾ÓÐµ Ä¡°¹ØÐÄ¡±
--================================================== =======
function BeginCareObject_Stiletto(objCaredId)

g_Object = objCaredId;
this:CareObject(g_Object, 1, "Stiletto");

end

--================================================== =======
--Í£Ö¹¶ÔÄ³NPCµÄ¹ØÐÄ
--================================================== =======
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_Point

P0900

22-04-11, 07:51 PM

chỉ cách khoá mở khoá nhận vật sử dụng chương trinh cấm đi freelance

freelancer

22-04-11, 08:14 PM

chỉ cách khoá mở khoá nhận vật sử dụng chương trinh cấm đi freelance

khoá mở + khoá nhận + vật sử dụng chương trinh cấm = ???
Tớ không hiểu rõ ý của bạn. Bạn có thể nói rõ vấn đề của bạn được không?

P0900

22-04-11, 08:18 PM

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ế

freelancer

22-04-11, 11:22 PM

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ẻ.

P0900

23-04-11, 08:10 AM

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ẻ.

chờ tin pác đấy nhá!!!!!!!!!!!!!! =))

rikudo

23-04-11, 10:09 AM

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ì ok :)

linhkids

17-07-11, 09:12 PM

[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ậy
[Chỉ có thành viên mới xem link được. <a href="register.php"> Nhấp đây để đăng ký thành viên......</a>]