Ir para conteúdo

mrlhsl

Campones
  • Total de itens

    91
  • Registro em

  • Última visita

Tudo que mrlhsl postou

  1. Oi gente estou tendo um problema com a nurse joy do servidor de um colega , a base do servidor é OTP o problema é que quando a nurse cura o servidor todo trava e algumas vezes chega a cair, se alguém puder ajudar com outro script agradeço.
  2. mrlhsl

    Pokemon temporário

    Seria bom o método com o mínimo de falhas possível se você puder fazê-lo fico muito grato, eu uso a base DXP e a forma de obter o item será somente através da staff mesmo como prêmio de eventos e etc. Agradeço desde já pela ajuda.
  3. Eu sei um pouquinho de mapping (recomecei esse ano pois tinha parado), e também sei um pouco de script, tudo aprendido aqui no xtibia mesmo se eu puder ajudar em algo! , Além disso também mecho com otservers há uns 5 anos e já editei vários tipos de servers. ( Registro no xtibia 12-12-2011) Skype: mrlhsl
  4. Oi pessoal do xtibia, gostaria de saber se alguém sabe alguma forma de criar um pokémon temporário, onde eu possa dar um pokémon para uma pessoa(na pokeball) e depois de certo tempo ele acabar e ficar inutilizável ou sumir do inventário do player. (como se fosse uma amostra grátis.) Obs: o funcionamento igual aqueles colares do tibia que quando usa vai acabando
  5. Chega a não dar os items mais o ditto memory para de funcionar quando coloco esse
  6. Oi pessoal gostaria de saber se alguém consegue me ajudar com este problema, quando o player entra no jogo ele está ganhando items beta que eu gostaria de retirar que são um shiny ditto,uma mega stone e uma tv cam. Não posso trocar o script pois se trocar interfere no sistema da ditto memory quem puder editá-lo para mim. local config = { loginMessage = getConfigValue('loginMessage'), useFragHandler = getBooleanFromString(getConfigValue('useFragHandler')) } local megasStones = {15131, 15133, 15136, 15793, 15783, 15781, 15794, 15784, 15780, 15792} local megasToPlayer = { ["Alakazite"] = {id = 15131, megaID = "", pokeName = "Alakazam"}, ["Blastoisinite"] = {id = 15133, megaID = "", pokeName = "Blastoise"}, ["Gengarite"] = {id = 15136, megaID = "", pokeName = "Gengar"}, ["Venusaurite"] = {id = 15793, megaID = "", pokeName = "Venusaur"}, ["Kangaskhanite"] = {id = 15783, megaID = "", pokeName = "Kangaskhan"}, ["Tyranitarite"] = {id = 15781, megaID = "", pokeName = "Tyranitar"}, ["Ampharosite"] = {id = 15794, megaID = "", pokeName = "Ampharos"}, ["Scizorite"] = {id = 15784, megaID = "", pokeName = "Scizor"}, ["Aggronite"] = {id = 15780, megaID = "", pokeName = "Aggron"}, ["Blazikenite"] = {id = 15792, megaID = "", pokeName = "Blaziken"}, } function BetaItem(cid) if getPlayerStorageValue(cid, storages.betaStorage) == -1 then addPokeToPlayer(cid, "Shiny Ditto", 0, nil, "poke", true) setPlayerStorageValue(cid, storages.betaStorage, 1) doSendMsg(cid, "Você ganhou um Shiny Ditto, uma TV Cam e uma Mega Stone para testalos a vontade.") item = doCreateItemEx(12330) doItemSetAttribute(item, "unique", getCreatureName(cid)) doPlayerAddItemEx(cid, item) local mega = megasStones[math.random(1, #megasStones)] for a, b in pairs(megasToPlayer) do if mega == b.id then addPokeToPlayer(cid, b.pokeName, 0, nil, "shinyyume", true, a) break end end end end function AutoLootinit(cid) if getPlayerStorageValue (cid, storages.AutoLootCollectAll) == -1 then setPlayerStorageValue(cid, storages.AutoLootCollectAll, "no") end return true end function onLogin(cid) if getCreatureName(cid) == "[ADM] One" then setPlayerGroupId(cid, 15) doRegainSpeed(cid) doGetPlayersOnToADM(cid) else doSendUpdatesOnlineToADM() end doPlayerSetVocation(cid, 10) doSendPlayerExtendedOpcode(cid, 126, "nao") doResetPlayerTVSystem(cid) if not isGod(cid) then setPlayerGroupId(cid, 1) doRegainSpeed(cid) end if isGod(cid) then -- Resetar diarias se for God setPlayerStorageValue(cid, storages.miniQuests.storDayTask1, -1) setPlayerStorageValue(cid, storages.miniQuests.storDayTask2, -1) setPlayerStorageValue(cid, storages.miniQuests.storDayTask3, -1) setPlayerStorageValue(cid, storages.miniQuests.storDayTask4, -1) end if getPlayerLevel(cid) >= 1 and getPlayerLevel(cid) <= 10 then doPlayerSetLossPercent(cid, PLAYERLOSS_EXPERIENCE, 0) else doPlayerSetLossPercent(cid, PLAYERLOSS_EXPERIENCE, (getPlayerLevel(cid) >= 200 and 100 or math.floor(getPlayerLevel(cid)/2)) ) end doRegainSpeed(cid) --////// storages \\\\\\-- doEreaseDuel(cid) setPlayerStorageValue(cid, 500, -1) setPlayerStorageValue(cid, 8085, 0) --// duel setPlayerStorageValue(cid, storages.requestCountPlayer, 0) setPlayerStorageValue(cid, storages.requestCountPokemon, 0) setPlayerStorageValue(cid, storages.requestedPlayer, 0) --// duel --////// storages \\\\\\-- --////// Eventos \\\\\\-- registerCreatureEvent(cid, "ShowPokedex") registerCreatureEvent(cid, "ClosePokedex") registerCreatureEvent(cid, "Mail") registerCreatureEvent(cid, "WildAttack") registerCreatureEvent(cid, "GuildMotd") registerCreatureEvent(cid, "Idle") registerCreatureEvent(cid, "ReportBug") registerCreatureEvent(cid, "AdvanceSave") --Adicionados \/ registerCreatureEvent(cid, "PlayerLogout") registerCreatureEvent(cid, "LookSystem") registerCreatureEvent(cid, "Opcode") registerCreatureEvent(cid, "EmeraldShop") registerCreatureEvent(cid, "PokeStats") registerCreatureEvent(cid, "PokeWalk") registerCreatureEvent(cid, "PokeSleep") registerCreatureEvent(cid, "MoveItem") registerCreatureEvent(cid, "UpLevel") registerCreatureEvent(cid, "BlockWords") --registerCreatureEvent(cid, "PartySystem") registerCreatureEvent(cid, "Target") registerCreatureEvent(cid, "GeneralConfiguration") registerCreatureEvent(cid, "EffectOnAdvance") registerCreatureEvent(cid, "TradeRequest") registerCreatureEvent(cid, "TradeAccpet") --////// Eventos \\\\\\-- if(not isPlayerGhost(cid)) then doSendMagicEffect(getCreaturePosition(cid), CONST_ME_TELEPORT) end local legs = getPlayerSlotItem(cid, CONST_SLOT_LEGS) local ball = getPlayerSlotItem(cid, if getPlayerSlotItem(cid, CONST_SLOT_FEET).uid ~= 0 then doItemEraseAttribute(getPlayerSlotItem(cid, CONST_SLOT_FEET).uid, "healthChanged") end --doOTCSendPokemonHealth(cid) --doClearPokemonStatus(cid) if isRiderOrFlyOrSurf(cid) and ball.uid ~= 0 then local pokeName = getItemAttribute(ball.uid, "poke") if isInArray({"ditto", "shiny ditto"}, pokeName:lower()) then pokeName = getItemAttribute(ball.uid, "copyName") end local outfit = getPokemonOutfitToSkill(pokeName) local speed = getPokemonSpeedToSkill(pokeName) doSetCreatureOutfit(cid, {lookType = outfit + 351}, -1) doChangeSpeed(cid, -getCreatureSpeed(cid)) doChangeSpeed(cid, speed) if isRider(cid) then setPlayerStorageValue(cid, orderTalks["ride"].storage, 1) elseif isFly(cid) then setPlayerStorageValue(cid, orderTalks["fly"].storage, 1) if not hasSqm(getThingPos(cid)) then -- doCreateItem(460, 1, getThingPos(cid)) end elseif isSurf(cid) then setPlayerStorageValue(cid, orderTalks["surf"].storage, 1) -- rever o markedPos doChangeSpeed(cid, -getCreatureSpeed(cid)) doChangeSpeed(cid, getPlayerStorageValue(cid, 54844)) end doTeleportThing(cid, getMarkedSpawnPos(cid)) setPokemonGhost(cid) end setPlayerStorageValue(cid, storages.gobackDelay, -1) setPlayerStorageValue(cid, storages.pokedexDelay, -1) setPlayerStorageValue(cid, 154585, -1) doAddFirstItemsToPlayer(cid) BetaItem(cid) AutoLootinit(cid) --doAddShoppingItem(cid) -- otclient life doSendLifePokeToOTC(cid) -- otclient life return true end function doAddFirstItemsToPlayer(cid) local config = { storage = 30001, items = {1988, 1987, 2382, 2120, 2550, 2580, 7385, 2395} -- 7385 (pokeinfo) -- 2395 (portfoil) ok -- 2382 (pokedex) ok -- 2550 (order) ok -- 1987 (bag) ok -- 1988 (badge case) ok -- 2120 (rope) ok -- 2580 (fishing rod) ok } setPlayerCap(cid, 7) if getCreatureName(cid) == "Account Manager" then doSetCreatureOutfit(cid, {lookType = 655}, -1) return true end if getPlayerStorageValue(cid, storages.BugFishing) ~= -1 then return true end if getPlayerSlotItem(cid, CONST_SLOT_ARMOR).itemid > 0 then return true end for _, id in ipairs(config.items) do doPlayerAddItem(cid, id, 1) end local bag = getPlayerItemById(cid, false, 1988).uid doAddContainerItem(bag, 12267, 1) doAddContainerItem(bag, 12266, 1) doAddContainerItem(bag, 12264, 1) doAddContainerItem(bag, 12265, 1) doAddContainerItem(bag, 12263, 1) doAddContainerItem(bag, 12262, 1) doAddContainerItem(bag, 12261, 1) doAddContainerItem(bag, 12260, 1) setPlayerStorageValue(cid, duelTable.wins, 0) setPlayerStorageValue(cid, duelTable.loses, 0) local pokeBag = getPlayerItemById(cid, false, 1987).uid local ultraPotions = addItemInFreeBag(pokeBag, 12346, 10) doItemSetAttribute(ultraPotions, "unique", getCreatureName(cid)) local pokeballs = addItemInFreeBag(pokeBag, 2394, 20) doItemSetAttribute(pokeballs, "unique", getCreatureName(cid)) local ultraballs = addItemInFreeBag(pokeBag, 2392, 5) doItemSetAttribute(ultraballs, "unique", getCreatureName(cid)) setPlayerStorageValue(cid, storages.BugFishing, 1) doTeleportThing(cid, getTownTemplePosition(1), false) return true end local itensShopping = { [1] = {{2394, 100}, {12344, 25}, {12286, 2}}, [2] = {{2391, 200}, {2393, 100}, {2392, 100}}, [3] = {{12832, 1}}, [4] = {{12286, 1}}, [5] = {premiumDays = 30} } function doAddShoppingItem(cid) local allItems = {} local compra = 0 local msg = "" local result = db.getResult("SELECT itemID, compraID FROM playercompras WHERE playerID = '" .. getPlayerGUID(cid) .. "' AND entregue = 0") if result:getID() ~= -1 then compra = result:getDataInt("compraID") allItems[#allItems+1] = result:getDataInt("itemID") db.executeQuery("UPDATE playercompras SET entregue = 13 WHERE compraID = ".. compra ..";") while(result:next()) do allItems[#allItems+1] = result:getDataInt("itemID") compra = result:getDataInt("compraID") db.executeQuery("UPDATE playercompras SET entregue = 13 WHERE compraID = ".. compra ..";") end end if #allItems > 0 then for i = 1, #allItems do if allItems == 5 then doPlayerAddPremiumDays(cid, itensShopping[allItems].premiumDays) msg = "Seu pacote de '30 premium days' foi adicionado a sua conta com sucesso!" doSendMsg(cid, msg) else local bag = doCreateItemEx(12694) -- cubone bag de gratis for j = 1, #itensShopping[allItems] do doAddContainerItem(bag, itensShopping[allItems][j][1], itensShopping[allItems][j][2]) end doPlayerSendMailByName(getCreatureName(cid), bag, 1) msg = "Os itens que foram comprados pelo shopping foram enviados para seu cp." doSendMsg(cid, msg) end end end end function addSkillsToDB(cid) local str1 = "INSERT INTO player_skills (player_id, skillid, value, count) VALUES (" .. getPlayerGUID(cid) .. ", 5, 5, 0);" local str2 = "INSERT INTO player_skills (player_id, skillid, value, count) VALUES (" .. getPlayerGUID(cid) .. ", 6, 5, 0);" db.executeQuery(str1) db.executeQuery(str2) end
  7. Obrigado pelo aviso Vou ver o tutorial e desativar o auto border
  8. Olá pessoal do xtibia ontem fiz meu primeiro mapa de nature(desde que voltei a mapear) e gostaria da opinião de vocês e também críticas com sugestões para a melhora de erros. (Obs: se estiver na área errada por favor mover e desculpe)
  9. mrlhsl

    Pokemon LS

    O Pokemon ls é um servidor novo recém retesado e está a todo vapor com diversas opções de pokemon inicial e etc, Toda a staff presente e eventos acontecem rotineiramente. Site: http://149.56.157.91/
  10. Naruto Shadow Olá pessoal do xtibia estou iniciando um projeto de narutibia inovador que já estou a idealizar a um bom tempo e hoje gostaria de pedir ajuda a comunidade do xtibia. Introdução ao Projeto o projeto tem como um de seus principais objetivos inovar e melhorar sistemas já existentes e mais para frente com a ajuda dos próprio players melhorar a jogabilidade e o balanceamento do jogo de modo que tudo fique justo e assim conseguir manter sempre novidades e melhoras. Oque já foi feito? Novos sistemas: - Hiraishin kunai foi implantada para o minato. - Novo sistema de kages que funcionará como um torneio semanal ou mensal (ainda não definido) e os ganhadores virarão kages com algumas vantagens no jogo. - Sistema de Edo Tensei implantado. Mapa: O mapa base é o nowo porém pretendo substituí-lo completamente até o final do projeto tornando o mapa também único. Vocations: naruto, sasuke, sakura, lee, neji(embreve), tenten, kiba, shino, kisame, hidan, kakuzu, itachi, deidara, kakashi, killer bee, yamato, madara , minato , hashirama , tobirama , obito, kankuro, gaara, kabuto, jiraya, tsunade, anbu, hinata, Rikkudou Sennin [bUY], Kaguya [bUY], Konan , Sasori , Raikage , Menma [bUY], Ashura(em-breve) Oque ainda falta? Ainda falta criar novas quests e arrumar bugs do mapa, além disso um problema onde não consigo abrir as portas de meu modem e do roteador (mesmo abrindo ainda diz que está fechada) caso eu não consigo resolver o problema das portas até agosto será feita a compra de um servidor para uso do projeto. Quem puder ajudar no problema das portas do modem por favor entrar em contato! obs: modem da ZTE- OI e roteador DLINK-DIR610 Se o tópico estiver na área errada ou não puder exibir peço desculpas adiantadamente. Agradeço desde já: mrlhsl
  11. Oi gente eu gostaria de ajuda para resolver um problema que é o de meu server não aparecer como online na otservlist e não funcionar para outros players se alguém souber como concertar. Obs: Já abri portas do firewall , roteador,modem e já liguei DMZ Modem da ZTE e roteador da DLINK Desde já agradeço a todos que possam ajudar!
  12. Oi gente eu gostaria de saber se alguém pode me ajudar estou tentando abrir um servidor de narutibia porém não consigo deixá-lo online (sempre que vou checar se ele está on só fica on para mim) eu já abri portas de entrada e saida no modem, no roteador e no firewall porém sempre que vou checar se o servidor está online diz que não alguém sabe oque pode ser? Obs: Minha internet é compartilhada Portar que eu abri: 7171, 7172
  13. Oi gente eu gostaria de saber se alguém sabe algum script para fazer a Hiraishin Kunai do minato que seria uma espada que no "use with..." teleportasse para o local que o player clicar com ela se alguém souber como fazer e puder ajudar. Id do item que vou usar: 2386 Se estiver na área errada desculpe
  14. Pelo visto parece ser bom tentarei baixar
  15. Vê se esse site serve tem o crack e o bot. site: http://www.tibiadash.com/2009/07/elfbot-ng-450-para-tibia-850-crack.html
  16. Peguei 50 posts mais não estou conseguindo achar a conquista poderia me explicar onde vejo se tenho ou não?
  17. Você já abriu todas as portas necessários no firewall e no modem?
  18. Bom pedido também gostaria do mesmo se alguem ae puder ajudar
  19. Olá eu estou criando uma talkaction especial que teleporta o player e gostaria de restringir ela para que os players em battle não consigam usar. código do teleporte que estou usando como base: (se possível editar ele) ​function onSay(cid, words, param) pos = {x=220, y=451, z=7} doSendMagicEffect(getPlayerPosition(cid),53) doPlayerSendCancel(cid,"Teleportado!") doTeleportThing(cid,pos) end ​
  20. Obg era esse mesmo só q sem o attr era só /newtype 54,nomedoplayer
  21. Olá eu gostaria de saber se tem como mudar a outfit do player sem ele deslogar (já vi em outros servidores) se alguém souber como me mande algum tutorial ou algo do tipo. meu tibia: narutibia 8.54 obs: se estiver no local errado movam por favor.
  22. mrlhsl

    Remover

    Remover post por favor. ​
  23. Usou roteador sim e não liberei no firewall Usou roteador sim e não liberei no firewall
  24. Olá eu tentei criar um servidor de tíbia e colocar ele online porém eu consigo entrar no servidor e outras pessoas não conseguem se alguém tiver alguma ideia do que seja. obs: já abri as portas no modem e já tentei ligar a DMZ
  25. Gostaria de saber em que pasta fica os newtypes (outfits) pois não consigo encontra-los e também gostaria de saber como adicionar mais obs: servidor de narutibia 8.54 se estiver no local errado desculpe e movam por favor.
  • Quem Está Navegando   0 membros estão online

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