Advertisement
Guest User

Untitled

a guest
Sep 14th, 2017
125
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 73.62 KB | None | 0 0
  1. --// SaviOS by SavageMunkey
  2.  
  3. local Host = game:service'Players'.LocalPlayer
  4. local PlayerMouse = Host:GetMouse()
  5. local Character = Host.Character
  6.  
  7. pcall(function()
  8. Character.Humanoid['SaviOS'..Host.Name].Disabled=true
  9. Character.Humanoid['SaviOS'..Host.Name]:Destroy()
  10. end)
  11. script.Name='SaviOS'..Host.Name
  12.  
  13. local lrs = game:service'RunService'.RenderStepped
  14. local ud,c3 = UDim2.new,Color3.new
  15.  
  16. local OS
  17. OS = {
  18. Backgrounds={263065080,122603145,510593355,167312453,119945204,38397690,167312682,192050536,152026398,167312652,120582545,167493039,274050234,454292754,466900315,177053058,229293848,122646263,159102803,321434238,120214481,120480107,129805827,251350099,134993390,294851220,91427420,159103087,161729354,451983167,111563465,224033486,159103552,490565976,419023708,159111488,254890271,72090809,148038665,201380429,235907960,118966085,184001465,158549839,135040161,569012987,124111954,617785055,127976057,157765107,172813012,261956734,229544221,381428334,141204418,130675970,114611763,569627808,165460147,165460277,123128917,65246335,113000488,210624979,86219936,542893768,485873381,133109970,147298379,147297851,133461415,248254225,542822127,536363798,167312652,542895503,89552732,65151650,101805028,103684980,385601310,57939071,304922993,13511519,473575489,256418140,136004272,46076174,497195310,28143702,158772801,557860938,483527125,125134380,129296064,436986440,331063936,162704842,108531974,156021502,546688542,192509200,193859832,78289792,339807971,156513166,305407040,363144648,60043055,621825797,621828236,179089950,501279669,403674379,275918945,247421728,126655771,478203228,25719408,50358414,7460070,415408253,91215756,85243064,135112694,161131570,684101235,467373053,65891746,24960278,318592132,424415675,17266396,64198567,230444445,156269405,179089950,248285466,202899851,156314932,151133945,514648696,};
  19. Properties = {'AllowClientInsertModels','BrickColor','Color','ShowDevelopmentGui','ResetPlayerGuiOnSpawn','Parent','CustomPhysicalProperties','WaterColor','WaterTransparency','WaterWaveSize','WaterWaveSpeed','AllowThirdPartySales','FilteringEnabled','StreamingEnabled','Gravity','FallenPartsDestroyHeight','Archivable','AbsolutePosition','AbsoluteSize','AccountAge','AccountAgeReplicate','Active','Adornee','AllowAmbientOcclusion','AllowTeamChangeOnTouch','AluminumQuality','AlwaysOnTop','Ambient','AmbientReverb','Anchored','Angularvelocity','AnimationId','Archivable','AreHingesDetected','AttachmentForward','AttachmentPoint','AttachmentPos','AttachmentRight','AttachmentUp','AutoAssignable','AutoButtonColor','AutoColorCharacters','AvailablePhysicalMemory','Axes','BackgroundColor','BackgroundColor3','BackgroundTransparency','BackSurface','BaseTextureId','BaseUrl','Bevel','Roundness','BinType','BlastPressure','BlastRadius','C0','C1','HeadColor','LeftArmColor','RightArmColor','LeftLegColor','RightLegColor','HumanoidRootPartColor','BodyColor','BodyPart','BorderColor','BorderColor3','BorderSizePixel','BottomSurface','BrickColor','Brightness','Browsable','BubbleChat','BubbleChatLifetime','BubbleChatMaxBubbles','Bulge','Button1DownConnectionCount','Button1UpConnectionCount','Button2DownConnectionCount','Button2UpConnectionCount','C0','C1','CameraMode','CameraSubject','CameraType','CanBeDropped','CanCollide','CartoonFactor','CastShadows','CelestialBodiesShown','CFrame','Cframe','Character','CharacterAppearance','CharacterAutoLoads','ChatScrollLength','ClassicChat','ClassName','ClearTextOnFocus','ClipsDescendants','CollisionSoundEnabled','CollisionSoundVolume','Color','ColorShift_Top','ColorShift_Bottom','Bottom','Top','ConstrainedValue','Contro'..'llingHumanoid','ControlMode','ConversationDistance','CoordinateFrame','CorrodedMetalQuality','CPU','CpuCount','CpuSpeed','CreatorId','CreatorType','CurrentAngle','CurrentCamera','CycleOffset','D','DataCap','DataComplexity','DataComplexityLimit','DataCost','DataReady','Deprecated','DeselectedConnectionCount','DesiredAngle','DiamondPlateQuality','Disabled','DistanceFactor','DistributedGameTime','DopplerScale','Draggable','DraggingV1','Duration','EditorFont','EditorFontSize','EditorTabWidth','ElapsedTime','Elasticity','Enabled','ExplosionType','ExtentsOffset','F0','F1','F2','F3','Face','FaceId','Faces','FieldOfView','Focus','FogColor','FogEnd','FogStart','Font','FontSize','Force','FormFactor','Friction','From','FrontSurface','GearGenreSetting','Genre','GeographicLatitude','GfxCard', 'GlobalShadows','Graphic','GrassQuality','Grip','GripForward','GripPos','GripRight','GripUp','Guest','HeadsUpDisplay','Health','Heat','Hit','Humanoid','IceQuality','Icon','IdleConnectionCount','Image','InitialPrompt','InOut','InUse','IsPaused','IsPlaying','JobId','Jump','KeyDownConnectionCount','KeyUpConnectionCount','LeftLeg','LeftRight','LeftSurface','LinkedSource','LocalPlayer','Location','Locked','LODX','LODY','Looped','Material','MaxActivationDistance','MaxCollisionSounds','MaxExtents','MaxForce','MaxHealth','MaxItems','MaxPlayers','MaxSpeed','MaxThrust','MaxTorque','MaxValue','MaxVelocity','MembershipType','MembershipTypeReplicate','MeshId','MeshType','MinValue','Modal','MouseButton1ClickConnectionCount','MouseButton1DownConnectionCount','MouseButton1UpConnectionCount','MouseButton2ClickConnectionCount','MouseButton2DownConnectionCount','MouseButton2UpConnectionCount','MouseDelta','MouseDragConnectionCount','MouseEnterConnectionCount','MouseHit','MouseLeaveConnectionCount','MouseLock','MouseMovedConnectionCount','MouseTarget','MouseTargetFilter','MouseTargetSurface','MoveConnectionCount','MoveState','MultiLine','Name','NameOcclusion','NetworkOw'..'ner','Neutral','NumPlayers','Offset','Opacity','Origin','OsPlatform','OsVer','OutdoorAmbient','OverlayTextureId','P','PantsTemplate','ParamA','ParamB','Parent','PrimaryPart','Part','Part0','Part1','Pitch','PixelShaderModel','PlaceId','PlasticQuality','PlatformStand','PlayCount','PlayerToHideFrom','PlayOnRemove','Point','Port','Position','Preliminary','PrimaryPart','PrivateWorkingSetBytes','Purpose','RAM','Reflectance','ReplicatedSelectedConnectionCount','ResizeableFaces','ResizeIncrement','Resolution','ResponseDialog','RightLeg','RightSurface','RiseVelocity','RobloxLocked','RobloxVersion','RolloffScale','RotVelocity','Scale','Score','ScriptsDisabled','SecondaryColor','Selected','ShadowColor','Shape','Shiny','ShirtTemplate','ShowDeprecatedObjects','ShowDevelopmentGui','ShowPreliminaryObjects','Sides','Sit','Size','SizeConstraint','SizeOffset','SkinColor','SkyboxBk','SkyboxDn','SkyboxFt','SkyboxLf','SkyboxRt','SkyboxUp','SlateQuality','SoundId','Source','SparkleColor','Specular','StarCount','Steer','StickyWheels','StudsBetweenTextures','StudsOffset','StudsPerTileU','StudsPerTileV','Style','Summary','SuperSa'..'feChatReplicate','Surface','Surface0','Surface1','SurfaceInput','Target','TargetFilter','TargetOffset','TargetPoint','TargetRadius','TargetSurface','TeamColor','Terrain','Text','TextBounds','TextColor','TextColor3','TextFits','TextScaled','TextStrokeColor3','TextStrokeTransparency','TextTransparency','Texture','TextureId','TextureSize','TextWrap','TextWrapped','TextXAlignment','TextYAlignment','Throttle','ThrustD','ThrustP','Ticket','Time','TimeOfDay','To','Tone','ToolTip','TopBottom','TopSurface','Torque','HumanoidRootPart','Transparency','TrussDetail','TurnD','TurnP','TurnSpeed','UnitRay','UserDialog','UserId','Value','Version','VertexColor','VideoCaptureEnabled','VideoMemory','VideoQuality','ViewSizeX','ViewSizeY','Visible','Volume','WalkDirection','WalkSpeed','WalkToPart','WalkToPoint','WheelBackwardConnectionCount','WheelForwardConnectionCount','WindowSize','WireRadius','WoodQuality','X','Y','Z'};
  20. DecalAssets={200182847};
  21. --//49,51,51,55,115,97,118
  22. Sounds = {
  23. 971671478,971645636,968525060,968431239,963244640,963192219,957380272,954288297,949842452,
  24. 949812052,949796624,949786901,949781971,949755900,712380316,922645675,936239275,
  25. 868056399,142852617,622793030,587370338,
  26. };
  27. RecentlyUsedPrograms={};
  28. UIs={};
  29. Logins={
  30. {'SavageMunkey','abcd12',Color3.new(.1,.1,.1),Color3.new(1,1,1),497195310};--167312453};
  31. {'Artiecsal','sookithearth',c3(0,0,0),c3(1,1,1),122646263},
  32. {'Luke_Ames','xXfatphonesXx',c3(.5,0,0),c3(1,1,1),621828236},
  33. {'Lord_Azure','AzureIsGay',c3(.3,0,0),c3(1,1,1),215152878},
  34. };
  35. Administrators={
  36. 'SavageMunkey',
  37. 'Aeodile',
  38. };
  39. Effects={};
  40. Functions={};
  41. Assets={};
  42. Apps={
  43. Qeued={};
  44. Generated={};
  45. Open={};
  46. };
  47. Settings={
  48. Fonts = {
  49. Header = 'Code',
  50. Sub_Header = 'Highway',
  51. };
  52. };
  53. };
  54.  
  55. Functions = OS.Functions
  56. Effects = OS.Effects
  57.  
  58. OS.GenCode = math.random()*9e5
  59.  
  60. local CurrentPlayerData=nil
  61. local Official=true
  62.  
  63. function Functions:ConvertColor3(r,g,b)
  64. return c3(1-(1/r),1-(10/g),1-(10/b)) --//derped
  65. end
  66.  
  67. function Functions:ReturnObjectProperties(Object)
  68. assert(pcall(function()
  69. assert(game.IsA(Object,'Instance'))
  70. end),'Should be ROBLOX instance')
  71. local Returns = {}
  72. for _, Value in next, OS.Properties do
  73. if pcall(function() return Object[Value] end) and (type(Object[Value]) ~= 'userdata' or not Object:FindFirstChild(Value)) then
  74. Returns[Value] = Object[Value]
  75. end
  76. end
  77. return Returns
  78. end;
  79.  
  80. --print(Functions:ConvertColor3(170, 0, 255))
  81.  
  82. function Functions:GrabHostData()
  83. local PlayerData=nil
  84. local Found=0
  85. for Index, Data in next, OS.Logins do
  86. if Data[1] == tostring(Host) then
  87. PlayerData=Data
  88. Found=Found+1
  89. end
  90. end
  91. if PlayerData then
  92. CurrentPlayerData=PlayerData
  93. else
  94. Official=false
  95. CurrentPlayerData={Host.Name,Host.Name:lower():sub(0,5)..'12'..math.random(-50,50),c3(.25,.25,.25),c3(1,1,1),OS.Backgrounds[math.random(1,#OS.Backgrounds)]};
  96. script:Destroy()
  97. end
  98. if Found > 1 then
  99. error('Found more than one('..Found..') data tables for '..Host.Name,2)
  100. end
  101. end
  102.  
  103. Functions:GrabHostData()
  104.  
  105. table.foreach(CurrentPlayerData,print)
  106.  
  107. function Functions:GetPlayerImg(User)
  108. local ID = 'http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username='..tostring(User)
  109. return ID
  110. end
  111.  
  112. ypcall(function()
  113. --workspace['mon-mon']:Destroy()
  114. end)
  115.  
  116. local Monitor, G, MainFrame
  117. function Functions:MakeMonitor()
  118. pcall(function() workspace['mon-mon'..Host.Name]:Destroy() end)
  119. local sc=Instance.new('Script', workspace)
  120. sc.Name='mon-mon'..Host.Name
  121. OS.Assets.FScript=sc
  122. Monitor = Instance.new('Part', sc)
  123. Monitor.Size = Vector3.new(24,14,.1)
  124. Monitor.Anchored = true
  125. Monitor.Locked=true
  126. Monitor.Transparency=0
  127. Monitor.Color=Color3.new(1,1,1)
  128. Monitor.Material='Neon'
  129. Monitor.Name='mon-mon'
  130. Instance.new('SurfaceLight',Monitor).Face='Back'
  131. Monitor.CanCollide = false
  132. Monitor.TopSurface,Monitor.BottomSurface=0,0
  133. local Flat = Instance.new('BlockMesh', Monitor)
  134. Flat.Scale = Vector3.new(1,1,0)
  135. spawn(function()
  136. for i = 0,1.025,.025 do
  137. --Monitor.Transparency = 1.3-i
  138. lrs:wait()
  139. end
  140. end)
  141. end
  142.  
  143. function Functions:MakeNewUi(Type)
  144. local Ui = Instance.new(Type)
  145.  
  146. local function TypeIsA(Table, Goal)
  147. for i,v in next, Table do
  148. if v:lower()==Type:lower() then
  149. Goal(Ui)
  150. end
  151. end
  152. end
  153.  
  154. Ui.ClipsDescendants = true
  155. Ui.Size = ud(1,0,1,0)
  156. Ui.BackgroundTransparency = 1
  157. TypeIsA({'TextButton'}, function(tUi)
  158. Ui.AutoButtonColor = false
  159. end)
  160. Ui.BackgroundColor3 = CurrentPlayerData[3]
  161. Ui.BorderSizePixel = 0
  162. TypeIsA({'ImageLabel','ImageButton'}, function(tUi)
  163.  
  164. end)
  165. TypeIsA({'TextButton','TextLabel','TextBox'}, function(tUi)
  166. tUi.TextColor3 = CurrentPlayerData[4]
  167. tUi.Font = OS.Settings.Fonts.Header
  168. tUi.Text=''
  169. tUi.FontSize = Enum.FontSize.Size18
  170. end)
  171. delay(.1,function()
  172. OS.UIs[Ui.Name]={Ui,true}
  173. local oUi=Ui
  174. spawn(function()
  175. repeat lrs:wait() until Ui.Parent == nil
  176. OS.UIs[oUi.Name]={nil,false}
  177. end)
  178. end)
  179. Ui.ZIndex=7
  180. return Ui
  181. end
  182.  
  183. function Functions:Center(Ui)
  184. local co={Ui.Size.X.Offset/2,
  185. Ui.Size.Y.Offset/2};
  186. return ud(.5,-co[1],.5,-co[2])
  187. end
  188.  
  189. function Functions:CenterOffset(Ui, Offset)
  190. local co={Ui.Size.X.Scale,
  191. Ui.Size.X.Offset/2,
  192. Ui.Size.Y.Scale,
  193. Ui.Size.Y.Offset/2
  194. };
  195. return ud(.5+Offset.X.Scale,-co[2]+Offset.X.Offset,.5+Offset.Y.Scale,-co[4]+Offset.Y.Offset)
  196. end
  197.  
  198. local TypeDebs={};
  199. function Effects:Type(Ui, Text, Type, Delay)
  200. TypeDebs[Ui]=false
  201. if Type == 'In' then
  202. local Continue = true
  203. for i = 0,#Text do
  204. if TypeDebs[Ui] then
  205. Continue = false
  206. return
  207. end
  208. if not Continue then
  209. return
  210. end
  211. Ui.Text = Text:sub(0,i)..'|'
  212. wait(Delay)
  213. end
  214. Ui.Text = Text
  215. elseif Type == 'Out' then
  216. local Continue = true
  217. for i = 0,#Text do
  218. if TypeDebs[Ui] then
  219. Continue = false
  220. return
  221. end
  222. if not Continue then
  223. return
  224. end
  225. Ui.Text = Text:sub(0,1-i)..'|'
  226. wait(Delay)
  227. end
  228. Ui.Text = Text
  229. else
  230. error'Please enter a TransitionType (Out, In)'
  231. end
  232. end
  233.  
  234. function Functions:Sound(Id ,Rmv)
  235. local snd=Instance.new('Sound', Character:WaitForChild'Head' or Monitor or workspace)
  236. if Rmv then
  237. for index,o in next, snd.Parent:children() do
  238. if o:IsA'Sound' and o ~= snd then
  239. o:Stop()
  240. o:Destroy()
  241. end
  242. end
  243. end
  244. snd.EmitterSize=20
  245. snd.SoundId=Functions:Asset(Id)
  246. snd.Volume=.6
  247. delay(8,function()
  248. if not snd.Looped and snd.IsPlaying==false then
  249. snd:Stop()
  250. snd:Destroy()
  251. end
  252. end)
  253. return snd
  254. end
  255.  
  256. function Effects:Underline(Ui, YOffset, XThickness, YThickness, Color, Fade)
  257. local Label = Functions:MakeNewUi('TextLabel')
  258. Label.BackgroundColor3 = Color
  259. Label.BackgroundTransparency=.2
  260. Label.Size = ud(0,0,0,YThickness)
  261. Label.Position = Functions:CenterOffset(Label, ud(0,0,0,YOffset))
  262. Label.Parent = Ui
  263. Label.ZIndex = 9
  264. if Fade then
  265. Label.BackgroundTransparency = 1
  266. delay(.5,function()
  267. Label:TweenSizeAndPosition(ud(0,XThickness,0,YThickness),Functions:CenterOffset(Label,ud(0,-XThickness/2,0,YOffset)),'Out','Back',1,true)
  268. end)
  269. for i = 0,1.025,.025 do
  270. Label.BackgroundTransparency = (1.2 - i)
  271. lrs:wait()
  272. end
  273. else
  274. Label.Size = ud(0,XThickness,0,YThickness)
  275. Label.Position = Functions:CenterOffset(Label, ud(0,0,0,YOffset))
  276. end
  277. return Label
  278. end
  279.  
  280. function Functions:Asset(Id)
  281. return 'rbxassetid://'..Id
  282. end
  283.  
  284. function Functions:PlayerImage(User)
  285. return 'http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username='..tostring(User)
  286. end
  287.  
  288. function Functions:LoginScreenGui(Size,ltbl,Fade)
  289. if Host.PlayerGui:FindFirstChild'nomnompw' then
  290. end
  291. local limit=16
  292. local SGui = Instance.new('ScreenGui', Host.PlayerGui)
  293. SGui.Name='nomnompw'
  294. local Box = Functions:MakeNewUi('TextBox')
  295. Box.ClearTextOnFocus=true
  296. Box.TextColor3 = CurrentPlayerData[3]
  297. Box.TextStrokeTransparency=.9
  298. Box.Size=Size
  299. Box.Text = 'Enter your Password'
  300. Box.Position=Functions:Center(Box)
  301. Box.BackgroundTransparency=1
  302. Box.TextStrokeColor3=CurrentPlayerData[3]
  303. Box.Parent=SGui
  304. Box.BackgroundColor3 = CurrentPlayerData[4]
  305. local enabled=true
  306. if Fade then
  307. Box.Position = Functions:CenterOffset(Box,ud(0,0,-.4,0))
  308. for i = 0,1,.05 do
  309. Box.BackgroundTransparency=1-i
  310. lrs:wait()
  311. end
  312. Box:CaptureFocus()
  313. end
  314. local ev
  315. ev=Box.Focused:connect(function()
  316. --ev:disconnect()
  317. Box.ClearTextOnFocus=false
  318. end)
  319. local ev2
  320. local lt=''
  321. ev2=Box.FocusLost:connect(function()
  322. if #Box.Text < 1 or Box.Text == 'Enter your Password' then
  323. Box.Text='Enter your Password'
  324. Box.ClearTextOnFocus=true
  325. end
  326. if Box.Text==CurrentPlayerData[2] then
  327. ev:disconnect()
  328. ev2:disconnect()
  329. Box.Active=false
  330. Box:TweenPosition(Functions:CenterOffset(Box,ud(0,0,-.55,0)),'Out','Linear',.5,true)
  331. Box.TextStrokeTransparency=1
  332. for i = 0,1,.05 do
  333. Box.BackgroundTransparency=i
  334. Box.TextTransparency=i
  335. lrs:wait()
  336. end
  337. lt=Box.Text
  338. SGui:Destroy()
  339. end
  340. end)
  341. Box.BackgroundTransparency=0
  342. if ltbl.loop then
  343. while SGui.Parent and enabled do
  344. lt=Box.Text
  345. if #Box.Text>limit and Box.Text ~= 'Enter your Password' then
  346. Box:ReleaseFocus()
  347. Box.Active=false
  348. local bft=Box.Text
  349. Box.Text='Password '..limit..' character limit.'
  350. wait(2)
  351. Box.Text=bft:sub(0,limit)
  352. Box.Active=true
  353. Box:CaptureFocus()
  354. end
  355. if #Box.Text>1 and Box.Text ~= 'Enter your Password' then
  356. local nt=''
  357. ltbl.ui.Text=nt
  358. for i = 1,#Box.Text do
  359. nt=nt..'*'
  360. end
  361. ltbl.ui.Text=nt
  362. elseif #Box.Text==0 then
  363. if Box.Text ~= 'Enter your Password' then
  364. Box.Text='Enter your Password'
  365. ltbl.ui.Text='Enter your Password'
  366. Box:ReleaseFocus()
  367. Box.ClearTextOnFocus=true
  368. end
  369. end
  370. lrs:wait()
  371. end
  372. end
  373. return lt
  374. end
  375.  
  376. function Functions:IfRegistered(Player, Function)
  377. local Bool = false
  378. for Index, Data in next, OS.Logins do
  379. local user=Data[1]
  380. local pass=Data[2]
  381. if user == tostring(Player) then
  382. Bool = true
  383. end
  384. end
  385. Function(Bool)
  386. end
  387.  
  388. function Functions:CreateProgram(Name, Id, Nick, Description, Click)
  389. table.insert(OS.Apps.Qeued,{tostring(Name), tonumber(Id), tostring(NickName), tostring(Description), Click})
  390. end;
  391.  
  392. local Search
  393. function Functions:Search(Parent, Function)
  394. for Index, Object in next, Parent:children() do
  395. pcall(function()
  396. Function(Object)
  397. end)
  398. Functions:Search(Object, Function)
  399. end
  400. end
  401.  
  402. function Functions:ShowChar()
  403. OS.Functions:Search(Character, function(Object)
  404. if (Object:IsA'BasePart' or Object:IsA'Decal') and Object.Name ~='HumanoidRootPart' then
  405. Object.Transparency = 0
  406. end
  407. end)
  408. end
  409.  
  410. function Functions:HideChar()
  411. OS.Functions:Search(Character, function(Object)
  412. if (Object:IsA'BasePart' or Object:IsA'Decal') and Object.Name ~='HumanoidRootPart' then
  413. Object.Transparency = 1
  414. end
  415. end)
  416. end
  417.  
  418. local Notes={};
  419. Functions:CreateProgram('Notepad++', 43360681, 'N++', 'Notepad for your... "personal" needs?', function(HF,TF,CF)
  420. local tb = Functions:MakeNewUi('TextButton')
  421. tb.Parent=CF
  422. tb.TextWrapped=true
  423. table.insert(Notes,tb)
  424. tb.Text = 'Notepad; '..#Notes
  425. tb.TextColor3=CurrentPlayerData[3]
  426. tb.BackgroundColor3=CurrentPlayerData[4]
  427. tb.Font=OS.Settings.Fonts.Sub_Header
  428. tb.TextStrokeTransparency=.9
  429. tb.TextStrokeColor3=CurrentPlayerData[3]
  430. tb.TextXAlignment='Left'
  431. tb.TextYAlignment='Top'
  432. local SGui
  433. tb.MouseButton1Click:connect(function()
  434. pcall(function()
  435. SGui:Destroy()
  436. end)
  437. if Host.PlayerGui:FindFirstChild'nomnoemnp' then Host.PlayerGui:FindFirstChild'nomnoemnp':Destroy() end
  438. SGui = Instance.new('ScreenGui', Host.PlayerGui)
  439. SGui.Name='nomnoemnp'
  440. local Box = Functions:MakeNewUi('TextBox')
  441. Box.ClearTextOnFocus=false
  442. Box.TextColor3 = CurrentPlayerData[3]
  443. Box.TextStrokeTransparency=.9
  444. Box.Size=ud(1,0,1,0)
  445. Box.Position=ud(-1,0,0,0)
  446. Box.Text = tb.Text
  447. Box.Visible = false
  448. Box.TextXAlignment='Left'
  449. --Box.MultiLine=true
  450. Box.TextYAlignment='Top'
  451. Box.BackgroundTransparency=1
  452. Box.TextStrokeColor3=CurrentPlayerData[3]
  453. Box.Parent=SGui
  454. Box.BackgroundColor3 = CurrentPlayerData[4]
  455. Box:CaptureFocus()
  456. Box.FocusLost:connect(function()
  457. SGui:Destroy()
  458. end)
  459. local isub = '|'
  460. local l=false
  461. spawn(function()
  462. if tb.Text:sub(#tb.Text,#tb.Text)=='|' then
  463. tb.Text=tb.Text:sub(1,#tb.Text-1)
  464. end
  465. local canc = false
  466. spawn(function()
  467. while not canc do
  468. wait(.6)
  469. l=not l
  470. if l == true then
  471. isub='|'
  472. else
  473. isub=''
  474. end
  475. end
  476. end)
  477. repeat
  478. tb.Text=Box.Text..isub
  479. lrs:wait()
  480. until SGui.Parent ~= Host.PlayerGui
  481. if l then
  482. tb.Text=tb.Text:sub(1,#tb.Text-1)
  483. end
  484. --print'canc'
  485. canc=true
  486. SGui=nil
  487. end)
  488. end)
  489. end)
  490. --script.Parent=Host.PlayerGui
  491.  
  492. Functions:CreateProgram('Calculator', 45545182, 'Calc', 'Math stuff man', function(HF,TF,CF)
  493. HF.Size = UDim2.new(0,150,0,300)
  494. end)
  495.  
  496. local osEVENT = game:service'SoundService':FindFirstChild'osEVENT'
  497. if osEVENT==nil then
  498. osEVENT = Instance.new('RemoteEvent',game:service'SoundService')
  499. osEVENT.Name='osEVENT'
  500. end
  501.  
  502. if game.PlaceId == 691043264 then
  503. Functions:CreateProgram('Lua', 71157241, 'LUA', 'Execute stuff...', function(HF,TF,CF)
  504. local tb = Functions:MakeNewUi('TextButton')
  505. tb.Parent=CF
  506. tb.TextWrapped=true
  507. tb.Text = ''
  508. tb.TextColor3=CurrentPlayerData[3]
  509. tb.BackgroundColor3=CurrentPlayerData[4]
  510. tb.Font=OS.Settings.Fonts.Sub_Header
  511. tb.Size=ud(.6,0,.9,0)
  512. tb.TextXAlignment='Left'
  513. tb.TextYAlignment='Top'
  514.  
  515. local run = Functions:MakeNewUi('TextButton')
  516. run.Parent=CF
  517. run.Text = 'Run Script'
  518. run.BackgroundTransparency=0
  519. run.TextColor3=CurrentPlayerData[4]
  520. run.BackgroundColor3=CurrentPlayerData[3]
  521. run.Font=OS.Settings.Fonts.Header
  522. run.Position=ud(0,0,.95,0)
  523. run.TextSize=11
  524. run.Size=ud(.6,0,.05,0)
  525.  
  526. local cleartb = Functions:MakeNewUi('TextButton')
  527. cleartb.Parent=CF
  528. cleartb.Text = 'Clear Text'
  529. cleartb.BackgroundTransparency=0
  530. cleartb.TextColor3=CurrentPlayerData[4]
  531. cleartb.BackgroundColor3=CurrentPlayerData[3]
  532. cleartb.Font=OS.Settings.Fonts.Header
  533. cleartb.Position=ud(0,0,.9,0)
  534. cleartb.TextSize=11
  535. cleartb.Size=ud(.6,0,.05,0)
  536.  
  537. local ipos = 0
  538. local timefromlast=0
  539. local longestx=0
  540.  
  541. local clear = Functions:MakeNewUi('TextButton')
  542. clear.Parent=CF
  543. clear.Text = 'Clear Output'
  544. clear.BackgroundTransparency=0
  545. clear.TextColor3=CurrentPlayerData[4]
  546. clear.BackgroundColor3=CurrentPlayerData[3]
  547. clear.Font=OS.Settings.Fonts.Header
  548. clear.Position=ud(.6,0,.95,0)
  549. clear.TextSize=11
  550. clear.Size=ud(.4,0,.05,0)
  551.  
  552. local output = Functions:MakeNewUi('ScrollingFrame')
  553. output.Parent=CF
  554. output.BackgroundColor3=CurrentPlayerData[3]
  555. output.Position=ud(.6,0,0,0)
  556. output.BackgroundTransparency=0
  557. output.Size=ud(.4,0,.95,0)
  558.  
  559. function op(argz)
  560. local txt,code,clr = argz[1],argz[2],argz[3]
  561. clr=clr or Color3.new(1,1,1)
  562. txt=' > '..txt or 'NO_TEXT'
  563. --print(txt,code,clr)
  564. local is = (tostring(code)==tostring(OS.GenCode))
  565. if is then
  566. timefromlast=0
  567. local lbl = Functions:MakeNewUi('TextLabel')
  568. lbl.Parent=output
  569. lbl.Position=ud(0,0,0,ipos)
  570. lbl.TextSize=10
  571. if #txt > longestx then
  572. longextx=#txt
  573. end
  574. --txt=txt:gsub('\n','')
  575. lbl.TextColor3 = clr
  576. lbl.TextWrapped=true
  577. local count=0
  578. local notting=true
  579. lbl.TextXAlignment='Left'
  580. lbl.Text = txt
  581. lbl.BackgroundTransparency=1
  582. lbl.Size=ud(33,0,0,lbl.TextBounds.Y+5)
  583. ipos=ipos+lbl.TextBounds.Y+2
  584. spawn(function()
  585. while notting do
  586. lrs:wait()
  587. count=count+1
  588. local asx=output.AbsoluteSize.X
  589. local tbx=lbl.TextBounds.X
  590. --print(tbx,asx)
  591. if tbx > asx then
  592. lbl.Text=lbl.Text:sub(1+(asx*(count-1)),asx*count)..'\n'..lbl.Text:sub((asx*count)+1)
  593. else
  594. notting=false
  595. end
  596. end
  597. end)
  598. lbl.Size=ud(1,0,0,lbl.TextBounds.Y+5)
  599. end
  600. end
  601.  
  602. op({'Hello world!', OS.GenCode, Color3.new(1,1,1)})
  603.  
  604. clear.MouseButton1Click:connect(function()
  605. output:ClearAllChildren()
  606. ipos=0
  607. longestx=0
  608. timefromlast=0
  609. op({'Cleared output', OS.GenCode, BrickColor.new'Dark green'.Color})
  610. end)
  611.  
  612. cleartb.MouseButton1Click:connect(function()
  613. tb.Text=''
  614. pcall(function()
  615. SGui.Text=''
  616. end)
  617. end)
  618.  
  619. local oev = osEVENT.OnClientEvent:connect(function(Argz)
  620. op(Argz)
  621. end)
  622.  
  623. spawn(function()
  624. local ii=0
  625. repeat lrs:wait()
  626. timefromlast=timefromlast+.05
  627. ii=Functions:IntegerLerp(ii,ipos,.15)
  628. if timefromlast < 5 then
  629. output.CanvasSize=ud(0,longestx,0,ii)
  630. output.CanvasPosition=Vector2.new(0,ii)
  631. end
  632. until run.Parent ~= CF
  633. oev:disconnect()
  634. --print'dis'
  635. end)
  636.  
  637. run.MouseButton1Click:connect(function()
  638. local lscode = [[
  639. local owner = game:service'Players':WaitForChild(']]..Host.Name..[[')
  640. local event = game:service'SoundService':WaitForChild'osEVENT'
  641. local code = ]]..OS.GenCode..[[
  642. function print(...)
  643. local Data, Return = {...}, ""
  644. for Index,Value in pairs(Data) do
  645. Return = Return .. tostring(Value) .. (Index < #Data and ", " or "")
  646. end
  647. event:FireClient(owner,{Return,code,Color3.new(1,1,1)})
  648. end
  649. function warn(...)
  650. local Data, Return = {...}, ""
  651. for Index,Value in pairs(Data) do
  652. Return = Return .. tostring(Value) .. (Index < #Data and ", " or "")
  653. end
  654. event:FireClient(owner,{Return,code,Color3.new(1,.5,0)})
  655. end
  656. function ferror(...)
  657. local Data, Return = {...}, ""
  658. for Index,Value in pairs(Data) do
  659. Return = Return .. tostring(Value) .. (Index < #Data and ", " or "")
  660. end
  661. event:FireClient(owner,{Return,code,Color3.new(.8,0,0)})
  662. end
  663. delay(20,function()
  664. event:FireClient(owner,{'Auto removed script - delay ; 20',code,BrickColor.new'Dark green'.Color})
  665. script:Destroy()
  666. end)
  667. local script = workspace:WaitForChild(']]..tostring(OS.Assets.FScript.Name)..[[')
  668. ]]
  669. local formattedcode = [[
  670. pcall(function()
  671. local Success, Error = pcall(function()
  672. ]]..tb.Text..[[
  673. end)
  674. if not Success then
  675. local err = Error
  676. err=err:gsub('ScriptBuilderScript','OS.sb')
  677. err=err:gsub('544','1')
  678. ferror(err)
  679. local stacks = debug.traceback()
  680. stacks=stacks:gsub('ScriptBuilderScript','OS.sb')
  681. event:FireClient(owner,{stacks,code,BrickColor.new'Bright blue'.Color})
  682. else
  683. event:FireClient(owner,{'Ran script',code,BrickColor.new'Bright blue'.Color})
  684. end
  685. end)
  686. ]]
  687. NS(lscode..'\n\n'..formattedcode, workspace)
  688. end)
  689.  
  690. local SGui
  691. tb.MouseButton1Click:connect(function()
  692. pcall(function()
  693. SGui:Destroy()
  694. end)
  695. if Host.PlayerGui:FindFirstChild'nomnoemnp' then Host.PlayerGui:FindFirstChild'nomnoemnp':Destroy() end
  696. SGui = Instance.new('ScreenGui', Host.PlayerGui)
  697. SGui.Name='nomnoemnp'
  698. local Box = Functions:MakeNewUi('TextBox')
  699. Box.ClearTextOnFocus=false
  700. Box.TextColor3 = CurrentPlayerData[3]
  701. Box.TextStrokeTransparency=.9
  702. Box.Size=ud(1,0,1,0)
  703. Box.Position=ud(-1,0,0,0)
  704. Box.Text = tb.Text
  705. Box.Visible = false
  706. Box.TextXAlignment='Left'
  707. --Box.MultiLine=true
  708. Box.TextYAlignment='Top'
  709. Box.BackgroundTransparency=1
  710. Box.TextStrokeColor3=CurrentPlayerData[3]
  711. Box.Parent=SGui
  712. Box.BackgroundColor3 = CurrentPlayerData[4]
  713. Box:CaptureFocus()
  714. Box.FocusLost:connect(function()
  715. SGui:Destroy()
  716. end)
  717. local isub = '|'
  718. local l=false
  719. spawn(function()
  720. if tb.Text:sub(#tb.Text,#tb.Text)=='|' then
  721. tb.Text=tb.Text:sub(1,#tb.Text-1)
  722. end
  723. local canc = false
  724. spawn(function()
  725. while not canc do
  726. wait(.6)
  727. l=not l
  728. if l == true then
  729. isub='|'
  730. else
  731. isub=''
  732. end
  733. end
  734. end)
  735. repeat
  736. tb.Text=Box.Text..isub
  737. lrs:wait()
  738. until SGui.Parent ~= Host.PlayerGui
  739. if l then
  740. tb.Text=tb.Text:sub(1,#tb.Text-1)
  741. end
  742. canc=true
  743. SGui=nil
  744. end)
  745. end)
  746. end)
  747. end
  748.  
  749. Functions:CreateProgram('Settings',485882401,'Sett','Also self explanitory...',function(HF,TF,CF)
  750. end)
  751.  
  752. spawn(function()
  753. local nw={};
  754. for i,v in next, OS.Backgrounds do
  755. delay(math.random()*5,function()
  756. nw[#nw+1]=v
  757. end)
  758. end
  759. repeat wait() until #nw==#OS.Backgrounds
  760. wait(.5)
  761. OS.Backgrounds=nw
  762. Functions:Notification('Formatted OS.Backgrounds', 4)
  763. end)
  764.  
  765. spawn(function()
  766. local nw={};
  767. for i,v in next, OS.Sounds do
  768. delay(math.random()*5,function()
  769. nw[#nw+1]=v
  770. end)
  771. end
  772. repeat wait() until #nw==#OS.Sounds
  773. wait(.5)
  774. OS.Sounds=nw
  775. Functions:Notification('Formatted OS.Sounds', 4)
  776. end)
  777.  
  778. Functions:CreateProgram('Gallery', 152445445, 'Images', 'View your favorite, saved, and default images', function(HF,TF,CF)
  779. local title = Functions:MakeNewUi('TextLabel')
  780. title.TextColor3 = CurrentPlayerData[3]
  781. title.TextStrokeTransparency=1
  782. title.Size=ud(1,0,.1,0)
  783. title.Text = 'Gallery - '..#OS.Backgrounds..' assets total'
  784. title.TextXAlignment='Center'
  785. title.TextYAlignment='Center'
  786. title.Font = OS.Settings.Fonts.Header
  787. title.BackgroundTransparency=1
  788. title.Parent=CF
  789. title.BackgroundColor3 = CurrentPlayerData[4]
  790.  
  791. spawn(function()
  792. wait(1)
  793. Effects:Underline(title, 15, 300, 2, CurrentPlayerData[3], true)
  794. end)
  795.  
  796. local scroll = Functions:MakeNewUi('ScrollingFrame')
  797. scroll.Size=ud(1,0,.9,0)
  798. scroll.Position = ud(0,0,.1,0)
  799. scroll.BackgroundTransparency=0
  800. scroll.TopImage=Functions:Asset(317839361)
  801. scroll.MidImage=Functions:Asset(317839361)
  802. scroll.BottomImage=Functions:Asset(317839361)
  803. scroll.ScrollBarThickness = 5
  804. scroll.Parent=CF
  805. scroll.BackgroundColor3 = CurrentPlayerData[4]
  806.  
  807. local Loaded = 0
  808. local o,d = 0,0
  809. local curbg = nil
  810. local bgs={};
  811. for i, Id in next, OS.Backgrounds do
  812. --local Market = game:service'MarketplaceService'
  813. --local Asset = Market:GetProductInfo(Id)
  814.  
  815. local Img = Functions:MakeNewUi('ImageButton')
  816. Img.Image = Functions:Asset(Id)
  817. local scl = 2
  818. local add = .005
  819. local sx,sy=(.089*scl),(.05*scl)
  820. Img.Size=ud(sx,0,0,34*2)
  821. Img.Position = ud(((sx+add)*o)+.05,0,0,((36*2)*d))
  822. o=o+1
  823. game:service'RunService'.RenderStepped:wait()
  824. if sx*(o+1) >= 1 then
  825. d=d+1
  826. o=0
  827. scroll.CanvasSize=ud(0,0,0,((36*2)*d))
  828. end
  829. Img.BackgroundColor3 = scroll.BackgroundColor3
  830. Img.BorderColor3 = CurrentPlayerData[3]
  831. Img.ImageTransparency=1
  832. Img.MouseButton1Down:connect(function()
  833. curbg = Img
  834. OS.Assets.Background.Image=Functions:Asset(Id)
  835. end)
  836. Img.Parent=scroll
  837.  
  838. spawn(function()
  839. for i = 0,1.05,.05 do
  840. Img.ImageTransparency=1-i
  841. game:service'RunService'.RenderStepped:wait()
  842. end
  843. end)
  844. bgs[#bgs+1]=Img
  845. end
  846. while #bgs > 0 do
  847. lrs:wait()
  848. for i,Img in next, bgs do
  849. if Img == nil or Img.Parent == nil then
  850. table.remove(bgs,i)
  851. else
  852. if curbg == Img then
  853. Img.BorderSizePixel = 2
  854. else
  855. Img.BorderSizePixel=0
  856. end
  857. end
  858. end
  859. end
  860. end)
  861.  
  862. Functions:CreateProgram('Explorer', 27854793, 'Expl', 'Explore the game\'s children', function(HF,TF,CF)
  863. local funcs = {};
  864. local title = Functions:MakeNewUi('TextLabel')
  865. title.TextColor3 = CurrentPlayerData[3]
  866. title.TextStrokeTransparency=1
  867. title.Size=ud(1,0,.2,0)
  868. title.Text = 'Services'
  869. title.TextXAlignment='Center'
  870. title.TextYAlignment='Center'
  871. title.BackgroundTransparency=1
  872. title.Parent=CF
  873. title.BackgroundColor3 = CurrentPlayerData[4]
  874.  
  875. spawn(function()
  876. wait(1)
  877. Effects:Underline(title, 15, 80, 2, CurrentPlayerData[3], true)
  878. end)
  879.  
  880. local scroll = Functions:MakeNewUi('ScrollingFrame')
  881. scroll.Size=ud(.8,0,.8,0)
  882. scroll.Position = ud(.1,0,.2,0)
  883. scroll.BackgroundTransparency=1
  884. scroll.TopImage=Functions:Asset(317839361)
  885. scroll.MidImage=Functions:Asset(317839361)
  886. scroll.BottomImage=Functions:Asset(317839361)
  887. scroll.ScrollBarThickness = 5
  888. scroll.Parent=CF
  889. scroll.BackgroundColor3 = CurrentPlayerData[4]
  890.  
  891. function funcs:w()
  892. return wait(.05)
  893. end
  894.  
  895. local buttons={};
  896. local t = 0
  897. function funcs:clearscroll()
  898. t=t+1
  899. buttons={};
  900. for i,v in next, scroll:children() do
  901. --funcs:w()
  902. pcall(function()
  903. spawn(function()
  904. v:TweenPosition(ud(1,0,v.Position.Y.Scale,v.Position.Y.Offset),'Out','Quint',2,true)
  905. for i = 0,1.05,.05 do
  906. pcall(function()
  907. v.TextTransparency=v.TextTransparency+.05
  908. end)
  909. pcall(function()
  910. v.BackgroundTransparency=v.BackgroundTransparency+.05
  911. end)
  912. pcall(function()
  913. v.TextStrokeTransparency=v.TextStrokeTransparency+.05
  914. end)
  915. lrs:wait()
  916. end
  917. v:Destroy()
  918. end)
  919. end)
  920. end
  921. wait(2)
  922. end
  923.  
  924. function funcs:bt(i,txt,func)
  925. delay(0,function()
  926. if t == i then
  927. --funcs:w()
  928. local button = Functions:MakeNewUi('TextButton')
  929. local index = #buttons
  930. buttons[index+1]=button
  931. local y = 22*(index)
  932. scroll.CanvasSize=ud(0,0,0,y)
  933. button.TextColor3 = CurrentPlayerData[3]
  934. button.TextStrokeTransparency=.9
  935. button.Size=ud(1,0,0,20)
  936. button.Position=ud(1,0,0,y)
  937. button.Text = txt
  938. button.TextXAlignment='Left'
  939. button.TextTransparency=1
  940. button.TextSize = 12
  941. button.Font=OS.Settings.Fonts.Header
  942. --button.TextYAlignment='Top'
  943. button.BackgroundTransparency=.6
  944. button.TextStrokeColor3=CurrentPlayerData[3]
  945. button.Parent=scroll
  946. button.BackgroundColor3 = CurrentPlayerData[4]
  947. spawn(function()
  948. button:TweenPosition(ud(0,0,0,y),'Out','Quint',.5,true)
  949. for i = 0,1.05,.05 do
  950. button.TextTransparency=1-i
  951. lrs:wait()
  952. end
  953. end)
  954. local ev
  955. ev=button.MouseButton1Click:connect(function()
  956. ev:disconnect()
  957. func(button)
  958. end)
  959. return button
  960. else
  961. return nil
  962. end
  963. end)
  964. end
  965.  
  966. function funcs:showoptions(obj)
  967. funcs:clearscroll()
  968. local st = t
  969. if obj:IsA'Instance' then
  970. title.Text = obj:GetFullName()
  971. if #obj:children() > 0 then
  972. local expl=funcs:bt(st,'Explore',function()
  973. funcs:showchildren(obj)
  974. end)
  975. end
  976. pcall(function()
  977. if obj ~= game and obj.Parent ~= game then
  978. local expl=funcs:bt(st,'Destroy',function()
  979. local par = obj.Parent
  980. local pn = obj.Name
  981. pcall(function()
  982. obj:Destroy()
  983. end)
  984. funcs:clearscroll()
  985. local nst = t
  986. funcs:bt(nst,'Return to '..pn..'\'s parent object',function()
  987. funcs:showchildren(par)
  988. end)
  989. funcs:bt(nst,'Destroyed '..pn,function()
  990. end)
  991. end)
  992. end
  993. end)
  994. if obj ~= game then
  995. local tag = 'Return to '..obj.Parent.Name..'\'s children'
  996. if obj.Parent==game then
  997. tag='Return to explorable services'
  998. end
  999. local ret=funcs:bt(st,tag,function()
  1000. funcs:showchildren(obj.Parent)
  1001. end)
  1002. elseif obj.Parent == game then
  1003. funcs:showservs()
  1004. end
  1005. local sprops=funcs:bt(st,'Show Properties',function()
  1006. funcs:clearscroll()
  1007. local st2 = t
  1008. local rett=funcs:bt(st2,'Return to options for '..obj.Name,function()
  1009. funcs:showoptions(obj)
  1010. end)
  1011. local Props = Functions:ReturnObjectProperties(obj)
  1012. Props['Children'] = #obj:children()
  1013. for index, value in next, Props do
  1014. local prop=funcs:bt(st2,tostring(index)..': '..tostring(value),function()
  1015. end)
  1016. end
  1017. end)
  1018. end
  1019. end
  1020.  
  1021. function funcs:showchildren(prnt)
  1022. funcs:clearscroll()
  1023. local st = t
  1024. if prnt:IsA'Instance' then
  1025. local back=funcs:bt(st,'Show me options for '..prnt.Name,function()
  1026. funcs:showoptions(prnt)
  1027. end)
  1028. for i,v in next, prnt:children() do
  1029. pcall(function()
  1030. if prnt:IsA'Instance' then
  1031. local sub=' - '..v.ClassName
  1032. pcall(function()
  1033. if prnt==game then
  1034. sub=''
  1035. end
  1036. end)
  1037. local child=funcs:bt(st,v.Name..sub,function()
  1038. funcs:showoptions(v)
  1039. end)
  1040. end
  1041. end)
  1042. end
  1043. end
  1044. end
  1045. function funcs:showservs()
  1046. funcs:clearscroll()
  1047. local st = t
  1048. local servs = {};
  1049. for i,v in next, game:children() do
  1050. pcall(function()
  1051. if #v:children() > 0 then
  1052. table.insert(servs,v)
  1053. end
  1054. end)
  1055. end
  1056. local child=funcs:bt(st,'SHOW ME ALL THE DAMN SERVICES!',function()
  1057. funcs:showoptions(game)
  1058. end)
  1059. for i,v in next, servs do
  1060. local child = funcs:bt(st,v.Name,function()
  1061. funcs:showoptions(v)
  1062. end)
  1063. end
  1064. end
  1065. funcs:showservs()
  1066. end)
  1067.  
  1068. local Audios={};
  1069. local CurrentPlaying = nil
  1070. function Functions:AddSound(Id)
  1071. for Index, Sound in next, Audios do
  1072. if Sound:IsA'Sound' then
  1073. Sound:Stop()
  1074. Sound.PlayOnRemove=false
  1075. end
  1076. end
  1077. local Sound = Instance.new('Sound', Monitor)
  1078. Sound.SoundId=Functions:Asset(Id)
  1079. Sound.Volume=.9
  1080. CurrentPlaying = Sound
  1081. table.insert(Audios, Sound)
  1082. return Sound
  1083. end
  1084.  
  1085. function Functions:IntegerLerp(a,b,c)
  1086. return a + (b - a) * c;
  1087. end
  1088.  
  1089. Functions:CreateProgram('Messenger',485845332,'MGR','Self explanitory... idiot', function(HF,TF,CF)
  1090. end)
  1091.  
  1092. local cur = nil
  1093. local curSound = nil
  1094. Functions:CreateProgram('SmAudio', 64646186, 'SmA', 'An archive of selected music just for you ;) with extra features as well', function(HF,TF,CF)
  1095. local title = Functions:MakeNewUi('TextLabel')
  1096. title.TextColor3 = CurrentPlayerData[3]
  1097. title.TextStrokeTransparency=1
  1098. title.Size=ud(1,0,.2,0)
  1099. title.Text = 'SmAudio Alpha'
  1100. title.TextXAlignment='Center'
  1101. title.TextYAlignment='Center'
  1102. title.Font = OS.Settings.Fonts.Header
  1103. title.BackgroundTransparency=1
  1104. title.Parent=CF
  1105. title.BackgroundColor3 = CurrentPlayerData[4]
  1106.  
  1107. spawn(function()
  1108. wait(1)
  1109. Effects:Underline(title, 15, 80, 2, CurrentPlayerData[3], true)
  1110. end)
  1111.  
  1112. local scroll = Functions:MakeNewUi('ScrollingFrame')
  1113. scroll.Size=ud(.8,0,.8,0)
  1114. scroll.Position = ud(.1,0,.2,0)
  1115. scroll.BackgroundTransparency=0
  1116. scroll.TopImage=Functions:Asset(317839361)
  1117. scroll.MidImage=Functions:Asset(317839361)
  1118. scroll.BottomImage=Functions:Asset(317839361)
  1119. scroll.ScrollBarThickness = 5
  1120. scroll.Parent=CF
  1121. scroll.BackgroundColor3 = CurrentPlayerData[4]
  1122.  
  1123. local max = 0
  1124. spawn(function()
  1125. local y = 0
  1126. repeat game:service'RunService'.RenderStepped:wait()
  1127. y=Functions:IntegerLerp(y,max,.02)
  1128. --print(max)
  1129. --print(y)
  1130. --scroll.CanvasSize=ud(0,0,0,y)
  1131. until CF.Parent == nil
  1132. end)
  1133.  
  1134. local play,pause,sound = Functions:Asset(745599404),Functions:Asset(745599001),Functions:Asset(176572847)
  1135.  
  1136. local Loaded = 0
  1137. for i, Id in next, OS.Sounds do
  1138. delay((math.random()/(math.random()+.2))*3, function()
  1139. local Market = game:service'MarketplaceService'
  1140. local Asset = Market:GetProductInfo(Id)
  1141.  
  1142. local Song = Functions:MakeNewUi('ImageButton')
  1143. Song.Parent=scroll
  1144. Song.Image = play
  1145. local clr=CurrentPlayerData[3]
  1146. local clr2=CurrentPlayerData[4]
  1147. Song.BackgroundColor3=clr
  1148. Song.Size=ud(0,45,0,45)
  1149. Song.BackgroundTransparency=1
  1150.  
  1151. local y = (Song.Size.Y.Offset+2)*(i-1)
  1152. max=max+(Song.Size.Y.Offset+2)
  1153. local x = Song.Size.X.Offset
  1154.  
  1155. local author = Functions:MakeNewUi('TextLabel')
  1156. author.TextColor3 = CurrentPlayerData[3]
  1157. author.Size=ud(1,-x+10,0,20)
  1158. author.Position = ud(0,x+10,0,y)
  1159. author.Text = 'Author '..Asset.Creator.Name..' ; '..Asset.Creator.Id
  1160. author.TextXAlignment='Left'
  1161. author.TextYAlignment='Center'
  1162. author.TextSize = 16
  1163. author.Font = OS.Settings.Fonts.Header
  1164. author.BackgroundTransparency=1
  1165. author.TextTransparency=1
  1166. author.Parent=scroll
  1167. author.BackgroundColor3 = CurrentPlayerData[3]
  1168.  
  1169. local name = Functions:MakeNewUi('TextLabel')
  1170. name.TextColor3 = CurrentPlayerData[3]
  1171. name.Size=ud(1,-x+10,0,20)
  1172. name.Position = ud(0,x+10,0,y+(author.TextSize+2))
  1173. name.Text = 'Name '..Asset.Name
  1174. name.TextXAlignment='Left'
  1175. name.TextYAlignment='Center'
  1176. name.TextSize = 12
  1177. name.TextTransparency=1
  1178. name.Font = OS.Settings.Fonts.Header
  1179. name.BackgroundTransparency=1
  1180. name.Parent=scroll
  1181. name.BackgroundColor3 = CurrentPlayerData[3]
  1182.  
  1183. local desc = Functions:MakeNewUi('TextLabel')
  1184. desc.TextColor3 = CurrentPlayerData[3]
  1185. local alg = (((name.TextBounds.X+author.TextBounds.X)/1.5)+(10+(author.TextSize+name.TextSize)))
  1186. desc.Size=ud(1,-x-(alg+scroll.ScrollBarThickness),0,46)
  1187. desc.Position = ud(1,0,0,y-1)
  1188. desc.Text = Asset.Creator.Name..': '..Asset.Description
  1189. desc.BorderSizePixel=0
  1190. desc.BorderColor3 = CurrentPlayerData[3]
  1191. desc.TextWrapped=true
  1192. desc.TextXAlignment='Left'
  1193. desc.TextTransparency=1
  1194. desc.TextYAlignment='Top'
  1195. desc.TextSize = 12
  1196. desc.Font = OS.Settings.Fonts.Header
  1197. desc.BackgroundTransparency=1
  1198. desc.Parent=scroll
  1199. desc.BackgroundColor3 = scroll.BackgroundColor3
  1200. desc.ClipsDescendants=false
  1201.  
  1202. local line = Functions:MakeNewUi('TextLabel')
  1203. line.TextColor3 = CurrentPlayerData[3]
  1204. line.Size=ud(0,1,1,0)
  1205. line.Position = ud(0,-4,0,0)
  1206. line.Text = ''
  1207. line.BackgroundTransparency=0
  1208. line.BackgroundColor3 = CurrentPlayerData[3]
  1209. line.Parent=desc
  1210.  
  1211. if Asset.Description=='Audio' or Asset.Description=='RenderMesh' then
  1212. desc:Destroy()
  1213. else
  1214. desc:TweenPosition(ud(0,x+alg,0,y-1),'Out','Quint',1,true)
  1215. end
  1216.  
  1217. Song.Position = ud(0,-x,0,y)
  1218.  
  1219. Song.ZIndex=8
  1220. Song.MouseEnter:connect(function()
  1221. local t=clr2
  1222. local tt=.15
  1223. clr=c3(t.r-tt,t.b-tt,t.g-tt)
  1224. clr2=CurrentPlayerData[3]
  1225. end)
  1226. Song.MouseLeave:connect(function()
  1227. clr=CurrentPlayerData[3]
  1228. clr2=CurrentPlayerData[4]
  1229. end)
  1230.  
  1231. Song.MouseButton1Click:connect(function()
  1232. if cur == Song then
  1233. curSound:Pause()
  1234. cur=nil
  1235. else
  1236. cur=Song
  1237. curSound = Functions:AddSound(Id)
  1238. curSound.Looped = true
  1239. curSound:Play()
  1240. clr=CurrentPlayerData[3]
  1241. clr2=CurrentPlayerData[4]
  1242. end
  1243. end)
  1244.  
  1245. spawn(function()
  1246. for i = 0,1.05,.05 do
  1247. desc.TextTransparency=1-i
  1248. desc.BackgroundTransparency=1-i
  1249. name.TextTransparency=1-i
  1250. author.TextTransparency=1-i
  1251. game:service'RunService'.RenderStepped:wait()
  1252. end
  1253. end)
  1254.  
  1255. spawn(function()
  1256. repeat game:service'RunService'.RenderStepped:wait()
  1257. if cur == Song then
  1258. Song.Image = pause
  1259. else
  1260. Song.Image = play
  1261. end
  1262. Song.BackgroundColor3=Song.BackgroundColor3:lerp(clr,.25)
  1263. Song.ImageColor3=Song.ImageColor3:lerp(clr2,.25)
  1264. until CF.Parent == nil
  1265. end)
  1266. Song:TweenPosition(ud(0,0,0,y),'Out','Quint',.5,true)
  1267. Loaded = Loaded + 1
  1268. end)
  1269. end
  1270. local ii=0
  1271. repeat
  1272. wait()
  1273. title.Text = 'Loading Assets #'..Loaded
  1274. ii=Functions:IntegerLerp(ii,max+10,.04)
  1275. scroll.CanvasSize=ud(0,0,0,ii)
  1276. scroll.CanvasPosition=Vector2.new(0,ii)
  1277. until Loaded == #OS.Sounds
  1278. title.Text = 'SmAudio Beta'
  1279. end)
  1280.  
  1281. function Functions:GeneratePrograms(Distance)
  1282. --print'k'
  1283. local Over, Down=0,0
  1284. for Index, Data in next, OS.Apps.Qeued do
  1285. if Down > 7 then
  1286. return
  1287. end
  1288. local maximized,ump,ums
  1289. lrs:wait()
  1290. local Icon = Functions:MakeNewUi('ImageButton')
  1291. Icon.Image=Functions:PlayerImage(Host)
  1292. Icon.Parent=MainFrame
  1293. Icon.BackgroundColor3=CurrentPlayerData[4]
  1294. Icon.Image=Functions:Asset(Data[2])
  1295. Icon.Size=ud(0,50,0,50)
  1296. Icon.ZIndex=2
  1297. Icon.ImageTransparency=0
  1298. local IconName = Functions:MakeNewUi('TextLabel')
  1299. IconName.Font=OS.Settings.Fonts.Header
  1300. IconName.Parent=Icon
  1301. IconName.TextYAlignment='Bottom'
  1302. IconName.TextSize = 10
  1303. IconName.Text= Data[1]
  1304. IconName.Size=ud(1,0,0,20)
  1305. IconName.Position=ud(0,0,1,-20)
  1306. IconName.ZIndex=2
  1307. local bgtp = 1
  1308. Icon.MouseEnter:connect(function()
  1309. bgtp=.5
  1310. end)
  1311. Icon.MouseLeave:connect(function()
  1312. bgtp=1
  1313. end)
  1314. local oi = bgtp
  1315. lrs:connect(function()
  1316. oi=Functions:IntegerLerp(oi,bgtp,.3)
  1317. Icon.BackgroundTransparency=oi
  1318. end)
  1319. OS.Apps.Generated[Data[1]]=Icon
  1320. if Over >= 13 then
  1321. Down = Down + 1
  1322. Over = 0
  1323. end
  1324. Icon.Position=ud(0,15+(60*(Over)),0,15+(60*(Down)))
  1325. Over = Over + 1
  1326. Icon.ZIndex=2
  1327. local oic
  1328. oic=Icon.MouseButton1Click:connect(function()
  1329. local AlreadyOpen=false
  1330. for Index, Ting in next, OS.Apps.Open do
  1331. for i = 1,#Ting do
  1332. if Data[i] == Ting[i] then
  1333. AlreadyOpen=true
  1334. end
  1335. end
  1336. end
  1337. if AlreadyOpen then
  1338. warn'nop'
  1339. return
  1340. end
  1341. table.insert(OS.Apps.Open,{Data[1],Data[2],Data[3]})
  1342. OS.RecentlyUsedPrograms[Data[4]]=Data
  1343. local HolderFrame = Functions:MakeNewUi('Frame')
  1344. HolderFrame.ZIndex=3
  1345. HolderFrame.BackgroundTransparency=0
  1346. HolderFrame.BorderSizePixel=.1
  1347. HolderFrame.BorderColor3=CurrentPlayerData[3]
  1348. HolderFrame.Size=ud(0,600,0,400)
  1349. HolderFrame.Name='HF'
  1350. HolderFrame.BackgroundColor3=CurrentPlayerData[3]
  1351. HolderFrame.Position = Functions:Center(HolderFrame)
  1352. HolderFrame.Parent = MainFrame
  1353. maximized,ump,ums=false,HolderFrame.Position,HolderFrame.Size
  1354. local function Enable()
  1355. for i,gui in next, MainFrame:children() do
  1356. if gui:IsA'ImageButton' then
  1357. gui.Visible=true
  1358. end
  1359. end
  1360. end
  1361. local function Disable()
  1362. for i,gui in next, MainFrame:children() do
  1363. if gui:IsA'ImageButton' then
  1364. gui.Visible=false
  1365. end
  1366. end
  1367. end
  1368.  
  1369. local ev1
  1370. ev1=HolderFrame.MouseEnter:connect(function()
  1371. --print'k1'
  1372. Disable()
  1373. end)
  1374. local ev2
  1375. ev2=HolderFrame.MouseLeave:connect(function()
  1376. --print'k2'
  1377. Enable()
  1378. end)
  1379. local InfoFrame = Functions:MakeNewUi('Frame')
  1380. InfoFrame.ZIndex=4
  1381. InfoFrame.BackgroundTransparency=0
  1382. InfoFrame.Size=ud(1,0,0,15)
  1383. InfoFrame.Name='TF'
  1384. InfoFrame.BackgroundColor3=CurrentPlayerData[3]
  1385. for i = 1,3 do
  1386. i=i
  1387. local CButt = Functions:MakeNewUi('ImageButton')
  1388. CButt.Image=Functions:Asset(625953771)
  1389. CButt.Parent=InfoFrame
  1390. CButt.ImageTransparency=.15
  1391. local OCF
  1392. --505680534
  1393. spawn(function()
  1394. local up=.75
  1395. local r,g,b=0,0,0
  1396. if (i==1) then
  1397. r,g,b=.8,.01,.01
  1398. elseif (i==2) then
  1399. r,g,b=.95,.95,0
  1400. elseif (i==3) then
  1401. r,g,b=0,.7,0
  1402. end
  1403. CButt.ImageColor3 = c3(r,g,b)
  1404. CButt.MouseEnter:connect(function()
  1405. for i = 0,1,.1 do
  1406. CButt.ImageColor3 = CButt.ImageColor3:lerp(c3(r+up,g+up,b+up),.13)
  1407. lrs:wait()
  1408. end
  1409. end)
  1410. CButt.MouseLeave:connect(function()
  1411. for i = 0,1,.1 do
  1412. CButt.ImageColor3 = CButt.ImageColor3:lerp(c3(r,g,b),.13)
  1413. lrs:wait()
  1414. end
  1415. end)
  1416. end)
  1417. --if not OCF then OCF=function()print'missing func'end;end
  1418. if (i==1) then
  1419. r,g,b=.8,.01,.01
  1420. local evv
  1421. ev1:disconnect()
  1422. ev2:disconnect()
  1423. evv=CButt.MouseButton1Click:connect(function()
  1424. for Index, Ting in next, OS.Apps.Open do
  1425. if Data[1] == Ting[1] then
  1426. table.remove(OS.Apps.Open, Index)
  1427. end
  1428. end
  1429. evv:disconnect()
  1430. local pos = HolderFrame.Position
  1431. HolderFrame.Active=false
  1432. HolderFrame:Destroy()
  1433. end)
  1434. elseif (i==2) then
  1435. r,g,b=.95,.95,0
  1436. local evv
  1437. evv=CButt.MouseButton1Click:connect(function()
  1438. if maximized then
  1439. HolderFrame:TweenSizeAndPosition(ums,ump,'Out','Sine',.3,true)
  1440. maximized=false
  1441. else
  1442. HolderFrame:TweenSizeAndPosition(ud(1,2,1,-50),ud(0,-1,0,-1),'Out','Quint',.3,true)
  1443. maximized=true
  1444. end
  1445. end)
  1446. elseif (i==3) then
  1447. r,g,b=0,.7,0
  1448. local evv
  1449. ev1:disconnect()
  1450. ev2:disconnect()
  1451. for Index, Ting in next, OS.Apps.Open do
  1452. if Data[1] == Ting[1] then
  1453. table.remove(OS.Apps.Open, Index)
  1454. end
  1455. end
  1456. evv=CButt.MouseButton1Click:connect(function()
  1457. evv:disconnect()
  1458. HolderFrame:TweenSizeAndPosition(ud(0,50,0,50),Icon.Position,'Out','Quint',.5,true)
  1459. wait(.2)
  1460. HolderFrame:Destroy()
  1461. end)
  1462. --Functions:AddToTaskBar(Data[1],Data[2],{ump,ums})
  1463. end
  1464. --CButt.MouseButton1Click:connect(OCF)
  1465. CButt.Size=ud(0,12,0,12)
  1466. CButt.Position=Functions:CenterOffset(CButt,ud(.5,-(15*i),0,0))
  1467. --CButt:TweenPosition(Functions:CenterOffset(CButt,ud(0,0,0,-50),'Out','Back',1,true))
  1468. end
  1469. InfoFrame.Parent = HolderFrame
  1470. local InfoIcon = Functions:MakeNewUi('ImageButton')
  1471. InfoIcon.Parent=InfoFrame
  1472. InfoIcon.Image=Functions:Asset(Data[2])
  1473. InfoIcon.Size=ud(0,12,0,12)
  1474. InfoIcon.ImageTransparency=0
  1475. InfoIcon.Position=ud(0,2,0,3)
  1476. InfoIcon.ZIndex=4
  1477. local InfoText = Functions:MakeNewUi('TextButton')
  1478. InfoText.BackgroundTransparency=.5
  1479. InfoText.FontSize='Size12'
  1480. InfoText.Parent=InfoFrame
  1481. InfoText.TextXAlignment='Left'
  1482. InfoText.Text= Data[1]--..' \ '..Data[4]--'*C:\Users\\'..Host.Name..''
  1483. InfoText.Size=ud(1,-40,1,0)
  1484. InfoText.Position=ud(0,16,0,0)
  1485. InfoText.ZIndex=4
  1486.  
  1487. local md=false
  1488. InfoText.MouseButton1Down:connect(function()
  1489. md=true
  1490. local origp=HolderFrame.Position
  1491. local origs=ud(0,600,0,15)
  1492. local origmp=OS.Assets.Mouse.Position
  1493. HolderFrame.Size = ud(0,600,0,400)
  1494. maximized=false
  1495. spawn(function()
  1496. repeat wait() until OS.MouseDown == false
  1497. md=false
  1498. end)
  1499. while md do
  1500. local mp={OS.Assets.Mouse.Position.X.Scale,OS.Assets.Mouse.Position.X.Offset,OS.Assets.Mouse.Position.Y.Scale,OS.Assets.Mouse.Position.Y.Offset};
  1501. local fs={origs.X.Scale,origs.X.Offset,origs.Y.Scale,origs.Y.Offset};
  1502. local fp={origp.X.Scale,origp.X.Offset,origp.Y.Scale,origp.Y.Offset};
  1503. --local a,b=
  1504. local x,y=mp[2]-(fs[2]/2),mp[4]-(fs[4]/2)
  1505. --print(x,y)
  1506. HolderFrame.Position=ud(0,x,0,y)
  1507. lrs:wait()
  1508. end
  1509. end)
  1510. InfoText.MouseButton1Up:connect(function()
  1511. --md=false
  1512. end)
  1513. local ContentFrame = Functions:MakeNewUi('Frame')
  1514. ContentFrame.ZIndex=4
  1515. ContentFrame.BackgroundTransparency=.1
  1516. ContentFrame.Size=ud(1,-2,1,-17)
  1517. ContentFrame.Position=ud(0,1,0,16)
  1518. ContentFrame.Name='CF'
  1519. ContentFrame.BackgroundColor3=CurrentPlayerData[4]
  1520. ContentFrame.Parent = HolderFrame
  1521. Data[5](HolderFrame, TitleFrame, ContentFrame)
  1522. end)
  1523. end
  1524. end
  1525.  
  1526. local AtMainScreen=false
  1527. function Functions:MakeHomeScreen()
  1528. local Background_id = CurrentPlayerData[5]
  1529. local BackgroundImg = Functions:MakeNewUi('ImageLabel')
  1530. BackgroundImg.Image=Functions:Asset(Background_id)
  1531. BackgroundImg.Name='Background'
  1532. BackgroundImg.BackgroundTransparency=1
  1533. BackgroundImg.ImageTransparency = .1
  1534. BackgroundImg.Parent=MainFrame
  1535. BackgroundImg.ZIndex=1
  1536. BackgroundImg.Size=ud(1,0,1,0)
  1537. OS.Assets.Background = BackgroundImg
  1538. for i = 0,1.025,.025 do
  1539. MainFrame.BackgroundTransparency=i
  1540. lrs:wait()
  1541. end
  1542. local TskBar = Functions:MakeNewUi('TextLabel')
  1543. TskBar.Size = ud(1,0,0,52)
  1544. TskBar.Parent = MainFrame
  1545. TskBar.BackgroundColor3 = CurrentPlayerData[3]
  1546. TskBar.BackgroundTransparency = .5
  1547. TskBar.Position = ud(0,0,1,0)
  1548. TskBar.ZIndex = 9
  1549. TskBar:TweenPosition(ud(0,0,1,-52.5),'Out','Quint',1.2,true)
  1550. for i = 0,.15,.05 do
  1551. local TskBarShader = Functions:MakeNewUi('TextLabel')
  1552. TskBarShader.BackgroundTransparency = .8
  1553. TskBarShader.BackgroundColor3 = CurrentPlayerData[4]
  1554. TskBarShader.BorderSizePixel = 0
  1555. TskBarShader.Size = ud(1,0,.05,0)
  1556. TskBarShader.Position = ud(0,0,-i,0)
  1557. delay(.2,function()
  1558. TskBarShader:TweenPosition(ud(0,0,i+5,0),'Out','Quint',.5,true)
  1559. end)
  1560. TskBarShader.ZIndex = 9
  1561. TskBarShader.Name = 'shd'..i
  1562. --TskBar:ClearAllChildren()
  1563. TskBarShader.Parent = TskBar
  1564. end
  1565. --//tem\\
  1566. local TimeLabel = Instance.new'TextLabel'
  1567. TimeLabel.BackgroundTransparency = 1
  1568. TimeLabel.BackgroundColor3 = c3(255,255,255)
  1569. TimeLabel.BorderSizePixel = 0
  1570. TimeLabel.ZIndex = 9
  1571. TimeLabel.TextColor3 = CurrentPlayerData[4]
  1572. TimeLabel.Font = OS.Settings.Fonts.Sub_Header
  1573. TimeLabel.TextScaled = true
  1574. TimeLabel.Name = 'TimeLabel'
  1575. TimeLabel.TextWrapped = true
  1576. TimeLabel.TextStrokeTransparency = .9
  1577. TimeLabel.Text = '00:00:00 PM'
  1578. TimeLabel.Parent = TskBar
  1579. TimeLabel.Size = ud(.08,0,.3,0)
  1580. TimeLabel.Position = ud(.92,-10,0,6)
  1581.  
  1582. local DateLabel = Instance.new'TextLabel'
  1583. DateLabel.BackgroundTransparency = 1
  1584. DateLabel.BackgroundColor3 = c3(255,255,255)
  1585. DateLabel.BorderSizePixel = 0
  1586. DateLabel.ZIndex = 9
  1587. DateLabel.TextColor3 = CurrentPlayerData[4]
  1588. DateLabel.Font = OS.Settings.Fonts.Sub_Header
  1589. DateLabel.TextScaled = true
  1590. DateLabel.Name = 'DateLabel'
  1591. DateLabel.TextWrapped = true
  1592. DateLabel.TextStrokeTransparency = .9
  1593. DateLabel.Text = '00/00/0000'
  1594. DateLabel.Parent = TskBar
  1595. DateLabel.Size = ud(.08,0,.3,0)
  1596. DateLabel.Position = ud(.92,-10,.6,-6)
  1597.  
  1598. local Logo = Functions:MakeNewUi'ImageButton'
  1599. Logo.BackgroundTransparency = 1
  1600. Logo.BackgroundColor3 = CurrentPlayerData[3]
  1601. Logo.BorderSizePixel = 0
  1602. Logo.ZIndex = 10
  1603. Logo.Image = Functions:Asset(265489553)
  1604. --Logo.TextColor3 = CurrentPlayerData[4]
  1605. --Logo.Font = 'Cartoon'
  1606. --Logo.FontSize='Size36'
  1607. Logo.Name = 'Logo'
  1608. --Logo.TextStrokeTransparency = .9
  1609. --Logo.Text = '§'
  1610. Logo.Parent = TskBar
  1611. Logo.Size = ud(0,40,0,50)
  1612. Logo.Position = ud(0,1,0,1)
  1613. local clrcancel=false
  1614. local igc,bgc=CurrentPlayerData[4],CurrentPlayerData[3]
  1615. Logo.MouseEnter:connect(function()
  1616. local continue=true
  1617. clrcancel=true
  1618. clrcancel=false
  1619. spawn(function()
  1620. for i = 0,.57,.07 do
  1621. Logo.BackgroundTransparency=1-i
  1622. lrs:wait()
  1623. end
  1624. end)
  1625. igc,bgc=CurrentPlayerData[3],CurrentPlayerData[4]
  1626. end)
  1627. Logo.MouseLeave:connect(function()
  1628. local continue=true
  1629. clrcancel=true
  1630. clrcancel=false
  1631. spawn(function()
  1632. for i = 0,.57,.07 do
  1633. Logo.BackgroundTransparency=.5+i
  1634. lrs:wait()
  1635. end
  1636. end)
  1637. igc,bgc=CurrentPlayerData[4],CurrentPlayerData[3]
  1638. end)
  1639. local StartFrameHolder = Functions:MakeNewUi('Frame')
  1640. StartFrameHolder.ZIndex=5
  1641. StartFrameHolder.BackgroundTransparency=1
  1642. StartFrameHolder.Size=ud(0,200,.6,0)
  1643. StartFrameHolder.Position = ud(0,0,.4,-52)
  1644. StartFrameHolder.Parent = MainFrame
  1645. local StartFrame = Functions:MakeNewUi('Frame')
  1646. StartFrame.ZIndex=9
  1647. StartFrame.BackgroundTransparency=.5
  1648. StartFrame.Size=ud(1,0,1,0)
  1649. StartFrame.BorderSizePixel=2
  1650. StartFrame.Name='SF'
  1651. StartFrame.BorderColor3=CurrentPlayerData[4]
  1652. StartFrame.Position = ud(0,0,1,0)
  1653. StartFrame.Parent = StartFrameHolder
  1654.  
  1655. local TestButton = Functions:MakeNewUi('TextButton')
  1656. TestButton.ZIndex=6
  1657. TestButton.BackgroundTransparency=.7
  1658. TestButton.Size=ud(1,-6,0,50)
  1659. TestButton.Position = ud(0,3,0,3)
  1660. TestButton.Text='TEST NOTIFICATIONS'
  1661. TestButton.Parent = StartFrame
  1662. TestButton.MouseButton1Click:connect(function()
  1663. Functions:Notification('Just testing the dank re-alignment and stuff, kek.')
  1664. end)
  1665.  
  1666. local sfcc,detection=false,false
  1667. StartFrame.MouseEnter:connect(function()
  1668. detection=false
  1669. sfcc=false
  1670. end)
  1671. StartFrame.MouseLeave:connect(function()
  1672. detection=true
  1673. sfcc=true
  1674. end)
  1675.  
  1676. local Extended=false
  1677. local function Open(trans)
  1678. StartFrame:TweenPosition(ud(0,0,0,0),'Out','Sine',.5,true)
  1679. for i = 0,1.05,.05 do
  1680. for a,b in next, StartFrame:children() do
  1681. if b.Name ~= 'SF' then
  1682. pcall(function()
  1683. b.TextTransparency=b.TextTransparency-.05
  1684. end)
  1685. pcall(function()
  1686. b.BackgroundTransparency=bBackgroundTransparency-.05
  1687. end)
  1688. pcall(function()
  1689. b.ImageTransparency=b.ImageTransparency-.05
  1690. end)
  1691. end
  1692. end
  1693. StartFrame.BackgroundTransparency=1-.05
  1694. lrs:wait()
  1695. end
  1696. StartFrame.BackgroundTransparency=trans
  1697. Extended=true
  1698. end
  1699. local function Close(trans)
  1700. StartFrame:TweenPosition(ud(0,0,1,0),'Out','Sine',.5,true)
  1701. for i = 0,1,.05 do
  1702. for a,b in next, StartFrame:children() do
  1703. if b.Name ~= 'SF' then
  1704. pcall(function()
  1705. b.TextTransparency=b.TextTransparency+.05
  1706. end)
  1707. pcall(function()
  1708. b.BackgroundTransparency=bBackgroundTransparency+.05
  1709. end)
  1710. pcall(function()
  1711. b.ImageTransparency=b.ImageTransparency+.05
  1712. end)
  1713. end
  1714. end
  1715. StartFrame.BackgroundTransparency=trans+.05
  1716. lrs:wait()
  1717. end
  1718. StartFrame.BackgroundTransparency=1
  1719. Extended=false
  1720. end
  1721. local trans=.45
  1722. PlayerMouse.Button1Down:connect(function()
  1723. if sfcc and Extended then
  1724. detection=false
  1725. Close(trans)
  1726. end
  1727. end)
  1728. PlayerMouse.Button2Down:connect(function()
  1729. if sfcc and Extended then
  1730. detection=false
  1731. Close(trans)
  1732. end
  1733. end)
  1734. Logo.MouseButton1Down:connect(function(x,y)
  1735. if Extended then
  1736. Close(trans)
  1737. else
  1738. Open(trans)
  1739. end
  1740. end)
  1741. local Months = {
  1742. "January", "Febreuary", "March", "April", "May", "June",
  1743. "July", "August", "September", "October", "November", "December"
  1744. }
  1745. local MonthDays = {
  1746. 31, 28, 31, 30, 31, 30,
  1747. 31, 31, 30, 31, 30, 31
  1748. }
  1749.  
  1750. function getDay(Date, year)
  1751. local month, date = Date:match("(%a+)%s*(%d+)")
  1752. local DAYS = tonumber(date)
  1753. local leaps = math.floor( (year-2011)/4 - .25 ) + 1
  1754. local Days = {"Saturday", "Sunday", "Monday", "Tuesday", "Wednesday", "Thursday", "Friday"}
  1755. for _, v in ipairs(MonthDays) do
  1756. if Months[_] == month then break end
  1757. DAYS = DAYS + v
  1758. end
  1759. DAYS = math.floor( DAYS + (year-2017) * 365 ) + leaps
  1760. return Days[ (DAYS%7 == 0 and 7 or DAYS%7) ]
  1761. end
  1762.  
  1763. function getMonthAndDate(days, year)
  1764. local leap = year%4 == 0 and 1 or 0
  1765. local month;
  1766. for _, v in ipairs(MonthDays) do
  1767. if (days-v) < 1 then
  1768. month = Months[_]
  1769. break
  1770. end
  1771. days = days - v
  1772. end
  1773. return month, days
  1774. end
  1775. local LTime,LDate = '',''
  1776. local M = ''
  1777. Time = function()
  1778. local secondsInDay = 60*60*24
  1779. local time = tick()
  1780. local year = math.floor(1970 + time/(365.25*86400))
  1781. local days = math.ceil(((time % (86400*365.25)) )/86400 + 0.25)
  1782. local month, date = getMonthAndDate(days, year)
  1783. local day = getDay(month..date, year)
  1784. local tick = math.fmod(tick(),secondsInDay)
  1785. local hour = math.floor(tick/3600) + 5 + -5
  1786. local minute = math.floor(tick/60 - 60*hour)
  1787. local seconds = math.floor(math.fmod(tick,60))
  1788. if (hour > 12) then
  1789. M = ' PM' hour = hour - 12
  1790. else
  1791. M = ' AM'
  1792. end
  1793. if hour == 0 then
  1794. hour = 12
  1795. end
  1796. if hour == 24 then
  1797. hour = 1
  1798. end
  1799. LTime = string.format("%2.0f:%02.0f",hour,minute)
  1800. local MonthNums = {
  1801. ["January"]=1, ["February"]=2, ["March"]=3, ["April"]=4, ["May"]=5, ["June"]=6,
  1802. ["July"]=7, ["August"]=8, ["September"]=9, ["October"]=10, ["November"]=11, ["December"]=12
  1803. }
  1804. month=MonthNums[month]
  1805. LDate = month..'/'..(days-1)..'/'..year
  1806. TimeLabel.Text = LTime..M
  1807. DateLabel.Text = LDate
  1808. Logo.ImageColor3 = Logo.ImageColor3:lerp(igc,.2)
  1809. Logo.BackgroundColor3 = Logo.BackgroundColor3:lerp(bgc,.2)
  1810. end
  1811. game:service'RunService'.Heartbeat:connect(Time)
  1812. AtMainScreen=true
  1813. local txt=''
  1814. if Official then
  1815. txt='Welcome back, '..CurrentPlayerData[1]..', your last session\'s saved data has been loaded'
  1816. else
  1817. txt='Hello, '..CurrentPlayerData[1]..'. Your data will be saved at the end of this session'
  1818. end
  1819. delay(math.random(1,4),function()
  1820. delay(.3,function()
  1821. Functions:PlayerImgNotification('SavageMunkey', 'Creator & Founder of §aviOS - SavageMunkey')
  1822. end)
  1823. local fr,tl = Functions:Notification(txt,6)
  1824. end)
  1825. Functions:GeneratePrograms({25,20})
  1826. AtMainScreen=true
  1827. return warn'Homescreen Loaded'
  1828. end
  1829.  
  1830. function Functions:PlayerImgNotification(Plr, Type)
  1831. if not AtMainScreen then return end
  1832. local sz=50
  1833. if Type=='join' then
  1834. local fr,tl=Functions:Notification('New Player has joined, '..tostring(Plr)..'.', 4)
  1835. tl.Size=ud(1,-(sz+5),1,0)
  1836. tl.Position=ud(0,sz+5,0,0)
  1837. local UserImage = Functions:MakeNewUi('ImageLabel')
  1838. UserImage.Image=Functions:PlayerImage(tostring(Plr))
  1839. UserImage.Parent=fr
  1840. UserImage.Size=ud(0,sz,1,0)
  1841. UserImage.ImageTransparency=0
  1842. UserImage.Position=ud(0,4,0,0)
  1843. UserImage.ZIndex=8
  1844. wait(4*1.5)
  1845. for i = 0,1.05,.05 do UserImage.ImageTransparency=i lrs:wait() end
  1846. elseif Type=='rmv' then
  1847. local fr,tl=Functions:Notification('Player has left, '..tostring(Plr)..'.', 4)
  1848. tl.Size=ud(1,-(sz+5),1,0)
  1849. tl.Position=ud(0,sz+5,0,0)
  1850. local UserImage = Functions:MakeNewUi('ImageLabel')
  1851. UserImage.Image=Functions:PlayerImage(tostring(Plr))
  1852. UserImage.Parent=fr
  1853. UserImage.Size=ud(0,sz,1,0)
  1854. UserImage.ImageTransparency=0
  1855. UserImage.Position=ud(0,4,0,0)
  1856. UserImage.ZIndex=8
  1857. wait(4*1.5)
  1858. for i = 0,1.05,.05 do UserImage.ImageTransparency=i lrs:wait() end
  1859. else
  1860. local fr,tl=Functions:Notification(Type, 4)
  1861. tl.Size=ud(1,-(sz+5),1,0)
  1862. tl.Position=ud(0,sz+5,0,0)
  1863. local UserImage = Functions:MakeNewUi('ImageLabel')
  1864. UserImage.Image=Functions:PlayerImage(tostring(Plr))
  1865. UserImage.Parent=fr
  1866. UserImage.Size=ud(0,sz,1,0)
  1867. UserImage.ImageTransparency=0
  1868. UserImage.Position=ud(0,4,0,0)
  1869. UserImage.ZIndex=8
  1870. wait(4*1.5)
  1871. for i = 0,1.05,.05 do UserImage.ImageTransparency=i lrs:wait() end
  1872. end
  1873. end
  1874.  
  1875. local Notifications={};
  1876. local Notifs=0
  1877.  
  1878. function Functions:AdjustNotifPositions()
  1879. local upv=0
  1880. for i, data in next, Notifications do
  1881. --warn('('..tostring(ud(1,-200,.8,-(60*upv)))..')',#Notifications)
  1882. pcall(function()
  1883. data[1]:TweenPosition(ud(1,-200,.8,-(60*upv)),'Out','Back',.5,true)
  1884. end)
  1885. upv=upv+1
  1886. wait(.1)
  1887. end
  1888. end
  1889.  
  1890. function Functions:Notification(Text, ExitDelay)
  1891. if not ExitDelay then ExitDelay=4 end
  1892. if not AtMainScreen then return end
  1893. local v=false
  1894. local Frame = Functions:MakeNewUi('Frame')
  1895. Frame.ZIndex=8
  1896. Frame.BackgroundTransparency=.25
  1897. Frame.Size=ud(0,200,0,55)
  1898. Frame.BackgroundColor3=CurrentPlayerData[4]
  1899. Frame.Position = ud(1,0,.8,-(60*Notifs))
  1900. Frame.Parent=MainFrame
  1901. Frame:TweenPosition(ud(1,-200,.8,-(60*Notifs)),'Out','Sine',2,true)
  1902. table.insert(Notifications,{Frame,ud(1,-200,.8,-(60*Notifs))})
  1903. local Shader1 = Functions:MakeNewUi('Frame')
  1904. Shader1.ZIndex=9
  1905. Shader1.BackgroundTransparency=.9
  1906. Shader1.Size=ud(0,2,1,0)
  1907. Shader1.BackgroundColor3=CurrentPlayerData[4]
  1908. Shader1.Position = ud(0,-2,0,0)
  1909. Shader1.Parent=Frame
  1910. local Shader2 = Functions:MakeNewUi('Frame')
  1911. Shader2.ZIndex=9
  1912. Shader2.BackgroundTransparency=.8
  1913. Shader2.Size=ud(0,1,1,0)
  1914. Shader2.BackgroundColor3=CurrentPlayerData[4]
  1915. Shader2.Position = ud(0,-1,0,0)
  1916. Shader2.Parent=Frame
  1917. spawn(function()
  1918. Shader1:TweenPosition(ud(0,0,0,0),'Out','Linear',.4,true)
  1919. wait(.1)
  1920. Shader2:TweenPosition(ud(0,1,0,0),'Out','Linear',.4,true)
  1921. end)
  1922. local TLabel = Functions:MakeNewUi('TextButton')
  1923. TLabel.TextColor3=CurrentPlayerData[4]
  1924. TLabel.Position=ud(0,4,0,0)
  1925. TLabel.ZIndex=9
  1926. TLabel.Active=true
  1927. TLabel.BackgroundTransparency=.98
  1928. TLabel.TextWrapped=true
  1929. TLabel.Size=ud(1,-4,1,0)
  1930. TLabel.TextXAlignment='Left'
  1931. --TLabel.TextYAlignment='Top'
  1932. TLabel.Font=OS.Settings.Fonts.Sub_Header
  1933. TLabel.FontSize='Size12'
  1934. TLabel.TextStrokeColor3=CurrentPlayerData[4]
  1935. TLabel.TextStrokeTransparency=1
  1936. TLabel.TextTransparency=1
  1937. TLabel.Parent=Frame
  1938. Notifs=Notifs+1
  1939. local tic = Functions:Sound(230336790,false)
  1940. tic:Play()
  1941. for i = 0,1.02,.02 do
  1942. Frame.BackgroundColor3=Frame.BackgroundColor3:lerp(CurrentPlayerData[3],.2)
  1943. Frame.BackgroundTransparency=1.5-i
  1944. TLabel.TextStrokeTransparency=1.9-i
  1945. TLabel.TextTransparency=1-i
  1946. lrs:wait()
  1947. end
  1948. local cc=true
  1949. local function Close()
  1950. if (not cc) then return end
  1951. --print'3'
  1952. Frame:TweenPosition(ud(1,0,.8,Frame.Position.Y.Offset),'Out','Sine',3,true)
  1953. for i = 0,1.015,.02 do
  1954. --Frame.BackgroundColor3=Frame.BackgroundColor3:lerp(c3(0,0,0),.2)
  1955. Frame.BackgroundTransparency=.5+i
  1956. Shader1.BackgroundTransparency=.9+i
  1957. Shader2.BackgroundTransparency=.8+i
  1958. TLabel.TextStrokeTransparency=.9+i
  1959. TLabel.TextTransparency=i
  1960. lrs:wait()
  1961. end
  1962. val=true
  1963. Frame:Destroy()
  1964. for i,v in next, Notifications do
  1965. if v[1]==Frame then
  1966. table.remove(Notifications,i)
  1967. end
  1968. end
  1969. Notifs=Notifs-1
  1970. Functions:AdjustNotifPositions()
  1971. end
  1972. local ev
  1973. ev=TLabel.MouseButton1Click:connect(function()
  1974. --print'k'
  1975. spawn(Close)
  1976. wait()
  1977. cc=false
  1978. ev:disconnect()
  1979. end)
  1980. spawn(function()
  1981. if cc then
  1982. Effects:Type(TLabel, Text, 'In',.01)
  1983. wait(ExitDelay*1.2)
  1984. --print'k2'
  1985. spawn(Close)
  1986. wait()
  1987. cc=false
  1988. ev:disconnect()
  1989. end
  1990. end)
  1991. return Frame, TLabel
  1992. end
  1993.  
  1994. function Functions:CreateLogin()
  1995. local BFrame = Functions:MakeNewUi('Frame')
  1996. BFrame.ZIndex=4
  1997. BFrame.BackgroundTransparency=1
  1998. BFrame.Size=ud(1,0,1,0)
  1999. BFrame.Position = ud(0,0,0,0)
  2000. BFrame.Parent=MainFrame
  2001. local TransFrame = Functions:MakeNewUi('Frame')
  2002. TransFrame.ZIndex=8
  2003. TransFrame.BackgroundTransparency=1
  2004. TransFrame.Parent=MainFrame
  2005. local Start = Functions:MakeNewUi('TextButton')
  2006. local txt='Welcome to SaviOS, '..Host.Name..'.'
  2007. Start.Text=txt
  2008. Start.Font=OS.Settings.Fonts.Header
  2009. Start.TextColor3=CurrentPlayerData[4]
  2010. Start.Position=ud(0,0,0,-18)
  2011. Start.BackgroundTransparency=1
  2012. Start.TextTransparency=1
  2013. Start.Parent=BFrame
  2014. local Sub = Functions:MakeNewUi('TextLabel')
  2015. Sub.Parent=BFrame
  2016. Sub.TextColor3=CurrentPlayerData[4]
  2017. Sub.Text='Loading Decal and Sound Assets.'
  2018. Sub.Position=ud(0,0,0,25-18)
  2019. Sub.BackgroundTransparency=1
  2020. Sub.TextTransparency=1
  2021. Sub.ZIndex=6
  2022. local Circ = Functions:MakeNewUi('ImageLabel')
  2023. Circ.Image=Functions:Asset(502107146)
  2024. Circ.Parent=BFrame
  2025. Circ.ImageTransparency=0
  2026. Circ.ImageColor3 = CurrentPlayerData[3]
  2027. Circ.Size=ud(0,350,0,400)
  2028. Circ.Position=Functions:CenterOffset(Circ,ud(0,0,0,0))
  2029. Circ.ZIndex=5
  2030. local con=false
  2031. spawn(function()
  2032. Effects:Type(Start, txt, 'In',.06)
  2033. local nspd=.5
  2034. repeat wait(nspd)
  2035. --Start.Text=txt
  2036. Circ:TweenSizeAndPosition(ud(0,450,0,500),ud(.5,-450/2,.5,-250),'In','Back',nspd,true)
  2037. wait(nspd)
  2038. Circ:TweenSizeAndPosition(ud(0,350,0,400),ud(.5,-350/2,.5,-200),'Out','Quint',nspd,true)
  2039. --Start.Text=txt..'|'
  2040. until con
  2041. end)
  2042. for i = 0,1.025,.025 do
  2043. Start.TextTransparency = 1-i
  2044. MainFrame.BackgroundTransparency = 1-i
  2045. lrs:wait()
  2046. end
  2047. local function finish_Load()
  2048. Particles=false
  2049. Effects:Type(Start, txt, 'Out',.02)
  2050. Start.Text=''
  2051. Circ:TweenSizeAndPosition(ud(0,15,0,20),ud(.5,-15/2,.5,-10),'In','Quint',2,true)
  2052. wait(2)
  2053. Circ:TweenSizeAndPosition(ud(0,950,0,1000),ud(.5,-950/2,.5,-500),'In','Back',1,true)
  2054. wait(.2)
  2055. for i = 0,1.025,.025 do
  2056. Sub.TextTransparency = i
  2057. Circ.ImageTransparency=i
  2058. lrs:wait()
  2059. end
  2060. Circ:Destroy()
  2061. BFrame.Size = ud(0,400,0,210)
  2062. BFrame.Position = Functions:Center(BFrame)
  2063. spawn(function()
  2064. for i = 0,20,.1 do
  2065. MainFrame.BackgroundColor3 = MainFrame.BackgroundColor3:lerp(CurrentPlayerData[3],.1)
  2066. lrs:wait()
  2067. end
  2068. end)
  2069. Sub.Text='Assets['..(#OS.Backgrounds+#OS.Sounds)..'] Loaded.'
  2070. delay(.5,function()
  2071. txt='Click here to begin'
  2072. Effects:Type(Start, txt, 'In',.05)
  2073. delay(.6,function()
  2074. Start.Text=txt
  2075. end)
  2076. end)
  2077. for i = 0,1.025,.025 do
  2078. Sub.TextTransparency = 1-i
  2079. lrs:wait()
  2080. end
  2081. end
  2082. local con2=false
  2083. delay(1,function()
  2084. for i = 0,1.025,.025 do
  2085. Sub.TextTransparency = 1-i
  2086. lrs:wait()
  2087. end
  2088. delay(2,function()
  2089. local tbl1={};
  2090. local tbl2={OS.Backgrounds,OS.Sounds,OS.DecalAssets}
  2091. for _,__ in next, tbl2 do
  2092. for i, Id in next, __ do
  2093. table.insert(tbl1, Id)
  2094. end
  2095. end
  2096. for i,v in next, tbl1 do lrs:wait() end
  2097. con=true
  2098. finish_Load()
  2099. con2=true
  2100. end)
  2101. end)
  2102. repeat lrs:wait() until con2
  2103. Start.TextTransparency = 0
  2104. --MainFrame.Transparency = 0
  2105. local LoginScreen
  2106. local sclick
  2107. sclick=Start.MouseButton1Down:connect(function()
  2108. Sub:TweenPosition(ud(0,0,1,50),'In','Quint',1,true)
  2109. delay(1, function()
  2110. LoginScreen(false)
  2111. end)
  2112. sclick:disconnect()
  2113. end)
  2114. function LoginScreen(NewFrame)
  2115. OS['Login']=LoginScreen
  2116. if NewFrame then
  2117. BFrame = Functions:MakeNewUi('Frame')
  2118. BFrame.ZIndex=4
  2119. BFrame.BackgroundTransparency=1
  2120. BFrame.Size = ud(0,400,0,210)
  2121. BFrame.Position = Functions:Center(BFrame)
  2122. BFrame.Parent=MainFrame
  2123. end
  2124. pcall(function()
  2125. Sub:Destroy()
  2126. for i = 0,1.025,.025 do
  2127. Start.TextTransparency = i
  2128. lrs:wait()
  2129. end
  2130. Start.Parent=nil
  2131. end)
  2132. local UserImage = Functions:MakeNewUi('ImageLabel')
  2133. UserImage.Image=Functions:PlayerImage(Host)
  2134. UserImage.Parent=BFrame
  2135. UserImage.Size=ud(0,100,0,100)
  2136. UserImage.ImageTransparency=1
  2137. UserImage.Position=Functions:CenterOffset(UserImage,ud(0,0,-1,0))
  2138. UserImage:TweenPosition(Functions:CenterOffset(UserImage,ud(0,0,0,-50),'Out','Back',1,true))
  2139. UserImage.ZIndex=8
  2140. local UserImgFrame = Functions:MakeNewUi('ImageLabel')
  2141. UserImgFrame.Image=Functions:Asset(502107146)
  2142. UserImgFrame.Parent=BFrame
  2143. UserImgFrame.ImageTransparency=0
  2144. --UserImgFrame.ImageColor3 = c3(Monitor.Color.r+.2,Monitor.Color.g+.2,Monitor.Color.b+.2)
  2145. UserImgFrame.Size=ud(0,100,0,100)
  2146. UserImgFrame.Position=Functions:CenterOffset(UserImgFrame,ud(0,0,-1,0))
  2147. UserImgFrame:TweenPosition(Functions:CenterOffset(UserImgFrame,ud(0,0,0,-50),'Out','Back',1,true))
  2148. local Username = Functions:MakeNewUi('TextLabel')
  2149. Username.Text = Host.Name
  2150. Username.Parent = BFrame
  2151. Username.TextTransparency=.9
  2152. Username.Position=ud(0,0,1,0)
  2153. Username.ZIndex=9
  2154. Username:TweenPosition(ud(0,0,0,15),'Out','Quint',1,true)
  2155. local Password = Functions:MakeNewUi('TextButton')
  2156. Password.TextTransparency=1
  2157. Password.Parent=BFrame
  2158. Password.Position=ud(0,0,1,0)
  2159. Password.Font=OS.Settings.Fonts.Sub_Header
  2160. Password.TextStrokeColor3 = Password.TextColor3
  2161. Password.MouseEnter:connect(function()
  2162. Password.TextStrokeTransparency=.9
  2163. end)
  2164. Password.MouseLeave:connect(function()
  2165. Password.TextStrokeTransparency=1
  2166. end)
  2167. local canclick=false
  2168. Password.MouseButton1Down:connect(function(x,y)
  2169. if not canclick then
  2170. return
  2171. end
  2172. canclick=false
  2173. --Effects:Particles(x,y)
  2174. local val = Functions:LoginScreenGui(ud(0,400,0,28),{loop=true,ui=Password},true)
  2175. print('dun',val)
  2176. local ss
  2177. ss=function(pp)
  2178. num=0
  2179. for i,v in next,pp:children() do
  2180. num=num+1
  2181. pcall(function()
  2182. spawn(function()
  2183. for i = 0,1.025,.025 do
  2184. if v:IsA'TextButton' or v:IsA'TextBox' or v:IsA'TextLabel' then
  2185. v.TextTransparency = i
  2186. lrs:wait()
  2187. end
  2188. end
  2189. end)
  2190. end)
  2191. pcall(function()
  2192. spawn(function()
  2193. for i = 0,1.025,.025 do
  2194. if v:IsA'ImageLabel' then
  2195. v.ImageTransparency = i
  2196. lrs:wait()
  2197. end
  2198. end
  2199. end)
  2200. end)
  2201. pcall(function()
  2202. v:TweenPosition(ud(2,v.Position.X.Offset,v.Position.Y.Scale,v.Position.Y.Offset),'In','Sine',1,true)
  2203. end)
  2204. wait(.1)
  2205. ss(v)
  2206. end
  2207. return num
  2208. end
  2209. ss(BFrame)
  2210. wait((num+1.5)-(.4*num))
  2211. BFrame:Destroy()
  2212. Functions:MakeHomeScreen()
  2213. return {}
  2214. --canclick=true
  2215. --Gui:Destroy()
  2216. end)
  2217. delay(.1,function()
  2218. Password:TweenPosition(ud(0,0,0,45),'Out','Quint',1,true)
  2219. end)
  2220. spawn(function()
  2221. Effects:Type(Password, 'Enter your Password', 'In',.03)
  2222. canclick=true
  2223. end)
  2224. wait(.3)
  2225. spawn(function()
  2226. Effects:Underline(Username, 20, 70, 2, CurrentPlayerData[4], true)
  2227. end)
  2228. for i = 0,1.025,.01 do
  2229. --UserName.TextTransparency = 1-i
  2230. Password.TextTransparency = 1-i
  2231. Username.TextTransparency = 1-i
  2232. UserImage.ImageTransparency = 1-i
  2233. lrs:wait()
  2234. end
  2235. Functions:IfRegistered(Host.Name, function(bool)
  2236. if bool==true then
  2237. for i = 0,20 do
  2238. UserImgFrame.ImageColor3 = UserImgFrame.ImageColor3:lerp(c3(.25,1,.25),.1)
  2239. lrs:wait()
  2240. end
  2241. elseif bool and not Official then
  2242. for i = 0,20 do
  2243. UserImgFrame.ImageColor3 = UserImgFrame.ImageColor3:lerp(c3(1,.25,.25),.1)
  2244. lrs:wait()
  2245. end
  2246. else
  2247. for i = 0,20 do
  2248. UserImgFrame.ImageColor3 = UserImgFrame.ImageColor3:lerp(c3(.4,0,0),.1)
  2249. lrs:wait()
  2250. end
  2251. end
  2252. end)
  2253. end
  2254. end
  2255.  
  2256. function Functions:Lerp(Speed)
  2257. if Monitor and Monitor.Parent~=nil then
  2258. ypcall(function()
  2259. Monitor.CFrame = Monitor.CFrame:lerp(
  2260. Host.Character.HumanoidRootPart.CFrame *
  2261. CFrame.new(0,5.5,-6.5) *
  2262. CFrame.Angles(-math.rad(12),0,0)
  2263. , Speed)
  2264. end)
  2265. end
  2266. end
  2267.  
  2268. function Functions:Boot()
  2269. script:ClearAllChildren()
  2270. Functions:MakeMonitor()
  2271. G = Instance.new('SurfaceGui', Monitor)
  2272. G.Adornee = Monitor
  2273. G.Face = Enum.NormalId.Back
  2274. MainFrame = Functions:MakeNewUi('Frame')
  2275. MainFrame.ZIndex=1
  2276. MainFrame.BackgroundTransparency=.3
  2277. MainFrame.BackgroundColor3 = CurrentPlayerData[3]
  2278. MainFrame.Parent=G
  2279. spawn(function()
  2280. --wait(2)
  2281. for i = 0,20,.1 do
  2282. MainFrame.BackgroundColor3 = MainFrame.BackgroundColor3:lerp(CurrentPlayerData[4],.1)
  2283. lrs:wait()
  2284. end
  2285. end)
  2286. local MouseFrame = Instance.new('TextLabel', MainFrame)
  2287. MouseFrame.Size = ud(0,5,0,5)
  2288. MouseFrame.BackgroundTransparency = 1
  2289. MouseFrame.Text = ''
  2290. MouseFrame.ZIndex = 9
  2291. MouseFrame.BackgroundColor3=c3(-1,-1,-1)
  2292. MainFrame.MouseMoved:connect(function(x,y)
  2293. if MouseFrame.Parent ~= nil then
  2294. MouseFrame.Position = ud(0,x+3,0,y+6)
  2295. end
  2296. end)
  2297. --200182847
  2298. local MouseInner = Instance.new('ImageLabel', MouseFrame)
  2299. OS.Assets.Mouse=MouseFrame
  2300. MouseInner.Size = ud(0,5,0,5)
  2301. MouseInner.Position = ud(0,-5,0,-7)
  2302. MouseInner.ImageColor3 = CurrentPlayerData[3]
  2303. MouseInner.Image = Functions:Asset(284205403)
  2304. MouseInner.Name = 'AFriendlyMouse1'
  2305. MouseInner.BackgroundTransparency = 1
  2306. MouseInner.ZIndex = 10
  2307. local MouseOuter = Instance.new('ImageLabel', MouseFrame)
  2308. MouseOuter.Size = ud(0,7,0,7)
  2309. MouseOuter.Position = ud(0,-6,0,-8)
  2310. MouseOuter.ImageColor3 = CurrentPlayerData[4]
  2311. MouseOuter.Image = Functions:Asset(284205403)
  2312. MouseOuter.Name = 'AFriendlyMouse2'
  2313. MouseOuter.BackgroundTransparency = 1
  2314. MouseOuter.ZIndex = 9
  2315. local sx,sy=90,100
  2316. local mouseactive=true
  2317. PlayerMouse.Button1Down:connect(function()
  2318. OS.MouseDown = true
  2319. if not mouseactive then return end
  2320. local mus=Functions:Sound(341225236)
  2321. mus.Pitch=3
  2322. mus:Play()
  2323. end)
  2324. PlayerMouse.Button1Up:connect(function()
  2325. OS.MouseDown = false
  2326. if not mouseactive then return end
  2327. local mds=Functions:Sound(341225236)
  2328. mds.Pitch=2.5
  2329. mds:Play()
  2330. local RelativeUi=MouseFrame
  2331. local x,y=RelativeUi.Position.X.Offset,RelativeUi.Position.Y.Offset
  2332. local Circ = Functions:MakeNewUi('ImageLabel')
  2333. Circ.Image=Functions:Asset(284205403)
  2334. Circ.Parent=MainFrame
  2335. Circ.ImageTransparency=0
  2336. Circ.ImageColor3 = CurrentPlayerData[4]
  2337. Circ.Size=ud(0,5,0,5)
  2338. local backx,backy=5,6
  2339. Circ.Position=ud(0,x-backx,0,y-backy)
  2340. Circ.ZIndex=10
  2341. spawn(function()
  2342. Circ:TweenSizeAndPosition(ud(0,sx,0,sy),ud(0,(x-backx)-(sx/2),0,(y-backy)-(sy/2)),'Out','Sine',1,true)
  2343. for i = 0,1.05,.05 do
  2344. Circ.ImageTransparency=i
  2345. lrs:wait()
  2346. end
  2347. Circ:Destroy()
  2348. end)
  2349. end)
  2350. MainFrame.MouseEnter:connect(function(x,y)
  2351. mouseactive=true
  2352. game:service'UserInputService'.MouseIconEnabled=false
  2353. OS.Functions:HideChar()
  2354. end)
  2355. MainFrame.MouseLeave:connect(function(x,y)
  2356. mouseactive=false
  2357. game:service'UserInputService'.MouseIconEnabled=true
  2358. OS.Functions:ShowChar()
  2359. end)
  2360. --Functions:CreateLogin()
  2361. Functions:MakeHomeScreen()
  2362. end
  2363.  
  2364. lrs:connect(function()
  2365. Functions:Lerp(.2)
  2366. end)
  2367.  
  2368. Character.Humanoid.Died:connect(function()
  2369. Monitor.Parent:Destroy()
  2370. game:service'UserInputService'.MouseIconEnabled=true
  2371. script:Destroy()
  2372. end)
  2373.  
  2374. Host.Chatted:connect(function(msg)
  2375. if msg=='g/r' then
  2376. Monitor:Destroy()
  2377. game:service'UserInputService'.MouseIconEnabled=true
  2378. script:Destroy()
  2379. end
  2380. end)
  2381.  
  2382. local plrz=game:service'Players'
  2383.  
  2384. plrz.PlayerAdded:connect(function(Plr)
  2385. Functions:PlayerImgNotification(Plr, 'join')
  2386. end)
  2387.  
  2388. plrz.PlayerRemoving:connect(function(Plr)
  2389. Functions:PlayerImgNotification(Plr, 'rmv')
  2390. end)
  2391.  
  2392. Functions:Boot()
  2393.  
  2394. Host.Chatted:connect(function(msg)
  2395. if msg:lower()=='!reboot' then
  2396. Functions:Boot()
  2397. elseif msg:lower():sub(0,#'!background') == '!background' then
  2398. local id = msg:lower():sub(#'!background'+2)
  2399. OS.UIs['Background'][1].Image=Functions:Asset(tonumber(id))
  2400. end
  2401. end)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement