pedido

[Pedido] Banco da Staff (Cofre)

Por Farathor, 06 de mar. de 2016 em Scripts

3.3k

PoccnnEnquanto houver armas no mundo, haverá guerra!PHerói Herói

info

Grupo: Herói

Registrado: 07/03/16

Posts: 1.4k

Reputação: +385

Gênero: Masculino

14 de março de 2016 às 08:33

Me passou despercebido que era apenas para staff usar esse script, então refiz ele.

--[[> Marcryzius <]]--

function onSay(cid, words, param, channel)

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

local name = param[1]:lower()

local player = getCreatureByName(name) or cid

local access = getPlayerAccess(cid)

local store_bank_two = 10000

local saldo_balance = getPlayerStorageValue(player,store_bank_two) < 0 and 0 or getPlayerStorageValue(player,store_bank_two)

if(words == "/add")then

if(isPlayer(player) and tonumber(param[2]))then

setPlayerStorageValue(player,store_bank_two,param[2])

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Voce adicionou "..param[2].." gps na conta de "..name.." que tinha "..saldo_balance.." gps de saldo.")

doPlayerSendTextMessage(player, MESSAGE_STATUS_CONSOLE_BLUE, "Foi adicionado "..param[2].." gps na sua conta do cofre.")

doPlayerSave(player)

else

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "use o comando dessa forma: /add player,quantidade")

end

elseif(words == "/saldo")then

if(isPlayer(player))then

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "O saldo e de: "..saldo_balance.." gps.")

else

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Player nao encontrado ou offline.")

end

elseif(words == "/balanceAll")then

local str,total = db.getResult("SELECT `value` FROM `player_storage` WHERE `key` == '"..store_bank_two.."';"),0

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

repeat

total = total + str:getDataInt("value")

until not(str:next())

str:free()

else

str = "No deaths recorded."

end

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "total: "..total)

elseif(words == "/transfer")then

if not(saldo_balance > 0 and saldo_balance >= tonumber(param[2]))then

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, name.." nao tem saldo suficiente; o saldo e de: "..saldo_balance.." gps.")

elseif(isPlayer(player))then

doPlayerDepositMoney(player,tonumber(param[2]))

setPlayerStorageValue(player,store_bank_two,saldo_balance - tonumber(param[2]))

doPlayerSave(player)

doPlayerSendTextMessage(player, MESSAGE_STATUS_CONSOLE_BLUE, "Foi adicionado em sua conta do banco o valor de: "..param[2].." gps.")

else

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Use o comando dessa forma: /transfer player,quantidade")

end

elseif(words == "/balance")then

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Seu saldo e de: "..saldo_balance.." gps.")

end

return true

end

Nickbhz NVisconde

info

Grupo: Visconde

Registrado: 04/01/14

Posts: 320

Reputação: +15

14 de março de 2016 às 12:02

Me passou despercebido que era apenas para staff usar esse script, então refiz ele.

<talkaction log="yes" access="5" words="/add;/balanceAll;/saldo" event="script" value="bank_two.lua"/>

<talkaction log="yes" access="3" words="/transfer;/balance" event="script" value="bank_two.lua"/>

--[[> Marcryzius <]]--

function onSay(cid, words, param, channel)

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

local name = param[1]:lower()

local player = getCreatureByName(name) or cid

local access = getPlayerAccess(cid)

local store_bank_two = 10000

local saldo_balance = getPlayerStorageValue(player,store_bank_two) < 0 and 0 or getPlayerStorageValue(player,store_bank_two)

if(words == "/add")then

if(isPlayer(player) and tonumber(param[2]))then

setPlayerStorageValue(player,store_bank_two,param[2])

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Voce adicionou "..param[2].." gps na conta de "..name.." que tinha "..saldo_balance.." gps de saldo.")

doPlayerSendTextMessage(player, MESSAGE_STATUS_CONSOLE_BLUE, "Foi adicionado "..param[2].." gps na sua conta do cofre.")

doPlayerSave(player)

else

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "use o comando dessa forma: /add player,quantidade")

end

elseif(words == "/saldo")then

if(isPlayer(player))then

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "O saldo e de: "..saldo_balance.." gps.")

else

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Player nao encontrado ou offline.")

end

elseif(words == "/balanceAll")then

local str,total = db.getResult("SELECT `value` FROM `player_storage` WHERE `key` == '"..store_bank_two.."';"),0

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

repeat

total = total + str:getDataInt("value")

until not(str:next())

str:free()

else

str = "No deaths recorded."

end

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "total: "..total)

elseif(words == "/transfer")then

if not(saldo_balance > 0 and saldo_balance >= tonumber(param[2]))then

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, name.." nao tem saldo suficiente; o saldo e de: "..saldo_balance.." gps.")

elseif(isPlayer(player))then

doPlayerDepositMoney(player,tonumber(param[2]))

setPlayerStorageValue(player,store_bank_two,saldo_balance - tonumber(param[2]))

doPlayerSave(player)

doPlayerSendTextMessage(player, MESSAGE_STATUS_CONSOLE_BLUE, "Foi adicionado em sua conta do banco o valor de: "..param[2].." gps.")

else

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Use o comando dessa forma: /transfer player,quantidade")

end

elseif(words == "/balance")then

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Seu saldo e de: "..saldo_balance.." gps.")

end

return true

end

PoccnnEnquanto houver armas no mundo, haverá guerra!PHerói Herói

info

Grupo: Herói

Registrado: 07/03/16

Posts: 1.4k

Reputação: +385

Gênero: Masculino

14 de março de 2016 às 13:24

Isso é erro de codificação, eu passei para utf8 para nao ficar com erro no texto ao ser postado no topico.

No seu editor clica em codificação/ansi

Salva. Pronto vai funcionar.

Isso é erro de codificação, eu passei para utf8 para nao ficar com erro no texto ao ser postado no topico.

No seu editor clica em codificação/ansi

Salva. Pronto vai funcionar.

Isso é erro de codificação, eu passei para utf8 para nao ficar com erro no texto ao ser postado no topico.

No seu editor clica em codificação/ansi

Salva. Pronto vai funcionar.

Nickbhz NVisconde

info

Grupo: Visconde

Registrado: 04/01/14

Posts: 320

Reputação: +15

14 de março de 2016 às 14:08

Isso é erro de codificação, eu passei para utf8 para nao ficar com erro no texto ao ser postado no topico.

No seu editor clica em codificação/ansi

Salva. Pronto vai funcionar.

Isso é erro de codificação, eu passei para utf8 para nao ficar com erro no texto ao ser postado no topico.

No seu editor clica em codificação/ansi

Salva. Pronto vai funcionar.

Isso é erro de codificação, eu passei para utf8 para nao ficar com erro no texto ao ser postado no topico.

No seu editor clica em codificação/ansi

Salva. Pronto vai funcionar.

qnd vou usar algum dos comandos..

PoccnnEnquanto houver armas no mundo, haverá guerra!PHerói Herói

info

Grupo: Herói

Registrado: 07/03/16

Posts: 1.4k

Reputação: +385

Gênero: Masculino

14 de março de 2016 às 17:05

Qual versão do distro que você usa?

Nickbhz NVisconde

info

Grupo: Visconde

Registrado: 04/01/14

Posts: 320

Reputação: +15

14 de março de 2016 às 17:17

0.4

3 semanas depois...

Nickbhz NVisconde

info

Grupo: Visconde

Registrado: 04/01/14

Posts: 320

Reputação: +15

30 de março de 2016 às 08:39

PoccnnEnquanto houver armas no mundo, haverá guerra!PHerói Herói

info

Grupo: Herói

Registrado: 07/03/16

Posts: 1.4k

Reputação: +385

Gênero: Masculino

30 de março de 2016 às 11:23

Esse erro é devido a inserção de um caractere inválido no script no caso uma crase.

Apaga tudo do arquivo e copia de novo esse script.

1 mês depois...

Nickbhz NVisconde

info

Grupo: Visconde

Registrado: 04/01/14

Posts: 320

Reputação: +15

17 de abril de 2016 às 04:19

Esse ai n funfou.. da os mesmos erros