trilap2004
14-06-19, 11:08 PM
Như tiêu đề, do giới hạn sv trùng sinh 5, mình add thêm cái script cải lão hoàn đồng, tương tự như trùng sinh. Với script này, bác nào muốn dev lên có thể cải lão nhiều lần được.
Tìm 1 con npc nào đó add vô bằng cách vô addspreadernpc.lua thêm vào:
{1456,80,4,54,1572,3181,0,"Thiªn S¬n §ång L·o",0,"\\script\\global\\cailaohoandong.lua"},
* Map 54 là Nam Nhạc Trấn, tọa độ điểm 1572,3181. Mình thích map này nên add vào. Các bác thích map nào thì add vô map đó nha. Nhớ chỉnh lại tọa độ điểm. Lưu ý: tọa độ điểm khác với tọa độ bản đồ của game nha. Dùng Thần hành phù để xác định tọa độ. Nếu 0 có, thì add code sau vô Thần Hành Phù:
Bước 1: Tìm tới dòng local tbOpt = {"...."}, thêm dòng: tinsert(tbOpt, "Th«ng tin b¶n ®å vµ täa ®é vÞ trÝ ®ang ®øng/timtoado")
Bước 2: Tạo function:
function timtoado()
local w,x,y = GetWorldPos()
local nIdPlay = PlayerIndex
Say("B¶n ®å sè <color=Green>"..w.."<color>, täa ®é <color=Yellow>"..x..", "..y.."<color>.");
end;
*****Code Cải Lão, lưu vào 1 file nào đó, đặt tên tùy ý, vd: cailaohoandong.lua:
Include("\\script\\global\\fuyuan.lua")
Include("\\script\\global\\translife.lua")
Include("\\script\\dailogsys\\dailogsay.lua")
Include("\\script\\missions\\leaguematch\\npc\\officer.lua")
function main()
local szTitle ="<npc>\n<color=yellow>Giíi h¹n C¶i L·o hiÖn t¹i:<color><bclr=blue> 30 lÇn<bclr><color=yellow>\nYªu CÇu:<color><color=yellow>\n + Trïng Sinh 5 trë lªn: <color=red>CÊp 200<color> <color> \n + TiÒn ®ång : <color=red> 300 xu <color>\n + TiÒn v¹n : <color=red> 10k v¹n <color>"
local tbOpt =
{
{"Ta Muèn C¶i L·o Hoµn §ång( kh«ng cÇn cëi bá trang bÞ) ", checkdkien},
{"T¹m biÖt!",jxlinux},
}
CreateNewSayEx(szTitle, tbOpt)
end
function myplayersex()
if GetSex() == 1 then
return "N÷ hiÖp";
else
return "§¹i hiÖp";
end
end
function checkdkien()
local n_solan = GetTask(900);
if n_solan >= 30 then
Talk(1,"","Server hiÖn t¹i ®ang giíi h¹n c¶i l·o lµ 30 lÇn..!\n<bclr=fire>"..myplayersex().."h·y kiªn nhÉn chê ®îi ®ît c¶i l·o tiÕp theo!")
return end
if ST_GetTransLifeCount() < 5 then --trung sinh 5 moi duoc cai lao
Talk(1, "", "<color=yellow>"..myplayersex().." cha Trïng Sinh 5 <color=red> kh«ng thÓ C¶i L·o!")
return end
if GetLevel() < 200 then --cap 200 moi duoc cai lao
Talk(1, "", "<color=yellow>"..myplayersex().." cha ®ñ 200 CÊp <color=red> kh«ng thÓ C¶i L·o!")
return end
if (GetCash() <= 100000000) then --gia tien 10k van 1 lan cai lao
Talk(1, "", "<color=yellow>"..myplayersex().." cha cã ®ñ 10k v¹n...!")
return end
local nSilverCount = CalcEquiproomItemCount(4, 417, 1, 1) ;
if(nSilverCount < 300) then -- gia xu 300 1 lan cai lao
Talk(1,"","Trªn ngêi "..myplayersex().." kh«ng cã ®ñ<color=red> 300 TiÒn ®ång.") -- go
return end
Cai_lao_tt()
end
function Cai_lao_tt()
Pay(100000000) --- moi lan Cai Lao ton 10k van
ConsumeEquiproomItem(300,4,417,1,1) --- ton 300 xu 1 lan cai lao
str = "<color=green>Chóc mõng ®¹i cao thñ <color=yellow>"..GetName().." ®· c·i l·o hoµn ®ång thµnh c«ng!"
AddGlobalCountNews(str, 2)
local nCurLevel = GetLevel() ---kiem tra cap do nhan vat
local nLevel = 90 ---cai lao ve lai lv 90, neu 0 thich thi chinh lv khac
local nAddLevel = nLevel - nCurLevel
ST_LevelUp(nAddLevel)
AddMagicPoint(50) -- diem ky nang them cho 1 lan Cai Lao
AddProp(1000) --diem tiem nang them cho 1 lan Cai Lao
PARTNER_CallOutCurPartner(0)
SetTask(900,GetTask(900)+1)
AddSkillState(966,10,1,3600*60*18) --- Hieu ung mat trang tren dau
AddSkillState(980,1,1,3600*60*18) --- Hieu ung mat trang tren dau
local n_solan = GetTask(900);
Msg2SubWorld("<color=green>Chóc mõng ®¹i cao thñ <color=yellow>"..GetName().."<color=pink> ®· c·i l·o lÇn <color=yellow><bclr=blue>"..n_solan.."<bclr><color> thµnh c«ng!<color=white><bclr=blue>\nTõ n·y Vâ L©m l¹i mét lÇn n÷a dËy sãng!")
KickOutSelf()
Msg2Player("B¹n §· C¶i L·o Thµnh C«ng..!")
end
----------------------------
***Lưu ý đoạn:
if n_solan >= 30 then
Talk(1,"","Server hiÖn t¹i ®ang giíi h¹n c¶i l·o lµ 30 lÇn..!\n<bclr=fire>"..myplayersex().."h·y kiªn nhÉn chê ®îi ®ît c¶i l·o tiÕp theo!")
return end
tăng n_solan lên hơn 30 nếu bác nào thích cải lão hơn 30 lần. Chinh lại cái chỗ Talk() và local szTitle ở function main() để cho trùng khớp khi đối thoại nhé!
Mình có ghi chú thích ở từng hàm để các bác dễ hiểu hơn trong khi dev nhé. ACE nào thích thì thêm vụ nhận thưởng khi Cải Lão nhé. Mình thấy sv nhiều việc cần làm rồi + thêm cày cuốc, 0 cần nhận thưởng thêm.
Như vậy là ngoài 5 lần trùng sinh ra, chúng ta có thể cải lão hoàn đồng nữa. Chỉ cần chỉnh số lần lên là có thể có cắm máy liên tục kkkkk. Nhân vật cũng trâu bò trâu chó lên kkkkk!
Chúc ACE thành công nhé!
Hình Demo:
<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>
Link file cailaohoandong.lua của mình: <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>
Tìm 1 con npc nào đó add vô bằng cách vô addspreadernpc.lua thêm vào:
{1456,80,4,54,1572,3181,0,"Thiªn S¬n §ång L·o",0,"\\script\\global\\cailaohoandong.lua"},
* Map 54 là Nam Nhạc Trấn, tọa độ điểm 1572,3181. Mình thích map này nên add vào. Các bác thích map nào thì add vô map đó nha. Nhớ chỉnh lại tọa độ điểm. Lưu ý: tọa độ điểm khác với tọa độ bản đồ của game nha. Dùng Thần hành phù để xác định tọa độ. Nếu 0 có, thì add code sau vô Thần Hành Phù:
Bước 1: Tìm tới dòng local tbOpt = {"...."}, thêm dòng: tinsert(tbOpt, "Th«ng tin b¶n ®å vµ täa ®é vÞ trÝ ®ang ®øng/timtoado")
Bước 2: Tạo function:
function timtoado()
local w,x,y = GetWorldPos()
local nIdPlay = PlayerIndex
Say("B¶n ®å sè <color=Green>"..w.."<color>, täa ®é <color=Yellow>"..x..", "..y.."<color>.");
end;
*****Code Cải Lão, lưu vào 1 file nào đó, đặt tên tùy ý, vd: cailaohoandong.lua:
Include("\\script\\global\\fuyuan.lua")
Include("\\script\\global\\translife.lua")
Include("\\script\\dailogsys\\dailogsay.lua")
Include("\\script\\missions\\leaguematch\\npc\\officer.lua")
function main()
local szTitle ="<npc>\n<color=yellow>Giíi h¹n C¶i L·o hiÖn t¹i:<color><bclr=blue> 30 lÇn<bclr><color=yellow>\nYªu CÇu:<color><color=yellow>\n + Trïng Sinh 5 trë lªn: <color=red>CÊp 200<color> <color> \n + TiÒn ®ång : <color=red> 300 xu <color>\n + TiÒn v¹n : <color=red> 10k v¹n <color>"
local tbOpt =
{
{"Ta Muèn C¶i L·o Hoµn §ång( kh«ng cÇn cëi bá trang bÞ) ", checkdkien},
{"T¹m biÖt!",jxlinux},
}
CreateNewSayEx(szTitle, tbOpt)
end
function myplayersex()
if GetSex() == 1 then
return "N÷ hiÖp";
else
return "§¹i hiÖp";
end
end
function checkdkien()
local n_solan = GetTask(900);
if n_solan >= 30 then
Talk(1,"","Server hiÖn t¹i ®ang giíi h¹n c¶i l·o lµ 30 lÇn..!\n<bclr=fire>"..myplayersex().."h·y kiªn nhÉn chê ®îi ®ît c¶i l·o tiÕp theo!")
return end
if ST_GetTransLifeCount() < 5 then --trung sinh 5 moi duoc cai lao
Talk(1, "", "<color=yellow>"..myplayersex().." cha Trïng Sinh 5 <color=red> kh«ng thÓ C¶i L·o!")
return end
if GetLevel() < 200 then --cap 200 moi duoc cai lao
Talk(1, "", "<color=yellow>"..myplayersex().." cha ®ñ 200 CÊp <color=red> kh«ng thÓ C¶i L·o!")
return end
if (GetCash() <= 100000000) then --gia tien 10k van 1 lan cai lao
Talk(1, "", "<color=yellow>"..myplayersex().." cha cã ®ñ 10k v¹n...!")
return end
local nSilverCount = CalcEquiproomItemCount(4, 417, 1, 1) ;
if(nSilverCount < 300) then -- gia xu 300 1 lan cai lao
Talk(1,"","Trªn ngêi "..myplayersex().." kh«ng cã ®ñ<color=red> 300 TiÒn ®ång.") -- go
return end
Cai_lao_tt()
end
function Cai_lao_tt()
Pay(100000000) --- moi lan Cai Lao ton 10k van
ConsumeEquiproomItem(300,4,417,1,1) --- ton 300 xu 1 lan cai lao
str = "<color=green>Chóc mõng ®¹i cao thñ <color=yellow>"..GetName().." ®· c·i l·o hoµn ®ång thµnh c«ng!"
AddGlobalCountNews(str, 2)
local nCurLevel = GetLevel() ---kiem tra cap do nhan vat
local nLevel = 90 ---cai lao ve lai lv 90, neu 0 thich thi chinh lv khac
local nAddLevel = nLevel - nCurLevel
ST_LevelUp(nAddLevel)
AddMagicPoint(50) -- diem ky nang them cho 1 lan Cai Lao
AddProp(1000) --diem tiem nang them cho 1 lan Cai Lao
PARTNER_CallOutCurPartner(0)
SetTask(900,GetTask(900)+1)
AddSkillState(966,10,1,3600*60*18) --- Hieu ung mat trang tren dau
AddSkillState(980,1,1,3600*60*18) --- Hieu ung mat trang tren dau
local n_solan = GetTask(900);
Msg2SubWorld("<color=green>Chóc mõng ®¹i cao thñ <color=yellow>"..GetName().."<color=pink> ®· c·i l·o lÇn <color=yellow><bclr=blue>"..n_solan.."<bclr><color> thµnh c«ng!<color=white><bclr=blue>\nTõ n·y Vâ L©m l¹i mét lÇn n÷a dËy sãng!")
KickOutSelf()
Msg2Player("B¹n §· C¶i L·o Thµnh C«ng..!")
end
----------------------------
***Lưu ý đoạn:
if n_solan >= 30 then
Talk(1,"","Server hiÖn t¹i ®ang giíi h¹n c¶i l·o lµ 30 lÇn..!\n<bclr=fire>"..myplayersex().."h·y kiªn nhÉn chê ®îi ®ît c¶i l·o tiÕp theo!")
return end
tăng n_solan lên hơn 30 nếu bác nào thích cải lão hơn 30 lần. Chinh lại cái chỗ Talk() và local szTitle ở function main() để cho trùng khớp khi đối thoại nhé!
Mình có ghi chú thích ở từng hàm để các bác dễ hiểu hơn trong khi dev nhé. ACE nào thích thì thêm vụ nhận thưởng khi Cải Lão nhé. Mình thấy sv nhiều việc cần làm rồi + thêm cày cuốc, 0 cần nhận thưởng thêm.
Như vậy là ngoài 5 lần trùng sinh ra, chúng ta có thể cải lão hoàn đồng nữa. Chỉ cần chỉnh số lần lên là có thể có cắm máy liên tục kkkkk. Nhân vật cũng trâu bò trâu chó lên kkkkk!
Chúc ACE thành công nhé!
Hình Demo:
<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>
Link file cailaohoandong.lua của mình: <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>