Ir para conteúdo

ABCDEFGHIJK

Campones
  • Total de itens

    69
  • Registro em

  • Última visita

Tudo que ABCDEFGHIJK postou

  1. Sei sim mais teria que ver qual é o seu script pra arrumar perfeitamente... So postar ele aqui que poderei te ajudar.
  2. Cara cada slot tem seu numero entao voce teria que usar um getPlayerSlotItem(cid,8) pra cada slot: doItemSetAttribute(getPlayerSlotItem(cid,8).uid,"name", poke_name .." Pokeball") doItemSetAttribute(getPlayerSlotItem(cid,1).uid,"name", poke_name .." Pokeball") doItemSetAttribute(getPlayerSlotItem(cid,4).uid,"name", poke_name .." Pokeball") doItemSetAttribute(getPlayerSlotItem(cid,7).uid,"name", poke_name .." Pokeball") 1 = HEAD 2 = NECKLACE (COLAR) 3 = BACKPACK 4 = BODY (ARMOR) 5 = LEFT HAND (MÃO ESQUERDA) 6 = RIGHT HAND (MÃO DIREIRA) 7 = LEGS 8 = FEET (PÉ) 9 = RING (ANEL) 10 = AMMUNITION (AONDE POEM AS FLECHAS QUANDO ESTA USANDO ARCO) Esperto ter ajudado, yahooABC
  3. Para eu não criar outro topico eu vou aproveitar esse pra postar um erro que esta dando aqui também... Na hora da instalação da segunda etapa aparece isso: Parse error: syntax error, unexpected ';', expecting T_FUNCTION in C:\Xampp\xampp\htdocs\pot\OTS_DB_SQLite.php on line 68 Aguardo alguma ajuda Sem mais, YahooABC
  4. Cara, não entendi muito bem nao, mas pelo que seu sei (posso estar errado) pra você escolher o summon usando o getCreatureSummons(cid) é so usa assim: Primeiro summon: getCreatureSummons(cid)[1] Segundo Summon: getCreatureSummons(cid)[2] Terceiro Summon: getCreatureSummons(cid)[3] E assim por diante... Alguem me corrija se eu estiver errado. Mas tenta ae. Sem mais, YahooABC
  5. Eu pensei ter conseguido, fiz assim agora: int32_t LuaScriptInterface::luaDoCreatureCastSpell(lua_State* L) { //doCreatureCastSpell(uid, spell) std::string spell = popString(L); ScriptEnviroment* env = getEnv(); Creature* creature = env->getCreatureByUID(popNumber(L)); if(!creature) { errorEx(getError(LUA_ERROR_CREATURE_NOT_FOUND)); lua_pushboolean(L, false); return 1; } if(g_spells->getInstantSpellByName(spell)->castSpell(creature)) { lua_pushboolean(L, true); return 1; } lua_pushboolean(L, false); return 1; } Mais ai quando uso a função da Crash no servidor e ele é fechado.
  6. Você poderia tentar usar a função: doMoveCreature(cid, direction) So que eu acho que você teria que criar um sistema muito mais complexo usando como base esse função. Acho que so ela nao ira bastar, porque o summon é criado para seguir o player, e usando ela podera causar conflito então teria que inventar um sistema que consegui burlar isso somente na hora que você necessitar. Espero ter ajudado.
  7. Esta aparecendo esse erro: cannot convert `bool' to `ReturnValue' in assignment O erro ocorre na linha 2852, que é esta linha: ret = g_spells->getInstantSpellByName(spell)->castSpell(creature); Esta é a parte que a linha esta: ReturnValue ret = RET_NOERROR; ret = g_spells->getInstantSpellByName(spell)->castSpell(creature); if(ret == RET_NOERROR || (ret == RET_NEEDEXCHANGE && !g_config.getBool(ConfigManager::BUFFER_SPELL_FAILURE))) return true;
  8. Ola galera, eu fiz uma função na minha source chamada "doCreatureCastSpell(uid, spell)" so que ta dando um erro: In static member function `static int32_t LuaScriptInterface::luaDoCreatureCastSpell(lua_State*)': expected primary-expression before ',' token E esta dando erro nesse parte: ret = g_spells->getInstantSpellByName(spell)->castSpell(Creature, spell); Esse é o Codigo da função: int32_t LuaScriptInterface::luaDoCreatureCastSpell(lua_State* L) { //doCreatureCastSpell(uid, spell) std::string spell = popString(L); ScriptEnviroment* env = getEnv(); Creature* creature = env->getCreatureByUID(popNumber(L)); if(!creature) { errorEx(getError(LUA_ERROR_CREATURE_NOT_FOUND)); lua_pushboolean(L, false); return 1; } ReturnValue ret = RET_NOERROR; ret = g_spells->getInstantSpellByName(spell)->castSpell(Creature, spell); if(ret == RET_NOERROR || (ret == RET_NEEDEXCHANGE && !g_config.getBool(ConfigManager::BUFFER_SPELL_FAILURE))) return true; lua_pushboolean(L, true); return 1; } Alguem ai poderia me dizer como arrumar esse erro? Aguardando resposta
  9. Se você fizer um sistema de m1,m2,m3... posta pra galera ai...
  10. Ja to Upando a versão 4.0 com o Script da Pokedex e o Portrait arrumado (acabei de arruma) Daqui a poco edito e posto o link aqui pra voces -----EDIT------ Como prometido ta ai o link do server: http://www.mediafire.com/?aimbxtbcy1mkcmd
  11. Galera desculpa... Nao vi a Versao 3.5 e esse problema do Portrait ai é facil de resolver la nos nomes dos pokemon no script. Os nomes la estao todos em letra maiuscula e so colocar os nomes em letra minuscula.
  12. Ta ai galera o Server... Agora com Pokedex e Portrait pra vocês: http://www.mediafire.com/?t2u15jp12s1hk5h Vo dar uma saida mais quando voltar respondo duvida de voces... Ajudei?? REP +
  13. Upa esse pack é no mediafire ou no 4shared que fica mais facil pra min baixa
  14. Eu ja terminei o Portrait também so estou terminando de colocar ele e a Pokedex no server e vou upar o server aqui pra vocês
  15. Galera vo fazer assim, vo colocar o Pokedex System e o Portrait(Portfoils) System no Server v 3.0 e vo upa o server pra vocês. BeLeza?
  16. Galera o Reizan ta terminando a Pokedex aqui, e eu to terminando o Portrait(Portifoil)
  17. Galera pro pokemon seguir o Mestre, tipo quando sobe escada ele aparece junto com o dono dele?? Se for isso é so ir la no config.lua e procurar essa parte: -- Summons maxPlayerSummons = 2 teleportAllSummons = false teleportPlayerSummons = false E configurar igual esse aqui: -- Summons maxPlayerSummons = 1 teleportAllSummons = true teleportPlayerSummons = true Ai quando o pokemon ficar muito distante do player ele vai ser teleportado pra perto do player. E quando o player subir uma escada o poke também vai ser teleportado pra perto do player. Espero ter ajudado.
  18. Testei nas verções TFS 0.3.6 PL1 e [8.60] Alissow Ots 4.11, e nos dois funcionou perfeitamente sem dar nenhum erro... Então acho que vocês estao colocando algo errado, sigam as instrução do MatheusMkalo corretamente que da tudo certo.
  19. Galera... Eu não sei porque no de vocês esta dando erro, vocês estao pondo algo errado ai, porque eu ja testei todos os scripts, ja adicionei varios baseados no do MatheusMkalo, e nada deu erro, todos funcionam perfeitamente. Então vocês estão colocando algo errado...
  20. Descrição: "Quando você equipar este anel, seu personagem vai se tornar super poderoso e sua aparência vai mudar!" Como isso funciona? Literalmente, um pouco como quando "Sonic" vai para "Super Forma" em "Sonic Adventure 2 (Dreamcast) * Primeiro você precisa ter moedas de ouro suficiente para desencadear a transformação (padrão: 100) * Se você tem o suficiente, as habilidades de seu personagem irá aumentar em 120 cada (incluindo pesca), mana e hitpoints max max vai aumentar em 80% * A cada segundo que você está transformado você irá perder uma moeda de ouro (Sonic perde um anel) "Em outras palavras: Ele transforma suas moedas em poder!" E tem uma seção de configuração para que você possa modificá-lo. Crie um script na pasta movements\scripts chamado "chaosbangle.lua" e coloque isso dentro: -- >> Config -- local outfit = { -- Girls { lookType = 12, lookHead = 19, lookBody = 53, lookLegs = 92, lookFeet = 79, lookAddons = 0 }, -- Boys { lookType = 12, lookHead = 19, lookBody = 79, lookLegs = 3, lookFeet = 81, lookAddons = 0 } } local coinID = ITEM_GOLD_COIN local wastingInterval = 1000 local wastingQuantity = 1 local triggerQuantity = 100 local warnOnLowSupply = TRUE local lowSupplyMargin = 200 local storage = 50780 -- Config << -- local condition1 = createConditionObject(CONDITION_ATTRIBUTES) setConditionParam(condition1, CONDITION_PARAM_TICKS, -1) setConditionParam(condition1, CONDITION_PARAM_SKILL_FIST, 120) setConditionParam(condition1, CONDITION_PARAM_SKILL_FISHING, 120) setConditionParam(condition1, CONDITION_PARAM_SKILL_CLUB, 120) setConditionParam(condition1, CONDITION_PARAM_SKILL_SWORD, 120) setConditionParam(condition1, CONDITION_PARAM_SKILL_AXE, 120) setConditionParam(condition1, CONDITION_PARAM_SKILL_DISTANCE, 120) setConditionParam(condition1, CONDITION_PARAM_SKILL_SHIELD, 120) setConditionParam(condition1, CONDITION_PARAM_SKILL_FISHING, 120) setConditionParam(condition1, CONDITION_PARAM_STAT_MAGICPOINTS, 120) setConditionParam(condition1, CONDITION_PARAM_STAT_MAXHITPOINTSPERCENT, 180) setConditionParam(condition1, CONDITION_PARAM_STAT_MAXMANAPOINTSPERCENT, 180) local condition2 = createConditionObject(CONDITION_HASTE) setConditionParam(condition2, CONDITION_PARAM_TICKS, -1) setConditionFormula(condition2, 2.5, 0, 3.0, 0) local area = createCombatArea({ {0, 0, 0, 1, 0, 0, 0}, {0, 1, 0, 0, 0, 1, 0}, {0, 0, 0, 0, 0, 0, 0}, {1, 0, 0, 2, 0, 0, 1}, {0, 0, 0, 0, 0, 0, 0}, {0, 1, 0, 0, 0, 1, 0}, {0, 0, 0, 1, 0, 0, 0} }) local animCombat = { createCombatObject(), createCombatObject() } local sexyEffect = { CONST_ME_FIREWORK_RED, CONST_ME_FIREWORK_YELLOW, CONST_ME_MAGIC_RED, CONST_ME_MAGIC_GREEN } setCombatParam(animCombat[2], COMBAT_PARAM_EFFECT, CONST_ME_HOLYAREA) setCombatParam(animCombat[2], COMBAT_PARAM_DISTANCEEFFECT, CONST_ANI_SMALLHOLY) setCombatParam(animCombat[1], COMBAT_PARAM_EFFECT, CONST_ME_FIREWORK_RED) setCombatParam(animCombat[1], COMBAT_PARAM_DISTANCEEFFECT, CONST_ANI_FIRE) setCombatArea(animCombat[2], area) setCombatArea(animCombat[1], area) local function StopSuperForm(cid) if (getPlayerStorageValue(cid, storage) == 1) then setPlayerStorageValue(cid, storage, 0) doRemoveCondition(cid, CONDITION_OUTFIT) doRemoveCondition(cid, CONDITION_ATTRIBUTES) doRemoveCondition(cid, CONDITION_HASTE) end return TRUE end local function SuperForm(cid, sexIndex) if (isCreature(cid)) then if (getPlayerStorageValue(cid, storage) == 1) then local goldLeft = getPlayerItemCount(cid, coinID) if (goldLeft >= wastingQuantity) then local position = getCreaturePosition(cid) doPlayerRemoveItem(cid, coinID, wastingQuantity) doSendMagicEffect(position, sexyEffect[sexIndex + 2]) doSendMagicEffect(position, sexyEffect[sexIndex]) if (goldLeft <= lowSupplyMargin and warnOnLowSupply == TRUE) then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_RED, "Coins left: " ..(goldLeft - wastingQuantity) .. "!") end addEvent(SuperForm, wastingInterval, cid, sexIndex) else doPlayerSendTextMessage(cid, MESSAGE_EVENT_DEFAULT, "Your bangle has been destroyed!") doPlayerRemoveItem(cid, 2127, 1) return StopSuperForm(cid) end end end end function onEquip(cid, item, slot) if (getPlayerItemCount(cid, coinID) > triggerQuantity and getPlayerStorageValue(cid, storage) ~= 1) then local sexIndex = getPlayerSex(cid) + 1 doCombat(cid, animCombat[sexIndex], numberToVariant(cid)) doSetCreatureOutfit(cid, outfit[sexIndex], -1) setPlayerStorageValue(cid, storage, 1) doAddCondition(cid, condition1) doAddCondition(cid, condition2) doCreatureAddHealth(cid, getCreatureMaxHealth(cid) - getCreatureHealth(cid)) doPlayerAddMana(cid, getPlayerMaxMana(cid) - getPlayerMana(cid)) doPlayerRemoveItem(cid, coinID, triggerQuantity) SuperForm(cid, sexIndex) elseif (getPlayerStorageValue(cid, storage) == 1) then doPlayerSendTextMessage(cid, MESSAGE_EVENT_DEFAULT, "You cannot equip this now!") else doPlayerSendTextMessage(cid, MESSAGE_EVENT_DEFAULT, "You do not have enough coins!") end return TRUE end function onDeEquip(cid, item, slot) return StopSuperForm(cid) end Agora coloque isso no movements.xml: <movevent type="Equip" itemid="2127" slot="ring" event="script" value="chaosbangle.lua"/> <movevent type="DeEquip" itemid="2127" slot="ring" event="script" value="chaosbangle.lua"/> Meninas: Animação Fire ( Burning Blaze ) Antes: Depois: Meninos: Animação da Energia ( Super Sonic ) Antes: Depois: Creditos: Admin Jontz (de outro forum) Eu somente traduzi e trouxe pra cá.
  21. Engraçado porque eu também peguei esse script aqui pra min la na otfans e coloquei inteiro em MODS como estava la, e funciona normal aqui. Talvez você pode nao ter instalado ele corretamente.
  22. troque a sua "flylib" por essa aqui que da certo CONST_FLYVOID = 460 CONT_FLYOUTFIT = 239 IGNORED = {6495,7096,7099,5167,5162,5163,405,7100, 5315,5521,5316,5193,5192,5191,945,5048,923,950,951, 952,953,3623,954,955,949,9101,3352,9106,9103,1524, 1111,437,433,443,434,442,436,445,941,444,435,943, 1027,925,930,926,928,922,921,1112,406,904,931,934, 932,933,5319} --- Config here up = {} down = {} fly = {} fly.win = function(cid)-- Script by mock setPlayerStorageValue(cid, 102015,1) doPlayerSendTextMessage(cid,27,'Now you can fly.') end fly.add = function(cid)-- Script by mock if getPlayerStorageValue(cid, 102015) == -1 or getPlayerStorageValue(cid,13241) == 1 then return false end if getPlayerStorageValue(cid, 102059) <= 0 then local outfit = getCreatureOutfit(cid) outfit.lookType = CONT_FLYOUTFIT doSetCreatureOutfit(cid, outfit, -1) setPlayerStorageValue(cid, 102059,1) doChangeSpeed(cid, 390) doPlayerSendTextMessage(cid,27,'Fale \'up\' e \'down\'.' ) return true else doPlayerSendTextMessage(cid,27, "Você ja esta voando.") return false end end function doSetItemActionId(uid,aid) doItemSetAttribute(uid,'aid',aid) end function hasSqm(pos)-- by Mock return getTileThingByPos({x=pos.x,y=pos.y,z=pos.z,stackpos=0}).itemid ~= 0 end function isWalkable(pos, creature, proj, pz)-- by Nord if getTileThingByPos({x = pos.x, y = pos.y, z = pos.z, stackpos = 0}).itemid == 0 then return false end if getTopCreature(pos).uid > 0 and creature then return false end if getTileInfo(pos).protection and pz then return false, true end local n = not proj and 3 or 2 for i = 0, 255 do pos.stackpos = i local tile = getTileThingByPos(pos) if tile.itemid ~= 0 and not isCreature(tile.uid) then if hasProperty(tile.uid, n) or hasProperty(tile.uid, 7) then return false end end end return true end fly.using=function(cid)-- Script by mock return getPlayerStorageValue(cid, 102059) > 0 end fly.logout = function(cid)-- Script by mock if fly.using(cid) then local p = getCreaturePosition(cid) setPlayerStorageValue(cid, 102010,1) setPlayerStorageValue(cid, 102011,p.x) setPlayerStorageValue(cid, 102012,p.y) setPlayerStorageValue(cid, 102013,p.z) deletarEmVolta(p) fly.del(cid) end return true end fly.login = function(cid)-- Script by mock if getPlayerStorageValue(cid, 102010) ~= -1 then setPlayerStorageValue(cid, 102010,-1) local p = {} p.x = getPlayerStorageValue(cid, 102011) p.y = getPlayerStorageValue(cid, 102012) p.z = getPlayerStorageValue(cid, 102013) if not checkAround(p) then fly.add(cid) down.gerarEmVolta(p) doTeleportThing(cid,p) end end return true end fly.die = function(cid)-- Script by mock if fly.using(cid) then local p = getCreaturePosition(cid) setPlayerStorageValue(cid, 102011,-1) setPlayerStorageValue(cid, 102012,-1) setPlayerStorageValue(cid, 102013,-1) deletarEmVolta(p) fly.del(cid) end return true end fly.del = function(cid)-- Script by mock if getPlayerStorageValue(cid, 102059) > 0 then if getSqmId(getCreaturePosition(cid)).itemid == CONST_FLYVOID then return false end doRemoveCondition(cid, CONDITION_OUTFIT) setPlayerStorageValue(cid, 102059,-1) doChangeSpeed(cid, -390) return true end end function hasSqm2(pos)-- Script by mock local f = getTileThingByPos(pos) if f.itemid ~= 0 and f.itemid ~= 1 and (not isWalkable(pos) and not isInArray(IGNORED,f.itemid)) then return true end return false end function hasSqm3(pos)-- Script by mock local f = getTileThingByPos(pos) if f.itemid ~= 0 and f.itemid ~= 1 and f.itemid ~= CONST_FLYVOID and not isInArray(IGNORED,f.itemid) then return true end return false end function deletar(pos)-- Script by mock if hasSqm(pos) then local sqm = getSqmId(pos) if sqm.itemid == CONST_FLYVOID then doRemoveItem(sqm.uid,1) end end end function deletarEmVolta(pos) for x=-1,1 do for y=-1,1 do deletar({x=pos.x+x,y=pos.y+y,z=pos.z}) end end end function checkAround(pos)-- Script by mock for x=-1,1 do for y=-1,1 do if hasSqm2({x=pos.x+x,y=pos.y+y,z=pos.z}) then return true end end end return false end function fly.checkAround(pos)-- Script by mock local n = 0 for x=-1,1 do for y=-1,1 do local g = getTileThingByPos({x=pos.x+x,y=pos.y+y,z=pos.z}) if g.itemid == CONST_FLYVOID then n = n+1 end if isCreature(getTopCreature({x=pos.x+x,y=pos.y+y,z=pos.z}).uid) then return false end end end if n == 9 then return true end return false end function up.checkAround(pos)-- Script by mock for x=-1,1 do for y=-1,1 do local g = getTileThingByPos({x=pos.x+x,y=pos.y+y,z=pos.z}) if hasSqm3({x=pos.x+x,y=pos.y+y,z=pos.z}) or g.itemid == CONST_FLYVOID then return true end end end return false end function down.checkAround(pos,f)-- Script by mock for x=-1,1 do for y=-1,1 do local g = getTileThingByPos({x=pos.x+x,y=pos.y+y,z=pos.z}) if (not f and hasSqm2({x=pos.x+x,y=pos.y+y,z=pos.z})) or g.itemid == CONST_FLYVOID then return true end end end return false end function gerarEmVolta(pos)-- Script by mock local n = 30000 for x=-1,1 do for y=-1,1 do n =n+1 doItem({x=pos.x+x,y=pos.y+y,z=pos.z},n) end end end function doItem(pos,a,d)-- Script by mock if not hasSqm2(pos) then doCreateTile(CONST_FLYVOID,pos) pos.stackpos = 0 local c = getTileThingByPos(pos) doSetItemActionId(c.uid, a) end end function getSqmId(pos,t)-- Script by mock if hasSqm(pos) or t then pos.stackpos = 0 local i = getTileThingByPos(pos) return i end return nil end function down.doItem(pos,a)-- Script by mock if not hasSqm(pos) then doCreateTile(CONST_FLYVOID,pos) pos.stackpos = 0 local c = getTileThingByPos(pos) doSetItemActionId(c.uid, a) end end function down.gerarEmVolta(pos)-- Script by mock local n = 30000 for x=-1,1 do for y=-1,1 do n =n+1 down.doItem({x=pos.x+x,y=pos.y+y,z=pos.z},n) end end end function doCreateTile(id,pos) -- Script by mock doAreaCombatHealth(0,0,pos,0,0,0,255) doCreateItem(id,1,pos) end Espero ter Ajudado
  23. ninguem pode me ajudar?
  24. No Meu server nao deu certo, é o TFS 0.3.6 PL 1 Ele não tem o logout.lua e nem o script de morrer (creaturescript) e quando eu falo !fly so aparece "You cannot fly." Alguem poderia me ajudar?
  • Quem Está Navegando   0 membros estão online

    • Nenhum usuário registrado visualizando esta página.
×
×
  • Criar Novo...