Sistema De Banco

[lykkanworld 0]

Bom dia,

 

 

 

Estou com o seguinte problema, falo o seguinte para o NPC Suzy (Banqueira)

 

- Hi

- Deposit all (Ela pega todo o dinheiro e guarda)

- bye

 

----- O problema é aqui \/ --------

- Hi

- Withdraw all (Ela não tira o dinheiro)

- By

 

 

OBS: Segue abaixo a bank.lua para vocês verem com é que esta, alguem poderia me ajudar?

 

 

-- npc maded by ta4e for tibia 8.31 to 8.42--

local keywordHandler = KeywordHandler:new()

local npcHandler = NpcHandler:new(keywordHandler)

NpcSystem.parseParameters(npcHandler)

local talkState = {}

 

function onCreatureAppear(cid) npcHandler:onCreatureAppear(cid) end

function onCreatureDisappear(cid) npcHandler:onCreatureDisappear(cid) end

function onCreatureSay(cid, type, msg) npcHandler:onCreatureSay(cid, type, msg) end

function onThink() npcHandler:onThink() end

 

function creatureSayCallback(cid, type, msg)

if(not npcHandler:isFocused(cid)) then

return false

end

 

local talkUser = NPCHANDLER_CONVBEHAVIOR == CONVERSATION_DEFAULT and 0 or cid

 

--------------------MESSAGES------------------------------------------------------------------------------

if msgcontains(msg, 'deposit') then

selfSay('Please tell me how much gold it is you would like to deposit.', cid)

talkState[talkUser] = 1

 

elseif msgcontains(msg, 'withdraw') then

selfSay('Please tell me how much gold you would like to withdraw.', cid)

talkState[talkUser] = 3

 

elseif msgcontains(msg, 'transfer') then

selfSay('Please tell me the amount of gold coins you would like to transfer.', cid)

talkState[talkUser] = 5

 

elseif msgcontains(msg, 'change gold') then

selfSay('How many platinum coins do you want to get?', cid)

talkState[talkUser] = 8

 

elseif msgcontains(msg, 'change platinum') then

selfSay('Do you want to change your platinum coins to gold or crystal?', cid)

talkState[talkUser] = 10

 

elseif msgcontains(msg, 'change crystal') then

selfSay('How many crystal coins do you want to change to platinum?', cid)

talkState[talkUser] = 15

 

elseif msgcontains(msg, 'balance') then

n = getPlayerBalance(cid)

selfSay('Your balance are '..n..' golds.', cid)

talkState[talkUser] = 0

 

 

----------------------DEPOSIT-------------------------------------------------------

elseif talkState[talkUser] == 1 then

if msgcontains(msg, 'all') then

n = getPlayerMoney(cid)

selfSay('Do you want deposit '..n..' golds ?', cid)

talkState[talkUser] = 2

else

n = getNumber(msg)

selfSay('Do you want deposit '..n..' golds ?', cid)

talkState[talkUser] = 2

end

 

elseif talkState[talkUser] == 2 then

if msgcontains(msg, 'yes') then

if getPlayerMoney(cid) >= n then

doPlayerDepositMoney(cid,n)

selfSay('Sucessfull. Now your balance account is ' ..getPlayerBalance(cid)..' golds.', cid)

talkState[talkUser] = 0

else

selfSay('You don\'t have money.', cid)

end

else

selfSay('Ok then', cid)

end

 

----------------------WITHDRAW-------------------------------------------------------------------------------------

 

elseif talkState[talkUser] == 3 then

if msgcontains(msg, 'all') then

n = getPlayerBalance(cid)

selfSay('Do you want withdraw '..n..' golds ?', cid)

talkState[talkUser] = 4

else

n = getNumber(msg)

selfSay('Do you want withdraw '..n..' golds ?', cid)

talkState[talkUser] = 4

end

 

elseif talkState[talkUser] == 4 then

if msgcontains(msg, 'yes') then

if getPlayerBalance(cid) >= n then

doPlayerWithdrawMoney(cid, n)

selfSay('Here you are, '..n..' gold. Now your balance account is ' ..getPlayerBalance(cid)..' golds.', cid)

talkState[talkUser] = 0

else

selfSay('There is not enough gold on your account', cid)

end

else

selfSay('Ok then', cid)

end

 

----------------------TRANSFER----------------------------------------------------------------------------------------

 

elseif talkState[talkUser] == 5 then

if msgcontains(msg, 'all') then

n = getPlayerBalance(cid)

selfSay('Who would you like transfer '..n..' gold to?', cid)

talkState[talkUser] = 6

else

n = getNumber(msg)

selfSay('Who would you like transfer '..n..' gold to?', cid)

talkState[talkUser] = 6

end

 

elseif talkState[talkUser] == 6 then

p = msg

selfSay('So you would like to transfer '..n..' gold to '..p..'?', cid)

talkState[talkUser] = 7

 

elseif talkState[talkUser] == 7 then

if msgcontains(msg, 'yes') then

if getPlayerBalance(cid) >= n then

if doPlayerTransferMoneyTo(cid, p, n) == TRUE then

selfSay('You have transferred '..n..' gold to '..p..' and your account balance is '..getPlayerBalance(cid)..' golds.', cid)

talkState[talkUser] = 0

else

selfSay('This player does not exist. Please tell me a valid name!', cid)

talkState[talkUser] = 0

end

else

selfSay('There is not enough gold on your account', cid)

talkState[talkUser] = 0

end

else

selfSay('Ok then', cid)

talkState[talkUser] = 0

end

 

----------------------CHANGE GOLD---------------------------------------------------------------------------------

elseif talkState[talkUser] == 8 then

n = getNumber(msg)

b = n * 100

selfSay('So I should change '..b..' of your gold coins to '..n..' platinum coins for you?', cid)

talkState[talkUser] = 9

 

elseif talkState[talkUser] == 9 then

if msgcontains(msg, 'yes') then

if doPlayerRemoveItem(cid, 2148, b) == TRUE then

doPlayerAddItem(cid, 2152, n)

talkState[talkUser] = 0

else

selfSay('You don\'t have money.', cid)

talkState[talkUser] = 0

end

else

selfSay('Ok. We cancel.', cid)

talkState[talkUser] = 0

end

 

---------------------CHANGE PLATINUM-------------------------------------------------------------------------

elseif talkState[talkUser] == 10 then

if msgcontains(msg, 'gold') then

selfSay('How many platinum coins do you want to change to gold?', cid)

talkState[talkUser] = 11

elseif msgcontains(msg, 'crystal') then

selfSay('How many crystal coins do you want to get?', cid)

talkState[talkUser] = 13

end

 

 

elseif talkState[talkUser] == 11 then

n = getNumber(msg)

b = n * 100

selfSay('So I should change '..n..' of your platinum coins to '..b..' gold coins for you?', cid)

talkState[talkUser] = 12

 

elseif talkState[talkUser] == 12 then

if msgcontains(msg, 'yes') then

if doPlayerRemoveItem(cid, 2152, n) == TRUE then

doPlayerAddItem(cid, 2148, b)

talkState[talkUser] = 0

else

selfSay('You don\'t have money.', cid)

talkState[talkUser] = 0

end

else

selfSay('Ok. We cancel.', cid)

talkState[talkUser] = 0

end

 

elseif talkState[talkUser] == 13 then

n = getNumber(msg)

b = n * 100

selfSay('So I should change '..b..' of your platinum coins to '..n..' crystal coins for you?', cid)

talkState[talkUser] = 14

 

elseif talkState[talkUser] == 14 then

if msgcontains(msg, 'yes') then

if doPlayerRemoveItem(cid, 2152, b) == TRUE then

doPlayerAddItem(cid, 2160, n)

talkState[talkUser] = 0

else

selfSay('You don\'t have money.', cid)

talkState[talkUser] = 0

end

else

selfSay('Ok. We cancel.', cid)

talkState[talkUser] = 0

end

 

---------------------CHANGE CRYSTAL-------------------------------------------------------------------------------

elseif talkState[talkUser] == 15 then

n = getNumber(msg)

b = n * 100

selfSay('So I should change '..n..' of your crystal coins to '..b..' platinum coins for you?', cid)

talkState[talkUser] = 16

 

elseif talkState[talkUser] == 16 then

if msgcontains(msg, 'yes') then

if doPlayerRemoveItem(cid, 2160, n) == TRUE then

doPlayerAddItem(cid, 2152, b)

talkState[talkUser] = 0

else

selfSay('You don\'t have money.', cid)

talkState[talkUser] = 0

end

else

selfSay('Ok. We cancel.', cid)

talkState[talkUser] = 0

end

 

 

end

 

 

end

 

npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback)

npcHandler:addModule(FocusModule:new())

 

 

 

-- function maded by Gesior--

function getNumber(txt) --return number if its number and is > 0, else return 0

x = string.gsub(txt,"%a","")

x = tonumber(x)

if x ~= nill and x > 0 then

return x

else

return 0

end

end