Tạm gọi là "Cải lão hoàn đồng" cho nó oai. Download về đổi ID và thêm vào Script.dat là được. Hoặc có thể sử dụng ID có sẵn của một NPC nào đó chẳng hạn...
Update danh hiệu Kiếm Thế dựa theo số lần "cải lão hoàn đồng", ai ko thích có thể đổi lại.
Update danh hiệu Kiếm Thế dựa theo số lần "cải lão hoàn đồng", ai ko thích có thể đổi lại.
- Code:
--Tuyat B?ng Phong
--ID: 900087
--Script by Sói Dz
--Name = Hoàng Anh
--************************
x900087_g_ScriptId = 900087
--*****************************--
--* On Default Event *--
--*****************************--
function x900087_OnDefaultEvent(sceneId,selfId,targetId)
BeginEvent(sceneId)
AddText(sceneId,"Ta là #GHoàng Anh#W.")
AddText(sceneId,"#GTuyat B?ng Phong#W l?nh l¨o v? cùng, ai e? ean e?tc n?i này h?n d?ng khí kh?ng h? nh?. Các h? e? ean eay thì ta s?n sàng tiap eón.")
AddText(sceneId,"Ch? c¥n các h? e?t ean c¤p eμ #G120#W thì có th? ean ch2 t?i h? tian hành #GC?i l?o hoàn e°ng#W. Sau khi #Gc?i l?o hoàn e°ng#W, t¤t c? thuμc tính #Gkh?ng thay e±i#W, các h? s¨ tr· v? #Gc¤p 40#W!")
AddText(sceneId,"#GC?i l?o hoàn e°ng#W càng nhi?u l¥n thì sˉ ei?m thuμc tính càng l?n!")
AddNumText(sceneId,x900087_g_ScriptId,"#GC?i l?o hoàn e°ng",2,1)
AddNumText(sceneId,x900087_g_ScriptId,"Xem sˉ l¥n #GC?i l?o hoàn e°ng",2,2)
AddNumText(sceneId,x900087_g_ScriptId,"Nh§n danh hi?u",2,3)
AddNumText(sceneId,x900087_g_ScriptId,"V? #Gc?i l?o hoàn e°ng#W",11,4)
EndEvent(senceId)
DispatchEventList(sceneId,selfId,targetId)
end
--*****************************--
--* On Event Request *--
--*****************************--
function x900087_OnEventRequest(sceneId,selfId,targetId,eventId)
local key = GetNumText()
--*****************--
local num = GetMissionData(sceneId,selfId,MD_ZHUANSHENG)
if key == 1 then
BeginEvent(sceneId)
AddText(sceneId,"Sau khi #Gc?i l?o hoàn e°ng#W, các h? s¨ tr· v? c¤p eμ 40!")
AddText(sceneId,"Các h? xác nh§n #Gc?i l?o hoàn e°ng#W?")
AddNumText(sceneId,x900087_g_ScriptId,"C?i l?o hoàn e°ng",2,100)
EndEvent(sceneId)
DispatchEventList(sceneId,selfId,targetId)
end
--*****************--
if key == 100 then
if GetLevel(sceneId,selfId) < 120 then
BeginEvent(sceneId)
AddText(sceneId,"Ch? có th? #Gc?i l?o hoàn e°ng#W sau khi e?t c¤p #G120#W tr· lên!")
AddText(sceneId,"H?y ei tu luy?n thêm, khi nào e?t #Gc¤p 120#W l?i ean ch2 ta tian hành #Gc?i l?o hoàn e°ng#W nhé!")
EndEvent(sceneId)
DispatchEventList(sceneId,selfId,targetId)
elseif num>200 then
BeginEvent(sceneId)
AddText(sceneId,"Ch? có th? #Gc?i l?o hoàn e°ng#W tˉi ea #G200#W l¥n!")
AddText(sceneId,"Các h? e? #Gc?i l?o hoàn e°ng#W e?t ean ng?Tng này r°i thì e? #GThiên h? v? e?ch#W, kh?ng c¥n #Gc?i l?o hoàn e°ng#W thêm n?a!")
EndEvent(sceneId)
DispatchEventList(sceneId,selfId,targetId)
else
SetLevel(sceneId,selfId,40)
num = GetMissionData(sceneId,selfId,MD_ZHUANSHENG)
SetMissionData(sceneId,selfId,MD_ZHUANSHENG,num+1)
BeginEvent(sceneId)
AddText(sceneId,"Chúc m×ng các h? e? #Gc?i l?o hoàn e°ng#W thành c?ng. C¤p eμ hi?n t?i cüa các h? là #GC¤p 40#W!")
AddText(sceneId,"Sˉ l¥n các h? #Gc?i l?o hoàn e°ng#W tính ean hi?n t?i là #G"..num.." l¥n#W!")
AddText(sceneId,"H?y ei tu luy?n thêm, khi nào e?t #Gc¤p 120#W l?i ean ch2 ta tian hành #Gc?i l?o hoàn e°ng#W nhé!")
EndEvent(sceneId)
DispatchEventList(sceneId,selfId,targetId)
end
end
--*****************--
if key == 2 then
num = GetMissionData(sceneId,selfId,MD_ZHUANSHENG)
BeginEvent(sceneId)
AddText(sceneId,"Sˉ l¥n #Gc?i l?o hoàn e°ng#W cüa các h? tính t?i hi?n t?i là: #G"..num.." l¥n#W!")
AddText(sceneId,"Tˉi ea còn l?i "..(200-num).." l¥n #Gc?i l?o hoàn e°ng#W n?a!")
EndEvent(sceneId)
DispatchEventList(sceneId,selfId,targetId)
end
--*****************--
if key == 3 then
BeginEvent(sceneId)
AddText(sceneId,"Các h? muˉn e±i danh hi?u nào?")
AddNumText(sceneId,x900087_g_ScriptId,"#W#bSiêu Phàm Hi Ky",11,5)
AddNumText(sceneId,x900087_g_ScriptId,"#G#bXu¤t Tr¥n Kinh H°ng",11,6)
AddNumText(sceneId,x900087_g_ScriptId,"#G#bL?ng Tuy?t V? ?nh",11,7)
AddNumText(sceneId,x900087_g_ScriptId,"#c00ff00#bNg? Kh?ng Phùng H?",11,8)
AddNumText(sceneId,x900087_g_ScriptId,"#c00ff00#bH2n Thiên Tr¤n Nguyên",11,9)
AddNumText(sceneId,x900087_g_ScriptId,"#c00ff00#bS° Ph?tng Linh V?",11,10)
AddNumText(sceneId,x900087_g_ScriptId,"#Y#bTi?m Long Ngam Uyên",11,11)
AddNumText(sceneId,x900087_g_ScriptId,"#Y#bChí T?n Truy?n Thuyat",11,12)
AddNumText(sceneId,x900087_g_ScriptId,"#cFF0000#bV? Song V??ng Gi?",11,13)
EndEvent(sceneId)
DispatchEventList(sceneId,selfId,targetId)
end
--*****************--
if key == 4 then
BeginEvent(sceneId)
AddText(sceneId,"Sau khi #Gc?i l?o hoàn e°ng#W, các thuμc tính #Gtam pháp m?n phái#W kh?ng thay e±i!")
AddText(sceneId,"#GC?i l?o hoàn e°ng#W càng nhi?u l¥n, s?c m?nh cüa các h? càng t?ng!")
AddText(sceneId,"Sau khi e?t mμt sˉ mˉc v? sˉ l¥n #Gc?i l?o hoàn e°ng#W cˉ e?nh, có th? l?nh nh§n danh hi?u cao quy v? cùng!")
EndEvent(sceneId)
DispatchEventList(sceneId,selfId,targetId)
end
--*****************--
if key == 5 then
num = GetMissionData(sceneId,selfId,MD_ZHUANSHENG)
if num < 1 then
BeginEvent(sceneId)
AddText(sceneId,"D±i danh hi?u #GSiêu Phàm Hi Ky#W c¥n #G1 l¥n#W thành c?ng #Gc?i l?o hoàn e°ng#W!")
AddText(sceneId,"Sˉ l¥n #Gc?i l?o hoàn e°ng#W cüa các h? hi?n t?i là "..num..", v?n ch?a eü #G1 l¥n#W, kh?ng th? nh§n danh hi?u!")
EndEvent(sceneId)
DispatchEventList(sceneId,selfId,targetId)
else
LuaFnAwardSpouseTitle(sceneId,selfId,"#W#bSiêu Phàm Hi Ky")
DispatchAllTitle(sceneId,selfId)
BeginEvent(sceneId)
AddText(sceneId,"Chúc m×ng các h? nh§n thành c?ng danh hi?u #W#bSiêu Phàm Hi Ky#W!")
EndEvent(sceneId)
DispatchEventList(sceneId,selfId,targetId)
end
end
--*****************--
if key == 6 then
num = GetMissionData(sceneId,selfId,MD_ZHUANSHENG)
if num < 10 then
BeginEvent(sceneId)
AddText(sceneId,"D±i danh hi?u #GXu¤t Tr¥n Kinh H°ng#W c¥n #G10 l¥n#W thành c?ng #Gc?i l?o hoàn e°ng#W!")
AddText(sceneId,"Sˉ l¥n #Gc?i l?o hoàn e°ng#W cüa các h? hi?n t?i là "..num..", v?n ch?a eü #G10 l¥n#W, kh?ng th? nh§n danh hi?u!")
EndEvent(sceneId)
DispatchEventList(sceneId,selfId,targetId)
else
LuaFnAwardSpouseTitle(sceneId,selfId,"#G#bXu¤t Tr¥n Kinh H°ng")
DispatchAllTitle(sceneId,selfId)
BeginEvent(sceneId)
AddText(sceneId,"Chúc m×ng các h? nh§n thành c?ng danh hi?u #G#bXu¤t Tr¥n Kinh H°ng#W!")
EndEvent(sceneId)
DispatchEventList(sceneId,selfId,targetId)
end
end
--*****************--
if key == 7 then
num = GetMissionData(sceneId,selfId,MD_ZHUANSHENG)
if num < 20 then
BeginEvent(sceneId)
AddText(sceneId,"D±i danh hi?u #GL?ng Tuy?t V? ?nh#W c¥n #G20 l¥n#W thành c?ng #Gc?i l?o hoàn e°ng#W!")
AddText(sceneId,"Sˉ l¥n #Gc?i l?o hoàn e°ng#W cüa các h? hi?n t?i là "..num..", v?n ch?a eü #G20 l¥n#W, kh?ng th? nh§n danh hi?u!")
EndEvent(sceneId)
DispatchEventList(sceneId,selfId,targetId)
else
LuaFnAwardSpouseTitle(sceneId,selfId,"#G#bL?ng Tuy?t V? ?nh")
DispatchAllTitle(sceneId,selfId)
BeginEvent(sceneId)
AddText(sceneId,"Chúc m×ng các h? nh§n thành c?ng danh hi?u #G#bL?ng Tuy?t V? ?nh#W!")
EndEvent(sceneId)
DispatchEventList(sceneId,selfId,targetId)
end
end
--*****************--
if key == 8 then
num = GetMissionData(sceneId,selfId,MD_ZHUANSHENG)
if num < 40 then
BeginEvent(sceneId)
AddText(sceneId,"D±i danh hi?u #GNg? Kh?ng Phùng H?#W c¥n #G40 l¥n#W thành c?ng #Gc?i l?o hoàn e°ng#W!")
AddText(sceneId,"Sˉ l¥n #Gc?i l?o hoàn e°ng#W cüa các h? hi?n t?i là "..num..", v?n ch?a eü #G40 l¥n#W, kh?ng th? nh§n danh hi?u!")
EndEvent(sceneId)
DispatchEventList(sceneId,selfId,targetId)
else
LuaFnAwardSpouseTitle(sceneId,selfId,"#c00ff00#bNg? Kh?ng Phùng H?")
DispatchAllTitle(sceneId,selfId)
BeginEvent(sceneId)
AddText(sceneId,"Chúc m×ng các h? nh§n thành c?ng danh hi?u #c00ff00#bNg? Kh?ng Phùng H?#W!")
EndEvent(sceneId)
DispatchEventList(sceneId,selfId,targetId)
end
end
--*****************--
if key == 9 then
num = GetMissionData(sceneId,selfId,MD_ZHUANSHENG)
if num < 60 then
BeginEvent(sceneId)
AddText(sceneId,"D±i danh hi?u #GH2n Thiên Tr¤n Nguyên#W c¥n #G60 l¥n#W thành c?ng #Gc?i l?o hoàn e°ng#W!")
AddText(sceneId,"Sˉ l¥n #Gc?i l?o hoàn e°ng#W cüa các h? hi?n t?i là "..num..", v?n ch?a eü #G60 l¥n#W, kh?ng th? nh§n danh hi?u!")
EndEvent(sceneId)
DispatchEventList(sceneId,selfId,targetId)
else
LuaFnAwardSpouseTitle(sceneId,selfId,"#c00ff00#bH2n Thiên Tr¤n Nguyên")
DispatchAllTitle(sceneId,selfId)
BeginEvent(sceneId)
AddText(sceneId,"Chúc m×ng các h? nh§n thành c?ng danh hi?u #c00ff00#bH2n Thiên Tr¤n Nguyên#W!")
EndEvent(sceneId)
DispatchEventList(sceneId,selfId,targetId)
end
end
--*****************--
if key == 10 then
num = GetMissionData(sceneId,selfId,MD_ZHUANSHENG)
if num < 90 then
BeginEvent(sceneId)
AddText(sceneId,"D±i danh hi?u #GS° Ph?tng Linh V?#W c¥n #G90 l¥n#W thành c?ng #Gc?i l?o hoàn e°ng#W!")
AddText(sceneId,"Sˉ l¥n #Gc?i l?o hoàn e°ng#W cüa các h? hi?n t?i là "..num..", v?n ch?a eü #G90 l¥n#W, kh?ng th? nh§n danh hi?u!")
EndEvent(sceneId)
DispatchEventList(sceneId,selfId,targetId)
else
LuaFnAwardSpouseTitle(sceneId,selfId,"#c00ff00#bS° Ph?tng Linh V?")
DispatchAllTitle(sceneId,selfId)
BeginEvent(sceneId)
AddText(sceneId,"Chúc m×ng các h? nh§n thành c?ng danh hi?u #c00ff00#bS° Ph?tng Linh V?#W!")
EndEvent(sceneId)
DispatchEventList(sceneId,selfId,targetId)
end
end
--*****************--
if key == 11 then
num = GetMissionData(sceneId,selfId,MD_ZHUANSHENG)
if num < 120 then
BeginEvent(sceneId)
AddText(sceneId,"D±i danh hi?u #GTi?m Long Ngam Uyên#W c¥n #G120 l¥n#W thành c?ng #Gc?i l?o hoàn e°ng#W!")
AddText(sceneId,"Sˉ l¥n #Gc?i l?o hoàn e°ng#W cüa các h? hi?n t?i là "..num..", v?n ch?a eü #G120 l¥n#W, kh?ng th? nh§n danh hi?u!")
EndEvent(sceneId)
DispatchEventList(sceneId,selfId,targetId)
else
LuaFnAwardSpouseTitle(sceneId,selfId,"#Y#bTi?m Long Ngam Uyên")
DispatchAllTitle(sceneId,selfId)
BeginEvent(sceneId)
AddText(sceneId,"Chúc m×ng các h? nh§n thành c?ng danh hi?u #Y#bTi?m Long Ngam Uyên#W!")
EndEvent(sceneId)
DispatchEventList(sceneId,selfId,targetId)
end
end
--*****************--
if key == 12 then
num = GetMissionData(sceneId,selfId,MD_ZHUANSHENG)
if num < 150 then
BeginEvent(sceneId)
AddText(sceneId,"D±i danh hi?u #GChí T?n Truy?n Thuyat#W c¥n #G150 l¥n#W thành c?ng #Gc?i l?o hoàn e°ng#W!")
AddText(sceneId,"Sˉ l¥n #Gc?i l?o hoàn e°ng#W cüa các h? hi?n t?i là "..num..", v?n ch?a eü #G150 l¥n#W, kh?ng th? nh§n danh hi?u!")
EndEvent(sceneId)
DispatchEventList(sceneId,selfId,targetId)
else
LuaFnAwardSpouseTitle(sceneId,selfId,"#Y#bChí T?n Truy?n Thuyat")
DispatchAllTitle(sceneId,selfId)
BeginEvent(sceneId)
AddText(sceneId,"Chúc m×ng các h? nh§n thành c?ng danh hi?u #Y#bChí T?n Truy?n Thuyat#W!")
EndEvent(sceneId)
DispatchEventList(sceneId,selfId,targetId)
end
end
--*****************--
if key == 13 then
num = GetMissionData(sceneId,selfId,MD_ZHUANSHENG)
if num < 200 then
BeginEvent(sceneId)
AddText(sceneId,"D±i danh hi?u #GV? Song V??ng Gi?#W c¥n #G200 l¥n#W thành c?ng #Gc?i l?o hoàn e°ng#W!")
AddText(sceneId,"Sˉ l¥n #Gc?i l?o hoàn e°ng#W cüa các h? hi?n t?i là "..num..", v?n ch?a eü #G200 l¥n#W, kh?ng th? nh§n danh hi?u!")
EndEvent(sceneId)
DispatchEventList(sceneId,selfId,targetId)
else
LuaFnAwardSpouseTitle(sceneId,selfId,"#cFF0000#bV? Song V??ng Gi?")
DispatchAllTitle(sceneId,selfId)
BeginEvent(sceneId)
AddText(sceneId,"Chúc m×ng các h? nh§n thành c?ng danh hi?u #cFF0000#bV? Song V??ng Gi?#W!")
EndEvent(sceneId)
DispatchEventList(sceneId,selfId,targetId)
end
end
--*****************--
end