Christinacsa

Creditos Object Build Por Ter criado Programa
ABRA PASTA Object Builder
 

Abaixe Notepad++
https://notepad-plus-plus.org/

MODIFIQUE A Dat e Spr Por Um Numero gigante Para Que object Build Bug E Aparessa Signitude 0 ASSIM ELES NAO CONSEGUIRAO Abrir com object Buid So Voce Porque so voce tem o codigo

Depois Que Salva O Arquivo Abra Object Build

Vai Em Arquivo e COPILAR COMO

PROCURE OQUE VOCE EDITOU

 
FINALIZER  CONFIRMANDO PRONTO

 

doBroadcastMessage(MESSAGE_STATUS_CONSOLE_GREEN, "[Castle Of Honor] Atenção! A guild "..getPlayerGuildName(cid).." está tentando dominar o castelo, preparem-se!")  

@Christinacsa
 
doBroadcastMessage("[Castle Of Honor] Atenção! A guild "..getPlayerGuildName(cid).." está tentando dominar o castelo, preparem-se!", MESSAGE_INFO_DESCR)  

Configs = { CooldownBuff = 30.0 -- segundos } local combat = createCombatObject() setCombatParam(combat, COMBAT_PARAM_AGGRESSIVE, false) local condition = createConditionObject(CONDITION_ATTRIBUTES) setConditionParam(condition, CONDITION_PARAM_TICKS, 30000) setConditionParam(condition, CONDITION_PARAM_SKILL_CLUB, 25) setConditionParam(condition, CONDITION_PARAM_SKILL_SWORD, 25) setConditionParam(condition, CONDITION_PARAM_SKILL_AXE, 25) setConditionParam(condition, CONDITION_PARAM_SKILL_DISTANCE, 25) setConditionParam(condition, CONDITION_PARAM_SKILL_SHIELD, 25) setConditionParam(condition, CONDITION_PARAM_STAT_MAGICLEVEL, 10) setConditionParam(condition, CONDITION_PARAM_BUFF, true) setCombatCondition(combat, condition) function onCastSpell(cid, var) if exhaustion.check(cid, 13101) == TRUE then doPlayerSendCancel(cid, "Podera usar novamente dentro de " ..math.floor(Configs.CooldownBuff).. " segundos.") doSendMagicEffect(getCreaturePosition(cid), 2) return false end for k = 1, math.floor(Configs.CooldownBuff) do addEvent(function() if isCreature(cid) then local pos1 = {x = getPlayerPosition(cid).x + 0, y = getPlayerPosition(cid).y + 0, z = getPlayerPosition(cid).z} doSendMagicEffect(pos1, 112) doPlayerSendCancel(cid, "Faltam " ..(math.floor(Configs.CooldownBuff)-k).." segundos para o buff sumir.") end end, (k-1) * 1000) end exhaustion.set(cid, 13101, Configs.CooldownBuff) return doCombat(cid, combat, var) end  

@Christinacsa 
local cfg = { need_item = {5785, 10, 2160, 10}, reward_item = {13506, 1, 2160, 1, 2161, 1, 2162, 1}, storage = 40531, } local keywordHandler = KeywordHandler:new() local npcHandler = NpcHandler:new(keywordHandler) NpcSystem.parseParameters(npcHandler) local talkState = {} function onCreatureAppear(cid) npcHandler:onCreatureAppear(cid) end function onCreatureDisappear(cid) npcHandler:onCreatureDisappear(cid) end function onCreatureSay(cid, type, msg) npcHandler:onCreatureSay(cid, type, msg) end function onThink() npcHandler:onThink() end function creatureSayCallback(cid, type, msg) if(not npcHandler:isFocused(cid)) then return false end local talkUser = NPCHANDLER_CONVBEHAVIOR == CONVERSATION_DEFAULT and 0 or cid local msg = msg:lower() if msgcontains(msg, 'kefla') then if getPlayerStorageValue(cid, cfg.storage) < 1 then if doPlayerRemoveItem(cid, cfg.need_item[1], cfg.need_item[2]) and doPlayerRemoveItem(cid, cfg.need_item[3], cfg.need_item[4])then doPlayerAddItem(cid, cfg.reward_item[1], cfg.reward_item[2]) doPlayerAddItem(cid, cfg.reward_item[3], cfg.reward_item[4]) doPlayerAddItem(cid, cfg.reward_item[5], cfg.reward_item[6]) doPlayerAddItem(cid, cfg.reward_item[7], cfg.reward_item[8]) selfSay('You just swap '.. cfg.need_item[2] cfg.need_item[1] ..' and '.. cfg.need_item[4] cfg.need_item[3] ..'for a kefla set', cid) setPlayerStorageValue(cid, cfg.storage, 1) else selfSay('You need '.. cfg.need_item[2] ..' '.. getItemNameById(cfg.need_item[1]) ..'.', cid) end else selfSay('You already did this exchange!', cid) end end return true end npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback) npcHandler:addModule(FocusModule:new())  

Pelo que eu li no script não tem nada constando o group, então funciona para ambos
Aconselho só mudar o selfsay da linha 34 falando para o player que ele ja fez a troca.
local cfg = { need_item = {5785, 10}, reward_item = {13506, 1}, storage = 40531, } local keywordHandler = KeywordHandler:new() local npcHandler = NpcHandler:new(keywordHandler) NpcSystem.parseParameters(npcHandler) local talkState = {} function onCreatureAppear(cid) npcHandler:onCreatureAppear(cid) end function onCreatureDisappear(cid) npcHandler:onCreatureDisappear(cid) end function onCreatureSay(cid, type, msg) npcHandler:onCreatureSay(cid, type, msg) end function onThink() npcHandler:onThink() end function creatureSayCallback(cid, type, msg) if(not npcHandler:isFocused(cid)) then return false end local talkUser = NPCHANDLER_CONVBEHAVIOR == CONVERSATION_DEFAULT and 0 or cid local msg = msg:lower() if msgcontains(msg, 'kefla') then if getPlayerStorageValue(cid, cfg.storage) < 1 then if doPlayerRemoveItem(cid, cfg.need_item[1], cfg.need_item[2]) then doPlayerAddItem(cid, cfg.reward_item[1], cfg.reward_item[2]) selfSay('You just swap '.. cfg.need_item[2] ..' '.. getItemNameById(cfg.need_item[1]) ..' for '.. cfg.reward_item[2] ..' '.. getItemNameById(cfg.reward_item[1]) ..'.', cid) setPlayerStorageValue(cid, cfg.storage, 1) else selfSay('You need '.. cfg.need_item[2] ..' '.. getItemNameById(cfg.need_item[1]) ..'.', cid) end else selfSay('You already did this exchange!', cid) end end return true end npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback) npcHandler:addModule(FocusModule:new())  

@Christinacsa Bom, eu não conheço muito o sistema de bless mas ve se tá certo oque eu entendi...
 
data/globalevents
 
efeitobless.lua
function onThink(interval, lastExecution, thinkInterval) local list = {} for i, tid in ipairs(getPlayersOnline()) do list[i] = tid end for i = 1, #list do if not getPlayerBlessing(list[i], 1) and not getPlayerBlessing(list[i], 2) and not getPlayerBlessing(list[i], 3) and not getPlayerBlessing(list[i], 4) and not getPlayerBlessing(list[i], 5) then doSendMagicEffect(getThingPos(list[i]), 165) end end return true end  
globalevents.xml
 
<globalevent name="bless" interval="2" event="script" value="efeitobless.lua"/>  

@Christinacsa no caso se estiver do jeito que falei é para ele poder comprar só quando acabar os dias

@Christinacsa esse
 
selfSay(' voce ja fez' , cid)  
só vai aparecer quando ele tiver a storage, quando passar os 2 dias ele vai perder a storage kkk ou seja da pra comprar dnv plis 

@Christinacsa relaxa, aos poucos você vai aprendendo! ninguém nasce sabendo e ninguém aprende Sozinho.

@Christinacsa 
Lembra de colocar a codificação ANSI no notpad pra não bugar os acêntos
local keywordHandler = KeywordHandler:new() local npcHandler = NpcHandler:new(keywordHandler) NpcSystem.parseParameters(npcHandler) local talkState = {} function onCreatureAppear(cid) npcHandler:onCreatureAppear(cid) end function onCreatureDisappear(cid) npcHandler:onCreatureDisappear(cid) end function onCreatureSay(cid, type, msg) npcHandler:onCreatureSay(cid, type, msg) end function onThink() npcHandler:onThink() end function creatureSayCallback(cid, type, msg) if(not npcHandler:isFocused(cid)) then return false end local talkUser = NPCHANDLER_CONVBEHAVIOR == CONVERSATION_DEFAULT and 0 or cid local config = { item1 = 13507, -- ID DO Item que precisara para trocar qt1 = 1000, -- Quantidade do item1 que precisa sto = 166666, -- Storage não mecher } if(msgcontains(msg, 'yes' )) then if getPlayerStorageValue(cid, config.sto) == -1 then if getPlayerItemCount(cid, config.item1) >= config.qt1 then selfSay('Você pagou a entrada oara a {PERFECT NAVE}', cid) setPlayerStorageValue(cid, config.sto, 1) doRemoveItem(cid, config.item1, config.qnt1) else selfSay('Você não tem o item necessario {Furie Coins}', cid) end else selfSay(' voce ja fez' , cid) return true end end end  

@Ckfox troca ali em:
 
local config = { item1 = 13507, -- ID DO Item que precisara para trocar qt1 = 1000, -- Quantidade do item1 que precisa sto = 166666, -- Storage não mecher }  
por:
local config = { item1 = 13507, -- ID DO Item que precisara para trocar qt1 = 1000, -- Quantidade do item1 que precisa sto = 166666, -- Storage não mecher tempo = 172800, -- tempo que vai durar a storage } e
 
if getPlayerStorageValue(cid, config.sto) == -1 then  
por:
if (getPlayerStorageValue(cid, config.sto) <= os.time()) then e tambem
 
setPlayerStorageValue(cid, config.sto, 1)  
por:
setPlayerStorageValue(cid, config.sto, os.time()+config.tempo)  
é que ele pediu pra storage só durar dois dias 
 

tenta:
function doSenzuHeal(pid, heal, cooldown) doPlayerAddMana(pid, heal) doCreatureAddHealth(pid, heal) doSendAnimatedText(getPlayerPosition(pid), "+" .. heal, TEXTCOLOR_YELLOW) doSendMagicEffect({x = getPlayerPosition(pid).x + 1, y = getPlayerPosition(pid).y + 0, z = getPlayerPosition(pid).z}, 76) exhaustion.set(pid, cooldown.storage, cooldown.wait) end   function onUse(cid, item, fromPosition, itemEx, toposition) local config = { idSenzu = 2157, --id (configurado no items.xml) do senzu cooldown = { storage = 50000, --storage, mexa apenas se souber o que está fazendo para não causar conflitos no servidor wait = 1.5 --tempo de cooldown (em segundos) }, regeneration = 180000 --valor da cura }   if (exhaustion.get(cid, config.cooldown.storage) == false) then if (fromPosition.x ~= CONTAINER_POSITION) then doSenzuHeal(cid, config.regeneration, config.cooldown) elseif (item.itemid == config.idSenzu) then doSenzuHeal(cid, config.regeneration, config.cooldown) end else doPlayerSendCancel(cid, "Você está exausto.") end   return true end

@Christinacsa, testa ai:
local cfg = { need_item = {5785, 10}, reward_item = {13506, 1}, storage = 40531, } local keywordHandler = KeywordHandler:new() local npcHandler = NpcHandler:new(keywordHandler) NpcSystem.parseParameters(npcHandler) local talkState = {} function onCreatureAppear(cid) npcHandler:onCreatureAppear(cid) end function onCreatureDisappear(cid) npcHandler:onCreatureDisappear(cid) end function onCreatureSay(cid, type, msg) npcHandler:onCreatureSay(cid, type, msg) end function onThink() npcHandler:onThink() end function creatureSayCallback(cid, type, msg) if(not npcHandler:isFocused(cid)) then return false end local talkUser = NPCHANDLER_CONVBEHAVIOR == CONVERSATION_DEFAULT and 0 or cid local msg = msg:lower() if msgcontains(msg, 'kefla') then if getPlayerStorageValue(cid, cfg.storage) < 1 then if doPlayerRemoveItem(cid, cfg.need_item[1], cfg.need_item[2]) then doPlayerAddItem(cid, cfg.reward_item[1], cfg.reward_item[2]) selfSay('You just swap '.. cfg.need_item[2] ..' '.. getItemNameById(cfg.need_item[1]) ..' for '.. cfg.reward_item[2] ..' '.. getItemNameById(cfg.reward_item[1]) ..'.', cid) setPlayerStorageValue(cid, cfg.storage, 1) else selfSay('You need '.. cfg.need_item[2] ..' '.. getItemNameById(cfg.need_item[1]) ..'.', cid) end else selfSay('...', cid) end end return true end npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback) npcHandler:addModule(FocusModule:new())  

não venho 1 databapack , mais quando vou ligar o servidor aparece isso : 
The TheForgottenServer Version: (0.3.7_MODIFIED.X.SERIES - -) - Codename: (Crying Damson)
Compiled with GNU C++ version 4.6.3 for arch 64 Bits at Dec 12 2016 16:12:13
A server developed by: Mattyx14, Comedinha and The Forgotten Server Developers.
Visit our forums for updates, support, and resources: blacktibia.org - tibiaking.com - otland.net - tibiax.org
 

Esse aí funciona para tfs 0.4 também. É só colocar o horário que quer que a checagem de players com mc na área configurada aconteça. Só vai teleportar se estiver na área configurada!
Caso não te sirva, dê uma olhada em:
E utilize o outro script que eu fiz, editando para o intervalo na tag do globalevents para o intervalo que deseja ser verificado. Lá está configurado para checar a cada 30 segundos.

todos os serve tem esse comando cara mds era só pegar em bless.lua
 
local bless = {1, 2, 3, 4, 5} function onSay(cid, words, param) for i = 1, table.maxn(bless) do if(getPlayerBlessing(cid, bless[i])) then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Voce tem todas as bless.") return true end end return doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE,"vc n tem bless") end  

@Christinacsa se for pro efeito "ficar do lado do target", então não seria missile, missile é pra ser lançado, depois de lançado ele some e não prevalece ao lado do alvo, mas efeito dentro do loop sim:
 

@Christinacsa
 

local t = { lookType = 200, -- lookType para o qual será trocado tempo = 2 -- quanto tempo durará } function onCastSpell(cid, var) local outfit = getCreatureOutfit(cid) local target = getCreatureTarget(cid) if target == nil then return true end outfit.lookType = t.lookType doCreatureSetNoMove(target, true) doSetCreatureOutfit(target, outfit, t.tempo*1000) addEvent(function() if isPlayer(target) then doCreatureSetNoMove(target, false) end end, t.tempo*1000) return true end  

Coloca emoteSpell em true no config.lua

pode '-' é so ir na creaturescript.xml ir na linha do niwdeath e apagar 
 
se ajudei rep+

local outfit = 123 -- id da roupa onde tá o valor 123 é o numero da looktype que deseja. Mude para 559
ficando assim:
local outfit = 559 -- id da roupa  

eu uso o apple web server , e sempre da esses erros mas não no site em si
mais sim no banco de dados , ele não funciona mas e simples feche o apple web server e abra novamente como administrador , e ligue o site e o banco de dados depois espere 1 ou 2 minutos e tente novamente entrar em seu site se não der ainda , tente reiniciar a maquina e refaça o procedimento novamente
se não funciona ainda mude de programa vá para o vertrigo / xampp