Ir para conteúdo

Pergunta

Olá galera, preciso de uma ajuda urgente de vocês, preciso que um de vocês adaptem este script para TFS 1x, tentei de vários modos e ainda não consegui. Este script émuito importante para mim, irei dar um salto enorme no andamento do meu otserver.

Agradeço muito aquele que me ajudar.

 

 

 

--[[

Offline player to player item trader (Auction System)

Script version: 1.2a [ -- FIXED CLONE ITEMS BUG -- ]

]]--

local config = {

levelRequiredToAdd = 20,

maxOffersPerPlayer = 5,

SendOffersOnlyInPZ = true,

blocked_items = {2165, 2152, 2148, 2160, 2166, 2167, 2168, 2169, 2202, 2203, 2204, 2205, 2206, 2207, 2208, 2209, 2210, 2211, 2212, 2213, 2214, 2215, 2343, 2433, 2640, 6132, 6300, 6301, 9932, 9933}

}

function onSay(cid, words, param, channel)

if(param == '') then

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Command requires param.")

return true

end

local t = string.explode(param, ",")

if(t[1] == "add") then

if((not t[2]) or (not t[3]) or (not t[4])) then

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Command requires param.")

return true

end

if(not tonumber(t[3]) or (not tonumber(t[4]))) then

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You don't set valid price or items count.")

return true

end

if(string.len(t[3]) > 7 or (string.len(t[4]) > 3)) then

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "This price or item count is too high.")

return true

end

local item = getItemIdByName(t[2], false)

if(not item) then

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Item wich such name does not exists.")

return true

end

if(getPlayerLevel(cid) < config.levelRequiredToAdd) then

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You don't have required (" .. config.levelRequiredToAdd .. ") level.")

return true

end

if(isInArray(config.blocked_items, item)) then

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "This item is blocked.")

return true

end

if(getPlayerItemCount(cid, item) < (tonumber(t[4]))) then

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Sorry, you don't have this item(s).")

return true

end

local check = db.getResult("SELECT `id` FROM `auction_system` WHERE `player` = " .. getPlayerGUID(cid) .. ";")

if(check:getID() == -1) then

elseif(check:getRows(true) >= config.maxOffersPerPlayer) then

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Sorry you can't add more offers (max. " .. config.maxOffersPerPlayer .. ")")

return true

end

if(config.SendOffersOnlyInPZ) then

if(not getTilePzInfo(getPlayerPosition(cid))) then

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You must be in PZ area when you add offert to database.")

return true

end

end

if(tonumber(t[4]) < 1 or (tonumber(t[3]) < 1)) then

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You have to type a number higher than 0.")

return true

end

local itemcount, costgp = math.floor(t[4]), math.floor(t[3])

doPlayerRemoveItem(cid, item, itemcount)

db.executeQuery("INSERT INTO `auction_system` (`player`, `item_name`, `item_id`, `count`, `cost`, `date`) VALUES (" .. getPlayerGUID(cid) .. ", \"" .. t[2] .. "\", " .. getItemIdByName(t[2]) .. ", " .. itemcount .. ", " .. costgp ..", " .. os.time() .. ")")

doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "You successfully add " .. itemcount .." " .. t[2] .." for " .. costgp .. " gps to offerts database.")

end

if(t[1] == "buy") then

if(not tonumber(t[2])) then

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Wrong ID.")

return true

end

local buy = db.getResult("SELECT * FROM `auction_system` WHERE `id` = " .. (tonumber(t[2])) .. ";")

if(buy:getID() ~= -1) then

if(getPlayerMoney(cid) < buy:getDataInt("cost")) then

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You don't have enoguh GP.")

buy:free()

return true

end

if(getPlayerName(cid) == getPlayerNameByGUID(buy:getDataInt("player"))) then

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Sorry, you can't buy your own items.")

buy:free()

return true

end

if(getPlayerFreeCap(cid) < getItemWeightById(buy:getDataInt("item_id"), buy:getDataInt("count")))then

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You try to buy a " .. buy:getDataString("item_name") .. ". It weight " .. getItemWeightById(buy:getDataInt("item_id"), buy:getDataInt("count")) .. " cap oz. and you have only " .. getPlayerFreeCap(cid) .. " oz. free capacity. Put some items to depot and try again.")

buy:free()

return true

end

if(isItemStackable((buy:getDataString("item_id")))) then

doPlayerAddItem(cid, buy:getDataString("item_id"), buy:getDataInt("count"))

else

for i = 1, buy:getDataInt("count") do

doPlayerAddItem(cid, buy:getDataString("item_id"), 1)

end

end

doPlayerRemoveMoney(cid, buy:getDataInt("cost"))

db.executeQuery("DELETE FROM `auction_system` WHERE `id` = " .. t[2] .. ";")

doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "You bought " .. buy:getDataInt("count") .. " ".. buy:getDataString("item_name") .. " for " .. buy:getDataInt("cost") .. " gps!")

db.executeQuery("UPDATE `players` SET `auction_balance` = `auction_balance` + " .. buy:getDataInt("cost") .. " WHERE `id` = " .. buy:getDataInt("player") .. ";")

buy:free()

else

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Wrong ID.")

end

end

if(t[1] == "remove") then

if((not tonumber(t[2]))) then

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Wrong ID.")

return true

end

if(config.SendOffersOnlyInPZ) then

if(not getTilePzInfo(getPlayerPosition(cid))) then

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You must be in PZ area when you remove offerts from database.")

return true

end

end

local delete = db.getResult("SELECT * FROM `auction_system` WHERE `id` = " .. (tonumber(t[2])) .. ";")

if(delete:getID() ~= -1) then

if(getPlayerGUID(cid) == delete:getDataInt("player")) then

db.executeQuery("DELETE FROM `auction_system` WHERE `id` = " .. t[2] .. ";")

if(isItemStackable(delete:getDataString("item_id"))) then

doPlayerAddItem(cid, delete:getDataString("item_id"), delete:getDataInt("count"))

else

for i = 1, delete:getDataInt("count") do

doPlayerAddItem(cid, delete:getDataString("item_id"), 1)

end

end

doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Your offert has been deleted from offerts database.")

else

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "This is not your offert!")

end

delete:free()

else

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Wrong ID.")

end

end

if(t[1] == "withdraw") then

local balance = db.getResult("SELECT `auction_balance` FROM `players` WHERE `id` = " .. getPlayerGUID(cid) .. ";")

if(balance:getDataInt("auction_balance") < 1) then

doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "You don't have money on your auction balance.")

balance:free()

return true

end

doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "You got " .. balance:getDataInt("auction_balance") .. " gps from auction system!")

doPlayerAddMoney(cid, balance:getDataInt("auction_balance"))

db.executeQuery("UPDATE `players` SET `auction_balance` = '0' WHERE `id` = " .. getPlayerGUID(cid) .. ";")

balance:free()

end

return true

end

 

 

Up

Link para o comentário
https://xtibia.com/forum/topic/239292-adaptar-script-para-tfs-1x-auctions/
Compartilhar em outros sites

8 respostass a esta questão

Posts Recomendados

  • 0

@[member=julhinhokullitz], vê se assim dá certo:

 

 

 

--[[
Offline player to player item trader (Auction System)
Script version: 1.2a [ -- FIXED CLONE ITEMS BUG -- ]
]]--
local config = {
levelRequiredToAdd = 20,
maxOffersPerPlayer = 5,
SendOffersOnlyInPZ = true,
blocked_items = {2165, 2152, 2148, 2160, 2166, 2167, 2168, 2169, 2202, 2203, 2204, 2205, 2206, 2207, 2208, 2209, 2210, 2211, 2212, 2213, 2214, 2215, 2343, 2433, 2640, 6132, 6300, 6301, 9932, 9933}
}
function onSay(player, words, param, channel)
if(param == '') then
player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, "Command requires param.")
return true
end
local t = string.explode(param, ",")
if(t[1] == "add") then
if((not t[2]) or (not t[3]) or (not t[4])) then
player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, "Command requires param.")
return true
end
if(not tonumber(t[3]) or (not tonumber(t[4]))) then
player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, "You don't set valid price or items count.")
return true
end
if(string.len(t[3]) > 7 or (string.len(t[4]) > 3)) then
player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, "This price or item count is too high.")
return true
end
local item = getItemIdByName(t[2])
if(not item) then
player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, "Item wich such name does not exists.")
return true
end
if(player:getLevel() < config.levelRequiredToAdd) then
player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, "You don't have required (" .. config.levelRequiredToAdd .. ") level.")
return true
end
if(isInArray(config.blocked_items, item)) then
player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, "This item is blocked.")
return true
end
if(player:getItemCount(item) < (tonumber(t[4]))) then
player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, "Sorry, you don't have this item(s).")
return true
end
local check = db.getResult("SELECT `id` FROM `auction_system` WHERE `player` = " .. player:getGuid() .. ";")
if(check:getID() == -1) then
elseif(check:getRows(true) >= config.maxOffersPerPlayer) then
player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, "Sorry you can't add more offers (max. " .. config.maxOffersPerPlayer .. ")")
return true
end
if(config.SendOffersOnlyInPZ) then
if(not getTilePzInfo(creature:getPosition())) then
player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, "You must be in PZ area when you add offert to database.")
return true
end
end
if(tonumber(t[4]) < 1 or (tonumber(t[3]) < 1)) then
player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, "You have to type a number higher than 0.")
return true
end
local itemcount, costgp = math.floor(t[4]), math.floor(t[3])
player:removeItem(item, itemcount)
db.executeQuery("INSERT INTO `auction_system` (`player`, `item_name`, `item_id`, `count`, `cost`, `date`) VALUES (" .. player:getGuid() .. ", \"" .. t[2] .. "\", " .. getItemIdByName(t[2]) .. ", " .. itemcount .. ", " .. costgp ..", " .. os.time() .. ")")
player:sendTextMessage(MESSAGE_INFO_DESCR, "You successfully add " .. itemcount .." " .. t[2] .." for " .. costgp .. " gps to offerts database.")
end
if(t[1] == "buy") then
if(not tonumber(t[2])) then
player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, "Wrong ID.")
return true
end
local buy = db.getResult("SELECT * FROM `auction_system` WHERE `id` = " .. (tonumber(t[2])) .. ";")
if(buy:getID() ~= -1) then
if(player:getMoney() < buy:getDataInt("cost")) then
player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, "You don't have enoguh GP.")
buy:free()
return true
end
if(creature:getName() == getPlayerNameByGUID(buy:getDataInt("player"))) then
player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, "Sorry, you can't buy your own items.")
buy:free()
return true
end
if(player:getFreeCapacity() < getItemWeight(buy:getDataInt("item_id"), buy:getDataInt("count")))then
player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, "You try to buy a " .. buy:getDataString("item_name") .. ". It weight " .. getItemWeight(buy:getDataInt("item_id"), buy:getDataInt("count")) .. " cap oz. and you have only " .. player:getFreeCapacity() .. " oz. free capacity. Put some items to depot and try again.")
buy:free()
return true
end
if(isItemStackable((buy:getDataString("item_id")))) then
player:addItem(buy:getDataString("item_id"), buy:getDataInt("count"))
else
for i = 1, buy:getDataInt("count") do
player:addItem(buy:getDataString("item_id"), 1)
end
end
player:removeMoney(buy:getDataInt("cost"))
db.executeQuery("DELETE FROM `auction_system` WHERE `id` = " .. t[2] .. ";")
player:sendTextMessage(MESSAGE_INFO_DESCR, "You bought " .. buy:getDataInt("count") .. " ".. buy:getDataString("item_name") .. " for " .. buy:getDataInt("cost") .. " gps!")
db.executeQuery("UPDATE `players` SET `auction_balance` = `auction_balance` + " .. buy:getDataInt("cost") .. " WHERE `id` = " .. buy:getDataInt("player") .. ";")
buy:free()
else
player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, "Wrong ID.")
end
end
if(t[1] == "remove") then
if((not tonumber(t[2]))) then
player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, "Wrong ID.")
return true
end
if(config.SendOffersOnlyInPZ) then
if(not getTilePzInfo(creature:getPosition())) then
player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, "You must be in PZ area when you remove offerts from database.")
return true
end
end
local delete = db.getResult("SELECT * FROM `auction_system` WHERE `id` = " .. (tonumber(t[2])) .. ";")
if(delete:getID() ~= -1) then
if(player:getGuid() == delete:getDataInt("player")) then
db.executeQuery("DELETE FROM `auction_system` WHERE `id` = " .. t[2] .. ";")
if(isItemStackable(delete:getDataString("item_id"))) then
player:addItem(delete:getDataString("item_id"), delete:getDataInt("count"))
else
for i = 1, delete:getDataInt("count") do
player:addItem(delete:getDataString("item_id"), 1)
end
end
player:sendTextMessage(MESSAGE_INFO_DESCR, "Your offert has been deleted from offerts database.")
else
player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, "This is not your offert!")
end
delete:free()
else
player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, "Wrong ID.")
end
end
if(t[1] == "withdraw") then
local balance = db.getResult("SELECT `auction_balance` FROM `players` WHERE `id` = " .. player:getGuid() .. ";")
if(balance:getDataInt("auction_balance") < 1) then
player:sendTextMessage(MESSAGE_INFO_DESCR, "You don't have money on your auction balance.")
balance:free()
return true
end
player:sendTextMessage(MESSAGE_INFO_DESCR, "You got " .. balance:getDataInt("auction_balance") .. " gps from auction system!")
player:addMoney(balance:getDataInt("auction_balance"))
db.executeQuery("UPDATE `players` SET `auction_balance` = '0' WHERE `id` = " .. player:getGuid() .. ";")
balance:free()
end
return true
end

 

 

Link para o comentário
https://xtibia.com/forum/topic/239292-adaptar-script-para-tfs-1x-auctions/#findComment-1685195
Compartilhar em outros sites

  • 0

@[member=julhinhokullitz], vê se assim dá certo:

 

 

 

--[[
Offline player to player item trader (Auction System)
Script version: 1.2a [ -- FIXED CLONE ITEMS BUG -- ]
]]--
local config = {
levelRequiredToAdd = 20,
maxOffersPerPlayer = 5,
SendOffersOnlyInPZ = true,
blocked_items = {2165, 2152, 2148, 2160, 2166, 2167, 2168, 2169, 2202, 2203, 2204, 2205, 2206, 2207, 2208, 2209, 2210, 2211, 2212, 2213, 2214, 2215, 2343, 2433, 2640, 6132, 6300, 6301, 9932, 9933}
}
function onSay(player, words, param, channel)
if(param == '') then
player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, "Command requires param.")
return true
end
local t = string.explode(param, ",")
if(t[1] == "add") then
if((not t[2]) or (not t[3]) or (not t[4])) then
player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, "Command requires param.")
return true
end
if(not tonumber(t[3]) or (not tonumber(t[4]))) then
player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, "You don't set valid price or items count.")
return true
end
if(string.len(t[3]) > 7 or (string.len(t[4]) > 3)) then
player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, "This price or item count is too high.")
return true
end
local item = getItemIdByName(t[2])
if(not item) then
player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, "Item wich such name does not exists.")
return true
end
if(player:getLevel() < config.levelRequiredToAdd) then
player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, "You don't have required (" .. config.levelRequiredToAdd .. ") level.")
return true
end
if(isInArray(config.blocked_items, item)) then
player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, "This item is blocked.")
return true
end
if(player:getItemCount(item) < (tonumber(t[4]))) then
player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, "Sorry, you don't have this item(s).")
return true
end
local check = db.getResult("SELECT `id` FROM `auction_system` WHERE `player` = " .. player:getGuid() .. ";")
if(check:getID() == -1) then
elseif(check:getRows(true) >= config.maxOffersPerPlayer) then
player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, "Sorry you can't add more offers (max. " .. config.maxOffersPerPlayer .. ")")
return true
end
if(config.SendOffersOnlyInPZ) then
if(not getTilePzInfo(creature:getPosition())) then
player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, "You must be in PZ area when you add offert to database.")
return true
end
end
if(tonumber(t[4]) < 1 or (tonumber(t[3]) < 1)) then
player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, "You have to type a number higher than 0.")
return true
end
local itemcount, costgp = math.floor(t[4]), math.floor(t[3])
player:removeItem(item, itemcount)
db.executeQuery("INSERT INTO `auction_system` (`player`, `item_name`, `item_id`, `count`, `cost`, `date`) VALUES (" .. player:getGuid() .. ", \"" .. t[2] .. "\", " .. getItemIdByName(t[2]) .. ", " .. itemcount .. ", " .. costgp ..", " .. os.time() .. ")")
player:sendTextMessage(MESSAGE_INFO_DESCR, "You successfully add " .. itemcount .." " .. t[2] .." for " .. costgp .. " gps to offerts database.")
end
if(t[1] == "buy") then
if(not tonumber(t[2])) then
player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, "Wrong ID.")
return true
end
local buy = db.getResult("SELECT * FROM `auction_system` WHERE `id` = " .. (tonumber(t[2])) .. ";")
if(buy:getID() ~= -1) then
if(player:getMoney() < buy:getDataInt("cost")) then
player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, "You don't have enoguh GP.")
buy:free()
return true
end
if(creature:getName() == getPlayerNameByGUID(buy:getDataInt("player"))) then
player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, "Sorry, you can't buy your own items.")
buy:free()
return true
end
if(player:getFreeCapacity() < getItemWeight(buy:getDataInt("item_id"), buy:getDataInt("count")))then
player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, "You try to buy a " .. buy:getDataString("item_name") .. ". It weight " .. getItemWeight(buy:getDataInt("item_id"), buy:getDataInt("count")) .. " cap oz. and you have only " .. player:getFreeCapacity() .. " oz. free capacity. Put some items to depot and try again.")
buy:free()
return true
end
if(isItemStackable((buy:getDataString("item_id")))) then
player:addItem(buy:getDataString("item_id"), buy:getDataInt("count"))
else
for i = 1, buy:getDataInt("count") do
player:addItem(buy:getDataString("item_id"), 1)
end
end
player:removeMoney(buy:getDataInt("cost"))
db.executeQuery("DELETE FROM `auction_system` WHERE `id` = " .. t[2] .. ";")
player:sendTextMessage(MESSAGE_INFO_DESCR, "You bought " .. buy:getDataInt("count") .. " ".. buy:getDataString("item_name") .. " for " .. buy:getDataInt("cost") .. " gps!")
db.executeQuery("UPDATE `players` SET `auction_balance` = `auction_balance` + " .. buy:getDataInt("cost") .. " WHERE `id` = " .. buy:getDataInt("player") .. ";")
buy:free()
else
player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, "Wrong ID.")
end
end
if(t[1] == "remove") then
if((not tonumber(t[2]))) then
player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, "Wrong ID.")
return true
end
if(config.SendOffersOnlyInPZ) then
if(not getTilePzInfo(creature:getPosition())) then
player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, "You must be in PZ area when you remove offerts from database.")
return true
end
end
local delete = db.getResult("SELECT * FROM `auction_system` WHERE `id` = " .. (tonumber(t[2])) .. ";")
if(delete:getID() ~= -1) then
if(player:getGuid() == delete:getDataInt("player")) then
db.executeQuery("DELETE FROM `auction_system` WHERE `id` = " .. t[2] .. ";")
if(isItemStackable(delete:getDataString("item_id"))) then
player:addItem(delete:getDataString("item_id"), delete:getDataInt("count"))
else
for i = 1, delete:getDataInt("count") do
player:addItem(delete:getDataString("item_id"), 1)
end
end
player:sendTextMessage(MESSAGE_INFO_DESCR, "Your offert has been deleted from offerts database.")
else
player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, "This is not your offert!")
end
delete:free()
else
player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, "Wrong ID.")
end
end
if(t[1] == "withdraw") then
local balance = db.getResult("SELECT `auction_balance` FROM `players` WHERE `id` = " .. player:getGuid() .. ";")
if(balance:getDataInt("auction_balance") < 1) then
player:sendTextMessage(MESSAGE_INFO_DESCR, "You don't have money on your auction balance.")
balance:free()
return true
end
player:sendTextMessage(MESSAGE_INFO_DESCR, "You got " .. balance:getDataInt("auction_balance") .. " gps from auction system!")
player:addMoney(balance:getDataInt("auction_balance"))
db.executeQuery("UPDATE `players` SET `auction_balance` = '0' WHERE `id` = " .. player:getGuid() .. ";")
balance:free()
end
return true
end

 

 

 

Salve Dani :D, e então testei aqui e deu este erro:

post-321783-0-94842300-1454886541_thumb.png

 

ai coloquei o local player = Player(player) e o erro saiu.

Deu erro no getResult, e troquei para o storeQuery, pois o get não existe nesta TFS e foi trocado por store e agora da o seguinte erro:

post-321783-0-21864100-1454886474_thumb.png

Editado por julhinhokullitz
Link para o comentário
https://xtibia.com/forum/topic/239292-adaptar-script-para-tfs-1x-auctions/#findComment-1685199
Compartilhar em outros sites

  • 0

@, saquei... Vc provavelmente pegou esse system de alguma lugar, ne? Manda o link ae.

 

Caso não, manda td q for relacionado a esse system.

 

http://www.xtibia.com/forum/topic/147460-gesior-acc-trade-offline/

 

Ai está Dani, a talk ta logo mais abaixo deste tópico.

Editado por julhinhokullitz
Link para o comentário
https://xtibia.com/forum/topic/239292-adaptar-script-para-tfs-1x-auctions/#findComment-1685202
Compartilhar em outros sites

  • 0

Manda como o script ficou dps das suas modificações.

 

EDIT: e tb manda o arquivo 004-database na pasta lib do seu servidor.

 

Pasta lib não possui o arquivo 004.

Segue:

post-321783-0-80500900-1454892241_thumb.png

 

Link para o comentário
https://xtibia.com/forum/topic/239292-adaptar-script-para-tfs-1x-auctions/#findComment-1685205
Compartilhar em outros sites

  • 0

Hm.... É pq eu to achando q o erro tá em "getRows" (na linha 49: check:getRows) aí eu qria saber se essa função continua assim nessas tfs mais novas... Vc sabe dizer?

Link para o comentário
https://xtibia.com/forum/topic/239292-adaptar-script-para-tfs-1x-auctions/#findComment-1685207
Compartilhar em outros sites

  • 0

Hm.... É pq eu to achando q o erro tá em "getRows" (na linha 49: check:getRows) aí eu qria saber se essa função continua assim nessas tfs mais novas... Vc sabe dizer?

 

Bem Dani, não sei te dizer.

UP

Link para o comentário
https://xtibia.com/forum/topic/239292-adaptar-script-para-tfs-1x-auctions/#findComment-1685209
Compartilhar em outros sites

×
×
  • Criar Novo...