Rise_Ohgal=function()

A={};
A.Old={};
A.Data={};
A.User={};
A.Calls={};
A.Images={};
A.Stuffs={};
A.Sounds={};
A.Modules={};
A.Service={};
A.Settings={};
A.Commands={};
A.Warehouse={};
A.Functions={};
A.EachCalls={};
A.GuiModules={};
A.SettingIDs={};
A.KeyCommands={};
A.ObjectsData={};
A.RecentCommands={};
A.SettingsFunctions={};

A.Stuffs.Meter={};
A.Warehouse.Objects={};
A.Warehouse.Connections={};

A.ObjectsData.KnowProperties={};
A.ObjectsData.KnowPropertiesNumber={};
A.ObjectsData.GlobalProperties={'Name';'className';'Parent';'archivable'};
A.ObjectsData.EspecialProperties={
	'Neutral';'PlayerMouse';'Mouse';'Volume';'Ip';'Ticket';'PlaceId';'JobId';'CreatorId';'location';
	'Adornee';'Port';'RobloxLocked';'DataCost';'BaseUrl';'RequestQueueSize';'AttachmentForward';
	'BottomSurface';'FrontSurface';'LeftSurface';'RightSurface';'TopSurface';'AbsolutePosition';
	'Value';'CameraType';'CameraSubject';'BaseTextureId';'BodyPart';'MeshId';'OverlayTextureId';
	'BorderSizePixel';'SizeConstraint';'Visible';'ZIndex';'C0';'C1';'Part0';'Part1';'BinType';
	'MaxItems';'ResizeableFaces';'DataComplexity';'DataReady';'MembershipType';'AccountAge';
	'CanCollide';'Locked';'Elasticity';'Friction';'Shape';'Size';'formFactor';'BackSurface';
	'HeadColor';'RightArmColor';'LeftArmColor';'TorsoColor';'LeftLegColor';'RightLegColor';
	'Material';'Reflectance';'Transparency';'Position';'RotVelocity';'Velocity';'Anchored';
	'Pitch';'IsPlaying';'IsPaused';'Looped';'PlayOnRemove';'StudsPerTileU';'StudsPerTileV';
	'GripRight';'GripUp';'TextureId';'TeamColor';'Enabled';'cframe';'CFrame';'BrickColor';
	'CurrentAngle';'DesiredAngle';'MaxVelocity';'PantsTemplate';'ShirtTemplate';'SoundId';
	'LeftLeg';'RightLeg';'Torso';'Health';'MaxHealth';'WalkSpeed';'Jump';'PlatformStand';
	'MaxActivationDistance';'Shiny';'Specular';'Texture';'Face';'GripForward';'GripPos';
	'ColorShift_Bottom';'ColorShift_Top';'ShadowColor';'GeographicLatitude';'TimeOfDay';
	'Ip';'MaxExtents';'MembershipTypeReplicate';'ResizeIncrement';'DistributedGameTime';
	'AbsoluteSize';'Active';'BackgroundColor3';'BackgroundTransparency';'BorderColor3';
	'Vertex';'TextStrokeTransparency';'TextStrokeColor3';'TextFits';'ClipsDescendants';
	'AttachmentPos';'AttachmentRight';'ScriptsDisabled';'AttachmentUp';'AnimationId';
	'AmbientReverb';'DistanceFactor';'DopplerScale';'RolloffScale';'Source';'Scale';
	'Sit';'AutoButtonColor';'Image';'LinkedSource';'Disabled';'Text';'PrimaryPart';
	'From';'To';'Icon';'FogEnd';'FogStart';'FogColor';'CameraMode';'FieldOfView';
	'userId';'BubbleChat';'ClassicChat';'MaxPlayers';'NumPlayers';'LocalPlayer';
	'CharacterAppearance';'Character';'CurrentCamera';'Ambient';'Brightness';
	'VertexColor';
};
A.ObjectsData.EspecialPropertiesLower={};
for i,v in next,A.ObjectsData.EspecialProperties do
	A.ObjectsData.EspecialPropertiesLower[i]=v:lower();
end;

A.Images.Meme={
	megusta=47594659;
	sparta=74142203;
	sovpax=60298055;
	ujelly=48989071;
	smile2=63175216;
	smile3=63186465;
	troll=45120559;
	horse=62079221;
	angry=48258623;
	orzse=62677682;
	smile=63174888;
	rofl=47595647;
	okey=62830600;
	yeaw=53646377;
	here=62677045;
	har=48260066;
	sun=47596170;
	lol=48293007;
	sad=53645378;
	lin=48290678;
	sls=53646388;
	j1d=45031979;
	jim=74885351;
};


--[[Functions]]
A.Functions.Thread=function(Function)
	return coroutine.resume(coroutine.create(Function));
end;
A.Functions.Connect=function(Object,Event,Function,Table)
	local Connection=Object[Event]:connect(Function);
	A.Warehouse.Connections[#A.Warehouse.Connections+1]=Connection;
	if(Table~=nil)then
		Table.Connections[#Table.Connections+1]=Connection;
	end;
	return Object,Connection;
end;
A.Functions.Wait=function(Number)
	local _,Number2=A.Service.RunService.Stepped:wait();
	local Plus;
	Number=Number and Number-.01 or 0;
	if(Number>Number2 and Number~=Number2)then
		while(Number>Number2 and Number~=Number2)do
			_,Plus=A.Service.RunService.Stepped:wait();
			Number2=Number2+Plus;
		end;
	end;
end;
A.Functions.MatchProperty=function(Text)

	Text=Text:lower();

	local Found;

	for i,v in next,A.ObjectsData.GlobalProperties do
		if(v:lower():find(Text)==1)then
			Found=v;
			break;
		end;
	end;

	if(Found==nil)then
		for i,v in next,A.ObjectsData.EspecialPropertiesLower do
			if(v:find(Text)==1)then
				Property=A.ObjectsData.EspecialProperties[i];
				break;
			end;i,v=nil;
		end;
	end;

	return Found;

end;
A.Functions.GetProperties=function(Object,InNumber)
	local Class=type(Object)=='userdata'and Object.className or Object
	if(A.ObjectsData.KnowProperties[Class]==nil)then
		if(type(Object)=='string')then
			Object=A.Old.Instance.NewObject(Object);
		end;
		local New={};
		for i,v in next,A.ObjectsData.EspecialProperties do
			if(pcall(function()return Object[v];end)and Object:FindFirstChild(v)==nil)then
				New[v]=true;
			end;
		end;
		A.ObjectsData.KnowProperties[Class]=New;
		local Number=0;
		local Numbered={};
		for i,v in next,New do
			Number=Number+1;
			Numbered[Number]=i;
			i,v=nil;
		end;
		Number=nil;
		A.ObjectsData.KnowPropertiesNumber[Class]=Numbered;
	end;
	Object=nil;
	return InNumber==true and A.ObjectsData.KnowPropertiesNumber[Class]or A.ObjectsData.KnowProperties[Class];
end;
A.Functions.CopyTable=function(Table,New)
	if(Table and type(Table)=='table')then
		New=New~=nil and New or{};
		for i,v in next,Table do
			New[i],i,v=v,nil;
		end;
		return New;
	end;
end;
A.Functions.GetData=function(Object)
	local Class=Object.className;
	if(A.Warehouse.Objects[Class])then
		for i,v in next,A.Warehouse.Objects[Class]do
			if(v.Object==Object)then
				v.Rank=i;
				return v;
			else i,v=nil;
			end;
		end;
	end;
	return nil;
end;
A.Functions.KillData=function(Object,Data)
	Data=Data~=nil and Data or A.Functions.GetData(Object);
	if(Data~=nil)then
		for i,v in next,Data.Connections do
			v:disconnect();i,v=nil;
		end;
		table.remove(Data.Mother(),Data.Rank);
		for i,v in next,Data do
			Data[i],i,v=nil;
		end;
	end;
	return Object;
end;
A.Functions.GiveData=function(Object)
	if(A.Functions.GetData(Object)==nil)then
		local Class=Object.className;
		if(A.Warehouse.Objects[Class]==nil)then A.Warehouse.Objects[Class]={};end;
		local Rank=#A.Warehouse.Objects[Class]+1;
		local Data={};A.Warehouse.Objects[Class][Rank]=Data;
		Data.Rank=Rank
		Data.Object=Object;
		Data.Properties={};
		Data.Connections={};
		Data.Mother=function()return A.Warehouse.Objects[Class];end;

		A.Functions.Connect(Object,'Changed',function(Property)
			if(Data.Properties[Property]~=nil)then
				local Health=Data.Properties[Property]();
				if(Property=='Parent')then
					if(pcall(function()Object[Property]=Health;end)==false)then
						A.Functions.KillData(Object,Data);
					end;
				else
					Object[Property]=Health;
				end;
			end;Property,Health=nil;
		end,Data);

		return Object,Data;
	end;
end;
A.Functions.Remove=function(Object,Destroy)
	if(Object)then
		pcall(function()
			Object.Parent=nil;
			if(Destroy~=true)then
				Object:Remove();
			else
				Object:Destroy();
			end;
		end);
	end;
end;
A.Functions.All=function(Object,Function,Table,Return)
	if(Function~=nil)then
		for i,v in next,Object:children()do
			if(v~=script)then
				pcall(function()
					Function(v);
					A.Functions.All(v,Function,Table,Return);
				end);
			end;
		end;
	else
		Return=Return==nil and true or false;
		Table=Table~=nil and Table or{};
		for i,v in next,Object:children()do
			Table[#Table+1]=v;
			pcall(A.Functions.All,v,nil,Table,Return);
			i,v=nil;
		end;
		if(Return)then
			return Table;
		end;
	end;
end;
A.Functions.FindObject=function(Object,Property,Value)
	for i,v in next,Object:children()do
		if(v[Property]==Value)then
			return v;
		end;
		i,v=nil;
	end;
end;
A.Functions.ObjectWait=function(Object,Property,Value)
	local Part=A.Functions.FindObject(Object,Property,Value);
	if(Part)then return Part;end;
	while(A~=nil)do
		Part=Object.ChildAdded:wait();
		if(Part[Property]==Value)then
			return Part;
		end;
	end;
end;
A.Functions.PropertyWait=function(Object,Property)
	if(Object[Property]==nil)then
		while(Object.Changed:wait()~=Property)do end;
	end;
	return Object[Property];
end;
A.Functions.CreateCall=function(Description,Calls,Function)
	local Rank=#A.Calls+1;
	local New={};A.Calls[Rank]=New;
		New.Function=Function;
		New.Description=Description;
		New.Calls='"'..table.concat(Calls,'","')..'"';
	for i,v in next,Calls do
		A.EachCalls[v]=function(...)return A.Calls[Rank].Function(...);end;
	end;
	New,Description,Calls,Function=nil;
end;
A.Functions.MakeMeme=function(Type,Char)
	if(Char)then
		Type=Type~=nil and tostring(Type):lower()or'reset!'
		local Meme=A.Images.Meme[Type]or Type;
		local BBG_SIZE=Char.Head.Size.X*1.25;
		local STUD_VECTOR_1=Char.Head.Size.Z/4;
		local STUD_VECTOR_2=Char.Head.Size.Z;
		local bbg=Char:FindFirstChild'BBGMEME'or A.Old.Instance.NewObject('BillboardGui',Char);
			bbg.StudsOffset=A.Old.Vector3.new(0,STUD_VECTOR_1,STUD_VECTOR_2);
			bbg.Size=A.Old.UDim2.new(BBG_SIZE,0,BBG_SIZE);
			bbg.Adornee=Char.Head;
			bbg.Name='BBGMEME';
		local img=bbg:FindFirstChild'Meme'or A.Old.Instance.NewObject('ImageLabel',bbg);
			img.BackgroundTransparency=1;
			img.Image=A.Data.BaseUrl..Meme;
			img.Size=A.Old.UDim2.Full;
			img.Name='Meme';
		for i,v in next,Char:children()do
			if(v.className=='Hat')then
				v=v:FindFirstChild'Handle';
				if(v)then
					v.Transparency=Type~='reset!'and 1 or 0;
				end;
			end;
			i,v=nil;
		end;
		img,bbg,Type,Char=nil;
	end;
end;
A.Functions.Players=function(Name,Function)
	Name=Name~=nil and Name:lower()or'all!';
	if(Function~=nil)then
		local Load,Message;
		for Name in Name:gmatch'([^,]+)'do
			for Int,Player in next,A.Service.Players:GetPlayers()do
				Load,Message=pcall(function()
					if(Player.Name:lower():find(Name)==1 or A.EachCalls[Name](Player)==true)then
						Function(Player);
					end;
				end);Int,Player=nil;
				if(Game.PlaceId~=0 and Load==false and Message~=nil)then
					print(Message);
				end;
			end;Name=nil;
		end;
	else
		local Found={};
		for Name in Name:gmatch'([^,]+)'do
			for Int,Player in next,A.Service.Players:GetPlayers()do
				pcall(function()
					if(Name=='all!'or(A.EachCalls[Name]~=nil and A.EachCalls[Name](Player))or Player.Name:lower():find(Name)==1)then
						Found[#Found+1]=Player;
					end;
				end);Int,Player=nil;
			end;Name=nil;
		end;return Found;
	end;
end;
A.Functions.Peace=function(Object,Properties)
	Object=type(Object)=='string'and A.Old.Instance.NewObject(Object)or Object;
	local Parent=Properties.Parent;
	Properties.Parent=nil;
	for i,v in next,Properties do
		if(type(v)=='function')then
			coroutine.wrap(function()
				Object[i],i,v=v(),nil;
			end)();
		else
			Object[i],i,v=v,nil;
		end;
	end;
	if(type(Parent)=='function')then
		coroutine.wrap(function()
			Object.Parent=Parent();
		end)();
	else
		Object.Parent=Parent;
	end;
	return Object;
end;
A.Functions.Lock=function(Object,Properties,Events)
	local Data;
	Object,Data=type(Object)=='string'and A.Old.Instance.new(Object)or Object;
	if(type(Data)~='table')then
		Data=A.Functions.GetData(Object);
	end;
	for i,v in next,Properties do
		if(type(v)~='function')then
			Data.Properties[i]=function()return v;end;
		else
			Data.Properties[i]=v;
		end;
	end;
	A.Functions.Peace(Object,Properties);
	if(Events~=nil)then
		for i,v in next,Events do
			A.Functions.Connect(Object,i,v,Data);i,v=nil;
		end;
	end;
	return Object,Data;
end;
A.Functions.CreateModule=function(Type,Function)
	if(A.Modules[Type]==nil)then A.Modules[Type]={};end;
	A.Modules[Type][#A.Modules[Type]+1]=Function;
end;
A.Functions.LoadModule=function(Type)
	if(A.Modules[Type]~=nil)then
		local Load;
		for Number,Error in next,A.Modules[Type]do
			Load,Error=A.Functions.Thread(Error);
			if(Load==false)then
				print('ERROR: Modules.'..Type..'['..Number..']',Error);
			end;
			Load,Error=nil;
		end;
	end;
end;
A.Functions.VisibleOfHealthGUI=function(Bool)
	if(A.User.PlayerGui~=nil)then
		local Stuff=A.User.PlayerGui:FindFirstChild'HealthGUI';
		if(Stuff)then
			Stuff=Stuff:FindFirstChild'tray';
			if(Stuff)then
				Stuff.Visible=A.Settings.HealthBar.Value==false;
			end;
		end;
	end;
end;
A.Functions.Uninstall=function()
	local Connections=UDim['Dresmor Alakazard - Connections Of Ohgal Local Admin'];
	local Objects=UDim['Dresmor Alakazard - Objects Of Ohgal Local Admin'];
	if(Connections)then
		for i,v in next,Connections do
			v:disconnect();i,v=nil;
		end;
	end;
	if(Objects)then
		for i,v in next,Objects do
			for i,v in next,v do
				A.Functions.Remove(v.Object,true);i,v=nil;
			end;i,v=nil;
		end;
	end;
	UDim['Dresmor Alakazard - Visit Version Of Ohgal Local Admin']=
	UDim['Dresmor Alakazard - Visit Version Of Ohgal Local Admin']and
	UDim['Dresmor Alakazard - Visit Version Of Ohgal Local Admin']+1 or
	0;
end;
A.Functions.CreateScript=function(Type,Parent,Text)
	local Script=A.Stuffs.ScriptPacket[Type]:clone();
		Script.Name=A.Service.Workspace.DistributedGameTime;
		Script.Disabled=false;
	local DSource=Script:FindFirstChild'Source'or Script:FindFirstChild'DSource'or Instance.new('StringValue',Script);
		DSource.Name=DSource.Name=='Value'and'DSource'or DSource.Name;
		DSource.Value=A.Stuffs.StarterSource..Text;

	for i,v in next,A.Stuffs.ScriptPacket do
		v:clone().Parent=Script;
	end;

	if(Parent~=nil and Parent.className=='Player')then
		Script.Parent=Parent.Character.Parent==A.Service.Workspace and Parent.Character or
			A.Functions.FindObject(Parent,'className','Backpack')or
			A.Functions.FindObject(Parent,'className','PlayerGui');
	else
		Script.Parent=Parent;
	end;

	return Script
end;
A.Functions.Install=function()
	if(Game.PlaceId~=0)then
		if(script~=nil)then
			script.Parent=A.Service.Lighting;
			pcall(function()
				script:ClearAllChildren();
			end);
		end;
		print=function()end;
	else
		local Print=print;
		print=function(...)
			Print('|:. Ohgal .:|',...);
		end;
	end;

	local Script;A.Stuffs.ScriptPacket={};
	if(script~=nil)then
		script.Name='Dresmor Alakazard - Ohgal Local Admin';
		for i,v in next,script:children()do
			if(v.className=='LocalScript'or v.className=='Script')then
				A.Stuffs.ScriptPacket[v.className]=v;
			end;
		end;
	end;
	if(Game.CreatorId==5111623)then
		local Model=A.Old.Instance.NewObject'Model';
		Wait();
		if(newLocalScript~=nil and A.Stuffs.ScriptPacket.LocalScript==nil)then
			newLocalScript('--Hello word!',Model);
			A.Stuffs.ScriptPacket.LocalScript=Model:children()[1];
		end;
		if(newScript~=nil and A.Stuffs.ScriptPacket.Script==nil)then
			newScript('--Hello word!',Model);
			A.Stuffs.ScriptPacket.Script=Model:children()[2];
		end;
	else
		local Pack=A.Service.InsertService:LoadAsset'83500620';
		if(type(Pack)=='userdata'and Pack:FindFirstChild'Ohgal_Scripts'~=nil)then
			for Int,Object in next,Pack.Ohgal_Scripts:children()do
				if(A.Stuffs.ScriptPacket[Object.className]==nil)then
					A.Stuffs.ScriptPacket[Object.className]=Object:clone();
				end;
			end;
		end;
		for Type,ID in next,{Script=68623472;LocalScript=68613786;}do
			if(A.Stuffs.ScriptPacket[Type]==nil)then
				Script=A.Service.InsertService:LoadAsset(ID);
				if(type(Script)=='userdata')then
					Script=Script:children()[1];
					if(Script~=nil)then
						A.Stuffs.ScriptPacket[Type]=Script:clone();
						Script.Disabled=true;
					end;
				end;
			end;
		end;
	end;

	if(script~=nil and Game.PlaceId==0)then
		script:ClearAllChildren();
		for i,v in next,A.Stuffs.ScriptPacket do
			v.Parent=script;
		end;
	end;

	A.Functions.SetupCommands();

	if(A.SettingIDs[1]==nil)then
		local Number=0;
		for i,v in next,A.Settings do Number=Number+1;
			A.Settings[i]=A.Functions.Value('Bool',v);v=A.Settings[i];
			A.SettingIDs[Number]={Object=v;Name=i;};
			if(i=='HealthBar')then
				coroutine.wrap(function()
					while(A~=nil)do
						A.Functions.VisibleOfHealthGUI(v.Changed:wait()==false);
					end;
				end)();
			end;
		end;
	end;

	UDim['Dresmor Alakazard - Connections Of Ohgal Local Admin']=A.Warehouse.Connections;
	UDim['Dresmor Alakazard - Objects Of Ohgal Local Admin']=A.Warehouse.Objects;
	UDim['Dresmor Alakazard - Visit Version Of Ohgal Local Admin']=
		UDim['Dresmor Alakazard - Visit Version Of Ohgal Local Admin']and
		UDim['Dresmor Alakazard - Visit Version Of Ohgal Local Admin']+1 or
		0;
	A.Data.VisitVersion=UDim['Dresmor Alakazard - Visit Version Of Ohgal Local Admin'];

	A.User.C=A.Functions.PropertyWait(A.Service.Players,'LocalPlayer');
	A.User.Humanoid=A.Functions.Value'Object';
	A.User.Connections={};
	A.User.Windows={};
	A.User.Frames={};
	A.User.Gui={};

	for i,v in next,{'PlayerGui','Backpack'}do
		A.User[v]=A.Functions.FindObject(A.User.C,'className',v);
	end;


	A.Functions.LoadModule'Once';
	A.Functions.LoadModule'Backpack';
	A.Functions.LoadModule'PlayerGui';


	A.Functions.Connect(A.User.C,'Chatted',function(Text)
		Wait();
		A.Functions.SearchCommand(Text);
		Text=nil;
	end);
	A.Functions.Connect(A.User.C,'ChildAdded',function(Object)
		Wait();
		local Class=Object.className;
		if(Class=='Backpack'or Class=='PlayerGui')then
			A.User[Class]=Object;
			A.Functions.LoadModule(Class);
		elseif(Class=='StringValue'and Object.Name=='Ohgal_Execution')then
			coroutine.wrap(function(Text,Name,Object)loadstring([=[local script={...};script=script[1]; ]=]..Text,Name)(Object);end)(Object.Value,'Ohgal',Object);
		end;
	end);

	A.Stuffs.Meter.Local={};
	A.Stuffs.Meter.Server={};

	A.Stuffs.Meter.Server.Players=A.Functions.Value'Number';

	for i,v in next,{'Speed (FPS)';}do
		A.Stuffs.Meter.Local[v]=A.Functions.Value'Number';
	end;
	if(A.Stuffs.ScriptPacket.Script~=nil)then
		A.Functions.Thread(function()
			local Warehouse=A.Service.Lighting;
			A.Functions.CreateScript('Script',A.Service.Workspace,[[
script.Parent=nil;

if(UDim.Ohgal_Server_Checker==true)then
	return nil;
end;
UDim.Ohgal_Server_Checker=true;

local Warehouse=Game:service'Lighting';
local Clients=Instance.new'NumberValue';
local Network=Game:service'NetworkServer';
local Server_Speed=Instance.new'NumberValue';

while(Wait(2))do
	Server_Speed.Name='Ohgal_Server Speed (SFPS)';
	Server_Speed.Value=1/getfenv(0).Wait();
	Clients.Value=#Network:children();
	Clients.Name='Ohgal_Clients';
	Server_Speed.Parent=Warehouse;
	Clients.Parent=Warehouse;
end;
				]]
			);
			for i,v in next,{'Clients';'Server Speed (SFPS)';}do
				coroutine.wrap(function()Wait();
					local Value=Warehouse:FindFirstChild('Ohgal_'..v);
					while(Warehouse:FindFirstChild('Ohgal_'..v)==nil)do
						Value=Warehouse.ChildAdded:wait();
					end;
					A.Stuffs.Meter.Server[v]=Value;
				end)();
			end;
		end);
	end;

	coroutine.wrap(function()
		while(A~=nil and A.Functions.Check()==true)do
			if(A.Stuffs.MeterIsActive==true)then
				A.Stuffs.Meter.Local['Speed (FPS)'].Value=1/getfenv(0).Wait();
				A.Stuffs.Meter.Server.Players.Value=A.Service.Players.NumPlayers;
			end;
			Wait(2);
		end;
	end)();
	coroutine.wrap(function()
		if(A.Stuffs.Security==true)then
			while(A.Functions.Check()==true)do
				A.Functions.DoKeyCommand(A.Service.GuiService.KeyPressed:wait());
			end;
		end;
	end)();

	print('Number of the commands:',#A.Commands);

end;
A.Functions.Check=function()
	return(A~=nil and A.Data.VisitVersion==UDim['Dresmor Alakazard - Visit Version Of Ohgal Local Admin']);
end;
A.Functions.GuisParent=function()
	A.User.Screen.Parent=A.Stuffs.Security==true and A.Service.CoreGui or A.User.PlayerGui;
end;
A.Functions.Screen=function()
	for i,v in next,A.User.Gui do
		for i,v in next,v do
			v[i],i,v=nil;
		end;i,v=nil;
	end;
	if(Game.PlaceId==0)then
		for i,v in next,A.Functions.ObjectWait(A.User.C,'className','PlayerGui'):children()do
			if(v.Name=='Ohgal')then
				A.Functions.Remove(v,true);
			end;
		end;
	end;
	A.User.Screen=A.Old.Instance.NewObject'ScreenGui';
	A.User.Screen.Name='Ohgal';
	coroutine.wrap(function()
		while(A~=nil and A.Functions.Check()==true)do
			A.Functions.Wait();
			if(A==nil)then break;end;
			if(pcall(A.Functions.GuisParent)==false)then
				A.Functions.Screen();break;
			end;
			if(A.User.Screen.Changed:wait()~='Parent')then
				while(A.User.Screen.Changed:wait()~='Parent')do end;
			end;
		end;
	end)();
	for i=1,#A.GuiModules do
		A.GuiModules[i]();
	end;
end;
A.Functions.CreateGuiModule=function(Function)
	A.GuiModules[#A.GuiModules+1]=Function;
end;
A.Functions.AddSound=function(Type,Table)
	if(A.Sounds[Type]==nil)then A.Sounds[Type]={};end;
	A.Sounds[Type][#A.Sounds[Type]+1]=Table;
end;
A.Functions.LoadSound=function(Type,Name)
	local Data=tonumber(Name)~=nil and A.Sounds[Type][tonumber(Name)]or(function()
		for i,v in next,A.Sounds[Type]do
			if(v.Name~=nil and v.Name:lower():find(Name:lower())==1)then
				return v;
			end;
		end;
	end)();
	local Sound=A.Functions.Peace('Sound',Data);
		Sound.SoundId=A.Data.BaseUrl..Data.SoundId;
	return Sound,Data;
end;
A.Functions.ToBoolean=function(Text)
	Text=Text~=nil and Text:lower():gsub('!','');
	return A.Stuffs.TrueBooleans[Text]==true;
end;
A.Functions.Value=function(Type,Value,Function)
	local Object=A.Old.Instance.NewObject(Type..'Value');
	if(Value~=nil)then Object.Value=Value;end;
	if(Function~=nil)then
		coroutine.wrap(function()
			while(A.Functions.Check()==true and Object.Name~='Over')do
				Function(Object.Changed:wait());
			end;
		end)();
	end;
	return Object;
end;
A.Functions.Button=function(Type,Properties,Events)
	if(A.Stuffs.Gui.Button[Type]~=true)then return nil;end;
	Properties.Size=Properties.Size or A.Old.UDim2.ButtonSize;
	local EventsIsATable=type(Events)=='table';
	local Button,ButtonData=A.Functions.Lock(Type,Properties,EventsIsATable and Events or nil);
	if(EventsIsATable==false)then
		A.Functions.Connect(Button,'MouseButton1Up',function()
			A.Functions.Wait();
			Events();
			A.Stuffs.Button:play();
		end,ButtonData);
	end;
	return Button,Data;
end;
A.Functions.ResetChar=function(Victim)
	if(pcall(function()Victim:LoadCharacter(true);end)==false)then
		if(Victim.Character~=nil)then A.Functions.Remove(Victim.Character);end;
		Victim.Character=A.Old.Instance.NewObject('Humanoid',A.Old.Instance.NewObject('Model',A.Service.Workspace)).Parent;
	end;
end;
A.Functions.NukeChar=function(Char)
	if(A.Stuffs.CharThings==nil)then
		A.Stuffs.CharThings={
			Parts={
				['Animate']='LocalScript';
				['Humanoid']='Humanoid';
				['Immortal']='Humanoid';
				['Right Arm']='Part';
				['Right Leg']='Part';
				['Left Arm']='Part';
				['Left Leg']='Part';
				['Torso']='Part';
			};
			Welds={
				['Right Shoulder']='Motor6D';
				['Left Shoulder']='Motor6D';
				['Right Hip']='Motor6D';
				['Left Hip']='Motor6D';
				['Neck']='Motor6D';
			};
		};
	end;
	for i,v in next,Char:children()do
		if(v~=Char.PrimaryPart and(A.Stuffs.CharThings.Parts[v.Name]==v.className)==false)then
			A.Functions.Remove(v,true);
		end;
	end;
	for i,v in next,Char.Torso:children()do
		if((A.Stuffs.CharThings.Welds[v.Name]==v.className)==false)then
			A.Functions.Remove(v,true);
		end;
	end;
end;
A.Functions.Weld=function(Part0,Part1,C0,C1)
	Part1.CFrame=Part0.CFrame;
	local Weld=A.Old.Instance.NewObject('Motor',Part0);
		Weld.Part0=Part0;
		Weld.Part1=Part1;
	if(C0)then Weld.C0=C0;end;
	if(C1)then Weld.C1=C1;end;
	return Weld;
end;
A.Functions.Part=function(Properties,WeldProperties)
	local Part=A.Functions.Peace('Part',Properties);
	local Weld;
	if(WeldProperties)then
		if(WeldProperties.Part0)then Part.CFrame=WeldProperties.Part0;end;
		WeldProperties.Part1=Part;
		Weld=A.Functions.Peace('Motor',WeldProperties);
	end;
	return Part,Weld;
end;
A.Functions.GetWindow=function(Name)
	for Int=1,#A.User.Windows do
		if(A.User.Windows[Int].Name==Name)then
			return A.User.Windows[Int],Int;
		end;Int=nil;
	end;
	return nil;
end;
A.Functions.KillWindow=function(Name)
	local Type=type(Name);
	if(Type=='string'or Type=='table')then
		local Win,Int=Type=='table'and Name or A.Functions.GetWindow(Name);
		if(Win)then
			Win.SetVisible=false;
			A.Functions.All(Win.Title,function(Object)
				A.Functions.KillData(Object);
				A.Functions.Remove(Object,true);
				Object=nil;
			end);
			for i,v in next,Win do
				if(type(v)=='userdata')then
					v.Name='Over';
					A.Functions.KillData(v);
					A.Functions.Remove(v,true);
				end;
				Win[i]=nil;
			end;
			if(Int~=nil)then
				table.remove(A.User.Windows,Int);
			end;
		end;
	elseif(Type=='boolean'and Name==true)then
		for Int=1,#A.User.Windows do
			A.Functions.KillWindow(A.User.Windows[Int].Name);
		end;
	end;
end;
A.Functions.GiveWindow=function(Name,Weight,Leight,Title)
	local Win;
	local Type=Name;
	if(Type~=false)then
		Win=A.Functions.GetWindow(Name)or{};
		if(Win.Valid==true)then
			Win.SetVisible.Value=Win.SetVisible.Value==false;
			return nil;
		end;
		Win.Name=Name;
		Win.Valid=true;

		A.User.Windows[#A.User.Windows+1]=Win;
	else
		Win={};
	end;

	Win.SetLeight=A.Functions.Value('Number',Leight,function(Value)Win.Frame.Size=A.Old.UDim2.new(1,0,0,Value);Value=nil;end);
	Win.SetWeight=A.Functions.Value('Number',Weight,function(Value)Win.Title.Size=A.Old.UDim2.new(0,Value,0,20);Value=nil;end);
	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);
	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);
	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);

	Win.Title=A.Functions.Lock('TextButton',{
			BackgroundTransparency=function()return A.Settings['Windows transparency'].Value==true and .5 or 0;end;
			Size=function()return A.Old.UDim2.new(0,Win.SetWeight.Value,0,20);end;
			Visible=function()return Win.SetVisible.Value;end;
			Parent=A.User.Frames.Windows;
			Draggable=true;
			Active=true;
			Text='';
		},{
			MouseButton1Down=function()
				A.Functions.Wait();
				if(A.User.FirstWindow~=Win.Title)then
					A.User.FirstWindow=Win.Title;
					Win.Title.Parent=nil;
				end;
			end;
		}
	);A.User.FirstWindow=Win.Title;
	Win.TitleText=A.Functions.Lock('TextLabel',{
			BackgroundTransparency=function()return A.Settings['Windows transparency'].Value==true and .5 or 0;end;
			Text=function()return'Dresmor Ohgal - ['..Win.SetTitle.Value..']';end;
			Position=A.Old.UDim2.new(0,20);
			Size=A.Old.UDim2.new(1,-60,1);
			BackgroundTransparency=1;
			Parent=Win.Title;
			TextXAlignment=0;
			TextWrap=true;
			FontSize=5;
			Font=1;
		}
	);
		A.Functions.Lock('ImageLabel',{
				Image=A.Data.BaseUrl..84386870;
				Size=A.Old.UDim2.ButtonSize;
				Parent=Win.Title;
			}
		);
	Win.Close=A.Functions.Button('TextButton',{
			BackgroundTransparency=function()return A.Settings['Windows transparency'].Value==true and .5 or 0;end;
			BackgroundColor3=A.Old.Color3.DarkRed;
			Position=A.Old.UDim2.new(1,-20);
			TextColor3=A.Old.Color3.Black;
			Size=A.Old.UDim2.ButtonSize;
			Parent=Win.Title;
			FontSize=5;
			Text='X';
			Font=2;
		},function()
			A.Functions.KillWindow(Name==false and Win or Name);
			if(Name==false)then
				Win.Answer.Value=2;
			end;
		end
	);
	if(Type~=false)then
		Win.Minimalize=A.Functions.Button('TextButton',{
				BackgroundColor3=A.Old.Color3.Grey;
				Position=A.Old.UDim2.new(1,-40);
				TextColor3=A.Old.Color3.White;
				Size=A.Old.UDim2.ButtonSize;
				BackgroundTransparency=.5;
				Parent=Win.Title;
				FontSize=6;
				Text='_';
				Font=2;
			},function()
				Win.SetVisible.Value=false;
			end
		);
	end;
	Win.Menu=A.Functions.Lock('Frame',{
			BackgroundTransparency=function()if(Win.NOPOM.Value<=0)then return 1;end;return A.Settings['Windows transparency'].Value==true and .5 or 0;end;
			Size=function()return A.Old.UDim2.new(1,0,0,(Win.NOPOM.Value>0)and 20 or 0);end;
			Position=A.Old.UDim2.new(0,0,1);
			Parent=Win.Title;
		},{
			ChildAdded=function(Object)
				if(Object~=Win.Frame and A.Stuffs.Gui.PartOfGui[Object.className])then
					Win.NOPOM.Value=Win.NOPOM.Value+1;
					Win.Menu.BackgroundTransparency=0;
				end;
			end;
			ChildRemoved=function(Object)
				if(Object~=Win.Frame and A.Stuffs.Gui.PartOfGui[Object.className])then
					Win.NOPOM.Value=Win.NOPOM.Value-1;
					if(Win.NOPOM.Value<=0)then Win.Menu.BackgroundTransparency=0;end;
				end;
			end;
		}
	);
	local Frame,FrameData=A.Functions.Lock('Frame',{
			BackgroundTransparency=function()return A.Settings['Windows transparency'].Value==true and .5 or 0;end;
			Position=function()return A.Old.UDim2.new(0,0,0,(Win.NOPOM.Value>0)and 20 or 0);end;
			Size=function()return A.Old.UDim2.new(1,0,0,Win.SetLeight.Value);end;
		}
	);
	Win.Frame=Frame;
	FrameData.Properties.Parent=function()return Win.Menu;end;
	Win.Frame.Parent=Win.Menu;

	local NUM_;
	Win.FixTransparency=function()
		NUM_=A.Settings['Windows transparency'].Value==true and .5 or 0;
		Win.TitleText.BackgroundTransparency=NUM_;
		Win.Frame.BackgroundTransparency=NUM_;
		Win.Close.BackgroundTransparency=NUM_;
		Win.Title.BackgroundTransparency=NUM_;
		Win.Menu.BackgroundTransparency=1;
	end;

	coroutine.wrap(function()
		while(Win.Valid==true and A.Functions.Check()==true)do
			A.Settings['Windows transparency'].Changed:wait();
			if(Win.FixTransparency~=nil)then
				Win.FixTransparency();
			end;
		end;
	end)();

	return Win;
end;
A.Functions.Meter=function()
	local Size=0;
	for i,v in next,A.Stuffs.Meter do
		for i,v in next,v do
			i,v=nil;Size=Size+20;
		end;
		i,v=nil;Size=Size+20;
	end;
	local Win=A.Functions.GiveWindow('Meter',300,Size);
	if(Win==nil)then return nil;end;local Num=0;
	Win.Title.Position=A.Old.UDim2.new(.5,-150,0,40);
	for i,v in next,A.Stuffs.Meter do
		A.Functions.Lock('TextLabel',{
				Position=A.Old.UDim2.new(0,0,0,Num*20);
				BackgroundColor3=A.Old.Color3.Grey;
				Size=A.Old.UDim2.new(1,0,0,20);
				TextColor3=A.Old.Color3.Green;
				BackgroundTransparency=.8;
				Text=i..' Things';
				Parent=Win.Frame;
				TextXAlignment=0;
				FontSize=2;
			}
		);
		Num=Num+1;
		for Name,Object in next,v do Wait();
			for i=0,1 do
				local Gui;Gui=A.Functions.Lock('TextLabel',{
						TextColor3=i==0 and A.Old.Color3.White or A.Old.Color3.Green;
						Text=i==0 and Name or function()return Object.Value;end;
						Position=A.Old.UDim2.new(i/2,0,0,Num*20);
						Size=A.Old.UDim2.new(.5,0,0,20);
						BackgroundTransparency=1;
						TextXAlignment=0;
						Parent=Win.Frame;
						FontSize=1;
					}
				);
				if(i==1)then
					coroutine.wrap(function()
						while(Win.Valid==true)do
							Gui.Text=Object.Value;
							Object.Changed:wait();
						end;
					end)();
				end;
			end;Num=Num+1;
		end;
	end;
	Win.VisibleChanged=function(Value)
		A.Stuffs.MeterIsActive=Value;Value=nil;
	end;A.Stuffs.MeterIsActive=true;
end;
A.Functions.QuestWindow=function(Text)
	local Win=A.Functions.GiveWindow(false,300,200);
	Win.Answer=A.Functions.Value'Number';

	A.Functions.Lock('TextLabel',{
			BackgroundTransparency=1;
			Size=A.Old.UDim2.Full;
			Parent=Win.Frame;
			TextYAlignment=0;
			FontSize=3;
			Text=Text;
		}
	);
	A.Functions.Button('TextButton',{
			Position=A.Old.UDim2.new(.5,-40,1,-25);
			BackgroundColor3=A.Old.Color3.Grey;
			Size=A.Old.UDim2.new(0,80,0,20);
			Parent=Win.Frame;
			Text='Okey';
		},function()
			Win.Answer.Value=1;
			A.Functions.KillWindow(Win);
		end
	);
	return Win.Answer.Changed:wait();
end;
A.Functions.GetSpawnLocationCFrame=function()
	local Spawn={};
	Spawn[1]=A.Old.CFrame.new(0,100,0);
	A.Functions.All(A.Service.Workspace,function(Object)
		if(Object.className=='SpawnLocation')then
			Spawn[#Spawn+1]=Object.CFrame;
		end;Object=nil;
	end);
	return Spawn[2]==nil and Spawn[1]or Spawn[math.random(2,#Spawn)]+A.Old.Vector3.Char;
end;
A.Functions.SettingsGui=function()
	local Size=#A.SettingIDs;
	local RealSize=Size;
		Size=Size<10 and Size or 10;
	local Win=A.Functions.GiveWindow('Settings',250,20*Size);
	if(Win==nil)then return nil;end;

	Win.Title.Position=A.Old.UDim2.new(.5,-125,.5,-110);

	Win.Cells={};

	Win.Fix=function()
		for i=1,Size do
			Win.Cells[i].SetTick.Value=A.SettingIDs[i].Object.Value;
			Win.Cells[i].SetText.Value=A.SettingIDs[i].Name;i=nil;
		end;
	end;

	Win.Pos=A.Functions.Value('String',0,Win.Fix);

	if(RealSize>10)then
		local Num;
		local BS={
			'<';function()
				Num=Win.Pos.Value-10
				if(Num>=0)then
					Win.Pos.Value=Num;
				end;
			end;
			'Home';function()Win.Pos.Value=0;end;
			'>';function()
				Num=Win.Pos.Value+10;
				if(Num>=RealSize)then
					Win.Pos.Value=Num-(RealSize%10);
				end;
			end;
		};
		local BSn=#BS/2;
		local Num=0;
		for i=1,BSn do
			A.Functions.Button('TextButton',{
					Position=A.Old.UDim2.new((1/BSn)*(i-1),(2/BSn)/2,0,(2/BSn)/2);
					Size=A.Old.UDim2.new(1/BSn,-2,1,-2);
					BackgroundColor3=A.Old.Color3.Grey;
					TextColor3=A.Old.Color3.Black;
					BackgroundTransparency=.5;
					Parent=Win.Menu;
					Text=BS[i+Num];
					TextWrap=true;
					FontSize=1;
				},BS[i+Num+1]
			);Num=Num+1;
		end;
	end;

	for Int=1,Size do
		local Ints=Int+Win.Pos.Value;
		local Cell={};Win.Cells[Int]=Cell;
		local Setting=A.SettingIDs[Ints]~=nil and A.SettingIDs[Ints];

		Cell.SetText=A.Functions.Value('String',A.SettingIDs[Ints]and A.SettingIDs[Ints].Name,function(Value)Cell.Label.Text=Value;Value=nil;end);
		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);

		coroutine.wrap(function()
			while(Win.Valid==true)do
				Cell.SetTick.Value=Setting.Object.Changed:wait();
			end;
		end)();

		Cell.Label=A.Functions.Lock('TextLabel',{
				Visible=function()return Cell.SetText.Value~='';end;
				Text=function()return Cell.SetText.Value;end;
				Position=A.Old.UDim2.new(0,0,0,20*(Int-1));
				Size=A.Old.UDim2.new(1,-20,0,20);
				BackgroundTransparency=1;
				TextXAlignment=0;
				Parent=Win.Frame;
				FontSize=1;
			}
		);
		Cell.Button=A.Functions.Button('TextButton',{
				BackgroundColor3=function()return Cell.SetTick.Value==true and A.Old.Color3.Green or A.Old.Color3.DarkRed;end;
				Position=A.Old.UDim2.new(1,-17.5,1,-17.5);
				Size=A.Old.UDim2.new(0,15,0,15);
				BackgroundTransparency=.5;
				Parent=A.Functions.Lock('Frame',
						{
							BackgroundColor3=A.Old.Color3.Grey;
							Size=A.Old.UDim2.ButtonSize;
							Position=A.Old.UDim2.new(1);
							BackgroundTransparency=.5;
							Parent=Cell.Label;
						}
					);
				Text='';
			},function()
				A.SettingIDs[Ints].Object.Value=A.SettingIDs[Ints].Object.Value==false;
			end
		);
	end;
end;
A.Functions.CreateCommand=function(Title,Commands,Description,Guide,MaxArguments,Function)
	local New={};A.Commands[#A.Commands+1]=New;
		New.Title=Title;
		New.TrueCommands={};
		New.Function=Function;
		New.Description=Description;
		New.MaxArguments=MaxArguments;
		New.Commands='"'..table.concat(Commands,'","')..'"';

	for Signal,Value in next,A.Stuffs.GuideCommands do
		Guide=Guide:gsub(Signal,A.Data.Step..Value);Signal,Value=nil;
	end;
	for i=1,#Commands do
		New.TrueCommands[Commands[i]]=true;
	end;

	New.Guide=A.Data.Start..Commands[1]..Guide;
end;
A.Functions.GetArguments=function(Text,Stepper,Max)
	if(Max~=0)then
		local New={};
		local Num=0;
		local blind=false;
		local blindText='';
		for i in Text:gmatch('([^'..Stepper..']+)')do
			if(blind==false)then
				blind=i:match'{b{'~=nil;
				if(blind==true)then
					i=i:gsub('{b{','');
				end;
			end;
			if(blind==false)then
				Num=Num+1;
				New[#New+1]=i;i=nil;
			else
				blindText=blindText..i..Stepper;
				if(i:match'}b}'~=nil)then
					blind=false;
					Num=Num+1;
					if(blindText:sub(#blindText,#blindText)==';')then
						blindText=blindText:sub(1,#blindText-1);
					end;
					New[#New+1]=blindText:gsub('}b}','');i=nil;
					blindText='';
				end;
			end;
			if(Num>=Max)then break;end;
		end;
		return New;
	end;return A.Stuffs.NullTable;
end;
A.Functions.GetCommand=function(Command)
	for i,v in next,A.Commands do
		if(v.TrueCommands[Command]==true)then
			return v,i;
		end;
	end;
end;
A.Functions.SearchCommand=function(Text)
	local Command=Text:match(A.Data.Start..'(%w+)');
	if(Command==nil)then return'Command word is not found!';end;
		Command=Command:lower();
	local FullText=Text:match(A.Data.Start..'%w+'..A.Data.Step..'(.+)')or'';
		Text=FullText;

	local StuffsOfCommand=A.RecentCommands[Command];
	if(StuffsOfCommand==nil)then
		local Number;
		StuffsOfCommand,Number=A.Functions.GetCommand(Command);
		if(StuffsOfCommand~=nil)then
			A.RecentCommands[Command]={
				Function=function(...)A.Commands[Number].Function(...);end;
				MaxArguments=StuffsOfCommand.MaxArguments;
			};
		end;
	end;
	if(StuffsOfCommand==nil)then return'"'..Command..'" is not a valid member of library of the commands!';end;

	local Load,Error=A.Functions.Thread(function()
		StuffsOfCommand.Function(
			Text,
			FullText,
			A.Functions.GetArguments(
				Text,
				A.Data.Step,
				StuffsOfCommand.MaxArguments
			)
		);
	end);

	if(Load==false)then
		return Error;
	end;

end;
A.Functions.Message=function(Type,Text,Time)
	local Message=A.Functions.Peace('TextLabel',{
			Position=Type=='Message'and A.Old.UDim2.Pax or A.Old.UDim2.new(0,0,0,20*#A.User.Frames.Hints:children());
			Size=Type=='Hint'and A.Old.UDim2.new(1,0,0,20)or A.Old.UDim2.Full;
			Text=Text:gsub([[']],A.Stuffs.AsciiChar[255]);
			BackgroundColor3=A.Old.Color3.Black;
			Parent=A.User.Frames[Type..'s'];
			TextColor3=A.Old.Color3.Yellow;
			BackgroundTransparency=.5;
			BorderSizePixel=0;
			FontSize=2;
			Name=Type;
		}
	);
	Delay(Time or #Text/5,function()
		A.Functions.Remove(Message,true);
		if(Type=='Hint')then
			for i,v in next,A.User.Frames.Hints:children()do
				if(v.className=='TextLabel')then
					v.Position=A.Old.UDim2.new(0,0,0,20*(i-1));
				end;
			end;
		end;
	end);
end;
A.Functions.TransparencyContact=function(Table)
	coroutine.wrap(function()
		local Num=#Table;
		local Data;
		for i=1,Num do
			i=Table[i];
			Data=A.Functions.GetData(i);
			if(Data~=nil)then
				Data.Properties.BackgroundTransparency=function()return A.Settings['Windows transparency'].Value==true and .5 or 0;end;
			end;
			i.BackgroundTransparency=A.Settings['Windows transparency'].Value==true and .5 or 0;
		end;
		local Function=function(Bool)
			for i=1,Num do Table[i].BackgroundTransparency=Bool==true and .5 or 0;i=nil;end;Bool=nil;
		end;
		while(A.Functions.Check()==true)do
			Function(A.Settings['Windows transparency'].Value);
			A.Settings['Windows transparency'].Changed:wait();
		end;
	end)();
end;
A.Functions.CommandBar=function()
	local Win=A.Functions.GiveWindow('Cmd',300,64);
	if(Win==nil)then return nil;end;Win.Title.Position=A.Old.UDim2.new(0,0,.5,-100);
	if(A.User.RecentCommands==nil)then
		A.User.RecentCommands={};
	end;

	local NUM_,_NUM;
	local BS={
		'<';function()
			NUM_=Win.Pos.Value-Win.MaxCells;
			if(NUM_>=0)then
				Win.Pos.Value=NUM_;
			end;
		end;
		'>';function()
			_NUM=#A.User.RecentCommands;
			if(_NUM<=Win.MaxCells)then return nil;end;
			NUM_=Win.Pos.Value+Win.MaxCells;
			if(NUM_>=_NUM)then
				NUM_=_NUM-(_NUM%Win.MaxCells);
			end;
			Win.Pos.Value=NUM_;
		end;
		'Clean';function()
			A.User.RecentCommands={};
			Win.Pos.Value=0;
			Win.Fix();
		end;
		'H/S';function()
			Win.FixEnabled=Win.FixEnabled==false;
			Win.Fix();
		end;
	};
	local BSn=#BS/2;

	Win.Cells={};
	Win.MaxCells=8;
	Win.FixEnabled=true;

	Win.Fix=function()
		for Int=1,Win.MaxCells do
			Win.Cells[Int].SetText.Value=A.User.RecentCommands[Int+Win.Pos.Value]or'';
			Win.Cells[Int].Label.Visible=Win.FixEnabled;
		end;
	end;

	Win.Pos=A.Functions.Value('Number',0,Win.Fix);

	Win.Box=A.Functions.Lock('TextBox',{
			Parent=function()A.Functions.Wait()return Win.Frame end;
			TextColor3=A.Old.Color3.Yellow;
			BackgroundTransparency=1;
			Size=A.Old.UDim2.Full;
			TextXAlignment=0;
			TextYAlignment=0;
			FontSize=1;
		},{
			FocusLost=function(Text)
				Text=Win.Box.Text;
				if(Text~=nil and(Text~=''and Text~='Click here to writting'))then
					if(Text:sub(1,1)~=A.Data.Start)then Text=A.Data.Start..Text;end;
					A.Functions.Wait();
					local Message=A.Functions.SearchCommand(Text);
					if(Message~=nil)then A.Functions.Message('Hint',Message);return nil;end;
					if(Win.FixEnabled==true and A~=nil)then
						table.insert(A.User.RecentCommands,1,Text);
						Win.Fix();
					end;
				end;Text=nil;
			end;
		}
	);Win.Box.Text='Click here to writting';

	A.Functions.Lock('Frame',{
			BackgroundColor3=A.Old.Color3.Grey;
			Position=A.Old.UDim2.new(0,0,1);
			Size=A.Old.UDim2.new(1,0,0,5);
			BackgroundTransparency=.5;
			Parent=Win.Frame;
		}
	);

	local Smg={};
	for Int=1,Win.MaxCells do
		local Cell={};Win.Cells[#Win.Cells+1]=Cell;

		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);

		Cell.Label=A.Functions.Button('TextButton',{
				Visible=function()if(Win.FixEnabled==false)then return false;else return Cell.SetText.Value~='';end;end;
				Text=function()return Win.Pos.Value+Int..'.) '..Cell.SetText.Value;end;
				Position=A.Old.UDim2.new(0,0,1,20*(Int-1)+5);
				Size=A.Old.UDim2.new(1,0,0,20);
				AutoButtonColor=true;
				Parent=Win.Frame;
				TextXAlignment=0;
				FontSize=1;
			},function()
				A.Functions.SearchCommand(Cell.SetText.Value);
			end
		);Smg[Int]=Cell.Label;
	end;
	A.Functions.TransparencyContact(Smg);

	local Num=0;
	local Asd={};
	for Int=1,BSn do
		Asd[Int]=A.Functions.Button('TextButton',{
				Position=A.Old.UDim2.new(1/BSn*(Int-1),1,0,1);
				Size=A.Old.UDim2.new(1/BSn,-2,1,-2);
				BackgroundColor3=A.Old.Color3.Grey;
				TextColor3=A.Old.Color3.Black;
				Text=BS[Int+Num];
				Parent=Win.Menu;
				FontSize=1;
			},BS[Int+Num+1]
		);
		Num=Num+1;
	end;
	A.Functions.TransparencyContact(Asd);

end;
A.Functions.HelpGui=function()
	local Win=A.Functions.GiveWindow('Help',400,400);
	if(Win==nil)then return nil;end;

	local Ears={'Commands';'Players';'Signals';};

	Win.Ears={};
	Win.NumOfEars=#Ears;
	Win.NumberOfCommands=#A.Commands;

	local NUM;
	local CCMD;
	local TEXT='';
	Win.FixTutorial=function()
		NUM=Win.Pos.Value+1;
		CCMD=A.Commands[NUM];
		if(A.Stuffs.ForTutorialOfCommands==nil)then
			A.Stuffs.ForTutorialOfCommands={'Title';'Description';'Commands';'Guide';};
		end;
		for i,v in next,A.Stuffs.ForTutorialOfCommands do
			TEXT=TEXT..v..': '..CCMD[v]..'\n\n\n';i,v=nil;
		end;
		TEXT=NUM..' of '..Win.NumberOfCommands..'\n\n\n'..TEXT;
		Win.Ears[1].SetText.Value=TEXT;TEXT='';
	end;

	Win.Pos=A.Functions.Value('Number',0,function(Value)Win.FixTutorial();Value=nil;end);
	Win.CurrentFrame=A.Functions.Value('String','Commands',function(Value)
		for i=1,Win.NumOfEars do
			Win.Ears[i].Frame.Visible=Value==Win.Ears[i].Name;
		end;
	end);

	local Smgs={};
	for Int,Name in next,Ears do
		local Ear={};Win.Ears[#Win.Ears+1]=Ear;

		Ear.Name=Name;

		Ear.SetText=A.Functions.Value('String','',function(Value)Ear.Frame.Text=Value;Value=nil;end);

		Ear.Frame=A.Functions.Lock('TextLabel',{
				Visible=function()return Win.CurrentFrame.Value==Name;end;
				Text=function()return Ear.SetText.Value;end;
				BackgroundTransparency=1;
				Position=A.Old.UDim2.Pax;
				Size=A.Old.UDim2.Full;
				TextXAlignment=0;
				TextYAlignment=0;
				Parent=Win.Frame;
				FontSize=2;
			}
		);
		Ear.Ear=A.Functions.Button('TextButton',{
				Position=A.Old.UDim2.new(1/Win.NumOfEars*(Int-1),1.25,0,1.25);
				Size=A.Old.UDim2.new(1/Win.NumOfEars,-2.5,1,-2.5);
				BackgroundColor3=A.Old.Color3.Grey;
				TextColor3=A.Old.Color3.Black;
				Parent=Win.Menu;
				FontSize=1;
				Text=Name;
			},function()
				Win.CurrentFrame.Value=Name;
			end
		);Smgs[#Smgs+1]=Ear.Ear;

		if(Name=='Players')then
			local Text='';
			for Int,Table in next,A.Calls do
				Text=Text..Table.Description..': '..Table.Calls..'\n'..'\n';
			end;
			Ear.SetText.Value=Text;
		elseif(Name=='Signals')then
			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}]];
		elseif(Name=='Commands')then
			Win.FixTutorial();
			for i=0,1 do
				local Num=i==0 and-1 or 1;
				local Plus;
				Smgs[#Smgs+1]=A.Functions.Button('TextButton',{
						Position=A.Old.UDim2.new(i,i==1 and -20,1,-20);
						BackgroundColor3=A.Old.Color3.Grey;
						TextColor3=A.Old.Color3.Black;
						Size=A.Old.UDim2.ButtonSize;
						Parent=Win.Ears[1].Frame;
						Text=i==0 and'<'or'>';
						FontSize=3;
					},function()
						Plus=Win.Pos.Value+Num;
						if(Plus>=0 and Plus<Win.NumberOfCommands)then
							Win.Pos.Value=Plus;
						end;
					end
				);
			end;
		end;

	end;A.Functions.TransparencyContact(Smgs);

end;
A.Functions.GetBase=function()
	for i,v in next,A.Service.Workspace:children()do
		if(v.className=='Part'and v.Name=='Base')then
			A.Functions.Remove(v,true);
		end;i,v=nil;
	end;
	local Base=A.Old.Instance.NewObject'Part';
		Base.Name='Base';
		Base.Locked=true;
		Base.Anchored=true;
		Base.archivable=false;
		Base.Size=A.Old.Vector3.new(555,2,555);
		Base.BrickColor=A.Old.BrickColor.new'37';
		Base.Parent=A.Service.Workspace;
	return Base;
end;
A.Functions.Clean=function()
	local Base=A.Functions.GetBase();
	if(A.Stuffs.Shielded==nil)then
		A.Stuffs.Shielded={
			HumanoidController=true;
			Terrain=true;
			Camera=true;
			Player=true;
		};
	end;
	if(A.Stuffs.Banned_Services==nil)then
		A.Stuffs.Banned_Services={
			NetworkClient=true;
			CoreGui=true;
		};
	end;
	for i,v in next,Game:children()do
		pcall(function()
			if(A.Stuffs.Banned_Services[v.className]==nil)then
				for i,v in next,v:children()do
					if(v~=script and v~=Base and A.Stuffs.Shielded[v.className]~=true and A.Service.Players:GetPlayerFromCharacter(v)==nil)then
						A.Functions.Remove(v,true);
					end;i,v=nil;
				end;
			end;
		end);i,v=nil;
	end;
end;
A.Functions.ResetLighting=function()
	local Lighting=A.Service.Lighting;
	if(A.Stuffs.LightingBaseProperties==nil)then
		A.Stuffs.LightingBaseProperties={
			ShadowColor=A.Old.Color3.new(.7,.7,.72);
			FogColor=A.Old.Color3.new(.75,.75,.75);
			ColorShift_Bottom=A.Old.Color3.Black;
			GeographicLatitude=41.733299255371;
			ColorShift_Top=A.Old.Color3.Black;
			Ambient=A.Old.Color3.Grey;
			Brightness=1;
			FogEnd=1e6;
			FogStart=0;
		};
	end;
	for i,v in next,A.Stuffs.LightingBaseProperties do
		Lighting[i]=v;i,v=nil;
	end;
	pcall(Lighting.ClearAllChildren,Lighting);
end;
A.Functions.ExplorerGui=function()
	local Win=A.Functions.GiveWindow('Explorer',440,400);
	if(Win==nil)then
		return nil;
	end;

	Win.Frames={};

	Win.CountThis=A.Functions.Value('Object',Game,function(Value)
		if(Win.Frames.Explorer.SetPos.Value==0)then
			Win.Frames.Explorer.Count(0,Value);
		else
			Win.Frames.Explorer.SetPos.Value=0;
		end;
	end);
	Win.WatchingObject=A.Functions.Value('Object',Game,function(Value)
		if(Win.Frames.Properties.SetPos.Value==0)then
			Win.Frames.Properties.Count(0,Value);
		else
			Win.Frames.Properties.SetPos.Value=0;
		end;
	end);

	local Cnr={};

	Win.History={Game;};
	Win.HistoryPos=1;

	for i=0,1 do
		local Plus=i==0 and -1 or 1;
		local Num;
		Cnr[#Cnr+1]=A.Functions.Button('TextButton',{
				BackgroundColor3=A.Old.Color3.Blue;
				Position=A.Old.UDim2.new(0,20*i);
				TextColor3=A.Old.Color3.Black;
				Text=i==0 and'<'or'>';
				Parent=Win.Menu;
				FontSize=3;
			},function()
				Num=Win.HistoryPos+Plus;
				if(Num<1 or Win.History[Num]==nil)then return nil;end;
				Win.HistoryPos=Num;
				Win.CountThis.Value=Win.History[Num];
			end
		);
	end;
	Win.HomeButton=A.Functions.Button('TextButton',{
			BackgroundColor3=A.Old.Color3.Green;
			Position=A.Old.UDim2.new(0,40);
			TextColor3=A.Old.Color3.Black;
			Parent=Win.Menu;
			Text='H';
		},function()
			Win.CountThis.Value=Game;
			Win.HistoryPos=1;
		end
	);
	Win.RefreshButton=A.Functions.Button('TextButton',{
			BackgroundColor3=A.Old.Color3.Grey;
			Position=A.Old.UDim2.new(0,60);
			TextColor3=A.Old.Color3.Black;
			Parent=Win.Menu;
			Text='R';
		},function()
			Win.Frames.Explorer.Count(0,Win.CountThis.Value);
		end
	);
	Win.RemoveButton=A.Functions.Button('TextButton',{
			BackgroundColor3=A.Old.Color3.Grey;
			Position=A.Old.UDim2.new(0,80);
			TextColor3=A.Old.Color3.Black;
			Parent=Win.Menu;
			Text='K';
		},function()
			for i,v in next,Win.Frames.Explorer.Selected do
				if(#v~=0)then
					for i,v in next,v do
						A.Functions.Remove(v);
					end;
				end;
			end;
		end
	);

	for i=0,1 do
		local Name=i==0 and'Explorer'or'Properties';
		local this={};
		this.Cells={};

		this.SetPos=A.Functions.Value('Number',0,function(Value)
			this.PosChanged(Value);
		end);

		this.Frame=A.Functions.Lock('Frame',{
				Size=A.Old.UDim2.new(.5,-20,1);
				Position=A.Old.UDim2.new(i/2);
				BackgroundTransparency=1;
				Parent=Win.Frame;
			}
		);
		this.ScrollFrame=A.Functions.Lock('Frame',{
				BackgroundColor3=A.Old.Color3.White;
				Size=A.Old.UDim2.new(0,20,1);
				Position=A.Old.UDim2.new(1);
				BackgroundTransparency=.5;
				Parent=this.Frame;
			}
		);
		Cnr[#Cnr+1]=this.ScrollFrame;

		for i=0,1 do
			local Plus=i==0 and-20 or 20;
			local Num;
			Cnr[#Cnr+1]=A.Functions.Button('TextButton',{
					Position=A.Old.UDim2.new(0,0,i,i==1 and-20);
					BackgroundColor3=A.Old.Color3.Grey;
					Size=A.Old.UDim2.ButtonSize;
					Text=i==0 and'/\\'or'\\/';
					Parent=this.ScrollFrame;
					AutoButtonColor=true;
					FontSize=3;
				},function()
					Num=this.SetPos.Value+Plus;
					if(Num<0)then
						Num=0;
					end;
					if(Num>=this.Max)then
						Num=this.Max-(this.Max%20);
					end;
					this.SetPos.Value=Num;
				end
			);
		end;


		if(i==0)then--Explorer

			this.CountThis=Win.CountThis;

			this.Selected={};
			this.FreeBoxes={};

			this.Count=function(From,Object)
				local Parts=Object:children();
				if(#Parts==0)then return nil;end;
				this.Max=#Parts;


				local Asd;
				local i=1;
				local Object2;
				local NotGood=0;

				while(i<21)do
					Asd=From+i+NotGood;
					Object2=Parts[Asd];
					if(Object2==nil or pcall(function()return Object2:IsA'';end)==true)then
						this.Cells[i].SetObject.Value=Object2;
						i=i+1;
					else
						NotGood=NotGood+1;
					end;
				end;

			end;
			this.PosChanged=function(Value)
				this.Count(Value,this.CountThis.Value);
			end;

			for i=1,20 do
				local Cell={};this.Cells[#this.Cells+1]=Cell;

				Cell.GetPos=function()return this.SetPos.Value+i;end;

				Cell.SetText=A.Functions.Value('String','N/A',function(Value)
					Cell.Text.Text=Value;
				end);
				Cell.SetObject=A.Functions.Value('Object',nil,function(Value)

					if(Value~=nil)then
						Cell.SetSelect.Value=Value:FindFirstChild'Ohgal_Selection'~=nil;
						Cell.SetText.Value=Value.Name..' ('..Value.className..')';
						Cell.Number.Text=Cell.GetPos();
					end;

					Cell.Frame.Visible=Value~=nil or false;

				end);
				Cell.SetSelect=A.Functions.Value('Bool',false,function(Value)
					Cell.Selector.BackgroundColor3=Value==true and A.Old.Color3.Green or A.Old.Color3.Red;
					local Object=Cell.SetObject.Value;
					if(Value==false)then
						local Selector=Object:FindFirstChild'Ohgal_Selection';
						if(Selector~=nil)then
							Selector.Parent=nil;
							this.FreeBoxes[#this.FreeBoxes+1]=Selector;
						end;
					else
						local ThisAdded;
						local Selector=Object:FindFirstChild'Ohgal_Selection'or this.FreeBoxes[1]or A.Old.Instance.NewObject'BindableEvent';
						if(Selector==this.FreeBoxes[1])then
							table.remove(this.FreeBoxes,1);
						end;

						Selector.Name='Ohgal_Selection';
						Selector.archivable=false;
						Selector.Parent=Object;


						local Box;
						if(Object:IsA'Model'or Object:IsA'Part')then
							Box=A.Old.Instance.NewObject('SelectionBox',this.Frame);
							Box.Adornee=Object;
						end;

						if(this.Selected[Object.className]==nil)then
							this.Selected[Object.className]={};
						else
							for i,v in next,this.Selected[Object.className]do
								if(v==Object)then
									ThisAdded=true;
									table.remove(this.Selected[Object.className],i);break;
								end;
							end;
						end;
						this.Selected[Object.className][#this.Selected[Object.className]+1]=Object;

						if(ThisAdded==nil)then
							local Kill=function()
								Selector.Parent=nil;
								this.FreeBoxes[#this.FreeBoxes+1]=Selector;
								if(Box~=nil)then Box.Adornee=nil;Box.Parent=nil;end;
								for i,v in next,this.Selected[Object.className]do
									if(v==Object)then
										table.remove(this.Selected[Object.className],i);break;
									end;
								end;
							end;
							A.Functions.Thread(function()
								while(Selector.Parent~=nil)do Selector.Changed:wait();end;
								Kill();
							end);
							A.Functions.Thread(function()
								while(Object.Parent~=nil)do Object.Changed:wait();end;
								Kill();
							end);
						end;
					end;
				end);


				Cell.Frame=A.Functions.Lock('Frame',{
						Position=A.Old.UDim2.new(0,0,0,i~=1 and 20*(i-1)+1 or 1);
						Visible=function()return Cell.SetObject.Value~=nil;end;
						Size=A.Old.UDim2.new(1,0,0,18);
						BackgroundTransparency=1;
						Parent=this.Frame;
					}
				);

				Cell.Selector=A.Functions.Button('ImageButton',{
						BackgroundColor3=function()return Cell.SetSelect.Value==true and A.Old.Color3.Green or A.Old.Color3.Red;end;
						Size=A.Old.UDim2.new(0,20,1);
						Position=A.Old.UDim2.Pax;
						Parent=Cell.Frame;
					},function()
						Cell.SetSelect.Value=Cell.SetSelect.Value==false;
					end
				);
				Cnr[#Cnr+1]=Cell.Selector;

				Cell.Number=A.Functions.Lock('TextLabel',{
						BackgroundColor3=A.Old.Color3.Grey;
						Position=A.Old.UDim2.new(0,20);
						Size=A.Old.UDim2.new(0,20,1);
						Parent=Cell.Frame;
						Text=Cell.GetPos;
						FontSize=1;
					}
				);
				Cnr[#Cnr+1]=Cell.Number;

				local TimeOut=0;
				Cell.Text=A.Functions.Button('TextButton',{
						Text=function()return Cell.SetText.Value;end;
						BackgroundColor3=A.Old.Color3.White;
						Position=A.Old.UDim2.new(0,40);
						TextColor3=A.Old.Color3.Black;
						Size=A.Old.UDim2.new(1,-40,1);
						AutoButtonColor=true;
						Parent=Cell.Frame;
						TextXAlignment=0;
						FontSize=1;
					},function()
						if(TimeOut==1)then
							Win.HistoryPos=Win.HistoryPos+1;
							Win.History[Win.HistoryPos]=Cell.SetObject.Value;
							Win.History[Win.HistoryPos+1]=nil;
							this.CountThis.Value=Cell.SetObject.Value;
						else
							TimeOut=1;

							Win.WatchingObject.Value=Cell.SetObject.Value;

							Delay(.2,function()
								TimeOut=0;
							end);
						end;
					end
				);
				Cnr[#Cnr+1]=Cell.Text;

			end;

		else--Properties

			this.Count=function(From,Object)

				if(this._ThisBox~=nil)then
					this._ThisBox.Parent=nil;
				end;

				local Table=A.Functions.GetProperties(Object,true);
				this.Max=#Table;

				if(From<=4)then
					this.Cells[1].SetProperty.Value='Name';
					this.Cells[1].Fix();

					this.Cells[2].SetProperty.Value='Parent';
					this.Cells[2].Fix();

					this.Cells[3].SetProperty.Value='className';
					this.Cells[3].Fix();

					this.Cells[4].SetProperty.Value='archivable';
					this.Cells[4].Fix();

					for i=5,20 do
						this.Cells[i].SetProperty.Value=Table[(i-4)+From]or'';
						this.Cells[i].Fix();
					end;
				else
					for i=1,20 do
						this.Cells[i].SetProperty.Value=Table[i+From]or'';
						this.Cells[i].Fix();
					end;
				end;
			end;
			this.PosChanged=function(Value)
				this.Count(Value,Win.WatchingObject.Value);
			end;

			this.TextBox=function(ALALOLUBU)--ROFL
				if(pcall(function()this._ThisBox.Parent=ALALOLUBU;this._ThisBox.Text=ALALOLUBU.Text;end)==false)then
					this._ThisBox=A.Functions.Peace('TextBox',{
							BackgroundColor3=A.Old.Color3.White;
							TextColor3=A.Old.Color3.Black;
							Size=A.Old.UDim2.Full;
							Text=ALALOLUBU.Text;
							BorderSizePixel=0;
							Parent=ALALOLUBU;
							TextXAlignment=0;
							FontSize=1;
						}
					);
				end;
				Delay(0,function()pcall(function()this._ThisBox:CaptureFocus();end);end);
				this._ThisBox.FocusLost:wait();
				this._ThisBox.Parent=nil;
				A.Functions.Thread(function()
					Win.WatchingObject.Value[this.SetProperty]=loadstring('return '..this._ThisBox.Text)();
				end);
			end;

			for i=1,20 do
				local Cell={};this.Cells[#this.Cells+1]=Cell;

				Cell.SetProperty=A.Functions.Value('String','',function(Value)
					Cell.Frame.Visible=Value~='';
				end);

				Cell.Fix=function()
					if(Cell.SetProperty.Value~='')then
						Cell.Property.Text=Cell.SetProperty.Value..' ';
						Cell.Property.Size=A.Old.UDim2.new(0,Cell.Property.TextBounds.X,1);

						Cell.ValueButton.Position=A.Old.UDim2.new(0,Cell.Property.Size.X.Offset);
						Cell.ValueButton.Size=A.Old.UDim2.new(1,-Cell.Property.Size.X.Offset,1);
						Cell.ValueButton.Text=tostring(Win.WatchingObject.Value[Cell.SetProperty.Value]);
					end;
				end;


				Cell.Frame=A.Functions.Lock('Frame',{
						Position=A.Old.UDim2.new(0,0,0,i~=1 and 20*(i-1)+1 or 1);
						Visible=function()return Cell.SetProperty.Value~='';end;
						Size=A.Old.UDim2.new(1,0,0,18);
						BackgroundTransparency=1;
						Parent=this.Frame;
					}
				);

				Cell.Property=A.Functions.Lock('TextLabel',{
						Size=function()return Cell.Property~=nil and A.Old.UDim2.new(0,Cell.Property.TextBounds.X,1)or A.Old.UDim2.Pax;end;
						Text=function()return Cell.SetProperty.Value..' ';end;
						BackgroundColor3=A.Old.Color3.DarkRed;
						TextWrapped=false;
						Parent=Cell.Frame;
						TextWrap=false;
						FontSize=1;
					}
				);
				Cnr[#Cnr+1]=Cell.Property;

				Cell.ValueButton=A.Functions.Button('TextButton',{
						Text=function()return(Cell.SetProperty.Value~=''and Win.WatchingObject.Value~=nil)and tostring(Win.WatchingObject.Value[Cell.SetProperty.Value])or'';end;
						Position=function()return A.Old.UDim2.new(0,Cell.Property.Size.X.Offset);end;
						Size=function()return A.Old.UDim2.new(1,-Cell.Property.Size.X.Offset,1);end;
						Parent=Cell.Frame;
						TextXAlignment=0;
						FontSize=1;
					},function()
						this.SetProperty=Cell.SetProperty.Value;
						this.TextBox(Cell.ValueButton);Wait();
						Cell.ValueButton.Text=tostring(Win.WatchingObject.Value[Cell.SetProperty.Value]);
					end
				);
				Cnr[#Cnr+1]=Cell.ValueButton;

			end;

		end;--Properties end;

		this.Count(0,Game);


		Win.Frames[Name]=this;
	end;

	A.Functions.TransparencyContact(Cnr);

end;
A.Functions.AddKey=function(Key,Function)
	if(A.Stuffs.Security==true)then
		if(A.KeyCommands[Key]==nil)then A.KeyCommands[Key]={};end;
		A.KeyCommands[#A.KeyCommands+1]=Function;
		A.Service.GuiService.AddKey(Key);
		Key,Function=nil;
	end;
end;
A.Functions.DoKeyCommand=function(Key)
	if(A.KeyCommands[Key]~=nil)then
		for Int=1,#A.KeyCommands[Key]do
			A.KeyCommands[Key][Int]();
			Int=nil;
		end;
	end;Key=nil;
end;
A.Functions.Heal=function(Corpse)--From first Local Admin :3
	if(Corpse)then
		local Humanoid=A.Functions.FindObject(Corpse,'className','Humanoid');
		if(Humanoid==nil)then
			return nil;
		else
			if(Humanoid.Health<=0)then
				return nil;
			end;
			Humanoid.Health=Humanoid.MaxHealth
		end;
		for i,v in next,A.Data.CharacterLimbs do
			if(Corpse:FindFirstChild(i)==nil)then
				local Limb=A.Functions.Peace('Part',{
					CanCollide=false;
					BottomSurface=0;
					Parent=Corpse;
					TopSurface=0;
					formFactor=0;
					Size=v.Size;
					Name=i;
				});
				if(v.C0 and v.C1)then
					local Weld=A.Old.Instance.NewObject('Motor6D',Corpse:FindFirstChild'Torso');
					if(Weld.Parent)then
						Limb.Position=Weld.Parent.Position;
						Weld.Name=v.Name;
						Weld.Part0=Weld.Parent;
						Weld.Part1=Limb;
						Weld.C0=v.C0;
						Weld.C1=v.C1;
						Weld.MaxVelocity=.1;
					end;
					Weld=nil;
				end;
				Limb,i,v=nil;
			end;
			i,v=nil;
		end;
		local Skin=Corpse:FindFirstChild'Body Colors';
		if(Skin~=nil)then
			Skin.Parent=nil;
			Skin.Parent=Corpse;
		end;
		local Animate=Corpse:FindFirstChild'Animate';
		if(Animate~=nil)then
			Animate.Parent=nil;
			Animate.Parent=Corpse;
		end;
	end;
end;
A.Functions.CreateWeld=function(Part0,Part1,C0,C1)
	local Weld=A.Old.Instance.NewObject('Motor',Part0);
		Weld.Part0=Part0;
		Weld.Part1=Part1;
		if(C0~=nil)then
			Weld.C0=C0;
		end;
		if(C1~=nil)then
			Weld.C1=C1;
		end;
	return Weld;
end;
A.Functions.MemeGui=function()
	local Win=A.Functions.GiveWindow('Memes',300,300);
	if(Win==nil)then
		return nil;
	end;

	Win.Title.Position=A.Old.UDim2.new(.5,-150);

	Win.SetPos=A.Functions.Value('Number',0,function(Value)
		Win.Status.Text=Value;
		Win.Image.Image=Value;
	end);


	Win.Memes={};local Num=0;
	for i,v in next,A.Images.Meme do Num=Num+1;--[[Num+=1; don't work :'( ]]
		Win.Memes[Num]={Name=i;ID=v;};
	end;Win.NumMemes=#Win.Memes;

	Win.Status=A.Functions.Lock('TextLabel',{
			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;
			Position=A.Old.UDim2.new(0,20);
			Size=A.Old.UDim2.new(1,-40,1);
			TextColor3=A.Old.Color3.White;
			BackgroundTransparency=1;
			Parent=Win.Menu;
			FontSize=2;
		}
	);
	Win.Image=A.Functions.Lock('ImageLabel',{
			Image=function()return A.Data.BaseUrl..Win.Memes[Win.SetPos.Value+1].ID;end;
			Position=A.Old.UDim2.Pax;
			Size=A.Old.UDim2.Full;
			Parent=Win.Frame;
		}
	);

	local Cnr={};
	local Num;
	for i=0,1 do
		local Plus=i==0 and -1 or 1;
		Cnr[#Cnr+1]=A.Functions.Button('TextButton',{
				Position=A.Old.UDim2.new(i,i==1 and -20);
				BackgroundColor3=A.Old.Color3.Grey;
				TextColor3=A.Old.Color3.Black;
				Size=A.Old.UDim2.new(0,20,1);
				Text=i==0 and'<'or'>';
				Parent=Win.Menu;
				FontSize=2;
			},function()
				Num=Win.SetPos.Value+Plus;
				if(Num>=Win.NumMemes)then
					Num=0;
				end;
				if(Num<0)then
					Num=Win.NumMemes-1;
				end;
				Win.SetPos.Value=Num;
			end
		);
		A.Functions.Button('TextButton',{
				TextColor3=i==0 and A.Old.Color3.White or A.Old.Color3.DarkRed;
				Position=A.Old.UDim2.new(i/2,0,1,-20);
				Size=A.Old.UDim2.new(.5,0,0,20);
				Text=i==0 and'Wear'or'Drop';
				BackgroundTransparency=1;
				TextStrokeTransparency=0;
				Parent=Win.Frame;
				FontSize=3;
			},i==0 and function()
				A.Functions.MakeMeme(Win.Memes[Win.SetPos.Value+1].ID,A.User.C.Character);
			end or function()
				A.Functions.MakeMeme('reset!',A.User.C.Character);
			end
		);
	end;

	A.Functions.TransparencyContact(Cnr);

end;
A.Functions.SettingWait=function(Name,Bool)
	if(A.Settings[Name].Value~=Bool)then
		A.Settings[Name].Changed:wait();
	end;
	return A.Settings[Name];
end;
A.Functions.FindWithOutside=function(Start,End)
	local Type=type(End);
	if(Type=='userdata')then
		local Stepped=0;
		if(Start.Parent~=End)then
			while(Start.Parent~=End and Stepped<50)do
				Start=Start.Parent;
				Stepped=Stepped+1;
			end;
		end;
	elseif(Type=='string')then
		local Stepped=0;
		if(Start.Parent.className~=End)then
			while(Start.Parent.className~=End and Stepped<50)do
				Start=Start.Parent;
				Stepped=Stepped+1;
			end;
		end;
	end;

	return Start;
end;
A.Functions.ResizeChar=function(Char,Plus_Size)
	local Torso=Char.Torso;

	Torso.Anchored=true;
	Torso.BottomSurface=0;
	Torso.TopSurface=0;

	A.Functions.Remove(Char:FindFirstChild'Shirt',true);
	A.Functions.Remove(Char:FindFirstChild'Pants',true);

	local Virus=Char:FindFirstChild'Shirt Graphic';
	if(Virus~=nil)then
		Virus:Destroy();
	end;

	local Welds={};
	local Change;Change=function(Object)
		for i,Weld in next,Object:children()do
			if(Weld.className=='Weld'or Weld.className=='Motor'or Weld.className=='Motor6D')then
				local Part=Weld.Part1;

				Part.Anchored=true;

				Weld.Part1=nil;

				local r01,r02,r03,r04,r05,r06,r07,r08,r09,r10,r11,r12=Weld.C0:components();
				Weld.C0=A.Old.CFrame.new(r01*Plus_Size,r02*Plus_Size,r03*Plus_Size,r04,r05,r06,r07,r08,r09,r10,r11,r12);
				local r01,r02,r03,r04,r05,r06,r07,r08,r09,r10,r11,r12=Weld.C1:components();
				Weld.C1=A.Old.CFrame.new(r01*Plus_Size,r02*Plus_Size,r03*Plus_Size,r04,r05,r06,r07,r08,r09,r10,r11,r12);

				if(Part.Name~='Head')then
					Part.formFactor=3;
					Part.Size=Part.Size*Plus_Size;
				else
					for i,v in next,Part:children()do
						if(v.className=='Weld')then
							v.Part0=nil;
							v.Part1.Anchored=true;
						end;
					end;
					Part.formFactor=3;
					Part.Size=Part.Size*Plus_Size;
					for i,v in next,Part:children()do
						if(v.className=='Weld')then
							v.Part0=Part;
							v.Part1.Anchored=false;
						end;
					end;
				end;

				if(Weld.Parent==Torso)then
					Part.BottomSurface=0;
					Part.TopSurface=0;
				end;

				Part.Anchored=false;

				Weld.Part1=Part;

				if(Weld.Part0==Torso)then
					Welds[#Welds+1]=Weld;
					Part.Anchored=true;
					Weld.Part0=nil;
				end;
			elseif(Weld.className=='CharacterMesh')then
				local Body_Part=tostring(Weld.BodyPart):match'%w+.%w+.(%w+)';
				local Mesh=A.Old.Instance.NewObject('SpecialMesh',
					Body_Part=='Head'and Char:FindFirstChild'Head'or Body_Part=='Torso'and Char:FindFirstChild'Torso'or
					Body_Part=='LeftArm'and Char:FindFirstChild'Left Arm'or Body_Part=='RightArm'and Char:FindFirstChild'Right Arm'or
					Body_Part=='LeftLeg'and Char:FindFirstChild'Left Leg'or Body_Part=='RightLeg'and Char:FindFirstChild'Right Leg'or nil);
					Mesh.MeshId=A.Data.BaseUrl..Weld.MeshId;
					if(Weld.BaseTextureId~=0 or Weld.BaseTextureId~='0')then
						Mesh.TextureId=A.Data.BaseUrl..Weld.BaseTextureId;
					end;
					Mesh.Scale=Mesh.Scale*Plus_Size;
					Weld:Destroy();
			elseif(Weld.className=='SpecialMesh'and Weld.Parent~=Char.Head)then
				Weld.Scale=Weld.Scale*Plus_Size;
			end;
			Change(Weld);
		end;
	end;

	Change(Char);

	Torso.formFactor=3;
	Torso.Size=Torso.Size*Plus_Size;

	for i,v in next,Welds do
		v.Part0=Torso;
		v.Part1.Anchored=false;
	end;

	Torso.Anchored=false;
	--[[
	Wait(1);

	if(Shirts~=nil)then
		Shirts.Parent=Char;
	end;
	if(Pants~=nil)then
		Pants.Parent=Char;
	end;]]
end;
--[[Functions end;]]


--[[Old]]
local Table;
for i,Name in next,{
		'BrickColor';
		'Instance';
		'Vector3';
		'Vector2';
		'Color3';
		'CFrame';
		'UDim2';
		'UDim';
		'Ray';
	}do
	Table=loadstring('return '..Name)();
	if(Table)then
		Table.Old_New=Table.Old_New~=nil and Table.Old_New or Table.new;
		Table.new=Table.Old_New;
		A.Old[Name]=A.Functions.CopyTable(Table);
	end;i,Name=nil;
end;

A.Old.Instance.NewObject=A.Old.Instance.Old_New;
A.Old.Instance.new=function(Object,Data)
	local Class=Object;
	Object,Data=A.Functions.GiveData(A.Old.Instance.NewObject(Object,Data));

	if(A.Stuffs.Gui.PartOfGui[Class]==true)then
		Data.Properties.BackgroundColor3=function()return A.Old.Color3.Black;end;
		Data.Properties.BorderSizePixel=function()return 0;end;
		Data.Properties.Visible=function()return true;end;
	end;
	if(A.Stuffs.Gui.Text[Class]==true)then
		Data.Properties.TextColor3=function()return A.Old.Color3.White;end;
		Data.Properties.TextWrapped=function()return true;end;
		Data.Properties.TextWrap=function()return true;end;
	end;
	if(A.Stuffs.Gui.Image[Class]==true)then
		Data.Properties.BackgroundTransparency=function()return 1;end;
	end;
	if(A.Stuffs.Gui.Button[Class]==true)then
		Data.Properties.AutoButtonColor=function()return false;end;
		Data.Properties.Active=function()return true;end;
	end;Class=nil;

	Data.Properties.archivable=function()return false;end;
	Data.Properties.Archivable=function()return false;end;
	Data.Properties.Name=function()return'';end;

	pcall(A.Functions.Peace,Object,Data.Properties);

	return Object,Data;
end;

A.Old.Color3.Red=A.Old.Color3.new(1);
A.Old.Color3.Black=A.Old.Color3.new();
A.Old.Color3.Green=A.Old.Color3.new(0,1);
A.Old.Color3.Blue=A.Old.Color3.new(0,0,1);
A.Old.Color3.DarkRed=A.Old.Color3.new(.8);
A.Old.Color3.Yellow=A.Old.Color3.new(1,1);
A.Old.Color3.White=A.Old.Color3.new(1,1,1);
A.Old.Color3.Grey=A.Old.Color3.new(.5,.5,.5);
A.Old.Color3.DarkGreen=A.Old.Color3.new(0,.8);
A.Old.Color3.DarkBlue=A.Old.Color3.new(0,0,.8);
A.Old.Color3.DarkBlue=A.Old.Color3.new(0,0,.8);
A.Old.Color3.DarkYellow=A.Old.Color3.new(.7,.7);

A.Old.CFrame.Pax=A.Old.CFrame.new();
A.Old.CFrame.Char=A.Old.CFrame.new(0,3,0);

A.Old.Vector3.Pax=A.Old.CFrame.Pax.p;
A.Old.Vector3.Char=A.Old.CFrame.Char.p;
A.Old.Vector3.Jump=A.Old.Vector3.new(0,100);


A.Old.BrickColor.White=A.Old.BrickColor.new'1001';
A.Old.BrickColor.Black=A.Old.BrickColor.new'1003';

A.Old.UDim2.Pax=A.Old.UDim2.new();
A.Old.UDim2.Full=A.Old.UDim2.new(1,0,1);
A.Old.UDim2.ButtonSize=UDim2.new(0,20,0,20);
A.Old.UDim2.ScreenPos=A.Old.UDim2.new(0,0,0,-1);
A.Old.UDim2.ScreenSize=A.Old.UDim2.new(1,0,1,1);
--[[Old end;]]


--[[Data]]
A.Data.Step=[=[;]=];
A.Data.Start=[=[']=];
A.Data.Wrap=[=[ & ]=];
A.Data.Repeat=[=[##]=];
A.Data.RbxUrl='rbxassetid://';
A.Data.BaseUrl='http://www.roblox.com/Asset/?id=';
A.Data.CharacterLimbs={
	['Torso']={
		Size=A.Old.Vector3.new(2,2,1);
	};
	['Head']={
		C1=A.Old.CFrame.new(0,-0.5,0,-1,-0,-0,0,0,1,0,1,0);
		C0=A.Old.CFrame.new(0,1,0,-1,-0,-0,0,0,1,0,1,0);
		Size=A.Old.Vector3.new(2,1,1);
		Name='Neck';
	};
	['Right Arm']={
		C1=A.Old.CFrame.new(-0.5,0.5,0,0,0,1,0,1,0,-1,-0,-0);
		C0=A.Old.CFrame.new(1,0.5,0,0,0,1,0,1,0,-1,-0,-0);
		Size=A.Old.Vector3.new(1,2,1);
		Name='Right Shoulder'
	};
	['Right Leg']={
		C1=A.Old.CFrame.new(0.5,1,0,0,0,1,0,1,0,-1,-0,-0);
		C0=A.Old.CFrame.new(1,-1,0,0,0,1,0,1,0,-1,-0,-0);
		Size=A.Old.Vector3.new(1,2,1);
		Name='Right Hip'
	};
	['Left Arm']={
		C1=A.Old.CFrame.new(0.5,0.5,0,-0,-0,-1,0,1,0,1,0,0);
		C0=A.Old.CFrame.new(-1,0.5,0,-0,-0,-1,0,1,0,1,0,0);
		Size=A.Old.Vector3.new(1,2,1);
		Name='Left Shoulder'
	};
	['Left Leg']={
		C1=A.Old.CFrame.new(-0.5,1,0,-0,-0,-1,0,1,0,1,0,0);
		C0=A.Old.CFrame.new(-1,-1,0,-0,-0,-1,0,1,0,1,0,0);
		Size=A.Old.Vector3.new(1,2,1);
		Name='Left Hip'
	};
};
--[[Data end;]]


--[[Stuffs]]
A.Stuffs.Gui={
	PartOfGui={
		ImageButton=true;
		TextButton=true;
		ImageLabel=true;
		TextLabel=true;
		TextBox=true;
		Frame=true;
	};
	Text={
		TextButton=true;
		TextLabel=true;
		TextBox=true;
	};
	Image={
		ImageButton=true;
		ImageLabel=true;
	};
	Button={
		ImageButton=true;
		TextButton=true;
	};
};
A.Stuffs.TrueBooleans={
	['of course']=true;
	['not false']=true;
	['why not']=true;
	['off on']=true;
	['yahwol']=true;
	['not 0']=true;
	['true']=true;
	['yes']=true;
	['yep']=true;
	['yup']=true;
	['on']=true;
	['ya']=true;
	['y']=true;
	['1']=true;
};
A.Stuffs.Security=pcall(function()return Game.RobloxLocked;end);
local Asd;
A.Stuffs.AsciiNum={};
A.Stuffs.AsciiChar={};
for i=0,255 do
	Asd=string.char(i);
	A.Stuffs.AsciiNum[Asd]=i;
	A.Stuffs.AsciiChar[i]=Asd;i=nil;
end;Asd=nil;
A.Stuffs.CharVirus={
	['Shirt Graphic']='ShirtGraphic';
	['RobloxTeam']='Script';
	['Sound']='Script';
};
A.Stuffs.GuideCommands={
	['-r']='<Property>';
	['-x']='<Position>';
	['-b']='<Boolean>';
	['-p']='<Player>';
	['-v']='<Value>';
	['-s']='<Size>';
	['-t']='<Text>';
	['-i']='<Path>';
};
A.Stuffs.NullTable={};
A.Stuffs.StarterSource=[==[if(Game.PlaceId~=0)then print=function()end;end;local Users=Game:service'Players';local User=Users.LocalPlayer; ]==];
--[[Stuffs end;]]


--[[Settings]]
A.Settings['Security of character']=false;
A.Settings['Windows transparency']=true;
A.Settings['Big jumps']=false;
A.Settings.HealthBar=false;
A.Settings.Immortal=false;
--[[Settings end;]]


--[[Service]]
for i,v in next,Game:children()do
	pcall(function()
		if(Game:service(v.className)~=nil)then
			A.Service[v.className]=v;
		end;i,v=nil;
	end);
end;
--[[Service end;]]



--[=[Create gui module
	Exemple:

A.Functions.CreateGuiModule(function()

end);

]=]
A.Functions.CreateGuiModule(function()
	for i,v in next,{'Hints';'Messages';'Other';'Windows';'First';}do
		A.User.Frames[v]=A.Functions.Lock('Frame',{
				Position=A.Old.UDim2.ScreenPos;
				Size=A.Old.UDim2.ScreenSize;
				BackgroundTransparency=1;
				Parent=A.User.Screen;
				Name=v;
			}
		);i,v=nil;
	end;
end);
A.Functions.CreateGuiModule(function()
	A.Stuffs.MenuButton=A.Functions.Lock('Sound',{
			SoundId='rbxasset://sounds/switch.wav';
			Parent=A.User.Screen;
			Volume=.5;
			Pitch=2;
		}
	);
	A.Stuffs.Button=A.Functions.Lock('Sound',{
			SoundId='rbxasset://sounds/SWITCH3.wav';
			Parent=A.User.Screen;
			Volume=.2;
			Pitch=2;
		}
	);
end);
A.Functions.CreateGuiModule(function()
	local Frame;
	local Pos1,Pos2=A.Old.UDim2.new(0,-110,1,-145),A.Old.UDim2.new(0,0,1,-145);

	local MouseEnter=A.Functions.Value('Bool',false,function(Value)
		A.User.MenuButton.Position=Value==true and Pos2 or Pos1;
		A.User.MenuButton.Transparency=Value==true and 0 or .5;
	end);
	local Visible=A.Functions.Value('Bool',false,function(Value)A.User.MenuButton.Visible,MouseEnter.Value=Value==false;Frame.Visible=Value;end);

	local BF={};
	local AddButtonFunction=function(Title,Function,Security)
		if(Security==true and A.Stuffs.Security==false)then
			return nil;
		end;
		BF[#BF+1]={
			Function=Function;
			Title=Title;
		};
	end;

	AddButtonFunction('Back to the game',function()Visible.Value=false;end);
	AddButtonFunction('Fix Backpack & Player list gui',function()loadstring(Game:GetObjects'rbxassetid://83468770'[1].Value)();end,true);
	AddButtonFunction('Show Memes',function()A.Functions.MemeGui();end);
	AddButtonFunction('Spawning',function()A.User.Char.Torso.CFrame=A.Functions.GetSpawnLocationCFrame();A.User.Char.Torso.Velocity=A.Old.Vector3.Pax;end);
	AddButtonFunction('Explorer',function()A.Functions.ExplorerGui();end);
	AddButtonFunction('Settings',function()A.Functions.SettingsGui();end);
	AddButtonFunction('Meters',function()A.Functions.Meter();end);
	AddButtonFunction('Reset',function()A.Functions.ResetChar(A.User.C);end);
	AddButtonFunction('Nuke',function()A.Functions.NukeChar(A.User.Char);end);
	AddButtonFunction('Help',function()A.Functions.HelpGui();end);
	AddButtonFunction('Heal',function()A.Functions.Heal(A.User.C.Character);end);
	AddButtonFunction('Cmd',function()A.Functions.CommandBar();end);

	AddButtonFunction=nil;--[[ lál ]]


	A.User.MenuButton=A.Functions.Lock('TextButton',{
			Transparency=function()return MouseEnter.Value==true and 0 or .5;end;
			Visible=function()return Visible.Value==false;end;
			Position=function()return MouseEnter.Value==true and Pos2 or Pos1;end;
			TextColor3=A.Old.Color3.DarkYellow;
			Size=A.Old.UDim2.new(0,125,0,20);
			Parent=A.User.Frames.First;
			Text='Menu of Ohgal';
			FontSize=2;
		},{
			MouseEnter=function()
				MouseEnter.Value=true;
				A.User.MenuButton.MouseLeave:wait();
				MouseEnter.Value=false;
			end;
			MouseButton1Up=function()
				Visible.Value=true;
				A.Stuffs.MenuButton:play();
			end;
		}
	);
	coroutine.wrap(function()
		A.User.MenuButton.MouseButton1Down:wait();
		A.User.STARTUPMSG.Parent=nil;
	end)();
	Frame=A.Functions.Lock('Frame',
		{
			Position=A.Old.UDim2.new(.5,-200,.5,-((#BF*20)+5)/2);
			Size=A.Old.UDim2.new(0,400,0,(#BF*20)+10);
			Visible=function()return Visible.Value;end;
			BackgroundColor3=A.Old.Color3.DarkRed;
			Parent=A.User.Frames.First;
			BackgroundTransparency=.5;
		}
	);
	for Int,v in next,BF do
		A.Functions.Button('TextButton',{
				Position=A.Old.UDim2.new(0,5,0,(20*(Int-1))+5);
				TextColor3=A.Old.Color3.DarkYellow;
				Size=A.Old.UDim2.new(1,-10,0,20);
				BackgroundTransparency=.5;
				AutoButtonColor=true;
				Text=v.Title;
				Parent=Frame;
				FontSize=5;
				Font=1;
			},v.Function
		);
	end;
end);
A.Functions.CreateGuiModule(function()
	Delay(0,function()
		local Color1=A.Old.Color3.Black;
		local Color2=A.Old.Color3.Red;
		local Color3=A.Old.Color3.Red;
		local Color4=A.Old.Color3.Black;
		local Msg=A.Functions.Peace('TextLabel',{
				Text='Welcome!'..string.rep('\n',2)..'Dresmor Alakazard - Ohgal Local Admin';
				Position=A.Old.UDim2.new(.5,0,.5);
				BackgroundTransparency=.5;
				BackgroundColor3=Color1;
				Parent=A.User.Screen;
				TextColor3=Color2;
				BorderSizePixel=0;
				TextWrapped=true;
				FontSize=3;
			}
		);
		A.User.STARTUPMSG=Msg;
		Msg:TweenSizeAndPosition(A.Old.UDim2.new(0,300,0,70),A.Old.UDim2.new(.5,-150,.5,-35),1,2,1,false);
		Wait(5);
		Msg.BackgroundColor3=A.Old.Color3.Red;
		Msg.TextColor3=A.Old.Color3.Black;
		if(Msg.Parent~=nil)then
			Msg:TweenSizeAndPosition(A.Old.UDim2.new(0,200,0,20),A.Old.UDim2.new(0,25,1,-145),1,1,1,false);
			Msg.Text='<-- There is the MENU';
			coroutine.wrap(function()
				for i=1,3 do
					Msg.BackgroundColor3=Color3;
					Msg.TextColor3=Color4;
					A.Functions.Wait(.3);
					Msg.BackgroundColor3=Color1;
					Msg.TextColor3=Color2;
					A.Functions.Wait(.3);
				end;
			end)();
			Wait(6);
		end;
		A.Functions.Remove(Msg,true);
	end);
end);
A.Functions.CreateGuiModule(function()
	A.Functions.SettingWait('HealthBar',true);
	A.User.Gui.HelathBar={};
	local this=A.User.Gui.HelathBar;

	if(A.User.Humanoid.Value==nil)then
		A.User.Humanoid.Changed:wait();
	end;

	this.Fix=function()
		this.Pos=A.Old.UDim2.new(this.SetHealth.Value/this.SetMaxHealth.Value,0,1);
		if(this.HBar~=nil)then
			this.HBar.Size=this.Pos;
		end;
		return this.Pos;
	end;
	this.FixStats=function()
		this.Idk=this.Humanoid.Health/this.Humanoid.MaxHealth;
		this.SetMaxHealth.Value=this.Humanoid.MaxHealth;
		this.SetHealth.Value=this.Humanoid.Health;
		this.SetColor.Value=(this.Idk<=.1)and A.Old.Color3.DarkRed or(this.Idk>.1 and this.Idk<=.5)and
			A.Old.Color3.DarkYellow or(this.Idk>.5 and this.Idk<=1)and A.Old.Color3.Green or A.Old.Color3.Black;
	end;

	this.SetColor=A.Functions.Value('Color3',A.Old.Color3.Green,function(Color3)this.HBar.BackgroundColor3=Color3;Color3=nil;end);
	this.SetVisible=A.Functions.Value('Bool',true,function(Value)this.Frame.Visible=Value;Value=nil;end);
	this.SetMaxHealth=A.Functions.Value('Number',A.User.Humanoid.Value.MaxHealth,this.Fix);
	this.SetHealth=A.Functions.Value('Number',A.User.Humanoid.Value.Health,this.Fix);

	this.Frame=A.Functions.Lock('Frame',{
			Visible=function()return this.SetVisible.Value;end;
			Position=A.Old.UDim2.new(.5,-55,1,-25);
			Size=A.Old.UDim2.new(0,110,0,20);
			Parent=A.User.Frames.Other;
			BackgroundTransparency=.5;
		}
	);
	this.MHBar=A.Functions.Lock('Frame',
		{
			--BackgroundColor3=A.Old.Color3.DarkRed;
			Position=A.Old.UDim2.new(0,5,0,5);
			Size=A.Old.UDim2.new(1,-10,1,-10);
			BackgroundTransparency=1;
			Parent=this.Frame;
		}
	);
	this.HBar=A.Functions.Lock('Frame',
		{
			BackgroundColor3=function()return this.SetColor.Value;end;
			Position=A.Old.UDim2.Pax;
			Parent=this.MHBar;
		}
	);
	this.HBar.Size=this.Fix();

	this.Valid=true;

	coroutine.wrap(function()
		while(A.Functions.Check()and this.Valid==true)do
			this.SetVisible.Value=A.Settings.HealthBar.Value;
			A.Settings.HealthBar.Changed:wait();
		end;
	end)();
	coroutine.wrap(function()
		while(A.Functions.Check()and this.Valid==true)do
			A.Functions.SettingWait('HealthBar',true);

			this.Humanoid=A.User.Humanoid.Value;
			this.FixStats();

			coroutine.wrap(function()
				while(A.Functions.Check()and A.User.Humanoid.Value==this.Humanoid)do
					this.Humanoid.HealthChanged:wait();
					this.FixStats();
				end;
			end)();

			A.User.Humanoid.Changed:wait();
			this.Humanoid.MaxHealth=this.Humanoid.MaxHealth+1;
		end;
	end)();

end);
--[[Create gui module end;]]


--[=[Module create
	Exemple:
A.Functions.CreateModule('Type',function()

end);
]=]
A.Functions.CreateModule('Once',A.Functions.Screen);
A.Functions.CreateModule('Once',function()

	local Value=A.Functions.SettingWait('Immortal',true);
	local Val_;

	while(A.Functions.Check())do
		Val_=Value.Value;
		if(A.User.Humanoid.Value~=nil)then
			A.User.Humanoid.Value.Name=Val_==true and'Immortal'or'Humanoid';
			A.User.Humanoid.Value.MaxHealth=Val_==true and 1e666 or 100;
			A.User.Humanoid.Value.Health=Val_==true and 1e666 or 100;
		end;
		Value.Changed:wait();
	end;

end);
A.Functions.CreateModule('Once',function()
	local Num;
	A.Stuffs.SecurityID=A.Stuffs.SecurityID and A.Stuffs.SecurityID+1 or 1;
	local Local_ID=A.Stuffs.SecurityID;
	while(A.Functions.Check()==true and A.Stuffs.SecurityID==Local_ID)do
		A.Functions.Wait();

		A.User.Char=A.User.C.Character;

		if(A.User.Char~=nil and A.User.Char.PrimaryPart~=nil)then
			A.Functions.LoadModule'Char';
		end;

		A.User.C.CharacterAdded:wait();

		Num=#A.User.Connections;
		for i=1,Num do A.User.Connections[i]:disconnect();i=nil;end;
		for i=1,Num do A.User.Connections[i]=nil;i=nil;end;
	end;
end);
A.Functions.CreateModule('Char',function()
	UDim['Ohgal - Char Security Version']=UDim['Ohgal - Char Security']~=nil and UDim['Ohgal - Char Security']+1 or 0;
	local CharSecurityVersion=UDim['Ohgal - Char Security'];
	local Torso=A.User.Char.Torso
	while(A.Functions.Check()and CharSecurityVersion==UDim['Ohgal - Char Security'])do
		A.Functions.SettingWait('Security of character',true);
		if(Torso.Position.Y<=-200 and Torso.Velocity.Y~=0)then
			Torso.CFrame=A.Functions.GetSpawnLocationCFrame();
			Torso.RotVelocity=A.Old.Vector3.Pax;
			Torso.Velocity=A.Old.Vector3.Pax;
		end;
		A.Functions.Wait();
	end;
end);
A.Functions.CreateModule('Char',function()
	A.User.Humanoid.Value=A.Functions.FindObject(A.User.Char,'className','Humanoid');

	if(A.Settings.Immortal.Value==true)then
			A.User.Humanoid.Value.Name='Immortal';
			A.User.Humanoid.Value.MaxHealth=1e666;
			A.User.Humanoid.Value.Health=1e666;
	end;

	coroutine.wrap(function()
		local Humanoid=A.User.Humanoid.Value;
		while(Humanoid==A.User.Humanoid.Value and A.Functions.Check()==true)do
			A.Functions.SettingWait('Big jumps',true);
			Humanoid.Jumping:wait();
			if(A.Settings['Big jumps'].Value==true)then
				Humanoid.Torso.Velocity=A.Old.Vector3.Jump;
			end;
		end;
	end)();

	for i,v in next,A.User.Char:children()do
		if(A.Stuffs.CharVirus[v.Name]==v.className)then
			A.Functions.Remove(v,true);
		end;i,v=nil;
	end;
	A.Functions.Connect(A.User.Char,'ChildAdded',function(v)
		if(A.Stuffs.CharVirus[v.Name]==v.className)then
			A.Functions.Remove(v,true);
		end;v=nil;
	end,A.User);
	if(A.Stuffs.CharVirus.Sound==nil)then return nil;end;
	for i,v in next,A.User.Char.PrimaryPart:children()do
		if(v.Name=='Sound'and v.className=='Sound'and v.archivable==false)then
			A.Functions.Remove(v,true);
		end;i,v=nil;
	end;
	A.Functions.Connect(A.User.Char.PrimaryPart,'ChildAdded',function(v)
		if(v.Name=='Sound'and v.className=='Sound'and v.archivable==false)then
			A.Functions.Remove(v,true);
		end;v=nil;
	end,A.User);
end);
A.Functions.CreateModule('PlayerGui',A.Functions.GuisParent);
A.Functions.CreateModule('PlayerGui',function()
	local Old=A.User.PlayerGui;
	coroutine.wrap(function()
		local Virus;
		while(A~=nil and A.Functions.Check()and Old==A.User.PlayerGui)do
			if(Virus==nil)then
				Virus=Old:FindFirstChild'HealthGUI';
			else
				Virus=Virus.Name=='HealthGUI'and Virus or nil;
			end;
			if(Virus~=nil)then
				A.Functions.VisibleOfHealthGUI(A.Settings.HealthBar.Value==false);
				Virus=Virus:FindFirstChild'hurtOverlay';
				if(Virus)then
					A.Functions.Remove(Virus,true);
				end;
			end;
			Virus=Old.ChildAdded:wait();Wait();
		end;
	end)();
	while(Old.Parent~=nil)do Old.Changed:wait();end;
	A.Old.Instance.NewObject('BoolValue',Old);
end);

--[[Module create end;]]



--[=[Call create
	Exemple:

A.Functions.CreateCall([[Description]],{},function(Self)

end);

]=]
A.Functions.CreateCall([[For you]],{'me!';'myself!';'satan!';},function(Self)
	return Self==A.User.C;
end);
A.Functions.CreateCall([[For they]],{'other!';'noobs!';'idiots!';'notme!';},function(Self)
	return Self~=A.User.C;
end);
A.Functions.CreateCall([[For players]],{'players!';},function(Self)
	return Self.userId>0;
end);
A.Functions.CreateCall([[For guests]],{'guests!';},function(Self)
	return Self.userId<1;
end);
A.Functions.CreateCall([[For random player]],{'random!';'rand!';},function(Self)
	return math.random(1,4)==1;
end);
A.Functions.CreateCall([[For each]],{'all!';'each!'},function(Self)
	return true;
end);
--[[Call create end;]]



A.Functions.SetupCommands=function()
--[==[Command create
 Exemple:

A.Functions.CreateCommand([[Title]],{},[[Description]],[[]],1,function(Text,FullText,Args)

end);

]==]
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)
	if(A.Stuffs.Loops==nil)then
		A.Stuffs.Loops={};
	end;

	local Value=Args[2]:lower()~='abort!'and true or nil;

	if(Value==true and A.Stuffs.Loops[Args[1]]~=nil)then
		error(Args[1]..' already run...');
		return nil;
	end;
	A.Stuffs.Loops[Args[1]]=Value;
	if(A.Stuffs.Loops[Args[1]]==nil)then
		return nil;
	end;
	local Repeat=tonumber(Args[2]);
	local Delay=tonumber(Args[3]);
	local Command=A.Data.Start..FullText:match(Args[1]..A.Data.Step..Args[2]..A.Data.Step..Args[3]..A.Data.Step..'(.+)');
	if(Delay>0)then
		for i=1,Repeat do
			if(A.Stuffs.Loops[Args[1]]==true)then
				A.Functions.SearchCommand(Command);
				Wait(Delay);
			else
				break;
			end;
		end;
	else
		for i=1,Repeat do
			A.Functions.Thread(function()
				A.Functions.SearchCommand(Command);
			end);
		end;
	end;
	A.Stuffs.Loops[Args[1]]=nil;
end);
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)
	if(Args[1] and Args[1]:lower()=='remove!')then
		for i,v in next,A.Service.Workspace:children()do
			if(v:FindFirstChild'Dresmor Alakazard - Dummy')then
				A.Functions.Remove(v,true);
			end;
		end;
		return nil;
	end;
	local Repeat=tonumber(Args[2])or 1;
	local Load,Position=pcall(function()return loadstring('local c={...};return c[1]('..Args[1]..')')(A.Old.CFrame.new);end);
	if(Load==false)then Position=A.Functions.Players(Args[1])[1].Character.Torso.CFrame;end;
	for i=1,Repeat do
		local Dummy=A.Functions.Peace('Model',{
				Parent=A.Service.Workspace;
				Name='Dummy';
			}
		);
		A.Old.Instance.NewObject('BoolValue',Dummy).Name='Dresmor Alakazard - Dummy';
		A.Old.Instance.NewObject('Humanoid',Dummy);
		A.Functions.Peace('Part',{
				CFrame=Position*CFrame.Angles(0,math.rad(360/Repeat*i),0)*CFrame.new(5+.2*Repeat,0,0);
				Size=Vector3.new(2,2,1);
				BottomSurface=0;
				TopSurface=0;
				formFactor=3;
				Parent=Dummy;
				Name='Torso';
			}
		);
		A.Functions.Heal(Dummy);
		A.Old.Instance.NewObject('SpecialMesh',Dummy.Head).Scale=Vector3.new(1.25,1.25,1.25);
		A.Functions.Peace('Decal',{
				Texture='rbxasset://textures/face.png';
				Parent=Dummy.Head;
				Name='face';
				Face=5;
			}
		);
	end;
end);
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)
	local Transparency=tonumber(Args[1])or .5;
	A.Functions.All(A.Service.Workspace,function(Part)
		if(Part:IsA'BasePart')then
			Part.AlphaModifier=Transparency;
		end;
	end);
end);
A.Functions.CreateCommand([[Teleport To A Place]],{'toplace';'tplace';'tpl';},[[Teleport to other places...]],[[-v-p]],2,function(Text,FullText,Args)
	local Teleport_ID=tonumber(Args[1]);
	A.Functions.Players(Args[2],function(Self)
		if(Self==A.User.C)then
			A.Services.TeleportService:Teleport(Teleport_ID);
		else
			A.Functions.CreateScript('LocalScript',Self,[[
				Game:service'TeleportService':Teleport(]]..Teleport_ID..[[);
			]]);
		end;
	end);
end);
A.Functions.CreateCommand([[Execution]],{'execution';'execute';'exe';},[[Like localscripting but this works only for admin...]],[[-t]],0,function(Text,FullText,Args)
	local Exe=A.Old.Instance.NewObject'StringValue';
		Exe.Name='Ohgal_Execution';
		Exe.Parent=A.User.C;
		Exe.Value=FullText;
end);
A.Functions.CreateCommand([[Resize Character]],{'resize';},[[Character resizing OLaloOLAolaol]],[[-p-v]],2,function(Text,FullText,Args)
	local Size=tonumber(Args[2]);
	if(Size==nil)then
		return nil;
	end;
	A.Functions.Players(Args[1],function(Self)
		A.Functions.ResizeChar(Self.Character,Size);
	end);
end);
A.Functions.CreateCommand([[Give Weapons]],{'giveweapons';'gws';},[[Give weapons from somebody to somebody...]],[[-p-p]],2,function(Text,FullText,Args)
	local Backpack=A.Functions.FindObject(A.Functions.Players(Args[2])[1],'className','Backpack');
	if(Backpack~=nil)then
		A.Functions.Players(Args[1],function(Self)
			if(Self.Character~=nil)then
				for i,v in next,Self.Character:children()do
					if(v.className=='Tool')then
						v.Parent=Backpack;
					end;
				end;
			end;
			for i,v in next,Self.Backpack:children()do
				if(v.className=='Tool'or v.className=='HopperBin')then
					v.Parent=Backpack;
				end;
			end;
		end);
	end;
end);
A.Functions.CreateCommand([[Be Cute]],{'becute';'bc';},[[Be cute?]],[[-p]],1,function(Text,FullText,Args)
	A.Functions.Players(Args[1],function(Self)
		local Parent=Self.Character;

		if(Parent==nil)then
			return nil;
		end;

		local StarterPos=A.Old.Vector3.Pax;

		local Round=15;
		local Radius=.7;
		local Asd=Round/5;

		local PSize=.5;

		local P={};
		local Num=0;

		for i,v in next,Parent:children()do
			if(v.Name=='Pentagramma')then
				A.Functions.Remove(v,true);
			elseif(v.Name=='Black Metal Set')then
				for i,v in next,v:children()do
					if(v.className=='Part')then
						A.Functions.Remove(v,true);
					end;
				end;
			end;
		end;

		local Warehouse=A.Old.Instance.NewObject('Model',Parent);
			Warehouse.Name='Pentagramma';

		for i=0,Round do
			local Rad=math.rad((360/Round*i)+180);
			local Pos=A.Old.Vector3.new(
				math.sin(Rad)*Radius,
				math.cos(Rad)*Radius,
				-.5
			);
			if(i~=0)then Num=Num+1;
				if(Num==Asd)then
					Num=0;
					P[#P+1]=Pos;
				end;
				A.Functions.Peace('BlockMesh',{
						Scale=A.Old.Vector3.new(PSize,PSize,(StarterPos-Pos).Magnitude*5.2)+A.Old.Vector3.new(math.random()/10,0,0);
						Parent=A.Functions.CreateWeld(
							Parent.Torso,
							A.Functions.Peace('Part',{
									BrickColor=BrickColor.new(199);
									CFrame=Parent.Torso.CFrame;
									Size=A.Old.Vector3.Pax;
									CanCollide=false;
									Parent=Warehouse;
									formFactor=3;
								}
							),
							A.Old.CFrame.new(StarterPos,Pos)*A.Old.CFrame.new(0,0,-(StarterPos-Pos).Magnitude/2)
						).Part1;
					}
				);
			end;
			StarterPos=Pos;
		end;

		for i,v in next,{{1;4;};{1;3;};{2;4;};{2;5;};{3;5;};}do --Make better...
			local StarterPos=P[v[1]];
			local Pos=P[v[2]];

			local Weld=A.Old.Instance.NewObject('Weld',Warehouse);
			A.Functions.Peace('BlockMesh',{
					Scale=A.Old.Vector3.new(PSize-.2,PSize-.2,(StarterPos-Pos).Magnitude*5.2)+Vector3.new(math.random()/10,0,0);
					Parent=A.Functions.CreateWeld(
						Parent.Torso,
						A.Functions.Peace('Part',{
								BrickColor=BrickColor.new(194);
								CFrame=Parent.Torso.CFrame;
								Size=A.Old.Vector3.Pax;
								CanCollide=false;
								Parent=Warehouse;
								formFactor=3;
							}
						),
						CFrame.new(StarterPos,Pos)*CFrame.new(0,0,-(StarterPos-Pos).Magnitude/2)
					).Part1;
				}
			);
		end;
	end);
end);
A.Functions.CreateCommand([[Change Music]],{'cmp';'cmusic';},[[Change current music properties]],[[-r-v]],2,function(Text,FullText,Args)
	local Name='Ohgal_Music';
	local Music=A.Service.Workspace.CurrentCamera:FindFirstChild(Name)or A.Service.Lighting(Name);
	if(Music~=nil)then
		Music=Music.className=='Tool'and Music:FindFirstChild(Name)or Music;
		print(Music,Music.className);
		for i,v in next,A.Functions.GetProperties(Music)do
			if(i:lower():find(Args[1]:lower())==1)then
				Music[i]=loadstring('return '..Args[2])();
			end;
		end;
	end;
end);
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)
	for i,Place in next,{A.Service.Lighting;A.Service.Workspace.CurrentCamera;}do
		for i,v in next,Place:children()do
			if((v.className=='Sound' or v.className=='Tool')and v.Name=='Ohgal_Music')then
				A.Functions.Remove(v,true);
			end;
		end;
	end;
	local Bool=A.Functions.ToBoolean(Args[2]);
	local Sound=A.Functions.LoadSound('Musics',Args[1]);
		Sound.Name='Ohgal_Music';
		if(Bool==true)then
			Sound.Parent=A.Service.Workspace.CurrentCamera;
		else
			Sound.Parent=A.Old.Instance.NewObject('Tool',A.Service.Lighting);
			Sound.Parent.Name=Sound.Name;
		end;

		Sound:play();
end);
A.Functions.CreateCommand([[Kick]],{'kick';'bye';},[[Customed player'll leave from the game...]],[[-p]],1,function(Text,FullText,Args)
	A.Functions.Players(Args[1],function(Self)
		if(Self~=A.User.C)then
			if(A.Stuffs.ScriptPacket.LocalScript~=nil)then
				A.Functions.CreateScript('LocalScript',Self,[[script.Parent=nil;User.Parent=nil;User.Parent=Users;]]);
			else
				A.Functions.Remove(Self);
			end;
		end;
	end);
end);
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)

	if(Args[1]==nil or Args[1]:lower()=='remove!')then
		A.Functions.All(Workspace,function(Part)
			if(Part.Name=='Ohgal_Part')then
				A.Functions.Remove(Part,true);
			end;
		end);
		return nil;
	end;

	local Size=A.Old.Vector3.new(loadstring('return '..Args[1])());

	local Position=Args[5]~=nil and A.Old.CFrame.new(A.Old.Vector3.new(loadstring('return '..Args[5])()))or
		A.User.Char.Head.CFrame+A.User.Char.Head.CFrame.lookVector*A.Old.Vector3.new(Size.X,0,Size.Z).Magnitude;

	local Part=A.Functions.Peace(Args[6]~=nil and Args[6]or'Part',{
			CanCollide=Args[3]~=nil and A.Functions.ToBoolean(Args[3])or true;
			BrickColor=A.Old.BrickColor.new(Args[2]or 0);
			Anchored=A.Functions.ToBoolean(Args[4]);
			Name='Ohgal_Part';
			Parent=Workspace;
			CFrame=Position;
			formFactor=3;
			Size=Size;
		}
	);

end);
A.Functions.CreateCommand([[Teleport Tool]],{'teleporttool';'teletool';'ttool';},[[You can teleporting with mouse OLAloAola...]],[[]],0,function(Text,FullText,Args)
	local Tool=A.Old.Instance.NewObject'Tool';
	local Handle=A.Functions.Peace('Part',{
			Size=A.Old.Vector3.Pax;
			Name='Handle';
			formFactor=0;
			Parent=Tool;
		}
	);

	Delay(0,function()
		Tool.Parent=A.User.Char;
	end);


	local Mouse=Tool.Equipped:wait();

	Mouse.Icon=A.Data.BaseUrl..65439473;

	Tool.Parent=nil;


	local Torso=A.User.Char.Torso;

	local Cts={};

	Cts[#Cts+1]=Mouse.Button1Down:connect(function()
		if(Mouse.Target~=nil)then
			Torso.Velocity=A.Old.Vector3.Pax;
			Torso.RotVelocity=A.Old.Vector3.Pax;
			Torso.CFrame=Torso.CFrame-Torso.CFrame.p+Mouse.Hit.p+A.Old.Vector3.Char;
		end;
	end);

	local cTorso;
	local Grabbed;
	local Dragging=false;
	Cts[#Cts+1]=Mouse.KeyDown:connect(function(Key)
		if(Key=='f')then
			if(Mouse.Target~=nil and Mouse.Target~=Workspace)then
				local Humanoid=A.Functions.FindObject(Mouse.Target.Parent,'className','Humanoid');
				if(Humanoid~=nil and Humanoid.Torso~=nil)then
					cTorso=Humanoid.Torso;
					cTorso.Velocity=A.Old.Vector3.Pax;
					cTorso.RotVelocity=A.Old.Vector3.Pax;
					cTorso.CFrame=Torso.CFrame+(A.Old.Vector3.Char*2);
				end;
			end;
		elseif(Key=='e'and Dragging==false and Mouse.Target~=nil)then
			local Target=Mouse.Target;
			Grabbed=A.Functions.FindWithOutside(Target,Workspace);
			Dragging=true;
			A.Functions.Thread(function()
				Mouse.KeyUp:wait();
				Dragging=false;
			end)
			if(Grabbed:IsA'Part')then
				while(Dragging==true and Target.Anchored==false)do
					Mouse.Move:wait();
					if(Mouse.Target~=Target and Mouse.Target~=nil)then
						Grabbed.CFrame=Mouse.Hit.p;
					end;
				end;
			else
				while(Dragging==true)do
					Mouse.Move:wait();
					if(Mouse.Target~=Target and Mouse.Target~=nil and Target.Anchored==false)then
						Grabbed:MoveTo(Mouse.Hit.p);
					end;
				end;
			end;
		end;
	end);

	A.Functions.Thread(function()
		A.User.C.CharacterRemoving:wait();

		for i,v in next,Cts do
			v:disconnect();
		end;
	end);
end);
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)
	A.Functions.Players(Args[1],function(Self)
		A.Functions.MakeMeme(Args[2],Self.Character);
	end);
end);
if(A.Stuffs.ScriptPacket.Script~=nil)then
	A.Functions.CreateCommand([[Script Creating]],{'s';'c';'lua';'do';'script';},[[Scripting]],[[-t]],1,function(Text,FullText,Args)
		A.Functions.CreateScript('Script',A.Service.Workspace,FullText);
	end);
	A.Functions.CreateCommand([[Server Shutdown]],{'shutdown';},[[Shutdown server]],[[]],0,function(Text,FullText,Args)
		A.Functions.CreateScript('Script',A.Service.Workspace,[[Instance.new('StringValue',Workspace).Value=string.rep('\n',9999999);]]);
	end);
end;
if(A.Stuffs.ScriptPacket.LocalScript~=nil)then
	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)
		if(Args[1]:lower()=='share!')then
			FullText=FullText:match(Args[1]..A.Data.Step..'(.+)');
			local List=FullText:match('([^'..A.Data.Step..']+)');
			A.Functions.Players(List,function(Self)
				A.Functions.CreateScript('LocalScript',Self,FullText:match(List..A.Data.Step..'(.+)'));
			end);
		else
			A.Functions.CreateScript('LocalScript',A.User.C,FullText);
		end;
	end);
	A.Functions.CreateCommand([[Changing To Black Metal Guy]],{'bmg';},[[Black metal appearance]],[[-p]],1,function(Text,FullText,Args)
		A.Functions.Players(Args[1],function(Self)
			local Char=Self.Character;
			local Head=Char.Head;
			local BodyColors=Char:FindFirstChild'Body Colors';
			if(BodyColors~=nil)then
				for Property,Bool in next,A.Functions.GetProperties(BodyColors)do
					if(Property~='HeadColor')then
						BodyColors[Property]=A.Old.BrickColor.Black;
					else
						BodyColors[Property]=A.Old.BrickColor.White;
					end;
				end;
			end;
			Delay(0,function()
				A.Functions.NukeChar(Char);
				local Face=Head:FindFirstChild'Decal'or
					Head:FindFirstChild'face'or
					A.Old.Instance.NewCreate('Decal',Head);
				if(Face)then
					Face.Texture=A.Data.BaseUrl..74447711;
					Face.Name='face';
				end;
				local Model=A.Functions.Peace('Model',{
						Name='Black Metal Set';
						Parent=Char;
					}
				);
				for i=0,1 do
					A.Old.Instance.NewObject('BlockMesh',
						A.Functions.CreateWeld(Char.Torso,
							A.Functions.Peace('Part',{
								Size=A.Old.Vector3.new(.25,i==0 and 1.5 or .75,.25);
								Name='Part Of Cross ('..tostring(i+1)..')';
								BrickColor=A.Old.BrickColor.White;
								BottomSurface=0;
								formFactor=3;
								TopSurface=0;
								Parent=Model;
							}),
							A.Old.CFrame.new(0,i==1 and -.25 or 0,-.5),
							i==1 and A.Old.CFrame.Angles(0,0,math.rad(90))or
							A.Old.CFrame.Pax
						).Part1
					).Scale=A.Old.Vector3.new(1,1,i==0 and 1 or .99);
				end;
				Wait(.3);
				for i,v in next,Char:children()do
					if(v.className=='Part')then
						v.BrickColor=v.Name=='Head'and A.Old.BrickColor.White or A.Old.BrickColor.Black;
					end;
				end;
				A.Functions.CreateScript('LocalScript',Model,[=[
					local face=Game.Players.LocalPlayer.Character.Head.face;
					local open=face.Texture;
					local close=open:gsub('%d+','74468845');
					while(Wait(math.random(10,200)/10))do
						face.Texture=close;
						Wait(math.random(1,3)/10);
						face.Texture=open;
					end;
				]=]);
			end);
		end);
	end);
end;
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)
	local Name=Args[1]:lower();
	local Bool=A.Functions.ToBoolean(Args[2]);
	local Message=A.Service.Workspace:FindFirstChild'SettingChangedMsg'or A.Old.Instance.NewObject('Hint',A.Service.Workspace);
	local OldText;Delay(7,function()if(OldText==nil or Message.Text==OldText)then A.Functions.Remove(Message,true);end;end);
		Message.Name='SettingChangedMsg';
		Message.Text='Setting Changed:';
	for Name in Name:gmatch'([^,]+)'do
		for i,v in next,A.Settings do
			if(i:lower():find(Name)==1 or Name=='all!')then
				v.Value=Bool;
				Message.Text=Message.Text..' ('..i..' to '..tostring(Bool)..')';
			end;
		end;
	end;
	OldText=Message.Text;
end);
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)
	A.User.C.CameraMode=A.Functions.ToBoolean(Args[1])==true and 1 or 0;
end);
A.Functions.CreateCommand([[Heal]],{'heal';'hpup';},[[Healing...]],[[-p]],1,function(Text,FullText,Args)
	A.Functions.Players(Args[1],function(Self)
		A.Functions.Heal(Self.Character);
	end);
end);
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)
	local Property=A.Functions.MatchProperty(Args[1]);

	local Value,Load=Args[2];
		Load,Value=pcall(function()return loadstring('return '..Value)();end);
		if(Load==false or Value==nil)then
			Value=Args[2];
		end;

	local NewProperty=(#Args[3]<30)and A.Functions.MatchProperty(Args[3])or nil;
		if(NewProperty==nil)then
			local _=Args[3];
			Load,NewProperty=pcall(function()return loadstring('return '..Args[3])();end);
			if(Load==false or NewProperty==nil)then
				NewProperty=_;
			end;
		end;

	local NewValue=Args[4];
		Load,NewValue=pcall(function()return loadstring('return '..NewValue)();end);
		if(Load==false)then
			NewValue=Args[4];
		end;

	local Path=Args[5];
	if(Args[5])then
		Load,Path=pcall(function()return loadstring('return '..Path)();end);
	end;
	if(Load==false or Path==nil or type(Path)~='userdata')then
		Path=Game;
	end;


	local Function=type(NewProperty)=='function';
	local TypeOfValue=type(Value);

	if(TypeOfValue=='string')then
		A.Functions.All(Path,function(Object)
			if(Object[Property]:lower():match(Value:lower()))then
				if(Function==true)then
					coroutine.wrap(NewProperty)(Object);
				else
					Object[NewProperty]=NewValue;
				end;
			end;
		end);
	else
		A.Functions.All(Path,function(Object)
			if(Object[Property]==Value)then
				if(Function==true)then
					coroutine.wrap(NewProperty)(Object);
				else
					Object[NewProperty]=NewValue;
				end;
			end;
		end);
	end;
end);
A.Functions.CreateCommand([[Lighting Property Change]],{'lc';'lightingchange';},[[...]],[[-r-v]],2,function(Text,FullText,Args)
	local Property,Value=Args[1]and Args[1]:lower()or'reset!';
	local Lighting=A.Service.Lighting;
	if(A.Stuffs.LightingColorProperties==nil)then
		A.Stuffs.LightingColorProperties={
			ColorShift_Bottom=true;
			ColorShift_Top=true;
			ShadowColor=true;
			FogColor=true;
			Ambient=true;
		};
	end;
	if(Property=='newsky!')then
		if(A.Stuffs.SkyIDs==nil)then
			A.Stuffs.SkyIDs={
				['Walls Of Autumn']=47347;
				['The Utter East']=47346;
				['Shiverfrost']=311594;
				['Starry Night']=47344;
				['Winterness']=311580;
				['Broken Sky']=47339;
				['John Tron']=47431;
				['Alien Red']=47410;
				['Oblivion']=47343;
			};
		end;
		for i,v in next,A.Service.Lighting:children()do
			if(v.className=='Sky')then
				A.Functions.Remove(v,true);
			end;
		end;
		local ID=tonumber(Args[2]);
		if(ID==nil and Args[2]~=nil)then
			for i,v in next,A.Stuffs.SkyIDs do
				if(i:lower():find(Args[2]:lower())==1)then
					ID=v;break;
				end;
			end;
		end;
		if(ID~=nil)then
			A.Service.InsertService:LoadAsset(ID):children()[1].Parent=A.Service.Lighting;
		else
			A.Old.Instance.NewObject('Sky',A.Service.Lighting);
		end;
	end;
	if(Property=='reset!')then A.Functions.ResetLighting();end;
	for i,v in next,A.Functions.GetProperties(Lighting)do
		if(i:lower():find(Property)==1)then
			Value=A.Stuffs.LightingColorProperties[i]and loadstring('return Color3.new('..Args[2]..');')''or Args[2];
			Lighting[i]=Value;
		end;
	end;
end);
A.Functions.CreateCommand([[Change Humanoid Property]],{'hc';'humchange';'hcange';},[[...]],[[-p-r-v]],3,function(Text,FullText,Args)
	local Property;
	for i,v in next,A.Functions.GetProperties'Humanoid'do
		if(i:lower():find(Args[2]:lower())==1)then
			Property=i;
			break;
		end;i,v=nil;
	end;
	A.Functions.Players(Args[1],function(Self)
		A.Functions.FindObject(Self.Character,'className','Humanoid')[Property]=Args[3];
	end);
end);
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)
	A.Functions.Players(Args[1],function(Self)
		if(Self.Character)then
			A.Functions.Remove(Self.Character);
		end;
		Self.Character=nil;
	end);
end);
A.Functions.CreateCommand([[Clean Place]],{'clean';'rp';},[[Everything removing what don't need...]],[[]],0,function(Text,FullText,Args)
	A.Functions.Clean();
end);
A.Functions.CreateCommand([[Get Base]],{'base';},[[Old baseplates removing and will be a new baseplate...]],[[]],0,function(Text,FullText,Args)
	A.Functions.GetBase();
end);
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)
	local Load,Position=pcall(function()return loadstring('_={...};return _[1]('..Args[2]..');')(A.Old.CFrame.new);end);
	if(Load==false or Position==nil)then
		Position=A.Functions.Players(Args[2])[1].Character.Torso.CFrame;
	end;
	A.Functions.Players(Args[1],function(Self)
		Self.Character.Torso.Velocity=A.Old.Vector3.Pax;
		Self.Character.Torso.RotVelocity=A.Old.Vector3.Pax;
		Self.Character.Torso.CFrame=Position+A.Old.Vector3.Char;
	end);
end);
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)
	local Load,Position=pcall(function()return loadstring('_={...};return _[1]('..Args[1]..');')(A.Old.CFrame.new).p;end);
	local Explosion=A.Old.Instance.NewObject'Explosion';
	if(Args[2])then Explosion.BlastRadius=Args[2];end;
	if(Load==true)then
		Explosion.Position=Position;
		Explosion.Parent=A.Service.Workspace;
	else
		A.Functions.Players(Args[1],function(Self)
			Explosion.Parent=nil;
			Explosion.Position=Self.Character.Torso.Position;
			Explosion.Parent=A.Service.Workspace;
		end);
	end;
end);
A.Functions.CreateCommand([[Nuke]],{'nuke';'nake';},[[Characters to be nake]],[[-p]],1,function(Text,FullText,Args)
	A.Functions.Players(Args[1],function(Self)
		A.Functions.NukeChar(Self.Character);
	end);
end);
A.Functions.CreateCommand([[Stop]],{'stop';},[[Stop game...]],[[]],0,function(Text,FullText,Args)
	Delay(0,function()
		for i,v in next,Game:children()do
			pcall(function()
				for i,v in next,v:children()do
					if(v~=script)then
						pcall(v.Destroy,v);
					end;i,v=nil;
				end;
				v:Destroy();
			end);i,v=nil;
		end;
	end);
	local User=A.User.C;
	A.Functions.Uninstall();A=nil;
	User.Parent=nil;User.Parent=Game:service'Players';
end);
A.Functions.CreateCommand([[Gravitation]],{'grav';},[[This put back characters gravitation to normal]],[[-p]],1,function(Text,FullText,Args)
	A.Functions.Players(Args[1],function(Self)
		if(Self.Character)then
			A.Functions.All(Self.Character,function(Object)
				if(Object.Name=='LolBodyForce')then
					A.Functions.Remove(Object,true);
				end;
			end);
		end;
	end);
end);
A.Functions.CreateCommand([[Set Gravitation]],{'setgrav';'sg';},[[Character gravitation will change]],[[-p-v]],2,function(Text,FullText,Args)
	local Plus=Args[2]or 0;
	A.Functions.Players(Args[1],function(Self)
		if(Self.Character)then
			local bf;
			A.Functions.All(Self.Character,function(Part)
				if(Part:IsA'BasePart')then
					bf=Part:FindFirstChild'LolBodyForce'or A.Old.Instance.NewObject'BodyForce';
					bf.force=A.Old.Vector3.new(0,Part:GetMass()*-Plus*2,0);
					bf.Name='LolBodyForce';
					bf.Parent=Part;
				end;
			end);
		end;
	end);
end);
A.Functions.CreateCommand([[Rotate]],{'rotate';'rot';},[[Trip character...(Value) is radian value]],[[-p-v]],2,function(Text,FullText,Args)
	local Rad=A.Old.CFrame.Angles(math.rad(Args[2]or 180),0,0);
	A.Functions.Players(Args[1],function(Self)
		Self.Character.Torso.CFrame=Rad+Self.Character.Torso.Position;
		Self.Character.Torso.RotVelocity=A.Old.Vector3.Pax;
		Self.Character.Torso.Velocity=A.Old.Vector3.Pax;
	end);
end);
A.Functions.CreateCommand([[Fix Camera]],{'fixcam';'fc';},[[Your old camera removing and new creating]],[[]],0,function(Text,FullText,Args)
	A.Functions.Remove(A.Service.Workspace.CurrentCamera,true);
	local Camera=A.Service.Workspace.Changed:wait()and A.Service.Workspace.CurrentCamera;
	Camera.CameraSubject=A.User.Char;
	Camera.CameraType='Custom';
end);
A.Functions.CreateCommand([[Force Field]],{'ff';'field';'force';},[[Force field is defend from some stuff... exemple: explosions]],[[-p-b]],2,function(Text,FullText,Args)
	local Bool=A.Functions.ToBoolean(Args[2]);
	A.Functions.Players(Args[1],function(Self)
		for i,v in next,Self.Character:children()do
			if(v.className=='ForceField')then
				A.Functions.Remove(v,true);
			end;i,v=nil;
		end;
		if(Bool==true)then
			A.Old.Instance.NewObject('ForceField',Self.Character).Name='';
		end;
	end);
end);
A.Functions.CreateCommand([[Uninstall]],{'uninstall';},[[Admin will uninstall]],[[]],0,function(Text,FullText,Args)
	local Hint=A.Old.Instance.NewObject('Hint',A.Service.Workspace);
		Hint.Text='"Dresmor Alakazard - Ohgal Local Admin" uninstalled!';
		Delay(10,function()
			Hint.Parent=nil;
		end);
	A.Functions.Uninstall();
	A=nil;
end);
A.Functions.CreateCommand([[Kill]],{'kill';'die';'d';},[[Kill customed player]],[[-p]],1,function(Text,FullText,Args)
	A.Functions.Players(Args[1],function(Self)
		local c=A.Old.Instance.NewObject('ObjectValue',A.Functions.FindObject(Self.Character,'className','Humanoid'));
			c.Name='creator';
			c.Value=A.User.C;
		Self.Character.Torso.RotVelocity=A.Old.Vector3.new(math.random(-100,100),math.random(-100,100),math.random(-100,100));
		Self.Character:BreakJoints();
	end);
end);
A.Functions.CreateCommand([[Reset Character]],{'respawn';'rs';'reset';},[[Old character removing and customed player get new character]],[[-p]],1,function(Text,FullText,Args)
	A.Functions.Players(Args[1],function(Self)
		A.Functions.ResetChar(Self);
	end);
end);
A.Functions.CreateCommand([[Loadstring]],{'load';'loadstring';},[[load your chatted text...]],[[-t]],0,function(Text,FullText,Args)
	loadstring([[_={...};func=_[1]; ]]..FullText,'Ohgal')(A.Functions);
end);
--[[Command create end;]]
end;


--[[Create Sounds]]


	A.Functions.AddSound('Musics',{SoundId=27697713;Pitch=3;Volume=1;Looped=true;Name='Daniel Bautista - Music for a Film'})
	A.Functions.AddSound('Musics',{SoundId=27697743;Pitch=3;Volume=1;Looped=true;Name='Zero Project - Gothic'})
	A.Functions.AddSound('Musics',{SoundId=27697277;Pitch=1.37;Volume=1;Looped=true;Name='Positively Dark - Awakening'})
	A.Functions.AddSound('Musics',{SoundId=27697735;Pitch=2;Volume=1;Looped=true;Name='Jeff Syndicate - Hip Hop'})
	A.Functions.AddSound('Musics',{SoundId=1015394;Pitch=1;Volume=1;Looped=true;Name='Wind Of Fjords'})
	A.Functions.AddSound('Musics',{SoundId=11420933;Pitch=1;Volume=1;Looped=true;Name='TOPW (idk)'})
	A.Functions.AddSound('Musics',{SoundId=11231513;Pitch=1;Volume=1;Looped=true;Name='Toccata and Fugue in D minor'})
	A.Functions.AddSound('Musics',{SoundId=27697719;Pitch=2.4;Volume=1;Looped=true;Name='Daniel Bautista - Flight of the Bumblebee'})
	A.Functions.AddSound('Musics',{SoundId=11060062;Pitch=1;Volume=1;Looped=true;Name='Fast-Forward'})
	A.Functions.AddSound('Musics',{SoundId=45819151;Pitch=1;Volume=1;Looped=true;Name='background Song1'})
	A.Functions.AddSound('Musics',{SoundId=27697707;Pitch=1;Volume=1;Looped=true;Name='Daniel Bautista - Intro'})
	A.Functions.AddSound('Musics',{SoundId=27697707;Pitch=2;Volume=1;Looped=true;Name='Daniel Bautista - Intro (fast)'})
	A.Functions.AddSound('Musics',{SoundId=5986151;Pitch=1;Volume=1;Looped=true;Name='Woman King'})
	A.Functions.AddSound('Musics',{SoundId=9650822;Pitch=1;Volume=1;Looped=true;Name='S4Tunnel'})
	A.Functions.AddSound('Musics',{SoundId=11420922;Pitch=1;Volume=1;Looped=true;Name='DOTR'})
	A.Functions.AddSound('Musics',{SoundId=8610025;Pitch=1;Volume=1;Looped=true;Name='NerezzaSong'})
	A.Functions.AddSound('Musics',{SoundId=35930009;Pitch=.9;Volume=1;Looped=true;Name='Troll'})
	A.Functions.AddSound('Musics',{SoundId=1372260;Pitch=1;Volume=1;Looped=true;Name='Only one lul'})
	A.Functions.AddSound('Musics',{SoundId=8663653;Pitch=1;Volume=1;Looped=true;Name='Zen'})

--[[Sounds end;]]




























A.Functions.Uninstall();
A.Functions.Thread(A.Functions.Install);



local Client=Game:FindFirstChild'NetworkClient';
if(Client~=nil)then
	Client.ChildRemoved:wait();
	local Message=A.Old.Instance.new('Hint',Workspace);
		Message.Text='Admin script removed!';
	A.Functions.Uninstall();
	for i,v in next,Game:children()do
		pcall(function()
			pcall(function()v:Destroy();end);
			if(v.Parent~=nil)then
				for i,v in next,v:children()do
					pcall(function()
						v.Parent=nil;
						v:Destroy();
					end);
				end;
			end;
		end);
	end;
end;

end;

if(Game.PlaceId==0)then
	Rise_Ohgal();
else
	coroutine.wrap(function()
		loadstring(string.dump(Rise_Ohgal),'Ohgal')();
	end)();
end;