[JX] [Linux]Script túi đựng tiền [Lưu trữ]

View Full Version : [JX] [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

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

[Chỉ có thành viên mới xem link được. <a href="register.php"> Nhấp đây để đăng ký thành viên......</a>] ([Chỉ có thành viên mới xem link được. <a href="register.php"> Nhấp đây để đăng ký thành viên......</a>])
[Chỉ có thành viên mới xem link được. <a href="register.php"> Nhấp đây để đăng ký thành viên......</a>] ([Chỉ có thành viên mới xem link được. <a href="register.php"> Nhấp đây để đăng ký thành viên......</a>])
[Chỉ có thành viên mới xem link được. <a href="register.php"> Nhấp đây để đăng ký thành viên......</a>] ([Chỉ có thành viên mới xem link được. <a href="register.php"> Nhấp đây để đăng ký thành viên......</a>])
[Chỉ có thành viên mới xem link được. <a href="register.php"> Nhấp đây để đăng ký thành viên......</a>] ([Chỉ có thành viên mới xem link được. <a href="register.php"> Nhấp đây để đăng ký thành viên......</a>])
[Chỉ có thành viên mới xem link được. <a href="register.php"> Nhấp đây để đăng ký thành viên......</a>] ([Chỉ có thành viên mới xem link được. <a href="register.php"> Nhấp đây để đăng ký thành viên......</a>])
[Chỉ có thành viên mới xem link được. <a href="register.php"> Nhấp đây để đăng ký thành viên......</a>] ([Chỉ có thành viên mới xem link được. <a href="register.php"> Nhấp đây để đăng ký thành viên......</a>])

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

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

Đắ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()..","..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 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)..".")endfunction 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

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 :D

vuduymanh

13-09-15, 03:17 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 :D

à 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

f-fantasy

13-09-15, 03:26 PM

Mình chơi bình thường ko bị lỗi đó. Bạn cho xem cái file pak.ini trong client đi bạn. Pak j j đó mình ko nhớ chính xác

vuduymanh

13-09-15, 03:33 PM

Mình chơi bình thường ko bị lỗi đó. Bạn cho xem cái file pak.ini trong client đi bạn. Pak j j đó mình ko nhớ chính xác
em để ở nhà rồi vì giờ đang đi làm ko có game trong máy hihi ,em dùng pach của vr3 rồi chép pach cua gataway đè vào

f-fantasy

13-09-15, 05:26 PM

Trong file pak của mình khai báo thêm 5 hay 6 file dmjxxx. Pak nữa. Mình nhớ là cái patch ban đầu ko có.