Bela iniciativa mano depois te do um rep+!
Posso ajudar de vez enquando?
Por kttallan, 24 de set. de 2013 em Scripts
info
Grupo: Conde
Registrado: 06/07/13
Posts: 634
Reputação: +142
Gênero: Masculino
Char no Tibia: Kayinsz

Bela iniciativa mano depois te do um rep+!
Posso ajudar de vez enquando?
info
Grupo: Infante
Registrado: 06/03/13
Posts: 1.6k
Reputação: +319
Gênero: Masculino
Char no Tibia: Lord Sorte

Pode sim manow
Esperando Pedidos ..
info
Grupo: Campones
Registrado: 18/11/12
Posts: 28
Reputação: +1
Char no Tibia: Havoks Rl

Função Do Scripter : Salvar e dar clean 1 em 1 hora
Servidor utilizado: WoDBO Hunter, Versão 8.00
Contem Storage : Não
info
Grupo: Conde
Registrado: 20/09/12
Posts: 711
Reputação: +86
Char no Tibia: noé

pedido acima. (NAO TESTADO)
local config = {
broadcast = {60, 60},
shallow = "yes",
delay = 60,
events = 60
}
config.shallow = getBooleanFromString(config.shallow)
local function executeSave(seconds)
if(isInArray(config.broadcast, seconds)) then
local text = ""
if(not config.shallow) then
text = "Full s"
else
text = "S"
end
text = text .. "erver Vai Ser Salvo!"
doBroadcastMessage(text)
end
if(seconds > 0) then
addEvent(executeSave, config.events * 1, seconds - config.events)
else
doSaveServer(config.shallow)
doCleanMap()
end
end
function onThink(interval, lastExecution, thinkInterval)
if(table.maxn(config.broadcast) == 0) then
doSaveServer(config.shallow)
else
executeSave(config.delay)
doCleanMap()
end
return true
end
info
Grupo: Campones
Registrado: 18/11/12
Posts: 28
Reputação: +1
Char no Tibia: Havoks Rl

pedido acima. (NAO TESTADO)
local config = { broadcast = {60, 60}, shallow = "yes", delay = 60, events = 60 } config.shallow = getBooleanFromString(config.shallow) local function executeSave(seconds) if(isInArray(config.broadcast, seconds)) then local text = "" if(not config.shallow) then text = "Full s" else text = "S" end text = text .. "erver Vai Ser Salvo!" doBroadcastMessage(text) end if(seconds > 0) then addEvent(executeSave, config.events * 1, seconds - config.events) else doSaveServer(config.shallow) doCleanMap() end end function onThink(interval, lastExecution, thinkInterval) if(table.maxn(config.broadcast) == 0) then doSaveServer(config.shallow) else executeSave(config.delay) doCleanMap() end return true end
pedido acima. (NAO TESTADO)
local config = { broadcast = {60, 60}, shallow = "yes", delay = 60, events = 60 } config.shallow = getBooleanFromString(config.shallow) local function executeSave(seconds) if(isInArray(config.broadcast, seconds)) then local text = "" if(not config.shallow) then text = "Full s" else text = "S" end text = text .. "erver Vai Ser Salvo!" doBroadcastMessage(text) end if(seconds > 0) then addEvent(executeSave, config.events * 1, seconds - config.events) else doSaveServer(config.shallow) doCleanMap() end end function onThink(interval, lastExecution, thinkInterval) if(table.maxn(config.broadcast) == 0) then doSaveServer(config.shallow) else executeSave(config.delay) doCleanMap() end return true end
Aonde eu devo adicionar isso ?
info
Grupo: Conde
Registrado: 20/09/12
Posts: 711
Reputação: +86
Char no Tibia: noé

vai em data/globalevents/scripts copie qualquer arquivo e renomeie para save.lua e cole isso.
local config = {
broadcast = {60, 60},
shallow = "yes",
delay = 60,
events = 60
}
config.shallow = getBooleanFromString(config.shallow)
local function executeSave(seconds)
if(isInArray(config.broadcast, seconds)) then
local text = ""
if(not config.shallow) then
text = "Full s"
else
text = "S"
end
text = text .. "erver Vai Ser Salvo!"
doBroadcastMessage(text)
end
if(seconds > 0) then
addEvent(executeSave, config.events * 1, seconds - config.events)
else
doSaveServer(config.shallow)
doCleanMap()
end
end
function onThink(interval, lastExecution, thinkInterval)
if(table.maxn(config.broadcast) == 0) then
doSaveServer(config.shallow)
else
executeSave(config.delay)
doCleanMap()
end
return true
end
em globalevents.xml adcione essa tag.
<globalevent name="AutoSave" interval="70" script="save.lua"/>
Amigo Será q teria como vc fazer uma lista de scripts de pokemons para min ? eu ja tentei varias vezes mas sempre da erro por favor me ajudan ...
info
Grupo: Infante
Registrado: 06/03/13
Posts: 1.6k
Reputação: +319
Gênero: Masculino
Char no Tibia: Lord Sorte

Oque vocé queria no que der eu ajudo.
Eu quero q vc por favor crie pra min as scripts dos seguintes pokemons darkray,deoxys,jirachi,dialga,palkia,latios,latias,jiratina... tem mais algumas mas acho q vai ser de mais pedir .... são todas para servider pokemon dash advanced
Eu já tenho uma script mais queria que arrumasse...Eu clico numa alavanca dai faz um monstro clico de novo ele troca para outro mais queria que ele só trocasse com o comando !trocar Demon assim...
local monsters = {
[1] = 'demon',
[2] = 'vampire',
[3] = 'dragon lord',
[4] = 'hydra',
}
local gstorage1 = 8671
local gstorage2 = 8672
local aid = 75000
function onLook(cid, thing, position, lookDistance)
if isCreature(thing.uid) then return true end
if thing.actionid == aid then
local monster = monsters[getGlobalStorageValue(gstorage1)]
if not monster then
monster = monsters[1]
end
local str = ''
for i, monstername in ipairs(monsters) do
str = str.. '['..i..'] '..monstername..'\n'
end
str = 'Monstros disponiveis nesse QG:\n'..str..'Monstro definido atualmente:\n'..monster
doShowTextDialog(cid, thing.itemid, str)
return false
end
return true
end
info
Grupo: Infante
Registrado: 06/03/13
Posts: 1.6k
Reputação: +319
Gênero: Masculino
Char no Tibia: Lord Sorte

Eu quero q vc por favor crie pra min as scripts dos seguintes pokemons darkray,deoxys,jirachi,dialga,palkia,latios,latias,jiratina... tem mais algumas mas acho q vai ser de mais pedir .... são todas para servider pokemon dash advanced
Tipo man tem tutoriais pra isso que no caos não é lua procurap or ai vocé mermo fais
Eu já tenho uma script mais queria que arrumasse...Eu clico numa alavanca dai faz um monstro clico de novo ele troca para outro mais queria que ele só trocasse com o comando !trocar Demon assim...
local monsters = {
[1] = 'demon',
[2] = 'vampire',
[3] = 'dragon lord',
[4] = 'hydra',
}
local gstorage1 = 8671
local gstorage2 = 8672
local aid = 75000
function onLook(cid, thing, position, lookDistance)
if isCreature(thing.uid) then return true end
if thing.actionid == aid then
local monster = monsters[getGlobalStorageValue(gstorage1)]
if not monster then
monster = monsters[1]
end
local str = ''
for i, monstername in ipairs(monsters) do
str = str.. '['..i..'] '..monstername..'\n'
end
str = 'Monstros disponiveis nesse QG:\n'..str..'Monstro definido atualmente:\n'..monster
doShowTextDialog(cid, thing.itemid, str)
return false
end
return true
end
Hum.. acho que entendi mais acho que ficaria estranho posso tipo fazer assim pra eles sortear qual monstro virar independente. tipo pode vir um agr é outro diferente. pos esse detrocar acho que não consegueria fazer ;(
info
Grupo: Visconde
Registrado: 11/04/12
Posts: 328
Reputação: +7
Char no Tibia: ADM MiHawk

eu queria que vc me desse um sistema de pet com a seguinte função:
* Summona cada monstro conforme o level
*Tem exausted
*só da para sumonar 1 pet por vez aparece a mensagem, "voce ja tem pet summonado!"
* em protectozone o action nao funcionara > entao aparece a mensagem "voce nao pode summonar em protectionzone"
*nao tem o sistema de voltar o summon nao, ele só sumona o monstro ele nao retira!
*Pode ser action ou talkaction
*só "x" vocaçao pode usar o comando ou o item de summon
* se possivel facil de configurar.
se quizer um sistema de base eu tenho um script aki... boa sorte ![]()
Mais assim mais queria que o cara usasse o comando e trocasse o monstro dai tipo assim tenho outro script mais a alavanca nao
funfa dai vo te monstrar.
Talktions
function onSay(cid, words, param)local acceptMonsters = {"Dragon", "Kongra", "Rat", "Demon"}if not param or param == "" or #param < 1 thendoPlayerSendTextMessage(cid, 20, "Monstros disponíveis no QG:")for a, b in pairs(acceptMonsters) dodoPlayerSendTextMessage(cid, 20, "- "..b.."")endreturn trueendif param and not isInArray(acceptMonsters, param) thendoPlayerSendTextMessage(cid, 20, "Este monstro não está disponível no QG")return trueendsetPlayerStorageValue(cid, 15469, param)doPlayerSendTextMessage(cid, 20, "O monstro escolhido para o QG é o ["..param.."].")return trueend
Action
function onUse(cid, item, frompos, item2, topos)
if getPlayerStorageValue(cid, 15469) < 1 thendoPlayerSendTextMessage(cid, 20, "Você não escolheu ainda o monstro do QG!")return trueendsetPlayerStorageValue(cid, 15469, -1)doPlayerSendTextMessage(cid, 20, "Boa sorte jovem guerreiro!")doCreateMonster(getPlayerStorageValue(cid, 15469), getThingPos(cid))return trueend
Editado Setembro 29 por Matador18
info
Grupo: Infante
Registrado: 06/03/13
Posts: 1.6k
Reputação: +319
Gênero: Masculino
Char no Tibia: Lord Sorte

Tente esse aki vocé na proxima usa [.spoiler] e [./spoiler] tira os pontos.
talkaction
function onSay(cid, words, param)
if not param or param == "" or #param < 1 then
doPlayerSendTextMessage(cid, 20, "Monstros disponíveis no QG:")
for a, b in pairs(cfgm) do
doPlayerSendTextMessage(cid, 20, "- "..b.."")
end
return true
end
if param and not isInArray(cfg, param) then
doPlayerSendTextMessage(cid, 20, "Este monstro não está disponível no QG")
return true
end
setPlayerStorageValue(cid, 15469, param)
doPlayerSendTextMessage(cid, 20, "O monstro escolhido para o QG é o ["..param.."].")
setPlayerStorageValue(cfgm.Storage, 1)
return true
end
action
function onUse(cid, item, frompos, item2, topos)
if getPlayerStorageValue(cid, cfgm.storage) < 1 then
doPlayerSendTextMessage(cid, 20, "Você não escolheu ainda o monstro do QG!")
return true
end
setPlayerStorageValue(cid, cfgm.storage, -1)
doPlayerSendTextMessage(cid, 20, "Boa sorte jovem guerreiro!")
doCreateMonster(getPlayerStorageValue(cid, cfgm.monster), getThingPos(cid))
return true
end
agr vai em data/lib crie um arquivo lua é preencha assim
cfgm = {
monster = "Demon", Storage = 5000
monster = "Monster", Storage = adicione mais um intt 5001
}
não testei amigo mais tenta ai.
vocé tbm pode deixar no arquivo do talkactions mais se vocé for preencher ele ai deixa no lib
eu queria que vc me desse um sistema de pet com a seguinte função:
* Summona cada monstro conforme o level
*Tem exausted*só da para sumonar 1 pet por vez aparece a mensagem, "voce ja tem pet summonado!"
* em protectozone o action nao funcionara > entao aparece a mensagem "voce nao pode summonar em protectionzone"
*nao tem o sistema de voltar o summon nao, ele só sumona o monstro ele nao retira!
*Pode ser action ou talkaction
*só "x" vocaçao pode usar o comando ou o item de summon
* se possivel facil de configurar.
se quizer um sistema de base eu tenho um script aki... boa sorte
Me manda o sistema base acho que consigo fazer ![]()
Editado Setembro 29 por kttallan
info
Grupo: Infante
Registrado: 06/03/13
Posts: 1.6k
Reputação: +319
Gênero: Masculino
Char no Tibia: Lord Sorte
Ola venho o motivo que criei esse topico é para ajudar é tentar treinar mais minha capacidade de scripter para fazer um pedido de scripter siga o protocolo abaixo para á ajuda de correção de erro tabem siga o protocolo entregarei o trabalho no maximo possivel.
Como Fazer Um Pedido De Scripter
Preecha o Seguinte Formulario
Função Do Scripter : Assim Ele Passarar Pelo Tile é Ganharar 5000 k.
Servidor utilizado: Tibia Derivados..
Contem Storage : Sim ou Não
Como Fazer Procurar A Solução De Tal Erro !
Preencha Seguinte Formulario
Qual Servidor Foi Testado : Alissow
Qual Erro Persinste : Poste o Erro Aki
Qual Version : 8.54
Observação : Seguinte Entregarei o Scripter quando der Caso Não consiga fazer aviso , Para akeles que querem ajudar aceitaria de bom grato a ajuda de algumas pessoas
Tem como tirar esse negocio de pedido pois tinha que usar um desses. é os scripter não estarar posivel fazer scripter de spell pois não cheguei a essa area.
Editado Setembro 29 por kttallan