Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- --[[
- Gui to Lua Converter
- -- Revamped by:HoIyScript
- --]]
- -- Instances:
- local Main_Warn = Instance.new("ScreenGui")
- local Frame = Instance.new("Frame")
- local TextLabel = Instance.new("TextLabel")
- local TextLabel_2 = Instance.new("TextLabel")
- local TextLabel_3 = Instance.new("TextLabel")
- local TextLabel_4 = Instance.new("TextLabel")
- local TextButton = Instance.new("TextButton")
- local EAS_Active_Warning = Instance.new("Frame")
- local TextLabel_5 = Instance.new("TextLabel")
- local TextLabel_6 = Instance.new("TextLabel")
- --[[
- Properties:
- --]]
- Main_Warn.Name = "Main_Warn"
- Main_Warn.Parent = game.Players.LocalPlayer:WaitForChild("PlayerGui")
- Main_Warn.ZIndexBehavior = Enum.ZIndexBehavior.Sibling
- Frame.Parent = Main_Warn
- Frame.BackgroundColor3 = Color3.new(0.776471, 0, 0.0117647)
- Frame.BackgroundTransparency = 0.30000001192093
- Frame.BorderColor3 = Color3.new(0, 0, 0)
- Frame.BorderSizePixel = 3
- Frame.Position = UDim2.new(0.375, 0, -0.300000012, 0)
- Frame.Size = UDim2.new(0, 257, 0, 128)
- TextLabel.Parent = Frame
- TextLabel.BackgroundColor3 = Color3.new(1, 1, 1)
- TextLabel.BackgroundTransparency = 1
- TextLabel.Position = UDim2.new(0.108096115, 0, 0.0546875, 0)
- TextLabel.Size = UDim2.new(0, 200, 0, 50)
- TextLabel.Font = Enum.Font.SourceSans
- TextLabel.Text = "STORM WARNING"
- TextLabel.TextColor3 = Color3.new(1, 1, 1)
- TextLabel.TextScaled = true
- TextLabel.TextSize = 14
- TextLabel.TextWrapped = true
- TextLabel_2.Parent = Frame
- TextLabel_2.BackgroundColor3 = Color3.new(1, 1, 1)
- TextLabel_2.BackgroundTransparency = 1
- TextLabel_2.Position = UDim2.new(0.156836644, 0, 0.328125, 0)
- TextLabel_2.Size = UDim2.new(0, 176, 0, 44)
- TextLabel_2.Font = Enum.Font.SourceSans
- TextLabel_2.Text = "STORM IMMINENT"
- TextLabel_2.TextColor3 = Color3.new(1, 1, 1)
- TextLabel_2.TextScaled = true
- TextLabel_2.TextSize = 14
- TextLabel_2.TextWrapped = true
- TextLabel_3.Parent = Frame
- TextLabel_3.BackgroundColor3 = Color3.new(1, 1, 1)
- TextLabel_3.BackgroundTransparency = 1
- TextLabel_3.Position = UDim2.new(0, 0, 0.8046875, 0)
- TextLabel_3.Size = UDim2.new(0, 256, 0, 25)
- TextLabel_3.Font = Enum.Font.SourceSans
- TextLabel_3.Text = "EAS WARNING FROM BASECAMP STORM DETECTOR"
- TextLabel_3.TextColor3 = Color3.new(1, 1, 1)
- TextLabel_3.TextSize = 14
- TextLabel_3.TextWrapped = true
- TextLabel_4.Parent = Frame
- TextLabel_4.BackgroundColor3 = Color3.new(1, 1, 1)
- TextLabel_4.BackgroundTransparency = 1
- TextLabel_4.Position = UDim2.new(0.155421749, 0, 0.578125, 0)
- TextLabel_4.Size = UDim2.new(0, 176, 0, 36)
- TextLabel_4.Font = Enum.Font.SourceSans
- TextLabel_4.Text = "LOCATE NEAREST CAMP"
- TextLabel_4.TextColor3 = Color3.new(1, 1, 1)
- TextLabel_4.TextScaled = true
- TextLabel_4.TextSize = 14
- TextLabel_4.TextWrapped = true
- TextButton.Parent = Main_Warn
- TextButton.BackgroundColor3 = Color3.new(0.658824, 0, 0.00784314)
- TextButton.BackgroundTransparency = 0.25
- TextButton.BorderSizePixel = 0
- TextButton.Position = UDim2.new(0, 0, 0.401869148, 0)
- TextButton.Size = UDim2.new(0, 135, 0, 26)
- TextButton.Visible = false
- TextButton.Font = Enum.Font.SourceSans
- TextButton.Text = "Receiving EAS Alert.."
- TextButton.TextColor3 = Color3.new(0, 0, 0)
- TextButton.TextSize = 14
- EAS_Active_Warning.Name = "EAS_Active_Warning"
- EAS_Active_Warning.Parent = Main_Warn
- EAS_Active_Warning.BackgroundColor3 = Color3.new(0.776471, 0, 0.0117647)
- EAS_Active_Warning.BackgroundTransparency = 0.30000001192093
- EAS_Active_Warning.BorderColor3 = Color3.new(0, 0, 0)
- EAS_Active_Warning.BorderSizePixel = 3
- EAS_Active_Warning.Position = UDim2.new(-1, 0, 0.479999989, 0)
- EAS_Active_Warning.Size = UDim2.new(0, 200, 0, 49)
- TextLabel_5.Parent = EAS_Active_Warning
- TextLabel_5.BackgroundColor3 = Color3.new(1, 1, 1)
- TextLabel_5.BackgroundTransparency = 1
- TextLabel_5.Position = UDim2.new(0.0199999996, 0, -0.122448981, 0)
- TextLabel_5.Size = UDim2.new(0, 192, 0, 37)
- TextLabel_5.Font = Enum.Font.SourceSans
- TextLabel_5.Text = "EAS STORM WARNING"
- TextLabel_5.TextColor3 = Color3.new(1, 1, 1)
- TextLabel_5.TextScaled = true
- TextLabel_5.TextSize = 14
- TextLabel_5.TextWrapped = true
- TextLabel_6.Parent = EAS_Active_Warning
- TextLabel_6.BackgroundColor3 = Color3.new(1, 1, 1)
- TextLabel_6.BackgroundTransparency = 1
- TextLabel_6.Position = UDim2.new(0.201370016, 0, 0.53061223, 0)
- TextLabel_6.Size = UDim2.new(0, 118, 0, 23)
- TextLabel_6.Font = Enum.Font.SourceSans
- TextLabel_6.Text = "GET TO SHELTER"
- TextLabel_6.TextColor3 = Color3.new(1, 1, 1)
- TextLabel_6.TextScaled = true
- TextLabel_6.TextSize = 14
- TextLabel_6.TextWrapped = true
- --[[
- Scripts:
- --]]
- local function GTOE_fake_script() -- TextLabel_4.LocalScript
- local script = Instance.new('LocalScript', TextLabel_4)
- while true do
- script.Parent.TextTransparency = 1
- wait(0.5)
- script.Parent.TextTransparency = 0
- wait(1)
- end
- end
- coroutine.wrap(GTOE_fake_script)()
- local function BREPILR_fake_script() -- TextButton.LocalScript
- local script = Instance.new('LocalScript', TextButton)
- local test = script.Parent.Parent.Frame -- Main EAS UI Frame
- local EASW = script.Parent.Parent.EAS_Active_Warning -- Side EAS Bar on the left
- -----------------------------------------------
- function openGui() -- openGui() Function
- test:TweenPosition(UDim2.new(0.375, 0,0.402, 0)) --() Main EAS UI Position 1
- script.Parent.Visible = false
- game.SoundService.Sound.Playing = true
- -----------------------------------------------
- wait(9) -- EAS Waiting time
- -----------------------------------------------
- test:TweenPosition(UDim2.new(0.375, 0,-0.3, 0)) --() Main EAS UI Position 2
- game.Lighting.FogStart = 0 -- Lighting
- game.Lighting.FogEnd = 50 -- Lighting
- game.Lighting.Brightness = 1 -- Lighting
- game.Lighting.ExposureCompensation = -0.46 -- Lighting
- EASW:TweenPosition(UDim2.new(0, 0,0.48, 0)) --() Sidebar UI Position 1
- -----------------------------------------------
- wait(120) -- Waiting time between snowstorm
- -----------------------------------------------
- game.Lighting.FogEnd = 400 -- Lighting
- game.Lighting.Brightness = 2 -- Lighting
- game.Lighting.ExposureCompensation = 0 -- Lighting
- EASW:TweenPosition(UDim2.new(-1, 0,0.48, 0)) -- Sidebar UI Position 2
- end
- -----------------------------------------------
- --function EAS() -- Function for EAS Sound service
- --game.SoundService.Sound.Playing = true -- Sound Service SoundID == "4398825617"
- --end
- -----------------------------------------------
- --script.Parent.MouseButton1Click:connect(openGui) -- Connect Function That Executes MainUI Function
- --script.Parent.MouseButton1Click:connect(EAS)-- Connect Function That Executes Secondary Function
- -----------------------------------------------
- openGui()
- end
- coroutine.wrap(BREPILR_fake_script)()
- local function SEMFQ_fake_script() -- TextLabel_6.LocalScript
- local script = Instance.new('LocalScript', TextLabel_6)
- while true do
- script.Parent.TextTransparency = 1
- wait(1)
- script.Parent.TextTransparency = 0
- wait(1)
- end
- end
- coroutine.wrap(SEMFQ_fake_script)()
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement