PDA

View Full Version : Chuyển Phái 0 điều kiện



kira178
23-03-10, 04:30 AM
Tớ mới làm thử cái chuyển phái 0 điều kiện, ai thử phát nhỉ!



Include("\\Script\\global\\sourcejx49.lua");
--Include("\\Script\\global\\rollbackskill.lua");
Include("\\Script\\faction49\\main_faction.lua");





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.",
"Dong Y./ok",
"Thoat./OnCancel"})
end




function ok()
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"})
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()
SetSeries(0)
SetFaction("Thieu Lam Phai")
SetCamp(1)
SetCurCamp(1)
SetRank(1)
LearnSkillFaction()
SetTask(TaskTL,1)
for i=1,480 do DelMagic(i) end
AddMagic(284,1)
KickOutSelf()
end;

function tw()
SetFaction("Thien Vuong Bang")
SetCamp(3)
SetCurCamp(3)
SetRank(2)
LearnSkillFaction()
SetTask(TaskTV,1)
SetSeries(0)
for i=1,480 do
DelMagic(i)
end
AddMagic(284,1)
KickOutSelf()
end;

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

function dm()
SetFaction("Duong Mon")
SetCamp(3)
SetCurCamp(3)
SetRank(3)
LearnSkillFaction()
SetTask(TaskDM,1)
SetSeries(1)
for i=1,480 do
DelMagic(i)
end
AddMagic(284,1)
KickOutSelf()
end;

function nd()
SetFaction("Ngu Doc Giao")
SetCamp(2)
SetCurCamp(2)
SetRank(4)
LearnSkillFaction()
SetTask(TaskND,1)
SetSeries(1)
for i=1,480 do
DelMagic(i)
end
AddMagic(284,1)
KickOutSelf()
end;

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

function nm()
SetFaction("Nga My Phai")
SetCamp(1)
SetCurCamp(1)
SetRank(5)
LearnSkillFaction()
SetTask(TaskNM,1)
SetSeries(2)
for i=1,480 do
DelMagic(i)
end
AddMagic(284,1)
KickOutSelf()
end;

function ty()
SetFaction("Thuy Yen Mon")
SetCamp(3)
SetCurCamp(3)
SetRank(6)
LearnSkillFaction()
SetTask(TaskTY,1)
SetSeries(2)
for i=1,480 do
DelMagic(i)
end
AddMagic(284,1)
KickOutSelf()
end;

function hoa()
SayEx({"<color="..colorS()..">Tay Tuy Dai Su<color>: Lua chon:","Cai bang/cb","Thien Nhan/tn","Thoat./OnCancel"});
end;

function cb()
SetFaction("Cai Bang")
SetCamp(1)
SetCurCamp(1)
SetRank(7)
LearnSkillFaction()
SetTask(TaskCB,1)
SetSeries(3)
for i=1,480 do
DelMagic(i)
end
AddMagic(284,1)
KickOutSelf()
end;

function tn()
SetFaction("Thien Nhan Giao")
SetCamp(2)
SetCurCamp(2)
SetRank(8)
LearnSkillFaction()
SetTask(TaskTN,1)
SetSeries(3)
for i=1,480 do
DelMagic(i)
end
AddMagic(284,1)
KickOutSelf()
end;

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

function vd()
SetFaction("Vo Dang Phai")
SetCamp(1)
SetCurCamp(1)
SetRank(9)
LearnSkillFaction()
SetTask(TaskVD,1)
SetSeries(4)
for i=1,480 do
DelMagic(i)
end
AddMagic(284,1)
KickOutSelf()
end;

function cl()
SetFaction("Phai Con Lon")
SetCamp(3)
SetCurCamp(3)
SetRank(10)
LearnSkillFaction()
SetTask(TaskCL,1)
SetSeries(4)
for i=1,480 do
DelMagic(i)
end
AddMagic(284,1)
KickOutSelf()
end;

kira178
23-03-10, 04:38 AM
cái này có 1 bug là ko hiểu sao phải vào chuyển 2 lần mới chuyển phái hoàn toàn >.<

[L]il [Z]ee™
23-03-10, 11:48 AM
Tớ chắc chắn 100% cái này trong Server Rezo 6.0 hoặc 5.0 của tớ :">

Tớ cho phép bạn nói lại 1 câu nữa :)

kira178
23-03-10, 12:46 PM
=)) hài vãi lều :)) nếu bạn nói là cái câu tẩy tủy là của bạn thì đúng rồi đấy còn lại thì ngồi mang source ra mà check đi =)), check trước khi nói để đỡ phải ngượng mồm

Minh1213
23-03-10, 06:08 PM
Tất cả hãy giữ cái đầu lạnh ! :|

[L]il [Z]ee™
23-03-10, 06:42 PM
sao phải Check làm ra nhìn phải biết rồi bạn đừng có "=))" với ":))" ở đây .

bạn cảm thấy khủng như thế rồi thì tớ đợi cái lúc Server bạn được tung lên Online :-"

caogia
23-03-10, 07:55 PM
choảng nhau rùi kìa hjxxxxxxxxxxxxxxxxx

sangpronhat
23-03-10, 10:06 PM
SetCamp(1)
SetCurCamp(1)
SetRank(1)
LearnSkillFaction() --Học Skill của phái phải hum
SetTask(TaskTL,1)
for i=1,480 do DelMagic(i) end -- Xóa toàn bộ skill phải hum
AddMagic(284,1) --Học skill hổ trợ phải hum
KickOutSelf()
Từ nguyên cái đống này ==> Nhân vật chỉ có 1 skill hổ trợ he he
Còn nữa còn đồ đạc của NV ở phái trước giờ làm sao mà xài được he he
Mốt script post box Script nhé bạn
Dù sao cũng thank cố gắng <:-P<:-P

kira178
24-03-10, 12:11 AM
SetCamp(1)
SetCurCamp(1)
SetRank(1)
LearnSkillFaction() --Học Skill của phái phải hum
SetTask(TaskTL,1)
for i=1,480 do DelMagic(i) end -- Xóa toàn bộ skill phải hum
AddMagic(284,1) --Học skill hổ trợ phải hum
KickOutSelf()
Từ nguyên cái đống này ==> Nhân vật chỉ có 1 skill hổ trợ he he
Còn nữa còn đồ đạc của NV ở phái trước giờ làm sao mà xài được he he
Mốt script post box Script nhé bạn
Dù sao cũng thank cố gắng <:-P<:-P

cái đó tớ lấy từ faction ra :), đã chuyển phái thì phải đi gia nhập môn phái mà học lại công phu chứ đúng ko:) còn vụ đồ đạc quần áo (nói đúng là chưa nghĩ ra dư nào) nên đành khuyến cáo player lên nghĩ kĩ trước khi chuyển phái :))

kira178
24-03-10, 12:14 AM
il [Z]ee™;283849']sao phải Check làm ra nhìn phải biết rồi bạn đừng có "=))" với ":))" ở đây .

bạn cảm thấy khủng như thế rồi thì tớ đợi cái lúc Server bạn được tung lên Online :-"

chẳng phải là khủng :), cậu huênh hoang vừa thôi hay cậu ko biết đọc? tôi bên trên ko phải nói là mấy cái dòng về chữ tẩy tủy thì của cậu còn đoạn code bên dưới là tôi làm khác:). Hay cậu paste code của cậu ra đây xem giống những chỗ nào ở đoạn quan trọng nhể :)

Minh1213
24-03-10, 12:16 PM
Đã bảo giữ cái đầu lạnh cơ mà :|

kira178
24-03-10, 04:21 PM
tại thằng ku nó nói đấy là 100% của nó lên tớ mới hỏi nó paste 100% code của nó lên thôi mà:)) có nóng đâu mà lạnh ;)) máy lạnh ở nhà đã gần chết cóng rồi ;))

k0nv1ct3d
08-04-10, 10:33 PM
hay đấy :)) :)) =)) .

[L]il [Z]ee™
09-04-10, 11:39 AM
Include("\\Script\\global\\sourcejx49.lua");
--Include("\\Script\\global\\rollbackskill.lua");
Include("\\Script\\faction49\\main_faction.lua");


3 cái này chuẩn xác của tớ rồi :)

Còn Code ở dưới cậu đừng cãi =; đơn giản vì tớ lấy Server DNT để code thêm ..

Cái Script chuyển đổi môn phái là rockmanFBI share từ hồi Thiện Ác v1.0 ra đời.

Sau đó khi Thiện Ác bây giờ trở lại thì dùng gốc JX49 và code này do tớ thêm vào :)

kira178
09-04-10, 05:43 PM
il [Z]ee™;288818']

3 cái này chuẩn xác của tớ rồi :)

Còn Code ở dưới cậu đừng cãi =; đơn giản vì tớ lấy Server DNT để code thêm ..

Cái Script chuyển đổi môn phái là rockmanFBI share từ hồi Thiện Ác v1.0 ra đời.

Sau đó khi Thiện Ác bây giờ trở lại thì dùng gốc JX49 và code này do tớ thêm vào :)



cậu nhầm rồi :) tớ ko hề cãi là nguyên gôc là của cậu nhưng tớ test bug nên đã ngồi làm lại :), nếu ai đown cai bản 6.0 của cậu về chắc nhận rõ sự khác nhau:))

[L]il [Z]ee™
10-04-10, 09:19 PM
Cậu cho tớ hỏi cậu làm khác chỗ nào ? Sửa "Say" thành "SayEx" à =))

xemchut
10-04-10, 09:54 PM
- Server 6.0 vII chuyển phái xong không xóa skills cũ đi, tổng hợp cả skills phái mới lẫn phái cũ :(. Code của chủ topic có thêm lệnh xóa skills của môn phái trước.
- Mà bảo chuyển không điều kiện mà còn hỏi han "có Kim nguyên bảo không" :D. Lệnh SayEx đầu tiên thiếu " ; " sau end rồi.

sangpronhat
11-04-10, 12:11 AM
Script chưa đầy 5Kb mà cũng mổ xẽ nhau nữa =))
Để tránh hiện tượng nỳ xảy ra tui nhận thấy nên tự làm tự share ^^

kira178
11-04-10, 07:04 AM
il [Z]ee™;289259']Cậu cho tớ hỏi cậu làm khác chỗ nào ? Sửa "Say" thành "SayEx" à =))

dạ dạ, nguyên văn source từ bản đấy ^:)^



function chuyenphai()
SayEx({"<color="..colorS()..">Tay Tuy Nhan<color>: Muon chuyen doi mon phai dai hiep phai co <color=yellow>"..KNBTOCHANGEFACTION.."<color> Kim Nguyen Bao.",
"Dong Y./ok",
"Thoat./OnCancel"})
end

function ok()
if (GetItemCount(7) >= KNBTOCHANGEFACTION) then
SayEx({"<color="..colorS()..">Tay Tuy Nhan<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 Nhan<color>: Lua chon:",
"Thieu Lam./sl",
"Thien vuong bang./tw",
"Thoat./OnCancel"})
end;

function sl()
for i=1,KNBTOCHANGEFACTION do DelItem(7) end
SetFaction("Phai Thieu Lam")
SetSeries(0)
for i=1,480 do
DelMagic(i)
end
slskill()
AddMagic(53)
KickOutSelf()
end;
function tw()
for i=1,KNBTOCHANGEFACTION do DelItem(7) end
SetFaction("Thien Vuong Bang")
SetSeries(0)
for i=1,480 do
DelMagic(i)
end
twskill()
AddMagic(53)
KickOutSelf()
end;

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

function dm()
for i=1,KNBTOCHANGEFACTION do DelItem(7) end
SetFaction("Duong Mon")
SetSeries(1)
SetFaction(2)
for i=1,480 do
DelMagic(i)
end
tmskill()
AddMagic(53)
KickOutSelf()
end;
function nd()
for i=1,KNBTOCHANGEFACTION do DelItem(7) end
SetFaction("Ngu Doc Giao")
SetSeries(1)
for i=1,480 do
DelMagic(i)
end
wdskill()
AddMagic(53)
KickOutSelf()
end;

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

function nm()
for i=1,KNBTOCHANGEFACTION do DelItem(7) end
SetFaction("Phai Nga My")
SetSeries(2)
for i=1,480 do
DelMagic(i)
end
emskill()
AddMagic(53)
KickOutSelf()
end;
function ty()
for i=1,KNBTOCHANGEFACTION do DelItem(7) end
SetFaction("Thuy Yen Mon")
SetSeries(2)
for i=1,480 do
DelMagic(i)
end
cyskill()
AddMagic(53)
KickOutSelf()
end;

function hoa()
SayEx({"<color="..colorS()..">Tay Tuy Nhan<color>: Lua chon:","Cai bang/cb","Thien Nhan/tn","Thoat./OnCancel"});
end;
function cb()
for i=1,KNBTOCHANGEFACTION do DelItem(7) end
SetFaction("Cai Bang")
SetSeries(3)
for i=1,480 do
DelMagic(i)
end
gbskill()
AddMagic(53)
KickOutSelf()
end;
function tn()
for i=1,KNBTOCHANGEFACTION do DelItem(7) end
SetFaction("Thien Nhan Giao")
SetSeries(3)
for i=1,480 do
DelMagic(i)
end
trskill()
AddMagic(53)
KickOutSelf()
end;

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

function vd()
for i=1,KNBTOCHANGEFACTION do DelItem(7) end
SetFaction("Phai Vo Dang")
SetSeries(4)
for i=1,480 do
DelMagic(i)
end
wddskill()
AddMagic(53)
KickOutSelf()
end;
function cl()
for i=1,KNBTOCHANGEFACTION do DelItem(7) end
SetFaction("Phai Con Lon")
SetSeries(4)
for i=1,480 do
DelMagic(i)
end
klskill()
AddMagic(53)
KickOutSelf()
end;
Ko biết có khác ko?

GameMaster72
18-02-11, 12:02 AM
mới cài đc cái sgty thấy chuyển phái rất oke , mình k thấy bị lỗi nào như các bạn nêu ra cả...........