Advertisement
Guest User

Untitled

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