Hỏi về lỗi NPC Chuyển Sinh

[TND.VN]

Mình dùng TSBD 3.0 .Copy cái file chuyensinh của TSBD3.0 Update sang nhưng vẫn bị 1 lỗi như sau. sau khoảng 5 phút chơi tầm 10-20 người connect vào cái npc chuyển sinh thì nó bị lỗi cái gì đó rồi đứng đơ ra luôn. Ai biết cách fix ko chỉ giúp với thankss:-&

Cái thứ 2 là em muốn giảm tỷ lệ đánh quái nhận exp xuống còn 1/10 thì sửa ở đâu? vì sv này lên leve nhanh quá :-&

cảm ơn nhìu

[taizero30]

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

[TND.VN]

Include("\\dulieu\\chuyensinhdata.lua")
Include("\\script\\source\\sourcejx49.lua")
Include("\\script\\GetFaction.lua")
--------------------------------------------------------------
-------************************************************** *****
-------************************************************** *****
-------Author: DNTMaster --------------------------
-------Script: Chuyen Sinh Nhan Vat --------------------------
-------Edit By Ohishu --------------------------
--------------------------------------------------------------

iditemcantrongcs = 170
vlmt = 16
ttk = 15

function main()
Say("<color=cyan>Gioi Han Chuyen Sinh Hien Tai:<color> "..GetGlbMissionV(50).."\n<color=yellow>So Lan Chuyen Sinh: "..GetTask(197).."\n<color=red>Cap Chuyen Sinh: "..CSTABLE[GetTask(197)+1][1].."\nTien Chuyen Sinh: "..(CSTABLE[GetTask(197)+1][2]/10000).." Van\nChuyen Sinh Kiep: "..CSTABLE[GetTask(197)+1][3]..".",6,"Ta muon Chuyen Sinh./chuyensinh","Cai Lao Hoan Dong/cailaohd","Mua Chuyen Sinh Kiep/payvpcs","Tim Hieu Phan Thuong/nhanthuongcs","Ho Tro Nang Diem Tiem Nang/supporttiemnang","Thoat./Exit")
end


function nhanthuongcs()
Talk(1,"","Moi Khi Chuyen Sinh Nguoi Co The Len Dao Luyen Skill De <color=red>Gia Tang Skill 90<color> Them 1 !")
end

function payvpcs()
SayEx({"<color=cyan>Bac Dau Than Tang<color> "..TENVP.." Tri Gia <color=yellow>200<color> Danh Vong Va <color=cyan>800<color> Phuc Duyen Nguoi Muon Mua ?",
"Vang Ta Mua/paykpt",
"Thoat/Exit"})
end

function cailaohd()
SayEx({"<color=cyan>Bac Dau Than Tang<color> De Cai Lao Hoan Dong Can Cac Dieu Kien Sau\n<color=yellow>Chuyen Sinh 150 Lan\n200kv\n30 Cuon Chuyen Sinh Kiep !",
"Vang Ta Muon Cai Lao/cailaocond",
"Loi Ich Khi Cai Lao/loiichcl",
"Thoat/Exit"})
end

function loiichcl()
Talk(1,"","Khi Cai Lao Se Nhan Duoc Giu Nguyen Muc Diem Ky Nang Va Tiem Nang O Lan CS 150\n<color=red>Duoc Cong 2 Skill 150 ( Vi Du 20 Len 22 Skill ) !\n1 Mon Trang Suc Vo Danh !")
end

function cailaocond()
a = GetItemCount(171)
b = GetCash()
c = random(0,3)
if GetTask(197) >= 150 then
if GetItemCount(171) >= 10 then
if GetCash() >= 2000000000 then
Pay(2000000000)
for i=1,10 do DelItem(171) end
if GetItemCount(171) == (a - 10) and GetCash() == (b - 2000000000) then
SetLevel(10)
SetTask(198,GetTask(198)+1)
diemtn = (CSTABLE[150][4] + (GetTask(ttk) * 5)) * GetTask(198)
diemkn = (CSTABLE[150][5] + GetTask(vlmt)) * GetTask(198)
RollPoint()
AddAll(diemtn,diemkn)
Talk(1,"","Day la lan cai lao hoan dong thu: "..GetTask(198).." Cua Ban\n<color=red>Nhap vao bang thong bao nay de bat dau cai lao")
SetTask(197,0)
if c == 0 then
AddItem(0,9,20,1,z,0,10)
elseif c == 1 then
AddItem(0,4,20,1,z,0,10)
elseif c == 2 then
AddItem(0,3,21,1,z,0,10)
elseif c == 3 then
AddItem(0,3,21,2,z,0,10)
end
KickOutSelf()
else
Msg2Player("Da Chet Me Hack !")
end
else
Msg2Player("Ban Khong Co Du 200kv !")
end
else
Msg2Player("Ban Khong Co Du 30 CSK !")
end
else
Msg2Player("Ban Chua Dat Duoc 150 Lan CS !")
end
end

function paykpt()
d = GetTask(12)
e = GetRepute()
if GetTask(12) >= 800 and GetRepute() >= 200 then
SetTask(12,GetTask(12)-800)
AddRepute(-200)
if GetTask(12) == d - 800 and GetRepute() == e - 200 then
AddEventItem(iditemcantrongcs)
Msg2Player("Nhan Duoc "..TENVP.." Xin Chuc Mung ! ")
else
Msg2Player("Hack A Cung Yeu")
end
else
Msg2Player("Chua Du Phuc Duyen Hoac Danh Vong De Mua "..TENVP.." ! ")
end
end

function AddAll(Xdnt,Ydnt)
if Xdnt == nil then Xdnt = 0 end
if Ydnt == nil then Ydnt = 0 end
AddProp(Xdnt)
AddMagicPoint(Ydnt)
Msg2Player("Ban nhan duoc "..Xdnt.." diem tiem nang");
Msg2Player("Ban nhan duoc "..Ydnt.." diem ky nang");
end;

function chuyensinh()
cs = GetTask(197)
if cs == nil then cs = 0 end
cs = cs +1
if GetTask(197) < GetGlbMissionV(50) then
if GetLevel() >= CSTABLE[cs][1] then
if GetCash() >= CSTABLE[cs][2] then
if GetItemCount(iditemcantrongcs) >= CSTABLE[cs][3] then
for i=1,CSTABLE[cs][3] do DelItem(iditemcantrongcs) end
Pay(CSTABLE[cs][2])
SetLevel(10)
SetTask(197,GetTask(197)+1)
Msg2Player("Bat dau chuyen Sinh Nhan Vat")
diemtn = CSTABLE[cs][4] + (GetTask(ttk) * 5) + (CSTABLE[150][4]*GetTask(198))
diemkn = CSTABLE[cs][5] + GetTask(vlmt) + (CSTABLE[150][5]*GetTask(198))
RollPoint()
AddAll(diemtn,diemkn)
checkvongsang()
Talk(1,"","Day la lan Chuyen Sinh Thu: "..GetTask(197).." Cua Ban\n<color=red>Nhap vao bang thong bao nay de bat dau Chuyen Sinh")
KickOutSelf()
else
Talk(1,"","Ban Can Co <color=red>"..CSTABLE[cs][3].."<color> "..TENVP.." De Chuyen Sinh !")
end
else
Talk(1,"","<color=cyan>Chuyen Sinh Dai Su:<color> Ban can co "..(CSTABLE[cs][2]/10000).." van de chuyen sinh")
end
else
Talk(1,"","<color=cyan>Chuyen Sinh Dai Su:<color> Ban can dat "..CSTABLE[cs][1].." cap de chuyen sinh")
end
cs = 0
diemtn = 0
diemkn = 0
else
Talk(1,"","<color=cyan>Chuyen Sinh Dai Su:<color> Gioi han chuyen sinh hien tai la "..GetGlbMissionV(50).." khong the tiep tuc chuyen sinh !")
end
end

function checkvongsang()
for i=457,465 do DelMagic(i) end
cs = GetTask(197)
if cs >= 10 and cs < 20 then
skill = 457
elseif cs >= 20 and cs < 30 then
skill = 458
elseif cs >= 30 and cs < 40 then
skill = 459
elseif cs >= 40 and cs < 50 then
skill = 460
elseif cs >= 50 and cs < 60 then
skill = 461
elseif cs >= 60 and cs < 70 then
skill = 462
elseif cs >= 70 and cs < 100 then
skill = 463
elseif cs >= 100 and cs < 130 then
skill = 464
elseif cs >= 130 then
skill = 465
end
AddMagic(skill,20)
end

function RollPoint()
SucManh = {35,20,25,30,20}
ThanPhap = {25,35,25,20,15}
SinhLuc = {25,20,25,30,25}
NoiLuc = {15,25,25,20,40}
NguHanh = GetSeries() + 1
ResetBaseAttrib(0,SucManh[NguHanh]);
ResetBaseAttrib(1,ThanPhap[NguHanh]);
ResetBaseAttrib(2,SinhLuc[NguHanh]);
ResetBaseAttrib(3,NoiLuc[NguHanh]);
AddProp(-GetProp())
skilltaytuy()
AddMagicPoint(-GetMagicPoint())
end

function skilltaytuy()
cailao = GetTask(198)*2
if kiemtraft() == 1 then
a = HaveMagic(353)
b = HaveMagic(350)
c = HaveMagic(351)
d = HaveMagic(414)
w = HaveMagic(290)
p = HaveMagic(295)
e = HaveMagic(454)
elseif kiemtraft() == 2 then
a = HaveMagic(342)
b = HaveMagic(347)
c = HaveMagic(345)
d = HaveMagic(412)
w = HaveMagic(455)
p = HaveMagic(293)
e = HaveMagic(310)
elseif kiemtraft() == 3 then
a = HaveMagic(302)
b = HaveMagic(355)
c = HaveMagic(358)
d = HaveMagic(416)
w = HaveMagic(286)
p = HaveMagic(288)
e = HaveMagic(299)
elseif kiemtraft() == 4 then
a = HaveMagic(359)
b = HaveMagic(361)
c = 0
d = HaveMagic(418)
w = HaveMagic(446)
p = HaveMagic(297)
e = 0
elseif kiemtraft() == 5 then
a = HaveMagic(374)
b = HaveMagic(370)
c = 0
d = HaveMagic(420)
w = HaveMagic(448)
p = 0
e = 0
elseif kiemtraft() == 6 then
a = HaveMagic(377)
b = HaveMagic(378)
c = 0
d = HaveMagic(422)
w = HaveMagic(448)
p = 0
e = 0
elseif kiemtraft() == 7 then
a = HaveMagic(362)
b = HaveMagic(389)
c = 0
d = HaveMagic(424)
w = HaveMagic(445)
p = HaveMagic(300)
e = 0
elseif kiemtraft() == 8 then
a = HaveMagic(365)
b = HaveMagic(367)
c = 0
d = HaveMagic(426)
w = HaveMagic(443)
p = HaveMagic(285)
e = 0
elseif kiemtraft() == 9 then
a = HaveMagic(382)
b = HaveMagic(380)
c = 0
d = HaveMagic(428)
w = HaveMagic(442)
p = 0
e = 0
elseif kiemtraft() == 10 then
a = HaveMagic(385)
b = HaveMagic(384)
c = 0
d = HaveMagic(430)
w = HaveMagic(439)
p = 0
e = 0
elseif kiemtraft() == 11 then
a = 0
b = 0
c = 0
d = 0
w = 0
p = 0
e = 0
end
n = RollbackSkill()
x = 0
i = HaveMagic(210)
j = HaveMagic(471)
if (a ~= -1) then x = x + a end
if (b ~= -1) then x = x + b end
if (c ~= -1) then x = x + c end
if (d ~= -1) then x = x + d end
if (w ~= -1) then x = x + w end
if (p ~= -1) then x = x + p end
if (e ~= -1) then x = x + e end
if (i ~= -1) then x = x + i end
if (j ~= -1) then x = x + j end
rollback = n - x
if ( rollback + GetMagicPoint() < 0 ) then
rollback = -1 * GetMagicPoint()
end
AddMagicPoint(rollback)
if (i ~= -1) then AddMagic(210,i) end
if (j ~= -1) then AddMagic(284,j) end
if kiemtraft() == 1 then
if a ~= -1 then AddMagic(353,a) end
if b ~= -1 then AddMagic(350,b) end
if c ~= -1 then AddMagic(351,c) end
if d ~= -1 then AddMagic(414,d) end
if w ~= -1 then AddMagic(290,20+cailao) end
if p ~= -1 then AddMagic(295,20+cailao) end
if e ~= -1 then AddMagic(454,20+cailao) end
elseif kiemtraft() == 2 then
if a ~= -1 then AddMagic(342,a) end
if b ~= -1 then AddMagic(347,b) end
if c ~= -1 then AddMagic(345,c) end
if d ~= -1 then AddMagic(412,d) end
if w ~= -1 then AddMagic(455,20+cailao) end
if p ~= -1 then AddMagic(293,20+cailao) end
if e ~= -1 then AddMagic(310,20+cailao) end
elseif kiemtraft() == 3 then
if a ~= -1 then AddMagic(302,a) end
if b ~= -1 then AddMagic(355,b) end
if c ~= -1 then AddMagic(358,c) end
if d ~= -1 then AddMagic(416,d) end
if w ~= -1 then AddMagic(286,20+cailao) end
if p ~= -1 then AddMagic(288,20+cailao) end
if e ~= -1 then AddMagic(299,20+cailao) end
elseif kiemtraft() == 4 then
if a ~= -1 then AddMagic(359,a) end
if b ~= -1 then AddMagic(361,b) end
if d ~= -1 then AddMagic(418,d) end
if w ~= -1 then AddMagic(446,20+cailao) end
if p ~= -1 then AddMagic(297,20+cailao) end
elseif kiemtraft() == 5 then
if a ~= -1 then AddMagic(374,a) end
if b ~= -1 then AddMagic(370,b) end
if d ~= -1 then AddMagic(420,d) end
if w ~= -1 then AddMagic(448,20+cailao) end
elseif kiemtraft() == 6 then
if a ~= -1 then AddMagic(377,a) end
if b ~= -1 then AddMagic(378,b) end
if d ~= -1 then AddMagic(422,d) end
if w ~= -1 then AddMagic(448,20+cailao) end
elseif kiemtraft() == 7 then
if a ~= -1 then AddMagic(362,a) end
if b ~= -1 then AddMagic(389,b) end
if d ~= -1 then AddMagic(424,d) end
if w ~= -1 then AddMagic(445,20+cailao) end
if p ~= -1 then AddMagic(300,20+cailao) end
elseif kiemtraft() == 8 then
if a ~= -1 then AddMagic(365,a) end
if b ~= -1 then AddMagic(367,b) end
if d ~= -1 then AddMagic(426,d) end
if w ~= -1 then AddMagic(443,20+cailao) end
if p ~= -1 then AddMagic(285,20+cailao) end
elseif kiemtraft() == 9 then
if a ~= -1 then AddMagic(382,a) end
if b ~= -1 then AddMagic(380,b) end
if d ~= -1 then AddMagic(428,d) end
if w ~= -1 then AddMagic(442,20+cailao) end
elseif kiemtraft() == 10 then
if a ~= -1 then AddMagic(385,a) end
if d ~= -1 then AddMagic(430,d) end
if b ~= -1 then AddMagic(384,b) end
if w ~= -1 then AddMagic(439,20+cailao) end
end
end

function supporttiemnang()
SayEx({"<color=cyan>Bac Dau Than Tang<color>: Xin chao ! Ta se giup nguoi cong nhanh diem tiem nang.\nNguoi hien co <color=red>"..GetProp().."<color> diem tiem nang !\nNguoi co chac chan chua ?",
"Ta chac chan./chacchanroi",
"Ta chua chuan bi./Exit"})
end
function chacchanroi()
SayEx({"<color=cyan>Bac Dau Than Tang<color>: Co 4 loai, moi loai 50 diem, nguoi hay chon di !",
"Suc Manh 50 diem./tangtn",
"Than Phap 50 diem./tangtn",
"Sinh Luc 50 diem./tangtn",
"Noi Luc 50 diem./tangtn",
"Thoat./Exit"})
end
function tangtn(sel)
diemtnht = GetProp() -- Diem tiem nang hien tai
sm = GetStrg()
tp = GetDex()
sl = GetVit()
nl = GetEng()

id = sel + 1
if diemtnht >= 50 then
if id == 1 then
AddProp(-50)
ResetBaseAttrib(0,sm+50)
Msg2Player("Ban nhan duoc 50 diem suc manh !")
elseif id == 2 then
AddProp(-50)
ResetBaseAttrib(1,tp+50)
Msg2Player("Ban nhan duoc 50 diem than phap !")
elseif id == 3 then
AddProp(-50)
ResetBaseAttrib(2,sl+50)
Msg2Player("Ban nhan duoc 50 diem sinh luc !")
else
AddProp(-50)
ResetBaseAttrib(3,nl+50)
Msg2Player("Ban nhan duoc 50 diem noi luc !")
end
else Msg2Player("Ban khong du 50 diem tiem nang !")
end
end



Files của em đây bác ơi.Em lắp cái này từ TSBD3.0 Update sang vẫn bị thế :(

[taizero30]

function chuyensinh()cs = GetTask(197)
if cs == nil then cs = 0 end
cs = cs +1
if GetTask(197) < GetGlbMissionV(50) then
if GetLevel() >= CSTABLE[cs][1] then
if GetCash() >= CSTABLE[cs][2] then
if GetItemCount(iditemcantrongcs) >= CSTABLE[cs][3] then
for i=1,CSTABLE[cs][3] do DelItem(iditemcantrongcs) end
Pay(CSTABLE[cs][2])
SetLevel(10)
SetTask(197,GetTask(197)+1)
Msg2Player("Bat dau chuyen Sinh Nhan Vat")
diemtn = CSTABLE[cs][4] + (GetTask(ttk) * 5) + (CSTABLE[150][4]*GetTask(198))
diemkn = CSTABLE[cs][5] + GetTask(vlmt) + (CSTABLE[150][5]*GetTask(198))
RollPoint()
AddAll(diemtn,diemkn)
checkvongsang()
KickOutSelf()
Talk(1,"","Day la lan Chuyen Sinh Thu: "..GetTask(197).." Cua Ban\n<color=red>Nhap vao bang thong bao nay de bat dau Chuyen Sinh")
else
Talk(1,"","Ban Can Co <color=red>"..CSTABLE[cs][3].."<color> "..TENVP.." De Chuyen Sinh !")
end
else
Talk(1,"","<color=cyan>Chuyen Sinh Dai Su:<color> Ban can co "..(CSTABLE[cs][2]/10000).." van de chuyen sinh")
end
else
Talk(1,"","<color=cyan>Chuyen Sinh Dai Su:<color> Ban can dat "..CSTABLE[cs][1].." cap de chuyen sinh")
end
cs = 0
diemtn = 0
diemkn = 0
else
Talk(1,"","<color=cyan>Chuyen Sinh Dai Su:<color> Gioi han chuyen sinh hien tai la "..GetGlbMissionV(50).." khong the tiep tuc chuyen sinh !")
end

end
của bạn đây. nếu cuyền sinh mà ko disconect or đơ NPC thì bạn lên replay topic này sữa típ.
mình chỉ sữa function chuyensinh() thôi. bạn xem có gì thay cái function chuyensinh() của bạn thành cái của mình là dc

[TND.VN]

trước thì 15 phút là bị giờ thì 30 phút vẫn bị đơ npc ra ank ơi :(

[taizero30]

bạn bỏ cái checkvongsang() đi phía trên cái kickoutself() đó tại sr dài quá load ko kịp