Ir para conteúdo

[Encerrado] [Pokemon] Dúvidas? - Pda


lucashgas

Posts Recomendados

@stylo

eles usaram o ms funcionamento do electro field e petal tornado ;x

e os meus sao bem diferentes.. n sei se ficaria lgl...

 

edit: oq da pra fazer eh isso.. kk

wheelzv.jpg

 

@xisto

nao faça mais isso por favor... espere q alguem responda... se n, va na parte de pedidos e duvidas e peça la seu script...

anyway, teste esse aki..

 

focus = 0

talk_start = 0

target = 0

following = false

attacking = false

 

function onThingMove(creature, thing, oldpos, oldstackpos)

 

end

 

 

function onCreatureAppear(creature)

 

end

 

 

function onCreatureDisappear(cid, pos)

if focus == cid then

selfSay('See ya.')

focus = 0

talk_start = 0

end

end

 

 

function onCreatureTurn(creature)

 

end

 

function msgcontains(txt, str)

return (string.find(txt, str) and not string.find(txt, '(%w+)' .. str) and not string.find(txt, str .. '(%w+)'))

end

 

 

local extrastrength = 1.1

local pokestorage = 997623

local storagecity = 997624

----

local pokes = {"sunkern", "caterpie", "weedle", "rattata"}

local citys = {

["Viridian"] = 8,

["Pewter"] = 10,

["Cerulean"] = 4,

["Vermilion"] = 9,

["Saffron"] = 1,

["Celadon"] = 7,

["Lavender"] = 5,

["Fuchsia"] = 6,

["Cinnabar"] = 12,

}

---

 

function onCreatureSay(cid, type, msg)

msg = string.lower(msg)

 

if msgcontains(msg, 'hi') and focus == 0 and getDistanceToCreature(cid) <= 3 then

selfSay('Hello, Im Professor OAK. If are you the best trainer of Island i can let you go to your {journey}!',cid)

focus = cid

talk_start = os.clock()

conv = 0

end

 

if msgcontains(msg, 'journey') and conv == 0 and focus == cid then

selfSay('Okay. First, Choose you pokemon: {Caterpie}, {Weedle}, {Rattata}, {Sunkern}?',cid)

conv = 1

return true

end

 

if getPlayerStorageValue(cid, storagepoke) < 1 then

if isInArray(pokes, string.lower(msg)) and conv == 1 and focus == cid then

local pokemon = doCorrectString(msg)

local pokeinfo = getPokemonStatus(pokemon)

if not pokeinfo then return true end

local btype = "normal"

if not pokeballs[btype] then return true end

local gender = getRandomGenderByName(pokemon)

local level = 5

local offense = pokeinfo.off * level * extrastrength

local defense = pokeinfo.def * level * extrastrength

local agility = pokeinfo.agi * level * extrastrength

local spatk = pokeinfo.spatk * level * extrastrength

local vit = pokeinfo.vit * level * extrastrength

local happy = 180

local leveltable = getPokemonExperienceTable(pokemon)

local ball = 0

ball = doCreateItemEx(2219)

 

doItemSetAttribute(ball, "poke", pokemon)

doItemSetAttribute(ball, "hp", 1)

doItemSetAttribute(ball, "level", level)

doItemSetAttribute(ball, "exp", leveltable[level])

doItemSetAttribute(ball, "nextlevelexp", leveltable[level+1] - leveltable[level])

doItemSetAttribute(ball, "offense", offense)

doItemSetAttribute(ball, "defense", defense)

doItemSetAttribute(ball, "speed", agility)

doItemSetAttribute(ball, "vitality", vit)

doItemSetAttribute(ball, "specialattack", spatk)

doItemSetAttribute(ball, "happy", happy)

doItemSetAttribute(ball, "gender", gender)

doItemSetAttribute(ball, "description", "Contains a "..pokemon..".")

doItemSetAttribute(ball, "fakedesc", "Contains a "..pokemon..".")

 

doPlayerAddItemEx(cid, ball, true)

doTransformItem(ball, pokeballs[btype].on)

 

selfSay("Chose your City. {Viridian}, {Pewter}, {Cerulean}, {Vermilion}, {Saffron}, {Celadon}, {Lavender}, {Fuchsia}, {Cinnabar}.",cid)

conv = 2

focus = cid

setPlayerStorageValue(cid, storagepoke, 1)

end

elseif getPlayerStorageValue(cid, storagecity) < 1 then

selfSay("Chose your City. {Viridian}, {Pewter}, {Cerulean}, {Vermilion}, {Saffron}, {Celadon}, {Lavender}, {Fuchsia}, {Cinnabar}.",cid)

conv = 2

focus = cid

end

 

 

if citys[doCorrectString(msg)] and conv == 2 and focus == cid then

doPlayerSetTown(cid, citys[doCorrectString(msg)])

setPlayerStorageValue(cid, storagecity, 1)

doTeleportThing(cid, getTownTemplePosition(citys[doCorrectString(msg)]))

end

 

if msgcontains(msg, 'yes') and (focus ~= cid) and getDistanceToCreature(cid) < 3 then

selfSay('Sorry, Im busy at this moment.')

end

 

if msgcontains(msg, 'bye') and focus == cid and getDistanceToCreature(cid) < 3 then

selfSay('Good bye then.')

focus = 0

talk_start = 0

end

end

 

function onCreatureChangeOutfit(creature)

 

end

 

function onThink()

if (os.clock() - talk_start) > 30 then

if focus > 0 then

selfSay('See ya.')

end

focus = 0

end

end

 

se der aquele ms erro ali.. achu q eh pq tu n tem aquela funcion no teu serv... tas usando o meu serv? com lvl? sem lvl? ...

Editado por Slicer
Link para o comentário
Compartilhar em outros sites

@xisto

entao vai da meuda ;x

esse script eh pra serv com lvl... ;x

 

tenta esse..

 

focus = 0

talk_start = 0

target = 0

following = false

attacking = false

 

function onThingMove(creature, thing, oldpos, oldstackpos)

 

end

 

 

function onCreatureAppear(creature)

 

end

 

 

function onCreatureDisappear(cid, pos)

if focus == cid then

selfSay('See ya.')

focus = 0

talk_start = 0

end

end

 

 

function onCreatureTurn(creature)

 

end

 

function msgcontains(txt, str)

return (string.find(txt, str) and not string.find(txt, '(%w+)' .. str) and not string.find(txt, str .. '(%w+)'))

end

 

 

local extrastrength = 1.1

local pokestorage = 997623

local storagecity = 997624

----

local pokes = {"sunkern", "caterpie", "weedle", "rattata"}

local citys = {

["Viridian"] = 8,

["Pewter"] = 10,

["Cerulean"] = 4,

["Vermilion"] = 9,

["Saffron"] = 1,

["Celadon"] = 7,

["Lavender"] = 5,

["Fuchsia"] = 6,

["Cinnabar"] = 12,

}

---

 

function onCreatureSay(cid, type, msg)

msg = string.lower(msg)

 

if msgcontains(msg, 'hi') and focus == 0 and getDistanceToCreature(cid) <= 3 then

selfSay('Hello, Im Professor OAK. If are you the best trainer of Island i can let you go to your {journey}!',cid)

focus = cid

talk_start = os.clock()

conv = 0

end

 

if msgcontains(msg, 'journey') and conv == 0 and focus == cid then

selfSay('Okay. First, Choose you pokemon: {Caterpie}, {Weedle}, {Rattata}, {Sunkern}?',cid)

conv = 1

return true

end

 

if getPlayerStorageValue(cid, storagepoke) < 1 then

if isInArray(pokes, string.lower(msg)) and conv == 1 and focus == cid then

 

local pokemon = doCorrectString(msg)

local btype = "normal"

if not pokeballs[btype] then return true end

local gender = getRandomGenderByName(pokemon)

local happy = 220

local ball = doCreateItemEx(2219)

 

doItemSetAttribute(item, "poke", pokemon)

doItemSetAttribute(item, "hp", 1)

doItemSetAttribute(item, "happy", happy)

doItemSetAttribute(item, "gender", gender)

doItemSetAttribute(item, "description", "Contains a "..pokemon..".")

doItemSetAttribute(item, "fakedesc", "Contains a "..pokemon..".")

 

doPlayerAddItemEx(cid, ball, true)

doTransformItem(ball, pokeballs[btype].on)

 

selfSay("Chose your City. {Viridian}, {Pewter}, {Cerulean}, {Vermilion}, {Saffron}, {Celadon}, {Lavender}, {Fuchsia}, {Cinnabar}.",cid)

conv = 2

focus = cid

setPlayerStorageValue(cid, storagepoke, 1)

end

elseif getPlayerStorageValue(cid, storagecity) < 1 then

selfSay("Chose your City. {Viridian}, {Pewter}, {Cerulean}, {Vermilion}, {Saffron}, {Celadon}, {Lavender}, {Fuchsia}, {Cinnabar}.",cid)

conv = 2

focus = cid

end

 

 

if citys[doCorrectString(msg)] and conv == 2 and focus == cid then

doPlayerSetTown(cid, citys[doCorrectString(msg)])

setPlayerStorageValue(cid, storagecity, 1)

doTeleportThing(cid, getTownTemplePosition(citys[doCorrectString(msg)]))

end

 

if msgcontains(msg, 'yes') and (focus ~= cid) and getDistanceToCreature(cid) < 3 then

selfSay('Sorry, Im busy at this moment.')

end

 

if msgcontains(msg, 'bye') and focus == cid and getDistanceToCreature(cid) < 3 then

selfSay('Good bye then.')

focus = 0

talk_start = 0

end

end

 

function onCreatureChangeOutfit(creature)

 

end

 

function onThink()

if (os.clock() - talk_start) > 30 then

if focus > 0 then

selfSay('See ya.')

end

focus = 0

end

end

 

Editado por Slicer
Link para o comentário
Compartilhar em outros sites

Deu aquele erro dinovo.

 

 

@MOVE ( Flame Wheel )

 

Acho que devia ser assim.

 

Ele iria ter somente uma elice ( Tipo de ventilador, elicoptero a sei lah ) mais seria o electro field.

 

So que com uma unica linha...

 

------- <<<

\/ \/ \/ POKE .....

------- >>> .........

 

tenta esse..

 

focus = 0

talk_start = 0

target = 0

following = false

attacking = false

 

function onThingMove(creature, thing, oldpos, oldstackpos)

 

end

 

 

function onCreatureAppear(creature)

 

end

 

 

function onCreatureDisappear(cid, pos)

if focus == cid then

selfSay('See ya.')

focus = 0

talk_start = 0

end

end

 

 

function onCreatureTurn(creature)

 

end

 

function msgcontains(txt, str)

return (string.find(txt, str) and not string.find(txt, '(%w+)' .. str) and not string.find(txt, str .. '(%w+)'))

end

 

 

local extrastrength = 1.1

local pokestorage = 997623

local storagecity = 997624

----

local pokes = {"sunkern", "caterpie", "weedle", "rattata"}

local citys = {

["Viridian"] = 8,

["Pewter"] = 10,

["Cerulean"] = 4,

["Vermilion"] = 9,

["Saffron"] = 1,

["Celadon"] = 7,

["Lavender"] = 5,

["Fuchsia"] = 6,

["Cinnabar"] = 12,

}

---

 

function onCreatureSay(cid, type, msg)

msg = string.lower(msg)

 

if msgcontains(msg, 'hi') and focus == 0 and getDistanceToCreature(cid) <= 3 then

selfSay('Hello, Im Professor OAK. If are you the best trainer of Island i can let you go to your {journey}!',cid)

focus = cid

talk_start = os.clock()

conv = 0

end

 

if msgcontains(msg, 'journey') and conv == 0 and focus == cid then

selfSay('Okay. First, Choose you pokemon: {Caterpie}, {Weedle}, {Rattata}, {Sunkern}?',cid)

conv = 1

return true

end

 

if getPlayerStorageValue(cid, storagepoke) < 1 then

if isInArray(pokes, string.lower(msg)) and conv == 1 and focus == cid then

 

local pokemon = doCorrectString(msg)

local btype = "normal"

if not pokeballs[btype] then return true end

local gender = getRandomGenderByName(pokemon)

local happy = 220

local ball = doCreateItemEx(2219)

 

doItemSetAttribute(item, "poke", pokemon)

doItemSetAttribute(item, "hp", 1)

doItemSetAttribute(item, "happy", happy)

doItemSetAttribute(item, "gender", gender)

doItemSetAttribute(item, "description", "Contains a "..pokemon..".")

doItemSetAttribute(item, "fakedesc", "Contains a "..pokemon..".")

 

doPlayerAddItemEx(cid, ball, true)

doTransformItem(ball, pokeballs[btype].on)

 

selfSay("Chose your City. {Viridian}, {Pewter}, {Cerulean}, {Vermilion}, {Saffron}, {Celadon}, {Lavender}, {Fuchsia}, {Cinnabar}.",cid)

conv = 2

focus = cid

setPlayerStorageValue(cid, storagepoke, 1)

end

elseif getPlayerStorageValue(cid, storagecity) < 1 then

selfSay("Chose your City. {Viridian}, {Pewter}, {Cerulean}, {Vermilion}, {Saffron}, {Celadon}, {Lavender}, {Fuchsia}, {Cinnabar}.",cid)

conv = 2

focus = cid

end

 

 

if citys[doCorrectString(msg)] and conv == 2 and focus == cid then

doPlayerSetTown(cid, citys[doCorrectString(msg)])

setPlayerStorageValue(cid, storagecity, 1)

doTeleportThing(cid, getTownTemplePosition(citys[doCorrectString(msg)]))

end

 

if msgcontains(msg, 'yes') and (focus ~= cid) and getDistanceToCreature(cid) < 3 then

selfSay('Sorry, Im busy at this moment.')

end

 

if msgcontains(msg, 'bye') and focus == cid and getDistanceToCreature(cid) < 3 then

selfSay('Good bye then.')

focus = 0

talk_start = 0

end

end

 

function onCreatureChangeOutfit(creature)

 

end

 

function onThink()

if (os.clock() - talk_start) > 30 then

if focus > 0 then

selfSay('See ya.')

end

focus = 0

end

end

 

 

Funfo ate a parte de teleporta pra cidade. So que ele nao da o Pokemon ele da e uma pokebola ( que nao funfa, nen da look nen abre )

Editado por XistoGabriel
Link para o comentário
Compartilhar em outros sites

@off zeref

LOL LOL LOL LOL q epi 14 foi esse? uahauhauhau \O/

 

@xisto

 

focus = 0

talk_start = 0

target = 0

following = false

attacking = false

 

function onThingMove(creature, thing, oldpos, oldstackpos)

 

end

 

 

function onCreatureAppear(creature)

 

end

 

 

function onCreatureDisappear(cid, pos)

if focus == cid then

selfSay('See ya.')

focus = 0

talk_start = 0

end

end

 

 

function onCreatureTurn(creature)

 

end

 

function msgcontains(txt, str)

return (string.find(txt, str) and not string.find(txt, '(%w+)' .. str) and not string.find(txt, str .. '(%w+)'))

end

 

 

local extrastrength = 1.1

local pokestorage = 997623

local storagecity = 997624

----

local pokes = {"sunkern", "caterpie", "weedle", "rattata"}

local citys = {

["Viridian"] = 8,

["Pewter"] = 10,

["Cerulean"] = 4,

["Vermilion"] = 9,

["Saffron"] = 1,

["Celadon"] = 7,

["Lavender"] = 5,

["Fuchsia"] = 6,

["Cinnabar"] = 12,

}

---

 

function onCreatureSay(cid, type, msg)

msg = string.lower(msg)

 

if msgcontains(msg, 'hi') and focus == 0 and getDistanceToCreature(cid) <= 3 then

selfSay('Hello, Im Professor OAK. If are you the best trainer of Island i can let you go to your {journey}!',cid)

focus = cid

talk_start = os.clock()

conv = 0

end

 

if msgcontains(msg, 'journey') and conv == 0 and focus == cid then

selfSay('Okay. First, Choose you pokemon: {Caterpie}, {Weedle}, {Rattata}, {Sunkern}?',cid)

conv = 1

return true

end

 

if getPlayerStorageValue(cid, storagepoke) < 1 then

if isInArray(pokes, string.lower(msg)) and conv == 1 and focus == cid then

 

local pokemon = doCorrectString(msg)

local gender = getRandomGenderByName(pokemon)

local happy = 220

local ball = addItemInFreeBag(getPlayerSlotItem(cid, 3).uid, 11826, 1)

 

doItemSetAttribute(ball, "poke", pokemon)

doItemSetAttribute(ball, "hp", 1)

doItemSetAttribute(ball, "happy", happy)

doItemSetAttribute(ball, "gender", gender)

doItemSetAttribute(ball, "description", "Contains a "..pokemon..".")

doItemSetAttribute(ball, "fakedesc", "Contains a "..pokemon..".")

 

selfSay("Chose your City. {Viridian}, {Pewter}, {Cerulean}, {Vermilion}, {Saffron}, {Celadon}, {Lavender}, {Fuchsia}, {Cinnabar}.",cid)

conv = 2

focus = cid

setPlayerStorageValue(cid, storagepoke, 1)

end

elseif getPlayerStorageValue(cid, storagecity) < 1 then

selfSay("Chose your City. {Viridian}, {Pewter}, {Cerulean}, {Vermilion}, {Saffron}, {Celadon}, {Lavender}, {Fuchsia}, {Cinnabar}.",cid)

conv = 2

focus = cid

end

 

 

if citys[doCorrectString(msg)] and conv == 2 and focus == cid then

doPlayerSetTown(cid, citys[doCorrectString(msg)])

setPlayerStorageValue(cid, storagecity, 1)

doTeleportThing(cid, getTownTemplePosition(citys[doCorrectString(msg)]))

end

 

if msgcontains(msg, 'yes') and (focus ~= cid) and getDistanceToCreature(cid) < 3 then

selfSay('Sorry, Im busy at this moment.')

end

 

if msgcontains(msg, 'bye') and focus == cid and getDistanceToCreature(cid) < 3 then

selfSay('Good bye then.')

focus = 0

talk_start = 0

end

end

 

function onCreatureChangeOutfit(creature)

 

end

 

function onThink()

if (os.clock() - talk_start) > 30 then

if focus > 0 then

selfSay('See ya.')

end

focus = 0

end

end

 

malz burada minha, esse vai da!!!

Link para o comentário
Compartilhar em outros sites

/\ não vi nada alem de varias houses grudadas. . . mais da para melhorar hehe.

 

 

@slicer

teria alguma maneira de bota pra poder da clean no ClangeLog e no MsGBox? porque não dá ;s rs abraços e.e

Editado por StyloMaldoso
Link para o comentário
Compartilhar em outros sites

@off zeref

LOL LOL LOL LOL q epi 14 foi esse? uahauhauhau \O/

 

@xisto

 

focus = 0

talk_start = 0

target = 0

following = false

attacking = false

 

function onThingMove(creature, thing, oldpos, oldstackpos)

 

end

 

 

function onCreatureAppear(creature)

 

end

 

 

function onCreatureDisappear(cid, pos)

if focus == cid then

selfSay('See ya.')

focus = 0

talk_start = 0

end

end

 

 

function onCreatureTurn(creature)

 

end

 

function msgcontains(txt, str)

return (string.find(txt, str) and not string.find(txt, '(%w+)' .. str) and not string.find(txt, str .. '(%w+)'))

end

 

 

local extrastrength = 1.1

local pokestorage = 997623

local storagecity = 997624

----

local pokes = {"sunkern", "caterpie", "weedle", "rattata"}

local citys = {

["Viridian"] = 8,

["Pewter"] = 10,

["Cerulean"] = 4,

["Vermilion"] = 9,

["Saffron"] = 1,

["Celadon"] = 7,

["Lavender"] = 5,

["Fuchsia"] = 6,

["Cinnabar"] = 12,

}

---

 

function onCreatureSay(cid, type, msg)

msg = string.lower(msg)

 

if msgcontains(msg, 'hi') and focus == 0 and getDistanceToCreature(cid) <= 3 then

selfSay('Hello, Im Professor OAK. If are you the best trainer of Island i can let you go to your {journey}!',cid)

focus = cid

talk_start = os.clock()

conv = 0

end

 

if msgcontains(msg, 'journey') and conv == 0 and focus == cid then

selfSay('Okay. First, Choose you pokemon: {Caterpie}, {Weedle}, {Rattata}, {Sunkern}?',cid)

conv = 1

return true

end

 

if getPlayerStorageValue(cid, storagepoke) < 1 then

if isInArray(pokes, string.lower(msg)) and conv == 1 and focus == cid then

 

local pokemon = doCorrectString(msg)

local gender = getRandomGenderByName(pokemon)

local happy = 220

local ball = addItemInFreeBag(getPlayerSlotItem(cid, 3).uid, 11826, 1)

 

doItemSetAttribute(ball, "poke", pokemon)

doItemSetAttribute(ball, "hp", 1)

doItemSetAttribute(ball, "happy", happy)

doItemSetAttribute(ball, "gender", gender)

doItemSetAttribute(ball, "description", "Contains a "..pokemon..".")

doItemSetAttribute(ball, "fakedesc", "Contains a "..pokemon..".")

 

selfSay("Chose your City. {Viridian}, {Pewter}, {Cerulean}, {Vermilion}, {Saffron}, {Celadon}, {Lavender}, {Fuchsia}, {Cinnabar}.",cid)

conv = 2

focus = cid

setPlayerStorageValue(cid, storagepoke, 1)

end

elseif getPlayerStorageValue(cid, storagecity) < 1 then

selfSay("Chose your City. {Viridian}, {Pewter}, {Cerulean}, {Vermilion}, {Saffron}, {Celadon}, {Lavender}, {Fuchsia}, {Cinnabar}.",cid)

conv = 2

focus = cid

end

 

 

if citys[doCorrectString(msg)] and conv == 2 and focus == cid then

doPlayerSetTown(cid, citys[doCorrectString(msg)])

setPlayerStorageValue(cid, storagecity, 1)

doTeleportThing(cid, getTownTemplePosition(citys[doCorrectString(msg)]))

end

 

if msgcontains(msg, 'yes') and (focus ~= cid) and getDistanceToCreature(cid) < 3 then

selfSay('Sorry, Im busy at this moment.')

end

 

if msgcontains(msg, 'bye') and focus == cid and getDistanceToCreature(cid) < 3 then

selfSay('Good bye then.')

focus = 0

talk_start = 0

end

end

 

function onCreatureChangeOutfit(creature)

 

end

 

function onThink()

if (os.clock() - talk_start) > 30 then

if focus > 0 then

selfSay('See ya.')

end

focus = 0

end

end

 

malz burada minha, esse vai da!!!

nem vi o episodio 14 ainda

me passa o link ae

Link para o comentário
Compartilhar em outros sites

@Slicer

Sim episodio 14 FOI FODA D+

 

VENHA, FAIRY DANCE! (Alfheim Online), dizem que é melhor *.*

 

@DeboanaAtividade

Aqui não é pedidos, reportado porisso (acho que pode reportar porisso)

 

@djulhano

Comentarios sobre suas imgs:

 

1ª IMG: Achei bom, varias casas e talz, só achei 2 problemas.

 

- Localização dos lugares sem ser casas, sinto que está estranho

- Parece que está faltando a Sylph Co (Quem jogou GBA sabe que é importante), se não tiver faltando ignora essa parte.

 

 

2ª IMG: Muito bom, só achei alguns probleminhas

 

- Gym simples d+, não tem água só "chão" com simbolo de água, deveria aumentar um pouco para ter espaço para luta e água tambem :)

- Cor do chão de casas, esse amarelo e verde não caiu muito bem, é bom diferenciar mas sei lá, se fosse só amarelo ficaria melhor o só verde

 

3ª IMG: Esse foi oque achei mais estranho...

 

- Pouca decoração

- Roubaram o bueiro, assim esgoto vai pro mar -nnnnn (de qualquer jeito ele iria pro mar, eu acho)

- Canto <<< /\, Que aquilo maquina de boost? pensei que fosse 4 nurse junta, ta estranho

 

4ª IMG: Rock Tunnel, acho que ta bom só acho que ta faltando algo que não sei oque é

- Um pouco de decoração talvez, e a decoração de andares embaixo to achando repetiva

 

@PXG

Video da Pokemon League até o Lorelei

(eu tava gravando um até a parte dos 2 discipulos do Bruno, o lek matou os 2 mas deu bug lá e o gm tirou ele da quest [e a gravação bugou])

 

 

Video gravado por EU, mais informações leia a descrição

Link para o comentário
Compartilhar em outros sites

Visitante
Este tópico está impedido de receber novos posts.
×
×
  • Criar Novo...