Search the Community

PATCH: EXTRAIA ESSE ARQUIVO NA PASTA DATA DO SERVIDOR E SUBSTITUA PARA EVITAR ERROS ! XML.rar • Menu: ├ Informações; ├ Edições; ├ Erros; ├ Prints; ├ Mapa ├ Download; ├ Atualização; ├ Utilitários; └ Créditos. • Informações Basicas • (+)1 a 3 Gen (Completa) (+)Bike System (+)Tournament System (+)Clã System (+)Boost Stone (+)VIP System 100% Fucional Entre outras coisas... • Edições / Ajustes • (+)Retirados alguns Bugs do server (+)Implantado remakes da 1 a 3 Gen (+)Adicionados alguns comandos e system. (+)Nova raça de pokémons FAIRY,DARK,STEEL (+)Adicionado Level System com balanceamento (+)Foi balanceado mais de 123 pokémons (+)Megas Pokémon no client,não deu tempo de serem add (+)Outland (+)PERFECT NICK SYSTEM C++ (+)PRICE SYSTEM (+)Summon Teleport C++ + CONFIG.LUA • Erros Do Servidor • Nenhum que eu saiba. • PrintScreen • Todas as prints: http://imgur.com/a/vTHfl Em breve posto mais prints!! • Download's • SERVER + SOURCE + CLIENT: http://www.4shared.com/rar/ona5VVkmce/PDA_2016_Open_Source.html? • SCAN • 4SHARED JÁ FAZ SCAN • Creditos • DASH TEAM - PELA BASE PokeCamp -- pelas sprites e alguns sistemas PDA BY GOD ANNA - PELO MAPA E POR ULTIMO EU <3 CONTRIBUIÇÃO PARA A MARATONA DE PROJETOS ! XML.rar

Galera, eu quero muito saber se tem como compilar TFS 0.3.6/0.4/1.0/1.1 usando o Microsoft Visual Studio 2013. Por favor gente, me respondam. Se houver, me ensinem como!

Olá pessoal, Estou procurando a alguns dias e não consegui fazer da certo ate o momento, então acho que mais pessoas devem ter a mesma dificuldade. Atualmente alguns servidores de poketibia tem um autoloot que é ativado assim que o monstro morre, você não precisa ir lá click no corpo e nem ficar configurando qual item vc quer. Uso a base do PokemasterX, esse servidores já te um script que pega todos os loot's, porem precisa click no poke morto, se alguém conseguir fazer o scrip funcionar se click no corpo ou tiver outro script ajudaria muito. Obrigado! Script que uso hoje: function getContainerBackpack(containeruid) local containers = {} if type(getContainerSize(containeruid)) ~= "number" then return false end for slot = 0, getContainerSize(containeruid)-1 do local item = getContainerItem(containeruid, slot) if item.itemid == 0 then break end if isContainer(item.uid) then table.insert(containers, item.uid) end end for i = 1, #containers do if #containers > 1 then table.remove(containers, containers[i+1]) end if #containers > 2 then table.remove(containers, containers[i+2]) end if #containers > 3 then table.remove(containers, containers[i+3]) end if #containers > 4 then table.remove(containers, containers[i+4]) end if #containers > 5 then table.remove(containers, containers[i+5]) end end for i = 1, #containers do for _, x in ipairs(getContainerBackpack(containers[i])) do table.insert(containers, x) end end return containers end function getContainerItems(containeruid) local items = {} local containers = {} if type(getContainerSize(containeruid)) ~= "number" then return false end for slot = 0, getContainerSize(containeruid)-1 do local item = getContainerItem(containeruid, slot) if item.itemid == 0 then break end if isContainer(item.uid) then table.insert(containers, item.uid) end table.insert(items, item) end if #containers > 0 then for i,x in ipairs(getContainerItems(containers[1])) do table.insert(items, x) end table.remove(containers, 1) end return items end function isCorpse(item) return string.find(getItemNameById(item.itemid), "fainted") or string.find(getItemNameById(item.itemid), "defeated ") end function getCorpsesPosition(position) local toret = { } -- table to return items position.stackpos = 1 while true do -- loop to catch the items and insert them in toret table local thing = getThingfromPos(position) if thing.itemid == 0 then -- thing doesn't exist, break the loop... break end if thing.uid > 0 and isContainer(thing.uid) and isCorpse(thing) then table.insert(toret,thing) end position.stackpos = position.stackpos + 1 -- get next item end return toret end function doPlayerAddItemStacking(cid, itemid, quant) -- by mkalo local item = getItemsInContainerById(getPlayerSlotItem(cid, 3).uid, itemid) local piles = 0 if #item > 0 then for i,x in pairs(item) do if getThing(x).type < 100 then local it = getThing(x) doTransformItem(it.uid, itemid, it.type+quant) if it.type+quant > 100 then doPlayerAddItem(cid, itemid, it.type+quant-100) end else piles = piles+1 end end else return doPlayerAddItem(cid, itemid, quant) end if piles == #item then doPlayerAddItem(cid, itemid, quant) end end function doLoot(cid, corpse) if not isCollectAll(cid) then return true end if not isContainer(corpse.uid) then return false end local itemsToLootAllWindow = {} for _, loot in pairs(getContainerItems(corpse.uid)) do local slot = getPlayerSlotItem(cid, 3).uid local container = getContainerBackpack(slot) local item1 = getPlayerStorageValue(cid, 251461):explode("|") or 0 function configLoot() local itt = "".. tostring(getItemInfo(loot.itemid).clientId) .."|".. loot.type .."|" local ittt1, ittt2 = itt:explode("|")[1], itt:explode("|")[2] local itr = ittt1 .."-".. ittt2 .."-" table.insert(itemsToLootAllWindow, itr) doRemoveItem(loot.uid) doSendPlayerExtendedOpcode(cid, 69, table.concat(itemsToLootAllWindow)) end --// Sistema de Daily Itens \\-- if inDailyItens(cid) then if tonumber(item1[1]) == loot.itemid then doPlayerSendTextMessage(cid, 20, "[Daily Itens]: Resta você coletar ["..(tonumber(item1[3]) - getPlayerItemCount(cid, item1[1])) - loot.type.."] "..getItemNameById(loot.itemid)..".") end if tonumber(item1[2]) == loot.itemid then doPlayerSendTextMessage(cid, 20, "[Daily Itens]: Resta você coletar ["..(tonumber(item1[4]) - getPlayerItemCount(cid, item1[2])) - loot.type.."] "..getItemNameById(loot.itemid)..".") end if tonumber(item1[5]) == loot.itemid then doPlayerSendTextMessage(cid, 20, "[Daily Itens]: Resta você coletar ["..(tonumber(item1[7]) - getPlayerItemCount(cid, item1[5])) - loot.type.."] "..getItemNameById(loot.itemid)..".") end if tonumber(item1[6]) == loot.itemid then doPlayerSendTextMessage(cid, 20, "[Daily Itens]: Resta você coletar ["..(tonumber(item1[8]) - getPlayerItemCount(cid, item1[6])) - loot.type.."] "..getItemNameById(loot.itemid)..".") end end --// Sistema de Daily Itens \\-- if #container < 1 then doPlayerAddItem(cid, loot.itemid, loot.type) configLoot() end for i = 1, #container do if #container >= 1 then if getContainerSlotsFree(container[i]) >= 1 then doAddContainerItem(container[i], loot.itemid, loot.type) configLoot() break end else doPlayerAddItem(cid, loot.itemid, loot.type) configLoot() end end end end function checkLoot(cid, corpse, SemMensagem) if not isContainer(corpse.uid) then return false end local quemMatou = getItemAttribute(corpse.uid, "corpseowner") if quemMatou then local player = getCreatureByName(quemMatou) if isPlayer(player) then local isInParyWithPlayer = false if isInParty(cid) and isInParty(player) then isInParyWithPlayer = isPartyEquals(player, cid) end if getCreatureName(cid) ~= getCreatureName(player) and not isInParyWithPlayer then if not SemMensagem then doPlayerSendCancel(cid, "Você não pode abrir um loot que não é seu.") end return false end end end return true end function onUse(cid, item, frompos, item2, topos) if isWatchingTv(cid) then return true end if not isContainer(item.uid) then return true end if not isCollectAll(cid) then return false end local maxItem = 800 if isContainer(item.uid)then if (getPlayerTotalItem(cid) + #getAllItemsFromContainer(item)) > maxItem then doPlayerSendCancel(cid, "Você não pode carregar mais itens pois já lotou a quantidade de slot's disponíveis") return false end else if getPlayerTotalItem(cid) + 1 > maxItem then doPlayerSendCancel(cid, "Você não pode carregar mais itens pois já lotou a quantidade de slot's disponíveis") return false end end local openCorpse = #getContainerItems(item.uid) < 1 if checkLoot(cid, item, false) then doLoot(cid, item) end for _, corpse in pairs(getCorpsesPosition(getThingPosition(item.uid))) do if checkLoot(cid, corpse, false) then doLoot(cid, corpse) end end if openCorpse then return false end return true end

• Menu: ├ Informações; ├ Prints; ├ Download; └ Creditos. • Informações Basicas • • print screen • • download+scan • • Creditos • brun123 Valakinhas Luiz Machado (mapa) Sam Lecter (ajuda nos sistemas) Kevick (eu)

Servidor testado 0.3.6 8.60 ✅ - Podendo funcionar em 0.4 ⚠️ Primeiro vou explicar um pouco sobre ele é base do script do @xWhiteWolf e modificado para escalar com skill pelo @BangxD e agora modificado novamente para não só funcionar com players mas também com todos os monstros. Instalação Se ja tem instalado siga as instruções abaixo para instalar o script basta remover o registro do login.lua, alterar a tag XML pela nova fornecida Caso não tenha instalado basta instalar normalmente criando o arquivo critical.lua e adicionando as tag no XML Tag XML Script

Estava editando este layout para um amigo. Porém como ele não vai mais usar decidi postar ele aqui. Lembrando que quando editei esse layout eu era um iniciante (e ainda sou) então pode ter algum problema ou algo assim. Nos próximos dias postarei mais layout's derivados para quem quiser usar, estarei fazendo apenas para Treino. Layout Dragon Ball Segundo Print (parte de baixo) DOWNLOAD: Layout_DragonBall.rar SCAN Créditos: Eu (Mark) por editar grande parte do layout. E os responsáveis pelo Layout Original que foi oque eu editei (SODB Layout): Kadres Swirus(nieudas) Prawdziwy.

Boa noite, eu estive procurando no fórum um script que atribuísse slot e atributos a um item, eu ate encontrei o script no fórum, porem estou precisando de ajuda para ajusta-lo ou corrigir o bug. Script: Creaturescript: Action: Bom o script está funcionando, porem o bug que esta acontecendo é que ao utilizar o item no set ele esta atribuindo a % porem não esta somando com as skill e HP que o player já possui, eu queria ajuda nesta parte. Caso não tiver solução eu queria trocar % por atributos brutos por ex: (+15 de ml sem ser em %) TFS: 0.3.6 REP+ Agradeço a Atenção.

Boa tarde, Estou com Problema no meu script! ficando dando esse erro. script:

erro npc não recolhe o dinheiro ! sendo que esta configurado tudo certo. 08/04/2019 20:07:20] [Error - Npc interface] [08/04/2019 20:07:20] In a timer event called from: [08/04/2019 20:07:20] data/npc/scripts/cassino.lua:onCreatureSay [08/04/2019 20:07:20] Description: [08/04/2019 20:07:20] (luaDoRemoveItem) Item not found

Olá Galera do EKZ bom não sei se tem esse conteúdo aqui no fórum mas venho trazer um spoof system adaptado para tfs 0.3.6 e 0.4 , Roda em Tibia e derivados como Poketibia,DBO,NTO,HarryPotter etc mas vamo ao que interessa Em configmanager.cpp procure: m_confNumber[MAX_PLAYERS] = getGlobalNumber("maxPlayers", 1000);Abaixo adicione:m_confNumber[SPOOF_PLAYERS] = getGlobalNumber("spoofPlayers", 0); Em configmanager.h procure: MAX_PLAYERS,Abaixo adicione:SPOOF_PLAYERS, Em status.cpp procure: p = xmlNewNode(NULL,(const xmlChar*)"players");sprintf(buffer, "%d", g_game.getPlayersOnline());xmlSetProp(p, (const xmlChar*)"online", (const xmlChar*)buffer);sprintf(buffer, "%d", (int32_t)g_config.getNumber(ConfigManager::MAX_PLAYERS));xmlSetProp(p, (const xmlChar*)"max", (const xmlChar*)buffer);sprintf(buffer, "%d", g_game.getPlayersRecord());xmlSetProp(p, (const xmlChar*)"peak", (const xmlChar*)buffer); Modifique para: p = xmlNewNode(NULL,(const xmlChar*)"players");sprintf(buffer, "%d", g_game.getPlayersOnline()+(int32_t)g_config.getNumber(ConfigManager::SPOOF_PLAYERS));xmlSetProp(p, (const xmlChar*)"online", (const xmlChar*)buffer);sprintf(buffer, "%d", (int32_t)g_config.getNumber(ConfigManager::MAX_PLAYERS)+(int32_t)g_config.getNumber(ConfigManager::SPOOF_PLAYERS));xmlSetProp(p, (const xmlChar*)"max", (const xmlChar*)buffer);sprintf(buffer, "%d", g_game.getPlayersRecord()+(int32_t)g_config.getNumber(ConfigManager::SPOOF_PLAYERS));xmlSetProp(p, (const xmlChar*)"peak", (const xmlChar*)buffer); Em config.lua procure: maxPlayers =Abaixo adicione:spoofPlayers = 0 Configurando: No config.lua onde tem spoofPlayers = 0 substitua o valor 0 para o valor de players spoof que você deseja ter.

Ola Xtibianos precisava de um npc que fale com um char de cada vez. Ex1: char nr1 fala hi NPC fala hi Ex2: char nr2 fala hi NPC fala calma estou ocupado no momento Versão 8.6 Tfs 0.4

NOVIDADESMaster Ball [100%]Hydra Stone [100%]Mega Stone [100%]Boost Stone [100%]Shadow Megas [100%]Red Megas [100%]Áreas VIP e Free [100%]Held System [100%]Double EXP [100%]Cooldown dos golpes [100%] Sistema de Torneio [100%]Pergaminhos [100%]Todas as gerações [100%] Sistema de VIP [100%]Novas quests [100%] Base editada Poke Dash [100%] _________________________________________ SCREENSHOTS In-game _________________________________________ Download Tamanho do arquivo: 107 MB. Servidor + Cliente: http://www.4shared.com/rar/l8yCTegFba/Anonymous_Open_Source.html? OBS: 4Shared ja faz scan... _________________________________________ Créditos Bolz Lucas Kuchiki Cromendak PxG

Eae, essa função é de outro fórum não tenho certeza se tem aqui mas decidi só colocar aqui como prefiro mais esse forum rs decidi colocar pra quando eu precisar novamente e pra caso algume precise... Mas indo ao assunto: Essa função nada mais é que quando o player loga abre os chat selecionado no login.lua automaticamente Essa função é para 0.3.6 Versões testada: 8.54 Vamos ao código em LuaScript.cpp Procure: //getChannelUsers(channelId) lua_register(m_luaState, "getChannelUsers", LuaScriptInterfaceluaGetChannelUsers); Adicione em baixo: //doPlayerOpenChannel(cid, channelId) lua_register(m_luaState, "doPlayerOpenChannel", LuaScriptInterface::luaDoPlayerOpenChannel); Continuando procure: int32_t LuaScriptInterfaceinternalGetPlayerInfo(lua_State* L, PlayerInfo_t info) Acima adicione: int32_t LuaScriptInterfaceluaDoPlayerOpenChannel(lua_State* L) { //doPlayerOpenChannel(cid, channelId) uint32_t channelId = popNumber(L); uint32_t cid = popNumber(L); ScriptEnviroment* env = getEnv(); Player* player = env->getPlayerByUID(cid); if(player) lua_pushnumber(L, g_game.playerOpenChannel(cid, channelId) ? true : false); else { errorEx(getError(LUA_ERROR_PLAYER_NOT_FOUND)); lua_pushnumber(L, false); } return 1; } Agora em LuaScript.h Procure por: static int32_t luaGetChannelUsers(lua_State* L); abaixo adicione: static int32_t luaDoPlayerOpenChannel(lua_State* L); Agora em data/creaturescripts/scripts/login.lua Antes do último return true Adicione: doPlayerOpenChannel(cid, 7) -- 7 é o número do channel para ver é em data/xml/channels.xml

8.54 com Codigo Fonte [+] New e Old Cliente [+] Catch médio [+] Up Médio [+] Sem ip changer [+] Sem hamachi [+] 1º 2º 3º 4º Geração [+] Base Shiny [+] 32 + quests [+] 24/7 online [+] Area Vip [+] Eventos automaticos [+] Passiva por clan [+] Task System [+] Ditto Memory System [+] Outfits da Pokexgames Pagina: https://www.facebook.com/pokemonhpoficial/ Site: http://www.pokemonhp.net/ Scan: https://virustotal.com/pt/file/15b0764b900d7f2a158dd8a043932b9518ebcc5a351a14feee3e2eec245799bf/analysis/1482210443/ PRINTS:

Encontrei alguns tópicos sobre trainer offline, mas funciona apenas em servidores tfs 0.4, se alguém puder me ajudar com script de trainer offline para tfs 0.3.6 agradeço!

Olá Galera estava me arriscando em programar em lua e decidi criar algo bem simples mas útil ! vamos lá então ! Em Actions.xml Adiciona Isto: E Em Data/Actions/Scripts Cria um Arquivo Lua Chamado "addonbox" e Adiciona Isto Dentro Dele: REP +

Bom Galera é o seguinte o Meu Servidor ele tem um bug que quando o Player Desloga No Fly Ele Não Consegui Mais Logar No Servidor Eu Queria Um Script Que Não Desse Pra Eles Deslogarem No Fly So Quando Estiverem No Chão Login.lua local config = { loginMessage = getConfigValue('loginMessage'), useFragHandler = getBooleanFromString(getConfigValue('useFragHandler')) } function onLogin(cid) if getPlayerLevel(cid) >= 1 and getPlayerLevel(cid) <= 10 then --alterado v1.8 doPlayerSetLossPercent(cid, PLAYERLOSS_EXPERIENCE, 0) else doPlayerSetLossPercent(cid, PLAYERLOSS_EXPERIENCE, (getPlayerLevel(cid) >= 200 and 100 or math.floor(getPlayerLevel(cid)/2)) ) end doCreatureSetDropLoot(cid, false) local accountManager = getPlayerAccountManager(cid) if(accountManager == MANAGER_NONE) then local lastLogin, str = getPlayerLastLoginSaved(cid), config.loginMessage if(lastLogin > 0) then doPlayerSendTextMessage(cid, MESSAGE_STATUS_DEFAULT, str) str = "Your last visit was on " .. os.date("%a %b %d %X %Y", lastLogin) .. "." else str = str end doPlayerSendTextMessage(cid, MESSAGE_STATUS_DEFAULT, str) sendMsgToPlayer(cid, 20, "Bem-Vindo ao PokemonXjirachi.") elseif(accountManager == MANAGER_NAMELOCK) then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Hello, it appears that your character has been namelocked, what would you like as your new name?") elseif(accountManager == MANAGER_ACCOUNT) then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Hello, type 'account' to manage your account and if you want to start over then type 'cancel'.") else doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Hello, type 'account' to create an account or type 'recover' to recover an account.") end if getCreatureName(cid) == "Account Manager" then local outfit = {} if accountManagerRandomPokemonOutfit then outfit = {lookType = getPokemonXMLOutfit(oldpokedex[math.random(151)][1])} else outfit = accountManagerOutfit end doSetCreatureOutfit(cid, outfit, -1) return true end if(not isPlayerGhost(cid)) then doSendMagicEffect(getCreaturePosition(cid), CONST_ME_TELEPORT) end local outfit = {} if getPlayerVocation(cid) == 0 then doPlayerSetMaxCapacity(cid, 7) doPlayerSetVocation(cid, 1) setCreatureMaxMana(cid, 6) doPlayerAddSoul(cid, -getPlayerSoul(cid)) setPlayerStorageValue(cid, 19898, 0) if getCreatureOutfit(cid).lookType == 128 then outfit = {lookType = 510, lookHead = math.random(0, 132), lookBody = math.random(0, 132), lookLegs = math.random(0, 132), lookFeet = math.random(0, 132)} elseif getCreatureOutfit(cid).lookType == 136 then outfit = {lookType = 511, lookHead = math.random(0, 132), lookBody = math.random(0, 132), lookLegs = math.random(0, 132), lookFeet = math.random(0, 132)} end doCreatureChangeOutfit(cid, outfit) end registerCreatureEvent(cid, "dropStone") registerCreatureEvent(cid, "ShowPokedex") registerCreatureEvent(cid, "ClosePokedex") registerCreatureEvent(cid, "WatchTv") registerCreatureEvent(cid, "StopWatchingTv") registerCreatureEvent(cid, "WalkTv") registerCreatureEvent(cid, "RecordTv") registerCreatureEvent(cid, "PlayerLogout") registerCreatureEvent(cid, "WildAttack") registerCreatureEvent(cid, "Idle") registerCreatureEvent(cid, "EffectOnAdvance") registerCreatureEvent(cid, "GeneralConfiguration") registerCreatureEvent(cid, "SaveReportBug") registerCreatureEvent(cid, "LookSystem") registerCreatureEvent(cid, "T1") registerCreatureEvent(cid, "T2") registerCreatureEvent(cid, "atkz") registerCreatureEvent(cid, "atk") registerCreatureEvent(cid, "magica") registerCreatureEvent(cid, "Effect") registerCreatureEvent(cid, "Teste") if getPlayerStorageValue(cid, 99284) == 1 then setPlayerStorageValue(cid, 99284, -1) end if getPlayerStorageValue(cid, 6598754) >= 1 or getPlayerStorageValue(cid, 6598755) >= 1 then setPlayerStorageValue(cid, 6598754, -1) setPlayerStorageValue(cid, 6598755, -1) doRemoveCondition(cid, CONDITION_OUTFIT) --alterado v1.9 \/ doTeleportThing(cid, posBackPVP, false) doCreatureAddHealth(cid, getCreatureMaxHealth(cid)) end doChangeSpeed(cid, -(getCreatureSpeed(cid))) --///////////////////////////////////////////////////////////////////////////-- local storages = {17000, 63215, 17001, 13008, 5700} for s = 1, #storages do if not tonumber(getPlayerStorageValue(cid, storages)) then if s == 3 then setPlayerStorageValue(cid, storages, 1) elseif s == 4 then setPlayerStorageValue(cid, storages, -1) else if isBeingUsed(getPlayerSlotItem(cid, 8).itemid) then setPlayerStorageValue(cid, storages, 1) else setPlayerStorageValue(cid, storages, -1) end end doPlayerSendTextMessage(cid, 27, "Sorry, but a problem occurred on the server, but now it's alright") end end --/////////////////////////////////////////////////////////////////////////-- if getPlayerStorageValue(cid, 17000) >= 1 then -- fly local item = getPlayerSlotItem(cid, local poke = getItemAttribute(item.uid, "poke") doChangeSpeed(cid, getPlayerStorageValue(cid, 54844)) doRemoveCondition(cid, CONDITION_OUTFIT) local addonfly = getPlayerSlotItem(cid, 8).uid local addofly = getItemAttribute(addonfly,"addonfly") if not addofly then doSetItemAttribute(addonfly,"addonfly",0) doSetCreatureOutfit(cid, {lookType = flys[poke][1] + 351}, -1) end if addofly > 0 then doSetCreatureOutfit(cid, {lookType = addofly}, -1) end local item = getPlayerSlotItem(cid, local poke = getItemAttribute(item.uid, "poke") doChangeSpeed(cid, getPlayerStorageValue(cid, 54844)) doRemoveCondition(cid, CONDITION_OUTFIT) doSetCreatureOutfit(cid, {lookType = flys[poke][1] + 351}, -1) local apos = getFlyingMarkedPos(cid) apos.stackpos = 0 if getTileThingByPos(apos).itemid <= 2 then doCombatAreaHealth(cid, FIREDAMAGE, getFlyingMarkedPos(cid), 0, 0, 0, CONST_ME_NONE) doCreateItem(460, 1, getFlyingMarkedPos(cid)) end doTeleportThing(cid, apos, false) if getItemAttribute(item.uid, "boost") and getItemAttribute(item.uid, "boost") >= 50 and getPlayerStorageValue(cid, 42368) >= 1 then sendAuraEffect(cid, auraSyst[getItemAttribute(item.uid, "aura")]) --alterado v1.8 end local posicao = getTownTemplePosition(getPlayerTown(cid)) markFlyingPos(cid, posicao) elseif getPlayerStorageValue(cid, 63215) >= 1 then -- surf local item = getPlayerSlotItem(cid, local poke = getItemAttribute(item.uid, "poke") doSetCreatureOutfit(cid, {lookType = surfs[poke].lookType + 351}, -1) --alterado v1.6 doChangeSpeed(cid, getPlayerStorageValue(cid, 54844)) if getItemAttribute(item.uid, "boost") and getItemAttribute(item.uid, "boost") >= 50 and getPlayerStorageValue(cid, 42368) >= 1 then sendAuraEffect(cid, auraSyst[getItemAttribute(item.uid, "aura")]) --alterado v1.8 end elseif getPlayerStorageValue(cid, 17001) >= 1 then -- ride local item = getPlayerSlotItem(cid, local poke = getItemAttribute(item.uid, "poke") if rides[poke] then doChangeSpeed(cid, getPlayerStorageValue(cid, 54844)) doRemoveCondition(cid, CONDITION_OUTFIT) doSetCreatureOutfit(cid, {lookType = rides[poke][1] + 351}, -1) if getItemAttribute(item.uid, "boost") and getItemAttribute(item.uid, "boost") >= 50 and getPlayerStorageValue(cid, 42368) >= 1 then sendAuraEffect(cid, auraSyst[getItemAttribute(item.uid, "aura")]) --alterado v1.8 end else setPlayerStorageValue(cid, 17001, -1) doRegainSpeed(cid) end local posicao2 = getTownTemplePosition(getPlayerTown(cid)) markFlyingPos(cid, posicao2) elseif getPlayerStorageValue(cid, 13008) >= 1 then -- dive if not isInArray({5405, 5406, 5407, 5408, 5409, 5410}, getTileInfo(getThingPos(cid)).itemid) then setPlayerStorageValue(cid, 13008, 0) doRegainSpeed(cid) doRemoveCondition(cid, CONDITION_OUTFIT) return true end if getPlayerSex(cid) == 1 then doSetCreatureOutfit(cid, {lookType = 1034, lookHead = getCreatureOutfit(cid).lookHead, lookBody = getCreatureOutfit(cid).lookBody, lookLegs = getCreatureOutfit(cid).lookLegs, lookFeet = getCreatureOutfit(cid).lookFeet}, -1) else doSetCreatureOutfit(cid, {lookType = 1035, lookHead = getCreatureOutfit(cid).lookHead, lookBody = getCreatureOutfit(cid).lookBody, lookLegs = getCreatureOutfit(cid).lookLegs, lookFeet = getCreatureOutfit(cid).lookFeet}, -1) end doChangeSpeed(cid, 800) elseif getPlayerStorageValue(cid, 5700) > 0 then --bike doChangeSpeed(cid, -getCreatureSpeed(cid)) doChangeSpeed(cid, getPlayerStorageValue(cid, 5700)) --alterado v1.8 if getPlayerSex(cid) == 1 then doSetCreatureOutfit(cid, {lookType = 1394}, -1) else doSetCreatureOutfit(cid, {lookType = 1393}, -1) end elseif getPlayerStorageValue(cid, 75846) >= 1 then --alterado v1.9 \/ doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid)), false) setPlayerStorageValue(cid, 75846, -1) sendMsgToPlayer(cid, 20, "You have been moved to your town!") else doRegainSpeed(cid) end if getPlayerStorageValue(cid, 22545) >= 1 then setPlayerStorageValue(cid, 22545, -1) doTeleportThing(cid, getClosestFreeTile(cid, posBackGolden), false) setPlayerRecordWaves(cid) end if useKpdoDlls then doUpdateMoves(cid) doUpdatePokemonsBar(cid) end return true end

Estamos online! [•] SITE: http://pokexjirachi.servegame.com [•] PAGINA: www.facebook.com/pokexjirachi [•] INFORMAÇOES: - SERVIDOR CONTENDO CODIGO FONTE (SOURCE) - Servidor Estavel Uptime de (580 hrs) Testado - Player EXP: 10x - Pokemon EXP: 15x - Catch System Inovado (Rate Por Skill "Catching" + Rate normal) - Catch Channel System (Veja todos os Catch do Servidor Pelo Canal Catch-Channel) - Bonus Level System (Marca na Ball a quantia de Level que voce Upou Nesse Pokemon, Assim mudando o Comercio de Pokemons) - Pokemon Level Max : 300 - Pokemon Boost Max FREE: +50 - Pokemon Boost Max VIP: +80 + (Bonus Boost) - Novo Balanceamentos dos Pokemons - Surf - Fly - 6 Pokemons (na bag) - Dive - Order - Pokedex - Respaw de Shiny Aleatorio (1%) - Passive - Torneio - Teleport - Apricorns e Vitaminas - Cassino - Invasao automatica (09:00 as 21:00) - Npcs (Aura,mark,Pokemon Collector,lock ball e etc.....) - Aura - Task System (NPC MEGA TASK) - Clan - Look Score - Rare Candy - Evoluçao (Automatica e Por Stones) 90% Automatico e 10 % Stones - Fome e Sentimento - 1-2 Geraçao Full - 3-6 Geraçao Metade - Shinys (1-2 Geraçao Full) - Shinys (3-6 Geraçao Metade Adicionada )

Olá pessoas, to aqui para pedir uma ajuda PARA ADICIONAR ALGUMAS COISAS num script de summon por level, exemplo: Eu sou x level, uso o summon e sumono x monstro. Porém o script é muito simples; se o player não tem o level necessário não envia a msg avisando isso a ele, não tem exausted também. Como eu sou totalmente leigo vim pedir uma ajudinha de vocês. Segue o script:

Salve galera, recentemente (depois de ter parado 5 vezes) comecei a mexer com a base Pokémon Dash (Antiga) e me deparei com a spell e move healarea, o que esta acontecendo? Bom ela apenas esta healando o Pokémon, gostaria que ela desse heal igual na pxg que no caso é tanto no player quanto no pokemon. Versão: 0.3.6 TFS Código do move: elseif pokemon.x.spell == "Healarea" then doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER) doCreatureSay(cid, ""..getCreatureName(getCreatureSummons(cid)[1])..", "..c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell.."!", TALKTYPE_SAY) exhaustion.set(cid, pokemon.x.ex, pokemon.x.cd) setCombatParam(COMBAT_HEALING, COMBAT_PARAM_AGGRESSIVE, FALSE) doCreatureAddHealth(getCreatureSummons(cid)[1], ((num2)+((getPlayerLevel(cid))*(num3)))) doAreaCombatHealth(getCreatureSummons(cid)[1], COMBAT_HEALING, getThingPos(getCreatureSummons(cid)[1]), healarea, ((num1)+(getPlayerLevel(cid)*(num3))), ((num2)+(getPlayerLevel(cid)*(num3))), CONST_ME_MAGIC_BLUE) doSendAnimatedText(getThingPos(getCreatureSummons(cid)[1]), "+"..((num2)+((getPlayerLevel(cid))*(num3))).."", 71) addEvent(doSendAnimatedText(getThingPos(getCreatureSummons(cid)[1]), "+"..((num2)+((getPlayerLevel(cid))*(num3))).."", 71),1) return 0 Se alguém puder ajudar agradeço.

Alguem poderia me ajudar a solucionar meu problema ao compilar? make[1]: *** [luascript.o] Error 1 make[1]: Leaving directory `/home/PokemonCore/source' make: *** [all] Error 2

Bom já notei várias pessoas com problemas em relação á isso, por isso decidi compartlhar. MAS POR INDICAÇÃO NÂO USEM POKEMON DASH DERIVADO DO PDA, MESMO COM SOURCES SÃO VÁRIOS OUTROS PROBLEMAS QUE APARECERÃO, NENHUM É TOTALMENTE ESTÁVEL! O problema é quando o pokemon selvagem fica com o HP no vermelho ele começa á tomar menos HIT, e acaba demorando mais pra morrer oque é BEM chato. O problema é simples de resolver, vamos lá! Vá nas sources do servidor em game.cpp e procure esta linha std::min(target->getHealth(), damage); Apague-a ou comente-a caso não tenha certeza se irá utilizá-la. Exemplo de linha comentada //std::min(target->getHealth(), damage); Atenciosamente, Douglas!

Estou com um pequeno problema no servidor, o depot está acessível para qualquer um. Se um player guardar algo, outro player pode pegar esse item. ... E aparece umas mensagens na distro ao colocar e remover algo do depot. Print do erro.

Bom, não achei onde postar! Se estiver na área errada mova por favor! bom adaptei uma source para meu servidor... está tudo ok inicia normal, aparece que está online e etc... só que inicia com 1 único erro na distro [Error - CreatureEvent::configureEvent] No valid type for creature event.actionchannel perguntei à um amigo meu e ele disse que tem que adicionar uma função na source em creature event mas ele n tem tempo para adicionar para mim! alguém poderia me dar uma ajuda?

Nunca sei como começar um tópico fazendo pedido mas lá vai.. um script que faz effect ( pode ser o efeito "\1" ou CONST_ME_LOSEENERGY como preferirem chamar.. ) em cima de tal id. ou seja todos esses ids, que serao estatuas no mapa, ficariam aparecendo o effect... precisa ser por id...