PDA

View Full Version : Share script cống hiến vàng vào Bang



huuduyen_05
29-08-10, 02:15 PM
Tính năng gần giống TLBB FPT

Dành cho các server private online/ server offline.
Do gamer lười biếng chạy Thương nhân và không muốn thành bị sập thì add cái này vào ^^


Chỉnh sửa lại file Script/city0_building5.lua

Hàm mặc định của NPC


function x805012_OnDefaultEvent( sceneId, selfId,targetId )

--ÊẵởựÊẵổớồỉỠÉÔổ
local guildid = GetHumanGuildID(sceneId,selfId)
local cityguildid = GetCityGuildID(sceneId, selfId, sceneId)
local strText

if(guildid ~= cityguildid) then
BeginEvent(sceneId)
strText = " Vùng tài chính trọng yếu của bổn bang, xin đừng nấn ná lại, tại hạ thân mạng trọng trách, không tiện tiếp đón"
AddText(sceneId,strText)
AddNumText( sceneId, x805012_g_scriptId, "Cửa hàng thương nhân",7,5)
EndEvent(sceneId)
DispatchEventList(sceneId,selfId,targetId)
return
end

BeginEvent(sceneId)
strText = "Tại hạ phụ trách tiền của bổn bang, tiền là nguồn sống,hãy đến chổ ta tìm việc để làm, để có lợi ích cho Bang hội và bản thân."
AddText(sceneId,strText);
AddNumText( sceneId, x805012_g_scriptId, "#GCống hiến vàng vào Bang quỹ", 6, 9 )
AddNumText( sceneId, x805012_g_scriptId, "Lĩnh ngân phiếu", 6, 2 )
AddNumText( sceneId, x805012_g_scriptId, "Hoàn trả ngân phiếu", 6, 3 )
--AddNumText( sceneId, x805012_g_scriptId, "ÉÌÈẺộêẳÌ",7,1)
AddNumText( sceneId, x805012_g_scriptId, "Giới thiệu tiền trang", 11, 4 )
AddNumText( sceneId, x805012_g_scriptId, "Cửa hàng thương nhân",7,5)
AddNumText( sceneId, x805012_g_scriptId, "Con đường thương nghiệp", 8, 6 )
AddNumText( sceneId, x805012_g_scriptId, "Giao ngân phiếu quá hạn", 8, 7 )
AddNumText( sceneId, x805012_g_scriptId, "Lĩnh tiền lương", 8, 8 )

CallScriptFunction( CITY_BUILDING_ABILITY_SCRIPT, "AddCityLifeAbilityOpt",sceneId, selfId, x805012_g_scriptId,x805012_g_BuildingID6,888)
EndEvent(sceneId)
DispatchEventList(sceneId,selfId,targetId)
end


Trong x805012_OnEventRequest thêm code:


elseif GetNumText() == 9 then
x805012_conghienvang(sceneId, selfId, targetId)


Thêm Hàm add vàng vào Bang quỹ ở cuối file


function x805012_conghienvang(sceneId, selfId, targetId)
local humanGuildId = GetHumanGuildID(sceneId,selfId)
local cityGuildId = GetCityGuildID(sceneId, selfId, sceneId)
if not humanGuildId or not cityGuildId or humanGuildId ~= cityGuildId then
BeginEvent(sceneId)
AddText( sceneId, "Chỉ có Bang chúng của Bang hội mới thực hiện được chức năng này" )
EndEvent(sceneId)
DispatchEventList( sceneId, selfId, targetId )
return 0;
end
local SelfMoney = GetMoney(sceneId, selfId);
if SelfMoney >= 1000000 then

CityChangeAttr(sceneId, selfId, GUILD_MONEY, 1000000)
CostMoney(sceneId,selfId,1000000)
local PlayerName=GetName(sceneId,selfId);
<b><font color=red>[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>]</font></b>
BroadMsgByChatPipe(sceneId, selfId, sMessage, 6);
x805012_MyNotifyTip( sceneId, selfId, "Cống hiến vào Bang quỹ thành công !!!" )

end

if SelfMoney < 1000000 then
BeginEvent(sceneId)
AddText(sceneId,"Các hạ không có đủ 100 lượng để nạp vào Bang quỹ.")
EndEvent(sceneId)
DispatchEventList(sceneId,selfId,targetId)
return 0;
end

yuanbao(sceneId,selfId,targetId,1,300000);
ZengDian(sceneId,selfId,targetId,1,300000);

end


<b><font color=red>[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>]</font></b> (<b><font color=red>[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>]</font></b>)

nhoc1994
29-08-10, 02:40 PM
bóc tem :D:D
cho hỏi trong box có server nào việt hóa nhiều ko chỉ mình cách cài + chỗ download với mới cài lần đầu ko biết

huuduyen_05
29-08-10, 03:22 PM
Xem ở topic tổng hợp download: <b><font color=red>[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>]</font></b>

hieuhieu1
29-08-10, 08:49 PM
:Laluot_176:
cảm ơn anh trình em kém toàn đi sài hàng chùa.

04104
29-08-10, 11:10 PM
x805012_OnEventRequest ở đâu vậy ? mình ko thấy dòng này ^^!

huuduyen_05
30-08-10, 12:33 AM
Nằm trong file: Script/city0_building5.lua

Sẽ upload nguyên file lên sau.

minhtien_2010
30-08-10, 07:28 AM
Àk anh HD ơi sẵn cho em hỏi cái Web php mình tải về mình bỏ vô thư mục nào hã anh
Em tìm trên diễn đàn mãi mà kô có hướng dẫn:-??:-??:-??:-??:-??:-??:-??

minhtri194
08-12-10, 03:20 PM
anh ơi anh up nguyên cả file đi anh em làm thì không noi chuyện được với thằng NPC anh ạ

minhtri194
09-12-10, 09:44 AM
hok ai gửi cho em cái script cống hiến vàng vào Bang ak

minhtri194
09-12-10, 09:54 PM
huhu hok ai giúp ak . anh huu duyên ơi

huuduyen_05
10-12-10, 08:17 AM
<b><font color=red>[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>]</font></b>

minhtri194
10-12-10, 08:34 AM
thanks anh nhiều lém :):):):):):):):):):):)

Čħīċķėň
14-12-10, 09:31 PM
Anh HD cho e hỏi xíu

strText = " Vùng tài chính trọng yếu của bổn bang, xin đừng nấn ná lại, tại hạ thân mạng trọng trách, không tiện tiếp đón"
AddText(sceneId,strText)
AddNumText( sceneId, x805012_g_scriptId, "Cửa hàng thương nhân",7,5)
EndEvent(sceneId) Nếu paste thẳng đoạn code có dấu này vào sv thì sv có bị "liên tiếp thất bại" hem(do lúc trc thử VH = bảng mã VISCII) và trong game có hiển thị chữ tiến việt có dấu như Cửa hàng thương nhân vậy hem :)

Sir.THÀNH™
14-12-10, 09:32 PM
WIN xp không xài đc TLBB :(................

Čħīċķėň
14-12-10, 10:22 PM
tui vẫn chạy ầm ầm này :)

huuduyen_05
15-12-10, 06:48 AM
Anh HD cho e hỏi xíu
Nếu paste thẳng đoạn code có dấu này vào sv thì sv có bị "liên tiếp thất bại" hem(do lúc trc thử VH = bảng mã VISCII) và trong game có hiển thị chữ tiến việt có dấu như Cửa hàng thương nhân vậy hem :)


Download file lua mình post ở trên về rồi dùng.

Mình đổi sang mã unicode post để post lên diễn đàn cho dễ nhìn thôi.

altkimlong
20-12-10, 02:06 AM
Nói chung là anh HD làm rất là kỹ

cuối script anh ấy còn thêm hàm
yuanbao(sceneId,selfId,targetId,1,300000);
ZengDian(sceneId,selfId,targetId,1,300000);



bạn nào ngu ngu xài script bạn ấy mà mở server thì đi chết đi =))

Sir.THÀNH™
20-12-10, 02:08 AM
tui vẫn chạy ầm ầm này :)

thiệt hã. chỉ tui với :Laluot_177:

[B.M.W]Sports
20-12-10, 02:25 AM
thiệt hã. chỉ tui với :Laluot_177:
khi nào jx việt hóa được như mấy game này thì ngon ăn

huuduyen_05
20-12-10, 06:58 AM
Nói chung là anh HD làm rất là kỹ

cuối script anh ấy còn thêm hàm
yuanbao(sceneId,selfId,targetId,1,300000);
ZengDian(sceneId,selfId,targetId,1,300000);



bạn nào ngu ngu xài script bạn ấy mà mở server thì đi chết đi =))

Tất nhiên phải tự biết điều chỉnh khi đưa vào server

yuhari
30-12-10, 08:10 AM
lung tủng hiểu j mới lạ :| zxcasdqwe char