Ir para conteúdo

Fransuar N

Membro
  • Registro em

  • Última visita

  1. Fransuar N alterou sua foto pessoal
  2. Ola amigos e amigas do tibia king, primeiramente nao sei se estou postando no lugar certo, se nao estou me perdoe... como eu disse lá no Titulo, eu ja vi esse comando em outros ot. Um prayer coloca o item em cima do depot, ai vem outro prayer e começa a jogar lixo em cima, o dono do item digita !depot, e o item que estava de baixo do lixo vai pra bp... se alguem souber como faz isso, me ajuda.... tmj!!!!
  3. -- Include external classes. dofile('data/npc/scripts/lib/npcsystem/npcsystem.lua') -- get the distance to a creature function getDistanceToCreature(id) if id == 0 or id == nil then selfGotoIdle() end cx, cy, cz = creatureGetPosition(id) sx, sy, sz = selfGetPosition() if cx == nil then return nil end return math.max(math.abs(sx-cx), math.abs(sy-cy)) end -- do one step to reach position function moveToPosition(x,y,z) selfMoveTo(x, y, z) end -- do one step to reach creature function moveToCreature(id) if id == 0 or id == nil then selfGotoIdle() end tx,ty,tz=creatureGetPosition(id) if tx == nil then selfGotoIdle() else moveToPosition(tx, ty, tz) end end function getCount(msg) b, e = string.find(msg, "%d+") if b == nil or e == nil then count = 1 else count = tonumber(string.sub(msg, b, e)) end if count > 100000 then count = 100000 elseif count == 0 then count = 1 end return count end function balance(cid) local storage = 666 local value = getPlayerStorageValue(cid, storage) if value > 0 then selfSay('Your account balance is '..value..' gold.') else setPlayerStorageValue(cid, storage, 0) selfSay('You don\'t have money in your bank account.') end end function withdraw(cid, value) local storage = 666 local balance = getPlayerStorageValue(cid, storage) if balance == -1 then -- Não tinha depositos ainda -> Iniciar com 0 setPlayerStorageValue(cid, storage, 0) end if value <= 0 then selfSay('You cannot withdraw invalid values.') elseif balance < value then selfSay('There is not enough gold on your account.') else selfSay('Here you are, '..value..' gold. Please let me know if there is something else I can do for you.') setPlayerStorageValue(cid, storage, balance-value) doPlayerAddMoney(cid,value) end end function deposit(cid, value) local storage = 666 local balance = getPlayerStorageValue(cid, storage) if balance == -1 then -- Não tinha depositos ainda -> Iniciar com 0 setPlayerStorageValue(cid, storage, 0) end if value < 0 then selfSay('You cannot deposit negative values.') elseif doPlayerRemoveMoney(cid,value) == TRUE then selfSay('Alright, we have added the amount of '..value..' gold to your balance. You can withdraw your money anytime you want to.') setPlayerStorageValue(cid, storage, balance + value) else selfSay('You do not have enough gold.') end end function transfer(cid, value, xid) local storage = 666 local balanceEu = getPlayerStorageValue(cid, storage) local balanceEle = getPlayerStorageValue(xid, storage) if value <= 0 then selfSay('You cannot transfer illegal values.') elseif balanceEu >= value then setPlayerStorageValue(cid, storage, balanceEu - value) setPlayerStorageValue(xid, storage, balanceEle + value) selfSay('Alright, we have transfered the amount of '..value..' gold from your balance to '..NomeDele..' balance.') doPlayerSendTextMessage(xid,4,'OT Bank System : '..getPlayerName(cid)..' transfered the amount of '..value..' gold to your balance.') selfSay(getPlayerName(xid)..' received confirmation about transfer.') else selfSay('You do not have enough gold.') end end function doPlayerGetMoney(cid) local gold = getPlayerItemCount(cid,2148) local platinum = getPlayerItemCount(cid,2152) local crystal = getPlayerItemCount(cid,2160) local total = gold + (platinum*100) + (crystal*10000) return total end -- stop talking function selfGotoIdle() following = false attacking = false selfAttackCreature(0) target = 0 end -- getCount function by Jiddo function getCount(msg) b, e = string.find(msg, "%d+") if b == nil or e == nil then count = 1 else count = tonumber(string.sub(msg, b, e)) end if count > 2000 then count = 2000 elseif count == 0 then count = 1 end return count end -- buy an item function buy(cid, itemid, count, cost) cost = count*cost amount = count if doPlayerRemoveMoney(cid, cost) == 1 then if getItemStackable(itemid) then while count > 100 do doPlayerAddItem(cid, itemid, 100) count = count - 100 end doPlayerAddItem(cid, itemid, count) -- add the last items, if there is left else while count > 0 do doPlayerAddItem(cid, itemid, 1) count = count - 1 end end if amount <= 1 then selfSay('Here is your '.. getItemName(itemid) .. '!') else selfSay('Here are your '.. amount ..' '.. getItemName(itemid) .. 's!') end else selfSay('Sorry, you do not have enough money.') end end function buyFluidContainer(cid, itemid, count, cost, fluidtype) cost = count*cost amount = count if doPlayerRemoveMoney(cid, cost) == 1 then while count > 0 do doPlayerAddItem(cid, itemid, fluidtype) count = count - 1 end if amount <= 1 then selfSay('Here is your '.. getItemName(itemid) .. '!') else selfSay('Here are your '.. amount ..' '.. getItemName(itemid) .. 's!') end else selfSay('Sorry, you do not have enough money.') end end function buyContainer(cid, container, itemid, count, money) if doPlayerRemoveMoney(cid, money) == 1 then bp = doPlayerAddItem(cid, container, 1) x = 0 while x < 20 do doAddContainerItem(bp, itemid, count) x = x + 1 end selfSay('Here you are.') else selfSay('Sorry, you don\'t have enough money.') end end -- sell an item function sell(cid, itemid, count, cost) cost = count*cost if doPlayerRemoveItem(cid, itemid, count) == 1 then doPlayerAddMoney(cid, cost) if cost > 0 then selfSay('You couldn\'t retrieve '.. cost ..' gold pieces, please contact the admin.') end if count <= 1 then selfSay('Thanks for this '.. getItemName(itemid) .. '!') else selfSay('Thanks for these '.. count..' '.. getItemName(itemid) .. 's!') end else selfSay('Sorry, you do not have this item.') end end -- pay for anything? function pay(cid, cost) if doPlayerRemoveMoney(cid, cost) == 1 then return true else return false end end -- learn spell function learnSpell(cid, spell, cost) x,y,z = creatureGetPosition(cid) if doPlayerLearnSpell(cid, spell) == 1 then if doPlayerRemoveMoney(cid, cost) == 1 then doSendMagicEffect({x=x, y=y, z=z}, 14) selfSay('To use it say: '.. spell ..'.') else selfSay('Sorry, you do not have this item.') end else selfSay('You already know this spell.') end end -- Travel player function travel(cid, x, y, z) destpos = {x = x, y = y, z = z} doTeleportThing(cid, destpos) doSendMagicEffect(destpos, 10) end -- add all addons function addon(cid, addon) if getPlayerSex(cid) == 1 then for x = 128, 134 do doPlayerAddAddon(cid, x, addon) end for y = 143, 146 do doPlayerAddAddon(cid, y, addon) end for z = 151, 154 do doPlayerAddAddon(cid, z, addon) end else for x = 136, 142 do doPlayerAddAddon(cid, x, addon) end for y = 147, 150 do doPlayerAddAddon(cid, y, addon) end for z = 155, 158 do doPlayerAddAddon(cid, z, addon) end end end function msgcontains(txt, str) return (string.find(txt, str) and not string.find(txt, '(%w+)' .. str) and not string.find(txt, str .. '(%w+)')) end
  4. pow eu nao faço a minima ideia tmb de onde fica isso
  5. Ola pessoal, me desculpe se estiver postando isso no lugar improprio, mas é minha primeira vez aqui.. estou com uma duvida e gostaria de saber se tem como resolver meu problema, vou mandar 2 print q vai resumir oq estou dizendo no titulo... a 1 imagem é outro ot a 2 imagem é meu ot me ajudem por favor...

Informação Importante

Confirmação de Termo