Ir para conteúdo
TK News
  • Cadastre-se

Sitema%2525252FMod [MOD] Rush War Event!

Duda Lima

Por ,
em Scripts tfs 0.4 (OLD)

 Share Seguidores 1

Posts Recomendados

  • Este é um post popular.
Duda Lima

Duda Lima 42

Postado
  • Este é um post popular.
Postado (editado)

Ta ai mais um evento que é vendido pela ChaitoSoft!

#Descrição do evento: Neste evento 2 times (Azul e Vermelho) vão batalhar para conseguir a "quantidade" de frags para ganhar o evento, totalmente configuravel

#O que possui?

- Abertura automática ou via comando.

- Quantidade minima de players para o evento (configuravel)

- Level minimo para entrar no evento (configuravel)

- Quantidade de frags que terão que conquistar para ganhar (configuravel)

- Separação automática dos times (configuravel)

- Mapa incluso

- Tutorial explicativo

- Premio o time vencedor do evento (configuravel)

- Entre outras coisas….

*OBS: Este evento só funciona em TFS 0.4.

Instalação:

Em Data/Mods

Rush_Event.xml

<?xml version="1.0" encoding="UTF-8"?>

<mod name="Rush Event" version="1.0" author="Tibia Hosting por disponibilizar" contact="[email protected]" enabled="yes">

<description>

TUTORIAL DE COMO CONFIGURAR O EVENTO ACOMPANHE POR AQUI:

q - mensagem que vai ser exibida quando o evento começar

d_1 - posição do tempo vermelho ao começar evento

d_2 - posição do tempo azul ao começar evento

x - mensagem que vai ser exibida quando o evento não começar

w - posição da sala de espera, onde os players vão ficar antes de começar

lvl - level minimo para participar do evento

v - a quantidade de frags que será necessária para o time ganhar

mn - quantidade minima de players para começar o evento

m - maximo de players dentro do evento

o - mensagem exibida quando o time vermelho ganhar

y - mensagem exibida quando o time azul ganhar

i_1 - id do premio (agora é crystal coin = 2160)

i_2 - quantidade do premio (agora esta 10 crystal coins)

t - tempo para começar o evento (agora esta is 5 minutos)

r - tempo em que os resultados da batalha serão mostrados aos players (agora esta 3 minutos)

Adicione isto em 050-function.lua:

-------------------------------------------------------------------------------------------------

function doPlayerRemoveLethalConditions(cid)

local tmp = {1, 2, 4, 16, 32, 64, 128, 256, 512, 1024, 2048, 4096, 8192, 32768, 65536}

for i = 1, #tmp do

if(hasCondition(cid, tmp)) then doRemoveCondition(cid, tmp) end

end

return true

end

-------------------------------------------------------------------------------------------------

Adicione isto em login.lua:

-------------------------------------------------------------------------------------------------

registerCreatureEvent(cid, "RushCombat")

registerCreatureEvent(cid, "RushAttack")

registerCreatureEvent(cid, "RushDead")

registerCreatureEvent(cid, "RushOutfit")

-------------------------------------------------------------------------------------------------

Agora daqui pra baixo você vai configurar de acordo com o tutorial acima, o resto se não tiver

conhecimento não mecha em nada pois poderá bugar o evento e não daremos suporte:

</description>

<config name="re"><![CDATA[

t = {

a = 32145,

g = 32146,

l = 32147,

u = 32148,

h = 32149,

wv = 32150,

c = 0,

q = "Rush Event has been started! Enjoy and have fun!",

f = 5447,

f_1 = 5448,

f_2 = 5449,

d_1 = {x = 26598, y = 26758, z = 7}, -- red temple

d_2 = {x = 26655, y = 26726, z = 7}, -- blue temple

x = "Event won't start bacause too few people were willing to participate",

w = {x = 26628, y = 26804, z = 7},

lvl = 80,

v = 2,

mn = 1,

m = 3,

o = "Event was completed, RED TEAM has won Rush Event!",

y = "Event was completed, BLUE TEAM has won Rush Event!",

i_1 = 2160,

i_2 = 10,

t = 1,

r = 3

}

]]></config>

<globalevent name="Recognition" interval="1500" event="script"><![CDATA[

domodlib('re')

function onThink(interval, lastExecution, thinkInterval)

if(getGlobalStorageValue(t.a) == 1) then

for _, pid in ipairs(getPlayersOnline()) do

if getPlayerStorageValue(pid, t.f) == 1 then

if(getPlayerStorageValue(pid, t.f_1) == 0) then

doSendAnimatedText(getCreaturePosition(pid), "RED TEAM", TEXTCOLOR_RED)

elseif(getPlayerStorageValue(pid, t.f_1) == 1) then

doSendAnimatedText(getCreaturePosition(pid), "BLUE TEAM", TEXTCOLOR_LIGHTBLUE)

end

end

end

return true

end

return true

end

]]></globalevent>

<talkaction words="!start" event="script"><![CDATA[

domodlib('re')

function onSay(cid, words, param, channel)

if getPlayerGroupId(cid) > 3 then

setGlobalStorageValue(t.g, 1)

setGlobalStorageValue(t.u, 0)

setGlobalStorageValue(t.l, 0)

setGlobalStorageValue(t.a, 1)

setGlobalStorageValue(t.c, 0)

setGlobalStorageValue(t.wv, 0)

doBroadcastMessage("Attention! Immediately register to Rush Event, event will start for ".. t.t .." minutes. All players can join to event typing this command: !rush", MESSAGE_STATUS_WARNING)

addEvent(function()

doBroadcastMessage("Rush event, started in 2 minutes. If you want to join, type this command: !rush", MESSAGE_STATUS_WARNING)

end, (t.t - 2) * 1000 * 60)

addEvent(function()

doBroadcastMessage("Rush event, started in a minute. If you want to join, type this command: !rush", MESSAGE_STATUS_WARNING)

end, (t.t - 1) * 1000 * 60)

addEvent(start, t.t * 1000 * 60, cid)

return true

end

return true

end

function results()

if(getGlobalStorageValue(t.a) == 1) then

local red = getGlobalStorageValue(t.l)

local blue = getGlobalStorageValue(t.u)

doBroadcastMessage("Rush Events, results:\nRed Team scored: ".. red .." frags.\nBlue Team scored: ".. blue .." frags.\nMatch is under way to ".. t.v .." frags.", MESSAGE_STATUS_WARNING)

addEvent(results, t.r * 1000 * 60)

end

end

function start(cid)

if(getGlobalStorageValue(t.a) == 1 and getGlobalStorageValue(t.c) >= t.mn) then

doBroadcastMessage(t.q, MESSAGE_STATUS_WARNING)

setGlobalStorageValue(t.wv, 1)

addEvent(results, t.r * 1000 * 60)

for _, pid in ipairs(getPlayersOnline()) do

local myOutfit = getCreatureOutfit(pid)

local red = {lookType = myOutfit.lookType, lookHead = 94, lookBody = 94, lookLegs = 94, lookFeet = 94, lookTypeEx = 0, lookAddons = myOutfit.lookAddons}

local blue = {lookType = myOutfit.lookType, lookHead = 86, lookBody = 86, lookLegs = 86, lookFeet = 86, lookTypeEx = 0, lookAddons = myOutfit.lookAddons}

if getPlayerStorageValue(pid, t.f) == 1 then

doCreatureAddHealth(pid, getCreatureMaxHealth(pid))

doCreatureAddMana(pid, getCreatureMaxMana(pid))

if((getPlayerStorageValue(pid, t.g) % 2) == 1) then

doCreatureChangeOutfit(pid, red)

setPlayerStorageValue(pid, t.h, 0)

doTeleportThing(pid, t.d_1)

setPlayerStorageValue(pid, t.f, 1)

setPlayerStorageValue(pid, t.f_1, 0)

setPlayerStorageValue(pid, t.f_2, 1)

doSendMagicEffect(getCreaturePosition(pid), 10)

doPlayerSendTextMessage(pid, MESSAGE_EVENT_ADVANCE, "You are in RED TEAM!\nThis battle will continue up to ".. t.v .." frags!")

else

doCreatureChangeOutfit(pid, blue)

doTeleportThing(pid, t.d_2)

setPlayerStorageValue(pid, t.h, 0)

setPlayerStorageValue(pid, t.f, 1)

setPlayerStorageValue(pid, t.f_1, 1)

setPlayerStorageValue(pid, t.f_2, 0)

doSendMagicEffect(getCreaturePosition(pid), 10)

doPlayerSendTextMessage(pid, MESSAGE_EVENT_ADVANCE, "You are in BLUE TEAM!\nThis battle will continue up to ".. t.v .." frags!")

end

end

end

elseif(getGlobalStorageValue(t.c) < t.mn) then

doBroadcastMessage(t.x, MESSAGE_STATUS_WARNING)

setGlobalStorageValue(t.a, 0)

for _, pid in ipairs(getPlayersOnline()) do

if getPlayerStorageValue(pid, t.f) == 1 then

setPlayerStorageValue(pid, t.f, -1)

doTeleportThing(pid, getTownTemplePosition(getPlayerTown(pid)))

doSendMagicEffect(getCreaturePosition(pid), CONST_ME_TELEPORT)

end

end

end

end

]]></talkaction>

<globalevent name="RushStart" time="00:09" event="script"><![CDATA[

domodlib('re')

function onTime(interval, lastExecution)

setGlobalStorageValue(t.g, 1)

setGlobalStorageValue(t.u, 0)

setGlobalStorageValue(t.l, 0)

setGlobalStorageValue(t.a, 1)

setGlobalStorageValue(t.c, 0)

setGlobalStorageValue(t.wv, 0)

doBroadcastMessage("Attention! Immediately register to Rush Event, event will start for ".. t.t .." minutes. All players can join to event typing this command: !rush", MESSAGE_STATUS_WARNING)

addEvent(function()

doBroadcastMessage("Rush event, started in 2 minutes. If you want to join, type this command: !rush", MESSAGE_STATUS_WARNING)

end, (t.t - 2) * 1000 * 60)

addEvent(function()

doBroadcastMessage("Rush event, started in a minute. If you want to join, type this command: !rush", MESSAGE_STATUS_WARNING)

end, (t.t - 1) * 1000 * 60)

addEvent(start, t.t * 1000 * 60, cid)

end

function results()

if(getGlobalStorageValue(t.a) == 1) then

local red = getGlobalStorageValue(t.l)

local blue = getGlobalStorageValue(t.u)

doBroadcastMessage("Rush Events, results:\nRed Team scored: ".. red .." frags.\nBlue Team scored: ".. blue .." frags.\nMatch is under way to ".. t.v .." frags.", MESSAGE_STATUS_WARNING)

addEvent(results, t.r * 1000 * 60)

end

end

function start(cid)

if(getGlobalStorageValue(t.a) == 1 and getGlobalStorageValue(t.c) >= t.mn) then

doBroadcastMessage(t.q, MESSAGE_STATUS_WARNING)

setGlobalStorageValue(t.wv, 1)

addEvent(results, t.r * 1000 * 60)

for _, pid in ipairs(getPlayersOnline()) do

local myOutfit = getCreatureOutfit(pid)

local red = {lookType = myOutfit.lookType, lookHead = 94, lookBody = 94, lookLegs = 94, lookFeet = 94, lookTypeEx = 0, lookAddons = myOutfit.lookAddons}

local blue = {lookType = myOutfit.lookType, lookHead = 86, lookBody = 86, lookLegs = 86, lookFeet = 86, lookTypeEx = 0, lookAddons = myOutfit.lookAddons}

if getPlayerStorageValue(pid, t.f) == 1 then

doCreatureAddHealth(pid, getCreatureMaxHealth(pid))

doCreatureAddMana(pid, getCreatureMaxMana(pid))

if((getPlayerStorageValue(pid, t.g) % 2) == 1) then

doCreatureChangeOutfit(pid, red)

setPlayerStorageValue(pid, t.h, 0)

doTeleportThing(pid, t.d_1)

setPlayerStorageValue(pid, t.f, 1)

setPlayerStorageValue(pid, t.f_1, 0)

setPlayerStorageValue(pid, t.f_2, 1)

doSendMagicEffect(getCreaturePosition(pid), 10)

doPlayerSendTextMessage(pid, MESSAGE_EVENT_ADVANCE, "You are in RED TEAM!\nThis battle will continue up to ".. t.v .." frags!")

else

doCreatureChangeOutfit(pid, blue)

setPlayerStorageValue(pid, t.h, 0)

doTeleportThing(pid, t.d_2)

setPlayerStorageValue(pid, t.f, 1)

setPlayerStorageValue(pid, t.f_1, 1)

setPlayerStorageValue(pid, t.f_2, 0)

doSendMagicEffect(getCreaturePosition(pid), 10)

doPlayerSendTextMessage(pid, MESSAGE_EVENT_ADVANCE, "You are in BLUE TEAM!\nThis battle will continue up to ".. t.v .." frags!")

end

end

end

elseif(getGlobalStorageValue(t.c) < t.mn) then

doBroadcastMessage(t.x, MESSAGE_STATUS_WARNING)

setGlobalStorageValue(t.a, 0)

for _, pid in ipairs(getPlayersOnline()) do

if getPlayerStorageValue(pid, t.f) == 1 then

setPlayerStorageValue(pid, t.f, -1)

doTeleportThing(pid, getTownTemplePosition(getPlayerTown(pid)))

doSendMagicEffect(getCreaturePosition(pid), CONST_ME_TELEPORT)

end

end

end

end

]]></globalevent>

<talkaction words="!rush" event="script"><![CDATA[

domodlib('re')

function onSay(cid, words, param, channel)

if getGlobalStorageValue(t.a) == 1 and getGlobalStorageValue(t.wv) ~= 1 then

if getPlayerLevel(cid) >= t.lvl then

if getPlayerStorageValue(cid, t.f) == -1 then

if getTilePzInfo(getPlayerPosition(cid)) == true then

if getGlobalStorageValue(t.c) < t.m then

setGlobalStorageValue(t.c, getGlobalStorageValue(t.c)+1)

if getGlobalStorageValue(t.c) == t.m then

doPlayerSendCancel(cid, "Event is full [" .. getGlobalStorageValue(t.c) .. " players]!")

else

doBroadcastMessage("" .. getPlayerName(cid) .. " has joined to Rush Event! Actually we have: " .. getGlobalStorageValue(t.c) .. " players!", 19)

end

setPlayerStorageValue(cid, t.f, 1)

setPlayerStorageValue(cid, t.h, -1)

doTeleportThing(cid, t.w)

doSendMagicEffect(getCreaturePosition(cid), CONST_ME_TELEPORT)

setPlayerStorageValue(cid, t.g, getGlobalStorageValue(t.g))

setGlobalStorageValue(t.g, tonumber(getGlobalStorageValue(t.g))+1)

else

doPlayerSendCancel(cid, "Event is full [" .. getGlobalStorageValue(t.c) .. " players]!")

return true

end

else

doPlayerSendCancel(cid, "You must be in protection zone.")

return true

end

else

doPlayerSendCancel(cid, "You are already registered in this event.")

return true

end

else

doPlayerSendCancel(cid, "Your level is too low to participate in this event.")

return true

end

else

doPlayerSendCancel(cid, "At the moment there are no records for this event.")

return true

end

return true

end

]]></talkaction>

<event type="combat" name="RushCombat" event="script"><![CDATA[

domodlib('re')

function onCombat(cid, target)

if(getGlobalStorageValue(t.a) == 1) then

if isPlayer(cid) and isPlayer(target) then

if getPlayerStorageValue(cid, t.f) == 1 and getPlayerStorageValue(target, t.f) == 1 then

if getPlayerStorageValue(cid, t.f_1) == getPlayerStorageValue(target, t.f_1) then

return doPlayerSendCancel(cid, "Sorry, you cannot attack your own team.") and false

end

end

end

end

return true

end

]]></event>

<event type="attack" name="RushAttack" event="script"><![CDATA[

domodlib('re')

function onAttack(cid, target)

if(getGlobalStorageValue(t.a) == 1) then

if isPlayer(cid) and isPlayer(target) then

if getPlayerStorageValue(cid, t.f) == 1 and getPlayerStorageValue(target, t.f) == 1 then

if getPlayerStorageValue(cid, t.f_1) == getPlayerStorageValue(target, t.f_1) then

return doPlayerSendCancel(cid, "Sorry, you cannot attack your own team.") and false

end

end

end

end

return true

end

]]></event>

<event type="preparedeath" name="RushDead" event="script"><![CDATA[

domodlib('re')

function onPrepareDeath(cid, deathList)

if(not isPlayer(cid)) then

return true

end

if getGlobalStorageValue(t.a) == 1 then

local strings = {""}

local j, position, corpse = 1, 1, 0

for _, pid in ipairs(deathList) do

if isCreature(pid) == true then

strings[position] = j == 1 and "" or strings[position] .. ", "

strings[position] = strings[position] .. getCreatureName(pid) .. ""

j = j + 1

else

strings[position] = j == 1 and "" or strings[position] .. ", "

strings[position] = strings[position] .."a field item"

j = j + 1

end

end

for i, str in ipairs(strings) do

if(str:sub(str:len()) ~= ",") then

str = str .. "."

end

desc = "You recognize "

desc = desc .. "" .. getCreatureName(cid) .. ". He was killed by " .. str

end

if(getPlayerSex(cid) == 1) then

corpse = doCreateItem(3058, getCreaturePosition(cid))

else

corpse = doCreateItem(3065, getCreaturePosition(cid))

end

doItemSetAttribute(corpse, "description", desc)

if((getPlayerStorageValue(cid, t.g) % 2) == 1) then

setGlobalStorageValue(t.u, getGlobalStorageValue(t.u)+1)

else

setGlobalStorageValue(t.l, getGlobalStorageValue(t.l)+1)

end

local red = getGlobalStorageValue(t.l)

local blue = getGlobalStorageValue(t.u)

if blue < t.v or red < t.v then

if(isPlayer(cid) == false) then

return true

end

if((getPlayerStorageValue(cid, t.g) % 2) == 1) then

doTeleportThing(cid, t.d_1)

doSendMagicEffect(getCreaturePosition(cid), 10)

doCreatureAddHealth(cid, getCreatureMaxHealth(cid), MAGIC_EFFECT_UNKNOWN, COLOR_UNKNOWN, true)

doCreatureAddMana(cid, getCreatureMaxMana(cid))

doPlayerRemoveLethalConditions(cid)

if getCreatureSkullType(cid) == SKULL_WHITE then

doCreatureSetSkullType(cid, 0)

end

else

doTeleportThing(cid, t.d_2)

doSendMagicEffect(getCreaturePosition(cid), 10)

doCreatureAddHealth(cid, getCreatureMaxHealth(cid), MAGIC_EFFECT_UNKNOWN, COLOR_UNKNOWN, true)

doCreatureAddMana(cid, getCreatureMaxMana(cid))

doPlayerRemoveLethalConditions(cid)

if getCreatureSkullType(cid) == SKULL_WHITE then

doCreatureSetSkullType(cid, 0)

end

end

end

if blue >= t.v then

doBroadcastMessage(t.y, MESSAGE_STATUS_WARNING)

setGlobalStorageValue(t.h, 1)

for _, pid in ipairs(getPlayersOnline()) do

if(getPlayerStorageValue(pid, t.f_1) == 1) then

doPlayerAddItem(cid, 2160, 30)

end

end

elseif red >= t.v then

doBroadcastMessage(t.o, MESSAGE_STATUS_WARNING)

setGlobalStorageValue(t.h, 1)

for _, pid in ipairs(getPlayersOnline()) do

if(getPlayerStorageValue(pid, t.f_2) == 1) then

doPlayerAddItem(cid, 2160, 30)

end

end

end

if getGlobalStorageValue(t.h) == 1 then

setGlobalStorageValue(t.a, 0)

setGlobalStorageValue(t.h, 0)

setGlobalStorageValue(t.wv, -1)

setPlayerStorageValue(cid, t.f, -1)

setPlayerStorageValue(cid, t.g, 0)

setPlayerStorageValue(cid, t.l, 0)

setPlayerStorageValue(cid, t.u, 0)

setPlayerStorageValue(cid, t.f_1, -1)

setPlayerStorageValue(cid, t.f_2, -1)

setPlayerStorageValue(cid, t.h, -1)

doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid)), true)

doSendMagicEffect(getCreaturePosition(cid), 10)

doCreatureAddHealth(cid, getCreatureMaxHealth(cid), MAGIC_EFFECT_UNKNOWN, COLOR_UNKNOWN, true)

doCreatureAddMana(cid, getCreatureMaxMana(cid))

doPlayerRemoveLethalConditions(cid)

for _, pid in ipairs(getPlayersOnline()) do

if(getPlayerStorageValue(pid, t.f_1) == 1 or getPlayerStorageValue(pid, t.f_2) == 1) then

setPlayerStorageValue(pid, t.f, -1)

doTeleportThing(pid, getTownTemplePosition(getPlayerTown(pid)))

doSendMagicEffect(getCreaturePosition(pid), CONST_ME_TELEPORT)

setPlayerStorageValue(pid, t.g, 0)

setPlayerStorageValue(pid, t.l, 0)

setPlayerStorageValue(pid, t.u, 0)

setPlayerStorageValue(pid, t.f_1, -1)

setPlayerStorageValue(pid, t.f_2, -1)

setPlayerStorageValue(pid, t.h, -1)

doCreatureAddHealth(pid, getCreatureMaxHealth(pid), MAGIC_EFFECT_UNKNOWN, COLOR_UNKNOWN, true)

doCreatureAddMana(pid, getCreatureMaxMana(pid))

doPlayerRemoveLethalConditions(pid)

end

end

return false

end

return false

end

return true

end

]]></event>

<event type="outfit" name="RushOutfit" event="script"><![CDATA[

domodlib('re')

function onOutfit(cid, old, current)

if(getGlobalStorageValue(t.a) == 1) then

if getPlayerGroupId(cid) > 3 then

return true

end

if getPlayerStorageValue(cid, t.h) == 0 then

if getPlayerStorageValue(cid, t.f) > -1 then

doPlayerSendCancel(cid, "You cannot change your outfit during the event.")

return false

end

end

end

return true

end

]]></event>

</mod>

Download do mapa.

http://www.2shared.c...ySTo3Q/Map.html

Scan

https://www.virustot...sis/1349135527/

Mais tarde posto o servidor que é vendido pela ChaitoSoft e quem sabe o cast com as source já para compilar!

Te ajudei +REP :D

Editado por Duda Lima (veja o histórico de edições)
Link para o post
Compartilhar em outros sites
Markin

Markin 528

Postado
Postado

opa esse evento é muito legal pra servidores que apostam no pvp rs, reputado!

16/11/2014

23/11/2014

 

RIP AnneMotta 21/01/2012 - 15/01/2014

Liga das lendas: DIAMOND É A META

6qpqBbJ.png

Link para o post
Compartilhar em outros sites
  • 1 month later...
Rogeriok

Rogeriok 4

Postado
Postado (editado)

Olá, mano pra instalar esse script eu preciso, copiar isso:

</description>

<config name="re"><![CDATA[

t = {

a = 32145,

g = 32146,

l = 32147,

u = 32148,

h = 32149,

wv = 32150,

c = 0,

q = "Rush Event has been started! Enjoy and have fun!",

f = 5447,

f_1 = 5448,

f_2 = 5449,

d_1 = {x = 26598, y = 26758, z = 7}, -- red temple

d_2 = {x = 26655, y = 26726, z = 7}, -- blue temple

x = "Event won't start bacause too few people were willing to participate",

w = {x = 26628, y = 26804, z = 7},

lvl = 80,

v = 2,

mn = 1,

m = 3,

o = "Event was completed, RED TEAM has won Rush Event!",

y = "Event was completed, BLUE TEAM has won Rush Event!",

i_1 = 2160,

i_2 = 10,

t = 1,

r = 3

}

]]></config>

<globalevent name="Recognition" interval="1500" event="script"><![CDATA[

domodlib('re')

function onThink(interval, lastExecution, thinkInterval)

if(getGlobalStorageValue(t.a) == 1) then

for _, pid in ipairs(getPlayersOnline()) do

if getPlayerStorageValue(pid, t.f) == 1 then

if(getPlayerStorageValue(pid, t.f_1) == 0) then

doSendAnimatedText(getCreaturePosition(pid), "RED TEAM", TEXTCOLOR_RED)

elseif(getPlayerStorageValue(pid, t.f_1) == 1) then

doSendAnimatedText(getCreaturePosition(pid), "BLUE TEAM", TEXTCOLOR_LIGHTBLUE)

end

end

end

return true

end

return true

end

]]></globalevent>

<talkaction words="!start" event="script"><![CDATA[

domodlib('re')

function onSay(cid, words, param, channel)

if getPlayerGroupId(cid) > 3 then

setGlobalStorageValue(t.g, 1)

setGlobalStorageValue(t.u, 0)

setGlobalStorageValue(t.l, 0)

setGlobalStorageValue(t.a, 1)

setGlobalStorageValue(t.c, 0)

setGlobalStorageValue(t.wv, 0)

doBroadcastMessage("Attention! Immediately register to Rush Event, event will start for ".. t.t .." minutes. All players can join to event typing this command: !rush", MESSAGE_STATUS_WARNING)

addEvent(function()

doBroadcastMessage("Rush event, started in 2 minutes. If you want to join, type this command: !rush", MESSAGE_STATUS_WARNING)

end, (t.t - 2) * 1000 * 60)

addEvent(function()

doBroadcastMessage("Rush event, started in a minute. If you want to join, type this command: !rush", MESSAGE_STATUS_WARNING)

end, (t.t - 1) * 1000 * 60)

addEvent(start, t.t * 1000 * 60, cid)

return true

end

return true

end

function results()

if(getGlobalStorageValue(t.a) == 1) then

local red = getGlobalStorageValue(t.l)

local blue = getGlobalStorageValue(t.u)

doBroadcastMessage("Rush Events, results:\nRed Team scored: ".. red .." frags.\nBlue Team scored: ".. blue .." frags.\nMatch is under way to ".. t.v .." frags.", MESSAGE_STATUS_WARNING)

addEvent(results, t.r * 1000 * 60)

end

end

function start(cid)

if(getGlobalStorageValue(t.a) == 1 and getGlobalStorageValue(t.c) >= t.mn) then

doBroadcastMessage(t.q, MESSAGE_STATUS_WARNING)

setGlobalStorageValue(t.wv, 1)

addEvent(results, t.r * 1000 * 60)

for _, pid in ipairs(getPlayersOnline()) do

local myOutfit = getCreatureOutfit(pid)

local red = {lookType = myOutfit.lookType, lookHead = 94, lookBody = 94, lookLegs = 94, lookFeet = 94, lookTypeEx = 0, lookAddons = myOutfit.lookAddons}

local blue = {lookType = myOutfit.lookType, lookHead = 86, lookBody = 86, lookLegs = 86, lookFeet = 86, lookTypeEx = 0, lookAddons = myOutfit.lookAddons}

if getPlayerStorageValue(pid, t.f) == 1 then

doCreatureAddHealth(pid, getCreatureMaxHealth(pid))

doCreatureAddMana(pid, getCreatureMaxMana(pid))

if((getPlayerStorageValue(pid, t.g) % 2) == 1) then

doCreatureChangeOutfit(pid, red)

setPlayerStorageValue(pid, t.h, 0)

doTeleportThing(pid, t.d_1)

setPlayerStorageValue(pid, t.f, 1)

setPlayerStorageValue(pid, t.f_1, 0)

setPlayerStorageValue(pid, t.f_2, 1)

doSendMagicEffect(getCreaturePosition(pid), 10)

doPlayerSendTextMessage(pid, MESSAGE_EVENT_ADVANCE, "You are in RED TEAM!\nThis battle will continue up to ".. t.v .." frags!")

else

doCreatureChangeOutfit(pid, blue)

doTeleportThing(pid, t.d_2)

setPlayerStorageValue(pid, t.h, 0)

setPlayerStorageValue(pid, t.f, 1)

setPlayerStorageValue(pid, t.f_1, 1)

setPlayerStorageValue(pid, t.f_2, 0)

doSendMagicEffect(getCreaturePosition(pid), 10)

doPlayerSendTextMessage(pid, MESSAGE_EVENT_ADVANCE, "You are in BLUE TEAM!\nThis battle will continue up to ".. t.v .." frags!")

end

end

end

elseif(getGlobalStorageValue(t.c) < t.mn) then

doBroadcastMessage(t.x, MESSAGE_STATUS_WARNING)

setGlobalStorageValue(t.a, 0)

for _, pid in ipairs(getPlayersOnline()) do

if getPlayerStorageValue(pid, t.f) == 1 then

setPlayerStorageValue(pid, t.f, -1)

doTeleportThing(pid, getTownTemplePosition(getPlayerTown(pid)))

doSendMagicEffect(getCreaturePosition(pid), CONST_ME_TELEPORT)

end

end

end

end

]]></talkaction>

<globalevent name="RushStart" time="00:09" event="script"><![CDATA[

domodlib('re')

function onTime(interval, lastExecution)

setGlobalStorageValue(t.g, 1)

setGlobalStorageValue(t.u, 0)

setGlobalStorageValue(t.l, 0)

setGlobalStorageValue(t.a, 1)

setGlobalStorageValue(t.c, 0)

setGlobalStorageValue(t.wv, 0)

doBroadcastMessage("Attention! Immediately register to Rush Event, event will start for ".. t.t .." minutes. All players can join to event typing this command: !rush", MESSAGE_STATUS_WARNING)

addEvent(function()

doBroadcastMessage("Rush event, started in 2 minutes. If you want to join, type this command: !rush", MESSAGE_STATUS_WARNING)

end, (t.t - 2) * 1000 * 60)

addEvent(function()

doBroadcastMessage("Rush event, started in a minute. If you want to join, type this command: !rush", MESSAGE_STATUS_WARNING)

end, (t.t - 1) * 1000 * 60)

addEvent(start, t.t * 1000 * 60, cid)

end

function results()

if(getGlobalStorageValue(t.a) == 1) then

local red = getGlobalStorageValue(t.l)

local blue = getGlobalStorageValue(t.u)

doBroadcastMessage("Rush Events, results:\nRed Team scored: ".. red .." frags.\nBlue Team scored: ".. blue .." frags.\nMatch is under way to ".. t.v .." frags.", MESSAGE_STATUS_WARNING)

addEvent(results, t.r * 1000 * 60)

end

end

function start(cid)

if(getGlobalStorageValue(t.a) == 1 and getGlobalStorageValue(t.c) >= t.mn) then

doBroadcastMessage(t.q, MESSAGE_STATUS_WARNING)

setGlobalStorageValue(t.wv, 1)

addEvent(results, t.r * 1000 * 60)

for _, pid in ipairs(getPlayersOnline()) do

local myOutfit = getCreatureOutfit(pid)

local red = {lookType = myOutfit.lookType, lookHead = 94, lookBody = 94, lookLegs = 94, lookFeet = 94, lookTypeEx = 0, lookAddons = myOutfit.lookAddons}

local blue = {lookType = myOutfit.lookType, lookHead = 86, lookBody = 86, lookLegs = 86, lookFeet = 86, lookTypeEx = 0, lookAddons = myOutfit.lookAddons}

if getPlayerStorageValue(pid, t.f) == 1 then

doCreatureAddHealth(pid, getCreatureMaxHealth(pid))

doCreatureAddMana(pid, getCreatureMaxMana(pid))

if((getPlayerStorageValue(pid, t.g) % 2) == 1) then

doCreatureChangeOutfit(pid, red)

setPlayerStorageValue(pid, t.h, 0)

doTeleportThing(pid, t.d_1)

setPlayerStorageValue(pid, t.f, 1)

setPlayerStorageValue(pid, t.f_1, 0)

setPlayerStorageValue(pid, t.f_2, 1)

doSendMagicEffect(getCreaturePosition(pid), 10)

doPlayerSendTextMessage(pid, MESSAGE_EVENT_ADVANCE, "You are in RED TEAM!\nThis battle will continue up to ".. t.v .." frags!")

else

doCreatureChangeOutfit(pid, blue)

setPlayerStorageValue(pid, t.h, 0)

doTeleportThing(pid, t.d_2)

setPlayerStorageValue(pid, t.f, 1)

setPlayerStorageValue(pid, t.f_1, 1)

setPlayerStorageValue(pid, t.f_2, 0)

doSendMagicEffect(getCreaturePosition(pid), 10)

doPlayerSendTextMessage(pid, MESSAGE_EVENT_ADVANCE, "You are in BLUE TEAM!\nThis battle will continue up to ".. t.v .." frags!")

end

end

end

elseif(getGlobalStorageValue(t.c) < t.mn) then

doBroadcastMessage(t.x, MESSAGE_STATUS_WARNING)

setGlobalStorageValue(t.a, 0)

for _, pid in ipairs(getPlayersOnline()) do

if getPlayerStorageValue(pid, t.f) == 1 then

setPlayerStorageValue(pid, t.f, -1)

doTeleportThing(pid, getTownTemplePosition(getPlayerTown(pid)))

doSendMagicEffect(getCreaturePosition(pid), CONST_ME_TELEPORT)

end

end

end

end

]]></globalevent>

<talkaction words="!rush" event="script"><![CDATA[

domodlib('re')

function onSay(cid, words, param, channel)

if getGlobalStorageValue(t.a) == 1 and getGlobalStorageValue(t.wv) ~= 1 then

if getPlayerLevel(cid) >= t.lvl then

if getPlayerStorageValue(cid, t.f) == -1 then

if getTilePzInfo(getPlayerPosition(cid)) == true then

if getGlobalStorageValue(t.c) < t.m then

setGlobalStorageValue(t.c, getGlobalStorageValue(t.c)+1)

if getGlobalStorageValue(t.c) == t.m then

doPlayerSendCancel(cid, "Event is full [" .. getGlobalStorageValue(t.c) .. " players]!")

else

doBroadcastMessage("" .. getPlayerName(cid) .. " has joined to Rush Event! Actually we have: " .. getGlobalStorageValue(t.c) .. " players!", 19)

end

setPlayerStorageValue(cid, t.f, 1)

setPlayerStorageValue(cid, t.h, -1)

doTeleportThing(cid, t.w)

doSendMagicEffect(getCreaturePosition(cid), CONST_ME_TELEPORT)

setPlayerStorageValue(cid, t.g, getGlobalStorageValue(t.g))

setGlobalStorageValue(t.g, tonumber(getGlobalStorageValue(t.g))+1)

else

doPlayerSendCancel(cid, "Event is full [" .. getGlobalStorageValue(t.c) .. " players]!")

return true

end

else

doPlayerSendCancel(cid, "You must be in protection zone.")

return true

end

else

doPlayerSendCancel(cid, "You are already registered in this event.")

return true

end

else

doPlayerSendCancel(cid, "Your level is too low to participate in this event.")

return true

end

else

doPlayerSendCancel(cid, "At the moment there are no records for this event.")

return true

end

return true

end

]]></talkaction>

<event type="combat" name="RushCombat" event="script"><![CDATA[

domodlib('re')

function onCombat(cid, target)

if(getGlobalStorageValue(t.a) == 1) then

if isPlayer(cid) and isPlayer(target) then

if getPlayerStorageValue(cid, t.f) == 1 and getPlayerStorageValue(target, t.f) == 1 then

if getPlayerStorageValue(cid, t.f_1) == getPlayerStorageValue(target, t.f_1) then

return doPlayerSendCancel(cid, "Sorry, you cannot attack your own team.") and false

end

end

end

end

return true

end

]]></event>

<event type="attack" name="RushAttack" event="script"><![CDATA[

domodlib('re')

function onAttack(cid, target)

if(getGlobalStorageValue(t.a) == 1) then

if isPlayer(cid) and isPlayer(target) then

if getPlayerStorageValue(cid, t.f) == 1 and getPlayerStorageValue(target, t.f) == 1 then

if getPlayerStorageValue(cid, t.f_1) == getPlayerStorageValue(target, t.f_1) then

return doPlayerSendCancel(cid, "Sorry, you cannot attack your own team.") and false

end

end

end

end

return true

end

]]></event>

<event type="preparedeath" name="RushDead" event="script"><![CDATA[

domodlib('re')

function onPrepareDeath(cid, deathList)

if(not isPlayer(cid)) then

return true

end

if getGlobalStorageValue(t.a) == 1 then

local strings = {""}

local j, position, corpse = 1, 1, 0

for _, pid in ipairs(deathList) do

if isCreature(pid) == true then

strings[position] = j == 1 and "" or strings[position] .. ", "

strings[position] = strings[position] .. getCreatureName(pid) .. ""

j = j + 1

else

strings[position] = j == 1 and "" or strings[position] .. ", "

strings[position] = strings[position] .."a field item"

j = j + 1

end

end

for i, str in ipairs(strings) do

if(str:sub(str:len()) ~= ",") then

str = str .. "."

end

desc = "You recognize "

desc = desc .. "" .. getCreatureName(cid) .. ". He was killed by " .. str

end

if(getPlayerSex(cid) == 1) then

corpse = doCreateItem(3058, getCreaturePosition(cid))

else

corpse = doCreateItem(3065, getCreaturePosition(cid))

end

doItemSetAttribute(corpse, "description", desc)

if((getPlayerStorageValue(cid, t.g) % 2) == 1) then

setGlobalStorageValue(t.u, getGlobalStorageValue(t.u)+1)

else

setGlobalStorageValue(t.l, getGlobalStorageValue(t.l)+1)

end

local red = getGlobalStorageValue(t.l)

local blue = getGlobalStorageValue(t.u)

if blue < t.v or red < t.v then

if(isPlayer(cid) == false) then

return true

end

if((getPlayerStorageValue(cid, t.g) % 2) == 1) then

doTeleportThing(cid, t.d_1)

doSendMagicEffect(getCreaturePosition(cid), 10)

doCreatureAddHealth(cid, getCreatureMaxHealth(cid), MAGIC_EFFECT_UNKNOWN, COLOR_UNKNOWN, true)

doCreatureAddMana(cid, getCreatureMaxMana(cid))

doPlayerRemoveLethalConditions(cid)

if getCreatureSkullType(cid) == SKULL_WHITE then

doCreatureSetSkullType(cid, 0)

end

else

doTeleportThing(cid, t.d_2)

doSendMagicEffect(getCreaturePosition(cid), 10)

doCreatureAddHealth(cid, getCreatureMaxHealth(cid), MAGIC_EFFECT_UNKNOWN, COLOR_UNKNOWN, true)

doCreatureAddMana(cid, getCreatureMaxMana(cid))

doPlayerRemoveLethalConditions(cid)

if getCreatureSkullType(cid) == SKULL_WHITE then

doCreatureSetSkullType(cid, 0)

end

end

end

if blue >= t.v then

doBroadcastMessage(t.y, MESSAGE_STATUS_WARNING)

setGlobalStorageValue(t.h, 1)

for _, pid in ipairs(getPlayersOnline()) do

if(getPlayerStorageValue(pid, t.f_1) == 1) then

doPlayerAddItem(cid, 2160, 30)

end

end

elseif red >= t.v then

doBroadcastMessage(t.o, MESSAGE_STATUS_WARNING)

setGlobalStorageValue(t.h, 1)

for _, pid in ipairs(getPlayersOnline()) do

if(getPlayerStorageValue(pid, t.f_2) == 1) then

doPlayerAddItem(cid, 2160, 30)

end

end

end

if getGlobalStorageValue(t.h) == 1 then

setGlobalStorageValue(t.a, 0)

setGlobalStorageValue(t.h, 0)

setGlobalStorageValue(t.wv, -1)

setPlayerStorageValue(cid, t.f, -1)

setPlayerStorageValue(cid, t.g, 0)

setPlayerStorageValue(cid, t.l, 0)

setPlayerStorageValue(cid, t.u, 0)

setPlayerStorageValue(cid, t.f_1, -1)

setPlayerStorageValue(cid, t.f_2, -1)

setPlayerStorageValue(cid, t.h, -1)

doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid)), true)

doSendMagicEffect(getCreaturePosition(cid), 10)

doCreatureAddHealth(cid, getCreatureMaxHealth(cid), MAGIC_EFFECT_UNKNOWN, COLOR_UNKNOWN, true)

doCreatureAddMana(cid, getCreatureMaxMana(cid))

doPlayerRemoveLethalConditions(cid)

for _, pid in ipairs(getPlayersOnline()) do

if(getPlayerStorageValue(pid, t.f_1) == 1 or getPlayerStorageValue(pid, t.f_2) == 1) then

setPlayerStorageValue(pid, t.f, -1)

doTeleportThing(pid, getTownTemplePosition(getPlayerTown(pid)))

doSendMagicEffect(getCreaturePosition(pid), CONST_ME_TELEPORT)

setPlayerStorageValue(pid, t.g, 0)

setPlayerStorageValue(pid, t.l, 0)

setPlayerStorageValue(pid, t.u, 0)

setPlayerStorageValue(pid, t.f_1, -1)

setPlayerStorageValue(pid, t.f_2, -1)

setPlayerStorageValue(pid, t.h, -1)

doCreatureAddHealth(pid, getCreatureMaxHealth(pid), MAGIC_EFFECT_UNKNOWN, COLOR_UNKNOWN, true)

doCreatureAddMana(pid, getCreatureMaxMana(pid))

doPlayerRemoveLethalConditions(pid)

end

end

return false

end

return false

end

return true

end

]]></event>

<event type="outfit" name="RushOutfit" event="script"><![CDATA[

domodlib('re')

function onOutfit(cid, old, current)

if(getGlobalStorageValue(t.a) == 1) then

if getPlayerGroupId(cid) > 3 then

return true

end

if getPlayerStorageValue(cid, t.h) == 0 then

if getPlayerStorageValue(cid, t.f) > -1 then

doPlayerSendCancel(cid, "You cannot change your outfit during the event.")

return false

end

end

end

return true

end

]]></event>

</mod>

Só um arquivo dentro da pasta Mods?

Editado por Rogeriok (veja o histórico de edições)

Assinatura retirada pela direção!

Link para o post
Compartilhar em outros sites
Kozzz

Kozzz 3

Postado
Postado (editado)

só falto o print mesmo. vou baixa e testa aqui se funcionar te do rep +

é a minha 1° vez colocando um evento, eu tenho que copia esse mapa e cola no meu mapa global ou so coloca-lo dentro da pasta world ?

Editado por Kozzz (veja o histórico de edições)
Link para o post
Compartilhar em outros sites
Rogeriok

Rogeriok 4

Postado
Postado

Esse Script no meu OT, o team que mata mais nem sempre ganha e a premiação é aleatório qualquer player pode ganhar....pq?

Assinatura retirada pela direção!

Link para o post
Compartilhar em outros sites
  • 3 weeks later...
ricardo3

ricardo3 60

Postado
Postado (editado)

AQUI TAMBEM DEU ERROS.. QUANDO O CARA MORRE , aparece no distro. E NAO TEEEM FIIIIIIIIIMMMM :'(..

ive que muda a coordenada porque caia encima do mapa. arrumei todas as positions e o erro perciste..

coloquei pra 10frags.. chegou atpe sei lá quantos acima de 10 frags..

11:38 Rush Events, results:

Red Team scored: 16 frags.

Blue Team scored: 8 frags.

Match is under way to 10 frags.

\/ isso é quando os players morre

imagemhsib.png

Editado por ricardo3 (veja o histórico de edições)

  • Ajudei? REP+

http://www.youtube.com/watch?v=xHa6-y2hqrk&feature=youtu.be

Link para o post
Compartilhar em outros sites
  • 2 weeks later...
Fausto32

Fausto32 92

Postado
Postado (editado)

Ta ai mais um evento que é vendido pela ChaitoSoft!

#Descrição do evento: Neste evento 2 times (Azul e Vermelho) vão batalhar para conseguir a "quantidade" de frags para ganhar o evento, totalmente configuravel

#O que possui?

- Abertura automática ou via comando.

- Quantidade minima de players para o evento (configuravel)

- Level minimo para entrar no evento (configuravel)

- Quantidade de frags que terão que conquistar para ganhar (configuravel)

- Separação automática dos times (configuravel)

- Mapa incluso

- Tutorial explicativo

- Premio o time vencedor do evento (configuravel)

- Entre outras coisas….

*OBS: Este evento só funciona em TFS 0.4.

Instalação:

Em Data/Mods

Rush_Event.xml

<?xml version="1.0" encoding="UTF-8"?>

<mod name="Rush Event" version="1.0" author="Tibia Hosting por disponibilizar" contact="[email protected]" enabled="yes">

<description>

TUTORIAL DE COMO CONFIGURAR O EVENTO ACOMPANHE POR AQUI:

q - mensagem que vai ser exibida quando o evento começar

d_1 - posição do tempo vermelho ao começar evento

d_2 - posição do tempo azul ao começar evento

x - mensagem que vai ser exibida quando o evento não começar

w - posição da sala de espera, onde os players vão ficar antes de começar

lvl - level minimo para participar do evento

v - a quantidade de frags que será necessária para o time ganhar

mn - quantidade minima de players para começar o evento

m - maximo de players dentro do evento

o - mensagem exibida quando o time vermelho ganhar

y - mensagem exibida quando o time azul ganhar

i_1 - id do premio (agora é crystal coin = 2160)

i_2 - quantidade do premio (agora esta 10 crystal coins)

t - tempo para começar o evento (agora esta is 5 minutos)

r - tempo em que os resultados da batalha serão mostrados aos players (agora esta 3 minutos)

Adicione isto em 050-function.lua:

-------------------------------------------------------------------------------------------------

function doPlayerRemoveLethalConditions(cid)

local tmp = {1, 2, 4, 16, 32, 64, 128, 256, 512, 1024, 2048, 4096, 8192, 32768, 65536}

for i = 1, #tmp do

if(hasCondition(cid, tmp)) then doRemoveCondition(cid, tmp) end

end

return true

end

-------------------------------------------------------------------------------------------------

Adicione isto em login.lua:

-------------------------------------------------------------------------------------------------

registerCreatureEvent(cid, "RushCombat")

registerCreatureEvent(cid, "RushAttack")

registerCreatureEvent(cid, "RushDead")

registerCreatureEvent(cid, "RushOutfit")

-------------------------------------------------------------------------------------------------

Agora daqui pra baixo você vai configurar de acordo com o tutorial acima, o resto se não tiver

conhecimento não mecha em nada pois poderá bugar o evento e não daremos suporte:

</description>

<config name="re"><![CDATA[

t = {

a = 32145,

g = 32146,

l = 32147,

u = 32148,

h = 32149,

wv = 32150,

c = 0,

q = "Rush Event has been started! Enjoy and have fun!",

f = 5447,

f_1 = 5448,

f_2 = 5449,

d_1 = {x = 26598, y = 26758, z = 7}, -- red temple

d_2 = {x = 26655, y = 26726, z = 7}, -- blue temple

x = "Event won't start bacause too few people were willing to participate",

w = {x = 26628, y = 26804, z = 7},

lvl = 80,

v = 2,

mn = 1,

m = 3,

o = "Event was completed, RED TEAM has won Rush Event!",

y = "Event was completed, BLUE TEAM has won Rush Event!",

i_1 = 2160,

i_2 = 10,

t = 1,

r = 3

}

]]></config>

<globalevent name="Recognition" interval="1500" event="script"><![CDATA[

domodlib('re')

function onThink(interval, lastExecution, thinkInterval)

if(getGlobalStorageValue(t.a) == 1) then

for _, pid in ipairs(getPlayersOnline()) do

if getPlayerStorageValue(pid, t.f) == 1 then

if(getPlayerStorageValue(pid, t.f_1) == 0) then

doSendAnimatedText(getCreaturePosition(pid), "RED TEAM", TEXTCOLOR_RED)

elseif(getPlayerStorageValue(pid, t.f_1) == 1) then

doSendAnimatedText(getCreaturePosition(pid), "BLUE TEAM", TEXTCOLOR_LIGHTBLUE)

end

end

end

return true

end

return true

end

]]></globalevent>

<talkaction words="!start" event="script"><![CDATA[

domodlib('re')

function onSay(cid, words, param, channel)

if getPlayerGroupId(cid) > 3 then

setGlobalStorageValue(t.g, 1)

setGlobalStorageValue(t.u, 0)

setGlobalStorageValue(t.l, 0)

setGlobalStorageValue(t.a, 1)

setGlobalStorageValue(t.c, 0)

setGlobalStorageValue(t.wv, 0)

doBroadcastMessage("Attention! Immediately register to Rush Event, event will start for ".. t.t .." minutes. All players can join to event typing this command: !rush", MESSAGE_STATUS_WARNING)

addEvent(function()

doBroadcastMessage("Rush event, started in 2 minutes. If you want to join, type this command: !rush", MESSAGE_STATUS_WARNING)

end, (t.t - 2) * 1000 * 60)

addEvent(function()

doBroadcastMessage("Rush event, started in a minute. If you want to join, type this command: !rush", MESSAGE_STATUS_WARNING)

end, (t.t - 1) * 1000 * 60)

addEvent(start, t.t * 1000 * 60, cid)

return true

end

return true

end

function results()

if(getGlobalStorageValue(t.a) == 1) then

local red = getGlobalStorageValue(t.l)

local blue = getGlobalStorageValue(t.u)

doBroadcastMessage("Rush Events, results:\nRed Team scored: ".. red .." frags.\nBlue Team scored: ".. blue .." frags.\nMatch is under way to ".. t.v .." frags.", MESSAGE_STATUS_WARNING)

addEvent(results, t.r * 1000 * 60)

end

end

function start(cid)

if(getGlobalStorageValue(t.a) == 1 and getGlobalStorageValue(t.c) >= t.mn) then

doBroadcastMessage(t.q, MESSAGE_STATUS_WARNING)

setGlobalStorageValue(t.wv, 1)

addEvent(results, t.r * 1000 * 60)

for _, pid in ipairs(getPlayersOnline()) do

local myOutfit = getCreatureOutfit(pid)

local red = {lookType = myOutfit.lookType, lookHead = 94, lookBody = 94, lookLegs = 94, lookFeet = 94, lookTypeEx = 0, lookAddons = myOutfit.lookAddons}

local blue = {lookType = myOutfit.lookType, lookHead = 86, lookBody = 86, lookLegs = 86, lookFeet = 86, lookTypeEx = 0, lookAddons = myOutfit.lookAddons}

if getPlayerStorageValue(pid, t.f) == 1 then

doCreatureAddHealth(pid, getCreatureMaxHealth(pid))

doCreatureAddMana(pid, getCreatureMaxMana(pid))

if((getPlayerStorageValue(pid, t.g) % 2) == 1) then

doCreatureChangeOutfit(pid, red)

setPlayerStorageValue(pid, t.h, 0)

doTeleportThing(pid, t.d_1)

setPlayerStorageValue(pid, t.f, 1)

setPlayerStorageValue(pid, t.f_1, 0)

setPlayerStorageValue(pid, t.f_2, 1)

doSendMagicEffect(getCreaturePosition(pid), 10)

doPlayerSendTextMessage(pid, MESSAGE_EVENT_ADVANCE, "You are in RED TEAM!\nThis battle will continue up to ".. t.v .." frags!")

else

doCreatureChangeOutfit(pid, blue)

doTeleportThing(pid, t.d_2)

setPlayerStorageValue(pid, t.h, 0)

setPlayerStorageValue(pid, t.f, 1)

setPlayerStorageValue(pid, t.f_1, 1)

setPlayerStorageValue(pid, t.f_2, 0)

doSendMagicEffect(getCreaturePosition(pid), 10)

doPlayerSendTextMessage(pid, MESSAGE_EVENT_ADVANCE, "You are in BLUE TEAM!\nThis battle will continue up to ".. t.v .." frags!")

end

end

end

elseif(getGlobalStorageValue(t.c) < t.mn) then

doBroadcastMessage(t.x, MESSAGE_STATUS_WARNING)

setGlobalStorageValue(t.a, 0)

for _, pid in ipairs(getPlayersOnline()) do

if getPlayerStorageValue(pid, t.f) == 1 then

setPlayerStorageValue(pid, t.f, -1)

doTeleportThing(pid, getTownTemplePosition(getPlayerTown(pid)))

doSendMagicEffect(getCreaturePosition(pid), CONST_ME_TELEPORT)

end

end

end

end

]]></talkaction>

<globalevent name="RushStart" time="00:09" event="script"><![CDATA[

domodlib('re')

function onTime(interval, lastExecution)

setGlobalStorageValue(t.g, 1)

setGlobalStorageValue(t.u, 0)

setGlobalStorageValue(t.l, 0)

setGlobalStorageValue(t.a, 1)

setGlobalStorageValue(t.c, 0)

setGlobalStorageValue(t.wv, 0)

doBroadcastMessage("Attention! Immediately register to Rush Event, event will start for ".. t.t .." minutes. All players can join to event typing this command: !rush", MESSAGE_STATUS_WARNING)

addEvent(function()

doBroadcastMessage("Rush event, started in 2 minutes. If you want to join, type this command: !rush", MESSAGE_STATUS_WARNING)

end, (t.t - 2) * 1000 * 60)

addEvent(function()

doBroadcastMessage("Rush event, started in a minute. If you want to join, type this command: !rush", MESSAGE_STATUS_WARNING)

end, (t.t - 1) * 1000 * 60)

addEvent(start, t.t * 1000 * 60, cid)

end

function results()

if(getGlobalStorageValue(t.a) == 1) then

local red = getGlobalStorageValue(t.l)

local blue = getGlobalStorageValue(t.u)

doBroadcastMessage("Rush Events, results:\nRed Team scored: ".. red .." frags.\nBlue Team scored: ".. blue .." frags.\nMatch is under way to ".. t.v .." frags.", MESSAGE_STATUS_WARNING)

addEvent(results, t.r * 1000 * 60)

end

end

function start(cid)

if(getGlobalStorageValue(t.a) == 1 and getGlobalStorageValue(t.c) >= t.mn) then

doBroadcastMessage(t.q, MESSAGE_STATUS_WARNING)

setGlobalStorageValue(t.wv, 1)

addEvent(results, t.r * 1000 * 60)

for _, pid in ipairs(getPlayersOnline()) do

local myOutfit = getCreatureOutfit(pid)

local red = {lookType = myOutfit.lookType, lookHead = 94, lookBody = 94, lookLegs = 94, lookFeet = 94, lookTypeEx = 0, lookAddons = myOutfit.lookAddons}

local blue = {lookType = myOutfit.lookType, lookHead = 86, lookBody = 86, lookLegs = 86, lookFeet = 86, lookTypeEx = 0, lookAddons = myOutfit.lookAddons}

if getPlayerStorageValue(pid, t.f) == 1 then

doCreatureAddHealth(pid, getCreatureMaxHealth(pid))

doCreatureAddMana(pid, getCreatureMaxMana(pid))

if((getPlayerStorageValue(pid, t.g) % 2) == 1) then

doCreatureChangeOutfit(pid, red)

setPlayerStorageValue(pid, t.h, 0)

doTeleportThing(pid, t.d_1)

setPlayerStorageValue(pid, t.f, 1)

setPlayerStorageValue(pid, t.f_1, 0)

setPlayerStorageValue(pid, t.f_2, 1)

doSendMagicEffect(getCreaturePosition(pid), 10)

doPlayerSendTextMessage(pid, MESSAGE_EVENT_ADVANCE, "You are in RED TEAM!\nThis battle will continue up to ".. t.v .." frags!")

else

doCreatureChangeOutfit(pid, blue)

setPlayerStorageValue(pid, t.h, 0)

doTeleportThing(pid, t.d_2)

setPlayerStorageValue(pid, t.f, 1)

setPlayerStorageValue(pid, t.f_1, 1)

setPlayerStorageValue(pid, t.f_2, 0)

doSendMagicEffect(getCreaturePosition(pid), 10)

doPlayerSendTextMessage(pid, MESSAGE_EVENT_ADVANCE, "You are in BLUE TEAM!\nThis battle will continue up to ".. t.v .." frags!")

end

end

end

elseif(getGlobalStorageValue(t.c) < t.mn) then

doBroadcastMessage(t.x, MESSAGE_STATUS_WARNING)

setGlobalStorageValue(t.a, 0)

for _, pid in ipairs(getPlayersOnline()) do

if getPlayerStorageValue(pid, t.f) == 1 then

setPlayerStorageValue(pid, t.f, -1)

doTeleportThing(pid, getTownTemplePosition(getPlayerTown(pid)))

doSendMagicEffect(getCreaturePosition(pid), CONST_ME_TELEPORT)

end

end

end

end

]]></globalevent>

<talkaction words="!rush" event="script"><![CDATA[

domodlib('re')

function onSay(cid, words, param, channel)

if getGlobalStorageValue(t.a) == 1 and getGlobalStorageValue(t.wv) ~= 1 then

if getPlayerLevel(cid) >= t.lvl then

if getPlayerStorageValue(cid, t.f) == -1 then

if getTilePzInfo(getPlayerPosition(cid)) == true then

if getGlobalStorageValue(t.c) < t.m then

setGlobalStorageValue(t.c, getGlobalStorageValue(t.c)+1)

if getGlobalStorageValue(t.c) == t.m then

doPlayerSendCancel(cid, "Event is full [" .. getGlobalStorageValue(t.c) .. " players]!")

else

doBroadcastMessage("" .. getPlayerName(cid) .. " has joined to Rush Event! Actually we have: " .. getGlobalStorageValue(t.c) .. " players!", 19)

end

setPlayerStorageValue(cid, t.f, 1)

setPlayerStorageValue(cid, t.h, -1)

doTeleportThing(cid, t.w)

doSendMagicEffect(getCreaturePosition(cid), CONST_ME_TELEPORT)

setPlayerStorageValue(cid, t.g, getGlobalStorageValue(t.g))

setGlobalStorageValue(t.g, tonumber(getGlobalStorageValue(t.g))+1)

else

doPlayerSendCancel(cid, "Event is full [" .. getGlobalStorageValue(t.c) .. " players]!")

return true

end

else

doPlayerSendCancel(cid, "You must be in protection zone.")

return true

end

else

doPlayerSendCancel(cid, "You are already registered in this event.")

return true

end

else

doPlayerSendCancel(cid, "Your level is too low to participate in this event.")

return true

end

else

doPlayerSendCancel(cid, "At the moment there are no records for this event.")

return true

end

return true

end

]]></talkaction>

<event type="combat" name="RushCombat" event="script"><![CDATA[

domodlib('re')

function onCombat(cid, target)

if(getGlobalStorageValue(t.a) == 1) then

if isPlayer(cid) and isPlayer(target) then

if getPlayerStorageValue(cid, t.f) == 1 and getPlayerStorageValue(target, t.f) == 1 then

if getPlayerStorageValue(cid, t.f_1) == getPlayerStorageValue(target, t.f_1) then

return doPlayerSendCancel(cid, "Sorry, you cannot attack your own team.") and false

end

end

end

end

return true

end

]]></event>

<event type="attack" name="RushAttack" event="script"><![CDATA[

domodlib('re')

function onAttack(cid, target)

if(getGlobalStorageValue(t.a) == 1) then

if isPlayer(cid) and isPlayer(target) then

if getPlayerStorageValue(cid, t.f) == 1 and getPlayerStorageValue(target, t.f) == 1 then

if getPlayerStorageValue(cid, t.f_1) == getPlayerStorageValue(target, t.f_1) then

return doPlayerSendCancel(cid, "Sorry, you cannot attack your own team.") and false

end

end

end

end

return true

end

]]></event>

<event type="preparedeath" name="RushDead" event="script"><![CDATA[

domodlib('re')

function onPrepareDeath(cid, deathList)

if(not isPlayer(cid)) then

return true

end

if getGlobalStorageValue(t.a) == 1 then

local strings = {""}

local j, position, corpse = 1, 1, 0

for _, pid in ipairs(deathList) do

if isCreature(pid) == true then

strings[position] = j == 1 and "" or strings[position] .. ", "

strings[position] = strings[position] .. getCreatureName(pid) .. ""

j = j + 1

else

strings[position] = j == 1 and "" or strings[position] .. ", "

strings[position] = strings[position] .."a field item"

j = j + 1

end

end

for i, str in ipairs(strings) do

if(str:sub(str:len()) ~= ",") then

str = str .. "."

end

desc = "You recognize "

desc = desc .. "" .. getCreatureName(cid) .. ". He was killed by " .. str

end

if(getPlayerSex(cid) == 1) then

corpse = doCreateItem(3058, getCreaturePosition(cid))

else

corpse = doCreateItem(3065, getCreaturePosition(cid))

end

doItemSetAttribute(corpse, "description", desc)

if((getPlayerStorageValue(cid, t.g) % 2) == 1) then

setGlobalStorageValue(t.u, getGlobalStorageValue(t.u)+1)

else

setGlobalStorageValue(t.l, getGlobalStorageValue(t.l)+1)

end

local red = getGlobalStorageValue(t.l)

local blue = getGlobalStorageValue(t.u)

if blue < t.v or red < t.v then

if(isPlayer(cid) == false) then

return true

end

if((getPlayerStorageValue(cid, t.g) % 2) == 1) then

doTeleportThing(cid, t.d_1)

doSendMagicEffect(getCreaturePosition(cid), 10)

doCreatureAddHealth(cid, getCreatureMaxHealth(cid), MAGIC_EFFECT_UNKNOWN, COLOR_UNKNOWN, true)

doCreatureAddMana(cid, getCreatureMaxMana(cid))

doPlayerRemoveLethalConditions(cid)

if getCreatureSkullType(cid) == SKULL_WHITE then

doCreatureSetSkullType(cid, 0)

end

else

doTeleportThing(cid, t.d_2)

doSendMagicEffect(getCreaturePosition(cid), 10)

doCreatureAddHealth(cid, getCreatureMaxHealth(cid), MAGIC_EFFECT_UNKNOWN, COLOR_UNKNOWN, true)

doCreatureAddMana(cid, getCreatureMaxMana(cid))

doPlayerRemoveLethalConditions(cid)

if getCreatureSkullType(cid) == SKULL_WHITE then

doCreatureSetSkullType(cid, 0)

end

end

end

if blue >= t.v then

doBroadcastMessage(t.y, MESSAGE_STATUS_WARNING)

setGlobalStorageValue(t.h, 1)

for _, pid in ipairs(getPlayersOnline()) do

if(getPlayerStorageValue(pid, t.f_1) == 1) then

doPlayerAddItem(cid, 2160, 30)

end

end

elseif red >= t.v then

doBroadcastMessage(t.o, MESSAGE_STATUS_WARNING)

setGlobalStorageValue(t.h, 1)

for _, pid in ipairs(getPlayersOnline()) do

if(getPlayerStorageValue(pid, t.f_2) == 1) then

doPlayerAddItem(cid, 2160, 30)

end

end

end

if getGlobalStorageValue(t.h) == 1 then

setGlobalStorageValue(t.a, 0)

setGlobalStorageValue(t.h, 0)

setGlobalStorageValue(t.wv, -1)

setPlayerStorageValue(cid, t.f, -1)

setPlayerStorageValue(cid, t.g, 0)

setPlayerStorageValue(cid, t.l, 0)

setPlayerStorageValue(cid, t.u, 0)

setPlayerStorageValue(cid, t.f_1, -1)

setPlayerStorageValue(cid, t.f_2, -1)

setPlayerStorageValue(cid, t.h, -1)

doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid)), true)

doSendMagicEffect(getCreaturePosition(cid), 10)

doCreatureAddHealth(cid, getCreatureMaxHealth(cid), MAGIC_EFFECT_UNKNOWN, COLOR_UNKNOWN, true)

doCreatureAddMana(cid, getCreatureMaxMana(cid))

doPlayerRemoveLethalConditions(cid)

for _, pid in ipairs(getPlayersOnline()) do

if(getPlayerStorageValue(pid, t.f_1) == 1 or getPlayerStorageValue(pid, t.f_2) == 1) then

setPlayerStorageValue(pid, t.f, -1)

doTeleportThing(pid, getTownTemplePosition(getPlayerTown(pid)))

doSendMagicEffect(getCreaturePosition(pid), CONST_ME_TELEPORT)

setPlayerStorageValue(pid, t.g, 0)

setPlayerStorageValue(pid, t.l, 0)

setPlayerStorageValue(pid, t.u, 0)

setPlayerStorageValue(pid, t.f_1, -1)

setPlayerStorageValue(pid, t.f_2, -1)

setPlayerStorageValue(pid, t.h, -1)

doCreatureAddHealth(pid, getCreatureMaxHealth(pid), MAGIC_EFFECT_UNKNOWN, COLOR_UNKNOWN, true)

doCreatureAddMana(pid, getCreatureMaxMana(pid))

doPlayerRemoveLethalConditions(pid)

end

end

return false

end

return false

end

return true

end

]]></event>

<event type="outfit" name="RushOutfit" event="script"><![CDATA[

domodlib('re')

function onOutfit(cid, old, current)

if(getGlobalStorageValue(t.a) == 1) then

if getPlayerGroupId(cid) > 3 then

return true

end

if getPlayerStorageValue(cid, t.h) == 0 then

if getPlayerStorageValue(cid, t.f) > -1 then

doPlayerSendCancel(cid, "You cannot change your outfit during the event.")

return false

end

end

end

return true

end

]]></event>

</mod>

Download do mapa.

http://www.2shared.c...ySTo3Q/Map.html

Scan

https://www.virustot...sis/1349135527/

Mais tarde posto o servidor que é vendido pela ChaitoSoft e quem sabe o cast com as source já para compilar!

Te ajudei +REP :D

Parte de rewards deve tá meio loco pqê num tá dando premio e o outfit q e mudado no evento tu sai do evento continua com ele e com o addon pode relogar q continua com o addon :C e seria mais pratico por portal na minha opinião ^^ C Alguem poder mim da uma mão nisso aqui agradeço muito :) /+ tirando isso ae otimo evento inovador até bgd pelo conteudo ^^ REP+ Editado por Fausto32 (veja o histórico de edições)

          Procuro Equipe para projeto sério com remuneração, maior necessidade Programador em C\C++.

Link para o post
Compartilhar em outros sites
  • 2 weeks later...
Rogeriok

Rogeriok 4

Postado
Postado

Parte de rewards deve tá meio loco pqê num tá dando premio e o outfit q e mudado no evento tu sai do evento continua com ele e com o addon pode relogar q continua com o addon :C e seria mais pratico por portal na minha opinião ^^ C Alguem poder mim da uma mão nisso aqui agradeço muito :) /+ tirando isso ae otimo evento inovador até bgd pelo conteudo ^^ REP+

E dps que o player sai do evento se ele morrer não perde lvl nem itens, e como ele tivesse registrado ainda...e os players que morrem na hora que o evento esta acontecendo, estão sendo teleportados para o evento sem se registrar e pode ser qualquer lvl.

Assinatura retirada pela direção!

Link para o post
Compartilhar em outros sites
  • 1 month later...
kaio Santos

kaio Santos 32

Postado
Postado

Evento massa so arrumar os bug !

Mais vale a lagrima da derrota doque a Covardia de não ter lutado , Prefiro morrer de Pé do que sempre viver ajoelhado.

Kaio santos "soldier killed"

Link para o post
Compartilhar em outros sites
  • 5 months later...
elli

elli 36

Postado
Postado

Como arrumar os bugs ??

Venha para a evolução do mapa HEROSERV -- Versão 8.60 -

Faça parte dessa família: http://kaiakserv.com

 

Link para o post
Compartilhar em outros sites
Chiitus

Chiitus 38

Postado
Postado (editado)

Arrumei todos os BUGS do evento.

RUSH EVENT ARRUMADO POR CHIITUS

EDIT: Arrumado o link

 

Siga esses passos:

No lugar da storage 32152, coloque uma storage não usada, você terá que procurar e substituir.

Mude as variáveis e também as posições do evento.

As mensagens agora só serão mandadas se o player estiver no evento.

O prêmio agora está por chance:

function giveReward(cid)
    local hkz = math.random(1,100)
    if hkz <= 30 then
        doPlayerAddItem(cid,2160,10)
        doPlayerSendTextMessage(cid,25,"Nunca vá em um cassino: voce ganhou 100k.")

    elseif hkz > 30 and hkz <= 90 then
        doPlayerAddItem(cid,2160,30)
        doPlayerSendTextMessage(cid,25,"Joga na quina: voce ganhou 300k.")

    elseif hkz > 90 then
        doPlayerAddItem(cid,2640,1)
        doPlayerSendTextMessage(cid,25,"Cagou: voce ganhou uma soft boots.")
    end
    return true
end

Legenda:

Se a chance do player for:

- menor que 30, ele ganha 100k

- entre 30 e 90, ele ganha 300k

- maior que 90, ele ganha uma soft boots

Observação: O tempo está baseado em milisegundos (TFS 0.4)

                      Eu deixei todas as mensagens em PT-BR.

CRÉDITOS:
ChaitoSoft
Chiitus

Editado por Chiitus (veja o histórico de edições)
Link para o post
Compartilhar em outros sites
  • 7 months later...
Digoshow

Digoshow 46

Postado
Postado

Eu ia colocar no meu Otserv, mais vi que so tem Bugs o evento rs :), vou esperar pra quem sabe um dia resolverem!

 

                                                           

55f6tc.gif                     

Link para o post
Compartilhar em outros sites
  • 2 months later...

Participe da conversa

Você pode postar agora e se cadastrar mais tarde. Se você tem uma conta, faça o login para postar com sua conta.

Visitante
Responder

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emojis são permitidos.

×   Seu link foi automaticamente incorporado.   Mostrar como link

×   Seu conteúdo anterior foi restaurado.   Limpar o editor

×   Não é possível colar imagens diretamente. Carregar ou inserir imagens do URL.

×
 Share
Seguidores 1
Ir para a lista de tópicos

  • Quem Está Navegando   0 membros estão online

    Nenhum usuário registrado visualizando esta página.

  • Conteúdo Similar

    • Duda Lima
      [MOD] K/D Ratio System
      Por Duda Lima
      Mais outro Sistema que a Chaito Soft ta vendendo ta aii de graça, esse é novo ele começou a vender hoje.


      K/D Ratio System

      #Descrição:
      Sistema derivado de diversos jogos de combate, foi trazido para o Tibia com uma intenção bem legal promover a disputa pelo ranking online, intencionalidade de manter um k.d ratio bom pois isso demonstrará quanto o player é bom jogador além disso gerará uma preocupação com cada kill e death.

      Instalação:

      Em Data/Mods

      ka_ratio.xml





      Imagem do sistema
      http://imageshack.us/photo/my-images/833/kdrsystem.jpg/

      Te ajudei +REP!
    • Vodkart
      [Sistema] Battlefield Event! V.1
      Por Vodkart
      Mapa BattleField Feito Por AnneMotta :

      Mapa Battlefield.rar

      Scan: https://www.virustot...sis/1346548669/


      Imagens do mapa



      Descrição:

      - O evento é automático e acontece em determinado dia e hora da semana
      - Logo após é aberto um teleport então apenar um número limitado de players entra no evento
      - São formados por dois times, os "Black Assassins" e os "Red Barbarians"
      - Os times são balanceados automaticamente, quando o último jogador entra, esse teleport é fechado e depois de 5 minutos o evento começa, os 5 minutos são para os players ter tempo de planejar um ataque.
      - O sistema tem por finalidade matar todos do time inimigo, e os players que sobreviverem recebem um prêmio.

      Bônus:

      - Durante o evento é mostrado na tela somente dos jogadores que estão no evento um placar de times.

      - Até o último player entrar no evento, ficam mandando broadcast dizendo quanto players faltam para dar inicio ao jogo.

      - Se o evento abrir e não atingir a meta de players colocada, o evento é finalizado e os players voltam para o templo.




      Lembre-se:

      - De colocar Pvp Tool na área
      - De colocar área NoLogout


      Imagens:




      Instalação:

       
      Data > Lib       Data > CreatureScript > Script     Data > GlobalEvents > Scripts       Data > Movements > Script             Configurações do evento
    • Feel Strung
      Script Matar Player e ganhar dinheiro
      Por Feel Strung
      Bom to com um mapa de war 10.10 ja testei varios scripts mais nenhum funciona, os scripts são de ganhar dinheiro
      quando matar um player como falei testei varios e n funfa também não da erro no console.
      então queria saber se tem como vocês me arruma script que seja no mods pra mim testar ou então eu posso postar meu scriptt pra vcs dar uma olhada.

TibiaKing

Open Tibia Server

Quer aprender a criar seu próprio servidor de Tibia? Então está no lugar certo, aqui você encontrará milhares de tutorias, scripts, códigos, mapas e utilitários para que você possa fazer o seu próprio servidor de Tibia começando do zero.

Redes Sociais

Anuncie no TibiaKing

Precisa de mais visibilidade em seus projetos? Quer fazer um plano publicitário para o seu servidor? Anuncie no OTKing e faça sua divulgação, possuímos centenas de acessos simultâneos e milhares diários, com certeza será a sua solução!

×
×
  • Criar Novo...

Informação Importante

Confirmação de Termo

  Eu aceito