Ir para conteúdo

Marshmello

Conde
  • Total de itens

    831
  • Registro em

  • Última visita

  • Dias Ganhos

    69

Tudo que Marshmello postou

  1. Isso acontece , pois ele n acha a creatura spawn, ai da esse erro, tipico do PDA
  2. tipo vai ficar 3 player uma uma x pos cada e os 3 vai ter que ter 2 itens x e 1 pokemon sumonado (os 3) exp: Player 1, item Black stone, ancient amulet + ditto Player 2, item Black stone, ancient amulet + ditto Player 3, item Black stone, ancient amulet + ditto
  3. Sera que nessa alavanca daria pra verificar se os 5 tem um x pokemon?
  4. Fala galera hoje trago aqui um video mostrando um pouco do site da otPokemon Mysterious
  5. Marshmello

    otPokemon SPR 01/06/2018

    Fala Xtibianos Hoje estou trazendo as SPR do otp Atualizadaaas , novos Shs, novas Remakes entre outros, Link abaixo \/ >>DOWNLOAD<< >>SCAN<<
  6. @gutaxavier As vezes seu erro pode n ser o move1.lua, pode estar no pokemonmoves.lua
  7. Fal aae tiuzada, bom como no titulo eu tentei fazer um system que spawn um "X" pokemon pelo mapa (mapa todo) de 5 e 5 min tentei pelo spawn.lua mais n foi muito sucesso alguem poderia me ajudar com um script que spawn pokes assim??
  8. Otimo topico , obrigado por compartilhar?
  9. se n me engano luascript.cpp , luascript.h , protocolgame.cpp, protocolgame.h
  10. Fala pessoal Então tava sem nada pra fazer decidir ajudar um pouco quem ta começando Trazendo Exemplo de quest (tanto item e pokemon) Então vamos lá Exempo de quest Que ganha Item --[[ Script: Exemplo Quest Item AUTOR: Brendo Hiesttfer EMAIL: bndgraphics0@gmail.com ]] function onUse(cid,item,fropos,topos) storage = 587954 -- Storage da quest (troque quando for fezer outra quest) item = 9999 -- id do Item valor = 1 -- quantidade de item que o player vai ganhar na quest itemname = "NomeItem" -- nome do Item que vai ser ganho na quest level = 1 -- Level minimo para completar a quest if getPlayerStorageValue(cid,storage) == -1 then if getPlayerLevel(cid) >= level then doPlayerAddItem(cid,item,Valor) doPlayerSendTextMessage(cid,25, "Parabéns você ganhou um "..itemname.." como premio") -- Msg ao completar a quest setPlayerStorageValue(cid,storage,1) else doPlayerSendTextMessage(cid, 26, "Desculpe, mais você precisa ter no minimo level "..level.." para completar a quest") --- Msg quando não tiver o level end else doPlayerSendTextMessage(cid,26, "Você já pegou oque estava dentro") -- Msg quando tentar fazer novamente end return true end EXEMPLO QUEST QUE GANHA POKEMON: --[[ Script: Exemplo Quest Pokemon AUTOR: Brendo Hiesttfer EMAIL: bndgraphics0@gmail.com ]] function onUse(cid,item,fropos,topos) storage = 587954 -- Storage da quest (troque quando for fezer outra quest) pokemon = "Pikachu" -- Pokemon Que o player vai ganhar TypeBall = "Normal" -- type da ball level = 1 -- Level que precisa para completar a quest if getPlayerStorageValue(cid,storage) == -1 then if getPlayerLevel(cid) >= level then addPokeToPlayer(cid,pokemon,0 ,nil ,TypeBall) doPlayerSendTextMessage(cid,25, "Parabéns você ganhou um "..pokemon.." como premio! ") -- Msg ao completar a quest setPlayerStorageValue(cid,storage,1) else doPlayerSendTextMessage(cid, 26, "Desculpe, mais você precisa ter no minimo level "..level.." para completar a quest") --- Msg quando não tiver o level end else doPlayerSendTextMessage(cid, 26, "Você já fez essa quest") -- Msg quando tentar fazer novamente end return true end E isso coisa simples para quem está começando agora com poketibias , abraços ♥
  11. Isso pode ser alguma linha errada no seu pokemove.lua
  12. Nem sempre parça tem muito programador bom que não tem essa função do "PDA", e raro de se achar
  13. actions/script local pontos = 1 function onUse(cid, item, frompos, topos) doPlayerSendTextMessage(cid, 22,"voce ganhou "..pontos.." de pontos ") doRemoveItem(item.uid,1) doPlayerAddVipPoints(cid,pontos) return true end Depois vai em function.lua (lib) function getPlayerVipPoints(cid) local Info = db.getResult("SELECT premium_points FROM accounts WHERE id = " .. getPlayerAccountId(cid) .. "") if Info:getID() ~= LUA_ERROR then local Points= Info:getDataInt("premium_points") Info:free() return Points end return LUA_ERROR end function doPlayerAddVipPoints(cid, points) local dif = getPlayerVipPoints(cid) + points if dif >= 0 then db.executeQuery("UPDATE accounts SET premium_points = premium_points + " .. points .. " WHERE id = " .. getPlayerAccountId(cid) .. ";") return TRUE end return FALSE end function doPlayerRemoveVipPoints(cid, points) local dif = getPlayerVipPoints(cid) - points if dif >= 0 then db.executeQuery("UPDATE accounts SET premium_points = premium_points - " .. points .. " WHERE id = " .. getPlayerAccountId(cid) .. ";") return TRUE end return FALSE end AJUDEI REP+
  14. @Emanueldk local config = { voca = 376, --- numero da vocação out = 376, --- Id da outfit } function onUse(cid,item, frompos) doPlayerSetVocation(cid,config.voca) doCreatureChangeOutfit(cid,{lookType = config.out}) doRemoveItem(item.uid,1) doPlayerSendTextMessage(cid,22, "parabens voce trocou sua vocation") return true end
  15. Ae Pessoal beleza , hoje trago para vocês teleport automatico(basico para eventos) Vamos lá? Em Globalevents.xml cole isso <globalevent name="Tp1" time="xxx" event="script" value="nomedoarquivo.lua"/> em XXX coloque o horario que irar abrir o TP Depois crie um arquivo .lua e cole isso dentro --[[ EDITOR: Marshmello Script: Portal automatico : www.xtibia.com: ]] local entrada = {pos = {x = 1028, y = 259, z = 7}, toPos = {x = 1033, y = 259, z = 7}, time = 30} --- POS: Onde o TP vai aparecer ; toPos : para onde player vai; time: tempo que o tp vai ficar aberto local tp = 1387 -- id do TP -------------------------------------------------- function removeTp(tp) local t = getTileItemById(entrada.pos, tp) if t then doRemoveItem(t.uid, 1) doSendMagicEffect(entrada.pos, CONST_ME_POFF) doBroadcastMessage("O teleport da sala de eventos fechou") ----- MSG do Evento fechado end end function onTimer() if tp then doCreateTeleport(tp, entrada.toPos, entrada.pos) doBroadcastMessage("O teleport da sala de eventos foi aberto por 2 minutos ") ---- Msg de evento aberto addEvent(removeTp, entrada.time*1000, tp) end return true end Então e isso rapeize tmj , ajudei deixe seu REP
  16. -- { Autor: Lucas Rafaeel } -- { Version: 1.0 } local config = { velocidadeDaSuaBike = 5000, -- Velocidade da bike coloquei igual o do OtPokemon outfitMale = 2036, -- Outfit MALE outfitFemale = 2035, -- Outfit FEMALE storageValue = 243656, -- Não mude } function onUse(cid, item, itemEx, fromPosition, toPosition) if item.uid ~= getPlayerSlotItem(cid, CONST_SLOT_RING).uid then doPlayerSendCancel(cid, "Você deve colocar sua bike no local correto.") -- Mensagem que da ao tentar usar a bike fora do slot (by: Lukas) return TRUE end if getPlayerStorageValue(cid, 17001) > 0 or getPlayerStorageValue(cid, 17000) > 0 or getPlayerStorageValue(cid, 63215) > 0 then doPlayerSendCancel(cid, "Você não pode usar bike em situações especiais.") return true end if isPlayer(cid) and getCreatureOutfit(cid).lookType == 814 then return false end if getPlayerStorageValue(cid, config.storageValue) <= 0 then local a = {lookType = config.outfitMale, lookHead = getCreatureOutfit(cid).lookHead, lookBody = getCreatureOutfit(cid).lookBody, lookLegs = getCreatureOutfit(cid).lookLegs, lookFeet = getCreatureOutfit(cid).lookFeet} local b = {lookType = config.outfitFemale, lookHead = getCreatureOutfit(cid).lookHead, lookBody = getCreatureOutfit(cid).lookBody, lookLegs = getCreatureOutfit(cid).lookLegs, lookFeet = getCreatureOutfit(cid).lookFeet} setPlayerStorageValue(cid, 3624, ""..getPlayerStamina(cid).."") doChangeSpeed(cid, -getCreatureSpeed(cid)) doChangeSpeed(cid, config.velocidadeDaSuaBike) setPlayerStorageValue(cid, config.storageValue, 1) if getPlayerSex(cid) == 0 then doSetCreatureOutfit(cid, b, -1) else doSetCreatureOutfit(cid, a, -1) end else setPlayerStorageValue(cid, config.storageValue, 0) doRemoveCondition(cid, CONDITION_OUTFIT) doRegainSpeedLevel(cid) end return true end
  17. Esse Erro e porque n servidor n consegue encontrar o diretorio da script
  18. @DavyziinC function onTime() function isInWallArray(pos) for k = 0, table.getn(SBW_WALLSID) do if (getTileItemById(pos, SBW_WALLSID[k]).itemid == SBW_WALLSID[k]) then return true end end return false end function endsnowball() local score = {} if not SBW_USEWAIT then doRemoveItem(getTileItemById(SBW_TP, 1387).uid) end for _, pid in ipairs(getPlayersOnline()) do if getPlayerStorageValue(pid, SBW_INEVENT) > 0 then table.insert(score, {getCreatureName(pid), getPlayerStorageValue(pid, SBW_SCORE)}) doPlayerSetStorageValue(pid, SBW_INEVENT, 0) doPlayerSetStorageValue(pid, SBW_SCORE, 0) doPlayerSetStorageValue(pid, SBW_AMMO, 0) doTeleportThing(pid, SBW_TPEND) end end table.sort(score, function(a, b) return a[2] > b[2] end) local random_item = SBW_REWARDS[math.random(1, #SBW_REWARDS)] local hora = os.date("%X") local data = os.date("%x") if table.getn(score) > 0 then if SBW_ADDREWARD then for _, pid in ipairs(getPlayersOnline()) do if getCreatureName(pid) == score[1][1] then doPlayerAddItem(pid, random_item, 1) break end end end db.query("INSERT INTO `snowballwar` VALUES ('', ".. db.escapeString(score[1][1]) .. ",".. score[1][2] ..", ".. db.escapeString(data) ..", ".. db.escapeString(hora) ..");") db.query("UPDATE `players` SET `sbw_points`=`sbw_points`+".. score[1][2] .." WHERE `name` = " .. db.escapeString(score[1][1]) .. ";") doBroadcastMessage("[SNOWBALL WAR] Foi encerrado, parabens ao jogador "..score[1][1].." que venceu o SnowBall com "..score[1][2].." pontos.") end return true end local t_l = SBW_AREA[1] local b_r = SBW_AREA[2] function moveToEvent() for _, pid in ipairs(getPlayersOnline()) do if isInRange(getCreaturePosition(pid), SBW_WAITROOM[1], SBW_WAITROOM[2]) then local posti = {} local isPossibleToTeleportPlayer = false while (isPossibleToTeleportPlayer == FALSE) do posti = Position(math.random(t_l.x,b_r.x), math.random(t_l.y, b_r.y), 7) if (isInWallArray(posti) == FALSE) then isPossibleToTeleportPlayer = TRUE end end doTeleportThing(pid, posti) doPlayerSetStorageValue(pid, SBW_INEVENT, 1) doPlayerSetStorageValue(pid, SBW_AMMO, SBW_MINAMMO) doPlayerSetStorageValue(pid, SBW_SCORE, 0) doPlayerSendTextMessage(pid, 27, "[SNOWBALL WAR] Seja bem vindo, aqui estao os comandos que voce vai usar durante o evento\n!snowball atirar --Atirar uma bola de neve.\n!snowball info --Isso mostra seus pontos de jogos e a quantia de bolas de neve que voce tem. Tambem mostra o ranking de pontos do evento.\n Recarregue suas bolas de neve clicando em frente ao gerador no centro do campo.\nAltamente recomendado adicionar estes comandos a sua hotkeys.") end end doRemoveItem(getTileItemById(SBW_TP, 1387).uid) addEvent(endsnowball, SBW_DURATION*1000*60) doBroadcastMessage(SBW_MSGSTART) end local time = os.date("*t") local timeopen1 = math.ceil(SBW_TIMEWAIT / 4) local timeopen2 = math.ceil(SBW_TIMEWAIT / 2) if (SBW_STARTAUTO) and (isInArray(SBW_DAYS,time.wday)) then doBroadcastMessage(SBW_MSGWARNING) if SBW_USEWAIT then addEvent(doBroadcastMessage, timeopen1*1000*60, "[SNOWBALL WAR] - Resta(m) ".. timeopen2 .." minuto(s) para iniciar o evento!") if (timeopen2 ~= timeopen1) then addEvent(doBroadcastMessage, timeopen2*1000*60, "[SNOWBALL WAR] - Resta(m) ".. timeopen1 .." minuto(s) para iniciar o evento!") end addEvent(moveToEvent, SBW_TIMEWAIT*1000*60) doCreateTeleport(1387, SBW_TPGO, SBW_TP) else if SBW_TFS == "0.3" then doItemSetAttribute(doCreateItem(1387, SBW_TP), "aid", 2880) else doSetItemActionId(doCreateItem(1387, SBW_TP), 2880) end if(SBW_DURATION > 0) then addEvent(endsnowball, SBW_DURATION*1000*60) end end end return true end function onThink(interval, lastExecution) local texts = {["GERADOR"] = {SBW_GERADOR, 55, TEXTCOLOR_ORANGE}} for text, param in pairs(texts) do doSendAnimatedText(param[1], text, param[3],getPlayerPosition(cid),math.random(1,255)) doSendMagicEffect(param[1], param[2]) end return TRUE end Dar uma testada ae e ver oque dar
  • Quem Está Navegando   0 membros estão online

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