[8.1]Mother's Day

[Dark 3]

Nome: Mother's Day

.

Versão: 8.1

.

Tipo do script: Action

.

Servidor Testado: The Forgotten Server 0.2.9

.

Autor: Dark

Bem, hoje como é dia das mães, fiz um script para comemorar está data. O script é uma caixinha que ao dar use nela, você irá instala, que após um tempo soltará fogos de artificios, e criará (ou não) alguns itens, e poderá transformar as pessoas em alguns itens.

 

Bem vamos ao script. Abra a pasta do seu OT e vá até a pasta data/actions/scripts, copie um arquivo lua de lá e renomei para DDM, apague tudo que está la dentro e coloque isso:

 

----===---=== Script by Dark ===---===---
----===---=== OTNET ===---===---

--- CONFIGURAÇÕES ---

local CONFIG = {
contagem = 1,
money = 100,
tempo = {instal = 15, inicio = 7, fogos = 600, trans = 1200},
fogos = {numero = 15, distance = 3, efeito = 15},
area = 3,
transforma = {numero = 10, createitem = 1, timeout = 60, efeito = 35, distance = 30},
item = {7697, 7733, 7692, 2112, 1685, 7966, 7694, 1687},
text = "Happy\nMother's day"
}

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

local cid = 0
function onUse(cid, item, frompos, item2, topos)

if topos.x ~= 0 and topos.y ~= 0 and topos.z ~= 0 then
if doPlayerRemoveMoney(cid,CONFIG.money) == TRUE then
doPlayerSendTextMessage(cid, 21, 'Instalando. Este procedimento demorara ' ..CONFIG.tempo.instal.. ' segundos. Aguarde')
doSendMagicEffect(topos,2)
mayNotMove(cid, 1)
cid = cid
addEvent(Instal, CONFIG.tempo.instal*1000, {cid = cid, topos = topos})
else
doPlayerSendCancel(cid, 'Voce precisa de '..CONFIG.money..' para ativar isto')
end
else
hit = math.random(10,50)
doCreatureAddHealth(cid,-hit)
doSendAnimatedText(getPlayerPosition(cid), hit, 180)
doSendMagicEffect(getPlayerPosition(cid), 5)
end
doRemoveItem(item.uid,1)
return TRUE
end
function Instal(i)
topos = i.topos
cid = i.cid
doPlayerSendTextMessage(cid, 21, 'Instalação completa.')
doSendMagicEffect(topos,2)
mayNotMove(cid, 0)
addEvent(Time, 1000, {topos = topos})
end
local TEMPO = CONFIG.tempo.inicio
function Time(t)
topos = t.topos
if TEMPO ~= 0 then
if TEMPO >= 8 then
color = 5
elseif TEMPO >= 4 then
color = 198
else
color = 180
end
if CONFIG.contagem == 1 then
anitext = TEMPO
else
if anitext == "tic" then
anitext = "tac"
color = 129
else
anitext = "tic"
color = 129
end
end
doSendAnimatedText(topos, anitext, color)
doSendMagicEffect(topos,3)
TEMPO = TEMPO-1
addEvent(Time, 1000, {topos = topos})
else
TEMPO = CONFIG.tempo.inicio
addEvent(Effects, 100, {topos = topos})
end
end
local Fogos = CONFIG.fogos.numero
function Effects(e)
topos = e.topos
if Fogos > 3 then
ax = math.random(-CONFIG.area, CONFIG.area)
ay = math.random(-CONFIG.area, CONFIG.area)
position = {x=topos.x+(ax), y=topos.y+(ay), z=topos.z}
doSendDistanceShoot(topos, position, CONFIG.fogos.distance)
doSendMagicEffect(topos,CONFIG.fogos.efeito)
doSendAnimatedText(topos, "*", math.random(100,300))
doSendMagicEffect(position,math.random(28,30))
Fogos = Fogos-1
addEvent(Effects, CONFIG.tempo.fogos, {topos = topos})
elseif Fogos > 0 then
for _= 1, CONFIG.fogos.numero do
ax = math.random(-CONFIG.area, CONFIG.area)
ay = math.random(-CONFIG.area, CONFIG.area)
position = {x=topos.x+(ax), y=topos.y+(ay), z=topos.z-1}
doSendMagicEffect(position,math.random(28,30))
doSendAnimatedText(position, "Bumm", math.random(100,300))
end
Fogos = Fogos-1
addEvent(Effects, CONFIG.tempo.fogos, {topos = topos})
else
addEvent(Trans, 1500, {topos = topos})
Fogos = CONFIG.fogos.numero
end
end
local Tran = CONFIG.transforma.numero
function Trans(t)
topos = t.topos
if Tran ~= 0 then
ax = math.random(-CONFIG.area, CONFIG.area)
ay = math.random(-CONFIG.area, CONFIG.area)
posi = {x=topos.x+(ax), y=topos.y+(ay), z=topos.z, stackpos = 253}
position = getThingfromPos(posi)
if position.uid ~= 0 and isPlayer(position.uid) == TRUE then
doSetItemOutfit(position.uid, CONFIG.item[math.random(1, #CONFIG.item)], (CONFIG.transforma.timeout*1000))
else
if math.random(1,10) == 1 and position.itemid == 0 and CONFIG.transforma.createitem == 1 then
doCreateItem(CONFIG.item[math.random(1, #CONFIG.item)],1,posi)
end
end
doSendMagicEffect(topos, math.random(12,14))
doSendMagicEffect(posi, CONFIG.transforma.efeito)
doSendDistanceShoot(topos, posi, CONFIG.transforma.distance)
doSendAnimatedText(posi, "Bzzz", math.random(100,300))
Tran = Tran-1
addEvent(Trans, CONFIG.tempo.trans, {topos = topos})
else
Tran = CONFIG.transforma.numero
doSendMagicEffect(topos, 2)
cartao = doCreateItem(6538,1,topos)
text = CONFIG.text .. '\n\nBy: ' ..getPlayerName(cid)
doSetItemText(cartao, text)
end
end

 

Agora vá até data/actions/ e abra o arquivo actions.xml e dicione isso:

 

<action itemid="7961" script="DDM.lua"/>

Pronto, o item do pacote é 7961 .

 

 

Configurando

Para configurar o speed basta mudar nessa parte do script:

 

local CONFIG = {
contagem = 1,
money = 100,
tempo = {instal = 15, inicio = 7, fogos = 600, trans = 1200},
fogos = {numero = 15, distance = 3, efeito = 15},
area = 3,
transforma = {numero = 10, createitem = 1, timeout = 60, efeito = 35, distance = 30},
item = {7697, 7733, 7692, 2112, 1685, 7966, 7694, 1687},
text = "Happy\nMother's day"
}
[/left]

[/center]
[/center]
[/left]
[/center]

 

-- Contagem: Coloque 1 para que mostre uma contagem regressiva ou 0 para que não msotre

 

 

-- Money: Preço que deverá ser pago para ativar a caixa

 

 

-- Tempo:

--------- Instal : Tempo (em segundos) que levará para instalar a caixa

 

--------- Inicio : Tempo (em segundos) que levará para começar as ações do pacote

 

--------- fogos : Intervalo (em milisegundos) que levará entra um fogos e outro

 

--------- trans : Intervalo (em milisegundos) que levará entra uma transformação e outra

 

 

-- Fogos:

--------- numero : Numeros de fogos de artificio que será solto

 

--------- distance : efeito de distanca

 

--------- efeito : Numeros de efeito magico

 

 

-- Area: alcance (em SQMs) maximo que a ação chegará

 

 

-- Transforma:

--------- numero : Numeros de efeitos

 

--------- createitem : Coloque 1 para que seja criado itens, e 0 para que não seja criado

 

--------- timeout : Tempo (em segundos) que o player ficará com o Outfit

 

--------- distance : efeito de distanca

 

--------- efeito : Numeros de efeito magico

 

 

-- Item: IDs dos itens que poderão ser criados, e que os players poderão ser transformados

 

 

-- Text: Texto que virá escrito no cartão (lembre-se de colocar entre aspas ("))

 

 

Bem, lembrando que esse script só funcionará provavelmente apenas em TFS, é isso, espero que tenham gostado e até a próxima

 

Editado 11 Maio, 2008 por Dark

[Majesty 1755]

Legal Dark, eu gostei muito dessa action, eu fui o 1º a ver como funciona no ot =).

[Addicted 1]

Parabéns Dark, como sempre fazendo ótimos Scripts.

I'm seu fan .

 

Espero mais scripts seus (Scripts legais).

 

RcD~

[Seven 0]

Muito legal cara, parabéns.(Y)

Muito criativo, tópico muito bem organizado...você é uma das pessoas que fazem a OTnet ser o maior forum de otserv!

Eu não testei porque formatei o pc e estou sem nem 1 ot instalado(baixado) aki, de qualquer forma me parece muito bem feito!

Nota:10,5/10

[kruxduds 0]

Legal cara,

Parabéns.

[Albert José 0]

Muito bom amigo!

Isso parece com um coração que tem no MuOnline que quando você joga no cão

aparece uns fogos e depois cai um item no local...

Parabens

[slyfer 1]

gostei ^^

 

fico mtu legal

 

parabens.

[pikareta 0]

gostei fico legal

[AaRoN 13]

Cara Dark Como Sempre Fazendo Scriptes Legalzao

 

Valew I é Mt Bom Vo Usar No Meu Ot Para Fazer Eventos Comemorativos

[Henrique Lacerda 3]

Sensacional..

Mas se transformasse só os players com sexo female, seria mais legal ainda.

Obrigado Dark, por disponibilizar este script.

[Mock 32]

Parabens dark um otimo script um dos melhores que eu ja vi.

[Raizens_ 0]

Bom, legal, vou arruma isso ao meu gosto!

Vlw tio Dark.

Bem legal, bem que você podia fazer mais scripts em. =P

[GOD_Ocley 0]

Tio Darrobark, ficou muito bom seu script. Vou utiliza-lo futuramente no meu OTserv.

Obrigado pela contribuição!

Nota: 9.8

[BlueAvenger 0]

Excelente. Apenas isso para dizer, excelente esse script, está de parabens Dark, mais um script que entra na minha classificação como um dos melhores da OtneT, Grato por traze´lo para cá!

 

Aprovado~

[541320 0]

Caraca Dark tu eh mt sinistro!! eu so seu fã eu quero ser q nem vc quando eu crescer aushaushua

nota 100,0

valendo 10,0

[Capuccino 0]

Não vo nen falar nada, apenas olhe minha assinatura

[Digo Loco 0]

Muito bom como sempre!!

adorei funciono direitinho aqui =-D

[Pentagratta 0]

Legal!

Nada como dar um presentinho a kem vc gosta no jogo msm nao sendo sua mae

Flw