Lua Buy item with lever (ingame)

[Joriku]

Hello,
Anyone here that knows how to make it possible to buy an item by clicking a lever in tfs 1.2?
Example: "Clicking Lever" -> You do not have enough Money to buy this item.
Example 2: Magic Sword, Costs 200Cc. Clicks the lever and the money is gone from bp and the item is in the backpack

 

[Steve Albert]

Pull a lever to buy an item (https://otland.net/threads/pull-a-lever-to-buy-an-item.156994/post-1511319)
Modified for 1.2

local c = {
    ['item'] = 2565,
    ['cost'] = 200 * 10000,
    [1945] = 1946, -- lever
    [1946] = 1945 -- lever
}

function onUse(player, item, fromPosition, itemEx, toPosition)
  local cid = player:getId()
    if doPlayerRemoveMoney(cid, c.cost) then
            doPlayerAddItem(cid, c.item, 1)
            doPlayerSendTextMessage(cid, 25,"You bought an item for ".. c.cost .." gold")
    else
            doPlayerSendCancel(cid, "You do not have enough money!")
    end
  item:transform(c[item.itemid])
    return true
end

function references in compat.lua
otland/forgottenserver (https://github.com/otland/forgottenserver/blob/1.2/data/lib/compat/compat.lua#L369)
otland/forgottenserver (https://github.com/otland/forgottenserver/blob/1.2/data/lib/compat/compat.lua#L379)
otland/forgottenserver (https://github.com/otland/forgottenserver/blob/1.2/data/lib/compat/compat.lua#L399)
otland/forgottenserver (https://github.com/otland/forgottenserver/blob/1.2/data/lib/compat/compat.lua#L405)

 

[Joriku]

Pull a lever to buy an item (https://otland.net/threads/pull-a-lever-to-buy-an-item.156994/post-1511319)
Modified for 1.2

local c = {
    ['item'] = 2565,
    ['cost'] = 200 * 10000,
    [1945] = 1946, -- lever
    [1946] = 1945 -- lever
}

function onUse(player, item, fromPosition, itemEx, toPosition)
  local cid = player:getId()
    if doPlayerRemoveMoney(cid, c.cost) then
            doPlayerAddItem(cid, c.item, 1)
            doPlayerSendTextMessage(cid, 25,"You bought an item for ".. c.cost .." gold")
    else
            doPlayerSendCancel(cid, "You do not have enough money!")
    end
  item:transform(c[item.itemid])
    return true
end

function references in compat.lua
otland/forgottenserver (https://github.com/otland/forgottenserver/blob/1.2/data/lib/compat/compat.lua#L369)
otland/forgottenserver (https://github.com/otland/forgottenserver/blob/1.2/data/lib/compat/compat.lua#L379)
otland/forgottenserver (https://github.com/otland/forgottenserver/blob/1.2/data/lib/compat/compat.lua#L399)
otland/forgottenserver (https://github.com/otland/forgottenserver/blob/1.2/data/lib/compat/compat.lua#L405)

How do i change it so i can use another item as payment instead of Crystal coins?

 

[Steve Albert]

How do i change it so i can use another item as payment instead of Crystal coins?

Check the compat.lua for a function that removes items.

 

[Joriku]

This script does not work as it should, you can buy the item without money.

 

[Joriku]

upppppp any ideas?