PasteShr

New Paste Browse

steps:1 insert a screen gui in starter gui dont rename it or it wont work
2: insert a textbutton in screen gui and place it where u want and rename it 2 Roll 
3:insert a local script in in Roll Roll is in screen gui and Dont rename it or it wont work
then copy and paste this script if it doesnt work look at the tutrial link:  https://www.youtube.com/watch?v=E7FKdaL1S04&t=1s

Whats the tutrial here and see how to do it : https://www.youtube.com/watch?v=E7FKdaL1S04&t=1s

Script:

local rarityFonts = {
    Common = Enum.Font.SourceSans,
    Uncommon = Enum.Font.SourceSansBold,
    Rare = Enum.Font.Gotham,
    Epic = Enum.Font.ArialBold,
    Legendary = Enum.Font.Fantasy,
    Mythical = Enum.Font.Bodoni,
    Exotic = Enum.Font.Antique,
    Divine = Enum.Font.Cartoon,
    UltraRare = Enum.Font.FredokaOne,
    SuperRare = Enum.Font.Highway,
    MegaRare = Enum.Font.Oswald,
    HyperRare = Enum.Font.LuckiestGuy,
    InsaneRare = Enum.Font.Creepster,
    CrazyRare = Enum.Font.AmaticSC,
    Unique = Enum.Font.Nunito,
    Special = Enum.Font.Roboto,
    Elite = Enum.Font.DenkOne,
    Supreme = Enum.Font.Garamond,
    Ultimate = Enum.Font.PermanentMarker,
    Masterpiece = Enum.Font.Garamond,
}

local rarityColors = {
    Common = Color3.fromRGB(255, 255, 255),
    Uncommon = Color3.fromRGB(0, 255, 0),
    Rare = Color3.fromRGB(0, 0, 255),
    Epic = Color3.fromRGB(255, 0, 255),
    Legendary = Color3.fromRGB(255, 215, 0),
    Mythical = Color3.fromRGB(128, 0, 128),
    Exotic = Color3.fromRGB(255, 165, 0),
    Divine = Color3.fromRGB(255, 255, 0),
    UltraRare = Color3.fromRGB(0, 128, 128),
    SuperRare = Color3.fromRGB(255, 69, 0),
    MegaRare = Color3.fromRGB(139, 0, 139),
    HyperRare = Color3.fromRGB(255, 140, 0),
    InsaneRare = Color3.fromRGB(75, 0, 130),
    CrazyRare = Color3.fromRGB(255, 20, 147),
    Unique = Color3.fromRGB(186, 85, 211),
    Special = Color3.fromRGB(148, 0, 211),
    Elite = Color3.fromRGB(30, 144, 255),
    Supreme = Color3.fromRGB(255, 99, 71),
    Ultimate = Color3.fromRGB(60, 179, 113),
    Masterpiece = Color3.fromRGB(255, 69, 0),
}

local rollButton = script.Parent -- Assuming the script is a child of the Roll button
local skipButton
local equipButton
local isRolling = false
local currentRarityGui = nil

local rarityLabel = Instance.new("TextLabel")
rarityLabel.BackgroundTransparency = 1
rarityLabel.Size = UDim2.new(0, 200, 0, 50)
rarityLabel.TextSize = 30
rarityLabel.Position = UDim2.new(0.5, -100, 0.5, -25)
rarityLabel.AnchorPoint = Vector2.new(0.5, 0.5)
rarityLabel.Parent = game:GetService("Players").LocalPlayer.PlayerGui.ScreenGui

local function playTransitionSound()
    local sound = Instance.new("Sound")
    sound.SoundId = "rbxassetid://9119713951" -- Replace YOUR_SOUND_ID with the ID of your sound
    sound.Volume = 0.5
    sound.Parent = game:GetService("Players").LocalPlayer:WaitForChild("PlayerGui")
    sound:Play()
    sound.Ended:Connect(function()
        sound:Destroy()
    end)
end

local rarities = {
    "Common",
    "Uncommon",
    "Rare",
    "Epic",
    "Legendary",
    "Mythical",
    "Exotic",
    "Divine",
    "UltraRare",
    "SuperRare",
    "MegaRare",
    "HyperRare",
    "InsaneRare",
    "CrazyRare",
    "Unique",
    "Special",
    "Elite",
    "Supreme",
    "Ultimate",
    "Masterpiece",
}

local function showRarity()
    if isRolling then return end
    isRolling = true
    rollButton.Text = "Rolling..."
    rollButton.Active = false

for _ = 1, 10 do -- Adjust the number of transitions as needed
        local randomIndex = math.random(1, #rarities)
        local rarity = rarities[randomIndex]

rarityLabel.Text = rarity
        rarityLabel.Font = rarityFonts[rarity]
        rarityLabel.TextStrokeTransparency = 0
        rarityLabel.TextStrokeColor3 = Color3.new(0, 0, 0)
        rarityLabel.TextColor3 = rarityColors[rarity]

playTransitionSound() -- Play the transition sound

wait(0.3) -- Adjust the speed of transition as needed
    end

skipButton = Instance.new("TextButton")
    skipButton.Parent = rarityLabel.Parent
    skipButton.Size = UDim2.new(0, 80, 0, 30)
    skipButton.Position = UDim2.new(0.5, -40, 0.6, 0)
    skipButton.AnchorPoint = Vector2.new(0.5, 0)
    skipButton.Text = "Skip"
    skipButton.BackgroundTransparency = 0.75
    skipButton.BackgroundColor3 = Color3.new(0, 0, 0)
    skipButton.TextColor3 = Color3.new(1, 1, 1)
    skipButton.MouseButton1Click:Connect(function()
        rarityLabel.Text = ""
        if currentRarityGui then
            skipButton:Destroy()
            equipButton:Destroy()
            isRolling = false
            rollButton.Text = "Roll"
            rollButton.Active = true
        end
    end)

equipButton = Instance.new("TextButton")
    equipButton.Parent = rarityLabel.Parent
    equipButton.Size = UDim2.new(0, 80, 0, 30)
    equipButton.Position = UDim2.new(0.5, 40, 0.6, 0)
    equipButton.AnchorPoint = Vector2.new(0.5, 0)
    equipButton.Text = "Equip"
    equipButton.BackgroundTransparency = 0.75
    equipButton.BackgroundColor3 = Color3.new(0, 0, 0)
    equipButton.TextColor3 = Color3.new(1, 1, 1)
    equipButton.MouseButton1Click:Connect(function()
        print("Equip")
        isRolling = false
        if currentRarityGui then
            currentRarityGui:Destroy()
        end
        currentRarityGui = Instance.new("BillboardGui")
        currentRarityGui.Parent = game.Players.LocalPlayer.Character.Head
        currentRarityGui.Size = UDim2.new(0, 100, 0, 40)
        currentRarityGui.AlwaysOnTop = true
        currentRarityGui.StudsOffset = Vector3.new(0, 2, 0) -- Adjust the offset to move the Gui above the head

local textLabel = Instance.new("TextLabel")
        textLabel.Parent = currentRarityGui
        textLabel.Size = UDim2.new(1, 0, 1, 0)
        textLabel.BackgroundTransparency = 1
        textLabel.Text = rarityLabel.Text
        textLabel.Font = rarityFonts[rarityLabel.Text]
        textLabel.TextColor3 = rarityColors[rarityLabel.Text]
        textLabel.TextStrokeTransparency = 0
        textLabel.TextStrokeColor3 = Color3.new(0, 0, 0)
        textLabel.TextSize = 20

skipButton:Destroy()
        equipButton:Destroy()
        rollButton.Text = "Roll"
        rollButton.Active = true
    end)
end

rollButton.MouseButton1Click:Connect(function()
    showRarity()
end)

Paste Settings

Paste Title : [Optional]

Paste Folder : [Optional]

Syntax Highlighting : [Optional]

Paste Expiration : [Optional]

Paste Status : [Optional]

Password : [Optional]

Description: [Optional]

Tags: [Optional]

Encrypt Paste (?)

You are currently not logged in, this means you can not edit or delete anything you paste. Sign Up or Login

Recent Pastes

ff2 mag scripts
Plaintext | 0 | 2 seconds ago
murders vs sheriff script
Plaintext | 0 | 2 seconds ago
the chosen one script
Plaintext | 0 | 3 seconds ago
strongest battleground script
Plaintext | 0 | 3 seconds ago
e hentai download
Plaintext | 3 | 5 minutes ago
marconi weightless mp3 download
Plaintext | 3 | 5 minutes ago
saber showdown script
Plaintext | 3 | 5 minutes ago

Paste Settings

Site Languages