Hỏi về hàm check điều kiện ngựa !

[prtear2721995]

Như tiêu đề em muốn hỏi về hàm check điều kiện ngựa để đổi sang lệnh bài ạ !

ví dụ:
if checkngua then
xóa ngựa
AddItem(ngựa)
end
end

Mong mọi người giúp đỡ ạ ! thanks

[sky.light9530]

Như tiêu đề em muốn hỏi về hàm check điều kiện ngựa để đổi sang lệnh bài ạ !

ví dụ:
if checkngua then
xóa ngựa
AddItem(ngựa)
end
end

Mong mọi người giúp đỡ ạ ! thanks

Sử dụng đầu là ra, cần cái gì thì search cái đó Lấy hàm add ngựa ra search ngược vào mục script! Hết

[killer20099]

Như tiêu đề em muốn hỏi về hàm check điều kiện ngựa để đổi sang lệnh bài ạ !

ví dụ:
if checkngua then
xóa ngựa
AddItem(ngựa)
end
end

Mong mọi người giúp đỡ ạ ! thanks

check ngựa ????
check kiểu gì ?
hàm gì mà xóa ngựa rồi additem chả hiểu

[HoangTVT]

Bạn cần lấy được Index của ngựa, đơn giản nhất là dùng hàm GiveItemUI sau đó check như sau

ItemGenre, DetailType, ParticularType, ItemLevel = GetItemProp(Index)

if (ItemGenre ~= 0 or DetailType ~= 10 or ParticularType ~= 2 or (ItemLevel ~= 9 and ItemLevel ~= 10)) then
	Msg2Player("Khong phai ngua Tuc Suong!")
	return 0			
end

đó là check ngựa Túc Sương đơn giản bạn muốn làm nâng cấp ngựa thì nên lập 1 bảng các loại ngựa

[laptrinhjx]

Như tiêu đề em muốn hỏi về hàm check điều kiện ngựa để đổi sang lệnh bài ạ !

ví dụ:
if checkngua then
xóa ngựa
AddItem(ngựa)
end
end

Mong mọi người giúp đỡ ạ ! thanks

không hiểu câu hỏi bạn hỏi gì!

[prtear2721995]

không hiểu câu hỏi bạn hỏi gì!

Em muốn làm nâng cấp ngựa đó ạ! Ví dụ có ngựa chiếu dạ nâng cấp lên ngựa phi vân thì làm ntn đó anh

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

Sử dụng đầu là ra, cần cái gì thì search cái đó Lấy hàm add ngựa ra search ngược vào mục script! Hết

Hàm lấy ngựa e chỉ dùng AddItem(loại ngựa muốn lấy thôi) còn checks nó có trong rương và xóa nó đi đổi ngựa khác k đc ạ. E làm như tạo event nhưng k thành công

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

Bạn cần lấy được Index của ngựa, đơn giản nhất là dùng hàm GiveItemUI sau đó check như sau

ItemGenre, DetailType, ParticularType, ItemLevel = GetItemProp(Index)

if (ItemGenre ~= 0 or DetailType ~= 10 or ParticularType ~= 2 or (ItemLevel ~= 9 and ItemLevel ~= 10)) then
	Msg2Player("Khong phai ngua Tuc Suong!")
	return 0			
end

đó là check ngựa Túc Sương đơn giản bạn muốn làm nâng cấp ngựa thì nên lập 1 bảng các loại ngựa

Để em thử test check điều kiện này thanks ạ

[sky.light9530]

check ngựa ????
check kiểu gì ?
hàm gì mà xóa ngựa rồi additem chả hiểu

Sao không đc? GiveItemUI , chính bản gốc của VNG cũng có script mà bạn? Nếu hồi trước bạn có chơi Võ Lâm thì sẽ nhớ ngay 12 mảnh tàng bản đồ + ngựa 8x đặt vào bảng giao sẽ mở rộng rương nhé

[prtear2721995]

Sao không đc? GiveItemUI , chính bản gốc của VNG cũng có script mà bạn? Nếu hồi trước bạn có chơi Võ Lâm thì sẽ nhớ ngay 12 mảnh tàng bản đồ + ngựa 8x đặt vào bảng giao sẽ mở rộng rương nhé

Em cũng tìm mà k ra mở rộng rương của e nó mở bằng 20 tiền đồng lun a

[sky.light9530]

Tặng bạn script nâng cấp ngựa của mình. Bạn đọc hiểu được thì có thể xài!

function BaiBaoXiang_Give_UI1()
	GiveItemUI("N©ng cÊp ngùa","§iÒu kiÖn ®Ó thuÇn phôc:<enter><enter> + 1 B¾c §Èu ThuÇn M· ThuËt<enter> + 1 Cá Xanh<enter> + 10.000 V¹n .","BaiBaoXiang_Get1","no",1)
end			

function BaiBaoXiang_Get1(nItemCount)
if GetCash() < 100000000 then
Msg2Player("<color=cyan>B¹n kh«ng cã 10.000 V¹n..<color>")
return
end;
-- 0,10,8 lµ phi v©n , 0,10,6 lµ b«n tiªu , 0,10,5 lµ chiÕu d¹ (ngùa 8x)
TB_Material = {
 --1.ÎïÆ·Ãû	2.ÊýÁ¿
	["0,10,5"] = "Ngùa 80",
	["6,1,1987"] =	"B¾c §Èu ThuÇn M· ThuËt",
	["6,1,3124"] =	"Cá T­¬i",
}

	local tb_enhanceitem_count = {};
	for szkey, tb_item in TB_Material do
		tb_enhanceitem_count[szkey] = {};
		tb_enhanceitem_count[szkey][1] = 0;
	end
	--¼ì²âÎïÆ·Æ¥Åä
	for i = 1, nItemCount do
		local nCurItemIdx = GetGiveItemUnit(i);
		local nCurItemName = GetItemName(nCurItemIdx);
		local nCurItemQuality = GetItemQuality(nCurItemIdx);
		local tbCurItemProp = pack(GetItemProp(nCurItemIdx));
		
		local szItemKey = tbCurItemProp[1]..","..tbCurItemProp[2]..","..tbCurItemProp[3];
		
		
		if (TB_Material[szItemKey] == nil) then
Msg2Player("<color=cyan>Nguyªn liÖu bá vµo kh«ng ®óng..<color>")
				return
		end
		tb_enhanceitem_count[szItemKey][1] = tb_enhanceitem_count[szItemKey][1] + GetItemStackCount(nCurItemIdx);
	end
	
		for szkey, tb_item in TB_Material do
				if (tb_enhanceitem_count[szkey][1] ~= 1) then
Msg2Player("<color=cyan>Nguyªn liÖu bá vµo kh«ng ®óng..<color>")
				return
				end
		end
		
		--ɾ²ÄÁÏ
		for i=1, nItemCount do
			local nIdx = GetGiveItemUnit(i)
			if (RemoveItemByIndex(nIdx) ~= 1) then
				--WriteLog(format("[GuoQing2007_BaiBaoXiang]Date:%s\t Account:%s\t Name:%s\t DelItemFail:%s",GetLocalDate("%Y-%m-%d %H:%M:%S"),GetAccount(),GetName(),GetItemName(GetGiveItemUnit(i)) ));
				return
			end
		end
		
p=random(0,6)
if p > 2 then
		Msg2Player("<color=yellow>LÇn nµy thÊt b¹i råi,thËt tiÕc<pic=10><color>")
Pay(100000000)
else
		Msg2Player("§¹i hiÖp <color=yellow>"..GetName().."<color> n©ng cÊp thµnh c«ng <color=gold>Phi V©n<color>");
Pay(100000000)
AddItem(0,10,9,0,0,0)
		WriteLog(format("[GuoQing2007_BaiBaoXiang]\t Date:%s\t Account:%s\t Name:%s\t Effect:Get BaiBaoXiang",GetLocalDate("%y-%m-%d %H:%M:%S"),GetAccount(),GetName()));
return
end
end

function pack(...)
	return arg
end

[sky.light9530]

Còn cái comment mình nói sử dụng đầu là ra mà bạn vẫn không chịu sử dụng nó. Ví dụ cho bạn lần sau mà sử dụng nhé.

Ví dụ cho hàm add ngựa chiếu dạ là AddItem(0,0,0,0,1) ok vậy id con ngựa chiếu dạ là 0,0,0,0,1 <=< mấu chốt nó nằm ở đây chứ không phải nguyên cái hàm đó. Bạn cầm số "0,0,0,0,1" rồi dùng notepad search in file hết cái mục script thì sẽ có ngay script check ngựa cho bạn liền Search cái id ngựa chiếu dạ thì những script nào có id đó nó show ra cho bạn, mà đã có id con chiếu dạ tất nhiên script đó liên quan đến ngựa