Ir para conteúdo

Pesquisar na Comunidade

Mostrando resultados para as tags ''script''.

  • Pesquisar por Tags

    Digite tags separadas por vírgulas
  • Pesquisar por Autor

Tipo de Conteúdo


Fóruns

  • xTibia - Notícias e Suporte
    • Regras
    • Noticias
    • Soluções
    • Projetos Patrocinados
    • Tutoriais para Iniciantes
    • Imprensa
  • OTServ
    • Notícias e Debates
    • OTServlist
    • Downloads
    • Recursos
    • Suporte
    • Pedidos
    • Show-Off
    • Tutoriais
  • OFF-Topic
    • Barzinho do Éks
    • Design
    • Informática

Encontrar resultados em...

Encontrar resultados que contenham...


Data de Criação

  • Início

    FIM


Data de Atualização

  • Início

    FIM


Filtrar pelo número de...

Data de Registro

  • Início

    FIM


Grupo


Sou

  1. chuck200

    Woponline Ajuda

    Eae galera do :XTibia_smile: estou aki pedindo uma auta ajuda preciso de 3 scripts e de um scripter preciso muito do Tv System Preciso Muito do GYM System Preciso Muito do Battle System Andei falando com os cara da (PO)Svke Más ninguem da P O ta mais interesado em pokemon aew procurei no proprio server augum scripter i nadaaa :angry_smile: resolvi apelar para ser scripts peguei autas aulas de scripts e NADA :angry_smile: Com tanto sofrimento se tiver auguem um ser vivo na terra existente para me ajudar responda esse post :weight_lift: não vai nem fazer mal eu estou pedindo pela mor de deus postem auguma coisa Oque Ganha??? God +REP Se Quiser se cadastrar para scripter fais siguinte Nome: Msn: Skype: Scripts Obtidas: Aviso Se Não Colocar tudo que esta ali em cima será ignoado :ange: Meu Msn Ta aki:gabriel-mucho-loko@hotmail.com Ip Do Server: woponline.servegame.com Site: swoposv.webnode.com.br Não è Facil eu tenho certaza grato Ekipe Woponline
  2. Aew pessoal to aqui denovo, e dessa vez to aqui pra disponibiliza pra galera uma Elite Stone 100% funcional que eu peguei do meu servidor (imcompleta) e adicionei todos (ou quase) os pokemons elites no script, e funciona apenas em Pokemon Flash! E estarei disponibilizando também 81 Pokemons Elite prontos pro seu servidor. Basta baixar o anexo do post, dentro haverá os 81 pokemons elite + um tutorial de como botar a stone pra funcionar. O unico problema é que os pokemons elite não estão já configurados pro servidor, você mesmo deve colocar o diretório de cada um no arquivo "monsters.xml". Então é isso galera valew! Ajudei? Deu certo? Favor +REP! Elite Stone + 81 Pokemons Elite by Redspark.rar
  3. augodao

    Ajuda....

    to com um servidor de poketibia e tem os seguintes bug. quando eu capituro mas de 6 pokemons a 7 pokebola n vai para o dp. a poke bag cai no chão quando cria acc. e queria saber se alguem tem o script de cappitura todos os pokemons que possa mim arruma? espero que alguem possa mim ajuda.
  4. fabianobn

    Procuro Equipe

    Ola tudo bom? Estou aqui para chamar gente, para abrir um Projeto comigo. Quero re-abrir um OTServ, que ja esteve online e foi de muito sucesso era mais de 150 online diariamente. Não direi o NOME agora. Pois quero re-abrir ele com coisas novas. Então estou atrás de Scripts, Spriters e Mapper que possa abrir mapas pesados. Mapa a quase 90mb de peso. Caso queira entrar para a equipe Deixe seu currículo no tópico com alguma previa de seu trabalho. Curriculo: Nick?: MSN?: Área (Scripts, Spriters, Mapper)?: Horario resevado para o OTServ?: OBS: Só iremos chamar pessoas interessadas, caso queira brincar de OTServ não se candidata. OBS²: Só iremos chamar para equipe, só se for: Scripts, Spriters, Mapper. Outras áreas não iremos chamar. Agradeço desde já.
  5. ADMTouya

    Kingbr - 1 Vaga.

    Bom Dia a todos sou o ADM Touya do Projeto KingBR, Bom vim aqui pois o Server está quase pronto porém, Nosso scripter saiu e levou com ele as magias. E com isso o KingBR abre vaga para Scripter. ~Algumas informações~ O KingBR conta com sistema de Resert em stages. - [0% Pronto] O KingBR Conta com um Mapa Próprio Feito por Danilo autor do Mapa Vancine 8.54. - [75% Pronto] O KingBR Conta com Novas Spells e 2ª Promoção, As magias estão todas no Papel, Só falta fazer. [20% Pronto] O KingBR Conta com Um Sistema de Doação onde ganha como gratificação ganha um Item valioso Chamado Esmerald [ 60% Pronto ] O KingBR Conta com Host pago de 500 Gb de HD/ 4 GB De memória / Com uma conexão a internet de 10 Mega. O KingBR Conta com um Site próprio sem copiar o Site do Tibia Global. Só estamos acabando o Shopping. [ 80% Pronto ] O KingBR Conta ainda com um fundo em R$ Para pagar anúncios Aqui no Xtibia e em outros Fóruns de Tibia e OT server. Em Uma barra onde o maximo é 100% o KingBR Está: 0% |||||||||| 75% ~Algumas ScreenShots do Mapa~ ~Equipe e Staff~ Equipe: Faz Tudo: ADM Queen & ADM Touya. Mappers : CM Psy Scripter : [Vaga] WebMaster : GM Renan Staff: ADMs: Amanda (ADM Queen) & Vinicius (ADM Touya) CMs: Danilo (CM Psy) & (Vago Scripter) GMs: GM Renan Tutores: Tutor Charles & Tutor Falling. Quer fazer parte dessa equipe? Então se inscreva. ~Videos~ Site: KingBR Bom por enquanto é só, A equipe do KingBR agradece a atenção. Assinado: ADM Touya.
  6. galera so meu server de poke-tibia o atake dos podemos pisquicos abra,kadabra e alacazam estão bugados! o player pode usar quantas veses quiser! alguem me ajuda? vlw script: local nao = {'4820', '4821', '4822', '4823', '4824', '4825', '1395', '1389', '1391', '1393', '460'} local imp = {'919', '4468', '4469', '4470', '4471', '4472', '4473', '4474', '4475', '4476', '4477', '4478', '4479', '4480', '4481', '4482', '4483', '4484', '4485', '4486', '4487', '4488', '4489', '4490', '4491', '4492', '4493', '4494', '4495', '4496', '4497', '4498', '4499', '4500', '4501', '4502', '4503', '4504', '4505', '4506', '4507', '4508', '4509', '4510', '4511', '4512', '4513', '4826', '4827', '873', '874', '875', '876', '877', '878', '903', '904', '905', '906', '907', '908', '909', '910', '911', '912', '913'} local waba = createCombatArea{ {0, 1, 1, 1, 0}, {1, 1, 1, 1, 1}, {1, 1, 3, 1, 1}, {1, 1, 1, 1, 1}, {0, 1, 1, 1, 0} } local rollout = createCombatArea{ {1, 1, 1}, {1, 2, 1}, {1, 1, 1}, } local golem = {lookType = 288} local sandslash = {lookType = 285} local sandshrew = {lookType = 284} local electrode = {lookType = 286} local voltorb = {lookType = 287} -- WATER GUN local bomb = createCombatArea{ {0, 1, 0}, {1, 3, 1}, {0, 1, 0}, } local wg1n = createCombatArea{ {0, 0, 0}, {0, 2, 0}, {0, 1, 0}, } local wg2n = createCombatArea{ {0, 2, 0}, {0, 0, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, } local wg3n = createCombatArea{ {0, 2, 0}, {0, 0, 0}, {0, 0, 0}, {0, 0, 0}, {0, 0, 0}, {0, 1, 0}, } local wg1s = createCombatArea{ {0, 1, 0}, {0, 2, 0}, {0, 0, 0}, } local wg2s = createCombatArea{ {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 0, 0}, {0, 2, 0}, } local wg3s = createCombatArea{ {0, 1, 0}, {0, 0, 0}, {0, 0, 0}, {0, 0, 0}, {0, 0, 0}, {0, 2, 0}, } local wg1e = createCombatArea{ {0, 0, 0}, {1, 2, 0}, {0, 0, 0}, } local wg2e = createCombatArea{ {1, 1, 1, 0, 2}, } local wg3e = createCombatArea{ {1, 0, 0, 0, 0, 2}, } local wg1w = createCombatArea{ {0, 0, 0}, {0, 2, 1}, {0, 0, 0}, } local wg2w = createCombatArea{ {2, 0, 1, 1, 1}, } local wg3w = createCombatArea{ {2, 0, 0, 0, 0, 1}, } -- WATER GUN END local vinen = createCombatArea{ {0, 0, 0}, {0, 0, 0}, {0, 2, 0}, {1, 0, 0} } local vines = createCombatArea{ {0, 0, 0}, {1, 0, 0}, {0, 0, 0}, {0, 2, 0} } local vinee = createCombatArea{ {0, 0, 0}, {1, 0, 0}, {0, 0, 2}, {0, 0, 0} } local vinew = createCombatArea{ {0, 0, 0}, {0, 0, 3}, {0, 2, 0}, {0, 0, 0} } local whipn = createCombatArea{ {0, 0, 0}, {0, 2, 0}, {1, 1, 1}, {1, 1, 1} } local whips = createCombatArea{ {1, 1, 1}, {1, 1, 1}, {0, 2, 0}, {0, 0, 0} } local whipe = createCombatArea{ {1, 1, 0}, {1, 1, 2}, {1, 1, 0}, {0, 0, 0} } local whipw = createCombatArea{ {0, 1, 1}, {2, 1, 1}, {0, 1, 1}, {0, 0, 0} } local sand1 = createCombatArea{ {0, 0, 0}, {0, 3, 0}, {0, 0, 0}, } local whirl3 = createCombatArea{ {0, 0, 0}, {1, 3, 1}, {0, 0, 0}, } local whirl5 = createCombatArea{ {0, 0, 0, 0, 0}, {1, 1, 3, 1, 1}, {0, 0, 0, 0, 0}, } local whirl32 = createCombatArea{ {0, 0, 0}, {1, 3, 1}, {0, 0, 0}, } local whirl52 = createCombatArea{ {0, 0, 0, 0, 0}, {1, 1, 3, 1, 1}, {0, 0, 0, 0, 0}, } local pokeis = {'Pidgey', 'Pidgeotto', 'Pidgeot', 'Rattata', 'Raticate', 'Golbat', 'Bellsprout', 'Weepinbell', 'Victreebel', 'Poliwag', 'Poliwhirl', 'Poliwrath', 'Abra', 'Gloom', 'Vileplume', 'Horsea', 'Seadra', 'Grimer', 'Muk', 'Kakuna', 'Beedrill', 'Zubat', 'Magnemite', 'Magneton', 'Voltorb', 'Electrode', 'Geodude', 'Graveler', 'Golem', 'Sandshrew', 'Sandslash', 'Charmander', 'Charmeleon', 'Charizard', 'Kadabra', 'Alakazam'} local c = { [30] = {x = { pok = pidgey, spell = "Gust", minLv = 12, ex = 1600004, base1 = 40, base2 = 50, dista = 50, bonus = 4, target = "no", type = "flying", cd = 15 } }, [5] = {x = { pok = pidgeotto, spell = "Whirlwind", minLv = 22, ex = 1700004, base1 = 100, base2 = 101, dista = 50, bonus = 4, target = "no", type = "flying", cd = 17 } }, [80] = {x = { pok = pidgeot, spell = "Whirlwind", minLv = 65, ex = 1800004, base1 = 200, base2 = 210, dista = 4, target = "no", bonus = 5.5, type = "flying", cd = 17 } }, [36] = {x = { pok = rattata, spell = "Hyper Fang", minLv = 11, ex = 1900004, base1 = 40, base2 = 50, dista = 1, bonus = 4, type = "normal", cd = 19 } }, [69] = {x = { pok = raticate, spell = "Hyper Fang", minLv = 23, ex = 2000004, base1 = 150, base2 = 160, dista = 1, bonus = 5, type = "normal", cd = 19 } }, [122] = {x = { pok = golbat, spell = "Whirlwind", minLv = 32, ex = 4200004, base1 = 200, base2 = 220, dista = 4, target = "no", bonus = 50, type = "flying", cd = 20 } }, [250] = {x = { pok = bellsprout, spell = "Vine Whip", minLv = 12, ex = 6900004, base1 = 50, base2 = 60, dista = 2, target = "no", bonus = 3.5, type = "grass", cd = 19 } }, [37] = {x = { pok = weepinbell, spell = "Vine Whip", minLv = 20, ex = 7000004, base1 = 120, base2 = 150, target = "no", dista = 2, bonus = 4.5, type = "grass", cd = 19 } }, [240] = {x = { pok = bictreebel, spell = "Vine Whip", minLv = 50, ex = 7100004, base1 = 230, base2 = 280, dista = 2, target = "no", bonus = 6.5, type = "grass", cd = 19 } }, [111] = {x = { pok = poliwag, spell = "Water Gun", minLv = 13, ex = 6000004, base1 = 45, base2 = 50, target = "no", dista = 2, bonus = 4, type = "water", cd = 19 } }, [212] = {x = { pok = poliwhirl, spell = "Water Gun", minLv = 25, ex = 6100004, base1 = 185, target = "no", base2 = 200, dista = 2, bonus = 5, type = "water", cd = 19 } }, [104] = {x = { pok = poliwrath, spell = "Water Gun", minLv = 25, ex = 6200004, base1 = 685, base2 = 700, dista = 2, bonus = 6, target = "no", type = "water", cd = 19 } }, [262] = {x = { pok = abra, spell = "Psycho Shift", minLv = 24, ex = 6300004, base1 = 115, base2 = 120, dista = 10, bonus = 5, type = "psychic", cd = 24 } }, [219] = {x = { pok = kadaabra, spell = "Psycho Shift", minLv = 1, ex = 6400004, base1 = 235, base2 = 245, dista = 10, bonus = 7, type = "psychic", cd = 24 } }, [218] = {x = { pok = alakazam, spell = "Psycho Shift", minLv = 1, ex = 6500004, base1 = 335, base2 = 345, dista = 10, bonus = 10, type = "psychic", cd = 24 } }, [74] = {x = { pk = gloom, spell = "Poison Bomb", minLv = 22, ex = 4400004, base1 = 101, base2 = 103, dista = 4, bonus = 5, type = "poison", cd = 25 } }, [86] = {x = { pok = vileplume, spell = "Poison Bomb", minLv = 50, ex = 4500004, base1 = 200, base2 = 201, dista = 4, bonus = 6, type = "poison", cd = 25 } }, [33] = {x = { pok = horsea, spell = "Waterball", minLv = 16, ex = 1160004, base1 = 50, base2 = 60, dista = 4, bonus = 4.7, type = "water", cd = 17 } }, [276] = {x = { pok = seadra, spell = "Waterball", minLv = 46, ex = 1170004, base1 = 190, base2 = 200, dista = 4, bonus = 5.7, type = "water", cd = 17 } }, [214] = {x = { pok = grimer, spell = "Poison Bomb", minLv = 16, ex = 8800004, base1 = 85, base2 = 92, dista = 4, bonus = 6, type = "poison", cd = 17 } }, [47] = {x = { pok = muk, spell = "Poison Bomb", minLv = 32, ex = 8900004, base1 = 285, base2 = 292, dista = 4, bonus = 6, type = "poison", cd = 17 } }, [60] = {x = { pok = kakuna, spell = "Harden", minLv = 10, ex = 1400004, lpl = 32, life = 900, base1 = 0, target = "no", base2 = 0, dista = 100, bonus = 0, type = "normal", cd = 17 } }, [45] = {x = { pok = beedrill, spell = "Toxic Needle", minLv = 32, ex = 1500004, base1 = 100, base2 = 110, dista = 4, bonus = 5, type = "poison", cd = 16 } }, [44] = {x = { pok = zubat, spell = "Super Sonic", minLv = 11, ex = 4100004, base1 = 0, base2 = 0, dista = 4, bonus = 0, type = "normal", cd = 16 } }, [217] = {x = { pok = magnemite, spell = "Thunderbolt", minLv = 17, ex = 8100004, base1 = 65, base2 = 85, dista = 5, bonus = 5.4, type = "electric", cd = 18 } }, [223] = {x = { pok = magneton, spell = "Thunderbolt", minLv = 1, ex = 8200004, base1 = 160, base2 = 180, dista = 5, bonus = 7, type = "electric", cd = 18 } }, [123] = {x = { pok = voltorb, spell = "Rollout", minLv = 17, ex = 1000004, base1 = 30, base2 = 31, dista = 2, target = "no", bonus = 0.4, type = "ground", cd = 33 } }, [287] = {x = { pok = voltorb, spell = "Rollout", minLv = 17, ex = 1000004, base1 = 20, base2 = 21, dista = 2, target = "no", bonus = 0.5, type = "ground", cd = 33 } }, [125] = {x = { pok = electrode, spell = "Rollout", minLv = 39, ex = 1010004, base1 = 45, base2 = 46, dista = 2, target = "no", bonus = 1, type = "ground", cd = 33 } }, [286] = {x = { pok = electroderoll, spell = "Rollout", minLv = 39, ex = 1010004, base1 = 45, base2 = 46, dista = 2, target = "no", bonus = 1, type = "ground", cd = 33 } }, [196] = {x = { pok = Geodude, spell = "Harden", minLv = 17, ex = 7400004, base1 = 0, target = "no", base2 = 0, dista = 100, bonus = 0, type = "normal", cd = 17 } }, [247] = {x = { pok = Graveler, spell = "Harden", minLv = 17, ex = 7500004, base1 = 0, target = "no", base2 = 0, dista = 100, bonus = 0, type = "normal", cd = 17 } }, [116] = {x = { pok = Golem, spell = "Harden", minLv = 17, ex = 7600004, base1 = 0, target = "no", base2 = 0, dista = 100, bonus = 0, type = "normal", cd = 17 } }, [288] = {x = { pok = Golem, spell = "Harden", minLv = 17, ex = 7600004, base1 = 0, target = "no", base2 = 0, dista = 100, bonus = 0, type = "normal", cd = 17 } }, [43] = {x = { pok = sandshrew, spell = "Rollout", minLv = 1, ex = 2700004, base1 = 40, base2 = 41, dista = 1, target = "no", bonus = 0.6, type = "ground", cd = 28 } }, [284] = {x = { pok = sandshrew, spell = "Rollout", minLv = 1, ex = 2700004, base1 = 40, base2 = 41, dista = 1, target = "no", bonus = 0.6, type = "ground", cd = 28 } }, [115] = {x = { pok = sandslash, spell = "Rollout", minLv = 57, ex = 2800004, base1 = 60, base2 = 61, dista = 1, target = "no", bonus = 1.6, type = "ground", cd = 28 } }, [285] = {x = { pok = sandslash, spell = "Rollout", minLv = 57, ex = 2800004, base1 = 60, base2 = 61, dista = 1, target = "no", bonus = 1.6, type = "ground", cd = 28 } }, [29] = {x = { pok = charmander, spell = "Fireball", minLv = 22, ex = 400004, base1 = 100, base2 = 101, dista = 4, bonus = 4.6, type = "fire", cd = 22 } }, [23] = {x = { pok = charmeleon, spell = "Fireball", minLv = 22, ex = 500004, base1 = 150, base2 = 151, dista = 4, bonus = 5.4, type = "fire", cd = 22 } }, [67] = {x = { pok = charizard, spell = "Fireball", minLv = 22, ex = 600004, base1 = 250, base2 = 251, dista = 4, bonus = 7.4, type = "fire", cd = 22 } }, } function onSay(cid) if #getCreatureSummons(cid) == 0 then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You need a pokemon to moves.") return 0 end if not isInArray(pokeis, getCreatureName(getCreatureSummons(cid)[1])) then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Your pokemon doesn\'t recognize this move.") return 0 end pokemon = c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType] if getPlayerLevel(cid) < c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.minLv then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You don\'t have enough level to this move.") return 0 end if exhaustion.get(cid, pokemon.x.ex) then seconds = math.floor(((exhaustion.get(cid, pokemon.x.ex)) + 1)) doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You have to wait "..seconds.." seconds to this move again.") return 0 end if getPlayerStorageValue(getCreatureSummons(cid)[1], 3) >= 1 then doSendAnimatedText(getThingPos(getCreatureSummons(cid)[1]), "MISS", 215) setPlayerStorageValue(getCreatureSummons(cid)[1], 3, -1) 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) return true end if getPlayerStorageValue(getCreatureSummons(cid)[1], 5) >= 1 then if math.random(1,100) <= 33 then doSendAnimatedText(getThingPos(getCreatureSummons(cid)[1]), "SELF HIT", 180) local levels = getPlayerLevel(cid) doTargetCombatHealth(cid, getCreatureSummons(cid)[1], COMBAT_PHYSICALDAMAGE, -(math.random((levels*3),(levels*5))), -((math.random((levels*3),(levels*5))+10)), 3) 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) doCreatureSay(getCreatureSummons(cid)[1], ""..string.upper(c[getCreatureOutfit(getCreatureSummons(cid)[1]).lookType].x.spell).."!", TALKTYPE_MONSTER) return true end end if pokemon.x.target ~= "no" then if not isMonster(getCreatureTarget(cid)) then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You don\'t have any targets.") return 0 end if getDistanceBetween(getThingPos(getCreatureSummons(cid)[1]), getThingPos(getCreatureTarget(cid))) > pokemon.x.dista then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Get closer to the target to this move.") return 0 end if not isSightClear(getThingPos(getCreatureSummons(cid)[1]), getThingPos(getCreatureTarget(cid)), false) then return 0 end end if pokemon.x.type == "flying" then elementa = FLYDAMAGE elseif pokemon.x.type == "ground" then elementa = GROUNDDAMAGE elseif pokemon.x.type == "electric" then elementa = ELECTRICDAMAGE elseif pokemon.x.type == "ghost" then elementa = GHOSTDAMAGE elseif pokemon.x.type == "normal" then elementa = NORMALDAMAGE elseif pokemon.x.type == "fighting" then elementa = FIGHTINGDAMAGE elseif pokemon.x.type == "poison" then elementa = POISONDAMAGE elseif pokemon.x.type == "rock" then elementa = ROCKDAMAGE elseif pokemon.x.type == "bug" then elementa = BUGDAMAGE elseif pokemon.x.type == "fire" then elementa = FIREDAMAGE elseif pokemon.x.type == "water" then elementa = WATERDAMAGE elseif pokemon.x.type == "grass" then elementa = GRASSDAMAGE elseif pokemon.x.type == "psychic" then elementa = PSYCHICDAMAGE elseif pokemon.x.type == "ice" then elementa = ICEDAMAGE elseif pokemon.x.type == "dragon" then elementa = DRAGONDAMAGE end local element = elementa local num1 = (pokemon.x.base1) local num2 = (pokemon.x.base2) local num3 = (pokemon.x.bonus) if getPlayerStorageValue(getCreatureSummons(cid)[1], 254) >= 1 then num3 = num3 * 1.8 setPlayerStorageValue(getCreatureSummons(cid)[1], 254, 0) end setPlayerStorageValue(getCreatureSummons(cid)[1], 1000, ((num1)+(getPlayerLevel(cid)*(num3)))) if pokemon.x.spell == "Water Gun" then if getCreatureLookDir(getCreatureSummons(cid)[1]) == 0 then doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg1n, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 74) doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg2n, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 75) doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg3n, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 76) elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 2 then doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg1s, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 77) doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg2s, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 75) doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg3s, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 78) elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 1 then doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg1e, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 69) doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg2e, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 70) doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg3e, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 71) elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 3 then doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg1w, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 72) doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg2w, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 70) doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg3w, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 73) end 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) return 0 elseif pokemon.x.spell == "Gust" 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) posit = getThingPos(getCreatureSummons(cid)[1]) local function gust(params) if #getCreatureSummons(params.cid) >= 1 then doAreaCombatHealth(getCreatureSummons(params.cid)[1], element, params.ar, sand1, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 42) else end end local posicao = getThingPos(getCreatureSummons(cid)[1]) if getCreatureLookDir(getCreatureSummons(cid)[1]) == 0 then addEvent(gust, 0, {cid = cid, ar = {x=posicao.x, y=posicao.y-1, z=posicao.z}}) addEvent(gust, 500, {cid = cid, ar = {x=posicao.x, y=posicao.y-2, z=posicao.z}}) addEvent(gust, 1000, {cid = cid, ar = {x=posicao.x, y=posicao.y-3, z=posicao.z}}) addEvent(gust, 1500, {cid = cid, ar = {x=posicao.x, y=posicao.y-4, z=posicao.z}}) elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 2 then addEvent(gust, 0, {cid = cid, ar = {x=posicao.x, y=posicao.y+1, z=posicao.z}}) addEvent(gust, 500, {cid = cid, ar = {x=posicao.x, y=posicao.y+2, z=posicao.z}}) addEvent(gust, 1000, {cid = cid, ar = {x=posicao.x, y=posicao.y+3, z=posicao.z}}) addEvent(gust, 1500, {cid = cid, ar = {x=posicao.x, y=posicao.y+4, z=posicao.z}}) elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 1 then addEvent(gust, 0, {cid = cid, ar = {x=posicao.x+1, y=posicao.y, z=posicao.z}}) addEvent(gust, 500, {cid = cid, ar = {x=posicao.x+2, y=posicao.y, z=posicao.z}}) addEvent(gust, 1000, {cid = cid, ar = {x=posicao.x+3, y=posicao.y, z=posicao.z}}) addEvent(gust, 1500, {cid = cid, ar = {x=posicao.x+4, y=posicao.y, z=posicao.z}}) elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 3 then addEvent(gust, 0, {cid = cid, ar = {x=posicao.x-1, y=posicao.y, z=posicao.z}}) addEvent(gust, 500, {cid = cid, ar = {x=posicao.x-2, y=posicao.y, z=posicao.z}}) addEvent(gust, 1000, {cid = cid, ar = {x=posicao.x-3, y=posicao.y, z=posicao.z}}) addEvent(gust, 1500, {cid = cid, ar = {x=posicao.x-4, y=posicao.y, z=posicao.z}}) end return 0 elseif pokemon.x.spell == "Whirlwind" 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) posit = getThingPos(getCreatureSummons(cid)[1]) local function gust(params) if #getCreatureSummons(params.cid) >= 1 then doAreaCombatHealth(getCreatureSummons(params.cid)[1], element, params.ar, params.br, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 42) else end end local posicao = getThingPos(getCreatureSummons(cid)[1]) if getCreatureLookDir(getCreatureSummons(cid)[1]) == 0 then addEvent(gust, 0, {cid = cid, ar = {x=posicao.x, y=posicao.y-1, z=posicao.z}, br = sand1}) addEvent(gust, 500, {cid = cid, ar = {x=posicao.x, y=posicao.y-2, z=posicao.z}, br = whirl3}) addEvent(gust, 1000, {cid = cid, ar = {x=posicao.x, y=posicao.y-3, z=posicao.z}, br = whirl5}) addEvent(gust, 1500, {cid = cid, ar = {x=posicao.x, y=posicao.y-4, z=posicao.z}, br = whirl5}) elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 2 then addEvent(gust, 0, {cid = cid, ar = {x=posicao.x, y=posicao.y+1, z=posicao.z}, br = sand1}) addEvent(gust, 500, {cid = cid, ar = {x=posicao.x, y=posicao.y+2, z=posicao.z}, br = whirl3}) addEvent(gust, 1000, {cid = cid, ar = {x=posicao.x, y=posicao.y+3, z=posicao.z}, br = whirl5}) addEvent(gust, 1500, {cid = cid, ar = {x=posicao.x, y=posicao.y+4, z=posicao.z}, br = whirl5}) elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 1 then addEvent(gust, 0, {cid = cid, ar = {x=posicao.x+1, y=posicao.y, z=posicao.z}, br = sand1}) addEvent(gust, 500, {cid = cid, ar = {x=posicao.x+2, y=posicao.y, z=posicao.z}, br = whirl32}) addEvent(gust, 1000, {cid = cid, ar = {x=posicao.x+3, y=posicao.y, z=posicao.z}, br = whirl52}) addEvent(gust, 1500, {cid = cid, ar = {x=posicao.x+4, y=posicao.y, z=posicao.z}, br = whirl52}) elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 3 then addEvent(gust, 0, {cid = cid, ar = {x=posicao.x-1, y=posicao.y, z=posicao.z}, br = sand1}) addEvent(gust, 500, {cid = cid, ar = {x=posicao.x-2, y=posicao.y, z=posicao.z}, br = whirl32}) addEvent(gust, 1000, {cid = cid, ar = {x=posicao.x-3, y=posicao.y, z=posicao.z}, br = whirl52}) addEvent(gust, 1500, {cid = cid, ar = {x=posicao.x-4, y=posicao.y, z=posicao.z}, br = whirl52}) end return 0 elseif pokemon.x.spell == "Hyper Fang" 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) doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureTarget(cid)), 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num1)+(getPlayerLevel(cid)*(num3))), 159) return 0 elseif pokemon.x.spell == "Rollout" 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) if getCreatureName(getCreatureSummons(cid)[1]) == "Voltorb" then doSetCreatureOutfit(getCreatureSummons(cid)[1], voltorb, 8300) doChangeSpeed(getCreatureSummons(cid)[1], 85) elseif getCreatureName(getCreatureSummons(cid)[1]) == "Electrode" then doSetCreatureOutfit(getCreatureSummons(cid)[1], electrode, 8300) doChangeSpeed(getCreatureSummons(cid)[1], 101) elseif getCreatureName(getCreatureSummons(cid)[1]) == "Sandshrew" then doSetCreatureOutfit(getCreatureSummons(cid)[1], sandshrew, 8300) doChangeSpeed(getCreatureSummons(cid)[1], 93) elseif getCreatureName(getCreatureSummons(cid)[1]) == "Sandslash" then doSetCreatureOutfit(getCreatureSummons(cid)[1], sandslash, 8300) doChangeSpeed(getCreatureSummons(cid)[1], 143) end setPlayerStorageValue(getCreatureSummons(cid)[1], 4, 1) local function roll(params) if isCreature(params.cid) then if isCreature(getCreatureSummons(params.cid)[1]) then if getCreatureCondition(getCreatureSummons(params.cid)[1], CONDITION_OUTFIT) == true then doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), rollout, -((num1)+(getPlayerLevel(cid)*(num3))), -((num1)+(getPlayerLevel(cid)*(num3))), 255) end end end end for r = 1, 8 do addEvent(roll, 1000*r, {cid = cid}) end local function stoproll(params) if isCreature(params.cid) then if isCreature(getCreatureSummons(params.cid)[1]) then doChangeSpeed(getCreatureSummons(params.cid)[1], -101) if getPlayerStorageValue(getCreatureSummons(params.cid)[1], 4) >= 1 then setPlayerStorageValue(getCreatureSummons(params.cid)[1], 4, 0) end end end end addEvent(stoproll, 8300, {cid = cid}) return 0 elseif pokemon.x.spell == "Vine Whip" 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) if getCreatureLookDir(getCreatureSummons(cid)[1]) == 0 then area = vinen dano = whipn effect = 80 elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 1 then area = vinee dano = whipe effect = 83 elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 2 then area = vines dano = whips effect = 81 elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 3 then area = vinew dano = whipw effect = 82 end doAreaCombatHealth(getCreatureSummons(cid)[1], null, getThingPos(getCreatureSummons(cid)[1]), area, -((num1)+(getPlayerLevel(cid)*(num3))), -((num1)+(getPlayerLevel(cid)*(num3))), effect) doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), dano, -((num1)+(getPlayerLevel(cid)*(num3))), -((num1)+(getPlayerLevel(cid)*(num3))), 255) return 0 elseif pokemon.x.spell == "Water Gun" then if getCreatureLookDir(getCreatureSummons(cid)[1]) == 0 then doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg1n, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 74) doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg2n, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 75) doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg3n, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 76) elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 2 then doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg1s, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 77) doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg2s, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 75) doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg3s, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 78) elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 1 then doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg1e, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 69) doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg2e, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 70) doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg3e, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 71) elseif getCreatureLookDir(getCreatureSummons(cid)[1]) == 3 then doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg1w, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 72) doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg2w, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 70) doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureSummons(cid)[1]), wg3w, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 73) end 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) return 0 elseif pokemon.x.spell == "Psycho Shift" then local pos = getThingPos(getCreatureTarget(cid)) local pos2 = getThingPos(getCreatureTarget(cid)) pos.x = pos.x + math.random(-4,4) pos.y = pos.y + math.random(-4,4) if hasSqm(pos) and isSightClear(getThingPos(getCreatureSummons(cid)[1]), pos, false) then if getTileThingByPos(pos) and getTileThingByPos(pos).itemid >= 1 and not isInArray({919, 460, 4820, 4821, 4822, 4823, 4824, 4825}, getTileThingByPos(pos).itemid) and isWalkable(pos) then pos = getClosestFreeTile(getCreatureTarget(cid), pos) doSendDistanceShoot(pos2, pos, 39) doTeleportThing(getCreatureTarget(cid), pos, false) doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureTarget(cid)), 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 134) doSendMagicEffect(pos2, 12) else local newpos = getClosestFreeTile(getCreatureTarget(cid), pos) doSendDistanceShoot(pos2, newpos, 39) doTeleportThing(getCreatureTarget(cid), newpos, false) doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureTarget(cid)), 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 134) doSendMagicEffect(pos2, 12) end else doSendDistanceShoot(pos2, getThingPos(getCreatureTarget(cid)), 39) doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureTarget(cid)), 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 134) doSendMagicEffect(pos2, 12) end 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) return 0 elseif pokemon.x.spell == "Poison Bomb" 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) addEvent(doAreaCombatHealth, 100, getCreatureSummons(cid)[1], element, getThingPos(getCreatureTarget(cid)), bomb, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 114) doSendDistanceShoot(getThingPos(getCreatureSummons(cid)[1]), getThingPos(getCreatureTarget(cid)), 14) return 0 elseif pokemon.x.spell == "Waterball" 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) local function throw(params) if isMonster(getCreatureTarget(params.cid)) then doSendDistanceShoot(getThingPos(getCreatureSummons(params.cid)[1]), getThingPos(getCreatureTarget(params.cid)), 2) else end end local function damage(params) if isMonster(getCreatureTarget(params.cid)) then doAreaCombatHealth(getCreatureSummons(params.cid)[1], element, getThingPos(getCreatureTarget(cid)), waba, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 68) else end end addEvent(damage, 100, {cid = cid}) addEvent(throw, 0, {cid = cid}) return 0 elseif pokemon.x.spell == "Fireball" 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) local function throw(params) if isMonster(getCreatureTarget(params.cid)) then doSendDistanceShoot(getThingPos(getCreatureSummons(params.cid)[1]), getThingPos(getCreatureTarget(params.cid)), 3) else end end local function damage(params) if isMonster(getCreatureTarget(params.cid)) then doAreaCombatHealth(getCreatureSummons(params.cid)[1], element, getThingPos(getCreatureTarget(cid)), waba, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 5) else end end addEvent(damage, 100, {cid = cid}) addEvent(throw, 0, {cid = cid}) return 0 elseif pokemon.x.spell == "Harden" 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) local hardname = getCreatureName(getCreatureSummons(cid)[1]) setPlayerStorageValue(getCreatureSummons(cid)[1], 4, 1) local oldpos = getThingPos(getCreatureSummons(cid)[1]) local function efect(params) if isCreature(getCreatureSummons(params.cid)[1]) then if getPlayerStorageValue(getCreatureSummons(params.cid)[1], 4) >= 1 then doSendMagicEffect(getThingPos(getCreatureSummons(params.cid)[1]), 144) end end end local function chard(params) if isCreature(getCreatureSummons(params.cid)[1]) then if getPlayerStorageValue(getCreatureSummons(params.cid)[1], 4) >= 1 then setPlayerStorageValue(getCreatureSummons(params.cid)[1], 4, -1) end end end addEvent(efect, 100, {cid = cid, hardname = hardname}) addEvent(efect, 1600, {cid = cid, hardname = hardname}) addEvent(efect, 3100, {cid = cid, hardname = hardname}) addEvent(efect, 4600, {cid = cid, hardname = hardname}) addEvent(efect, 6100, {cid = cid, hardname = hardname}) addEvent(efect, 7600, {cid = cid, hardname = hardname}) addEvent(efect, 9100, {cid = cid, hardname = hardname}) addEvent(efect, 10600, {cid = cid, hardname = hardname}) addEvent(chard, 11000, {cid = cid}) return 0 elseif pokemon.x.spell == "Toxic Needle" 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) doSendDistanceShoot(getThingPos(getCreatureSummons(cid)[1]), getThingPos(getCreatureTarget(cid)), 15) doAreaCombatHealth(getCreatureSummons(cid)[1], element, getThingPos(getCreatureTarget(cid)), 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 8) return 0 elseif pokemon.x.spell == "Thunderbolt" 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) local posalvo = getThingPos(getCreatureTarget(cid)) local boltalvo = getCreatureTarget(cid) posalvo.x = posalvo.x-2 posalvo.y = posalvo.y-6 doSendDistanceShoot(posalvo, getThingPos(getCreatureTarget(cid)), 41) local function bolt(params) if isCreature(params.cid) then if isCreature(getCreatureTarget(cid)) then if getCreatureTarget(params.cid) == params.boltalvo then doAreaCombatHealth(getCreatureSummons(params.cid)[1], element, getThingPos(getCreatureTarget(cid)), 0, -((num1)+(getPlayerLevel(cid)*(num3))), -((num2)+(getPlayerLevel(cid)*(num3))), 48) end end end end addEvent(bolt, 200, {cid = cid, boltalvo = boltalvo}) return 0 elseif pokemon.x.spell == "Super Sonic" 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) local t = getCreatureTarget(cid) setPlayerStorageValue(t, 5, 1) local function confd(params) if isCreature(params.t) then local spdc = getCreatureSpeed(params.t) if getCreatureLookDir(params.t) == 0 then confs = math.random(1,3) elseif getCreatureLookDir(params.t) == 1 then confurandom = math.random(1,99) if confurandom <= 33 then confs = 0 elseif confurandom >= 67 then confs = 2 else confs = 3 end elseif getCreatureLookDir(params.t) == 2 then confurandom = math.random(1,99) if confurandom <= 33 then confs = 3 elseif confurandom >= 67 then confs = 0 else confs = 1 end elseif getCreatureLookDir(params.t) == 3 then confs = math.random(0,2) end doPushCreature(params.t, confs, 1, 0) doSendMagicEffect(getThingPos(params.t), 31) end end local function nonc(params) if isCreature(params.t) then doChangeSpeed(params.t, -getCreatureSpeed(params.t)) doChangeSpeed(params.t, getCreatureBaseSpeed(params.t)) setPlayerStorageValue(params.t, 5, -1) end end doSendDistanceShoot(getThingPos(getCreatureSummons(cid)[1]), getThingPos(getCreatureTarget(cid)), 32) doChangeSpeed(t, -( getCreatureSpeed(t)/3)) doSendMagicEffect(getThingPos(t), 31) for i = 1, math.random(6,7) do addEvent(confd, 1000*i, {cid = cid, t = t}) end addEvent(nonc, 7100, {cid - cid, t = t}) return 0 end return 0 end
  7. alguem sabe como tiar attack automatico de pokemon do poketibia??? plz
  8. Bom se essa for a área errada que algum moderador move pra area certa, a questão é que eu venho pedir um script mais alem de pedir venho explicar exatamente , e com tal explicação acho que criar o script vai facilitar alem de que conforme cria uma parte alguem posta aqui explicando o que criou e o que falta, que o otro pega esse script e da continuidade (trabalho em grupo),então vamos evitar comentarios desnecessários Explicação de como o script pode ser feito. Bom seria 1 local aonde teria aquelas alavanca estilo de anihi e aqueles quadrado ai seria da seguinte forma, seria uma sala com 4 quadrados ao lado direito e ao lado esquerdo 4 quadrados aonde dos 2 lados teria uma alavanca e independente de ter (1 player nos quadrado da esquerda) e (1 player no quadrado da direita ) ao os 2 usar a alavanca os 2 vai pra arena de duel/torneio pra ter como dar use na alavanca tem que ter a mesma quantidade de players nos quadrados da esquerda com os quadrados da direita. aonde seria exemplo [ ] [ ] [ ] [ ] (alavanca) [ ] [ ] [ ] [ ] (alavanca) aonde seria exemplo [ ] [ ] [ ] [x] (alavanca) [ ] [ ] [ ] [x ] (alavanca)( nesse caso e so os 2 adversarios X usar a alavanca que os 2 vai pro duel. aonde seria exemplo [ ] [ ] [x] [A] (alavanca) [ ] [ ] [x] [A ] (alavanca)( nesse caso e so os jogador "A" Adversario de cada lado do use na alavanca que os 2 time vai pro duel. continuando, os players ao ir pra essa arena de duel/torneio eles tem que ficar imovel ou seja um script com que deixa os jogadores imovel em suas posiçao X,e o sistema de contar quem vai ganhar o duel/torneio não é quem matar exemplo os 6 pokemon do outro e sim a cada go(pokemon) o script le isso e soma+1 a pos resultar em 6(no caso o limite de duel e o limite dos pokemon) o player perde e o otro ganha e um script simples se for ver so tem que ser bem elaborado, e alem de criar não so 1 plataforma e sim varias plataforma com varias alavancas mais claro que no momento so criando uma ja ta bom depois é so da ctrl c e fazer o mapinha . e alem disso quando os players ir pra esse local de duel começa uma contagem de 1 minuto pros jogador jogar seus respectivos pokemon pra fora assim como tambem quando o player dar back/ou o pokemon morrer ter essa contagem 1 minuto pro jogador jogar ou é desclassificado, e o sistema teria que ser exato como party system aonde o seu pokemon so vai acertar o pokemon adversario mesmo estando em 4x4 jogadores.
  9. Pokemon Fire, recrutando Estatisticas do servidor: Ride: 100% Fly: 100% Dig: 100% Cut: 100% Control Minds: 100% Order: 100% Ditto System: 99% M1 System: 40% Mapa: 60% Nurse: 100% Healando 6 Pokes Maximo 6 poke:100% Portrait: 100 Stones: 100% Pokes Evoluindo com 2x stone Vagas: Mapper: [PF] Luuan, Vago Scripter: Vago, Vago Spell Maker: Vago Formulario: Nome: Idade: Oque Você é (Mapper,Scripter,Spell Maker): Quanto Tempo De EXP: Contato: Se Tiver Algum Trabalho Mostre:
  10. podapoda

    [Script]Heelp

    alguem sabe como tiar attck de poke automatico ???
  11. rafaelsonopelo

    Ajuda Com Sd

    TENHO UM OT 8.6 COM POÇÕES CONSUMIVEIS + AS HUNAS SAO INFINITAS OU QUASE ÉLAS GASTAO SÓ 1 UNIDADE DEPOIS FICA INFINITA O PROBLEMA É, COMO FASSO PARA ÉLAS ACABAREM IGUAL AS POCOES E TBM COMO ALMENTO AS CARGAS DELA JA ALMENTEI NO ITEMS.XML MAS NAO ALMENTO NO NPC NO MEU OT ELAS TAO ASSIM --------config.lua------- removeWeaponAmmunition = true removeWeaponCharges = true removeRuneCharges = true --------items.xml--------- </item> <item id="2268" article="a" name="sudden death rune"> <attribute key="runeSpellName" value="adori gran mort"/> <attribute key="weight" value="120"/> <attribute key="charges" value="20"/> <attribute key="showcharges" value="1"/> --------sudden death.lua-------- local combat = createCombatObject() setCombatParam(combat, COMBAT_PARAM_TARGETCASTERORTOPMOST, true) setCombatParam(combat, COMBAT_PARAM_TYPE, COMBAT_DEATHDAMAGE) setCombatParam(combat, COMBAT_PARAM_EFFECT, CONST_ME_MORTAREA) setCombatParam(combat, COMBAT_PARAM_DISTANCEEFFECT, CONST_ANI_SUDDENDEATH) setCombatFormula(combat, COMBAT_FORMULA_LEVELMAGIC, -1, -170, -1, -230, 5, 5, 4, 7) function onCastSpell(cid, var) return doCombat(cid, combat, var) end ---------spells.xml--------- <rune name="Sudden Death" id="2268" allowfaruse="1" charges="20" lvl="45" maglv=" 15" exhaustion="1400" needtarget="1" blocktype="solid" script="attack/sudden death.lua"/>
  12. Tipo de script: RING em weapon Protocolo: 8.70 Servidor Utilizado: The Forgotten Server Nível de Experiencia: Médio baixo Informações adicionais: Ring com 35% dano magico e 70% healing Eu queria uma script que usa-se o ring 2207! <attribute key="increaseMagicPercent" value="135"/> <attribute key="increasehealingPercent" value="170"/> <attribute key="increasephysicalPercent" value="135"/> só que no caso eu estou mudando meu servidor de 8.6 para 8.7 e esses atributes acima não dão certo com tfs 8.7 mas... eu ouvi dizer que se eu usa-se weapons daria certo! alguem me ajuda?
  13. Salve Galera! Hoje será um pouco diferente; Tivemos um empate entre o WoDo e o Forsaken OTs, por isso nesta semana teremos duas enquetes em simultâneo, a do desempate e a dessa semana. Hoje dou um destaque especial à area de Scripting que deu um verdadeiro SHOW em recomendações, espero que gostem! XTibia Recomenda Os melhores tópicos recomendados por vocês! Projetos: (Dpo) Recruta ! (Concorrente à Projeto do Mês) World Of Digimon Online. (Wodo) - Are You A Digi-Chosen? (Concorrente à Projeto do Mês) (Recrutamento) Arghor Alternative Tibia Server (Concorrente à Projeto do Mês) Forsaken - Ots (Concorrente à Projeto do Mês) Damarium Alternative Server (1º Finalista do Projeto do Mês) Scripting: Simple Task (Function) Doremovecreatureinseconds(Cid, Seconds) Sistema De Reputação, Recompensa (Talkaction) Sistema M1 Até M6 + Tutorial De Edições. 76 Spells Pokemon Scripts Para Pokemon Online Getguildleadername(Guildname) Matar Player E Tirar Coração Os.date Downloads: (8.54) Pokeserver Pokemon Flash (Original) Real Server 3.6 (8.60) (Return Version) Mapping: Damarium Show-Off Instalando Rme 8.70 Mapa Da Semana #3 - ACABA AMANHÃ! PARTICIPE! Quer que seu tópico favorito apareça aqui? Use o botão "Eu Recomendo"! Clique aqui e saiba como.
  14. Bom hoje estou aqui para formar uma equipe para + um ot pokemon... sei que já tem muitos ots + o nosso sera diferente... como assim diferente, ele tera de inicio da 1° até a 2° geração dos pokes podendo dar fly ride surf com todos... Novos scripts inovadores (Desculpa não sita-los para não haver Copias de nossos scripts} Um pouco do desenvolvimento do Projeto Como no projeto sou somente eu ele não esta indo a mil... + ele já tem o que é de maior importância como fly 100% (Pelo ordem) surf (estou trocando ele) ride 100% (Pelo ordem) catch 100% go/back 100% Foto de quando equipa as balls, 100% Poke dex 100% Npc heal 100% ( só com hi e o poke pode tar fora da ball) loja de roupas 100% M's 1,2,3,4... 30% (Só o m1, m2, m6 completos sem os pokes da 2% Temporada) Pokemons 80% (falta balancear o life) e muito + Eu sou spriter e já adicionei todos os Pokes da 2° geração no client só falta por eles no ot... Recrutando Mappers (2/0) Scripters (3/0) spriters (2/1) client makers (1/0) é isso pessoal agradeço a quem puder ajudar
  15. Rennan159

    Power Of Ice

    Eae Pessoas. Bom hoje eu tava aqui vendo os topico no xtibia e vi muitas magias legais, e entao pensei em cria uma legal tambem. Claro ela não é lá aquelas coisas, mais ela chega ate a ser legal xD Bom Vamos la. Primeiramente vamos em Data/Spells/Attack Copiamos qualquer arquivo.lua e apagamos tudo oque tem la dentro e adicionamos o seguinte script: local combat1 = createCombatObject() setCombatParam(combat1, COMBAT_PARAM_TYPE, COMBAT_ICEDAMAGE) setCombatParam(combat1, COMBAT_PARAM_EFFECT, 43) setCombatFormula(combat1, COMBAT_FORMULA_LEVELMAGIC, -13, 1.5, -13, 10) local combat2 = createCombatObject() setCombatParam(combat2, COMBAT_PARAM_TYPE, COMBAT_ICEDAMAGE) setCombatParam(combat2, COMBAT_PARAM_EFFECT, 43) setCombatFormula(combat2, COMBAT_FORMULA_LEVELMAGIC, -13, 1.5, -13, 10) local combat3 = createCombatObject() setCombatParam(combat3, COMBAT_PARAM_TYPE, COMBAT_ICEDAMAGE) setCombatParam(combat3, COMBAT_PARAM_EFFECT, 43) setCombatFormula(combat3, COMBAT_FORMULA_LEVELMAGIC, -13, 1.5, -13, 10) local combat4 = createCombatObject() setCombatParam(combat4, COMBAT_PARAM_TYPE, COMBAT_ICEDAMAGE) setCombatParam(combat4, COMBAT_PARAM_EFFECT, 43) setCombatFormula(combat4, COMBAT_FORMULA_LEVELMAGIC, -13, 1.5, -13, 10) local combat5 = createCombatObject() setCombatParam(combat5, COMBAT_PARAM_TYPE, COMBAT_ICEDAMAGE) setCombatParam(combat5, COMBAT_PARAM_EFFECT, 43) setCombatFormula(combat5, COMBAT_FORMULA_LEVELMAGIC, -13, 1.5, -13, 10) local combat6 = createCombatObject() setCombatParam(combat6, COMBAT_PARAM_TYPE, COMBAT_ICEDAMAGE) setCombatParam(combat6, COMBAT_PARAM_EFFECT, 41) setCombatFormula(combat6, COMBAT_FORMULA_LEVELMAGIC, -13, 1.5, -13, 10) local combat7 = createCombatObject() setCombatParam(combat7, COMBAT_PARAM_TYPE, COMBAT_ICEDAMAGE) setCombatParam(combat7, COMBAT_PARAM_EFFECT, 41) setCombatFormula(combat7, COMBAT_FORMULA_LEVELMAGIC, -13, 1.5, -13, 10) local combat8 = createCombatObject() setCombatParam(combat8, COMBAT_PARAM_TYPE, COMBAT_ICEDAMAGE) setCombatParam(combat8, COMBAT_PARAM_EFFECT, 41) setCombatFormula(combat8, COMBAT_FORMULA_LEVELMAGIC, -13, 1.5, -13, 10) local combat9 = createCombatObject() setCombatParam(combat9, COMBAT_PARAM_TYPE, COMBAT_ICEDAMAGE) setCombatParam(combat9, COMBAT_PARAM_EFFECT, 41) setCombatFormula(combat9, COMBAT_FORMULA_LEVELMAGIC, -13, 1.5, -13, 10) local combat10 = createCombatObject() setCombatParam(combat10, COMBAT_PARAM_TYPE, COMBAT_ICEDAMAGE) setCombatParam(combat10, COMBAT_PARAM_EFFECT, 41) setCombatFormula(combat10, COMBAT_FORMULA_LEVELMAGIC, -13, 1.5, -13, 10) local combat11 = createCombatObject() setCombatParam(combat11, COMBAT_PARAM_TYPE, COMBAT_ICEDAMAGE) setCombatParam(combat11, COMBAT_PARAM_EFFECT, 52) setCombatFormula(combat11, COMBAT_FORMULA_LEVELMAGIC, -13, 1.5, -13, 10) arr1 = { {0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 1, 0, 1, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 2, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, } arr2 = { {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0}, {0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 2, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, } arr3 = { {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 1, 0, 0, 0, 0, 0, 0, 0, 1, 0}, {1, 0, 0, 0, 0, 2, 0, 0, 0, 0, 1}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, } arr4 = { {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 2, 0, 0, 0, 0, 0}, {0, 1, 0, 0, 0, 0, 0, 0, 0, 1, 0}, {0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, } arr5 = { {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 2, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0}, {0, 0, 0, 0, 1, 0, 1, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0}, } arr6 = { {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 2, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0}, {0, 0, 0, 0, 1, 0, 1, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0}, } arr7 = { {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 2, 0, 0, 0, 0, 0}, {0, 1, 0, 0, 0, 0, 0, 0, 0, 1, 0}, {0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, } arr8 = { {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 1, 0, 0, 0, 0, 0, 0, 0, 1, 0}, {1, 0, 0, 0, 0, 2, 0, 0, 0, 0, 1}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, } arr9 = { {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0}, {0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 2, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, } arr10 = { {0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 1, 0, 1, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 2, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, } arr11 = { {0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 1, 1, 1, 0, 0, 0, 0}, {0, 0, 0, 1, 1, 1, 1, 1, 0, 0, 0}, {0, 0, 1, 1, 1, 1, 1, 1, 1, 0, 0}, {0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0}, {1, 1, 1, 1, 1, 2, 1, 1, 1, 1, 1}, {0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0}, {0, 0, 1, 1, 1, 1, 1, 1, 1, 0, 0}, {0, 0, 0, 1, 1, 1, 1, 1, 0, 0, 0}, {0, 0, 0, 0, 1, 1, 1, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0}, } local area1 = createCombatArea(arr1) local area2 = createCombatArea(arr2) local area3 = createCombatArea(arr3) local area4 = createCombatArea(arr4) local area5 = createCombatArea(arr5) local area6 = createCombatArea(arr6) local area7 = createCombatArea(arr7) local area8 = createCombatArea(arr8) local area9 = createCombatArea(arr9) local area10 = createCombatArea(arr10) local area11 = createCombatArea(arr11) setCombatArea(combat1, area1) setCombatArea(combat2, area2) setCombatArea(combat3, area3) setCombatArea(combat4, area4) setCombatArea(combat5, area5) setCombatArea(combat6, area6) setCombatArea(combat7, area7) setCombatArea(combat8, area8) setCombatArea(combat9, area9) setCombatArea(combat10, area10) setCombatArea(combat11, area11) local function onCastSpell1(parameters) doCombat(parameters.cid, combat1, parameters.var) end local function onCastSpell2(parameters) doCombat(parameters.cid, combat2, parameters.var) end local function onCastSpell3(parameters) doCombat(parameters.cid, combat3, parameters.var) end local function onCastSpell4(parameters) doCombat(parameters.cid, combat4, parameters.var) end local function onCastSpell5(parameters) doCombat(parameters.cid, combat5, parameters.var) end local function onCastSpell6(parameters) doCombat(parameters.cid, combat6, parameters.var) end local function onCastSpell7(parameters) doCombat(parameters.cid, combat7, parameters.var) end local function onCastSpell8(parameters) doCombat(parameters.cid, combat8, parameters.var) end local function onCastSpell9(parameters) doCombat(parameters.cid, combat9, parameters.var) end local function onCastSpell10(parameters) doCombat(parameters.cid, combat10, parameters.var) end local function onCastSpell11(parameters) doCombat(parameters.cid, combat11, parameters.var) end function onCastSpell(cid, var) local parameters = { cid = cid, var = var} addEvent(onCastSpell1, 500, parameters) addEvent(onCastSpell2, 900, parameters) addEvent(onCastSpell3, 1200, parameters) addEvent(onCastSpell4, 1500, parameters) addEvent(onCastSpell5, 1800, parameters) addEvent(onCastSpell6, 2100, parameters) addEvent(onCastSpell7, 2400, parameters) addEvent(onCastSpell8, 2700, parameters) addEvent(onCastSpell9, 3000, parameters) addEvent(onCastSpell10, 3300, parameters) addEvent(onCastSpell11, 3600, parameters) return TRUE end Salve e feche. Não se esqueça de renomear o arquivo para "Power Of Ice" Feito isso vamos em Data/Spells/Spells.XML e Adicionamos a Seguinte Tag: <instant name="Power Of Ice" words="Power Of Ice" lvl="900" mana="1900" prem="1" needlearn="1" blockwalls="1" exhaustion="2000" event="script" value="attack/Power Of Ice.lua"> <vocation name="Druid"/> <vocation name="Elder Druid"/> </instant> Salve e feche Abaixo vao algumas ScreenShots pois nao consegui filma a magia (como é de lei) xP: Espero que vcs tenham gostado e PorFavor comente abaixo oque acharam Pois suas criticas e elogios é oque me ajuda a melhorar cada vez mais Créditos - CurseOfNightmare
  16. Bom pessoal, sou novo no Fórum, e não etendo nada de Scripts. 1º Meu pedido é o seguinte, gostaria de saber como faço pra um certo summon não poder ser atacado, por exemplo, mesmo com summon, os mobs ataquem diretamente o player. Preciso disso pois estou formulando um pet system pro meu servidor. 2º Ja aproveitando o tópico, tenho uma outra dúvida, gostaria de saber se tem como fazer oque estou pensando, é o seguinte, se tem como criar masks num outfit temporario :blink: Exemplo, o player usa uma talkaction e se transforma em um Dwarf (isso ja está pronto) no entano, esse Dwarf no meu servidor tem masks, ou seja da pra mudar as cores. Gostaria de saber se tem como o cara mudar a cor dele, enquanto estivesse transformado em dwarf, ou seja que esse dwarf aparecesse no "Set Outfit" somente quando ele estivesse transformado. Isso é impossivel? Só mechendo em sources? Desculpe se abusei, se puderem me ajudar serei grato. Obrigado!!!
  17. Algem Que EU Editar Esse Script ? plzz ? . . . \ / Este é um script Shots Cs, Quero que ele editou e Simulação do Sistema ele system do Créditos: Eu -->(DrakyLucas) Seu Efeito E De Explosion e eu só tiro um endereço :S eu quero ke algem edite esse script v como ele mock olha youtube /\ Graças. http://www.xtibia.com/forum/topic/143281-talk-cs-war-tibia-v2-atualizado-20102010/ function buy(cid,numero) return getPlayerStorageValue(cid,numero) end function onSay(cid,words,param) -- [nao mexa] = {distancia maxima,velocidade,delay entre os tiros, "msg animada" , math.random(min,max)} local arsenal = { [13251] = {4,200,2,"no Pé",math.random(1,8),"9X19MM SIDEARM"}, [13252] = {4,215,2,"no Braço",math.random(1,10),"KM .45 TACTICAL"}, [13253] = {4,215,2,"no Braço",math.random(1,10),"228 COMPACT "}, [13254] = {5,170,2,"na Perna",math.random(15,35),"NIGHT WALK .50C"}, [13255] = {5,175,2,"na Perna",math.random(15,35),"ES FIVE-SEVEN"}, [13261] = {6,220,5,"UGHHH",math.random(23,35),"LEONE 12 GALGUE SUPER"}, [13262] = {6,220,3,"UGHHH",math.random(15,30),"LEONE IG1265 AUTO"}, [13271] = {7,175,2,"no Pé",math.random(1,8),"SCHMIDT MACHINE"}, [13272] = {7,170,2,"no Braço",math.random(1,10),"KM SUB-MACHINE GUN"}, [13273] = {7,170,2,"no Pé",math.random(1,8),"KM UMP45"}, [13274] = {7,160,2,"no Braço",math.random(1,10),"ES C90"}, [13281] = {5,180,1.5,"no Peito",math.random(25,65),"CLARION 5.56"}, [13282] = {7,186,2,"no Peito",math.random(25,65),"SCHMIDT SCOUT"}, [13283] = {6,170,1.5,"Nut Shot",math.random(25,75),"MAVERICK M4A1"}, [13284] = {5,160,1.5,"no Peito",math.random(25,65),"BULLPUP"}, [13285] = {6,170,2,"Nut Shot",math.random(25,75),"KRIEG 550 COMMANDO"}, [13286] = {8,145,3,"Head Shot",math.random(80,100),"MAGNUM SNIPER RIFLE"}, [13291] = {7,165,8,"Errou",0,"M249"}, } local armamento = arsenal[getPlayerStorageValue(cid,13245)] if words == "!b" then doPlayerPopupFYI(cid, "Sell:" .. "\n1 - PISTOLS" .. "\n2 - SHOTGUNS" .. "\n3 - SMG" .. "\n4 - RIFLES" .. "\n5 - MACHINE GUNS" .. "\n" .. "\nSay '!b + number' -> example:" .. "\n!b1 for open PISTOLS Sellers." ) end if words == "!b1" then -- PISTOLS doPlayerPopupFYI(cid, "Sell:" .. "\n11 - 9X19MM SIDEARM --- 4000 GOLD COINS" .. "\n12 - KM .45 TACTICAL --- 5000 GOLD COINS" .. "\n13 - 228 COMPACT --- 6000 GOLD COINS" .. "\n14 - NIGHT WALK .50C --- 6500 GOLD COINS" .. "\n15 - ES FIVE-SEVEN --- 7500 GOLD COINS" .. "\n" .. "\nSay '!b + number' -> example:" .. "\n!b14 for buy NIGHT WALK .50C (DESERT EAGLE)." ) end if words == "!b2" then -- SHOTGUNS doPlayerPopupFYI(cid, "Sell:" .. "\n21 - LEONE 12 GALGUE SUPER --- 17000 GOLD COINS" .. "\n22 - LEONE IG1265 AUTO --- 30000 GOLD COINS" .. "\n" .. "\nSay '!b + number' -> example:" .. "\n!b21 for buy LEONE 12 GALGUE SUPER." ) end if words == "!b3" then -- SMG doPlayerPopupFYI(cid, "Sell:" .. "\n31 - SCHMIDT MACHINE --- 12500 GOLD COINS" .. "\n32 - KM SUB-MACHINE GUN --- 15000 GOLD COINS" .. "\n33 - KM UMP45 --- 17000 GOLD COINS" .. "\n34 - ES C90 --- 23500 GOLD COINS" .. "\n" .. "\nSay '!b + number' -> example:" .. "\n!b34 for buy ES C90." ) end if words == "!b4" then -- RILES doPlayerPopupFYI(cid, "Sell:" .. "\n41 - CLARION 5.56 --- 22500 GOLD COINS" .. "\n42 - SCHMIDT SCOUT --- 27500 GOLD COINS" .. "\n43 - MAVERICK M4A1 --- 31000 GOLD COINS" .. "\n44 - BULLPUP --- 35000 GOLD COINS" .. "\n45 - KRIEG 550 COMMANDO --- 42000 GOLD COINS" .. "\n46 - MAGNUM SNIPER RIFLE --- 47500 GOLD COINS" .. "\n" .. "\nSay '!b + number' -> example:" .. "\n!b46 for buy MAGNUM SNIPER RIFLE(AWP)." ) end if words == "!b5" then -- RILES doPlayerPopupFYI(cid, "Sell:" .. "\n51 - M249 --- 57500 GOLD COINS" .. "\n" .. "\nSay '!b + number' -> example:" .. "\n!b51 for buy M249(RAMBO)." ) end local comprar = { ["!b11"] = {13251,4000}, ["!b12"] = {13252,5000}, ["!b13"] = {13253,6000}, ["!b14"] = {13254,6500}, ["!b15"] = {13255,7500}, ["!b21"] = {13261,17000}, ["!b22"] = {13262,30000}, ["!b31"] = {13271,12500}, ["!b32"] = {13272,15000}, ["!b33"] = {13273,17000}, ["!b34"] = {13274,23500}, ["!b41"] = {13281,22500}, ["!b42"] = {13282,27500}, ["!b43"] = {13283,31000}, ["!b44"] = {13284,35000}, ["!b45"] = {13285,42000}, ["!b46"] = {13286,47500}, ["!b51"] = {13291,57500}, } local buyarmas = comprar[words] if buyarmas ~= nil then if buy(cid,13251) >= 1 or buy(cid,13252) >= 1 or buy(cid,13253) >= 1 or buy(cid,13254) >= 1 or buy(cid,13255) >= 1 or buy(cid,13261) >= 1 or buy(cid,13262) >= 1 or buy(cid,13271) >= 1 or buy(cid,13272) >= 1 or buy(cid,13273) >= 1 or buy(cid,13274) >= 1 or buy(cid,13281) >= 1 or buy(cid,13282) >= 1 or buy(cid,13283) >= 1 or buy(cid,13284) >= 1 or buy(cid,13285) >= 1 or buy(cid,13286) >= 1 or buy(cid,13291) >= 1 then return doPlayerSendTextMessage(cid,MESSAGE_STATUS_CONSOLE_BLUE,"Voce nao pode comprar mais armas estando com uma. digite !g para se livrar de sua arma.") end if doPlayerRemoveMoney(cid, buyarmas[1]) == FALSE then return doPlayerSendTextMessage(cid,MESSAGE_STATUS_CONSOLE_BLUE,"Você tem que ter "..buyarmas[2].." gold coins.") end setPlayerStorageValue(cid,buyarmas[1],1) -- teste -- setPlayerStorageValue(cid,13245,buyarmas[1]) doPlayerSendTextMessage(cid,MESSAGE_STATUS_CONSOLE_BLUE,"Você comprou uma arma.") end if words == "!g" then if buy(cid,13251) >= 1 or buy(cid,13252) >= 1 or buy(cid,13253) >= 1 or buy(cid,13254) >= 1 or buy(cid,13255) >= 1 or buy(cid,13261) >= 1 or buy(cid,13262) >= 1 or buy(cid,13271) >= 1 or buy(cid,13272) >= 1 or buy(cid,13273) >= 1 or buy(cid,13274) >= 1 or buy(cid,13281) >= 1 or buy(cid,13282) >= 1 or buy(cid,13283) >= 1 or buy(cid,13284) >= 1 or buy(cid,13285) >= 1 or buy(cid,13286) >= 1 or buy(cid,13291) >= 1 then setPlayerStorageValue(cid,13251,-1) setPlayerStorageValue(cid,13252,-1) setPlayerStorageValue(cid,13253,-1) setPlayerStorageValue(cid,13254,-1) setPlayerStorageValue(cid,13255,-1) setPlayerStorageValue(cid,13261,-1) setPlayerStorageValue(cid,13262,-1) setPlayerStorageValue(cid,13271,-1) setPlayerStorageValue(cid,13272,-1) setPlayerStorageValue(cid,13273,-1) setPlayerStorageValue(cid,13274,-1) setPlayerStorageValue(cid,13281,-1) setPlayerStorageValue(cid,13282,-1) setPlayerStorageValue(cid,13283,-1) setPlayerStorageValue(cid,13284,-1) setPlayerStorageValue(cid,13285,-1) setPlayerStorageValue(cid,13286,-1) setPlayerStorageValue(cid,13291,-1) setPlayerStorageValue(cid,13245,-1) doPlayerSendTextMessage(cid,MESSAGE_STATUS_CONSOLE_BLUE,"Você se livrou de sua arma.") else return doPlayerSendTextMessage(cid,MESSAGE_STATUS_CONSOLE_BLUE,"Você não tinha arma.") end end if words == "!atirar" then local storage = 13243 if armamento == nil then return doPlayerSendCancel(cid,"Voce precisa comprar uma arma, digite !b") end if getTilePzInfo(getCreaturePosition(cid)) == TRUE then return doPlayerSendCancel(cid,"Voce só pode atirar fora da protection zone.") end if os.time() - getPlayerStorageValue(cid,storage) <= armamento[3] then return doSendAnimatedText(getCreaturePosition(cid), "Reloading", math.random(1,255)) end setPlayerStorageValue(cid,storage,os.time()) -- SCRIPT BY DRAKY LUCAS -- -- [de 1 a 10] = {"fala",math.random(dano minimo,dano maximo) em percentagens}, local falas = { [1] = {"Head Shot",math.random(80,100)}, [2] = {"Nut Shot",math.random(25,35)}, [3] = {"na Perna",math.random(10,25)}, [4] = {"no Peito",math.random(50,75)}, [5] = {"no Pé",math.random(1,10)}, } local i = 1 local tempo = armamento[2] local max = armamento[1] -- numero de repetiçoes repeat local direction = getPlayerLookDir(cid) position = getCreaturePosition(cid) if(direction == NORTH) then position.y = position.y - (i/tempo) elseif(direction == SOUTH) then position.y = position.y + (i/tempo) + 1 elseif(direction == WEST) then position.x = position.x - (i/tempo) elseif(direction == EAST) then position.x = position.x + (i/tempo) + 1 end position.stackpos = 253 local pos = {x = position.x,y = position.y, z = position.z} pos.stackpos = 253 if getTilePzInfo(pos) == TRUE then break end if getThingfromPos(pos).itemid > 0 then local fala = falas[math.random(1,10)] if fala == nil then if addEvent(isPlayer,i,getThingfromPos(pos).uid) then addEvent(doCreatureAddHealth,i,getThingfromPos(pos).uid,-(getCreatureMaxHealth(getThingfromPos(pos).uid)/100)* armamento[5]) addEvent(doSendMagicEffect,i,pos,64) addEvent(doSendAnimatedText,i,pos, armamento[4], math.random(1,255)) break end end if addEvent(isPlayer,i,getThingfromPos(pos).uid) then addEvent(doCreatureAddHealth,i,getThingfromPos(pos).uid,-(getCreatureMaxHealth(getThingfromPos(pos).uid)/100)* fala[2]) addEvent(doSendMagicEffect,i,pos,64) addEvent(doSendAnimatedText,i,pos, fala[1], math.random(1,255)) break end break end addEvent(doSendMagicEffect,i,pos, 4) i = i + tempo until i >= tempo * max end -- do if word == atirar.. if words == "!arma" then if getPlayerStorageValue(cid,13245) <= 0 then return doPlayerSendTextMessage(cid,25,"Você não tem arma.") end doPlayerSendTextMessage(cid,25,"Você está usando uma "..armamento[6]..".") end return TRUE end
  18. castanha91

    [Ajuda]Npc Troca

    Xtibianos venho pedir ajuda nesse script do npc de troca, quero que ele apenas faça a troca uma unica vez, toda vez que falo trocar ele sempre fica trocando. function creatureSayCallback(cid, type, msg) if(not npcHandler:isFocused(cid)) then return false end if msgcontains(msg, "trocar") then if getPlayerStorageValue(cid,574226) ~= 1 then if playerHaveItems(cid, {8853, 2694}) then doPlayerRemoveItems(cid, {8853, 2694}, 30) doPlayerAddItem(cid, 7884, 1) setPlayerStorageValue(cid, 574226, 1) else selfSay("Voce nao tem os items nescessarios para a quest.") end end end return true end Como coloco para trocar apenas uma vez? Obrigado.
  19. dihloko0

    Duvida De Script

    GALERA CRIEI NOVO OT. MONTEI NOVA PROMOTION E NOVAS VOCATIONS. SO QUE AS VOCATIONS NOVAS QUANDO EU VOU USAR EX: POTION DE SORCERER EU NAO CONSIGO. QUERIA SABER COMO POSSO LIBERAR AS POTIONS DE KINA PARA ULTRA KINA E DE SORCERER PARA ULTRA SORCERER. TIBIA 8.60 (NAO POSSUI O FUNCTION.LUA)
  20. Olá, tudo bem ? Eu de nenovo aqui (: Bom desta vez vim pedir a vocês que possam me passar algumas scripts de Spells que o ataque sai de acordo com magic level. Exemplo: Level: 100 Magic level: 50 Exevo Gran Mas Frigo : 500 Level: 100 Magic level: 100 Exevo Gran Mas Frigo : 1000 Pesso scripts que de acordo com o Magic Level o ataque sai mais alto de acordo com o Magic Level. As spells são: Exevo Mas San, Exori, Exori Gran, Exori Con, Exori Hur,Exori Mas, Exevo Gran Mas Vis, Exevo Gran Mas Frigo, Exevo Gran Mas Flam. Se puderem me mandar algumas runas tambem: Suddeh Death Rune, Explosion Rune, Hmm Rune, Ultimate Healing Rune. Se eu esqueci alguma Spell ou runa importante para o jogo porfavor coloquem aqui assim mesmo que eu irei usar, Meu server é o Alissow Server se suas spells e runas estão toda Equilibrada e da certo no meu Alissow porfavor pesso que me passem, o meu server é EXP Stages. Não passem nenhuma Spell nova ou editada, Abraços e obrigado.
  21. Oque Ele Faz: Quando vc botar o spellbook na mao. Ele vai te dar uma quantidade X de Mana ou Health. ~Começando~ Nesse Exemplo eu Utilizei o SpellBook da Inquisition [ [iD: 8918] ] Entao vc devera escolher o Item que vc quer usar para dar health ou mana. Pronto Escolheu ? Agora guarde o ID desse item ~Configurando~ Va Para \data\movements\scripts crie um arquivo lua chamado spellbook. Cole isso Dentro function onEquip(cid, item, slot) setPlayerStorageValue(cid, 19853, -1) doHealPlayer(cid) return TRUE end function doHealPlayer(cid) local delay = 5 -- if getPlayerStorageValue(cid, 19853) == -1 then doCreatureAddHeatlh(cid, 100) addEvent(doHealPlayer, delay*1000, cid) end return TRUE end function onDeEquip(cid, item, slot) setPlayerStorageValue(cid, 19853, 1) return TRUE end Aqui vc Escolhera: doCreatureAddHeatlh(cid, 100) - o Quanto De Health , Se quiser que heale mana: doCreatureAddMana(cid, 100) local delay = 5 o tempo em segundos. Salve e Feche! Adicione isso em movements.xml <movevent type="Equip" itemid="8918" slot="shield" event="script" value="spellbook.lua"/> <movevent type="DeEquip" itemid="8918" slot="shield" event="script" value="spellbook.lua"/> slot="shield": Aqui sera para onde o item sera movido, nesse exemplo Shield value="spellbook.lua"/>: Nome do Arquivo Lua que Vc Crio. itemid="8918": ID do seu Item Abraços Se Gostaram ou Ajudei +REP
  22. Bom, eu to tentando fazer uns testes aki num servidor de poketibia, daí td bem,minha intensão era fazer um servidor em que vc não é o treinador, mas sim o pokémon, então eu fui testar o account manager pra ver noq dava, daí na hora de escolher a vocação, ou no caso, o tipo de pokémon que o futuro jogador seria aparece la: "Sorry your character couldn't be created, try again later." ou algo do tipo... qualquer coisa vo postar o vocations.xml pra vcs terem uma ideia: <?xml version="1.0" encoding="UTF-8"?> <vocations> <vocation id="0" name="None" description="none" needpremium="0" gaincap="5" gainhp="5" gainmana="5" gainhpticks="6" gainhpamount="1" gainmanaticks="6" gainmanaamount="1" manamultiplier="4.0" attackspeed="2000" soulmax="100" gainsoulticks="120" fromvoc="0" attackable="no"> <formula meleeDamage="1.0" distDamage="1.0" wandDamage="1.0" magDamage="1.0" magHealingDamage="1.0" defense="1.0" magDefense="1.0" armor="1.0"/> <skill fist="1.5" club="2.0" sword="2.0" axe="2.0" distance="2.0" shielding="1.5" fishing="1.1" experience="1.0"/> </vocation> <vocation id="1" name="Bulbasaur" description="a bulbasaur" needpremium="0" gaincap="10" gainhp="50" gainmana="25" gainhpticks="5" gainhpamount="15" gainmanaticks="1" gainmanaamount="5" manamultiplier="1.1" attackspeed="80000" soulmax="100" gainsoulticks="120" fromvoc="1"> <formula meleeDamage="1.0" distDamage="1.0" wandDamage="1.0" magDamage="1.0" magHealingDamage="1.0" defense="1.0" magDefense="1.0" armor="1.0"/> <skill fist="1.1" club="1.1" sword="1.1" axe="1.1" distance="1.1" shielding="1.1" fishing="1.1" experience="2.0"/> </vocation> <vocation id="2" name="Squirtle" description="a squirtle" needpremium="0" gaincap="10" gainhp="50" gainmana="25" gainhpticks="5" gainhpamount="15" gainmanaticks="1" gainmanaamount="5" manamultiplier="1.1" attackspeed="80000" soulmax="100" gainsoulticks="120" fromvoc="2"> <formula meleeDamage="1.0" distDamage="1.0" wandDamage="1.0" magDamage="1.0" magHealingDamage="1.0" defense="1.0" magDefense="1.0" armor="1.0"/> <skill fist="1.1" club="1.1" sword="1.1" axe="1.1" distance="1.1" shielding="1.1" fishing="1.1" experience="2.0"/> </vocation> <vocation id="3" name="Charmander" description="a charmander" needpremium="0" gaincap="10" gainhp="50" gainmana="25" gainhpticks="5" gainhpamount="15" gainmanaticks="1" gainmanaamount="5" manamultiplier="1.1" attackspeed="80000" soulmax="100" gainsoulticks="120" fromvoc="3"> <formula meleeDamage="1.0" distDamage="1.0" wandDamage="1.0" magDamage="1.0" magHealingDamage="1.0" defense="1.0" magDefense="1.0" armor="1.0"/> <skill fist="1.1" club="1.1" sword="1.1" axe="1.1" distance="1.1" shielding="1.1" fishing="1.1" experience="2.0"/> </vocation> <vocation id="4" name="Pichu" description="a pichu" needpremium="0" gaincap="10" gainhp="50" gainmana="25" gainhpticks="5" gainhpamount="15" gainmanaticks="1" gainmanaamount="5" manamultiplier="1.1" attackspeed="80000" soulmax="100" gainsoulticks="120" fromvoc="4"> <formula meleeDamage="1.0" distDamage="1.0" wandDamage="1.0" magDamage="1.0" magHealingDamage="1.0" defense="1.0" magDefense="1.0" armor="1.0"/> <skill fist="1.1" club="1.1" sword="1.1" axe="1.1" distance="1.1" shielding="1.1" fishing="1.1" experience="2.0"/> </vocation> <!--Primeira Evolucao--> <vocation id="5" name="Ivysaur" description="an ivysaur" needpremium="0" gaincap="10" gainhp="50" gainmana="25" gainhpticks="5" gainhpamount="15" gainmanaticks="1" gainmanaamount="5" manamultiplier="1.1" attackspeed="80000" soulmax="100" gainsoulticks="120" fromvoc="1" lessloss="30"> <formula meleeDamage="1.0" distDamage="1.0" wandDamage="1.0" magDamage="1.0" magHealingDamage="1.0" defense="1.0" magDefense="1.0" armor="1.0"/> <skill fist="1.1" club="1.1" sword="1.1" axe="1.1" distance="1.1" shielding="1.1" fishing="1.1" experience="2.0"/> </vocation> <vocation id="6" name="Wartortle" description="a wartortle" needpremium="0" gaincap="10" gainhp="50" gainmana="25" gainhpticks="5" gainhpamount="15" gainmanaticks="1" gainmanaamount="5" manamultiplier="1.1" attackspeed="80000" soulmax="100" gainsoulticks="120" fromvoc="2" lessloss="30"> <formula meleeDamage="1.0" distDamage="1.0" wandDamage="1.0" magDamage="1.0" magHealingDamage="1.0" defense="1.0" magDefense="1.0" armor="1.0"/> <skill fist="1.1" club="1.1" sword="1.1" axe="1.1" distance="1.1" shielding="1.1" fishing="1.1" experience="2.0"/> </vocation> <vocation id="7" name="Charmeleon" description="a charmeleon" needpremium="0" gaincap="10" gainhp="50" gainmana="25" gainhpticks="5" gainhpamount="15" gainmanaticks="1" gainmanaamount="5" manamultiplier="1.1" attackspeed="80000" soulmax="100" gainsoulticks="120" fromvoc="3" lessloss="30"> <formula meleeDamage="1.0" distDamage="1.0" wandDamage="1.0" magDamage="1.0" magHealingDamage="1.0" defense="1.0" magDefense="1.0" armor="1.0"/> <skill fist="1.1" club="1.1" sword="1.1" axe="1.1" distance="1.1" shielding="1.1" fishing="1.1" experience="2.0"/> </vocation> <vocation id="8" name="Pikachu" description="a pikachu" needpremium="0" gaincap="10" gainhp="50" gainmana="25" gainhpticks="5" gainhpamount="15" gainmanaticks="1" gainmanaamount="5" manamultiplier="1.1" attackspeed="80000" soulmax="100" gainsoulticks="120" fromvoc="4" lessloss="30"> <formula meleeDamage="1.0" distDamage="1.0" wandDamage="1.0" magDamage="1.0" magHealingDamage="1.0" defense="1.0" magDefense="1.0" armor="1.0"/> <skill fist="1.1" club="1.1" sword="1.1" axe="1.1" distance="1.1" shielding="1.1" fishing="1.1" experience="2.0"/> </vocation> <!--Segunda Evolucao--> <vocation id="9" name="Venusaur" description="a venusaur" needpremium="0" gaincap="10" gainhp="50" gainmana="25" gainhpticks="5" gainhpamount="15" gainmanaticks="1" gainmanaamount="5" manamultiplier="1.1" attackspeed="80000" soulmax="100" gainsoulticks="120" fromvoc="5" lessloss="50"> <formula meleeDamage="1.0" distDamage="1.0" wandDamage="1.0" magDamage="1.0" magHealingDamage="1.0" defense="1.0" magDefense="1.0" armor="1.0"/> <skill fist="1.1" club="1.1" sword="1.1" axe="1.1" distance="1.1" shielding="1.1" fishing="1.1" experience="2.0"/> </vocation> <vocation id="10" name="Blastoise" description="a blastoise" needpremium="0" gaincap="10" gainhp="50" gainmana="25" gainhpticks="5" gainhpamount="15" gainmanaticks="1" gainmanaamount="5" manamultiplier="1.1" attackspeed="80000" soulmax="100" gainsoulticks="120" fromvoc="6" lessloss="50"> <formula meleeDamage="1.0" distDamage="1.0" wandDamage="1.0" magDamage="1.0" magHealingDamage="1.0" defense="1.0" magDefense="1.0" armor="1.0"/> <skill fist="1.1" club="1.1" sword="1.1" axe="1.1" distance="1.1" shielding="1.1" fishing="1.1" experience="2.0"/> </vocation> <vocation id="11" name="Charizard" description="a charizard" needpremium="0" gaincap="10" gainhp="50" gainmana="25" gainhpticks="5" gainhpamount="15" gainmanaticks="1" gainmanaamount="5" manamultiplier="1.1" attackspeed="80000" soulmax="100" gainsoulticks="120" fromvoc="7" lessloss="50"> <formula meleeDamage="1.0" distDamage="1.0" wandDamage="1.0" magDamage="1.0" magHealingDamage="1.0" defense="1.0" magDefense="1.0" armor="1.0"/> <skill fist="1.1" club="1.1" sword="1.1" axe="1.1" distance="1.1" shielding="1.1" fishing="1.1" experience="2.0"/> </vocation> <vocation id="12" name="Raichu" description="a raichu" needpremium="0" gaincap="10" gainhp="50" gainmana="25" gainhpticks="5" gainhpamount="15" gainmanaticks="1" gainmanaamount="5" manamultiplier="1.1" attackspeed="80000" soulmax="100" gainsoulticks="120" fromvoc="8" lessloss="50"> <formula meleeDamage="1.0" distDamage="1.0" wandDamage="1.0" magDamage="1.0" magHealingDamage="1.0" defense="1.0" magDefense="1.0" armor="1.0"/> <skill fist="1.1" club="1.1" sword="1.1" axe="1.1" distance="1.1" shielding="1.1" fishing="1.1" experience="2.0"/> </vocation> </vocations> qualquer coisa me desculpem este é meu primeiro post grato pela ajuda '-'
  23. Eliedervicente

    Bug No Attack

    Tipo.. Meu server é 8.60 e tem um bug que quando a gente coloca attack em algum player ou monster, e sai da tela fica comos e tivesse atakando, ou seja eu volto ele esta como attack mas nao ataka ele esta totalmente bugado.. Me ajudem plx.. tbm preciso de scripter para quando matar um apocalypse aparece um teleport por 10 segundos dps some.. Thank :XTibia_smile:
  24. Seguindo padrão de postagem: Tipo do script: Action Protocolo (versão do Tibia): 8.60 Servidor utilizado: New Baiak Yourots - TFS Nível de experiência: Facil Adicionais/Informações: Quero um sitema igual da anihi que teletransporte 4 players de dertminada pos para outra pos puxando uma alavanca, mais sem sumonar nenhum monster. Duvidas mande PM.
  25. Tipo No movements tem uns que quando voce passa por cima tipo que sai um fogo ou etc e a palavra! Exemplo:formigueiro! voce passa por cima, e fala assim Ai!Ui!, e sai um fogo embaixo de voce! Eu Gostaria De Que Ficace Saindo isso do tp ! Tipo Tp Falante! So que no lugar das palavras é um magic efeito! Quem Ajudar Rep+
×
×
  • Criar Novo...