lSainty

Novembro 18, 2020

12 horas atrás, Hiquez disse:

@lSainty boa noite, desculpe-me a demora para responder, mas o error persiste. Adicionei o if e continuou dando erro. Se puder me ajudar com isso agradeço, muito obrigado!

Estava faltando um 'end' também:

function onStatsChange(cid, attacker, type, combat, value)
	local item = 2160
	local pos = {x = 979, y = 1461, z = 4}
	local monsters = {"dwarf", "dwarf guard", "dwarf geomancer"}    

	if not isMonster(attacker) then
		return true
	end

	if isInArray(monsters, getCreatureName(attacker):lower()) and getTileItemById(pos, item).uid > 0 then
		player:setStorageValue(70065, os.time() + 120)
		if player:getStorageValue(70065) > os.time() then
			if type == STATSCHANGE_HEALTHLOSS or type == STATSCHANGE_MANALOSS then
				return false
			end
		end
		return true
	end
end

Novembro 16, 2020

Em 13/11/2020 em 18:29, Hiquez disse:

@underewarr boa noite mano, acabei de voltar. uso essa versão da otx

A segunda imagem é o error que está acontecendo atualmente mano, desculpa por não ter testado antes, acabei de chegar em casa também.

Na linha 13, está faltando um 'if' antes disso:

type == STATSCHANGE_HEALTHLOSS or type == STATSCHANGE_MANALOSS then

Ficando assim:

if type == STATSCHANGE_HEALTHLOSS or type == STATSCHANGE_MANALOSS then

Setembro 17, 2020

Tenta colocar isso:

doCreatureAddHealth(cid, -(getCreatureHealth(cid) - config.life))

Abaixo dessa linha:

setCreatureMaxHealth(cid, config.life)

Setembro 17, 2020

Agosto 26, 2020

1 hora atrás, dedefoxx disse:

kkkk, eu consegui criptografar o meu cliente kkk

Criptografar você consegue, fazer ele abrir depois sem ter colocado a senha correta já é outra história.
Mas se você tem o conhecimento para fazer uma engenharia reversa no arquivo SERIAL (salvo engano era esse, não lembro ao certo) e pegar a senha correta ou criar sua própria senha, vai funcionar sem problemas xD

Agosto 26, 2020

5 minutos atrás, brazvct disse:

Pode por
Eu baixei esse do seu tópico e editei o max view pra mesmo do otclient
Ai não vai bugar

Feito, thanks.

Agosto 26, 2020

9 horas atrás, brazvct disse:

Claro né o mlk quer usar otclient de outro servidor '-'

Se tiver diferente a visão na source vai dar erro mesmo

Eu mesmo hospedei ali nas respostas
usa isso e me fala se funciona
https://www.mediafire.com/file/44ufql7somz5fnb/PokeZR+++OTC+exe.rar/file
@Thakyson

Se vc permitir eu coloco seu link no tópico, dei uma olhada aqui mas não possuo mais o client que usei na época.

Agosto 26, 2020

Em 22/08/2020 em 01:50, dedefoxx disse:

como funciona o sistema de criptografia ?

Possui sistema de criptografia mas o Walox "perdeu" a senha, então da forma que está não serve para nada. Mas você pode dar uma analisada em como funciona e fazer o seu próprio sistema xD

Agosto 20, 2020

Em 19/08/2020 em 14:13, pedrock90 disse:

The major problem with this base its that it doesnt have a Gym system

You can add it, I believe there is many servers with this system, you just need to extract it
Also, the major problem with this base is that it sucks xD

Agosto 17, 2020

Em 15/08/2020 em 22:45, XicoLapada disse:

Continua com o mesmo erro mano Mas se eu usar so o comando /cb ele automaticamente me envia um ratata...

Já falaram umas 15x que é só colocar a PRIMEIRA letra do nome do pokemon maiúscula (Pikachu, Charmander, etc).

Agosto 15, 2020

Em 10/08/2020 em 18:25, Gabrieltxu disse:

Não é falando mal nem nada, porem já esperava isso do Walox xD

Tu ainda me avisou no face, mas vida que segue xD

2 horas atrás, kurozzx disse:

poderia ajudar a corrigir para aser executar 2 e 3 gen

Não forneço suporte a esse servidor

Agosto 15, 2020

5 horas atrás, AsunaBr disse:

esse segue o mesmo que o, so que com level system, ele tem os mesmos sistemas?

o client ta dando isso nao aparece o login como resolver?

pq fica tudo escuro?

São servidores diferentes, você está utilizando o client do Zring

Agosto 13, 2020

8 minutos atrás, LeoPetryScript disse:

é que tem que ter tipo um return false pro dano primario, mas se eu coloco return false, n sai nenhum dano

Dei uma pesquisada e creio que vc vai ter que fazer nas sources. Ao colocar return false (que cancela o dano "original" para causar apenas o do doTargetCombatHealth) ele entra no onStatsChange novamente e vira um loop cancelando o dano.

Agosto 13, 2020

2 minutos atrás, LeoPetryScript disse:

testei com um monstro que hita sempre 1100-1200

ele começou a hitar 3200 com esse efeito ativo

Infelizmente eu n manjo dessas formulas de dano, mas n faz sentido visto que se o 'value' fosse 100 por exemplo, a conta seria: value = 100 - (100*0.2) = 80

Agosto 13, 2020

43 minutos atrás, LeoPetryScript disse:

da erro pq nao reconhece dano = "dano" - (value*0.2)

Provavelmente pq a variável 'dano' n foi declarada, tenta assim:

function onStatsChange(cid, attacker, type, combat, value, summons)
  local summons = getCreatureSummons(cid)
  local angel = "death angel [0]"
  if #summons >= 1 then
    for j = 1, #summons do
      if getCreatureName(summons[j]):lower() == string.lower(angel) then
        if type == STATSCHANGE_HEALTHLOSS or type == STATSCHANGE_MANALOSS then
          value = value - (value*0.2)
          doTargetCombatHealth(attacker, cid, combat, -value, -value, 255)
        end
      else
        return true
      end
    end
  end
  return true
end

Agosto 12, 2020

10 horas atrás, Davy Returns disse:

Como coloco poke bar no level system dessa base, os tutorias nao dao certo , e poderia me arrumar um poke info , nessa base n consegui por um n sei fazer

Nunca analisei o código dessas barras de pokemon do fórum, mas visto que a maioria dos servidores é baseado no PDA, provavelmente é só adaptar o sistema em cima dos erros que for dando. Se vai ficar bom já é outra história xd

thloko · Agosto 11, 2020

22 minutos atrás, thloko disse:

Salve galera,

Estou com o mesmo problema de um amigo ali em cima.

Não consigo de maneira alguma atacar o pokemon de npc em duelo.

Não da pra selecionar o poke, é como se voce clicasse com o botao direito em um npc normal, aparece o target e some, e la em baixo aparece a mensagem "não é possivel atacar essa criatura".

Alguém ja teve esse problema ?

Está em modo no-pvp, só alterar

Agosto 11, 2020

function onUse(player, item)
	if getPlayerItemCount(player, 32255) == 1 then
		doPlayerRemoveItem(player, 32255, 1)
		local item = doPlayerAddItem(player, 32256, 1)
		doItemSetAttribute(item, "description", "Item comprado por " .. getCreatureName(player))
	else
		doPlayerSendCancel(player, "Voce não possui coins suficiente para pegar esse item")
	end
return true
end

Agosto 10, 2020

42 minutos atrás, leozinpbb disse:

pega pra old cliente?

Sim, é só trocar a sprite da skull no .pic pela coroa

Agosto 9, 2020

15 horas atrás, kamus9629 disse:

@lSainty

e agora oque eu fasso nao apareceu levle sistem n

Tenho certeza que esse servidor é o Zring, o outro que eu postei, que é diferente do ZR que se encontra nesse tópico. O look do ZR por exemplo mostra os status do pokémon como pode ser visto em look.lua:

table.insert(str, "[Status]")    
table.insert(str, "\nOffense: "..math.floor(getItemAttribute(thing.uid, "offense")).." Defense: "..math.floor(getItemAttribute(thing.uid, "defense")).."\n")
table.insert(str, "Agility: "..math.floor(getItemAttribute(thing.uid, "speed")).." Sp. Attack: "..math.floor(getItemAttribute(thing.uid, "specialattack")).."\n")
table.insert(str, "Vitality: "..math.floor(getItemAttribute(thing.uid, "vitality")).."")

BrunooMaciell · Agosto 9, 2020

function onSay(cid, words, param)

local typess = {
[1] = "normal",
[2] = "great",
[3] = "super",
[4] = "ultra"
}

if param == "" then
doPlayerSendCancel(cid, 'Command needs parameters, function structure: "/cb [Pokemon Name], [boost], [Gender]".')
return 0
end

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

local name = ""
local gender = 0
local btype = pokeballs["ultra"].on                --"normal"
local typeee = typess[math.random(1, 4)]

if t[1] then
	local n = string.explode(t[1], " ")
	local str = string.sub(n[1], 1, 1)
	local sta = string.sub(n[1], 2, string.len(n[1]))
	name = ""..string.upper(str)..""..string.lower(sta)..""
	if n[2] then
	str = string.sub(n[2], 1, 1)
	sta = string.sub(n[2], 2, string.len(n[2]))
	name = name.." "..string.upper(str)..""..string.lower(sta)..""
	end
	if not pokes[name] then
	doPlayerSendCancel(cid, "Sorry, a pokemon with the name "..name.." doesn't exists.")
	return true
	end
print(""..name.." ball has been created by "..getPlayerName(cid)..".")
end

local genders = {
["male"] = 4,
["female"] = 3,
["1"] = 4,
["0"] = 3}

if t[3] then
	if genders[t[3]] then
		gender = genders[t[3]]
	else
	local rate = newpokedex[name].gender
		if rate == 0 then
			gender = 3
		elseif rate == 1000 then
			gender = 4
		elseif rate == -1 then
			gender = 0
		elseif math.random(1, 1000) <= rate then
			gender = 4
		else
			gender = 3
		end
	end
	else
	local rate = newpokedex[name].gender
		if rate == 0 then
			gender = 3
		elseif rate == 1000 then
			gender = 4
		elseif rate == -1 then
			gender = 0
		elseif math.random(1, 1000) <= rate then
			gender = 4
		else
			gender = 3
		end
end

local mypoke = pokes[name]
local happy = 255

local item = doCreateItemEx(2219)
doItemSetAttribute(item, "poke", name)
doItemSetAttribute(item, "hp", 1)
if t[2] and tonumber(t[2]) > 0 and tonumber(t[2]) <= 50 then
   doItemSetAttribute(item, "boost", tonumber(t[2]))
end
doItemSetAttribute(item, "happy", happy)
doItemSetAttribute(item, "gender", gender)
if name == "Shiny Hitmonchan" or name == "Hitmonchan" then
   doItemSetAttribute(item, "hands", 0)
end
doItemSetAttribute(item, "description", "Contains a "..name..".")


doItemSetAttribute(item, "addon", 0)
doItemSetAttribute(item, "fakedesc", "Contains a "..name..".")
	    doPlayerAddItemEx(cid, item, true)		
		doItemSetAttribute(item, "ball", "Icone")
		doItemSetAttribute(item, "icon", "yes")
		doItemSetAttribute(item, "morta", "no")
	    doTransformItem(item, btype)		
return 1
end

Agosto 9, 2020

1 hora atrás, Marcos VMA disse:

Sobre o client bugado acho que sei o problema, seu amigo quando arrumou o level System tava usando um cliente com source e ele compilou por esse motivo fica desse jeito(se for possível veja se ele pode contribuir com o cliente que estava usando na época) o erro pode ser por outro motivo mas que eu saiba só consigo lembrar esse

Que amigo? Eu que fiz as alterações o.O

E sobre o client, não lembrava de ter colocado tela estendida, mas é só voltar os valores em map.h para os valores originais do tibia, salvo engano ficaria assim:

static const int32_t maxViewportX = 11; //min: maxClientViewportX + 1
static const int32_t maxViewportY = 11; //min value: maxClientViewportY + 1
static const int32_t maxClientViewportX = 8;
static const int32_t maxClientViewportY = 6;

Agosto 8, 2020

2 minutos atrás, Zbieracz disse:
terceira geração impossível de pegar, por quê ?? :(

Eu literalmente acabei de falar que não tem, como vc espera pegar algo que não está adicionado???

Agosto 8, 2020

8 minutos atrás, Zbieracz disse:
Não consigo pegar pokemons de 3ª geração, por quê?
 

Pq n tem, só a 1°

Agosto 8, 2020

Todo servidor baseado no PDA já "possui" o sistema, porém mascarado e com níveis fixos. De toda forma, acabei de postar o ZR com level system aqui.

Entrar

lSainty

Total de itens

Registro em

Última visita

Dias Ganhos

Tipo de Conteúdo

Perfis

Fóruns

Posts postados por lSainty

Lurar monstros em um item

Lurar monstros em um item

[Resolvido] [Supporte] NPC que Reborna

Bug "6 Pokemons"

PokeZring - Completo

PokeZR com Level System

PokeZR com Level System

PokeZring - Completo

PokeZring - Completo

PokeAimar (Level System) 8.54 2020 (Com Sources)

PokeZring - Completo

PokeZR com Level System

(pedido) receber menos % de dano

(pedido) receber menos % de dano

(pedido) receber menos % de dano

PokeZR com Level System

PokeAimar (Level System) 8.54 2020 (Com Sources)

ajuda editar script

System de coroa para vip

PokeZR com Level System

Comando >> /cb

PokeZR com Level System

PokeZring - Completo

PokeZring - Completo

Ajuda para ativar level System na base ZR

Quem Está Navegando 0 membros estão online

Fóruns

Tutoriais

Suporte