alguem poderia editar esse script,lembrando que ele é só uma base pois meu servidor contém Level Sytem.

gostaria que pudesse pegar somente uma vez,porém não manjo muito sobre os servidores derivados com lv system

base utilizada:Dash com Lv System

local starterpokes = {["Weedle"] = {x = 53, y = 71, z = 7},["Rattata"] = {x = 51, y = 71, z = 7},["Caterpie"] = {x = 49, y = 71, z = 7},}local level = 5local extrastr = 1.5local btype = "normal"function onUse(cid, item, frompos, item2, topos)	if getPlayerLevel(cid) > 10 then	return true	end	local pokemon = ""	for a, b in pairs (starterpokes) do		if isPosEqualPos(topos, b) then			pokemon = a		end	end	if pokemon == "" then return true end	local gender = getRandomGenderByName(pokemon)	local mypoke = getPokemonStatus(pokemon)		if not mypoke then return true end	local offense = mypoke.off * level * extrastr	local defense = mypoke.def * level * extrastr	local speed = mypoke.agi * level * extrastr	local vit = mypoke.vit * level * extrastr	local spatk = mypoke.spatk * level * extrastr	local happy = 180	local leveltable = getPokemonExperienceTable(pokemon)	doPlayerAddItem(cid, 2394, 10)	local item = doCreateItemEx(2219)		doItemSetAttribute(item, "poke", pokemon)		doItemSetAttribute(item, "hp", 1)		doItemSetAttribute(item, "level", level)		doItemSetAttribute(item, "exp", leveltable[level])		doItemSetAttribute(item, "nextlevelexp", leveltable[level+1] - leveltable[level])		doItemSetAttribute(item, "offense", offense)		doItemSetAttribute(item, "defense", defense)		doItemSetAttribute(item, "speed", speed)		doItemSetAttribute(item, "vitality", vit)		doItemSetAttribute(item, "specialattack", spatk)		doItemSetAttribute(item, "happy", happy)		doItemSetAttribute(item, "gender", gender)		doItemSetAttribute(item, "description", "Contains a "..pokemon..".")		doItemSetAttribute(item, "fakedesc", "Contains a "..pokemon..".")		doItemSetAttribute(item, "unique", getCreatureName(cid))   --alterado v2.6	doPlayerAddItemEx(cid, item, true)	doTransformItem(item, pokeballs[btype].on)	doPlayerSendTextMessage(cid, 27, "You got your first pokemon! You also received some pokeballs to help you in your way.")	doPlayerSendTextMessage(cid, 27, "Don\'t forget to use your pokedex on every undiscovered pokemon!")	doSendMagicEffect(getThingPos(cid), 29)	doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid)))	doSendMagicEffect(getThingPos(cid), 27)	doSendMagicEffect(getThingPos(cid), 29)	return TRUEend

teste assim
 

local starterpokes = {["Weedle"] = {x = 53, y = 71, z = 7},["Rattata"] = {x = 51, y = 71, z = 7},["Caterpie"] = {x = 49, y = 71, z = 7},}local level = 5local extrastr = 1.5local btype = "normal"function onUse(cid, item, frompos, item2, topos)if getPlayerStorageValue(cid, 31211) == 1 thendoPlayerSendTextMessage(cid, 27, "Você já fez a quest!")return trueend	if getPlayerLevel(cid) > 10 then	return true	end	local pokemon = ""	for a, b in pairs (starterpokes) do		if isPosEqualPos(topos, b) then			pokemon = a		end	end	if pokemon == "" then return true end	local gender = getRandomGenderByName(pokemon)	local mypoke = getPokemonStatus(pokemon)		if not mypoke then return true end	local offense = mypoke.off * level * extrastr	local defense = mypoke.def * level * extrastr	local speed = mypoke.agi * level * extrastr	local vit = mypoke.vit * level * extrastr	local spatk = mypoke.spatk * level * extrastr	local happy = 180	local leveltable = getPokemonExperienceTable(pokemon)	doPlayerAddItem(cid, 2394, 10)	setPlayerStorageValue(cid, 31211, 1)	local item = doCreateItemEx(2219)		doItemSetAttribute(item, "poke", pokemon)		doItemSetAttribute(item, "hp", 1)		doItemSetAttribute(item, "level", level)		doItemSetAttribute(item, "exp", leveltable[level])		doItemSetAttribute(item, "nextlevelexp", leveltable[level+1] - leveltable[level])		doItemSetAttribute(item, "offense", offense)		doItemSetAttribute(item, "defense", defense)		doItemSetAttribute(item, "speed", speed)		doItemSetAttribute(item, "vitality", vit)		doItemSetAttribute(item, "specialattack", spatk)		doItemSetAttribute(item, "happy", happy)		doItemSetAttribute(item, "gender", gender)		doItemSetAttribute(item, "description", "Contains a "..pokemon..".")		doItemSetAttribute(item, "fakedesc", "Contains a "..pokemon..".")		doItemSetAttribute(item, "unique", getCreatureName(cid))   --alterado v2.6	doPlayerAddItemEx(cid, item, true)	doTransformItem(item, pokeballs[btype].on)	doPlayerSendTextMessage(cid, 27, "You got your first pokemon! You also received some pokeballs to help you in your way.")	doPlayerSendTextMessage(cid, 27, "Don\'t forget to use your pokedex on every undiscovered pokemon!")	doSendMagicEffect(getThingPos(cid), 29)	doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid)))	doSendMagicEffect(getThingPos(cid), 27)	doSendMagicEffect(getThingPos(cid), 29)	return TRUEend

 local starterpokes = {    ["Weedle"] = {x = 53, y = 71, z = 7},    ["Rattata"] = {x = 51, y = 71, z = 7},    ["Caterpie"] = {x = 49, y = 71, z = 7},}local level = 5local extrastr = 1.5local btype = "normal"function onUse(cid, item, frompos, item2, topos)        if getPlayerLevel(cid) > 10 then        return true    end        if getPlayerStorageValue(cid, STORAGE) >= 1 then        doPlayerSendTextMessage(cid, "Você já pegou seu pokemon! Bla bla bla..")        return true    end        local pokemon = ""        for a, b in pairs (starterpokes) do        if isPosEqualPos(topos, b) then            pokemon = a        end    end        if pokemon == "" then return true end        local gender = getRandomGenderByName(pokemon)        local mypoke = getPokemonStatus(pokemon)        if not mypoke then return true end        local offense = mypoke.off * level * extrastr    local defense = mypoke.def * level * extrastr    local speed = mypoke.agi * level * extrastr    local vit = mypoke.vit * level * extrastr    local spatk = mypoke.spatk * level * extrastr    local happy = 180    local leveltable = getPokemonExperienceTable(pokemon)        doPlayerAddItem(cid, 2394, 10)    setPlayerStorageValue(cid, STORAGE, 1)        local item = doCreateItemEx(2219)    doItemSetAttribute(item, "poke", pokemon)    doItemSetAttribute(item, "hp", 1)    doItemSetAttribute(item, "level", level)    doItemSetAttribute(item, "exp", leveltable[level])    doItemSetAttribute(item, "nextlevelexp", leveltable[level+1] - leveltable[level])    doItemSetAttribute(item, "offense", offense)    doItemSetAttribute(item, "defense", defense)    doItemSetAttribute(item, "speed", speed)    doItemSetAttribute(item, "vitality", vit)    doItemSetAttribute(item, "specialattack", spatk)    doItemSetAttribute(item, "happy", happy)    doItemSetAttribute(item, "gender", gender)    doItemSetAttribute(item, "description", "Contains a "..pokemon..".")    doItemSetAttribute(item, "fakedesc", "Contains a "..pokemon..".")    doItemSetAttribute(item, "unique", getCreatureName(cid)) --alterado v2.6    doPlayerAddItemEx(cid, item, true)        doTransformItem(item, pokeballs[btype].on)        doPlayerSendTextMessage(cid, 27, "You got your first pokemon! You also received some pokeballs to help you in your way.")    doPlayerSendTextMessage(cid, 27, "Don\'t forget to use your pokedex on every undiscovered pokemon!")        doSendMagicEffect(getThingPos(cid), 29)    doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid)))    doSendMagicEffect(getThingPos(cid), 27)    doSendMagicEffect(getThingPos(cid), 29)            return TRUEend 

Só colocar um valor nas partes que estão com o nome "STORAGE".

Abraço!

thanks

7 horas atrás, Lordbaxx disse:

 

 local starterpokes = {    ["Weedle"] = {x = 53, y = 71, z = 7},    ["Rattata"] = {x = 51, y = 71, z = 7},    ["Caterpie"] = {x = 49, y = 71, z = 7},}local level = 5local extrastr = 1.5local btype = "normal"function onUse(cid, item, frompos, item2, topos)        if getPlayerLevel(cid) > 10 then        return true    end        if getPlayerStorageValue(cid, STORAGE) >= 1 then        doPlayerSendTextMessage(cid, "Você já pegou seu pokemon! Bla bla bla..")        return true    end        local pokemon = ""        for a, b in pairs (starterpokes) do        if isPosEqualPos(topos, b) then            pokemon = a        end    end        if pokemon == "" then return true end        local gender = getRandomGenderByName(pokemon)        local mypoke = getPokemonStatus(pokemon)        if not mypoke then return true end        local offense = mypoke.off * level * extrastr    local defense = mypoke.def * level * extrastr    local speed = mypoke.agi * level * extrastr    local vit = mypoke.vit * level * extrastr    local spatk = mypoke.spatk * level * extrastr    local happy = 180    local leveltable = getPokemonExperienceTable(pokemon)        doPlayerAddItem(cid, 2394, 10)    setPlayerStorageValue(cid, STORAGE, 1)        local item = doCreateItemEx(2219)    doItemSetAttribute(item, "poke", pokemon)    doItemSetAttribute(item, "hp", 1)    doItemSetAttribute(item, "level", level)    doItemSetAttribute(item, "exp", leveltable[level])    doItemSetAttribute(item, "nextlevelexp", leveltable[level+1] - leveltable[level])    doItemSetAttribute(item, "offense", offense)    doItemSetAttribute(item, "defense", defense)    doItemSetAttribute(item, "speed", speed)    doItemSetAttribute(item, "vitality", vit)    doItemSetAttribute(item, "specialattack", spatk)    doItemSetAttribute(item, "happy", happy)    doItemSetAttribute(item, "gender", gender)    doItemSetAttribute(item, "description", "Contains a "..pokemon..".")    doItemSetAttribute(item, "fakedesc", "Contains a "..pokemon..".")    doItemSetAttribute(item, "unique", getCreatureName(cid)) --alterado v2.6    doPlayerAddItemEx(cid, item, true)        doTransformItem(item, pokeballs[btype].on)        doPlayerSendTextMessage(cid, 27, "You got your first pokemon! You also received some pokeballs to help you in your way.")    doPlayerSendTextMessage(cid, 27, "Don\'t forget to use your pokedex on every undiscovered pokemon!")        doSendMagicEffect(getThingPos(cid), 29)    doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid)))    doSendMagicEffect(getThingPos(cid), 27)    doSendMagicEffect(getThingPos(cid), 29)            return TRUEend 

 

 

Só colocar um valor nas partes que estão com o nome "STORAGE".

 

Abraço!

Opa,deu certto,porém a msg abaixo não apareçe,porem apos pegar uma vez o player não poder pegar de novo funciono,o problema é a msg mesmo,e também o player esta podendo mover o bau sabe como arrumar ?

 doPlayerSendTextMessage(cid, "Você já pegou seu pokemon! Bla bla bla..")

15 minutos atrás, kaleudd disse:

Opa,deu certto,porém a msg abaixo não apareçe,porem apos pegar uma vez o player não poder pegar de novo funciono,o problema é a msg mesmo,e também o player esta podendo mover o bau sabe como arrumar ?

 doPlayerSendTextMessage(cid, "Você já pegou seu pokemon! Bla bla bla..")

 doPlayerSendTextMessage(cid, 22, "Você já pegou seu pokémon! Bla bla bla..") 

infelismente o script nãu funcionou mais no meu servidor,não sei o motivo,simplismente nao acontece nada,alguem que teria um script quie desse pokemon para level system,