Sitema%252FMod [City War Event] Luta pela sobrevivência

[Absolute 0]

Fala galerinha linda do TK, hoje estou trazendo um evento que andei modificando e otimizando, é o evento City WAR, este evento tem no servidor globalwar e outros.

A autoria vem de um membro da otland, portante havia o mesmo aqui em um datapack e decidi otimizar este evento para vocês do TK.

Observação: É um pouco parecido com o evento do meu amigo e scripter DuH, porém com mais funções e regras, mas o objetivo é praticamente o mesmo.

 

 

Como funciona:

 

Quando um GM executar o comando para abrir o evento, abrirá um teleport no lugar configurada onde os membros entraram em uma arena onde não perde level nem skills, o evento terá o tempo de 20 minutos (configurável), caso o player morra poderá voltar novamente pelo teleport que estará localizado no lugar até o termino do evento, a regra é clara produção, quando der os X minutos, o que mais matou levará para a casa backpack o prêmio do evento.

 

 

 

 

 

 

Vamos lá;

 

Primeiramente, em sua pasta data/lib crie um arquivo com o nome de city war.lua e dentro do mesmo coloque:

configCW = {timetostart = 500, -- tempo para iniciar o evento em segundos by Absolute
			telpos = {x=32340, y=32213, z=7}, -- onde aparecerá o teleport
			stats = 201201201701,
			kill = 201201201702,
			death = 201201201703,
			ostime =  201201201704,
			evttime = 20, -- quanto tempo irá rolar o evento
			topleftPos = {x=32722, y=31336, z=6}, -- canto esquerdo superior
			botrightPos = {x=32791, y=31384, z=6}, -- canto direito inferior
			templepos = {x=32369, y=32241, z=7}, -- posição do templo principal
			arenapos = {{x=32722, y=31340, z=6}, {x=32786, y=31336, z=6}, {x=32722, y=31380, z=6}, {x=32783, y=31374, z=6}}, -- posição dos 4 tronos
			times = 8, -- não precisa mexer
			finaltime = 300 -- não precisa mexer
}

function configCW:new()

local newevt = {}

setmetatable(newevt, self)
self.__index = self

doBroadcastMessage("The City War will be open in " .. self.timetostart .. " seconds.")
setGlobalStorageValue(self.stats, 0)
addEvent(function () newevt:start() end, self.timetostart*1000)
end

function configCW:start()

if getGlobalStorageValue(self.stats) == 0 then
	setGlobalStorageValue(self.ostime, os.time())
	local teleport = doCreateItem(1387, self.telpos)
	doItemSetAttribute(teleport, "aid", 5540)
	setGlobalStorageValue(self.stats, 1)
	doBroadcastMessage("The City War is starting...")
	for _, posi in pairs(self.arenapos) do
		local item = getTileItemById(posi, 1387)
		if(item.uid ~= 0) then
			doRemoveItem(item.uid)
		end
	end
	addEvent(function () self:preclose() end, self.evttime*1000*60)
	addEvent(function () self:announce(0) end, (self.evttime/self.times)*1000*60)
end

end

function configCW:announce(times)

if times < self.times then
	if #self:getTopFrags(true) >= 1 then 
		doBroadcastMessage("Top City War fraggers: " .. self:getTopFrags())
	end
	addEvent(function () self:announce(times+1) end, (self.evttime/self.times)*1000*60)
end

end

function configCW:preclose()

if getGlobalStorageValue(self.stats) == 1 then
	setGlobalStorageValue(self.stats, 2)
	doBroadcastMessage("The City War will end in " .. self.finaltime .. " seconds.")
	addEvent(function () self:close() end, self.finaltime*1000)
	local item = getTileItemById(self.telpos, 1387)
	if(item.uid ~= 0) then
		doRemoveItem(item.uid)
	end
end

end

function configCW:close()

if getGlobalStorageValue(self.stats) == 2 then
	if #self:getTopFrags(true) >= 1 then
		doBroadcastMessage("The City War has ended. The winners are: " .. self:getTopFrags())
	else
		doBroadcastMessage("The City War has ended. There were no winners.")
	end
	doRemovePlayersFromArea(self.topleftPos, self.botrightPos, self.templepos)
	for _, posi in pairs(self.arenapos) do
		doCreateTeleport(1387, self.templepos, posi)
	end
	for place, info in ipairs(self:getTopFrags(true)) do
		if place > 5 then
			break
		end
		local cid = getPlayerByName(info)
		doPlayerSendTextMessage(cid, 4, "Congratulations, you were the " .. place .. "º place in the City War.")
		doPlayerAddItem(cid, 6571, 1)
	end
	setGlobalStorageValue(self.stats, -1)
end

end

function configCW:isPlayerInEvent(cid)

if getPlayerStorageValue(cid, self.stats) == -1 or getPlayerStorageValue(cid, self.stats) - os.time() <= -5 or getGlobalStorageValue(self.stats) < 1 then
	return false
end

return true
end

function configCW:getTopFrags(tab)

local frag = {}

for _, pid in pairs(getPlayersOnline()) do
	if (getPlayerStorageValue(pid, self.kill) ~= -1 or getPlayerStorageValue(pid, self.death) ~= -1) and self:isPlayerInEvent(pid) then
		local kill =  getPlayerStorageValue(pid, self.kill)+1
		local death =  getPlayerStorageValue(pid, self.death)+1
		print(getCreatureName(pid), kill-death)
		table.insert(frag, {getCreatureName(pid), kill-death})
	end
end

print(#frag)
local frag, str, n = doOrderTab(frag, 0), nil, 5
print(#frag)

if tab then
	return frag
else
	if #frag < 5 then
		n = #frag
	end
	for i = 1, n do
		local cid = getPlayerByName(frag[i])
		local kill =  getPlayerStorageValue(cid, self.kill)+1
		local death =  getPlayerStorageValue(cid, self.death)+1
		str = str and str .. ", " .. frag[i] .. "[" .. kill .. "/" .. death .. "]" or frag[i] .. "[" .. kill .. "/" .. death .. "]"
	end
end

return str
end

function doOrderTab(tabela, value)

local max, index = {}, nil

for i = 1, #tabela do
	valor = value
	for a, b in ipairs(tabela) do
		if b[2] > valor then
			valor = b[2]
			valor2 = b[1]
			index = a
		end
	end
	table.remove(tabela, index)
	if valor ~= value then
		table.insert(max, valor2)
	end
end

return max
end

Configuração do arquivo:

telpos = {x=32340, y=32213, z=7}, -- POSIÇÃO ONDE NASCE O TP DO EVENTO!

topleftPos = {x=32722, y=31336, z=6}, -- AQUI COLOQUE A POSIÇÃO DO CANTO ESQUERDO LA EM CIMA DO MAPA

botrightPos = {x=32791, y=31384, z=6}, -- AQUI A POSIÇÃO DO CANTO DIREITO EM BAIXO DO MAPA

templepos = {x=32369, y=32241, z=7}, -- POSIÇÃO DO TEMPLO ONDE OS JOGADORES NASCERAM PÓS A MORTE

arenapos = {{x=32722, y=31340, z=6}, {x=32786, y=31336, z=6}, {x=32722, y=31380, z=6}, {x=32783, y=31374, z=6}}, --

ATENÇÃO, NO MAPA QUE ESTAREI DISPONIBILIZANDO VISIVELMENTE TERÁ 4 BASES, VOCÊ TERA QUE COLOCAR A POSIÇÃO DAS BASES AÍ NESSES 3 LUGARES.

 doPlayerAddItem(cid, 6571, 1) -- AQUI VOCÊ COLOCARÁ O PRÊMIO DO GANHADOR, NO CASO QUEIRA ADICIONAR POR EXEMPLO 1kk, COLOQUE 2160,1 - Primeiro ID depois quantia.

 

 

 

Segundo passo, crie um arquivo com o nome de citywarCreature.lua e coloque dentro da pasta creaturescripts/scripts com o seguinte conteúdo:

function onPrepareDeath(cid, lastHitKiller, mostDamageKiller)

if isInRange(getCreaturePosition(cid), configCW.topleftPos, configCW.botrightPos) then
	setPlayerStorageValue(cid, configCW.death, getPlayerStorageValue(cid, configCW.death) +1)
	setPlayerStorageValue(lastHitKiller[1], configCW.kill, getPlayerStorageValue(lastHitKiller[1], configCW.kill) +1)
end

return true
end

E adicione em creaturescripts.xml a seguinte tag

<event type="preparedeath" name="CityWar" event="script" value="citywarCreature.lua"/>

 

Terceiro passo, crie um arquivo em movements/scripts com o nome de citywarMovements.lua com o seguinte conteúdo:

function onStepIn(cid, item, position, lastPosition, fromPosition, toPosition)

if isPlayer(cid) and getGlobalStorageValue(configCW.stats) == 1 then
	doTeleportThing(cid, configCW.arenapos[math.random(1, #configCW.arenapos)])
	doSendMagicEffect(getPlayerPosition(cid), 28)
	if not(configCW:isPlayerInEvent(cid)) then
		setPlayerStorageValue(cid, configCW.stats, getGlobalStorageValue(configCW.ostime) + configCW.evttime*60 + configCW.finaltime)
		setPlayerStorageValue(cid, configCW.kill, -1)
		setPlayerStorageValue(cid, configCW.death, -1)
	end
else
	doTeleportThing(cid, fromPosition)
end

return true
end

Em Movements.xml adicione a seguinte linha:

<movevent type="StepIn" actionid="5540" event="script" value="citywarMovements.lua"/>

Quarto e último passo, em talkactions/scripts crie um arquivo com o nome de citywarTalkactions.lua e coloque o seguinte conteúdo:

function onSay(cid, words, param)

if getGlobalStorageValue(configCW.stats) == -1 then
	configCW:new()
else
	doPlayerSendCancel(cid, "The event is already running.")
end

return true
end

Em talkactions/talkactions.xml adicione a seguinte linha:

<talkaction log="yes" words="/citywar" access="3" event="script" value="citywarTalkactions.lua"/>

E por fim, estou disponibilizando o world do evento, vocês usam se quiser, tentei adapta-lo para 8.6 mas ficou meio slá, o Viiting estava ocupado e não pode me ajudar, enfim segue a imagem e download do world.otbm:

 

 

Download do mapa: http://www.sendspace.com/file/v3u8pt

 

Scan do Mapa: https://www.virustotal.com/pt/url/44b2d870c26798ffc9de2c7493cf8c7dc73df328a1c0a58770d423fff30b93ff/analysis/1402527378/

 

 

Lembrando que ninguém além do Collocorpusek da otland tem direito de pedir remoção do script, pois a base é dele.
 

 

Créditos:
Absolute
Collocor Gringo Lindo.
 

Editado Junho 11, 2014 por Absolute (veja o histórico de edições)

[ViitinG 835]

Muito bom seu lindu.

Espero que gostem do mapa,só adicionei uns detalhes !  

[macalo 22]

coloka automático  oelo globaleventos 

[deviletico 0]

como posso modificar o tempo q inicia o evento? fica ae 500 seconds 

 

ja olhei +Rep

Editado Junho 12, 2014 por deviletico (veja o histórico de edições)

[Demonbholder 17]

hmmmm, eu que fiz esse código...

 

Era pra ser exclusivo da GlobalOTS, mas acho que acabou vazando.

 

Well, eu não sou da otland rsrsrs

[keilost1 41]

Isso é verdade, é do demonbholder, e se quiserem eu posso provar , e não é só esse evento, e também o battlefield new

[Absolute 0]

Isso é verdade, é do demonbholder, e se quiserem eu posso provar , e não é só esse evento, e também o battlefield new

Fakezasso, ok, manda provar então, deixo avisar o Matheus porque jájá você fala que o TibiaKing é seu ai o Matheus vai ter que enviar foto do domínio, meio complicado, vendedorzinho de otserver, proibido aqui jovem, passe amanhã e vá a falência com sua empresa, ser ou não do Demon ele não pediu remoção e nem provou pelo ótimo scripter que é, já você wtf vc sab fazer AUHEUHEAUHEAHEA.

 

Faz metade do que to fazendo pelo fórum e ajudando e para de vender seus produtos bugados, por favor jovem.

Enjoy tk, será bem vindo.

Editado Junho 15, 2014 por Absolute (veja o histórico de edições)

[keilost1 41]

Fake? Criado em 2011? Amigão, esse script é do demonbholder, da globalots, todo mundo aqui sabe que esse evento é do global war, quem quiser dá uma olhadinha no facebook do Global War e vai ver de quem é o script, você é uma farsa cara, você dá nojo.

 

http://prntscr.com/3t7t9m

[Mythusz 44]

Fake? Criado em 2011? Amigão, esse script é do demonbholder, da globalots, todo mundo aqui sabe que esse evento é do global war, quem quiser dá uma olhadinha no facebook do Global War e vai ver de quem é o script, você é uma farsa cara, você dá nojo.

 

http://prntscr.com/3t7t9m

Aff cara tu ta desorganizando os tópicos aqui, o @Absolute ta mantendo os créditos em todos conteúdos que pósta, e você ta querendo ibópe e brigas!

reportado.

[Absolute 0]

Aff cara tu ta desorganizando os tópicos aqui, o @Absolute ta mantendo os créditos em todos conteúdos que pósta, e você ta querendo ibópe e brigas!

reportado.

 

Falou e disse Mythusz meu querido, como está até no battlefield está descrito que tem "mãos" da otland no scripts, Demon disse das funções dele ok, sem contar que adaptei várias coisas e a cima de tude trouxe o conteúdo pro TK, mal deve saber o Demon que ele vende na lojinha dele, porém não discuto também o importante é trazer de graça ajudando a comunidade, foda é quem vem criticar porque quer ganhar dinheiro em cima.

#vaitrabalhar

[Cat 2605]

Fake? Criado em 2011? Amigão, esse script é do demonbholder, da globalots, todo mundo aqui sabe que esse evento é do global war, quem quiser dá uma olhadinha no facebook do Global War e vai ver de quem é o script, você é uma farsa cara, você dá nojo.

 

http://prntscr.com/3t7t9m

 

Cara, se há algo de errado reporte e aguarde a equipe resolver, não crie um intriga já ofendendo o membro, tenha paciência. Grato.

[keilost1 41]

Demon nem tem loja desinformadão.. VOCÊ NÃO FEZ NADA NO SCRIPT, alguém quer o datapack do global war sem modificações para ver como ele é uma farsa? Somente o demon pois a mão nesses códigos, não foi eu, nem você, amigo pelo menos poste o script somente com os créditos do autor, para de tentar levar crédito por coisa que você não tem a minima capacidade de fazer.

[TioSlash 45]

Funciona TFS 1.0?

[Absolute 0]

Demon nem tem loja desinformadão.. VOCÊ NÃO FEZ NADA NO SCRIPT, alguém quer o datapack do global war sem modificações para ver como ele é uma farsa? Somente o demon pois a mão nesses códigos, não foi eu, nem você, amigo pelo menos poste o script somente com os créditos do autor, para de tentar levar crédito por coisa que você não tem a minima capacidade de fazer.

 

Estou dizendo que você tem loja que rouba os outros e venda o que não é seu, pois sei que se depender da sua capacidade, não consegue fazer script de comprar aol AUEHAUEHAUHEA.

Se você não fez porr* nenhuma pq tá enchendo o saco? + estudo - noobise por favor jovem! Até breve.

 

 

 

Funciona TFS 1.0?

Sim Tio Slash!

[macalo 22]

cara pq teus evento so abre uma vez  e fica dando esses mensagem The event is already running 

[Absolute 0]

cara pq teus evento so abre uma vez  e fica dando esses mensagem The event is already running

 

Amigo uso em meus servidores e também tenho colegas que usam, com certeza o evento não está terminando ou você reiniciou 1x a "força" e as storages ficaram salvas, verifique antes de dizer que não funciona.

[Baned 4]

[25/6/2014 21:24:48] [Error - TalkAction Interface] 

[25/6/2014 21:24:48] In a timer event called from: 

[25/6/2014 21:24:48] data/talkactions/scripts/citywarTalkactions.lua:onSay

[25/6/2014 21:24:48] Description: 

[25/6/2014 21:24:48] data/lib/city war.lua:81: attempt to call global 'doRemovePlayersFromArea' (a nil value)

[25/6/2014 21:24:48] stack traceback:

[25/6/2014 21:24:48] data/lib/city war.lua:81: in function 'close'

[25/6/2014 21:24:48] data/lib/city war.lua:64: in function <data/lib/city war.lua:64>

[Absolute 0]

 

[25/6/2014 21:24:48] [Error - TalkAction Interface] 

[25/6/2014 21:24:48] In a timer event called from: 

[25/6/2014 21:24:48] data/talkactions/scripts/citywarTalkactions.lua:onSay

[25/6/2014 21:24:48] Description: 

[25/6/2014 21:24:48] data/lib/city war.lua:81: attempt to call global 'doRemovePlayersFromArea' (a nil value)

[25/6/2014 21:24:48] stack traceback:

[25/6/2014 21:24:48] data/lib/city war.lua:81: in function 'close'

[25/6/2014 21:24:48] data/lib/city war.lua:64: in function <data/lib/city war.lua:64>

 

 

Algo errado na sua configuração, você deve ter alterado algo, tente refazer e me diga o resultado.

[Baned 4]

Não mudei nada, só editei as posições do templo e só.

Editado Junho 26, 2014 por Baned (veja o histórico de edições)

[leuzinhusz 0]

DEPOIS QUE USEI ISSO MEUS TREINER OFFLINE SUMIRAM PORQUE ?