[Pedido] [Pedido] shop

Descripcion escribió:hola hoy les vengo a pedir aun script te tienda por palanca donde se pueda comprar desde monturas addons items hasta premium points cambio de name de sexo uso tfs 1.3

Imagen Explicativa escribió:Imagen Explicativa:
Version del Scripts: TFs 1.x

Código:


local potions = {
   [2033] = { -- Health
      [1] = { -- Mage
         [1] = {id = 7618, price = 5000, level = {1, math.huge}}, -- health_potion
      },
      [2] = { -- Paladin
         [1] = {id = 7618, price = 5000, level = {1, 50}}, -- health_potion
         [2] = {id = 7588, price = 10000, level = {50, 80}}, -- strong potion
         [3] = {id = 8472, price = 19000, level = {80, math.huge}}, -- spirit potion
      },
      [3] = { -- Knight
         [1] = {id = 7618, price = 5000, level = {1, 50}}, -- health_potion
         [2] = {id = 7588, price = 10000, level = {50, 80}}, -- strong potion
         [3] = {id = 7591, price = 19000, level = {80, 130}}, -- great potion
         [4] = {id = 8473, price = 31000, level = {130, math.huge}}, -- ultimate potion
      },
   },

   [2034] = { -- Mana
      [1] = { -- Mage
         [1] = {id = 7620, price = 5000, level = {1, 50}}, -- mana potion
         [2] = {id = 7589, price = 8000, level = {50, 80}}, -- strong potion
         [3] = {id = 7590, price = 12000, level = {80, math.huge}}, -- great potion
      },
      [2] = { -- Paladin
         [1] = {id = 7620, price = 5000, level = {1, 50}}, -- mana potion
         [2] = {id = 7589, price = 8000, level = {50, math.huge}}, -- strong potion
      },
      [3] = { -- Knight
         [1] = {id = 7620, price = 5000, level = {1, math.huge}}, -- mana potion
      },
   }
}

function onUse(player, item, fromPosition, itemEx, toPosition, isHotkey)

   item:transform(item.itemid == 1945 and 1946 or 1945)
   
   local group = 0
   if player:isMage() then
      group = 1
   elseif player:isPaladin() then
      group = 2
   elseif player:isKnight() then
      group = 3
   end

   local pot = potions[item.actionid][group]
   if not pot then
      return true
   end

   for _, v in ipairs(pot) do
      if player:getLevel() >= v.level[1] and player:getLevel() < v.level[2] then
         if player:getMoney() >= v.price then
            if player:removeMoney(v.price) then
               player:addItem(v.id, 100)
            end
         else
            return player:sendCancelMessage("You do not have enough money.")
         end
      end
   end

   item:transform(item.itemid == 1945 and 1946 or 1945)
   
   return true
en


Código:


<action actionid="2033" script="custom/alavanca_inteligente.lua"/> <!-- Alavanca Inteligente Potions Life -->
   <action actionid="2034" script="custom/alavanca_inteligente.lua"/> <!-- Alavanca Inteligente Potions Mana -->


Código:

function onUse(cid, item, frompos, itemEx, topos)
if exhaustion.get(cid, 6100) ~= false then
doPlayerSendTextMessage(cid, MESSAGE_STATUS_SMALL, "You cannot use this object that fast.")
return true
else
exhaustion.set(cid, 6100, 2)

tokens = {16003, 18423, 18422, 6527}
values = {"star", "point", "minor token", "christmas token"}

store = {
 -- christmas stuff
 [5556] = {id = 11255, count = 1, token = 4, cost = 500},
 [5557] = {id = 11263, inside = {}, count = 1, token = 4, cost = 75},
 [5558] = {id = 6388, count = 1, token = 4, cost = 5},
 [5559] = {id = 22647, count = 1, token = 4, cost = 250},
 [5560] = {id = 6531, count = 1, token = 4, cost = 50},
 [5561] = {id = 6512, count = 1, token = 4, cost = 100},
 [5572] = {id = 22643, count = 1, token = 4, cost = 250},
 [5582] = {id = 22642, count = 1, token = 4, cost = 250},
 [5592] = {id = 22645, count = 1, token = 4, cost = 150},
 [5593] = {id = 11256, count = 1, token = 4, cost = 150},
 
 -- addon unit
 [5578] = {id = 5015, count = 1, token = 2, cost = 40},
 [5579] = {id = 5919, count = 1, token = 2, cost = 40},
 [5580] = {id = 9955, count = 1, token = 2, cost = 40},
 [5581] = {id = 5804, count = 1, token = 2, cost = 40},
 [5574] = {id = 6099, count = 1, token = 2, cost = 10},
 [5575] = {id = 6100, count = 1, token = 2, cost = 10},
 [5576] = {id = 6101, count = 1, token = 2, cost = 10},
 [5577] = {id = 6102, count = 1, token = 2, cost = 10},
 [5594] = {id = 11422, count = 1, token = 2, cost = 25},
 [5595] = {id = 5945, count = 1, token = 2, cost = 25},
 
 -- sets
 [5562] = {id = 2003, inside = {{2169, 1},{11374, 1},{2457, 1}, {11303, 1}, {8891, 1}, {11304, 1}, {8853, 1}, {7363, 100}}, count = 1, token = 2, cost = 40, name = "paladin set"},
 [5563] = {id = 10522, inside = {{2207, 1},{2200, 1},{2491, 1}, {7457, 1}, {2487, 1}, {2488, 1}, {2392, 1}, {2519, 1}, {2789, 100}}, count = 1, token = 2, cost = 40, name = "crown set"},
 [5564] = {id = 3940, inside = {{2168, 1},{7887, 1},{7903, 1}, {7886, 1}, {7884, 1}, {7885, 1}, {2181, 1}, {8902, 1}, {2789, 100}}, count = 1, token = 2, cost = 40, name = "terra set"},
 [5565] = {id = 5949, inside = {{2167, 1},{7889, 1},{7901, 1}, {7893, 1}, {7898, 1}, {7895, 1}, {2189, 1}, {8902, 1}, {2789, 100}}, count = 1, token = 2, cost = 40, name = "lightning set"},
 [5566] = {id = 2002, inside = {{2165, 1},{7888, 1},{7902, 1}, {7892, 1}, {7897, 1}, {7896, 1}, {8911, 1}, {8902, 1}, {2789, 100}}, count = 1, token = 2, cost = 40, name = "glacier set"},
 [5567] = {id = 2000, inside = {{2214, 1},{7890, 1},{7900, 1}, {7891, 1}, {7899, 1}, {7894, 1}, {8921, 1}, {8902, 1}, {2789, 100}}, count = 1, token = 2, cost = 40, name = "magma set"},

 -- common unit
 [5568] = {id = 9933, count = 1, token = 2, cost = 60},
 [5569] = {id = 6132, count = 1, token = 2, cost = 120},
 [5570] = {id = 2365, inside = {}, count = 1, token = 2, cost = 30},
 [5571] = {id = 8299, count = 5, token = 2, cost = 15},
 [5573] = {id = 18422, count = 30, token = 2, cost = 10},
 [5590] = {id = 2361, count = 1, token = 2, cost = 20},
 [5596] = {id = 9742, count = 1, token = 2, cost = 20},
 [5597] = {id = 10511, count = 1, token = 2, cost = 20},
 [5598] = {id = 10513, count = 1, token = 2, cost = 20},
 [5599] = {id = 10515, count = 1, token = 2, cost = 20},
 
 -- middle unit
 [5583] = {id = 8300, count = 1, token = 3, cost = 25},
 [5584] = {id = 12543, count = 1, token = 3, cost = 5},
 [5585] = {id = 5080, count = 1, token = 3, cost = 40},
 [5586] = {id = 12540, count = 1, token = 3, cost = 20},
 [5587] = {id = 9998, count = 1, token = 3, cost = 10},
 [5588] = {id = 6571, count = 1, token = 3, cost = 20},
 [5589] = {id = 6570, count = 1, token = 3, cost = 10},
 [5591] = {id = 6527, count = 10, token = 3, cost = 5},
 
 -- mounts
 [5600] = {id = 44, token = 2, cost = 40, name = "a wyvern"},
 [5601] = {id = 46, token = 2, cost = 40, name = "a toad"},
 [5602] = {id = 34, token = 2, cost = 40, name = "the Steelbeak"},
 [5603] = {id = 45, token = 2, cost = 40, name = "a nightmare"},
 [5604] = {id = 24, token = 2, cost = 40, name = "a shadow draptor"},
 [5605] = {id = 38, token = 2, cost = 40, name = "a crystal cavebear"},
 [5606] = {id = 36, token = 2, cost = 40, name = "an chocolate scorpion"},
 [5607] = {id = 33, token = 2, cost = 40, name = "a crimson ray"},
 [5608] = {id = 23, token = 2, cost = 40, name = "a horse"},
 -- services
 [5609] = {id = 51, token = 2, cost = 10, name = "character unjustified kills removal service"},
 [5610] = {id = 52, token = 2, cost = 10, name = "character stamina refill service"},
 [5611] = {id = 53, token = 2, cost = 40, name = "an Entrepreneur outfit"},
 [5612] = {id = 54, token = 2, cost = 40, name = "character gender change service"},
 [5613] = {id = 55, token = 2, cost = 40, name = "character name change service"}
 -- [5650] = {id = 0, inside = {}, count = 0, token = 0, cost = 0, name = "last registered actionid"}
 }


 if store[item.actionid] ~= nil then
 local product = store[item.actionid]
 weight = getItemWeight(product.id, product.count)
 a = "a"
 if product.name ~= nil then
 c = product.name
 else
 if product.id <= 50 then
 c = "a mount number " .. product.id
 else
 if product.id < 1000 then
 c = "a service number " .. product.id
 else
 c = getItemName(product.id)
 end
 end
 end

 if product.cost > 1 then s = "s" else s = "" end
 if product.cost == 1 then a = "a " .. values[product.token] else a = product.cost .. " " .. values[product.token] .. "s" end
 if product.name ~= nil then c = product.name else if product.count > 1 then c = product.count .. " " .. ItemType(product.id):getPluralName() else c = ItemType(product.id):getArticle() .. " " .. getItemName(product.id) end end
 
 if product.inside ~= nil then
 for q = 1, table.maxn(product.inside) do
 weight = weight + getItemWeight(product.inside[q][1], product.inside[q][2])
 end
 end
 if getPlayerItemCount(cid, tokens[product.token]) >= product.cost then
 -- common item
 if product.id > 1000 then
 if(getPlayerFreeCap(cid) >= weight) then
 if (doPlayerAddItemEx(cid, doCreateItemEx(product.id, product.count)) == RETURNVALUE_NOERROR) then
 doPlayerTakeItem(cid, tokens[product.token], product.cost)
 if isContainer(getPlayerItemById(cid, true, product.id).uid) then
 if table.maxn(product.inside) > 0 then
 for p = 1, table.maxn(product.inside) do
 doAddContainerItem(getPlayerItemById(cid, true, product.id).uid, product.inside[p][1], product.inside[p][2])
 end
 end
 end
 doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Bought " .. c .. " for " .. a .. ".")
 else
 doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "You have no room to take it.")
 end
 else
 doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "You need " .. string.format("%.2f", weight) .. " oz of free capacity to buy this item.")
 end
 else
 -- mount
 mount_storage = 16000 + product.id
 if product.id <= 50 then
 if getPlayerStorageValue(cid, mount_storage) < 1 then
 if doPlayerTakeItem(cid, tokens[product.token], product.cost) then
 d = product.name
 if product.name == nil then d = "a mount number " .. product.id end
 doPlayerAddMount(cid, product.id)
 setPlayerStorageValue(cid, mount_storage, 1)
 doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Bought " .. d .. " for " .. a .. ".")
 else
 doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Cannot perform action.")
 end
 else
 doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "You already own this mount.")
 end
 else
 -- services
 if product.id == 51 then
 unremovable_skulls = {
 SKULL_NONE,
 SKULL_YELLOW,
 SKULL_GREEN,
 SKULL_WHITE,
 SKULL_ORANGE
 }
 
 if isInArray(unremovable_skulls, Player(cid):getSkull()) then
 doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Nothing happend.")
 return true
 else
 if doPlayerTakeItem(cid, tokens[product.token], product.cost) then
 customer = getPlayerGUID(cid)
 doRemoveCreature(cid)
 db.query("UPDATE `players` SET `skulltime` = '2000' WHERE `players`.`id` = " .. customer .. ";")
 else
 doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Cannot perform action.")
 end
 end
 return true
 elseif product.id == 52 then
 if(Player(cid):getStamina() >= 2100) then
 doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "You are in good condition.")
 else
 if doPlayerTakeItem(cid, tokens[product.token], product.cost) then
 Player(cid):setStamina(2520)
 doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Your stamina has been refilled.")
 else
 doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Cannot perform action.")
 end
 end
 return true
 elseif product.id == 53 then
 if getPlayerStorageValue(cid, mount_storage) < 1 then
 if doPlayerTakeItem(cid, tokens[product.token], product.cost) then
 d = product.name
 if product.name == nil then d = "service number " .. product.id end
 doPlayerAddOutfit(cid, 471, 3)
 doPlayerAddOutfit(cid, 472, 3)
 setPlayerStorageValue(cid, mount_storage, 1)
 doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Bought " .. d .. " for " .. a .. ".")
 else
 doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Cannot perform action.")
 end
 else
 doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "You already own this outfit.")
 end
 return true
 elseif product.id == 54 then
 -- gender
 if doPlayerTakeItem(cid, tokens[product.token], product.cost) then
 d = product.name
 if product.name == nil then d = "service number " .. product.id end
 local p = Player(cid)
 local new_gend = p:getSex() == 1 and 0 or 1
 local o_look = p:getOutfit()
 p:setSex(new_gend)
 p:setOutfit({
 lookType = new_gend == 1 and 128 or 136, lookHead = o_look.lookHead, lookBody = o_look.lookBody, lookLegs = o_look.lookLegs, lookFeet = o_look.lookFeet})
 p:sendOutfitWindow()
 doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Bought " .. d .. " for " .. a .. ".")
 else
 doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Cannot perform action.")
 end
 return true
 elseif product.id == 55 then
 Player(cid):showTextDialog(12398, "<Insert new name here>", true, 30)
 return true
 else
 doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Service unavailable.")
 end
 end
 end
 else
 if product.id <= 50 then
 mount_storage = 16000 + product.id
 if getPlayerStorageValue(cid, mount_storage) < 1 then
 d = product.name
 if product.name == nil then d = "a mount number " .. product.id end
 doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "You need " .. a .. " to buy " .. d .. ".")
 else
 doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "You already own this mount.")
 end
 return true
 elseif product.id == 53 then
 mount_storage = 16000 + product.id
 if getPlayerStorageValue(cid, mount_storage) < 1 then
 d = product.name
 if product.name == nil then d = "service number " .. product.id end
 doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "You need " .. a .. " to buy " .. d .. ".")
 else
 doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "You already own this outfit.")
 end
 return true
 elseif product.id == 54 then
 d = product.name
 if product.name == nil then d = "service number " .. product.id end
 doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "You need " .. a .. " to buy " .. d .. ".")
 return true
 elseif product.id == 55 then
 d = product.name
 if product.name == nil then d = "service number " .. product.id end
 doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "You need " .. a .. " to buy " .. d .. ".")
 return true
 else
 if product.id < 1000 then
 d = product.name
 if product.name == nil then d = "service number " .. product.id end
 doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "You need " .. a .. " to buy " .. d .. ".")
 return true
 else
 doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "You need " .. a .. " to buy " .. c .. ".")
 return true
 end
 end
 end
 else
 doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "This tile is not registered correctly. Please report that issue to server administrator.")
 print("[Warning]: Token store: Player " .. getCreatureName(cid) .. " encountered a problem with trading tile of actionid " .. item.actionid .. ", position " .. topos.x .. " " .. topos.y .. " " .. topos.z .. ".\nThis tile is not registered in shop table.\nFile: data/actions/shop.lua")
 end
end
 return true
end

[Tienes que estar registrado y conectado para ver este vínculo] escribió:disculpa maya lo que pasa es que cando desgarque ese ot decia que era tfs 1.0 y la pregunta del millon me puedes ayudar a transformarlo a 1.3