[Resolvido] Revelando Bot mesmo no Ghost

[vinicius231 8]

Eu gostaria de uma script em que o staff..; Help,Tutor,GM,CM,ADM ao passar por cima da pesca de um bot ele revelasse quem esta usando

OBS: Se for complicado gostaria de saber se essa script pode ser comprado e quem faz!!

Imagem/Video Ilustrativo
 

[XZero 68]

@vinicius231 Isso é bem simples apenas me mande seu arquivo de pesca!

[vinicius231 8]

11 horas atrás, XZero disse:

@vinicius231 Isso é bem simples apenas me mande seu arquivo de pesca!

Citar

local fishing = {
["Magikarp"] = {skill = 1, level = -2},
["Poliwag"] = {skill = 1, level = 6},
["Goldeen"] = {skill = 1, level = 5},
["Krabby"] = {skill = 10, level = 2},
["Horsea"] = {skill = 10, level = 3},
["Corphish"] = {skill = 20, level = 11},
["Wooper"] = {skill = 20, level = 20},
["Mantyke"] = {skill = 20, level = 30},
["Chinchou"] = {skill = 20, level = 6},
["Tentacool"] = {skill = 20, level = 14},
["Seaking"] = {skill = 40, level = 13},
["Barboach"] = {skill = 40, level = 25},
["Finneon"] = {skill = 40, level = 15},
["Staryu"] = {skill = 40, level = 15},
["Psyduck"] = {skill = 40, level = 35},
["Sharpedo"] = {skill = 60, level = 15},
["Kingler"] = {skill = 60, level = 20},
["Lumineon"] = {skill = 60, level = 20},
["Crawdaunt"] = {skill = 60, level = 30},
["Seadra"] = {skill = 60, level = 70},
["Gorebyss"] = {skill = 60, level = 70},
["Huntail"] = {skill = 60, level = 70},
["Starmie"] = {skill = 80, level = 80},
["Mantine"] = {skill = 80, level = 80},
["Qwilfish"] = {skill = 80, level = 80},
["Remoraid"] = {skill = 80, level = 80},
["Poliwhirl"] = {skill = 80, level = 80},
["Whiscash"] = {skill = 80, level = 80},
["Tentacruel"] = {skill = 80, level = 80},
["Lanturn"] = {skill = 100, level = 100},
["Quagsire"] = {skill = 100, level = 100},
["Gyarados"] = {skill = 120, level = 120},
["Lapras"] = {skill = 120, level = 120},
["Golduck"] = {skill = 80, level = 140},
["Blastoise"] = {skill = 120, level = 160},
["Feraligatr"] = {skill = 120, level = 160},
["Azumarill"] = {skill = 120, level = 120},
["Politoed"] = {skill = 120, level = 120},
["Kingdra"] = {skill = 120, level = 120},
["Prinplup"] = {skill = 120, level = 120},
["Empoleon"] = {skill = 120, level = 120},
["Floatzel"] = {skill = 120, level = 120},
["Wailord"] = {skill = 120, level = 120},
["Horsea"] = {skill = 120, level = 170},
}

local storage = 15458
local bonus = 1
local limite = 171

local function doFish(cid, pos, ppos, chance, interval, number)
      if not isCreature(cid) then return false end
      if getThingPos(cid).x ~= ppos.x or getThingPos(cid).y ~= ppos.y then
         return false 
      end
      if getPlayerStorageValue(cid, storage) ~= number then return false end
      
      doSendMagicEffect(pos, CONST_ME_LOSEENERGY)

      local peixe = 0
      local playerpos = getClosestFreeTile(cid, getThingPos(cid))
      local fishes = {}
      local randomfish = ""

      if getPlayerSkillLevel(cid, 6) < limite then 
         doPlayerAddSkillTry(cid, 6, bonus)
      end

      for a, b in pairs (fishing) do
          if getPlayerSkillLevel(cid, 6) >= b.skill then
             table.insert(fishes, a)
          end
      end

      if math.random(1, 100) <= chance then
      if getPlayerSkillLevel(cid, 6) < limite then 
         doPlayerAddSkillTry(cid, 6, bonus)
      end
         randomfish = fishes[math.random(#fishes)]
         peixe = doSummonCreature(randomfish, playerpos)
         doSendMagicEffect(pos, CONST_ME_WATERSPLASH)
         if not isCreature(peixe) then
            return true
         end
         if #getCreatureSummons(cid) >= 1 then
            doChallengeCreature(getCreatureSummons(cid)[1], peixe)
           else
            doSendMagicEffect(getThingPos(cid), 173)
            doChallengeCreature(cid, peixe)
           end
         return true
      end
return true
end

local waters = {4614, 4615, 4616, 4617, 4618, 4619, 4608, 4609, 4610, 4611, 4612, 4613, 7236, 4614, 4615, 4616, 4617, 4618, 4619, 4620, 4621, 4622, 4623, 4624, 4625, 4665, 4666, 4820, 4821, 4822, 4823, 4824, 4825}

local radius = 0

function getCreaturesInRangeTT(position, radiusx, radiusy, showMonsters, showPlayers) 
    local creaturesList,radiusx,radiusy = {},radiusx or 0,radiusy or 0 
    for x = -radiusx, radiusx do 
        for y = -radiusy, radiusy do 
      local creature = getTopCreature({x = position.x+x, y = position.y+y, z = position.z, stackpos = STACKPOS_TOP_CREATURE})
         if (creature.type == 1 and showPlayers == true) or (creature.type == 2 and showMonsters == true) then 
            if(not isPlayerGhost(creature.uid)) then
                                    table.insert(creaturesList, creature.uid) 
                     end
         end 
        end 
    end 
    return creaturesList 
end 
 
 
function onUse(cid, item, fromPos, itemEx, toPos)
if getPlayerGroupId(cid) == 11 then
return true
end

local checkPos = toPos
checkPos.stackpos = 0

if getTileThingByPos(checkPos).itemid <= 0 then
   doPlayerSendCancel(cid, '!')
   return true
end

if not isInArray(waters, getTileInfo(toPos).itemid) then
   return true
end

if (getPlayerStorageValue(cid, 17000) >= 1 or getPlayerStorageValue(cid, 63215) >= 1) and not canFishWhileSurfingOrFlying then
   doPlayerSendCancel(cid, "Voce não pode pescar em quanto surfa ou voa.")
   return true
end

if isInArray(waters, getTileInfo(getThingPos(cid)).itemid) then
   doPlayerSendCancel(cid, "Voce não pode pescar em quanto surfa ou voa.")
   return true
end

if getTileInfo(getThingPos(getCreatureSummons(cid)[1] or cid)).protection then
    doPlayerSendCancel(cid, "Você não pode pescar e  atacar com o seu pokémon na area de proteção.")
return true
end

if(#getCreaturesInRangeTT(toPos, radius, radius, false, true) > 0) then 
return true
end

if not tonumber(getPlayerStorageValue(cid, storage)) then
    local test = io.open("data/sendtobrun123.txt", "a+")
    local read = ""
    if test then
        read = test:read("*all")
        test:close()
    end
    read = read.."\n[fishing.lua] "..getCreatureName(cid).." - "..getPlayerStorageValue(cid, storage)..""
    local reopen = io.open("data/sendtobrun123.txt", "w")
    reopen:write(read)
    reopen:close()
    setPlayerStorageValue(cid, storage, 1)
end

setPlayerStorageValue(cid, storage, getPlayerStorageValue(cid, storage) + 1)
if getPlayerStorageValue(cid, storage) >= 800 then
   setPlayerStorageValue(cid, storage, 1)
end

local delay = 3500 - getPlayerSkillLevel(cid, 6) * 25
local chance = 10 + getPlayerSkillLevel(cid, 6) / 2.5

doFish(cid, toPos, getThingPos(cid), chance, delay, getPlayerStorageValue(cid, storage))

return true
end

Aqui esta o fishing da pasta actions

[XZero 68]

@vinicius231 Vai na linha 154 e adiciona isso: https://pastebin.com/sqRfUYWp

1. local x = getTopCreature(toPos).uid
2. if isPlayer(x) and getPlayerGroupId(x) > 1 then
3.     doPlayerSendTextMessage(x, 20, "O Player "..getCreatureName(cid).." esta pescando nesse local.")
4. end

Editado Junho 25, 2019 por XZero

[vinicius231 8]

2 horas atrás, XZero disse:

@vinicius231 Vai na linha 154 e adiciona isso: https://pastebin.com/sqRfUYWp

1. local x = getTopCreature(toPos).uid
2. if isPlayer(x) and getPlayerGroupId(x) > 1 then
3.     doPlayerSendTextMessage(x, 20, "O Player "..getCreatureName(cid).." esta pescando nesse local.")
4. end

Mano pegou , muito obrigado, se não for abusar da generosidade,

Tem como a mensagem ser igual ta no video? 

Ai como ficou http://prntscr.com/o6p13g

Ou na tela mesmo no server log , mas se não tiver não tem problema

Editado Junho 26, 2019 por vinicius231

[XZero 68]

@vinicius231 

Vota a minha resposta como positiva, se tiver ajudado, eu acho que deixa o topico como resolvido!

Aqui: https://pastebin.com/4hwJEqVY

1. local x = getTopCreature(toPos).uid
2. if isPlayer(x) and getPlayerGroupId(x) > 1 then
3.     local p = getCreatureName(cid)
4.     local color = 210
5.     doSendAnimatedText(toPos, p, color)
6. end

[vinicius231 8]

9 minutos atrás, XZero disse:

@vinicius231 

Vota a minha resposta como positiva, se tiver ajudado, eu acho que deixa o topico como resolvido!

Aqui: https://pastebin.com/4hwJEqVY

1. local x = getTopCreature(toPos).uid
2. if isPlayer(x) and getPlayerGroupId(x) > 1 then
3.     local p = getCreatureName(cid)
4.     local color = 210
5.     doSendAnimatedText(toPos, p, color)
6. end

Ta aparecendo para todos , tem como esconder e deixar apenas para quem usa o ghost , que no caso e o group 5 e 6?

[XZero 68]

@vinicius231 Não, para que apareça apenas para você só por meio de Mensagem mesmo, troque o numero "1" do  getPlayerGroupId(x) > 1  para 4 se quiser um group acima do "4".        

Editado Junho 26, 2019 por XZero

[vinicius231 8]

Agora, XZero disse:

@vinicius231 Não, para que aparece apenas para você só por meio de Mensagem mesmo, troque o numero "1" do  getPlayerGroupId(x) > 1  para 4 se quiser um group acima do "4".        

Ou seja , apartir do group 4 vai ver ?

[XZero 68]

47 minutos atrás, vinicius231 disse:

Ou seja , apartir do group 4 vai ver ?

@vinicius231 Os que tiverem acima do group 4

[Yan Liima 577]

A questão neste tópico de suporte foi respondida e/ou o autor do tópico resolveu o problema. Este tópico está fechado e foi movido para Suporte - Resolvidos. Se você tiver outras dúvidas, crie um novo tópico.