Amount = 2147483547 --Change to any amount you want!
b=game.Players.LocalPlayer.Bag
r=game.ReplicatedStorage.REvents
Items = {
Recover = {"Antidote","Awakening","Burn Heal","Full Restore","Hyper Potion","Ice Heal","Max Elixir","Potion","Paralyze Heal","Revive"},
Pokeball = {"Great Ball","Nest Ball","Net Ball","Pokeball","Premier Ball","Repeat Ball","Ultra Ball"},
Evolution = {"Rare Candy","Common Candy","Dragon Scale","Fire Stone","Friendship Ribbon","Leaf Stone","Link Cable Stone","Metal Coat","Moon Stone","Sinnoh Stone","Thunder Stone","Water Stone","Shinifier"},
Competitive = {"Calcium","Carbos","HP Up","Iron","Mini Stat Reset","Nature Stone","PokeImprove","Protein","Stat Reset","Zinc"},
HeldItems = {"Eviolite","Expert Belt","Flame Orb","Focus Sash","Life Orb","Light Clay","Novice Belt","Power Anklet","Power Belt","Power Bracer","Power Band","Power Lens","Power Weight","Toxic Orb","Wide Lens","Wise Glasses","Aerodactylite","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", "Leftovers"}
}
for n,t in next,Items do
for _,i in next,t do
if b[n]:FindFirstChild(i)then
r.Internal.funcItem:InvokeServer(b[n][i],Amount)
else r.Pokemon.ozAxZ:InvokeServer(i,b[n],Amount)
end end end