SHOW:
|
|
- or go back to the newest paste.
1 | --To let you guys know, my YouTube channel is knexpert1700 for exploit tutorials! :) | |
2 | --Also, to add more meme faces just go down to where it says A.Images.Memes and put in another face ID for the --other meme you want! :) | |
3 | Rise_Ohgal=function() | |
4 | ||
5 | A={}; | |
6 | A.Old={}; | |
7 | A.Data={}; | |
8 | A.User={}; | |
9 | A.Calls={}; | |
10 | A.Images={}; | |
11 | A.Stuffs={}; | |
12 | A.Sounds={}; | |
13 | A.Modules={}; | |
14 | A.Service={}; | |
15 | A.Settings={}; | |
16 | A.Commands={}; | |
17 | A.Warehouse={}; | |
18 | A.Functions={}; | |
19 | A.EachCalls={}; | |
20 | A.GuiModules={}; | |
21 | A.SettingIDs={}; | |
22 | A.KeyCommands={}; | |
23 | A.ObjectsData={}; | |
24 | A.RecentCommands={}; | |
25 | A.SettingsFunctions={}; | |
26 | ||
27 | A.Stuffs.Meter={}; | |
28 | A.Warehouse.Objects={}; | |
29 | A.Warehouse.Connections={}; | |
30 | ||
31 | A.ObjectsData.KnowProperties={}; | |
32 | A.ObjectsData.KnowPropertiesNumber={}; | |
33 | A.ObjectsData.GlobalProperties={'Name';'className';'Parent';'archivable';}; | |
34 | A.ObjectsData.EspecialProperties={'AbsolutePosition';'AbsoluteSize';'AccountAge';'AccountAgeReplicate'; | |
35 | 'Active';'Adornee';'AllowAmbientOcclusion';'AllowTeamChangeOnTouch';'AluminumQuality'; | |
36 | 'AlwaysOnTop';'Ambient';'AmbientReverb';'Anchored';'Angularvelocity';'AnimationId'; | |
37 | 'AreHingesDetected';'AttachmentForward';'AttachmentPoint';'AttachmentPos'; | |
38 | 'AttachmentRight';'AttachmentUp';'AutoAssignable';'AutoButtonColor';'AutoColorCharacters'; | |
39 | 'AvailablePhysicalMemory';'Axes';'BackgroundColor';'BackgroundColor3';'BackgroundTransparency'; | |
40 | 'BaseTextureId';'BaseUrl';'Bevel';'Roundness';'BinType';'BlastPressure';'BlastRadius'; | |
41 | 'BodyColor';'BodyPart';'BorderColor';'BorderColor3';'BorderSizePixel';'BrickColor'; | |
42 | 'Brightness';'Browsable';'BubbleChat';'BubbleChatLifetime';'BubbleChatMaxBubbles'; | |
43 | 'Bulge';'Button1DownConnectionCount';'Button1UpConnectionCount';'Button2DownConnectionCount'; | |
44 | 'Button2UpConnectionCount';'C0';'C1';'CameraMode';'CameraSubject';'CameraType'; | |
45 | 'CanBeDropped';'CanCollide';'CartoonFactor';'CastShadows';'CelestialBodiesShown'; | |
46 | 'CFrame';'Cframe';'Character';'CharacterAppearance';'CharacterAutoLoads';'ChatScrollLength'; | |
47 | 'ClassicChat';'ClearTextOnFocus';'ClipsDescendants';'CollisionSoundEnabled'; | |
48 | 'CollisionSoundVolume';'Color';'Bottom';'Top';'ConstrainedValue';'ControllingHumanoid'; | |
49 | 'ControlMode';'ConversationDistance';'CoordinateFrame';'CorrodedMetalQuality';'CPU'; | |
50 | 'CpuCount';'CpuSpeed';'CreatorId';'CreatorType';'CurrentAngle';'CurrentCamera'; | |
51 | 'CycleOffset';'D';'DataCap';'DataComplexity';'DataComplexityLimit';'DataCost'; | |
52 | 'DataReady';'Deprecated';'DeselectedConnectionCount';'DesiredAngle';'DiamondPlateQuality'; | |
53 | 'Disabled';'DistanceFactor';'DistributedGameTime';'DopplerScale';'Draggable';'DraggingV1'; | |
54 | 'Duration';'EditorFont';'EditorFontSize';'EditorTabWidth';'ElapsedTime';'Elasticity'; | |
55 | 'Enabled';'ExplosionType';'ExtentsOffset';'F0';'F1';'F2';'F3';'Face';'FaceId';'Faces'; | |
56 | 'FieldOfView';'Focus';'FogColor';'FogEnd';'FogStart';'Font';'FontSize';'Force';'FormFactor'; | |
57 | 'Friction';'From';'GearGenreSetting';'Genre';'GeographicLatitude';'GfxCard';'Graphic'; | |
58 | 'GrassQuality';'Grip';'GripForward';'GripPos';'GripRight';'GripUp';'Guest';'HeadsUpDisplay'; | |
59 | 'Health';'Heat';'Hit';'Humanoid';'IceQuality';'Icon';'IdleConnectionCount';'Image'; | |
60 | 'InitialPrompt';'InOut';'InUse';'IsPaused';'IsPlaying';'JobId';'Jump';'KeyDownConnectionCount'; | |
61 | 'KeyUpConnectionCount';'LeftLeg';'LeftRight';'LinkedSource';'LocalPlayer';'Location'; | |
62 | 'Locked';'LODX';'LODY';'Looped';'Material';'MaxActivationDistance';'MaxCollisionSounds'; | |
63 | 'MaxExtents';'MaxForce';'MaxHealth';'MaxItems';'MaxPlayers';'MaxSpeed';'MaxThrust'; | |
64 | 'MaxTorque';'MaxValue';'MaxVelocity';'MembershipType';'MembershipTypeReplicate';'MeshId'; | |
65 | 'MeshType';'MinValue';'Modal';'MouseButton1ClickConnectionCount';'MouseButton1DownConnectionCount'; | |
66 | 'MouseButton1UpConnectionCount';'MouseButton2ClickConnectionCount';'MouseButton2DownConnectionCount'; | |
67 | 'MouseButton2UpConnectionCount';'MouseDelta';'MouseDragConnectionCount';'MouseEnterConnectionCount'; | |
68 | 'MouseHit';'MouseLeaveConnectionCount';'MouseLock';'MouseMovedConnectionCount';'MouseTarget'; | |
69 | 'MouseTargetFilter';'MouseTargetSurface';'MoveConnectionCount';'MoveState';'MultiLine'; | |
70 | 'NameOcclusion';'NetworkOwner';'Neutral';'NumPlayers';'Offset';'Opacity';'Origin';'OsPlatform'; | |
71 | 'OsVer';'OverlayTextureId';'P';'PantsTemplate';'ParamA';'ParamB';'Part';'Part0'; | |
72 | 'Part1';'Pitch';'PixelShaderModel';'PlaceId';'PlasticQuality';'PlatformStand';'PlayCount'; | |
73 | 'PlayerToHideFrom';'PlayOnRemove';'Point';'Port';'Position';'Preliminary';'PrimaryPart'; | |
74 | 'PrivateWorkingSetBytes';'Purpose';'RAM';'Reflectance';'ReplicatedSelectedConnectionCount'; | |
75 | 'ResizeableFaces';'ResizeIncrement';'Resolution';'ResponseDialog';'RightLeg';'RiseVelocity'; | |
76 | 'RobloxLocked';'RobloxVersion';'RolloffScale';'RotVelocity';'Scale';'Score';'ScriptsDisabled'; | |
77 | 'SecondaryColor';'Selected';'ShadowColor';'Shape';'Shiny';'ShirtTemplate';'ShowDeprecatedObjects'; | |
78 | 'ShowDevelopmentGui';'ShowPreliminaryObjects';'Sides';'Sit';'Size';'SizeConstraint'; | |
79 | 'SizeOffset';'SkinColor';'SkyboxBk';'SkyboxDn';'SkyboxFt';'SkyboxLf';'SkyboxRt';'SkyboxUp'; | |
80 | 'SlateQuality';'SoundId';'Source';'SparkleColor';'Specular';'StarCount'; | |
81 | 'Steer';'StickyWheels';'StudsBetweenTextures';'StudsOffset';'StudsPerTileU';'StudsPerTileV'; | |
82 | 'Style';'Summary';'SuperSafeChatReplicate';'Surface';'Surface0'; | |
83 | 'Surface1';'SurfaceInput';'Target';'TargetFilter';'TargetOffset';'TargetPoint'; | |
84 | 'TargetRadius';'TargetSurface';'TeamColor';'Terrain';'Text';'TextBounds';'TextColor';'TextColor3'; | |
85 | 'TextFits';'TextScaled';'TextStrokeColor3';'TextStrokeTransparency';'TextTransparency';'Texture'; | |
86 | 'TextureId';'TextureSize';'TextWrap';'TextWrapped';'TextXAlignment';'TextYAlignment';'Throttle'; | |
87 | 'ThrustD';'ThrustP';'Ticket';'Time';'TimeOfDay';'To';'Tone';'ToolTip';'TopBottom';'Torque';'Torso'; | |
88 | 'Transparency';'TrussDetail';'TurnD';'TurnP';'TurnSpeed';'UnitRay';'UserDialog';'UserId';'Value'; | |
89 | 'Version';'VertexColor';'VideoCaptureEnabled';'VideoMemory';'VideoQuality'; | |
90 | 'ViewSizeX';'ViewSizeY';'Visible';'Volume';'WalkDirection';'WalkSpeed';'WalkToPart';'WalkToPoint'; | |
91 | 'WheelBackwardConnectionCount';'WheelForwardConnectionCount';'WindowSize';'WireRadius';'WoodQuality'; | |
92 | 'X';'Y';'PlayerMouse';'Mouse';'location';'RequestQueueSize';'BottomSurface';'FrontSurface'; | |
93 | 'LeftSurface';'RightSurface';'TopSurface';'ZIndex';'formFactor';'BackSurface';'HeadColor';'RightArmColor'; | |
94 | 'LeftArmColor';'TorsoColor';'LeftLegColor';'RightLegColor';'Velocity';'cframe'; | |
95 | 'ColorShift_Bottom';'ColorShift_Top';'Ip';'Vertex';'userId';'PlayCount'; | |
96 | }; | |
97 | A.ObjectsData.EspecialPropertiesLower={}; | |
98 | for i,v in next,A.ObjectsData.EspecialProperties do | |
99 | A.ObjectsData.EspecialPropertiesLower[i]=v:lower(); | |
100 | end; | |
101 | ||
102 | A.Images.Meme={ | |
103 | megusta=47594659; | |
104 | sparta=74142203; | |
105 | sovpax=60298055; | |
106 | ujelly=48989071; | |
107 | smile2=63175216; | |
108 | smile3=63186465; | |
109 | troll=45120559; | |
110 | horse=62079221; | |
111 | angry=48258623; | |
112 | orzse=62677682; | |
113 | smile=63174888; | |
114 | rofl=47595647; | |
115 | okey=62830600; | |
116 | yeaw=53646377; | |
117 | here=62677045; | |
118 | har=48260066; | |
119 | sun=47596170; | |
120 | lol=48293007; | |
121 | sad=53645378; | |
122 | lin=48290678; | |
123 | sls=53646388; | |
124 | j1d=45031979; | |
125 | jim=74885351; | |
126 | }; | |
127 | ||
128 | ||
129 | --[[Functions]] | |
130 | A.Functions.Thread=function(Function) | |
131 | return coroutine.resume(coroutine.create(Function)); | |
132 | end; | |
133 | A.Functions.Connect=function(Object,Event,Function,Table) | |
134 | local Connection=Object[Event]:connect(Function); | |
135 | A.Warehouse.Connections[#A.Warehouse.Connections+1]=Connection; | |
136 | if(Table~=nil)then | |
137 | Table.Connections[#Table.Connections+1]=Connection; | |
138 | end; | |
139 | return Object,Connection; | |
140 | end; | |
141 | A.Functions.Wait=function(Number) | |
142 | local _,Number2=A.Service.RunService.Stepped:wait(); | |
143 | local Plus; | |
144 | Number=Number and Number-.01 or 0; | |
145 | if(Number>Number2 and Number~=Number2)then | |
146 | while(Number>Number2 and Number~=Number2)do | |
147 | _,Plus=A.Service.RunService.Stepped:wait(); | |
148 | Number2=Number2+Plus; | |
149 | end; | |
150 | end; | |
151 | end; | |
152 | A.Functions.MatchProperty=function(Text) | |
153 | ||
154 | Text=Text:lower(); | |
155 | ||
156 | local Found; | |
157 | ||
158 | for i,v in next,A.ObjectsData.GlobalProperties do | |
159 | if(v:lower():find(Text)==1)then | |
160 | Found=v; | |
161 | break; | |
162 | end; | |
163 | end; | |
164 | ||
165 | if(Found==nil)then | |
166 | for i,v in next,A.ObjectsData.EspecialPropertiesLower do | |
167 | if(v:find(Text)==1)then | |
168 | Property=A.ObjectsData.EspecialProperties[i]; | |
169 | break; | |
170 | end;i,v=nil; | |
171 | end; | |
172 | end; | |
173 | ||
174 | return Found; | |
175 | ||
176 | end; | |
177 | A.Functions.GetProperties=function(Object,InNumber) | |
178 | local Class=type(Object)=='userdata'and Object.className or Object | |
179 | if(A.ObjectsData.KnowProperties[Class]==nil)then | |
180 | if(type(Object)=='string')then | |
181 | Object=A.Old.Instance.NewObject(Object); | |
182 | end; | |
183 | local New={}; | |
184 | for i,v in next,A.ObjectsData.EspecialProperties do | |
185 | if(pcall(function()return Object[v];end)and Object:FindFirstChild(v)==nil)then | |
186 | New[v]=true; | |
187 | end; | |
188 | end; | |
189 | A.ObjectsData.KnowProperties[Class]=New; | |
190 | local Number=0; | |
191 | local Numbered={}; | |
192 | for i,v in next,New do | |
193 | Number=Number+1; | |
194 | Numbered[Number]=i; | |
195 | i,v=nil; | |
196 | end; | |
197 | Number=nil; | |
198 | A.ObjectsData.KnowPropertiesNumber[Class]=Numbered; | |
199 | end; | |
200 | Object=nil; | |
201 | return InNumber==true and A.ObjectsData.KnowPropertiesNumber[Class]or A.ObjectsData.KnowProperties[Class]; | |
202 | end; | |
203 | A.Functions.CopyTable=function(Table,New) | |
204 | if(Table and type(Table)=='table')then | |
205 | New=New~=nil and New or{}; | |
206 | for i,v in next,Table do | |
207 | New[i],i,v=v,nil; | |
208 | end; | |
209 | return New; | |
210 | end; | |
211 | end; | |
212 | A.Functions.GetData=function(Object) | |
213 | local Class=Object.className; | |
214 | if(A.Warehouse.Objects[Class])then | |
215 | for i,v in next,A.Warehouse.Objects[Class]do | |
216 | if(v.Object==Object)then | |
217 | v.Rank=i; | |
218 | return v; | |
219 | else i,v=nil; | |
220 | end; | |
221 | end; | |
222 | end; | |
223 | return nil; | |
224 | end; | |
225 | A.Functions.KillData=function(Object,Data) | |
226 | Data=Data~=nil and Data or A.Functions.GetData(Object); | |
227 | if(Data~=nil)then | |
228 | for i,v in next,Data.Connections do | |
229 | v:disconnect();i,v=nil; | |
230 | end; | |
231 | table.remove(Data.Mother(),Data.Rank); | |
232 | for i,v in next,Data do | |
233 | Data[i],i,v=nil; | |
234 | end; | |
235 | end; | |
236 | return Object; | |
237 | end; | |
238 | A.Functions.GiveData=function(Object) | |
239 | if(A.Functions.GetData(Object)==nil)then | |
240 | local Class=Object.className; | |
241 | if(A.Warehouse.Objects[Class]==nil)then A.Warehouse.Objects[Class]={};end; | |
242 | local Rank=#A.Warehouse.Objects[Class]+1; | |
243 | local Data={};A.Warehouse.Objects[Class][Rank]=Data; | |
244 | Data.Rank=Rank | |
245 | Data.Object=Object; | |
246 | Data.Properties={}; | |
247 | Data.Connections={}; | |
248 | Data.Mother=function()return A.Warehouse.Objects[Class];end; | |
249 | ||
250 | A.Functions.Connect(Object,'Changed',function(Property) | |
251 | if(Data.Properties[Property]~=nil)then | |
252 | local Health=Data.Properties[Property](); | |
253 | if(Property=='Parent')then | |
254 | if(pcall(function()Object[Property]=Health;end)==false)then | |
255 | A.Functions.KillData(Object,Data); | |
256 | end; | |
257 | else | |
258 | Object[Property]=Health; | |
259 | end; | |
260 | end;Property,Health=nil; | |
261 | end,Data); | |
262 | ||
263 | return Object,Data; | |
264 | end; | |
265 | end; | |
266 | A.Functions.Remove=function(Object,Destroy) | |
267 | if(Object)then | |
268 | pcall(function() | |
269 | Object.Parent=nil; | |
270 | if(Destroy~=true)then | |
271 | Object:Remove(); | |
272 | else | |
273 | Object:Destroy(); | |
274 | end; | |
275 | end); | |
276 | end; | |
277 | end; | |
278 | A.Functions.All=function(Object,Function,Table,Return) | |
279 | if(Function~=nil)then | |
280 | for i,v in next,Object:children()do | |
281 | if(v~=script)then | |
282 | pcall(function() | |
283 | Function(v); | |
284 | A.Functions.All(v,Function,Table,Return); | |
285 | end); | |
286 | end; | |
287 | end; | |
288 | else | |
289 | Return=Return==nil and true or false; | |
290 | Table=Table~=nil and Table or{}; | |
291 | for i,v in next,Object:children()do | |
292 | Table[#Table+1]=v; | |
293 | pcall(A.Functions.All,v,nil,Table,Return); | |
294 | i,v=nil; | |
295 | end; | |
296 | if(Return)then | |
297 | return Table; | |
298 | end; | |
299 | end; | |
300 | end; | |
301 | A.Functions.FindObject=function(Object,Property,Value) | |
302 | for i,v in next,Object:children()do | |
303 | if(v[Property]==Value)then | |
304 | return v; | |
305 | end; | |
306 | i,v=nil; | |
307 | end; | |
308 | end; | |
309 | A.Functions.ObjectWait=function(Object,Property,Value) | |
310 | local Part=A.Functions.FindObject(Object,Property,Value); | |
311 | if(Part)then return Part;end; | |
312 | while(A~=nil)do | |
313 | Part=Object.ChildAdded:wait(); | |
314 | if(Part[Property]==Value)then | |
315 | return Part; | |
316 | end; | |
317 | end; | |
318 | end; | |
319 | A.Functions.PropertyWait=function(Object,Property) | |
320 | if(Object[Property]==nil)then | |
321 | while(Object.Changed:wait()~=Property)do end; | |
322 | end; | |
323 | return Object[Property]; | |
324 | end; | |
325 | A.Functions.CreateCall=function(Description,Calls,Function) | |
326 | local Rank=#A.Calls+1; | |
327 | local New={};A.Calls[Rank]=New; | |
328 | New.Function=Function; | |
329 | New.Description=Description; | |
330 | New.Calls='"'..table.concat(Calls,'","')..'"'; | |
331 | for i,v in next,Calls do | |
332 | A.EachCalls[v]=function(...)return A.Calls[Rank].Function(...);end; | |
333 | end; | |
334 | New,Description,Calls,Function=nil; | |
335 | end; | |
336 | A.Functions.MakeMeme=function(Type,Char) | |
337 | if(Char)then | |
338 | Type=Type~=nil and tostring(Type):lower()or'reset!' | |
339 | local Meme=A.Images.Meme[Type]or Type; | |
340 | local BBG_SIZE=Char.Head.Size.X*1.25; | |
341 | local STUD_VECTOR_1=Char.Head.Size.Z/4; | |
342 | local STUD_VECTOR_2=Char.Head.Size.Z; | |
343 | local bbg=Char:FindFirstChild'BBGMEME'or A.Old.Instance.NewObject('BillboardGui',Char); | |
344 | bbg.StudsOffset=A.Old.Vector3.new(0,STUD_VECTOR_1,STUD_VECTOR_2); | |
345 | bbg.Size=A.Old.UDim2.new(BBG_SIZE,0,BBG_SIZE); | |
346 | bbg.Adornee=Char.Head; | |
347 | bbg.Name='BBGMEME'; | |
348 | local img=bbg:FindFirstChild'Meme'or A.Old.Instance.NewObject('ImageLabel',bbg); | |
349 | img.BackgroundTransparency=1; | |
350 | img.Image=A.Data.BaseUrl..Meme; | |
351 | img.Size=A.Old.UDim2.Full; | |
352 | img.Name='Meme'; | |
353 | for i,v in next,Char:children()do | |
354 | if(v.className=='Hat')then | |
355 | v=v:FindFirstChild'Handle'; | |
356 | if(v)then | |
357 | v.Transparency=Type~='reset!'and 1 or 0; | |
358 | end; | |
359 | end; | |
360 | i,v=nil; | |
361 | end; | |
362 | img,bbg,Type,Char=nil; | |
363 | end; | |
364 | end; | |
365 | A.Functions.Players=function(Name,Function) | |
366 | Name=Name~=nil and Name:lower()or'all!'; | |
367 | if(Function~=nil)then | |
368 | local Load,Message; | |
369 | for Name in Name:gmatch'([^,]+)'do | |
370 | for Int,Player in next,A.Service.Players:GetPlayers()do | |
371 | Load,Message=pcall(function() | |
372 | if(Player.Name:lower():find(Name)==1 or A.EachCalls[Name](Player)==true)then | |
373 | Function(Player); | |
374 | end; | |
375 | end);Int,Player=nil; | |
376 | if(Game.PlaceId~=0 and Load==false and Message~=nil)then | |
377 | print(Message); | |
378 | end; | |
379 | end;Name=nil; | |
380 | end; | |
381 | else | |
382 | local Found={}; | |
383 | for Name in Name:gmatch'([^,]+)'do | |
384 | for Int,Player in next,A.Service.Players:GetPlayers()do | |
385 | pcall(function() | |
386 | if(Name=='all!'or(A.EachCalls[Name]~=nil and A.EachCalls[Name](Player))or Player.Name:lower():find(Name)==1)then | |
387 | Found[#Found+1]=Player; | |
388 | end; | |
389 | end);Int,Player=nil; | |
390 | end;Name=nil; | |
391 | end;return Found; | |
392 | end; | |
393 | end; | |
394 | A.Functions.Peace=function(Object,Properties) | |
395 | Object=type(Object)=='string'and A.Old.Instance.NewObject(Object)or Object; | |
396 | local Parent=Properties.Parent; | |
397 | Properties.Parent=nil; | |
398 | for i,v in next,Properties do | |
399 | if(type(v)=='function')then | |
400 | coroutine.wrap(function() | |
401 | Object[i],i,v=v(),nil; | |
402 | end)(); | |
403 | else | |
404 | Object[i],i,v=v,nil; | |
405 | end; | |
406 | end; | |
407 | if(type(Parent)=='function')then | |
408 | coroutine.wrap(function() | |
409 | Object.Parent=Parent(); | |
410 | end)(); | |
411 | else | |
412 | Object.Parent=Parent; | |
413 | end; | |
414 | return Object; | |
415 | end; | |
416 | A.Functions.Lock=function(Object,Properties,Events) | |
417 | local Data; | |
418 | Object,Data=type(Object)=='string'and A.Old.Instance.new(Object)or Object; | |
419 | if(type(Data)~='table')then | |
420 | Data=A.Functions.GetData(Object); | |
421 | end; | |
422 | for i,v in next,Properties do | |
423 | if(type(v)~='function')then | |
424 | Data.Properties[i]=function()return v;end; | |
425 | else | |
426 | Data.Properties[i]=v; | |
427 | end; | |
428 | end; | |
429 | A.Functions.Peace(Object,Properties); | |
430 | if(Events~=nil)then | |
431 | for i,v in next,Events do | |
432 | A.Functions.Connect(Object,i,v,Data);i,v=nil; | |
433 | end; | |
434 | end; | |
435 | return Object,Data; | |
436 | end; | |
437 | A.Functions.CreateModule=function(Type,Function) | |
438 | if(A.Modules[Type]==nil)then A.Modules[Type]={};end; | |
439 | A.Modules[Type][#A.Modules[Type]+1]=Function; | |
440 | end; | |
441 | A.Functions.LoadModule=function(Type) | |
442 | if(A.Modules[Type]~=nil)then | |
443 | local Load; | |
444 | for Number,Error in next,A.Modules[Type]do | |
445 | Load,Error=A.Functions.Thread(Error); | |
446 | if(Load==false)then | |
447 | print('ERROR: Modules.'..Type..'['..Number..']',Error); | |
448 | end; | |
449 | Load,Error=nil; | |
450 | end; | |
451 | end; | |
452 | end; | |
453 | A.Functions.VisibleOfHealthGUI=function(Bool) | |
454 | if(A.User.PlayerGui~=nil)then | |
455 | local Stuff=A.User.PlayerGui:FindFirstChild'HealthGUI'; | |
456 | if(Stuff)then | |
457 | Stuff=Stuff:FindFirstChild'tray'; | |
458 | if(Stuff)then | |
459 | Stuff.Visible=A.Settings.HealthBar.Value==false; | |
460 | end; | |
461 | end; | |
462 | end; | |
463 | end; | |
464 | A.Functions.Uninstall=function() | |
465 | local Connections=_G['Dresmor Alakazard - Connections Of Ohgal Local Admin']; | |
466 | local Objects=_G['Dresmor Alakazard - Objects Of Ohgal Local Admin']; | |
467 | if(Connections)then | |
468 | for i,v in next,Connections do | |
469 | v:disconnect();i,v=nil; | |
470 | end; | |
471 | end; | |
472 | if(Objects)then | |
473 | for i,v in next,Objects do | |
474 | for i,v in next,v do | |
475 | A.Functions.Remove(v.Object,true);i,v=nil; | |
476 | end;i,v=nil; | |
477 | end; | |
478 | end; | |
479 | _G['Dresmor Alakazard - Visit Version Of Ohgal Local Admin']= | |
480 | _G['Dresmor Alakazard - Visit Version Of Ohgal Local Admin']and | |
481 | _G['Dresmor Alakazard - Visit Version Of Ohgal Local Admin']+1 or | |
482 | 0; | |
483 | end; | |
484 | A.Functions.CreateScript=function(Type,Parent,Text) | |
485 | local Script=A.Stuffs.ScriptPacket[Type]:clone(); | |
486 | Script.Name=A.Service.Workspace.DistributedGameTime; | |
487 | Script.Disabled=false; | |
488 | local DSource=Script:FindFirstChild'Source'or Script:FindFirstChild'DSource'or Instance.new('StringValue',Script); | |
489 | DSource.Name=DSource.Name=='Value'and'DSource'or DSource.Name; | |
490 | DSource.Value=A.Stuffs.StarterSource..Text; | |
491 | ||
492 | for i,v in next,A.Stuffs.ScriptPacket do | |
493 | v:clone().Parent=Script; | |
494 | end; | |
495 | ||
496 | if(Parent~=nil and Parent.className=='Player')then | |
497 | Script.Parent=Parent.Character.Parent==A.Service.Workspace and Parent.Character or | |
498 | A.Functions.FindObject(Parent,'className','Backpack')or | |
499 | A.Functions.FindObject(Parent,'className','PlayerGui'); | |
500 | else | |
501 | Script.Parent=Parent; | |
502 | end; | |
503 | ||
504 | return Script | |
505 | end; | |
506 | A.Functions.Install=function() | |
507 | if(Game.PlaceId~=0)then | |
508 | if(script~=nil)then | |
509 | script.Parent=A.Service.Lighting; | |
510 | pcall(function() | |
511 | script:ClearAllChildren(); | |
512 | end); | |
513 | end; | |
514 | print=function()end; | |
515 | else | |
516 | local Print=print; | |
517 | print=function(...) | |
518 | Print('|:. Ohgal .:|',...); | |
519 | end; | |
520 | end; | |
521 | ||
522 | local Script;A.Stuffs.ScriptPacket={}; | |
523 | if(script~=nil)then | |
524 | script.Name='Dresmor Alakazard - Ohgal Local Admin'; | |
525 | for i,v in next,script:children()do | |
526 | if(v.className=='LocalScript'or v.className=='Script')then | |
527 | A.Stuffs.ScriptPacket[v.className]=v; | |
528 | end; | |
529 | end; | |
530 | end; | |
531 | if(Game.CreatorId==5111623)then | |
532 | local Model=A.Old.Instance.NewObject'Model'; | |
533 | Wait(); | |
534 | if(newLocalScript~=nil and A.Stuffs.ScriptPacket.LocalScript==nil)then | |
535 | newLocalScript('--Hello word!',Model); | |
536 | A.Stuffs.ScriptPacket.LocalScript=Model:children()[1]; | |
537 | end; | |
538 | if(newScript~=nil and A.Stuffs.ScriptPacket.Script==nil)then | |
539 | newScript('--Hello word!',Model); | |
540 | A.Stuffs.ScriptPacket.Script=Model:children()[2]; | |
541 | end; | |
542 | else | |
543 | local Pack=A.Service.InsertService:LoadAsset'83500620'; | |
544 | if(type(Pack)=='userdata'and Pack:FindFirstChild'Ohgal_Scripts'~=nil)then | |
545 | for Int,Object in next,Pack.Ohgal_Scripts:children()do | |
546 | if(A.Stuffs.ScriptPacket[Object.className]==nil)then | |
547 | A.Stuffs.ScriptPacket[Object.className]=Object:clone(); | |
548 | end; | |
549 | end; | |
550 | end; | |
551 | for Type,ID in next,{Script=68623472;LocalScript=68613786;}do | |
552 | if(A.Stuffs.ScriptPacket[Type]==nil)then | |
553 | Script=A.Service.InsertService:LoadAsset(ID); | |
554 | if(type(Script)=='userdata')then | |
555 | Script=Script:children()[1]; | |
556 | if(Script~=nil)then | |
557 | A.Stuffs.ScriptPacket[Type]=Script:clone(); | |
558 | Script.Disabled=true; | |
559 | end; | |
560 | end; | |
561 | end; | |
562 | end; | |
563 | end; | |
564 | ||
565 | if(script~=nil and Game.PlaceId==0)then | |
566 | script:ClearAllChildren(); | |
567 | for i,v in next,A.Stuffs.ScriptPacket do | |
568 | v.Parent=script; | |
569 | end; | |
570 | end; | |
571 | ||
572 | A.Functions.SetupCommands(); | |
573 | ||
574 | if(A.SettingIDs[1]==nil)then | |
575 | local Number=0; | |
576 | for i,v in next,A.Settings do Number=Number+1; | |
577 | A.Settings[i]=A.Functions.Value('Bool',v);v=A.Settings[i]; | |
578 | A.SettingIDs[Number]={Object=v;Name=i;}; | |
579 | if(i=='HealthBar')then | |
580 | coroutine.wrap(function() | |
581 | while(A~=nil)do | |
582 | A.Functions.VisibleOfHealthGUI(v.Changed:wait()==false); | |
583 | end; | |
584 | end)(); | |
585 | end; | |
586 | end; | |
587 | end; | |
588 | ||
589 | _G['Dresmor Alakazard - Connections Of Ohgal Local Admin']=A.Warehouse.Connections; | |
590 | _G['Dresmor Alakazard - Objects Of Ohgal Local Admin']=A.Warehouse.Objects; | |
591 | _G['Dresmor Alakazard - Visit Version Of Ohgal Local Admin']= | |
592 | _G['Dresmor Alakazard - Visit Version Of Ohgal Local Admin']and | |
593 | _G['Dresmor Alakazard - Visit Version Of Ohgal Local Admin']+1 or | |
594 | 0; | |
595 | A.Data.VisitVersion=_G['Dresmor Alakazard - Visit Version Of Ohgal Local Admin']; | |
596 | ||
597 | A.User.C=A.Functions.PropertyWait(A.Service.Players,'LocalPlayer'); | |
598 | A.User.Humanoid=A.Functions.Value'Object'; | |
599 | A.User.Connections={}; | |
600 | A.User.Windows={}; | |
601 | A.User.Frames={}; | |
602 | A.User.Gui={}; | |
603 | ||
604 | for i,v in next,{'PlayerGui','Backpack'}do | |
605 | A.User[v]=A.Functions.FindObject(A.User.C,'className',v); | |
606 | end; | |
607 | ||
608 | ||
609 | A.Functions.LoadModule'Once'; | |
610 | A.Functions.LoadModule'Backpack'; | |
611 | A.Functions.LoadModule'PlayerGui'; | |
612 | ||
613 | ||
614 | A.Functions.Connect(A.User.C,'Chatted',function(Text) | |
615 | Wait(); | |
616 | A.Functions.SearchCommand(Text); | |
617 | Text=nil; | |
618 | end); | |
619 | A.Functions.Connect(A.User.C,'ChildAdded',function(Object) | |
620 | Wait(); | |
621 | local Class=Object.className; | |
622 | if(Class=='Backpack'or Class=='PlayerGui')then | |
623 | A.User[Class]=Object; | |
624 | A.Functions.LoadModule(Class); | |
625 | elseif(Class=='StringValue'and Object.Name=='Ohgal_Execution')then | |
626 | coroutine.wrap(function(Text,Name,Object)loadstring([=[local script={...};script=script[1]; ]=]..Text,Name)(Object);end)(Object.Value,'Ohgal',Object); | |
627 | end; | |
628 | end); | |
629 | ||
630 | A.Stuffs.Meter.Local={}; | |
631 | A.Stuffs.Meter.Server={}; | |
632 | ||
633 | A.Stuffs.Meter.Server.Players=A.Functions.Value'Number'; | |
634 | ||
635 | for i,v in next,{'Speed (FPS)';}do | |
636 | A.Stuffs.Meter.Local[v]=A.Functions.Value'Number'; | |
637 | end; | |
638 | if(A.Stuffs.ScriptPacket.Script~=nil)then | |
639 | A.Functions.Thread(function() | |
640 | local Warehouse=A.Service.Lighting; | |
641 | A.Functions.CreateScript('Script',A.Service.Workspace,[[ | |
642 | script.Parent=nil; | |
643 | ||
644 | if(_G.Ohgal_Server_Checker==true)then | |
645 | return nil; | |
646 | end; | |
647 | _G.Ohgal_Server_Checker=true; | |
648 | ||
649 | local Warehouse=Game:service'Lighting'; | |
650 | local Clients=Instance.new'NumberValue'; | |
651 | local Network=Game:service'NetworkServer'; | |
652 | local Server_Speed=Instance.new'NumberValue'; | |
653 | ||
654 | while(Wait(2))do | |
655 | Server_Speed.Name='Ohgal_Server Speed (SFPS)'; | |
656 | Server_Speed.Value=1/getfenv(0).Wait(); | |
657 | Clients.Value=#Network:children(); | |
658 | Clients.Name='Ohgal_Clients'; | |
659 | Server_Speed.Parent=Warehouse; | |
660 | Clients.Parent=Warehouse; | |
661 | end; | |
662 | ]] | |
663 | ); | |
664 | for i,v in next,{'Clients';'Server Speed (SFPS)';}do | |
665 | coroutine.wrap(function()Wait(); | |
666 | local Value=Warehouse:FindFirstChild('Ohgal_'..v); | |
667 | while(Warehouse:FindFirstChild('Ohgal_'..v)==nil)do | |
668 | Value=Warehouse.ChildAdded:wait(); | |
669 | end; | |
670 | A.Stuffs.Meter.Server[v]=Value; | |
671 | end)(); | |
672 | end; | |
673 | end); | |
674 | end; | |
675 | ||
676 | coroutine.wrap(function() | |
677 | while(A~=nil and A.Functions.Check()==true)do | |
678 | if(A.Stuffs.MeterIsActive==true)then | |
679 | A.Stuffs.Meter.Local['Speed (FPS)'].Value=1/getfenv(0).Wait(); | |
680 | A.Stuffs.Meter.Server.Players.Value=A.Service.Players.NumPlayers; | |
681 | end; | |
682 | Wait(2); | |
683 | end; | |
684 | end)(); | |
685 | coroutine.wrap(function() | |
686 | if(A.Stuffs.Security==true)then | |
687 | while(A.Functions.Check()==true)do | |
688 | A.Functions.DoKeyCommand(A.Service.GuiService.KeyPressed:wait()); | |
689 | end; | |
690 | end; | |
691 | end)(); | |
692 | ||
693 | print('Number of the commands:',#A.Commands); | |
694 | ||
695 | end; | |
696 | A.Functions.Check=function() | |
697 | return(A~=nil and A.Data.VisitVersion==_G['Dresmor Alakazard - Visit Version Of Ohgal Local Admin']); | |
698 | end; | |
699 | A.Functions.GuisParent=function() | |
700 | A.User.Screen.Parent=A.Stuffs.Security==true and A.Service.CoreGui or A.User.PlayerGui; | |
701 | end; | |
702 | A.Functions.Screen=function() | |
703 | for i,v in next,A.User.Gui do | |
704 | for i,v in next,v do | |
705 | v[i],i,v=nil; | |
706 | end;i,v=nil; | |
707 | end; | |
708 | if(Game.PlaceId==0)then | |
709 | for i,v in next,A.Functions.ObjectWait(A.User.C,'className','PlayerGui'):children()do | |
710 | if(v.Name=='Ohgal')then | |
711 | A.Functions.Remove(v,true); | |
712 | end; | |
713 | end; | |
714 | end; | |
715 | A.User.Screen=A.Old.Instance.NewObject'ScreenGui'; | |
716 | A.User.Screen.Name='Ohgal'; | |
717 | coroutine.wrap(function() | |
718 | while(A~=nil and A.Functions.Check()==true)do | |
719 | A.Functions.Wait(); | |
720 | if(A==nil)then break;end; | |
721 | if(pcall(A.Functions.GuisParent)==false)then | |
722 | A.Functions.Screen();break; | |
723 | end; | |
724 | if(A.User.Screen.Changed:wait()~='Parent')then | |
725 | while(A.User.Screen.Changed:wait()~='Parent')do end; | |
726 | end; | |
727 | end; | |
728 | end)(); | |
729 | for i=1,#A.GuiModules do | |
730 | A.GuiModules[i](); | |
731 | end; | |
732 | end; | |
733 | A.Functions.CreateGuiModule=function(Function) | |
734 | A.GuiModules[#A.GuiModules+1]=Function; | |
735 | end; | |
736 | A.Functions.AddSound=function(Type,Table) | |
737 | if(A.Sounds[Type]==nil)then A.Sounds[Type]={};end; | |
738 | A.Sounds[Type][#A.Sounds[Type]+1]=Table; | |
739 | end; | |
740 | A.Functions.LoadSound=function(Type,Name,No_Object) | |
741 | local Data=tonumber(Name)~=nil and A.Sounds[Type][tonumber(Name)]or(function() | |
742 | for i,v in next,A.Sounds[Type]do | |
743 | if(v.Name~=nil and v.Name:lower():find(Name:lower())==1)then | |
744 | return v; | |
745 | end; | |
746 | end; | |
747 | end)(); | |
748 | if(No_Object~=true)then | |
749 | local Sound=A.Functions.Peace('Sound',Data); | |
750 | Sound.SoundId=A.Data.BaseUrl..Data.SoundId; | |
751 | return Sound,Data; | |
752 | else | |
753 | return Data; | |
754 | end; | |
755 | end; | |
756 | A.Functions.ToBoolean=function(Text) | |
757 | Text=Text~=nil and Text:lower():gsub('!',''); | |
758 | return A.Stuffs.TrueBooleans[Text]==true; | |
759 | end; | |
760 | A.Functions.Value=function(Type,Value,Function) | |
761 | local Object=A.Old.Instance.NewObject(Type..'Value'); | |
762 | if(Value~=nil)then Object.Value=Value;end; | |
763 | if(Function~=nil)then | |
764 | coroutine.wrap(function() | |
765 | while(A.Functions.Check()==true and Object.Name~='Over')do | |
766 | Function(Object.Changed:wait()); | |
767 | end; | |
768 | end)(); | |
769 | end; | |
770 | return Object; | |
771 | end; | |
772 | A.Functions.Button=function(Type,Properties,Events) | |
773 | if(A.Stuffs.Gui.Button[Type]~=true)then return nil;end; | |
774 | Properties.Size=Properties.Size or A.Old.UDim2.ButtonSize; | |
775 | local EventsIsATable=type(Events)=='table'; | |
776 | local Button,ButtonData=A.Functions.Lock(Type,Properties,EventsIsATable and Events or nil); | |
777 | if(EventsIsATable==false)then | |
778 | A.Functions.Connect(Button,'MouseButton1Up',function() | |
779 | A.Functions.Wait(); | |
780 | Events(); | |
781 | A.Stuffs.Button:play(); | |
782 | end,ButtonData); | |
783 | end; | |
784 | return Button,Data; | |
785 | end; | |
786 | A.Functions.ResetChar=function(Victim) | |
787 | if(pcall(function()Victim:LoadCharacter(true);end)==false)then | |
788 | if(Victim.Character~=nil)then A.Functions.Remove(Victim.Character);end; | |
789 | Victim.Character=A.Old.Instance.NewObject('Humanoid',A.Old.Instance.NewObject('Model',A.Service.Workspace)).Parent; | |
790 | end; | |
791 | end; | |
792 | A.Functions.NukeChar=function(Char) | |
793 | if(A.Stuffs.CharThings==nil)then | |
794 | A.Stuffs.CharThings={ | |
795 | Parts={ | |
796 | ['Animate']='LocalScript'; | |
797 | ['Humanoid']='Humanoid'; | |
798 | ['Immortal']='Humanoid'; | |
799 | ['Right Arm']='Part'; | |
800 | ['Right Leg']='Part'; | |
801 | ['Left Arm']='Part'; | |
802 | ['Left Leg']='Part'; | |
803 | ['Torso']='Part'; | |
804 | }; | |
805 | Welds={ | |
806 | ['Right Shoulder']='Motor6D'; | |
807 | ['Left Shoulder']='Motor6D'; | |
808 | ['Right Hip']='Motor6D'; | |
809 | ['Left Hip']='Motor6D'; | |
810 | ['Neck']='Motor6D'; | |
811 | }; | |
812 | }; | |
813 | end; | |
814 | for i,v in next,Char:children()do | |
815 | if(v~=Char.PrimaryPart and(A.Stuffs.CharThings.Parts[v.Name]==v.className)==false)then | |
816 | A.Functions.Remove(v,true); | |
817 | end; | |
818 | end; | |
819 | for i,v in next,Char.Torso:children()do | |
820 | if((A.Stuffs.CharThings.Welds[v.Name]==v.className)==false)then | |
821 | A.Functions.Remove(v,true); | |
822 | end; | |
823 | end; | |
824 | end; | |
825 | A.Functions.Weld=function(Part0,Part1,C0,C1) | |
826 | Part1.CFrame=Part0.CFrame; | |
827 | local Weld=A.Old.Instance.NewObject('Motor',Part0); | |
828 | Weld.Part0=Part0; | |
829 | Weld.Part1=Part1; | |
830 | if(C0)then Weld.C0=C0;end; | |
831 | if(C1)then Weld.C1=C1;end; | |
832 | return Weld; | |
833 | end; | |
834 | A.Functions.Part=function(Properties,WeldProperties) | |
835 | local Part=A.Functions.Peace('Part',Properties); | |
836 | local Weld; | |
837 | if(WeldProperties)then | |
838 | if(WeldProperties.Part0)then Part.CFrame=WeldProperties.Part0;end; | |
839 | WeldProperties.Part1=Part; | |
840 | Weld=A.Functions.Peace('Motor',WeldProperties); | |
841 | end; | |
842 | return Part,Weld; | |
843 | end; | |
844 | A.Functions.GetWindow=function(Name) | |
845 | for Int=1,#A.User.Windows do | |
846 | if(A.User.Windows[Int].Name==Name)then | |
847 | return A.User.Windows[Int],Int; | |
848 | end;Int=nil; | |
849 | end; | |
850 | return nil; | |
851 | end; | |
852 | A.Functions.KillWindow=function(Name) | |
853 | local Type=type(Name); | |
854 | if(Type=='string'or Type=='table')then | |
855 | local Win,Int=Type=='table'and Name or A.Functions.GetWindow(Name); | |
856 | if(Win)then | |
857 | Win.SetVisible=false; | |
858 | A.Functions.All(Win.Title,function(Object) | |
859 | A.Functions.KillData(Object); | |
860 | A.Functions.Remove(Object,true); | |
861 | Object=nil; | |
862 | end); | |
863 | for i,v in next,Win do | |
864 | if(type(v)=='userdata')then | |
865 | v.Name='Over'; | |
866 | A.Functions.KillData(v); | |
867 | A.Functions.Remove(v,true); | |
868 | end; | |
869 | Win[i]=nil; | |
870 | end; | |
871 | if(Int~=nil)then | |
872 | table.remove(A.User.Windows,Int); | |
873 | end; | |
874 | end; | |
875 | elseif(Type=='boolean'and Name==true)then | |
876 | for Int=1,#A.User.Windows do | |
877 | A.Functions.KillWindow(A.User.Windows[Int].Name); | |
878 | end; | |
879 | end; | |
880 | end; | |
881 | A.Functions.GiveWindow=function(Name,Weight,Leight,Title) | |
882 | local Win; | |
883 | local Type=Name; | |
884 | if(Type~=false)then | |
885 | Win=A.Functions.GetWindow(Name)or{}; | |
886 | if(Win.Valid==true)then | |
887 | Win.SetVisible.Value=Win.SetVisible.Value==false; | |
888 | return nil; | |
889 | end; | |
890 | Win.Name=Name; | |
891 | Win.Valid=true; | |
892 | ||
893 | A.User.Windows[#A.User.Windows+1]=Win; | |
894 | else | |
895 | Win={}; | |
896 | end; | |
897 | ||
898 | Win.SetLeight=A.Functions.Value('Number',Leight,function(Value)Win.Frame.Size=A.Old.UDim2.new(1,0,0,Value);Value=nil;end); | |
899 | Win.SetWeight=A.Functions.Value('Number',Weight,function(Value)Win.Title.Size=A.Old.UDim2.new(0,Value,0,20);Value=nil;end); | |
900 | Win.SetVisible=A.Functions.Value('Bool',true,function(Value)Win.Title.Visible=Value;if(Win.VisibleChanged~=nil)then Win.VisibleChanged(Value);end;Value=nil;end); | |
901 | Win.SetTitle=A.Functions.Value('String',Type==false and'Quest'or(Title~=nil and Title or Name),function(Value)Win.TitleText.Text='Dresmor Ohgal - ['..Value..']';Value=nil;end); | |
902 | Win.NOPOM=A.Functions.Value('Number',0,function(Value)Win.Menu.Visible=(Value>0);Win.Menu.Size=A.Old.UDim2.new(1,0,0,(Value>0)and 20 or 0);if(Win.Frame)then Win.Frame.Position=A.Old.UDim2.new(0,0,0,(Value>0)and 20 or 0);end;Value=nil;end); | |
903 | ||
904 | Win.Title=A.Functions.Lock('TextButton',{ | |
905 | BackgroundTransparency=function()return A.Settings['Windows transparency'].Value==true and .5 or 0;end; | |
906 | Size=function()return A.Old.UDim2.new(0,Win.SetWeight.Value,0,20);end; | |
907 | Visible=function()return Win.SetVisible.Value;end; | |
908 | Parent=A.User.Frames.Windows; | |
909 | Draggable=true; | |
910 | Active=true; | |
911 | Text=''; | |
912 | },{ | |
913 | MouseButton1Down=function() | |
914 | A.Functions.Wait(); | |
915 | if(A.User.FirstWindow~=Win.Title)then | |
916 | A.User.FirstWindow=Win.Title; | |
917 | Win.Title.Parent=nil; | |
918 | end; | |
919 | end; | |
920 | } | |
921 | );A.User.FirstWindow=Win.Title; | |
922 | Win.TitleText=A.Functions.Lock('TextLabel',{ | |
923 | BackgroundTransparency=function()return A.Settings['Windows transparency'].Value==true and .5 or 0;end; | |
924 | Text=function()return'Dresmor Ohgal - ['..Win.SetTitle.Value..']';end; | |
925 | Position=A.Old.UDim2.new(0,20); | |
926 | Size=A.Old.UDim2.new(1,-60,1); | |
927 | BackgroundTransparency=1; | |
928 | Parent=Win.Title; | |
929 | TextXAlignment=0; | |
930 | TextWrap=true; | |
931 | FontSize=5; | |
932 | Font=1; | |
933 | } | |
934 | ); | |
935 | A.Functions.Lock('ImageLabel',{ | |
936 | Image=A.Data.BaseUrl..84386870; | |
937 | Size=A.Old.UDim2.ButtonSize; | |
938 | Parent=Win.Title; | |
939 | } | |
940 | ); | |
941 | Win.Close=A.Functions.Button('TextButton',{ | |
942 | BackgroundTransparency=function()return A.Settings['Windows transparency'].Value==true and .5 or 0;end; | |
943 | BackgroundColor3=A.Old.Color3.DarkRed; | |
944 | Position=A.Old.UDim2.new(1,-20); | |
945 | TextColor3=A.Old.Color3.Black; | |
946 | Size=A.Old.UDim2.ButtonSize; | |
947 | Parent=Win.Title; | |
948 | FontSize=5; | |
949 | Text='X'; | |
950 | Font=2; | |
951 | },function() | |
952 | A.Functions.KillWindow(Name==false and Win or Name); | |
953 | if(Name==false)then | |
954 | Win.Answer.Value=2; | |
955 | end; | |
956 | end | |
957 | ); | |
958 | if(Type~=false)then | |
959 | Win.Minimalize=A.Functions.Button('TextButton',{ | |
960 | BackgroundColor3=A.Old.Color3.Grey; | |
961 | Position=A.Old.UDim2.new(1,-40); | |
962 | TextColor3=A.Old.Color3.White; | |
963 | Size=A.Old.UDim2.ButtonSize; | |
964 | BackgroundTransparency=.5; | |
965 | Parent=Win.Title; | |
966 | FontSize=6; | |
967 | Text='_'; | |
968 | Font=2; | |
969 | },function() | |
970 | Win.SetVisible.Value=false; | |
971 | end | |
972 | ); | |
973 | end; | |
974 | Win.Menu=A.Functions.Lock('Frame',{ | |
975 | BackgroundTransparency=function()if(Win.NOPOM.Value<=0)then return 1;end;return A.Settings['Windows transparency'].Value==true and .5 or 0;end; | |
976 | Size=function()return A.Old.UDim2.new(1,0,0,(Win.NOPOM.Value>0)and 20 or 0);end; | |
977 | Position=A.Old.UDim2.new(0,0,1); | |
978 | Parent=Win.Title; | |
979 | },{ | |
980 | ChildAdded=function(Object) | |
981 | if(Object~=Win.Frame and A.Stuffs.Gui.PartOfGui[Object.className])then | |
982 | Win.NOPOM.Value=Win.NOPOM.Value+1; | |
983 | Win.Menu.BackgroundTransparency=0; | |
984 | end; | |
985 | end; | |
986 | ChildRemoved=function(Object) | |
987 | if(Object~=Win.Frame and A.Stuffs.Gui.PartOfGui[Object.className])then | |
988 | Win.NOPOM.Value=Win.NOPOM.Value-1; | |
989 | if(Win.NOPOM.Value<=0)then Win.Menu.BackgroundTransparency=0;end; | |
990 | end; | |
991 | end; | |
992 | } | |
993 | ); | |
994 | local Frame,FrameData=A.Functions.Lock('Frame',{ | |
995 | BackgroundTransparency=function()return A.Settings['Windows transparency'].Value==true and .5 or 0;end; | |
996 | Position=function()return A.Old.UDim2.new(0,0,0,(Win.NOPOM.Value>0)and 20 or 0);end; | |
997 | Size=function()return A.Old.UDim2.new(1,0,0,Win.SetLeight.Value);end; | |
998 | } | |
999 | ); | |
1000 | Win.Frame=Frame; | |
1001 | FrameData.Properties.Parent=function()return Win.Menu;end; | |
1002 | Win.Frame.Parent=Win.Menu; | |
1003 | ||
1004 | local NUM_; | |
1005 | Win.FixTransparency=function() | |
1006 | NUM_=A.Settings['Windows transparency'].Value==true and .5 or 0; | |
1007 | Win.TitleText.BackgroundTransparency=NUM_; | |
1008 | Win.Frame.BackgroundTransparency=NUM_; | |
1009 | Win.Close.BackgroundTransparency=NUM_; | |
1010 | Win.Title.BackgroundTransparency=NUM_; | |
1011 | Win.Menu.BackgroundTransparency=1; | |
1012 | end; | |
1013 | ||
1014 | coroutine.wrap(function() | |
1015 | while(Win.Valid==true and A.Functions.Check()==true)do | |
1016 | A.Settings['Windows transparency'].Changed:wait(); | |
1017 | if(Win.FixTransparency~=nil)then | |
1018 | Win.FixTransparency(); | |
1019 | end; | |
1020 | end; | |
1021 | end)(); | |
1022 | ||
1023 | return Win; | |
1024 | end; | |
1025 | A.Functions.Meter=function() | |
1026 | local Size=0; | |
1027 | for i,v in next,A.Stuffs.Meter do | |
1028 | for i,v in next,v do | |
1029 | i,v=nil;Size=Size+20; | |
1030 | end; | |
1031 | i,v=nil;Size=Size+20; | |
1032 | end; | |
1033 | local Win=A.Functions.GiveWindow('Meter',300,Size); | |
1034 | if(Win==nil)then return nil;end;local Num=0; | |
1035 | Win.Title.Position=A.Old.UDim2.new(.5,-150,0,40); | |
1036 | for i,v in next,A.Stuffs.Meter do | |
1037 | A.Functions.Lock('TextLabel',{ | |
1038 | Position=A.Old.UDim2.new(0,0,0,Num*20); | |
1039 | BackgroundColor3=A.Old.Color3.Grey; | |
1040 | Size=A.Old.UDim2.new(1,0,0,20); | |
1041 | TextColor3=A.Old.Color3.Green; | |
1042 | BackgroundTransparency=.8; | |
1043 | Text=i..' Things'; | |
1044 | Parent=Win.Frame; | |
1045 | TextXAlignment=0; | |
1046 | FontSize=2; | |
1047 | } | |
1048 | ); | |
1049 | Num=Num+1; | |
1050 | for Name,Object in next,v do Wait(); | |
1051 | for i=0,1 do | |
1052 | local Gui;Gui=A.Functions.Lock('TextLabel',{ | |
1053 | TextColor3=i==0 and A.Old.Color3.White or A.Old.Color3.Green; | |
1054 | Text=i==0 and Name or function()return Object.Value;end; | |
1055 | Position=A.Old.UDim2.new(i/2,0,0,Num*20); | |
1056 | Size=A.Old.UDim2.new(.5,0,0,20); | |
1057 | BackgroundTransparency=1; | |
1058 | TextXAlignment=0; | |
1059 | Parent=Win.Frame; | |
1060 | FontSize=1; | |
1061 | } | |
1062 | ); | |
1063 | if(i==1)then | |
1064 | coroutine.wrap(function() | |
1065 | while(Win.Valid==true)do | |
1066 | Gui.Text=Object.Value; | |
1067 | Object.Changed:wait(); | |
1068 | end; | |
1069 | end)(); | |
1070 | end; | |
1071 | end;Num=Num+1; | |
1072 | end; | |
1073 | end; | |
1074 | Win.VisibleChanged=function(Value) | |
1075 | A.Stuffs.MeterIsActive=Value;Value=nil; | |
1076 | end;A.Stuffs.MeterIsActive=true; | |
1077 | end; | |
1078 | A.Functions.QuestWindow=function(Text) | |
1079 | local Win=A.Functions.GiveWindow(false,300,200); | |
1080 | Win.Answer=A.Functions.Value'Number'; | |
1081 | ||
1082 | A.Functions.Lock('TextLabel',{ | |
1083 | BackgroundTransparency=1; | |
1084 | Size=A.Old.UDim2.Full; | |
1085 | Parent=Win.Frame; | |
1086 | TextYAlignment=0; | |
1087 | FontSize=3; | |
1088 | Text=Text; | |
1089 | } | |
1090 | ); | |
1091 | A.Functions.Button('TextButton',{ | |
1092 | Position=A.Old.UDim2.new(.5,-40,1,-25); | |
1093 | BackgroundColor3=A.Old.Color3.Grey; | |
1094 | Size=A.Old.UDim2.new(0,80,0,20); | |
1095 | Parent=Win.Frame; | |
1096 | Text='Okey'; | |
1097 | },function() | |
1098 | Win.Answer.Value=1; | |
1099 | A.Functions.KillWindow(Win); | |
1100 | end | |
1101 | ); | |
1102 | return Win.Answer.Changed:wait(); | |
1103 | end; | |
1104 | A.Functions.GetSpawnLocationCFrame=function() | |
1105 | local Spawn={}; | |
1106 | Spawn[1]=A.Old.CFrame.new(0,100,0); | |
1107 | A.Functions.All(A.Service.Workspace,function(Object) | |
1108 | if(Object.className=='SpawnLocation')then | |
1109 | Spawn[#Spawn+1]=Object.CFrame; | |
1110 | end;Object=nil; | |
1111 | end); | |
1112 | return Spawn[2]==nil and Spawn[1]or Spawn[math.random(2,#Spawn)]+A.Old.Vector3.Char; | |
1113 | end; | |
1114 | A.Functions.SettingsGui=function() | |
1115 | local Size=#A.SettingIDs; | |
1116 | local RealSize=Size; | |
1117 | Size=Size<10 and Size or 10; | |
1118 | local Win=A.Functions.GiveWindow('Settings',250,20*Size); | |
1119 | if(Win==nil)then return nil;end; | |
1120 | ||
1121 | Win.Title.Position=A.Old.UDim2.new(.5,-125,.5,-110); | |
1122 | ||
1123 | Win.Cells={}; | |
1124 | ||
1125 | Win.Fix=function() | |
1126 | for i=1,Size do | |
1127 | Win.Cells[i].SetTick.Value=A.SettingIDs[i].Object.Value; | |
1128 | Win.Cells[i].SetText.Value=A.SettingIDs[i].Name;i=nil; | |
1129 | end; | |
1130 | end; | |
1131 | ||
1132 | Win.Pos=A.Functions.Value('String',0,Win.Fix); | |
1133 | ||
1134 | if(RealSize>10)then | |
1135 | local Num; | |
1136 | local BS={ | |
1137 | '<';function() | |
1138 | Num=Win.Pos.Value-10 | |
1139 | if(Num>=0)then | |
1140 | Win.Pos.Value=Num; | |
1141 | end; | |
1142 | end; | |
1143 | 'Home';function()Win.Pos.Value=0;end; | |
1144 | '>';function() | |
1145 | Num=Win.Pos.Value+10; | |
1146 | if(Num>=RealSize)then | |
1147 | Win.Pos.Value=Num-(RealSize%10); | |
1148 | end; | |
1149 | end; | |
1150 | }; | |
1151 | local BSn=#BS/2; | |
1152 | local Num=0; | |
1153 | for i=1,BSn do | |
1154 | A.Functions.Button('TextButton',{ | |
1155 | Position=A.Old.UDim2.new((1/BSn)*(i-1),(2/BSn)/2,0,(2/BSn)/2); | |
1156 | Size=A.Old.UDim2.new(1/BSn,-2,1,-2); | |
1157 | BackgroundColor3=A.Old.Color3.Grey; | |
1158 | TextColor3=A.Old.Color3.Black; | |
1159 | BackgroundTransparency=.5; | |
1160 | Parent=Win.Menu; | |
1161 | Text=BS[i+Num]; | |
1162 | TextWrap=true; | |
1163 | FontSize=1; | |
1164 | },BS[i+Num+1] | |
1165 | );Num=Num+1; | |
1166 | end; | |
1167 | end; | |
1168 | ||
1169 | for Int=1,Size do | |
1170 | local Ints=Int+Win.Pos.Value; | |
1171 | local Cell={};Win.Cells[Int]=Cell; | |
1172 | local Setting=A.SettingIDs[Ints]~=nil and A.SettingIDs[Ints]; | |
1173 | ||
1174 | Cell.SetText=A.Functions.Value('String',A.SettingIDs[Ints]and A.SettingIDs[Ints].Name,function(Value)Cell.Label.Text=Value;Value=nil;end); | |
1175 | Cell.SetTick=A.Functions.Value('Bool',A.SettingIDs[Ints]and A.SettingIDs[Ints].Object.Value,function(Value)Cell.Button.BackgroundColor3=Value==true and A.Old.Color3.Green or A.Old.Color3.DarkRed;Value=nil;end); | |
1176 | ||
1177 | coroutine.wrap(function() | |
1178 | while(Win.Valid==true)do | |
1179 | Cell.SetTick.Value=Setting.Object.Changed:wait(); | |
1180 | end; | |
1181 | end)(); | |
1182 | ||
1183 | Cell.Label=A.Functions.Lock('TextLabel',{ | |
1184 | Visible=function()return Cell.SetText.Value~='';end; | |
1185 | Text=function()return Cell.SetText.Value;end; | |
1186 | Position=A.Old.UDim2.new(0,0,0,20*(Int-1)); | |
1187 | Size=A.Old.UDim2.new(1,-20,0,20); | |
1188 | BackgroundTransparency=1; | |
1189 | TextXAlignment=0; | |
1190 | Parent=Win.Frame; | |
1191 | FontSize=1; | |
1192 | } | |
1193 | ); | |
1194 | Cell.Button=A.Functions.Button('TextButton',{ | |
1195 | BackgroundColor3=function()return Cell.SetTick.Value==true and A.Old.Color3.Green or A.Old.Color3.DarkRed;end; | |
1196 | Position=A.Old.UDim2.new(1,-17.5,1,-17.5); | |
1197 | Size=A.Old.UDim2.new(0,15,0,15); | |
1198 | BackgroundTransparency=.5; | |
1199 | Parent=A.Functions.Lock('Frame', | |
1200 | { | |
1201 | BackgroundColor3=A.Old.Color3.Grey; | |
1202 | Size=A.Old.UDim2.ButtonSize; | |
1203 | Position=A.Old.UDim2.new(1); | |
1204 | BackgroundTransparency=.5; | |
1205 | Parent=Cell.Label; | |
1206 | } | |
1207 | ); | |
1208 | Text=''; | |
1209 | },function() | |
1210 | A.SettingIDs[Ints].Object.Value=A.SettingIDs[Ints].Object.Value==false; | |
1211 | end | |
1212 | ); | |
1213 | end; | |
1214 | end; | |
1215 | A.Functions.CreateCommand=function(Title,Commands,Description,Guide,MaxArguments,Function) | |
1216 | local New={};A.Commands[#A.Commands+1]=New; | |
1217 | New.Title=Title; | |
1218 | New.TrueCommands={}; | |
1219 | New.Function=Function; | |
1220 | New.Description=Description; | |
1221 | New.MaxArguments=MaxArguments; | |
1222 | New.Commands='"'..table.concat(Commands,'","')..'"'; | |
1223 | ||
1224 | for Signal,Value in next,A.Stuffs.GuideCommands do | |
1225 | Guide=Guide:gsub(Signal,A.Data.Step..Value);Signal,Value=nil; | |
1226 | end; | |
1227 | for i=1,#Commands do | |
1228 | New.TrueCommands[Commands[i]]=true; | |
1229 | end; | |
1230 | ||
1231 | New.Guide=A.Data.Start..Commands[1]..Guide; | |
1232 | end; | |
1233 | A.Functions.GetArguments=function(Text,Stepper,Max) | |
1234 | if(Max~=0)then | |
1235 | local New={}; | |
1236 | local Num=0; | |
1237 | local blind=false; | |
1238 | local blindText=''; | |
1239 | for i in Text:gmatch('([^'..Stepper..']+)')do | |
1240 | if(blind==false)then | |
1241 | blind=i:match'{b{'~=nil; | |
1242 | if(blind==true)then | |
1243 | i=i:gsub('{b{',''); | |
1244 | end; | |
1245 | end; | |
1246 | if(blind==false)then | |
1247 | Num=Num+1; | |
1248 | New[#New+1]=i;i=nil; | |
1249 | else | |
1250 | blindText=blindText..i..Stepper; | |
1251 | if(i:match'}b}'~=nil)then | |
1252 | blind=false; | |
1253 | Num=Num+1; | |
1254 | if(blindText:sub(#blindText,#blindText)==';')then | |
1255 | blindText=blindText:sub(1,#blindText-1); | |
1256 | end; | |
1257 | New[#New+1]=blindText:gsub('}b}','');i=nil; | |
1258 | blindText=''; | |
1259 | end; | |
1260 | end; | |
1261 | if(Num>=Max)then break;end; | |
1262 | end; | |
1263 | return New; | |
1264 | end;return A.Stuffs.NullTable; | |
1265 | end; | |
1266 | A.Functions.GetCommand=function(Command) | |
1267 | for i,v in next,A.Commands do | |
1268 | if(v.TrueCommands[Command]==true)then | |
1269 | return v,i; | |
1270 | end; | |
1271 | end; | |
1272 | end; | |
1273 | A.Functions.SearchCommand=function(Text) | |
1274 | local Command=Text:match(A.Data.Start..'(%w+)'); | |
1275 | if(Command==nil)then return'Command word is not found!';end; | |
1276 | Command=Command:lower(); | |
1277 | local FullText=Text:match(A.Data.Start..'%w+'..A.Data.Step..'(.+)')or''; | |
1278 | Text=FullText; | |
1279 | ||
1280 | local StuffsOfCommand=A.RecentCommands[Command]; | |
1281 | if(StuffsOfCommand==nil)then | |
1282 | local Number; | |
1283 | StuffsOfCommand,Number=A.Functions.GetCommand(Command); | |
1284 | if(StuffsOfCommand~=nil)then | |
1285 | A.RecentCommands[Command]={ | |
1286 | Function=function(...)A.Commands[Number].Function(...);end; | |
1287 | MaxArguments=StuffsOfCommand.MaxArguments; | |
1288 | }; | |
1289 | end; | |
1290 | end; | |
1291 | if(StuffsOfCommand==nil)then return'"'..Command..'" is not a valid member of library of the commands!';end; | |
1292 | ||
1293 | local Load,Error=A.Functions.Thread(function() | |
1294 | StuffsOfCommand.Function( | |
1295 | Text, | |
1296 | FullText, | |
1297 | A.Functions.GetArguments( | |
1298 | Text, | |
1299 | A.Data.Step, | |
1300 | StuffsOfCommand.MaxArguments | |
1301 | ) | |
1302 | ); | |
1303 | end); | |
1304 | ||
1305 | if(Load==false)then | |
1306 | return Error; | |
1307 | end; | |
1308 | ||
1309 | end; | |
1310 | A.Functions.Message=function(Type,Text,Time) | |
1311 | local Message=A.Functions.Peace('TextLabel',{ | |
1312 | Position=Type=='Message'and A.Old.UDim2.Pax or A.Old.UDim2.new(0,0,0,20*#A.User.Frames.Hints:children()); | |
1313 | Size=Type=='Hint'and A.Old.UDim2.new(1,0,0,20)or A.Old.UDim2.Full; | |
1314 | Text=Text:gsub([[']],A.Stuffs.AsciiChar[255]); | |
1315 | BackgroundColor3=A.Old.Color3.Black; | |
1316 | Parent=A.User.Frames[Type..'s']; | |
1317 | TextColor3=A.Old.Color3.Yellow; | |
1318 | BackgroundTransparency=.5; | |
1319 | BorderSizePixel=0; | |
1320 | FontSize=2; | |
1321 | Name=Type; | |
1322 | } | |
1323 | ); | |
1324 | Delay(Time or #Text/5,function() | |
1325 | A.Functions.Remove(Message,true); | |
1326 | if(Type=='Hint')then | |
1327 | for i,v in next,A.User.Frames.Hints:children()do | |
1328 | if(v.className=='TextLabel')then | |
1329 | v.Position=A.Old.UDim2.new(0,0,0,20*(i-1)); | |
1330 | end; | |
1331 | end; | |
1332 | end; | |
1333 | end); | |
1334 | end; | |
1335 | A.Functions.TransparencyContact=function(Table) | |
1336 | coroutine.wrap(function() | |
1337 | local Num=#Table; | |
1338 | local Data; | |
1339 | for i=1,Num do | |
1340 | i=Table[i]; | |
1341 | Data=A.Functions.GetData(i); | |
1342 | if(Data~=nil)then | |
1343 | Data.Properties.BackgroundTransparency=function()return A.Settings['Windows transparency'].Value==true and .5 or 0;end; | |
1344 | end; | |
1345 | i.BackgroundTransparency=A.Settings['Windows transparency'].Value==true and .5 or 0; | |
1346 | end; | |
1347 | local Function=function(Bool) | |
1348 | for i=1,Num do Table[i].BackgroundTransparency=Bool==true and .5 or 0;i=nil;end;Bool=nil; | |
1349 | end; | |
1350 | while(A.Functions.Check()==true)do | |
1351 | Function(A.Settings['Windows transparency'].Value); | |
1352 | A.Settings['Windows transparency'].Changed:wait(); | |
1353 | end; | |
1354 | end)(); | |
1355 | end; | |
1356 | A.Functions.CommandBar=function() | |
1357 | local Win=A.Functions.GiveWindow('Cmd',300,64); | |
1358 | if(Win==nil)then return nil;end;Win.Title.Position=A.Old.UDim2.new(0,0,.5,-100); | |
1359 | if(A.User.RecentCommands==nil)then | |
1360 | A.User.RecentCommands={}; | |
1361 | end; | |
1362 | ||
1363 | local NUM_,_NUM; | |
1364 | local BS={ | |
1365 | '<';function() | |
1366 | NUM_=Win.Pos.Value-Win.MaxCells; | |
1367 | if(NUM_>=0)then | |
1368 | Win.Pos.Value=NUM_; | |
1369 | end; | |
1370 | end; | |
1371 | '>';function() | |
1372 | _NUM=#A.User.RecentCommands; | |
1373 | if(_NUM<=Win.MaxCells)then return nil;end; | |
1374 | NUM_=Win.Pos.Value+Win.MaxCells; | |
1375 | if(NUM_>=_NUM)then | |
1376 | NUM_=_NUM-(_NUM%Win.MaxCells); | |
1377 | end; | |
1378 | Win.Pos.Value=NUM_; | |
1379 | end; | |
1380 | 'Clean';function() | |
1381 | A.User.RecentCommands={}; | |
1382 | Win.Pos.Value=0; | |
1383 | Win.Fix(); | |
1384 | end; | |
1385 | 'H/S';function() | |
1386 | Win.FixEnabled=Win.FixEnabled==false; | |
1387 | Win.Fix(); | |
1388 | end; | |
1389 | }; | |
1390 | local BSn=#BS/2; | |
1391 | ||
1392 | Win.Cells={}; | |
1393 | Win.MaxCells=8; | |
1394 | Win.FixEnabled=true; | |
1395 | ||
1396 | Win.Fix=function() | |
1397 | for Int=1,Win.MaxCells do | |
1398 | Win.Cells[Int].SetText.Value=A.User.RecentCommands[Int+Win.Pos.Value]or''; | |
1399 | Win.Cells[Int].Label.Visible=Win.FixEnabled; | |
1400 | end; | |
1401 | end; | |
1402 | ||
1403 | Win.Pos=A.Functions.Value('Number',0,Win.Fix); | |
1404 | ||
1405 | Win.Box=A.Functions.Lock('TextBox',{ | |
1406 | Parent=function()A.Functions.Wait()return Win.Frame end; | |
1407 | TextColor3=A.Old.Color3.Yellow; | |
1408 | BackgroundTransparency=1; | |
1409 | Size=A.Old.UDim2.Full; | |
1410 | TextXAlignment=0; | |
1411 | TextYAlignment=0; | |
1412 | FontSize=1; | |
1413 | },{ | |
1414 | FocusLost=function(Text) | |
1415 | Text=Win.Box.Text; | |
1416 | if(Text~=nil and(Text~=''and Text~='Click here to writting'))then | |
1417 | if(Text:sub(1,1)~=A.Data.Start)then Text=A.Data.Start..Text;end; | |
1418 | A.Functions.Wait(); | |
1419 | local Message=A.Functions.SearchCommand(Text); | |
1420 | if(Message~=nil)then A.Functions.Message('Hint',Message);return nil;end; | |
1421 | if(Win.FixEnabled==true and A~=nil)then | |
1422 | table.insert(A.User.RecentCommands,1,Text); | |
1423 | Win.Fix(); | |
1424 | end; | |
1425 | end;Text=nil; | |
1426 | end; | |
1427 | } | |
1428 | );Win.Box.Text='Click here to writting'; | |
1429 | ||
1430 | A.Functions.Lock('Frame',{ | |
1431 | BackgroundColor3=A.Old.Color3.Grey; | |
1432 | Position=A.Old.UDim2.new(0,0,1); | |
1433 | Size=A.Old.UDim2.new(1,0,0,5); | |
1434 | BackgroundTransparency=.5; | |
1435 | Parent=Win.Frame; | |
1436 | } | |
1437 | ); | |
1438 | ||
1439 | local Smg={}; | |
1440 | for Int=1,Win.MaxCells do | |
1441 | local Cell={};Win.Cells[#Win.Cells+1]=Cell; | |
1442 | ||
1443 | Cell.SetText=A.Functions.Value('String',A.User.RecentCommands[Int],function(Value)Cell.Label.Visible=Value~='';Cell.Label.Text=Win.Pos.Value+Int..'.) '..Value;Value=nil;end); | |
1444 | ||
1445 | Cell.Label=A.Functions.Button('TextButton',{ | |
1446 | Visible=function()if(Win.FixEnabled==false)then return false;else return Cell.SetText.Value~='';end;end; | |
1447 | Text=function()return Win.Pos.Value+Int..'.) '..Cell.SetText.Value;end; | |
1448 | Position=A.Old.UDim2.new(0,0,1,20*(Int-1)+5); | |
1449 | Size=A.Old.UDim2.new(1,0,0,20); | |
1450 | AutoButtonColor=true; | |
1451 | Parent=Win.Frame; | |
1452 | TextXAlignment=0; | |
1453 | FontSize=1; | |
1454 | },function() | |
1455 | A.Functions.SearchCommand(Cell.SetText.Value); | |
1456 | end | |
1457 | );Smg[Int]=Cell.Label; | |
1458 | end; | |
1459 | A.Functions.TransparencyContact(Smg); | |
1460 | ||
1461 | local Num=0; | |
1462 | local Asd={}; | |
1463 | for Int=1,BSn do | |
1464 | Asd[Int]=A.Functions.Button('TextButton',{ | |
1465 | Position=A.Old.UDim2.new(1/BSn*(Int-1),1,0,1); | |
1466 | Size=A.Old.UDim2.new(1/BSn,-2,1,-2); | |
1467 | BackgroundColor3=A.Old.Color3.Grey; | |
1468 | TextColor3=A.Old.Color3.Black; | |
1469 | Text=BS[Int+Num]; | |
1470 | Parent=Win.Menu; | |
1471 | FontSize=1; | |
1472 | },BS[Int+Num+1] | |
1473 | ); | |
1474 | Num=Num+1; | |
1475 | end; | |
1476 | A.Functions.TransparencyContact(Asd); | |
1477 | ||
1478 | end; | |
1479 | A.Functions.HelpGui=function() | |
1480 | local Win=A.Functions.GiveWindow('Help',400,400); | |
1481 | if(Win==nil)then return nil;end; | |
1482 | ||
1483 | local Ears={'Commands';'Players';'Signals';}; | |
1484 | ||
1485 | Win.Ears={}; | |
1486 | Win.NumOfEars=#Ears; | |
1487 | Win.NumberOfCommands=#A.Commands; | |
1488 | ||
1489 | local NUM; | |
1490 | local CCMD; | |
1491 | local TEXT=''; | |
1492 | Win.FixTutorial=function() | |
1493 | NUM=Win.Pos.Value+1; | |
1494 | CCMD=A.Commands[NUM]; | |
1495 | if(A.Stuffs.ForTutorialOfCommands==nil)then | |
1496 | A.Stuffs.ForTutorialOfCommands={'Title';'Description';'Commands';'Guide';}; | |
1497 | end; | |
1498 | for i,v in next,A.Stuffs.ForTutorialOfCommands do | |
1499 | TEXT=TEXT..v..': '..CCMD[v]..'\n\n\n';i,v=nil; | |
1500 | end; | |
1501 | TEXT=NUM..' of '..Win.NumberOfCommands..'\n\n\n'..TEXT; | |
1502 | Win.Ears[1].SetText.Value=TEXT;TEXT=''; | |
1503 | end; | |
1504 | ||
1505 | Win.Pos=A.Functions.Value('Number',0,function(Value)Win.FixTutorial();Value=nil;end); | |
1506 | Win.CurrentFrame=A.Functions.Value('String','Commands',function(Value) | |
1507 | for i=1,Win.NumOfEars do | |
1508 | Win.Ears[i].Frame.Visible=Value==Win.Ears[i].Name; | |
1509 | end; | |
1510 | end); | |
1511 | ||
1512 | local Smgs={}; | |
1513 | for Int,Name in next,Ears do | |
1514 | local Ear={};Win.Ears[#Win.Ears+1]=Ear; | |
1515 | ||
1516 | Ear.Name=Name; | |
1517 | ||
1518 | Ear.SetText=A.Functions.Value('String','',function(Value)Ear.Frame.Text=Value;Value=nil;end); | |
1519 | ||
1520 | Ear.Frame=A.Functions.Lock('TextLabel',{ | |
1521 | Visible=function()return Win.CurrentFrame.Value==Name;end; | |
1522 | Text=function()return Ear.SetText.Value;end; | |
1523 | BackgroundTransparency=1; | |
1524 | Position=A.Old.UDim2.Pax; | |
1525 | Size=A.Old.UDim2.Full; | |
1526 | TextXAlignment=0; | |
1527 | TextYAlignment=0; | |
1528 | Parent=Win.Frame; | |
1529 | FontSize=2; | |
1530 | } | |
1531 | ); | |
1532 | Ear.Ear=A.Functions.Button('TextButton',{ | |
1533 | Position=A.Old.UDim2.new(1/Win.NumOfEars*(Int-1),1.25,0,1.25); | |
1534 | Size=A.Old.UDim2.new(1/Win.NumOfEars,-2.5,1,-2.5); | |
1535 | BackgroundColor3=A.Old.Color3.Grey; | |
1536 | TextColor3=A.Old.Color3.Black; | |
1537 | Parent=Win.Menu; | |
1538 | FontSize=1; | |
1539 | Text=Name; | |
1540 | },function() | |
1541 | Win.CurrentFrame.Value=Name; | |
1542 | end | |
1543 | );Smgs[#Smgs+1]=Ear.Ear; | |
1544 | ||
1545 | if(Name=='Players')then | |
1546 | local Text=''; | |
1547 | for Int,Table in next,A.Calls do | |
1548 | Text=Text..Table.Description..': '..Table.Calls..'\n'..'\n'; | |
1549 | end; | |
1550 | Ear.SetText.Value=Text; | |
1551 | elseif(Name=='Signals')then | |
1552 | Ear.SetText.Value=[[The first signal what you need for run a command signal is "]]..A.Data.Start..'" :3'..'\n\n'..[[For arguments type this "]]..A.Data.Step..'"'..'\n\n'..[[To use blink argument (hard to tell my english not enough to this) "{b{" until "}b}" so {b{blah;blah;LAALla;;;;aolaL}b}]]; | |
1553 | elseif(Name=='Commands')then | |
1554 | Win.FixTutorial(); | |
1555 | for i=0,1 do | |
1556 | local Num=i==0 and-1 or 1; | |
1557 | local Plus; | |
1558 | Smgs[#Smgs+1]=A.Functions.Button('TextButton',{ | |
1559 | Position=A.Old.UDim2.new(i,i==1 and -20,1,-20); | |
1560 | BackgroundColor3=A.Old.Color3.Grey; | |
1561 | TextColor3=A.Old.Color3.Black; | |
1562 | Size=A.Old.UDim2.ButtonSize; | |
1563 | Parent=Win.Ears[1].Frame; | |
1564 | Text=i==0 and'<'or'>'; | |
1565 | FontSize=3; | |
1566 | },function() | |
1567 | Plus=Win.Pos.Value+Num; | |
1568 | if(Plus>=0 and Plus<Win.NumberOfCommands)then | |
1569 | Win.Pos.Value=Plus; | |
1570 | end; | |
1571 | end | |
1572 | ); | |
1573 | end; | |
1574 | end; | |
1575 | ||
1576 | end;A.Functions.TransparencyContact(Smgs); | |
1577 | ||
1578 | end; | |
1579 | A.Functions.GetBase=function() | |
1580 | for i,v in next,A.Service.Workspace:children()do | |
1581 | if(v.className=='Part'and v.Name=='Base')then | |
1582 | A.Functions.Remove(v,true); | |
1583 | end;i,v=nil; | |
1584 | end; | |
1585 | local Base=A.Old.Instance.NewObject'Part'; | |
1586 | Base.Name='Base'; | |
1587 | Base.Locked=true; | |
1588 | Base.Anchored=true; | |
1589 | Base.archivable=false; | |
1590 | Base.Size=A.Old.Vector3.new(555,2,555); | |
1591 | Base.BrickColor=A.Old.BrickColor.new'37'; | |
1592 | Base.Parent=A.Service.Workspace; | |
1593 | return Base; | |
1594 | end; | |
1595 | A.Functions.Clean=function() | |
1596 | local Base=A.Functions.GetBase(); | |
1597 | if(A.Stuffs.Shielded==nil)then | |
1598 | A.Stuffs.Shielded={ | |
1599 | HumanoidController=true; | |
1600 | Terrain=true; | |
1601 | Camera=true; | |
1602 | Player=true; | |
1603 | }; | |
1604 | end; | |
1605 | if(A.Stuffs.Banned_Services==nil)then | |
1606 | A.Stuffs.Banned_Services={ | |
1607 | NetworkClient=true; | |
1608 | CoreGui=true; | |
1609 | }; | |
1610 | end; | |
1611 | for i,v in next,Game:children()do | |
1612 | pcall(function() | |
1613 | if(A.Stuffs.Banned_Services[v.className]==nil)then | |
1614 | for i,v in next,v:children()do | |
1615 | if(v~=script and v~=Base and A.Stuffs.Shielded[v.className]~=true and A.Service.Players:GetPlayerFromCharacter(v)==nil)then | |
1616 | A.Functions.Remove(v,true); | |
1617 | end;i,v=nil; | |
1618 | end; | |
1619 | end; | |
1620 | end);i,v=nil; | |
1621 | end; | |
1622 | end; | |
1623 | A.Functions.ResetLighting=function() | |
1624 | local Lighting=A.Service.Lighting; | |
1625 | if(A.Stuffs.LightingBaseProperties==nil)then | |
1626 | A.Stuffs.LightingBaseProperties={ | |
1627 | ShadowColor=A.Old.Color3.new(.7,.7,.72); | |
1628 | FogColor=A.Old.Color3.new(.75,.75,.75); | |
1629 | ColorShift_Bottom=A.Old.Color3.Black; | |
1630 | GeographicLatitude=41.733299255371; | |
1631 | ColorShift_Top=A.Old.Color3.Black; | |
1632 | Ambient=A.Old.Color3.Grey; | |
1633 | Brightness=1; | |
1634 | FogEnd=1e6; | |
1635 | FogStart=0; | |
1636 | }; | |
1637 | end; | |
1638 | for i,v in next,A.Stuffs.LightingBaseProperties do | |
1639 | Lighting[i]=v;i,v=nil; | |
1640 | end; | |
1641 | pcall(Lighting.ClearAllChildren,Lighting); | |
1642 | end; | |
1643 | A.Functions.ExplorerGui=function() | |
1644 | local Win=A.Functions.GiveWindow('Explorer',440,400); | |
1645 | if(Win==nil)then | |
1646 | return nil; | |
1647 | end; | |
1648 | ||
1649 | Win.Frames={}; | |
1650 | ||
1651 | Win.CountThis=A.Functions.Value('Object',Game,function(Value) | |
1652 | if(Win.Frames.Explorer.SetPos.Value==0)then | |
1653 | Win.Frames.Explorer.Count(0,Value); | |
1654 | else | |
1655 | Win.Frames.Explorer.SetPos.Value=0; | |
1656 | end; | |
1657 | end); | |
1658 | Win.WatchingObject=A.Functions.Value('Object',Game,function(Value) | |
1659 | if(Win.Frames.Properties.SetPos.Value==0)then | |
1660 | Win.Frames.Properties.Count(0,Value); | |
1661 | else | |
1662 | Win.Frames.Properties.SetPos.Value=0; | |
1663 | end; | |
1664 | end); | |
1665 | ||
1666 | local Cnr={}; | |
1667 | ||
1668 | Win.History={Game;}; | |
1669 | Win.HistoryPos=1; | |
1670 | ||
1671 | for i=0,1 do | |
1672 | local Plus=i==0 and -1 or 1; | |
1673 | local Num; | |
1674 | Cnr[#Cnr+1]=A.Functions.Button('TextButton',{ | |
1675 | BackgroundColor3=A.Old.Color3.Blue; | |
1676 | Position=A.Old.UDim2.new(0,20*i); | |
1677 | TextColor3=A.Old.Color3.Black; | |
1678 | Text=i==0 and'<'or'>'; | |
1679 | Parent=Win.Menu; | |
1680 | FontSize=3; | |
1681 | },function() | |
1682 | Num=Win.HistoryPos+Plus; | |
1683 | if(Num<1 or Win.History[Num]==nil)then return nil;end; | |
1684 | Win.HistoryPos=Num; | |
1685 | Win.CountThis.Value=Win.History[Num]; | |
1686 | end | |
1687 | ); | |
1688 | end; | |
1689 | Win.HomeButton=A.Functions.Button('TextButton',{ | |
1690 | BackgroundColor3=A.Old.Color3.Green; | |
1691 | Position=A.Old.UDim2.new(0,40); | |
1692 | TextColor3=A.Old.Color3.Black; | |
1693 | Parent=Win.Menu; | |
1694 | Text='H'; | |
1695 | },function() | |
1696 | Win.CountThis.Value=Game; | |
1697 | Win.HistoryPos=1; | |
1698 | end | |
1699 | ); | |
1700 | Win.RefreshButton=A.Functions.Button('TextButton',{ | |
1701 | BackgroundColor3=A.Old.Color3.Grey; | |
1702 | Position=A.Old.UDim2.new(0,60); | |
1703 | TextColor3=A.Old.Color3.Black; | |
1704 | Parent=Win.Menu; | |
1705 | Text='R'; | |
1706 | },function() | |
1707 | Win.Frames.Explorer.Count(0,Win.CountThis.Value); | |
1708 | end | |
1709 | ); | |
1710 | Win.RemoveButton=A.Functions.Button('TextButton',{ | |
1711 | BackgroundColor3=A.Old.Color3.Grey; | |
1712 | Position=A.Old.UDim2.new(0,80); | |
1713 | TextColor3=A.Old.Color3.Black; | |
1714 | Parent=Win.Menu; | |
1715 | Text='K'; | |
1716 | },function() | |
1717 | for i,v in next,Win.Frames.Explorer.Selected do | |
1718 | if(#v~=0)then | |
1719 | for i,v in next,v do | |
1720 | A.Functions.Remove(v); | |
1721 | end; | |
1722 | end; | |
1723 | end; | |
1724 | end | |
1725 | ); | |
1726 | ||
1727 | for i=0,1 do | |
1728 | local Name=i==0 and'Explorer'or'Properties'; | |
1729 | local this={}; | |
1730 | this.Cells={}; | |
1731 | ||
1732 | this.SetPos=A.Functions.Value('Number',0,function(Value) | |
1733 | this.PosChanged(Value); | |
1734 | end); | |
1735 | ||
1736 | this.Frame=A.Functions.Lock('Frame',{ | |
1737 | Size=A.Old.UDim2.new(.5,-20,1); | |
1738 | Position=A.Old.UDim2.new(i/2); | |
1739 | BackgroundTransparency=1; | |
1740 | Parent=Win.Frame; | |
1741 | } | |
1742 | ); | |
1743 | this.ScrollFrame=A.Functions.Lock('Frame',{ | |
1744 | BackgroundColor3=A.Old.Color3.White; | |
1745 | Size=A.Old.UDim2.new(0,20,1); | |
1746 | Position=A.Old.UDim2.new(1); | |
1747 | BackgroundTransparency=.5; | |
1748 | Parent=this.Frame; | |
1749 | } | |
1750 | ); | |
1751 | Cnr[#Cnr+1]=this.ScrollFrame; | |
1752 | ||
1753 | for i=0,1 do | |
1754 | local Plus=i==0 and-20 or 20; | |
1755 | local Num; | |
1756 | Cnr[#Cnr+1]=A.Functions.Button('TextButton',{ | |
1757 | Position=A.Old.UDim2.new(0,0,i,i==1 and-20); | |
1758 | BackgroundColor3=A.Old.Color3.Grey; | |
1759 | Size=A.Old.UDim2.ButtonSize; | |
1760 | Text=i==0 and'/\\'or'\\/'; | |
1761 | Parent=this.ScrollFrame; | |
1762 | AutoButtonColor=true; | |
1763 | FontSize=3; | |
1764 | },function() | |
1765 | Num=this.SetPos.Value+Plus; | |
1766 | if(Num<0)then | |
1767 | Num=0; | |
1768 | end; | |
1769 | if(Num>=this.Max)then | |
1770 | Num=this.Max-(this.Max%20); | |
1771 | end; | |
1772 | this.SetPos.Value=Num; | |
1773 | end | |
1774 | ); | |
1775 | end; | |
1776 | ||
1777 | ||
1778 | if(i==0)then--Explorer | |
1779 | ||
1780 | this.CountThis=Win.CountThis; | |
1781 | ||
1782 | this.Selected={}; | |
1783 | this.FreeBoxes={}; | |
1784 | ||
1785 | this.Count=function(From,Object) | |
1786 | local Parts=Object:children(); | |
1787 | if(#Parts==0)then return nil;end; | |
1788 | this.Max=#Parts; | |
1789 | ||
1790 | ||
1791 | local Asd; | |
1792 | local i=1; | |
1793 | local Object2; | |
1794 | local NotGood=0; | |
1795 | ||
1796 | while(i<21)do | |
1797 | Asd=From+i+NotGood; | |
1798 | Object2=Parts[Asd]; | |
1799 | if(Object2==nil or pcall(function()return Object2:IsA'';end)==true)then | |
1800 | this.Cells[i].SetObject.Value=Object2; | |
1801 | i=i+1; | |
1802 | else | |
1803 | NotGood=NotGood+1; | |
1804 | end; | |
1805 | end; | |
1806 | ||
1807 | end; | |
1808 | this.PosChanged=function(Value) | |
1809 | this.Count(Value,this.CountThis.Value); | |
1810 | end; | |
1811 | ||
1812 | for i=1,20 do | |
1813 | local Cell={};this.Cells[#this.Cells+1]=Cell; | |
1814 | ||
1815 | Cell.GetPos=function()return this.SetPos.Value+i;end; | |
1816 | ||
1817 | Cell.SetText=A.Functions.Value('String','N/A',function(Value) | |
1818 | Cell.Text.Text=Value; | |
1819 | end); | |
1820 | Cell.SetObject=A.Functions.Value('Object',nil,function(Value) | |
1821 | ||
1822 | if(Value~=nil)then | |
1823 | Cell.SetSelect.Value=Value:FindFirstChild'Ohgal_Selection'~=nil; | |
1824 | Cell.SetText.Value=Value.Name..' ('..Value.className..')'; | |
1825 | Cell.Number.Text=Cell.GetPos(); | |
1826 | end; | |
1827 | ||
1828 | Cell.Frame.Visible=Value~=nil or false; | |
1829 | ||
1830 | end); | |
1831 | Cell.SetSelect=A.Functions.Value('Bool',false,function(Value) | |
1832 | Cell.Selector.BackgroundColor3=Value==true and A.Old.Color3.Green or A.Old.Color3.Red; | |
1833 | local Object=Cell.SetObject.Value; | |
1834 | if(Value==false)then | |
1835 | local Selector=Object:FindFirstChild'Ohgal_Selection'; | |
1836 | if(Selector~=nil)then | |
1837 | Selector.Parent=nil; | |
1838 | this.FreeBoxes[#this.FreeBoxes+1]=Selector; | |
1839 | end; | |
1840 | else | |
1841 | local ThisAdded; | |
1842 | local Selector=Object:FindFirstChild'Ohgal_Selection'or this.FreeBoxes[1]or A.Old.Instance.NewObject'BindableEvent'; | |
1843 | if(Selector==this.FreeBoxes[1])then | |
1844 | table.remove(this.FreeBoxes,1); | |
1845 | end; | |
1846 | ||
1847 | Selector.Name='Ohgal_Selection'; | |
1848 | Selector.archivable=false; | |
1849 | Selector.Parent=Object; | |
1850 | ||
1851 | ||
1852 | local Box; | |
1853 | if(Object:IsA'Model'or Object:IsA'Part')then | |
1854 | Box=A.Old.Instance.NewObject('SelectionBox',this.Frame); | |
1855 | Box.Adornee=Object; | |
1856 | end; | |
1857 | ||
1858 | if(this.Selected[Object.className]==nil)then | |
1859 | this.Selected[Object.className]={}; | |
1860 | else | |
1861 | for i,v in next,this.Selected[Object.className]do | |
1862 | if(v==Object)then | |
1863 | ThisAdded=true; | |
1864 | table.remove(this.Selected[Object.className],i);break; | |
1865 | end; | |
1866 | end; | |
1867 | end; | |
1868 | this.Selected[Object.className][#this.Selected[Object.className]+1]=Object; | |
1869 | ||
1870 | if(ThisAdded==nil)then | |
1871 | local Kill=function() | |
1872 | Selector.Parent=nil; | |
1873 | this.FreeBoxes[#this.FreeBoxes+1]=Selector; | |
1874 | if(Box~=nil)then Box.Adornee=nil;Box.Parent=nil;end; | |
1875 | for i,v in next,this.Selected[Object.className]do | |
1876 | if(v==Object)then | |
1877 | table.remove(this.Selected[Object.className],i);break; | |
1878 | end; | |
1879 | end; | |
1880 | end; | |
1881 | A.Functions.Thread(function() | |
1882 | while(Selector.Parent~=nil)do Selector.Changed:wait();end; | |
1883 | Kill(); | |
1884 | end); | |
1885 | A.Functions.Thread(function() | |
1886 | while(Object.Parent~=nil)do Object.Changed:wait();end; | |
1887 | Kill(); | |
1888 | end); | |
1889 | end; | |
1890 | end; | |
1891 | end); | |
1892 | ||
1893 | ||
1894 | Cell.Frame=A.Functions.Lock('Frame',{ | |
1895 | Position=A.Old.UDim2.new(0,0,0,i~=1 and 20*(i-1)+1 or 1); | |
1896 | Visible=function()return Cell.SetObject.Value~=nil;end; | |
1897 | Size=A.Old.UDim2.new(1,0,0,18); | |
1898 | BackgroundTransparency=1; | |
1899 | Parent=this.Frame; | |
1900 | } | |
1901 | ); | |
1902 | ||
1903 | Cell.Selector=A.Functions.Button('ImageButton',{ | |
1904 | BackgroundColor3=function()return Cell.SetSelect.Value==true and A.Old.Color3.Green or A.Old.Color3.Red;end; | |
1905 | Size=A.Old.UDim2.new(0,20,1); | |
1906 | Position=A.Old.UDim2.Pax; | |
1907 | Parent=Cell.Frame; | |
1908 | },function() | |
1909 | Cell.SetSelect.Value=Cell.SetSelect.Value==false; | |
1910 | end | |
1911 | ); | |
1912 | Cnr[#Cnr+1]=Cell.Selector; | |
1913 | ||
1914 | Cell.Number=A.Functions.Lock('TextLabel',{ | |
1915 | BackgroundColor3=A.Old.Color3.Grey; | |
1916 | Position=A.Old.UDim2.new(0,20); | |
1917 | Size=A.Old.UDim2.new(0,20,1); | |
1918 | Parent=Cell.Frame; | |
1919 | Text=Cell.GetPos; | |
1920 | FontSize=1; | |
1921 | } | |
1922 | ); | |
1923 | Cnr[#Cnr+1]=Cell.Number; | |
1924 | ||
1925 | local TimeOut=0; | |
1926 | Cell.Text=A.Functions.Button('TextButton',{ | |
1927 | Text=function()return Cell.SetText.Value;end; | |
1928 | BackgroundColor3=A.Old.Color3.White; | |
1929 | Position=A.Old.UDim2.new(0,40); | |
1930 | TextColor3=A.Old.Color3.Black; | |
1931 | Size=A.Old.UDim2.new(1,-40,1); | |
1932 | AutoButtonColor=true; | |
1933 | Parent=Cell.Frame; | |
1934 | TextXAlignment=0; | |
1935 | FontSize=1; | |
1936 | },function() | |
1937 | if(TimeOut==1)then | |
1938 | Win.HistoryPos=Win.HistoryPos+1; | |
1939 | Win.History[Win.HistoryPos]=Cell.SetObject.Value; | |
1940 | Win.History[Win.HistoryPos+1]=nil; | |
1941 | this.CountThis.Value=Cell.SetObject.Value; | |
1942 | else | |
1943 | TimeOut=1; | |
1944 | ||
1945 | Win.WatchingObject.Value=Cell.SetObject.Value; | |
1946 | ||
1947 | Delay(.2,function() | |
1948 | TimeOut=0; | |
1949 | end); | |
1950 | end; | |
1951 | end | |
1952 | ); | |
1953 | Cnr[#Cnr+1]=Cell.Text; | |
1954 | ||
1955 | end; | |
1956 | ||
1957 | else--Properties | |
1958 | ||
1959 | this.Count=function(From,Object) | |
1960 | ||
1961 | if(this._ThisBox~=nil)then | |
1962 | this._ThisBox.Parent=nil; | |
1963 | end; | |
1964 | ||
1965 | local Table=A.Functions.GetProperties(Object,true); | |
1966 | this.Max=#Table; | |
1967 | ||
1968 | if(From<=4)then | |
1969 | this.Cells[1].SetProperty.Value='Name'; | |
1970 | this.Cells[1].Fix(); | |
1971 | ||
1972 | this.Cells[2].SetProperty.Value='Parent'; | |
1973 | this.Cells[2].Fix(); | |
1974 | ||
1975 | this.Cells[3].SetProperty.Value='className'; | |
1976 | this.Cells[3].Fix(); | |
1977 | ||
1978 | this.Cells[4].SetProperty.Value='archivable'; | |
1979 | this.Cells[4].Fix(); | |
1980 | ||
1981 | for i=5,20 do | |
1982 | this.Cells[i].SetProperty.Value=Table[(i-4)+From]or''; | |
1983 | this.Cells[i].Fix(); | |
1984 | end; | |
1985 | else | |
1986 | for i=1,20 do | |
1987 | this.Cells[i].SetProperty.Value=Table[i+From]or''; | |
1988 | this.Cells[i].Fix(); | |
1989 | end; | |
1990 | end; | |
1991 | end; | |
1992 | this.PosChanged=function(Value) | |
1993 | this.Count(Value,Win.WatchingObject.Value); | |
1994 | end; | |
1995 | ||
1996 | this.TextBox=function(ALALOLUBU)--ROFL | |
1997 | if(pcall(function()this._ThisBox.Parent=ALALOLUBU;this._ThisBox.Text=ALALOLUBU.Text;end)==false)then | |
1998 | this._ThisBox=A.Functions.Peace('TextBox',{ | |
1999 | BackgroundColor3=A.Old.Color3.White; | |
2000 | TextColor3=A.Old.Color3.Black; | |
2001 | Size=A.Old.UDim2.Full; | |
2002 | Text=ALALOLUBU.Text; | |
2003 | BorderSizePixel=0; | |
2004 | Parent=ALALOLUBU; | |
2005 | TextXAlignment=0; | |
2006 | FontSize=1; | |
2007 | } | |
2008 | ); | |
2009 | end; | |
2010 | Delay(0,function()pcall(function()this._ThisBox:CaptureFocus();end);end); | |
2011 | this._ThisBox.FocusLost:wait(); | |
2012 | this._ThisBox.Parent=nil; | |
2013 | A.Functions.Thread(function() | |
2014 | Win.WatchingObject.Value[this.SetProperty]=loadstring('return '..this._ThisBox.Text)(); | |
2015 | end); | |
2016 | end; | |
2017 | ||
2018 | for i=1,20 do | |
2019 | local Cell={};this.Cells[#this.Cells+1]=Cell; | |
2020 | ||
2021 | Cell.SetProperty=A.Functions.Value('String','',function(Value) | |
2022 | Cell.Frame.Visible=Value~=''; | |
2023 | end); | |
2024 | ||
2025 | Cell.Fix=function() | |
2026 | if(Cell.SetProperty.Value~='')then | |
2027 | Cell.Property.Text=Cell.SetProperty.Value..' '; | |
2028 | Cell.Property.Size=A.Old.UDim2.new(0,Cell.Property.TextBounds.X,1); | |
2029 | ||
2030 | Cell.ValueButton.Position=A.Old.UDim2.new(0,Cell.Property.Size.X.Offset); | |
2031 | Cell.ValueButton.Size=A.Old.UDim2.new(1,-Cell.Property.Size.X.Offset,1); | |
2032 | Cell.ValueButton.Text=tostring(Win.WatchingObject.Value[Cell.SetProperty.Value]); | |
2033 | end; | |
2034 | end; | |
2035 | ||
2036 | ||
2037 | Cell.Frame=A.Functions.Lock('Frame',{ | |
2038 | Position=A.Old.UDim2.new(0,0,0,i~=1 and 20*(i-1)+1 or 1); | |
2039 | Visible=function()return Cell.SetProperty.Value~='';end; | |
2040 | Size=A.Old.UDim2.new(1,0,0,18); | |
2041 | BackgroundTransparency=1; | |
2042 | Parent=this.Frame; | |
2043 | } | |
2044 | ); | |
2045 | ||
2046 | Cell.Property=A.Functions.Lock('TextLabel',{ | |
2047 | Size=function()return Cell.Property~=nil and A.Old.UDim2.new(0,Cell.Property.TextBounds.X,1)or A.Old.UDim2.Pax;end; | |
2048 | Text=function()return Cell.SetProperty.Value..' ';end; | |
2049 | BackgroundColor3=A.Old.Color3.DarkRed; | |
2050 | TextWrapped=false; | |
2051 | Parent=Cell.Frame; | |
2052 | TextWrap=false; | |
2053 | FontSize=1; | |
2054 | } | |
2055 | ); | |
2056 | Cnr[#Cnr+1]=Cell.Property; | |
2057 | ||
2058 | Cell.ValueButton=A.Functions.Button('TextButton',{ | |
2059 | Text=function()return(Cell.SetProperty.Value~=''and Win.WatchingObject.Value~=nil)and tostring(Win.WatchingObject.Value[Cell.SetProperty.Value])or'';end; | |
2060 | Position=function()return A.Old.UDim2.new(0,Cell.Property.Size.X.Offset);end; | |
2061 | Size=function()return A.Old.UDim2.new(1,-Cell.Property.Size.X.Offset,1);end; | |
2062 | Parent=Cell.Frame; | |
2063 | TextXAlignment=0; | |
2064 | FontSize=1; | |
2065 | },function() | |
2066 | this.SetProperty=Cell.SetProperty.Value; | |
2067 | this.TextBox(Cell.ValueButton);Wait(); | |
2068 | Cell.ValueButton.Text=tostring(Win.WatchingObject.Value[Cell.SetProperty.Value]); | |
2069 | end | |
2070 | ); | |
2071 | Cnr[#Cnr+1]=Cell.ValueButton; | |
2072 | ||
2073 | end; | |
2074 | ||
2075 | end;--Properties end; | |
2076 | ||
2077 | this.Count(0,Game); | |
2078 | ||
2079 | ||
2080 | Win.Frames[Name]=this; | |
2081 | end; | |
2082 | ||
2083 | A.Functions.TransparencyContact(Cnr); | |
2084 | ||
2085 | end; | |
2086 | A.Functions.AddKey=function(Key,Function) | |
2087 | if(A.Stuffs.Security==true)then | |
2088 | if(A.KeyCommands[Key]==nil)then A.KeyCommands[Key]={};end; | |
2089 | A.KeyCommands[#A.KeyCommands+1]=Function; | |
2090 | A.Service.GuiService.AddKey(Key); | |
2091 | Key,Function=nil; | |
2092 | end; | |
2093 | end; | |
2094 | A.Functions.DoKeyCommand=function(Key) | |
2095 | if(A.KeyCommands[Key]~=nil)then | |
2096 | for Int=1,#A.KeyCommands[Key]do | |
2097 | A.KeyCommands[Key][Int](); | |
2098 | Int=nil; | |
2099 | end; | |
2100 | end;Key=nil; | |
2101 | end; | |
2102 | A.Functions.Heal=function(Corpse)--From first Local Admin :3 | |
2103 | if(Corpse)then | |
2104 | local Humanoid=A.Functions.FindObject(Corpse,'className','Humanoid'); | |
2105 | if(Humanoid==nil)then | |
2106 | return nil; | |
2107 | else | |
2108 | if(Humanoid.Health<=0)then | |
2109 | return nil; | |
2110 | end; | |
2111 | Humanoid.Health=Humanoid.MaxHealth | |
2112 | end; | |
2113 | for i,v in next,A.Data.CharacterLimbs do | |
2114 | if(Corpse:FindFirstChild(i)==nil)then | |
2115 | local Limb=A.Functions.Peace('Part',{ | |
2116 | CanCollide=false; | |
2117 | BottomSurface=0; | |
2118 | Parent=Corpse; | |
2119 | TopSurface=0; | |
2120 | formFactor=0; | |
2121 | Size=v.Size; | |
2122 | Name=i; | |
2123 | }); | |
2124 | if(v.C0 and v.C1)then | |
2125 | local Weld=A.Old.Instance.NewObject('Motor6D',Corpse:FindFirstChild'Torso'); | |
2126 | if(Weld.Parent)then | |
2127 | Limb.Position=Weld.Parent.Position; | |
2128 | Weld.Name=v.Name; | |
2129 | Weld.Part0=Weld.Parent; | |
2130 | Weld.Part1=Limb; | |
2131 | Weld.C0=v.C0; | |
2132 | Weld.C1=v.C1; | |
2133 | Weld.MaxVelocity=.1; | |
2134 | end; | |
2135 | Weld=nil; | |
2136 | end; | |
2137 | Limb,i,v=nil; | |
2138 | end; | |
2139 | i,v=nil; | |
2140 | end; | |
2141 | local Skin=Corpse:FindFirstChild'Body Colors'; | |
2142 | if(Skin~=nil)then | |
2143 | Skin.Parent=nil; | |
2144 | Skin.Parent=Corpse; | |
2145 | end; | |
2146 | local Animate=Corpse:FindFirstChild'Animate'; | |
2147 | if(Animate~=nil)then | |
2148 | Animate.Parent=nil; | |
2149 | Animate.Parent=Corpse; | |
2150 | end; | |
2151 | end; | |
2152 | end; | |
2153 | A.Functions.CreateWeld=function(Part0,Part1,C0,C1) | |
2154 | local Weld=A.Old.Instance.NewObject('Motor',Part0); | |
2155 | Weld.Part0=Part0; | |
2156 | Weld.Part1=Part1; | |
2157 | if(C0~=nil)then | |
2158 | Weld.C0=C0; | |
2159 | end; | |
2160 | if(C1~=nil)then | |
2161 | Weld.C1=C1; | |
2162 | end; | |
2163 | return Weld; | |
2164 | end; | |
2165 | A.Functions.MemeGui=function() | |
2166 | local Win=A.Functions.GiveWindow('Memes',300,300); | |
2167 | if(Win==nil)then | |
2168 | return nil; | |
2169 | end; | |
2170 | ||
2171 | Win.Title.Position=A.Old.UDim2.new(.5,-150); | |
2172 | ||
2173 | Win.SetPos=A.Functions.Value('Number',0,function(Value) | |
2174 | Win.Status.Text=Value; | |
2175 | Win.Image.Image=Value; | |
2176 | end); | |
2177 | ||
2178 | ||
2179 | Win.Memes={};local Num=0; | |
2180 | for i,v in next,A.Images.Meme do Num=Num+1;--[[Num+=1; don't work :'( ]] | |
2181 | Win.Memes[Num]={Name=i;ID=v;}; | |
2182 | end;Win.NumMemes=#Win.Memes; | |
2183 | ||
2184 | Win.Status=A.Functions.Lock('TextLabel',{ | |
2185 | Text=function()return 1+Win.SetPos.Value..' of '..Win.NumMemes..': '..Win.Memes[Win.SetPos.Value+1].Name..' ('..Win.Memes[Win.SetPos.Value+1].ID..')';end; | |
2186 | Position=A.Old.UDim2.new(0,20); | |
2187 | Size=A.Old.UDim2.new(1,-40,1); | |
2188 | TextColor3=A.Old.Color3.White; | |
2189 | BackgroundTransparency=1; | |
2190 | Parent=Win.Menu; | |
2191 | FontSize=2; | |
2192 | } | |
2193 | ); | |
2194 | Win.Image=A.Functions.Lock('ImageLabel',{ | |
2195 | Image=function()return A.Data.BaseUrl..Win.Memes[Win.SetPos.Value+1].ID;end; | |
2196 | Position=A.Old.UDim2.Pax; | |
2197 | Size=A.Old.UDim2.Full; | |
2198 | Parent=Win.Frame; | |
2199 | } | |
2200 | ); | |
2201 | ||
2202 | local Cnr={}; | |
2203 | local Num; | |
2204 | for i=0,1 do | |
2205 | local Plus=i==0 and -1 or 1; | |
2206 | Cnr[#Cnr+1]=A.Functions.Button('TextButton',{ | |
2207 | Position=A.Old.UDim2.new(i,i==1 and -20); | |
2208 | BackgroundColor3=A.Old.Color3.Grey; | |
2209 | TextColor3=A.Old.Color3.Black; | |
2210 | Size=A.Old.UDim2.new(0,20,1); | |
2211 | Text=i==0 and'<'or'>'; | |
2212 | Parent=Win.Menu; | |
2213 | FontSize=2; | |
2214 | },function() | |
2215 | Num=Win.SetPos.Value+Plus; | |
2216 | if(Num>=Win.NumMemes)then | |
2217 | Num=0; | |
2218 | end; | |
2219 | if(Num<0)then | |
2220 | Num=Win.NumMemes-1; | |
2221 | end; | |
2222 | Win.SetPos.Value=Num; | |
2223 | end | |
2224 | ); | |
2225 | A.Functions.Button('TextButton',{ | |
2226 | TextColor3=i==0 and A.Old.Color3.White or A.Old.Color3.DarkRed; | |
2227 | Position=A.Old.UDim2.new(i/2,0,1,-20); | |
2228 | Size=A.Old.UDim2.new(.5,0,0,20); | |
2229 | Text=i==0 and'Wear'or'Drop'; | |
2230 | BackgroundTransparency=1; | |
2231 | TextStrokeTransparency=0; | |
2232 | Parent=Win.Frame; | |
2233 | FontSize=3; | |
2234 | },i==0 and function() | |
2235 | A.Functions.MakeMeme(Win.Memes[Win.SetPos.Value+1].ID,A.User.C.Character); | |
2236 | end or function() | |
2237 | A.Functions.MakeMeme('reset!',A.User.C.Character); | |
2238 | end | |
2239 | ); | |
2240 | end; | |
2241 | ||
2242 | A.Functions.TransparencyContact(Cnr); | |
2243 | ||
2244 | end; | |
2245 | A.Functions.SettingWait=function(Name,Bool) | |
2246 | if(A.Settings[Name].Value~=Bool)then | |
2247 | A.Settings[Name].Changed:wait(); | |
2248 | end; | |
2249 | return A.Settings[Name]; | |
2250 | end; | |
2251 | A.Functions.FindWithOutside=function(Start,End) | |
2252 | local Type=type(End); | |
2253 | if(Type=='userdata')then | |
2254 | local Stepped=0; | |
2255 | if(Start.Parent~=End)then | |
2256 | while(Start.Parent~=End and Stepped<50)do | |
2257 | Start=Start.Parent; | |
2258 | Stepped=Stepped+1; | |
2259 | end; | |
2260 | end; | |
2261 | elseif(Type=='string')then | |
2262 | local Stepped=0; | |
2263 | if(Start.Parent.className~=End)then | |
2264 | while(Start.Parent.className~=End and Stepped<50)do | |
2265 | Start=Start.Parent; | |
2266 | Stepped=Stepped+1; | |
2267 | end; | |
2268 | end; | |
2269 | end; | |
2270 | ||
2271 | return Start; | |
2272 | end; | |
2273 | A.Functions.ResizeChar=function(Char,Plus_Size) | |
2274 | local Torso=Char.Torso; | |
2275 | ||
2276 | Torso.Anchored=true; | |
2277 | Torso.BottomSurface=0; | |
2278 | Torso.TopSurface=0; | |
2279 | ||
2280 | A.Functions.Remove(Char:FindFirstChild'Shirt',true); | |
2281 | A.Functions.Remove(Char:FindFirstChild'Pants',true); | |
2282 | ||
2283 | local Virus=Char:FindFirstChild'Shirt Graphic'; | |
2284 | if(Virus~=nil)then | |
2285 | Virus:Destroy(); | |
2286 | end; | |
2287 | ||
2288 | local Welds={}; | |
2289 | local Change;Change=function(Object) | |
2290 | for i,Weld in next,Object:children()do | |
2291 | if(Weld.className=='Weld'or Weld.className=='Motor'or Weld.className=='Motor6D')then | |
2292 | local Part=Weld.Part1; | |
2293 | ||
2294 | Part.Anchored=true; | |
2295 | ||
2296 | Weld.Part1=nil; | |
2297 | ||
2298 | local r01,r02,r03,r04,r05,r06,r07,r08,r09,r10,r11,r12=Weld.C0:components(); | |
2299 | Weld.C0=A.Old.CFrame.new(r01*Plus_Size,r02*Plus_Size,r03*Plus_Size,r04,r05,r06,r07,r08,r09,r10,r11,r12); | |
2300 | local r01,r02,r03,r04,r05,r06,r07,r08,r09,r10,r11,r12=Weld.C1:components(); | |
2301 | Weld.C1=A.Old.CFrame.new(r01*Plus_Size,r02*Plus_Size,r03*Plus_Size,r04,r05,r06,r07,r08,r09,r10,r11,r12); | |
2302 | ||
2303 | if(Part.Name~='Head')then | |
2304 | Part.formFactor=3; | |
2305 | Part.Size=Part.Size*Plus_Size; | |
2306 | else | |
2307 | for i,v in next,Part:children()do | |
2308 | if(v.className=='Weld')then | |
2309 | v.Part0=nil; | |
2310 | v.Part1.Anchored=true; | |
2311 | end; | |
2312 | end; | |
2313 | Part.formFactor=3; | |
2314 | Part.Size=Part.Size*Plus_Size; | |
2315 | for i,v in next,Part:children()do | |
2316 | if(v.className=='Weld')then | |
2317 | v.Part0=Part; | |
2318 | v.Part1.Anchored=false; | |
2319 | end; | |
2320 | end; | |
2321 | end; | |
2322 | ||
2323 | if(Weld.Parent==Torso)then | |
2324 | Part.BottomSurface=0; | |
2325 | Part.TopSurface=0; | |
2326 | end; | |
2327 | ||
2328 | Part.Anchored=false; | |
2329 | ||
2330 | Weld.Part1=Part; | |
2331 | ||
2332 | if(Weld.Part0==Torso)then | |
2333 | Welds[#Welds+1]=Weld; | |
2334 | Part.Anchored=true; | |
2335 | Weld.Part0=nil; | |
2336 | end; | |
2337 | elseif(Weld.className=='CharacterMesh')then | |
2338 | local Body_Part=tostring(Weld.BodyPart):match'%w+.%w+.(%w+)'; | |
2339 | local Mesh=A.Old.Instance.NewObject('SpecialMesh', | |
2340 | Body_Part=='Head'and Char:FindFirstChild'Head'or Body_Part=='Torso'and Char:FindFirstChild'Torso'or | |
2341 | Body_Part=='LeftArm'and Char:FindFirstChild'Left Arm'or Body_Part=='RightArm'and Char:FindFirstChild'Right Arm'or | |
2342 | Body_Part=='LeftLeg'and Char:FindFirstChild'Left Leg'or Body_Part=='RightLeg'and Char:FindFirstChild'Right Leg'or nil); | |
2343 | Mesh.MeshId=A.Data.BaseUrl..Weld.MeshId; | |
2344 | if(Weld.BaseTextureId~=0 or Weld.BaseTextureId~='0')then | |
2345 | Mesh.TextureId=A.Data.BaseUrl..Weld.BaseTextureId; | |
2346 | end; | |
2347 | Mesh.Scale=Mesh.Scale*Plus_Size; | |
2348 | Weld:Destroy(); | |
2349 | elseif(Weld.className=='SpecialMesh'and Weld.Parent~=Char.Head)then | |
2350 | Weld.Scale=Weld.Scale*Plus_Size; | |
2351 | end; | |
2352 | Change(Weld); | |
2353 | end; | |
2354 | end; | |
2355 | ||
2356 | Change(Char); | |
2357 | ||
2358 | Torso.formFactor=3; | |
2359 | Torso.Size=Torso.Size*Plus_Size; | |
2360 | ||
2361 | for i,v in next,Welds do | |
2362 | v.Part0=Torso; | |
2363 | v.Part1.Anchored=false; | |
2364 | end; | |
2365 | ||
2366 | Torso.Anchored=false; | |
2367 | --[[ | |
2368 | Wait(1); | |
2369 | ||
2370 | if(Shirts~=nil)then | |
2371 | Shirts.Parent=Char; | |
2372 | end; | |
2373 | if(Pants~=nil)then | |
2374 | Pants.Parent=Char; | |
2375 | end;]] | |
2376 | end; | |
2377 | --[[Functions end;]] | |
2378 | ||
2379 | ||
2380 | --[[Old]] | |
2381 | local Table; | |
2382 | for i,Name in next,{ | |
2383 | 'BrickColor'; | |
2384 | 'Instance'; | |
2385 | 'Vector3'; | |
2386 | 'Vector2'; | |
2387 | 'Color3'; | |
2388 | 'CFrame'; | |
2389 | 'UDim2'; | |
2390 | 'UDim'; | |
2391 | 'Ray'; | |
2392 | }do | |
2393 | Table=loadstring('return '..Name)(); | |
2394 | if(Table~=nil)then | |
2395 | A.Old[Name]=A.Functions.CopyTable(Table); | |
2396 | end;i,Name=nil; | |
2397 | end; | |
2398 | ||
2399 | A.Old.Instance.NewObject=A.Old.Instance.new; | |
2400 | A.Old.Instance.new=function(Object,Data) | |
2401 | local Class=Object; | |
2402 | Object,Data=A.Functions.GiveData(A.Old.Instance.NewObject(Object,Data)); | |
2403 | ||
2404 | if(A.Stuffs.Gui.PartOfGui[Class]==true)then | |
2405 | Data.Properties.BackgroundColor3=function()return A.Old.Color3.Black;end; | |
2406 | Data.Properties.BorderSizePixel=function()return 0;end; | |
2407 | Data.Properties.Visible=function()return true;end; | |
2408 | end; | |
2409 | if(A.Stuffs.Gui.Text[Class]==true)then | |
2410 | Data.Properties.TextColor3=function()return A.Old.Color3.White;end; | |
2411 | Data.Properties.TextWrapped=function()return true;end; | |
2412 | Data.Properties.TextWrap=function()return true;end; | |
2413 | end; | |
2414 | if(A.Stuffs.Gui.Image[Class]==true)then | |
2415 | Data.Properties.BackgroundTransparency=function()return 1;end; | |
2416 | end; | |
2417 | if(A.Stuffs.Gui.Button[Class]==true)then | |
2418 | Data.Properties.AutoButtonColor=function()return false;end; | |
2419 | Data.Properties.Active=function()return true;end; | |
2420 | end;Class=nil; | |
2421 | ||
2422 | Data.Properties.archivable=function()return false;end; | |
2423 | Data.Properties.Archivable=function()return false;end; | |
2424 | Data.Properties.Name=function()return'';end; | |
2425 | ||
2426 | pcall(A.Functions.Peace,Object,Data.Properties); | |
2427 | ||
2428 | return Object,Data; | |
2429 | end; | |
2430 | ||
2431 | A.Old.Color3.Red=A.Old.Color3.new(1); | |
2432 | A.Old.Color3.Black=A.Old.Color3.new(); | |
2433 | A.Old.Color3.Green=A.Old.Color3.new(0,1); | |
2434 | A.Old.Color3.Blue=A.Old.Color3.new(0,0,1); | |
2435 | A.Old.Color3.DarkRed=A.Old.Color3.new(.8); | |
2436 | A.Old.Color3.Yellow=A.Old.Color3.new(1,1); | |
2437 | A.Old.Color3.White=A.Old.Color3.new(1,1,1); | |
2438 | A.Old.Color3.Grey=A.Old.Color3.new(.5,.5,.5); | |
2439 | A.Old.Color3.DarkGreen=A.Old.Color3.new(0,.8); | |
2440 | A.Old.Color3.DarkBlue=A.Old.Color3.new(0,0,.8); | |
2441 | A.Old.Color3.DarkBlue=A.Old.Color3.new(0,0,.8); | |
2442 | A.Old.Color3.DarkYellow=A.Old.Color3.new(.7,.7); | |
2443 | ||
2444 | A.Old.CFrame.Pax=A.Old.CFrame.new(); | |
2445 | A.Old.CFrame.Char=A.Old.CFrame.new(0,3,0); | |
2446 | ||
2447 | A.Old.Vector3.Pax=A.Old.CFrame.Pax.p; | |
2448 | A.Old.Vector3.Char=A.Old.CFrame.Char.p; | |
2449 | A.Old.Vector3.Jump=A.Old.Vector3.new(0,100); | |
2450 | ||
2451 | ||
2452 | A.Old.BrickColor.White=A.Old.BrickColor.new'1001'; | |
2453 | A.Old.BrickColor.Black=A.Old.BrickColor.new'1003'; | |
2454 | ||
2455 | A.Old.UDim2.Pax=A.Old.UDim2.new(); | |
2456 | A.Old.UDim2.Full=A.Old.UDim2.new(1,0,1); | |
2457 | A.Old.UDim2.ButtonSize=UDim2.new(0,20,0,20); | |
2458 | A.Old.UDim2.ScreenPos=A.Old.UDim2.new(0,0,0,-1); | |
2459 | A.Old.UDim2.ScreenSize=A.Old.UDim2.new(1,0,1,1); | |
2460 | --[[Old end;]] | |
2461 | ||
2462 | ||
2463 | --[[Data]] | |
2464 | A.Data.Step=[=[;]=]; | |
2465 | A.Data.Start=[=[']=]; | |
2466 | A.Data.Wrap=[=[ & ]=]; | |
2467 | A.Data.Repeat=[=[##]=]; | |
2468 | A.Data.RbxUrl='rbxassetid://'; | |
2469 | A.Data.BaseUrl='http://www.roblox.com/Asset/?id='; | |
2470 | A.Data.CharacterLimbs={ | |
2471 | ['Torso']={ | |
2472 | Size=A.Old.Vector3.new(2,2,1); | |
2473 | }; | |
2474 | ['Head']={ | |
2475 | C1=A.Old.CFrame.new(0,-0.5,0,-1,-0,-0,0,0,1,0,1,0); | |
2476 | C0=A.Old.CFrame.new(0,1,0,-1,-0,-0,0,0,1,0,1,0); | |
2477 | Size=A.Old.Vector3.new(2,1,1); | |
2478 | Name='Neck'; | |
2479 | }; | |
2480 | ['Right Arm']={ | |
2481 | C1=A.Old.CFrame.new(-0.5,0.5,0,0,0,1,0,1,0,-1,-0,-0); | |
2482 | C0=A.Old.CFrame.new(1,0.5,0,0,0,1,0,1,0,-1,-0,-0); | |
2483 | Size=A.Old.Vector3.new(1,2,1); | |
2484 | Name='Right Shoulder' | |
2485 | }; | |
2486 | ['Right Leg']={ | |
2487 | C1=A.Old.CFrame.new(0.5,1,0,0,0,1,0,1,0,-1,-0,-0); | |
2488 | C0=A.Old.CFrame.new(1,-1,0,0,0,1,0,1,0,-1,-0,-0); | |
2489 | Size=A.Old.Vector3.new(1,2,1); | |
2490 | Name='Right Hip' | |
2491 | }; | |
2492 | ['Left Arm']={ | |
2493 | C1=A.Old.CFrame.new(0.5,0.5,0,-0,-0,-1,0,1,0,1,0,0); | |
2494 | C0=A.Old.CFrame.new(-1,0.5,0,-0,-0,-1,0,1,0,1,0,0); | |
2495 | Size=A.Old.Vector3.new(1,2,1); | |
2496 | Name='Left Shoulder' | |
2497 | }; | |
2498 | ['Left Leg']={ | |
2499 | C1=A.Old.CFrame.new(-0.5,1,0,-0,-0,-1,0,1,0,1,0,0); | |
2500 | C0=A.Old.CFrame.new(-1,-1,0,-0,-0,-1,0,1,0,1,0,0); | |
2501 | Size=A.Old.Vector3.new(1,2,1); | |
2502 | Name='Left Hip' | |
2503 | }; | |
2504 | }; | |
2505 | --[[Data end;]] | |
2506 | ||
2507 | ||
2508 | --[[Stuffs]] | |
2509 | A.Stuffs.Gui={ | |
2510 | PartOfGui={ | |
2511 | ImageButton=true; | |
2512 | TextButton=true; | |
2513 | ImageLabel=true; | |
2514 | TextLabel=true; | |
2515 | TextBox=true; | |
2516 | Frame=true; | |
2517 | }; | |
2518 | Text={ | |
2519 | TextButton=true; | |
2520 | TextLabel=true; | |
2521 | TextBox=true; | |
2522 | }; | |
2523 | Image={ | |
2524 | ImageButton=true; | |
2525 | ImageLabel=true; | |
2526 | }; | |
2527 | Button={ | |
2528 | ImageButton=true; | |
2529 | TextButton=true; | |
2530 | }; | |
2531 | }; | |
2532 | A.Stuffs.TrueBooleans={ | |
2533 | ['of course']=true; | |
2534 | ['not false']=true; | |
2535 | ['why not']=true; | |
2536 | ['off on']=true; | |
2537 | ['yahwol']=true; | |
2538 | ['not 0']=true; | |
2539 | ['true']=true; | |
2540 | ['yes']=true; | |
2541 | ['yep']=true; | |
2542 | ['yup']=true; | |
2543 | ['on']=true; | |
2544 | ['ya']=true; | |
2545 | ['y']=true; | |
2546 | ['1']=true; | |
2547 | }; | |
2548 | A.Stuffs.Security=pcall(function()return Game.RobloxLocked;end); | |
2549 | local Asd; | |
2550 | A.Stuffs.AsciiNum={}; | |
2551 | A.Stuffs.AsciiChar={}; | |
2552 | for i=0,255 do | |
2553 | Asd=string.char(i); | |
2554 | A.Stuffs.AsciiNum[Asd]=i; | |
2555 | A.Stuffs.AsciiChar[i]=Asd;i=nil; | |
2556 | end;Asd=nil; | |
2557 | A.Stuffs.CharVirus={ | |
2558 | ['Shirt Graphic']='ShirtGraphic'; | |
2559 | ['RobloxTeam']='Script'; | |
2560 | ['Sound']='Script'; | |
2561 | }; | |
2562 | A.Stuffs.GuideCommands={ | |
2563 | ['-r']='<Property>'; | |
2564 | ['-x']='<Position>'; | |
2565 | ['-b']='<Boolean>'; | |
2566 | ['-p']='<Player>'; | |
2567 | ['-v']='<Value>'; | |
2568 | ['-s']='<Size>'; | |
2569 | ['-t']='<Text>'; | |
2570 | ['-i']='<Path>'; | |
2571 | }; | |
2572 | A.Stuffs.NullTable={}; | |
2573 | A.Stuffs.StarterSource=[==[if(Game.PlaceId~=0)then print=function()end;end;local Users=Game:service'Players';local User=Users.LocalPlayer; ]==]; | |
2574 | --[[Stuffs end;]] | |
2575 | ||
2576 | ||
2577 | --[[Settings]] | |
2578 | A.Settings['Security of character']=false; | |
2579 | A.Settings['Windows transparency']=true; | |
2580 | A.Settings['Big jumps']=false; | |
2581 | A.Settings.HealthBar=false; | |
2582 | A.Settings.Immortal=false; | |
2583 | --[[Settings end;]] | |
2584 | ||
2585 | ||
2586 | --[[Service]] | |
2587 | for i,v in next,Game:children()do | |
2588 | pcall(function() | |
2589 | if(Game:service(v.className)~=nil)then | |
2590 | A.Service[v.className]=v; | |
2591 | end;i,v=nil; | |
2592 | end); | |
2593 | end; | |
2594 | --[[Service end;]] | |
2595 | ||
2596 | ||
2597 | ||
2598 | --[=[Create gui module | |
2599 | Exemple: | |
2600 | ||
2601 | A.Functions.CreateGuiModule(function() | |
2602 | ||
2603 | end); | |
2604 | ||
2605 | ]=] | |
2606 | A.Functions.CreateGuiModule(function() | |
2607 | for i,v in next,{'Hints';'Messages';'Other';'Windows';'First';}do | |
2608 | A.User.Frames[v]=A.Functions.Lock('Frame',{ | |
2609 | Position=A.Old.UDim2.ScreenPos; | |
2610 | Size=A.Old.UDim2.ScreenSize; | |
2611 | BackgroundTransparency=1; | |
2612 | Parent=A.User.Screen; | |
2613 | Name=v; | |
2614 | } | |
2615 | );i,v=nil; | |
2616 | end; | |
2617 | end); | |
2618 | A.Functions.CreateGuiModule(function() | |
2619 | A.Stuffs.MenuButton=A.Functions.Lock('Sound',{ | |
2620 | SoundId='rbxasset://sounds/switch.wav'; | |
2621 | Parent=A.User.Screen; | |
2622 | Volume=.5; | |
2623 | Pitch=2; | |
2624 | } | |
2625 | ); | |
2626 | A.Stuffs.Button=A.Functions.Lock('Sound',{ | |
2627 | SoundId='rbxasset://sounds/SWITCH3.wav'; | |
2628 | Parent=A.User.Screen; | |
2629 | Volume=.2; | |
2630 | Pitch=2; | |
2631 | } | |
2632 | ); | |
2633 | end); | |
2634 | A.Functions.CreateGuiModule(function() | |
2635 | local Frame; | |
2636 | local Pos1,Pos2=A.Old.UDim2.new(0,-110,1,-145),A.Old.UDim2.new(0,0,1,-145); | |
2637 | ||
2638 | local MouseEnter=A.Functions.Value('Bool',false,function(Value) | |
2639 | A.User.MenuButton.Position=Value==true and Pos2 or Pos1; | |
2640 | A.User.MenuButton.Transparency=Value==true and 0 or .5; | |
2641 | end); | |
2642 | local Visible=A.Functions.Value('Bool',false,function(Value)A.User.MenuButton.Visible,MouseEnter.Value=Value==false;Frame.Visible=Value;end); | |
2643 | ||
2644 | local BF={}; | |
2645 | local AddButtonFunction=function(Title,Function,Security) | |
2646 | if(Security==true and A.Stuffs.Security==false)then | |
2647 | return nil; | |
2648 | end; | |
2649 | BF[#BF+1]={ | |
2650 | Function=Function; | |
2651 | Title=Title; | |
2652 | }; | |
2653 | end; | |
2654 | ||
2655 | AddButtonFunction('Back to the game',function()Visible.Value=false;end); | |
2656 | AddButtonFunction('Fix Roblox Guis',function()loadstring(Game:GetObjects'rbxassetid://85827582'[1].Value)();end,true); | |
2657 | AddButtonFunction('Command Bar',function()A.Functions.CommandBar();end); | |
2658 | AddButtonFunction('Show Memes',function()A.Functions.MemeGui();end); | |
2659 | AddButtonFunction('Spawning',function()A.User.Char.Torso.CFrame=A.Functions.GetSpawnLocationCFrame();A.User.Char.Torso.Velocity=A.Old.Vector3.Pax;end); | |
2660 | AddButtonFunction('Explorer',function()A.Functions.ExplorerGui();end); | |
2661 | AddButtonFunction('Settings',function()A.Functions.SettingsGui();end); | |
2662 | AddButtonFunction('Meters',function()A.Functions.Meter();end); | |
2663 | AddButtonFunction('Reset',function()A.Functions.ResetChar(A.User.C);end); | |
2664 | AddButtonFunction('Nuke',function()A.Functions.NukeChar(A.User.Char);end); | |
2665 | AddButtonFunction('Help',function()A.Functions.HelpGui();end); | |
2666 | AddButtonFunction('Heal',function()A.Functions.Heal(A.User.C.Character);end); | |
2667 | ||
2668 | AddButtonFunction=nil; | |
2669 | ||
2670 | ||
2671 | A.User.MenuButton=A.Functions.Lock('TextButton',{ | |
2672 | Transparency=function()return MouseEnter.Value==true and 0 or .5;end; | |
2673 | Visible=function()return Visible.Value==false;end; | |
2674 | Position=function()return MouseEnter.Value==true and Pos2 or Pos1;end; | |
2675 | TextColor3=A.Old.Color3.DarkYellow; | |
2676 | Size=A.Old.UDim2.new(0,125,0,20); | |
2677 | Parent=A.User.Frames.First; | |
2678 | Text='Menu of Ohgal'; | |
2679 | FontSize=2; | |
2680 | },{ | |
2681 | MouseEnter=function() | |
2682 | MouseEnter.Value=true; | |
2683 | A.User.MenuButton.MouseLeave:wait(); | |
2684 | MouseEnter.Value=false; | |
2685 | end; | |
2686 | MouseButton1Up=function() | |
2687 | Visible.Value=true; | |
2688 | A.Stuffs.MenuButton:play(); | |
2689 | end; | |
2690 | } | |
2691 | ); | |
2692 | coroutine.wrap(function() | |
2693 | A.User.MenuButton.MouseButton1Down:wait(); | |
2694 | A.User.STARTUPMSG.Parent=nil; | |
2695 | end)(); | |
2696 | Frame=A.Functions.Lock('Frame', | |
2697 | { | |
2698 | Position=A.Old.UDim2.new(.5,-200,.5,-((#BF*20)+5)/2); | |
2699 | Size=A.Old.UDim2.new(0,400,0,(#BF*20)+10); | |
2700 | Visible=function()return Visible.Value;end; | |
2701 | BackgroundColor3=A.Old.Color3.DarkRed; | |
2702 | Parent=A.User.Frames.First; | |
2703 | BackgroundTransparency=.5; | |
2704 | } | |
2705 | ); | |
2706 | for Int,v in next,BF do | |
2707 | A.Functions.Button('TextButton',{ | |
2708 | Position=A.Old.UDim2.new(0,5,0,(20*(Int-1))+5); | |
2709 | TextColor3=A.Old.Color3.DarkYellow; | |
2710 | Size=A.Old.UDim2.new(1,-10,0,20); | |
2711 | BackgroundTransparency=.5; | |
2712 | AutoButtonColor=true; | |
2713 | Text=v.Title; | |
2714 | Parent=Frame; | |
2715 | FontSize=5; | |
2716 | Font=1; | |
2717 | },v.Function | |
2718 | ); | |
2719 | end; | |
2720 | end); | |
2721 | A.Functions.CreateGuiModule(function() | |
2722 | Delay(0,function() | |
2723 | local Color1=A.Old.Color3.Black; | |
2724 | local Color2=A.Old.Color3.Red; | |
2725 | local Color3=A.Old.Color3.Red; | |
2726 | local Color4=A.Old.Color3.Black; | |
2727 | local Msg=A.Functions.Peace('TextLabel',{ | |
2728 | Text='Welcome!'..string.rep('\n',2)..'Dresmor Alakazard - Ohgal Local Admin'; | |
2729 | Position=A.Old.UDim2.new(.5,0,.5); | |
2730 | BackgroundTransparency=.5; | |
2731 | BackgroundColor3=Color1; | |
2732 | Parent=A.User.Screen; | |
2733 | TextColor3=Color2; | |
2734 | BorderSizePixel=0; | |
2735 | TextWrapped=true; | |
2736 | FontSize=3; | |
2737 | } | |
2738 | ); | |
2739 | A.User.STARTUPMSG=Msg; | |
2740 | Msg:TweenSizeAndPosition(A.Old.UDim2.new(0,300,0,70),A.Old.UDim2.new(.5,-150,.5,-35),1,2,1,false); | |
2741 | Wait(5); | |
2742 | Msg.BackgroundColor3=A.Old.Color3.Red; | |
2743 | Msg.TextColor3=A.Old.Color3.Black; | |
2744 | if(Msg.Parent~=nil)then | |
2745 | Msg:TweenSizeAndPosition(A.Old.UDim2.new(0,200,0,20),A.Old.UDim2.new(0,25,1,-145),1,1,1,false); | |
2746 | Msg.Text='<-- There is the MENU'; | |
2747 | coroutine.wrap(function() | |
2748 | for i=1,3 do | |
2749 | Msg.BackgroundColor3=Color3; | |
2750 | Msg.TextColor3=Color4; | |
2751 | A.Functions.Wait(.3); | |
2752 | Msg.BackgroundColor3=Color1; | |
2753 | Msg.TextColor3=Color2; | |
2754 | A.Functions.Wait(.3); | |
2755 | end; | |
2756 | end)(); | |
2757 | Wait(6); | |
2758 | end; | |
2759 | A.Functions.Remove(Msg,true); | |
2760 | end); | |
2761 | end); | |
2762 | A.Functions.CreateGuiModule(function() | |
2763 | A.Functions.SettingWait('HealthBar',true); | |
2764 | A.User.Gui.HelathBar={}; | |
2765 | local this=A.User.Gui.HelathBar; | |
2766 | ||
2767 | if(A.User.Humanoid.Value==nil)then | |
2768 | A.User.Humanoid.Changed:wait(); | |
2769 | end; | |
2770 | ||
2771 | this.Fix=function() | |
2772 | this.Pos=A.Old.UDim2.new(this.SetHealth.Value/this.SetMaxHealth.Value,0,1); | |
2773 | if(this.HBar~=nil)then | |
2774 | this.HBar.Size=this.Pos; | |
2775 | end; | |
2776 | return this.Pos; | |
2777 | end; | |
2778 | this.FixStats=function() | |
2779 | this.Idk=this.Humanoid.Health/this.Humanoid.MaxHealth; | |
2780 | this.SetMaxHealth.Value=this.Humanoid.MaxHealth; | |
2781 | this.SetHealth.Value=this.Humanoid.Health; | |
2782 | this.SetColor.Value=(this.Idk<=.1)and A.Old.Color3.DarkRed or(this.Idk>.1 and this.Idk<=.5)and | |
2783 | A.Old.Color3.DarkYellow or(this.Idk>.5 and this.Idk<=1)and A.Old.Color3.Green or A.Old.Color3.Black; | |
2784 | end; | |
2785 | ||
2786 | this.SetColor=A.Functions.Value('Color3',A.Old.Color3.Green,function(Color3)this.HBar.BackgroundColor3=Color3;Color3=nil;end); | |
2787 | this.SetVisible=A.Functions.Value('Bool',true,function(Value)this.Frame.Visible=Value;Value=nil;end); | |
2788 | this.SetMaxHealth=A.Functions.Value('Number',A.User.Humanoid.Value.MaxHealth,this.Fix); | |
2789 | this.SetHealth=A.Functions.Value('Number',A.User.Humanoid.Value.Health,this.Fix); | |
2790 | ||
2791 | this.Frame=A.Functions.Lock('Frame',{ | |
2792 | Visible=function()return this.SetVisible.Value;end; | |
2793 | Position=A.Old.UDim2.new(.5,-55,1,-25); | |
2794 | Size=A.Old.UDim2.new(0,110,0,20); | |
2795 | Parent=A.User.Frames.Other; | |
2796 | BackgroundTransparency=.5; | |
2797 | } | |
2798 | ); | |
2799 | this.MHBar=A.Functions.Lock('Frame', | |
2800 | { | |
2801 | --BackgroundColor3=A.Old.Color3.DarkRed; | |
2802 | Position=A.Old.UDim2.new(0,5,0,5); | |
2803 | Size=A.Old.UDim2.new(1,-10,1,-10); | |
2804 | BackgroundTransparency=1; | |
2805 | Parent=this.Frame; | |
2806 | } | |
2807 | ); | |
2808 | this.HBar=A.Functions.Lock('Frame', | |
2809 | { | |
2810 | BackgroundColor3=function()return this.SetColor.Value;end; | |
2811 | Position=A.Old.UDim2.Pax; | |
2812 | Parent=this.MHBar; | |
2813 | } | |
2814 | ); | |
2815 | this.HBar.Size=this.Fix(); | |
2816 | ||
2817 | this.Valid=true; | |
2818 | ||
2819 | coroutine.wrap(function() | |
2820 | while(A.Functions.Check()and this.Valid==true)do | |
2821 | this.SetVisible.Value=A.Settings.HealthBar.Value; | |
2822 | A.Settings.HealthBar.Changed:wait(); | |
2823 | end; | |
2824 | end)(); | |
2825 | coroutine.wrap(function() | |
2826 | while(A.Functions.Check()and this.Valid==true)do | |
2827 | A.Functions.SettingWait('HealthBar',true); | |
2828 | ||
2829 | this.Humanoid=A.User.Humanoid.Value; | |
2830 | this.FixStats(); | |
2831 | ||
2832 | coroutine.wrap(function() | |
2833 | while(A.Functions.Check()and A.User.Humanoid.Value==this.Humanoid)do | |
2834 | this.Humanoid.HealthChanged:wait(); | |
2835 | this.FixStats(); | |
2836 | end; | |
2837 | end)(); | |
2838 | ||
2839 | A.User.Humanoid.Changed:wait(); | |
2840 | this.Humanoid.MaxHealth=this.Humanoid.MaxHealth+1; | |
2841 | end; | |
2842 | end)(); | |
2843 | ||
2844 | end); | |
2845 | --[[Create gui module end;]] | |
2846 | ||
2847 | ||
2848 | --[=[Module create | |
2849 | Exemple: | |
2850 | A.Functions.CreateModule('Type',function() | |
2851 | ||
2852 | end); | |
2853 | ]=] | |
2854 | A.Functions.CreateModule('Once',A.Functions.Screen); | |
2855 | A.Functions.CreateModule('Once',function() | |
2856 | ||
2857 | local Value=A.Functions.SettingWait('Immortal',true); | |
2858 | local Val_; | |
2859 | ||
2860 | while(A.Functions.Check())do | |
2861 | Val_=Value.Value; | |
2862 | if(A.User.Humanoid.Value~=nil)then | |
2863 | A.User.Humanoid.Value.Name=Val_==true and'Immortal'or'Humanoid'; | |
2864 | A.User.Humanoid.Value.MaxHealth=Val_==true and 1e666 or 100; | |
2865 | A.User.Humanoid.Value.Health=Val_==true and 1e666 or 100; | |
2866 | end; | |
2867 | Value.Changed:wait(); | |
2868 | end; | |
2869 | ||
2870 | end); | |
2871 | A.Functions.CreateModule('Once',function() | |
2872 | local Num; | |
2873 | A.Stuffs.SecurityID=A.Stuffs.SecurityID and A.Stuffs.SecurityID+1 or 1; | |
2874 | local Local_ID=A.Stuffs.SecurityID; | |
2875 | while(A.Functions.Check()==true and A.Stuffs.SecurityID==Local_ID)do | |
2876 | A.Functions.Wait(); | |
2877 | ||
2878 | A.User.Char=A.User.C.Character; | |
2879 | ||
2880 | if(A.User.Char~=nil and A.User.Char.PrimaryPart~=nil)then | |
2881 | A.Functions.LoadModule'Char'; | |
2882 | end; | |
2883 | ||
2884 | A.User.C.CharacterAdded:wait(); | |
2885 | ||
2886 | Num=#A.User.Connections; | |
2887 | for i=1,Num do A.User.Connections[i]:disconnect();i=nil;end; | |
2888 | for i=1,Num do A.User.Connections[i]=nil;i=nil;end; | |
2889 | end; | |
2890 | end); | |
2891 | A.Functions.CreateModule('Char',function() | |
2892 | _G['Ohgal - Char Security Version']=_G['Ohgal - Char Security']~=nil and _G['Ohgal - Char Security']+1 or 0; | |
2893 | local CharSecurityVersion=_G['Ohgal - Char Security']; | |
2894 | local Torso=A.User.Char.Torso | |
2895 | while(A.Functions.Check()and CharSecurityVersion==_G['Ohgal - Char Security'])do | |
2896 | A.Functions.SettingWait('Security of character',true); | |
2897 | if(Torso.Position.Y<=-200 and Torso.Velocity.Y~=0)then | |
2898 | Torso.CFrame=A.Functions.GetSpawnLocationCFrame(); | |
2899 | Torso.RotVelocity=A.Old.Vector3.Pax; | |
2900 | Torso.Velocity=A.Old.Vector3.Pax; | |
2901 | end; | |
2902 | A.Functions.Wait(); | |
2903 | end; | |
2904 | end); | |
2905 | A.Functions.CreateModule('Char',function() | |
2906 | A.User.Humanoid.Value=A.Functions.FindObject(A.User.Char,'className','Humanoid'); | |
2907 | ||
2908 | if(A.Settings.Immortal.Value==true)then | |
2909 | A.User.Humanoid.Value.Name='Immortal'; | |
2910 | A.User.Humanoid.Value.MaxHealth=1e666; | |
2911 | A.User.Humanoid.Value.Health=1e666; | |
2912 | end; | |
2913 | ||
2914 | coroutine.wrap(function() | |
2915 | local Humanoid=A.User.Humanoid.Value; | |
2916 | while(Humanoid==A.User.Humanoid.Value and A.Functions.Check()==true)do | |
2917 | A.Functions.SettingWait('Big jumps',true); | |
2918 | Humanoid.Jumping:wait(); | |
2919 | if(A.Settings['Big jumps'].Value==true)then | |
2920 | Humanoid.Torso.Velocity=A.Old.Vector3.Jump; | |
2921 | end; | |
2922 | end; | |
2923 | end)(); | |
2924 | ||
2925 | for i,v in next,A.User.Char:children()do | |
2926 | if(A.Stuffs.CharVirus[v.Name]==v.className)then | |
2927 | A.Functions.Remove(v,true); | |
2928 | end;i,v=nil; | |
2929 | end; | |
2930 | A.Functions.Connect(A.User.Char,'ChildAdded',function(v) | |
2931 | if(A.Stuffs.CharVirus[v.Name]==v.className)then | |
2932 | A.Functions.Remove(v,true); | |
2933 | end;v=nil; | |
2934 | end,A.User); | |
2935 | if(A.Stuffs.CharVirus.Sound==nil)then return nil;end; | |
2936 | for i,v in next,A.User.Char.PrimaryPart:children()do | |
2937 | if(v.Name=='Sound'and v.className=='Sound'and v.archivable==false)then | |
2938 | A.Functions.Remove(v,true); | |
2939 | end;i,v=nil; | |
2940 | end; | |
2941 | A.Functions.Connect(A.User.Char.PrimaryPart,'ChildAdded',function(v) | |
2942 | if(v.Name=='Sound'and v.className=='Sound'and v.archivable==false)then | |
2943 | A.Functions.Remove(v,true); | |
2944 | end;v=nil; | |
2945 | end,A.User); | |
2946 | end); | |
2947 | A.Functions.CreateModule('PlayerGui',A.Functions.GuisParent); | |
2948 | A.Functions.CreateModule('PlayerGui',function() | |
2949 | local Old=A.User.PlayerGui; | |
2950 | coroutine.wrap(function() | |
2951 | local Virus; | |
2952 | while(A~=nil and A.Functions.Check()and Old==A.User.PlayerGui)do | |
2953 | if(Virus==nil)then | |
2954 | Virus=Old:FindFirstChild'HealthGUI'; | |
2955 | else | |
2956 | Virus=Virus.Name=='HealthGUI'and Virus or nil; | |
2957 | end; | |
2958 | if(Virus~=nil)then | |
2959 | A.Functions.VisibleOfHealthGUI(A.Settings.HealthBar.Value==false); | |
2960 | Virus=Virus:FindFirstChild'hurtOverlay'; | |
2961 | if(Virus)then | |
2962 | A.Functions.Remove(Virus,true); | |
2963 | end; | |
2964 | end; | |
2965 | Virus=Old.ChildAdded:wait();Wait(); | |
2966 | end; | |
2967 | end)(); | |
2968 | while(Old.Parent~=nil)do Old.Changed:wait();end; | |
2969 | A.Old.Instance.NewObject('BoolValue',Old); | |
2970 | end); | |
2971 | ||
2972 | --[[Module create end;]] | |
2973 | ||
2974 | ||
2975 | ||
2976 | --[=[Call create | |
2977 | Exemple: | |
2978 | ||
2979 | A.Functions.CreateCall([[Description]],{},function(Self) | |
2980 | ||
2981 | end); | |
2982 | ||
2983 | ]=] | |
2984 | A.Functions.CreateCall([[For you]],{'me!';'myself!';'satan!';},function(Self) | |
2985 | return Self==A.User.C; | |
2986 | end); | |
2987 | A.Functions.CreateCall([[For they]],{'other!';'noobs!';'idiots!';'notme!';},function(Self) | |
2988 | return Self~=A.User.C; | |
2989 | end); | |
2990 | A.Functions.CreateCall([[For players]],{'players!';},function(Self) | |
2991 | return Self.userId>0; | |
2992 | end); | |
2993 | A.Functions.CreateCall([[For guests]],{'guests!';},function(Self) | |
2994 | return Self.userId<1; | |
2995 | end); | |
2996 | A.Functions.CreateCall([[For random player]],{'random!';'rand!';},function(Self) | |
2997 | return math.random(1,4)==1; | |
2998 | end); | |
2999 | A.Functions.CreateCall([[For each]],{'all!';'each!'},function(Self) | |
3000 | return true; | |
3001 | end); | |
3002 | --[[Call create end;]] | |
3003 | ||
3004 | ||
3005 | ||
3006 | A.Functions.SetupCommands=function() | |
3007 | --[==[Command create | |
3008 | Exemple: | |
3009 | ||
3010 | A.Functions.CreateCommand([[Title]],{},[[Description]],[[]],1,function(Text,FullText,Args) | |
3011 | ||
3012 | end); | |
3013 | ||
3014 | ]==] | |
3015 | A.Functions.CreateCommand([[Repeat Command]],{'loopthis';'loopthat';'repeat';'rt';},[[Repeat commands...First is name of the loop... Second value is number of loop... Third is delay (0 not wait())... The last is the command and command argument(s)... To stop loop say loop name first and last "abort!"]],[[-v-v-v]],3,function(Text,FullText,Args) | |
3016 | if(A.Stuffs.Loops==nil)then | |
3017 | A.Stuffs.Loops={}; | |
3018 | end; | |
3019 | ||
3020 | local Value=Args[2]:lower()~='abort!'and true or nil; | |
3021 | ||
3022 | if(Value==true and A.Stuffs.Loops[Args[1]]~=nil)then | |
3023 | error(Args[1]..' already run...'); | |
3024 | return nil; | |
3025 | end; | |
3026 | A.Stuffs.Loops[Args[1]]=Value; | |
3027 | if(A.Stuffs.Loops[Args[1]]==nil)then | |
3028 | return nil; | |
3029 | end; | |
3030 | local Repeat=tonumber(Args[2]); | |
3031 | local Delay=tonumber(Args[3]); | |
3032 | local Command=A.Data.Start..FullText:match(Args[1]..A.Data.Step..Args[2]..A.Data.Step..Args[3]..A.Data.Step..'(.+)'); | |
3033 | if(Delay>0)then | |
3034 | for i=1,Repeat do | |
3035 | if(A.Stuffs.Loops[Args[1]]==true)then | |
3036 | A.Functions.SearchCommand(Command); | |
3037 | Wait(Delay); | |
3038 | else | |
3039 | break; | |
3040 | end; | |
3041 | end; | |
3042 | else | |
3043 | for i=1,Repeat do | |
3044 | A.Functions.Thread(function() | |
3045 | A.Functions.SearchCommand(Command); | |
3046 | end); | |
3047 | end; | |
3048 | end; | |
3049 | A.Stuffs.Loops[Args[1]]=nil; | |
3050 | end); | |
3051 | A.Functions.CreateCommand([[Dummy]],{'dummy';'doll';},[[Dummy for testing lol... Add player name for or Vector3 position and for last number of dummies... For remove all, the first argument should be "remove!"]],[[-v-v]],2,function(Text,FullText,Args) | |
3052 | if(Args[1] and Args[1]:lower()=='remove!')then | |
3053 | for i,v in next,A.Service.Workspace:children()do | |
3054 | if(v:FindFirstChild'Dresmor Alakazard - Dummy')then | |
3055 | A.Functions.Remove(v,true); | |
3056 | end; | |
3057 | end; | |
3058 | return nil; | |
3059 | end; | |
3060 | local Repeat=tonumber(Args[2])or 1; | |
3061 | local Load,Position=pcall(function()return loadstring('local c={...};return c[1]('..Args[1]..')')(A.Old.CFrame.new);end); | |
3062 | if(Load==false)then Position=A.Functions.Players(Args[1])[1].Character.Torso.CFrame;end; | |
3063 | for i=1,Repeat do | |
3064 | local Dummy=A.Functions.Peace('Model',{ | |
3065 | Name='Dummy'; | |
3066 | } | |
3067 | ); | |
3068 | A.Old.Instance.NewObject('BoolValue',Dummy).Name='Dresmor Alakazard - Dummy'; | |
3069 | A.Old.Instance.NewObject('Humanoid',Dummy); | |
3070 | A.Functions.Peace('Part',{ | |
3071 | CFrame=Position*CFrame.Angles(0,math.rad(360/Repeat*i),0)*CFrame.new(5+.2*Repeat,0,0); | |
3072 | Size=Vector3.new(2,2,1); | |
3073 | BottomSurface=0; | |
3074 | TopSurface=0; | |
3075 | formFactor=3; | |
3076 | Parent=Dummy; | |
3077 | Name='Torso'; | |
3078 | } | |
3079 | ); | |
3080 | A.Functions.Heal(Dummy); | |
3081 | A.Old.Instance.NewObject('SpecialMesh',Dummy.Head).Scale=Vector3.new(1.25,1.25,1.25); | |
3082 | A.Functions.Peace('Decal',{ | |
3083 | Texture='rbxasset://textures/face.png'; | |
3084 | Parent=Dummy.Head; | |
3085 | Name='face'; | |
3086 | Face=5; | |
3087 | } | |
3088 | ); | |
3089 | Dummy.Parent=A.Service.Workspace; | |
3090 | end; | |
3091 | end); | |
3092 | A.Functions.CreateCommand([[Wall Hack]],{'wallhack';'wall_hack';'wh';},[[Wall hack... Add number for transparency value! The base value is 0.5]],[[-v]],1,function(Text,FullText,Args) | |
3093 | local Transparency=tonumber(Args[1])or .5; | |
3094 | A.Functions.All(A.Service.Workspace,function(Part) | |
3095 | if(Part:IsA'BasePart')then | |
3096 | Part.AlphaModifier=Transparency; | |
3097 | end; | |
3098 | end); | |
3099 | end); | |
3100 | A.Functions.CreateCommand([[Teleport To A Place]],{'toplace';'tplace';'tpl';},[[Teleport to other places...]],[[-v-p]],2,function(Text,FullText,Args) | |
3101 | local Teleport_ID=tonumber(Args[1]); | |
3102 | A.Functions.Players(Args[2],function(Self) | |
3103 | if(Self==A.User.C)then | |
3104 | A.Services.TeleportService:Teleport(Teleport_ID); | |
3105 | else | |
3106 | A.Functions.CreateScript('LocalScript',Self,[[ | |
3107 | Game:service'TeleportService':Teleport(]]..Teleport_ID..[[); | |
3108 | ]]); | |
3109 | end; | |
3110 | end); | |
3111 | end); | |
3112 | A.Functions.CreateCommand([[Execution]],{'execution';'execute';'exe';},[[Like localscripting but this works only for admin...]],[[-t]],0,function(Text,FullText,Args) | |
3113 | local Exe=A.Old.Instance.NewObject'StringValue'; | |
3114 | Exe.Name='Ohgal_Execution'; | |
3115 | Exe.Parent=A.User.C; | |
3116 | Exe.Value=FullText; | |
3117 | end); | |
3118 | A.Functions.CreateCommand([[Resize Character]],{'resize';},[[Character resizing OLaloOLAolaol]],[[-p-v]],2,function(Text,FullText,Args) | |
3119 | local Size=tonumber(Args[2]); | |
3120 | if(Size==nil)then | |
3121 | return nil; | |
3122 | end; | |
3123 | A.Functions.Players(Args[1],function(Self) | |
3124 | A.Functions.ResizeChar(Self.Character,Size); | |
3125 | end); | |
3126 | end); | |
3127 | A.Functions.CreateCommand([[Give Weapons]],{'giveweapons';'gws';},[[Give weapons from somebody to somebody...]],[[-p-p]],2,function(Text,FullText,Args) | |
3128 | local Backpack=A.Functions.FindObject(A.Functions.Players(Args[2])[1],'className','Backpack'); | |
3129 | if(Backpack~=nil)then | |
3130 | A.Functions.Players(Args[1],function(Self) | |
3131 | if(Self.Character~=nil)then | |
3132 | for i,v in next,Self.Character:children()do | |
3133 | if(v.className=='Tool')then | |
3134 | v.Parent=Backpack; | |
3135 | end; | |
3136 | end; | |
3137 | end; | |
3138 | for i,v in next,Self.Backpack:children()do | |
3139 | if(v.className=='Tool'or v.className=='HopperBin')then | |
3140 | v.Parent=Backpack; | |
3141 | end; | |
3142 | end; | |
3143 | end); | |
3144 | end; | |
3145 | end); | |
3146 | A.Functions.CreateCommand([[Be Cute]],{'becute';'bc';},[[Be cute?]],[[-p]],1,function(Text,FullText,Args) | |
3147 | A.Functions.Players(Args[1],function(Self) | |
3148 | local Parent=Self.Character; | |
3149 | ||
3150 | if(Parent==nil)then | |
3151 | return nil; | |
3152 | end; | |
3153 | ||
3154 | local StarterPos=A.Old.Vector3.Pax; | |
3155 | ||
3156 | local Round=15; | |
3157 | local Asd=Round/5; | |
3158 | local Radius=.8*Parent.Torso.Size.X/2; | |
3159 | ||
3160 | local PSize=.5; | |
3161 | ||
3162 | local P={}; | |
3163 | local Num=0; | |
3164 | ||
3165 | for i,v in next,Parent:children()do | |
3166 | if(v.Name=='Pentagramma')then | |
3167 | A.Functions.Remove(v,true); | |
3168 | elseif(v.Name=='Black Metal Set')then | |
3169 | for i,v in next,v:children()do | |
3170 | if(v.className=='Part')then | |
3171 | A.Functions.Remove(v,true); | |
3172 | end; | |
3173 | end; | |
3174 | end; | |
3175 | end; | |
3176 | ||
3177 | local Warehouse=A.Old.Instance.NewObject('Model',Parent); | |
3178 | Warehouse.Name='Pentagramma'; | |
3179 | ||
3180 | for i=0,Round do | |
3181 | local Rad=math.rad((360/Round*i)+180); | |
3182 | local Pos=A.Old.Vector3.new( | |
3183 | math.sin(Rad)*Radius, | |
3184 | math.cos(Rad)*Radius, | |
3185 | -Parent.Torso.Size.Z/2 | |
3186 | ); | |
3187 | if(i~=0)then Num=Num+1; | |
3188 | if(Num==Asd)then | |
3189 | Num=0; | |
3190 | P[#P+1]=Pos; | |
3191 | end; | |
3192 | A.Functions.Peace('BlockMesh',{ | |
3193 | Scale=A.Old.Vector3.new(PSize,PSize,(StarterPos-Pos).Magnitude*5.2)+A.Old.Vector3.new(math.random()/10,0,0); | |
3194 | Parent=A.Functions.CreateWeld( | |
3195 | Parent.Torso, | |
3196 | A.Functions.Peace('Part',{ | |
3197 | BrickColor=BrickColor.new(199); | |
3198 | CFrame=Parent.Torso.CFrame; | |
3199 | Size=A.Old.Vector3.Pax; | |
3200 | CanCollide=false; | |
3201 | Parent=Warehouse; | |
3202 | formFactor=3; | |
3203 | } | |
3204 | ), | |
3205 | A.Old.CFrame.new(StarterPos,Pos)*A.Old.CFrame.new(0,0,-(StarterPos-Pos).Magnitude/2) | |
3206 | ).Part1; | |
3207 | } | |
3208 | ); | |
3209 | end; | |
3210 | StarterPos=Pos; | |
3211 | end; | |
3212 | ||
3213 | for i,v in next,{{1;4;};{1;3;};{2;4;};{2;5;};{3;5;};}do --Make better... | |
3214 | local StarterPos=P[v[1]]; | |
3215 | local Pos=P[v[2]]; | |
3216 | ||
3217 | local Weld=A.Old.Instance.NewObject('Weld',Warehouse); | |
3218 | A.Functions.Peace('BlockMesh',{ | |
3219 | Scale=A.Old.Vector3.new(PSize-.2,PSize-.2,(StarterPos-Pos).Magnitude*5.2)+Vector3.new(math.random()/10,0,0); | |
3220 | Parent=A.Functions.CreateWeld( | |
3221 | Parent.Torso, | |
3222 | A.Functions.Peace('Part',{ | |
3223 | BrickColor=BrickColor.new(194); | |
3224 | CFrame=Parent.Torso.CFrame; | |
3225 | Size=A.Old.Vector3.Pax; | |
3226 | CanCollide=false; | |
3227 | Parent=Warehouse; | |
3228 | formFactor=3; | |
3229 | } | |
3230 | ), | |
3231 | CFrame.new(StarterPos,Pos)*CFrame.new(0,0,-(StarterPos-Pos).Magnitude/2) | |
3232 | ).Part1; | |
3233 | } | |
3234 | ); | |
3235 | end; | |
3236 | end); | |
3237 | end); | |
3238 | A.Functions.CreateCommand([[Change Music]],{'cmp';'cmusic';},[[Change current music properties]],[[-r-v]],2,function(Text,FullText,Args) | |
3239 | local Name='Ohgal_Music'; | |
3240 | local Music=A.Service.Workspace.CurrentCamera:FindFirstChild(Name)or A.Service.Lighting(Name); | |
3241 | if(Music~=nil)then | |
3242 | Music=Music.className=='Tool'and Music:FindFirstChild(Name)or Music; | |
3243 | print(Music,Music.className); | |
3244 | for i,v in next,A.Functions.GetProperties(Music)do | |
3245 | if(i:lower():find(Args[1]:lower())==1)then | |
3246 | Music[i]=loadstring('return '..Args[2])(); | |
3247 | end; | |
3248 | end; | |
3249 | end; | |
3250 | end); | |
3251 | A.Functions.CreateCommand([[Music]],{'play';'music';'mp';},[[asd...Arguments: 1.) name of the music or number of the music 2.) Public mode or Private mode (Base mode is Public!)]],[[-v-b]],2,function(Text,FullText,Args) | |
3252 | for i,Place in next,{A.Service.Lighting;A.Service.Workspace.CurrentCamera;}do | |
3253 | for i,v in next,Place:children()do | |
3254 | if(v.className=='Sound'and v.Name=='Ohgal_Music')then | |
3255 | v:stop(); | |
3256 | end; | |
3257 | end; | |
3258 | end; | |
3259 | ||
3260 | local Bool=A.Functions.ToBoolean(Args[2]); | |
3261 | local Sound_Data=A.Functions.LoadSound('Musics',Args[1],true); | |
3262 | ||
3263 | loadstring([[ | |
3264 | local Parent=]]..tostring(Bool)..[[ and Workspace.CurrentCamera or Game:service'Lighting'; | |
3265 | local Sound=Parent:FindFirstChild'Ohgal_Music'or Instance.new'Sound'; | |
3266 | Sound.SoundId=']]..A.Data.BaseUrl..Sound_Data.SoundId..[[' | |
3267 | Sound.Pitch=]]..Sound_Data.Pitch..[[ | |
3268 | Sound.Name='Ohgal_Music'; | |
3269 | Sound.Parent=Parent; | |
3270 | Sound.Looped=true; | |
3271 | Sound:play(); | |
3272 | ]])(); | |
3273 | end); | |
3274 | A.Functions.CreateCommand([[Kick]],{'kick';'bye';},[[Customed player'll leave from the game...]],[[-p]],1,function(Text,FullText,Args) | |
3275 | A.Functions.Players(Args[1],function(Self) | |
3276 | if(Self~=A.User.C)then | |
3277 | if(A.Stuffs.ScriptPacket.LocalScript~=nil)then | |
3278 | A.Functions.CreateScript('LocalScript',Self,[[script.Parent=nil;User.Parent=nil;User.Parent=Users;]]); | |
3279 | else | |
3280 | A.Functions.Remove(Self); | |
3281 | end; | |
3282 | end; | |
3283 | end); | |
3284 | end); | |
3285 | A.Functions.CreateCommand([[Create Part]],{'npart';'cpart';'part';},[[Part creating... For remove all parts you should add first argument "remove!" or nothing... Arguments: 1.) Size(n,n,n) 2.) BrickColor 3.) Collide 4.) Anchor 5.) Position(0,0,0)[ haven't to add ] 6.) Type of part]],[[-s-b-b-v-x-v]],6,function(Text,FullText,Args) | |
3286 | ||
3287 | if(Args[1]==nil or Args[1]:lower()=='remove!')then | |
3288 | A.Functions.All(Workspace,function(Part) | |
3289 | if(Part.Name=='Ohgal_Part')then | |
3290 | A.Functions.Remove(Part,true); | |
3291 | end; | |
3292 | end); | |
3293 | return nil; | |
3294 | end; | |
3295 | ||
3296 | local Size=A.Old.Vector3.new(loadstring('return '..Args[1])()); | |
3297 | ||
3298 | local Position=Args[5]~=nil and A.Old.CFrame.new(A.Old.Vector3.new(loadstring('return '..Args[5])()))or | |
3299 | A.User.Char.Head.CFrame+A.User.Char.Head.CFrame.lookVector*A.Old.Vector3.new(Size.X,0,Size.Z).Magnitude; | |
3300 | ||
3301 | local Part=A.Functions.Peace(Args[6]~=nil and Args[6]or'Part',{ | |
3302 | CanCollide=Args[3]~=nil and A.Functions.ToBoolean(Args[3])or true; | |
3303 | BrickColor=A.Old.BrickColor.new(Args[2]or 0); | |
3304 | Anchored=A.Functions.ToBoolean(Args[4]); | |
3305 | Name='Ohgal_Part'; | |
3306 | Parent=Workspace; | |
3307 | CFrame=Position; | |
3308 | formFactor=3; | |
3309 | Size=Size; | |
3310 | } | |
3311 | ); | |
3312 | ||
3313 | end); | |
3314 | A.Functions.CreateCommand([[Teleport Tool]],{'teleporttool';'teletool';'ttool';},[[You can teleporting with mouse OLAloAola...]],[[]],0,function(Text,FullText,Args) | |
3315 | local Tool=A.Old.Instance.NewObject'Tool'; | |
3316 | local Handle=A.Functions.Peace('Part',{ | |
3317 | Size=A.Old.Vector3.Pax; | |
3318 | Name='Handle'; | |
3319 | formFactor=0; | |
3320 | Parent=Tool; | |
3321 | } | |
3322 | ); | |
3323 | ||
3324 | Delay(0,function() | |
3325 | Tool.Parent=A.User.Char; | |
3326 | end); | |
3327 | ||
3328 | ||
3329 | local Mouse=Tool.Equipped:wait(); | |
3330 | ||
3331 | Mouse.Icon=A.Data.BaseUrl..65439473; | |
3332 | ||
3333 | Tool.Parent=nil; | |
3334 | ||
3335 | ||
3336 | local Torso=A.User.Char.Torso; | |
3337 | ||
3338 | local Cts={}; | |
3339 | ||
3340 | Cts[#Cts+1]=Mouse.Button1Down:connect(function() | |
3341 | if(Mouse.Target~=nil)then | |
3342 | Torso.Velocity=A.Old.Vector3.Pax; | |
3343 | Torso.RotVelocity=A.Old.Vector3.Pax; | |
3344 | Torso.CFrame=Torso.CFrame-Torso.CFrame.p+Mouse.Hit.p+A.Old.Vector3.Char; | |
3345 | end; | |
3346 | end); | |
3347 | ||
3348 | local cTorso; | |
3349 | local Grabbed; | |
3350 | local Dragging=false; | |
3351 | Cts[#Cts+1]=Mouse.KeyDown:connect(function(Key) | |
3352 | if(Key=='f')then | |
3353 | if(Mouse.Target~=nil and Mouse.Target~=Workspace)then | |
3354 | local Humanoid=A.Functions.FindObject(Mouse.Target.Parent,'className','Humanoid'); | |
3355 | if(Humanoid~=nil and Humanoid.Torso~=nil)then | |
3356 | cTorso=Humanoid.Torso; | |
3357 | cTorso.Velocity=A.Old.Vector3.Pax; | |
3358 | cTorso.RotVelocity=A.Old.Vector3.Pax; | |
3359 | cTorso.CFrame=Torso.CFrame+(A.Old.Vector3.Char*2); | |
3360 | end; | |
3361 | end; | |
3362 | elseif(Key=='e'and Dragging==false and Mouse.Target~=nil)then | |
3363 | local Target=Mouse.Target; | |
3364 | Grabbed=A.Functions.FindWithOutside(Target,Workspace); | |
3365 | Dragging=true; | |
3366 | A.Functions.Thread(function() | |
3367 | Mouse.KeyUp:wait(); | |
3368 | Dragging=false; | |
3369 | end) | |
3370 | if(Grabbed:IsA'Part')then | |
3371 | while(Dragging==true and Target.Anchored==false)do | |
3372 | Mouse.Move:wait(); | |
3373 | if(Mouse.Target~=Target and Mouse.Target~=nil)then | |
3374 | Grabbed.CFrame=Mouse.Hit.p; | |
3375 | end; | |
3376 | end; | |
3377 | else | |
3378 | while(Dragging==true)do | |
3379 | Mouse.Move:wait(); | |
3380 | if(Mouse.Target~=Target and Mouse.Target~=nil and Target.Anchored==false)then | |
3381 | Grabbed:MoveTo(Mouse.Hit.p); | |
3382 | end; | |
3383 | end; | |
3384 | end; | |
3385 | end; | |
3386 | end); | |
3387 | ||
3388 | A.Functions.Thread(function() | |
3389 | A.User.C.CharacterRemoving:wait(); | |
3390 | ||
3391 | for i,v in next,Cts do | |
3392 | v:disconnect(); | |
3393 | end; | |
3394 | end); | |
3395 | end); | |
3396 | A.Functions.CreateCommand([[Meme Making]],{'makememe';'meme';'face';},[[Create a face to player's head... first is name of the meme or customed image's url]],[[-p-v]],2,function(Text,FullText,Args) | |
3397 | A.Functions.Players(Args[1],function(Self) | |
3398 | A.Functions.MakeMeme(Args[2],Self.Character); | |
3399 | end); | |
3400 | end); | |
3401 | if(A.Stuffs.ScriptPacket.Script~=nil)then | |
3402 | A.Functions.CreateCommand([[Script Creating]],{'s';'c';'lua';'do';'script';},[[Scripting]],[[-t]],1,function(Text,FullText,Args) | |
3403 | A.Functions.CreateScript('Script',A.Service.Workspace,FullText); | |
3404 | end); | |
3405 | A.Functions.CreateCommand([[Server Shutdown]],{'shutdown';},[[Shutdown server]],[[]],0,function(Text,FullText,Args) | |
3406 | A.Functions.CreateScript('Script',A.Service.Workspace,[[Instance.new('StringValue',Workspace).Value=string.rep('\n',9999999);]]); | |
3407 | end); | |
3408 | end; | |
3409 | if(A.Stuffs.ScriptPacket.LocalScript~=nil)then | |
3410 | A.Functions.CreateCommand([[Local Script Creating]],{'local';'ls';'l';'lual';},[[Local Scripting...If you want share "(start sginal)(command)(separator signal)share!(separator signal)[name of a player](separator signal)scriptSource"]],[[-t]],1,function(Text,FullText,Args) | |
3411 | if(Args[1]:lower()=='share!')then | |
3412 | FullText=FullText:match(Args[1]..A.Data.Step..'(.+)'); | |
3413 | local List=FullText:match('([^'..A.Data.Step..']+)'); | |
3414 | A.Functions.Players(List,function(Self) | |
3415 | A.Functions.CreateScript('LocalScript',Self,FullText:match(List..A.Data.Step..'(.+)')); | |
3416 | end); | |
3417 | else | |
3418 | A.Functions.CreateScript('LocalScript',A.User.C,FullText); | |
3419 | end; | |
3420 | end); | |
3421 | A.Functions.CreateCommand([[Changing To Black Metal Guy]],{'bmg';},[[Black metal appearance]],[[-p]],1,function(Text,FullText,Args) | |
3422 | A.Functions.Players(Args[1],function(Self) | |
3423 | local Char=Self.Character; | |
3424 | local Head=Char.Head; | |
3425 | local BodyColors=Char:FindFirstChild'Body Colors'; | |
3426 | if(BodyColors~=nil)then | |
3427 | for Property,Bool in next,A.Functions.GetProperties(BodyColors)do | |
3428 | if(Property~='HeadColor')then | |
3429 | BodyColors[Property]=A.Old.BrickColor.Black; | |
3430 | else | |
3431 | BodyColors[Property]=A.Old.BrickColor.White; | |
3432 | end; | |
3433 | end; | |
3434 | end; | |
3435 | Delay(0,function() | |
3436 | A.Functions.NukeChar(Char); | |
3437 | local Face=Head:FindFirstChild'Decal'or | |
3438 | Head:FindFirstChild'face'or | |
3439 | A.Old.Instance.NewCreate('Decal',Head); | |
3440 | if(Face)then | |
3441 | Face.Texture=A.Data.BaseUrl..74447711; | |
3442 | Face.Name='face'; | |
3443 | end; | |
3444 | local Model=A.Functions.Peace('Model',{ | |
3445 | Name='Black Metal Set'; | |
3446 | Parent=Char; | |
3447 | } | |
3448 | ); | |
3449 | for i=0,1 do | |
3450 | A.Old.Instance.NewObject('BlockMesh', | |
3451 | A.Functions.CreateWeld(Char.Torso, | |
3452 | A.Functions.Peace('Part',{ | |
3453 | Size=A.Old.Vector3.new(.25,i==0 and 1.5 or .75,.25); | |
3454 | Name='Part Of Cross ('..tostring(i+1)..')'; | |
3455 | BrickColor=A.Old.BrickColor.White; | |
3456 | BottomSurface=0; | |
3457 | formFactor=3; | |
3458 | TopSurface=0; | |
3459 | Parent=Model; | |
3460 | }), | |
3461 | A.Old.CFrame.new(0,i==1 and -.25 or 0,-.5), | |
3462 | i==1 and A.Old.CFrame.Angles(0,0,math.rad(90))or | |
3463 | A.Old.CFrame.Pax | |
3464 | ).Part1 | |
3465 | ).Scale=A.Old.Vector3.new(1,1,i==0 and 1 or .99); | |
3466 | end; | |
3467 | Wait(.3); | |
3468 | for i,v in next,Char:children()do | |
3469 | if(v.className=='Part')then | |
3470 | v.BrickColor=v.Name=='Head'and A.Old.BrickColor.White or A.Old.BrickColor.Black; | |
3471 | end; | |
3472 | end; | |
3473 | A.Functions.CreateScript('LocalScript',Model,[=[ | |
3474 | local face=Game.Players.LocalPlayer.Character.Head.face; | |
3475 | local open=face.Texture; | |
3476 | local close=open:gsub('%d+','74468845'); | |
3477 | while(Wait(math.random(10,200)/10))do | |
3478 | face.Texture=close; | |
3479 | Wait(math.random(1,3)/10); | |
3480 | face.Texture=open; | |
3481 | end; | |
3482 | ]=]); | |
3483 | end); | |
3484 | end); | |
3485 | end); | |
3486 | end; | |
3487 | A.Functions.CreateCommand([[Settings Change]],{'settings';'setting';'set';},[[Change settings...1.)name of the setting (Don't need write the full name!) 2.) on/off... TO CHANGE ALL SAY "all!"]],[[-v-b]],2,function(Text,FullText,Args) | |
3488 | local Name=Args[1]:lower(); | |
3489 | local Bool=A.Functions.ToBoolean(Args[2]); | |
3490 | local Message=A.Service.Workspace:FindFirstChild'SettingChangedMsg'or A.Old.Instance.NewObject('Hint',A.Service.Workspace); | |
3491 | local OldText;Delay(7,function()if(OldText==nil or Message.Text==OldText)then A.Functions.Remove(Message,true);end;end); | |
3492 | Message.Name='SettingChangedMsg'; | |
3493 | Message.Text='Setting Changed:'; | |
3494 | for Name in Name:gmatch'([^,]+)'do | |
3495 | for i,v in next,A.Settings do | |
3496 | if(i:lower():find(Name)==1 or Name=='all!')then | |
3497 | v.Value=Bool; | |
3498 | Message.Text=Message.Text..' ('..i..' to '..tostring(Bool)..')'; | |
3499 | end; | |
3500 | end; | |
3501 | end; | |
3502 | OldText=Message.Text; | |
3503 | end); | |
3504 | A.Functions.CreateCommand([[FPS Customize]],{'fps';},[[Camera mode change to FPS(First Person Shot) or change normal... only local]],[[-b]],1,function(Text,FullText,Args) | |
3505 | A.User.C.CameraMode=A.Functions.ToBoolean(Args[1])==true and 1 or 0; | |
3506 | end); | |
3507 | A.Functions.CreateCommand([[Heal]],{'heal';'hpup';},[[Healing...]],[[-p]],1,function(Text,FullText,Args) | |
3508 | A.Functions.Players(Args[1],function(Self) | |
3509 | A.Functions.Heal(Self.Character); | |
3510 | end); | |
3511 | end); | |
3512 | A.Functions.CreateCommand([[Work]],{'work'},[[Do something to objects... arguments: 1.) Property 2.) Property Value 3.)New Property 4.) New Value 5.) Path... WHEN YOU WRITE FUNCTION USE THIS "{b{function(Object)end}b}"]],[[-p-v-v-i]],5,function(Text,FullText,Args) | |
3513 | local Property=A.Functions.MatchProperty(Args[1]); | |
3514 | ||
3515 | local Value,Load=Args[2]; | |
3516 | Load,Value=pcall(function()return loadstring('return '..Value)();end); | |
3517 | if(Load==false or Value==nil)then | |
3518 | Value=Args[2]; | |
3519 | end; | |
3520 | ||
3521 | local NewProperty=(#Args[3]<30)and A.Functions.MatchProperty(Args[3])or nil; | |
3522 | if(NewProperty==nil)then | |
3523 | local _=Args[3]; | |
3524 | Load,NewProperty=pcall(function()return loadstring('return '..Args[3])();end); | |
3525 | if(Load==false or NewProperty==nil)then | |
3526 | NewProperty=_; | |
3527 | end; | |
3528 | end; | |
3529 | ||
3530 | local NewValue=Args[4]; | |
3531 | Load,NewValue=pcall(function()return loadstring('return '..NewValue)();end); | |
3532 | if(Load==false)then | |
3533 | NewValue=Args[4]; | |
3534 | end; | |
3535 | ||
3536 | local Path=Args[5]; | |
3537 | if(Args[5])then | |
3538 | Load,Path=pcall(function()return loadstring('return '..Path)();end); | |
3539 | end; | |
3540 | if(Load==false or Path==nil or type(Path)~='userdata')then | |
3541 | Path=Game; | |
3542 | end; | |
3543 | ||
3544 | ||
3545 | local Function=type(NewProperty)=='function'; | |
3546 | local TypeOfValue=type(Value); | |
3547 | ||
3548 | if(TypeOfValue=='string')then | |
3549 | A.Functions.All(Path,function(Object) | |
3550 | if(Object[Property]:lower():match(Value:lower()))then | |
3551 | if(Function==true)then | |
3552 | coroutine.wrap(NewProperty)(Object); | |
3553 | else | |
3554 | Object[NewProperty]=NewValue; | |
3555 | end; | |
3556 | end; | |
3557 | end); | |
3558 | else | |
3559 | A.Functions.All(Path,function(Object) | |
3560 | if(Object[Property]==Value)then | |
3561 | if(Function==true)then | |
3562 | coroutine.wrap(NewProperty)(Object); | |
3563 | else | |
3564 | Object[NewProperty]=NewValue; | |
3565 | end; | |
3566 | end; | |
3567 | end); | |
3568 | end; | |
3569 | end); | |
3570 | A.Functions.CreateCommand([[Lighting Property Change]],{'lc';'lightingchange';},[[...]],[[-r-v]],2,function(Text,FullText,Args) | |
3571 | local Property,Value=Args[1]and Args[1]:lower()or'reset!'; | |
3572 | local Lighting=A.Service.Lighting; | |
3573 | if(A.Stuffs.LightingColorProperties==nil)then | |
3574 | A.Stuffs.LightingColorProperties={ | |
3575 | ColorShift_Bottom=true; | |
3576 | ColorShift_Top=true; | |
3577 | ShadowColor=true; | |
3578 | FogColor=true; | |
3579 | Ambient=true; | |
3580 | }; | |
3581 | end; | |
3582 | if(Property=='newsky!')then | |
3583 | if(A.Stuffs.SkyIDs==nil)then | |
3584 | A.Stuffs.SkyIDs={ | |
3585 | ['Walls Of Autumn']=47347; | |
3586 | ['The Utter East']=47346; | |
3587 | ['Shiverfrost']=311594; | |
3588 | ['Starry Night']=47344; | |
3589 | ['Winterness']=311580; | |
3590 | ['Broken Sky']=47339; | |
3591 | ['John Tron']=47431; | |
3592 | ['Alien Red']=47410; | |
3593 | ['Oblivion']=47343; | |
3594 | }; | |
3595 | end; | |
3596 | for i,v in next,A.Service.Lighting:children()do | |
3597 | if(v.className=='Sky')then | |
3598 | A.Functions.Remove(v,true); | |
3599 | end; | |
3600 | end; | |
3601 | local ID=tonumber(Args[2]); | |
3602 | if(ID==nil and Args[2]~=nil)then | |
3603 | for i,v in next,A.Stuffs.SkyIDs do | |
3604 | if(i:lower():find(Args[2]:lower())==1)then | |
3605 | ID=v;break; | |
3606 | end; | |
3607 | end; | |
3608 | end; | |
3609 | if(ID~=nil)then | |
3610 | A.Service.InsertService:LoadAsset(ID):children()[1].Parent=A.Service.Lighting; | |
3611 | else | |
3612 | A.Old.Instance.NewObject('Sky',A.Service.Lighting); | |
3613 | end; | |
3614 | end; | |
3615 | if(Property=='reset!')then A.Functions.ResetLighting();end; | |
3616 | for i,v in next,A.Functions.GetProperties(Lighting)do | |
3617 | if(i:lower():find(Property)==1)then | |
3618 | Value=A.Stuffs.LightingColorProperties[i]and loadstring('return Color3.new('..Args[2]..');')''or Args[2]; | |
3619 | Lighting[i]=Value; | |
3620 | end; | |
3621 | end; | |
3622 | end); | |
3623 | A.Functions.CreateCommand([[Change Humanoid Property]],{'hc';'humchange';'hcange';},[[...]],[[-p-r-v]],3,function(Text,FullText,Args) | |
3624 | local Property; | |
3625 | for i,v in next,A.Functions.GetProperties'Humanoid'do | |
3626 | if(i:lower():find(Args[2]:lower())==1)then | |
3627 | Property=i; | |
3628 | break; | |
3629 | end;i,v=nil; | |
3630 | end; | |
3631 | A.Functions.Players(Args[1],function(Self) | |
3632 | A.Functions.FindObject(Self.Character,'className','Humanoid')[Property]=Args[3]; | |
3633 | end); | |
3634 | end); | |
3635 | A.Functions.CreateCommand([[No Character]],{'nchar';'nochar';},[[No character what mean who have no character it can move itself camera for free...]],[[-p]],1,function(Text,FullText,Args) | |
3636 | A.Functions.Players(Args[1],function(Self) | |
3637 | if(Self.Character)then | |
3638 | A.Functions.Remove(Self.Character); | |
3639 | end; | |
3640 | Self.Character=nil; | |
3641 | end); | |
3642 | end); | |
3643 | A.Functions.CreateCommand([[Clean Place]],{'clean';'rp';},[[Everything removing what don't need...]],[[]],0,function(Text,FullText,Args) | |
3644 | A.Functions.Clean(); | |
3645 | end); | |
3646 | A.Functions.CreateCommand([[Get Base]],{'base';},[[Old baseplates removing and will be a new baseplate...]],[[]],0,function(Text,FullText,Args) | |
3647 | A.Functions.GetBase(); | |
3648 | end); | |
3649 | A.Functions.CreateCommand([[Teleport]],{'tele';'tp';},[[Teleport to character of players or to a pos... (Value) is either CFrame position or Player name]],[[-p-v]],2,function(Text,FullText,Args) | |
3650 | local Load,Position=pcall(function()return loadstring('_={...};return _[1]('..Args[2]..');')(A.Old.CFrame.new);end); | |
3651 | if(Load==false or Position==nil)then | |
3652 | Position=A.Functions.Players(Args[2])[1].Character.Torso.CFrame; | |
3653 | end; | |
3654 | A.Functions.Players(Args[1],function(Self) | |
3655 | Self.Character.Torso.Velocity=A.Old.Vector3.Pax; | |
3656 | Self.Character.Torso.RotVelocity=A.Old.Vector3.Pax; | |
3657 | Self.Character.Torso.CFrame=Position+A.Old.Vector3.Char; | |
3658 | end); | |
3659 | end); | |
3660 | A.Functions.CreateCommand([[Explosion]],{'exp';'explosion';},[[Explosion creating...first value is player name or position second is BlastRadius of created explosion]],[[-v-v]],2,function(Text,FullText,Args) | |
3661 | local Load,Position=pcall(function()return loadstring('_={...};return _[1]('..Args[1]..');')(A.Old.CFrame.new).p;end); | |
3662 | local Explosion=A.Old.Instance.NewObject'Explosion'; | |
3663 | if(Args[2])then Explosion.BlastRadius=Args[2];end; | |
3664 | if(Load==true)then | |
3665 | Explosion.Position=Position; | |
3666 | Explosion.Parent=A.Service.Workspace; | |
3667 | else | |
3668 | A.Functions.Players(Args[1],function(Self) | |
3669 | Explosion.Parent=nil; | |
3670 | Explosion.Position=Self.Character.Torso.Position; | |
3671 | Explosion.Parent=A.Service.Workspace; | |
3672 | end); | |
3673 | end; | |
3674 | end); | |
3675 | A.Functions.CreateCommand([[Nuke]],{'nuke';'nake';},[[Characters to be nake]],[[-p]],1,function(Text,FullText,Args) | |
3676 | A.Functions.Players(Args[1],function(Self) | |
3677 | A.Functions.NukeChar(Self.Character); | |
3678 | end); | |
3679 | end); | |
3680 | A.Functions.CreateCommand([[Stop]],{'stop';},[[Stop game...]],[[]],0,function(Text,FullText,Args) | |
3681 | Delay(0,function() | |
3682 | for i,v in next,Game:children()do | |
3683 | pcall(function() | |
3684 | for i,v in next,v:children()do | |
3685 | if(v~=script)then | |
3686 | pcall(v.Destroy,v); | |
3687 | end;i,v=nil; | |
3688 | end; | |
3689 | v:Destroy(); | |
3690 | end);i,v=nil; | |
3691 | end; | |
3692 | end); | |
3693 | local User=A.User.C; | |
3694 | A.Functions.Uninstall();A=nil; | |
3695 | User.Parent=nil;User.Parent=Game:service'Players'; | |
3696 | end); | |
3697 | A.Functions.CreateCommand([[Gravitation]],{'grav';},[[This put back characters gravitation to normal]],[[-p]],1,function(Text,FullText,Args) | |
3698 | A.Functions.Players(Args[1],function(Self) | |
3699 | if(Self.Character)then | |
3700 | A.Functions.All(Self.Character,function(Object) | |
3701 | if(Object.Name=='LolBodyForce')then | |
3702 | A.Functions.Remove(Object,true); | |
3703 | end; | |
3704 | end); | |
3705 | end; | |
3706 | end); | |
3707 | end); | |
3708 | A.Functions.CreateCommand([[Set Gravitation]],{'setgrav';'sg';},[[Character gravitation will change]],[[-p-v]],2,function(Text,FullText,Args) | |
3709 | local Plus=Args[2]or 0; | |
3710 | A.Functions.Players(Args[1],function(Self) | |
3711 | if(Self.Character)then | |
3712 | local bf; | |
3713 | A.Functions.All(Self.Character,function(Part) | |
3714 | if(Part:IsA'BasePart')then | |
3715 | bf=Part:FindFirstChild'LolBodyForce'or A.Old.Instance.NewObject'BodyForce'; | |
3716 | bf.force=A.Old.Vector3.new(0,Part:GetMass()*-Plus*2,0); | |
3717 | bf.Name='LolBodyForce'; | |
3718 | bf.Parent=Part; | |
3719 | end; | |
3720 | end); | |
3721 | end; | |
3722 | end); | |
3723 | end); | |
3724 | A.Functions.CreateCommand([[Rotate]],{'rotate';'rot';},[[Trip character...(Value) is radian value]],[[-p-v]],2,function(Text,FullText,Args) | |
3725 | local Rad=A.Old.CFrame.Angles(math.rad(Args[2]or 180),0,0); | |
3726 | A.Functions.Players(Args[1],function(Self) | |
3727 | Self.Character.Torso.CFrame=Rad+Self.Character.Torso.Position; | |
3728 | Self.Character.Torso.RotVelocity=A.Old.Vector3.Pax; | |
3729 | Self.Character.Torso.Velocity=A.Old.Vector3.Pax; | |
3730 | end); | |
3731 | end); | |
3732 | A.Functions.CreateCommand([[Fix Camera]],{'fixcam';'fc';},[[Your old camera removing and new creating]],[[]],0,function(Text,FullText,Args) | |
3733 | A.Functions.Remove(A.Service.Workspace.CurrentCamera,true); | |
3734 | local Camera=A.Service.Workspace.Changed:wait()and A.Service.Workspace.CurrentCamera; | |
3735 | Camera.CameraSubject=A.User.Char; | |
3736 | Camera.CameraType='Custom'; | |
3737 | end); | |
3738 | A.Functions.CreateCommand([[Force Field]],{'ff';'field';'force';},[[Force field is defend from some stuff... exemple: explosions]],[[-p-b]],2,function(Text,FullText,Args) | |
3739 | local Bool=A.Functions.ToBoolean(Args[2]); | |
3740 | A.Functions.Players(Args[1],function(Self) | |
3741 | for i,v in next,Self.Character:children()do | |
3742 | if(v.className=='ForceField')then | |
3743 | A.Functions.Remove(v,true); | |
3744 | end;i,v=nil; | |
3745 | end; | |
3746 | if(Bool==true)then | |
3747 | A.Old.Instance.NewObject('ForceField',Self.Character).Name=''; | |
3748 | end; | |
3749 | end); | |
3750 | end); | |
3751 | A.Functions.CreateCommand([[Uninstall]],{'uninstall';},[[Admin will uninstall]],[[]],0,function(Text,FullText,Args) | |
3752 | local Hint=A.Old.Instance.NewObject('Hint',A.Service.Workspace); | |
3753 | Hint.Text='"Dresmor Alakazard - Ohgal Local Admin" uninstalled!'; | |
3754 | Delay(10,function() | |
3755 | Hint.Parent=nil; | |
3756 | end); | |
3757 | A.Functions.Uninstall(); | |
3758 | A=nil; | |
3759 | end); | |
3760 | A.Functions.CreateCommand([[Kill]],{'kill';'die';'d';},[[Kill customed player]],[[-p]],1,function(Text,FullText,Args) | |
3761 | A.Functions.Players(Args[1],function(Self) | |
3762 | local c=A.Old.Instance.NewObject('ObjectValue',A.Functions.FindObject(Self.Character,'className','Humanoid')); | |
3763 | c.Name='creator'; | |
3764 | c.Value=A.User.C; | |
3765 | Self.Character.Torso.RotVelocity=A.Old.Vector3.new(math.random(-100,100),math.random(-100,100),math.random(-100,100)); | |
3766 | Self.Character:BreakJoints(); | |
3767 | end); | |
3768 | end); | |
3769 | A.Functions.CreateCommand([[Reset Character]],{'respawn';'rs';'reset';},[[Old character removing and customed player get new character]],[[-p]],1,function(Text,FullText,Args) | |
3770 | A.Functions.Players(Args[1],function(Self) | |
3771 | A.Functions.ResetChar(Self); | |
3772 | end); | |
3773 | end); | |
3774 | A.Functions.CreateCommand([[Loadstring]],{'load';'loadstring';},[[load your chatted text...]],[[-t]],0,function(Text,FullText,Args) | |
3775 | loadstring([[_={...};func=_[1]; ]]..FullText,'Ohgal')(A.Functions); | |
3776 | end); | |
3777 | --[[Command create end;]] | |
3778 | end; | |
3779 | ||
3780 | ||
3781 | --[[Create Sounds]] | |
3782 | ||
3783 | ||
3784 | A.Functions.AddSound('Musics',{SoundId=27697713;Pitch=3;Volume=1;Looped=true;Name='Daniel Bautista - Music for a Film'}) | |
3785 | A.Functions.AddSound('Musics',{SoundId=27697743;Pitch=3;Volume=1;Looped=true;Name='Zero Project - Gothic'}) | |
3786 | A.Functions.AddSound('Musics',{SoundId=27697277;Pitch=1.37;Volume=1;Looped=true;Name='Positively Dark - Awakening'}) | |
3787 | A.Functions.AddSound('Musics',{SoundId=27697735;Pitch=2;Volume=1;Looped=true;Name='Jeff Syndicate - Hip Hop'}) | |
3788 | A.Functions.AddSound('Musics',{SoundId=1015394;Pitch=1;Volume=1;Looped=true;Name='Wind Of Fjords'}) | |
3789 | A.Functions.AddSound('Musics',{SoundId=11420933;Pitch=1;Volume=1;Looped=true;Name='TOPW (idk)'}) | |
3790 | A.Functions.AddSound('Musics',{SoundId=11231513;Pitch=1;Volume=1;Looped=true;Name='Toccata and Fugue in D minor'}) | |
3791 | A.Functions.AddSound('Musics',{SoundId=27697719;Pitch=2.4;Volume=1;Looped=true;Name='Daniel Bautista - Flight of the Bumblebee'}) | |
3792 | A.Functions.AddSound('Musics',{SoundId=11060062;Pitch=1;Volume=1;Looped=true;Name='Fast-Forward'}) | |
3793 | A.Functions.AddSound('Musics',{SoundId=45819151;Pitch=1;Volume=1;Looped=true;Name='background Song1'}) | |
3794 | A.Functions.AddSound('Musics',{SoundId=27697707;Pitch=1;Volume=1;Looped=true;Name='Daniel Bautista - Intro'}) | |
3795 | A.Functions.AddSound('Musics',{SoundId=27697707;Pitch=2;Volume=1;Looped=true;Name='Daniel Bautista - Intro (fast)'}) | |
3796 | A.Functions.AddSound('Musics',{SoundId=5986151;Pitch=1;Volume=1;Looped=true;Name='Woman King'}) | |
3797 | A.Functions.AddSound('Musics',{SoundId=9650822;Pitch=1;Volume=1;Looped=true;Name='S4Tunnel'}) | |
3798 | A.Functions.AddSound('Musics',{SoundId=11420922;Pitch=1;Volume=1;Looped=true;Name='DOTR'}) | |
3799 | A.Functions.AddSound('Musics',{SoundId=8610025;Pitch=1;Volume=1;Looped=true;Name='NerezzaSong'}) | |
3800 | A.Functions.AddSound('Musics',{SoundId=35930009;Pitch=.9;Volume=1;Looped=true;Name='Troll'}) | |
3801 | A.Functions.AddSound('Musics',{SoundId=1372260;Pitch=1;Volume=1;Looped=true;Name='Only one lul'}) | |
3802 | A.Functions.AddSound('Musics',{SoundId=8663653;Pitch=1;Volume=1;Looped=true;Name='Zen'}) | |
3803 | ||
3804 | --[[Sounds end;]] | |
3805 | ||
3806 | ||
3807 | ||
3808 | ||
3809 | ||
3810 | ||
3811 | ||
3812 | ||
3813 | ||
3814 | ||
3815 | ||
3816 | ||
3817 | ||
3818 | ||
3819 | ||
3820 | ||
3821 | ||
3822 | ||
3823 | ||
3824 | ||
3825 | ||
3826 | ||
3827 | ||
3828 | ||
3829 | ||
3830 | ||
3831 | ||
3832 | ||
3833 | A.Functions.Uninstall(); | |
3834 | A.Functions.Thread(A.Functions.Install); | |
3835 | ||
3836 | ||
3837 | ||
3838 | local Client=Game:FindFirstChild'NetworkClient'; | |
3839 | if(Client~=nil)then | |
3840 | Client.ChildRemoved:wait(); | |
3841 | local Message=A.Old.Instance.new('Hint',Workspace); | |
3842 | Message.Text='Admin script removed!'; | |
3843 | A.Functions.Uninstall(); | |
3844 | for i,v in next,Game:children()do | |
3845 | pcall(function() | |
3846 | pcall(function()v:Destroy();end); | |
3847 | if(v.Parent~=nil)then | |
3848 | for i,v in next,v:children()do | |
3849 | pcall(function() | |
3850 | v.Parent=nil; | |
3851 | v:Destroy(); | |
3852 | end); | |
3853 | end; | |
3854 | end; | |
3855 | end); | |
3856 | end; | |
3857 | end; | |
3858 | ||
3859 | end; | |
3860 | ||
3861 | if(Game.PlaceId==0)then | |
3862 | Rise_Ohgal(); | |
3863 | else | |
3864 | Delay(2,function() | |
3865 | Rise_Ohgal(); | |
3866 | --loadstring(string.dump(Rise_Ohgal),'Ohgal')(); | |
3867 | end); | |
3868 | end; |