Share code nhận item Bá Vương 150 + Cường hóa ấn 1k5 ^^

[satthupro95]

E cũng vừa mới viết xong đoạn code add đồ 15x nên share cho ae ^^
+ Đầu tiên các bác down file của bác sesshomaru về rùi copy file item vào client/setting với cả gameserver/setting nhé ^^ : link topic của bác sesshomaru đây : [Only registered and activated users can see links. ]
Ảnh :[Only registered and activated users can see links. ]

{"<color=red>{HOT}<color><color=pink>--<color>Nhận Trang Bị <color=wheat>Bá Vương<color>",self.TrangBiMoiNhat,self};

function tbGift:TrangBiMoiNhat()
 local nSeries = me.nSeries;
 local szMsg = "Hãy chọn lấy bộ trang bị mà bạn nhé ^^ ";
 local tbOpt = {
  {"Set Bá Vương Của <color=red>Nam<color> Hệ <color=gold>[Kim]<color>",self.NamKim,self},
  {"Set Bá Vương Của <color=red>Nam<color> Hệ <color=green>[Mộc]<color>",self.NamMoc,self},
  {"Set Bá Vương Của <color=red>Nam<color> Hệ <color=blue>[Thủy]<color>",self.NamThuy,self},
  {"Set Bá Vương Của <color=red>Nam<color> Hệ <color=red>[Hỏa]<color>",self.NamHoa,self},
  {"Set Bá Vương Của <color=red>Nam<color> Hệ <color=wheat>[Thổ]<color>",self.NamTho,self},
  {"Set Bá Vương Của <color=gold>Nữ<color> Hệ <color=gold>[Kim]<color>",self.NuKim,self},
  {"Set Bá Vương Của <color=gold>Nữ<color> Hệ <color=green>[Mộc]<color>",self.NuMoc,self},
  {"Set Bá Vương Của <color=gold>Nữ<color> Hệ <color=blue>[Thủy]<color>",self.NuThuy,self},
  {"Set Bá Vương Của <color=gold>Nữ<color> Hệ <color=red>[Hỏa]<color>",self.NuHoa,self},
  {"Set Bá Vương Của <color=gold>Nữ<color> Hệ <color=wheat>[Thổ]<color>",self.NuTho,self},
 }
 Dialog:Say(szMsg,tbOpt);
end
--------------------------------------------------------------------------------
function tbGift:NamKim()
    me.AddItem(4,3,931,10,5,16);
	me.AddItem(4,6,1016,10,3,16);
	me.AddItem(4,4,1036,10,4,16);
	me.AddItem(4,5,950,10,5,16);
	me.AddItem(4,11,1046,10,2,16);
	me.AddItem(4,9,1056,10,1,16);
	me.AddItem(4,7,1066,10,3,16);
	me.AddItem(4,10,1076,10,2,16);
	me.AddItem(4,8,1096,10,4,16);
end
--------------------------------------------------------------------------------
function tbGift:NamMoc()
me.AddItem(4,3,933,10,3,16);
me.AddItem(4,4,1037,10,1,16);
me.AddItem(4,5,952,10,3,16);
me.AddItem(4,11,1048,10,5,16);
me.AddItem(4,6,1017,10,4,16);
me.AddItem(4,9,1058,10,2,16);
me.AddItem(4,7,1068,10,4,16);
me.AddItem(4,10,1080,10,5,16);
me.AddItem(4,8,1098,10,1,16);
end
--------------------------------------------------------------------------------
function tbGift:NamThuy()
me.AddItem(4,3,935,10,1,16);
me.AddItem(4,4,1038,10,5,16);
me.AddItem(4,11,1050,10,4,16);
me.AddItem(4,9,1060,10,3,16);
me.AddItem(4,7,1070,10,2,16);
me.AddItem(4,10,1084,10,4,16);
me.AddItem(4,6,1018,10,2,16);
me.AddItem(4,8,1100,10,5,16);
me.AddItem(4,5,954,10,1,16);
end
--------------------------------------------------------------------------------
function tbGift:NamHoa()
me.AddItem(4,3,937,10,2,16);
me.AddItem(4,6,1019,10,5,16);
me.AddItem(4,4,1039,10,3,16);
me.AddItem(4,5,956,10,2,16);
me.AddItem(4,9,1062,10,4,16);
me.AddItem(4,7,1072,10,5,16);
me.AddItem(4,10,1088,10,1,16);
me.AddItem(4,8,1102,10,3,16);
end
--------------------------------------------------------------------------------
function tbGift:NamTho()
me.AddItem(4,3,939,10,4,16);
me.AddItem(4,6,1020,10,1,16);
me.AddItem(4,4,1040,10,2,16);
me.AddItem(4,5,958,10,4,16);
me.AddItem(4,11,1054,10,3,16);
me.AddItem(4,9,1064,10,5,16);
me.AddItem(4,7,1074,10,1,16);
me.AddItem(4,10,1092,10,3,16);
me.AddItem(4,8,1104,10,2,16);
end
--------------------------------------------------------------------------------
function tbGift:NuKim()
me.AddItem(4,3,932,10,5,16);
me.AddItem(4,4,1036,10,4,16);
me.AddItem(4,5,950,10,5,16);
me.AddItem(4,11,1047,10,2,16);
me.AddItem(4,9,1057,10,1,16);
me.AddItem(4,7,1067,10,3,16);
me.AddItem(4,10,1077,10,2,16);
me.AddItem(4,8,1097,10,4,16);
me.AddItem(4,6,1016,10,3,16);
end
--------------------------------------------------------------------------------
function tbGift:NuMoc()
me.AddItem(4,3,934,10,3,16);
me.AddItem(4,4,1037,10,1,16);
me.AddItem(4,5,952,10,3,16);
me.AddItem(4,11,1049,10,5,16);
me.AddItem(4,7,1069,10,4,16);
me.AddItem(4,10,1081,10,5,16);
me.AddItem(4,8,1099,10,1,16);
me.AddItem(4,9,1059,10,2,16);
me.AddItem(4,6,1017,10,4,16);
end
--------------------------------------------------------------------------------
function tbGift:NuThuy()
me.AddItem(4,3,936,10,1,16);
me.AddItem(4,6,1018,10,2,16);
me.AddItem(4,4,1038,10,5,16);
me.AddItem(4,5,954,10,1,16);
me.AddItem(4,11,1051,10,4,16);
me.AddItem(4,9,1061,10,3,16);
me.AddItem(4,7,1071,10,2,16);
me.AddItem(4,10,1085,10,4,16);
me.AddItem(4,8,1101,10,5,16);
end
--------------------------------------------------------------------------------
function tbGift:NuHoa()
me.AddItem(4,3,938,10,2,16);
me.AddItem(4,6,1019,10,5,16);
me.AddItem(4,4,1039,10,3,16);
me.AddItem(4,5,956,10,2,16);
me.AddItem(4,11,1053,10,1,16);
me.AddItem(4,9,1063,10,4,16);
me.AddItem(4,7,1073,10,5,16);
me.AddItem(4,10,1089,10,1,16);
me.AddItem(4,8,1103,10,3,16);
end
--------------------------------------------------------------------------------
function tbGift:NuTho()
me.AddItem(4,3,940,10,4,16);
me.AddItem(4,6,1020,10,1,16);
me.AddItem(4,4,1040,10,2,16);
me.AddItem(4,5,958,10,4,16);
me.AddItem(4,11,1055,10,3,16);
me.AddItem(4,9,1065,10,5,16);
me.AddItem(4,7,1075,10,1,16);
me.AddItem(4,10,1093,10,3,16);
me.AddItem(4,8,1105,10,2,16);
end
--------------------------------------------------------------------------------

Code cường hóa ấn 1k5 ^^ ( e lấy bên card GM )

{"<color=red>{HOT}<color><color=pink>--<color>Cường Hóa Ấn <color=wheat>1500<color>", self.UpDateWuXingYin, self},

function tbGift:UpDateWuXingYin()
	local tbOpt = {
		{"Nhận và thăng cấp ấn", self.UpDateWuXingYin1, self},
		{"Ta chưa muốn"},
	}
	Dialog:Say("Chọn Ngũ Hành Ấn?", tbOpt);
end
function tbGift:UpDateWuXingYin1()
	local tbOpt = {
		{"Nhận Luân Hồi Ấn", self.GetWuXingYin1, self},
		{"Cường hóa ngũ hành tương khắc <color=red>1500<color>", self.UpWuXingYin1, self, 1},
		{"Nhược hóa ngũ hành tương khắc <color=red>1500<color>", self.UpWuXingYin1, self, 2},
		{"Ta chưa muốn"},
	}
	Dialog:Say("Bạn muốn làm gì?", tbOpt);
end

function tbGift:GetWuXingYin1()
	if me.nFaction <= 0 then
		Dialog:Say("Bạn chưa gia nhập phái");
		return 0;		
	end	
	if me.CountFreeBagCell() < 1 then
		Dialog:Say("Túi của bạn không đủ chỗ trống");
		return 0;
	end
	local pItem = me.AddItem(1,16,13,2);
	if pItem then
		pItem.Bind(1);
	end
	Dialog:Say("Nhận Được Luân Hồi Ấn.");		
end

function tbGift:UpWuXingYin1(nMagicIndex)
	local pSignet = me.GetItem(Item.ROOM_EQUIP,Item.EQUIPPOS_SIGNET, 0);
	if not pSignet then
		Dialog:Say("Thăng cấp thành công.");
		return 0;
	end
	local nLevel 	= pSignet.GetGenInfo(nMagicIndex * 2 - 1, 0);
	if nLevel >= 1500 then
		Dialog:Say("Luân Hồi Ấn đã thăng cấp tối đa.");
		return 0;
	end
	nLevel = nLevel + 1500;
	if nLevel > 1500 then
		nLevel = 1500;
	end
	Item:SetSignetMagic(pSignet, nMagicIndex, nLevel, 0);
	Dialog:Say("Chúc mừng bạn Thăng cấp Luân Hồi Ấn Thành công");
end
--------------------------------------------------------------------------------

Code tẩy tủy ( e lấy bên card GM qua cho ai chưa bít add thì add nhé ^^ )

{"<color=red>{HOT}<color><color=pink>--<color>Tẩy Tủy<color=pink>++<color>", self.OnDialog_taytuy, self},

function tbGift:OnDialog_taytuy()
 local tbOpt = {};
 
 local nChangeGerneIdx = Faction:GetChangeGenreIndex(me);
 if(nChangeGerneIdx >= 1)then
  local szMsg;
  if(Faction:Genre2Faction(me, nChangeGerneIdx) > 0 )then --كז`ӑў
   szMsg = "Tôi muốn chọn phái song tu";
  else
   szMsg = "Tôi muốn tẩy điểm võ công";
  end
  table.insert(tbOpt, {szMsg, self.OnChangeGenreFaction, self, me});
 end
 
 table.insert(tbOpt, {"Tẩy điểm tiềm năng", self.OnResetDian, self, me, 1});
 table.insert(tbOpt, {"Tẩy điểm kỹ năng", self.OnResetDian, self, me, 2});
 table.insert(tbOpt, {"Tẩy điểm Tiềm năng và kỹ năng", self.OnResetDian, self, me, 0});
 table.insert(tbOpt, {"Không thèm tẩy nữa"});
 local szMsg = "Tôi sẽ rửa được điểm được giao và điểm kỹ năng của tiềm năng cho bạn để phân bổ lại. Ở phía sau có một hang động, nơi bạn có thể trải nghiệm những cuộc chiến sau khi thử nghiệm hiệu quả của việc phân phối lại. Nếu không, bạn có thể quay lại với tôi. Khi bạn đã hài lòng với việc chuyển giao của người dân từ võ nghệ thuật ở mặt sau của võ nghệ thuật của bạn.";
 Dialog:Say(szMsg, tbOpt);
end
function tbGift:OnResetDian(pPlayer, nType)
 local szMsg = "";
 if (1 == nType) then
  pPlayer.SetTask(2,1,1);
  pPlayer.UnAssignPotential();
  szMsg = "Tẩy điểm thành công. có thể lại điểm Tiềm Năng";
 elseif (2 == nType) then
  pPlayer.ResetFightSkillPoint();
  szMsg = "Tẩy điểm thành công. có thể cộng lại điểm Kỹ Năng";
 elseif (0 == nType) then
  pPlayer.ResetFightSkillPoint();
  pPlayer.SetTask(2,1,1);
  pPlayer.UnAssignPotential();
  szMsg = "Tẩy điểm thành công, có thể cộng lại điểm Tiềm Năng và Kỹ Năng.";
 end
 Setting:SetGlobalObj(pPlayer);
 Dialog:Say(szMsg);
 Setting:RestoreGlobalObj();
end
function tbGift:OnChangeGenreFaction(pPlayer)
 local tbOpt = {};
 local nFactionGenre = Faction:GetChangeGenreIndex(pPlayer);
 for nFactionId, tbFaction in ipairs(Player.tbFactions) do
  if (Faction:CheckGenreFaction(pPlayer, nFactionGenre, nFactionId) == 1) then
   table.insert(tbOpt, {tbFaction.szName, self.OnChangeGenreFactionSelected, self, pPlayer, nFactionId});
  end
 end
 table.insert(tbOpt,{"Kết thúc đối thoại"});
 
 local szMsg = "Hãy chọn lại môn phái mà bạn muốn gia nhập vào.";
 
 Setting:SetGlobalObj(pPlayer);
 Dialog:Say(szMsg, tbOpt);
 Setting:RestoreGlobalObj();
end
function tbGift:OnChangeGenreFactionSelected(pPlayer, nFactionId)
 
 local nGenreId   = Faction:GetChangeGenreIndex(pPlayer);
 local nPrevFaction   = Faction:Genre2Faction(pPlayer, nGenreId);
 local nResult, szMsg = Faction:ChangeGenreFaction(pPlayer, nGenreId, nFactionId);
 if(nResult == 1)then
  if (nPrevFaction == 0) then -- ֚һՎנў
   szMsg = "Bạn đã chọn %s Hãy tìm gặp thương nhân tẩy tủy để mua loại vũ khí của môn phái bạn vừa chọn dùng. Hãy chú ý lựa chọn đúng loại vũ khí của môn phái đó nhé.";
  else
   szMsg = "Bạn đã chuyển sang %s，Chú ý khi thay đổi phái thì Hệ trên phi phong và Hệ của ngũ hành ấn cũng thay đổi theo."
  end
  szMsg = string.format(szMsg, Player.tbFactions[nFactionId].szName);
 end
 
 Setting:SetGlobalObj(pPlayer);
 Dialog:Say(szMsg);
 Setting:RestoreGlobalObj();
end
--------------------------------------------------------------------------------

Code tiêu hủy đạo cụ (e cũng lấy bên card GM ^^)

{"<color=red>{HOT}<color><color=pink>--<color>Tiêu hủy đạo cụ<color=pink>++<color>",  Dialog.Gift, Dialog, "Task.DestroyItem.tbGiveForm"},

Chúc các bác chơi zui ạ ^^

[satthupro95]

Thêm cho các bác code add sách kinh nghiệm đồng hành ăn 400 cuốn/ 1 ngày ^^

{"<color=red>{HOT}<color><color=pink>--<color> Nhận Sách Kinh nghiệm đồng hành<color=pink>++<color>",self.Kinhnghiemdonghanh2,self},

function tbGift:Kinhnghiemdonghanh2()
me.AddItem(18,1,543,2);
me.AddItem(18,1,543,2);
me.AddItem(18,1,543,2);
me.AddItem(18,1,543,2);
me.AddItem(18,1,543,2);
me.AddItem(18,1,543,2);
me.AddItem(18,1,543,2);
me.AddItem(18,1,543,2);
me.AddItem(18,1,543,2);
me.AddItem(18,1,543,2);
me.AddItem(18,1,543,2);
me.AddItem(18,1,543,2);
me.AddItem(18,1,543,2);
me.AddItem(18,1,543,2);
me.AddItem(18,1,543,2);
me.AddItem(18,1,543,2);
me.AddItem(18,1,543,2);
me.AddItem(18,1,543,2);
me.AddItem(18,1,543,2);
me.AddItem(18,1,543,2);
end

[zducong]

Thank cho công sức + tinh thần vì cộng đồng .

@@: set sát thần nữa đâu pro

--- Chế độ gộp bài viết ---

Mình cũng đang làm cái vk 150 cho đủ bộ :d

[nqdonghy90]

Thank cho công sức + tinh thần vì cộng đồng .

@@: set sát thần nữa đâu pro

--- Chế độ gộp bài viết ---

Mình cũng đang làm cái vk 150 cho đủ bộ :d

bạn cho mình xin cái code vk 150

[zducong]

bạn cho mình xin cái code vk 150

Bạn vào theo đường dẫn để lấy id của vk nè, mình cũng chưa add nữa :
\gameserver\setting\item\001\equip\purple\meleeweapon.txt

[vipbk]

Chủ topic đặt code vào thẻ SPOILER nhé

[Lãng Tử Sầu]

Cách hạ yêu cầu level trang bị Anh Em nào post luôn ih

[ngockiem]

Cách hạ yêu cầu level trang bị Anh Em nào post luôn ih

đúng rồi
Share lun đi bạn
Anh Lãng tử sầu nói đúng lắm

[Lãng Tử Sầu]

đúng rồi
Share lun đi bạn
Anh Lãng tử sầu nói đúng lắm

Anh rất ít khi nói nhưng đã nói là chuẩn

[hachgame01]

vippk cho mình xin cái sv hoàn chỉnh nha bạn pmm qua yahoo mình nha cho cái túi tân thủ của bộ đồ này luôn nha cậu