Jump to content
  • 0

[Resolvido] Revelando Bot mesmo no Ghost


vinicius231
 Share

Question

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

 




Screenshot_6.thumb.png.1dbef7880985fcca99133e79ec5cf476.png

Link to comment
Share on other sites

10 answers to this question

Recommended Posts

  • 1

@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
Edited by XZero
Link to comment
Share on other sites

  • 0
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

Link to comment
Share on other sites

  • 0
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

Edited by vinicius231
Link to comment
Share on other sites

  • 0

@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
Link to comment
Share on other sites

  • 0
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?

Link to comment
Share on other sites

  • 0

@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".        

Edited by XZero
Link to comment
Share on other sites

  • 0
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 ?

Link to comment
Share on other sites

Guest
This topic is now closed to further replies.
 Share

×
×
  • Create New...