• TibiaFace

    Tibiaface | Una comunidad Open Tibia donde encontras : mapas, scripts, Otserver, npc y amigos etc ...

    .
    demo menumenu

    Afiliados



    Votar:

    [Sistema] Private Shop System( Tu player Npc y Vende Item) (OTX Y TFS 0.3.7)

    Compartir:

    Ir a la página : 1, 2  Siguiente

    Ver el tema anterior Ver el tema siguiente Ir abajo  Mensaje (Página 1 de 2.)

    [Admin] God Maya

    [Admin] God Maya
    Administrador
    Administrador
    Hola usuarios de tibiaface



    Bueno este es un mod mesclado con systema lo que hace es al ejecutar un comando podras cargar a una tienda virtual personalizada tu items y podras venderlo con tu personaje claro que tambien para activar la modalidad de que tu player pueda vender los item como un npc hay que ejecutar otro comando todo es practicamente sencillo de instalar yo le fasilitare todos los archivos en comprimido con carpetadas y todo donde tendran que ser colocado

    link del sistema:

    [Tienes que estar registrado y conectado para ver este vínculo]

    dentro del comprimido el archivo PrivateShopInstall.lua va junto a la config.lua

    dentro de contenido PrivateShopInstall.lua dice false lo cambian por True

    Lo de arriba es el sistema bueno ahora hay que ejecutar unas tablas mysql en nuestro phpadmin de nuestra base de datos.

    Código:
    ALTER TABLE `players` ADD COLUMN `shopitens` VARCHAR( 255 )  NOT NULL DEFAULT '''{}''';

    Código:
    ALTER TABLE `players` ADD COLUMN `shoplucro` VARCHAR( 255 )  NOT NULL DEFAULT '''{}''';

    aqui le deja tambien la base de datos mysql ya con las tablas instaladas y algo mas mejor aun esta base de mysql le permite usar el account manger osea ingresar con la cuenta 1/1 y crear el personaje osea una mescla de account manager con mysql bueno aqui le dejo:

    link:
    [Tienes que estar registrado y conectado para ver este vínculo]

    IMAGENES

    [Sistema] Private Shop System( Tu player Npc y Vende Item) (OTX Y TFS 0.3.7) Captur18

    [Sistema] Private Shop System( Tu player Npc y Vende Item) (OTX Y TFS 0.3.7) Captur17

    y eso es todo

    creditos: God maya por desifrar la instalacion

    y creditor al creador MaXwEllDeN



    [Sistema] Private Shop System( Tu player Npc y Vende Item) (OTX Y TFS 0.3.7) YNU5B25
    4 participantes
    https://www.tibiaface.com

    TheFlariuz

    TheFlariuz
    Miembro
    Miembro
    no me manta error en la consola pero al momento de usar el comando !pvshop help o list me da debug

    4 participantes

    [Admin] God Maya

    [Admin] God Maya
    Administrador
    Administrador
    [Tienes que estar registrado y conectado para ver este vínculo] escribió:no me manta error en la consola pero al momento de usar el comando !pvshop help o list me da debug

    has ejecutado en tu mysql las tablas de otra forma podria darte bug

    el servidor donde fue testeado este sistema fue otx 2.x.s.3



    [Sistema] Private Shop System( Tu player Npc y Vende Item) (OTX Y TFS 0.3.7) YNU5B25
    4 participantes
    https://www.tibiaface.com

    TheFlariuz

    TheFlariuz
    Miembro
    Miembro
    si las tengo

    4 participantes

    [Admin] God Maya

    [Admin] God Maya
    Administrador
    Administrador
    [Tienes que estar registrado y conectado para ver este vínculo] escribió:si las tengo

    tiene problema con el tipo de mensaje del talkactions eso puede estar causandote el bug que no soporte la vesion de consola



    [Sistema] Private Shop System( Tu player Npc y Vende Item) (OTX Y TFS 0.3.7) YNU5B25
    4 participantes
    https://www.tibiaface.com

    TheFlariuz

    TheFlariuz
    Miembro
    Miembro
    uso tfs 0.3.7 protocolo 8.6

    4 participantes

    [Admin] God Maya

    [Admin] God Maya
    Administrador
    Administrador
    [Tienes que estar registrado y conectado para ver este vínculo] escribió:uso tfs 0.3.7 protocolo 8.6

    bueno comapre funciones revise talkaction y verifique que es lo que esta mal en sus funcion con la del sistema en talkactions



    [Sistema] Private Shop System( Tu player Npc y Vende Item) (OTX Y TFS 0.3.7) YNU5B25
    4 participantes
    https://www.tibiaface.com

    admbaiakme

    admbaiakme
    Nuevo Miembro
    Nuevo Miembro
    uso tfs 0.4 protocolo 8.6 modifica ?

    4 participantes

    [Admin] God Maya

    [Admin] God Maya
    Administrador
    Administrador
    [Tienes que estar registrado y conectado para ver este vínculo] escribió:uso tfs 0.4 protocolo 8.6 modifica ?

    es ttalmente compatible



    [Sistema] Private Shop System( Tu player Npc y Vende Item) (OTX Y TFS 0.3.7) YNU5B25
    4 participantes
    https://www.tibiaface.com

    admbaiakme

    admbaiakme
    Nuevo Miembro
    Nuevo Miembro
    pero no puedo instalar nada No sé cómo colocar los archivos en su lugar

    4 participantes

    [Admin] God Maya

    [Admin] God Maya
    Administrador
    Administrador
    [Tienes que estar registrado y conectado para ver este vínculo] escribió:pero no puedo instalar nada No sé cómo colocar los archivos en su lugar

    los archivos dentro del comprimido estan con muestras de la carpetas donde tiene que eir el archivo



    [Sistema] Private Shop System( Tu player Npc y Vende Item) (OTX Y TFS 0.3.7) YNU5B25
    4 participantes
    https://www.tibiaface.com

    admbaiakme

    admbaiakme
    Nuevo Miembro
    Nuevo Miembro
    póngalo sin embargo cuando uso el comando!pvpshop simplemente no pasa nada, solo diga la frase en amarillo, no el error en nada ni en la consola....

    4 participantes

    [Admin] God Maya

    [Admin] God Maya
    Administrador
    Administrador
    [Tienes que estar registrado y conectado para ver este vínculo] escribió:póngalo sin embargo cuando uso el comando!pvpshop simplemente no pasa nada, solo diga la frase en amarillo, no el error en nada ni en la consola....

    estoy en el chat hableme por ahi



    [Sistema] Private Shop System( Tu player Npc y Vende Item) (OTX Y TFS 0.3.7) YNU5B25
    4 participantes
    https://www.tibiaface.com

    Nemesis811

    Nemesis811
    Miembro
    Miembro
    tengo una duda como pones alli la lua del npc shop tengo que crerarle un xml a ese npc shop??

    4 participantes

    [Admin] God Maya

    [Admin] God Maya
    Administrador
    Administrador
    [Tienes que estar registrado y conectado para ver este vínculo] escribió:tengo una duda como pones alli la lua del npc shop tengo que crerarle un xml a ese npc shop??


    todo esta ordenado en el comprimido



    [Sistema] Private Shop System( Tu player Npc y Vende Item) (OTX Y TFS 0.3.7) YNU5B25
    4 participantes
    https://www.tibiaface.com

    Nemesis811

    Nemesis811
    Miembro
    Miembro
    [Sistema] Private Shop System( Tu player Npc y Vende Item) (OTX Y TFS 0.3.7) Error_10

    4 participantes

    Nemesis811

    Nemesis811
    Miembro
    Miembro
    ese error que sale en la consola al adaptar items por que¿?



    !pvshop help si me funciona pero le doy list o add y me sale ese error en la consola que ya le mande

    4 participantes

    [Admin] God Maya

    [Admin] God Maya
    Administrador
    Administrador
    [Tienes que estar registrado y conectado para ver este vínculo] escribió:ese error que sale en la consola al adaptar items por que¿?



    !pvshop help si me funciona pero le doy list o add y me sale ese error en la consola que ya le mande

    pairs es el que te causando problema quisas en su distribucions sea pair



    [Sistema] Private Shop System( Tu player Npc y Vende Item) (OTX Y TFS 0.3.7) YNU5B25
    4 participantes
    https://www.tibiaface.com

    Nemesis811

    Nemesis811
    Miembro
    Miembro
    [Tienes que estar registrado y conectado para ver este vínculo] escribió:
    [Tienes que estar registrado y conectado para ver este vínculo] escribió:ese error que sale en la consola al adaptar items por que¿?



    !pvshop help si me funciona pero le doy list o add y me sale ese error en la consola que ya le mande

    pairs es el que te causando problema quisas en su distribucions sea pair

    ok ¿y que podría hacer en ese caso maya??? como reparo eso? ¿o no hay solucion a eso???

    4 participantes

    [Admin] God Maya

    [Admin] God Maya
    Administrador
    Administrador
    [Tienes que estar registrado y conectado para ver este vínculo] escribió:
    [Tienes que estar registrado y conectado para ver este vínculo] escribió:
    [Tienes que estar registrado y conectado para ver este vínculo] escribió:ese error que sale en la consola al adaptar items por que¿?



    !pvshop help si me funciona pero le doy list o add y me sale ese error en la consola que ya le mande

    pairs es el que te causando problema quisas en su distribucions sea pair

    ok ¿y que podría hacer en ese caso maya??? como reparo eso? ¿o no hay solucion a eso???

    si lo pudieras publicar el talkactions porfavor para ver que consulta en esa linea



    [Sistema] Private Shop System( Tu player Npc y Vende Item) (OTX Y TFS 0.3.7) YNU5B25
    4 participantes
    https://www.tibiaface.com

    21default alli esta Mar Jun 22, 2021 8:28 pm

    Nemesis811

    Nemesis811
    Miembro
    Miembro
    Código:
    -- ########################################################
    -- #####        Name: Private Shop System             #####
    -- #####        Version: 2.0                          #####
    -- ########################################################
    -- #####  Developed by Maxwell Alcantara[MaXwEllDeN]  #####
    -- #####  Contact: [Tienes que estar registrado y conectado para ver este vínculo]               #####
    -- #####           [Tienes que estar registrado y conectado para ver este vínculo]             #####
    -- ########################################################

    local function tabletama(tb)
     local tam = 0

     for i, v in pairs(tb) do
     tam = tam + 1
     end

     return tam
    end

    local funcs = {"on", "off", "add", "remove", "list", "help", "list"}

    function onSay(cid, words, param)

     local param = param:lower()
     local params = string.explode(param, ",")
     local param = params[1]

     local configs = _PV_SHOP_CONFIG

     if (configs.premmy) and not(isPremium(cid)) then
     return doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "You must have a premium account to use this system.")
     end

     if (getPlayerLevel(cid) < configs.level) then
     return doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "You must be at least level " .. configs.level .. " to use this system.")
     end

     if not(isInArray(funcs, param)) then
     return doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "You typed a invalid option, to see help window type ".. words .. " help.")
     end

     if (param == "on") then
     if (getCreatureCondition(cid, CONDITION_INFIGHT)) then
     return doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "You can't activate the system with your pz locked.")
     end

     local pos = getThingPos(cid)
     local pos1 = {x = pos.x-5, y = pos.y-5, z = pos.z}
     local pos2 = {x = pos.x+5, y = pos.y+5, z = pos.z}
     local uids = getUidsInArea(pos1, pos2)

     for _, b in pairs(uids) do
     if (not(isPlayer(b)) and not (isMonster(b))) then
     return doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "You're near a npc.")
     end
     end

     local pikznelis = 0
     for _, a in pairs(getPlayerShopItens(getPlayerGUIDByName(getCreatureName(cid)))) do
     pikznelis = 1
     break
     end

     if (pikznelis == 0) then
     return doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "You must add a item to your shop before ative it.")
     end

     setPlayerStorageValue(cid, 75431, 1)
     addEvent(doRemoveCreature, 1, cid)
     elseif (param == "add") then

     if not(params[4]) then
     return doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "You typed a invalid option, to see help window type ".. words .. " help.")
     end
     
     local item
     if type(errors) == "function" then
     errors(false)
     item = getItemIdByName(params[2])
     errors(true)
     else
     item = getItemIdByName(params[2], false)
     end
     
     if not (item) then
     return doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, params[2] .." isn't a valid item.")
     end

     if (tabletama(getPlayerShopItens(getPlayerGUIDByName(getCreatureName(cid)))) >= configs.maxitens) then
     return doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "You can't have more than ".. configs.maxitens.." types of items in your Private Shop.")
     end

     if (isInArray(configs.notadd, item)) then
     return doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "You can't add " .. params[2] .. " to Private Shop.")
     end

     if not(tonumber(params[3])) or (tonumber(params[3]) < 1) then
     return doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, params[3] .. " isn't a valid quanty.")
     end

     if (getPlayerItemCount(cid, item) < tonumber(params[3])) then
     return doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "You haven't ".. params[3] .." " .. params[2] .."(s).")
     end

     doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "You added with successful ".. params[3] .. " ".. params[2] .."(s) to your Private Shop.")
     doAddItemForPlayerShop(getPlayerGUIDByName(getCreatureName(cid)), item, params[3], params[4])
     doPlayerRemoveItem(cid, item, tonumber(params[3]))
     elseif (param == "list") then
     local itens = getPlayerShopItens(getPlayerGUIDByName(getCreatureName(cid)))
     local msgiteins = "Items in your Private Shop:\n"

     for a, b in pairs(itens) do
     msgiteins = msgiteins .. "\n".. b[1] .. " " .. getItemNameById(a) .. getPrefix(b[1]) .. " - ".. b[2] .. " Gold Coins"
     end

     local msgiteins = msgiteins .. "\nX-X-X-X-X-X-X-X-X-X-X-X-X"
     doShowTextDialog(cid, 2160, msgiteins)
     elseif (param == "remove") then
     if not(params[3]) then
     return doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "You typed a invalid option, to see help window type ".. words .. " help.")
     end

     if not(tonumber(params[3])) or (tonumber(params[3]) < 1) then
     return doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, params[3] .. " isn't a valid quanty.")
     end

     local item = getItemIdByName(params[2])
     if not (item) then
     return doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, params[2] .." isn't a item.")
     end

     local shopt = getPlayerShopItens(getPlayerGUIDByName(getCreatureName(cid)))
     if not(shopt[item]) or (tonumber(shopt[item][1]) < tonumber(params[3])) then
     return doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "You haven't ".. params[3] .." " .. params[2] .."(s) in Private Shop.")
     end

     doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "You removed with successful ".. params[3] .. " ".. params[2] .."(s) from your Private Shop.")
     doRemoveItemFromPlayerShop(getPlayerGUIDByName(getCreatureName(cid)), item, params[3])
     doPlayerAddItem(cid, item, tonumber(params[3]))
     elseif (param == "help") then
     local msg = "Private Shop System Help: \n \n * add - is used to add a item to your Private Shop. \n"
     local msg = msg .."     Usage Example: " .. words .. " add, item, quanty, price by unit"
     local msg = msg .."\n" .. words .. " add, demon armor, 1, 60000\n"
     local msg = msg .."\n * remove - is used to remove a item from your Private Shop. \n"
     local msg = msg .."     Usage Example: " .. words .. " remove, item, quanty"
     local msg = msg .."\n" .. words .. " remove, demon armor, 5\n"
     local msg = msg .."\n * on - is used to active your Private Shop\n"
     local msg = msg .. "\n * list - displays in screen a window containing all items that you have in your Private Shop."
     doShowTextDialog(cid, 2160, msg)
       end

       return true
    end

    4 participantes

    [Admin] God Maya

    [Admin] God Maya
    Administrador
    Administrador
    [Tienes que estar registrado y conectado para ver este vínculo] escribió:
    Código:
    -- ########################################################
    -- #####        Name: Private Shop System             #####
    -- #####        Version: 2.0                          #####
    -- ########################################################
    -- #####  Developed by Maxwell Alcantara[MaXwEllDeN]  #####
    -- #####  Contact: [Tienes que estar registrado y conectado para ver este vínculo]               #####
    -- #####           [Tienes que estar registrado y conectado para ver este vínculo]             #####
    -- ########################################################

    local function tabletama(tb)
     local tam = 0

     for i, v in pairs(tb) do
     tam = tam + 1
     end

     return tam
    end

    local funcs = {"on", "off", "add", "remove", "list", "help", "list"}

    function onSay(cid, words, param)

     local param = param:lower()
     local params = string.explode(param, ",")
     local param = params[1]

     local configs = _PV_SHOP_CONFIG

     if (configs.premmy) and not(isPremium(cid)) then
     return doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "You must have a premium account to use this system.")
     end

     if (getPlayerLevel(cid) < configs.level) then
     return doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "You must be at least level " .. configs.level .. " to use this system.")
     end

     if not(isInArray(funcs, param)) then
     return doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "You typed a invalid option, to see help window type ".. words .. " help.")
     end

     if (param == "on") then
     if (getCreatureCondition(cid, CONDITION_INFIGHT)) then
     return doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "You can't activate the system with your pz locked.")
     end

     local pos = getThingPos(cid)
     local pos1 = {x = pos.x-5, y = pos.y-5, z = pos.z}
     local pos2 = {x = pos.x+5, y = pos.y+5, z = pos.z}
     local uids = getUidsInArea(pos1, pos2)

     for _, b in pairs(uids) do
     if (not(isPlayer(b)) and not (isMonster(b))) then
     return doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "You're near a npc.")
     end
     end

     local pikznelis = 0
     for _, a in pairs(getPlayerShopItens(getPlayerGUIDByName(getCreatureName(cid)))) do
     pikznelis = 1
     break
     end

     if (pikznelis == 0) then
     return doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "You must add a item to your shop before ative it.")
     end

     setPlayerStorageValue(cid, 75431, 1)
     addEvent(doRemoveCreature, 1, cid)
     elseif (param == "add") then

     if not(params[4]) then
     return doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "You typed a invalid option, to see help window type ".. words .. " help.")
     end
     
     local item
     if type(errors) == "function" then
     errors(false)
     item = getItemIdByName(params[2])
     errors(true)
     else
     item = getItemIdByName(params[2], false)
     end
     
     if not (item) then
     return doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, params[2] .." isn't a valid item.")
     end

     if (tabletama(getPlayerShopItens(getPlayerGUIDByName(getCreatureName(cid)))) >= configs.maxitens) then
     return doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "You can't have more than ".. configs.maxitens.." types of items in your Private Shop.")
     end

     if (isInArray(configs.notadd, item)) then
     return doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "You can't add " .. params[2] .. " to Private Shop.")
     end

     if not(tonumber(params[3])) or (tonumber(params[3]) < 1) then
     return doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, params[3] .. " isn't a valid quanty.")
     end

     if (getPlayerItemCount(cid, item) < tonumber(params[3])) then
     return doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "You haven't ".. params[3] .." " .. params[2] .."(s).")
     end

     doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "You added with successful ".. params[3] .. " ".. params[2] .."(s) to your Private Shop.")
     doAddItemForPlayerShop(getPlayerGUIDByName(getCreatureName(cid)), item, params[3], params[4])
     doPlayerRemoveItem(cid, item, tonumber(params[3]))
     elseif (param == "list") then
     local itens = getPlayerShopItens(getPlayerGUIDByName(getCreatureName(cid)))
     local msgiteins = "Items in your Private Shop:\n"

     for a, b in pairs(itens) do
     msgiteins = msgiteins .. "\n".. b[1] .. " " .. getItemNameById(a) .. getPrefix(b[1]) .. " - ".. b[2] .. " Gold Coins"
     end

     local msgiteins = msgiteins .. "\nX-X-X-X-X-X-X-X-X-X-X-X-X"
     doShowTextDialog(cid, 2160, msgiteins)
     elseif (param == "remove") then
     if not(params[3]) then
     return doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "You typed a invalid option, to see help window type ".. words .. " help.")
     end

     if not(tonumber(params[3])) or (tonumber(params[3]) < 1) then
     return doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, params[3] .. " isn't a valid quanty.")
     end

     local item = getItemIdByName(params[2])
     if not (item) then
     return doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, params[2] .." isn't a item.")
     end

     local shopt = getPlayerShopItens(getPlayerGUIDByName(getCreatureName(cid)))
     if not(shopt[item]) or (tonumber(shopt[item][1]) < tonumber(params[3])) then
     return doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "You haven't ".. params[3] .." " .. params[2] .."(s) in Private Shop.")
     end

     doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "You removed with successful ".. params[3] .. " ".. params[2] .."(s) from your Private Shop.")
     doRemoveItemFromPlayerShop(getPlayerGUIDByName(getCreatureName(cid)), item, params[3])
     doPlayerAddItem(cid, item, tonumber(params[3]))
     elseif (param == "help") then
     local msg = "Private Shop System Help: \n \n * add - is used to add a item to your Private Shop. \n"
     local msg = msg .."     Usage Example: " .. words .. " add, item, quanty, price by unit"
     local msg = msg .."\n" .. words .. " add, demon armor, 1, 60000\n"
     local msg = msg .."\n * remove - is used to remove a item from your Private Shop. \n"
     local msg = msg .."     Usage Example: " .. words .. " remove, item, quanty"
     local msg = msg .."\n" .. words .. " remove, demon armor, 5\n"
     local msg = msg .."\n * on - is used to active your Private Shop\n"
     local msg = msg .. "\n * list - displays in screen a window containing all items that you have in your Private Shop."
     doShowTextDialog(cid, 2160, msg)
       end

       return true
    end

    pruebe con este comando a ver que sucede

    Código:


    -- ########################################################
    -- #####        Name: Private Shop System            #####
    -- #####        Version: 2.0                          #####
    -- ########################################################
    -- #####  Developed by Maxwell Alcantara[MaXwEllDeN]  #####
    -- #####  Contact: [Tienes que estar registrado y conectado para ver este vínculo]              #####
    -- #####          [Tienes que estar registrado y conectado para ver este vínculo]            #####
    -- ########################################################

    local function tabletama(tb)
     local tam = 0

     for i, v in ipairs(tb) do
     tam = tam + 1
     end

     return tam
    end

    local funcs = {"on", "off", "add", "remove", "list", "help", "list"}

    function onSay(cid, words, param)

     local param = param:lower()
     local params = string.explode(param, ",")
     local param = params[1]

     local configs = _PV_SHOP_CONFIG

     if (configs.premmy) and not(isPremium(cid)) then
     return doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "You must have a premium account to use this system.")
     end

     if (getPlayerLevel(cid) < configs.level) then
     return doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "You must be at least level " .. configs.level .. " to use this system.")
     end

     if not(isInArray(funcs, param)) then
     return doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "You typed a invalid option, to see help window type ".. words .. " help.")
     end

     if (param == "on") then
     if (getCreatureCondition(cid, CONDITION_INFIGHT)) then
     return doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "You can't activate the system with your pz locked.")
     end

     local pos = getThingPos(cid)
     local pos1 = {x = pos.x-5, y = pos.y-5, z = pos.z}
     local pos2 = {x = pos.x+5, y = pos.y+5, z = pos.z}
     local uids = getUidsInArea(pos1, pos2)

     for _, b in pairs(uids) do
     if (not(isPlayer(b)) and not (isMonster(b))) then
     return doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "You're near a npc.")
     end
     end

     local pikznelis = 0
     for _, a in pairs(getPlayerShopItens(getPlayerGUIDByName(getCreatureName(cid)))) do
     pikznelis = 1
     break
     end

     if (pikznelis == 0) then
     return doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "You must add a item to your shop before ative it.")
     end

     setPlayerStorageValue(cid, 75431, 1)
     addEvent(doRemoveCreature, 1, cid)
     elseif (param == "add") then

     if not(params[4]) then
     return doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "You typed a invalid option, to see help window type ".. words .. " help.")
     end
     
     local item
     if type(errors) == "function" then
     errors(false)
     item = getItemIdByName(params[2])
     errors(true)
     else
     item = getItemIdByName(params[2], false)
     end
     
     if not (item) then
     return doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, params[2] .." isn't a valid item.")
     end

     if (tabletama(getPlayerShopItens(getPlayerGUIDByName(getCreatureName(cid)))) >= configs.maxitens) then
     return doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "You can't have more than ".. configs.maxitens.." types of items in your Private Shop.")
     end

     if (isInArray(configs.notadd, item)) then
     return doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "You can't add " .. params[2] .. " to Private Shop.")
     end

     if not(tonumber(params[3])) or (tonumber(params[3]) < 1) then
     return doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, params[3] .. " isn't a valid quanty.")
     end

     if (getPlayerItemCount(cid, item) < tonumber(params[3])) then
     return doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "You haven't ".. params[3] .." " .. params[2] .."(s).")
     end

     doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "You added with successful ".. params[3] .. " ".. params[2] .."(s) to your Private Shop.")
     doAddItemForPlayerShop(getPlayerGUIDByName(getCreatureName(cid)), item, params[3], params[4])
     doPlayerRemoveItem(cid, item, tonumber(params[3]))
     elseif (param == "list") then
     local itens = getPlayerShopItens(getPlayerGUIDByName(getCreatureName(cid)))
     local msgiteins = "Items in your Private Shop:\n"

     for a, b in pairs(itens) do
     msgiteins = msgiteins .. "\n".. b[1] .. " " .. getItemNameById(a) .. getPrefix(b[1]) .. " - ".. b[2] .. " Gold Coins"
     end

     local msgiteins = msgiteins .. "\nX-X-X-X-X-X-X-X-X-X-X-X-X"
     doShowTextDialog(cid, 2160, msgiteins)
     elseif (param == "remove") then
     if not(params[3]) then
     return doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "You typed a invalid option, to see help window type ".. words .. " help.")
     end

     if not(tonumber(params[3])) or (tonumber(params[3]) < 1) then
     return doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, params[3] .. " isn't a valid quanty.")
     end

     local item = getItemIdByName(params[2])
     if not (item) then
     return doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, params[2] .." isn't a item.")
     end

     local shopt = getPlayerShopItens(getPlayerGUIDByName(getCreatureName(cid)))
     if not(shopt[item]) or (tonumber(shopt[item][1]) < tonumber(params[3])) then
     return doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "You haven't ".. params[3] .." " .. params[2] .."(s) in Private Shop.")
     end

     doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "You removed with successful ".. params[3] .. " ".. params[2] .."(s) from your Private Shop.")
     doRemoveItemFromPlayerShop(getPlayerGUIDByName(getCreatureName(cid)), item, params[3])
     doPlayerAddItem(cid, item, tonumber(params[3]))
     elseif (param == "help") then
     local msg = "Private Shop System Help: \n \n * add - is used to add a item to your Private Shop. \n"
     local msg = msg .."    Usage Example: " .. words .. " add, item, quanty, price by unit"
     local msg = msg .."\n" .. words .. " add, demon armor, 1, 60000\n"
     local msg = msg .."\n * remove - is used to remove a item from your Private Shop. \n"
     local msg = msg .."    Usage Example: " .. words .. " remove, item, quanty"
     local msg = msg .."\n" .. words .. " remove, demon armor, 5\n"
     local msg = msg .."\n * on - is used to active your Private Shop\n"
     local msg = msg .. "\n * list - displays in screen a window containing all items that you have in your Private Shop."
     doShowTextDialog(cid, 2160, msg)
      end

      return true
    end



    [Sistema] Private Shop System( Tu player Npc y Vende Item) (OTX Y TFS 0.3.7) YNU5B25
    4 participantes
    https://www.tibiaface.com

    Nemesis811

    Nemesis811
    Miembro
    Miembro
    [Sistema] Private Shop System( Tu player Npc y Vende Item) (OTX Y TFS 0.3.7) Consol10
    alli esta maya me sale ese error al darle asi al comando !pvshop add, demon armor, 1, 60000

    4 participantes

    [Admin] God Maya

    [Admin] God Maya
    Administrador
    Administrador
    [Tienes que estar registrado y conectado para ver este vínculo] escribió:[Sistema] Private Shop System( Tu player Npc y Vende Item) (OTX Y TFS 0.3.7) Consol10
    alli esta maya me sale ese error al darle asi al comando !pvshop add, demon armor, 1, 60000

    algo esta sucediendo entonces no esta leyendo la base de datos o el protocolo o version de tfs no compatible

    intente utilizar tfs tbiaface v5 para testear



    [Sistema] Private Shop System( Tu player Npc y Vende Item) (OTX Y TFS 0.3.7) YNU5B25
    4 participantes
    https://www.tibiaface.com

    Nemesis811

    Nemesis811
    Miembro
    Miembro
    tibia tfs face v5? donde consigo eso? y bueno este es 8.70 por eso le dije algo parecido para tfs [22:42:37.908] The Forgotten Server, version 0.3.6 (Crying Damson)
    [22:42:38.000] Compiled with GNU C++ version 4.4.0 at Mar  8 2011, 20:40:58. pero digame entonces como hago maya para testear con  tfs tbiaface v5

    4 participantes

    Contenido patrocinado


    4 participantes

    Ver el tema anterior Ver el tema siguiente Volver arriba  Mensaje (Página 1 de 2.)

    Ir a la página : 1, 2  Siguiente

    Permisos de este foro:
    No puedes responder a temas en este foro.

     

    BienvenidosTibiaFace es una comunidad de Open Tibia. Para participar debes estar registrado (click para Regístrate).