Advertisement
qsenko1

Premium Pet script

Sep 8th, 2021
1,369
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 1.83 KB | None | 0 0
  1. PremiumPetEvent.OnServerEvent:Connect(function(player,PremiumPetName)
  2.     print(PremiumPetName)
  3.     local Pets = player.Character:FindFirstChild("Frost Dragon") or player.Character:FindFirstChild("Hell Dragon") or player.Character:FindFirstChild("Shadow Dragon") or player.Character:FindFirstChild("Megavore") or player.Character:FindFirstChild("Eye of Cthulhu") or player.Character:FindFirstChild("Magma Dragon") or player.Character:FindFirstChild("Arctic Reindeer") or player.Character:FindFirstChild("Evil Unicorn") or player.Character:FindFirstChild("Gray Wolf") or player.Character:FindFirstChild("Dog") or player.Character:FindFirstChild("T-Rex") or player.Character:FindFirstChild("Otter") or player.Character:FindFirstChild("Scorpion") or player.Character:FindFirstChild("Alien Bee") or player.Character:FindFirstChild("Phoenix") or player.Character:FindFirstChild("Eye of Cthulhu")
  4.     if player.MembershipType == Enum.MembershipType.Premium then
  5.         if not player.Character:FindFirstChild("Frost Dragon") then            
  6.             if not Pets then
  7.                 local FrostDragon = game.ReplicatedStorage.Pets["Frost Dragon"]:Clone()
  8.                 FrostDragon.Parent = player.Character
  9.                 player.Pets:FindFirstChild("PetsName").Value = PremiumPetName
  10.             else
  11.                 for i,pets in pairs(ActualPets) do
  12.                     if pets.Name == player.Pets:FindFirstChild("PetsName").Value then
  13.                         Pets:Destroy()
  14.                         player.Pets:FindFirstChild("PetsName").Value = ""
  15.                         wait(.1)
  16.                         local FrostDragon = game.ReplicatedStorage.Pets["Frost Dragon"]:Clone()
  17.                         FrostDragon.Parent = player.Character
  18.                         player.Pets:FindFirstChild("PetsName").Value = PremiumPetName
  19.                         break
  20.                     end
  21.                 end
  22.             end
  23.         else
  24.             player.Character:FindFirstChild("Frost Dragon"):Destroy()
  25.             player.Pets:FindFirstChild("PetsName").Value = ""
  26.         end
  27.     else
  28.        MarketplaceService:PromptPremiumPurchase(player)
  29.     end
  30. end)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement