action

[PDA] New Ditto System[PXG]

Por gabrielbsales, 27 de mar. de 2014 em Mods, funções e outros

ditto

pxg

clonar

tipo

new

script

13.8k

gabrielbsalesNothingGVisconde

info

Grupo: Visconde

Registrado: 26/01/13

Posts: 266

Reputação: +174

27 de março de 2014 às 23:58

Bom, esse ditto system:

-Copia o pokemon e o balanceia sem necessidade de puxa-lo.

-Copias Habilidades...
Primeiramente, vá no some functions.lua - Localizado na pasta lib.
E adicione isto no final(depois do ultimo end):

function doDittoTransform(ditto, pokemon)
local sid = getCreatureMaster(ditto)
local eff = 184
local name = pokemon
local pos = getCreaturePosition(ditto)
local outfit = getPokemonXMLOutfit(pokemon)
 doSendMagicEffect(getThingPosWithDebug(ditto), eff)
 doSetCreatureOutfit(ditto, {lookType = outfit}, -1)
 doItemSetAttribute(getPlayerSlotItem(sid, 8).uid, "poke", name)
 doItemSetAttribute(getPlayerSlotItem(sid, 8).uid, "ehditto", 1)
 doPlayerSay(sid, ""..getPokeName(ditto)..", transform into "..getArticle(pokemon).." "..pokemon.."!", 1)
  doCreatureSay(ditto, "TRANSFORM!", TALKTYPE_MONSTER)
 doRemoveCreature(ditto)
 doSummonMonster(sid, name)
 doTeleportThing(getCreatureSummons(sid)[1], pos, false)
 adjustStatus(getCreatureSummons(sid)[1], getPlayerSlotItem(sid, 8).uid, true, false)
doUpdateMoves(sid)
return true
end

function doDittoRevert(m)
local sid = m
local eff = 184
local name = "Ditto"
local outfit = getPokemonXMLOutfit(name)
if #getCreatureSummons(sid) <= 0 then
 doItemSetAttribute(getPlayerSlotItem(sid, 8).uid, "poke", name)
 doItemSetAttribute(getPlayerSlotItem(sid, 8).uid, "ehditto", 1)
elseif #getCreatureSummons(sid) == 1 then
local ditto = getCreatureSummons(sid)[1]
local pos = getCreaturePosition(ditto)
if getCreatureName(ditto) == "Ditto" then
return true
end
 doSendMagicEffect(getThingPosWithDebug(ditto), eff)
 doSetCreatureOutfit(ditto, {lookType = outfit}, -1)
 doItemSetAttribute(getPlayerSlotItem(sid, 8).uid, "poke", name)
 doItemSetAttribute(getPlayerSlotItem(sid, 8).uid, "ehditto", 1)
 doPlayerSay(sid, ""..getPokeName(ditto)..", untransfrom!", 1)
  doCreatureSay(ditto, "TRANSFORM!", TALKTYPE_MONSTER)
 doRemoveCreature(ditto)
 doSummonMonster(sid, name)
 doTeleportThing(getCreatureSummons(sid)[1], pos, false)
 adjustStatus(getCreatureSummons(sid)[1], getPlayerSlotItem(sid, 8).uid, true, false)
doUpdateMoves(sid)
end
end

Bom, essas são as funções de transformar e destransformar.

Agora, vá no order.lua - Localizado no actions/scripts.
E procure por:

-------- TRANSFORM ----------

Apague tudo aqui dentro, até o:

-------- LIGHT --------------

Ali dentro, bote:

if (getCreatureName(mysum) == "Ditto") and getItemAttribute(thisball.uid, "ehditto") ~= -1 and isMonster(item2.uid) and pokes[getCreatureName(item2.uid)] then
local m = getCreatureMaster(cid)
local p = getPlayerSlotItem(m, 8)
local proibidossempre = {"Mew_", "Mewtwo_", "Unown Legion", "Ho-oh", "Moltres", "Celebi", "Moltres", "Zapdos", "Suicune", "Entei", "Raikou", "Articuno", "Lugia", "Mewtwo", "Mew", "Shiny Rhydon", "Shiny Ariados", "Shiny Magneton", "Shiny Ninetales", "Shiny Politoed", "Shiny Stantler", "Shiny Dodrio", "Shiny Espeon", "Shiny Umbreon"} -- Nunca permitir
local proibidosboost = {"Shiny Dragonite", "Shiny Snorlax", "Shiny Gyarados", "Shiny Scyther"} -- Permitir se ditto for +50
local outpokes = {"Magnet Electabuzz","Elder Tyranitar","Hard Golem","Brute Rhydon","Iron Steelix","Brave Charizard","Elder Charizard","Lava Magmar","Enraged Typhlosion","Capoeira Hitmontop","Boxer Hitmonchan","Taekwondo Hitmonlee","Dragon Machamp","Undefeated Machamp","Wardog Arcanine","Elder Arcanine","Furious Mantine","War Gyarados","Brave Blastoise","Brave Venusaur","Ancient Meganium","Tribal Feraligatr","Elder Dragonite","Elder Pinsir","Elder Raichu","Charged Raichu","Tribal Xatu","Enigmatic Girafarig","Ancient Alakazam","Master Alakazam","Furious Ampharos","Elder Electabuzz","Furious Scyther","Tribal Scyther","War Heracross","Metal Scizor","Brave Nidoking","Brave Nidoqueen","Elder Muk","Dark Crobat","Trickmaster Gengar"                              ,"Elder Gengar"                              ,"Banshee Misdreavus","Hungry Snorlax","Brute Ursaring","War Granbull","Singer Wigglytuff","Aviator Pidgeot","Metal Skarmory","Brave Noctowl","Elder Pidgeot","Ancient Dragonite","Milch-Miltank","Ancient Kingdra","Psy Jynx","Elder Venusaur","Elder Jynx","Evil Cloyster","Freezing Dewgong","Elder Tangela","Furious Sandslash","Roll Donphan","Bone Marowak","Octopus Octillery","Moon Clefable","Heavy Piloswine","Elder Blastoise","Elder Tentacruel","Elder Marowak","Master Stantler"}
local boost = getItemAttribute(thisball.uid, "boost") or 0
if getCreatureName(item2.uid) == "Ditto" or getCreatureName(item2.uid) == "Shiny Ditto" then
doPlayerSendCancel(cid, "Your ditto can't transform into another ditto.")
markPos(mysum, unfix)
return true
end
if isInArray(outpokes, getCreatureName(item2.uid)) then
doPlayerSendCancel(cid, "Your ditto can't transform into this pokemon.")
markPos(mysum, unfix)
return true
end
if getPlayerLevel(cid) < pokes[getCreatureName(item2.uid)].level then
doPlayerSendCancel(cid, "You haven't level to transform into that pokemon.")
markPos(mysum, unfix)
return true
end
if isInArray(proibidossempre, getCreatureName(item2.uid)) then --Checa a lista
doPlayerSendCancel(cid, "Your ditto can't transform into that pokemon.")
markPos(mysum, unfix)
return true
end
if isInArray(proibidosboost, getCreatureName(item2.uid)) and boost < 50 then --Checa a lista
doPlayerSendCancel(cid, "Your ditto can't transform into that pokemon.")
markPos(mysum, unfix)
return true
end
markPos(mysum, unfix)
doFaceCreature(mysum, getThingPos(item2.uid))
doDittoTransform(mysum, getCreatureName(item2.uid))
return true
end
-----------------------------

Pronto, ditto ja está tranformando, agora falta o !revert, para isso vá em talkactions/scripts e crie um arquivo(.lua) com nome de dittorevert, e dentro coloque:

function onSay(cid, words, param, channel)
local thisball = getPlayerSlotItem(cid, 8)
if thisball and getItemAttribute(thisball.uid, "ehditto") then
doDittoRevert(cid)
end
return true
end

Agora, no talkactions.xml adicione esta linha:

<talkaction words = "!revert;/revert" hide="yes" event = "script" value = "dittorevert.lua"/>

Se fizer tudo corretamente, funcionará normalmente.

Gif:

Créditos:
Gabrielbsales(sou op faço tudo solo)

Editado Abril 13 por gabrielbsales

MarkowiiczFreelancerMCampones

info

Grupo: Campones

Registrado: 05/06/13

Posts: 76

Reputação: +14

Gênero: Masculino

28 de março de 2014 às 02:33

[Error - LuaScriptInterface::loadFile] data/lib/level system.lua:484: 'end' expected (to close 'function' at line 204) near '<eof>'

[Warning - LuaScriptInterface::initState] Cannot load data/lib/

gabrielbsalesNothingGVisconde

info

Grupo: Visconde

Registrado: 26/01/13

Posts: 266

Reputação: +174

28 de março de 2014 às 03:03

Copie o codigo novamente, esqueci do end hehe.

MarkowiiczFreelancerMCampones

info

Grupo: Campones

Registrado: 05/06/13

Posts: 76

Reputação: +14

Gênero: Masculino

28 de março de 2014 às 04:50

Bem, Erro Corrigido, Mas O Ditto Não Tem As Habilidades Dos Pokémons.

Exemplo: Clonei Um Pidgeot, Mas Ele Não Quer Dar Fly. Como No Tópico Diz

Que Ele Terá As Habilidades Dos Pokémons Clonados...

gabrielbsalesNothingGVisconde

info

Grupo: Visconde

Registrado: 26/01/13

Posts: 266

Reputação: +174

28 de março de 2014 às 04:57

Tem sim, puxe e bote de novo.

Drk Shadowhttps://www.facebook.com/PokeXCrazy/DVisconde

info

Grupo: Visconde

Registrado: 07/01/12

Posts: 495

Reputação: +48

Gênero: Masculino

Char no Tibia: Nem Tenho

28 de março de 2014 às 07:41

[28/03/2014 07:40:22] [Error - CreatureScript Interface]

[28/03/2014 07:40:22] data/creaturescripts/scripts/goback.lua:onDeath

[28/03/2014 07:40:22] Description:

[28/03/2014 07:40:22] (luaGetThingPosition) Thing not found

[28/03/2014 07:40:22] [Error - CreatureScript Interface]

[28/03/2014 07:40:22] data/creaturescripts/scripts/goback.lua:onDeath

[28/03/2014 07:40:22] Description:

[28/03/2014 07:40:22] (luaGetCreatureName) Creature not found

[28/03/2014 07:40:22] [Error - CreatureScript Interface]

[28/03/2014 07:40:22] data/creaturescripts/scripts/goback.lua:onDeath

[28/03/2014 07:40:22] Description:

[28/03/2014 07:40:22] data/creaturescripts/scripts/goback.lua:91: bad argument #3 to 'gsub' (string/function/table expected)

[28/03/2014 07:40:22] stack traceback:

[28/03/2014 07:40:22] [C]: in function 'gsub'

[28/03/2014 07:40:22] data/creaturescripts/scripts/goback.lua:91: in function <data/creaturescripts/scripts/goback.lua:55>

Ta dando esse erro ae se tenta puxar o ditto denovo fica soltando varios, e quando o ditto morre, ele vira o pokemon no qual ele se transformou.

E sobre o look, agora todos os pokemons estão com a descrição (ditto).

Editado Março 28 por Pokemonultimatetwo

gabrielbsalesNothingGVisconde

info

Grupo: Visconde

Registrado: 26/01/13

Posts: 266

Reputação: +174

28 de março de 2014 às 14:41

Você substituiu todos os scripts corretamente? Aqui funciona normalmente.

Quanto ao look, ajeitei, copie novamente.

zipter98 ZHerói Herói

info

Grupo: Herói

Registrado: 20/09/12

Posts: 2.6k

Reputação: +1.1k

Gênero: Masculino

28 de março de 2014 às 14:46

Caso o Ditto não tenha boost e tente copiar um dos elementos [pokémons] da tabela proibidosboost, ocorrerá um erro. Por quê? Caso o pokémon não tenha boost, obviamente sua pokeball não terá o atributo "boost". Neste caso, seria o mesmo que comparar if nil < 50.

Para evitar isso, recomendaria trocar:

if isInArray(proibidosboost, getCreatureName(item2.uid)) and getItemAttribute(thisball.uid, "boost") < 50 then

Por:

local boost = getItemAttribute(thisball.uid, "boost") or 0
if isInArray(proibidosboost, getCreatureName(item2.uid)) and boost < 50 then

Editado Março 28 por zipter98

gabrielbsalesNothingGVisconde

info

Grupo: Visconde

Registrado: 26/01/13

Posts: 266

Reputação: +174

28 de março de 2014 às 15:12

Zipter, obrigado.

É que meu server está completamente modificado(os sistemas) ai tive que botar em um PDA 1.9.1 e esqueci de muita coisa.

Drk Shadowhttps://www.facebook.com/PokeXCrazy/DVisconde

info

Grupo: Visconde

Registrado: 07/01/12

Posts: 495

Reputação: +48

Gênero: Masculino

Char no Tibia: Nem Tenho

28 de março de 2014 às 22:05

@gabrielbsales

Qual a base que você usa no seu servidor, ou que usou pra fazer o script ?

Aqui continua bugando ;s

Strogman SVisconde

info

Grupo: Visconde

Registrado: 04/11/12

Posts: 464

Reputação: +90

Gênero: Masculino

Char no Tibia: Lysty Of Death

29 de março de 2014 às 06:00

está faltando a parte do goback!

gabrielbsalesNothingGVisconde

info

Grupo: Visconde

Registrado: 26/01/13

Posts: 266

Reputação: +174

29 de março de 2014 às 13:41

Pda By Slicer 1.9.1, Desculpem os erros. Ja consertei.

Strogman SVisconde

info

Grupo: Visconde

Registrado: 04/11/12

Posts: 464

Reputação: +90

Gênero: Masculino

Char no Tibia: Lysty Of Death

29 de março de 2014 às 16:59

portrait ta bugando e o pokemon tbm quando puxa ele mesmo depois de tirar a parte do ditto do goback

allanzinh ACampones

info

Grupo: Campones

Registrado: 29/05/13

Posts: 51

Reputação: +4

Char no Tibia: Nunca Joguei

29 de março de 2014 às 17:53

Man Funciono Certinho aki . Eo Usei o /r nele para ele morrer e depois fico normal . só que se não matar ele , ele Não volta pra ball . Só uma dica ali em talcks muda a tag la pro mesmo nome da pasta pq está diferente . e quem não sabe de nada igual a mim se não mudar era da Erro .

Editado Março 29 por allanzinh

gabrielbsalesNothingGVisconde

info

Grupo: Visconde

Registrado: 26/01/13

Posts: 266

Reputação: +174

29 de março de 2014 às 18:04

Man Funciono Certinho aki . Só uma dica ali em talcks muda a tag la pro mesmo nome da pasta pq está diferente . e quem não sabe de nada igual a mim se não mudar era da Erro .

Sobre o Problema no gobak vc tem que colocar a tag no Lugar Certo .

Exemplo: <talkaction log="yes" words="/addskill" access="3" event="function" value="addSkill"/> La aonde começa a tag parecida com a que ele posto e coloca la que deo Certo aki .

Isso, ajeitei, obrigado.