xTibia

.com
OR
pedido

Colocar range na pistola

Por OriGM, 16 de out. de 2013 em Scripts

resolvido
script
28
2.3k
OriGMO
16 de outubro de 2013 às 23:33

Olá galera.

Peguei este codigo na Fabrica de Scripts que fechou,e gostaria que ao usar a pistola como Use With,tivesse uma range configuravel.

Por exemplo: só usar no maximo 3 sqm do player.

 

Abaixo o script:

 

 

function onUse(cid, item, fromPosition, itemEx, toPosition)
local need_target = true -- Precisa de target? (true / false) Se false, o sistema utilizará o Use With.
local bullet_id = 2160 -- ID da munição
local shots_amount = 1 -- Tiros por vez
local exhaustion_time = 1 -- Segundos de exhaustion
local exhaust = 19301 -- Storage da exhaustion
local dmg_min, dmg_max = -100, -200 -- Dano mínimo, dano máximo
local shot_effect = 10 -- Efeito do tiro
local shot_distance_effect = 1 -- Distance effect do tiro
local damage_type = COMBAT_PHYSICALDAMAGE -- Tipo de dano
local shots_delay = 200 -- Delay dos tiros (em milissegundos)

if need_target then
if getCreatureTarget(cid) <= 0 then
return doPlayerSendCancel(cid, "Selecione um alvo primeiro.")
elseif getPlayerItemCount(cid, bullet_id) < shots_amount then
return doPlayerSendCancel(cid, "Você não possui munição.")
elseif exhaustion.check(cid, exhaust) then
return doPlayerSendCancel(cid, "Aguarde "..(exhaustion.get(cid, exhaust)).." segundos para usar a arma novamente.")
end

exhaustion.set(cid, exhaust, exhaustion_time)
for i = 0, shots_amount-1 do
addEvent(function()
if getCreatureTarget(cid) <= 0 then
return true
elseif getPlayerItemCount(cid, bullet_id) < 1 then
return doPlayerSendCancel(cid, "Você não possui munição.")
end
doSendDistanceShoot(getCreaturePosition(cid), getCreaturePosition(getCreatureTarget(cid)), shot_distance_effect)
doTargetCombatHealth(cid, getCreatureTarget(cid), damage_type, dmg_min, dmg_max, shot_effect)
doPlayerRemoveItem(cid, bullet_id, 1)
end, shots_delay*i)
end
else
if not isCreature(itemEx.uid) then
return doPlayerSendCancel(cid, "Selecione um alvo primeiro.")
elseif getPlayerItemCount(cid, bullet_id) < shots_amount then
return doPlayerSendCancel(cid, "Você não possui munição.")
elseif exhaustion.check(cid, exhaust) then
return doPlayerSendCancel(cid, "Aguarde "..(exhaustion.get(cid, exhaust)).." segundos para usar a arma novamente.")
end

exhaustion.set(cid, exhaust, exhaustion_time)
for i = 0, shots_amount-1 do
addEvent(function()
if not isCreature(itemEx.uid) then
return true
elseif getPlayerItemCount(cid, bullet_id) < 1 then
return doPlayerSendCancel(cid, "Você não possui munição.")
end
doSendDistanceShoot(getCreaturePosition(cid), getCreaturePosition(itemEx.uid), shot_distance_effect)
doTargetCombatHealth(cid, itemEx.uid, damage_type, dmg_min, dmg_max, shot_effect)
doPlayerRemoveItem(cid, bullet_id, 1)
end, shots_delay*i)
end
end
return true
end

 

Se alguem puder ajudar,fico agradecido.

lovenina12L
16 de outubro de 2013 às 23:51

nao sei se vai funfar usei a funcao getDistance(pos1, pos2)



function onUse(cid, item, fromPosition, itemEx, toPosition)


    local need_target = true -- Precisa de target? (true / false) Se false, o sistema utilizará o Use With.


    local bullet_id = 2160 -- ID da munição


    local shots_amount = 1 -- Tiros por vez


    local exhaustion_time = 1 -- Segundos de exhaustion


    local exhaust = 19301 -- Storage da exhaustion


    local dmg_min, dmg_max = -100, -200 -- Dano mínimo, dano máximo


    local shot_effect = 10 -- Efeito do tiro


    local shot_distance_effect = 1 -- Distance effect do tiro


    local damage_type = COMBAT_PHYSICALDAMAGE -- Tipo de dano


    local shots_delay = 200 -- Delay dos tiros (em milissegundos)


    local alcance = 6 -- Alcance do tiro


 


    if need_target then


        if getCreatureTarget(cid) <= 0 then


            return doPlayerSendCancel(cid, "Selecione um alvo primeiro.")


        elseif getPlayerItemCount(cid, bullet_id) < shots_amount then


            return doPlayerSendCancel(cid, "Você não possui munição.")


        elseif exhaustion.check(cid, exhaust) then


            return doPlayerSendCancel(cid, "Aguarde "..(exhaustion.get(cid, exhaust)).." segundos para usar a arma novamente.")


elseif getDistance(fromPosition, toPosition) > alcance then


return doPlayerSendCancel(cid, "O Alvo esta muito longe!")


        end


 


        exhaustion.set(cid, exhaust, exhaustion_time)


        for i = 0, shots_amount-1 do


            addEvent(function()


                    if getCreatureTarget(cid) <= 0 then


                        return true


                    elseif getPlayerItemCount(cid, bullet_id) < 1 then


                        return doPlayerSendCancel(cid, "Você não possui munição.")


                    end


                    doSendDistanceShoot(getCreaturePosition(cid), getCreaturePosition(getCreatureTarget(cid)), shot_distance_effect)


                    doTargetCombatHealth(cid, getCreatureTarget(cid), damage_type, dmg_min, dmg_max, shot_effect)


                    doPlayerRemoveItem(cid, bullet_id, 1)


                end, shots_delay*i)


        end


    else


        if not isCreature(itemEx.uid) then


            return doPlayerSendCancel(cid, "Selecione um alvo primeiro.")


        elseif getPlayerItemCount(cid, bullet_id) < shots_amount then


            return doPlayerSendCancel(cid, "Você não possui munição.")


        elseif exhaustion.check(cid, exhaust) then


            return doPlayerSendCancel(cid, "Aguarde "..(exhaustion.get(cid, exhaust)).." segundos para usar a arma novamente.")


        end


        


        exhaustion.set(cid, exhaust, exhaustion_time)


        for i = 0, shots_amount-1 do


            addEvent(function()


                    if not isCreature(itemEx.uid) then


                        return true


                    elseif getPlayerItemCount(cid, bullet_id) < 1 then


                        return doPlayerSendCancel(cid, "Você não possui munição.")


                    end


                    doSendDistanceShoot(getCreaturePosition(cid), getCreaturePosition(itemEx.uid), shot_distance_effect)


                    doTargetCombatHealth(cid, itemEx.uid, damage_type, dmg_min, dmg_max, shot_effect)


                    doPlayerRemoveItem(cid, bullet_id, 1)


                end, shots_delay*i)


        end


    end


return true


end


Editado Outubro 16 por ProfissaoPK
fitaisolanteF
16 de outubro de 2013 às 23:55


----edit-----


 


não vi que vc postou, profissão pk, foi no mesmo momento que eu postei, e acho que está incorreto o seu código.


 


----edit-----


 


Testa isso


local distance_target = 3


é a distancia.


function onUse(cid, item, fromPosition, itemEx, toPosition)
    local need_target = true -- Precisa de target? (true / false) Se false, o sistema utilizará o Use With.
    local bullet_id = 2160 -- ID da munição
    local shots_amount = 1 -- Tiros por vez
    local exhaustion_time = 1 -- Segundos de exhaustion
    local exhaust = 19301 -- Storage da exhaustion
    local dmg_min, dmg_max = -100, -200 -- Dano mínimo, dano máximo
    local shot_effect = 10 -- Efeito do tiro
    local shot_distance_effect = 1 -- Distance effect do tiro
    local damage_type = COMBAT_PHYSICALDAMAGE -- Tipo de dano
    local shots_delay = 200 -- Delay dos tiros (em milissegundos)
    local distance_target = 3
     
    
    if need_target then
        if getCreatureTarget(cid) <= 0 then
            return doPlayerSendCancel(cid, "Selecione um alvo primeiro.")
        elseif getPlayerItemCount(cid, bullet_id) < shots_amount then
            return doPlayerSendCancel(cid, "Você não possui munição.")
        elseif exhaustion.check(cid, exhaust) then
            return doPlayerSendCancel(cid, "Aguarde "..(exhaustion.get(cid, exhaust)).." segundos para usar a arma novamente.")
        end

	if getDistanceBetween(getPlayerPosition(cid), getPlayerPosition((getCreatureTarget(cid))) > distance_target then
	return true
	end
        
        exhaustion.set(cid, exhaust, exhaustion_time)
        for i = 0, shots_amount-1 do
            addEvent(function()
                    if getCreatureTarget(cid) <= 0 then
                        return true
                    elseif getPlayerItemCount(cid, bullet_id) < 1 then
                        return doPlayerSendCancel(cid, "Você não possui munição.")
                    end
                    doSendDistanceShoot(getCreaturePosition(cid), getCreaturePosition(getCreatureTarget(cid)), shot_distance_effect)
                    doTargetCombatHealth(cid, getCreatureTarget(cid), damage_type, dmg_min, dmg_max, shot_effect)
                    doPlayerRemoveItem(cid, bullet_id, 1)
                end, shots_delay*i)
        end
    else
        if not isCreature(itemEx.uid) then
            return doPlayerSendCancel(cid, "Selecione um alvo primeiro.")
        elseif getPlayerItemCount(cid, bullet_id) < shots_amount then
            return doPlayerSendCancel(cid, "Você não possui munição.")
        elseif exhaustion.check(cid, exhaust) then
            return doPlayerSendCancel(cid, "Aguarde "..(exhaustion.get(cid, exhaust)).." segundos para usar a arma novamente.")
        end
        
        exhaustion.set(cid, exhaust, exhaustion_time)
        for i = 0, shots_amount-1 do
            addEvent(function()
                    if not isCreature(itemEx.uid) then
                        return true
                    elseif getPlayerItemCount(cid, bullet_id) < 1 then
                        return doPlayerSendCancel(cid, "Você não possui munição.")
                    end
                    doSendDistanceShoot(getCreaturePosition(cid), getCreaturePosition(itemEx.uid), shot_distance_effect)
                    doTargetCombatHealth(cid, itemEx.uid, damage_type, dmg_min, dmg_max, shot_effect)
                    doPlayerRemoveItem(cid, bullet_id, 1)
                end, shots_delay*i)
        end
    end
return true
end



Editado Outubro 16 por Keilost
OriGMO
17 de outubro de 2013 às 00:04


Deu erro Keilost, e do profissãoPK nem deu certo,nem ataca.


 




 


'>' expected near 'then' linha 24




fitaisolanteF
17 de outubro de 2013 às 00:09


mals kk..


function onUse(cid, item, fromPosition, itemEx, toPosition)
    local need_target = true -- Precisa de target? (true / false) Se false, o sistema utilizará o Use With.
    local bullet_id = 2160 -- ID da munição
    local shots_amount = 1 -- Tiros por vez
    local exhaustion_time = 1 -- Segundos de exhaustion
    local exhaust = 19301 -- Storage da exhaustion
    local dmg_min, dmg_max = -100, -200 -- Dano mínimo, dano máximo
    local shot_effect = 10 -- Efeito do tiro
    local shot_distance_effect = 1 -- Distance effect do tiro
    local damage_type = COMBAT_PHYSICALDAMAGE -- Tipo de dano
    local shots_delay = 200 -- Delay dos tiros (em milissegundos)
    local distance_target = 3
     
    
    if need_target then
        if getCreatureTarget(cid) <= 0 then
            return doPlayerSendCancel(cid, "Selecione um alvo primeiro.")
        elseif getPlayerItemCount(cid, bullet_id) < shots_amount then
            return doPlayerSendCancel(cid, "Você não possui munição.")
        elseif exhaustion.check(cid, exhaust) then
            return doPlayerSendCancel(cid, "Aguarde "..(exhaustion.get(cid, exhaust)).." segundos para usar a arma novamente.")
        end

	if getDistanceBetween(cid, getPlayerPosition(cid), getPlayerPosition(getCreatureTarget(cid))) > distance_target then
	return true
	end
        
        exhaustion.set(cid, exhaust, exhaustion_time)
        for i = 0, shots_amount-1 do
            addEvent(function()
                    if getCreatureTarget(cid) <= 0 then
                        return true
                    elseif getPlayerItemCount(cid, bullet_id) < 1 then
                        return doPlayerSendCancel(cid, "Você não possui munição.")
                    end
                    doSendDistanceShoot(getCreaturePosition(cid), getCreaturePosition(getCreatureTarget(cid)), shot_distance_effect)
                    doTargetCombatHealth(cid, getCreatureTarget(cid), damage_type, dmg_min, dmg_max, shot_effect)
                    doPlayerRemoveItem(cid, bullet_id, 1)
                end, shots_delay*i)
        end
    else
        if not isCreature(itemEx.uid) then
            return doPlayerSendCancel(cid, "Selecione um alvo primeiro.")
        elseif getPlayerItemCount(cid, bullet_id) < shots_amount then
            return doPlayerSendCancel(cid, "Você não possui munição.")
        elseif exhaustion.check(cid, exhaust) then
            return doPlayerSendCancel(cid, "Aguarde "..(exhaustion.get(cid, exhaust)).." segundos para usar a arma novamente.")
        end
        
        exhaustion.set(cid, exhaust, exhaustion_time)
        for i = 0, shots_amount-1 do
            addEvent(function()
                    if not isCreature(itemEx.uid) then
                        return true
                    elseif getPlayerItemCount(cid, bullet_id) < 1 then
                        return doPlayerSendCancel(cid, "Você não possui munição.")
                    end
                    doSendDistanceShoot(getCreaturePosition(cid), getCreaturePosition(itemEx.uid), shot_distance_effect)
                    doTargetCombatHealth(cid, itemEx.uid, damage_type, dmg_min, dmg_max, shot_effect)
                    doPlayerRemoveItem(cid, bullet_id, 1)
                end, shots_delay*i)
        end
    end
return true
end




OriGMO
17 de outubro de 2013 às 00:12


Keilost:


Não dá erro,mas simplesmente fala que nao tem munição,mesmo tendo.


lovenina12L
17 de outubro de 2013 às 00:16







function onUse(cid, item, fromPosition, itemEx, toPosition)



    local need_target = true -- Precisa de target? (true / false) Se false, o sistema utilizará o Use With.



    local bullet_id = 2160 -- ID da munição



    local shots_amount = 1 -- Tiros por vez



    local exhaustion_time = 1 -- Segundos de exhaustion



    local exhaust = 19301 -- Storage da exhaustion



    local dmg_min, dmg_max = -100, -200 -- Dano mínimo, dano máximo



    local shot_effect = 10 -- Efeito do tiro



    local shot_distance_effect = 1 -- Distance effect do tiro



    local damage_type = COMBAT_PHYSICALDAMAGE -- Tipo de dano



    local shots_delay = 200 -- Delay dos tiros (em milissegundos)



    local alcance = 6 -- Alcance do tiro


 



	if getDistance(fromPosition, toPosition) > alcance then



		doPlayerSendCancel(cid, "Longe demais, atire mais perto!")



		return TRUE



	end


 



    if need_target then



        if getCreatureTarget(cid) <= 0 then



            return doPlayerSendCancel(cid, "Selecione um alvo primeiro.")



        elseif getPlayerItemCount(cid, bullet_id) < shots_amount then



            return doPlayerSendCancel(cid, "Você não possui munição.")



        elseif exhaustion.check(cid, exhaust) then



            return doPlayerSendCancel(cid, "Aguarde "..(exhaustion.get(cid, exhaust)).." segundos para usar a arma novamente.")



        end


 



        exhaustion.set(cid, exhaust, exhaustion_time)



        for i = 0, shots_amount-1 do



            addEvent(function()



                    if getCreatureTarget(cid) <= 0 then



                        return true



                    elseif getPlayerItemCount(cid, bullet_id) < 1 then



                        return doPlayerSendCancel(cid, "Você não possui munição.")



                    end



                    doSendDistanceShoot(getCreaturePosition(cid), getCreaturePosition(getCreatureTarget(cid)), shot_distance_effect)



                    doTargetCombatHealth(cid, getCreatureTarget(cid), damage_type, dmg_min, dmg_max, shot_effect)



                    doPlayerRemoveItem(cid, bullet_id, 1)



                end, shots_delay*i)



        end



    else



        if not isCreature(itemEx.uid) then



            return doPlayerSendCancel(cid, "Selecione um alvo primeiro.")



        elseif getPlayerItemCount(cid, bullet_id) < shots_amount then



            return doPlayerSendCancel(cid, "Você não possui munição.")



        elseif exhaustion.check(cid, exhaust) then



            return doPlayerSendCancel(cid, "Aguarde "..(exhaustion.get(cid, exhaust)).." segundos para usar a arma novamente.")



        end


 



        exhaustion.set(cid, exhaust, exhaustion_time)



        for i = 0, shots_amount-1 do



            addEvent(function()



                    if not isCreature(itemEx.uid) then



                        return true



                    elseif getPlayerItemCount(cid, bullet_id) < 1 then



                        return doPlayerSendCancel(cid, "Você não possui munição.")



                    end



                    doSendDistanceShoot(getCreaturePosition(cid), getCreaturePosition(itemEx.uid), shot_distance_effect)



                    doTargetCombatHealth(cid, itemEx.uid, damage_type, dmg_min, dmg_max, shot_effect)



                    doPlayerRemoveItem(cid, bullet_id, 1)



                end, shots_delay*i)



        end



    end



return true



end






fitaisolanteF
17 de outubro de 2013 às 00:18


ué que estranho.. tenta assim:


function onUse(cid, item, fromPosition, itemEx, toPosition)
    local need_target = true -- Precisa de target? (true / false) Se false, o sistema utilizará o Use With.
    local bullet_id = 2160 -- ID da munição
    local shots_amount = 1 -- Tiros por vez
    local exhaustion_time = 1 -- Segundos de exhaustion
    local exhaust = 19301 -- Storage da exhaustion
    local dmg_min, dmg_max = -100, -200 -- Dano mínimo, dano máximo
    local shot_effect = 10 -- Efeito do tiro
    local shot_distance_effect = 1 -- Distance effect do tiro
    local damage_type = COMBAT_PHYSICALDAMAGE -- Tipo de dano
    local shots_delay = 200 -- Delay dos tiros (em milissegundos)
    local distance_target = 3
     
    
    if need_target then
        if getCreatureTarget(cid) <= 0 then
            return doPlayerSendCancel(cid, "Selecione um alvo primeiro.")
	elseif getDistanceBetween(getPlayerPosition(cid), getPlayerPosition(getCreatureTarget(cid))) > distance_target then
            return doPlayerSendCancel(cid, "Você está longe do alvo.")
        elseif getPlayerItemCount(cid, bullet_id) < shots_amount then
            return doPlayerSendCancel(cid, "Você não possui munição.")
        elseif exhaustion.check(cid, exhaust) then
            return doPlayerSendCancel(cid, "Aguarde "..(exhaustion.get(cid, exhaust)).." segundos para usar a arma novamente.")
        end
        
        exhaustion.set(cid, exhaust, exhaustion_time)
        for i = 0, shots_amount-1 do
            addEvent(function()
                    if getCreatureTarget(cid) <= 0 then
                        return true
                    elseif getPlayerItemCount(cid, bullet_id) < 1 then
                        return doPlayerSendCancel(cid, "Você não possui munição.")
                    end
                    doSendDistanceShoot(getCreaturePosition(cid), getCreaturePosition(getCreatureTarget(cid)), shot_distance_effect)
                    doTargetCombatHealth(cid, getCreatureTarget(cid), damage_type, dmg_min, dmg_max, shot_effect)
                    doPlayerRemoveItem(cid, bullet_id, 1)
                end, shots_delay*i)
        end
    else
        if not isCreature(itemEx.uid) then
            return doPlayerSendCancel(cid, "Selecione um alvo primeiro.")
        elseif getPlayerItemCount(cid, bullet_id) < shots_amount then
            return doPlayerSendCancel(cid, "Você não possui munição.")
        elseif exhaustion.check(cid, exhaust) then
            return doPlayerSendCancel(cid, "Aguarde "..(exhaustion.get(cid, exhaust)).." segundos para usar a arma novamente.")
        end
        
        exhaustion.set(cid, exhaust, exhaustion_time)
        for i = 0, shots_amount-1 do
            addEvent(function()
                    if not isCreature(itemEx.uid) then
                        return true
                    elseif getPlayerItemCount(cid, bullet_id) < 1 then
                        return doPlayerSendCancel(cid, "Você não possui munição.")
                    end
                    doSendDistanceShoot(getCreaturePosition(cid), getCreaturePosition(itemEx.uid), shot_distance_effect)
                    doTargetCombatHealth(cid, itemEx.uid, damage_type, dmg_min, dmg_max, shot_effect)
                    doPlayerRemoveItem(cid, bullet_id, 1)
                end, shots_delay*i)
        end
    end
return true
end



Editado Outubro 17 por Keilost
OriGMO
17 de outubro de 2013 às 00:19


Keilost: continua dando a mesma coisa,fala que nao te munição ao clicar no monstro. =/


 


ProfissãoPK deu erro ao clicar no monstro,lembrando que estou usando script com Use With:


attemp to call global 'getDistance' a nil value linha 14


Editado Outubro 17 por OriGM
fitaisolanteF
17 de outubro de 2013 às 00:21


@ProfissãoPK, nunca irá dar certo o toposition, fromposition..


 


Você tem que informar de que posição a posição.. O código não entende isso.


 


________________________________________________________________


@OriGM testa o meu lá..


OriGMO
17 de outubro de 2013 às 00:23




@ProfissãoPK, nunca irá dar certo o toposition, fromposition..


 


Você tem que informar de que posição a posição.. O código não entende isso.


 


________________________________________________________________


 


@OriGM testa o meu lá..




Keilost: continua dando a mesma coisa,fala que nao te munição ao clicar no monstro. =/


fitaisolanteF
17 de outubro de 2013 às 00:25


@OriGM


 


Tente em outro char, vê se não tem algo errado..


Porque o script funciona assim, quando executado, ele lê de cima para baixo, e a minha checagem fica a cima da checagem da munição, ou seja, ele já passou por ela..


OriGMO
17 de outubro de 2013 às 00:33
Keilost,nada continua na mesma. =/ Puts que tenso.
lovenina12L
17 de outubro de 2013 às 00:40




function onUse(cid, item, fromPosition, itemEx, toPosition)
    local need_target = true -- Precisa de target? (true / false) Se false, o sistema utilizará o Use With.
    local bullet_id = 2160 -- ID da munição
    local shots_amount = 1 -- Tiros por vez
    local exhaustion_time = 1 -- Segundos de exhaustion
    local exhaust = 19301 -- Storage da exhaustion
    local dmg_min, dmg_max = -100, -200 -- Dano mínimo, dano máximo
    local shot_effect = 10 -- Efeito do tiro
    local shot_distance_effect = 1 -- Distance effect do tiro
    local damage_type = COMBAT_PHYSICALDAMAGE -- Tipo de dano
    local shots_delay = 200 -- Delay dos tiros (em milissegundos)
    local alcance = 6 -- Alcance do tiro
 
	if isCreature(itemEx.uid) then
		if getDistance(getCreaturePosition(cid), getCreaturePosition(itemEx.uid)) > alcance then
			doPlayerSendCancel(cid, "Longe demais!")
			return TRUE
		end
	end

    if need_target then
        if getCreatureTarget(cid) <= 0 then
            return doPlayerSendCancel(cid, "Selecione um alvo primeiro.")
        elseif getPlayerItemCount(cid, bullet_id) < shots_amount then
            return doPlayerSendCancel(cid, "Você não possui munição.")
        elseif exhaustion.check(cid, exhaust) then
            return doPlayerSendCancel(cid, "Aguarde "..(exhaustion.get(cid, exhaust)).." segundos para usar a arma novamente.")
        end

        exhaustion.set(cid, exhaust, exhaustion_time)
        for i = 0, shots_amount-1 do
            addEvent(function()
                    if getCreatureTarget(cid) <= 0 then
                        return true
                    elseif getPlayerItemCount(cid, bullet_id) < 1 then
                        return doPlayerSendCancel(cid, "Você não possui munição.")
                    end
                    doSendDistanceShoot(getCreaturePosition(cid), getCreaturePosition(getCreatureTarget(cid)), shot_distance_effect)
                    doTargetCombatHealth(cid, getCreatureTarget(cid), damage_type, dmg_min, dmg_max, shot_effect)
                    doPlayerRemoveItem(cid, bullet_id, 1)
                end, shots_delay*i)
        end
    else
        if not isCreature(itemEx.uid) then
            return doPlayerSendCancel(cid, "Selecione um alvo primeiro.")
        elseif getPlayerItemCount(cid, bullet_id) < shots_amount then
            return doPlayerSendCancel(cid, "Você não possui munição.")
        elseif exhaustion.check(cid, exhaust) then
            return doPlayerSendCancel(cid, "Aguarde "..(exhaustion.get(cid, exhaust)).." segundos para usar a arma novamente.")
        end
        
        exhaustion.set(cid, exhaust, exhaustion_time)
        for i = 0, shots_amount-1 do
            addEvent(function()
                    if not isCreature(itemEx.uid) then
                        return true
                    elseif getPlayerItemCount(cid, bullet_id) < 1 then
                        return doPlayerSendCancel(cid, "Você não possui munição.")
                    end
                    doSendDistanceShoot(getCreaturePosition(cid), getCreaturePosition(itemEx.uid), shot_distance_effect)
                    doTargetCombatHealth(cid, itemEx.uid, damage_type, dmg_min, dmg_max, shot_effect)
                    doPlayerRemoveItem(cid, bullet_id, 1)
                end, shots_delay*i)
        end
    end
return true
end



fiz oq vc pediu pra mim fazer '-'




Keilost, ACHO que achei o erro do seu ;) vc colocou getPlayerPosition mais o certo seria getCreaturePosition so tenta isso. nao questione '-' ficaria algo assim:


function onUse(cid, item, fromPosition, itemEx, toPosition)
    local need_target = true -- Precisa de target? (true / false) Se false, o sistema utilizará o Use With.
    local bullet_id = 2160 -- ID da munição
    local shots_amount = 1 -- Tiros por vez
    local exhaustion_time = 1 -- Segundos de exhaustion
    local exhaust = 19301 -- Storage da exhaustion
    local dmg_min, dmg_max = -100, -200 -- Dano mínimo, dano máximo
    local shot_effect = 10 -- Efeito do tiro
    local shot_distance_effect = 1 -- Distance effect do tiro
    local damage_type = COMBAT_PHYSICALDAMAGE -- Tipo de dano
    local shots_delay = 200 -- Delay dos tiros (em milissegundos)
    local distance_target = 3
     
    
    if need_target then
        if getCreatureTarget(cid) <= 0 then
            return doPlayerSendCancel(cid, "Selecione um alvo primeiro.")
	elseif getDistanceBetween(getCreaturePosition(cid), getCreaturePosition(getCreatureTarget(cid))) > distance_target then
            return doPlayerSendCancel(cid, "Você está longe do alvo.")
        elseif getPlayerItemCount(cid, bullet_id) < shots_amount then
            return doPlayerSendCancel(cid, "Você não possui munição.")
        elseif exhaustion.check(cid, exhaust) then
            return doPlayerSendCancel(cid, "Aguarde "..(exhaustion.get(cid, exhaust)).." segundos para usar a arma novamente.")
        end
        
        exhaustion.set(cid, exhaust, exhaustion_time)
        for i = 0, shots_amount-1 do
            addEvent(function()
                    if getCreatureTarget(cid) <= 0 then
                        return true
                    elseif getPlayerItemCount(cid, bullet_id) < 1 then
                        return doPlayerSendCancel(cid, "Você não possui munição.")
                    end
                    doSendDistanceShoot(getCreaturePosition(cid), getCreaturePosition(getCreatureTarget(cid)), shot_distance_effect)
                    doTargetCombatHealth(cid, getCreatureTarget(cid), damage_type, dmg_min, dmg_max, shot_effect)
                    doPlayerRemoveItem(cid, bullet_id, 1)
                end, shots_delay*i)
        end
    else
        if not isCreature(itemEx.uid) then
            return doPlayerSendCancel(cid, "Selecione um alvo primeiro.")
        elseif getPlayerItemCount(cid, bullet_id) < shots_amount then
            return doPlayerSendCancel(cid, "Você não possui munição.")
        elseif exhaustion.check(cid, exhaust) then
            return doPlayerSendCancel(cid, "Aguarde "..(exhaustion.get(cid, exhaust)).." segundos para usar a arma novamente.")
        end
        
        exhaustion.set(cid, exhaust, exhaustion_time)
        for i = 0, shots_amount-1 do
            addEvent(function()
                    if not isCreature(itemEx.uid) then
                        return true
                    elseif getPlayerItemCount(cid, bullet_id) < 1 then
                        return doPlayerSendCancel(cid, "Você não possui munição.")
                    end
                    doSendDistanceShoot(getCreaturePosition(cid), getCreaturePosition(itemEx.uid), shot_distance_effect)
                    doTargetCombatHealth(cid, itemEx.uid, damage_type, dmg_min, dmg_max, shot_effect)
                    doPlayerRemoveItem(cid, bullet_id, 1)
                end, shots_delay*i)
        end
    end
return true
end



Editado Outubro 17 por ProfissaoPK
OriGMO
17 de outubro de 2013 às 00:41


ProfissaoPK ainda dá o mesmo erro:




 


 

attemp to call global 'getDistance' a nil value linha 15