Run it
Copy the script and paste it into your executor.
Players = :()
TweenService = :()
UserInputService = :()
player = Players.LocalPlayer Players:()[]
player
gui = .()
gui.Name =
gui.ResetOnSpawn =
themes = {
Dark = {BG = .(,,), T = .(,,), B = .(,,), X = .(,,)},
Ocean = {BG = .(,,), T = .(,,), B = .(,,), X = .(,,)},
Light = {BG = .(,,), T = .(,,), B = .(,,), X = .(,,)},
Royal = {BG = .(,,), T = .(,,), B = .(,,), X = .(,,)},
Sunset = {BG = .(,,), T = .(,,), B = .(,,), X = .(,,)},
}
themeKeys = {}
k (themes) .(themeKeys, k)
themeIndex =
theme = themes[themeKeys[themeIndex]]
verses = {
{, },
{, },
{, },
{, },
{, },
{, },
{, },
{, },
{, },
{, },
{, },
{, },
{, },
{, },
{, },
{, },
{, },
{, },
{, },
{, },
{, },
{, },
{, },
{, },
{, },
{, },
{, },
{, },
{, },
{, },
{, },
{, },
{, },
{, },
{, },
{, },
{, },
{, },
{, },
{, },
}
idx =
isArabic =
frame = .()
frame.Size = .(, , , )
frame.Position = .(, , , )
frame.BackgroundColor3 = themes.Dark.BG
frame.Name =
frame.Parent = gui
.(, frame).CornerRadius = .(, )
title = .()
title.Size = .(, , , )
title.BackgroundColor3 = themes.Dark.T
title.Text =
title.Font = .Font.GothamBold
title.TextSize =
title.TextColor3 = themes.Dark.X
title.Name =
title.Parent = frame
title.AutoButtonColor =
.(, title).CornerRadius = .(, )
toggleBtn = .()
toggleBtn.Size = .(, , , )
toggleBtn.Position = .(, , , )
toggleBtn.Text =
toggleBtn.Font = .Font.GothamBold
toggleBtn.TextSize =
toggleBtn.BackgroundColor3 = themes.Dark.B
toggleBtn.TextColor3 = themes.Dark.X
toggleBtn.Parent = title
.(, toggleBtn).CornerRadius = .(, )
content = .()
content.Size = .(, , , )
content.Position = .(, , , )
content.BackgroundTransparency =
content.Name =
content.Parent = frame
verse = .()
verse.Size = .(, -, , -)
verse.Position = .(, , , )
verse.BackgroundTransparency =
verse.TextWrapped =
verse.Font = .Font.GothamSemibold
verse.TextSize =
verse.TextColor3 = themes.Dark.X
verse.Text = verses[idx][]
verse.Name =
verse.Parent = content
(text, pos)
btn = .()
btn.Size = .(, , , )
btn.Position = pos
btn.Text = text
btn.Font = .Font.Gotham
btn.TextSize =
btn.BackgroundColor3 = themes.Dark.B
btn.TextColor3 = themes.Dark.X
btn.Parent = content
.(, btn).CornerRadius = .(, )
btn
backBtn = (, .(, , , ))
nextBtn = (, .(, , , ))
copyBtn = (, .(, , , ))
langBtn = (, .(, , , ))
themeBtn = (, .(, , , ))
()
verse.Text = isArabic verses[idx][] verses[idx][]
backBtn.MouseButton1Click:(()
idx >
idx = idx -
()
)
nextBtn.MouseButton1Click:(()
idx < #verses
idx = idx +
()
)
copyBtn.MouseButton1Click:(()
(()
(isArabic verses[idx][] verses[idx][])
)
)
langBtn.MouseButton1Click:(()
isArabic = isArabic
langBtn.Text = isArabic
()
)
themeBtn.MouseButton1Click:(()
themeIndex = themeIndex +
themeIndex > #themeKeys
themeIndex =
theme = themes[themeKeys[themeIndex]]
frame.BackgroundColor3 = theme.BG
title.BackgroundColor3 = theme.T
title.TextColor3 = theme.X
toggleBtn.BackgroundColor3 = theme.B
toggleBtn.TextColor3 = theme.X
verse.TextColor3 = theme.X
_, button (content:())
button:()
button.BackgroundColor3 = theme.B
button.TextColor3 = theme.X
)
(frameToDrag, dragHandle)
dragging =
dragStart
startPos
(input)
delta = input.Position - dragStart
newPos = .(
.(startPos.X.Scale, , ),
.(startPos.X.Offset + delta.X, , .CurrentCamera.ViewportSize.X - frameToDrag.AbsoluteSize.X),
.(startPos.Y.Scale, , ),
.(startPos.Y.Offset + delta.Y, , .CurrentCamera.ViewportSize.Y - frameToDrag.AbsoluteSize.Y)
)
frameToDrag.Position = newPos
dragHandle.InputBegan:((input)
input.UserInputType == .UserInputType.MouseButton1 input.UserInputType == .UserInputType.Touch
dragging =
dragStart = input.Position
startPos = frameToDrag.Position
input.Changed:(()
input.UserInputState == .UserInputState.End
dragging =
)
)
UserInputService.InputChanged:((input)
dragging (input.UserInputType == .UserInputType.MouseMovement input.UserInputType == .UserInputType.Touch)
(input)
)
(frame, title)
tinyBtn = .()
tinyBtn.Size = .(, , , )
tinyBtn.Position = .(, , , )
tinyBtn.Text =
tinyBtn.Font = .Font.GothamBold
tinyBtn.TextSize =
tinyBtn.BackgroundColor3 = theme.B
tinyBtn.TextColor3 = theme.X
tinyBtn.Visible =
tinyBtn.Name =
tinyBtn.Parent = gui
.(, tinyBtn).CornerRadius = .(, )
(tinyBtn, tinyBtn)
minimized =
toggleBtn.MouseButton1Click:(()
minimized = minimized
minimized
frame.Visible =
tinyBtn.Visible =
frame.Visible =
tinyBtn.Visible =
)
tinyBtn.MouseButton1Click:(()
minimized =
frame.Visible =
tinyBtn.Visible =
)
(()
gui.Parent = player:()
)
()Quran it has 40 verses keyless color themes u can copy back and next minimize and open

Universal