[Linux]Script túi đựng tiền

**f-fantasy** · 11-09-15, 03:12 PM

Lượng tiền lưu trữ tối đa tầm 400 nghìn vạn. 200k trong rương và 200 nghìn trên người lưu hơn thì nó sẽ ko lưu được nữa và cũng không nhặt được tiền nữa nếu trên người nhiều tiền quá vậy nên em viết cái bọc tiền này để lưu tiền vào. Có thể lưu hơn 200k vạn và gần như không có giới hạn tối đa lưu vào cái túi này.
Function DocSoTien để làm đẹp cho cái thông báo có bao nhiêu tiền trong túi chứ không nó hiện 20000000000 nhìn hoa mắt đếch biết đó là bao nhiêu tiền

)

Trên máy em là em Include đến 1 cái file mở rộng hàm có hàm DocSoTien cho nên cái function DESC ý em phải viết dài dòng vì nó load trên client. Copy code lên đây cho các bác em chèn cả cái function DocSoTien vào cùng 1 file.

Chép cả vào client lẫn server cùng đường dẫn để hiện thị item DESC

Code:

function main(nItemIndex)
dofile("script/ff/tuinganluong.lua")
	local nCount = GetItemParam(nItemIndex, 2)*2000000000 + GetItemParam(nItemIndex, 1);
	local nSoLan200k = GetItemParam(nItemIndex, 2);
	if nSoLan200k == nil then
		nSoLan200k = 0
		SetSpecItemParam(nItemIndex, 2, 0)
		SyncItem(nItemIndex)
	end
	local tb = {
	"CÊt tiÒn/#CatTien("..nCount..","..GetCash()..","..nItemIndex..")",
	"Rót tiÒn/#RutTien("..nCount..","..nItemIndex..")",
	"Tho¸t/Quit",
	}
	Say("",getn(tb),tb)
	--SetSpecItemParam(nItemIndex, 2, 1)
	--	SetSpecItemParam(nItemIndex, 1, 500000000)
	--	SyncItem(nItemIndex)
	--
	--Msg2Player(GetItemParam(nItemIndex, 2))
	--Msg2Player(GetItemParam(nItemIndex, 1))
	return 1
end
function CatTien(nCount,nCash,nItemIndex)
	--nCount : Sè tiÒn hiÖn ®ang cã trong tói
	--nCash : Sè tiÒn cã trªn ngêi.
	local nCountStore = nCount + nCash --Sè lîng trong tói b»ng sè hiÖn cã céng víi sè cã trªn ngêi
	--if nCountStore >= 2000000000 then
		local nSoLan200k = floor(nCountStore/2000000000)
		local nSoTienLe = nCountStore - nSoLan200k*2000000000 --SÏ lu sè tiÒn nµy vµo param1,param2 sÏ lµ sè lÇn 200k
		SetSpecItemParam(nItemIndex, 2, nSoLan200k)
		SetSpecItemParam(nItemIndex, 1, nSoTienLe)
		SyncItem(nItemIndex)
		Pay(nCash)
		--local nTotalMoneyInBag = GetItemParam(nItemIndex, 2)*2000000000 + GetItemParam(nItemIndex, 1);
		Msg2Player("§· cÊt "..DocSoTien(nCash).." vµo trong tói. Trong tói cã "..DocSoTien((GetItemParam(nItemIndex, 2)*2000000000 + GetItemParam(nItemIndex, 1)))..".")
	--else --NÕu tæng céng mµ kh«ng lín h¬n 200k v¹n th×
	--	SetSpecItemParam(nItemIndex, 1, nCountStore)
	--	SyncItem(nItemIndex)
	--	Pay(nCash)
	--	local nTotalMoneyInBag = GetItemParam(nItemIndex, 2)*2000000000 + GetItemParam(nItemIndex, 1);
	--	Msg2Player("§· cÊt "..DocSoTien(nCash).." vµo trong tói. Trong tói cã "..DocSoTien(nTotalMoneyInBag)..".")
	--end
end
function RutTien(nCount,nItemIndex)
	if nCount == 0 then --Sè tiÒn cã trong tói.
		Say("Bªn trong tói trèng rçng kh«ng cã ng©n lîng.", 0) 
	return 0 
	end
	local	tb = {
	"Rót 10.000 v¹n/#RutTien_Select(1,"..nCount..","..nItemIndex..")",
	"Rót 20.000 v¹n/#RutTien_Select(2,"..nCount..","..nItemIndex..")",
	"Rót 50.000 v¹n/#RutTien_Select(5,"..nCount..","..nItemIndex..")",
	"Rót 100.000 v¹n/#RutTien_Select(10,"..nCount..","..nItemIndex..")",
	"NhËp sè lîng/#RutTien_Select(99,"..nCount..","..nItemIndex..")",
	"Tho¸t./Quit",
	}
	Say("Xin chó ý nÕu muèn nhËp sè lîng cÇn rót lµ 10.000 v¹n th× chØ cÇn nhËp 10.000.",getn(tb),tb)
	 
end
function RutTien_Select(nSelect,nSoTienTrongTui,nItemIndex)
	if nSelect == 99 then
		SetTaskTemp(114, nItemIndex)
		AskClientForNumber("RutTien_StepNext", 0,200000,"NhËp sè lîng xu muèn rót.")
	else
		SoTienRut = nSelect * 100000000
		if SoTienRut > nSoTienTrongTui then --C¸i biÕn nSoTienTrongTui ®· ®îc tÝnh b»ng c¶ param1+param2
			Msg2Player("Sè tiÒn trong tói kh«ng ®ñ "..DocSoTien(SoTienRut)..". Kh«ng thÓ rót.")
			return
		end
		local MoneyCalc = SoTienRut + GetCash()
		if MoneyCalc <= 2000000000 then
			Earn(SoTienRut)
			local SoTienConLaiSauKhiRut = nSoTienTrongTui - SoTienRut
			if SoTienConLaiSauKhiRut >= 2000000000 then
				nParam2 = floor(SoTienConLaiSauKhiRut/2000000000)
				nParam1 = SoTienConLaiSauKhiRut - nParam2*2000000000
				SetSpecItemParam(nItemIndex, 2, nParam2)
				SetSpecItemParam(nItemIndex, 1, nParam1)
				SyncItem(nItemIndex)
			else
				SetSpecItemParam(nItemIndex, 2, 0)
				SetSpecItemParam(nItemIndex, 1, SoTienConLaiSauKhiRut)
				SyncItem(nItemIndex)
			end
			--local nMoneyInBag = GetItemParam(nItemIndex,2)*2000000000 + GetItemParam(nItemIndex,1);  --Sè tiÒn ®ang cã trong tói
			Msg2Player("Rót thµnh c«ng "..DocSoTien(SoTienRut).." v¹n. Trong tói cßn l¹i "..DocSoTien((GetItemParam(nItemIndex, 2)*2000000000 + GetItemParam(nItemIndex, 1)))..".")
		else
			Msg2Player("Sè tiÒn cã trªn ngêi vµ sè tiÒn muèn rót vît qu¸ giíi h¹n. Xin h·y cÈn thËn")
		end
	end
end
function RutTien_StepNext(nMoneyAskClient)
	local nPickup = nMoneyAskClient * 10000
	local nItemIndex = GetTaskTemp(114)
	local nMoneyInBag = GetItemParam(nItemIndex,2)*2000000000 + GetItemParam(nItemIndex,1);  --Sè tiÒn ®ang cã trong tói
	if nPickup <= 0 then 
		return 
	end
	if (nPickup + GetCash()) > 2000000000 then
		Msg2Player("Sè tiÒn cã trªn ngêi vµ sè tiÒn muèn rót vît qu¸ giíi h¹n. Xin h·y cÈn thËn")
		return
	end
	if nPickup > nMoneyInBag then
		nPickup = nMoneyInBag
	end
	nMoneyInBag_ConLai = nMoneyInBag - nPickup --Sè cßn l¹i b»ng Sè ban ®Çu trõ ®i sè ®· rót
	Earn(nPickup)
	if nMoneyInBag_ConLai >= 2000000000 then
		nParam2 = floor(nMoneyInBag_ConLai/2000000000)
		nParam1 = nMoneyInBag_ConLai - nParam2*2000000000
		SetSpecItemParam(nItemIndex, 2, nParam2)
		SetSpecItemParam(nItemIndex, 1, nParam1)
		SyncItem(nItemIndex)
	else
		SetSpecItemParam(nItemIndex, 2, 0)
		SetSpecItemParam(nItemIndex, 1, nMoneyInBag_ConLai)
		SyncItem(nItemIndex)
	end
	local nTotalMoneyInBag = GetItemParam(nItemIndex, 2)*2000000000 + GetItemParam(nItemIndex, 1);
	Msg2Player("Rót thµnh c«ng "..DocSoTien(nPickup)..". Trong tói cßn l¹i "..DocSoTien(nTotalMoneyInBag)..".")
end
function DocSoTien(nMoney)
	local Sotien = tostring(nMoney)
	local DoDai = strlen(Sotien)
	--aaa = RightTrimString(Sotien,1)
	--bbb = strsub(tostring(nMoney),1,3)
	--ccc = strfind(Sotien,"1")
	--Msg2Player(ccc)
	--Msg2Player(bbb)
	if DoDai <= 4 then
		return "<color=yellow>"..Sotien.."<color> lîng"
	elseif DoDai > 4 and DoDai <= 8 then--Tõ 1.0000(4 sè) ®Õn 9999.9999(8 sè) v¹n
		--Msg2Player("a")
		local nX = strsub(tostring(nMoney),1,DoDai - 4)
		local nY = strsub(tostring(nMoney),DoDai - 3,DoDai)
		return "<color=yellow>"..nX.."<color> v¹n <color=yellow>"..nY.."<color> lîng"
	elseif DoDai > 8 and DoDai <=10 then  --Tõ 10.000.0000(9 sè) ®Õn 999.999.9999(10 sè) v¹n
		local nX = strsub(tostring(nMoney),1,DoDai - 7)
		local nY = strsub(tostring(nMoney),DoDai - 6,DoDai - 4)
		local nZ = strsub(tostring(nMoney),DoDai - 3,DoDai)
		return "<color=yellow>"..nX.."<color> ngh×n <color=yellow>"..nY.."<color> v¹n <color=yellow>"..nZ.."<color> lîng"
	elseif DoDai > 10 and DoDai <= 13 then--Tõ 1.000.000.0000(11 sè) v¹n 999.999.999.9999(13 sè) v¹n
		local nX = strsub(tostring(nMoney),1,DoDai - 10)
		local nY = strsub(tostring(nMoney),DoDai - 9,DoDai - 7)
		local nZ = strsub(tostring(nMoney),DoDai - 6,DoDai - 4)
		local nJ = strsub(tostring(nMoney),DoDai - 3,DoDai)
		return "<color=yellow>"..nX.."<color> triÖu <color=yellow>"..nY.."<color> ngh×n <color=yellow>"..nZ.."<color> v¹n <color=yellow>"..nJ.."<color> lîng"
	end
	--§Õn ®©y lµ hµm nµy cã thÓ ®äc ®îc 1 sè tiÒn lªn ®Õn 999 triÖu v¹n.
end

function GetDesc(nItemIndex) 
	--local nMoney= GetItemParam(nItemIndex, 1);
	local nMoney= GetItemParam(nItemIndex,2)*2000000000 + GetItemParam(nItemIndex,1);
	local Sotien = tostring(nMoney)
	local DoDai = strlen(Sotien)
	if DoDai <= 4 then
		return "Sè tiÒn trong tói<enter><color=yellow>"..Sotien.."<color> lîng"
	elseif DoDai > 4 and DoDai <= 8 then--Tõ 1.0000 ®Õn 9999.9999 v¹n
		--Msg2Player("a")
		local nX = strsub(tostring(nMoney),1,DoDai - 4)
		local nY = strsub(tostring(nMoney),DoDai - 3,DoDai)
		return "Sè tiÒn trong tói<enter><color=yellow>"..nX.."<color> v¹n <color=yellow>"..nY.."<color> lîng"
	elseif DoDai > 8 and DoDai <=10 then  --Tõ 10.000.0000 ®Õn 999.999.9999 v¹n
		local nX = strsub(tostring(nMoney),1,DoDai - 7)
		local nY = strsub(tostring(nMoney),DoDai - 6,DoDai - 4)
		local nZ = strsub(tostring(nMoney),DoDai - 3,DoDai)
		return "Sè tiÒn trong tói<enter><color=yellow>"..nX.."<color> ngh×n <color=yellow>"..nY.."<color> v¹n <color=yellow>"..nZ.."<color> lîng"
	elseif DoDai > 10 and DoDai <= 13 then--Tõ 1.000.000.0000 v¹n 999.999.999.9999 v¹n
		local nX = strsub(tostring(nMoney),1,DoDai - 10)
		local nY = strsub(tostring(nMoney),DoDai - 9,DoDai - 7)
		local nZ = strsub(tostring(nMoney),DoDai - 6,DoDai - 4)
		local nJ = strsub(tostring(nMoney),DoDai - 3,DoDai)
		return "Sè tiÒn trong tói<enter><color=yellow>"..nX.."<color> triÖu <color=yellow>"..nY.."<color> ngh×n <color=yellow>"..nZ.."<color> v¹n <color=yellow>"..nJ.."<color> lîng"
	end

[Only registered and activated users can see links. ]
[Only registered and activated users can see links. ]
[Only registered and activated users can see links. ]
[Only registered and activated users can see links. ]
[Only registered and activated users can see links. ]
[Only registered and activated users can see links. ]

**vuduymanh** · 12-09-15, 05:52 PM

Bác ơi sao em coppy nguyên file anh share mà dùng nó báo
Lỗi dòng 153 và dòng cuối 174 anh xem giúp em mới

**f-fantasy** · 13-09-15, 02:08 PM

Gửi bởi vuduymanh [Only registered and activated users can see links. ]

Bác ơi sao em coppy nguyên file anh share mà dùng nó báo
Lỗi dòng 153 và dòng cuối 174 anh xem giúp em mới

Đắng quá bác ơi em trả máy thằng bạn mất rồi, giờ không có gì check cả. 2 dòng đó là 2 dòng nào bác post lên đây được không?

**vuduymanh** · 13-09-15, 02:25 PM

Gửi bởi f-fantasy [Only registered and activated users can see links. ]

Đắng quá bác ơi em trả máy thằng bạn mất rồi, giờ không có gì check cả. 2 dòng đó là 2 dòng nào bác post lên đây được không?

function main(nItemIndex)
dofile("script/ff/tuinganluong.lua") local nCount = GetItemParam(nItemIndex, 2)*2000000000 + GetItemParam(nItemIndex, 1); local nSoLan200k = GetItemParam(nItemIndex, 2); if nSoLan200k == nil then nSoLan200k = 0 SetSpecItemParam(nItemIndex, 2, 0) SyncItem(nItemIndex) end local tb = { "CÊt tiÒn/#CatTien("..nCount..","..GetCash()..","..nItemInde x..")", "Rót tiÒn/#RutTien("..nCount..","..nItemIndex..")", "Tho¸t/Quit", } Say("",getn(tb),tb) --SetSpecItemParam(nItemIndex, 2, 1) -- SetSpecItemParam(nItemIndex, 1, 500000000) -- SyncItem(nItemIndex) -- --Msg2Player(GetItemParam(nItemIndex, 2)) --Msg2Player(GetItemParam(nItemIndex, 1)) return 1endfunction CatTien(nCount,nCash,nItemIndex) --nCount : Sè tiÒn hiÖn ®ang cã trong tói --nCash : Sè tiÒn cã trªn ngêi. local nCountStore = nCount + nCash --Sè lîng trong tói b»ng sè hiÖn cã céng víi sè cã trªn ngêi --if nCountStore >= 2000000000 then local nSoLan200k = floor(nCountStore/2000000000) local nSoTienLe = nCountStore - nSoLan200k*2000000000 --SÏ lu sè tiÒn nµy vµo param1,param2 sÏ lµ sè lÇn 200k SetSpecItemParam(nItemIndex, 2, nSoLan200k) SetSpecItemParam(nItemIndex, 1, nSoTienLe) SyncItem(nItemIndex) Pay(nCash) --local nTotalMoneyInBag = GetItemParam(nItemIndex, 2)*2000000000 + GetItemParam(nItemIndex, 1); Msg2Player("§· cÊt "..DocSoTien(nCash).." vµo trong tói. Trong tói cã "..DocSoTien((GetItemParam(nItemIndex, 2)*2000000000 + GetItemParam(nItemIndex, 1)))..".") --else --NÕu tæng céng mµ kh«ng lín h¬n 200k v¹n th× -- SetSpecItemParam(nItemIndex, 1, nCountStore) -- SyncItem(nItemIndex) -- Pay(nCash) -- local nTotalMoneyInBag = GetItemParam(nItemIndex, 2)*2000000000 + GetItemParam(nItemIndex, 1); -- Msg2Player("§· cÊt "..DocSoTien(nCash).." vµo trong tói. Trong tói cã "..DocSoTien(nTotalMoneyInBag)..".") --endendfunction RutTien(nCount,nItemIndex) if nCount == 0 then --Sè tiÒn cã trong tói. Say("Bªn trong tói trèng rçng kh«ng cã ng©n lîng.", 0) return 0 end local tb = { "Rót 10.000 v¹n/#RutTien_Select(1,"..nCount..","..nItemIndex..")", "Rót 20.000 v¹n/#RutTien_Select(2,"..nCount..","..nItemIndex..")", "Rót 50.000 v¹n/#RutTien_Select(5,"..nCount..","..nItemIndex..")", "Rót 100.000 v¹n/#RutTien_Select(10,"..nCount..","..nItemIndex..")" , "NhËp sè lîng/#RutTien_Select(99,"..nCount..","..nItemIndex..")" , "Tho¸t./Quit", } Say("Xin chó ý nÕu muèn nhËp sè lîng cÇn rót lµ 10.000 v¹n th× chØ cÇn nhËp 10.000.",getn(tb),tb) endfunction RutTien_Select(nSelect,nSoTienTrongTui,nItemIndex) if nSelect == 99 then SetTaskTemp(114, nItemIndex) AskClientForNumber("RutTien_StepNext", 0,200000,"NhËp sè lîng xu muèn rót.") else SoTienRut = nSelect * 100000000 if SoTienRut > nSoTienTrongTui then --C¸i biÕn nSoTienTrongTui ®· ®îc tÝnh b»ng c¶ param1+param2 Msg2Player("Sè tiÒn trong tói kh«ng ®ñ "..DocSoTien(SoTienRut)..". Kh«ng thÓ rót.") return end local MoneyCalc = SoTienRut + GetCash() if MoneyCalc <= 2000000000 then Earn(SoTienRut) local SoTienConLaiSauKhiRut = nSoTienTrongTui - SoTienRut if SoTienConLaiSauKhiRut >= 2000000000 then nParam2 = floor(SoTienConLaiSauKhiRut/2000000000) nParam1 = SoTienConLaiSauKhiRut - nParam2*2000000000 SetSpecItemParam(nItemIndex, 2, nParam2) SetSpecItemParam(nItemIndex, 1, nParam1) SyncItem(nItemIndex) else SetSpecItemParam(nItemIndex, 2, 0) SetSpecItemParam(nItemIndex, 1, SoTienConLaiSauKhiRut) SyncItem(nItemIndex) end --local nMoneyInBag = GetItemParam(nItemIndex,2)*2000000000 + GetItemParam(nItemIndex,1); --Sè tiÒn ®ang cã trong tói Msg2Player("Rót thµnh c«ng "..DocSoTien(SoTienRut).." v¹n. Trong tói cßn l¹i "..DocSoTien((GetItemParam(nItemIndex, 2)*2000000000 + GetItemParam(nItemIndex, 1)))..".") else Msg2Player("Sè tiÒn cã trªn ngêi vµ sè tiÒn muèn rót vît qu¸ giíi h¹n. Xin h·y cÈn thËn") end endendfunction RutTien_StepNext(nMoneyAskClient) local nPickup = nMoneyAskClient * 10000 local nItemIndex = GetTaskTemp(114) local nMoneyInBag = GetItemParam(nItemIndex,2)*2000000000 + GetItemParam(nItemIndex,1); --Sè tiÒn ®ang cã trong tói if nPickup <= 0 then return end if (nPickup + GetCash()) > 2000000000 then Msg2Player("Sè tiÒn cã trªn ngêi vµ sè tiÒn muèn rót vît qu¸ giíi h¹n. Xin h·y cÈn thËn") return end if nPickup > nMoneyInBag then nPickup = nMoneyInBag end nMoneyInBag_ConLai = nMoneyInBag - nPickup --Sè cßn l¹i b»ng Sè ban ®Çu trõ ®i sè ®· rót Earn(nPickup) if nMoneyInBag_ConLai >= 2000000000 then nParam2 = floor(nMoneyInBag_ConLai/2000000000) nParam1 = nMoneyInBag_ConLai - nParam2*2000000000 SetSpecItemParam(nItemIndex, 2, nParam2) SetSpecItemParam(nItemIndex, 1, nParam1) SyncItem(nItemIndex) else SetSpecItemParam(nItemIndex, 2, 0) SetSpecItemParam(nItemIndex, 1, nMoneyInBag_ConLai) SyncItem(nItemIndex) end local nTotalMoneyInBag = GetItemParam(nItemIndex, 2)*2000000000 + GetItemParam(nItemIndex, 1); Msg2Player("Rót thµnh c«ng "..DocSoTien(nPickup)..". Trong tói cßn l¹i "..DocSoTien(nTotalMoneyInBag)..".")endfunctio n DocSoTien(nMoney) local Sotien = tostring(nMoney) local DoDai = strlen(Sotien) --aaa = RightTrimString(Sotien,1) --bbb = strsub(tostring(nMoney),1,3) --ccc = strfind(Sotien,"1") --Msg2Player(ccc) --Msg2Player(bbb) if DoDai <= 4 then return "<color=yellow>"..Sotien.."<color> lîng" elseif DoDai > 4 and DoDai <= 8 then--Tõ 1.0000(4 sè) ®Õn 9999.9999(8 sè) v¹n --Msg2Player("a") local nX = strsub(tostring(nMoney),1,DoDai - 4) local nY = strsub(tostring(nMoney),DoDai - 3,DoDai) return "<color=yellow>"..nX.."<color> v¹n <color=yellow>"..nY.."<color> lîng" elseif DoDai > 8 and DoDai <=10 then --Tõ 10.000.0000(9 sè) ®Õn 999.999.9999(10 sè) v¹n local nX = strsub(tostring(nMoney),1,DoDai - 7) local nY = strsub(tostring(nMoney),DoDai - 6,DoDai - 4) local nZ = strsub(tostring(nMoney),DoDai - 3,DoDai) return "<color=yellow>"..nX.."<color> ngh×n <color=yellow>"..nY.."<color> v¹n <color=yellow>"..nZ.."<color> lîng" elseif DoDai > 10 and DoDai <= 13 then--Tõ 1.000.000.0000(11 sè) v¹n 999.999.999.9999(13 sè) v¹n local nX = strsub(tostring(nMoney),1,DoDai - 10) local nY = strsub(tostring(nMoney),DoDai - 9,DoDai - 7) local nZ = strsub(tostring(nMoney),DoDai - 6,DoDai - 4) local nJ = strsub(tostring(nMoney),DoDai - 3,DoDai) return "<color=yellow>"..nX.."<color> triÖu <color=yellow>"..nY.."<color> ngh×n <color=yellow>"..nZ.."<color> v¹n <color=yellow>"..nJ.."<color> lîng" end --§Õn ®©y lµ hµm nµy cã thÓ ®äc ®îc 1 sè tiÒn lªn ®Õn 999 triÖu v¹n.endfunction GetDesc(nItemIndex) --và dòng này nữa --local nMoney= GetItemParam(nItemIndex, 1); local nMoney= GetItemParam(nItemIndex,2)*2000000000 + GetItemParam(nItemIndex,1); local Sotien = tostring(nMoney) local DoDai = strlen(Sotien) if DoDai <= 4 then return "Sè tiÒn trong tói<enter><color=yellow>"..Sotien.."<color> lîng" elseif DoDai > 4 and DoDai <= 8 then--Tõ 1.0000 ®Õn 9999.9999 v¹n --Msg2Player("a") local nX = strsub(tostring(nMoney),1,DoDai - 4) local nY = strsub(tostring(nMoney),DoDai - 3,DoDai) return "Sè tiÒn trong tói<enter><color=yellow>"..nX.."<color> v¹n <color=yellow>"..nY.."<color> lîng" elseif DoDai > 8 and DoDai <=10 then --Tõ 10.000.0000 ®Õn 999.999.9999 v¹n local nX = strsub(tostring(nMoney),1,DoDai - 7) local nY = strsub(tostring(nMoney),DoDai - 6,DoDai - 4) local nZ = strsub(tostring(nMoney),DoDai - 3,DoDai) return "Sè tiÒn trong tói<enter><color=yellow>"..nX.."<color> ngh×n <color=yellow>"..nY.."<color> v¹n <color=yellow>"..nZ.."<color> lîng" elseif DoDai > 10 and DoDai <= 13 then--Tõ 1.000.000.0000 v¹n 999.999.999.9999 v¹n local nX = strsub(tostring(nMoney),1,DoDai - 10) local nY = strsub(tostring(nMoney),DoDai - 9,DoDai - 7) local nZ = strsub(tostring(nMoney),DoDai - 6,DoDai - 4) local nJ = strsub(tostring(nMoney),DoDai - 3,DoDai) return "Sè tiÒn trong tói<enter><color=yellow>"..nX.."<color> triÖu <color=yellow>"..nY.."<color> ngh×n <color=yellow>"..nZ.."<color> v¹n <color=yellow>"..nJ.."<color> lîng" end -- dòng này bác ơi

2 dòng em tô màu đỏ đó anh
function GetDesc(nItemIndex) -- dòng 153
end --- dòng này bác ơi dòng cuối cùng 176

**f-fantasy** · 13-09-15, 02:45 PM

Nó thông báo lỗi j ở server bạn. Báo nil value hay sao? Lỗi này ko lo vì nó chỉ là cái hiển thị khi di chuột qua item thôi.

**vuduymanh** · 13-09-15, 02:48 PM

Gửi bởi f-fantasy [Only registered and activated users can see links. ]

Nó thông báo lỗi j ở server bạn. Báo nil value hay sao? Lỗi này ko lo vì nó chỉ là cái hiển thị khi di chuột qua item thôi.

đúng rồi nhưng đang chạy server nó đã báo rồi chưa vào game

à bác có facebook cho em xin đc ko bác
facebookcom/vuduymanhhp là của em

**f-fantasy** · 13-09-15, 02:51 PM

Cái file mà bạn chép vào server bạn xoa nguyên từ chỗ function GetDesc đến hết. File nào chép vào client thì xóa hết chỉ giữ lại function GetDesc.

**vuduymanh** · 13-09-15, 02:58 PM

bác có nhiều cái srip hay vậy khi nào có cái j mới share anh em dùng mới nha

**f-fantasy** · 13-09-15, 03:11 PM

Cũng còn nhiều ý tưởng linh tinh lắm nhưng hqua bạn nó lấy máy nên phải tạm dừng cả lại rồi

**vuduymanh** · 13-09-15, 03:17 PM

Gửi bởi f-fantasy [Only registered and activated users can see links. ]

Cũng còn nhiều ý tưởng linh tinh lắm nhưng hqua bạn nó lấy máy nên phải tạm dừng cả lại rồi

à bác cho em hỏi chút sao em chơi vr3 + gataway mà chép vào rồi mà dùng trang bị hoa sơn bị tàn hình nhỉ mình up clien mới nhất rồi
và cả cái bán hàng chữ đen xì mình có chỉnh sửa về 16 bit và 2d rồi mà vẫn vậy

Chủ đề: [Linux]Script túi đựng tiền

Công cụ Chủ đề

[Linux]Script túi đựng tiền

The Following 6 Users Say Thank You to f-fantasy For This Useful Post:

Ðề: [Linux]Script túi đựng tiền

Ðề: [Linux]Script túi đựng tiền

Ðề: [Linux]Script túi đựng tiền

Ðề: [Linux]Script túi đựng tiền

Ðề: [Linux]Script túi đựng tiền

Ðề: [Linux]Script túi đựng tiền

Các thành viên gởi lời cảm ơn đến f-fantasy vì bài viết này !

Ðề: [Linux]Script túi đựng tiền

Ðề: [Linux]Script túi đựng tiền

Các thành viên gởi lời cảm ơn đến f-fantasy vì bài viết này !

Ðề: [Linux]Script túi đựng tiền

Các Chủ đề tương tự

[JX] gửi tặng các bạn yêu jx bộ script đã việt hóa linux

[JX] Xin Giúp Đỡ Về Script Jx Linux Có Báo Lỗi Hoàn Chỉnh

[JX] script sv linux

[KT] Hổ trợ về viết Script hay vật phẩm cường hóa +16 Linux

[JX] Xin cách hiệu chỉnh script các NPC Jx Linux

Quyền viết bài