Ir para conteúdo
TK News
  • Cadastre-se

(Resolvido)Pedido de anunciar

Movie
 Share Seguidores 0
Ir para solução Resolvido por zipter98,

Posts Recomendados

  • Moderador
Movie

Movie 298

Postado
  • Moderador
Postado

Gostaria de um script que anunciasse a morte um player por outro player..

 

Já tentei inumeros scripts e não funcionaram...

Meu TSF é o Real Server 3.1.

Link para o post
Compartilhar em outros sites
Caronte

Caronte 718

Postado
Postado 

function onDeath(cid, corpse, deathList)
    if not isPlayer(cid) then
        return true
    end
    local killer = deathList[1] 
    if isMonster(killer) then
        doBroadcastMessage(getCreatureName(cid).." [Level: "..getPlayerLevel(cid).."] foi morto pelo monstro "..getCreatureName(killer).."." , MESSAGE_STATUS_CONSOLE_RED)
    elseif isPlayer(killer) then
        doBroadcastMessage(getCreatureName(cid).." [Level: "..getPlayerLevel(cid).."] foi morto por "..getCreatureName(killer).." [Level: "..getPlayerLevel(killer).."].", MESSAGE_STATUS_CONSOLE_RED)
    end
    return true
end


 <event type="death" name="anunciarmorte" event="script" value="anunciarmorte.lua"/>

Se quiser sua dúvida tirada, mande PM com os links, e não com a dúvida (outros podem ter a mesma dúvida, e o fórum serve para ser usado).

 

Tópicos:

 

yNlhRVC.png

 

55px-Judo_yellow_belt.svg.png

Link para o post
Compartilhar em outros sites
  • Moderador
Movie

Movie 298

Postado
  • Autor
  • Moderador
Postado 
function onDeath(cid, corpse, deathList)
    if not isPlayer(cid) then
        return true
    end
    local killer = deathList[1] 
    if isMonster(killer) then
        doBroadcastMessage(getCreatureName(cid).." [Level: "..getPlayerLevel(cid).."] foi morto pelo monstro "..getCreatureName(killer).."." , MESSAGE_STATUS_CONSOLE_RED)
    elseif isPlayer(killer) then
        doBroadcastMessage(getCreatureName(cid).." [Level: "..getPlayerLevel(cid).."] foi morto por "..getCreatureName(killer).." [Level: "..getPlayerLevel(killer).."].", MESSAGE_STATUS_CONSOLE_RED)
    end
    return true
end

 <event type="death" name="anunciarmorte" event="script" value="anunciarmorte.lua"/>

No login.lua eu coloco o que?

Link para o post
Compartilhar em outros sites
Caronte

Caronte 718

Postado
Postado 

registerCreatureEvent(cid, "anunciarmorte")

antes do último return true

Se quiser sua dúvida tirada, mande PM com os links, e não com a dúvida (outros podem ter a mesma dúvida, e o fórum serve para ser usado).

 

Tópicos:

 

yNlhRVC.png

 

55px-Judo_yellow_belt.svg.png

Link para o post
Compartilhar em outros sites
  • Moderador
Movie

Movie 298

Postado
  • Autor
  • Moderador
Postado 
registerCreatureEvent(cid, "anunciarmorte")

antes do último return true

 

Não achei nenhum return true no meu login.lua.

local config = {
	loginMessage = getConfigValue('loginMessage')
}

function onLogin(cid)
	local loss = getConfigValue('deathLostPercent')
	if(loss ~= nil) then
		doPlayerSetLossPercent(cid, PLAYERLOSS_EXPERIENCE, loss * 10)
	end

	local accountManager = getPlayerAccountManager(cid)
	if(accountManager == MANAGER_NONE) then
		local lastLogin, str = getPlayerLastLoginSaved(cid), config.loginMessage
		if(lastLogin > 0) then
			doPlayerSendTextMessage(cid, MESSAGE_STATUS_DEFAULT, str)
			str = "Your last visit was on " .. os.date("%a %b %d %X %Y", lastLogin) .. "."
		else
			str = str .. " Please choose your outfit."
			doPlayerSendOutfitWindow(cid)
		end

		doPlayerSendTextMessage(cid, MESSAGE_STATUS_DEFAULT, str)
	elseif(accountManager == MANAGER_NAMELOCK) then
		doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Hello, it appears that your character has been namelocked, what would you like as your new name?")
	elseif(accountManager == MANAGER_ACCOUNT) then
		doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Hello, type 'account' to manage your account and if you want to start over then type 'cancel'.")
	else
		doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Hello, type 'account' to create an account or type 'recover' to recover an account.")
	end

	if(not isPlayerGhost(cid)) then
		doSendMagicEffect(getCreaturePosition(cid), CONST_ME_TELEPORT)
	end

	registerCreatureEvent(cid, "Mail")
	registerCreatureEvent(cid, "GuildMotd")
	
registerCreatureEvent(cid, "killer")
registerCreatureEvent(cid, "Idle")

registerCreatureEvent(cid, "owned")
registerCreatureEvent(cid, "attackguild")	
registerCreatureEvent(cid, "DeathBroadCast")
registerCreatureEvent(cid, "advance")
registerCreatureEvent(cid, "BroadMobs")
registerCreatureEvent(cid, "FimVip")

registerCreatureEvent(cid, "forever amulet")
registerCreatureEvent(cid, "SkullCheck")
	registerCreatureEvent(cid, "ReportBug")

registerCreatureEvent(cid, "PlayerKill")
registerCreatureEvent(cid, "onPrepareDeath")
registerCreatureEvent(cid, "ZombieAttack")
    if (InitArenaScript ~= 0) then
    InitArenaScript = 1
    -- make arena rooms free
        for i = 42300, 42309 do
            setGlobalStorageValue(i, 0)
            setGlobalStorageValue(i+100, 0)
        end
    end
    -- if he did not make full arena 1 he must start from zero
    if getPlayerStorageValue(cid, 42309) < 1 then
        for i = 42300, 42309 do
            setPlayerStorageValue(cid, i, 0)
        end
    end
    -- if he did not make full arena 2 he must start from zero
    if getPlayerStorageValue(cid, 42319) < 1 then
        for i = 42310, 42319 do
            setPlayerStorageValue(cid, i, 0)
        end
    end
    -- if he did not make full arena 3 he must start from zero
    if getPlayerStorageValue(cid, 42329) < 1 then
        for i = 42320, 42329 do
            setPlayerStorageValue(cid, i, 0)
        end
    end
    if getPlayerStorageValue(cid, 42355) == -1 then
        setPlayerStorageValue(cid, 42355, 0) -- did not arena level
    end
    setPlayerStorageValue(cid, 42350, 0) -- time to kick 0
    setPlayerStorageValue(cid, 42352, 0) -- is not in arena
Link para o post
Compartilhar em outros sites
elton123

elton123 36

Postado
Postado (editado) 
local config = {
	loginMessage = getConfigValue('loginMessage')
}
 
function onLogin(cid)
	local loss = getConfigValue('deathLostPercent')
	if(loss ~= nil) then
		doPlayerSetLossPercent(cid, PLAYERLOSS_EXPERIENCE, loss * 10)
	end
 
	local accountManager = getPlayerAccountManager(cid)
	if(accountManager == MANAGER_NONE) then
		local lastLogin, str = getPlayerLastLoginSaved(cid), config.loginMessage
		if(lastLogin > 0) then
			doPlayerSendTextMessage(cid, MESSAGE_STATUS_DEFAULT, str)
			str = "Your last visit was on " .. os.date("%a %b %d %X %Y", lastLogin) .. "."
		else
			str = str .. " Please choose your outfit."
			doPlayerSendOutfitWindow(cid)
		end
 
		doPlayerSendTextMessage(cid, MESSAGE_STATUS_DEFAULT, str)
	elseif(accountManager == MANAGER_NAMELOCK) then
		doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Hello, it appears that your character has been namelocked, what would you like as your new name?")
	elseif(accountManager == MANAGER_ACCOUNT) then
		doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Hello, type 'account' to manage your account and if you want to start over then type 'cancel'.")
	else
		doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Hello, type 'account' to create an account or type 'recover' to recover an account.")
	end
 
	if(not isPlayerGhost(cid)) then
		doSendMagicEffect(getCreaturePosition(cid), CONST_ME_TELEPORT)
	end
 
registerCreatureEvent(cid, "Mail")
registerCreatureEvent(cid, "GuildMotd")
	
registerCreatureEvent(cid, "killer")
registerCreatureEvent(cid, "Idle")
 
registerCreatureEvent(cid, "owned")
registerCreatureEvent(cid, "attackguild")	
registerCreatureEvent(cid, "DeathBroadCast")
registerCreatureEvent(cid, "advance")
registerCreatureEvent(cid, "BroadMobs")
registerCreatureEvent(cid, "FimVip")
 
registerCreatureEvent(cid, "forever amulet")
registerCreatureEvent(cid, "SkullCheck")
registerCreatureEvent(cid, "ReportBug")
 
registerCreatureEvent(cid, "PlayerKill")
registerCreatureEvent(cid, "onPrepareDeath")
registerCreatureEvent(cid, "ZombieAttack")
registerCreatureEvent(cid, "anunciarmorte")

    if (InitArenaScript ~= 0) then
    InitArenaScript = 1
    -- make arena rooms free
        for i = 42300, 42309 do
            setGlobalStorageValue(i, 0)
            setGlobalStorageValue(i+100, 0)
        end
    end
    -- if he did not make full arena 1 he must start from zero
    if getPlayerStorageValue(cid, 42309) < 1 then
        for i = 42300, 42309 do
            setPlayerStorageValue(cid, i, 0)
        end
    end
    -- if he did not make full arena 2 he must start from zero
    if getPlayerStorageValue(cid, 42319) < 1 then
        for i = 42310, 42319 do
            setPlayerStorageValue(cid, i, 0)
        end
    end
    -- if he did not make full arena 3 he must start from zero
    if getPlayerStorageValue(cid, 42329) < 1 then
        for i = 42320, 42329 do
            setPlayerStorageValue(cid, i, 0)
        end
    end
    if getPlayerStorageValue(cid, 42355) == -1 then
        setPlayerStorageValue(cid, 42355, 0) -- did not arena level
    end
    setPlayerStorageValue(cid, 42350, 0) -- time to kick 0
    setPlayerStorageValue(cid, 42352, 0) -- is not in arena
Editado por elton123 (veja o histórico de edições)
Link para o post
Compartilhar em outros sites
Caronte

Caronte 718

Postado
Postado

Coloca em baixo de

registerCreatureEvent(cid, "ZombieAttack")

como o elton mostrou...

Se quiser sua dúvida tirada, mande PM com os links, e não com a dúvida (outros podem ter a mesma dúvida, e o fórum serve para ser usado).

 

Tópicos:

 

yNlhRVC.png

 

55px-Judo_yellow_belt.svg.png

Link para o post
Compartilhar em outros sites
  • Moderador
Movie

Movie 298

Postado
  • Autor
  • Moderador
Postado

Coloca em baixo de

registerCreatureEvent(cid, "ZombieAttack")

como o elton mostrou...

Não funcionou :/

Link para o post
Compartilhar em outros sites
Vodkart

Vodkart 2155

Postado
Postado

tem certeza que esse onLogin é o certo? vc postou todo ele? porque falta 'end' ai no seu código... poste de novo TODO seu onLogin para eu ver.

vodkart_logo.png

[*Ninguém será digno do sucesso se não usar suas derrotas para conquistá-lo.*]

 

DISCORD: vodkart#6090

 

Link para o post
Compartilhar em outros sites
  • Moderador
Movie

Movie 298

Postado
  • Autor
  • Moderador
Postado

tem certeza que esse onLogin é o certo? vc postou todo ele? porque falta 'end' ai no seu código... poste de novo TODO seu onLogin para eu ver.

esse é o login.lua, você gostaria que eu postasse o OnLogin.lua?
Link para o post
Compartilhar em outros sites
luanluciano93

luanluciano93 1994

Postado
Postado 
-- <event type="login" name="MorteLogin" event="script" value="anunciar_morte.lua"/>
-- <event type="death" name="MorteDeath" event="script" value="anunciar_morte.lua"/>

function onLogin(cid)
	registerCreatureEvent(cid, "MorteDeath")
end

function onDeath(cid, corpse, deathList)
    if not isPlayer(cid) then
        return true
    end
    
	local killer = deathList[1] 
    if isMonster(killer) then
        doBroadcastMessage(getCreatureName(cid).." [Level: "..getPlayerLevel(cid).."] foi morto pelo monstro "..getCreatureName(killer).."." , MESSAGE_STATUS_CONSOLE_RED)
    elseif isPlayer(killer) then
        doBroadcastMessage(getCreatureName(cid).." [Level: "..getPlayerLevel(cid).."] foi morto por "..getCreatureName(killer).." [Level: "..getPlayerLevel(killer).."].", MESSAGE_STATUS_CONSOLE_RED)
    end
    
	return true
end

 

1647515_5.png

Jester_Doll.gif STYLLER OT 2022 Jester_Doll.gif

Link para o post
Compartilhar em outros sites
  • Moderador
Movie

Movie 298

Postado
  • Autor
  • Moderador
Postado 
-- <event type="login" name="MorteLogin" event="script" value="anunciar_morte.lua"/>
-- <event type="death" name="MorteDeath" event="script" value="anunciar_morte.lua"/>

function onLogin(cid)
	registerCreatureEvent(cid, "MorteDeath")
end

function onDeath(cid, corpse, deathList)
    if not isPlayer(cid) then
        return true
    end
    
	local killer = deathList[1] 
    if isMonster(killer) then
        doBroadcastMessage(getCreatureName(cid).." [Level: "..getPlayerLevel(cid).."] foi morto pelo monstro "..getCreatureName(killer).."." , MESSAGE_STATUS_CONSOLE_RED)
    elseif isPlayer(killer) then
        doBroadcastMessage(getCreatureName(cid).." [Level: "..getPlayerLevel(cid).."] foi morto por "..getCreatureName(killer).." [Level: "..getPlayerLevel(killer).."].", MESSAGE_STATUS_CONSOLE_RED)
    end
    
	return true
end

Não deu :x

Link para o post
Compartilhar em outros sites
  • Solução
zipter98

zipter98 460

Postado
  • Solução
Postado (editado) 
function onKill(cid, target)
    if isPlayer(cid) and isPlayer(target) then
        broadcastMessage(getCreatureName(cid).." killed "..getCreatureName(target))
    end
    return true
end
function onLogin(cid)
    registerCreatureEvent(cid, "killPlayer")
    return true
end
Tags:
<event type="kill" name="killPlayer" script="nome_do_arquivo.lua"/>
<event type="login" name="killPlayerLogin" event="script" value="nome_do_arquivo.lua"/>
Editado por zipter98 (veja o histórico de edições)

não respondo pms solicitando suporte em programação/scripting

Link para o post
Compartilhar em outros sites
  • Moderador
Movie

Movie 298

Postado
  • Autor
  • Moderador
Postado 
function onKill(cid, target)
    if isPlayer(cid) and isPlayer(target) then
        broadcastMessage(getCreatureName(cid).." killed "..getCreatureName(target))
    end
    return true
end
function onLogin(cid)
    registerCreatureEvent(cid, "killPlayer")
    return true
end
Tags:
<event type="kill" name="killPlayer" script="nome_do_arquivo.lua"/>
<event type="login" name="killPlayerLogin" event="script" value="nome_do_arquivo.lua"/>

 

Obrigado a todos que responderam... Eu mudei minha distro e os erros acabaram, porém obrigado a todos que se esforçaram.

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.

×
 Share
Seguidores 0
Ir para a lista de tópicos

  • Quem Está Navegando   0 membros estão online

    Nenhum usuário registrado visualizando esta página.

TibiaKing

Open Tibia Server

Quer aprender a criar seu próprio servidor de Tibia? Então está no lugar certo, aqui você encontrará milhares de tutorias, scripts, códigos, mapas e utilitários para que você possa fazer o seu próprio servidor de Tibia começando do zero.

Redes Sociais

Anuncie no TibiaKing

Precisa de mais visibilidade em seus projetos? Quer fazer um plano publicitário para o seu servidor? Anuncie no OTKing e faça sua divulgação, possuímos centenas de acessos simultâneos e milhares diários, com certeza será a sua solução!

×
×
  • Criar Novo...

Informação Importante

Confirmação de Termo

  Eu aceito