CreatureEvent Low Level Death Protection!

Azi · Jul 5, 2009

Hello everyone, modified script "playerDeath" and added protection of low-level players before his death. When the low-level player will be put to death, is moved into the his temple, without the loss of experience and items!

replace data/creaturescripts/playerDeath.lua for:

PHP:

local config = {
	deathListEnabled = getBooleanFromString(getConfigInfo('deathListEnabled')),
	sqlType = getConfigInfo('sqlType'),
	maxDeathRecords = getConfigInfo('maxDeathRecords'),
	deadProtection = getConfigInfo('deadProtection')
}
config.sqlType = config.sqlType == "sqlite" and DATABASE_ENGINE_SQLITE or DATABASE_ENGINE_MYSQL

function onPrepareDeath(cid, lastHitKiller, mostDamageKiller)
	if(isPlayer(cid))then
		if(math.abs(config.deadProtection) >= getPlayerLevel(cid))then
			doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid)))
			doCreatureAddHealth(cid, getCreatureMaxHealth(cid), TRUE)
			doCreatureAddMana(cid, (getCreatureMaxMana(cid) - getCreatureMana(cid)))
			doSendMagicEffect(getCreaturePosition(cid), 37)
			doRemoveCondition(cid, CONDITION_INFIGHT)
		else
			if(config.deathListEnabled ~= TRUE) then
				return TRUE
			end

			local hitKillerName = "field item"
			local damageKillerName = ""
			if(lastHitKiller ~= FALSE) then
				if(isPlayer(lastHitKiller) == TRUE) then
					hitKillerName = getPlayerGUID(lastHitKiller)
				else
					hitKillerName = getCreatureName(lastHitKiller)
				end

				if(mostDamageKiller ~= FALSE and mostDamageKiller ~= lastHitKiller and getCreatureName(mostDamageKiller) ~= getCreatureName(lastHitKiller)) then
					if(isPlayer(mostDamageKiller) == TRUE) then
						damageKillerName = getPlayerGUID(mostDamageKiller)
					else
						damageKillerName = getCreatureName(mostDamageKiller)
					end
				end
			end
			db.executeQuery("INSERT INTO `player_deaths` (`player_id`, `time`, `level`, `killed_by`, `altkilled_by`) VALUES (" .. getPlayerGUID(cid) .. ", " .. os.time() .. ", " .. getPlayerLevel(cid) .. ", " .. db.escapeString(hitKillerName) .. ", " .. db.escapeString(damageKillerName) .. ");")
			local rows = db.getResult("SELECT `player_id` FROM `player_deaths` WHERE `player_id` = " .. getPlayerGUID(cid) .. ";")
			if(rows:getID() ~= -1) then
				local amount = rows:getRows(true) - config.maxDeathRecords
				if(amount > 0) then
					if(config.sqlType == DATABASE_ENGINE_SQLITE) then
						for i = 1, amount do
						db.executeQuery("DELETE FROM `player_deaths` WHERE `rowid` = (SELECT `rowid` FROM `player_deaths` WHERE `player_id` = " .. getPlayerGUID(cid) .. " ORDER BY `time` LIMIT 1);")
						end
					else
					db.executeQuery("DELETE FROM `player_deaths` WHERE `player_id` = " .. getPlayerGUID(cid) .. " ORDER BY `time` LIMIT " .. amount .. ";")
					end
				end
			end
			return TRUE
		end
	end
end

and replace in data/creaturescripts/creaturescripts.xml

PHP:

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

for:

PHP:

<event type="preparedeath" name="PlayerDeath" event="script" value="playerdeath.lua"/>

and in config.lua add:

PHP:

deadProtection = 20 -- max lvl in protection

Thanks,
Yours, Azi.

Whiskyy · Jul 5, 2009

Very Nice

---Edit //

Can edit the script?

If player dead by player the other player get injust, and the protected guy go to temple without the loss of experience and etc~

And if player dead to monster, player will lose EXP, but not items :}

Can you do it please?

thx a lot

Renusek · Jul 5, 2009

Yea, with unjustified kill will be better, cause now it is free travel to temple plx.

Znote · Jul 5, 2009

Its good if teleported to temple after a player has killed you, while when being killed by a monster you die and loose stuff like normal.

Could you fix that?

Azi · Jul 5, 2009

Im don't have time to test, can someone?
* Not frag count (BUG - send frag msg)
* Only protect for killers... all/monster/player
* Loss exp (configurate %)

in config add:

PHP:

deadProtection = 20 -- max lvl in protection
deadProtectionBy = "all" -- works when killer: all/monster/players
deadProtectionExpLose = 7 -- % of exp lose

and playerdeath.lua

PHP:

 local config = {
    deathListEnabled = getBooleanFromString(getConfigInfo('deathListEnabled')),
    sqlType = getConfigInfo('sqlType'),
    maxDeathRecords = getConfigInfo('maxDeathRecords'),
    deadProtection = getConfigInfo('deadProtection'),
    fragTime =  getConfigInfo('timeToDecreaseFrags'),
    deadProtectionBy = getConfigInfo('deadProtectionBy'),
    deadProtectionExpLose = getConfigInfo('deadProtectionExpLose')
}
local prtect = 0
config.sqlType = config.sqlType == "sqlite" and DATABASE_ENGINE_SQLITE or DATABASE_ENGINE_MYSQL

function onPrepareDeath(cid, lastHitKiller, mostDamageKiller)
    if(isPlayer(cid))then
        if(math.abs(config.deadProtection) >= getPlayerLevel(cid)) and (string.lower(config.deadProtectionBy) == "all" or (string.lower(config.deadProtectionBy) == "monster" and not(isPlayer(lastHitKiller))) or (string.lower(config.deadProtectionBy) == "player" and isPlayer(lastHitKiller))) then
            protect = 1
            doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid)))
            doPlayerAddExp(cid, -((getPlayerExperience(cid)/100)*config.deadProtectionExpLose))
            doCreatureAddHealth(cid, getCreatureMaxHealth(cid), TRUE)
            doCreatureAddMana(cid, (getCreatureMaxMana(cid) - getCreatureMana(cid)))
            doSendMagicEffect(getCreaturePosition(cid), 37)
            doRemoveCondition(cid, CONDITION_INFIGHT)
        else
            if(config.deathListEnabled ~= TRUE) then
                return TRUE
            end

            local hitKillerName = "field item"
            local damageKillerName = ""
            if(lastHitKiller ~= FALSE) then
                if(isPlayer(lastHitKiller) == TRUE and protect == 1) then
                    hitKillerName = getPlayerGUID(lastHitKiller)
                    doPlayerSetRedSkullTicks(lastHitKiller, getPlayerRedSkullTicks(lastHitKiller) - config.fragTime)
                else
                    hitKillerName = getCreatureName(lastHitKiller)
                end

                if(mostDamageKiller ~= FALSE and mostDamageKiller ~= lastHitKiller and getCreatureName(mostDamageKiller) ~= getCreatureName(lastHitKiller)) then
                    if(isPlayer(mostDamageKiller) == TRUE protect == 1) then
                        damageKillerName = getPlayerGUID(mostDamageKiller)
                        doPlayerSetRedSkullTicks(mostDamageKiller, getPlayerRedSkullTicks(mostDamageKiller) - config.fragTime)
                    else
                        damageKillerName = getCreatureName(mostDamageKiller)
                    end
                end
            end
            db.executeQuery("INSERT INTO `player_deaths` (`player_id`, `time`, `level`, `killed_by`, `altkilled_by`) VALUES (" .. getPlayerGUID(cid) .. ", " .. os.time() .. ", " .. getPlayerLevel(cid) .. ", " .. db.escapeString(hitKillerName) .. ", " .. db.escapeString(damageKillerName) .. ");")
            local rows = db.getResult("SELECT `player_id` FROM `player_deaths` WHERE `player_id` = " .. getPlayerGUID(cid) .. ";")
            if(rows:getID() ~= -1) then
                local amount = rows:getRows(true) - config.maxDeathRecords
                if(amount > 0) then
                    if(config.sqlType == DATABASE_ENGINE_SQLITE) then
                        for i = 1, amount do
                        db.executeQuery("DELETE FROM `player_deaths` WHERE `rowid` = (SELECT `rowid` FROM `player_deaths` WHERE `player_id` = " .. getPlayerGUID(cid) .. " ORDER BY `time` LIMIT 1);")
                        end
                    else
                    db.executeQuery("DELETE FROM `player_deaths` WHERE `player_id` = " .. getPlayerGUID(cid) .. " ORDER BY `time` LIMIT " .. amount .. ";")
                    end
                end
            end
            return TRUE
        end
    end
protect = 0
end

I SAID, NOT TESTED!

widnet · Jul 5, 2009

Hmmm
Good script i must use this in my server

Whiskyy · Jul 5, 2009

but I think, if player kill the noob and dont get injust, all time level 100~200 will kill level 8 and if someone do it a lot, this one will leave server
maybe is better you use to player get frag, be cause if have noob level in trap, the guy can kill this noob, and go to the trap

pablol · Jul 5, 2009

A couple flaws in the script like what if there is a group of 50 level 20s Pking, everytime they die they come back at the Same Level with the same stuff 0.0

Sincerely,
Yours Pablol

Sync · Jul 5, 2009

Thats so nice dude haha

ScorpiOOn93 · Jul 8, 2009

@Azi
I've tested your new script. Only 1 bug in line 8 you've forgotten to add ","

Anyway the script is working in 100% (Yes, i've tested it).
Fixed version:

Code:

 local config = {
    deathListEnabled = getBooleanFromString(getConfigInfo('deathListEnabled')),
    sqlType = getConfigInfo('sqlType'),
    maxDeathRecords = getConfigInfo('maxDeathRecords'),
    deadProtection = getConfigInfo('deadProtection'),
    fragTime =  getConfigInfo('timeToDecreaseFrags'),
    deadProtectionBy = getConfigInfo('deadProtectionBy'),
    deadProtectionExpLose = getConfigInfo('deadProtectionExpLose')
}
config.sqlType = config.sqlType == "sqlite" and DATABASE_ENGINE_SQLITE or DATABASE_ENGINE_MYSQL

function onPrepareDeath(cid, lastHitKiller, mostDamageKiller)
    if(isPlayer(cid))then
        if(math.abs(config.deadProtection) >= getPlayerLevel(cid)) and (string.lower(config.deadProtectionBy) == "all" or (string.lower(config.deadProtectionBy) == "monster" and not(isPlayer(lastHitKiller))) or (string.lower(config.deadProtectionBy) == "player" and isPlayer(lastHitKiller))) then
            doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid)))
            doPlayerAddExp(cid, -((getPlayerExperience(cid)/100)*config.deadProtectionExpLose))
            doCreatureAddHealth(cid, getCreatureMaxHealth(cid), TRUE)
            doCreatureAddMana(cid, (getCreatureMaxMana(cid) - getCreatureMana(cid)))
            doSendMagicEffect(getCreaturePosition(cid), 37)
            doRemoveCondition(cid, CONDITION_INFIGHT)
        else
            if(config.deathListEnabled ~= TRUE) then
                return TRUE
            end

            local hitKillerName = "field item"
            local damageKillerName = ""
            if(lastHitKiller ~= FALSE) then
                if(isPlayer(lastHitKiller) == TRUE) then
                    hitKillerName = getPlayerGUID(lastHitKiller)
                    doPlayerSetRedSkullTicks(lastHitKiller, getPlayerRedSkullTicks(lastHitKiller) - config.fragTime)
                else
                    hitKillerName = getCreatureName(lastHitKiller)
                end

                if(mostDamageKiller ~= FALSE and mostDamageKiller ~= lastHitKiller and getCreatureName(mostDamageKiller) ~= getCreatureName(lastHitKiller)) then
                    if(isPlayer(mostDamageKiller) == TRUE) then
                        damageKillerName = getPlayerGUID(mostDamageKiller)
                        doPlayerSetRedSkullTicks(mostDamageKiller, getPlayerRedSkullTicks(mostDamageKiller) - config.fragTime)
                    else
                        damageKillerName = getCreatureName(mostDamageKiller)
                    end
                end
            end
            db.executeQuery("INSERT INTO `player_deaths` (`player_id`, `time`, `level`, `killed_by`, `altkilled_by`) VALUES (" .. getPlayerGUID(cid) .. ", " .. os.time() .. ", " .. getPlayerLevel(cid) .. ", " .. db.escapeString(hitKillerName) .. ", " .. db.escapeString(damageKillerName) .. ");")
            local rows = db.getResult("SELECT `player_id` FROM `player_deaths` WHERE `player_id` = " .. getPlayerGUID(cid) .. ";")
            if(rows:getID() ~= -1) then
                local amount = rows:getRows(true) - config.maxDeathRecords
                if(amount > 0) then
                    if(config.sqlType == DATABASE_ENGINE_SQLITE) then
                        for i = 1, amount do
                        db.executeQuery("DELETE FROM `player_deaths` WHERE `rowid` = (SELECT `rowid` FROM `player_deaths` WHERE `player_id` = " .. getPlayerGUID(cid) .. " ORDER BY `time` LIMIT 1);")
                        end
                    else
                    db.executeQuery("DELETE FROM `player_deaths` WHERE `player_id` = " .. getPlayerGUID(cid) .. " ORDER BY `time` LIMIT " .. amount .. ";")
                    end
                end
            end
            return TRUE
        end
    end
end

Azi · Jul 8, 2009

#UP
OK, thanks for test and fix ;*, im now update first post and rep u!

Qwe · Jul 8, 2009

nice work bro, i'll using it!

Whiskyy · Jul 9, 2009

please do it if player 50+ kill player 50-, player dont get frag

ScorpiOOn93 · Jul 13, 2009

1 big bug found:
-With this script you are not getting any frags for killing players.

Azi · Jul 13, 2009

#up
fixed, next rep for report!

Saj · Jul 13, 2009

Now it works fine for me, without any bugs (YET)

Good job!

ScorpiOOn93 · Jul 13, 2009

Ok tnx, now I think it will work without any bugs

Bvbb · Oct 17, 2009

Someone can remake it for 0.3.x version?

Orkhz · Oct 21, 2009

Yes, please?

Bvbb · Oct 24, 2009

BUMP, please make for a new version it.

CreatureEvent Low Level Death Protection!

Banned User

Mapper

beton beton beton punk!

<?php echo $title; ?>

Banned User

Banned User

Mapper

New Member

Ø,ø

etherno.net

Banned User

Banned User

Mapper

etherno.net

Banned User

Remember my name

etherno.net

New Member

New Member

New Member