API tools faq
paste
sweetpeps

big small

sweetpeps
Oct 19th, 2018
135
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 185.76 KB | None | 0 0
raw download clone embed print report
  1. --At line 102 add in other memes if you want -Japuba1700
  2.  
  3.  
  4. Rise_Ohgal=function()
  5.  
  6.  
  7. A={};
  8.  
  9. A.Old={};
  10.  
  11. A.Data={};
  12.  
  13. A.User={};
  14.  
  15. A.Calls={};
  16.  
  17. A.Images={};
  18.  
  19. A.Stuffs={};
  20.  
  21. A.Sounds={};
  22.  
  23. A.Modules={};
  24.  
  25. A.Service={};
  26.  
  27. A.Settings={};
  28.  
  29. A.Commands={};
  30.  
  31. A.Warehouse={};
  32.  
  33. A.Functions={};
  34.  
  35. A.EachCalls={};
  36.  
  37. A.GuiModules={};
  38.  
  39. A.SettingIDs={};
  40.  
  41. A.KeyCommands={};
  42.  
  43. A.ObjectsData={};
  44.  
  45. A.RecentCommands={};
  46.  
  47. A.SettingsFunctions={};
  48.  
  49.  
  50. A.Stuffs.Meter={};
  51.  
  52. A.Warehouse.Objects={};
  53.  
  54. A.Warehouse.Connections={};
  55.  
  56.  
  57. A.ObjectsData.KnowProperties={};
  58.  
  59. A.ObjectsData.KnowPropertiesNumber={};
  60.  
  61. A.ObjectsData.GlobalProperties={'Name';'className';'Parent';'archivable';};
  62.  
  63. A.ObjectsData.EspecialProperties={'AbsolutePosition';'AbsoluteSize';'AccountAge';'AccountAgeReplicate';
  64.  
  65. 'Active';'Adornee';'AllowAmbientOcclusion';'AllowTeamChangeOnTouch';'AluminumQuality';
  66.  
  67. 'AlwaysOnTop';'Ambient';'AmbientReverb';'Anchored';'Angularvelocity';'AnimationId';
  68.  
  69. 'AreHingesDetected';'AttachmentForward';'AttachmentPoint';'AttachmentPos';
  70.  
  71. 'AttachmentRight';'AttachmentUp';'AutoAssignable';'AutoButtonColor';'AutoColorCharacters';
  72.  
  73. 'AvailablePhysicalMemory';'Axes';'BackgroundColor';'BackgroundColor3';'BackgroundTransparency';
  74.  
  75. 'BaseTextureId';'BaseUrl';'Bevel';'Roundness';'BinType';'BlastPressure';'BlastRadius';
  76.  
  77. 'BodyColor';'BodyPart';'BorderColor';'BorderColor3';'BorderSizePixel';'BrickColor';
  78.  
  79. 'Brightness';'Browsable';'BubbleChat';'BubbleChatLifetime';'BubbleChatMaxBubbles';
  80.  
  81. 'Bulge';'Button1DownConnectionCount';'Button1UpConnectionCount';'Button2DownConnectionCount';
  82.  
  83. 'Button2UpConnectionCount';'C0';'C1';'CameraMode';'CameraSubject';'CameraType';
  84.  
  85. 'CanBeDropped';'CanCollide';'CartoonFactor';'CastShadows';'CelestialBodiesShown';
  86.  
  87. 'CFrame';'Cframe';'Character';'CharacterAppearance';'CharacterAutoLoads';'ChatScrollLength';
  88.  
  89. 'ClassicChat';'ClearTextOnFocus';'ClipsDescendants';'CollisionSoundEnabled';
  90.  
  91. 'CollisionSoundVolume';'Color';'Bottom';'Top';'ConstrainedValue';'ControllingHumanoid';
  92.  
  93. 'ControlMode';'ConversationDistance';'CoordinateFrame';'CorrodedMetalQuality';'CPU';
  94.  
  95. 'CpuCount';'CpuSpeed';'CreatorId';'CreatorType';'CurrentAngle';'CurrentCamera';
  96.  
  97. 'CycleOffset';'D';'DataCap';'DataComplexity';'DataComplexityLimit';'DataCost';
  98.  
  99. 'DataReady';'Deprecated';'DeselectedConnectionCount';'DesiredAngle';'DiamondPlateQuality';
  100.  
  101. 'Disabled';'DistanceFactor';'DistributedGameTime';'DopplerScale';'Draggable';'DraggingV1';
  102.  
  103. 'Duration';'EditorFont';'EditorFontSize';'EditorTabWidth';'ElapsedTime';'Elasticity';
  104.  
  105. 'Enabled';'ExplosionType';'ExtentsOffset';'F0';'F1';'F2';'F3';'Face';'FaceId';'Faces';
  106.  
  107. 'FieldOfView';'Focus';'FogColor';'FogEnd';'FogStart';'Font';'FontSize';'Force';'FormFactor';
  108.  
  109. 'Friction';'From';'GearGenreSetting';'Genre';'GeographicLatitude';'GfxCard';'Graphic';
  110.  
  111. 'GrassQuality';'Grip';'GripForward';'GripPos';'GripRight';'GripUp';'Guest';'HeadsUpDisplay';
  112.  
  113. 'Health';'Heat';'Hit';'Humanoid';'IceQuality';'Icon';'IdleConnectionCount';'Image';
  114.  
  115. 'InitialPrompt';'InOut';'InUse';'IsPaused';'IsPlaying';'JobId';'Jump';'KeyDownConnectionCount';
  116.  
  117. 'KeyUpConnectionCount';'LeftLeg';'LeftRight';'LinkedSource';'LocalPlayer';'Location';
  118.  
  119. 'Locked';'LODX';'LODY';'Looped';'Material';'MaxActivationDistance';'MaxCollisionSounds';
  120.  
  121. 'MaxExtents';'MaxForce';'MaxHealth';'MaxItems';'MaxPlayers';'MaxSpeed';'MaxThrust';
  122.  
  123. 'MaxTorque';'MaxValue';'MaxVelocity';'MembershipType';'MembershipTypeReplicate';'MeshId';
  124.  
  125. 'MeshType';'MinValue';'Modal';'MouseButton1ClickConnectionCount';'MouseButton1DownConnectionCount';
  126.  
  127. 'MouseButton1UpConnectionCount';'MouseButton2ClickConnectionCount';'MouseButton2DownConnectionCount';
  128.  
  129. 'MouseButton2UpConnectionCount';'MouseDelta';'MouseDragConnectionCount';'MouseEnterConnectionCount';
  130.  
  131. 'MouseHit';'MouseLeaveConnectionCount';'MouseLock';'MouseMovedConnectionCount';'MouseTarget';
  132.  
  133. 'MouseTargetFilter';'MouseTargetSurface';'MoveConnectionCount';'MoveState';'MultiLine';
  134.  
  135. 'NameOcclusion';'NetworkOwner';'Neutral';'NumPlayers';'Offset';'Opacity';'Origin';'OsPlatform';
  136.  
  137. 'OsVer';'OverlayTextureId';'P';'PantsTemplate';'ParamA';'ParamB';'Part';'Part0';
  138.  
  139. 'Part1';'Pitch';'PixelShaderModel';'PlaceId';'PlasticQuality';'PlatformStand';'PlayCount';
  140.  
  141. 'PlayerToHideFrom';'PlayOnRemove';'Point';'Port';'Position';'Preliminary';'PrimaryPart';
  142.  
  143. 'PrivateWorkingSetBytes';'Purpose';'RAM';'Reflectance';'ReplicatedSelectedConnectionCount';
  144.  
  145. 'ResizeableFaces';'ResizeIncrement';'Resolution';'ResponseDialog';'RightLeg';'RiseVelocity';
  146.  
  147. 'RobloxLocked';'RobloxVersion';'RolloffScale';'RotVelocity';'Scale';'Score';'ScriptsDisabled';
  148.  
  149. 'SecondaryColor';'Selected';'ShadowColor';'Shape';'Shiny';'ShirtTemplate';'ShowDeprecatedObjects';
  150.  
  151. 'ShowDevelopmentGui';'ShowPreliminaryObjects';'Sides';'Sit';'Size';'SizeConstraint';
  152.  
  153. 'SizeOffset';'SkinColor';'SkyboxBk';'SkyboxDn';'SkyboxFt';'SkyboxLf';'SkyboxRt';'SkyboxUp';
  154.  
  155. 'SlateQuality';'SoundId';'Source';'SparkleColor';'Specular';'StarCount';
  156.  
  157. 'Steer';'StickyWheels';'StudsBetweenTextures';'StudsOffset';'StudsPerTileU';'StudsPerTileV';
  158.  
  159. 'Style';'Summary';'SuperSafeChatReplicate';'Surface';'Surface0';
  160.  
  161. 'Surface1';'SurfaceInput';'Target';'TargetFilter';'TargetOffset';'TargetPoint';
  162.  
  163. 'TargetRadius';'TargetSurface';'TeamColor';'Terrain';'Text';'TextBounds';'TextColor';'TextColor3';
  164.  
  165. 'TextFits';'TextScaled';'TextStrokeColor3';'TextStrokeTransparency';'TextTransparency';'Texture';
  166.  
  167. 'TextureId';'TextureSize';'TextWrap';'TextWrapped';'TextXAlignment';'TextYAlignment';'Throttle';
  168.  
  169. 'ThrustD';'ThrustP';'Ticket';'Time';'TimeOfDay';'To';'Tone';'ToolTip';'TopBottom';'Torque';'Torso';
  170.  
  171. 'Transparency';'TrussDetail';'TurnD';'TurnP';'TurnSpeed';'UnitRay';'UserDialog';'UserId';'Value';
  172.  
  173. 'Version';'VertexColor';'VideoCaptureEnabled';'VideoMemory';'VideoQuality';
  174.  
  175. 'ViewSizeX';'ViewSizeY';'Visible';'Volume';'WalkDirection';'WalkSpeed';'WalkToPart';'WalkToPoint';
  176.  
  177. 'WheelBackwardConnectionCount';'WheelForwardConnectionCount';'WindowSize';'WireRadius';'WoodQuality';
  178.  
  179. 'X';'Y';'PlayerMouse';'Mouse';'location';'RequestQueueSize';'BottomSurface';'FrontSurface';
  180.  
  181. 'LeftSurface';'RightSurface';'TopSurface';'ZIndex';'formFactor';'BackSurface';'HeadColor';'RightArmColor';
  182.  
  183. 'LeftArmColor';'TorsoColor';'LeftLegColor';'RightLegColor';'Velocity';'cframe';
  184.  
  185. 'ColorShift_Bottom';'ColorShift_Top';'Ip';'Vertex';'userId';'PlayCount';
  186.  
  187. };
  188.  
  189. A.ObjectsData.EspecialPropertiesLower={};
  190.  
  191. for i,v in next,A.ObjectsData.EspecialProperties do
  192.  
  193. A.ObjectsData.EspecialPropertiesLower[i]=v:lower();
  194.  
  195. end;
  196.  
  197.  
  198. A.Images.Meme={
  199.  
  200. megusta=47594659;
  201.  
  202. sparta=74142203;
  203.  
  204. sovpax=60298055;
  205.  
  206. ujelly=48989071;
  207.  
  208. smile2=63175216;
  209.  
  210. smile3=63186465;
  211.  
  212. troll=45120559;
  213.  
  214. horse=62079221;
  215.  
  216. angry=48258623;
  217.  
  218. orzse=62677682;
  219.  
  220. smile=63174888;
  221.  
  222. rofl=47595647;
  223.  
  224. okey=62830600;
  225.  
  226. yeaw=53646377;
  227.  
  228. here=62677045;
  229.  
  230. har=48260066;
  231.  
  232. sun=47596170;
  233.  
  234. lol=48293007;
  235.  
  236. sad=53645378;
  237.  
  238. lin=48290678;
  239.  
  240. sls=53646388;
  241.  
  242. j1d=45031979;
  243.  
  244. jim=74885351;
  245.  
  246. };
  247.  
  248.  
  249.  
  250. --[[Functions]]
  251.  
  252. A.Functions.Thread=function(Function)
  253.  
  254. return coroutine.resume(coroutine.create(Function));
  255.  
  256. end;
  257.  
  258. A.Functions.Connect=function(Object,Event,Function,Table)
  259.  
  260. local Connection=Object[Event]:connect(Function);
  261.  
  262. A.Warehouse.Connections[#A.Warehouse.Connections+1]=Connection;
  263.  
  264. if(Table~=nil)then
  265.  
  266. Table.Connections[#Table.Connections+1]=Connection;
  267.  
  268. end;
  269.  
  270. return Object,Connection;
  271.  
  272. end;
  273.  
  274. A.Functions.Wait=function(Number)
  275.  
  276. local _,Number2=A.Service.RunService.Stepped:wait();
  277.  
  278. local Plus;
  279.  
  280. Number=Number and Number-.01 or 0;
  281.  
  282. if(Number>Number2 and Number~=Number2)then
  283.  
  284. while(Number>Number2 and Number~=Number2)do
  285.  
  286. _,Plus=A.Service.RunService.Stepped:wait();
  287.  
  288. Number2=Number2+Plus;
  289.  
  290. end;
  291.  
  292. end;
  293.  
  294. end;
  295.  
  296. A.Functions.MatchProperty=function(Text)
  297.  
  298.  
  299. Text=Text:lower();
  300.  
  301.  
  302. local Found;
  303.  
  304.  
  305. for i,v in next,A.ObjectsData.GlobalProperties do
  306.  
  307. if(v:lower():find(Text)==1)then
  308.  
  309. Found=v;
  310.  
  311. break;
  312.  
  313. end;
  314.  
  315. end;
  316.  
  317.  
  318. if(Found==nil)then
  319.  
  320. for i,v in next,A.ObjectsData.EspecialPropertiesLower do
  321.  
  322. if(v:find(Text)==1)then
  323.  
  324. Property=A.ObjectsData.EspecialProperties[i];
  325.  
  326. break;
  327.  
  328. end;i,v=nil;
  329.  
  330. end;
  331.  
  332. end;
  333.  
  334.  
  335. return Found;
  336.  
  337.  
  338. end;
  339.  
  340. A.Functions.GetProperties=function(Object,InNumber)
  341.  
  342. local Class=type(Object)=='userdata'and Object.className or Object
  343.  
  344. if(A.ObjectsData.KnowProperties[Class]==nil)then
  345.  
  346. if(type(Object)=='string')then
  347.  
  348. Object=A.Old.Instance.NewObject(Object);
  349.  
  350. end;
  351.  
  352. local New={};
  353.  
  354. for i,v in next,A.ObjectsData.EspecialProperties do
  355.  
  356. if(pcall(function()return Object[v];end)and Object:FindFirstChild(v)==nil)then
  357.  
  358. New[v]=true;
  359.  
  360. end;
  361.  
  362. end;
  363.  
  364. A.ObjectsData.KnowProperties[Class]=New;
  365.  
  366. local Number=0;
  367.  
  368. local Numbered={};
  369.  
  370. for i,v in next,New do
  371.  
  372. Number=Number+1;
  373.  
  374. Numbered[Number]=i;
  375.  
  376. i,v=nil;
  377.  
  378. end;
  379.  
  380. Number=nil;
  381.  
  382. A.ObjectsData.KnowPropertiesNumber[Class]=Numbered;
  383.  
  384. end;
  385.  
  386. Object=nil;
  387.  
  388. return InNumber==true and A.ObjectsData.KnowPropertiesNumber[Class]or A.ObjectsData.KnowProperties[Class];
  389.  
  390. end;
  391.  
  392. A.Functions.CopyTable=function(Table,New)
  393.  
  394. if(Table and type(Table)=='table')then
  395.  
  396. New=New~=nil and New or{};
  397.  
  398. for i,v in next,Table do
  399.  
  400. New[i],i,v=v,nil;
  401.  
  402. end;
  403.  
  404. return New;
  405.  
  406. end;
  407.  
  408. end;
  409.  
  410. A.Functions.GetData=function(Object)
  411.  
  412. local Class=Object.className;
  413.  
  414. if(A.Warehouse.Objects[Class])then
  415.  
  416. for i,v in next,A.Warehouse.Objects[Class]do
  417.  
  418. if(v.Object==Object)then
  419.  
  420. v.Rank=i;
  421.  
  422. return v;
  423.  
  424. else i,v=nil;
  425.  
  426. end;
  427.  
  428. end;
  429.  
  430. end;
  431.  
  432. return nil;
  433.  
  434. end;
  435.  
  436. A.Functions.KillData=function(Object,Data)
  437.  
  438. Data=Data~=nil and Data or A.Functions.GetData(Object);
  439.  
  440. if(Data~=nil)then
  441.  
  442. for i,v in next,Data.Connections do
  443.  
  444. v:disconnect();i,v=nil;
  445.  
  446. end;
  447.  
  448. table.remove(Data.Mother(),Data.Rank);
  449.  
  450. for i,v in next,Data do
  451.  
  452. Data[i],i,v=nil;
  453.  
  454. end;
  455.  
  456. end;
  457.  
  458. return Object;
  459.  
  460. end;
  461.  
  462. A.Functions.GiveData=function(Object)
  463.  
  464. if(A.Functions.GetData(Object)==nil)then
  465.  
  466. local Class=Object.className;
  467.  
  468. if(A.Warehouse.Objects[Class]==nil)then A.Warehouse.Objects[Class]={};end;
  469.  
  470. local Rank=#A.Warehouse.Objects[Class]+1;
  471.  
  472. local Data={};A.Warehouse.Objects[Class][Rank]=Data;
  473.  
  474. Data.Rank=Rank
  475.  
  476. Data.Object=Object;
  477.  
  478. Data.Properties={};
  479.  
  480. Data.Connections={};
  481.  
  482. Data.Mother=function()return A.Warehouse.Objects[Class];end;
  483.  
  484.  
  485. A.Functions.Connect(Object,'Changed',function(Property)
  486.  
  487. if(Data.Properties[Property]~=nil)then
  488.  
  489. local Health=Data.Properties[Property]();
  490.  
  491. if(Property=='Parent')then
  492.  
  493. if(pcall(function()Object[Property]=Health;end)==false)then
  494.  
  495. A.Functions.KillData(Object,Data);
  496.  
  497. end;
  498.  
  499. else
  500.  
  501. Object[Property]=Health;
  502.  
  503. end;
  504.  
  505. end;Property,Health=nil;
  506.  
  507. end,Data);
  508.  
  509.  
  510. return Object,Data;
  511.  
  512. end;
  513.  
  514. end;
  515.  
  516. A.Functions.Remove=function(Object,Destroy)
  517.  
  518. if(Object)then
  519.  
  520. pcall(function()
  521.  
  522. Object.Parent=nil;
  523.  
  524. if(Destroy~=true)then
  525.  
  526. Object:Remove();
  527.  
  528. else
  529.  
  530. Object:Destroy();
  531.  
  532. end;
  533.  
  534. end);
  535.  
  536. end;
  537.  
  538. end;
  539.  
  540. A.Functions.All=function(Object,Function,Table,Return)
  541.  
  542. if(Function~=nil)then
  543.  
  544. for i,v in next,Object:children()do
  545.  
  546. if(v~=script)then
  547.  
  548. pcall(function()
  549.  
  550. Function(v);
  551.  
  552. A.Functions.All(v,Function,Table,Return);
  553.  
  554. end);
  555.  
  556. end;
  557.  
  558. end;
  559.  
  560. else
  561.  
  562. Return=Return==nil and true or false;
  563.  
  564. Table=Table~=nil and Table or{};
  565.  
  566. for i,v in next,Object:children()do
  567.  
  568. Table[#Table+1]=v;
  569.  
  570. pcall(A.Functions.All,v,nil,Table,Return);
  571.  
  572. i,v=nil;
  573.  
  574. end;
  575.  
  576. if(Return)then
  577.  
  578. return Table;
  579.  
  580. end;
  581.  
  582. end;
  583.  
  584. end;
  585.  
  586. A.Functions.FindObject=function(Object,Property,Value)
  587.  
  588. for i,v in next,Object:children()do
  589.  
  590. if(v[Property]==Value)then
  591.  
  592. return v;
  593.  
  594. end;
  595.  
  596. i,v=nil;
  597.  
  598. end;
  599.  
  600. end;
  601.  
  602. A.Functions.ObjectWait=function(Object,Property,Value)
  603.  
  604. local Part=A.Functions.FindObject(Object,Property,Value);
  605.  
  606. if(Part)then return Part;end;
  607.  
  608. while(A~=nil)do
  609.  
  610. Part=Object.ChildAdded:wait();
  611.  
  612. if(Part[Property]==Value)then
  613.  
  614. return Part;
  615.  
  616. end;
  617.  
  618. end;
  619.  
  620. end;
  621.  
  622. A.Functions.PropertyWait=function(Object,Property)
  623.  
  624. if(Object[Property]==nil)then
  625.  
  626. while(Object.Changed:wait()~=Property)do end;
  627.  
  628. end;
  629.  
  630. return Object[Property];
  631.  
  632. end;
  633.  
  634. A.Functions.CreateCall=function(Description,Calls,Function)
  635.  
  636. local Rank=#A.Calls+1;
  637.  
  638. local New={};A.Calls[Rank]=New;
  639.  
  640. New.Function=Function;
  641.  
  642. New.Description=Description;
  643.  
  644. New.Calls='"'..table.concat(Calls,'","')..'"';
  645.  
  646. for i,v in next,Calls do
  647.  
  648. A.EachCalls[v]=function(...)return A.Calls[Rank].Function(...);end;
  649.  
  650. end;
  651.  
  652. New,Description,Calls,Function=nil;
  653.  
  654. end;
  655.  
  656. A.Functions.MakeMeme=function(Type,Char)
  657.  
  658. if(Char)then
  659.  
  660. Type=Type~=nil and tostring(Type):lower()or'reset!'
  661.  
  662. local Meme=A.Images.Meme[Type]or Type;
  663.  
  664. local BBG_SIZE=Char.Head.Size.X*1.25;
  665.  
  666. local STUD_VECTOR_1=Char.Head.Size.Z/4;
  667.  
  668. local STUD_VECTOR_2=Char.Head.Size.Z;
  669.  
  670. local bbg=Char:FindFirstChild'BBGMEME'or A.Old.Instance.NewObject('BillboardGui',Char);
  671.  
  672. bbg.StudsOffset=A.Old.Vector3.new(0,STUD_VECTOR_1,STUD_VECTOR_2);
  673.  
  674. bbg.Size=A.Old.UDim2.new(BBG_SIZE,0,BBG_SIZE);
  675.  
  676. bbg.Adornee=Char.Head;
  677.  
  678. bbg.Name='BBGMEME';
  679.  
  680. local img=bbg:FindFirstChild'Meme'or A.Old.Instance.NewObject('ImageLabel',bbg);
  681.  
  682. img.BackgroundTransparency=1;
  683.  
  684. img.Image=A.Data.BaseUrl..Meme;
  685.  
  686. img.Size=A.Old.UDim2.Full;
  687.  
  688. img.Name='Meme';
  689.  
  690. for i,v in next,Char:children()do
  691.  
  692. if(v.className=='Hat')then
  693.  
  694. v=v:FindFirstChild'Handle';
  695.  
  696. if(v)then
  697.  
  698. v.Transparency=Type~='reset!'and 1 or 0;
  699.  
  700. end;
  701.  
  702. end;
  703.  
  704. i,v=nil;
  705.  
  706. end;
  707.  
  708. img,bbg,Type,Char=nil;
  709.  
  710. end;
  711.  
  712. end;
  713.  
  714. A.Functions.Players=function(Name,Function)
  715.  
  716. Name=Name~=nil and Name:lower()or'all!';
  717.  
  718. if(Function~=nil)then
  719.  
  720. local Load,Message;
  721.  
  722. for Name in Name:gmatch'([^,]+)'do
  723.  
  724. for Int,Player in next,A.Service.Players:GetPlayers()do
  725.  
  726. Load,Message=pcall(function()
  727.  
  728. if(Player.Name:lower():find(Name)==1 or A.EachCalls[Name](Player)==true)then
  729.  
  730. Function(Player);
  731.  
  732. end;
  733.  
  734. end);Int,Player=nil;
  735.  
  736. if(Game.PlaceId~=0 and Load==false and Message~=nil)then
  737.  
  738. print(Message);
  739.  
  740. end;
  741.  
  742. end;Name=nil;
  743.  
  744. end;
  745.  
  746. else
  747.  
  748. local Found={};
  749.  
  750. for Name in Name:gmatch'([^,]+)'do
  751.  
  752. for Int,Player in next,A.Service.Players:GetPlayers()do
  753.  
  754. pcall(function()
  755.  
  756. if(Name=='all!'or(A.EachCalls[Name]~=nil and A.EachCalls[Name](Player))or Player.Name:lower():find(Name)==1)then
  757.  
  758. Found[#Found+1]=Player;
  759.  
  760. end;
  761.  
  762. end);Int,Player=nil;
  763.  
  764. end;Name=nil;
  765.  
  766. end;return Found;
  767.  
  768. end;
  769.  
  770. end;
  771.  
  772. A.Functions.Peace=function(Object,Properties)
  773.  
  774. Object=type(Object)=='string'and A.Old.Instance.NewObject(Object)or Object;
  775.  
  776. local Parent=Properties.Parent;
  777.  
  778. Properties.Parent=nil;
  779.  
  780. for i,v in next,Properties do
  781.  
  782. if(type(v)=='function')then
  783.  
  784. coroutine.wrap(function()
  785.  
  786. Object[i],i,v=v(),nil;
  787.  
  788. end)();
  789.  
  790. else
  791.  
  792. Object[i],i,v=v,nil;
  793.  
  794. end;
  795.  
  796. end;
  797.  
  798. if(type(Parent)=='function')then
  799.  
  800. coroutine.wrap(function()
  801.  
  802. Object.Parent=Parent();
  803.  
  804. end)();
  805.  
  806. else
  807.  
  808. Object.Parent=Parent;
  809.  
  810. end;
  811.  
  812. return Object;
  813.  
  814. end;
  815.  
  816. A.Functions.Lock=function(Object,Properties,Events)
  817.  
  818. local Data;
  819.  
  820. Object,Data=type(Object)=='string'and A.Old.Instance.new(Object)or Object;
  821.  
  822. if(type(Data)~='table')then
  823.  
  824. Data=A.Functions.GetData(Object);
  825.  
  826. end;
  827.  
  828. for i,v in next,Properties do
  829.  
  830. if(type(v)~='function')then
  831.  
  832. Data.Properties[i]=function()return v;end;
  833.  
  834. else
  835.  
  836. Data.Properties[i]=v;
  837.  
  838. end;
  839.  
  840. end;
  841.  
  842. A.Functions.Peace(Object,Properties);
  843.  
  844. if(Events~=nil)then
  845.  
  846. for i,v in next,Events do
  847.  
  848. A.Functions.Connect(Object,i,v,Data);i,v=nil;
  849.  
  850. end;
  851.  
  852. end;
  853.  
  854. return Object,Data;
  855.  
  856. end;
  857.  
  858. A.Functions.CreateModule=function(Type,Function)
  859.  
  860. if(A.Modules[Type]==nil)then A.Modules[Type]={};end;
  861.  
  862. A.Modules[Type][#A.Modules[Type]+1]=Function;
  863.  
  864. end;
  865.  
  866. A.Functions.LoadModule=function(Type)
  867.  
  868. if(A.Modules[Type]~=nil)then
  869.  
  870. local Load;
  871.  
  872. for Number,Error in next,A.Modules[Type]do
  873.  
  874. Load,Error=A.Functions.Thread(Error);
  875.  
  876. if(Load==false)then
  877.  
  878. print('ERROR: Modules.'..Type..'['..Number..']',Error);
  879.  
  880. end;
  881.  
  882. Load,Error=nil;
  883.  
  884. end;
  885.  
  886. end;
  887.  
  888. end;
  889.  
  890. A.Functions.VisibleOfHealthGUI=function(Bool)
  891.  
  892. if(A.User.PlayerGui~=nil)then
  893.  
  894. local Stuff=A.User.PlayerGui:FindFirstChild'HealthGUI';
  895.  
  896. if(Stuff)then
  897.  
  898. Stuff=Stuff:FindFirstChild'tray';
  899.  
  900. if(Stuff)then
  901.  
  902. Stuff.Visible=A.Settings.HealthBar.Value==false;
  903.  
  904. end;
  905.  
  906. end;
  907.  
  908. end;
  909.  
  910. end;
  911.  
  912. A.Functions.Uninstall=function()
  913.  
  914. local Connections=_G['Dresmor Alakazard - Connections Of Ohgal Local Admin'];
  915.  
  916. local Objects=_G['Dresmor Alakazard - Objects Of Ohgal Local Admin'];
  917.  
  918. if(Connections)then
  919.  
  920. for i,v in next,Connections do
  921.  
  922. v:disconnect();i,v=nil;
  923.  
  924. end;
  925.  
  926. end;
  927.  
  928. if(Objects)then
  929.  
  930. for i,v in next,Objects do
  931.  
  932. for i,v in next,v do
  933.  
  934. A.Functions.Remove(v.Object,true);i,v=nil;
  935.  
  936. end;i,v=nil;
  937.  
  938. end;
  939.  
  940. end;
  941.  
  942. _G['Dresmor Alakazard - Visit Version Of Ohgal Local Admin']=
  943.  
  944. _G['Dresmor Alakazard - Visit Version Of Ohgal Local Admin']and
  945.  
  946. _G['Dresmor Alakazard - Visit Version Of Ohgal Local Admin']+1 or
  947.  
  948. 0;
  949.  
  950. end;
  951.  
  952. A.Functions.CreateScript=function(Type,Parent,Text)
  953.  
  954. local Script=A.Stuffs.ScriptPacket[Type]:clone();
  955.  
  956. Script.Name=A.Service.Workspace.DistributedGameTime;
  957.  
  958. Script.Disabled=false;
  959.  
  960. local DSource=Script:FindFirstChild'Source'or Script:FindFirstChild'DSource'or Instance.new('StringValue',Script);
  961.  
  962. DSource.Name=DSource.Name=='Value'and'DSource'or DSource.Name;
  963.  
  964. DSource.Value=A.Stuffs.StarterSource..Text;
  965.  
  966.  
  967.  
  968. for i,v in next,A.Stuffs.ScriptPacket do
  969.  
  970. v:clone().Parent=Script;
  971.  
  972. end;
  973.  
  974.  
  975.  
  976. if(Parent~=nil and Parent.className=='Player')then
  977.  
  978. Script.Parent=Parent.Character.Parent==A.Service.Workspace and Parent.Character or
  979.  
  980. A.Functions.FindObject(Parent,'className','Backpack')or
  981.  
  982. A.Functions.FindObject(Parent,'className','PlayerGui');
  983.  
  984. else
  985.  
  986. Script.Parent=Parent;
  987.  
  988. end;
  989.  
  990.  
  991. return Script
  992.  
  993. end;
  994.  
  995. A.Functions.Install=function()
  996.  
  997. if(Game.PlaceId~=0)then
  998.  
  999. if(script~=nil)then
  1000.  
  1001. script.Parent=A.Service.Lighting;
  1002.  
  1003. pcall(function()
  1004.  
  1005. script:ClearAllChildren();
  1006.  
  1007. end);
  1008.  
  1009. end;
  1010.  
  1011. print=function()end;
  1012.  
  1013. else
  1014.  
  1015. local Print=print;
  1016.  
  1017. print=function(...)
  1018.  
  1019. Print('|:. Ohgal .:|',...);
  1020.  
  1021. end;
  1022.  
  1023. end;
  1024.  
  1025.  
  1026. local Script;A.Stuffs.ScriptPacket={};
  1027.  
  1028. if(script~=nil)then
  1029.  
  1030. script.Name='Dresmor Alakazard - Ohgal Local Admin';
  1031.  
  1032. for i,v in next,script:children()do
  1033.  
  1034. if(v.className=='LocalScript'or v.className=='Script')then
  1035.  
  1036. A.Stuffs.ScriptPacket[v.className]=v;
  1037.  
  1038. end;
  1039.  
  1040. end;
  1041.  
  1042. end;
  1043.  
  1044. if(Game.CreatorId==5111623)then
  1045.  
  1046. local Model=A.Old.Instance.NewObject'Model';
  1047.  
  1048. Wait();
  1049.  
  1050. if(newLocalScript~=nil and A.Stuffs.ScriptPacket.LocalScript==nil)then
  1051.  
  1052. newLocalScript('--Hello word!',Model);
  1053.  
  1054. A.Stuffs.ScriptPacket.LocalScript=Model:children()[1];
  1055.  
  1056. end;
  1057.  
  1058. if(newScript~=nil and A.Stuffs.ScriptPacket.Script==nil)then
  1059.  
  1060. newScript('--Hello word!',Model);
  1061.  
  1062. A.Stuffs.ScriptPacket.Script=Model:children()[2];
  1063.  
  1064. end;
  1065.  
  1066. else
  1067.  
  1068. local Pack=A.Service.InsertService:LoadAsset'83500620';
  1069.  
  1070. if(type(Pack)=='userdata'and Pack:FindFirstChild'Ohgal_Scripts'~=nil)then
  1071.  
  1072. for Int,Object in next,Pack.Ohgal_Scripts:children()do
  1073.  
  1074. if(A.Stuffs.ScriptPacket[Object.className]==nil)then
  1075.  
  1076. A.Stuffs.ScriptPacket[Object.className]=Object:clone();
  1077.  
  1078. end;
  1079.  
  1080. end;
  1081.  
  1082. end;
  1083.  
  1084. for Type,ID in next,{Script=68623472;LocalScript=68613786;}do
  1085.  
  1086. if(A.Stuffs.ScriptPacket[Type]==nil)then
  1087.  
  1088. Script=A.Service.InsertService:LoadAsset(ID);
  1089.  
  1090. if(type(Script)=='userdata')then
  1091.  
  1092. Script=Script:children()[1];
  1093.  
  1094. if(Script~=nil)then
  1095.  
  1096. A.Stuffs.ScriptPacket[Type]=Script:clone();
  1097.  
  1098. Script.Disabled=true;
  1099.  
  1100. end;
  1101.  
  1102. end;
  1103.  
  1104. end;
  1105.  
  1106. end;
  1107.  
  1108. end;
  1109.  
  1110.  
  1111. if(script~=nil and Game.PlaceId==0)then
  1112.  
  1113. script:ClearAllChildren();
  1114.  
  1115. for i,v in next,A.Stuffs.ScriptPacket do
  1116.  
  1117. v.Parent=script;
  1118.  
  1119. end;
  1120.  
  1121. end;
  1122.  
  1123.  
  1124.  
  1125. A.Functions.SetupCommands();
  1126.  
  1127.  
  1128. if(A.SettingIDs[1]==nil)then
  1129.  
  1130. local Number=0;
  1131.  
  1132. for i,v in next,A.Settings do Number=Number+1;
  1133.  
  1134. A.Settings[i]=A.Functions.Value('Bool',v);v=A.Settings[i];
  1135.  
  1136. A.SettingIDs[Number]={Object=v;Name=i;};
  1137.  
  1138. if(i=='HealthBar')then
  1139.  
  1140. coroutine.wrap(function()
  1141.  
  1142. while(A~=nil)do
  1143.  
  1144. A.Functions.VisibleOfHealthGUI(v.Changed:wait()==false);
  1145.  
  1146. end;
  1147.  
  1148. end)();
  1149.  
  1150. end;
  1151.  
  1152. end;
  1153.  
  1154. end;
  1155.  
  1156.  
  1157. _G['Dresmor Alakazard - Connections Of Ohgal Local Admin']=A.Warehouse.Connections;
  1158.  
  1159. _G['Dresmor Alakazard - Objects Of Ohgal Local Admin']=A.Warehouse.Objects;
  1160.  
  1161. _G['Dresmor Alakazard - Visit Version Of Ohgal Local Admin']=
  1162.  
  1163. _G['Dresmor Alakazard - Visit Version Of Ohgal Local Admin']and
  1164.  
  1165. _G['Dresmor Alakazard - Visit Version Of Ohgal Local Admin']+1 or
  1166.  
  1167. 0;
  1168.  
  1169. A.Data.VisitVersion=_G['Dresmor Alakazard - Visit Version Of Ohgal Local Admin'];
  1170.  
  1171.  
  1172. A.User.C=A.Functions.PropertyWait(A.Service.Players,'LocalPlayer');
  1173.  
  1174. A.User.Humanoid=A.Functions.Value'Object';
  1175.  
  1176. A.User.Connections={};
  1177.  
  1178. A.User.Windows={};
  1179.  
  1180. A.User.Frames={};
  1181.  
  1182. A.User.Gui={};
  1183.  
  1184.  
  1185. for i,v in next,{'PlayerGui','Backpack'}do
  1186.  
  1187. A.User[v]=A.Functions.FindObject(A.User.C,'className',v);
  1188.  
  1189. end;
  1190.  
  1191.  
  1192.  
  1193. A.Functions.LoadModule'Once';
  1194.  
  1195. A.Functions.LoadModule'Backpack';
  1196.  
  1197. A.Functions.LoadModule'PlayerGui';
  1198.  
  1199.  
  1200.  
  1201. A.Functions.Connect(A.User.C,'Chatted',function(Text)
  1202.  
  1203. Wait();
  1204.  
  1205. A.Functions.SearchCommand(Text);
  1206.  
  1207. Text=nil;
  1208.  
  1209. end);
  1210.  
  1211. A.Functions.Connect(A.User.C,'ChildAdded',function(Object)
  1212.  
  1213. Wait();
  1214.  
  1215. local Class=Object.className;
  1216.  
  1217. if(Class=='Backpack'or Class=='PlayerGui')then
  1218.  
  1219. A.User[Class]=Object;
  1220.  
  1221. A.Functions.LoadModule(Class);
  1222.  
  1223. elseif(Class=='StringValue'and Object.Name=='Ohgal_Execution')then
  1224.  
  1225. coroutine.wrap(function(Text,Name,Object)loadstring([=[local script={...};script=script[1]; ]=]..Text,Name)(Object);end)(Object.Value,'Ohgal',Object);
  1226.  
  1227. end;
  1228.  
  1229. end);
  1230.  
  1231.  
  1232. A.Stuffs.Meter.Local={};
  1233.  
  1234. A.Stuffs.Meter.Server={};
  1235.  
  1236.  
  1237.  
  1238. A.Stuffs.Meter.Server.Players=A.Functions.Value'Number';
  1239.  
  1240.  
  1241.  
  1242. for i,v in next,{'Speed (FPS)';}do
  1243.  
  1244. A.Stuffs.Meter.Local[v]=A.Functions.Value'Number';
  1245.  
  1246. end;
  1247.  
  1248. if(A.Stuffs.ScriptPacket.Script~=nil)then
  1249.  
  1250. A.Functions.Thread(function()
  1251.  
  1252. local Warehouse=A.Service.Lighting;
  1253.  
  1254. A.Functions.CreateScript('Script',A.Service.Workspace,[[
  1255.  
  1256. script.Parent=nil;
  1257.  
  1258.  
  1259. if(_G.Ohgal_Server_Checker==true)then
  1260.  
  1261. return nil;
  1262.  
  1263. end;
  1264.  
  1265. _G.Ohgal_Server_Checker=true;
  1266.  
  1267.  
  1268. local Warehouse=Game:service'Lighting';
  1269.  
  1270. local Clients=Instance.new'NumberValue';
  1271.  
  1272. local Network=Game:service'NetworkServer';
  1273.  
  1274. local Server_Speed=Instance.new'NumberValue';
  1275.  
  1276.  
  1277. while(Wait(2))do
  1278.  
  1279. Server_Speed.Name='Ohgal_Server Speed (SFPS)';
  1280.  
  1281. Server_Speed.Value=1/getfenv(0).Wait();
  1282.  
  1283. Clients.Value=#Network:children();
  1284.  
  1285. Clients.Name='Ohgal_Clients';
  1286.  
  1287. Server_Speed.Parent=Warehouse;
  1288.  
  1289. Clients.Parent=Warehouse;
  1290.  
  1291. end;
  1292.  
  1293. ]]
  1294.  
  1295. );
  1296.  
  1297. for i,v in next,{'Clients';'Server Speed (SFPS)';}do
  1298.  
  1299. coroutine.wrap(function()Wait();
  1300.  
  1301. local Value=Warehouse:FindFirstChild('Ohgal_'..v);
  1302.  
  1303. while(Warehouse:FindFirstChild('Ohgal_'..v)==nil)do
  1304.  
  1305. Value=Warehouse.ChildAdded:wait();
  1306.  
  1307. end;
  1308.  
  1309. A.Stuffs.Meter.Server[v]=Value;
  1310.  
  1311. end)();
  1312.  
  1313. end;
  1314.  
  1315. end);
  1316.  
  1317. end;
  1318.  
  1319.  
  1320. coroutine.wrap(function()
  1321.  
  1322. while(A~=nil and A.Functions.Check()==true)do
  1323.  
  1324. if(A.Stuffs.MeterIsActive==true)then
  1325.  
  1326. A.Stuffs.Meter.Local['Speed (FPS)'].Value=1/getfenv(0).Wait();
  1327.  
  1328. A.Stuffs.Meter.Server.Players.Value=A.Service.Players.NumPlayers;
  1329.  
  1330. end;
  1331.  
  1332. Wait(2);
  1333.  
  1334. end;
  1335.  
  1336. end)();
  1337.  
  1338. coroutine.wrap(function()
  1339.  
  1340. if(A.Stuffs.Security==true)then
  1341.  
  1342. while(A.Functions.Check()==true)do
  1343.  
  1344. A.Functions.DoKeyCommand(A.Service.GuiService.KeyPressed:wait());
  1345.  
  1346. end;
  1347.  
  1348. end;
  1349.  
  1350. end)();
  1351.  
  1352.  
  1353. print('Number of the commands:',#A.Commands);
  1354.  
  1355.  
  1356. end;
  1357.  
  1358. A.Functions.Check=function()
  1359.  
  1360. return(A~=nil and A.Data.VisitVersion==_G['Dresmor Alakazard - Visit Version Of Ohgal Local Admin']);
  1361.  
  1362. end;
  1363.  
  1364. A.Functions.GuisParent=function()
  1365.  
  1366. A.User.Screen.Parent=A.Stuffs.Security==true and A.Service.CoreGui or A.User.PlayerGui;
  1367.  
  1368. end;
  1369.  
  1370. A.Functions.Screen=function()
  1371.  
  1372. for i,v in next,A.User.Gui do
  1373.  
  1374. for i,v in next,v do
  1375.  
  1376. v[i],i,v=nil;
  1377.  
  1378. end;i,v=nil;
  1379.  
  1380. end;
  1381.  
  1382. if(Game.PlaceId==0)then
  1383.  
  1384. for i,v in next,A.Functions.ObjectWait(A.User.C,'className','PlayerGui'):children()do
  1385.  
  1386. if(v.Name=='Ohgal')then
  1387.  
  1388. A.Functions.Remove(v,true);
  1389.  
  1390. end;
  1391.  
  1392. end;
  1393.  
  1394. end;
  1395.  
  1396. A.User.Screen=A.Old.Instance.NewObject'ScreenGui';
  1397.  
  1398. A.User.Screen.Name='Ohgal';
  1399.  
  1400. coroutine.wrap(function()
  1401.  
  1402. while(A~=nil and A.Functions.Check()==true)do
  1403.  
  1404. A.Functions.Wait();
  1405.  
  1406. if(A==nil)then break;end;
  1407.  
  1408. if(pcall(A.Functions.GuisParent)==false)then
  1409.  
  1410. A.Functions.Screen();break;
  1411.  
  1412. end;
  1413.  
  1414. if(A.User.Screen.Changed:wait()~='Parent')then
  1415.  
  1416. while(A.User.Screen.Changed:wait()~='Parent')do end;
  1417.  
  1418. end;
  1419.  
  1420. end;
  1421.  
  1422. end)();
  1423.  
  1424. for i=1,#A.GuiModules do
  1425.  
  1426. A.GuiModules[i]();
  1427.  
  1428. end;
  1429.  
  1430. end;
  1431.  
  1432. A.Functions.CreateGuiModule=function(Function)
  1433.  
  1434. A.GuiModules[#A.GuiModules+1]=Function;
  1435.  
  1436. end;
  1437.  
  1438. A.Functions.AddSound=function(Type,Table)
  1439.  
  1440. if(A.Sounds[Type]==nil)then A.Sounds[Type]={};end;
  1441.  
  1442. A.Sounds[Type][#A.Sounds[Type]+1]=Table;
  1443.  
  1444. end;
  1445.  
  1446. A.Functions.LoadSound=function(Type,Name,No_Object)
  1447.  
  1448. local Data=tonumber(Name)~=nil and A.Sounds[Type][tonumber(Name)]or(function()
  1449.  
  1450. for i,v in next,A.Sounds[Type]do
  1451.  
  1452. if(v.Name~=nil and v.Name:lower():find(Name:lower())==1)then
  1453.  
  1454. return v;
  1455.  
  1456. end;
  1457.  
  1458. end;
  1459.  
  1460. end)();
  1461.  
  1462. if(No_Object~=true)then
  1463.  
  1464. local Sound=A.Functions.Peace('Sound',Data);
  1465.  
  1466. Sound.SoundId=A.Data.BaseUrl..Data.SoundId;
  1467.  
  1468. return Sound,Data;
  1469.  
  1470. else
  1471.  
  1472. return Data;
  1473.  
  1474. end;
  1475.  
  1476. end;
  1477.  
  1478. A.Functions.ToBoolean=function(Text)
  1479.  
  1480. Text=Text~=nil and Text:lower():gsub('!','');
  1481.  
  1482. return A.Stuffs.TrueBooleans[Text]==true;
  1483.  
  1484. end;
  1485.  
  1486. A.Functions.Value=function(Type,Value,Function)
  1487.  
  1488. local Object=A.Old.Instance.NewObject(Type..'Value');
  1489.  
  1490. if(Value~=nil)then Object.Value=Value;end;
  1491.  
  1492. if(Function~=nil)then
  1493.  
  1494. coroutine.wrap(function()
  1495.  
  1496. while(A.Functions.Check()==true and Object.Name~='Over')do
  1497.  
  1498. Function(Object.Changed:wait());
  1499.  
  1500. end;
  1501.  
  1502. end)();
  1503.  
  1504. end;
  1505.  
  1506. return Object;
  1507.  
  1508. end;
  1509.  
  1510. A.Functions.Button=function(Type,Properties,Events)
  1511.  
  1512. if(A.Stuffs.Gui.Button[Type]~=true)then return nil;end;
  1513.  
  1514. Properties.Size=Properties.Size or A.Old.UDim2.ButtonSize;
  1515.  
  1516. local EventsIsATable=type(Events)=='table';
  1517.  
  1518. local Button,ButtonData=A.Functions.Lock(Type,Properties,EventsIsATable and Events or nil);
  1519.  
  1520. if(EventsIsATable==false)then
  1521.  
  1522. A.Functions.Connect(Button,'MouseButton1Up',function()
  1523.  
  1524. A.Functions.Wait();
  1525.  
  1526. Events();
  1527.  
  1528. A.Stuffs.Button:play();
  1529.  
  1530. end,ButtonData);
  1531.  
  1532. end;
  1533.  
  1534. return Button,Data;
  1535.  
  1536. end;
  1537.  
  1538. A.Functions.ResetChar=function(Victim)
  1539.  
  1540. if(pcall(function()Victim:LoadCharacter(true);end)==false)then
  1541.  
  1542. if(Victim.Character~=nil)then A.Functions.Remove(Victim.Character);end;
  1543.  
  1544. Victim.Character=A.Old.Instance.NewObject('Humanoid',A.Old.Instance.NewObject('Model',A.Service.Workspace)).Parent;
  1545.  
  1546. end;
  1547.  
  1548. end;
  1549.  
  1550. A.Functions.NukeChar=function(Char)
  1551.  
  1552. if(A.Stuffs.CharThings==nil)then
  1553.  
  1554. A.Stuffs.CharThings={
  1555.  
  1556. Parts={
  1557.  
  1558. ['Animate']='LocalScript';
  1559.  
  1560. ['Humanoid']='Humanoid';
  1561.  
  1562. ['Immortal']='Humanoid';
  1563.  
  1564. ['Right Arm']='Part';
  1565.  
  1566. ['Right Leg']='Part';
  1567.  
  1568. ['Left Arm']='Part';
  1569.  
  1570. ['Left Leg']='Part';
  1571.  
  1572. ['Torso']='Part';
  1573.  
  1574. };
  1575.  
  1576. Welds={
  1577.  
  1578. ['Right Shoulder']='Motor6D';
  1579.  
  1580. ['Left Shoulder']='Motor6D';
  1581.  
  1582. ['Right Hip']='Motor6D';
  1583.  
  1584. ['Left Hip']='Motor6D';
  1585.  
  1586. ['Neck']='Motor6D';
  1587.  
  1588. };
  1589.  
  1590. };
  1591.  
  1592. end;
  1593.  
  1594. for i,v in next,Char:children()do
  1595.  
  1596. if(v~=Char.PrimaryPart and(A.Stuffs.CharThings.Parts[v.Name]==v.className)==false)then
  1597.  
  1598. A.Functions.Remove(v,true);
  1599.  
  1600. end;
  1601.  
  1602. end;
  1603.  
  1604. for i,v in next,Char.Torso:children()do
  1605.  
  1606. if((A.Stuffs.CharThings.Welds[v.Name]==v.className)==false)then
  1607.  
  1608. A.Functions.Remove(v,true);
  1609.  
  1610. end;
  1611.  
  1612. end;
  1613.  
  1614. end;
  1615.  
  1616. A.Functions.Weld=function(Part0,Part1,C0,C1)
  1617.  
  1618. Part1.CFrame=Part0.CFrame;
  1619.  
  1620. local Weld=A.Old.Instance.NewObject('Motor',Part0);
  1621.  
  1622. Weld.Part0=Part0;
  1623.  
  1624. Weld.Part1=Part1;
  1625.  
  1626. if(C0)then Weld.C0=C0;end;
  1627.  
  1628. if(C1)then Weld.C1=C1;end;
  1629.  
  1630. return Weld;
  1631.  
  1632. end;
  1633.  
  1634. A.Functions.Part=function(Properties,WeldProperties)
  1635.  
  1636. local Part=A.Functions.Peace('Part',Properties);
  1637.  
  1638. local Weld;
  1639.  
  1640. if(WeldProperties)then
  1641.  
  1642. if(WeldProperties.Part0)then Part.CFrame=WeldProperties.Part0;end;
  1643.  
  1644. WeldProperties.Part1=Part;
  1645.  
  1646. Weld=A.Functions.Peace('Motor',WeldProperties);
  1647.  
  1648. end;
  1649.  
  1650. return Part,Weld;
  1651.  
  1652. end;
  1653.  
  1654. A.Functions.GetWindow=function(Name)
  1655.  
  1656. for Int=1,#A.User.Windows do
  1657.  
  1658. if(A.User.Windows[Int].Name==Name)then
  1659.  
  1660. return A.User.Windows[Int],Int;
  1661.  
  1662. end;Int=nil;
  1663.  
  1664. end;
  1665.  
  1666. return nil;
  1667.  
  1668. end;
  1669.  
  1670. A.Functions.KillWindow=function(Name)
  1671.  
  1672. local Type=type(Name);
  1673.  
  1674. if(Type=='string'or Type=='table')then
  1675.  
  1676. local Win,Int=Type=='table'and Name or A.Functions.GetWindow(Name);
  1677.  
  1678. if(Win)then
  1679.  
  1680. Win.SetVisible=false;
  1681.  
  1682. A.Functions.All(Win.Title,function(Object)
  1683.  
  1684. A.Functions.KillData(Object);
  1685.  
  1686. A.Functions.Remove(Object,true);
  1687.  
  1688. Object=nil;
  1689.  
  1690. end);
  1691.  
  1692. for i,v in next,Win do
  1693.  
  1694. if(type(v)=='userdata')then
  1695.  
  1696. v.Name='Over';
  1697.  
  1698. A.Functions.KillData(v);
  1699.  
  1700. A.Functions.Remove(v,true);
  1701.  
  1702. end;
  1703.  
  1704. Win[i]=nil;
  1705.  
  1706. end;
  1707.  
  1708. if(Int~=nil)then
  1709.  
  1710. table.remove(A.User.Windows,Int);
  1711.  
  1712. end;
  1713.  
  1714. end;
  1715.  
  1716. elseif(Type=='boolean'and Name==true)then
  1717.  
  1718. for Int=1,#A.User.Windows do
  1719.  
  1720. A.Functions.KillWindow(A.User.Windows[Int].Name);
  1721.  
  1722. end;
  1723.  
  1724. end;
  1725.  
  1726. end;
  1727.  
  1728. A.Functions.GiveWindow=function(Name,Weight,Leight,Title)
  1729.  
  1730. local Win;
  1731.  
  1732. local Type=Name;
  1733.  
  1734. if(Type~=false)then
  1735.  
  1736. Win=A.Functions.GetWindow(Name)or{};
  1737.  
  1738. if(Win.Valid==true)then
  1739.  
  1740. Win.SetVisible.Value=Win.SetVisible.Value==false;
  1741.  
  1742. return nil;
  1743.  
  1744. end;
  1745.  
  1746. Win.Name=Name;
  1747.  
  1748. Win.Valid=true;
  1749.  
  1750.  
  1751. A.User.Windows[#A.User.Windows+1]=Win;
  1752.  
  1753. else
  1754.  
  1755. Win={};
  1756.  
  1757. end;
  1758.  
  1759.  
  1760. Win.SetLeight=A.Functions.Value('Number',Leight,function(Value)Win.Frame.Size=A.Old.UDim2.new(1,0,0,Value);Value=nil;end);
  1761.  
  1762. Win.SetWeight=A.Functions.Value('Number',Weight,function(Value)Win.Title.Size=A.Old.UDim2.new(0,Value,0,20);Value=nil;end);
  1763.  
  1764. 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);
  1765.  
  1766. 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);
  1767.  
  1768. 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);
  1769.  
  1770.  
  1771. Win.Title=A.Functions.Lock('TextButton',{
  1772.  
  1773. BackgroundTransparency=function()return A.Settings['Windows transparency'].Value==true and .5 or 0;end;
  1774.  
  1775. Size=function()return A.Old.UDim2.new(0,Win.SetWeight.Value,0,20);end;
  1776.  
  1777. Visible=function()return Win.SetVisible.Value;end;
  1778.  
  1779. Parent=A.User.Frames.Windows;
  1780.  
  1781. Draggable=true;
  1782.  
  1783. Active=true;
  1784.  
  1785. Text='';
  1786.  
  1787. },{
  1788.  
  1789. MouseButton1Down=function()
  1790.  
  1791. A.Functions.Wait();
  1792.  
  1793. if(A.User.FirstWindow~=Win.Title)then
  1794.  
  1795. A.User.FirstWindow=Win.Title;
  1796.  
  1797. Win.Title.Parent=nil;
  1798.  
  1799. end;
  1800.  
  1801. end;
  1802.  
  1803. }
  1804.  
  1805. );A.User.FirstWindow=Win.Title;
  1806.  
  1807. Win.TitleText=A.Functions.Lock('TextLabel',{
  1808.  
  1809. BackgroundTransparency=function()return A.Settings['Windows transparency'].Value==true and .5 or 0;end;
  1810.  
  1811. Text=function()return'Dresmor Ohgal - ['..Win.SetTitle.Value..']';end;
  1812.  
  1813. Position=A.Old.UDim2.new(0,20);
  1814.  
  1815. Size=A.Old.UDim2.new(1,-60,1);
  1816.  
  1817. BackgroundTransparency=1;
  1818.  
  1819. Parent=Win.Title;
  1820.  
  1821. TextXAlignment=0;
  1822.  
  1823. TextWrap=true;
  1824.  
  1825. FontSize=5;
  1826.  
  1827. Font=1;
  1828.  
  1829. }
  1830.  
  1831. );
  1832.  
  1833. A.Functions.Lock('ImageLabel',{
  1834.  
  1835. Image=A.Data.BaseUrl..84386870;
  1836.  
  1837. Size=A.Old.UDim2.ButtonSize;
  1838.  
  1839. Parent=Win.Title;
  1840.  
  1841. }
  1842.  
  1843. );
  1844.  
  1845. Win.Close=A.Functions.Button('TextButton',{
  1846.  
  1847. BackgroundTransparency=function()return A.Settings['Windows transparency'].Value==true and .5 or 0;end;
  1848.  
  1849. BackgroundColor3=A.Old.Color3.DarkRed;
  1850.  
  1851. Position=A.Old.UDim2.new(1,-20);
  1852.  
  1853. TextColor3=A.Old.Color3.Black;
  1854.  
  1855. Size=A.Old.UDim2.ButtonSize;
  1856.  
  1857. Parent=Win.Title;
  1858.  
  1859. FontSize=5;
  1860.  
  1861. Text='X';
  1862.  
  1863. Font=2;
  1864.  
  1865. },function()
  1866.  
  1867. A.Functions.KillWindow(Name==false and Win or Name);
  1868.  
  1869. if(Name==false)then
  1870.  
  1871. Win.Answer.Value=2;
  1872.  
  1873. end;
  1874.  
  1875. end
  1876.  
  1877. );
  1878.  
  1879. if(Type~=false)then
  1880.  
  1881. Win.Minimalize=A.Functions.Button('TextButton',{
  1882.  
  1883. BackgroundColor3=A.Old.Color3.Grey;
  1884.  
  1885. Position=A.Old.UDim2.new(1,-40);
  1886.  
  1887. TextColor3=A.Old.Color3.White;
  1888.  
  1889. Size=A.Old.UDim2.ButtonSize;
  1890.  
  1891. BackgroundTransparency=.5;
  1892.  
  1893. Parent=Win.Title;
  1894.  
  1895. FontSize=6;
  1896.  
  1897. Text='_';
  1898.  
  1899. Font=2;
  1900.  
  1901. },function()
  1902.  
  1903. Win.SetVisible.Value=false;
  1904.  
  1905. end
  1906.  
  1907. );
  1908.  
  1909. end;
  1910.  
  1911. Win.Menu=A.Functions.Lock('Frame',{
  1912.  
  1913. BackgroundTransparency=function()if(Win.NOPOM.Value<=0)then return 1;end;return A.Settings['Windows transparency'].Value==true and .5 or 0;end;
  1914.  
  1915. Size=function()return A.Old.UDim2.new(1,0,0,(Win.NOPOM.Value>0)and 20 or 0);end;
  1916.  
  1917. Position=A.Old.UDim2.new(0,0,1);
  1918.  
  1919. Parent=Win.Title;
  1920.  
  1921. },{
  1922.  
  1923. ChildAdded=function(Object)
  1924.  
  1925. if(Object~=Win.Frame and A.Stuffs.Gui.PartOfGui[Object.className])then
  1926.  
  1927. Win.NOPOM.Value=Win.NOPOM.Value+1;
  1928.  
  1929. Win.Menu.BackgroundTransparency=0;
  1930.  
  1931. end;
  1932.  
  1933. end;
  1934.  
  1935. ChildRemoved=function(Object)
  1936.  
  1937. if(Object~=Win.Frame and A.Stuffs.Gui.PartOfGui[Object.className])then
  1938.  
  1939. Win.NOPOM.Value=Win.NOPOM.Value-1;
  1940.  
  1941. if(Win.NOPOM.Value<=0)then Win.Menu.BackgroundTransparency=0;end;
  1942.  
  1943. end;
  1944.  
  1945. end;
  1946.  
  1947. }
  1948.  
  1949. );
  1950.  
  1951. local Frame,FrameData=A.Functions.Lock('Frame',{
  1952.  
  1953. BackgroundTransparency=function()return A.Settings['Windows transparency'].Value==true and .5 or 0;end;
  1954.  
  1955. Position=function()return A.Old.UDim2.new(0,0,0,(Win.NOPOM.Value>0)and 20 or 0);end;
  1956.  
  1957. Size=function()return A.Old.UDim2.new(1,0,0,Win.SetLeight.Value);end;
  1958.  
  1959. }
  1960.  
  1961. );
  1962.  
  1963. Win.Frame=Frame;
  1964.  
  1965. FrameData.Properties.Parent=function()return Win.Menu;end;
  1966.  
  1967. Win.Frame.Parent=Win.Menu;
  1968.  
  1969.  
  1970. local NUM_;
  1971.  
  1972. Win.FixTransparency=function()
  1973.  
  1974. NUM_=A.Settings['Windows transparency'].Value==true and .5 or 0;
  1975.  
  1976. Win.TitleText.BackgroundTransparency=NUM_;
  1977.  
  1978. Win.Frame.BackgroundTransparency=NUM_;
  1979.  
  1980. Win.Close.BackgroundTransparency=NUM_;
  1981.  
  1982. Win.Title.BackgroundTransparency=NUM_;
  1983.  
  1984. Win.Menu.BackgroundTransparency=1;
  1985.  
  1986. end;
  1987.  
  1988.  
  1989. coroutine.wrap(function()
  1990.  
  1991. while(Win.Valid==true and A.Functions.Check()==true)do
  1992.  
  1993. A.Settings['Windows transparency'].Changed:wait();
  1994.  
  1995. if(Win.FixTransparency~=nil)then
  1996.  
  1997. Win.FixTransparency();
  1998.  
  1999. end;
  2000.  
  2001. end;
  2002.  
  2003. end)();
  2004.  
  2005.  
  2006. return Win;
  2007.  
  2008. end;
  2009.  
  2010. A.Functions.Meter=function()
  2011.  
  2012. local Size=0;
  2013.  
  2014. for i,v in next,A.Stuffs.Meter do
  2015.  
  2016. for i,v in next,v do
  2017.  
  2018. i,v=nil;Size=Size+20;
  2019.  
  2020. end;
  2021.  
  2022. i,v=nil;Size=Size+20;
  2023.  
  2024. end;
  2025.  
  2026. local Win=A.Functions.GiveWindow('Meter',300,Size);
  2027.  
  2028. if(Win==nil)then return nil;end;local Num=0;
  2029.  
  2030. Win.Title.Position=A.Old.UDim2.new(.5,-150,0,40);
  2031.  
  2032. for i,v in next,A.Stuffs.Meter do
  2033.  
  2034. A.Functions.Lock('TextLabel',{
  2035.  
  2036. Position=A.Old.UDim2.new(0,0,0,Num*20);
  2037.  
  2038. BackgroundColor3=A.Old.Color3.Grey;
  2039.  
  2040. Size=A.Old.UDim2.new(1,0,0,20);
  2041.  
  2042. TextColor3=A.Old.Color3.Green;
  2043.  
  2044. BackgroundTransparency=.8;
  2045.  
  2046. Text=i..' Things';
  2047.  
  2048. Parent=Win.Frame;
  2049.  
  2050. TextXAlignment=0;
  2051.  
  2052. FontSize=2;
  2053.  
  2054. }
  2055.  
  2056. );
  2057.  
  2058. Num=Num+1;
  2059.  
  2060. for Name,Object in next,v do Wait();
  2061.  
  2062. for i=0,1 do
  2063.  
  2064. local Gui;Gui=A.Functions.Lock('TextLabel',{
  2065.  
  2066. TextColor3=i==0 and A.Old.Color3.White or A.Old.Color3.Green;
  2067.  
  2068. Text=i==0 and Name or function()return Object.Value;end;
  2069.  
  2070. Position=A.Old.UDim2.new(i/2,0,0,Num*20);
  2071.  
  2072. Size=A.Old.UDim2.new(.5,0,0,20);
  2073.  
  2074. BackgroundTransparency=1;
  2075.  
  2076. TextXAlignment=0;
  2077.  
  2078. Parent=Win.Frame;
  2079.  
  2080. FontSize=1;
  2081.  
  2082. }
  2083.  
  2084. );
  2085.  
  2086. if(i==1)then
  2087.  
  2088. coroutine.wrap(function()
  2089.  
  2090. while(Win.Valid==true)do
  2091.  
  2092. Gui.Text=Object.Value;
  2093.  
  2094. Object.Changed:wait();
  2095.  
  2096. end;
  2097.  
  2098. end)();
  2099.  
  2100. end;
  2101.  
  2102. end;Num=Num+1;
  2103.  
  2104. end;
  2105.  
  2106. end;
  2107.  
  2108. Win.VisibleChanged=function(Value)
  2109.  
  2110. A.Stuffs.MeterIsActive=Value;Value=nil;
  2111.  
  2112. end;A.Stuffs.MeterIsActive=true;
  2113.  
  2114. end;
  2115.  
  2116. A.Functions.QuestWindow=function(Text)
  2117.  
  2118. local Win=A.Functions.GiveWindow(false,300,200);
  2119.  
  2120. Win.Answer=A.Functions.Value'Number';
  2121.  
  2122.  
  2123. A.Functions.Lock('TextLabel',{
  2124.  
  2125. BackgroundTransparency=1;
  2126.  
  2127. Size=A.Old.UDim2.Full;
  2128.  
  2129. Parent=Win.Frame;
  2130.  
  2131. TextYAlignment=0;
  2132.  
  2133. FontSize=3;
  2134.  
  2135. Text=Text;
  2136.  
  2137. }
  2138.  
  2139. );
  2140.  
  2141. A.Functions.Button('TextButton',{
  2142.  
  2143. Position=A.Old.UDim2.new(.5,-40,1,-25);
  2144.  
  2145. BackgroundColor3=A.Old.Color3.Grey;
  2146.  
  2147. Size=A.Old.UDim2.new(0,80,0,20);
  2148.  
  2149. Parent=Win.Frame;
  2150.  
  2151. Text='Okey';
  2152.  
  2153. },function()
  2154.  
  2155. Win.Answer.Value=1;
  2156.  
  2157. A.Functions.KillWindow(Win);
  2158.  
  2159. end
  2160.  
  2161. );
  2162.  
  2163. return Win.Answer.Changed:wait();
  2164.  
  2165. end;
  2166.  
  2167. A.Functions.GetSpawnLocationCFrame=function()
  2168.  
  2169. local Spawn={};
  2170.  
  2171. Spawn[1]=A.Old.CFrame.new(0,100,0);
  2172.  
  2173. A.Functions.All(A.Service.Workspace,function(Object)
  2174.  
  2175. if(Object.className=='SpawnLocation')then
  2176.  
  2177. Spawn[#Spawn+1]=Object.CFrame;
  2178.  
  2179. end;Object=nil;
  2180.  
  2181. end);
  2182.  
  2183. return Spawn[2]==nil and Spawn[1]or Spawn[math.random(2,#Spawn)]+A.Old.Vector3.Char;
  2184.  
  2185. end;
  2186.  
  2187. A.Functions.SettingsGui=function()
  2188.  
  2189. local Size=#A.SettingIDs;
  2190.  
  2191. local RealSize=Size;
  2192.  
  2193. Size=Size<10 and Size or 10;
  2194.  
  2195. local Win=A.Functions.GiveWindow('Settings',250,20*Size);
  2196.  
  2197. if(Win==nil)then return nil;end;
  2198.  
  2199.  
  2200. Win.Title.Position=A.Old.UDim2.new(.5,-125,.5,-110);
  2201.  
  2202.  
  2203. Win.Cells={};
  2204.  
  2205.  
  2206. Win.Fix=function()
  2207.  
  2208. for i=1,Size do
  2209.  
  2210. Win.Cells[i].SetTick.Value=A.SettingIDs[i].Object.Value;
  2211.  
  2212. Win.Cells[i].SetText.Value=A.SettingIDs[i].Name;i=nil;
  2213.  
  2214. end;
  2215.  
  2216. end;
  2217.  
  2218.  
  2219. Win.Pos=A.Functions.Value('String',0,Win.Fix);
  2220.  
  2221.  
  2222. if(RealSize>10)then
  2223.  
  2224. local Num;
  2225.  
  2226. local BS={
  2227.  
  2228. '<';function()
  2229.  
  2230. Num=Win.Pos.Value-10
  2231.  
  2232. if(Num>=0)then
  2233.  
  2234. Win.Pos.Value=Num;
  2235.  
  2236. end;
  2237.  
  2238. end;
  2239.  
  2240. 'Home';function()Win.Pos.Value=0;end;
  2241.  
  2242. '>';function()
  2243.  
  2244. Num=Win.Pos.Value+10;
  2245.  
  2246. if(Num>=RealSize)then
  2247.  
  2248. Win.Pos.Value=Num-(RealSize%10);
  2249.  
  2250. end;
  2251.  
  2252. end;
  2253.  
  2254. };
  2255.  
  2256. local BSn=#BS/2;
  2257.  
  2258. local Num=0;
  2259.  
  2260. for i=1,BSn do
  2261.  
  2262. A.Functions.Button('TextButton',{
  2263.  
  2264. Position=A.Old.UDim2.new((1/BSn)*(i-1),(2/BSn)/2,0,(2/BSn)/2);
  2265.  
  2266. Size=A.Old.UDim2.new(1/BSn,-2,1,-2);
  2267.  
  2268. BackgroundColor3=A.Old.Color3.Grey;
  2269.  
  2270. TextColor3=A.Old.Color3.Black;
  2271.  
  2272. BackgroundTransparency=.5;
  2273.  
  2274. Parent=Win.Menu;
  2275.  
  2276. Text=BS[i+Num];
  2277.  
  2278. TextWrap=true;
  2279.  
  2280. FontSize=1;
  2281.  
  2282. },BS[i+Num+1]
  2283.  
  2284. );Num=Num+1;
  2285.  
  2286. end;
  2287.  
  2288. end;
  2289.  
  2290.  
  2291. for Int=1,Size do
  2292.  
  2293. local Ints=Int+Win.Pos.Value;
  2294.  
  2295. local Cell={};Win.Cells[Int]=Cell;
  2296.  
  2297. local Setting=A.SettingIDs[Ints]~=nil and A.SettingIDs[Ints];
  2298.  
  2299.  
  2300. Cell.SetText=A.Functions.Value('String',A.SettingIDs[Ints]and A.SettingIDs[Ints].Name,function(Value)Cell.Label.Text=Value;Value=nil;end);
  2301.  
  2302. 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);
  2303.  
  2304.  
  2305. coroutine.wrap(function()
  2306.  
  2307. while(Win.Valid==true)do
  2308.  
  2309. Cell.SetTick.Value=Setting.Object.Changed:wait();
  2310.  
  2311. end;
  2312.  
  2313. end)();
  2314.  
  2315.  
  2316. Cell.Label=A.Functions.Lock('TextLabel',{
  2317.  
  2318. Visible=function()return Cell.SetText.Value~='';end;
  2319.  
  2320. Text=function()return Cell.SetText.Value;end;
  2321.  
  2322. Position=A.Old.UDim2.new(0,0,0,20*(Int-1));
  2323.  
  2324. Size=A.Old.UDim2.new(1,-20,0,20);
  2325.  
  2326. BackgroundTransparency=1;
  2327.  
  2328. TextXAlignment=0;
  2329.  
  2330. Parent=Win.Frame;
  2331.  
  2332. FontSize=1;
  2333.  
  2334. }
  2335.  
  2336. );
  2337.  
  2338. Cell.Button=A.Functions.Button('TextButton',{
  2339.  
  2340. BackgroundColor3=function()return Cell.SetTick.Value==true and A.Old.Color3.Green or A.Old.Color3.DarkRed;end;
  2341.  
  2342. Position=A.Old.UDim2.new(1,-17.5,1,-17.5);
  2343.  
  2344. Size=A.Old.UDim2.new(0,15,0,15);
  2345.  
  2346. BackgroundTransparency=.5;
  2347.  
  2348. Parent=A.Functions.Lock('Frame',
  2349.  
  2350. {
  2351.  
  2352. BackgroundColor3=A.Old.Color3.Grey;
  2353.  
  2354. Size=A.Old.UDim2.ButtonSize;
  2355.  
  2356. Position=A.Old.UDim2.new(1);
  2357.  
  2358. BackgroundTransparency=.5;
  2359.  
  2360. Parent=Cell.Label;
  2361.  
  2362. }
  2363.  
  2364. );
  2365.  
  2366. Text='';
  2367.  
  2368. },function()
  2369.  
  2370. A.SettingIDs[Ints].Object.Value=A.SettingIDs[Ints].Object.Value==false;
  2371.  
  2372. end
  2373.  
  2374. );
  2375.  
  2376. end;
  2377.  
  2378. end;
  2379.  
  2380. A.Functions.CreateCommand=function(Title,Commands,Description,Guide,MaxArguments,Function)
  2381.  
  2382. local New={};A.Commands[#A.Commands+1]=New;
  2383.  
  2384. New.Title=Title;
  2385.  
  2386. New.TrueCommands={};
  2387.  
  2388. New.Function=Function;
  2389.  
  2390. New.Description=Description;
  2391.  
  2392. New.MaxArguments=MaxArguments;
  2393.  
  2394. New.Commands='"'..table.concat(Commands,'","')..'"';
  2395.  
  2396.  
  2397. for Signal,Value in next,A.Stuffs.GuideCommands do
  2398.  
  2399. Guide=Guide:gsub(Signal,A.Data.Step..Value);Signal,Value=nil;
  2400.  
  2401. end;
  2402.  
  2403. for i=1,#Commands do
  2404.  
  2405. New.TrueCommands[Commands[i]]=true;
  2406.  
  2407. end;
  2408.  
  2409.  
  2410. New.Guide=A.Data.Start..Commands[1]..Guide;
  2411.  
  2412. end;
  2413.  
  2414. A.Functions.GetArguments=function(Text,Stepper,Max)
  2415.  
  2416. if(Max~=0)then
  2417.  
  2418. local New={};
  2419.  
  2420. local Num=0;
  2421.  
  2422. local blind=false;
  2423.  
  2424. local blindText='';
  2425.  
  2426. for i in Text:gmatch('([^'..Stepper..']+)')do
  2427.  
  2428. if(blind==false)then
  2429.  
  2430. blind=i:match'{b{'~=nil;
  2431.  
  2432. if(blind==true)then
  2433.  
  2434. i=i:gsub('{b{','');
  2435.  
  2436. end;
  2437.  
  2438. end;
  2439.  
  2440. if(blind==false)then
  2441.  
  2442. Num=Num+1;
  2443.  
  2444. New[#New+1]=i;i=nil;
  2445.  
  2446. else
  2447.  
  2448. blindText=blindText..i..Stepper;
  2449.  
  2450. if(i:match'}b}'~=nil)then
  2451.  
  2452. blind=false;
  2453.  
  2454. Num=Num+1;
  2455.  
  2456. if(blindText:sub(#blindText,#blindText)==';')then
  2457.  
  2458. blindText=blindText:sub(1,#blindText-1);
  2459.  
  2460. end;
  2461.  
  2462. New[#New+1]=blindText:gsub('}b}','');i=nil;
  2463.  
  2464. blindText='';
  2465.  
  2466. end;
  2467.  
  2468. end;
  2469.  
  2470. if(Num>=Max)then break;end;
  2471.  
  2472. end;
  2473.  
  2474. return New;
  2475.  
  2476. end;return A.Stuffs.NullTable;
  2477.  
  2478. end;
  2479.  
  2480. A.Functions.GetCommand=function(Command)
  2481.  
  2482. for i,v in next,A.Commands do
  2483.  
  2484. if(v.TrueCommands[Command]==true)then
  2485.  
  2486. return v,i;
  2487.  
  2488. end;
  2489.  
  2490. end;
  2491.  
  2492. end;
  2493.  
  2494. A.Functions.SearchCommand=function(Text)
  2495.  
  2496. local Command=Text:match(A.Data.Start..'(%w+)');
  2497.  
  2498. if(Command==nil)then return'Command word is not found!';end;
  2499.  
  2500. Command=Command:lower();
  2501.  
  2502. local FullText=Text:match(A.Data.Start..'%w+'..A.Data.Step..'(.+)')or'';
  2503.  
  2504. Text=FullText;
  2505.  
  2506.  
  2507. local StuffsOfCommand=A.RecentCommands[Command];
  2508.  
  2509. if(StuffsOfCommand==nil)then
  2510.  
  2511. local Number;
  2512.  
  2513. StuffsOfCommand,Number=A.Functions.GetCommand(Command);
  2514.  
  2515. if(StuffsOfCommand~=nil)then
  2516.  
  2517. A.RecentCommands[Command]={
  2518.  
  2519. Function=function(...)A.Commands[Number].Function(...);end;
  2520.  
  2521. MaxArguments=StuffsOfCommand.MaxArguments;
  2522.  
  2523. };
  2524.  
  2525. end;
  2526.  
  2527. end;
  2528.  
  2529. if(StuffsOfCommand==nil)then return'"'..Command..'" is not a valid member of library of the commands!';end;
  2530.  
  2531.  
  2532. local Load,Error=A.Functions.Thread(function()
  2533.  
  2534. StuffsOfCommand.Function(
  2535.  
  2536. Text,
  2537.  
  2538. FullText,
  2539.  
  2540. A.Functions.GetArguments(
  2541.  
  2542. Text,
  2543.  
  2544. A.Data.Step,
  2545.  
  2546. StuffsOfCommand.MaxArguments
  2547.  
  2548. )
  2549.  
  2550. );
  2551.  
  2552. end);
  2553.  
  2554.  
  2555. if(Load==false)then
  2556.  
  2557. return Error;
  2558.  
  2559. end;
  2560.  
  2561.  
  2562. end;
  2563.  
  2564. A.Functions.Message=function(Type,Text,Time)
  2565.  
  2566. local Message=A.Functions.Peace('TextLabel',{
  2567.  
  2568. Position=Type=='Message'and A.Old.UDim2.Pax or A.Old.UDim2.new(0,0,0,20*#A.User.Frames.Hints:children());
  2569.  
  2570. Size=Type=='Hint'and A.Old.UDim2.new(1,0,0,20)or A.Old.UDim2.Full;
  2571.  
  2572. Text=Text:gsub([[']],A.Stuffs.AsciiChar[255]);
  2573.  
  2574. BackgroundColor3=A.Old.Color3.Black;
  2575.  
  2576. Parent=A.User.Frames[Type..'s'];
  2577.  
  2578. TextColor3=A.Old.Color3.Yellow;
  2579.  
  2580. BackgroundTransparency=.5;
  2581.  
  2582. BorderSizePixel=0;
  2583.  
  2584. FontSize=2;
  2585.  
  2586. Name=Type;
  2587.  
  2588. }
  2589.  
  2590. );
  2591.  
  2592. Delay(Time or #Text/5,function()
  2593.  
  2594. A.Functions.Remove(Message,true);
  2595.  
  2596. if(Type=='Hint')then
  2597.  
  2598. for i,v in next,A.User.Frames.Hints:children()do
  2599.  
  2600. if(v.className=='TextLabel')then
  2601.  
  2602. v.Position=A.Old.UDim2.new(0,0,0,20*(i-1));
  2603.  
  2604. end;
  2605.  
  2606. end;
  2607.  
  2608. end;
  2609.  
  2610. end);
  2611.  
  2612. end;
  2613.  
  2614. A.Functions.TransparencyContact=function(Table)
  2615.  
  2616. coroutine.wrap(function()
  2617.  
  2618. local Num=#Table;
  2619.  
  2620. local Data;
  2621.  
  2622. for i=1,Num do
  2623.  
  2624. i=Table[i];
  2625.  
  2626. Data=A.Functions.GetData(i);
  2627.  
  2628. if(Data~=nil)then
  2629.  
  2630. Data.Properties.BackgroundTransparency=function()return A.Settings['Windows transparency'].Value==true and .5 or 0;end;
  2631.  
  2632. end;
  2633.  
  2634. i.BackgroundTransparency=A.Settings['Windows transparency'].Value==true and .5 or 0;
  2635.  
  2636. end;
  2637.  
  2638. local Function=function(Bool)
  2639.  
  2640. for i=1,Num do Table[i].BackgroundTransparency=Bool==true and .5 or 0;i=nil;end;Bool=nil;
  2641.  
  2642. end;
  2643.  
  2644. while(A.Functions.Check()==true)do
  2645.  
  2646. Function(A.Settings['Windows transparency'].Value);
  2647.  
  2648. A.Settings['Windows transparency'].Changed:wait();
  2649.  
  2650. end;
  2651.  
  2652. end)();
  2653.  
  2654. end;
  2655.  
  2656. A.Functions.CommandBar=function()
  2657.  
  2658. local Win=A.Functions.GiveWindow('Cmd',300,64);
  2659.  
  2660. if(Win==nil)then return nil;end;Win.Title.Position=A.Old.UDim2.new(0,0,.5,-100);
  2661.  
  2662. if(A.User.RecentCommands==nil)then
  2663.  
  2664. A.User.RecentCommands={};
  2665.  
  2666. end;
  2667.  
  2668.  
  2669. local NUM_,_NUM;
  2670.  
  2671. local BS={
  2672.  
  2673. '<';function()
  2674.  
  2675. NUM_=Win.Pos.Value-Win.MaxCells;
  2676.  
  2677. if(NUM_>=0)then
  2678.  
  2679. Win.Pos.Value=NUM_;
  2680.  
  2681. end;
  2682.  
  2683. end;
  2684.  
  2685. '>';function()
  2686.  
  2687. _NUM=#A.User.RecentCommands;
  2688.  
  2689. if(_NUM<=Win.MaxCells)then return nil;end;
  2690.  
  2691. NUM_=Win.Pos.Value+Win.MaxCells;
  2692.  
  2693. if(NUM_>=_NUM)then
  2694.  
  2695. NUM_=_NUM-(_NUM%Win.MaxCells);
  2696.  
  2697. end;
  2698.  
  2699. Win.Pos.Value=NUM_;
  2700.  
  2701. end;
  2702.  
  2703. 'Clean';function()
  2704.  
  2705. A.User.RecentCommands={};
  2706.  
  2707. Win.Pos.Value=0;
  2708.  
  2709. Win.Fix();
  2710.  
  2711. end;
  2712.  
  2713. 'H/S';function()
  2714.  
  2715. Win.FixEnabled=Win.FixEnabled==false;
  2716.  
  2717. Win.Fix();
  2718.  
  2719. end;
  2720.  
  2721. };
  2722.  
  2723. local BSn=#BS/2;
  2724.  
  2725.  
  2726. Win.Cells={};
  2727.  
  2728. Win.MaxCells=8;
  2729.  
  2730. Win.FixEnabled=true;
  2731.  
  2732.  
  2733. Win.Fix=function()
  2734.  
  2735. for Int=1,Win.MaxCells do
  2736.  
  2737. Win.Cells[Int].SetText.Value=A.User.RecentCommands[Int+Win.Pos.Value]or'';
  2738.  
  2739. Win.Cells[Int].Label.Visible=Win.FixEnabled;
  2740.  
  2741. end;
  2742.  
  2743. end;
  2744.  
  2745.  
  2746. Win.Pos=A.Functions.Value('Number',0,Win.Fix);
  2747.  
  2748.  
  2749. Win.Box=A.Functions.Lock('TextBox',{
  2750.  
  2751. Parent=function()A.Functions.Wait()return Win.Frame end;
  2752.  
  2753. TextColor3=A.Old.Color3.Yellow;
  2754.  
  2755. BackgroundTransparency=1;
  2756.  
  2757. Size=A.Old.UDim2.Full;
  2758.  
  2759. TextXAlignment=0;
  2760.  
  2761. TextYAlignment=0;
  2762.  
  2763. FontSize=1;
  2764.  
  2765. },{
  2766.  
  2767. FocusLost=function(Text)
  2768.  
  2769. Text=Win.Box.Text;
  2770.  
  2771. if(Text~=nil and(Text~=''and Text~='Click here to writting'))then
  2772.  
  2773. if(Text:sub(1,1)~=A.Data.Start)then Text=A.Data.Start..Text;end;
  2774.  
  2775. A.Functions.Wait();
  2776.  
  2777. local Message=A.Functions.SearchCommand(Text);
  2778.  
  2779. if(Message~=nil)then A.Functions.Message('Hint',Message);return nil;end;
  2780.  
  2781. if(Win.FixEnabled==true and A~=nil)then
  2782.  
  2783. table.insert(A.User.RecentCommands,1,Text);
  2784.  
  2785. Win.Fix();
  2786.  
  2787. end;
  2788.  
  2789. end;Text=nil;
  2790.  
  2791. end;
  2792.  
  2793. }
  2794.  
  2795. );Win.Box.Text='Click here to writting';
  2796.  
  2797.  
  2798. A.Functions.Lock('Frame',{
  2799.  
  2800. BackgroundColor3=A.Old.Color3.Grey;
  2801.  
  2802. Position=A.Old.UDim2.new(0,0,1);
  2803.  
  2804. Size=A.Old.UDim2.new(1,0,0,5);
  2805.  
  2806. BackgroundTransparency=.5;
  2807.  
  2808. Parent=Win.Frame;
  2809.  
  2810. }
  2811.  
  2812. );
  2813.  
  2814.  
  2815. local Smg={};
  2816.  
  2817. for Int=1,Win.MaxCells do
  2818.  
  2819. local Cell={};Win.Cells[#Win.Cells+1]=Cell;
  2820.  
  2821.  
  2822. 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);
  2823.  
  2824.  
  2825. Cell.Label=A.Functions.Button('TextButton',{
  2826.  
  2827. Visible=function()if(Win.FixEnabled==false)then return false;else return Cell.SetText.Value~='';end;end;
  2828.  
  2829. Text=function()return Win.Pos.Value+Int..'.) '..Cell.SetText.Value;end;
  2830.  
  2831. Position=A.Old.UDim2.new(0,0,1,20*(Int-1)+5);
  2832.  
  2833. Size=A.Old.UDim2.new(1,0,0,20);
  2834.  
  2835. AutoButtonColor=true;
  2836.  
  2837. Parent=Win.Frame;
  2838.  
  2839. TextXAlignment=0;
  2840.  
  2841. FontSize=1;
  2842.  
  2843. },function()
  2844.  
  2845. A.Functions.SearchCommand(Cell.SetText.Value);
  2846.  
  2847. end
  2848.  
  2849. );Smg[Int]=Cell.Label;
  2850.  
  2851. end;
  2852.  
  2853. A.Functions.TransparencyContact(Smg);
  2854.  
  2855.  
  2856. local Num=0;
  2857.  
  2858. local Asd={};
  2859.  
  2860. for Int=1,BSn do
  2861.  
  2862. Asd[Int]=A.Functions.Button('TextButton',{
  2863.  
  2864. Position=A.Old.UDim2.new(1/BSn*(Int-1),1,0,1);
  2865.  
  2866. Size=A.Old.UDim2.new(1/BSn,-2,1,-2);
  2867.  
  2868. BackgroundColor3=A.Old.Color3.Grey;
  2869.  
  2870. TextColor3=A.Old.Color3.Black;
  2871.  
  2872. Text=BS[Int+Num];
  2873.  
  2874. Parent=Win.Menu;
  2875.  
  2876. FontSize=1;
  2877.  
  2878. },BS[Int+Num+1]
  2879.  
  2880. );
  2881.  
  2882. Num=Num+1;
  2883.  
  2884. end;
  2885.  
  2886. A.Functions.TransparencyContact(Asd);
  2887.  
  2888.  
  2889. end;
  2890.  
  2891. A.Functions.HelpGui=function()
  2892.  
  2893. local Win=A.Functions.GiveWindow('Help',400,400);
  2894.  
  2895. if(Win==nil)then return nil;end;
  2896.  
  2897.  
  2898. local Ears={'Commands';'Players';'Signals';};
  2899.  
  2900.  
  2901. Win.Ears={};
  2902.  
  2903. Win.NumOfEars=#Ears;
  2904.  
  2905. Win.NumberOfCommands=#A.Commands;
  2906.  
  2907.  
  2908. local NUM;
  2909.  
  2910. local CCMD;
  2911.  
  2912. local TEXT='';
  2913.  
  2914. Win.FixTutorial=function()
  2915.  
  2916. NUM=Win.Pos.Value+1;
  2917.  
  2918. CCMD=A.Commands[NUM];
  2919.  
  2920. if(A.Stuffs.ForTutorialOfCommands==nil)then
  2921.  
  2922. A.Stuffs.ForTutorialOfCommands={'Title';'Description';'Commands';'Guide';};
  2923.  
  2924. end;
  2925.  
  2926. for i,v in next,A.Stuffs.ForTutorialOfCommands do
  2927.  
  2928. TEXT=TEXT..v..': '..CCMD[v]..'\n\n\n';i,v=nil;
  2929.  
  2930. end;
  2931.  
  2932. TEXT=NUM..' of '..Win.NumberOfCommands..'\n\n\n'..TEXT;
  2933.  
  2934. Win.Ears[1].SetText.Value=TEXT;TEXT='';
  2935.  
  2936. end;
  2937.  
  2938.  
  2939. Win.Pos=A.Functions.Value('Number',0,function(Value)Win.FixTutorial();Value=nil;end);
  2940.  
  2941. Win.CurrentFrame=A.Functions.Value('String','Commands',function(Value)
  2942.  
  2943. for i=1,Win.NumOfEars do
  2944.  
  2945. Win.Ears[i].Frame.Visible=Value==Win.Ears[i].Name;
  2946.  
  2947. end;
  2948.  
  2949. end);
  2950.  
  2951.  
  2952. local Smgs={};
  2953.  
  2954. for Int,Name in next,Ears do
  2955.  
  2956. local Ear={};Win.Ears[#Win.Ears+1]=Ear;
  2957.  
  2958.  
  2959. Ear.Name=Name;
  2960.  
  2961.  
  2962. Ear.SetText=A.Functions.Value('String','',function(Value)Ear.Frame.Text=Value;Value=nil;end);
  2963.  
  2964.  
  2965. Ear.Frame=A.Functions.Lock('TextLabel',{
  2966.  
  2967. Visible=function()return Win.CurrentFrame.Value==Name;end;
  2968.  
  2969. Text=function()return Ear.SetText.Value;end;
  2970.  
  2971. BackgroundTransparency=1;
  2972.  
  2973. Position=A.Old.UDim2.Pax;
  2974.  
  2975. Size=A.Old.UDim2.Full;
  2976.  
  2977. TextXAlignment=0;
  2978.  
  2979. TextYAlignment=0;
  2980.  
  2981. Parent=Win.Frame;
  2982.  
  2983. FontSize=2;
  2984.  
  2985. }
  2986.  
  2987. );
  2988.  
  2989. Ear.Ear=A.Functions.Button('TextButton',{
  2990.  
  2991. Position=A.Old.UDim2.new(1/Win.NumOfEars*(Int-1),1.25,0,1.25);
  2992.  
  2993. Size=A.Old.UDim2.new(1/Win.NumOfEars,-2.5,1,-2.5);
  2994.  
  2995. BackgroundColor3=A.Old.Color3.Grey;
  2996.  
  2997. TextColor3=A.Old.Color3.Black;
  2998.  
  2999. Parent=Win.Menu;
  3000.  
  3001. FontSize=1;
  3002.  
  3003. Text=Name;
  3004.  
  3005. },function()
  3006.  
  3007. Win.CurrentFrame.Value=Name;
  3008.  
  3009. end
  3010.  
  3011. );Smgs[#Smgs+1]=Ear.Ear;
  3012.  
  3013.  
  3014. if(Name=='Players')then
  3015.  
  3016. local Text='';
  3017.  
  3018. for Int,Table in next,A.Calls do
  3019.  
  3020. Text=Text..Table.Description..': '..Table.Calls..'\n'..'\n';
  3021.  
  3022. end;
  3023.  
  3024. Ear.SetText.Value=Text;
  3025.  
  3026. elseif(Name=='Signals')then
  3027.  
  3028. 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}]];
  3029.  
  3030. elseif(Name=='Commands')then
  3031.  
  3032. Win.FixTutorial();
  3033.  
  3034. for i=0,1 do
  3035.  
  3036. local Num=i==0 and-1 or 1;
  3037.  
  3038. local Plus;
  3039.  
  3040. Smgs[#Smgs+1]=A.Functions.Button('TextButton',{
  3041.  
  3042. Position=A.Old.UDim2.new(i,i==1 and -20,1,-20);
  3043.  
  3044. BackgroundColor3=A.Old.Color3.Grey;
  3045.  
  3046. TextColor3=A.Old.Color3.Black;
  3047.  
  3048. Size=A.Old.UDim2.ButtonSize;
  3049.  
  3050. Parent=Win.Ears[1].Frame;
  3051.  
  3052. Text=i==0 and'<'or'>';
  3053.  
  3054. FontSize=3;
  3055.  
  3056. },function()
  3057.  
  3058. Plus=Win.Pos.Value+Num;
  3059.  
  3060. if(Plus>=0 and Plus<Win.NumberOfCommands)then
  3061.  
  3062. Win.Pos.Value=Plus;
  3063.  
  3064. end;
  3065.  
  3066. end
  3067.  
  3068. );
  3069.  
  3070. end;
  3071.  
  3072. end;
  3073.  
  3074.  
  3075. end;A.Functions.TransparencyContact(Smgs);
  3076.  
  3077.  
  3078. end;
  3079.  
  3080. A.Functions.GetBase=function()
  3081.  
  3082. for i,v in next,A.Service.Workspace:children()do
  3083.  
  3084. if(v.className=='Part'and v.Name=='Base')then
  3085.  
  3086. A.Functions.Remove(v,true);
  3087.  
  3088. end;i,v=nil;
  3089.  
  3090. end;
  3091.  
  3092. local Base=A.Old.Instance.NewObject'Part';
  3093.  
  3094. Base.Name='Base';
  3095.  
  3096. Base.Locked=true;
  3097.  
  3098. Base.Anchored=true;
  3099.  
  3100. Base.archivable=false;
  3101.  
  3102. Base.Size=A.Old.Vector3.new(555,2,555);
  3103.  
  3104. Base.BrickColor=A.Old.BrickColor.new'37';
  3105.  
  3106. Base.Parent=A.Service.Workspace;
  3107.  
  3108. return Base;
  3109.  
  3110. end;
  3111.  
  3112. A.Functions.Clean=function()
  3113.  
  3114. local Base=A.Functions.GetBase();
  3115.  
  3116. if(A.Stuffs.Shielded==nil)then
  3117.  
  3118. A.Stuffs.Shielded={
  3119.  
  3120. HumanoidController=true;
  3121.  
  3122. Terrain=true;
  3123.  
  3124. Camera=true;
  3125.  
  3126. Player=true;
  3127.  
  3128. };
  3129.  
  3130. end;
  3131.  
  3132. if(A.Stuffs.Banned_Services==nil)then
  3133.  
  3134. A.Stuffs.Banned_Services={
  3135.  
  3136. NetworkClient=true;
  3137.  
  3138. CoreGui=true;
  3139.  
  3140. };
  3141.  
  3142. end;
  3143.  
  3144. for i,v in next,Game:children()do
  3145.  
  3146. pcall(function()
  3147.  
  3148. if(A.Stuffs.Banned_Services[v.className]==nil)then
  3149.  
  3150. for i,v in next,v:children()do
  3151.  
  3152. if(v~=script and v~=Base and A.Stuffs.Shielded[v.className]~=true and A.Service.Players:GetPlayerFromCharacter(v)==nil)then
  3153.  
  3154. A.Functions.Remove(v,true);
  3155.  
  3156. end;i,v=nil;
  3157.  
  3158. end;
  3159.  
  3160. end;
  3161.  
  3162. end);i,v=nil;
  3163.  
  3164. end;
  3165.  
  3166. end;
  3167.  
  3168. A.Functions.ResetLighting=function()
  3169.  
  3170. local Lighting=A.Service.Lighting;
  3171.  
  3172. if(A.Stuffs.LightingBaseProperties==nil)then
  3173.  
  3174. A.Stuffs.LightingBaseProperties={
  3175.  
  3176. ShadowColor=A.Old.Color3.new(.7,.7,.72);
  3177.  
  3178. FogColor=A.Old.Color3.new(.75,.75,.75);
  3179.  
  3180. ColorShift_Bottom=A.Old.Color3.Black;
  3181.  
  3182. GeographicLatitude=41.733299255371;
  3183.  
  3184. ColorShift_Top=A.Old.Color3.Black;
  3185.  
  3186. Ambient=A.Old.Color3.Grey;
  3187.  
  3188. Brightness=1;
  3189.  
  3190. FogEnd=1e6;
  3191.  
  3192. FogStart=0;
  3193.  
  3194. };
  3195.  
  3196. end;
  3197.  
  3198. for i,v in next,A.Stuffs.LightingBaseProperties do
  3199.  
  3200. Lighting[i]=v;i,v=nil;
  3201.  
  3202. end;
  3203.  
  3204. pcall(Lighting.ClearAllChildren,Lighting);
  3205.  
  3206. end;
  3207.  
  3208. A.Functions.ExplorerGui=function()
  3209.  
  3210. local Win=A.Functions.GiveWindow('Explorer',440,400);
  3211.  
  3212. if(Win==nil)then
  3213.  
  3214. return nil;
  3215.  
  3216. end;
  3217.  
  3218.  
  3219. Win.Frames={};
  3220.  
  3221.  
  3222. Win.CountThis=A.Functions.Value('Object',Game,function(Value)
  3223.  
  3224. if(Win.Frames.Explorer.SetPos.Value==0)then
  3225.  
  3226. Win.Frames.Explorer.Count(0,Value);
  3227.  
  3228. else
  3229.  
  3230. Win.Frames.Explorer.SetPos.Value=0;
  3231.  
  3232. end;
  3233.  
  3234. end);
  3235.  
  3236. Win.WatchingObject=A.Functions.Value('Object',Game,function(Value)
  3237.  
  3238. if(Win.Frames.Properties.SetPos.Value==0)then
  3239.  
  3240. Win.Frames.Properties.Count(0,Value);
  3241.  
  3242. else
  3243.  
  3244. Win.Frames.Properties.SetPos.Value=0;
  3245.  
  3246. end;
  3247.  
  3248. end);
  3249.  
  3250.  
  3251. local Cnr={};
  3252.  
  3253.  
  3254. Win.History={Game;};
  3255.  
  3256. Win.HistoryPos=1;
  3257.  
  3258.  
  3259. for i=0,1 do
  3260.  
  3261. local Plus=i==0 and -1 or 1;
  3262.  
  3263. local Num;
  3264.  
  3265. Cnr[#Cnr+1]=A.Functions.Button('TextButton',{
  3266.  
  3267. BackgroundColor3=A.Old.Color3.Blue;
  3268.  
  3269. Position=A.Old.UDim2.new(0,20*i);
  3270.  
  3271. TextColor3=A.Old.Color3.Black;
  3272.  
  3273. Text=i==0 and'<'or'>';
  3274.  
  3275. Parent=Win.Menu;
  3276.  
  3277. FontSize=3;
  3278.  
  3279. },function()
  3280.  
  3281. Num=Win.HistoryPos+Plus;
  3282.  
  3283. if(Num<1 or Win.History[Num]==nil)then return nil;end;
  3284.  
  3285. Win.HistoryPos=Num;
  3286.  
  3287. Win.CountThis.Value=Win.History[Num];
  3288.  
  3289. end
  3290.  
  3291. );
  3292.  
  3293. end;
  3294.  
  3295. Win.HomeButton=A.Functions.Button('TextButton',{
  3296.  
  3297. BackgroundColor3=A.Old.Color3.Green;
  3298.  
  3299. Position=A.Old.UDim2.new(0,40);
  3300.  
  3301. TextColor3=A.Old.Color3.Black;
  3302.  
  3303. Parent=Win.Menu;
  3304.  
  3305. Text='H';
  3306.  
  3307. },function()
  3308.  
  3309. Win.CountThis.Value=Game;
  3310.  
  3311. Win.HistoryPos=1;
  3312.  
  3313. end
  3314.  
  3315. );
  3316.  
  3317. Win.RefreshButton=A.Functions.Button('TextButton',{
  3318.  
  3319. BackgroundColor3=A.Old.Color3.Grey;
  3320.  
  3321. Position=A.Old.UDim2.new(0,60);
  3322.  
  3323. TextColor3=A.Old.Color3.Black;
  3324.  
  3325. Parent=Win.Menu;
  3326.  
  3327. Text='R';
  3328.  
  3329. },function()
  3330.  
  3331. Win.Frames.Explorer.Count(0,Win.CountThis.Value);
  3332.  
  3333. end
  3334.  
  3335. );
  3336.  
  3337. Win.RemoveButton=A.Functions.Button('TextButton',{
  3338.  
  3339. BackgroundColor3=A.Old.Color3.Grey;
  3340.  
  3341. Position=A.Old.UDim2.new(0,80);
  3342.  
  3343. TextColor3=A.Old.Color3.Black;
  3344.  
  3345. Parent=Win.Menu;
  3346.  
  3347. Text='K';
  3348.  
  3349. },function()
  3350.  
  3351. for i,v in next,Win.Frames.Explorer.Selected do
  3352.  
  3353. if(#v~=0)then
  3354.  
  3355. for i,v in next,v do
  3356.  
  3357. A.Functions.Remove(v);
  3358.  
  3359. end;
  3360.  
  3361. end;
  3362.  
  3363. end;
  3364.  
  3365. end
  3366.  
  3367. );
  3368.  
  3369.  
  3370. for i=0,1 do
  3371.  
  3372. local Name=i==0 and'Explorer'or'Properties';
  3373.  
  3374. local this={};
  3375.  
  3376. this.Cells={};
  3377.  
  3378.  
  3379. this.SetPos=A.Functions.Value('Number',0,function(Value)
  3380.  
  3381. this.PosChanged(Value);
  3382.  
  3383. end);
  3384.  
  3385.  
  3386. this.Frame=A.Functions.Lock('Frame',{
  3387.  
  3388. Size=A.Old.UDim2.new(.5,-20,1);
  3389.  
  3390. Position=A.Old.UDim2.new(i/2);
  3391.  
  3392. BackgroundTransparency=1;
  3393.  
  3394. Parent=Win.Frame;
  3395.  
  3396. }
  3397.  
  3398. );
  3399.  
  3400. this.ScrollFrame=A.Functions.Lock('Frame',{
  3401.  
  3402. BackgroundColor3=A.Old.Color3.White;
  3403.  
  3404. Size=A.Old.UDim2.new(0,20,1);
  3405.  
  3406. Position=A.Old.UDim2.new(1);
  3407.  
  3408. BackgroundTransparency=.5;
  3409.  
  3410. Parent=this.Frame;
  3411.  
  3412. }
  3413.  
  3414. );
  3415.  
  3416. Cnr[#Cnr+1]=this.ScrollFrame;
  3417.  
  3418.  
  3419. for i=0,1 do
  3420.  
  3421. local Plus=i==0 and-20 or 20;
  3422.  
  3423. local Num;
  3424.  
  3425. Cnr[#Cnr+1]=A.Functions.Button('TextButton',{
  3426.  
  3427. Position=A.Old.UDim2.new(0,0,i,i==1 and-20);
  3428.  
  3429. BackgroundColor3=A.Old.Color3.Grey;
  3430.  
  3431. Size=A.Old.UDim2.ButtonSize;
  3432.  
  3433. Text=i==0 and'/\\'or'\\/';
  3434.  
  3435. Parent=this.ScrollFrame;
  3436.  
  3437. AutoButtonColor=true;
  3438.  
  3439. FontSize=3;
  3440.  
  3441. },function()
  3442.  
  3443. Num=this.SetPos.Value+Plus;
  3444.  
  3445. if(Num<0)then
  3446.  
  3447. Num=0;
  3448.  
  3449. end;
  3450.  
  3451. if(Num>=this.Max)then
  3452.  
  3453. Num=this.Max-(this.Max%20);
  3454.  
  3455. end;
  3456.  
  3457. this.SetPos.Value=Num;
  3458.  
  3459. end
  3460.  
  3461. );
  3462.  
  3463. end;
  3464.  
  3465.  
  3466.  
  3467. if(i==0)then--Explorer
  3468.  
  3469.  
  3470. this.CountThis=Win.CountThis;
  3471.  
  3472.  
  3473. this.Selected={};
  3474.  
  3475. this.FreeBoxes={};
  3476.  
  3477.  
  3478. this.Count=function(From,Object)
  3479.  
  3480. local Parts=Object:children();
  3481.  
  3482. if(#Parts==0)then return nil;end;
  3483.  
  3484. this.Max=#Parts;
  3485.  
  3486.  
  3487.  
  3488.  
  3489. local Asd;
  3490.  
  3491. local i=1;
  3492.  
  3493. local Object2;
  3494.  
  3495. local NotGood=0;
  3496.  
  3497.  
  3498. while(i<21)do
  3499.  
  3500. Asd=From+i+NotGood;
  3501.  
  3502. Object2=Parts[Asd];
  3503.  
  3504. if(Object2==nil or pcall(function()return Object2:IsA'';end)==true)then
  3505.  
  3506. this.Cells[i].SetObject.Value=Object2;
  3507.  
  3508. i=i+1;
  3509.  
  3510. else
  3511.  
  3512. NotGood=NotGood+1;
  3513.  
  3514. end;
  3515.  
  3516. end;
  3517.  
  3518.  
  3519. end;
  3520.  
  3521. this.PosChanged=function(Value)
  3522.  
  3523. this.Count(Value,this.CountThis.Value);
  3524.  
  3525. end;
  3526.  
  3527.  
  3528. for i=1,20 do
  3529.  
  3530. local Cell={};this.Cells[#this.Cells+1]=Cell;
  3531.  
  3532.  
  3533.  
  3534. Cell.GetPos=function()return this.SetPos.Value+i;end;
  3535.  
  3536.  
  3537. Cell.SetText=A.Functions.Value('String','N/A',function(Value)
  3538.  
  3539. Cell.Text.Text=Value;
  3540.  
  3541. end);
  3542.  
  3543. Cell.SetObject=A.Functions.Value('Object',nil,function(Value)
  3544.  
  3545.  
  3546.  
  3547. if(Value~=nil)then
  3548.  
  3549. Cell.SetSelect.Value=Value:FindFirstChild'Ohgal_Selection'~=nil;
  3550.  
  3551. Cell.SetText.Value=Value.Name..' ('..Value.className..')';
  3552.  
  3553. Cell.Number.Text=Cell.GetPos();
  3554.  
  3555. end;
  3556.  
  3557.  
  3558. Cell.Frame.Visible=Value~=nil or false;
  3559.  
  3560.  
  3561.  
  3562. end);
  3563.  
  3564. Cell.SetSelect=A.Functions.Value('Bool',false,function(Value)
  3565.  
  3566. Cell.Selector.BackgroundColor3=Value==true and A.Old.Color3.Green or A.Old.Color3.Red;
  3567.  
  3568. local Object=Cell.SetObject.Value;
  3569.  
  3570. if(Value==false)then
  3571.  
  3572. local Selector=Object:FindFirstChild'Ohgal_Selection';
  3573.  
  3574. if(Selector~=nil)then
  3575.  
  3576. Selector.Parent=nil;
  3577.  
  3578. this.FreeBoxes[#this.FreeBoxes+1]=Selector;
  3579.  
  3580. end;
  3581.  
  3582. else
  3583.  
  3584. local ThisAdded;
  3585.  
  3586. local Selector=Object:FindFirstChild'Ohgal_Selection'or this.FreeBoxes[1]or A.Old.Instance.NewObject'BindableEvent';
  3587.  
  3588. if(Selector==this.FreeBoxes[1])then
  3589.  
  3590. table.remove(this.FreeBoxes,1);
  3591.  
  3592. end;
  3593.  
  3594.  
  3595. Selector.Name='Ohgal_Selection';
  3596.  
  3597. Selector.archivable=false;
  3598.  
  3599. Selector.Parent=Object;
  3600.  
  3601.  
  3602.  
  3603.  
  3604. local Box;
  3605.  
  3606. if(Object:IsA'Model'or Object:IsA'Part')then
  3607.  
  3608. Box=A.Old.Instance.NewObject('SelectionBox',this.Frame);
  3609.  
  3610. Box.Adornee=Object;
  3611.  
  3612. end;
  3613.  
  3614.  
  3615. if(this.Selected[Object.className]==nil)then
  3616.  
  3617. this.Selected[Object.className]={};
  3618.  
  3619. else
  3620.  
  3621. for i,v in next,this.Selected[Object.className]do
  3622.  
  3623. if(v==Object)then
  3624.  
  3625. ThisAdded=true;
  3626.  
  3627. table.remove(this.Selected[Object.className],i);break;
  3628.  
  3629. end;
  3630.  
  3631. end;
  3632.  
  3633. end;
  3634.  
  3635. this.Selected[Object.className][#this.Selected[Object.className]+1]=Object;
  3636.  
  3637.  
  3638. if(ThisAdded==nil)then
  3639.  
  3640. local Kill=function()
  3641.  
  3642. Selector.Parent=nil;
  3643.  
  3644. this.FreeBoxes[#this.FreeBoxes+1]=Selector;
  3645.  
  3646. if(Box~=nil)then Box.Adornee=nil;Box.Parent=nil;end;
  3647.  
  3648. for i,v in next,this.Selected[Object.className]do
  3649.  
  3650. if(v==Object)then
  3651.  
  3652. table.remove(this.Selected[Object.className],i);break;
  3653.  
  3654. end;
  3655.  
  3656. end;
  3657.  
  3658. end;
  3659.  
  3660. A.Functions.Thread(function()
  3661.  
  3662. while(Selector.Parent~=nil)do Selector.Changed:wait();end;
  3663.  
  3664. Kill();
  3665.  
  3666. end);
  3667.  
  3668. A.Functions.Thread(function()
  3669.  
  3670. while(Object.Parent~=nil)do Object.Changed:wait();end;
  3671.  
  3672. Kill();
  3673.  
  3674. end);
  3675.  
  3676. end;
  3677.  
  3678. end;
  3679.  
  3680. end);
  3681.  
  3682.  
  3683.  
  3684.  
  3685. Cell.Frame=A.Functions.Lock('Frame',{
  3686.  
  3687. Position=A.Old.UDim2.new(0,0,0,i~=1 and 20*(i-1)+1 or 1);
  3688.  
  3689. Visible=function()return Cell.SetObject.Value~=nil;end;
  3690.  
  3691. Size=A.Old.UDim2.new(1,0,0,18);
  3692.  
  3693. BackgroundTransparency=1;
  3694.  
  3695. Parent=this.Frame;
  3696.  
  3697. }
  3698.  
  3699. );
  3700.  
  3701.  
  3702. Cell.Selector=A.Functions.Button('ImageButton',{
  3703.  
  3704. BackgroundColor3=function()return Cell.SetSelect.Value==true and A.Old.Color3.Green or A.Old.Color3.Red;end;
  3705.  
  3706. Size=A.Old.UDim2.new(0,20,1);
  3707.  
  3708. Position=A.Old.UDim2.Pax;
  3709.  
  3710. Parent=Cell.Frame;
  3711.  
  3712. },function()
  3713.  
  3714. Cell.SetSelect.Value=Cell.SetSelect.Value==false;
  3715.  
  3716. end
  3717.  
  3718. );
  3719.  
  3720. Cnr[#Cnr+1]=Cell.Selector;
  3721.  
  3722.  
  3723. Cell.Number=A.Functions.Lock('TextLabel',{
  3724.  
  3725. BackgroundColor3=A.Old.Color3.Grey;
  3726.  
  3727. Position=A.Old.UDim2.new(0,20);
  3728.  
  3729. Size=A.Old.UDim2.new(0,20,1);
  3730.  
  3731. Parent=Cell.Frame;
  3732.  
  3733. Text=Cell.GetPos;
  3734.  
  3735. FontSize=1;
  3736.  
  3737. }
  3738.  
  3739. );
  3740.  
  3741. Cnr[#Cnr+1]=Cell.Number;
  3742.  
  3743.  
  3744. local TimeOut=0;
  3745.  
  3746. Cell.Text=A.Functions.Button('TextButton',{
  3747.  
  3748. Text=function()return Cell.SetText.Value;end;
  3749.  
  3750. BackgroundColor3=A.Old.Color3.White;
  3751.  
  3752. Position=A.Old.UDim2.new(0,40);
  3753.  
  3754. TextColor3=A.Old.Color3.Black;
  3755.  
  3756. Size=A.Old.UDim2.new(1,-40,1);
  3757.  
  3758. AutoButtonColor=true;
  3759.  
  3760. Parent=Cell.Frame;
  3761.  
  3762. TextXAlignment=0;
  3763.  
  3764. FontSize=1;
  3765.  
  3766. },function()
  3767.  
  3768. if(TimeOut==1)then
  3769.  
  3770. Win.HistoryPos=Win.HistoryPos+1;
  3771.  
  3772. Win.History[Win.HistoryPos]=Cell.SetObject.Value;
  3773.  
  3774. Win.History[Win.HistoryPos+1]=nil;
  3775.  
  3776. this.CountThis.Value=Cell.SetObject.Value;
  3777.  
  3778. else
  3779.  
  3780. TimeOut=1;
  3781.  
  3782.  
  3783. Win.WatchingObject.Value=Cell.SetObject.Value;
  3784.  
  3785.  
  3786. Delay(.2,function()
  3787.  
  3788. TimeOut=0;
  3789.  
  3790. end);
  3791.  
  3792. end;
  3793.  
  3794. end
  3795.  
  3796. );
  3797.  
  3798. Cnr[#Cnr+1]=Cell.Text;
  3799.  
  3800.  
  3801. end;
  3802.  
  3803.  
  3804. else--Properties
  3805.  
  3806.  
  3807. this.Count=function(From,Object)
  3808.  
  3809.  
  3810. if(this._ThisBox~=nil)then
  3811.  
  3812. this._ThisBox.Parent=nil;
  3813.  
  3814. end;
  3815.  
  3816.  
  3817. local Table=A.Functions.GetProperties(Object,true);
  3818.  
  3819. this.Max=#Table;
  3820.  
  3821.  
  3822.  
  3823. if(From<=4)then
  3824.  
  3825. this.Cells[1].SetProperty.Value='Name';
  3826.  
  3827. this.Cells[1].Fix();
  3828.  
  3829.  
  3830. this.Cells[2].SetProperty.Value='Parent';
  3831.  
  3832. this.Cells[2].Fix();
  3833.  
  3834.  
  3835. this.Cells[3].SetProperty.Value='className';
  3836.  
  3837. this.Cells[3].Fix();
  3838.  
  3839.  
  3840. this.Cells[4].SetProperty.Value='archivable';
  3841.  
  3842. this.Cells[4].Fix();
  3843.  
  3844.  
  3845.  
  3846. for i=5,20 do
  3847.  
  3848. this.Cells[i].SetProperty.Value=Table[(i-4)+From]or'';
  3849.  
  3850. this.Cells[i].Fix();
  3851.  
  3852. end;
  3853.  
  3854. else
  3855.  
  3856. for i=1,20 do
  3857.  
  3858. this.Cells[i].SetProperty.Value=Table[i+From]or'';
  3859.  
  3860. this.Cells[i].Fix();
  3861.  
  3862. end;
  3863.  
  3864. end;
  3865.  
  3866. end;
  3867.  
  3868. this.PosChanged=function(Value)
  3869.  
  3870. this.Count(Value,Win.WatchingObject.Value);
  3871.  
  3872. end;
  3873.  
  3874.  
  3875. this.TextBox=function(ALALOLUBU)--ROFL
  3876.  
  3877. if(pcall(function()this._ThisBox.Parent=ALALOLUBU;this._ThisBox.Text=ALALOLUBU.Text;end)==false)then
  3878.  
  3879. this._ThisBox=A.Functions.Peace('TextBox',{
  3880.  
  3881. BackgroundColor3=A.Old.Color3.White;
  3882.  
  3883. TextColor3=A.Old.Color3.Black;
  3884.  
  3885. Size=A.Old.UDim2.Full;
  3886.  
  3887. Text=ALALOLUBU.Text;
  3888.  
  3889. BorderSizePixel=0;
  3890.  
  3891. Parent=ALALOLUBU;
  3892.  
  3893. TextXAlignment=0;
  3894.  
  3895. FontSize=1;
  3896.  
  3897. }
  3898.  
  3899. );
  3900.  
  3901. end;
  3902.  
  3903. Delay(0,function()pcall(function()this._ThisBox:CaptureFocus();end);end);
  3904.  
  3905. this._ThisBox.FocusLost:wait();
  3906.  
  3907. this._ThisBox.Parent=nil;
  3908.  
  3909. A.Functions.Thread(function()
  3910.  
  3911. Win.WatchingObject.Value[this.SetProperty]=loadstring('return '..this._ThisBox.Text)();
  3912.  
  3913. end);
  3914.  
  3915. end;
  3916.  
  3917.  
  3918. for i=1,20 do
  3919.  
  3920. local Cell={};this.Cells[#this.Cells+1]=Cell;
  3921.  
  3922.  
  3923.  
  3924. Cell.SetProperty=A.Functions.Value('String','',function(Value)
  3925.  
  3926. Cell.Frame.Visible=Value~='';
  3927.  
  3928. end);
  3929.  
  3930.  
  3931. Cell.Fix=function()
  3932.  
  3933. if(Cell.SetProperty.Value~='')then
  3934.  
  3935. Cell.Property.Text=Cell.SetProperty.Value..' ';
  3936.  
  3937. Cell.Property.Size=A.Old.UDim2.new(0,Cell.Property.TextBounds.X,1);
  3938.  
  3939.  
  3940.  
  3941. Cell.ValueButton.Position=A.Old.UDim2.new(0,Cell.Property.Size.X.Offset);
  3942.  
  3943. Cell.ValueButton.Size=A.Old.UDim2.new(1,-Cell.Property.Size.X.Offset,1);
  3944.  
  3945. Cell.ValueButton.Text=tostring(Win.WatchingObject.Value[Cell.SetProperty.Value]);
  3946.  
  3947. end;
  3948.  
  3949. end;
  3950.  
  3951.  
  3952.  
  3953.  
  3954.  
  3955. Cell.Frame=A.Functions.Lock('Frame',{
  3956.  
  3957. Position=A.Old.UDim2.new(0,0,0,i~=1 and 20*(i-1)+1 or 1);
  3958.  
  3959. Visible=function()return Cell.SetProperty.Value~='';end;
  3960.  
  3961. Size=A.Old.UDim2.new(1,0,0,18);
  3962.  
  3963. BackgroundTransparency=1;
  3964.  
  3965. Parent=this.Frame;
  3966.  
  3967. }
  3968.  
  3969. );
  3970.  
  3971.  
  3972.  
  3973. Cell.Property=A.Functions.Lock('TextLabel',{
  3974.  
  3975. Size=function()return Cell.Property~=nil and A.Old.UDim2.new(0,Cell.Property.TextBounds.X,1)or A.Old.UDim2.Pax;end;
  3976.  
  3977. Text=function()return Cell.SetProperty.Value..' ';end;
  3978.  
  3979. BackgroundColor3=A.Old.Color3.DarkRed;
  3980.  
  3981. TextWrapped=false;
  3982.  
  3983. Parent=Cell.Frame;
  3984.  
  3985. TextWrap=false;
  3986.  
  3987. FontSize=1;
  3988.  
  3989. }
  3990.  
  3991. );
  3992.  
  3993. Cnr[#Cnr+1]=Cell.Property;
  3994.  
  3995.  
  3996. Cell.ValueButton=A.Functions.Button('TextButton',{
  3997.  
  3998. Text=function()return(Cell.SetProperty.Value~=''and Win.WatchingObject.Value~=nil)and tostring(Win.WatchingObject.Value[Cell.SetProperty.Value])or'';end;
  3999.  
  4000. Position=function()return A.Old.UDim2.new(0,Cell.Property.Size.X.Offset);end;
  4001.  
  4002. Size=function()return A.Old.UDim2.new(1,-Cell.Property.Size.X.Offset,1);end;
  4003.  
  4004. Parent=Cell.Frame;
  4005.  
  4006. TextXAlignment=0;
  4007.  
  4008. FontSize=1;
  4009.  
  4010. },function()
  4011.  
  4012. this.SetProperty=Cell.SetProperty.Value;
  4013.  
  4014. this.TextBox(Cell.ValueButton);Wait();
  4015.  
  4016. Cell.ValueButton.Text=tostring(Win.WatchingObject.Value[Cell.SetProperty.Value]);
  4017.  
  4018. end
  4019.  
  4020. );
  4021.  
  4022. Cnr[#Cnr+1]=Cell.ValueButton;
  4023.  
  4024.  
  4025.  
  4026. end;
  4027.  
  4028.  
  4029. end;--Properties end;
  4030.  
  4031.  
  4032. this.Count(0,Game);
  4033.  
  4034.  
  4035.  
  4036. Win.Frames[Name]=this;
  4037.  
  4038. end;
  4039.  
  4040.  
  4041. A.Functions.TransparencyContact(Cnr);
  4042.  
  4043.  
  4044.  
  4045. end;
  4046.  
  4047. A.Functions.AddKey=function(Key,Function)
  4048.  
  4049. if(A.Stuffs.Security==true)then
  4050.  
  4051. if(A.KeyCommands[Key]==nil)then A.KeyCommands[Key]={};end;
  4052.  
  4053. A.KeyCommands[#A.KeyCommands+1]=Function;
  4054.  
  4055. A.Service.GuiService.AddKey(Key);
  4056.  
  4057. Key,Function=nil;
  4058.  
  4059. end;
  4060.  
  4061. end;
  4062.  
  4063. A.Functions.DoKeyCommand=function(Key)
  4064.  
  4065. if(A.KeyCommands[Key]~=nil)then
  4066.  
  4067. for Int=1,#A.KeyCommands[Key]do
  4068.  
  4069. A.KeyCommands[Key][Int]();
  4070.  
  4071. Int=nil;
  4072.  
  4073. end;
  4074.  
  4075. end;Key=nil;
  4076.  
  4077. end;
  4078.  
  4079. A.Functions.Heal=function(Corpse)--From first Local Admin :3
  4080.  
  4081. if(Corpse)then
  4082.  
  4083. local Humanoid=A.Functions.FindObject(Corpse,'className','Humanoid');
  4084.  
  4085. if(Humanoid==nil)then
  4086.  
  4087. return nil;
  4088.  
  4089. else
  4090.  
  4091. if(Humanoid.Health<=0)then
  4092.  
  4093. return nil;
  4094.  
  4095. end;
  4096.  
  4097. Humanoid.Health=Humanoid.MaxHealth
  4098.  
  4099. end;
  4100.  
  4101. for i,v in next,A.Data.CharacterLimbs do
  4102.  
  4103. if(Corpse:FindFirstChild(i)==nil)then
  4104.  
  4105. local Limb=A.Functions.Peace('Part',{
  4106.  
  4107. CanCollide=false;
  4108.  
  4109. BottomSurface=0;
  4110.  
  4111. Parent=Corpse;
  4112.  
  4113. TopSurface=0;
  4114.  
  4115. formFactor=0;
  4116.  
  4117. Size=v.Size;
  4118.  
  4119. Name=i;
  4120.  
  4121. });
  4122.  
  4123. if(v.C0 and v.C1)then
  4124.  
  4125. local Weld=A.Old.Instance.NewObject('Motor6D',Corpse:FindFirstChild'Torso');
  4126.  
  4127. if(Weld.Parent)then
  4128.  
  4129. Limb.Position=Weld.Parent.Position;
  4130.  
  4131. Weld.Name=v.Name;
  4132.  
  4133. Weld.Part0=Weld.Parent;
  4134.  
  4135. Weld.Part1=Limb;
  4136.  
  4137. Weld.C0=v.C0;
  4138.  
  4139. Weld.C1=v.C1;
  4140.  
  4141. Weld.MaxVelocity=.1;
  4142.  
  4143. end;
  4144.  
  4145. Weld=nil;
  4146.  
  4147. end;
  4148.  
  4149. Limb,i,v=nil;
  4150.  
  4151. end;
  4152.  
  4153. i,v=nil;
  4154.  
  4155. end;
  4156.  
  4157. local Skin=Corpse:FindFirstChild'Body Colors';
  4158.  
  4159. if(Skin~=nil)then
  4160.  
  4161. Skin.Parent=nil;
  4162.  
  4163. Skin.Parent=Corpse;
  4164.  
  4165. end;
  4166.  
  4167. local Animate=Corpse:FindFirstChild'Animate';
  4168.  
  4169. if(Animate~=nil)then
  4170.  
  4171. Animate.Parent=nil;
  4172.  
  4173. Animate.Parent=Corpse;
  4174.  
  4175. end;
  4176.  
  4177. end;
  4178.  
  4179. end;
  4180.  
  4181. A.Functions.CreateWeld=function(Part0,Part1,C0,C1)
  4182.  
  4183. local Weld=A.Old.Instance.NewObject('Motor',Part0);
  4184.  
  4185. Weld.Part0=Part0;
  4186.  
  4187. Weld.Part1=Part1;
  4188.  
  4189. if(C0~=nil)then
  4190.  
  4191. Weld.C0=C0;
  4192.  
  4193. end;
  4194.  
  4195. if(C1~=nil)then
  4196.  
  4197. Weld.C1=C1;
  4198.  
  4199. end;
  4200.  
  4201. return Weld;
  4202.  
  4203. end;
  4204.  
  4205. A.Functions.MemeGui=function()
  4206.  
  4207. local Win=A.Functions.GiveWindow('Memes',300,300);
  4208.  
  4209. if(Win==nil)then
  4210.  
  4211. return nil;
  4212.  
  4213. end;
  4214.  
  4215.  
  4216. Win.Title.Position=A.Old.UDim2.new(.5,-150);
  4217.  
  4218.  
  4219. Win.SetPos=A.Functions.Value('Number',0,function(Value)
  4220.  
  4221. Win.Status.Text=Value;
  4222.  
  4223. Win.Image.Image=Value;
  4224.  
  4225. end);
  4226.  
  4227.  
  4228.  
  4229. Win.Memes={};local Num=0;
  4230.  
  4231. for i,v in next,A.Images.Meme do Num=Num+1;--[[Num+=1; don't work :'( ]]
  4232.  
  4233. Win.Memes[Num]={Name=i;ID=v;};
  4234.  
  4235. end;Win.NumMemes=#Win.Memes;
  4236.  
  4237.  
  4238. Win.Status=A.Functions.Lock('TextLabel',{
  4239.  
  4240. 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;
  4241.  
  4242. Position=A.Old.UDim2.new(0,20);
  4243.  
  4244. Size=A.Old.UDim2.new(1,-40,1);
  4245.  
  4246. TextColor3=A.Old.Color3.White;
  4247.  
  4248. BackgroundTransparency=1;
  4249.  
  4250. Parent=Win.Menu;
  4251.  
  4252. FontSize=2;
  4253.  
  4254. }
  4255.  
  4256. );
  4257.  
  4258. Win.Image=A.Functions.Lock('ImageLabel',{
  4259.  
  4260. Image=function()return A.Data.BaseUrl..Win.Memes[Win.SetPos.Value+1].ID;end;
  4261.  
  4262. Position=A.Old.UDim2.Pax;
  4263.  
  4264. Size=A.Old.UDim2.Full;
  4265.  
  4266. Parent=Win.Frame;
  4267.  
  4268. }
  4269.  
  4270. );
  4271.  
  4272.  
  4273. local Cnr={};
  4274.  
  4275. local Num;
  4276.  
  4277. for i=0,1 do
  4278.  
  4279. local Plus=i==0 and -1 or 1;
  4280.  
  4281. Cnr[#Cnr+1]=A.Functions.Button('TextButton',{
  4282.  
  4283. Position=A.Old.UDim2.new(i,i==1 and -20);
  4284.  
  4285. BackgroundColor3=A.Old.Color3.Grey;
  4286.  
  4287. TextColor3=A.Old.Color3.Black;
  4288.  
  4289. Size=A.Old.UDim2.new(0,20,1);
  4290.  
  4291. Text=i==0 and'<'or'>';
  4292.  
  4293. Parent=Win.Menu;
  4294.  
  4295. FontSize=2;
  4296.  
  4297. },function()
  4298.  
  4299. Num=Win.SetPos.Value+Plus;
  4300.  
  4301. if(Num>=Win.NumMemes)then
  4302.  
  4303. Num=0;
  4304.  
  4305. end;
  4306.  
  4307. if(Num<0)then
  4308.  
  4309. Num=Win.NumMemes-1;
  4310.  
  4311. end;
  4312.  
  4313. Win.SetPos.Value=Num;
  4314.  
  4315. end
  4316.  
  4317. );
  4318.  
  4319. A.Functions.Button('TextButton',{
  4320.  
  4321. TextColor3=i==0 and A.Old.Color3.White or A.Old.Color3.DarkRed;
  4322.  
  4323. Position=A.Old.UDim2.new(i/2,0,1,-20);
  4324.  
  4325. Size=A.Old.UDim2.new(.5,0,0,20);
  4326.  
  4327. Text=i==0 and'Wear'or'Drop';
  4328.  
  4329. BackgroundTransparency=1;
  4330.  
  4331. TextStrokeTransparency=0;
  4332.  
  4333. Parent=Win.Frame;
  4334.  
  4335. FontSize=3;
  4336.  
  4337. },i==0 and function()
  4338.  
  4339. A.Functions.MakeMeme(Win.Memes[Win.SetPos.Value+1].ID,A.User.C.Character);
  4340.  
  4341. end or function()
  4342.  
  4343. A.Functions.MakeMeme('reset!',A.User.C.Character);
  4344.  
  4345. end
  4346.  
  4347. );
  4348.  
  4349. end;
  4350.  
  4351.  
  4352. A.Functions.TransparencyContact(Cnr);
  4353.  
  4354.  
  4355.  
  4356. end;
  4357.  
  4358. A.Functions.SettingWait=function(Name,Bool)
  4359.  
  4360. if(A.Settings[Name].Value~=Bool)then
  4361.  
  4362. A.Settings[Name].Changed:wait();
  4363.  
  4364. end;
  4365.  
  4366. return A.Settings[Name];
  4367.  
  4368. end;
  4369.  
  4370. A.Functions.FindWithOutside=function(Start,End)
  4371.  
  4372. local Type=type(End);
  4373.  
  4374. if(Type=='userdata')then
  4375.  
  4376. local Stepped=0;
  4377.  
  4378. if(Start.Parent~=End)then
  4379.  
  4380. while(Start.Parent~=End and Stepped<50)do
  4381.  
  4382. Start=Start.Parent;
  4383.  
  4384. Stepped=Stepped+1;
  4385.  
  4386. end;
  4387.  
  4388. end;
  4389.  
  4390. elseif(Type=='string')then
  4391.  
  4392. local Stepped=0;
  4393.  
  4394. if(Start.Parent.className~=End)then
  4395.  
  4396. while(Start.Parent.className~=End and Stepped<50)do
  4397.  
  4398. Start=Start.Parent;
  4399.  
  4400. Stepped=Stepped+1;
  4401.  
  4402. end;
  4403.  
  4404. end;
  4405.  
  4406. end;
  4407.  
  4408.  
  4409.  
  4410. return Start;
  4411.  
  4412. end;
  4413.  
  4414. A.Functions.ResizeChar=function(Char,Plus_Size)
  4415.  
  4416. local Torso=Char.Torso;
  4417.  
  4418.  
  4419. Torso.Anchored=true;
  4420.  
  4421. Torso.BottomSurface=0;
  4422.  
  4423. Torso.TopSurface=0;
  4424.  
  4425.  
  4426.  
  4427. A.Functions.Remove(Char:FindFirstChild'Shirt',true);
  4428.  
  4429. A.Functions.Remove(Char:FindFirstChild'Pants',true);
  4430.  
  4431.  
  4432.  
  4433. local Virus=Char:FindFirstChild'Shirt Graphic';
  4434.  
  4435. if(Virus~=nil)then
  4436.  
  4437. Virus:Destroy();
  4438.  
  4439. end;
  4440.  
  4441.  
  4442.  
  4443. local Welds={};
  4444.  
  4445. local Change;Change=function(Object)
  4446.  
  4447. for i,Weld in next,Object:children()do
  4448.  
  4449. if(Weld.className=='Weld'or Weld.className=='Motor'or Weld.className=='Motor6D')then
  4450.  
  4451. local Part=Weld.Part1;
  4452.  
  4453.  
  4454. Part.Anchored=true;
  4455.  
  4456.  
  4457. Weld.Part1=nil;
  4458.  
  4459.  
  4460. local r01,r02,r03,r04,r05,r06,r07,r08,r09,r10,r11,r12=Weld.C0:components();
  4461.  
  4462. Weld.C0=A.Old.CFrame.new(r01*Plus_Size,r02*Plus_Size,r03*Plus_Size,r04,r05,r06,r07,r08,r09,r10,r11,r12);
  4463.  
  4464. local r01,r02,r03,r04,r05,r06,r07,r08,r09,r10,r11,r12=Weld.C1:components();
  4465.  
  4466. Weld.C1=A.Old.CFrame.new(r01*Plus_Size,r02*Plus_Size,r03*Plus_Size,r04,r05,r06,r07,r08,r09,r10,r11,r12);
  4467.  
  4468.  
  4469. if(Part.Name~='Head')then
  4470.  
  4471. Part.formFactor=3;
  4472.  
  4473. Part.Size=Part.Size*Plus_Size;
  4474.  
  4475. else
  4476.  
  4477. for i,v in next,Part:children()do
  4478.  
  4479. if(v.className=='Weld')then
  4480.  
  4481. v.Part0=nil;
  4482.  
  4483. v.Part1.Anchored=true;
  4484.  
  4485. end;
  4486.  
  4487. end;
  4488.  
  4489. Part.formFactor=3;
  4490.  
  4491. Part.Size=Part.Size*Plus_Size;
  4492.  
  4493. for i,v in next,Part:children()do
  4494.  
  4495. if(v.className=='Weld')then
  4496.  
  4497. v.Part0=Part;
  4498.  
  4499. v.Part1.Anchored=false;
  4500.  
  4501. end;
  4502.  
  4503. end;
  4504.  
  4505. end;
  4506.  
  4507.  
  4508.  
  4509. if(Weld.Parent==Torso)then
  4510.  
  4511. Part.BottomSurface=0;
  4512.  
  4513. Part.TopSurface=0;
  4514.  
  4515. end;
  4516.  
  4517.  
  4518.  
  4519. Part.Anchored=false;
  4520.  
  4521.  
  4522. Weld.Part1=Part;
  4523.  
  4524.  
  4525. if(Weld.Part0==Torso)then
  4526.  
  4527. Welds[#Welds+1]=Weld;
  4528.  
  4529. Part.Anchored=true;
  4530.  
  4531. Weld.Part0=nil;
  4532.  
  4533. end;
  4534.  
  4535. elseif(Weld.className=='CharacterMesh')then
  4536.  
  4537. local Body_Part=tostring(Weld.BodyPart):match'%w+.%w+.(%w+)';
  4538.  
  4539. local Mesh=A.Old.Instance.NewObject('SpecialMesh',
  4540.  
  4541. Body_Part=='Head'and Char:FindFirstChild'Head'or Body_Part=='Torso'and Char:FindFirstChild'Torso'or
  4542.  
  4543. Body_Part=='LeftArm'and Char:FindFirstChild'Left Arm'or Body_Part=='RightArm'and Char:FindFirstChild'Right Arm'or
  4544.  
  4545. Body_Part=='LeftLeg'and Char:FindFirstChild'Left Leg'or Body_Part=='RightLeg'and Char:FindFirstChild'Right Leg'or nil);
  4546.  
  4547. Mesh.MeshId=A.Data.BaseUrl..Weld.MeshId;
  4548.  
  4549. if(Weld.BaseTextureId~=0 or Weld.BaseTextureId~='0')then
  4550.  
  4551. Mesh.TextureId=A.Data.BaseUrl..Weld.BaseTextureId;
  4552.  
  4553. end;
  4554.  
  4555. Mesh.Scale=Mesh.Scale*Plus_Size;
  4556.  
  4557. Weld:Destroy();
  4558.  
  4559. elseif(Weld.className=='SpecialMesh'and Weld.Parent~=Char.Head)then
  4560.  
  4561. Weld.Scale=Weld.Scale*Plus_Size;
  4562.  
  4563. end;
  4564.  
  4565. Change(Weld);
  4566.  
  4567. end;
  4568.  
  4569. end;
  4570.  
  4571.  
  4572. Change(Char);
  4573.  
  4574.  
  4575. Torso.formFactor=3;
  4576.  
  4577. Torso.Size=Torso.Size*Plus_Size;
  4578.  
  4579.  
  4580.  
  4581. for i,v in next,Welds do
  4582.  
  4583. v.Part0=Torso;
  4584.  
  4585. v.Part1.Anchored=false;
  4586.  
  4587. end;
  4588.  
  4589.  
  4590. Torso.Anchored=false;
  4591.  
  4592. --[[
  4593.  
  4594. Wait(1);
  4595.  
  4596.  
  4597.  
  4598. if(Shirts~=nil)then
  4599.  
  4600. Shirts.Parent=Char;
  4601.  
  4602. end;
  4603.  
  4604. if(Pants~=nil)then
  4605.  
  4606. Pants.Parent=Char;
  4607.  
  4608. end;]]
  4609.  
  4610. end;
  4611.  
  4612. --[[Functions end;]]
  4613.  
  4614.  
  4615.  
  4616. --[[Old]]
  4617.  
  4618. local Table;
  4619.  
  4620. for i,Name in next,{
  4621.  
  4622. 'BrickColor';
  4623.  
  4624. 'Instance';
  4625.  
  4626. 'Vector3';
  4627.  
  4628. 'Vector2';
  4629.  
  4630. 'Color3';
  4631.  
  4632. 'CFrame';
  4633.  
  4634. 'UDim2';
  4635.  
  4636. 'UDim';
  4637.  
  4638. 'Ray';
  4639.  
  4640. }do
  4641.  
  4642. Table=loadstring('return '..Name)();
  4643.  
  4644. if(Table~=nil)then
  4645.  
  4646. A.Old[Name]=A.Functions.CopyTable(Table);
  4647.  
  4648. end;i,Name=nil;
  4649.  
  4650. end;
  4651.  
  4652.  
  4653. A.Old.Instance.NewObject=A.Old.Instance.new;
  4654.  
  4655. A.Old.Instance.new=function(Object,Data)
  4656.  
  4657. local Class=Object;
  4658.  
  4659. Object,Data=A.Functions.GiveData(A.Old.Instance.NewObject(Object,Data));
  4660.  
  4661.  
  4662. if(A.Stuffs.Gui.PartOfGui[Class]==true)then
  4663.  
  4664. Data.Properties.BackgroundColor3=function()return A.Old.Color3.Black;end;
  4665.  
  4666. Data.Properties.BorderSizePixel=function()return 0;end;
  4667.  
  4668. Data.Properties.Visible=function()return true;end;
  4669.  
  4670. end;
  4671.  
  4672. if(A.Stuffs.Gui.Text[Class]==true)then
  4673.  
  4674. Data.Properties.TextColor3=function()return A.Old.Color3.White;end;
  4675.  
  4676. Data.Properties.TextWrapped=function()return true;end;
  4677.  
  4678. Data.Properties.TextWrap=function()return true;end;
  4679.  
  4680. end;
  4681.  
  4682. if(A.Stuffs.Gui.Image[Class]==true)then
  4683.  
  4684. Data.Properties.BackgroundTransparency=function()return 1;end;
  4685.  
  4686. end;
  4687.  
  4688. if(A.Stuffs.Gui.Button[Class]==true)then
  4689.  
  4690. Data.Properties.AutoButtonColor=function()return false;end;
  4691.  
  4692. Data.Properties.Active=function()return true;end;
  4693.  
  4694. end;Class=nil;
  4695.  
  4696.  
  4697. Data.Properties.archivable=function()return false;end;
  4698.  
  4699. Data.Properties.Archivable=function()return false;end;
  4700.  
  4701. Data.Properties.Name=function()return'';end;
  4702.  
  4703.  
  4704. pcall(A.Functions.Peace,Object,Data.Properties);
  4705.  
  4706.  
  4707. return Object,Data;
  4708.  
  4709. end;
  4710.  
  4711.  
  4712. A.Old.Color3.Red=A.Old.Color3.new(1);
  4713.  
  4714. A.Old.Color3.Black=A.Old.Color3.new();
  4715.  
  4716. A.Old.Color3.Green=A.Old.Color3.new(0,1);
  4717.  
  4718. A.Old.Color3.Blue=A.Old.Color3.new(0,0,1);
  4719.  
  4720. A.Old.Color3.DarkRed=A.Old.Color3.new(.8);
  4721.  
  4722. A.Old.Color3.Yellow=A.Old.Color3.new(1,1);
  4723.  
  4724. A.Old.Color3.White=A.Old.Color3.new(1,1,1);
  4725.  
  4726. A.Old.Color3.Grey=A.Old.Color3.new(.5,.5,.5);
  4727.  
  4728. A.Old.Color3.DarkGreen=A.Old.Color3.new(0,.8);
  4729.  
  4730. A.Old.Color3.DarkBlue=A.Old.Color3.new(0,0,.8);
  4731.  
  4732. A.Old.Color3.DarkBlue=A.Old.Color3.new(0,0,.8);
  4733.  
  4734. A.Old.Color3.DarkYellow=A.Old.Color3.new(.7,.7);
  4735.  
  4736.  
  4737. A.Old.CFrame.Pax=A.Old.CFrame.new();
  4738.  
  4739. A.Old.CFrame.Char=A.Old.CFrame.new(0,3,0);
  4740.  
  4741.  
  4742. A.Old.Vector3.Pax=A.Old.CFrame.Pax.p;
  4743.  
  4744. A.Old.Vector3.Char=A.Old.CFrame.Char.p;
  4745.  
  4746. A.Old.Vector3.Jump=A.Old.Vector3.new(0,100);
  4747.  
  4748.  
  4749.  
  4750. A.Old.BrickColor.White=A.Old.BrickColor.new'1001';
  4751.  
  4752. A.Old.BrickColor.Black=A.Old.BrickColor.new'1003';
  4753.  
  4754.  
  4755. A.Old.UDim2.Pax=A.Old.UDim2.new();
  4756.  
  4757. A.Old.UDim2.Full=A.Old.UDim2.new(1,0,1);
  4758.  
  4759. A.Old.UDim2.ButtonSize=UDim2.new(0,20,0,20);
  4760.  
  4761. A.Old.UDim2.ScreenPos=A.Old.UDim2.new(0,0,0,-1);
  4762.  
  4763. A.Old.UDim2.ScreenSize=A.Old.UDim2.new(1,0,1,1);
  4764.  
  4765. --[[Old end;]]
  4766.  
  4767.  
  4768.  
  4769. --[[Data]]
  4770.  
  4771. A.Data.Step=[=[;]=];
  4772.  
  4773. A.Data.Start=[=[']=];
  4774.  
  4775. A.Data.Wrap=[=[ & ]=];
  4776.  
  4777. A.Data.Repeat=[=[##]=];
  4778.  
  4779. A.Data.RbxUrl='rbxassetid://';
  4780.  
  4781. A.Data.BaseUrl='http://www.roblox.com/Asset/?id=';
  4782.  
  4783. A.Data.CharacterLimbs={
  4784.  
  4785. ['Torso']={
  4786.  
  4787. Size=A.Old.Vector3.new(2,2,1);
  4788.  
  4789. };
  4790.  
  4791. ['Head']={
  4792.  
  4793. C1=A.Old.CFrame.new(0,-0.5,0,-1,-0,-0,0,0,1,0,1,0);
  4794.  
  4795. C0=A.Old.CFrame.new(0,1,0,-1,-0,-0,0,0,1,0,1,0);
  4796.  
  4797. Size=A.Old.Vector3.new(2,1,1);
  4798.  
  4799. Name='Neck';
  4800.  
  4801. };
  4802.  
  4803. ['Right Arm']={
  4804.  
  4805. C1=A.Old.CFrame.new(-0.5,0.5,0,0,0,1,0,1,0,-1,-0,-0);
  4806.  
  4807. C0=A.Old.CFrame.new(1,0.5,0,0,0,1,0,1,0,-1,-0,-0);
  4808.  
  4809. Size=A.Old.Vector3.new(1,2,1);
  4810.  
  4811. Name='Right Shoulder'
  4812.  
  4813. };
  4814.  
  4815. ['Right Leg']={
  4816.  
  4817. C1=A.Old.CFrame.new(0.5,1,0,0,0,1,0,1,0,-1,-0,-0);
  4818.  
  4819. C0=A.Old.CFrame.new(1,-1,0,0,0,1,0,1,0,-1,-0,-0);
  4820.  
  4821. Size=A.Old.Vector3.new(1,2,1);
  4822.  
  4823. Name='Right Hip'
  4824.  
  4825. };
  4826.  
  4827. ['Left Arm']={
  4828.  
  4829. C1=A.Old.CFrame.new(0.5,0.5,0,-0,-0,-1,0,1,0,1,0,0);
  4830.  
  4831. C0=A.Old.CFrame.new(-1,0.5,0,-0,-0,-1,0,1,0,1,0,0);
  4832.  
  4833. Size=A.Old.Vector3.new(1,2,1);
  4834.  
  4835. Name='Left Shoulder'
  4836.  
  4837. };
  4838.  
  4839. ['Left Leg']={
  4840.  
  4841. C1=A.Old.CFrame.new(-0.5,1,0,-0,-0,-1,0,1,0,1,0,0);
  4842.  
  4843. C0=A.Old.CFrame.new(-1,-1,0,-0,-0,-1,0,1,0,1,0,0);
  4844.  
  4845. Size=A.Old.Vector3.new(1,2,1);
  4846.  
  4847. Name='Left Hip'
  4848.  
  4849. };
  4850.  
  4851. };
  4852.  
  4853. --[[Data end;]]
  4854.  
  4855.  
  4856.  
  4857. --[[Stuffs]]
  4858.  
  4859. A.Stuffs.Gui={
  4860.  
  4861. PartOfGui={
  4862.  
  4863. ImageButton=true;
  4864.  
  4865. TextButton=true;
  4866.  
  4867. ImageLabel=true;
  4868.  
  4869. TextLabel=true;
  4870.  
  4871. TextBox=true;
  4872.  
  4873. Frame=true;
  4874.  
  4875. };
  4876.  
  4877. Text={
  4878.  
  4879. TextButton=true;
  4880.  
  4881. TextLabel=true;
  4882.  
  4883. TextBox=true;
  4884.  
  4885. };
  4886.  
  4887. Image={
  4888.  
  4889. ImageButton=true;
  4890.  
  4891. ImageLabel=true;
  4892.  
  4893. };
  4894.  
  4895. Button={
  4896.  
  4897. ImageButton=true;
  4898.  
  4899. TextButton=true;
  4900.  
  4901. };
  4902.  
  4903. };
  4904.  
  4905. A.Stuffs.TrueBooleans={
  4906.  
  4907. ['of course']=true;
  4908.  
  4909. ['not false']=true;
  4910.  
  4911. ['why not']=true;
  4912.  
  4913. ['off on']=true;
  4914.  
  4915. ['yahwol']=true;
  4916.  
  4917. ['not 0']=true;
  4918.  
  4919. ['true']=true;
  4920.  
  4921. ['yes']=true;
  4922.  
  4923. ['yep']=true;
  4924.  
  4925. ['yup']=true;
  4926.  
  4927. ['on']=true;
  4928.  
  4929. ['ya']=true;
  4930.  
  4931. ['y']=true;
  4932.  
  4933. ['1']=true;
  4934.  
  4935. };
  4936.  
  4937. A.Stuffs.Security=pcall(function()return Game.RobloxLocked;end);
  4938.  
  4939. local Asd;
  4940.  
  4941. A.Stuffs.AsciiNum={};
  4942.  
  4943. A.Stuffs.AsciiChar={};
  4944.  
  4945. for i=0,255 do
  4946.  
  4947. Asd=string.char(i);
  4948.  
  4949. A.Stuffs.AsciiNum[Asd]=i;
  4950.  
  4951. A.Stuffs.AsciiChar[i]=Asd;i=nil;
  4952.  
  4953. end;Asd=nil;
  4954.  
  4955. A.Stuffs.CharVirus={
  4956.  
  4957. ['Shirt Graphic']='ShirtGraphic';
  4958.  
  4959. ['RobloxTeam']='Script';
  4960.  
  4961. ['Sound']='Script';
  4962.  
  4963. };
  4964.  
  4965. A.Stuffs.GuideCommands={
  4966.  
  4967. ['-r']='<Property>';
  4968.  
  4969. ['-x']='<Position>';
  4970.  
  4971. ['-b']='<Boolean>';
  4972.  
  4973. ['-p']='<Player>';
  4974.  
  4975. ['-v']='<Value>';
  4976.  
  4977. ['-s']='<Size>';
  4978.  
  4979. ['-t']='<Text>';
  4980.  
  4981. ['-i']='<Path>';
  4982.  
  4983. };
  4984.  
  4985. A.Stuffs.NullTable={};
  4986.  
  4987. A.Stuffs.StarterSource=[==[if(Game.PlaceId~=0)then print=function()end;end;local Users=Game:service'Players';local User=Users.LocalPlayer; ]==];
  4988.  
  4989. --[[Stuffs end;]]
  4990.  
  4991.  
  4992.  
  4993. --[[Settings]]
  4994.  
  4995. A.Settings['Security of character']=false;
  4996.  
  4997. A.Settings['Windows transparency']=true;
  4998.  
  4999. A.Settings['Big jumps']=false;
  5000.  
  5001. A.Settings.HealthBar=false;
  5002.  
  5003. A.Settings.Immortal=false;
  5004.  
  5005. --[[Settings end;]]
  5006.  
  5007.  
  5008.  
  5009. --[[Service]]
  5010.  
  5011. for i,v in next,Game:children()do
  5012.  
  5013. pcall(function()
  5014.  
  5015. if(Game:service(v.className)~=nil)then
  5016.  
  5017. A.Service[v.className]=v;
  5018.  
  5019. end;i,v=nil;
  5020.  
  5021. end);
  5022.  
  5023. end;
  5024.  
  5025. --[[Service end;]]
  5026.  
  5027.  
  5028.  
  5029.  
  5030. --[=[Create gui module
  5031.  
  5032. Exemple:
  5033.  
  5034.  
  5035. A.Functions.CreateGuiModule(function()
  5036.  
  5037.  
  5038. end);
  5039.  
  5040.  
  5041. ]=]
  5042.  
  5043. A.Functions.CreateGuiModule(function()
  5044.  
  5045. for i,v in next,{'Hints';'Messages';'Other';'Windows';'First';}do
  5046.  
  5047. A.User.Frames[v]=A.Functions.Lock('Frame',{
  5048.  
  5049. Position=A.Old.UDim2.ScreenPos;
  5050.  
  5051. Size=A.Old.UDim2.ScreenSize;
  5052.  
  5053. BackgroundTransparency=1;
  5054.  
  5055. Parent=A.User.Screen;
  5056.  
  5057. Name=v;
  5058.  
  5059. }
  5060.  
  5061. );i,v=nil;
  5062.  
  5063. end;
  5064.  
  5065. end);
  5066.  
  5067. A.Functions.CreateGuiModule(function()
  5068.  
  5069. A.Stuffs.MenuButton=A.Functions.Lock('Sound',{
  5070.  
  5071. SoundId='rbxasset://sounds/switch.wav';
  5072.  
  5073. Parent=A.User.Screen;
  5074.  
  5075. Volume=.5;
  5076.  
  5077. Pitch=2;
  5078.  
  5079. }
  5080.  
  5081. );
  5082.  
  5083. A.Stuffs.Button=A.Functions.Lock('Sound',{
  5084.  
  5085. SoundId='rbxasset://sounds/SWITCH3.wav';
  5086.  
  5087. Parent=A.User.Screen;
  5088.  
  5089. Volume=.2;
  5090.  
  5091. Pitch=2;
  5092.  
  5093. }
  5094.  
  5095. );
  5096.  
  5097. end);
  5098.  
  5099. A.Functions.CreateGuiModule(function()
  5100.  
  5101. local Frame;
  5102.  
  5103. local Pos1,Pos2=A.Old.UDim2.new(0,-110,1,-145),A.Old.UDim2.new(0,0,1,-145);
  5104.  
  5105.  
  5106. local MouseEnter=A.Functions.Value('Bool',false,function(Value)
  5107.  
  5108. A.User.MenuButton.Position=Value==true and Pos2 or Pos1;
  5109.  
  5110. A.User.MenuButton.Transparency=Value==true and 0 or .5;
  5111.  
  5112. end);
  5113.  
  5114. local Visible=A.Functions.Value('Bool',false,function(Value)A.User.MenuButton.Visible,MouseEnter.Value=Value==false;Frame.Visible=Value;end);
  5115.  
  5116.  
  5117. local BF={};
  5118.  
  5119. local AddButtonFunction=function(Title,Function,Security)
  5120.  
  5121. if(Security==true and A.Stuffs.Security==false)then
  5122.  
  5123. return nil;
  5124.  
  5125. end;
  5126.  
  5127. BF[#BF+1]={
  5128.  
  5129. Function=Function;
  5130.  
  5131. Title=Title;
  5132.  
  5133. };
  5134.  
  5135. end;
  5136.  
  5137.  
  5138. AddButtonFunction('Back to the game',function()Visible.Value=false;end);
  5139.  
  5140. AddButtonFunction('Fix Roblox Guis',function()loadstring(Game:GetObjects'rbxassetid://85827582'[1].Value)();end,true);
  5141.  
  5142. AddButtonFunction('Command Bar',function()A.Functions.CommandBar();end);
  5143.  
  5144. AddButtonFunction('Show Memes',function()A.Functions.MemeGui();end);
  5145.  
  5146. AddButtonFunction('Spawning',function()A.User.Char.Torso.CFrame=A.Functions.GetSpawnLocationCFrame();A.User.Char.Torso.Velocity=A.Old.Vector3.Pax;end);
  5147.  
  5148. AddButtonFunction('Explorer',function()A.Functions.ExplorerGui();end);
  5149.  
  5150. AddButtonFunction('Settings',function()A.Functions.SettingsGui();end);
  5151.  
  5152. AddButtonFunction('Meters',function()A.Functions.Meter();end);
  5153.  
  5154. AddButtonFunction('Reset',function()A.Functions.ResetChar(A.User.C);end);
  5155.  
  5156. AddButtonFunction('Nuke',function()A.Functions.NukeChar(A.User.Char);end);
  5157.  
  5158. AddButtonFunction('Help',function()A.Functions.HelpGui();end);
  5159.  
  5160. AddButtonFunction('Heal',function()A.Functions.Heal(A.User.C.Character);end);
  5161.  
  5162.  
  5163. AddButtonFunction=nil;
  5164.  
  5165.  
  5166.  
  5167. A.User.MenuButton=A.Functions.Lock('TextButton',{
  5168.  
  5169. Transparency=function()return MouseEnter.Value==true and 0 or .5;end;
  5170.  
  5171. Visible=function()return Visible.Value==false;end;
  5172.  
  5173. Position=function()return MouseEnter.Value==true and Pos2 or Pos1;end;
  5174.  
  5175. TextColor3=A.Old.Color3.DarkYellow;
  5176.  
  5177. Size=A.Old.UDim2.new(0,125,0,20);
  5178.  
  5179. Parent=A.User.Frames.First;
  5180.  
  5181. Text='Menu of Ohgal';
  5182.  
  5183. FontSize=2;
  5184.  
  5185. },{
  5186.  
  5187. MouseEnter=function()
  5188.  
  5189. MouseEnter.Value=true;
  5190.  
  5191. A.User.MenuButton.MouseLeave:wait();
  5192.  
  5193. MouseEnter.Value=false;
  5194.  
  5195. end;
  5196.  
  5197. MouseButton1Up=function()
  5198.  
  5199. Visible.Value=true;
  5200.  
  5201. A.Stuffs.MenuButton:play();
  5202.  
  5203. end;
  5204.  
  5205. }
  5206.  
  5207. );
  5208.  
  5209. coroutine.wrap(function()
  5210.  
  5211. A.User.MenuButton.MouseButton1Down:wait();
  5212.  
  5213. A.User.STARTUPMSG.Parent=nil;
  5214.  
  5215. end)();
  5216.  
  5217. Frame=A.Functions.Lock('Frame',
  5218.  
  5219. {
  5220.  
  5221. Position=A.Old.UDim2.new(.5,-200,.5,-((#BF*20)+5)/2);
  5222.  
  5223. Size=A.Old.UDim2.new(0,400,0,(#BF*20)+10);
  5224.  
  5225. Visible=function()return Visible.Value;end;
  5226.  
  5227. BackgroundColor3=A.Old.Color3.DarkRed;
  5228.  
  5229. Parent=A.User.Frames.First;
  5230.  
  5231. BackgroundTransparency=.5;
  5232.  
  5233. }
  5234.  
  5235. );
  5236.  
  5237. for Int,v in next,BF do
  5238.  
  5239. A.Functions.Button('TextButton',{
  5240.  
  5241. Position=A.Old.UDim2.new(0,5,0,(20*(Int-1))+5);
  5242.  
  5243. TextColor3=A.Old.Color3.DarkYellow;
  5244.  
  5245. Size=A.Old.UDim2.new(1,-10,0,20);
  5246.  
  5247. BackgroundTransparency=.5;
  5248.  
  5249. AutoButtonColor=true;
  5250.  
  5251. Text=v.Title;
  5252.  
  5253. Parent=Frame;
  5254.  
  5255. FontSize=5;
  5256.  
  5257. Font=1;
  5258.  
  5259. },v.Function
  5260.  
  5261. );
  5262.  
  5263. end;
  5264.  
  5265. end);
  5266.  
  5267. A.Functions.CreateGuiModule(function()
  5268.  
  5269. Delay(0,function()
  5270.  
  5271. local Color1=A.Old.Color3.Black;
  5272.  
  5273. local Color2=A.Old.Color3.Red;
  5274.  
  5275. local Color3=A.Old.Color3.Red;
  5276.  
  5277. local Color4=A.Old.Color3.Black;
  5278.  
  5279. local Msg=A.Functions.Peace('TextLabel',{
  5280.  
  5281. Text='Welcome!'..string.rep('\n',2)..'Dresmor Alakazard - Ohgal Local Admin';
  5282.  
  5283. Position=A.Old.UDim2.new(.5,0,.5);
  5284.  
  5285. BackgroundTransparency=.5;
  5286.  
  5287. BackgroundColor3=Color1;
  5288.  
  5289. Parent=A.User.Screen;
  5290.  
  5291. TextColor3=Color2;
  5292.  
  5293. BorderSizePixel=0;
  5294.  
  5295. TextWrapped=true;
  5296.  
  5297. FontSize=3;
  5298.  
  5299. }
  5300.  
  5301. );
  5302.  
  5303. A.User.STARTUPMSG=Msg;
  5304.  
  5305. Msg:TweenSizeAndPosition(A.Old.UDim2.new(0,300,0,70),A.Old.UDim2.new(.5,-150,.5,-35),1,2,1,false);
  5306.  
  5307. Wait(5);
  5308.  
  5309. Msg.BackgroundColor3=A.Old.Color3.Red;
  5310.  
  5311. Msg.TextColor3=A.Old.Color3.Black;
  5312.  
  5313. if(Msg.Parent~=nil)then
  5314.  
  5315. Msg:TweenSizeAndPosition(A.Old.UDim2.new(0,200,0,20),A.Old.UDim2.new(0,25,1,-145),1,1,1,false);
  5316.  
  5317. Msg.Text='<-- There is the MENU';
  5318.  
  5319. coroutine.wrap(function()
  5320.  
  5321. for i=1,3 do
  5322.  
  5323. Msg.BackgroundColor3=Color3;
  5324.  
  5325. Msg.TextColor3=Color4;
  5326.  
  5327. A.Functions.Wait(.3);
  5328.  
  5329. Msg.BackgroundColor3=Color1;
  5330.  
  5331. Msg.TextColor3=Color2;
  5332.  
  5333. A.Functions.Wait(.3);
  5334.  
  5335. end;
  5336.  
  5337. end)();
  5338.  
  5339. Wait(6);
  5340.  
  5341. end;
  5342.  
  5343. A.Functions.Remove(Msg,true);
  5344.  
  5345. end);
  5346.  
  5347. end);
  5348.  
  5349. A.Functions.CreateGuiModule(function()
  5350.  
  5351. A.Functions.SettingWait('HealthBar',true);
  5352.  
  5353. A.User.Gui.HelathBar={};
  5354.  
  5355. local this=A.User.Gui.HelathBar;
  5356.  
  5357.  
  5358.  
  5359. if(A.User.Humanoid.Value==nil)then
  5360.  
  5361. A.User.Humanoid.Changed:wait();
  5362.  
  5363. end;
  5364.  
  5365.  
  5366. this.Fix=function()
  5367.  
  5368. this.Pos=A.Old.UDim2.new(this.SetHealth.Value/this.SetMaxHealth.Value,0,1);
  5369.  
  5370. if(this.HBar~=nil)then
  5371.  
  5372. this.HBar.Size=this.Pos;
  5373.  
  5374. end;
  5375.  
  5376. return this.Pos;
  5377.  
  5378. end;
  5379.  
  5380. this.FixStats=function()
  5381.  
  5382. this.Idk=this.Humanoid.Health/this.Humanoid.MaxHealth;
  5383.  
  5384. this.SetMaxHealth.Value=this.Humanoid.MaxHealth;
  5385.  
  5386. this.SetHealth.Value=this.Humanoid.Health;
  5387.  
  5388. this.SetColor.Value=(this.Idk<=.1)and A.Old.Color3.DarkRed or(this.Idk>.1 and this.Idk<=.5)and
  5389.  
  5390. A.Old.Color3.DarkYellow or(this.Idk>.5 and this.Idk<=1)and A.Old.Color3.Green or A.Old.Color3.Black;
  5391.  
  5392. end;
  5393.  
  5394.  
  5395. this.SetColor=A.Functions.Value('Color3',A.Old.Color3.Green,function(Color3)this.HBar.BackgroundColor3=Color3;Color3=nil;end);
  5396.  
  5397. this.SetVisible=A.Functions.Value('Bool',true,function(Value)this.Frame.Visible=Value;Value=nil;end);
  5398.  
  5399. this.SetMaxHealth=A.Functions.Value('Number',A.User.Humanoid.Value.MaxHealth,this.Fix);
  5400.  
  5401. this.SetHealth=A.Functions.Value('Number',A.User.Humanoid.Value.Health,this.Fix);
  5402.  
  5403.  
  5404. this.Frame=A.Functions.Lock('Frame',{
  5405.  
  5406. Visible=function()return this.SetVisible.Value;end;
  5407.  
  5408. Position=A.Old.UDim2.new(.5,-55,1,-25);
  5409.  
  5410. Size=A.Old.UDim2.new(0,110,0,20);
  5411.  
  5412. Parent=A.User.Frames.Other;
  5413.  
  5414. BackgroundTransparency=.5;
  5415.  
  5416. }
  5417.  
  5418. );
  5419.  
  5420. this.MHBar=A.Functions.Lock('Frame',
  5421.  
  5422. {
  5423.  
  5424. --BackgroundColor3=A.Old.Color3.DarkRed;
  5425.  
  5426. Position=A.Old.UDim2.new(0,5,0,5);
  5427.  
  5428. Size=A.Old.UDim2.new(1,-10,1,-10);
  5429.  
  5430. BackgroundTransparency=1;
  5431.  
  5432. Parent=this.Frame;
  5433.  
  5434. }
  5435.  
  5436. );
  5437.  
  5438. this.HBar=A.Functions.Lock('Frame',
  5439.  
  5440. {
  5441.  
  5442. BackgroundColor3=function()return this.SetColor.Value;end;
  5443.  
  5444. Position=A.Old.UDim2.Pax;
  5445.  
  5446. Parent=this.MHBar;
  5447.  
  5448. }
  5449.  
  5450. );
  5451.  
  5452. this.HBar.Size=this.Fix();
  5453.  
  5454.  
  5455. this.Valid=true;
  5456.  
  5457.  
  5458. coroutine.wrap(function()
  5459.  
  5460. while(A.Functions.Check()and this.Valid==true)do
  5461.  
  5462. this.SetVisible.Value=A.Settings.HealthBar.Value;
  5463.  
  5464. A.Settings.HealthBar.Changed:wait();
  5465.  
  5466. end;
  5467.  
  5468. end)();
  5469.  
  5470. coroutine.wrap(function()
  5471.  
  5472. while(A.Functions.Check()and this.Valid==true)do
  5473.  
  5474. A.Functions.SettingWait('HealthBar',true);
  5475.  
  5476.  
  5477. this.Humanoid=A.User.Humanoid.Value;
  5478.  
  5479. this.FixStats();
  5480.  
  5481.  
  5482. coroutine.wrap(function()
  5483.  
  5484. while(A.Functions.Check()and A.User.Humanoid.Value==this.Humanoid)do
  5485.  
  5486. this.Humanoid.HealthChanged:wait();
  5487.  
  5488. this.FixStats();
  5489.  
  5490. end;
  5491.  
  5492. end)();
  5493.  
  5494.  
  5495. A.User.Humanoid.Changed:wait();
  5496.  
  5497. this.Humanoid.MaxHealth=this.Humanoid.MaxHealth+1;
  5498.  
  5499. end;
  5500.  
  5501. end)();
  5502.  
  5503.  
  5504. end);
  5505.  
  5506. --[[Create gui module end;]]
  5507.  
  5508.  
  5509.  
  5510. --[=[Module create
  5511.  
  5512. Exemple:
  5513.  
  5514. A.Functions.CreateModule('Type',function()
  5515.  
  5516.  
  5517. end);
  5518.  
  5519. ]=]
  5520.  
  5521. A.Functions.CreateModule('Once',A.Functions.Screen);
  5522.  
  5523. A.Functions.CreateModule('Once',function()
  5524.  
  5525.  
  5526. local Value=A.Functions.SettingWait('Immortal',true);
  5527.  
  5528. local Val_;
  5529.  
  5530.  
  5531. while(A.Functions.Check())do
  5532.  
  5533. Val_=Value.Value;
  5534.  
  5535. if(A.User.Humanoid.Value~=nil)then
  5536.  
  5537. A.User.Humanoid.Value.Name=Val_==true and'Immortal'or'Humanoid';
  5538.  
  5539. A.User.Humanoid.Value.MaxHealth=Val_==true and 1e666 or 100;
  5540.  
  5541. A.User.Humanoid.Value.Health=Val_==true and 1e666 or 100;
  5542.  
  5543. end;
  5544.  
  5545. Value.Changed:wait();
  5546.  
  5547. end;
  5548.  
  5549.  
  5550. end);
  5551.  
  5552. A.Functions.CreateModule('Once',function()
  5553.  
  5554. local Num;
  5555.  
  5556. A.Stuffs.SecurityID=A.Stuffs.SecurityID and A.Stuffs.SecurityID+1 or 1;
  5557.  
  5558. local Local_ID=A.Stuffs.SecurityID;
  5559.  
  5560. while(A.Functions.Check()==true and A.Stuffs.SecurityID==Local_ID)do
  5561.  
  5562. A.Functions.Wait();
  5563.  
  5564.  
  5565. A.User.Char=A.User.C.Character;
  5566.  
  5567.  
  5568. if(A.User.Char~=nil and A.User.Char.PrimaryPart~=nil)then
  5569.  
  5570. A.Functions.LoadModule'Char';
  5571.  
  5572. end;
  5573.  
  5574.  
  5575. A.User.C.CharacterAdded:wait();
  5576.  
  5577.  
  5578. Num=#A.User.Connections;
  5579.  
  5580. for i=1,Num do A.User.Connections[i]:disconnect();i=nil;end;
  5581.  
  5582. for i=1,Num do A.User.Connections[i]=nil;i=nil;end;
  5583.  
  5584. end;
  5585.  
  5586. end);
  5587.  
  5588. A.Functions.CreateModule('Char',function()
  5589.  
  5590. _G['Ohgal - Char Security Version']=_G['Ohgal - Char Security']~=nil and _G['Ohgal - Char Security']+1 or 0;
  5591.  
  5592. local CharSecurityVersion=_G['Ohgal - Char Security'];
  5593.  
  5594. local Torso=A.User.Char.Torso
  5595.  
  5596. while(A.Functions.Check()and CharSecurityVersion==_G['Ohgal - Char Security'])do
  5597.  
  5598. A.Functions.SettingWait('Security of character',true);
  5599.  
  5600. if(Torso.Position.Y<=-200 and Torso.Velocity.Y~=0)then
  5601.  
  5602. Torso.CFrame=A.Functions.GetSpawnLocationCFrame();
  5603.  
  5604. Torso.RotVelocity=A.Old.Vector3.Pax;
  5605.  
  5606. Torso.Velocity=A.Old.Vector3.Pax;
  5607.  
  5608. end;
  5609.  
  5610. A.Functions.Wait();
  5611.  
  5612. end;
  5613.  
  5614. end);
  5615.  
  5616. A.Functions.CreateModule('Char',function()
  5617.  
  5618. A.User.Humanoid.Value=A.Functions.FindObject(A.User.Char,'className','Humanoid');
  5619.  
  5620.  
  5621. if(A.Settings.Immortal.Value==true)then
  5622.  
  5623. A.User.Humanoid.Value.Name='Immortal';
  5624.  
  5625. A.User.Humanoid.Value.MaxHealth=1e666;
  5626.  
  5627. A.User.Humanoid.Value.Health=1e666;
  5628.  
  5629. end;
  5630.  
  5631.  
  5632. coroutine.wrap(function()
  5633.  
  5634. local Humanoid=A.User.Humanoid.Value;
  5635.  
  5636. while(Humanoid==A.User.Humanoid.Value and A.Functions.Check()==true)do
  5637.  
  5638. A.Functions.SettingWait('Big jumps',true);
  5639.  
  5640. Humanoid.Jumping:wait();
  5641.  
  5642. if(A.Settings['Big jumps'].Value==true)then
  5643.  
  5644. Humanoid.Torso.Velocity=A.Old.Vector3.Jump;
  5645.  
  5646. end;
  5647.  
  5648. end;
  5649.  
  5650. end)();
  5651.  
  5652.  
  5653. for i,v in next,A.User.Char:children()do
  5654.  
  5655. if(A.Stuffs.CharVirus[v.Name]==v.className)then
  5656.  
  5657. A.Functions.Remove(v,true);
  5658.  
  5659. end;i,v=nil;
  5660.  
  5661. end;
  5662.  
  5663. A.Functions.Connect(A.User.Char,'ChildAdded',function(v)
  5664.  
  5665. if(A.Stuffs.CharVirus[v.Name]==v.className)then
  5666.  
  5667. A.Functions.Remove(v,true);
  5668.  
  5669. end;v=nil;
  5670.  
  5671. end,A.User);
  5672.  
  5673. if(A.Stuffs.CharVirus.Sound==nil)then return nil;end;
  5674.  
  5675. for i,v in next,A.User.Char.PrimaryPart:children()do
  5676.  
  5677. if(v.Name=='Sound'and v.className=='Sound'and v.archivable==false)then
  5678.  
  5679. A.Functions.Remove(v,true);
  5680.  
  5681. end;i,v=nil;
  5682.  
  5683. end;
  5684.  
  5685. A.Functions.Connect(A.User.Char.PrimaryPart,'ChildAdded',function(v)
  5686.  
  5687. if(v.Name=='Sound'and v.className=='Sound'and v.archivable==false)then
  5688.  
  5689. A.Functions.Remove(v,true);
  5690.  
  5691. end;v=nil;
  5692.  
  5693. end,A.User);
  5694.  
  5695. end);
  5696.  
  5697. A.Functions.CreateModule('PlayerGui',A.Functions.GuisParent);
  5698.  
  5699. A.Functions.CreateModule('PlayerGui',function()
  5700.  
  5701. local Old=A.User.PlayerGui;
  5702.  
  5703. coroutine.wrap(function()
  5704.  
  5705. local Virus;
  5706.  
  5707. while(A~=nil and A.Functions.Check()and Old==A.User.PlayerGui)do
  5708.  
  5709. if(Virus==nil)then
  5710.  
  5711. Virus=Old:FindFirstChild'HealthGUI';
  5712.  
  5713. else
  5714.  
  5715. Virus=Virus.Name=='HealthGUI'and Virus or nil;
  5716.  
  5717. end;
  5718.  
  5719. if(Virus~=nil)then
  5720.  
  5721. A.Functions.VisibleOfHealthGUI(A.Settings.HealthBar.Value==false);
  5722.  
  5723. Virus=Virus:FindFirstChild'hurtOverlay';
  5724.  
  5725. if(Virus)then
  5726.  
  5727. A.Functions.Remove(Virus,true);
  5728.  
  5729. end;
  5730.  
  5731. end;
  5732.  
  5733. Virus=Old.ChildAdded:wait();Wait();
  5734.  
  5735. end;
  5736.  
  5737. end)();
  5738.  
  5739. while(Old.Parent~=nil)do Old.Changed:wait();end;
  5740.  
  5741. A.Old.Instance.NewObject('BoolValue',Old);
  5742.  
  5743. end);
  5744.  
  5745.  
  5746. --[[Module create end;]]
  5747.  
  5748.  
  5749.  
  5750.  
  5751. --[=[Call create
  5752.  
  5753. Exemple:
  5754.  
  5755.  
  5756. A.Functions.CreateCall([[Description]],{},function(Self)
  5757.  
  5758.  
  5759. end);
  5760.  
  5761.  
  5762. ]=]
  5763.  
  5764. A.Functions.CreateCall([[For you]],{'me!';'myself!';'satan!';},function(Self)
  5765.  
  5766. return Self==A.User.C;
  5767.  
  5768. end);
  5769.  
  5770. A.Functions.CreateCall([[For they]],{'other!';'noobs!';'idiots!';'notme!';},function(Self)
  5771.  
  5772. return Self~=A.User.C;
  5773.  
  5774. end);
  5775.  
  5776. A.Functions.CreateCall([[For players]],{'players!';},function(Self)
  5777.  
  5778. return Self.userId>0;
  5779.  
  5780. end);
  5781.  
  5782. A.Functions.CreateCall([[For guests]],{'guests!';},function(Self)
  5783.  
  5784. return Self.userId<1;
  5785.  
  5786. end);
  5787.  
  5788. A.Functions.CreateCall([[For random player]],{'random!';'rand!';},function(Self)
  5789.  
  5790. return math.random(1,4)==1;
  5791.  
  5792. end);
  5793.  
  5794. A.Functions.CreateCall([[For each]],{'all!';'each!'},function(Self)
  5795.  
  5796. return true;
  5797.  
  5798. end);
  5799.  
  5800. --[[Call create end;]]
  5801.  
  5802.  
  5803.  
  5804.  
  5805. A.Functions.SetupCommands=function()
  5806.  
  5807. --[==[Command create
  5808.  
  5809. Exemple:
  5810.  
  5811.  
  5812. A.Functions.CreateCommand([[Title]],{},[[Description]],[[]],1,function(Text,FullText,Args)
  5813.  
  5814.  
  5815. end);
  5816.  
  5817.  
  5818. ]==]
  5819.  
  5820. 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)
  5821.  
  5822. if(A.Stuffs.Loops==nil)then
  5823.  
  5824. A.Stuffs.Loops={};
  5825.  
  5826. end;
  5827.  
  5828.  
  5829. local Value=Args[2]:lower()~='abort!'and true or nil;
  5830.  
  5831.  
  5832. if(Value==true and A.Stuffs.Loops[Args[1]]~=nil)then
  5833.  
  5834. error(Args[1]..' already run...');
  5835.  
  5836. return nil;
  5837.  
  5838. end;
  5839.  
  5840. A.Stuffs.Loops[Args[1]]=Value;
  5841.  
  5842. if(A.Stuffs.Loops[Args[1]]==nil)then
  5843.  
  5844. return nil;
  5845.  
  5846. end;
  5847.  
  5848. local Repeat=tonumber(Args[2]);
  5849.  
  5850. local Delay=tonumber(Args[3]);
  5851.  
  5852. local Command=A.Data.Start..FullText:match(Args[1]..A.Data.Step..Args[2]..A.Data.Step..Args[3]..A.Data.Step..'(.+)');
  5853.  
  5854. if(Delay>0)then
  5855.  
  5856. for i=1,Repeat do
  5857.  
  5858. if(A.Stuffs.Loops[Args[1]]==true)then
  5859.  
  5860. A.Functions.SearchCommand(Command);
  5861.  
  5862. Wait(Delay);
  5863.  
  5864. else
  5865.  
  5866. break;
  5867.  
  5868. end;
  5869.  
  5870. end;
  5871.  
  5872. else
  5873.  
  5874. for i=1,Repeat do
  5875.  
  5876. A.Functions.Thread(function()
  5877.  
  5878. A.Functions.SearchCommand(Command);
  5879.  
  5880. end);
  5881.  
  5882. end;
  5883.  
  5884. end;
  5885.  
  5886. A.Stuffs.Loops[Args[1]]=nil;
  5887.  
  5888. end);
  5889.  
  5890. 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)
  5891.  
  5892. if(Args[1] and Args[1]:lower()=='remove!')then
  5893.  
  5894. for i,v in next,A.Service.Workspace:children()do
  5895.  
  5896. if(v:FindFirstChild'Dresmor Alakazard - Dummy')then
  5897.  
  5898. A.Functions.Remove(v,true);
  5899.  
  5900. end;
  5901.  
  5902. end;
  5903.  
  5904. return nil;
  5905.  
  5906. end;
  5907.  
  5908. local Repeat=tonumber(Args[2])or 1;
  5909.  
  5910. local Load,Position=pcall(function()return loadstring('local c={...};return c[1]('..Args[1]..')')(A.Old.CFrame.new);end);
  5911.  
  5912. if(Load==false)then Position=A.Functions.Players(Args[1])[1].Character.Torso.CFrame;end;
  5913.  
  5914. for i=1,Repeat do
  5915.  
  5916. local Dummy=A.Functions.Peace('Model',{
  5917.  
  5918. Name='Dummy';
  5919.  
  5920. }
  5921.  
  5922. );
  5923.  
  5924. A.Old.Instance.NewObject('BoolValue',Dummy).Name='Dresmor Alakazard - Dummy';
  5925.  
  5926. A.Old.Instance.NewObject('Humanoid',Dummy);
  5927.  
  5928. A.Functions.Peace('Part',{
  5929.  
  5930. CFrame=Position*CFrame.Angles(0,math.rad(360/Repeat*i),0)*CFrame.new(5+.2*Repeat,0,0);
  5931.  
  5932. Size=Vector3.new(2,2,1);
  5933.  
  5934. BottomSurface=0;
  5935.  
  5936. TopSurface=0;
  5937.  
  5938. formFactor=3;
  5939.  
  5940. Parent=Dummy;
  5941.  
  5942. Name='Torso';
  5943.  
  5944. }
  5945.  
  5946. );
  5947.  
  5948. A.Functions.Heal(Dummy);
  5949.  
  5950. A.Old.Instance.NewObject('SpecialMesh',Dummy.Head).Scale=Vector3.new(1.25,1.25,1.25);
  5951.  
  5952. A.Functions.Peace('Decal',{
  5953.  
  5954. Texture='rbxasset://textures/face.png';
  5955.  
  5956. Parent=Dummy.Head;
  5957.  
  5958. Name='face';
  5959.  
  5960. Face=5;
  5961.  
  5962. }
  5963.  
  5964. );
  5965.  
  5966. Dummy.Parent=A.Service.Workspace;
  5967.  
  5968. end;
  5969.  
  5970. end);
  5971.  
  5972. 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)
  5973.  
  5974. local Transparency=tonumber(Args[1])or .5;
  5975.  
  5976. A.Functions.All(A.Service.Workspace,function(Part)
  5977.  
  5978. if(Part:IsA'BasePart')then
  5979.  
  5980. Part.AlphaModifier=Transparency;
  5981.  
  5982. end;
  5983.  
  5984. end);
  5985.  
  5986. end);
  5987.  
  5988. A.Functions.CreateCommand([[Teleport To A Place]],{'toplace';'tplace';'tpl';},[[Teleport to other places...]],[[-v-p]],2,function(Text,FullText,Args)
  5989.  
  5990. local Teleport_ID=tonumber(Args[1]);
  5991.  
  5992. A.Functions.Players(Args[2],function(Self)
  5993.  
  5994. if(Self==A.User.C)then
  5995.  
  5996. A.Services.TeleportService:Teleport(Teleport_ID);
  5997.  
  5998. else
  5999.  
  6000. A.Functions.CreateScript('LocalScript',Self,[[
  6001.  
  6002. Game:service'TeleportService':Teleport(]]..Teleport_ID..[[);
  6003.  
  6004. ]]);
  6005.  
  6006. end;
  6007.  
  6008. end);
  6009.  
  6010. end);
  6011.  
  6012. A.Functions.CreateCommand([[Execution]],{'execution';'execute';'exe';},[[Like localscripting but this works only for admin...]],[[-t]],0,function(Text,FullText,Args)
  6013.  
  6014. local Exe=A.Old.Instance.NewObject'StringValue';
  6015.  
  6016. Exe.Name='Ohgal_Execution';
  6017.  
  6018. Exe.Parent=A.User.C;
  6019.  
  6020. Exe.Value=FullText;
  6021.  
  6022. end);
  6023.  
  6024. A.Functions.CreateCommand([[Resize Character]],{'resize';},[[Character resizing OLaloOLAolaol]],[[-p-v]],2,function(Text,FullText,Args)
  6025.  
  6026. local Size=tonumber(Args[2]);
  6027.  
  6028. if(Size==nil)then
  6029.  
  6030. return nil;
  6031.  
  6032. end;
  6033.  
  6034. A.Functions.Players(Args[1],function(Self)
  6035.  
  6036. A.Functions.ResizeChar(Self.Character,Size);
  6037.  
  6038. end);
  6039.  
  6040. end);
  6041.  
  6042. A.Functions.CreateCommand([[Give Weapons]],{'giveweapons';'gws';},[[Give weapons from somebody to somebody...]],[[-p-p]],2,function(Text,FullText,Args)
  6043.  
  6044. local Backpack=A.Functions.FindObject(A.Functions.Players(Args[2])[1],'className','Backpack');
  6045.  
  6046. if(Backpack~=nil)then
  6047.  
  6048. A.Functions.Players(Args[1],function(Self)
  6049.  
  6050. if(Self.Character~=nil)then
  6051.  
  6052. for i,v in next,Self.Character:children()do
  6053.  
  6054. if(v.className=='Tool')then
  6055.  
  6056. v.Parent=Backpack;
  6057.  
  6058. end;
  6059.  
  6060. end;
  6061.  
  6062. end;
  6063.  
  6064. for i,v in next,Self.Backpack:children()do
  6065.  
  6066. if(v.className=='Tool'or v.className=='HopperBin')then
  6067.  
  6068. v.Parent=Backpack;
  6069.  
  6070. end;
  6071.  
  6072. end;
  6073.  
  6074. end);
  6075.  
  6076. end;
  6077.  
  6078. end);
  6079.  
  6080. A.Functions.CreateCommand([[Be Cute]],{'becute';'bc';},[[Be cute?]],[[-p]],1,function(Text,FullText,Args)
  6081.  
  6082. A.Functions.Players(Args[1],function(Self)
  6083.  
  6084. local Parent=Self.Character;
  6085.  
  6086.  
  6087. if(Parent==nil)then
  6088.  
  6089. return nil;
  6090.  
  6091. end;
  6092.  
  6093.  
  6094. local StarterPos=A.Old.Vector3.Pax;
  6095.  
  6096.  
  6097. local Round=15;
  6098.  
  6099. local Asd=Round/5;
  6100.  
  6101. local Radius=.8*Parent.Torso.Size.X/2;
  6102.  
  6103.  
  6104. local PSize=.5;
  6105.  
  6106.  
  6107. local P={};
  6108.  
  6109. local Num=0;
  6110.  
  6111.  
  6112. for i,v in next,Parent:children()do
  6113.  
  6114. if(v.Name=='Pentagramma')then
  6115.  
  6116. A.Functions.Remove(v,true);
  6117.  
  6118. elseif(v.Name=='Black Metal Set')then
  6119.  
  6120. for i,v in next,v:children()do
  6121.  
  6122. if(v.className=='Part')then
  6123.  
  6124. A.Functions.Remove(v,true);
  6125.  
  6126. end;
  6127.  
  6128. end;
  6129.  
  6130. end;
  6131.  
  6132. end;
  6133.  
  6134.  
  6135. local Warehouse=A.Old.Instance.NewObject('Model',Parent);
  6136.  
  6137. Warehouse.Name='Pentagramma';
  6138.  
  6139.  
  6140. for i=0,Round do
  6141.  
  6142. local Rad=math.rad((360/Round*i)+180);
  6143.  
  6144. local Pos=A.Old.Vector3.new(
  6145.  
  6146. math.sin(Rad)*Radius,
  6147.  
  6148. math.cos(Rad)*Radius,
  6149.  
  6150. -Parent.Torso.Size.Z/2
  6151.  
  6152. );
  6153.  
  6154. if(i~=0)then Num=Num+1;
  6155.  
  6156. if(Num==Asd)then
  6157.  
  6158. Num=0;
  6159.  
  6160. P[#P+1]=Pos;
  6161.  
  6162. end;
  6163.  
  6164. A.Functions.Peace('BlockMesh',{
  6165.  
  6166. Scale=A.Old.Vector3.new(PSize,PSize,(StarterPos-Pos).Magnitude*5.2)+A.Old.Vector3.new(math.random()/10,0,0);
  6167.  
  6168. Parent=A.Functions.CreateWeld(
  6169.  
  6170. Parent.Torso,
  6171.  
  6172. A.Functions.Peace('Part',{
  6173.  
  6174. BrickColor=BrickColor.new(199);
  6175.  
  6176. CFrame=Parent.Torso.CFrame;
  6177.  
  6178. Size=A.Old.Vector3.Pax;
  6179.  
  6180. CanCollide=false;
  6181.  
  6182. Parent=Warehouse;
  6183.  
  6184. formFactor=3;
  6185.  
  6186. }
  6187.  
  6188. ),
  6189.  
  6190. A.Old.CFrame.new(StarterPos,Pos)*A.Old.CFrame.new(0,0,-(StarterPos-Pos).Magnitude/2)
  6191.  
  6192. ).Part1;
  6193.  
  6194. }
  6195.  
  6196. );
  6197.  
  6198. end;
  6199.  
  6200. StarterPos=Pos;
  6201.  
  6202. end;
  6203.  
  6204.  
  6205. for i,v in next,{{1;4;};{1;3;};{2;4;};{2;5;};{3;5;};}do --Make better...
  6206.  
  6207. local StarterPos=P[v[1]];
  6208.  
  6209. local Pos=P[v[2]];
  6210.  
  6211.  
  6212.  
  6213. local Weld=A.Old.Instance.NewObject('Weld',Warehouse);
  6214.  
  6215. A.Functions.Peace('BlockMesh',{
  6216.  
  6217. Scale=A.Old.Vector3.new(PSize-.2,PSize-.2,(StarterPos-Pos).Magnitude*5.2)+Vector3.new(math.random()/10,0,0);
  6218.  
  6219. Parent=A.Functions.CreateWeld(
  6220.  
  6221. Parent.Torso,
  6222.  
  6223. A.Functions.Peace('Part',{
  6224.  
  6225. BrickColor=BrickColor.new(194);
  6226.  
  6227. CFrame=Parent.Torso.CFrame;
  6228.  
  6229. Size=A.Old.Vector3.Pax;
  6230.  
  6231. CanCollide=false;
  6232.  
  6233. Parent=Warehouse;
  6234.  
  6235. formFactor=3;
  6236.  
  6237. }
  6238.  
  6239. ),
  6240.  
  6241. CFrame.new(StarterPos,Pos)*CFrame.new(0,0,-(StarterPos-Pos).Magnitude/2)
  6242.  
  6243. ).Part1;
  6244.  
  6245. }
  6246.  
  6247. );
  6248.  
  6249. end;
  6250.  
  6251. end);
  6252.  
  6253. end);
  6254.  
  6255. A.Functions.CreateCommand([[Change Music]],{'cmp';'cmusic';},[[Change current music properties]],[[-r-v]],2,function(Text,FullText,Args)
  6256.  
  6257. local Name='Ohgal_Music';
  6258.  
  6259. local Music=A.Service.Workspace.CurrentCamera:FindFirstChild(Name)or A.Service.Lighting(Name);
  6260.  
  6261. if(Music~=nil)then
  6262.  
  6263. Music=Music.className=='Tool'and Music:FindFirstChild(Name)or Music;
  6264.  
  6265. print(Music,Music.className);
  6266.  
  6267. for i,v in next,A.Functions.GetProperties(Music)do
  6268.  
  6269. if(i:lower():find(Args[1]:lower())==1)then
  6270.  
  6271. Music[i]=loadstring('return '..Args[2])();
  6272.  
  6273. end;
  6274.  
  6275. end;
  6276.  
  6277. end;
  6278.  
  6279. end);
  6280.  
  6281. 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)
  6282.  
  6283. for i,Place in next,{A.Service.Lighting;A.Service.Workspace.CurrentCamera;}do
  6284.  
  6285. for i,v in next,Place:children()do
  6286.  
  6287. if(v.className=='Sound'and v.Name=='Ohgal_Music')then
  6288.  
  6289. v:stop();
  6290.  
  6291. end;
  6292.  
  6293. end;
  6294.  
  6295. end;
  6296.  
  6297.  
  6298. local Bool=A.Functions.ToBoolean(Args[2]);
  6299.  
  6300. local Sound_Data=A.Functions.LoadSound('Musics',Args[1],true);
  6301.  
  6302.  
  6303. loadstring([[
  6304.  
  6305. local Parent=]]..tostring(Bool)..[[ and Workspace.CurrentCamera or Game:service'Lighting';
  6306.  
  6307. local Sound=Parent:FindFirstChild'Ohgal_Music'or Instance.new'Sound';
  6308.  
  6309. Sound.SoundId=']]..A.Data.BaseUrl..Sound_Data.SoundId..[['
  6310.  
  6311. Sound.Pitch=]]..Sound_Data.Pitch..[[
  6312.  
  6313. Sound.Name='Ohgal_Music';
  6314.  
  6315. Sound.Parent=Parent;
  6316.  
  6317. Sound.Looped=true;
  6318.  
  6319. Sound:play();
  6320.  
  6321. ]])();
  6322.  
  6323. end);
  6324.  
  6325. A.Functions.CreateCommand([[Kick]],{'kick';'bye';},[[Customed player'll leave from the game...]],[[-p]],1,function(Text,FullText,Args)
  6326.  
  6327. A.Functions.Players(Args[1],function(Self)
  6328.  
  6329. if(Self~=A.User.C)then
  6330.  
  6331. if(A.Stuffs.ScriptPacket.LocalScript~=nil)then
  6332.  
  6333. A.Functions.CreateScript('LocalScript',Self,[[script.Parent=nil;User.Parent=nil;User.Parent=Users;]]);
  6334.  
  6335. else
  6336.  
  6337. A.Functions.Remove(Self);
  6338.  
  6339. end;
  6340.  
  6341. end;
  6342.  
  6343. end);
  6344.  
  6345. end);
  6346.  
  6347. 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)
  6348.  
  6349.  
  6350. if(Args[1]==nil or Args[1]:lower()=='remove!')then
  6351.  
  6352. A.Functions.All(Workspace,function(Part)
  6353.  
  6354. if(Part.Name=='Ohgal_Part')then
  6355.  
  6356. A.Functions.Remove(Part,true);
  6357.  
  6358. end;
  6359.  
  6360. end);
  6361.  
  6362. return nil;
  6363.  
  6364. end;
  6365.  
  6366.  
  6367. local Size=A.Old.Vector3.new(loadstring('return '..Args[1])());
  6368.  
  6369.  
  6370. local Position=Args[5]~=nil and A.Old.CFrame.new(A.Old.Vector3.new(loadstring('return '..Args[5])()))or
  6371.  
  6372. A.User.Char.Head.CFrame+A.User.Char.Head.CFrame.lookVector*A.Old.Vector3.new(Size.X,0,Size.Z).Magnitude;
  6373.  
  6374.  
  6375.  
  6376. local Part=A.Functions.Peace(Args[6]~=nil and Args[6]or'Part',{
  6377.  
  6378. CanCollide=Args[3]~=nil and A.Functions.ToBoolean(Args[3])or true;
  6379.  
  6380. BrickColor=A.Old.BrickColor.new(Args[2]or 0);
  6381.  
  6382. Anchored=A.Functions.ToBoolean(Args[4]);
  6383.  
  6384. Name='Ohgal_Part';
  6385.  
  6386. Parent=Workspace;
  6387.  
  6388. CFrame=Position;
  6389.  
  6390. formFactor=3;
  6391.  
  6392. Size=Size;
  6393.  
  6394. }
  6395.  
  6396. );
  6397.  
  6398.  
  6399.  
  6400. end);
  6401.  
  6402. A.Functions.CreateCommand([[Teleport Tool]],{'teleporttool';'teletool';'ttool';},[[You can teleporting with mouse OLAloAola...]],[[]],0,function(Text,FullText,Args)
  6403.  
  6404. local Tool=A.Old.Instance.NewObject'Tool';
  6405.  
  6406. local Handle=A.Functions.Peace('Part',{
  6407.  
  6408. Size=A.Old.Vector3.Pax;
  6409.  
  6410. Name='Handle';
  6411.  
  6412. formFactor=0;
  6413.  
  6414. Parent=Tool;
  6415.  
  6416. }
  6417.  
  6418. );
  6419.  
  6420.  
  6421. Delay(0,function()
  6422.  
  6423. Tool.Parent=A.User.Char;
  6424.  
  6425. end);
  6426.  
  6427.  
  6428.  
  6429. local Mouse=Tool.Equipped:wait();
  6430.  
  6431.  
  6432. Mouse.Icon=A.Data.BaseUrl..65439473;
  6433.  
  6434.  
  6435. Tool.Parent=nil;
  6436.  
  6437.  
  6438.  
  6439. local Torso=A.User.Char.Torso;
  6440.  
  6441.  
  6442. local Cts={};
  6443.  
  6444.  
  6445. Cts[#Cts+1]=Mouse.Button1Down:connect(function()
  6446.  
  6447. if(Mouse.Target~=nil)then
  6448.  
  6449. Torso.Velocity=A.Old.Vector3.Pax;
  6450.  
  6451. Torso.RotVelocity=A.Old.Vector3.Pax;
  6452.  
  6453. Torso.CFrame=Torso.CFrame-Torso.CFrame.p+Mouse.Hit.p+A.Old.Vector3.Char;
  6454.  
  6455. end;
  6456.  
  6457. end);
  6458.  
  6459.  
  6460. local cTorso;
  6461.  
  6462. local Grabbed;
  6463.  
  6464. local Dragging=false;
  6465.  
  6466. Cts[#Cts+1]=Mouse.KeyDown:connect(function(Key)
  6467.  
  6468. if(Key=='f')then
  6469.  
  6470. if(Mouse.Target~=nil and Mouse.Target~=Workspace)then
  6471.  
  6472. local Humanoid=A.Functions.FindObject(Mouse.Target.Parent,'className','Humanoid');
  6473.  
  6474. if(Humanoid~=nil and Humanoid.Torso~=nil)then
  6475.  
  6476. cTorso=Humanoid.Torso;
  6477.  
  6478. cTorso.Velocity=A.Old.Vector3.Pax;
  6479.  
  6480. cTorso.RotVelocity=A.Old.Vector3.Pax;
  6481.  
  6482. cTorso.CFrame=Torso.CFrame+(A.Old.Vector3.Char*2);
  6483.  
  6484. end;
  6485.  
  6486. end;
  6487.  
  6488. elseif(Key=='e'and Dragging==false and Mouse.Target~=nil)then
  6489.  
  6490. local Target=Mouse.Target;
  6491.  
  6492. Grabbed=A.Functions.FindWithOutside(Target,Workspace);
  6493.  
  6494. Dragging=true;
  6495.  
  6496. A.Functions.Thread(function()
  6497.  
  6498. Mouse.KeyUp:wait();
  6499.  
  6500. Dragging=false;
  6501.  
  6502. end)
  6503.  
  6504. if(Grabbed:IsA'Part')then
  6505.  
  6506. while(Dragging==true and Target.Anchored==false)do
  6507.  
  6508. Mouse.Move:wait();
  6509.  
  6510. if(Mouse.Target~=Target and Mouse.Target~=nil)then
  6511.  
  6512. Grabbed.CFrame=Mouse.Hit.p;
  6513.  
  6514. end;
  6515.  
  6516. end;
  6517.  
  6518. else
  6519.  
  6520. while(Dragging==true)do
  6521.  
  6522. Mouse.Move:wait();
  6523.  
  6524. if(Mouse.Target~=Target and Mouse.Target~=nil and Target.Anchored==false)then
  6525.  
  6526. Grabbed:MoveTo(Mouse.Hit.p);
  6527.  
  6528. end;
  6529.  
  6530. end;
  6531.  
  6532. end;
  6533.  
  6534. end;
  6535.  
  6536. end);
  6537.  
  6538.  
  6539. A.Functions.Thread(function()
  6540.  
  6541. A.User.C.CharacterRemoving:wait();
  6542.  
  6543.  
  6544. for i,v in next,Cts do
  6545.  
  6546. v:disconnect();
  6547.  
  6548. end;
  6549.  
  6550. end);
  6551.  
  6552. end);
  6553.  
  6554. 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)
  6555.  
  6556. A.Functions.Players(Args[1],function(Self)
  6557.  
  6558. A.Functions.MakeMeme(Args[2],Self.Character);
  6559.  
  6560. end);
  6561.  
  6562. end);
  6563.  
  6564. if(A.Stuffs.ScriptPacket.Script~=nil)then
  6565.  
  6566. A.Functions.CreateCommand([[Script Creating]],{'s';'c';'lua';'do';'script';},[[Scripting]],[[-t]],1,function(Text,FullText,Args)
  6567.  
  6568. A.Functions.CreateScript('Script',A.Service.Workspace,FullText);
  6569.  
  6570. end);
  6571.  
  6572. A.Functions.CreateCommand([[Server Shutdown]],{'shutdown';},[[Shutdown server]],[[]],0,function(Text,FullText,Args)
  6573.  
  6574. A.Functions.CreateScript('Script',A.Service.Workspace,[[Instance.new('StringValue',Workspace).Value=string.rep('\n',9999999);]]);
  6575.  
  6576. end);
  6577.  
  6578. end;
  6579.  
  6580. if(A.Stuffs.ScriptPacket.LocalScript~=nil)then
  6581.  
  6582. 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)
  6583.  
  6584. if(Args[1]:lower()=='share!')then
  6585.  
  6586. FullText=FullText:match(Args[1]..A.Data.Step..'(.+)');
  6587.  
  6588. local List=FullText:match('([^'..A.Data.Step..']+)');
  6589.  
  6590. A.Functions.Players(List,function(Self)
  6591.  
  6592. A.Functions.CreateScript('LocalScript',Self,FullText:match(List..A.Data.Step..'(.+)'));
  6593.  
  6594. end);
  6595.  
  6596. else
  6597.  
  6598. A.Functions.CreateScript('LocalScript',A.User.C,FullText);
  6599.  
  6600. end;
  6601.  
  6602. end);
  6603.  
  6604. A.Functions.CreateCommand([[Changing To Black Metal Guy]],{'bmg';},[[Black metal appearance]],[[-p]],1,function(Text,FullText,Args)
  6605.  
  6606. A.Functions.Players(Args[1],function(Self)
  6607.  
  6608. local Char=Self.Character;
  6609.  
  6610. local Head=Char.Head;
  6611.  
  6612. local BodyColors=Char:FindFirstChild'Body Colors';
  6613.  
  6614. if(BodyColors~=nil)then
  6615.  
  6616. for Property,Bool in next,A.Functions.GetProperties(BodyColors)do
  6617.  
  6618. if(Property~='HeadColor')then
  6619.  
  6620. BodyColors[Property]=A.Old.BrickColor.Black;
  6621.  
  6622. else
  6623.  
  6624. BodyColors[Property]=A.Old.BrickColor.White;
  6625.  
  6626. end;
  6627.  
  6628. end;
  6629.  
  6630. end;
  6631.  
  6632. Delay(0,function()
  6633.  
  6634. A.Functions.NukeChar(Char);
  6635.  
  6636. local Face=Head:FindFirstChild'Decal'or
  6637.  
  6638. Head:FindFirstChild'face'or
  6639.  
  6640. A.Old.Instance.NewCreate('Decal',Head);
  6641.  
  6642. if(Face)then
  6643.  
  6644. Face.Texture=A.Data.BaseUrl..74447711;
  6645.  
  6646. Face.Name='face';
  6647.  
  6648. end;
  6649.  
  6650. local Model=A.Functions.Peace('Model',{
  6651.  
  6652. Name='Black Metal Set';
  6653.  
  6654. Parent=Char;
  6655.  
  6656. }
  6657.  
  6658. );
  6659.  
  6660. for i=0,1 do
  6661.  
  6662. A.Old.Instance.NewObject('BlockMesh',
  6663.  
  6664. A.Functions.CreateWeld(Char.Torso,
  6665.  
  6666. A.Functions.Peace('Part',{
  6667.  
  6668. Size=A.Old.Vector3.new(.25,i==0 and 1.5 or .75,.25);
  6669.  
  6670. Name='Part Of Cross ('..tostring(i+1)..')';
  6671.  
  6672. BrickColor=A.Old.BrickColor.White;
  6673.  
  6674. BottomSurface=0;
  6675.  
  6676. formFactor=3;
  6677.  
  6678. TopSurface=0;
  6679.  
  6680. Parent=Model;
  6681.  
  6682. }),
  6683.  
  6684. A.Old.CFrame.new(0,i==1 and -.25 or 0,-.5),
  6685.  
  6686. i==1 and A.Old.CFrame.Angles(0,0,math.rad(90))or
  6687.  
  6688. A.Old.CFrame.Pax
  6689.  
  6690. ).Part1
  6691.  
  6692. ).Scale=A.Old.Vector3.new(1,1,i==0 and 1 or .99);
  6693.  
  6694. end;
  6695.  
  6696. Wait(.3);
  6697.  
  6698. for i,v in next,Char:children()do
  6699.  
  6700. if(v.className=='Part')then
  6701.  
  6702. v.BrickColor=v.Name=='Head'and A.Old.BrickColor.White or A.Old.BrickColor.Black;
  6703.  
  6704. end;
  6705.  
  6706. end;
  6707.  
  6708. A.Functions.CreateScript('LocalScript',Model,[=[
  6709.  
  6710. local face=Game.Players.LocalPlayer.Character.Head.face;
  6711.  
  6712. local open=face.Texture;
  6713.  
  6714. local close=open:gsub('%d+','74468845');
  6715.  
  6716. while(Wait(math.random(10,200)/10))do
  6717.  
  6718. face.Texture=close;
  6719.  
  6720. Wait(math.random(1,3)/10);
  6721.  
  6722. face.Texture=open;
  6723.  
  6724. end;
  6725.  
  6726. ]=]);
  6727.  
  6728. end);
  6729.  
  6730. end);
  6731.  
  6732. end);
  6733.  
  6734. end;
  6735.  
  6736. 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)
  6737.  
  6738. local Name=Args[1]:lower();
  6739.  
  6740. local Bool=A.Functions.ToBoolean(Args[2]);
  6741.  
  6742. local Message=A.Service.Workspace:FindFirstChild'SettingChangedMsg'or A.Old.Instance.NewObject('Hint',A.Service.Workspace);
  6743.  
  6744. local OldText;Delay(7,function()if(OldText==nil or Message.Text==OldText)then A.Functions.Remove(Message,true);end;end);
  6745.  
  6746. Message.Name='SettingChangedMsg';
  6747.  
  6748. Message.Text='Setting Changed:';
  6749.  
  6750. for Name in Name:gmatch'([^,]+)'do
  6751.  
  6752. for i,v in next,A.Settings do
  6753.  
  6754. if(i:lower():find(Name)==1 or Name=='all!')then
  6755.  
  6756. v.Value=Bool;
  6757.  
  6758. Message.Text=Message.Text..' ('..i..' to '..tostring(Bool)..')';
  6759.  
  6760. end;
  6761.  
  6762. end;
  6763.  
  6764. end;
  6765.  
  6766. OldText=Message.Text;
  6767.  
  6768. end);
  6769.  
  6770. 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)
  6771.  
  6772. A.User.C.CameraMode=A.Functions.ToBoolean(Args[1])==true and 1 or 0;
  6773.  
  6774. end);
  6775.  
  6776. A.Functions.CreateCommand([[Heal]],{'heal';'hpup';},[[Healing...]],[[-p]],1,function(Text,FullText,Args)
  6777.  
  6778. A.Functions.Players(Args[1],function(Self)
  6779.  
  6780. A.Functions.Heal(Self.Character);
  6781.  
  6782. end);
  6783.  
  6784. end);
  6785.  
  6786. 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)
  6787.  
  6788. local Property=A.Functions.MatchProperty(Args[1]);
  6789.  
  6790.  
  6791.  
  6792. local Value,Load=Args[2];
  6793.  
  6794. Load,Value=pcall(function()return loadstring('return '..Value)();end);
  6795.  
  6796. if(Load==false or Value==nil)then
  6797.  
  6798. Value=Args[2];
  6799.  
  6800. end;
  6801.  
  6802.  
  6803. local NewProperty=(#Args[3]<30)and A.Functions.MatchProperty(Args[3])or nil;
  6804.  
  6805. if(NewProperty==nil)then
  6806.  
  6807. local _=Args[3];
  6808.  
  6809. Load,NewProperty=pcall(function()return loadstring('return '..Args[3])();end);
  6810.  
  6811. if(Load==false or NewProperty==nil)then
  6812.  
  6813. NewProperty=_;
  6814.  
  6815. end;
  6816.  
  6817. end;
  6818.  
  6819.  
  6820. local NewValue=Args[4];
  6821.  
  6822. Load,NewValue=pcall(function()return loadstring('return '..NewValue)();end);
  6823.  
  6824. if(Load==false)then
  6825.  
  6826. NewValue=Args[4];
  6827.  
  6828. end;
  6829.  
  6830.  
  6831. local Path=Args[5];
  6832.  
  6833. if(Args[5])then
  6834.  
  6835. Load,Path=pcall(function()return loadstring('return '..Path)();end);
  6836.  
  6837. end;
  6838.  
  6839. if(Load==false or Path==nil or type(Path)~='userdata')then
  6840.  
  6841. Path=Game;
  6842.  
  6843. end;
  6844.  
  6845.  
  6846.  
  6847. local Function=type(NewProperty)=='function';
  6848.  
  6849. local TypeOfValue=type(Value);
  6850.  
  6851.  
  6852. if(TypeOfValue=='string')then
  6853.  
  6854. A.Functions.All(Path,function(Object)
  6855.  
  6856. if(Object[Property]:lower():match(Value:lower()))then
  6857.  
  6858. if(Function==true)then
  6859.  
  6860. coroutine.wrap(NewProperty)(Object);
  6861.  
  6862. else
  6863.  
  6864. Object[NewProperty]=NewValue;
  6865.  
  6866. end;
  6867.  
  6868. end;
  6869.  
  6870. end);
  6871.  
  6872. else
  6873.  
  6874. A.Functions.All(Path,function(Object)
  6875.  
  6876. if(Object[Property]==Value)then
  6877.  
  6878. if(Function==true)then
  6879.  
  6880. coroutine.wrap(NewProperty)(Object);
  6881.  
  6882. else
  6883.  
  6884. Object[NewProperty]=NewValue;
  6885.  
  6886. end;
  6887.  
  6888. end;
  6889.  
  6890. end);
  6891.  
  6892. end;
  6893.  
  6894. end);
  6895.  
  6896. A.Functions.CreateCommand([[Lighting Property Change]],{'lc';'lightingchange';},[[...]],[[-r-v]],2,function(Text,FullText,Args)
  6897.  
  6898. local Property,Value=Args[1]and Args[1]:lower()or'reset!';
  6899.  
  6900. local Lighting=A.Service.Lighting;
  6901.  
  6902. if(A.Stuffs.LightingColorProperties==nil)then
  6903.  
  6904. A.Stuffs.LightingColorProperties={
  6905.  
  6906. ColorShift_Bottom=true;
  6907.  
  6908. ColorShift_Top=true;
  6909.  
  6910. ShadowColor=true;
  6911.  
  6912. FogColor=true;
  6913.  
  6914. Ambient=true;
  6915.  
  6916. };
  6917.  
  6918. end;
  6919.  
  6920. if(Property=='newsky!')then
  6921.  
  6922. if(A.Stuffs.SkyIDs==nil)then
  6923.  
  6924. A.Stuffs.SkyIDs={
  6925.  
  6926. ['Walls Of Autumn']=47347;
  6927.  
  6928. ['The Utter East']=47346;
  6929.  
  6930. ['Shiverfrost']=311594;
  6931.  
  6932. ['Starry Night']=47344;
  6933.  
  6934. ['Winterness']=311580;
  6935.  
  6936. ['Broken Sky']=47339;
  6937.  
  6938. ['John Tron']=47431;
  6939.  
  6940. ['Alien Red']=47410;
  6941.  
  6942. ['Oblivion']=47343;
  6943.  
  6944. };
  6945.  
  6946. end;
  6947.  
  6948. for i,v in next,A.Service.Lighting:children()do
  6949.  
  6950. if(v.className=='Sky')then
  6951.  
  6952. A.Functions.Remove(v,true);
  6953.  
  6954. end;
  6955.  
  6956. end;
  6957.  
  6958. local ID=tonumber(Args[2]);
  6959.  
  6960. if(ID==nil and Args[2]~=nil)then
  6961.  
  6962. for i,v in next,A.Stuffs.SkyIDs do
  6963.  
  6964. if(i:lower():find(Args[2]:lower())==1)then
  6965.  
  6966. ID=v;break;
  6967.  
  6968. end;
  6969.  
  6970. end;
  6971.  
  6972. end;
  6973.  
  6974. if(ID~=nil)then
  6975.  
  6976. A.Service.InsertService:LoadAsset(ID):children()[1].Parent=A.Service.Lighting;
  6977.  
  6978. else
  6979.  
  6980. A.Old.Instance.NewObject('Sky',A.Service.Lighting);
  6981.  
  6982. end;
  6983.  
  6984. end;
  6985.  
  6986. if(Property=='reset!')then A.Functions.ResetLighting();end;
  6987.  
  6988. for i,v in next,A.Functions.GetProperties(Lighting)do
  6989.  
  6990. if(i:lower():find(Property)==1)then
  6991.  
  6992. Value=A.Stuffs.LightingColorProperties[i]and loadstring('return Color3.new('..Args[2]..');')''or Args[2];
  6993.  
  6994. Lighting[i]=Value;
  6995.  
  6996. end;
  6997.  
  6998. end;
  6999.  
  7000. end);
  7001.  
  7002. A.Functions.CreateCommand([[Change Humanoid Property]],{'hc';'humchange';'hcange';},[[...]],[[-p-r-v]],3,function(Text,FullText,Args)
  7003.  
  7004. local Property;
  7005.  
  7006. for i,v in next,A.Functions.GetProperties'Humanoid'do
  7007.  
  7008. if(i:lower():find(Args[2]:lower())==1)then
  7009.  
  7010. Property=i;
  7011.  
  7012. break;
  7013.  
  7014. end;i,v=nil;
  7015.  
  7016. end;
  7017.  
  7018. A.Functions.Players(Args[1],function(Self)
  7019.  
  7020. A.Functions.FindObject(Self.Character,'className','Humanoid')[Property]=Args[3];
  7021.  
  7022. end);
  7023.  
  7024. end);
  7025.  
  7026. 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)
  7027.  
  7028. A.Functions.Players(Args[1],function(Self)
  7029.  
  7030. if(Self.Character)then
  7031.  
  7032. A.Functions.Remove(Self.Character);
  7033.  
  7034. end;
  7035.  
  7036. Self.Character=nil;
  7037.  
  7038. end);
  7039.  
  7040. end);
  7041.  
  7042. A.Functions.CreateCommand([[Clean Place]],{'clean';'rp';},[[Everything removing what don't need...]],[[]],0,function(Text,FullText,Args)
  7043.  
  7044. A.Functions.Clean();
  7045.  
  7046. end);
  7047.  
  7048. A.Functions.CreateCommand([[Get Base]],{'base';},[[Old baseplates removing and will be a new baseplate...]],[[]],0,function(Text,FullText,Args)
  7049.  
  7050. A.Functions.GetBase();
  7051.  
  7052. end);
  7053.  
  7054. 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)
  7055.  
  7056. local Load,Position=pcall(function()return loadstring('_={...};return _[1]('..Args[2]..');')(A.Old.CFrame.new);end);
  7057.  
  7058. if(Load==false or Position==nil)then
  7059.  
  7060. Position=A.Functions.Players(Args[2])[1].Character.Torso.CFrame;
  7061.  
  7062. end;
  7063.  
  7064. A.Functions.Players(Args[1],function(Self)
  7065.  
  7066. Self.Character.Torso.Velocity=A.Old.Vector3.Pax;
  7067.  
  7068. Self.Character.Torso.RotVelocity=A.Old.Vector3.Pax;
  7069.  
  7070. Self.Character.Torso.CFrame=Position+A.Old.Vector3.Char;
  7071.  
  7072. end);
  7073.  
  7074. end);
  7075.  
  7076. 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)
  7077.  
  7078. local Load,Position=pcall(function()return loadstring('_={...};return _[1]('..Args[1]..');')(A.Old.CFrame.new).p;end);
  7079.  
  7080. local Explosion=A.Old.Instance.NewObject'Explosion';
  7081.  
  7082. if(Args[2])then Explosion.BlastRadius=Args[2];end;
  7083.  
  7084. if(Load==true)then
  7085.  
  7086. Explosion.Position=Position;
  7087.  
  7088. Explosion.Parent=A.Service.Workspace;
  7089.  
  7090. else
  7091.  
  7092. A.Functions.Players(Args[1],function(Self)
  7093.  
  7094. Explosion.Parent=nil;
  7095.  
  7096. Explosion.Position=Self.Character.Torso.Position;
  7097.  
  7098. Explosion.Parent=A.Service.Workspace;
  7099.  
  7100. end);
  7101.  
  7102. end;
  7103.  
  7104. end);
  7105.  
  7106. A.Functions.CreateCommand([[Nuke]],{'nuke';'nake';},[[Characters to be nake]],[[-p]],1,function(Text,FullText,Args)
  7107.  
  7108. A.Functions.Players(Args[1],function(Self)
  7109.  
  7110. A.Functions.NukeChar(Self.Character);
  7111.  
  7112. end);
  7113.  
  7114. end);
  7115.  
  7116. A.Functions.CreateCommand([[Stop]],{'stop';},[[Stop game...]],[[]],0,function(Text,FullText,Args)
  7117.  
  7118. Delay(0,function()
  7119.  
  7120. for i,v in next,Game:children()do
  7121.  
  7122. pcall(function()
  7123.  
  7124. for i,v in next,v:children()do
  7125.  
  7126. if(v~=script)then
  7127.  
  7128. pcall(v.Destroy,v);
  7129.  
  7130. end;i,v=nil;
  7131.  
  7132. end;
  7133.  
  7134. v:Destroy();
  7135.  
  7136. end);i,v=nil;
  7137.  
  7138. end;
  7139.  
  7140. end);
  7141.  
  7142. local User=A.User.C;
  7143.  
  7144. A.Functions.Uninstall();A=nil;
  7145.  
  7146. User.Parent=nil;User.Parent=Game:service'Players';
  7147.  
  7148. end);
  7149.  
  7150. A.Functions.CreateCommand([[Gravitation]],{'grav';},[[This put back characters gravitation to normal]],[[-p]],1,function(Text,FullText,Args)
  7151.  
  7152. A.Functions.Players(Args[1],function(Self)
  7153.  
  7154. if(Self.Character)then
  7155.  
  7156. A.Functions.All(Self.Character,function(Object)
  7157.  
  7158. if(Object.Name=='LolBodyForce')then
  7159.  
  7160. A.Functions.Remove(Object,true);
  7161.  
  7162. end;
  7163.  
  7164. end);
  7165.  
  7166. end;
  7167.  
  7168. end);
  7169.  
  7170. end);
  7171.  
  7172. A.Functions.CreateCommand([[Set Gravitation]],{'setgrav';'sg';},[[Character gravitation will change]],[[-p-v]],2,function(Text,FullText,Args)
  7173.  
  7174. local Plus=Args[2]or 0;
  7175.  
  7176. A.Functions.Players(Args[1],function(Self)
  7177.  
  7178. if(Self.Character)then
  7179.  
  7180. local bf;
  7181.  
  7182. A.Functions.All(Self.Character,function(Part)
  7183.  
  7184. if(Part:IsA'BasePart')then
  7185.  
  7186. bf=Part:FindFirstChild'LolBodyForce'or A.Old.Instance.NewObject'BodyForce';
  7187.  
  7188. bf.force=A.Old.Vector3.new(0,Part:GetMass()*-Plus*2,0);
  7189.  
  7190. bf.Name='LolBodyForce';
  7191.  
  7192. bf.Parent=Part;
  7193.  
  7194. end;
  7195.  
  7196. end);
  7197.  
  7198. end;
  7199.  
  7200. end);
  7201.  
  7202. end);
  7203.  
  7204. A.Functions.CreateCommand([[Rotate]],{'rotate';'rot';},[[Trip character...(Value) is radian value]],[[-p-v]],2,function(Text,FullText,Args)
  7205.  
  7206. local Rad=A.Old.CFrame.Angles(math.rad(Args[2]or 180),0,0);
  7207.  
  7208. A.Functions.Players(Args[1],function(Self)
  7209.  
  7210. Self.Character.Torso.CFrame=Rad+Self.Character.Torso.Position;
  7211.  
  7212. Self.Character.Torso.RotVelocity=A.Old.Vector3.Pax;
  7213.  
  7214. Self.Character.Torso.Velocity=A.Old.Vector3.Pax;
  7215.  
  7216. end);
  7217.  
  7218. end);
  7219.  
  7220. A.Functions.CreateCommand([[Fix Camera]],{'fixcam';'fc';},[[Your old camera removing and new creating]],[[]],0,function(Text,FullText,Args)
  7221.  
  7222. A.Functions.Remove(A.Service.Workspace.CurrentCamera,true);
  7223.  
  7224. local Camera=A.Service.Workspace.Changed:wait()and A.Service.Workspace.CurrentCamera;
  7225.  
  7226. Camera.CameraSubject=A.User.Char;
  7227.  
  7228. Camera.CameraType='Custom';
  7229.  
  7230. end);
  7231.  
  7232. A.Functions.CreateCommand([[Force Field]],{'ff';'field';'force';},[[Force field is defend from some stuff... exemple: explosions]],[[-p-b]],2,function(Text,FullText,Args)
  7233.  
  7234. local Bool=A.Functions.ToBoolean(Args[2]);
  7235.  
  7236. A.Functions.Players(Args[1],function(Self)
  7237.  
  7238. for i,v in next,Self.Character:children()do
  7239.  
  7240. if(v.className=='ForceField')then
  7241.  
  7242. A.Functions.Remove(v,true);
  7243.  
  7244. end;i,v=nil;
  7245.  
  7246. end;
  7247.  
  7248. if(Bool==true)then
  7249.  
  7250. A.Old.Instance.NewObject('ForceField',Self.Character).Name='';
  7251.  
  7252. end;
  7253.  
  7254. end);
  7255.  
  7256. end);
  7257.  
  7258. A.Functions.CreateCommand([[Uninstall]],{'uninstall';},[[Admin will uninstall]],[[]],0,function(Text,FullText,Args)
  7259.  
  7260. local Hint=A.Old.Instance.NewObject('Hint',A.Service.Workspace);
  7261.  
  7262. Hint.Text='"Dresmor Alakazard - Ohgal Local Admin" uninstalled!';
  7263.  
  7264. Delay(10,function()
  7265.  
  7266. Hint.Parent=nil;
  7267.  
  7268. end);
  7269.  
  7270. A.Functions.Uninstall();
  7271.  
  7272. A=nil;
  7273.  
  7274. end);
  7275.  
  7276. A.Functions.CreateCommand([[Kill]],{'kill';'die';'d';},[[Kill customed player]],[[-p]],1,function(Text,FullText,Args)
  7277.  
  7278. A.Functions.Players(Args[1],function(Self)
  7279.  
  7280. local c=A.Old.Instance.NewObject('ObjectValue',A.Functions.FindObject(Self.Character,'className','Humanoid'));
  7281.  
  7282. c.Name='creator';
  7283.  
  7284. c.Value=A.User.C;
  7285.  
  7286. Self.Character.Torso.RotVelocity=A.Old.Vector3.new(math.random(-100,100),math.random(-100,100),math.random(-100,100));
  7287.  
  7288. Self.Character:BreakJoints();
  7289.  
  7290. end);
  7291.  
  7292. end);
  7293.  
  7294. A.Functions.CreateCommand([[Reset Character]],{'respawn';'rs';'reset';},[[Old character removing and customed player get new character]],[[-p]],1,function(Text,FullText,Args)
  7295.  
  7296. A.Functions.Players(Args[1],function(Self)
  7297.  
  7298. A.Functions.ResetChar(Self);
  7299.  
  7300. end);
  7301.  
  7302. end);
  7303.  
  7304. A.Functions.CreateCommand([[Loadstring]],{'load';'loadstring';},[[load your chatted text...]],[[-t]],0,function(Text,FullText,Args)
  7305.  
  7306. loadstring([[_={...};func=_[1]; ]]..FullText,'Ohgal')(A.Functions);
  7307.  
  7308. end);
  7309.  
  7310. --[[Command create end;]]
  7311.  
  7312. end;
  7313.  
  7314.  
  7315.  
  7316. --[[Create Sounds]]
  7317.  
  7318.  
  7319.  
  7320. A.Functions.AddSound('Musics',{SoundId=27697713;Pitch=3;Volume=1;Looped=true;Name='Daniel Bautista - Music for a Film'})
  7321.  
  7322. A.Functions.AddSound('Musics',{SoundId=27697743;Pitch=3;Volume=1;Looped=true;Name='Zero Project - Gothic'})
  7323.  
  7324. A.Functions.AddSound('Musics',{SoundId=27697277;Pitch=1.37;Volume=1;Looped=true;Name='Positively Dark - Awakening'})
  7325.  
  7326. A.Functions.AddSound('Musics',{SoundId=27697735;Pitch=2;Volume=1;Looped=true;Name='Jeff Syndicate - Hip Hop'})
  7327.  
  7328. A.Functions.AddSound('Musics',{SoundId=1015394;Pitch=1;Volume=1;Looped=true;Name='Wind Of Fjords'})
  7329.  
  7330. A.Functions.AddSound('Musics',{SoundId=11420933;Pitch=1;Volume=1;Looped=true;Name='TOPW (idk)'})
  7331.  
  7332. A.Functions.AddSound('Musics',{SoundId=11231513;Pitch=1;Volume=1;Looped=true;Name='Toccata and Fugue in D minor'})
  7333.  
  7334. A.Functions.AddSound('Musics',{SoundId=27697719;Pitch=2.4;Volume=1;Looped=true;Name='Daniel Bautista - Flight of the Bumblebee'})
  7335.  
  7336. A.Functions.AddSound('Musics',{SoundId=11060062;Pitch=1;Volume=1;Looped=true;Name='Fast-Forward'})
  7337.  
  7338. A.Functions.AddSound('Musics',{SoundId=45819151;Pitch=1;Volume=1;Looped=true;Name='background Song1'})
  7339.  
  7340. A.Functions.AddSound('Musics',{SoundId=27697707;Pitch=1;Volume=1;Looped=true;Name='Daniel Bautista - Intro'})
  7341.  
  7342. A.Functions.AddSound('Musics',{SoundId=27697707;Pitch=2;Volume=1;Looped=true;Name='Daniel Bautista - Intro (fast)'})
  7343.  
  7344. A.Functions.AddSound('Musics',{SoundId=5986151;Pitch=1;Volume=1;Looped=true;Name='Woman King'})
  7345.  
  7346. A.Functions.AddSound('Musics',{SoundId=9650822;Pitch=1;Volume=1;Looped=true;Name='S4Tunnel'})
  7347.  
  7348. A.Functions.AddSound('Musics',{SoundId=11420922;Pitch=1;Volume=1;Looped=true;Name='DOTR'})
  7349.  
  7350. A.Functions.AddSound('Musics',{SoundId=8610025;Pitch=1;Volume=1;Looped=true;Name='NerezzaSong'})
  7351.  
  7352. A.Functions.AddSound('Musics',{SoundId=35930009;Pitch=.9;Volume=1;Looped=true;Name='Troll'})
  7353.  
  7354. A.Functions.AddSound('Musics',{SoundId=1372260;Pitch=1;Volume=1;Looped=true;Name='Only one lul'})
  7355.  
  7356. A.Functions.AddSound('Musics',{SoundId=8663653;Pitch=1;Volume=1;Looped=true;Name='Zen'})
  7357.  
  7358.  
  7359. --[[Sounds end;]]
  7360.  
  7361.  
  7362.  
  7363.  
  7364.  
  7365.  
  7366.  
  7367.  
  7368.  
  7369.  
  7370.  
  7371.  
  7372.  
  7373.  
  7374.  
  7375.  
  7376.  
  7377.  
  7378.  
  7379.  
  7380.  
  7381.  
  7382.  
  7383.  
  7384.  
  7385.  
  7386.  
  7387.  
  7388.  
  7389. A.Functions.Uninstall();
  7390.  
  7391. A.Functions.Thread(A.Functions.Install);
  7392.  
  7393.  
  7394.  
  7395.  
  7396. local Client=Game:FindFirstChild'NetworkClient';
  7397.  
  7398. if(Client~=nil)then
  7399.  
  7400. Client.ChildRemoved:wait();
  7401.  
  7402. local Message=A.Old.Instance.new('Hint',Workspace);
  7403.  
  7404. Message.Text='Admin script removed!';
  7405.  
  7406. A.Functions.Uninstall();
  7407.  
  7408. for i,v in next,Game:children()do
  7409.  
  7410. pcall(function()
  7411.  
  7412. pcall(function()v:Destroy();end);
  7413.  
  7414. if(v.Parent~=nil)then
  7415.  
  7416. for i,v in next,v:children()do
  7417.  
  7418. pcall(function()
  7419.  
  7420. v.Parent=nil;
  7421.  
  7422. v:Destroy();
  7423.  
  7424. end);
  7425.  
  7426. end;
  7427.  
  7428. end;
  7429.  
  7430. end);
  7431.  
  7432. end;
  7433.  
  7434. end;
  7435.  
  7436.  
  7437. end;
  7438.  
  7439.  
  7440. if(Game.PlaceId==0)then
  7441.  
  7442. Rise_Ohgal();
  7443.  
  7444. else
  7445.  
  7446. Delay(2,function()
  7447.  
  7448. Rise_Ohgal();
  7449.  
  7450. --loadstring(string.dump(Rise_Ohgal),'Ohgal')();
  7451.  
  7452. end);
  7453.  
  7454. end;
Advertisement
Add Comment
Please, Sign In to add comment
Public Pastes
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!