Share Script Chuyển Sinh by trantoai223

[ThienSauMenh]

Link Download: [Only registered and activated users can see links. ]

Tác giả: [Only registered and activated users can see links. ]

Không down đừng nói lời cay đắng

Anh Em nào sử dụng thì nhớ thêm task cho nó nhé.

file chuyensinh.lua chép vào đâu vậy mọi người???

[vipbk]

file chuyensinh.lua chép vào đâu vậy mọi người???

bất kỳ chỗ nào trong folder : gameserver\script\

[ThienSauMenh]

Mình muốn thêm khi chuyển sinh mất bạc thì làm sao nhỉ, bác nào chỉ code mình với

[__Jie__]

Mình muốn thêm khi chuyển sinh mất bạc thì làm sao nhỉ, bác nào chỉ code mình với

me.CostMoney(10000, 0)

Xài lệnh này chèn vào chổ cần trừ tiền

[ThienSauMenh]

me.CostMoney(10000, 0)

Xài lệnh này chèn vào chổ cần trừ tiền

for _, pItem in pairs(tbItemObj) do
		if (me.DelItem(pItem[1]) ~= 1) and (me.CostMoney(10000, 0) ~= 1) then
			return 0;
		end
	end
	local szMsg = string.format("Chúc mừng người chơi <color=cyan>%s<color> Chuyển Sinh lần thứ <color=cyan>%s<color>", me.szName, nValue+1 );
	KDialog.NewsMsg(1, Env.NEWSMSG_COUNT, szMsg);
	KDialog.MsgToGlobal(szMsg);			
	me.SendMsgToFriend("Hảo hữu của bạn [<color=yellow>" .. me.szName 
		.. "<color>] Chuyển Sinh lần thứ  <color=cyan>"
	.. nValue+1 .."<color>");

Mình sửa lại thế này nhưng ts vẫn không tốn bạc.

[__Jie__]

for _, pItem in pairs(tbItemObj) do
        if (me.DelItem(pItem[1]) ~= 1) and (me.CostMoney(10000, 0) ~= 1) then
            return 0;
        end
    end
    local szMsg = string.format("Chúc mừng người chơi <color=cyan>%s<color> Chuyển Sinh lần thứ <color=cyan>%s<color>", me.szName, nValue+1 );
    KDialog.NewsMsg(1, Env.NEWSMSG_COUNT, szMsg);
    KDialog.MsgToGlobal(szMsg);            
    me.SendMsgToFriend("Hảo hữu của bạn [<color=yellow>" .. me.szName 
        .. "<color>] Chuyển Sinh lần thứ  <color=cyan>"
    .. nValue+1 .."<color>");

Mình sửa lại thế này nhưng ts vẫn không tốn bạc.

sai vị trí rồi bạn chổ
if nValue == 1 then
me.CostMoney(sotien, 0)
end

[ThienSauMenh]

Thanks bạn giờ ts nó có trừ tiền nhưng mình muốn check số bạc trong người nếu ko đủ số bạc đó ko có cho ts (hiện giờ ko check nên 0 bạc cũng ts dc). Mình viết vầy nó ko chạy, mong bạc giúp mình cho trót luôn ^^

function tbLiGuan:OnCsOpenGiftOk(nValue, tbItemObj)
	local tbItemList	= {};
		
	for _, pItem in pairs(tbItemObj) do
		if (self:CheckCSItem(pItem, REQUIRECS_ITEM[nValue], tbItemList) ~= 1) and (me.nMoney < 500000) then
			me.Msg("Không có vật phẩm hoặc không đủ số bạc yêu cầu!");
			return 0;
		end;
	end

	local bResult 	= false;
	for i = 1, #REQUIRECS_ITEM[nValue] do
		if (REQUIRECS_ITEM[nValue][i][2] ~= tbItemList[i]) and (me.nMoney >= 500000) then
			bResult = true;
		end;
	end;
	
	if (bResult) then
		me.Msg("Số lượng vật phẩm không chính xác!");
		return 0;
	end;
	
	for _, pItem in pairs(tbItemObj) do
		if me.DelItem(pItem[1]) ~= 1 then
			return 0;
		end
	end
	local szMsg = string.format("Chúc mừng người chơi <color=cyan>%s<color> Chuyển Sinh lần thứ <color=cyan>%s<color>", me.szName, nValue+1 );
	KDialog.NewsMsg(1, Env.NEWSMSG_COUNT, szMsg);
	KDialog.MsgToGlobal(szMsg);			
	me.SendMsgToFriend("Hảo hữu của bạn [<color=yellow>" .. me.szName 
		.. "<color>] Chuyển Sinh lần thứ  <color=cyan>"
	.. nValue+1 .."<color>");

[vipbk]

- Thứ nhất :

for _, pItem in pairs(tbItemObj) do
if (self:CheckCSItem(pItem, REQUIRECS_ITEM[nValue], tbItemList) ~= 1) and (me.nMoney < 500000) then
me.Msg("Không có vật phẩm hoặc không đủ số bạc yêu cầu!");
return 0;
end;
end

local bResult = false;
for i = 1, #REQUIRECS_ITEM[nValue] do
if (REQUIRECS_ITEM[nValue][i][2] ~= tbItemList[i]) and (me.nMoney >= 500000) then
bResult = true;
end;
end;

ở trên phải là or chứ không phải and vì check ít nhất 1 điều kiện không thỏa mãn thì return 0 -> thoát
tiếp theo phải là dấu < chứ không phải >=

- Thứ hai :
không có hàm me.nMoney mà chỉ có me.nCashMoney để kiểm tra lượng bạc trên người

[jxonline2]

có ai bị tình trạng khi chuyển sinh là lên đảo ở không về được không??

Co ai bị lỗi này chỉ với

30 charrrrrrrrr

[vipbk]

Co ai bị lỗi này chỉ với

30 charrrrrrrrr

theo nghichtu91 là chuyển sinh cho về cấp 90 thay vì về cấp 10

hoặc lấy acc khác dùng chức năng admin cho Thoát khỏi thiên lao là dc