-
-
[ANTI-CLONE] 100% NOVO [O MELHOR]
Não funciona em modern acc ;S
-
Tibia Guitar Hero [0.3.6~0.4]
Ficou simplesmente fod4!
-
- Compilando TFS 0.4 no MSVC(Com vídeo-aula)
-
Duvida/Pedido DBO
tem que adicionar os efeitos na source. procura no google que tu acha.
-
Duvida/Pedido DBO
Se você nao tem tempo, então desiste amigo. eu estou criando um do zero, já ta 95% feito. quando eu por on vai lotar u.u
-
Evento Automatico
eu estou viajando kkk substitua essa linha: doPlayerSendTextMessage(player_escolhido, MESSAGE_STATUS_CONSOLE_BLUE, "Você é o Vencedor do Evento.") -- ALTERAR frase para o vencedor do premio Por essa: doPlayerSendTextMessage(vitorioso, MESSAGE_STATUS_CONSOLE_BLUE, "Você é o Vencedor do Evento.") -- ALTERAR frase para o vencedor do premio Substitua essa: doBroadcastMessage("O Player "..(getPlayerName(player_escolhido)).." é o Vencedor do Evento.",22) -- ALTERAR frase para todos, do ganhador do premio Por essa : doBroadcastMessage("O Player "..(getPlayerName(vitorioso)).." é o Vencedor do Evento.",22) -- ALTERAR frase para todos, do ganhador do premio Agora deve funcionar.
- Evento Automatico
-
Evento Automatico
Já que o professor de português só veio corrigir a sua gramática, então vou tentar te ajudar. Faz muito tempo que eu não mexo com ot e ontem, por ironia do destino, eu decidi voltar. se o script nao funcionar você me fala o bug que eu vou ficar corrigindo aqui até funcionar kkk function onThink(interval, lastExecution) local dias = {"Sunday"} --O Dia do evento local tempo_espera = "19:55" local vitorioso = 0 local players = getPlayersOnline() local hora = "20:00" --A Hora que começara local storage = 9393 --Não mexa aqui local pos = {x=999 , y=999 , z=9} ---onde tp vai ser criado local topos = {x=999 , y=999 , z=9} ---a position para onde sera teleportado local name = cyclops --Nome do monster a ser criado local name1 = rotworm --Nome do monster a ser criado local name2 = rat --Nome do monster a ser criado if isInArray(quedia.dias, os.date("%A")) and isInArray(tempo_espera, os.date("%X")) then doCreateTeleport(1387, topos , pos) broadcastMessage("o evento ira começar daqui 5 minuto!",22) return TRUE end if isInArray(quedia.dias, os.date("%A")) and isInArray(hora, os.date("%X")) then doCreateTeleport(1387, topos , pos) broadcastMessage("Teleport Aberto Fechara Daki 10 minutos",22) return TRUE end if getGlobalStorageValue(storage) == 1 then else return TRUE end while i <= #players do local pos_player = getPlayerPosition(players) local pos1_lugar = {x = 136, y = 350, z = 11} -- ALTERAR pos do canto superior esquerdo do lugar local pos2_lugar = {x = 157, y = 363, z = 11} -- ALTERAR pos do canto inferior direito do lugar if pos_player.x >= pos1_lugar.x and pos_player.y >= pos1_lugar.y and pos_lugar.x <= pos2_lugar.x and pos_player.y <= pos2_lugar.y then end i = i + 1 end if total_players == 1 then setGlobalStorageValue(storage, -1) doTeleportThing(vitorioso, pos_templo) doPlayerSendTextMessage(player_escolhido, MESSAGE_STATUS_CONSOLE_BLUE, "Você é o Vencedor do Evento.") -- ALTERAR frase para o vencedor do premio doBroadcastMessage("O Player "..(getPlayerName(player_escolhido)).." é o Vencedor do Evento.",22) -- ALTERAR frase para todos, do ganhador do premio return TRUE else if total_players <= 0 then setGlobalStorageValue(storage, -1) doBroadcastMessage("Todos os Jogadores Se mataram, fim do Evento.",22) doRemoveItem(getThingfromPos(pos).uid,1) broadcastMessage("Teleport Fechado",22) return TRUE end end end doSummonCreature(name, position) doSummonCreature(name1, position) doSummonCreature(name2, position)
-
[PEDIDO] BOSS NASCE AUTOMATICO
globalevents function onThink(interval, lastExecution, thinkInterval) local pos = {x=102,y=189,z=6} -- Local onde aparece o BOSS local npc = doCreateMonster("NOMEDOMONSTRO", pos ) local nMin = 20 -- tempo em minuto o monstro sumir. addEvent(doRemoveCreature, nMin*60*1000, Monster) return true end Seja feliz
-
[DUVIDA] Nessa spell de summons
Olá, eu estava fazendo um script de summon que sumona 4 summons que tem o mesmo de mana, life, outift, speed que seu player. e para cada vocação tem uma summon diferente nas minhas vocações vips. só q o script só funcionou na primeira vocação que eu adicionei. Eu ja criei os monsters, não da nenhum erro no distro quando usa a spell, ele só não sumona. plx help-me. function onCastSpell(cid, var) local removeTime = 60 local summons = getCreatureSummons(cid) local MaximoSummon = 4 if (table.maxn(summons) == MaximoSummon) then doPlayerSendTextMessage(cid, MESSAGE_STATUS_WARNING, "Você Já tem 4 Summons.") end if(table.maxn(summons) < MaximoSummon) then local anyPos, pos = {x = 0, y = 0, z = 0}, getCreaturePosition(cid) local toPos = { {x = pos.x + 1, y = pos.y, z = pos.z}, {x = pos.x - 1, y = pos.y, z = pos.z}, {x = pos.x, y = pos.y + 1, z = pos.z}, {x = pos.x, y = pos.y - 1, z = pos.z} } if getPlayerVocation(cid) == 6 then local demon summor = doSummonCreature("Summon Master", pos) doConvinceCreature(cid, demon summor) setCreatureMaxHealth(demon summor, getCreatureMaxHealth(cid)) doCreatureAddHealth(demon summor, getCreatureMaxHealth(cid)) setCreatureMaxMana(demon summor, getCreatureMaxMana(cid)) doCreatureAddMana(demon summor, getCreatureMaxMana(cid)) doChangeSpeed(demon summor, getCreatureBaseSpeed(cid)) doSetCreatureOutfit(demon summor, getCreatureOutfit(cid), -1) end if getPlayerVocation(cid) == 7 then local best summon = doSummonCreature("best summon", pos) doConvinceCreature(cid, best summon) setCreatureMaxHealth(best summon, getCreatureMaxHealth(cid)) doCreatureAddHealth(best summon, getCreatureMaxHealth(cid)) setCreatureMaxMana(best summon, getCreatureMaxMana(cid)) doCreatureAddMana(best summon, getCreatureMaxMana(cid)) doChangeSpeed(best summon, getCreatureBaseSpeed(cid)) doSetCreatureOutfit(best summon, getCreatureOutfit(cid), -1) end end return true end
-
Aumentar limite de efeitos
o meu da esse erro [Linker error] undefined reference to `Game::addMagicEffect(Position const&, unsigned char, bool)'
-
DEV C++ Compilando TFS no Windows
Dmy Recaida respondeu ao post em um tópico de Natanael Beckman em Tutoriais Infraestrutura & ProteçãoEu tentei compilar essa source aqui: http://www.tibiaking.com/forum/topic/33395-tfs-04-dev-anti-dv-warsystem-cast-system-sem-bugs/ Apareceu esse erro aqui " O programa não pode ser iniciado porque está faltando LIBMYSQL.dll no seu computador. tente reinstalá-lo para resolver esse problema".