345sat

Simples pegar Shiny Porygon 2043-351=1692, todos fly vc tem quer diminuir 351 para fucionar agora voçê vai no servido/data/lib/configuration.lua pronto adicionar isso embaixo flys = { ["Shiny Porygon"] = {300, 1692}, -- Shiny Porygon agora quer fucionou rep

function onSay(cid, words, param, channel) local store = 19290 -- storage q salva o delay local delay = 10 -- tempo em segundos de dela local tid = cid if(param ~= '') then tid = getPlayerByNameWildcard(param) if(not tid or (isPlayerGhost(tid) and getPlayerGhostAccess(tid) > getPlayerGhostAccess(cid))) then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Player " .. param .. " not found.") return true end end local pos = getPlayerTown(tid) local tmp = getTownName(pos) if(not tmp) then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Home town does not exists.") return true end pos = getTownTemplePosition(pos) if(not pos or isInArray({pos.x, pos.y}, 0)) then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Wrong temple position for town " .. tmp .. ".") return true end if getPlayerStorageValue(cid, store) - os.time() <= 0 then setPlayerStorageValue(cid, store, os.time() + delay) doPlayerSendCancel(cid, "Vc Tem Quer Espera ".. getPlayerStorageValue(cid, store) - os.time() .." second(s) to cast it again.") end pos = getClosestFreeTile(tid, pos) if(not pos or isInArray({pos.x, pos.y}, 0)) then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Destination not reachable.") return true end tmp = getCreaturePosition(tid) if(doTeleportThing(tid, pos, true) and not isPlayerGhost(tid)) then doSendMagicEffect(tmp, CONST_ME_POFF) doSendMagicEffect(pos, CONST_ME_TELEPORT) end return true end tag <talkaction log="yes" words="!cp" access="1" event="script" value="teleportmaster.lua"/>

mandar script? para eu editar aqui

Servido de Poketibia?

porque queria para tirar 1 bug do servido meu

Queria 1 Script Quando Player Entrar em Algum Portal ele deslogar do char. Para Servido De Poketibia

poderia me passar via chat?

poderia mandar pelo chat o arquivo pokemons.lua spanw.lua

local function BikeSpeedOn(cid, t) setPlayerStorageValue(cid, t.s, t.speed) doChangeSpeed(cid, -getCreatureSpeed(cid)) doChangeSpeed(cid, t.speed) end local function BikeSpeedOff(cid, t) setPlayerStorageValue(cid, t.s, -1) end function onUse(cid, item, fromPosition, itemEx, toPosition) local pos = getThingPos(cid) local t = {text='Mount, bike!', dtext='Demount, bike!', s=5700, speed = 1675} if getPlayerStorageValue(cid, t.s) <= 0 then doSendMagicEffect(pos, 177) doCreatureSay(cid, t.text, 19) doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_RED, 'You have mounted in a bike.') BikeSpeedOn(cid, t) if getPlayerSex(cid) == 1 then doSetCreatureOutfit(cid, {lookType = 738}, -1) else doSetCreatureOutfit(cid, {lookType = 737}, -1) end else if getPlayerStorageValue(cid, 17001) == 1 or getPlayerStorageValue(cid, 63215) == 1 or getPlayerStorageValue(cid, 17000) == 1 then doPlayerSendCancel(cid, "You can't use bike while ride/fly/surf.") return true end doSendMagicEffect(pos, 177) doCreatureSay(cid, t.dtext, 19) doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_RED, 'You haven demouted of a bike.') BikeSpeedOff(cid, t) doRemoveCondition(cid, CONDITION_OUTFIT) end return true end Testar Assim Não Fucionar sou vim chat

Isso esta acontecendo quando jogou a portrait no chão. [29/06/2015 19:59:27] [Error - MoveEvents Interface] [29/06/2015 19:59:27] data/movements/scripts/portrait.lua:onDeEquip [29/06/2015 19:59:27] Description: [29/06/2015 19:59:27] (luaDoTransformItem) Item not found meu script portrait.lua function onEquip (cid, item, slot) if not cid then return true end if item.uid <= 0 then return true end if not getItemAttribute(item.uid, "poke") then return true end for i, x in pairs(fotos) do if string.lower(getItemAttribute(item.uid, "poke")) == string.lower(i) then doTransformItem(getPlayerSlotItem(cid, 7).uid, fotos) return true end end end function onDeEquip(cid, item, slot) if not cid then return true end if item.uid <= 0 then return true end if not getItemAttribute(item.uid, "poke") then return true end doTransformItem(getPlayerSlotItem(cid, CONST_SLOT_LEGS).uid, 2395) end

sim,configurei no rmes quando eu subir em cimar do portal não teleporta

oi , Hoje Estou com um Problema meu teletransporte NÃO ESTA conseguindo teleporta menhun jogador Como conseguior Tirar Esse erro

Removido!

me add skype rue472 vou ajudar vc

sou liberar 2 portas no seu roteador 7171 tcp 7172 tcp com seu ip depois você conseguira tirar hamachi,ipchanger pelo no-ip

script,maper Skype:rue472

tem Skype me add rue472 vou ajudar vc

não sem error na distro

agora não esta retirando o item

qual seria o error dessa script quer estou fazendo esta dando esse error na distro [27/07/2015 19:37:35] [Error - LuaScriptInterface::loadFile] data/actions/scripts/Super Quest.lua:4: '}' expected near 'y' [27/07/2015 19:37:35] [Warning - Event::loadScript] Cannot load script (data/actions/scripts/Super Quest.lua) [27/07/2015 19:37:35] data/actions/scripts/Super Quest.lua:4: '}' expected near 'y' script function onUse(cid, item, frompos, item2, topos) local items = {2318, 2319, 2159} -- id dos items local count = 1 -- quantidade de items a serem retirados local door = {x=492 y=897 z=7, stackpos=1} local ddoor = getThingfromPos(door) local verify = 0 --- NÃO MEXA AQUI if item.uid == 8492 then if item2.uid == itemU then if ddoor.itemid ~= verify then doTransformItem(ddoor.uid,open_door) addEvent(close,pausa,door) end else doPlayerSendCancel(cid,"Vc Precisar De Todos Os Items") end return end for u = 1, #items do doPlayerRemoveItem(cid, items, count) doTransformItem(ddoor.uid,open_door) doPlayerSendTextMessage(cid, 20, "Boa Sorte!") return false end end

corrigir agora. -- Script feito por {LuizMachado} ou {345sat}.ajudar de by {AnnaFeeh}. local config = { level = 15, -- Aqui level para passar pela porta } function onUse(cid, item, frompos, item2, topos) if getPlayerLevel(cid, config.level) then if isPremium(cid) == FALSE then doTeleportThing(cid, fromPosition, false) doSendMagicEffect(position, CONST_ME_MAGIC_BLUE) else return doPlayerSendCancel(cid, "Vc nao é premium, Vaza.") -- Frase para quem não tem vip end else doPlayerSendCancel(cid, "Sair Daqui Seu Noob vc não tem lvl para entra!") -- Segunda Mensagem quer Ele Não tiver Level end return true end

1 primeiramente eu tentei postar na areá de script + não conseguir administrador poderia postar na area de script. Essa E minha 4 script. Como Fucionar Para Passar Pela Porta Precisar de level 15 + vip + eu não botei true sou vc botar. -- Script Feito por {LuizMachado}ou{345sat} 4 Script. local config = { local level =15 -- Aqui level para passar pela porta local premium = false -- True Para Porta sou Abrir Com vip } function onUse(cid, item, frompos, item2, topos) if getPlayerLevel(cid) >= 15 then -- botar tambem aqui level para passar pela porta if not isPremium(cid) then doPlayerSendCancel(cid, "Vc nao é premium, Vaza.") -- Frase para quem não tem vip return doTeleportThing(cid, topos) return doPlayerSendCancel(cid, "É NECESSARIO LEVEL 15+ PARA PASSAR PELA PORTA!") return true end

meu esta dando 1 error

Meu Nome e Luiz Meu Skype:rue472 estou recrutando para minha equipe 1 maper:quer fez 1 mapa ja pronto 1 scripts: QUER NÃO SEICHA CTRL C + CTRL V oque tem sistema de addons 50% focando igual otpokemon antigo pokemon and addons igual otpokemon servido sera sem hamachi e ip changer Servido com soucer + tarde vou postar 1 alguns prints

[27/05/2015 19:37:26] [Warning - Monster::Monster] Unknown event name - Spawn local shinys = { "Bulbasaur" , "Ivysaur" , "Venusaur" , "Charmander" , "Charmeleon" , "Charizard" , "Squirtle" , "Wartortle" , "Blastoise" , "Caterpie" , "Metapod" , "Butterfree" , "Weedle" , "Kakuna" , "Beedrill" , "Pidgey" , "Pidgeotto" , "Pidgeot" , "Rattata" , "Raticate" , "Spearow" , "Fearow" , "Ekans" , "Arbok" , "Pikachu" , "Raichu" , "Sandshrew" , "Sandslash" , "Nidoran female" , "Nidorina" , "Nidoqueen" , "Nidoran male" , "Nidorino" , "Nidoking" , "Clefairy" , "Clefable" , "Vulpix" , "Ninetales" , "Jigglypuff" , "Wigglytuff" , "Zubat" , "Golbat" , "Oddish" , "Gloom" , "Vileplume" , "Paras" , "Parasect" , "Venonat" , "Venomoth" , "Diglett" , "Dugtrio" , "Meowth" , "Persian" , "Psyduck" , "Golduck" , "Mankey" , "Primeape" , "Growlithe" , "Arcanine" , "Poliwag" , "Poliwhirl" , "Poliwrath" , "Abra" , "Kadabra" , "Alakazam" , "Machop" , "Machoke" , "Machamp" , "Bellsprout" , "Weepinbell" , "Victreebel" , "Tentacool" , "Tentacruel" , "Geodude" , "Graveler" , "Golem" , "Ponyta" , "Rapidash" , "Slowpoke" , "Slowbro" , "Magnemite" , "Magneton" ," Farfetch'd" , "Doduo" , "Dodrio" , "Seel" , "Dewgong" , "Grimer" , "Muk" , "Shellder" , "Cloyster" , "Gastly" , "Haunter" , "Gengar" , "Onix" , "Drowzee" , "Hypno" , "Krabby" , "Kingler" , "Voltorb" , "Electrode" , "Exeggcute" , "Exeggutor" , "Cubone" , "Marowak" , "Hitmonlee" , "Hitmonchan" , "Lickitung" , "Koffing" , "Weezing" , "Rhyhorn" , "Rhydon" , "Chansey" , "Tangela" , "Kangaskhan" , "Horsea" , "Seadra" , "Goldeen" , "Seaking" , "Staryu" , "Starmie" , "Mr. mime" , "Scyther" , "Jynx" , "Electabuzz" , "Magmar" , "Pinsir" , "Tauros" , "Magikarp" , "Gyarados" , "Lapras" , "Ditto" , "Eevee" , "Vaporeon" , "Jolteon" , "Flareon" , "Porygon" , "Omanyte" , "Omastar" , "Kabuto" , "Kabutops" , "Aerodactyl" ," Snorlax" , "Dratini" , "Dragonair" , "Dragonite" , "Chikorita" , "Bayleef" , "Meganium" , "Cyndaquil" , "Quilava" , "Typhlosion" , "Totodile" , "Croconaw" , "Feraligatr" , "Sentret" , "Furret" , "Hoothoot" , "Noctowl" , "Ledyba" , "Ledian" , "Spinarak" , "Ariados" , "Crobat" , "Chinchou" , "Lanturn" , "Pichu" , "Cleffa" , "Igglybuff" , "Togepi" , "Togetic" , "Natu" , "Xatu" , "Mareep" , "Flaaffy" , "Ampharos" , "Bellossom" , "Marill" , "Azumarill" , "Sudowoodo" , "Politoed" , "Hoppip" , "Skiploom" , "Jumpluff" , "Aipom" , "Sunkern" , "Sunflora" , "Yanma" , "Wooper" , "Quagsire" , "Espeon" , "Umbreon" , "Murkrow" , "Slowking" , "Misdreavus" , "Unown" , "Wobbuffet" , "Girafarig" , "Pineco" , "Forretress" , "Dunsparce" , "Gligar" , "Steelix" , "Snubbull" , "Granbull" , "Qwilfish" , "Scizor" , "Shuckle" , "Heracross" , "Sneasel" , "Teddiursa" , "Ursaring" , "Slugma" , "Magcargo" , "Swinub" , "Piloswine" , "Corsola" , "Remoraid" , "Octillery" , "Delibird" , "Mantine" , "Skarmory" , "Houndour" , "Houndoom" , "Kingdra" , "Phanpy" , "Donphan" , "Porygon2" , "Stantler" , "Smeargle" , "Tyrogue" , "Hitmontop" , "Smoochum" , "Elekid" , "Magby" , "Miltank" , "Blissey" , "Larvitar" , "Pupitar" , "Tyranitar" } local raros = {"Articuno" , "Zapdos" , "Moltres" , "Mewtwo" , "Mew" , "Raikou" , "Entei" , "Suicune" , "Lugia" , "Ho-oh" , "Celebi", "Rayquaza"} --alterado v2.5 local function ShinyName(cid) if isCreature(cid) then if string.find(tostring(getCreatureName(cid)), "Shiny") then local newName = tostring(getCreatureName(cid)):match("Shiny (.*)") local newNamed = newName.." ["..getPokemonLevel(cid).."]" end end end local function doPokemonRegisterLevel(cid) if not isCreature(cid) then return true end if getWildPokemonLevel(cid) == -1 then setWildPokemonLevel(cid) end end local function doSetRandomGender(cid) if not isCreature(cid) then return true end local gender = 0 local name = getCreatureName(cid) if not newpokedex[name] then return true end local rate = newpokedex[name].gender if rate == 0 then gender = 3 elseif rate == 1000 then gender = 4 elseif rate == -1 then gender = 0 elseif math.random(1, 1000) <= rate then gender = 4 else gender = 3 end doCreatureSetSkullType(cid, gender) end local function doShiny(cid) if isCreature(cid) then if isSummon(cid) then return true end if getPlayerStorageValue(cid, 74469) >= 1 then return true end if getPlayerStorageValue(cid, 22546) >= 1 then return true end if isNpcSummon(cid) then return true end if getPlayerStorageValue(cid, 637500) >= 1 then return true end --alterado v2.9 if isInArray(shinys, getCreatureName(cid)) then --alterado v2.9 \/ chance = 1 --0.3% chance elseif isInArray(raros, getCreatureName(cid)) then --n coloquem valores menores que 0.1 !! chance = 0.2 --0.03% chance else return true end if math.random(1, 1000) <= chance*10 then doSendMagicEffect(getThingPos(cid), 18) local name, pos = "Shiny ".. getCreatureName(cid), getThingPos(cid) doRemoveCreature(cid) local shi = doCreateMonster(name, pos, false) setPlayerStorageValue(shi, 74469, 1) else setPlayerStorageValue(cid, 74469, 1) end --/\ else return true end end function onSpawn(cid) registerCreatureEvent(cid, "Experience") registerCreatureEvent(cid, "GeneralConfiguration") registerCreatureEvent(cid, "DirectionSystem") registerCreatureEvent(cid, "CastSystem") registerCreatureEvent(cid, "atk") if isSummon(cid) then registerCreatureEvent(cid, "SummonDeath") return true end addEvent(doPokemonRegisterLevel, 5, cid) addEvent(doSetRandomGender, 5, cid) addEvent(doShiny, 10, cid) addEvent(ShinyName, 15, cid) return true end