View difference between Paste ID: UPG1q5Gy and 0W4TuwJw
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;