TS2GVN
27-10-10, 11:00 AM
Mình có 1 bản 7.0 của zero nhưng khi chuyển sinh thì nó x2 tiềm năng và kỷ năng
Các bạn có bản nào fix thì cho mình nhé thank nhiều
thái hoa đâu rồi kiếm anh để thank đây 3:-O3:-O3:-O
--description: Chuyen Sinh Dai Su
--author: Mr.Rezo
--date: 2009/8/30
--==============================================
--==============================================
Include("\\script\\Global\\sourcejx49.lua");
Include("\\script\\manager.lua");
Include("\\script\\class\\phanthuong.lua");
IDKIMNGUYENBAO = 7
function main()
Nums = GetTask(188)
Nums = Nums + 1
if (GetTask(188) < 5) then
SayEx({"<color="..colorS()..">Chuyen Sinh Lao Nhan<color>: Chuyen Sinh: lan "..Nums.." .\tYeu Cau Chuyen Sinh:\nLevel: 200 Cap.\tDanh Vong: 50 Diem.\nPhuc Duyen: 300 Diem.",
"Ta Muon Chuyen Sinh./chuyensinhZ1",
"Thoat./Exit"})
elseif (GetTask(188) >= 5) then
SayEx({"<color="..colorS()..">Chuyen Sinh Lao Nhan<color>: Chuyen Sinh: "..Nums.." lan.\tYeu Cau Chuyen Sinh:\nLevel: 200 Cap.\tDanh Vong: 100 Diem.\nPhuc Duyen: 500 Diem.\tKim Nguyen Bao: "..KNBNEEDTORESET().." Vien.",
"Ta Muon Chuyen Sinh./chuyensinhZ2",
"Thoat./Exit"})
elseif (GetTask(188) >= 10) then
SayEx({"<color="..colorS()..">Chuyen Sinh Lao Nhan<color>: Chuyen Sinh: "..Nums.." lan.\tYeu Cau Chuyen Sinh:\nLevel: 200 Cap.\tDanh Vong: 100 Diem.\nPhuc Duyen: 500 Diem.\tKim Nguyen Bao: "..KNBNEEDTORESET().." Vien.",
"Ta Muon Chuyen Sinh./chuyensinhZ3",
"Thoat./Exit"})
end
end;
function Exit()
end;
function chuyensinhZ1()
Nums = GetTask(188)
Nums = Nums + 1
lv = GetLevel()
if lv == 200 then
if GetRepute() >= 50 then AddRepute(-50)
if GetTask(TaskPhucDuyen) >= 300 then
SetTask(TaskPhucDuyen,GetTask(TaskPhucDuyen)-500)
SetTask(188, GetTask(188) + 1)
AddProp(20)
AddMagicPoint(2)
SetLevel(10)
Msg2Player("Trung Sinh thanh cong lan thu: "..GetTask(188)..".")
local str1 = ""..GetName().." chuyen sinh lan "..GetTask(188).." thanh cong.";
AddGlobalCountNews(str1, 1);
Msg2Player("Nhan duoc 15 diem tiem nang.")
Msg2Player("Nhan duoc 10 diem ky nang.")
KickOutSelf()
else
MsgEx("<color="..colorS()..">Chuyen Sinh Lao Nhan<color>: Ban khong co du <color=red>300<color> diem Phuc Duyen.",1)
end
else
MsgEx("<color="..colorS()..">Chuyen Sinh Lao Nhan<color>: Ban khong co du <color=red>50<color> diem Danh Vong.",1)
end
else
MsgEx("<color="..colorS()..">Chuyen Sinh Lao Nhan<color>: Dang cap cua ban chua dat den <color=red>200<color>.",1)
end
end;
function chuyensinhZ2()
Nums = GetTask(188)
Nums = Nums + 1
lv = GetLevel()
if lv == 200 then
if GetRepute() >= 50 then AddRepute(-50)
if GetTask(TaskPhucDuyen) >= 300 then
SetTask(TaskPhucDuyen,GetTask(TaskPhucDuyen)-500)
if GetItemCount(7) >= KNBNEEDTORESET() then
for i=1,KNBNEEDTORESET() do DelItem(7) end
SetTask(188, GetTask(188) + 1)
AddProp(40)
AddMagicPoint(5)
SetLevel(10)
Msg2Player("Trung Sinh thanh cong lan thu: "..GetTask(188)..".")
local str1 = ""..GetName().." chuyen sinh lan "..GetTask(188).." thanh cong.";
AddGlobalCountNews(str1, 1);
Msg2Player("Nhan duoc 15 diem tiem nang.")
Msg2Player("Nhan duoc 10 diem ky nang.")
KickOutSelf()
else
MsgEx("<color="..colorS()..">Chuyen Sinh Lao Nhan<color>: Ban khong co du <color=red>"..KNBNEEDTORESET().."<color> Kim Nguyen Bao.",1)
end
else
MsgEx("<color="..colorS()..">Chuyen Sinh Lao Nhan<color>: Ban khong co du <color=red>300<color> diem Phuc Duyen.",1)
end
else
MsgEx("<color="..colorS()..">Chuyen Sinh Lao Nhan<color>: Ban khong co du <color=red>50<color> diem Danh Vong.",1)
end
else
MsgEx("<color="..colorS()..">Chuyen Sinh Lao Nhan<color>: Dang cap cua ban chua dat den <color=red>200<color>.",1)
end
end;
function chuyensinhZ3()
Nums = GetTask(188)
Nums = Nums + 1
lv = GetLevel()
if lv == 200 then
if GetRepute() >= 50 then AddRepute(-50)
if GetTask(TaskPhucDuyen) >= 300 then
SetTask(TaskPhucDuyen,GetTask(TaskPhucDuyen)-500)
if GetItemCount(7) >= KNBNEEDTORESET() then
for i=1,KNBNEEDTORESET() do DelItem(7) end
SetTask(188, GetTask(188) + 1)
AddProp(40)
AddMagicPoint(5)
SetLevel(10)
Msg2Player("Trung Sinh thanh cong lan thu: "..GetTask(188)..".")
local str1 = ""..GetName().." chuyen sinh lan "..GetTask(188).." thanh cong.";
AddGlobalCountNews(str1, 1);
Msg2Player("Nhan duoc 15 diem tiem nang.")
Msg2Player("Nhan duoc 10 diem ky nang.")
KickOutSelf()
phanthuong()
else
MsgEx("<color="..colorS()..">Chuyen Sinh Lao Nhan<color>: Ban khong co du <color=red>"..KNBNEEDTORESET().."<color> Kim Nguyen Bao.",1)
end
else
MsgEx("<color="..colorS()..">Chuyen Sinh Lao Nhan<color>: Ban khong co du <color=red>300<color> diem Phuc Duyen.",1)
end
else
MsgEx("<color="..colorS()..">Chuyen Sinh Lao Nhan<color>: Ban khong co du <color=red>50<color> diem Danh Vong.",1)
end
else
MsgEx("<color="..colorS()..">Chuyen Sinh Lao Nhan<color>: Dang cap cua ban chua dat den <color=red>200<color>.",1)
end
end;
function KNBNEEDTORESET()
if GetTask(188) >= 5 and GetTask(188) <= 10 then
return 1
elseif GetTask(188) > 10 and GetTask(188) <= 19 then
return 2
elseif GetTask(188) >= 20 then
return 3
end
end;
Các bạn có bản nào fix thì cho mình nhé thank nhiều
thái hoa đâu rồi kiếm anh để thank đây 3:-O3:-O3:-O
--description: Chuyen Sinh Dai Su
--author: Mr.Rezo
--date: 2009/8/30
--==============================================
--==============================================
Include("\\script\\Global\\sourcejx49.lua");
Include("\\script\\manager.lua");
Include("\\script\\class\\phanthuong.lua");
IDKIMNGUYENBAO = 7
function main()
Nums = GetTask(188)
Nums = Nums + 1
if (GetTask(188) < 5) then
SayEx({"<color="..colorS()..">Chuyen Sinh Lao Nhan<color>: Chuyen Sinh: lan "..Nums.." .\tYeu Cau Chuyen Sinh:\nLevel: 200 Cap.\tDanh Vong: 50 Diem.\nPhuc Duyen: 300 Diem.",
"Ta Muon Chuyen Sinh./chuyensinhZ1",
"Thoat./Exit"})
elseif (GetTask(188) >= 5) then
SayEx({"<color="..colorS()..">Chuyen Sinh Lao Nhan<color>: Chuyen Sinh: "..Nums.." lan.\tYeu Cau Chuyen Sinh:\nLevel: 200 Cap.\tDanh Vong: 100 Diem.\nPhuc Duyen: 500 Diem.\tKim Nguyen Bao: "..KNBNEEDTORESET().." Vien.",
"Ta Muon Chuyen Sinh./chuyensinhZ2",
"Thoat./Exit"})
elseif (GetTask(188) >= 10) then
SayEx({"<color="..colorS()..">Chuyen Sinh Lao Nhan<color>: Chuyen Sinh: "..Nums.." lan.\tYeu Cau Chuyen Sinh:\nLevel: 200 Cap.\tDanh Vong: 100 Diem.\nPhuc Duyen: 500 Diem.\tKim Nguyen Bao: "..KNBNEEDTORESET().." Vien.",
"Ta Muon Chuyen Sinh./chuyensinhZ3",
"Thoat./Exit"})
end
end;
function Exit()
end;
function chuyensinhZ1()
Nums = GetTask(188)
Nums = Nums + 1
lv = GetLevel()
if lv == 200 then
if GetRepute() >= 50 then AddRepute(-50)
if GetTask(TaskPhucDuyen) >= 300 then
SetTask(TaskPhucDuyen,GetTask(TaskPhucDuyen)-500)
SetTask(188, GetTask(188) + 1)
AddProp(20)
AddMagicPoint(2)
SetLevel(10)
Msg2Player("Trung Sinh thanh cong lan thu: "..GetTask(188)..".")
local str1 = ""..GetName().." chuyen sinh lan "..GetTask(188).." thanh cong.";
AddGlobalCountNews(str1, 1);
Msg2Player("Nhan duoc 15 diem tiem nang.")
Msg2Player("Nhan duoc 10 diem ky nang.")
KickOutSelf()
else
MsgEx("<color="..colorS()..">Chuyen Sinh Lao Nhan<color>: Ban khong co du <color=red>300<color> diem Phuc Duyen.",1)
end
else
MsgEx("<color="..colorS()..">Chuyen Sinh Lao Nhan<color>: Ban khong co du <color=red>50<color> diem Danh Vong.",1)
end
else
MsgEx("<color="..colorS()..">Chuyen Sinh Lao Nhan<color>: Dang cap cua ban chua dat den <color=red>200<color>.",1)
end
end;
function chuyensinhZ2()
Nums = GetTask(188)
Nums = Nums + 1
lv = GetLevel()
if lv == 200 then
if GetRepute() >= 50 then AddRepute(-50)
if GetTask(TaskPhucDuyen) >= 300 then
SetTask(TaskPhucDuyen,GetTask(TaskPhucDuyen)-500)
if GetItemCount(7) >= KNBNEEDTORESET() then
for i=1,KNBNEEDTORESET() do DelItem(7) end
SetTask(188, GetTask(188) + 1)
AddProp(40)
AddMagicPoint(5)
SetLevel(10)
Msg2Player("Trung Sinh thanh cong lan thu: "..GetTask(188)..".")
local str1 = ""..GetName().." chuyen sinh lan "..GetTask(188).." thanh cong.";
AddGlobalCountNews(str1, 1);
Msg2Player("Nhan duoc 15 diem tiem nang.")
Msg2Player("Nhan duoc 10 diem ky nang.")
KickOutSelf()
else
MsgEx("<color="..colorS()..">Chuyen Sinh Lao Nhan<color>: Ban khong co du <color=red>"..KNBNEEDTORESET().."<color> Kim Nguyen Bao.",1)
end
else
MsgEx("<color="..colorS()..">Chuyen Sinh Lao Nhan<color>: Ban khong co du <color=red>300<color> diem Phuc Duyen.",1)
end
else
MsgEx("<color="..colorS()..">Chuyen Sinh Lao Nhan<color>: Ban khong co du <color=red>50<color> diem Danh Vong.",1)
end
else
MsgEx("<color="..colorS()..">Chuyen Sinh Lao Nhan<color>: Dang cap cua ban chua dat den <color=red>200<color>.",1)
end
end;
function chuyensinhZ3()
Nums = GetTask(188)
Nums = Nums + 1
lv = GetLevel()
if lv == 200 then
if GetRepute() >= 50 then AddRepute(-50)
if GetTask(TaskPhucDuyen) >= 300 then
SetTask(TaskPhucDuyen,GetTask(TaskPhucDuyen)-500)
if GetItemCount(7) >= KNBNEEDTORESET() then
for i=1,KNBNEEDTORESET() do DelItem(7) end
SetTask(188, GetTask(188) + 1)
AddProp(40)
AddMagicPoint(5)
SetLevel(10)
Msg2Player("Trung Sinh thanh cong lan thu: "..GetTask(188)..".")
local str1 = ""..GetName().." chuyen sinh lan "..GetTask(188).." thanh cong.";
AddGlobalCountNews(str1, 1);
Msg2Player("Nhan duoc 15 diem tiem nang.")
Msg2Player("Nhan duoc 10 diem ky nang.")
KickOutSelf()
phanthuong()
else
MsgEx("<color="..colorS()..">Chuyen Sinh Lao Nhan<color>: Ban khong co du <color=red>"..KNBNEEDTORESET().."<color> Kim Nguyen Bao.",1)
end
else
MsgEx("<color="..colorS()..">Chuyen Sinh Lao Nhan<color>: Ban khong co du <color=red>300<color> diem Phuc Duyen.",1)
end
else
MsgEx("<color="..colorS()..">Chuyen Sinh Lao Nhan<color>: Ban khong co du <color=red>50<color> diem Danh Vong.",1)
end
else
MsgEx("<color="..colorS()..">Chuyen Sinh Lao Nhan<color>: Dang cap cua ban chua dat den <color=red>200<color>.",1)
end
end;
function KNBNEEDTORESET()
if GetTask(188) >= 5 and GetTask(188) <= 10 then
return 1
elseif GetTask(188) > 10 and GetTask(188) <= 19 then
return 2
elseif GetTask(188) >= 20 then
return 3
end
end;