ComputerCraft EnderPay Item Shop 1.12.2

--# Kreezxil's EnderPay Shop
--# based on the following
--# pastebin:
--# Wojbie's Xp Shoppe
--# Uses touchpoint api
--# http://pastebin.com/cRTsaYaK

--# Uncomment next line to remove Op message spam
--commands.exec("gamerule commandBlockOutput false")

local Shop={}

--# table.insert(Shop,{["name"]="Stone Brick",["price"]=1,["item"]="minecraft:stonebrick 64"})
--# table.insert(Shop,{["name"]="Tin Gear",["price"]=5,["item"]="Railcraft:part.gear 1 3",}) --3 is damage value for basic tin gear

table.insert(Shop,{["name"]="Diamond", ["price"]=100,["item"]="minecraft:diamond 1"})


--# Default shop zone to CommandComputer coords
local range = 5

--# Load touchpoint api
if not fs.exists("/touchpoint") then shell.run("pastebin get pFHeia96 /touchpoint") end
os.loadAPI("touchpoint")

--# Assuming that monitor is on top of commandComputer
local t = touchpoint.new("top")

--# Commands Backup
--# give @p[lm=10,x=-532,y=69,z=1084,r=3] Railcraft:part.gear 1 3
--# xp -10L @p[lm=10,x=-532,y=69,z=1084,r=3]

local jump=false

print("Adding "..#Shop.." Items to shop")

for i,k in pairs(Shop) do
    local name = k.name.." = "..k.price.."L"
    print(name)

    t:add(name, function()
        --wiadomosc nie masz xp
        commands.exec("tellraw @p[l="..(k.price-1)..",r="..range.."] "..'["",{"text":"You don\'t have enough credits for '..k.name..'","color":"red"}]')
        commands.exec("playsound minecraft:entity.villager.no player @p[l="..(k.price-1)..",r="..range.."]")
        --wiadomosc masz xp
        commands.exec("tellraw @p[lm="..k.price..",r="..range.."] "..'["",{"text":"Sold '..k.name.." for "..k.price..' lvl","color":"green"}]')
        commands.exec("playsound minecraft:entity.villager.yes player @p[lm="..k.price..",r="..range.."]")
        commands.exec("give @p[lm="..k.price..",r="..range.."] "..k.item)
        commands.exec("wallet take @p[lm='..k.price..',r='..range..'] '..k.price..' ")
        t:flash(name)
    end , 3+25*(jump and 1 or 0), 2+2*math.floor((i-1)/2), 23+24*(jump and 1 or 0),2+2*math.floor((i-1)/2), colors.red, colors.lime)

    jump=not jump
end

t:run()