wait()
--edited solar rotation gtfo make your own
local tablets={}
Player=game.Players.LocalPlayer
char=Player.Character
LocalPlayer = Player
Cmds = {}
Tabs = {}
Tabs2 = {}
AllTabs = {}
TabModel = Instance.new("Model", workspace)
TabModel.Name = "EpicoBlocks"--nice name 10/10
version = "1.6 ALPHA"
afk = false
exescript=game.Workspace:FindFirstChild("ExeAdminScript")--mhm

script.Parent=nil


rank = nil
status = nil

UpdateLogs = {
    "Version: "..version,
    "Added music list",
    "Added ShutDown and ShutDown time",
    "Stays after death",
    }

services = {
    SoundService = game:GetService('SoundService'),
    MarketPlaceService = game:service('MarketplaceService'),
    ServerStorage = game:GetService('ServerStorage'),
    };

Storage = services.ServerStorage
Marketplace = services.MarketPlaceService
SoundService = services.SoundService

mp = Marketplace

backup = TabModel:Clone()
backup.Parent = Storage


Settings = {
     banlist = {"supersonicfan111", "Ivan_Crsysis", "idiot"}; -- Banned Players
    fire = false, -- Fire on tabs?
    light = true, -- Light on tabs?
    color = "Really blue", -- Color of the tablets
    color2 = "Really red", -- Color of the dismiss tablet, and some other shit
    color3 = Color3.new(1,1,1), -- Color of the Fire, and light
    tagsize = UDim2.new(9, 0, 8, 0), -- Size of the text of the tablets
    bet = ";", -- What comes after the command
    notifications = true,
    sdtime = 5
    };



banned = Settings.banlist


local key = Settings.bet

local Tablets={}

function Output2(text, color, func)
local prt = Instance.new("Part")
prt.CanCollide=false
prt.Anchored=true;
prt.Locked=true
prt.Transparency=.6; --Change the transparency if you want to._no i dont want 2 u retard
prt.TopSurface="Smooth"
prt.BottomSurface="Smooth"
prt.FormFactor = "Custom"
prt.Size=Vector3.new(0.9,0.9,0.9)
prt.Name = "Tablet2 "..math.random(1, 25000) -- Makes a random number{because this is usefull}
prt.BrickColor = BrickColor.new(color)
prt.Parent=workspace

pcall(function() prt.CFrame = char.Torso.CFrame end)

local bbg = Instance.new("BillboardGui",prt)
bbg.Size=Settings.tagsize;
bbg.StudsOffset = Vector3.new(0, -5, 0)
bbg.Name = "NameTag"

local tl = Instance.new("TextLabel", bbg)
tl.Size = UDim2.new(1, 0, 0.2, 0)
tl.FontSize = "Size24"
tl.BackgroundTransparency = 1
tl.Font = "SourceSansBold"
tl.TextStrokeTransparency = 0
tl.TextColor = BrickColor.new(color)
tl.Text = text

local sb = Instance.new("SelectionBox",prt)
sb.Color=BrickColor.new(color)
sb.Transparency=.6;
sb.Adornee=prt;

if Settings.fire == true then
    local fier = Instance.new("Fire", prt)
    fier.Color = Settings.color3
    fier.SecondaryColor = Settings.color3
end

if Settings.light == true then
    lite = Instance.new("PointLight", prt)
    lite.Range = 12
    lite.Color = Settings.color3
    end

local cd = Instance.new("ClickDetector",prt)
cd.MaxActivationDistance = math.huge
cd.MouseClick:connect(function(plr)
    if plr.userId==LocalPlayer.userId then
        local Run,Error=ypcall(function()
            func=func
            func()
        end)
        if func == nil then
            prt.Parent = nil
            end
        end
end)
cd.MouseHoverEnter:connect(function(plr)
    if plr.userId==LocalPlayer.userId then
        sb.Transparency=.5
        lite.Range = 14
        prt.Transparency=.5
        wait()
        sb.Transparency=.4
        lite.Range = 18
        prt.Transparency=.4
        wait()
        sb.Transparency=.3
        lite.Range = 20
        prt.Transparency=.3
        wait()
        sb.Transparency=.2
        lite.Range = 22
        prt.Transparency=.2
    end
end)
cd.MouseHoverLeave:connect(function(plr)
    if plr.userId==LocalPlayer.userId then
        sb.Transparency=.2
        lite.Range = 22
        prt.Transparency=.2
        wait()
            sb.Transparency=.3
             lite.Range = 20
        prt.Transparency=.3
        wait()
        sb.Transparency=.4
        lite.Range = 18
        prt.Transparency=.4
        wait()
        sb.Transparency=.5
        lite.Range = 16
        prt.Transparency=.5
        sb.Transparency=.6
        lite.Range = 14
        prt.Transparency=.6
    end
end)
table.insert(Tablets, {Tab=prt,Plr=Player.Name})
end



function Output(text, color, func)
local prt = Instance.new("Part")
prt.CanCollide=false
prt.Anchored=true;
prt.Locked=true
prt.Transparency=.6; --Change the transparency if you want to.
prt.TopSurface="Smooth"
prt.BottomSurface="Smooth"
prt.FormFactor = "Custom"
prt.Size=Vector3.new(2.3,2.3,2.3)
prt.Name = "Tablet "..math.random(1, 25000) -- Makes a random number{because this is usefull}
prt.BrickColor = BrickColor.new(color)
prt.Parent=workspace
pcall(function() prt.CFrame = char.Torso.CFrame end)

local bbg = Instance.new("BillboardGui",prt)
bbg.Size=Settings.tagsize;
bbg.StudsOffset = Vector3.new(0, -5, 0)
bbg.Name = "NameTag"

local tl = Instance.new("TextLabel", bbg)
tl.Size = UDim2.new(1, 0, 0.2, 0)
tl.FontSize = "Size24"
tl.BackgroundTransparency = 1
tl.Font = "SourceSansBold"
tl.TextStrokeTransparency = 0
tl.TextColor = BrickColor.new(color)
tl.Text = text

local sb = Instance.new("SelectionBox",prt)
sb.Color=BrickColor.new(color)
sb.Transparency=.6;
sb.Adornee=prt;

if Settings.fire == true then
    local fier = Instance.new("Fire", prt)
    fier.Color = Settings.color3
    fier.SecondaryColor = Settings.color3
end

if Settings.light == true then
    lite = Instance.new("PointLight", prt)
    lite.Range = 12
    lite.Color = Settings.color3
    end

local cd = Instance.new("ClickDetector",prt)
cd.MaxActivationDistance = math.huge
cd.MouseClick:connect(function(plr)
    if plr.userId==LocalPlayer.userId then
        local Run,Error=ypcall(function()
            func=func
            func()
        end)
        if func == nil then
            Dismiss()
            end
        end
end)
cd.MouseHoverEnter:connect(function(plr)
    if plr.userId==LocalPlayer.userId then
        sb.Transparency=.5
        lite.Range = 14
        prt.Transparency=.5
        wait()
        sb.Transparency=.4
        lite.Range = 18
        prt.Transparency=.4
        wait()
        sb.Transparency=.3
        lite.Range = 20
        prt.Transparency=.3
        wait()
        sb.Transparency=.2
        lite.Range = 22
        prt.Transparency=.2
    end
end)
cd.MouseHoverLeave:connect(function(plr)
    if plr.userId==LocalPlayer.userId then
        sb.Transparency=.2
        lite.Range = 22
        prt.Transparency=.2
        wait()
            sb.Transparency=.3
             lite.Range = 20
        prt.Transparency=.3
        wait()
        sb.Transparency=.4
        lite.Range = 18
        prt.Transparency=.4
        wait()
        sb.Transparency=.5
        lite.Range = 16
        prt.Transparency=.5
        sb.Transparency=.6
        lite.Range = 14
        prt.Transparency=.6
    end
end)
table.insert(Tablets, {Tab=prt, Plr=Player.Name})
end

function getPlayers(msg)
local plrs = {}
if msg == "me" then
table.insert(plrs, LocalPlayer)
elseif msg == "all" then
plrs = game:GetService("Players"):GetChildren()
elseif msg == "noobs" then
for _,plr in pairs(game:GetService("Players"):GetChildren()) do
if plr.AccountAge > 364 then
table.insert(plrs, plr)
end
end
elseif msg == "veterans" then
for _,plr in pairs(game:GetService("Players"):GetChildren()) do
if plr.AccountAge > 364 then
table.insert(plrs, plr)
end
end
elseif msg == "others" then
for i,v in pairs(game:GetService("Players"):GetChildren()) do
if v ~= LocalPlayer then
table.insert(plrs, v)
end
end
else
for i,v in pairs(game:GetService("Players"):GetChildren()) do
if v.Name:lower():sub(1,#msg) == msg:lower() then
table.insert(plrs, v)
end
end
end
return plrs
end

function AddCmd(Name,Say,Desc,Func)
table.insert(Cmds,{["Name"] = Name,["Say"] = Say,["Desc"] = Desc,["Func"] = Func})
end

LocalPlayer.Chatted:connect(function(m)
for i,v in pairs(Cmds) do
if v["Say"]..key == m:sub(1, #v["Say"]+#key) then
v["Func"](getPlayers(m:sub(#v["Say"]+#key+1)), m:sub(#v["Say"]+#key+1))
end
end
end)

function Dismiss()
pcall(function()
for i,v in pairs(Tablets) do
   if v.Plr==Player.Name then
       v.Tab:remove()
       table.remove(Tablets, i)
    end
end
end)
end

function DismissTab()
    Output("Dismiss", Settings.color2, function() Dismiss() end)
    end

function ShowCommands()
    Dismiss()
DismissTab()
for i, v in pairs(Cmds) do
Output(v["Name"], Settings.color,
function()
    Dismiss()
    DismissTab()
    Output("Back", "Really black", function() ShowCommands() end)
Output("Description: "..v["Desc"], Settings.color, __)
Output("Usage: "..v["Say"], Settings.color, __)
Output("Name: "..v["Name"], Settings.color, __)
end)
end
end

Credits = {}
function AddCredit(Name, Reason)
table.insert(Credits,{["Name"] = Name,["Reason"] = Reason})
end

function ShowBans()
    Dismiss()
Output("Goto commands menu", "New Yeller", function() ShowCommands() end)
for i, v in pairs(banned) do
Output(v, Settings.color, __)
end
end



function ShowCredits()
Dismiss()
DismissTab()
Output("Goto commands menu", "New Yeller", function() ShowCommands() end)
for i, v in pairs(Credits) do
Output(v["Name"], Settings.color,
function()
    Dismiss()
    DismissTab()
    Output("Back", "Really black", function() ShowCredits() end)
Output("Reason: "..v["Reason"], "Hot pink", __)
Output("Name: "..v["Name"], "Lime green", __)
end)
end
    end

if LocalPlayer.Name == "masterepico" then
    rank = "Learner"
    status = "creator"
elseif LocalPlayer.Name == "mathmasterphil" then
        rank = "Creator"
    status = "creator"
elseif LocalPlayer.Name == "jillmiles111" then
    rank = "Huge help to creators"--non
    status = "huge help to creators"--non
else
    rank = "Random nobody"--100% somebody
    status = "Random nobody"--100% somebody
end

if status == "creator" then--u have a mental disorder
    Output("You are a creator!", Settings.color, __)
end


Output("Welcome to: "..TabModel.Name.."!", Settings.color, __)
Output("Your rank is: "..rank.."!", Settings.color, __)
Output("Goto commands menu", "Deep orange", function() ShowCommands() end)
AddCredit("supersonicfan111", "Creating the script")--cancer patient
AddCredit("masterepico", "Helping with script, general epicness, c:")--idiot
AddCredit("TheHaxx00rr", "Help with output, giving me jillmiles1's Rotation script")--solars rotation script*
AddCredit("jillmiles1", "Making the rotation script")--solar*



    AddCmd("Commands","cmds","Show the list of commands",
function()
    afk = false
    ShowCommands()
end
)

function Shutdown()
    local timer = Settings.sdtime
    repeat Dismiss() wait(1) Output("Shutdown in: "..timer.." seconds!", "Really red", __) timer = timer -1 until timer == -1
    if timer == -1 then
        game.Workspace:ClearAllChildren()--10/10 best shutdown na/eu
            game.Players:ClearAllChildren()--10/10 best shutdown na/eu
        end
end




function StopMusic()
                    for i,v in pairs(Workspace:GetChildren()) do
            if v:IsA("Sound") then
                v.Name = "S0und"
                wait()
                v:Remove()
            end
        end
    end

function ShowMusicList1()
    Dismiss()
    Output("Fabulous - PewDiePie", "Hot pink", function() Dismiss() StopMusic() PlaySound(191819419, workspace, 0) end)
    Output("Freaks - Timmy Trumpet", "Black", function() Dismiss() StopMusic() PlaySound(181158033, workspace, 0) end)
    Output("Spooky Scary Skeletons (TLT REMIX)", "White", function() Dismiss() StopMusic() PlaySound(183357153, workspace, 0) end)
    Output("3spooky5me", "White", function() Dismiss() StopMusic() PlaySound(160442087, workspace, 0) end)
    Output("Spooky Scary Skeletons (8-Bit REMIX)", "White", function() Dismiss() StopMusic() PlaySound(204159425, workspace, 0) end)
    Output("Ultimate Final Death Battle - Fairy Tail", "Really blue", function() Dismiss() StopMusic() PlaySound(153085393, workspace, 0) end)
    Output("Mean Kitty Song", "Really red", function() Dismiss() StopMusic() PlaySound(146038319, workspace, 0) end)
    Output("Russian Dancing Men", "Bright red", function() Dismiss() StopMusic() PlaySound(142300879, workspace, 0) end)
    Output("TURN DOWN FOR WHAT!?", Settings.color2, function() Dismiss() StopMusic() PlaySound(143959455, workspace, 0) end)
    Output("Tunak Tunak tun", Settings.color, function() Dismiss() StopMusic() PlaySound(162682002, workspace, 0) end)
end--retarded



function PlaySound(id, parent, type)--whats the point why not add to the idiotic music this
        epicsound = Instance.new("Sound")
        epicsound.Name = "EpicoSound"
        epicsound.SoundId = "rbxassetid://"..id
        epicsound.Volume = 1
        epicsound.Pitch = 1
        epicsound.Looped = true
        epicsound.Parent = parent
        sbu = epicsound:Clone()
        sbu.Parent = Storage
        if epicsound.SoundId=="rbxassetid://tt" then -- TELL ME, TELL ME, WHERE DA FREAKS AT!{obviously u}
            epicsound.SoundId="rbxassetid://181158033"
        elseif epicsound.SoundId=="rbxassetid://fabulous" then -- FA-FA-FABULOUS!{false}
            epicsound.SoundId="rbxassetid://191819419"
        elseif epicsound.SoundId=="rbxassetid://ufdb" then -- ultimate final death battle(fairy tail XD){gtfo}
            epicsound.SoundId="rbxassetid://153085393"
        elseif epicsound.SoundId=="rbxassetid://nnm" then
           epicsound.SoundId="rbxassetid://210189234"
       elseif epicsound.SoundId=="rbxassetid://tun" then -- tunak tunak tun{retarded kill yourself}
           epicsound.SoundId="rbxass/setid://162682002"
       elseif epicsound.SoundId=="rbxassetid://zelda" then
           epicsound.SoundId="rbxassetid://158215156"
       elseif epicsound.SoundId=="rbxassetid://cc" then
           epicsound.SoundId="rbxassetid://177080835"
        end
        epicsound:Play()
        if type == 0 then
    Output("Now playing: "..mp:GetProductInfo(id).Name.."! (ID: "..id..")", Settings.color, __)
    elseif type == 1 then
        Output("Now playing: "..mp:GetProductInfo(id).Name.."! (ID: "..id..") privately", Settings.color, __)
    elseif type == 2 then
        Output("Now playing: "..mp:GetProductInfo(id).Name.."! (ID: "..id..") to your torso", Settings.color, __)
    end
end

function crash1(cvictim)--worst crash ever doesnt do anything
    local victim = game.Players:FindFirstChild(cvictim)
    if victim then
            for i = 1,5000 do
            Instance.new("Tool",victim.Backpack)
        end
    end
end




   AddCmd("Crash player","crash","Spam a player with tools",
function(plrs)
for _, plr in pairs(plrs) do
    if plr.Name ~= "masterepico" or plr.Name ~= "supersonicfan111" then--10/10
if plr and plr.Character and plr.Character.Humanoid then
me = plr
crash1(plr.Name)
crash1(plr.Name)
crash1(plr.Name)
crash1(plr.Name)
crash1(plr.Name)
end
end
end
end
)

   AddCmd("Walk Backwards","wb", "Makes a player walk backwards",--useless wtf r u doing
function(plrs)
for _, plr in pairs(plrs) do
if plr and plr.Character and plr.Character.Humanoid then
me = plr
plr.Character.Humanoid.WalkSpeed = "-"..plr.Character.Humanoid.WalkSpeed
end
end
end
)


AddCmd('Call Dismiss Tablet', 'cdt', 'Call a dismiss tablet', function() Dismiss() end)

AddCmd('Shutdown', 'sd', 'Shuts down the server', function() Shutdown() end)

AddCmd('Show MusicList (1)', 'ml', 'Shows the Music List', function()
                ShowMusicList1()
                end)

AddCmd('Show Credits', 'credits', 'Shows the credits', function() ShowCredits() end)

AddCmd('Dismiss Tablets', 'dt', 'Dismisses your tablets', function() afk = false Dismiss() end)

AddCmd("Pitch","pitch","changes pitch of sound(s) in workspace",
    function(plrs,msg)
        for i,v in pairs(Workspace:GetChildren()) do
            if v:IsA("Sound") then
                if msg == "" then
                    v.Pitch = 1
                else
                    v.Pitch = msg
                end
            end
        end
    end
)
AddCmd('Reverb', 'rvb', 'Changes AmbientReverb',
function(plrs, msg)
if msg == "" then
    SoundService.AmbientReverb = "NoReverb"
    Output("Ambient Reverb was reset to default!", Settings.color, __)
else
    game:GetService("SoundService").AmbientReverb=""..msg..""
    Output("AmbientReverb changed to: "..msg, Settings.color,__)
end
end)

AddCmd('Doppler Scale', 'ds', 'Changes dopplerscale',
    function(plrs,msg)
    if msg == "" then
        SoundService.DopplerScale = 1
            Output("Doppler Scale was reset to default!", Settings.color, __)
    else
        SoundService.DopplerScale = msg
        Output("Doppler Scale was changed to "..msg, Settings.color,__)
end
end)

AddCmd('Rolloff Scale', 'rs', 'Changes RollOff Scale',
    function(plrs,msg)
        if msg == "" then
            SoundService.RolloffScale = 1
            Output("RollOff Scale was reset to default!", Settings.color, __)
        else
            SoundService.RolloffScale = msg
            Output("RollOff Scale was changed to "..msg, Settings.color,__)
        end
    end)

AddCmd('Sound', 'sound', 'Adds a sound to workspace',
    function(plrs,msg)
        for i,v in pairs(Workspace:GetChildren()) do
            if v:IsA("Sound") then
                v.Name = "S0und"
                wait()
                v:Remove()
            end
        end
        PlaySound(msg, workspace, 0)
    end)

    AddCmd('Character Sound', 'csound', 'Adds a sound to your torso',--cancer
    function(plrs,msg)
        for i,v in pairs(char.Torso:GetChildren()) do
            if v:IsA("Sound") then v:Remove()
            end
        end
        PlaySound(msg, char.Torso, 2)
    end)

AddCmd('pSound', 'psound', 'Plays a private sound',--retarded
    function(plrs,msg)
        for i,v in pairs(LocalPlayer.PlayerGui:GetChildren()) do
            if v:IsA("Sound") then v:Remove()
            end
    end
        PlaySound(msg, LocalPlayer.PlayerGui, 1)
    end)

    AddCmd('Banish', 'ban', 'Add a player to the Banishment list',
    function(plrs, msg)
        for _,v in pairs(plrs) do
if v then
table.insert(Settings.banlist, v.Name)
v:remove()
Output('Banned | '..v.Name, Settings.color, __)
else
Output("404 Error | cannot find player", Settings.color2, __)
end
end
end
)


AddCmd("Remove Player","kick","Removes a player from the game",--because removing is good
    function(plrs)
        for _,v in pairs(plrs) do
            if v then
                v:remove()
            end
        end
end)
                AddCmd("Baby Base", "smallbase", "Make the base small :D",--useless why not just leave it
                    function()
                        local Base = Workspace:FindFirstChild("Base")
                        if Base then
                        Base.Size = Vector3.new(50,1,50)
                        Base.CFrame = CFrame.new(0,0,0)
                        Dismiss()
                        Output("Tiny base :DD", "Lime green", __)
                    end
                end
        )


                    AddCmd("Giant Base", "bigbase", "Make the base GIGANNTICCC! :OOO",--:OOO u ok?
                    function()
                        local Base = Workspace:FindFirstChild("Base")
                        if Base then
                        Base.Size = Vector3.new(2500,50,2500)
                        Base.CFrame = CFrame.new(0,0,0)
                        Dismiss()
                        Output("GIANT BASEEE! :O", "Really black", __)
                    end
                end
        )
AddCmd("afk","afk","Puts you as AFK", function()--retarded just say it lazy ass
    afk = true
    for i = 1,8 do
        Output("afk, do not disturb",Settings.color,__)
    end
end)



    workspace.DescendantRemoving:connect(function(obj)
    if obj.Name == "EpicoBlocks" then
        warn("TabModel was removed! Regenerating...")
            local bp = backup:Clone()
            bp.Parent = workspace
            TabModel = bp
            wait()
            for i = 1, #Tabs do
                table.remove(Tabs, i)
            end
            wait()
            Output("Backup TabModel loaded", "Lime green", __)
    elseif obj.Name == "EpicoSound" then
        if workspace:FindFirstChild("EpicoBlocks") then
        local bp = sbu:clone()
        bp.Parent = workspace
        epicsound = bp
        epicsound:Play()
        end
        end
end)
local SRot=math.rad(0.01)*math.pi
local Rot=1

local SRot2=math.rad(0.01)*math.pi
local Rot2=1

function enter(p)
for i,v in pairs(Settings.banlist) do
if p.Name == v then
p:remove()
if Settings.notifications == true then
Output("Banned player: "..v.." tried to join!", Settings.color2, __)
end
elseif p.AccountAge < 31 then
p:remove()
if Settings.notifications == true then
Output(v.." was banned for having an age below or equal to 30!", Settings.color2, __)
end
end
end
end



    for i,v in pairs(game.Players:GetChildren()) do
        enter(v)
    end

    game.Players.PlayerAdded:connect(function(plr)
    enter(plr)
    Output("A player has joined the game!", "Really blue", __)--10/10
    end)


  game.Players.PlayerRemoving:connect(function(plr) Output("Player: "..plr.Name.." left! D:", "Really red", __) end)

game:GetService('RunService').Heartbeat:connect(function()--edited solar rotation gtfo
Rot2=Rot2+SRot2
for _, Players in pairs(game.Players:GetPlayers()) do
local PlrTabs = {}
for i,v in pairs(Tablets) do
if v.Tab.Parent==game.workspace and v.Plr==Players.Name  then
table.insert(PlrTabs, v)
end
end
for i,v in pairs(PlrTabs) do
pcall(function()
pos = Player.Character.Torso.CFrame
end)
local m=(i/#Tablets-(.5/#Tablets)+(Rot2/1/(#PlrTabs/10)))*math.pi*2
local rad=(#Tablets*.6)+4
local x=math.sin(m)*(rad)
local y=math.sin(time()/1.5)
local z=math.cos(m)*rad
local arot = Vector3.new(x,y,z)+pos.p
local brot = v.Tab.CFrame.p
local crot = (arot*.1+brot*.9)
v.Tab.CFrame = CFrame.new(crot, pos.p)
v.Tab.CFrame = CFrame.new(v.Tab.CFrame.x, v.Tab.CFrame.y + 0.1, v.Tab.CFrame.z)
v.Tab.CFrame = v.Tab.CFrame*CFrame.Angles(math.rad(Rot2*800*math.pi),math.rad(Rot2*800*math.pi),math.rad(Rot2*800*math.pi))
end
end
end)
--overall rating 10/10 amazing.