Mình là newbie vừa tập code script cái Lệnh Bài GM và Chuyển Sinh. Nhưng cứ báo sai end ai chỉ giúp mình với ! Thanks!
Code:
Include("\\script\\source\\sourcejx49.lua")
Include("\\script\\manager.lua")
Include("\\script\\global\\luyencong.lua")
--------------------------------------------------------------
listgm={{"JXtester","Admin"}}
function admincheck()
for i=1,getn(listgm) do
if GetName() == listgm[i][1] then
return1
end
end
function main()
if admincheck() == 1 then
SayEx({"<color=cyan>Hổ trợ GM:<color> Xin chào GM cần gì ?",
"Trở lại điểm cũ/backupdiadiem",
"Đi tới các thành thị/thanhthi",
"Khu vực luyện công 1/luyencong1",
"Khu vực luyện công 2/luyencong3",
"Chức năng Admin/WritePass",
"Add Boss HK1/addboss1",
"Add Boss HK2/addboss2",
"Dell Boss HK1/dellboss1",
"Dell Boss HK2/dellboss2",
"Thoát/Exit"})
end
function backupdiadiem()
ReturnFromPortal()
end
function thanhthi()
SayEx({"<color=cyan>Hỗ Trợ GM<color>:",
"Tương Dương/thanh",
"Phượng Tường/thanh",
"Dương Châu/thanh",
"Thành Đô/thanh",
"Biện Kinh/thanh",
"Ba Lăng Huyện/thanh",
"Trở lại/main",
"Thoát/no"})
end
function thanh(sel)
MoveCastle(sel +1)
end
function MoveCastle(id)
if id == 1 then -- tuong duong
post = random(0,3)
if post == 0 then
MoveNPC(37,179,201,8+random(-2,2),4+random(-2,2),500,0);
Msg2Player("Ngồi yên! Chúng ta đến Tương Dương")
SetRevPos(53,200*8,200*16)
elseif post == 1 then
MoveNPC(37,188,196,6+random(-2,2),4+random(-2,2),500,0);
Msg2Player("Ngồi yên! Chúng ta đến Tương Dương")
SetRevPos(53,200*8,200*16)
elseif post == 2 then
MoveNPC(37,198,211,5+random(-2,2),0+random(-2,2),500,0);
Msg2Player("Ngồi yên! Chúng ta đến Tương Dương")
SetRevPos(53,200*8,200*16)
elseif post == 3 then
MoveNPC(37,212,201,8+random(-2,2),5+random(-2,2),500,0);
Msg2Player("Ngồi yên! Chúng ta đến Tương Dương")
SetRevPos(53,200*8,200*16)
end
elseif id == 2 then --phuong tuong
post = random(0,3)
if post == 0 then
MoveNPC(36,191,202,6+random(-2,2),4+random(-2,2),500,0);
Msg2Player("Ngồi yên! Chúng ta đến Phượng Tường")
SetRevPos(53,200*8,200*16)
elseif post == 1 then
MoveNPC(36,205,204,4+random(-2,2),8+random(-2,2),500,0);
Msg2Player("Ngồi yên! Chúng ta đến Phượng Tường")
SetRevPos(53,200*8,200*16)
elseif post == 2 then
MoveNPC(36,206,198,5+random(-2,2),1+random(-2,2),500,0);
Msg2Player("Ngồi yên! Chúng ta đến Phượng Tường")
SetRevPos(53,200*8,200*16)
elseif post == 3 then
MoveNPC(36,194,194,5+random(-2,2),5+random(-2,2),500,0);
Msg2Player("Ngồi yên! Chúng ta đến Phượng Tường")
SetRevPos(53,200*8,200*16)
end
elseif id == 3 then --duong chau
post = random(0,3)
if post == 0 then
MoveNPC(39,209,187,0+random(-2,2),3+random(-2,2),500,0);
Msg2Player("Ngồi yên! Chúng ta đến Dương Châu")
SetRevPos(53,200*8,200*16)
elseif post == 1 then
MoveNPC(39,199,200,5+random(-2,2),1+random(-2,2),500,0);
Msg2Player("Ngồi yên! Chúng ta đến Dương Châu")
SetRevPos(53,200*8,200*16)
elseif post == 2 then
MoveNPC(39,215,200,5+random(-2,2),8+random(-2,2),500,0);
Msg2Player("Ngồi yên! Chúng ta đến Dương Châu")
SetRevPos(53,200*8,200*16)
elseif post == 3 then
MoveNPC(39,229,191,3+random(-2,2),2+random(-2,2),500,0);
Msg2Player("Ngồi yên! Chúng ta đến Dương Châu")
SetRevPos(53,200*8,200*16)
end
elseif id == 4 then --thanh do
post = random(0,3)
if post == 0 then
MoveNPC(40,377,318,0+random(-2,2),3+random(-2,2),500,0);
Msg2Player("Ngồi yên! Chúng ta đến Thành Đô")
SetRevPos(53,200*8,200*16)
elseif post == 1 then
MoveNPC(40,399,324,2+random(-2,2),5+random(-2,2),500,0);
Msg2Player("Ngồi yên! Chúng ta đến Thành Đô")
SetRevPos(53,200*8,200*16)
elseif post == 2 then
MoveNPC(40,408,312,8+random(-2,2),3+random(-2,2),500,0);
Msg2Player("Ngồi yên! Chúng ta đến Thành Đô")
SetRevPos(53,200*8,200*16)
elseif post == 3 then
MoveNPC(40,378,310,1+random(-2,2),0+random(-2,2),500,0);
Msg2Player("Ngồi yên! Chúng ta đến Thành Đô")
SetRevPos(53,200*8,200*16)
end
elseif id == 5 then --bien kinh
post = random(0,3)
if post == 0 then
MoveNPC(38,204,199,6+random(-2,2),0+random(-2,2),500,0);
Msg2Player("Ngồi yên! Chúng ta đến Biện Kinh")
SetRevPos(53,200*8,200*16)
elseif post == 1 then
MoveNPC(38,213,201,3+random(-2,2),8+random(-2,2),500,0);
Msg2Player("Ngồi yên! Chúng ta đến Biện Kinh")
SetRevPos(53,200*8,200*16)
elseif post == 2 then
MoveNPC(38,233,182,5+random(-2,2),8+random(-2,2),500,0);
Msg2Player("Ngồi yên! Chúng ta đến Biện Kinh")
SetRevPos(53,200*8,200*16)
elseif post == 3 then
MoveNPC(38,199,187,7+random(-2,2),6+random(-2,2),500,0);
SetRevPos(53,200*8,200*16)
Msg2Player("Ngồi yên! Chúng ta đến Biện Kinh")
end;
elseif id == 6 then --ba lang huyen
MoveNPC(53,197,202,6+random(-2,2),4+random(-2,2),500,0);
SetRevPos(53,200*8,200*16)
Msg2Player("Ngồi yên! Chúng ta đến Ba Lăng huyện")
elseif id == 7 then --giang tan thon
MoveNPC(25,432,382,3+random(-2,2),1+random(-2,2),500,0);
Msg2Player("Ngồi yên! Chúng ta đến Giang Tân thôn")
elseif id == 8 then --nam nhac tran
MoveNPC(26,198,193,4+random(-2,2),8+random(-2,2),500,0);
Msg2Player("Ngồi yên! Chúng ta đến Nam Nhạc trấn")
end
end
------------------------Fan PassWorld ADMIN thay doi tu do----
MATKHAU = {3,4,4,3,3,4}
function WritePass()
if GetTaskTemp(57) == 1 then
manager()
else
SayEx({"<color=red>Hệ thống<color>: Xin mời nhập mật khẩu Admin",
"1/number",
"2/number",
"3/number",
"4/number",
"5/number",
"6/number",
"7/number",
"8/number",
"9/number",
"0/number",
"Thoát/finish"})
end
end
function number(sel)
id = sel + 1
if id == 10 then
id = 0
end
if GetTaskTemp(55) == 0 then
if (id == MATKHAU[1]) then
SetTaskTemp(55,GetTaskTemp(55)+1)
WritePass()
Msg2Player("Bạn nhập vào số "..id.."")
else
SetTaskTemp(55,GetTaskTemp(55)+1)
SetTaskTemp(56,1)
WritePass()
Msg2Player("Bạn nhập vào số "..id.."")
end
elseif GetTaskTemp(55) == 1 then
if (id == MATKHAU[2]) then
SetTaskTemp(55,GetTaskTemp(55)+1)
WritePass()
Msg2Player("Bạn nhập vào số "..id.."")
else
SetTaskTemp(55,GetTaskTemp(55)+1)
SetTaskTemp(56,1)
WritePass()
Msg2Player("Bạn nhập vào số "..id.."")
end
elseif GetTaskTemp(55) == 2 then
if (id == MATKHAU[3]) then
SetTaskTemp(55,GetTaskTemp(55)+1)
WritePass()
Msg2Player("Bạn nhập vào số "..id.."")
else
SetTaskTemp(55,GetTaskTemp(55)+1)
SetTaskTemp(56,1)
WritePass()
Msg2Player("Bạn nhập vào số "..id.."")
end
elseif GetTaskTemp(55) == 3 then
if (id == MATKHAU[4]) then
SetTaskTemp(55,GetTaskTemp(55)+1)
WritePass()
Msg2Player("Bạn nhập vào số "..id.."")
else
SetTaskTemp(55,GetTaskTemp(55)+1)
SetTaskTemp(56,1)
WritePass()
Msg2Player("Bạn nhập vào số "..id.."")
end
elseif GetTaskTemp(55) == 4 then
if (id == MATKHAU[5]) then
SetTaskTemp(55,GetTaskTemp(55)+1)
WritePass()
Msg2Player("Bạn nhập vào số "..id.."")
else
SetTaskTemp(55,GetTaskTemp(55)+1)
SetTaskTemp(56,1)
WritePass()
Msg2Player("Bạn nhập vào số "..id.."")
end
elseif GetTaskTemp(55) == 5 then
if (id == MATKHAU[6]) then
SetTaskTemp(55,GetTaskTemp(55)+1)
Msg2Player("Bạn nhập vào số "..id.."")
CheckPass()
else
SetTaskTemp(55,GetTaskTemp(55)+1)
SetTaskTemp(56,1)
CheckPass()
Msg2Player("Bạn nhập vào số "..id.."")
end
end
end
function finish()
KickOutSelf()
end
function CheckPass()
if GetTaskTemp(56) >= 1 then
Talk(1,"finish","Admin Server\nMật khẩu Admin sai")
else
SetTaskTemp(55,0)
SetTaskTemp(57,1)
Msg2Player("Xin mời lựa chọn chức năng Admin")
manager()
end
end
Đây là code Chuyển Sinh (Mình chỉ code sau khi chuyển sinh sẽ setlevel(10), thềm tiềm năng, kỹ năng và add skill Chuyển sinh.