Maquina de scripter -- Derivados é Tibia

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

Como Fazer Procurar A Solução De Tal Erro !

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.

Bela iniciativa mano depois te do um rep+!

Posso ajudar de vez enquando?

Pode sim manow

Esperando Pedidos ..

Função Do Scripter : Salvar e dar clean 1 em 1 hora

Servidor utilizado: WoDBO Hunter, Versão 8.00

Contem Storage : Não

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

 

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 ?

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 ...

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

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 ;(

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

Tente esse aki vocé na proxima usa [.spoiler] e [./spoiler] tira os pontos.

talkaction

action

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