Ir para conteúdo
  • Cadastre-se

Posts Recomendados

Envia o item diretamente no depot do jogador.


function doPlayerAddDepotItems(cid, items, town)

	if (not isPlayer(cid)) then

		error("Player not found")

	end

	local town = town or getPlayerTown(cid)


	local parcel = doCreateItemEx(ITEM_PARCEL)

	for item, count in pairs(items) do

		if (type(item) == "number") then

			doAddContainerItem(parcel, item, count)

		elseif (type(item) == "string") then

			doAddContainerItem(parcel, getItemIdByName(item), count)

		else

			error("Undefinied type of item name")

		end

	end


	return doPlayerSendMailByName(getCreatureName(cid), parcel, town)

end

Como usar

function onSay(cid, words, param, channel)

	if (param == '') then

		doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Invalid param specified.")

	else

		local params = string.explode(param, ",")

		if (not params[2]) then

			doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Invalid param specified.")

		elseif (not getPlayerByNameWildcard(params[1])) then

			doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Player " .. param .. " not found.")

		else

			local items, item_params = {}, {}

			for i = 2, #params do

				item_params = string.explode(params[i], "x")

				if (#item_params ~= 2 or tonumber(item_params[1]) <= 0 or tonumber(item_params[2]) <= 0) then

					doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Invalid param specified.")

				else

					items[tonumber(item_params[2])] = tonumber(item_params[1])

					print(items[tonumber(item_params[2])])

				end

			end

			if (#item_params > 0) then

				doPlayerAddDepotItems(getPlayerByNameWildcard(params[1]), items)

			end

		end

	end


	return true

end

Creditos:

sn4ake

Não testado

Editado por skydangerous (veja o histórico de edições)

 http://baiakuza.com/
IP: baiakuza.com
TIBIA: 10.96
Baiak Custom [ High Exp Rate ]

 

 

 

 

Link para o post
Compartilhar em outros sites

Participe da conversa

Você pode postar agora e se cadastrar mais tarde. Se você tem uma conta, faça o login para postar com sua conta.

Visitante
Responder

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emojis são permitidos.

×   Seu link foi automaticamente incorporado.   Mostrar como link

×   Seu conteúdo anterior foi restaurado.   Limpar o editor

×   Não é possível colar imagens diretamente. Carregar ou inserir imagens do URL.

  • Quem Está Navegando   0 membros estão online

    Nenhum usuário registrado visualizando esta página.

  • Conteúdo Similar

    • Por Skydangerous
      O script é bem simples, ele salva a sua posição no mapa para que você possa retornar no lugar quando quiser.



      Salvando a posição(waypoint) no mapa






      Voltando novamente na posição






      Se tentar novamente não irá conseguir




      Crie um arquivo chamado funtele.lua na pasta talkaction/scripts

      function doMarkPos(cid, posx, posy, posz) setPlayerStorageValue(cid, 19000, posx) setPlayerStorageValue(cid, 19001, posy) setPlayerStorageValue(cid, 19002, posz) end function getMarkPos(cid) return {x=getPlayerStorageValue(cid, 19000), y=getPlayerStorageValue(cid, 19001), z=getPlayerStorageValue(cid, 19002)} end function onSay(cid, words, param) local pos = getCreaturePosition(cid) if words == "!salvar" then if getMarkPos(cid).x < 1 then doSendMagicEffect(pos,15) doMarkPos(cid, pos.x, pos.y, pos.z) doPlayerSendTextMessage(cid, 4, "Você salvou posicao no mapa.") else doPlayerSendCancel(cid, "Você já gravou posição.") end elseif words == "!voltar" then if getMarkPos(cid).x > 0 then doTeleportThing(cid, getMarkPos(cid)) doMarkPos(cid, 0, 0, 0) doPlayerSendTextMessage(cid, 21,"Você foi teleportado para o waypoint") doSendMagicEffect(pos,11) else doPlayerSendCancel(cid, "Você não gravou uma posição.") end end return TRUE end agora em talkaction.xml cole essa tag <talkaction words="!salvar;!voltar" event="script" value="funtele.lua"> Agradecimentos: DemonBholder & Apocarai(jaohd) </talkaction>
    • Por Skydangerous
      Testado no TFS 0.3.6
      A função faz pega tal coisa dentre de uma posição


      function getCreatureInRange(type, fromPos, toPos, toGet, itemid) local types = { ["player"] = isPlayer, ["monster"] = isMonster, ["npc"] = isNpc, ["creature"] = isCreature } local tmp = {} local type = types[type] if(not type) then print('[getCreatureInRange]>> Unknow type') return 0 end local thing = nil for x = fromPos.x, toPos.x do for y = fromPos.y, toPos.y do for z = fromPos.z, toPos.z do for s = 1, 253 do local position = {x = x, y = y, z = z, stackpos = s} thing = getTileThingByPos(position) if(type(thing.uid) == true) then table.insert(tmp, thing.uid) end end end end end if(toGet == "count") then return table.maxn(tmp) elseif(toGet == "name") then return tmp else print('[getCreatureInRange]>> Unknow creature to get') return 0 end return true end Como Usar: local fromPos = {x = 100, y = 100, z = 7, stackpos = 1} local toPos = {x = 150, y = 150, z = 7, stackpos = 1} local t = getCreatureInRange("monster", fromPos, toPos, "count") print('>> There are ' .. t .. ' monsters) Exemplo como vai retornar: local fromPos = {x = 100, y = 100, z = 7, stackpos = 1} local toPos = {x = 150, y = 150, z = 7, stackpos = 1} local t = getCreatureInRange("monster", fromPos, toPos, "name") for i = 1, table.maxn(t) do print('>> The names are ' .. getCreatureName(t[i])) end

      Exemplo como vai retornar:





      Creditos:



      darkhaos

    • Por Skydangerous
      não fique chateado por suas notas, olha a minha e seja feliz )
    • Por Skydangerous
      Veii que triste (

      quando ocorreu esse acidente, eu estava em uma festa de formatura, fiquei imaginando gritarias , gente correndo, pisando nos outros, deixando seus amigos para trás..

      caralho to triste d + (
    • Por Skydangerous
      Eu ficava mandando toda hora o site do tibia king lá pros caras acessarem, pakaokopakoa.
×
×
  • Criar Novo...

Informação Importante

Confirmação de Termo