aQii te ayudaremos con Tus Ot Servers
 
ÍndicePortalRegistrarseConectarse
Conectarse
Nombre de Usuario:
Contraseña:
Entrar automáticamente en cada visita: 
:: Recuperar mi contraseña
Últimos temas
» TITULO: Mu Black Kindom | Season 6 | 3000x | 80% | Nuevos Ev
Vie Oct 28, 2011 11:25 am por NAHUELLG

» (TUTORIAL) Como usar mage bomb =)
Dom Oct 09, 2011 7:29 am por GOD Roca

» Mu Skzer l Season 6 l Exp: 1600x l Drop: 80%
Jue Jul 07, 2011 2:57 am por NAHUELLG

» Mu Skzer l Season 6 l Exp: 1600x l Drop: 80%
Mar Jun 28, 2011 10:49 am por dnange18

» Mu Online Season 6 Finallity, la batalla final comienza by sairenji
Dom Jun 19, 2011 6:23 am por sairenji

» 9.x]-[8.7x]-[8.61/2]-[8.6]-[8.54/7] The Forgotten Server 0.3.6 - Crying Damson
Miér Jun 15, 2011 9:51 am por Orejon

» ayuda porfaah
Jue Mayo 05, 2011 3:59 pm por Toniko

» Proyecto Dedicado Fennix Rl Map
Jue Mayo 05, 2011 3:42 pm por Toniko

» Como uso mega magebomb 8.6
Dom Mar 20, 2011 10:35 am por jasson

Mejores posteadores
God Sposo
 
Admin Necro
 
Admin Skit
 
Zir GaboX
 
Cubo
 
¤•~x Єℓ ώαtэr x~•¤
 
drawmarcos
 
chinodj
 
Toniko
 
meleq
 
¿Quién está en línea?
En total hay 1 usuario en línea: 0 Registrados, 0 Ocultos y 1 Invitado

Ninguno

La mayor cantidad de usuarios en línea fue 12 el Vie Jul 12, 2013 8:22 am.

Comparte | 
 

 Berserker Mode!

Ver el tema anterior Ver el tema siguiente Ir abajo 
AutorMensaje
Admin Necro
ADMINISTRADOR
ADMINISTRADOR


Mensajes : 64
Fecha de inscripción : 04/11/2010
Edad : 19
Localización : Mi Casa

MensajeTema: Berserker Mode!   Sáb Nov 06, 2010 9:15 am

# Autor: Mock
# Traido x GOD NECRO XD


Que hace este script?
Bien, este script aumenta en un 50% HP, MP Y SKILLS (Tu puedes configurar)


Ve el script en accion:
<object width="480" height="385"><param name="movie" value="http://www.youtube.com/v/xBvQD5nO02E?fs=1&amp;hl=es_ES"></param><param name="allowFullScreen" value="true"></param><param name="allowscriptaccess" value="always"></param><embed src="http://www.youtube.com/v/xBvQD5nO02E?fs=1&amp;hl=es_ES" type="application/x-shockwave-flash" allowscriptaccess="always" allowfullscreen="true" width="480" height="385"></embed></object>

ok, primero agrega esta linea a "talkactions.xml"

Código:
<talkaction words="!berserk" event="script" value="berserk.lua"/>


Aora vas a "talkactions.xml" y
Finalmente creas "beserk.lua" en la carpeta de talkactions y le metes esto:

Código:
--[[
Script By mock the bear
Config
]]
function choose(...)
  local arg = {...}
  return arg[math.random(1,#arg)]
end
local conf = {
        effectlist = {12,13,14,3,28,29,30,39,68},
        soulPerSec=1,
        soulToStart=25,
        allPercent=50,
}
---Load combat
local combat  = createCombatObject()
setCombatParam(combat, COMBAT_PARAM_EFFECT, CONST_ME_MAGIC_BLUE)
setCombatParam(combat, COMBAT_PARAM_AGGRESSIVE, false)
local condition = createConditionObject(CONDITION_ATTRIBUTES)
setConditionParam(condition, CONDITION_PARAM_TICKS, -1)
setConditionParam(condition, CONDITION_PARAM_SUBID, 49)
local cond = {
        CONDITION_PARAM_STAT_MAXHEALTHPERCENT = 31,
        CONDITION_PARAM_STAT_MAXMANAPERCENT = 32,
        CONDITION_PARAM_STAT_MAGICLEVELPERCENT = 34,
        CONDITION_PARAM_SKILL_MELEEPERCENT = 35,
        CONDITION_PARAM_SKILL_FISTPERCENT = 36,
        CONDITION_PARAM_SKILL_CLUBPERCENT = 37,
        CONDITION_PARAM_SKILL_SWORDPERCENT = 38,
        CONDITION_PARAM_SKILL_AXEPERCENT = 39,
        CONDITION_PARAM_SKILL_DISTANCEPERCENT = 40,
        CONDITION_PARAM_SKILL_SHIELDPERCENT = 41,
}
for i,b in pairs(cond) do
        setConditionParam(condition, b, 100+conf.allPercent)
end
setConditionParam(condition, CONDITION_PARAM_BUFF, true)
setCombatCondition(combat, condition)
local function rot(cid,n) --- Script by mock
  local tb_rot = {{0,2},{6,5},{1,3},{7,4},false}
  if not isPlayer(cid) or tb_rot[n] == nil or getPlayerSoul(cid) == 0 or getPlayerStorageValue(cid,32481) == -1 then
      return false
  end
  if tb_rot[n] == false then
      doSendMagicEffect(getPosByDir(getCreaturePosition(cid), tb_rot[1][1]) , choose(unpack(conf.effectlist)))
      doSendMagicEffect(getPosByDir(getCreaturePosition(cid), tb_rot[1][2]) ,choose(unpack(conf.effectlist)))
      addEvent(rot, 200,cid,2)
      return false
  end
  doSendMagicEffect(getPosByDir(getCreaturePosition(cid), tb_rot[n][1]) , choose(unpack(conf.effectlist)))
  doSendMagicEffect(getPosByDir(getCreaturePosition(cid), tb_rot[n][2]) , choose(unpack(conf.effectlist)))
  n = n+1
  addEvent(rot, 200,cid,n)
end
function checkBuff(cid)
        if not isPlayer(cid) then return end
        if getPlayerSoul(cid) > 0 and getPlayerStorageValue(cid,32481) == 1 then
                doPlayerAddSoul(cid,-conf.soulPerSec)
                doSendMagicEffect(getCreaturePosition(cid) , 49)
                addEvent(checkBuff,1000,cid)
        else
                doRemoveCondition(cid, CONDITION_ATTRIBUTES,49)
                setPlayerStorageValue(cid,32481,-1)
                return false
        end
end
function onSay(cid, words, param, channel) --- Script by mock
        if getPlayerStorageValue(cid,32481) == 1 then
                setPlayerStorageValue(cid,32481,-1)
                doCreatureSay(cid,'BERSERK MODE OFF!',19)
                return true
        end
        if getPlayerSoul(cid) >= conf.soulToStart then
                doPlayerAddSoul(cid,-conf.soulToStart)
                setPlayerStorageValue(cid,32481,1)
                checkBuff(cid)
                rot(cid,1)
                doCreatureSay(cid,'BERSERK MODE ON!',19)
                doCombat(cid, combat, numberToVariant(cid))
        else
                doPlayerSendTextMessage(cid,25,'You need more than 25 soul!')
        end
        return true
end



Este script se acaba cuando agotas tu soul (1 soul x segundo)

Para activarlo basta con decir "!beserk"

Hecho x Mock
Volver arriba Ir abajo
http://tibiahelp.foroactivo.mx
Admin Skit
ADMINISTRADOR
ADMINISTRADOR


Mensajes : 36
Fecha de inscripción : 04/11/2010
Edad : 18
Localización : exiveame XD

MensajeTema: Re: Berserker Mode!   Sáb Nov 06, 2010 9:19 am

wena =)
Volver arriba Ir abajo
 
Berserker Mode!
Ver el tema anterior Ver el tema siguiente Volver arriba 
Página 1 de 1.
 Temas similares
-
» Cartas como Berserker tormenta de sangre
» Win7 - Windows XP Mode
» Mugen Story Mode - Saint Seiya LLDA - Soporte Para Video y Modo Historia
» [Updated] Mugen Story Mode 1.8 + MSC 1.2 + MSMConfig 1.0 by Kamiloxnumetal
» Mugen Story mode(Personaliza tu historia mugen a un nuevo nivel)

Permisos de este foro:No puedes responder a temas en este foro.
Tibia Help :: Scripts-
Cambiar a: