VoidScript

Pokemon stone

Nov 16th, 2017
74
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.40 KB | None | 0 0
  1. Parent = "Evolution" -- The parent can be "Recover", "Pokeball", "Evolution" and "Competitive"
  2. Item = "Rare Candy"
  3. Amount = 0
  4. b=game.Players.LocalPlayer.Bag
  5. r=game.ReplicatedStorage.REvents
  6. if b[Parent]:FindFirstChild(Item)then
  7. r.Internal.funcItem:InvokeServer(b[Parent][Item],Amount)
  8. else r.Pokemon.fze:InvokeServer(Item,b[Parent],Amount)end
  9. Amount = 50000 -- How much to add on every item
  10. b=game.Players.LocalPlayer.Bag
  11. r=game.ReplicatedStorage.REvents
  12. Items = {
  13. Recover = {},
  14. Pokeball = {},
  15. Evolution = {"Aggronite","Altarianite","Alakazamite","Ampharosite","Audinite","Absolite","Beedrillite","Blastoisinite","Blazikenite","Banettite","Charizardite X","Charizardite Y","Cameruptite","Gengarite","Glalitite","Gyaradosite","Galladite","Gardevoirite","Garchompite","Heracronite","Houndoomite","Lopunnite","Lucarionite","Latiosite","Latiasite","Medichamite","Metagrossite","Manectite","Mawilite","Pidgeotite","Pinsirite","Sharpedonite","Slowbronite","Steelixite","Swampertite","Salamencite","Sablenite","Sceptilite","Scizorite","Tyranitarite","Venusaurite"},
  16. Competitive = {},
  17. }
  18. for n,t in next,Items do
  19. for _,i in next,t do
  20. if b[n]:FindFirstChild(i)then
  21. r.Internal.funcItem:InvokeServer(b[n][i],Amount)
  22. else r.Pokemon.fze:InvokeServer(i,b[n],Amount)
  23. end end end
  24.  
  25.  
  26.  
  27. while wait(.1) do
  28. game.ReplicatedStorage.REvents.Internal.jxbf:InvokeServer()
  29. end
  30.  
  31. local rekt = getrenv()["_G"].PlayingCheckers
Add Comment
Please, Sign In to add comment