xTibia

.com
HI

[Talk] Adc E Remover Mana/hp (By Vodkart)

Por hique86, 09 de set. de 2011 em Archived

otserv
tibia
script
6
1.1k
hique86H
09 de setembro de 2011 às 14:00

Estou querendo colocar esse script no meu ot, mas quando fui testar, quando vou adicionar o hp, não importa a quantidade, sempre é adicionado 20000, não sei porque, isso acontece só pra adicionar o hp, para adicionar a mana está porfeitin...

 

Script:

 

--[[ Script by 10% Vodkart and 90% Devilmoon ]]--

--[[ para o Xtibia.com ]]--

 

function onSay(cid, words, param)

 

if(words == "/addmana") then

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

if not t[2] then

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Invalid param specified.")

return

end

local player = getPlayerByName(t[1])

local quanty = t[2]

local pid = getPlayerByNameWildcard(t[1])

mana = getCreatureMana(player)+quanty

if(not pid or (isPlayerGhost(pid) and getPlayerGhostAccess(pid) > getPlayerGhostAccess(cid))) then

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Player with this name doesn\'t exist or is offline.")

return TRUE

end

setCreatureMaxMana(player, mana)

doCreatureAddMana(player, getCreatureMaxMana(player))

doPlayerSendTextMessage(player, 19, "Foram adicionados "..quanty.." de mana do seu character agora você tem " .. getCreatureMana(cid) .. "/" .. getCreatureMaxMana(cid) .. " de Mana.")

doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Você adicionou "..quanty.." de mana ao jogador " .. t[1] .. " ")

 

elseif(words == "/delmana") then

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

if not t[2] then

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Invalid param specified.")

return

end

local player = getPlayerByName(t[1])

local quanty = t[2]

local pid = getPlayerByNameWildcard(t[1])

mana = getCreatureMana(player)-quanty

if(not pid or (isPlayerGhost(pid) and getPlayerGhostAccess(pid) > getPlayerGhostAccess(cid))) then

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Player with this name doesn\'t exist or is offline.")

return TRUE

end

setCreatureMaxMana(player, mana)

doCreatureAddMana(player, getCreatureMaxMana(player))

doPlayerSendTextMessage(player, 19, "Foram removidos "..quanty.." de mana do seu character agora você tem " .. getCreatureMana(cid) .. "/" .. getCreatureMaxMana(cid) .. " de Mana.")

doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Você Removeu "..quanty.." de mana do jogador " .. t[1] .. " ")

 

elseif(words == "/addhp") then

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

if not t[2] then

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Invalid param specified.")

return

end

local player = getPlayerByName(t[1])

local quanty = t[2]

local pid = getPlayerByNameWildcard(t[1])

health = getCreatureMaxHealth(player)+quanty

if(not pid or (isPlayerGhost(pid) and getPlayerGhostAccess(pid) > getPlayerGhostAccess(cid))) then

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Player with this name doesn\'t exist or is offline.")

return TRUE

end

setCreatureMaxHealth(player, health)

doCreatureAddHealth(player, getCreatureMaxHealth(player))

doPlayerSendTextMessage(player, 19, "Foram adicionados "..quanty.." de hp do seu character agora você tem " .. getCreatureHealth(cid) .. "/" .. getCreatureMaxHealth(cid) .. " de HP.")

doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Você adicionou "..quanty.." de health do jogador " .. t[1] .. " ")

 

elseif(words == "/delhp") then

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

if not t[2] then

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Invalid param specified.")

return

end

local player = getPlayerByName(t[1])

local quanty = t[2]

local pid = getPlayerByNameWildcard(t[1])

health = getCreatureHealth(player)-quanty

if(not pid or (isPlayerGhost(pid) and getPlayerGhostAccess(pid) > getPlayerGhostAccess(cid))) then

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Player with this name doesn\'t exist or is offline.")

return TRUE

end

setCreatureMaxHealth(player, health)

doCreatureAddHealth(player, getCreatureMaxHealth(player))

doPlayerSendTextMessage(player, 19, "Foram Removidos "..quanty.." de hp do seu character agora você tem " .. getCreatureHealth(cid) .. "/" .. getCreatureMaxHealth(cid) .. " de HP.")

doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Você Removeu "..quanty.." de health do jogador " .. t[1] .. " ")

end

return TRUE

end

 

 

Ss de quando adiciono o hp:

 

semttulo2fx.png

 

 

Ss de quando adiciono a mana:

 

semttulo2ch.png

 

 

Da uma ajuda ai quem souber, por favor e obrigado!!!

IlidianI
09 de setembro de 2011 às 17:33

Estranho funcionar certinho com mana e bugar com hp... de qualquer forma, tenta isso:

 

--[[ Script by 10% Vodkart and 90% Devilmoon ]]--
--[[ para o Xtibia.com ]]--

function onSay(cid, words, param)
if(words == "/addmana") then
	local t = string.explode(param, ",")
	if not t[2] then
		doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Invalid param specified.")
		return true
	end
	local player = getPlayerByName(t[1])
	local quanty = t[2]
	local pid = getPlayerByNameWildcard(t[1])
	mana = getCreatureMana(player)+quanty
	if(not pid or (isPlayerGhost(pid) and getPlayerGhostAccess(pid) > getPlayerGhostAccess(cid))) then
		doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Player with this name doesn\'t exist or is offline.")
		return true
	end
	setCreatureMaxMana(player, mana)
	doCreatureAddMana(player, getCreatureMaxMana(player))
	doPlayerSendTextMessage(player, 19, "Foram adicionados "..quanty.." de mana do seu character agora você tem " .. getCreatureMana(cid) .. "/" .. getCreatureMaxMana(cid) .. " de Mana.")
	doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Você adicionou "..quanty.." de mana ao jogador " .. t[1] .. " ")

elseif(words == "/delmana") then
	local t = string.explode(param, ",")
	if not t[2] then
		doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Invalid param specified.")
		return true
	end
	local player = getPlayerByName(t[1])
	local quanty = t[2]
	local pid = getPlayerByNameWildcard(t[1])
	mana = getCreatureMana(player)-quanty
	if(not pid or (isPlayerGhost(pid) and getPlayerGhostAccess(pid) > getPlayerGhostAccess(cid))) then
		doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Player with this name doesn\'t exist or is offline.")
		return true
	end
	setCreatureMaxMana(player, mana)
	doCreatureAddMana(player, getCreatureMaxMana(player))
	doPlayerSendTextMessage(player, 19, "Foram removidos "..quanty.." de mana do seu character agora você tem " .. getCreatureMana(cid) .. "/" .. getCreatureMaxMana(cid) .. " de Mana.")
	doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Você Removeu "..quanty.." de mana do jogador " .. t[1] .. " ")

elseif(words == "/addhp") then
	local t = string.explode(param, ",")
	if not t[2] then
		doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Invalid param specified.")
	return true
	end
	local player = getPlayerByName(t[1])
	local quanty = t[2]
	local pid = getPlayerByNameWildcard(t[1])
	health = getCreatureMaxHealth(player)+quanty
	if(not pid or (isPlayerGhost(pid) and getPlayerGhostAccess(pid) > getPlayerGhostAccess(cid))) then
		doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Player with this name doesn\'t exist or is offline.")
	return true
	end
	setCreatureMaxHealth(player, getCreatureMaxHealth(player) + quanty)
	doCreatureAddHealth(player, getCreatureMaxHealth(player))
	doPlayerSendTextMessage(player, 19, "Foram adicionados "..quanty.." de hp do seu character agora você tem " .. getCreatureHealth(cid) .. "/" .. getCreatureMaxHealth(cid) .. " de HP.")
	doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Você adicionou "..quanty.." de health do jogador " .. t[1] .. " ")

elseif(words == "/delhp") then
	local t = string.explode(param, ",")
	if not t[2] then
		doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Invalid param specified.")
	return true
	end
	local player = getPlayerByName(t[1])
	local quanty = t[2]
	local pid = getPlayerByNameWildcard(t[1])
	health = getCreatureHealth(player)-quanty
	if(not pid or (isPlayerGhost(pid) and getPlayerGhostAccess(pid) > getPlayerGhostAccess(cid))) then
		doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Player with this name doesn\'t exist or is offline.")
	return true
	end
	setCreatureMaxHealth(player, health)
	doCreatureAddHealth(player, getCreatureMaxHealth(player))
	doPlayerSendTextMessage(player, 19, "Foram Removidos "..quanty.." de hp do seu character agora você tem " .. getCreatureHealth(cid) .. "/" .. getCreatureMaxHealth(cid) .. " de HP.")
	doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Você Removeu "..quanty.." de health do jogador " .. t[1] .. " ")
end
return true
end

DemonbholderD
10 de setembro de 2011 às 18:57
--[[ Script by 10% Vodkart and 90% Devilmoon ]]--
--[[ para o Xtibia.com ]]--

function onSay(cid, words, param)

if(words == "/addmana") then
local t = string.explode(param, ",")
if not t[2] then
doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Invalid param specified.")
return
end
local player = getPlayerByName(t[1])
local quanty = t[2]
local pid = getPlayerByNameWildcard(t[1])
mana = getCreatureMana(player)+quanty
if(not pid or (isPlayerGhost(pid) and getPlayerGhostAccess(pid) > getPlayerGhostAccess(cid))) then
doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Player with this name doesn\'t exist or is offline.")
return TRUE
end
setCreatureMaxMana(player, mana)
doCreatureAddMana(player, getCreatureMaxMana(player))
doPlayerSendTextMessage(player, 19, "Foram adicionados "..quanty.." de mana do seu character agora você tem " .. getCreatureMana(cid) .. "/" .. getCreatureMaxMana(cid) .. " de Mana.")
doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Você adicionou "..quanty.." de mana ao jogador " .. t[1] .. " ")

elseif(words == "/delmana") then
local t = string.explode(param, ",")
if not t[2] then
doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Invalid param specified.")
return
end
local player = getPlayerByName(t[1])
local quanty = t[2]
local pid = getPlayerByNameWildcard(t[1])
mana = getCreatureMana(player)-quanty
if(not pid or (isPlayerGhost(pid) and getPlayerGhostAccess(pid) > getPlayerGhostAccess(cid))) then
doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Player with this name doesn\'t exist or is offline.")
return TRUE
end
setCreatureMaxMana(player, mana)
doCreatureAddMana(player, getCreatureMaxMana(player))
doPlayerSendTextMessage(player, 19, "Foram removidos "..quanty.." de mana do seu character agora você tem " .. getCreatureMana(cid) .. "/" .. getCreatureMaxMana(cid) .. " de Mana.")
doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Você Removeu "..quanty.." de mana do jogador " .. t[1] .. " ")

elseif(words == "/addhp") then
local t = string.explode(param, ",")
if not t[2] then
doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Invalid param specified.")
return
end
local player = getPlayerByName(t[1])
local quanty = t[2]
local pid = getPlayerByNameWildcard(t[1])
health = getCreatureHealth(player)+quanty
if(not pid or (isPlayerGhost(pid) and getPlayerGhostAccess(pid) > getPlayerGhostAccess(cid))) then
doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Player with this name doesn\'t exist or is offline.")
return TRUE
end
setCreatureMaxHealth(player, health)
doCreatureAddHealth(player, getCreatureMaxHealth(player))
doPlayerSendTextMessage(player, 19, "Foram adicionados "..quanty.." de hp do seu character agora você tem " .. getCreatureHealth(cid) .. "/" .. getCreatureMaxHealth(cid) .. " de HP.")
doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Você adicionou "..quanty.." de health do jogador " .. t[1] .. " ")

elseif(words == "/delhp") then
local t = string.explode(param, ",")
if not t[2] then
doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Invalid param specified.")
return
end
local player = getPlayerByName(t[1])
local quanty = t[2]
local pid = getPlayerByNameWildcard(t[1])
health = getCreatureHealth(player)-quanty
if(not pid or (isPlayerGhost(pid) and getPlayerGhostAccess(pid) > getPlayerGhostAccess(cid))) then
doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Player with this name doesn\'t exist or is offline.")
return TRUE
end
setCreatureMaxHealth(player, health)
doCreatureAddHealth(player, getCreatureMaxHealth(player))
doPlayerSendTextMessage(player, 19, "Foram Removidos "..quanty.." de hp do seu character agora você tem " .. getCreatureHealth(cid) .. "/" .. getCreatureMaxHealth(cid) .. " de HP.")
doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Você Removeu "..quanty.." de health do jogador " .. t[1] .. " ")
end
return TRUE
end

hique86H
13 de setembro de 2011 às 14:33

Nenhuma das alternativas funcionou, continua na mesma.

Qualquer quantidade que eu adiciono de hp no player, sempre é adicionado 20k de hp.

 

Ajuda ae por favor!!

DemonbholderD
15 de setembro de 2011 às 14:31

Ele fez uma confusão no script, melhor refazer todo.

hique86H
15 de setembro de 2011 às 15:56

não manjo de script =/

 

alguém refaz pra mim ou monta um script com essa função, por favor!!

 

valew