Advertisement
Guest User

Untitled

a guest
Nov 16th, 2019
116
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 6.92 KB | None | 0 0
  1. --[[
  2. Gui to Lua Converter
  3. -- Revamped by:HoIyScript
  4. --]]
  5.  
  6.  
  7.  
  8. -- Instances:
  9.  
  10. local Main_Warn = Instance.new("ScreenGui")
  11. local Frame = Instance.new("Frame")
  12. local TextLabel = Instance.new("TextLabel")
  13. local TextLabel_2 = Instance.new("TextLabel")
  14. local TextLabel_3 = Instance.new("TextLabel")
  15. local TextLabel_4 = Instance.new("TextLabel")
  16. local TextButton = Instance.new("TextButton")
  17. local EAS_Active_Warning = Instance.new("Frame")
  18. local TextLabel_5 = Instance.new("TextLabel")
  19. local TextLabel_6 = Instance.new("TextLabel")
  20.  
  21. --[[
  22. Properties:
  23. --]]
  24.  
  25. Main_Warn.Name = "Main_Warn"
  26. Main_Warn.Parent = game.Players.LocalPlayer:WaitForChild("PlayerGui")
  27. Main_Warn.ZIndexBehavior = Enum.ZIndexBehavior.Sibling
  28.  
  29. Frame.Parent = Main_Warn
  30. Frame.BackgroundColor3 = Color3.new(0.776471, 0, 0.0117647)
  31. Frame.BackgroundTransparency = 0.30000001192093
  32. Frame.BorderColor3 = Color3.new(0, 0, 0)
  33. Frame.BorderSizePixel = 3
  34. Frame.Position = UDim2.new(0.375, 0, -0.300000012, 0)
  35. Frame.Size = UDim2.new(0, 257, 0, 128)
  36.  
  37. TextLabel.Parent = Frame
  38. TextLabel.BackgroundColor3 = Color3.new(1, 1, 1)
  39. TextLabel.BackgroundTransparency = 1
  40. TextLabel.Position = UDim2.new(0.108096115, 0, 0.0546875, 0)
  41. TextLabel.Size = UDim2.new(0, 200, 0, 50)
  42. TextLabel.Font = Enum.Font.SourceSans
  43. TextLabel.Text = "STORM WARNING"
  44. TextLabel.TextColor3 = Color3.new(1, 1, 1)
  45. TextLabel.TextScaled = true
  46. TextLabel.TextSize = 14
  47. TextLabel.TextWrapped = true
  48.  
  49. TextLabel_2.Parent = Frame
  50. TextLabel_2.BackgroundColor3 = Color3.new(1, 1, 1)
  51. TextLabel_2.BackgroundTransparency = 1
  52. TextLabel_2.Position = UDim2.new(0.156836644, 0, 0.328125, 0)
  53. TextLabel_2.Size = UDim2.new(0, 176, 0, 44)
  54. TextLabel_2.Font = Enum.Font.SourceSans
  55. TextLabel_2.Text = "STORM IMMINENT"
  56. TextLabel_2.TextColor3 = Color3.new(1, 1, 1)
  57. TextLabel_2.TextScaled = true
  58. TextLabel_2.TextSize = 14
  59. TextLabel_2.TextWrapped = true
  60.  
  61. TextLabel_3.Parent = Frame
  62. TextLabel_3.BackgroundColor3 = Color3.new(1, 1, 1)
  63. TextLabel_3.BackgroundTransparency = 1
  64. TextLabel_3.Position = UDim2.new(0, 0, 0.8046875, 0)
  65. TextLabel_3.Size = UDim2.new(0, 256, 0, 25)
  66. TextLabel_3.Font = Enum.Font.SourceSans
  67. TextLabel_3.Text = "EAS WARNING FROM BASECAMP STORM DETECTOR"
  68. TextLabel_3.TextColor3 = Color3.new(1, 1, 1)
  69. TextLabel_3.TextSize = 14
  70. TextLabel_3.TextWrapped = true
  71.  
  72. TextLabel_4.Parent = Frame
  73. TextLabel_4.BackgroundColor3 = Color3.new(1, 1, 1)
  74. TextLabel_4.BackgroundTransparency = 1
  75. TextLabel_4.Position = UDim2.new(0.155421749, 0, 0.578125, 0)
  76. TextLabel_4.Size = UDim2.new(0, 176, 0, 36)
  77. TextLabel_4.Font = Enum.Font.SourceSans
  78. TextLabel_4.Text = "LOCATE NEAREST CAMP"
  79. TextLabel_4.TextColor3 = Color3.new(1, 1, 1)
  80. TextLabel_4.TextScaled = true
  81. TextLabel_4.TextSize = 14
  82. TextLabel_4.TextWrapped = true
  83.  
  84. TextButton.Parent = Main_Warn
  85. TextButton.BackgroundColor3 = Color3.new(0.658824, 0, 0.00784314)
  86. TextButton.BackgroundTransparency = 0.25
  87. TextButton.BorderSizePixel = 0
  88. TextButton.Position = UDim2.new(0, 0, 0.401869148, 0)
  89. TextButton.Size = UDim2.new(0, 135, 0, 26)
  90. TextButton.Visible = false
  91. TextButton.Font = Enum.Font.SourceSans
  92. TextButton.Text = "Receiving EAS Alert.."
  93. TextButton.TextColor3 = Color3.new(0, 0, 0)
  94. TextButton.TextSize = 14
  95.  
  96. EAS_Active_Warning.Name = "EAS_Active_Warning"
  97. EAS_Active_Warning.Parent = Main_Warn
  98. EAS_Active_Warning.BackgroundColor3 = Color3.new(0.776471, 0, 0.0117647)
  99. EAS_Active_Warning.BackgroundTransparency = 0.30000001192093
  100. EAS_Active_Warning.BorderColor3 = Color3.new(0, 0, 0)
  101. EAS_Active_Warning.BorderSizePixel = 3
  102. EAS_Active_Warning.Position = UDim2.new(-1, 0, 0.479999989, 0)
  103. EAS_Active_Warning.Size = UDim2.new(0, 200, 0, 49)
  104.  
  105. TextLabel_5.Parent = EAS_Active_Warning
  106. TextLabel_5.BackgroundColor3 = Color3.new(1, 1, 1)
  107. TextLabel_5.BackgroundTransparency = 1
  108. TextLabel_5.Position = UDim2.new(0.0199999996, 0, -0.122448981, 0)
  109. TextLabel_5.Size = UDim2.new(0, 192, 0, 37)
  110. TextLabel_5.Font = Enum.Font.SourceSans
  111. TextLabel_5.Text = "EAS STORM WARNING"
  112. TextLabel_5.TextColor3 = Color3.new(1, 1, 1)
  113. TextLabel_5.TextScaled = true
  114. TextLabel_5.TextSize = 14
  115. TextLabel_5.TextWrapped = true
  116.  
  117. TextLabel_6.Parent = EAS_Active_Warning
  118. TextLabel_6.BackgroundColor3 = Color3.new(1, 1, 1)
  119. TextLabel_6.BackgroundTransparency = 1
  120. TextLabel_6.Position = UDim2.new(0.201370016, 0, 0.53061223, 0)
  121. TextLabel_6.Size = UDim2.new(0, 118, 0, 23)
  122. TextLabel_6.Font = Enum.Font.SourceSans
  123. TextLabel_6.Text = "GET TO SHELTER"
  124. TextLabel_6.TextColor3 = Color3.new(1, 1, 1)
  125. TextLabel_6.TextScaled = true
  126. TextLabel_6.TextSize = 14
  127. TextLabel_6.TextWrapped = true
  128.  
  129. --[[
  130. Scripts:
  131. --]]
  132.  
  133. local function GTOE_fake_script() -- TextLabel_4.LocalScript
  134. local script = Instance.new('LocalScript', TextLabel_4)
  135.  
  136. while true do
  137. script.Parent.TextTransparency = 1
  138. wait(0.5)
  139. script.Parent.TextTransparency = 0
  140. wait(1)
  141. end
  142. end
  143. coroutine.wrap(GTOE_fake_script)()
  144. local function BREPILR_fake_script() -- TextButton.LocalScript
  145. local script = Instance.new('LocalScript', TextButton)
  146.  
  147. local test = script.Parent.Parent.Frame -- Main EAS UI Frame
  148. local EASW = script.Parent.Parent.EAS_Active_Warning -- Side EAS Bar on the left
  149. -----------------------------------------------
  150. function openGui() -- openGui() Function
  151. test:TweenPosition(UDim2.new(0.375, 0,0.402, 0)) --() Main EAS UI Position 1
  152. script.Parent.Visible = false
  153. game.SoundService.Sound.Playing = true
  154. -----------------------------------------------
  155. wait(9) -- EAS Waiting time
  156. -----------------------------------------------
  157. test:TweenPosition(UDim2.new(0.375, 0,-0.3, 0)) --() Main EAS UI Position 2
  158. game.Lighting.FogStart = 0 -- Lighting
  159. game.Lighting.FogEnd = 50 -- Lighting
  160. game.Lighting.Brightness = 1 -- Lighting
  161. game.Lighting.ExposureCompensation = -0.46 -- Lighting
  162. EASW:TweenPosition(UDim2.new(0, 0,0.48, 0)) --() Sidebar UI Position 1
  163. -----------------------------------------------
  164. wait(120) -- Waiting time between snowstorm
  165. -----------------------------------------------
  166. game.Lighting.FogEnd = 400 -- Lighting
  167. game.Lighting.Brightness = 2 -- Lighting
  168. game.Lighting.ExposureCompensation = 0 -- Lighting
  169. EASW:TweenPosition(UDim2.new(-1, 0,0.48, 0)) -- Sidebar UI Position 2
  170. end
  171. -----------------------------------------------
  172. --function EAS() -- Function for EAS Sound service
  173. --game.SoundService.Sound.Playing = true -- Sound Service SoundID == "4398825617"
  174. --end
  175. -----------------------------------------------
  176. --script.Parent.MouseButton1Click:connect(openGui) -- Connect Function That Executes MainUI Function
  177. --script.Parent.MouseButton1Click:connect(EAS)-- Connect Function That Executes Secondary Function
  178. -----------------------------------------------
  179.  
  180. openGui()
  181. end
  182. coroutine.wrap(BREPILR_fake_script)()
  183. local function SEMFQ_fake_script() -- TextLabel_6.LocalScript
  184. local script = Instance.new('LocalScript', TextLabel_6)
  185.  
  186. while true do
  187. script.Parent.TextTransparency = 1
  188. wait(1)
  189. script.Parent.TextTransparency = 0
  190. wait(1)
  191. end
  192. end
  193. coroutine.wrap(SEMFQ_fake_script)()
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement