[TFS 1.x] Talkactions: !aol / !bless

[luanluciano93 1979]

Vá em talkactions/talkactions.xml e add as tags:

<talkaction words="!aol" script="!aol.lua"/>
<talkaction words="!bless" script="!bless.lua"/>

Agora crie 2 arquivos .lua em talkactions/scripts/ com os nomes: !aol.lua e !bless.lua.

Depois coloque o código dentro dos respectivos arquivos:

 

!aol.lua

Spoiler

local price_aol = 10000

function onSay(player, words, param)

    if player:removeMoney(price_aol) then
        player:getPosition():sendMagicEffect(CONST_ME_MAGIC_RED)
        player:addItem(2173, 1)    
    else
        player:getPosition():sendMagicEffect(CONST_ME_POFF)
        player:sendCancelMessage("You don't have enought money.")
    end

      return true
end

 

 

!bless.lua

Spoiler

local bless = {1, 2, 3, 4, 5}
local price_bless = 100000

function onSay(player, words, param)

    for i = 1, table.maxn(bless) do
        if player:hasBlessing(bless) then
            player:sendCancelMessage("You already have all blessings.")
            player:getPosition():sendMagicEffect(CONST_ME_POFF)
            return false
        end
    end

    if player:removeMoney(price_bless) then
        for i = 1, table.maxn(bless) do
            player:addBlessing(bless)
        end
        
        player:sendTextMessage(MESSAGE_INFO_DESCR, "You have bought all blessings.")
        player:getPosition():sendMagicEffect(CONST_ME_FIREWORK_YELLOW)
    else
        player:sendCancelMessage("You don't have enough money.")
        player:getPosition():sendMagicEffect(CONST_ME_POFF)
    end
    
    return true
end

 

Bem simples pessoal, abraços!

Editado Novembro 14, 2018 por luanluciano93 (veja o histórico de edições)

[CarlosHenrique7457 98]

é possível fazer esse comando !bless  comer diamonds?

tipo quero que o player tenha tau item para pode executar o comando.

[Summ 238]

é possível fazer esse comando !bless  comer diamonds?

tipo quero que o player tenha tau item para pode executar o comando.

 

sim só falar pra que versão do TFS, quando o cara usar o comando bless você quer que ele remova tal diamonds  ... ?

[CarlosHenrique7457 98]

é uma base poketibia PDA

Sim remover Diamonds, é um item que vc compra no site e pode virar vip com ele.

[Summ 238]

se tu já tiver um item que da bless, posta ele ae, se não tiver pode deixar que eu faço um.

[CarlosHenrique7457 98]

Tenho nao

[Summ 238]

Tenho nao

 

Não testei ...

local bless = {1, 2, 3, 4, 5}
local itemid = xxxx -- ID diamonds
local count = xx -- Quantidade de diamonds

function onSay(cid, words, param)
	
	for i = 1, table.maxn(bless) do
		if getPlayerBlessing(cid, bless[i]) then
			return doPlayerSendCancel(cid, "You are full bless.")
		end
	end

	if doPlayerRemoveItem(cid, itemid, count) == true then
		for i = 1, table.maxn(bless) do
			doPlayerAddBlessing(cid, bless[i])
		end
		
			doCreatureSay(cid, "You are now blessed by the Server!" ,19)	
			doSendMagicEffect(cid, 49)
		
		else
		
		return doPlayerSendCancel(cid, "You no have diamonds")	
	end
	
return true
end

Editado Janeiro 11, 2015 por Summ (veja o histórico de edições)

[CarlosHenrique7457 98]

Vou testar Vlw

 

Não testei ...

local bless = {1, 2, 3, 4, 5}
local itemid = xxxx -- ID diamonds
local count = xx -- Quantidade de diamonds

function onSay(cid, words, param)
	
	for i = 1, table.maxn(bless) do
		if getPlayerBlessing(cid, bless[i]) then
			return doPlayerSendCancel(cid, "You are full bless.")
		end
	end

	if doPlayerRemoveItem(cid, itemid, count) == true then
		for i = 1, table.maxn(bless) do
			doPlayerAddBlessing(cid, bless[i])
		end
		
			doCreatureSay(cid, "You are now blessed by the Server!" ,19)	
			doSendMagicEffect(cid, 49)
		
		else
		
		return doPlayerSendCancel(cid, "You no have diamonds")	
	end
	
return true
end

Funcionou, mas aconteceu esse erro quando falo o comando 

 

[11/01/2015 19:06:02] [Error - TalkAction Interface]

[11/01/2015 19:06:02] data/talkactions/scripts/!bless.lua:onSay
[11/01/2015 19:06:02] Description:
[11/01/2015 19:06:02] attempt to index a number value
[11/01/2015 19:06:02] stack traceback:
[11/01/2015 19:06:02]  [C]: in function 'doSendMagicEffect'
[11/01/2015 19:06:02]  data/talkactions/scripts/!bless.lua:19: in function <data/talkactions/scripts/!bless.lua:5>

[Summ 238]

Pronto

local bless = {1, 2, 3, 4, 5}
local itemid = xxxx -- ID diamonds
local count = xx -- Quantidade de diamonds
 
function onSay(cid, words, param)

	for i = 1, table.maxn(bless) do
		if getPlayerBlessing(cid, bless[i]) then
		return doPlayerSendCancel(cid, "You are full bless.")
	end
end
 
	if doPlayerRemoveItem(cid, itemid, count) == true then
		for i = 1, table.maxn(bless) do
			doPlayerAddBlessing(cid, bless[i])
		end

		doCreatureSay(cid, "You are now blessed by the Server!" ,19) 
		doSendMagicEffect(getPlayerPosition(cid), 49)

		else

		return doPlayerSendCancel(cid, "You no have diamonds") 
	end

	return true
end

Editado Janeiro 11, 2015 por Summ (veja o histórico de edições)

[CarlosHenrique7457 98]

Agora sim Vlw +rep, aonde eu mudo o efeito?

qual melhor efeito vc acha ?

Editado Janeiro 11, 2015 por CarlosHenrique7457 (veja o histórico de edições)

[Summ 238]

doSendMagicEffect(getPlayerPosition(cid), 49)

Nessa linha muda o efeito, bom eu coloquei um random, basta ir testando e ver qual mais te agrada.

[luanluciano93 1979]

up

[Pedro. 533]

Luan, como eu faria pra só vip usar esses comandos? 

[Wakon 910]

Luan, como eu faria pra só vip usar esses comandos?

Só colocar um return caso não seja VIP, não sei as funções do TFS 1.1, mas acho que seria assim:

if not player:isPremium() then
    return player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, 'Apenas jogadores premium account podem usar este comando.') and true
end

Coloque depois da callback function onSay.

[Pedro. 533]

Só colocar um return caso não seja VIP, não sei as funções do TFS 1.1, mas acho que seria assim:

if not player:isPremium() then
    return player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, 'Apenas jogadores premium account podem usar este comando.') and true
end

Coloque depois da callback function onSay.

 

testarei aqui, mas obrigado.

[luanluciano93 1979]

@Jobs, qual o seu sistema vip? 

[olicio 0]

Conteúdo antigo porém muito prestativo! Desculpe se estou "revivendo" um tópico mas precisava agradecer! REP++

[Sergio R 5]

Boa tarde! 

comigo não funcionou nenhum dos códigos que achei. Eu uso OTX com a versão do TFS 1.3.

 

Criei uma linha nova no arquivo talkactions.xml dentro da pasta Talkactions.

<talkaction words="!bless" script="bless.lua"/>

e criei um arquivo novo com o nome bless.lua na pasta scripts.

function onSay(cid)

	local player = Player(cid)
	local totalBlessPrice = getBlessingsCost(player:getLevel()) * 5 * 0.7
	
	if player:getBlessings() == 5 then
				player:sendCancelMessage("You already have been blessed!", cid)
			elseif player:removeMoney(totalBlessPrice) then
				player:sendTextMessage(MESSAGE_EVENT_ADVANCE, "You have been blessed by all of eight gods!")
				for b = 1, 5 do
					player:addBlessing(b, 1)
				end
				player:getPosition():sendMagicEffect(CONST_ME_HOLYAREA)
				
			else
				player:sendCancelMessage("You don't have enough money. You need " .. totalBlessPrice .. " to buy bless.", cid)
			end
end

O valor da bless poderá ser alterado conforme o gosto, basta trocar o 0.7 pelo valor desejado.

 

Espero ajudar!!

Abraço

[vine96 33]

alguém sabe como por para somente se o player estiver em area pz poder usar o comando? já fucei em tudo nas funções do tfs 1.3 e não acho kk