TalkAction Advanced !bless command

Azi · Jun 16, 2009

Hello!
I wrote a script that will buy us a blessing with the command LOLOL. The script buy only blessings for which to be, which fulfills the requirements (premium account) and only those who have not taken out ... When you use a command is sent to us the message of the report, which bought a blessing for which we can not afford that were previously taken out and those that do not meet requirements. I decided to publish it because it is a little more advanced than those of simple, published long ago in the forum.

data/talkactions/scripts/blessing.lua:

PHP:

-- // config // --
local bless = {
	{cost = 10000, premium = "no", name="First"},
	{cost = 10000, premium = "no", name="Second"},
	{cost = 10000, premium = "no", name="Third"},
	{cost = 10000, premium = "yes", name="Fourth"},
	{cost = 10000, premium = "yes", name="Fifth"},

}
-- // end // --



-- // do not touch! // --
local blessings = {}
local cost = 0
local msg = "Blessing buying report: "
-- // Blessing command script by ersiu // --
function onSay(cid, words, param)
	for i, blessing in ipairs(bless) do
		if getPlayerBlessing(cid, i) == TRUE then
			if doPlayerRemoveMoney(cid, blessing.cost) == TRUE then
				if (isPremium(cid) == TRUE or string.lower(blessing.premium) == "no") then
					msg = msg.."\n "..blessing.name.." bought successfuly"
					cost = cost+blessing.cost
					table.insert(blessing, i)
				else
					msg = msg.."\n "..blessing.name.." not bought, to get you need premium."
				end
			else
				msg = msg.."\n "..blessing.name.." not bought, to get you need "..blessing.cost.." gp."
			end
		else
			msg = msg.."\n "..blessing.name.." already bought."
		end
	end
	
	for _, addBless in ipairs(blessings) do
		doPlayerAddBlessing(cid, addBless)
	end
	
	doPlayerSendTextMessage(cid, 19, msg..".\n Total Cost: "..cost.." gp.")
	return TRUE
end
-- // END // --

data/talkactions/talkactions.xml

PHP:

<talkaction log="no" words="!bless" access="0" event="script" value="blessing.lua"/>

To buy bless use only: !bless

Yours,
Azi.

Hermes · Jun 16, 2009

Nice. But I will improve it a bit before using (ofcourse IF I WOULD USE :f).

JDB · Jun 17, 2009

Great scripter.
Nice script.

Rappine · Jun 17, 2009

when player die with bless dont lose the items? :S

Azi · Jun 17, 2009

#up
you can set it in vocations.xml : )

Slain · Jun 19, 2009

Azi said:
#up
you can set it in vocations.xml : )

how?

Azi · Jun 19, 2009

idk, search it, i seen it on forums.

huhuhuhu · Jun 29, 2009

[29/06/2009 02:04:44] Lua Script Error: [TalkAction Interface]
[29/06/2009 02:04:44] data/talkactions/scripts/blessing.lua

nSay

[29/06/2009 02:04:44] data/talkactions/scripts/blessing.lua:38: bad argument #1 to 'ipairs' (table expected, got nil)
[29/06/2009 02:04:44] stack traceback:
[29/06/2009 02:04:44] [C]: in function 'ipairs'
[29/06/2009 02:04:44] data/talkactions/scripts/blessing.lua:38: in function <data/talkactions/scripts/blessing.lua:19>

how to fix? :blink:

Shan Trus · Jun 30, 2009

Nice script!

Aleh · Jul 2, 2009

[02/07/2009 19:27:31] Lua Script Error: [TalkAction Interface]
[02/07/2009 19:27:31] data/talkactions/scripts/blessing.luanSay

[02/07/2009 19:27:31] data/talkactions/scripts/blessing.lua:38: bad argument #1 to 'ipairs' (table expected, got nil)
[02/07/2009 19:27:32] stack traceback:
[02/07/2009 19:27:32] [C]: in function 'ipairs'
[02/07/2009 19:27:32] data/talkactions/scripts/blessing.lua:38: in function <data/talkactions/scripts/blessing.lua:19>

[02/07/2009 19:27:36] Lua Script Error: [TalkAction Interface]
[02/07/2009 19:27:37] data/talkactions/scripts/blessing.luanSay

[02/07/2009 19:27:37] data/talkactions/scripts/blessing.lua:38: bad argument #1 to 'ipairs' (table expected, got nil)
[02/07/2009 19:27:37] stack traceback:
[02/07/2009 19:27:37] [C]: in function 'ipairs'
[02/07/2009 19:27:37] data/talkactions/scripts/blessing.lua:38: in function <data/talkactions/scripts/blessing.lua:19>

Help

wlj · Jul 5, 2009

added to roxor project!

Szakal · Jul 7, 2009

nice i'll use

Swimmi · Jul 9, 2009

Code:

[09/07/2009 03:02:05] Lua Script Error: [TalkAction Interface] 
[09/07/2009 03:02:05] data/talkactions/scripts/blessing.lua:onSay

[09/07/2009 03:02:05] data/talkactions/scripts/blessing.lua:38: bad argument #1 to 'ipairs' (table expected, got nil)
[09/07/2009 03:02:05] stack traceback:
[09/07/2009 03:02:05] 	[C]: in function 'ipairs'
[09/07/2009 03:02:05] 	data/talkactions/scripts/blessing.lua:38: in function <data/talkactions/scripts/blessing.lua:19>

ölolololol

Idiot · Jul 18, 2009

Nice Script//
Keep on Scripting

Shawak · Jul 18, 2009

Swimmi said:

Code:

[09/07/2009 03:02:05] Lua Script Error: [TalkAction Interface] 
[09/07/2009 03:02:05] data/talkactions/scripts/blessing.lua:onSay

[09/07/2009 03:02:05] data/talkactions/scripts/blessing.lua:38: bad argument #1 to 'ipairs' (table expected, got nil)
[09/07/2009 03:02:05] stack traceback:
[09/07/2009 03:02:05] 	[C]: in function 'ipairs'
[09/07/2009 03:02:05] 	data/talkactions/scripts/blessing.lua:38: in function <data/talkactions/scripts/blessing.lua:19>

ölolololol

Fixed.

Lua:

-- // config // --
local bless = {
    {cost = 10000, premium = "no", name="First"},
    {cost = 10000, premium = "no", name="Second"},
    {cost = 10000, premium = "no", name="Third"},
    {cost = 10000, premium = "yes", name="Fourth"},
    {cost = 10000, premium = "yes", name="Fifth"},

}
-- // end // --



-- // do not touch! // --
local blessings = {}
local cost = 0
local msg = "Blessing buying report: "
-- // Blessing command script by ersiu // --
function onSay(cid, words, param)
    for i, blessing in ipairs(bless) do
        if getPlayerBlessing(cid, i) == TRUE then
            if doPlayerRemoveMoney(cid, blessing.cost) == TRUE then
                if (isPremium(cid) == TRUE or string.lower(blessing.premium) == "no") then
                    msg = msg.."\n "..blessing.name.." bought successfuly"
                    cost = cost+blessing.cost
                    table.insert(blessing, i)
                else
                    msg = msg.."\n "..blessing.name.." not bought, to get you need premium."
                end
            else
                msg = msg.."\n "..blessing.name.." not bought, to get you need "..blessing.cost.." gp."
            end
        else
            msg = msg.."\n "..blessing.name.." already bought."
        end
    end
    
    for _, addBless in ipairs(blessings) do
        doPlayerAddBlessing(cid, addBless)
    end
    
    doPlayerSendTextMessage(cid, 19, msg..".\n Total Cost: "..cost.." gp.")
    return TRUE
end
-- // END // --

@ Azi:
Change..

Lua:

    for _, addBless in ipairs(blessing) do
        doPlayerAddBlessing(cid, addBless)
    end

..to..

Lua:

    for _, addBless in ipairs(blessings) do
        doPlayerAddBlessing(cid, addBless)
    end

(blessings)

Regards,
Shawak

Azi · Jul 18, 2009

#up
yes, true. rep. : )
hermes is sux tester

TalkAction Advanced !bless command

Azi

Banned User

Hermes

dziwki kola gramy w lola

JDB

OtLand Veteran

Rappine

Empire will back

Azi

Banned User

Slain

TrueHavoc.com

Azi

Banned User

huhuhuhu

New Member

Shan Trus

New Member

Aleh

Active Member

wlj

retierd

Szakal

Frank Jaeger

Swimmi

♥Inactive♥

Idiot

New Member

Shawak

Intermediate OT User

Azi

Banned User

Similar threads