PDA

View Full Version : Scritp tẩy tủy ở SGTY Ver3



Tiến Đạt
05-01-11, 06:15 AM
Trình độ mình còn kém :( .Các Pro đừng chém nhé .


--description: Tay Tuy Dai Su
--author: Batca2tay
--date: 9\11\2010
--==============================================
--==============================================
Include("\\Script\\global\\sourcejx49.lua");
Include("\\Script\\global\\rollbackskill.lua");
Include("\\script\\faction49\\main_faction.lua");
Include("\\script\\daotaytuy\\taytaytuy.lua")
Include("\\script\\Global\\xaphu.lua")

KNBTOCHANGEFACTION = 25

function main(sel)
SayEx({"<color="..colorS()..">Tay Tuy Dai Su<color>£ºVui long chon chuc nang.",
"Ta muon Tay Tuy./TayTuy",
"Mua [Tay Tuy Kinh](4000 van)/buyxisui",
"Mua [Vo Lam Mat Tich](2000 van)/buywulin",
"Dung Tay Tuy Kinh./xisuijing",
"Dung Vo Lam Mat Tich./wulinmiji",
"Chuyen doi mon phai./chuyenphai",
"Vao Tu Luyen Skills./tuluyen",
"Roi khoi dao tay tuy,/thanhthi",
"Thoat./no"});
end;

function no()
end;

function TayTuy()
SayEx({"<color="..colorS()..">Tay Tuy Dai Su<color> : Chao "..GetName().." nguoi co muon duoc tay tuy hay khong ?\nNeu muon thi hay nhanh chon dieu nguoi muon lam...",
"Tay diem tiem nang va ky nang./xidianmftrung",
"Tay diem ky nang./xxx2",
"Tay diem tiem nang./x1",
"Thoat./Exit"});
end

function x1()
strg = GetStrg(1)
dex = GetDex(1)
vit = GetVit(1)
eng = GetEng(1)
str1 = {35,20,25,30,20}
dex2 = {25,35,25,20,15}
vit3 = {25,20,25,30,25}
eng4 = {15,25,25,20,40}
nguhanh = GetSeries() + 1
ResetBaseAttrib(0,str1[nguhanh])
ResetBaseAttrib(1,dex2[nguhanh])
ResetBaseAttrib(2,vit3[nguhanh])
ResetBaseAttrib(3,eng4[nguhanh])
sum = strg+dex+vit+eng - 100
AddProp(sum)
MsgEx("Tay tuy thanh cong !")
MsgEx("Ban co the phan bo lai diem Tiem Nang.")
Talk(1,"x","<color="..colorS()..">Phan Tang<color>: Ta da giup Tay Tuy xong. Nguoi co the phan phoi lai diem tiem nang cua minh.");
function x()
strg = GetStrg(1)
dex = GetDex(1)
vit = GetVit(1)
eng = GetEng(1)
str1 = {35,20,25,30,20}
dex2 = {25,35,25,20,15}
vit3 = {25,20,25,30,25}
eng4 = {15,25,25,20,40}
nguhanh = GetSeries() + 1
ResetBaseAttrib(0,str1[nguhanh])
ResetBaseAttrib(1,dex2[nguhanh])
ResetBaseAttrib(2,vit3[nguhanh])
ResetBaseAttrib(3,eng4[nguhanh])
sum = strg+dex+vit+eng - 100
AddProp(sum)
end
end;

function xidianmf()
i = HaveMagic(210)
j = HaveMagic(400)
n = RollbackSkill()
x = 0
if (i ~= -1) then x = x + i end
if (j ~= -1) then x = x + j end
rollback_point = n - x
if (rollback_point + GetMagicPoint() < 0) then
rollback_point = -1 * GetMagicPoint()
end
AddMagicPoint(rollback_point)
if (i ~= -1) then AddMagic(210,i) end
if (j ~= -1) then AddMagic(400,j) end
RollbackSkill9x()
KickOutSelf()
strg = GetStrg(1)
dex = GetDex(1)
vit = GetVit(1)
eng = GetEng(1)
str1 = {35,20,25,30,20}
dex2 = {25,35,25,20,15}
vit3 = {25,20,25,30,25}
eng4 = {15,25,25,20,40}
nguhanh = GetSeries() + 1
ResetBaseAttrib(0,str1[nguhanh])
ResetBaseAttrib(1,dex2[nguhanh])
ResetBaseAttrib(2,vit3[nguhanh])
ResetBaseAttrib(3,eng4[nguhanh])
sum = strg+dex+vit+eng - 100
AddProp(sum)
MsgEx("Tay tuy thanh cong.")
MsgEx("Ban co the phan bo lai diem Tiem Nang va Ky Nang.")
Talk(1,"x","Ta da giup Tay Tuy xong, Nguoi co the phan phoi lai diem tiem nang va ky nang cua minh.")
end;

---=========================edit by Tien Dat==========================------------

function xidianmftrung()
xxx2()
x1()
MsgEx("Tay tuy thanh cong.")
MsgEx("Ban co the phan bo lai diem Tiem Nang va Ky Nang.")
Talk(1,"x","Ta da giup Tay Tuy xong, Nguoi co the phan phoi lai diem tiem nang va ky nang cua minh.")
end;

--------================================================== ==========================-----

function x2()
i = HaveMagic(210)
j = HaveMagic(400)
n = RollbackSkill()
x = 0
if (i ~= -1) then x = x + i end
if (j ~= -1) then x = x + j end
rollback_point = n - x
if (rollback_point + GetMagicPoint() < 0) then
rollback_point = -1 * GetMagicPoint()
end
AddMagicPoint(rollback_point)
if (i ~= -1) then AddMagic(210,i) end
if (j ~= -1) then AddMagic(400,j) end
MsgEx("Tay tuy thanh cong !")
MsgEx("Ban co the phan bo lai diem Ky Nang.")
TaySkill()
KickOutSelf()
end;

function xxx2()
TaySkill()
MsgEx("Tay tuy thanh cong !")
MsgEx("Ban co the phan bo lai diem Ky Nang.")
KickOutSelf()
end;

function Exit()
end;

function buyxisui()
if (GetCash() >= 40000000) then
Pay(40000000)
AddEventItem(0)
MsgEx("Nhan duoc Tay Tuy Kinh.")
else
MsgEx("Ban khong co du 400 van luong.")
end
end;

function buywulin()
if (GetCash() >= 20000000) then
Pay(20000000)
AddEventItem(85)
MsgEx("Nhan duoc Vo Lam Mat Tich.")
else
MsgEx("Ban khong co du 2000 van luong.")
end
end;

function xisuijing()
timess = GetTask(TaskTayTuyKinh)
if (GetItemCount(0) >= 1) then
if (timess < 15) then
AddProp(5)
Msg2Player("Su dung¡¶Tay Tuy Kinh¡·Nhan duoc 5 diem tiem nang¡£")
SetTask(TaskTayTuyKinh,timess+1)
DelItem(0)
KickOutSelf()
else
Msg2Player("Ban da su dung 15 quyen Tay Tuy khong the tiep tuc¡£")
end
end
end;

function wulinmiji()
times = GetTask(TaskVoLamMatTich)
if (GetItemCount(85) >= 1) then
if (times < 15) then
AddMagicPoint(1)
Msg2Player("Su dung¡¶Vo Lam Mat Tich¡·Nhan duoc 1 diem ky nang¡£")
DelItem(85)
SetTask(TaskVoLamMatTich,times+1)
KickOutSelf()
else
Msg2Player("Ban da su dung 15 quyen Mat Tich khong the tiep tuc¡£")
end
else
MsgEx("Trong hanh trang cua ban khong co Mat Tich")
end
end;

--================================================== ============Repair by Tien Dat================================----
--================================================== ================================================== ==============---

function chuyenphai()
SayEx({"<color="..colorS()..">Tay Tuy Dai Su<color>: Muon chuyen doi mon phai dai hiep phai co <color=yellow>"..KNBTOCHANGEFACTION.."<color> Kim Nguyen Bao!<enter>Sau Khi Chuyen Doi Mon Phai Skill Cu Se Khong Con, Nguoi Se Phai Hoc Lai Tu Dau ! ",
"Dong Y./ok",
"Thoat./OnCancel"})
end

function ok()
if (GetItemCount(7) >= KNBTOCHANGEFACTION) then
SayEx({"<color="..colorS()..">Tay Tuy Dai Su<color>: Lua chon.",
"He Kim./kim",
"He Moc./moc",
"He Thuy./thuy",
"He Hoa./hoa",
"He Tho./tho",
"Thoat./OnCancel"})
else
Msg2Player("Khong tim thay 25 KNB trong Hanh Trang.");
end
end;

function kim()
SayEx({"<color="..colorS()..">Tay Tuy Dai Su<color>: Lua chon:",
"Thieu Lam./sl",
"Thien vuong bang./tw",
"Thoat./OnCancel"})
end;

function sl()
for i=1,KNBTOCHANGEFACTION do DelItem(7) end
SetSeries(0)
SetFaction("Thieu Lam Phai")
for i=1,480 do
DelMagic(i)
end
AddMagic(1,1)
AddMagic(2,1)
AddMagic(53,1)
AddMagic(284,1)
LearnSkillFaction()
KickOutSelf()
AddGlobalNews("Chuc Mung <color=red>"..GetName().."<color> Chuyen Phai Thanh Cong")
end;

function tw()
for i=1,KNBTOCHANGEFACTION do DelItem(7) end
SetSeries(0)
SetFaction("Thien Vuong Bang")
for i=1,480 do
DelMagic(i)
end
AddMagic(1,1)
AddMagic(2,1)
AddMagic(53,1)
AddMagic(284,1)
LearnSkillFaction()
KickOutSelf()
AddGlobalNews("Chuc Mung <color=red>"..GetName().."<color> Chuyen Phai Thanh Cong")
end;

function moc()
SayEx({"<color="..colorS()..">Tay Tuy Dai Su<color>: Lua chon:",
"Duong Mon./dm",
"Ngu Doc./nd",
"Thoat./OnCancel"});
end;

function dm()
for i=1,KNBTOCHANGEFACTION do DelItem(7) end
SetSeries(1)
SetFaction("Duong Mon")
for i=1,480 do
DelMagic(i)
end
AddMagic(1,1)
AddMagic(2,1)
AddMagic(53,1)
AddMagic(284,1)
LearnSkillFaction()
KickOutSelf()
AddGlobalNews("Chuc Mung <color=red>"..GetName().."<color> Chuyen Phai Thanh Cong")
end;

function nd()
for i=1,KNBTOCHANGEFACTION do DelItem(7) end
SetSeries(1)
SetFaction("Ngu Doc Giao")
for i=1,480 do
DelMagic(i)
end
AddMagic(1,1)
AddMagic(2,1)
AddMagic(53,1)
AddMagic(284,1)
LearnSkillFaction()
KickOutSelf()
AddGlobalNews("Chuc Mung <color=red>"..GetName().."<color> Chuyen Phai Thanh Cong")
end;

function thuy()
SayEx({"<color="..colorS()..">Tay Tuy Dai Su<color>: Lua chon:",
"Nga Mi./nm",
"Thuy Yen./ty",
"Thoat./OnCancel"});
end;

function nm()
for i=1,KNBTOCHANGEFACTION do DelItem(7) end
SetSeries(2)
SetFaction("Nga My Phai")
for i=1,480 do
DelMagic(i)
end
AddMagic(1,1)
AddMagic(2,1)
AddMagic(53,1)
AddMagic(284,1)
LearnSkillFaction()
KickOutSelf()
AddGlobalNews("Chuc Mung <color=red>"..GetName().."<color> Chuyen Phai Thanh Cong")
end;

function ty()
for i=1,KNBTOCHANGEFACTION do DelItem(7) end
SetSeries(2)
SetFaction("Thuy Yen Mon")
for i=1,480 do
DelMagic(i)
end
AddMagic(1,1)
AddMagic(2,1)
AddMagic(53,1)
AddMagic(284,1)
LearnSkillFaction()
KickOutSelf()
AddGlobalNews("Chuc Mung <color=red>"..GetName().."<color> Chuyen Phai Thanh Cong")
end;

function hoa()
SayEx({"<color="..colorS()..">Tay Tuy Dai Su<color>: Lua chon:","Cai bang/cb","Thien Nhan/tn","Thoat./OnCancel"});
end;
function cb()
for i=1,KNBTOCHANGEFACTION do DelItem(7) end
SetSeries(3)
SetFaction("Cai Bang")
for i=1,480 do
DelMagic(i)
end
AddMagic(1,1)
AddMagic(2,1)
AddMagic(53,1)
AddMagic(284,1)
LearnSkillFaction()
KickOutSelf()
AddGlobalNews("Chuc Mung <color=red>"..GetName().."<color> Chuyen Phai Thanh Cong")
end;

function tn()
for i=1,KNBTOCHANGEFACTION do DelItem(7) end
SetSeries(3)
SetFaction("Thien Nhan Giao")
for i=1,480 do
DelMagic(i)
end
AddMagic(1,1)
AddMagic(2,1)
AddMagic(53,1)
AddMagic(284,1)
LearnSkillFaction()
KickOutSelf()
AddGlobalNews("Chuc Mung <color=red>"..GetName().."<color> Chuyen Phai Thanh Cong")
end;

function tho()
SayEx({"<color="..colorS()..">Tay Tuy Dai Su<color>: Lua chon:","Vo Dang./vd","Con Lon./cl","Thoat./OnCancel"});
end;

function vd()
for i=1,KNBTOCHANGEFACTION do DelItem(7) end
SetSeries(4)
SetFaction("Vo Dang Phai")
for i=1,480 do
DelMagic(i)
end
AddMagic(1,1)
AddMagic(2,1)
AddMagic(53,1)
AddMagic(284,1)
LearnSkillFaction()
KickOutSelf()
AddGlobalNews("Chuc Mung <color=red>"..GetName().."<color> Chuyen Phai Thanh Cong")
end;

function cl()
for i=1,KNBTOCHANGEFACTION do DelItem(7) end
SetSeries(4)
SetFaction("Con Lon Phai")
for i=1,480 do
DelMagic(i)
end
AddMagic(1,1)
AddMagic(2,1)
AddMagic(53,1)
AddMagic(284,1)
LearnSkillFaction()
KickOutSelf()
AddGlobalNews("Chuc Mung <color=red>"..GetName().."<color> Chuyen Phai Thanh Cong")
end;

function qingong()
if (GetCash() >= 1000000) then
Pay(1000000)
AddMagic(210)
MsgEx("Ban hoc duoc Khinh Cong.")
else
MsgEx("Ban khong co du 100 van luong.")
end
end;

function OnCancel()
end;

function Exit()
end;


rollbackskill.lua

function RollbackSkill9x()
if GetFaction() == "Thieu Lam Phai" then
AddMagic(318,20)
AddMagic(319,20)
AddMagic(321,20)
elseif GetFaction() == "Thien Vuong Bang" then
AddMagic(322,20)
AddMagic(323,20)
AddMagic(325,20)
elseif GetFaction() == "Nga My Phai" then
AddMagic(328,20)
AddMagic(380,20)
AddMagic(332,20)
elseif GetFaction() == "Thuy Yen Mon" then
AddMagic(336,20)
AddMagic(337,20)
elseif GetFaction() == "Duong Mon" then
AddMagic(339,20)
AddMagic(302,20)
AddMagic(342,20)
AddMagic(351,20)
elseif GetFaction() == "Ngu Doc Giao" then
AddMagic(353,20)
AddMagic(355,20)
AddMagic(390,20)
elseif GetFaction() == "Cai Bang" then
AddMagic(357,20)
AddMagic(359,20)
elseif GetFaction() == "Thien Nhan Giao" then
AddMagic(361,20)
AddMagic(362,20)
AddMagic(391,20)
elseif GetFaction() == "Vo Dang Phai" then
AddMagic(365,20)
AddMagic(368,20)
elseif GetFaction() == "Con Lon Phai" then
AddMagic(372,20)
AddMagic(375,20)
AddMagic(394,20)
end
end;

thachlong78
05-01-11, 07:53 PM
Sai từa lưa rồi. Bạn test thử lại code xem đi.

Tiến Đạt
06-01-11, 06:14 AM
<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>

KingMax
06-01-11, 11:58 AM
cái này của DNT với Tài mà =))

Sir.THÀNH™
06-01-11, 12:05 PM
cái này của DNT với Tài mà =))

không của ai đó thì hắn tự nghĩ chắc :D .

Tiến Đạt
06-01-11, 12:12 PM
cái này của DNT với Tài mà =))

Dev lại thui. Bộ k đc àk ?

KingMax
06-01-11, 01:24 PM
nói thật nhé, nhìn vào chả khác gì cả , khác cái dòng này nè :

--description: Tay Tuy Dai Su
--author: Batca2tay
--date: 9\11\2010

Tiến Đạt
06-01-11, 01:27 PM
nói thật nhé, nhìn vào chả khác gì cả , khác cái dòng này nè :

--description: Tay Tuy Dai Su
--author: Batca2tay
--date: 9\11\2010


<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>
Chứ bác bảo h viết tẩy tủy với code mới thế nào :|

KingMax
06-01-11, 01:30 PM
à uhm :), không có gì khác , ghép vào gọi là phát triển thôi chứ gì :-"

Tiến Đạt
06-01-11, 01:31 PM
à uhm :), không có gì khác , ghép vào thôi chứ gì :-"

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

thachlong78
06-01-11, 05:53 PM
Thứ nhất HaveMagic chỉ nhận giá trị 0 và -1 đã khác -1 rồi thì cộng vào làm gì chứ. Thứ 2:

GetStrg()
GetDex()
GetVit()
GetEng()

4 cái hàm đấy bạn làm sever off thì được. Online khi số lượng Acc lên tầm hơn 100 1 chút xảy ra lỗi từa lưa ngay, chưa kể ngay cả khi số acc ít mà người chơi sử dụng nhiều cũng có truyện. Chỉ xem đến đó.

Tiến Đạt
06-01-11, 05:57 PM
Cám ơn anh đã chỉ bảo . Để em xem lại . Do khi test em k thấy có lỗi gì hết nên cũng k nghĩ là đưa Onl sẽ lỗi :)
À cho em hỏi chút nếu sử dụng

GetStrg()
GetDex()
GetVit()
GetEng()
Mà nhìu người sử dụng 1 lúc thì sẽ có "Chuyện" gì vậy anh?

thachlong78
06-01-11, 06:01 PM
Hàm không thể sử dụng, gây lỗi cả hàm sprit của bạn, còn làm sever lag nữa. Nên 4 cái hàm đó gần như không được sử dụng.

Čħīċķėň
06-01-11, 06:12 PM
@Tiến Đạt : rùi sẽ có người cho cậu ăn tạ vì tội ăn cắp :))

Tiến Đạt
06-01-11, 06:14 PM
Hàm không thể sử dụng, gây lỗi cả hàm sprit của bạn, còn làm sever lag nữa. Nên 4 cái hàm đó gần như không được sử dụng.

Dạ. để em xem lại
@:Čħīċķėň : Ý Bạn là sao?