Gustavo Ntos

quest.lua

local DESTINO = {x = 2521, y = 2280, z = 14} -- POSIÇÃO DA QUEST   local keywordHandler = KeywordHandler:new() local npcHandler = NpcHandler:new(keywordHandler) NpcSystem.parseParameters(npcHandler)   function onCreatureAppear(cid)         npcHandler:onCreatureAppear(cid)         end function onCreatureDisappear(cid)      npcHandler:onCreatureDisappear(cid)         end function onCreatureSay(cid, type, msg)   npcHandler:onCreatureSay(cid, type, msg:lower())   end function onThink()                  npcHandler:onThink()                  end local talkState = {}   function creatureSayCallback(cid, type, msg)    if(not npcHandler:isFocused(cid)) then       return false    end      local talkUser = NPCHANDLER_CONVBEHAVIOR == CONVERSATION_DEFAULT and 0 or cid     if msgcontains(msg, "quest") then         selfSay("Voce quer ir mesmo para a quest??", cid)         talkState[talkUser] = 1     elseif msgcontains(msg, "yes") and talkState[talkUser] == 1 then             doSendMagicEffect(getThingPos(cid), 10)             npcHandler:releaseFocus(cid)             doTeleportThing(cid, DESTINO)             doSendMagicEffect(DESTINO, 10)     talkState[talkUser] = 0     end      return true end     npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback) npcHandler:addModule(FocusModule:new())
 

<?xml version="1.0" encoding="UTF-8"?> <npc name="Quest" script="quest.lua" walkinterval="1000">     <health now="100" max="100"/>     <look type="468"/>     <parameters>         <parameter key="module_shop" value="1"/>         <parameter key="message_greet" value="Olá eu posso te levar para a  {Quest}.."/>     </parameters> </npc>

Em outfits.xml adicione:

<outfit id="4" quest="65423">                 <list gender="0" lookType="139" name="Knight"/>                 <list gender="1" lookType="131" name="Knight"/>         </outfit>
 
data/creaturescripts/scripts > Abra login.lua 
Adicione isso antes do ultimo return true:

---------- Knight ----------------         local Knight = 1 -- id do knight         if getPlayerVocation(cid) == Knight and getPlayerStorageValue(cid, 65423) <= 0 then         setPlayerStorageValue(cid, 65423, 1)          end
 
 
Usando esses exemplos faça das outras vocações!

Eu posso te mandar de graça dexa eu achar aqui no pc.

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 moeda = 2157 local t = {          ["exevo gran mas frigo"] = {level = 9},          } if (msgcontains(msg, 'yes') or msgcontains(msg, 'YES'))then local str = "" str = str .. "Eu vendo estas Magias: " for name, pos in pairs(t) do str = str.." {"..name.."} /" end str = str .. "." npcHandler:say(str, cid) elseif t[msg] then              if not getPlayerLearnedInstantSpell(cid, msg) then              if getPlayerLevel(cid) >= t[msg].level then                                    doPlayerLearnInstantSpell(cid, msg)                      doCreatureChangeOutfit(cid, 985)                      npcHandler:say("Você aprendeu uma nova magia chamada ".. msg .."e ganhou uma newtype!", cid)              end              end              else                      npcHandler:say("Desculpe ja te encinei essa magia", cid)              end return TRUE end npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback) npcHandler:addModule(FocusModule:new())

@Kazuya9629
 

 
http://www.mediafire.com/file/5a467ip9n9742fq/DBO+Way+of+the+future+item.rar
 
https://www.virustotal.com/pt/file/1e6ec275da45aa2a427fbab6560fe15a68a8811dd47c22cf5fd10b326fb871c8/analysis/

Isso ae fica em otserv.cpp só procurar á linha la e editar, boa sorte.

Cara eu não entendo muito mas se não me engano você consegue mudar isso antes de fazer a compilação das sources indo no Theforgottenserver ai você da um CTRL+F e busca por esses nomes e vai editando e coloca o seu nome e compila, dai depois quando abrir vai aparecer com seu nome. 

Alguem tem ou poder fazer um mod ou module que mostra as Spell da vocação? TFS 0.4 com Opcodes.
 

Faz uma imagem exata 100% quadrada e tem que ter um dimenção exata que divide por 32 ex:
 
64x64 === Ao recortar dara 4 pisos de 32x32

Sei não faz qualquer tamanho dps corta em 32x32 com varios pisos e junta

data/items/items.xml
 
acho que o vip é o bills
bills armor
bills legs
bills boots

Gato Vlw S2 

Abre todos
local text = "[PokeMagic] Voce foi teleportado!" local textt = "Poke Magic sempre inovando!" local pos = {x=2510, y=2233, z=14}  function onUse(cid, item, frompos, item2, topos)  doTeleportThing(cid, pos)  doRemoveItem(item.uid, 1)  doPlayerSendTextMessage(cid, 25, text)  doPlayerSendTextMessage(cid, 25, textt) return true end  

o Item usado...
Ex:

<action itemid="11391" event="script" value="x.lua"/>
Ele ira remover o item 11391 ao usar...

local text = "[PokeMagic] Voce foi teleportado!" local textt = "Poke Magic sempre inovando!" local pos = {x=2510, y=2233, z=14} local item = 13431 local qtd = 1  function onUse(cid, item, frompos, item2, topos) if getPlayerItemCount(cid, item) >= qtd then  doTeleportThing(cid, pos)  doRemoveItem(item, qtd)  doPlayerSendTextMessage(cid, 25, text)  doPlayerSendTextMessage(cid, 25, textt)  else  doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Voce nao tem os items vaza daqui desgraça")      return true end

Mas não é igual nas Spells certo? vo ver dps como faz.

local time = 15 -- tempo em segundos para voltar local points = 10 -- o tanto de skills ele ficara mais forte local condition = createConditionObject(CONDITION_ATTRIBUTES) setConditionParam(condition, CONDITION_PARAM_TICKS, time*1000) setConditionParam(condition, CONDITION_PARAM_STAT_MAGICLEVEL, points) setConditionParam(condition, CONDITION_PARAM_SKILL_FIST, points) setConditionParam(condition, CONDITION_PARAM_SKILL_SWORD, points) setConditionParam(condition, CONDITION_PARAM_SKILL_AXE, points) setConditionParam(condition, CONDITION_PARAM_SKILL_CLUB, points) setConditionParam(condition, CONDITION_PARAM_SKILL_DISTANCE, points) setConditionParam(condition, CONDITION_PARAM_SKILL_SHIELD, points) function onCastSpell(cid, var) local waittime = 15 -- Tempo de exhaustion local storage = 15288 if exhaustion.check(cid, storage) then doPlayerSendCancel(cid, "You are exhausted") return false end local pos = getCreaturePosition(cid) local target = getCreatureTarget(cid) local targetpos = getCreaturePosition(target) local Tile1 = {x=1509, y=1255, z=7} -- position onde o player sera teleportado local Tile2 = {x=1509, y=1259, z=7} -- position onde o target sera teleportado local from,to = {x=979, y=911, z=7},{x=994, y=918, z=7},{ -- ponto 1 ao ponto 2 da area em que ele sera teleportado local from,to1 = {x=1504, y=1253, z=7},{x=1514, y=1263, z=7},{ -- ponto 1 ao ponto 2 da area em que ele sera teleportado local from,to2 = {x=1553, y=1253, z=7},{x=1562, y=1262, z=7},{ -- ponto 1 ao ponto 2 da area em que ele sera teleportado local from,to3 = {x=1160, y=1176, z=7},{x=1168, y=1190, z=7},{ -- ponto 1 ao ponto 2 da area em que ele sera teleportado local from,to4 = {x=664, y=1099, z=7},{x=685, y=1104, z=7},{ -- ponto 1 ao ponto 2 da area em que ele sera teleportado if isInRange(pos, from, to) and isInRange(pos, from1, to1) and isInRange(pos, from2, to2) and isInRange(pos, from3, to3) and isInRange(pos, from4, to4) then doPlayerSendCancel(cid, "Você nao pode usar o Tsukuyomi World aqui!") return FALSE end if not isPlayer(target) then doPlayerSendCancel(cid, "Você so pode usar essa magia em players!") return FALSE end local function Teleport_Player(cid) doTeleportThing(cid,pos) end local function Teleport_Target(target) doCreatureSetNoMove(target, 0) doTeleportThing(target,targetpos) end doAddCondition(cid, condition) doCreatureSetNoMove(target, 1) doTeleportThing(cid,Tile1) doTeleportThing(target,Tile2) doSendMagicEffect(targetpos, 252) addEvent(Teleport_Player, time*1000, cid) addEvent(Teleport_Target, time*1000, target) exhaustion.set(cid, storage, waittime) return TRUE end
Caso o exauted continua bugado deixa o Exauted no spells.xml - 1000 ou 1

local config = {     storage = 23567,     tempo = 5,     lerIP = "yes" } config.lerIP = getBooleanFromString(config.lerIP) local m_lastLogin, m_lastIP = 0, 0 function onLogout(cid)     if exhaustion.check(cid, config.storage) then         doPlayerSendTextMessage(cid, 18, "Aguarde " .. exhaustion.get(cid, config.storage) .. " segundos para usar esse comando novamente.")         return true     end     local timeNow, playerIP = os.time(), getPlayerIp(cid)     if(m_lastLogin + config.tempo >= timeNow and     (config.lerIP == FALSE or m_lastIP == playerIP)) then         return false     end          m_lastIP = playerIP     m_lastLogin = timeNow     exhaustion.set(cid, config.storage, config.tempo*60)          return true end

Você baixou a source? Ela tem tudo, e está só no jeito de compilar. 
 
 
 

[Error - TalkAction Interface]
 
O local do telport ta certo, ta dando erro erro quando uso o comando pra abrir.
O teleport não aparece.

Haviam postado um sistema desse parecido aqui no tk mas tava todo bugado , faltava muita função na Lib e nem funcionava esse parece estar 100%

function onUse(cid, item, fromPosition, itemEx, toPosition)    local l = {          storage = 45455, -- storage desejada         storage2 = 45457, -- storage da quest, para não fazer novamente         gmax = 50, -- quantidade máxima de golds que vai poder ganhar         gold = 2160, -- Item Id do Gold         rand = math.random(1, l.gmax)         }          if getPlayerStorageValue(cid, l.storage2) == -1 then   doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, 'Parabéns você acabou de completar a Reflect Quest e recebeu ' .. l.rand .. ' golds.')   doPlayerAddItem(cid, l.gold, l.rand)   setPlayerStorageValue(cid, l.storage, 1)   setPlayerStorageValue(cid, l.storage2, 1)     else  doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, 'Você já terminou a quest!') end    return true end