Promotion + Bless = Need Scripts!

[vegaseek]

I need a script that makes up every player who logs on to the server gets a promotion. And a script that gives all players endless blessings (eg, when a player falls does not drop his backpack, etc.). Please Scripts Tibia 8.7!

 

[Zysen]

Here's the promotion script.


data/creaturescripts/scripts/promotionlogin.lua

function onLogin(cid)
       if getPlayerVocation(cid) < 5 then
     doPlayerSendTextMessage(cid,22,"You are now promoted, Congratulations!")
               doPlayerSetVocation(cid, getPlayerVocation(cid)+4)
        end
end

data/creaturescripts/creaturescripts.xml add this line:

<event type="login" name="PromotionLogin" script="promotionlogin.lua"/>

data/creaturescripts/scripts/login.lua add this

registerCreatureEvent(cid, "PromotionLogin")

 

[vegaseek]

Thx man!!! Please script for bless ? ;/

 

[mhamad]

config.lua

	-- Blessings
	blessingOnlyPremium = true
	blessingReductionBase = 30
	blessingReductionDecreament = 5
	eachBlessReduction = 10

data/talkactions/sripts

bless

function onSay(cid, words, param)
    if getPlayerBlessing(cid, 1) or getPlayerBlessing(cid, 2) or getPlayerBlessing(cid, 3) or getPlayerBlessing(cid, 4) or getPlayerBlessing(cid, 5) then
        doPlayerSendCancel(cid,'You have already got one or more blessings!')
    else
        if doPlayerRemoveMoney(cid, 100000) == TRUE then
            doPlayerAddBlessing(cid, 1)
            doPlayerAddBlessing(cid, 2)
            doPlayerAddBlessing(cid, 3)
            doPlayerAddBlessing(cid, 4)
            doPlayerAddBlessing(cid, 5)
			doSendMagicEffect(getPlayerPosition(cid), CONST_ME_HOLYDAMAGE)
            doPlayerSendTextMessage(cid,MESSAGE_EVENT_ADVANCE,'You have been blessed by the gods!')
        else
            doPlayerSendCancel(cid, "You need 10 crystal coin to get blessed!")
        end
    end    
    return 1
end

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

 

[Sweddy]

data/creaturescripts/scripts/blesslogin.lua

local bless = {1, 2, 3, 4, 5}
local cost = 0

function onLogin(cid, words, param)
    for i = 1, table.maxn(bless) do
        if(getPlayerBlessing(cid, bless[i])) then
            doPlayerSendCancel(cid, "You have already all blessings.")
            return TRUE
        end
    end
   
    if(doPlayerRemoveMoney(cid, cost) == TRUE) then
        for i = 1, table.maxn(bless) do
            doPlayerAddBlessing(cid, bless[i])
        end
        doCreatureSay(cid, "You are now blessed!" ,19)
        doSendMagicEffect(getPlayerPosition(cid), 49)
    else
        doPlayerSendCancel(cid, "You don't have enough money.")
    end
    return TRUE
end

data/creaturescripts/creaturescripts.xml

<event type="login" name="BlessLogin" script="blesslogin.lua"/>

data/creaturescripts/scripts/login.lua

registerCreatureEvent(cid, "BlessLogin")

Im nooby but maybe it will work ;D

 

[vegaseek]

LOL - Zysen - your script broken...


not allowed to log on the server as I have enabled your script, / sorry man, /

 

[vegaseek]

Mhamad does not understand me ;/

Thank you very Sweddy d I would give you reputations but invisible as, / THX

Unfortunately, the script still needs a promotion for logging because that broken; / blocks seen on the server.

 

[Sweddy]

did my script work?

if not show errors.

 

[mhamad]

sorry I've not read correctly

 

[vegaseek]

Sweddy - Your script is working properly and really helped and ask you now about the script for the promotion; /
mhamad - Ok xD

 

[Zysen]

Ye,sorry man,I was confused.I am writing scripts for my server so I made a mistake.

 

[Sweddy]

data/creaturescripts/scripts/promotionlogin.lua

local config = {
	promotion = 1,	-- promotion level, default = 1 . Ignore if you don't have new vocations.
	minLevel = 1,	-- Level needed to buy promotion
	cost = 0, 	-- Promotion cost in gp
	premium = "no"  -- is premium needed to buy promotion?
}

local disabledVocations = {0}

config.premium = getBooleanFromString(config.premium)

function onLogin(cid, words, param)
	if(isInArray(disabledVocations, getPlayerVocation(cid)) == TRUE) then
		doPlayerSendCancel(cid, "Your vocation cannot gain promotion.")
	elseif(config.premium == TRUE and isPremium(cid) == FALSE) then
		doPlayerSendCancel(cid, "You need a premium account.")
	elseif(getPlayerPromotionLevel(cid) >= config.promotion) then
		doPlayerSendCancel(cid, "You are already promoted.")
	elseif(getPlayerLevel(cid) < config.minLevel) then
		doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "You need " .. config.minLevel .. " to get promotion.")
	elseif(doPlayerRemoveMoney(cid, config.cost) ~= TRUE) then
		doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "You do not have enought money! (Promotion cost " .. config.cost .. " gp.")
	else
		setPlayerPromotionLevel(cid, config.promotion)
		doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "You have been succesful promoted to " .. getVocationInfo(getPlayerVocation(cid)).name .. ".")
	end
	return TRUE
end

data/creaturescripts/creaturescripts.xml

<event type="login" name="PromotionLogin" script="promotionlogin.lua"/>

data/creaturescripts/scripts/login.lua

registerCreatureEvent(cid, "PromotionLogin")

Im not a scripter but im just changing scripts to work the style you want.

 

[Sweddy]

Well did you test it?

 

[vegaseek]

look --->

 

[vegaseek]

Unfortunately, bless your script does not help me, / but it works items fall out normally, / even if it is August aola. And as for the script is broken for promotions the following functions (getBooleanFromString). When someone on my server will crash and pops konienko "You Are Dead." ok when you get some debug.! Please help me! AND I NEED SCRIPT FOR CLIENT 8.7 ;/

PS: Sorry for bad english ;/

 

[vegaseek]

Refresh! Please HELP ME !

 

[Sweddy]

umm client 8.7? so you mean Mystic Spirit 0.2.9?

 

[Zysen]

data/creaturescripts/scripts/promotionlogin.lua

unction onLogin(cid)
  local freePromotion = getConfigInfo('premiumForPromotion')
   if freePromotion == "NO" and getPlayerStorageValue(cid, 43545) == -1 then
        setPlayerPromotionLevel(cid, 1)
	setPlayerStorageValue(cid, 43545, 1)
    end
  return TRUE
end

data/creaturescripts/creaturescripts.xml

<event type="login" name="PromotionLogin" script="promotionlogin.lua"/>

data/creaturescripts/scripts/login.lua

registerCreatureEvent(cid, "PromotionLogin")

 

[vegaseek]

umm client 8.7? so you mean Mystic Spirit 0.2.9?

yes i have Mystic Spirit 0.2.9 for tibia 8.7

Zysen - i test your script, wait ;d

 

[vegaseek]

Very good! The script works great, thanks. But I still do not have a script on the blessings (that is, you log it is written already ~ All bless), but when I drop things and fall out normally when you log in again want to let it get debug. Please help quickly!


LOL! The script for your time promotion works and sometimes does not work .... Please fix it so that gave the promotion of every form on the server and give advice to bless too! Please!