Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- --[[
- VENDA DE ITENS
- BY
- BORGES
- --]]
- local toBackpack = "golden backpack" -- nome da backpack em que vai jogar os itens
- ----------------------
- -- NÃO MECHA DAQUI----
- -----PARA BAIXO-------
- ----------------------
- local contfrom = Container.New('Your Inbox')
- print("*Venda de ITENS para Rock In A Hard Place - HEXERA*")
- registerEventListener(WALKER_SELECTLABEL, "onWalkerSelectLabel")
- local chat = Channel.Open("Borges Scripts", onSpeak, onClose)
- chat:SendOrangeMessage("Borges", "Esse script vende a maioria dos itens de Deeplings.")
- chat:SendOrangeMessage("Borges", "Servidor para qual foi feito: Hexera. Comece no Depot Gray Island.")
- chat:SendRedMessage("Borges", "Coloque todos os itens que vai vender no INBOX (coloque no market e tire que vai direto).")
- Walker.Start()
- function onWalkerSelectLabel(labelName)
- if (labelName == "Withdraw") then
- Self.CloseContainers()
- wait(1000)
- Self.OpenMainBackpack(true)
- wait(1000)
- Container(0):OpenChildren(toBackpack)
- wait(1000)
- while not contfrom:isOpen() do
- locker = Container.New("Locker")
- if not locker:isOpen() then -- opens locker
- Self.OpenLocker()
- wait(800, 1000)
- end
- local dp = Container.New('Locker')
- for mailspot, touse in dp:iItems() do
- if touse.id == 12902 then
- dp:UseItem(mailspot, true)
- wait(500, 1700)
- contfrom = Container.New('Your Inbox')
- end
- end
- end
- while contfrom:isOpen() do
- local DestinationBp = Container.GetByName(toBackpack)
- local item = contfrom:GetItemData(0)
- if not (Self.Cap() - Item.GetWeight(item.id)*item.count < 1) and contfrom:ItemCount() > 0 then
- if DestinationBp:ItemCount() == DestinationBp:ItemCapacity() then
- DestinationBp:UseItem(DestinationBp:ItemCount()-1,true)
- else
- contfrom:MoveItemToContainer(0,DestinationBp:Index(),DestinationBp:ItemCount())
- wait(500,550)
- end
- else
- Empty = true
- end
- if Empty then break end
- end
- elseif (labelName == "Fim") then
- print("Reload")
- loadSettings("#Vender ItensDeep", "All")
- end
- end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement