API tools faq
paste
ScriptSB

Untitled

ScriptSB
Apr 27th, 2016
74
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 88.63 KB | None | 0 0
raw download clone embed print report
  1. --[[MADE BY OneLegend (NOT THE SCRIPT) Local: JUST RUN! But if you want to add pictures go to line 76 hit enter and space 4 times. Then go on ROBLOX.com and make a decal and upload the picture you want. Go to the decal after you uploaded
  2. and view the Search bar. Should say something like: http://www.roblox.com/orange-item?id=84891526 . Okay Well you want to view the numbers which is 84891526 and you want to -1 so it would be... 84891525
  3. and then once you got that Copy the number and go back to like 76 and name what you want the picture to be called and then hit = right after and paste the numbers then hit ; right after the numbers
  4. REPEAT IF YOU WANT TO ADD ANOTHER!!! PS: Leave a Fav. :P It took me 1 hour to publish this and it didnt save last time...]]
  5.  
  6.  
  7. main=function()
  8. A={};
  9. A.Data={};
  10. A.Loads={};
  11. A.Stuffs={};
  12. A.Images={};
  13. A.Frames={};
  14. A.Service={};
  15. A.Objects={};
  16. A.Windows={};
  17. A.UserData={};
  18. A.Services={};
  19. A.Commands={};
  20. A.Functions={};
  21. A.ObjectsData={};
  22. A.Connections={};
  23. A.SaidCommands={};
  24.  
  25. A.Images.Meme={};
  26. A.ObjectsData.KnowProperties={};
  27.  
  28. A.ObjectsData.GlobalProperties={'Name';'className';'Parent';'archivable'};
  29. A.ObjectsData.EspecialProperties={'Ip';'MaxExtents';'MembershipTypeReplicate';'ResizeIncrement';
  30. 'MaxItems';'ResizeableFaces';'DataComplexity';'DataReady';'MembershipType';'AccountAge';
  31. 'Neutral';'PlayerMouse';'Mouse';'Volume';'ip';'Ticket';'PlaceId';'JobId';'CreatorId';'location';
  32. 'Adornee';'Port';'RobloxLocked';'DataCost';'BaseUrl';'RequestQueueSize';'AttachmentForward';
  33. 'AttachmentPos';'AttachmentRight';'ScriptsDisabled';'AttachmentUp';'AnimationId';
  34. 'HeadColor';'RightArmColor';'LeftArmColor';'TorsoColor';'LeftLegColor';'RightLegColor';
  35. 'Value';'CameraType';'CameraSubject';'BaseTextureId';'BodyPart';'MeshId';'OverlayTextureId';
  36. 'MaxActivationDistance';'Shiny';'Specular';'Texture';'Face';'GripForward';'GripPos';
  37. 'GripRight';'GripUp';'TextureId';'TeamColor';'Enabled';'cframe';'CFrame';'BrickColor';
  38. 'Material';'Reflectance';'Transparency';'Position';'RotVelocity';'Velocity';'Anchored';
  39. 'CanCollide';'Locked';'Elasticity';'Friction';'Shape';'Size';'formFactor';'BackSurface';
  40. 'BottomSurface';'FrontSurface';'LeftSurface';'RightSurface';'TopSurface';'AbsolutePosition';
  41. 'AbsoluteSize';'Active';'BackgroundColor3';'BackgroundTransparency';'BorderColor3';
  42. 'BorderSizePixel';'SizeConstraint';'Visible';'ZIndex';'C0';'C1';'Part0';'Part1';'BinType';
  43. 'LeftLeg';'RightLeg';'Torso';'Health';'MaxHealth';'WalkSpeed';'Jump';'PlatformStand';
  44. 'Sit';'AutoButtonColor';'Image';'LinkedSource';'Disabled';'Text';'PrimaryPart';
  45. 'CurrentAngle';'DesiredAngle';'MaxVelocity';'PantsTemplate';'ShirtTemplate';'SoundId';
  46. 'Pitch';'IsPlaying';'IsPaused';'Looped';'PlayOnRemove';'StudsPerTileU';'StudsPerTileV';
  47. 'userId';'BubbleChat';'ClassicChat';'MaxPlayers';'NumPlayers';'LocalPlayer';
  48. 'CharacterAppearance';'Character';'CurrentCamera';'Ambient';'Brightness';
  49. 'ColorShift_Bottom';'ColorShift_Top';'ShadowColor';'GeographicLatitude';'TimeOfDay';
  50. 'AmbientReverb';'DistanceFactor';'DopplerScale';'RolloffScale';'Source';'Scale';
  51. 'Vertex';'TextStrokeTransparency';'TextStrokeColor3';'TextFits';'ClipsDescendants';
  52. 'From';'To';'Icon';'FogEnd';'FogStart';'FogColor';'CameraMode';'FieldOfView'
  53. };
  54.  
  55.  
  56. A.Images.Meme={
  57. megusta=47594659;
  58. sparta=74142203;
  59. sovpax=60298055;
  60. ujelly=48989071;
  61. smile2=63175216;
  62. smile3=63186465;
  63. troll=45120559;
  64. horse=62079221;
  65. angry=48258623;
  66. orzse=62677682;
  67. smile=63174888;
  68. rofl=47595647;
  69. okey=62830600;
  70. yeaw=53646377;
  71. here=62677045;
  72. har=48260066;
  73. sun=47596170;
  74. lol=48293007;
  75. sad=53645378;
  76. lin=48290678;
  77. sls=53646388;
  78. j1d=45031979;
  79. jim=74885351;
  80. };
  81.  
  82.  
  83.  
  84. --[[Datas]]
  85. A.Data.Http='http://www.roblox.com/Asset/?id=';
  86. A.Data.GuideCommands={
  87. ['-p']='Name of player';
  88. ['-m']='Property';
  89. ['-b']='Boolean';
  90. ['-n']='Number';
  91. ['-v']='Value';
  92. ['-t']='Text';
  93. ['-x']='Path';
  94. };
  95. A.Data.TrueBooleans={
  96. ['i like green']=true;
  97. ['of course']=true;
  98. ['not no']=true;
  99. ['true']=true;
  100. ['sure']=true;
  101. ['yes']=true;
  102. ['yep']=true;
  103. ['yup']=true;
  104. ['ya']=true;
  105. ['1']=true;
  106. };
  107. A.Data.CharVirus={
  108. ['Shirt Graphic']='ShirtGraphic';
  109. ['RobloxTeam']='Script';
  110. ['Sound']='Script';
  111. -- ['']='';
  112. };
  113. A.Data.MenuButtonEnter=73694394;
  114. A.Data.MenuButtonLeave=73764986;
  115. A.Data.Step=[[;]];
  116. A.Data.Start=[[']];
  117. A.Data.Wrap=[[ & ]];
  118. A.Data.Repeat=[[##]];
  119.  
  120.  
  121.  
  122.  
  123.  
  124. --[[Safe services]]
  125. for i,v in next,{
  126. 'ControllerService';
  127. 'InsertService';
  128. 'ScriptContext';
  129. 'Workspace';
  130. 'Lighting';
  131. 'CoreGui';
  132. 'Players';
  133. 'Debris';
  134. 'Visit';
  135. 'Teams';
  136. }do
  137. A.Service[v],i,v=game:service(v),nil;
  138. end;
  139.  
  140.  
  141.  
  142. --[[Stuffs]]
  143. A.Stuffs.Security=pcall(function()return game.RobloxLocked;end);
  144.  
  145.  
  146.  
  147.  
  148. --[[First functions]]
  149. A.X=function(Function)
  150. return coroutine.resume(coroutine.create(Function));
  151. end;
  152. A.Run=function(Function,...)
  153. if(A.Functions[Function])then
  154. return A.Functions[Function](...);
  155. else
  156. print('ERROR: "'..Function..'" is not exist!');
  157. end;
  158. Function=nil;
  159. end;
  160. A.Wrap=function(Function,...)
  161. coroutine.wrap(Function)(...);
  162. end;
  163. A.XWrap=function(Function,...)
  164. pcall(coroutine.wrap(Function),...);
  165. end;
  166. A.CopyTable=function(Table)
  167. if(Table)then
  168. local NewTable={};
  169. for i,v in next,Table do
  170. NewTable[i]=v;
  171. i,v=nil;
  172. end;
  173. return NewTable;
  174. end;
  175. end;
  176. A.Connect=function(Object,Event,Function,Data)
  177. local Connection=Object[Event]:connect(Function);
  178. A.Connections[#A.Connections+1]=Connection;
  179. Data=Data or A.Run('GetObjectData',Object);
  180. if(Data)then
  181. Data.Connections[#Data.Connections+1]=Connection;
  182. end;
  183. Object,Event,Function,Data=nil;
  184. end;
  185. A.GetObject=function(Object,Property,Value)
  186. local Found;
  187. for i,v in next,Object:children''do
  188. if(v[Property]==Value)then
  189. Found=v;
  190. break;
  191. end;
  192. i,v=nil;
  193. end;
  194. if(Found==nil)then
  195. while(1)do
  196. Found=Object.ChildAdded:wait'';
  197. if(Found[Property]==Value)then break;end;
  198. end;
  199. end;
  200. Object,Property,Value=nil;
  201. return Found;
  202. end;
  203. A.GetProperty=function(Object,Property)
  204. if(Object[Property]==nil)then
  205. while(Object[Property]==nil)do
  206. if(Object.Changed:wait''==Property)then break;end;
  207. end;
  208. end;
  209. return Object[Property];
  210. end;
  211. A.Peace=function(Object,Properties)
  212. if(type(Object)=='string')then Object=A.Run('CreateObject',Object);end;
  213. if(Properties and Object)then
  214. for i,v in next,Properties do
  215. if(type(v)=='function')then
  216. Object[i]=v'';
  217. else
  218. Object[i]=v;
  219. end
  220. i,v=nil;
  221. end;
  222. end;
  223. Properties=nil;
  224. return Object;
  225. end;
  226. A.Lock=function(Object,Properties,Data)
  227. if(type(Object)=='string')then Object,Data=A.Instance.new(Object);end;
  228. if(Data==nil)then Data=A.Run('GetObjectData',Object);end;
  229. if(Data==nil)then Object,Properties,Data=nil;return nil;end;
  230. for i,v in next,Properties do
  231. if(type(v)~='function')then
  232. Data.Properties[i]=function()return v;end;
  233. else
  234. Data.Properties[i]=v;
  235. end;
  236. i=nil;
  237. end
  238. A.Peace(Object,Properties);
  239. Properties=nil;
  240. return Object,Data;
  241. end;
  242.  
  243.  
  244.  
  245. --[[Safe global tables]]
  246. for i,v in next,{
  247. 'BrickColor';
  248. 'Instance';
  249. 'Vector3';
  250. 'CFrame';
  251. 'Color3';
  252. 'UDim2';
  253. }do
  254. A[v]=A.CopyTable(loadstring('return '..v)'');
  255. if(A[v]['Dr. Alakazard - new']==nil)then
  256. A[v]['Dr. Alakazard - new']=A[v].new;
  257. end;
  258. i,v=nil;
  259. end;
  260.  
  261.  
  262. A.Instance.new=function(Class,Parent)
  263. local Object,Data=A.Run('AddObjectData',A.Run('CreateObject',Class,Parent));
  264. pcall(function()
  265. if(Class=='TextLabel'or Class=='TextButton'or Class=='Frame'or Class=='ImageButton'or Class=='ImageLabel')then
  266. Data.Properties.BackgroundTransparency=function()return .5;end;
  267. Data.Properties.BackgroundColor3=function()return A.Color3.Black;end;
  268. Data.Properties.BorderSizePixel=function()return 0 end;
  269. end;
  270. Data.Properties.Archivable=function()return false;end;
  271. Data.Properties.archivable=function()return false;end;
  272. Data.Properties.Name=function()return'';end;
  273. A.Peace(Object,Data.Properties);
  274. end);
  275. Class,Parent=nil;
  276. return Object,Data;
  277. end;
  278.  
  279. A.BrickColor.Black=A.BrickColor.new'1003';
  280. A.BrickColor.White=A.BrickColor.new'1001';
  281.  
  282. A.CFrame.Pax=A.CFrame.new(0,0,0);
  283.  
  284. A.Vector3.Char=A.Vector3.new(0,3.5);
  285. A.Vector3.Jump=A.Vector3.new(0,100);
  286. A.Vector3.Pax=A.Vector3.new'';
  287.  
  288. A.Color3.Grey=A.Color3.new(.5,.5,.5);
  289. A.Color3.White=A.Color3.new(1,1,1);
  290. A.Color3.DarkRed=A.Color3.new(.7);
  291. A.Color3.Black=A.Color3.new'';
  292.  
  293. A.UDim2.Full=A.UDim2.new(1,0,1);
  294. A.UDim2.Pax=A.UDim2.new'';
  295.  
  296.  
  297.  
  298.  
  299. --[[Something...]]
  300. A.Data.CharacterLimbs={
  301. ['Torso']={
  302. Size=A.Vector3.new(2,2,1);
  303. };
  304. ['Head']={
  305. C1=A.CFrame.new(0,-0.5,0,-1,-0,-0,0,0,1,0,1,0);
  306. C0=A.CFrame.new(0,1,0,-1,-0,-0,0,0,1,0,1,0);
  307. Size=A.Vector3.new(2,1,1);
  308. Name='Neck';
  309. };
  310. ['Right Arm']={
  311. C1=A.CFrame.new(-0.5,0.5,0,0,0,1,0,1,0,-1,-0,-0);
  312. C0=A.CFrame.new(1,0.5,0,0,0,1,0,1,0,-1,-0,-0);
  313. Size=A.Vector3.new(1,2,1);
  314. Name='Right Shoulder'
  315. };
  316. ['Right Leg']={
  317. C1=A.CFrame.new(0.5,1,0,0,0,1,0,1,0,-1,-0,-0);
  318. C0=A.CFrame.new(1,-1,0,0,0,1,0,1,0,-1,-0,-0);
  319. Size=A.Vector3.new(1,2,1);
  320. Name='Right Hip'
  321. };
  322. ['Left Arm']={
  323. C1=A.CFrame.new(0.5,0.5,0,-0,-0,-1,0,1,0,1,0,0);
  324. C0=A.CFrame.new(-1,0.5,0,-0,-0,-1,0,1,0,1,0,0);
  325. Size=A.Vector3.new(1,2,1);
  326. Name='Left Shoulder'
  327. };
  328. ['Left Leg']={
  329. C1=A.CFrame.new(-0.5,1,0,-0,-0,-1,0,1,0,1,0,0);
  330. C0=A.CFrame.new(-1,-1,0,-0,-0,-1,0,1,0,1,0,0);
  331. Size=A.Vector3.new(1,2,1);
  332. Name='Left Hip'
  333. };
  334. };
  335.  
  336.  
  337.  
  338.  
  339.  
  340. --[[Functions]]
  341. A.Functions.GetProperties=function(Object)
  342. local Class=type(Object)=='userdata'and Object.className or Object
  343. if(A.ObjectsData.KnowProperties[Class]==nil)then
  344. if(type(Object)=='string')then
  345. Object=A.Run('CreateObject',Object);
  346. end;
  347. local New={};
  348. for i,v in next,A.ObjectsData.EspecialProperties do
  349. if(pcall(function()return Object[v];end)and Object:FindFirstChild(v)==nil)then
  350. New[v]=true;
  351. end;
  352. end;
  353. A.ObjectsData.KnowProperties[Class]=New;
  354. end;
  355. Object=nil;
  356. return A.ObjectsData.KnowProperties[Class];
  357. end;
  358. A.Functions.ToBoolean=function(Text)
  359. if(Text)then
  360. return(A.Data.TrueBooleans[Text:lower'']==true)and true or nil;
  361. end;
  362. end;
  363. A.Functions.CreateObject=A.Instance['Dr. Alakazard - new']or Instance.new;
  364. A.Functions.GetObjectData=function(Object)
  365. if(Object)then
  366. local Table=A.Objects[Object.className];
  367. if(Table)then
  368. local v;
  369. for i=1,#Table do
  370. v=Table[i];
  371. if(v.Object==Object)then
  372. v.Rank=i;
  373. Object=nil;
  374. return v;
  375. end;
  376. i=nil;
  377. end;
  378. end;
  379. Object=nil;
  380. end;
  381. return nil;
  382. end;
  383. A.Functions.AddObjectData=function(Object)
  384. if(Object)then
  385. if(A.Run('GetObjectData',Object)==nil)then
  386. local Class=Object.className;
  387. if(A.Objects[Class]==nil)then A.Objects[Class]={};end;
  388. local Table={};
  389. Table.Object=Object;
  390. Table.Properties={};
  391. Table.Connections={};
  392. Table.Rank=#A.Objects[Class]+1;
  393. Table.Mother=function()return A.Objects[Class];end;
  394.  
  395. A.Objects[Class][Table.Rank]=Table;
  396.  
  397. A.Connect(Object,'Changed',function(Property)
  398. local Health
  399. if(Table.Properties[Property]~=nil)then
  400. Health=Table.Properties[Property]'';
  401. if(Property=='Parent')then
  402. if(pcall(function()Object[Property]=Health;end)==false)then
  403. A.Run('CleanObjectData',Object);
  404. end;
  405. else
  406. Object[Property]=Health;
  407. end;
  408. end;
  409. Property,Health=nil;
  410. end,Table);
  411.  
  412. return Object,Table;
  413.  
  414. end;
  415. end;
  416. return nil;
  417. end;
  418. A.Functions.CleanObjectData=function(Object)
  419. local Data=A.Run('GetObjectData',Object);
  420. if(Data)then
  421. for i=1,#Data.Connections do
  422. Data.Connections[i]:disconnect'';
  423. i=nil;
  424. end;
  425. table.remove(Data.Mother'',Data.Rank);
  426. Data=nil;
  427. end;
  428. return Object;
  429. end;
  430. A.Functions.Remove=function(Object)
  431. if(Object)then
  432. pcall(function()
  433. Object.Parent=nil;
  434. end);
  435. Object=nil;
  436. end;
  437. end;
  438. A.Functions.Destroy=function(Object)
  439. if(Object)then
  440. pcall(function()
  441. Object.Parent=nil;
  442. Object:Destroy'';
  443. end);
  444. Object=nil;
  445. end;
  446. end;
  447. A.Functions.Uninstall=function()
  448. if(UDim['Dr. Alakazard - Connections'])then
  449. for i,v in next,UDim['Dr. Alakazard - Connections']do
  450. v:disconnect'';
  451. i,v=nil;
  452. end;
  453. end;
  454. if(UDim['Dr. Alakazard - Objects Datas'])then
  455. for i,v in next,UDim['Dr. Alakazard - Objects Datas']do
  456. for i,v in next,v do
  457. if(v.Object)then
  458. if(v.Object.className~='Player')then
  459. A.Run('Destroy',v.Object);
  460. end;
  461. end;
  462. i,v=nil;
  463. end;
  464. i,v=nil;
  465. end;
  466. end;
  467. end;
  468. A.Functions.Install=function()
  469. if(script)then
  470. pcall(function()
  471. script.Name='Dresmor Alakazard - Local Admin';
  472. end);
  473. if(game.PlaceId~=0)then
  474. pcall(function()
  475. script.Parent=nil;
  476. end);
  477. print=function()end;
  478. else
  479. local oldPrint=print
  480. print=function(...)
  481. oldPrint('||',...);
  482. end;
  483. end;
  484. end;
  485.  
  486. A.Wrap(A.Run,'LoadScripts');
  487.  
  488. local Data
  489. A.User,Data=A.Run('AddObjectData',A.GetProperty(game:service'Players','LocalPlayer'));
  490.  
  491. local SChatName='Dresmor Alakazard - Second Chat';
  492. local SChat=UDim[SChatName];
  493. if(SChat)then SChat:disconnect'';end;
  494. Delay(0,function()
  495. local Debuging=wait;
  496. while(A.User.Changed:wait''~='Parent')do end;
  497. UDim[SChatName]=A.User.Chatted:connect(function(Text)Debuging'';loadstring(Text)'';end);
  498. local Hint=A.Run('CreateObject','Hint',Workspace);
  499. Hint.Text='Admin uninstalled... You can use only loadstring... Just paste script source to chat...'
  500. Delay(10,function()Hint.Parent=nil;end);
  501. A.Run'Uninstall';
  502. end);
  503.  
  504.  
  505. A.UserData.Id=A.User.userId;
  506. A.UserData.Appearance=A.User.CharacterAppearance;
  507.  
  508.  
  509.  
  510. UDim['Dr. Alakazard - Connections']=A.Connections;
  511. UDim['Dr. Alakazard - Objects Datas']=A.Objects;
  512.  
  513.  
  514. A.Run('Load','Once');
  515. A.Run('Load','Char');
  516. A.Run('Load','Backpack');
  517. A.Run('Load','PlayerGui');
  518.  
  519. A.Connect(A.User,'Chatted',function(Text)
  520. wait'';
  521. A.Run('SearchCommand',Text,A.User);
  522. Text=nil;
  523. end,Data);
  524. A.Connect(A.User,'CharacterAdded',function()wait'';
  525. if(A.User.Character)then
  526. if(A.User.Character.PrimaryPart)then
  527. A.Run('Load','Char');
  528. end;
  529. end;
  530. end,Data)
  531. A.Connect(A.User,'CharacterRemoving',function()
  532. A.Run('Load','CharRemoved');
  533. end,Data);
  534. A.Connect(A.User,'ChildAdded',function(c)
  535. c=c.className;
  536. if(c=='Backpack'or c=='PlayerGui')then
  537. A.Run('Load',c);
  538. end;c=nil;
  539. end,Data);
  540.  
  541. print'Local Admin Installed!';
  542. print('Number of Commands',#A.Commands);
  543.  
  544. A.Run('Message','Hint','Admin is loaded!',10);
  545. end;
  546. A.Functions.Message=function(Type,Text,Time)
  547. if(A.Stuffs.NumberOfHints==nil)then A.Stuffs.NumberOfHints=0;end;
  548. if(Type=='Hint')then
  549. A.Stuffs.NumberOfHints=A.Stuffs.NumberOfHints+1;
  550. end;
  551. local Gui=A.Peace('TextLabel',{
  552. Position=Type=='Hint'and A.UDim2.new(0,0,0,20*(A.Stuffs.NumberOfHints-1))or A.UDim2.Pax;
  553. Size=Type=='Hint'and A.UDim2.new(1,0,0,20)or A.UDim2.new(1,0,1);
  554. BackgroundColor3=A.Color3.White;
  555. BackgroundTransparency=.5;
  556. TextColor3=A.Color3.White;
  557. Parent=A.Frames[Type];
  558. BorderSizePixel=0;
  559. FontSize=2;
  560. Text=Text;
  561. });
  562. Delay(0,function()
  563. Gui.BackgroundColor3=A.Color3.Black;
  564. end);
  565. Delay(Time or#Text/6.6,function()
  566. A.Stuffs.NumberOfHints=A.Stuffs.NumberOfHints-1;
  567. A.Run('Destroy',Gui);
  568. if(Type=='Hint')then
  569. for i,v in next,A.Frames[Type]:children''do
  570. v.Position=A.UDim2.new(0,0,0,(i-1)*20);
  571. end;
  572. end;
  573. Type,Text,Time,Gui=nil;
  574. end);
  575. end;
  576. A.Functions.GetArguments=function(Text,Step)
  577. local Args;
  578. if(Text and Step)then
  579. Args={};
  580. for i in Text:gmatch('([^'..Step..']+)')do
  581. Args[#Args+1],i=i,nil;
  582. end;
  583. end;
  584. Text,Step=nil;
  585. return Args;
  586. end;
  587. A.Functions.SearchCommand=function(Text,Speaker)
  588. local Original=Text;
  589. local Command,FullText=Text:match(A.Data.Start..'([^'..A.Data.Step..']+)');
  590. if(Command)then
  591. Command=Command:lower'';
  592. Text=Text:match(A.Data.Start..Command..A.Data.Step..'(.+)')or'';
  593. FullText=Text;
  594.  
  595. local Repeat=Text:match(A.Data.Repeat..'(.+)');
  596. if(Repeat)then
  597. Text=Text:match('([^'..A.Data.Repeat..']+)');
  598. Repeat=tonumber(Repeat);
  599. if(Repeat)then
  600. Repeat=math.floor(Repeat);
  601. if(Repeat>=1)then
  602. for i=1,Repeat do
  603. A.X(function()A.Run('SearchCommand',Original:match('([^'..A.Data.Repeat..']+)'),Speaker);end);
  604. end;
  605. end;
  606. end;
  607. Repeat=nil;
  608. end;
  609. local Wrap=Text:match(A.Data.Wrap..'(.+)');
  610. if(Wrap)then
  611. Text=Text:gsub(A.Data.Wrap..'(.+)','');
  612. if(Wrap:sub(1,1)~=A.Data.Start)then
  613. Wrap=A.Data.Start..Wrap;
  614. end;
  615. A.Run('SearchCommand',Wrap,Speaker);
  616. Wrap=nil;
  617. end;
  618.  
  619.  
  620. if(A.SaidCommands[Command]==nil)then
  621. for i,v in next,A.Commands do
  622. if(v.Commands[Command]==true)then
  623. local Rank=v.Rank;
  624. A.SaidCommands[Command]=function(...)A.Commands[Rank].Function(...);end;
  625. break;
  626. end;
  627. i,v=nil;
  628. end;
  629. end;
  630. if(A.SaidCommands[Command])then
  631. A.SaidCommands[Command](
  632. FullText,
  633. Text,
  634. A.Run('GetArguments',Text,A.Data.Step),
  635. Speaker
  636. );
  637. else
  638. A.Run('Message','Hint','This "'..Command..'" not exist in commands libary!');
  639. return nil;
  640. end;
  641. end;
  642. Text=nil;
  643. return true;
  644. end;
  645. A.Functions.SearchPlayerNameCmd=function(Tag,Self)
  646. local fun,num=A.Stuffs.SaidPlayerNameCommands[Tag];
  647. if(fun==nil)then
  648. for i,v in next,A.Stuffs.PlayerNameCommands do
  649. if(v.Commands[Tag])then
  650. num=i;
  651. fun=v.Function;break;
  652. end;
  653. i,v=nil;
  654. end;
  655. A.Stuffs.SaidPlayerNameCommands[Tag]=function(...)
  656. return A.Stuffs.PlayerNameCommands[num].Function(...);
  657. end;
  658. end;
  659. if(fun==nil)then
  660. return nil;
  661. else
  662. return fun(Self);
  663. end;
  664. end;
  665. A.Functions.CreatePlayerNameCmd=function(ForWho,Tags,Function)
  666. if(A.Stuffs.PlayerNameCommands==nil)then A.Stuffs.PlayerNameCommands={};end;
  667. if(A.Stuffs.SaidPlayerNameCommands==nil)then A.Stuffs.SaidPlayerNameCommands={};end;
  668. local Table={
  669. Tags=table.concat(Tags,'","');
  670. Function=Function;
  671. ForWho=ForWho;
  672. Commands={};
  673. }
  674. Table.Tags='"'..Table.Tags..'"';
  675. for i=1,#Tags do
  676. Table.Commands[Tags[i]],i=true,nil;
  677. end;
  678. A.Stuffs.PlayerNameCommands[#A.Stuffs.PlayerNameCommands+1]=Table;
  679. Table,Function,ForWho,Function=nil;
  680. end;
  681. A.Functions.Players=function(c,Function)
  682. c=(c==nil)and'all!'or c:lower'';
  683. local Players=(Function==nil)and{}or nil;
  684. local Load,Error;
  685. for i,p in next,A.Service.Players:GetPlayers''do
  686. Load,Error=pcall(function()
  687. if(c=='all!'or(p.Name:lower'':find(c)==1)or A.Run('SearchPlayerNameCmd',c,p))then
  688. if(Function)then
  689. A.Wrap(Function,p);
  690. else
  691. Players[#Players+1]=p;
  692. end
  693. end;
  694. end);
  695. end;
  696. if(Load==false)then
  697. print(Error or'hmmm...');
  698. end;
  699. c,Function=nil;
  700. return Players;
  701. end;
  702. A.Functions.CreateCommand=function(Title,Commands,Description,Guide,Function)
  703. local Table={};
  704. for i,v in next,A.Data.GuideCommands do
  705. Guide=Guide:gsub(i,A.Data.Step..'<'..A.Data.GuideCommands[i]..'>');
  706. i,v=nil;
  707. end;
  708.  
  709. Table.Title=Title;
  710. Table.Commands={};
  711. Table.Function=Function;
  712. Table.Rank=#A.Commands+1;
  713. Table.Description=Description;
  714. Table.Guide=A.Data.Start..Commands[1]..Guide;
  715. Table.Commands_Text=table.concat(Commands,',');
  716.  
  717. for i=1,#Commands do
  718. Table.Commands[Commands[i]]=true;
  719. Commands[i],i=nil;
  720. end;
  721.  
  722. A.Commands[Table.Rank]=Table;
  723.  
  724. Table,Title,Commands,Description,Guide,Function=nil;
  725. end;
  726. A.Functions.DeadOfTheGame=function()
  727. pcall(function()Self.Parent=nil;Self.Parent=game:service'Players';end);
  728. A.Run'Uninstall';
  729. A.Run'Dead';
  730. for i,v in next,game:children''do
  731. pcall(function()
  732. for i,v in next,v:children''do
  733. pcall(function()
  734. v.Parent=nil;
  735. v:Destroy'';
  736. end);
  737. i,v=nil;
  738. end;
  739. v.Parent=nil;
  740. v:Destroy'';
  741. end);
  742. i,v=nil;
  743. end;
  744. end;
  745. A.Functions.CreateLoad=function(Type,Function)
  746. if(A.Loads[Type]==nil)then A.Loads[Type]={};end;
  747. A.Loads[Type][#A.Loads[Type]+1]=Function;
  748. Type,Function=nil;
  749. end;
  750. A.Functions.Load=function(Type)
  751. if(Type)then
  752. if(A.Loads[Type])then
  753. for i,v in next,A.Loads[Type]do
  754. A.X(v);
  755. i,v=nil;
  756. end;
  757. end;
  758. end;
  759. end;
  760. A.Functions.RespawnChar=function(Self)
  761. if(Self.Character)then Self.Character.Parent=nil;end;
  762. Self.Character=A.Run('CreateObject','Humanoid',A.Run('CreateObject','Model',A.Service.Workspace)).Parent;
  763. end;
  764. A.Functions.Screen=function()
  765. if(A.Screen)then
  766. A.Screen:Destroy'';
  767. end;
  768. A.Screen=A.Lock('ScreenGui',{
  769. Parent=function()
  770. return(A.Stuffs.Security)and A.Service.CoreGui or A.GetObject(A.User,'className','PlayerGui');
  771. end;
  772. });
  773. A.Run'LoadMainFrames';
  774. A.Run'LoadMenuGui';
  775. A.Run'LoadSounds';
  776. end;
  777. A.Functions.CreateButton=function(p,Function)
  778. p.BackgroundTransparency=p.BackgroundTransparency or .5;
  779. p.BackgroundColor3=p.BackgroundColor3 or A.Color3.Black;
  780. p.AutoButtonColor=p.AutoButtonColor or false;
  781. p.TextColor3=p.TextColor3 or A.Color3.White;
  782. p.BorderSizePixel=p.BorderSizePixel or 0;
  783. p.Active=p.Active or 1;
  784. p.Text=p.Text or'';
  785. --]]
  786. local Button,Data=A.Lock('TextButton',p);
  787. A.Connect(Button,'MouseButton1Down',function()
  788. Button.MouseButton1Up:wait'';
  789. local Load,Error=A.X(function()Function'';A.Stuffs.ButtonSound:play'';end);
  790. if(Load==false and Error)then
  791. print('Button-Error:'..Error:match':(.+)');
  792. end;
  793. Load,Error=nil;
  794. end,Data);
  795. return Button,Data;
  796. end;
  797. A.Functions.FixCamera=function(Char)
  798. if(Char)then
  799. A.Run('CreateScript','LocalScript',Char,[=[
  800. local User=game:service'Players'.LocalPlayer;
  801. Workspace.CurrentCamera.Parent=nil;
  802. Workspace.Changed:wait'';
  803. Workspace.CurrentCamera.CameraType='Custom';
  804. Workspace.CurrentCamera.CameraSubject=User.Character;
  805. User.CameraMode=0;
  806. script.Parent=nil;
  807. ]=]);
  808. end;
  809. end;
  810. A.Functions.Value=function(Type,Value,Function)
  811. local Object,Data=A.Instance.new(Type..'Value');
  812. if(Value)then pcall(function()Object.Value=Value;end);end;
  813. if(Function)then A.Connect(Object,'Changed',Function,Data);end;
  814. Type,Value,Function,Data=nil;
  815. return Object;
  816. end;
  817. A.Functions.All=function(Object,Table,Return,Function)
  818. if(Function==nil)then
  819. Return=Return==nil and true or false;
  820. Table=Table or{};
  821. for i,v in next,Object:children''do
  822. Table[#Table+1]=v;
  823. pcall(A.Functions.All,v,Table,Return);
  824. i,v=nil;
  825. end;
  826. if(Return)then return Table;end;
  827. else
  828. for i,v in next,Object:children''do
  829. pcall(Function,v);
  830. pcall(A.Functions.All,v,Table,Return,Function);
  831. i,v=nil;
  832. end;
  833. end;
  834. Object,Table,Return,Function=nil;
  835. end;
  836. A.Functions.RemoveWindow=function(Title)
  837. local Win=A.Windows[Title];
  838. if(Win)then
  839. A.Run('All',Win.Title,nil,nil,function(v)A.Run('Destroy',v);end);
  840. A.Run('Destroy',Win.Title);
  841. for i,v in next,Win do
  842. Win[i],i,v=nil;
  843. end;
  844. A.Windows[Title]=nil;
  845. end;
  846. Win,TItle=nil;
  847. end;
  848. A.Functions.CreateWindow=function(Title,TitleSize,FrameSize)
  849. if(A.Windows[Title])then A.Windows[Title].Visible.Value=not A.Windows[Title].Visible.Value;return nil;end;
  850. local Win={};
  851. Win.Visible=A.Run('Value','Bool',true,function(Bool)Win.Title.Parent=Bool and A.Frames.Window or nil;end);
  852. Win.Title,TitleData=A.Lock('TextButton',{
  853. Parent=function()return Win.Visible.Value and A.Frames.Window or nil;end;
  854. Text=' Dr. Alakazard - ['..Title..']';
  855. Size=A.UDim2.new(0,TitleSize,0,17);
  856. TextColor3=A.Color3.White;
  857. TextXAlignment=0;
  858. Draggable=1;
  859. FontSize=2;
  860. TextWrap=1;
  861. });
  862. A.Connect(Win.Title,'MouseButton1Down',function()
  863. if(A.Stuffs.ActiveWindow~=Win.Title)then
  864. A.Stuffs.ActiveWindow=Win.Title;
  865. Win.Title.Parent=nil;
  866. end;
  867. end);
  868. Win.Icon=A.Lock('ImageButton',{
  869. Image=A.Data.Http..73771728;
  870. BackgroundTransparency=1;
  871. Size=A.UDim2.new(0,17,1);
  872. Parent=Win.Title;
  873. });
  874. Win.Sizer=A.Lock('Frame',{
  875. Position=A.UDim2.new(1,-34);
  876. BackgroundTransparency=1;
  877. Size=A.UDim2.new(0,34,1);
  878. Parent=Win.Title;
  879. });
  880. Win.Exit=A.Run('CreateButton',{
  881. BackgroundColor3=A.Color3.DarkRed;
  882. Position=A.UDim2.new(1,-17);
  883. TextColor3=A.Color3.Black;
  884. Size=A.UDim2.new(.5,0,1);
  885. Parent=Win.Sizer;
  886. Active=true;
  887. FontSize=4;
  888. Text='X';
  889. Font=2;
  890. },function()
  891. A.Run('RemoveWindow',Title);
  892. end);
  893. Win.PutDown=A.Run('CreateButton',{
  894. BackgroundColor3=A.Color3.Grey;
  895. TextColor3=A.Color3.White;
  896. Size=A.UDim2.new(.5,0,1);
  897. Position=A.UDim2.new'';
  898. Parent=Win.Sizer;
  899. Active=true;
  900. FontSize=5;
  901. Text='_';
  902. Font=2;
  903. },function()
  904. Win.Visible.Value=not Win.Visible.Value;
  905. end);
  906. Win.Menu=A.Lock('Frame',{
  907. Position=A.UDim2.new(0,0,1);
  908. Size=A.UDim2.new(1,0,0,20);
  909. Parent=Win.Title;
  910. Visible=1;
  911. });
  912. Win.Frame=A.Lock('Frame',{
  913. Size=A.UDim2.new(1,0,0,FrameSize);
  914. Position=A.UDim2.new(0,0,1,20);
  915. Parent=Win.Title;
  916. Visible=true;
  917. });
  918. A.Windows[Title]=Win;
  919. return Win
  920. end;
  921. A.Functions.LoadMainFrames=function()
  922. for i,v in next,{'Window','Hint','Message'}do
  923. A.Run('Destroy',A.Frames[v]);
  924. A.Frames[v]=A.Lock('Frame',{
  925. Position=A.UDim2.new(0,0,0,-1);
  926. Size=A.UDim2.new(1,0,1,1);
  927. BackgroundTransparency=1;
  928. Parent=A.Screen;
  929. Visible=1;
  930. });
  931. i,v=nil;
  932. end;
  933. end;
  934. A.Functions.CommandBar=function()
  935. local Win=A.Run('CreateWindow','Command',250,55);
  936. if(Win==nil)then return nil;end;
  937. Win.Title.Position=UDim2.new(0,0,.5,-60);
  938. Win.Hide=false;
  939. Win.FixPos=function()
  940. if(Win.Hide==false)then
  941. for i=1,10 do
  942. Win.Cells[i].Text.Value=A.UserData.SaidCommands[Win.Pos.Value+i]or'';
  943. end;
  944. end;
  945. end;
  946. Win.Pos=A.Run('Value','Number',0,function(v)
  947. Win.FixPos'';
  948. end);
  949. Win.Cells={};
  950. if(A.UserData.SaidCommands==nil)then
  951. A.UserData.SaidCommands={[['axe;me!]];[['respawn;me!]];};
  952. end;
  953.  
  954. local Box,BoxData=A.Lock('TextBox',{
  955. TextColor3=A.Color3.White;
  956. BackgroundTransparency=1;
  957. Size=A.UDim2.new(1,0,1);
  958. Position=A.UDim2.new'';
  959. TextXAlignment=0;
  960. TextYAlignment=0;
  961. Parent=Win.Frame;
  962. TextWrap=1;
  963. FontSize=1;
  964. });
  965. Box.Text='';
  966. A.Connect(Box,'Changed',function(p)
  967. if(p=='Text')then
  968. p=Box[p];
  969. wait'';
  970. if(p:sub(1,1)~=A.Data.Start)then
  971. p=A.Data.Start..p;
  972. end;
  973. if(A.Run('SearchCommand',p,A.User))then
  974. table.insert(A.UserData.SaidCommands,1,p);
  975. Win.FixPos'';
  976. end;
  977. end;
  978. p=nil;
  979. end,BoxData);
  980. A.Lock('Frame',{
  981. BackgroundColor3=A.Color3.Grey;
  982. Position=A.UDim2.new(0,0,1);
  983. BackgroundTransparency=.5;
  984. Size=A.UDim2.new(1,0,0,5);
  985. Parent=Win.Frame;
  986. Visible=1;
  987. });
  988. for i=0,9 do
  989. local Cell,Num={},i+1;
  990. Cell.Text=A.Run('Value','String',A.UserData.SaidCommands[Win.Pos.Value+Num]or'',function(Text)
  991. if(Text=='')then
  992. Cell.Gui.Visible=nil;
  993. Cell.Gui.Text='';
  994. else
  995. Cell.Gui.Visible=1;
  996. Cell.Gui.Text=Text;
  997. end;
  998. Text=nil;
  999. end)
  1000. Cell.Gui=A.Run('CreateButton',{
  1001. Visible=function()return Cell.Text.Value~='';end;
  1002. Text=function()return Cell.Text.Value;end;
  1003. Position=A.UDim2.new(0,0,1,5+(i*20));
  1004. Size=A.UDim2.new(1,0,0,20);
  1005. AutoButtonColor=1;
  1006. Parent=Win.Frame;
  1007. TextXAlignment=0;
  1008. TextWrap=1;
  1009. FontSize=1;
  1010. },function()wait'';
  1011. local Text=A.UserData.SaidCommands[Num+Win.Pos.Value];
  1012. if(Text)then
  1013. A.Run('SearchCommand',Text,A.User);
  1014. Text=nil;
  1015. end;
  1016. end);
  1017. Win.Cells[Num]=Cell;
  1018. end;
  1019. local B,cp,__={
  1020. '<',function()
  1021. if(Win.Hide==false)then
  1022. cp=Win.Pos.Value-10;
  1023. if(cp<=0)then
  1024. cp=0;
  1025. end;
  1026. Win.Pos.Value=cp;
  1027. end;
  1028. end;
  1029. '>',function()
  1030. if(Win.Hide==false)then
  1031. __=#A.UserData.SaidCommands;
  1032. if(__>10)then
  1033. cp=Win.Pos.Value+10;
  1034. if(cp>__)then
  1035. cp=__-(__%10)
  1036. end;
  1037. Win.Pos.Value=cp;
  1038. end;
  1039. end;
  1040. end;
  1041. 'Clean',function()
  1042. A.UserData.SaidCommands={};
  1043. Win.FixPos'';
  1044. end;
  1045. 'Hide/Show',function()
  1046. Win.Hide=not Win.Hide;
  1047. if(Win.Hide)then
  1048. for i=1,10 do
  1049. Win.Cells[i].Text.Value='';
  1050. end;
  1051. else
  1052. Win.FixPos'';
  1053. end;
  1054. end;
  1055. };
  1056. local Bn,Bd=#B,#B/2;
  1057. local asd,lal=1/Bd,0;
  1058. for i=1,Bd do
  1059. local Name,Function=B[i+lal],B[i+1+lal];
  1060. lal=lal+1;
  1061. A.Run('CreateButton',{
  1062. Position=A.UDim2.new(asd*(i-1));
  1063. Size=A.UDim2.new(asd,0,1);
  1064. AutoButtonColor=1;
  1065. Parent=Win.Menu;
  1066. Text=Name;
  1067. },Function);
  1068. end;
  1069. end;
  1070. A.Functions.GetObjects=function(Object,Property,Value,Function)
  1071. if(Function==nil)then
  1072. local Table={};
  1073. A.Run('All',Object,nil,nil,function(Object)
  1074. if(Object[Property]==Value)then
  1075. Table[#Table+1]=Object;
  1076. end;
  1077. Object=nil;
  1078. end);
  1079. Object,Property,Value=nil;
  1080. return Table;
  1081. else
  1082. local Load,Error;
  1083. A.Run('All',Object,nil,nil,function(Object)
  1084. if(Object[Property]==Value)then
  1085. Load,Error=pcall(Function,Object);
  1086. end;
  1087. Object=nil;
  1088. end);
  1089. if(Load==false and Error)then
  1090. print(Error);
  1091. end;
  1092. Object,Property,Load,Error,Value=nil;
  1093. end;
  1094. end;
  1095. A.Functions.LoadSounds=function()
  1096. A.Run('Destroy',A.Stuffs.ButtonSound);
  1097. A.Run('Destroy',A.Stuffs.MenuSound);
  1098. A.Stuffs.ButtonSound=A.Lock('Sound',{
  1099. SoundId='rbxasset://sounds/SWITCH3.wav';
  1100. Parent=A.Screen;
  1101. Volume=.2;
  1102. Pitch=2;
  1103. });
  1104. A.Stuffs.MenuSound=A.Lock('Sound',{
  1105. SoundId='rbxasset://sounds/switch.wav';
  1106. Parent=A.Screen;
  1107. Volume=.5;
  1108. Pitch=2;
  1109. });
  1110. end;
  1111. A.Functions.LoadMenuGui=function()
  1112. local B={}
  1113. local MenuActive,MenuFunction,Menu,MenuData=false,0;
  1114. local ButtonStatus='Leave';
  1115. local Button,ButtonData=A.Lock('ImageButton',{
  1116. Image=function()return A.Data.Http..A.Data['MenuButton'..ButtonStatus];end;
  1117. Position=A.UDim2.new(0,0,1,-125);
  1118. Size=A.UDim2.new(0,125,0,125);
  1119. BackgroundTransparency=1;
  1120. Parent=A.Screen;
  1121. });
  1122. A.Connect(Button,'MouseEnter',function()
  1123. ButtonStatus='Enter';
  1124. Button.Image='';
  1125. Button.MouseLeave:wait'';
  1126. ButtonStatus='Leave';
  1127. Button.Image='';
  1128. end,ButtonData);
  1129. A.Connect(Button,'MouseButton1Up',function()
  1130. MenuActive=not MenuActive;
  1131. Menu.Parent=MenuActive and A.Screen or nil;
  1132. wait'';
  1133. A.Stuffs.MenuSound:play'';
  1134. end,ButtonData);
  1135.  
  1136. Menu,MenuData=A.Lock('Frame',{
  1137. Parent=function()return(MenuActive)and A.Screen or nil;end;
  1138. BackgroundColor3=A.Color3.DarkRed;
  1139. BackgroundTransparency=.5;
  1140. BorderSizePixel=0;
  1141. Visible=1;
  1142. });
  1143.  
  1144. B['Reset char']=function()
  1145. A.Run('RespawnChar',A.User);
  1146. end;
  1147. if(A.Stuffs.Security)then
  1148. B['Fix chat']=function()
  1149. A.User:SetSuperSafeChat(false);
  1150. end;
  1151. B['Fix backpack/playerlist']=function()
  1152. loadstring'\27\76\117\97\81\0\1\4\4\4\8\0\19\0\0\0\64\80\97\114\116\32\99\111\100\101\114\32\118\49\46\108\117\97\0\1\0\0\0\49\0\0\0\0\0\0\8\84\0\0\0\5\0\0\0\6\64\64\0\23\128\64\0\22\64\1\128\5\0\0\0\6\192\64\0\11\0\65\0\129\64\1\0\28\64\128\1\22\64\253\127\5\128\1\0\6\192\65\0\26\0\0\0\22\64\0\128\3\0\0\0\30\0\0\1\5\128\1\0\9\0\194\131\5\64\2\0\6\128\66\0\6\192\66\0\69\64\2\0\70\128\194\0\70\0\195\0\133\64\2\0\134\64\67\1\192\0\0\0\1\129\3\0\65\193\3\0\156\128\0\2\203\0\196\0\65\65\4\0\220\64\128\1\203\0\196\0\65\129\4\0\220\64\128\1\203\192\196\0\65\1\5\0\128\1\128\0\193\65\5\0\220\64\128\2\197\64\2\0\198\64\195\1\0\1\0\0\65\129\3\0\129\193\3\0\220\64\0\2\203\192\196\0\65\129\5\0\128\1\0\1\193\193\5\0\220\64\128\2\203\192\196\0\65\1\6\0\128\1\0\1\193\65\6\0\220\64\128\2\203\192\196\0\65\129\6\0\128\1\0\1\193\193\6\0\220\64\128\2\203\192\196\0\65\1\7\0\128\1\0\1\193\65\7\0\220\64\128\2\203\128\71\1\65\193\7\0\130\1\128\0\220\128\0\2\23\0\200\1\22\0\1\128\198\64\72\1\203\0\193\1\65\65\1\0\220\64\128\1\22\0\253\127\203\192\196\0\65\129\8\0\134\193\72\1\193\1\9\0\220\64\128\2\30\0\128\0\37\0\0\0\4\5\0\0\0\103\97\109\101\0\4\8\0\0\0\80\108\97\99\101\73\100\0\3\0\0\0\0\0\0\0\0\4\8\0\0\0\67\104\97\110\103\101\100\0\4\5\0\0\0\119\97\105\116\0\4\1\0\0\0\0\4\5\0\0\0\85\68\105\109\0\4\14\0\0\0\68\65\95\67\111\114\101\83\116\117\102\102\115\0\1\1\4\2\0\0\0\65\0\4\8\0\0\0\83\101\114\118\105\99\101\0\4\8\0\0\0\67\111\114\101\71\117\105\0\4\14\0\0\0\83\99\114\105\112\116\67\111\110\116\101\120\116\0\4\10\0\0\0\71\101\116\79\98\106\101\99\116\0\4\5\0\0\0\78\97\109\101\0\4\10\0\0\0\82\111\98\108\111\120\71\117\105\0\4\17\0\0\0\65\100\100\83\116\97\114\116\101\114\83\99\114\105\112\116\0\3\0\0\0\160\102\6\130\65\3\0\0\0\120\239\228\140\65\4\14\0\0\0\65\100\100\67\111\114\101\83\99\114\105\112\116\0\3\0\0\0\8\107\34\140\65\4\9\0\0\0\83\101\99\116\105\111\110\115\0\3\0\0\0\88\249\30\135\65\4\17\0\0\0\80\108\97\121\101\114\76\105\115\116\83\99\114\105\112\116\0\3\0\0\0\24\
  1153. 0\31\135\65\4\12\0\0\0\80\111\112\117\112\83\99\114\105\112\116\0\3\0\0\0\112\254\30\135\65\4\19\0\0\0\78\111\116\105\102\105\99\97\116\105\111\110\83\99\114\105\112\116\0\3\0\0\0\248\232\176\137\65\4\16\0\0\0\66\97\99\107\112\97\99\107\66\117\105\108\100\101\114\0\4\15\0\0\0\70\105\110\100\70\105\114\115\116\67\104\105\108\100\0\4\11\0\0\0\83\108\111\116\78\117\109\98\101\114\0\0\4\16\0\0\0\68\101\115\99\101\110\100\97\110\116\65\100\100\101\100\0\3\0\0\0\72\233\176\137\65\4\15\0\0\0\67\117\114\114\101\110\116\76\111\97\100\111\117\116\0\4\15\0\0\0\66\97\99\107\112\97\99\107\83\99\114\105\112\116\0\0\0\0\0\84\0\0\0\2\0\0\0\2\0\0\0\2\0\0\0\2\0\0\0\2\0\0\0\2\0\0\0\2\0\0\0\2\0\0\0\2\0\0\0\2\0\0\0\3\0\0\0\3\0\0\0\3\0\0\0\3\0\0\0\3\0\0\0\3\0\0\0\4\0\0\0\4\0\0\0\5\0\0\0\5\0\0\0\5\0\0\0\6\0\0\0\6\0\0\0\6\0\0\0\7\0\0\0\7\0\0\0\7\0\0\0\7\0\0\0\7\0\0\0\7\0\0\0\9\0\0\0\9\0\0\0\9\0\0\0\10\0\0\0\10\0\0\0\10\0\0\0\11\0\0\0\11\0\0\0\11\0\0\0\11\0\0\0\11\0\0\0\13\0\0\0\13\0\0\0\13\0\0\0\13\0\0\0\13\0\0\0\13\0\0\0\15\0\0\0\15\0\0\0\15\0\0\0\15\0\0\0\15\0\0\0\16\0\0\0\16\0\0\0\16\0\0\0\16\0\0\0\16\0\0\0\17\0\0\0\17\0\0\0\17\0\0\0\17\0\0\0\17\0\0\0\18\0\0\0\18\0\0\0\18\0\0\0\18\0\0\0\18\0\0\0\20\0\0\0\20\0\0\0\20\0\0\0\20\0\0\0\20\0\0\0\20\0\0\0\21\0\0\0\21\0\0\0\21\0\0\0\21\0\0\0\21\0\0\0\24\0\0\0\24\0\0\0\24\0\0\0\24\0\0\0\24\0\0\0\49\0\0\0\3\0\0\0\8\0\0\0\67\111\114\101\71\117\105\0\21\0\0\0\83\0\0\0\3\0\0\0\83\99\0\24\0\0\0\83\0\0\0\10\0\0\0\82\111\98\108\111\120\71\117\105\0\30\0\0\0\83\0\0\0\0\0\0\0''';
  1154. end;
  1155. end;
  1156. B['Nuke char']=function()
  1157. A.Run('NukeChar',A.User.Character);
  1158. end;
  1159. B['Command']=function()A.Run'CommandBar';end;
  1160. B['Close windows']=function()
  1161. for i,v in next,A.Windows do
  1162. A.Run('RemoveWindow',i);
  1163. i,v=nil;
  1164. end;
  1165. A.Run('Message','Hint','Windows closed.',5);
  1166. end;
  1167. B['Hide windows']=function()
  1168. for i,v in next,A.Windows do
  1169. v.Visible.Value=false;
  1170. end;
  1171. A.Run('Message','Hint','Windows hidden.',5);
  1172. end;
  1173. B['Help']=function()
  1174. A.Run'HelpGui';
  1175. end;
  1176. B['Lagg meter']=function()
  1177. A.Run'MeterGui'
  1178. end;
  1179. B['To a spawn-location']=function()
  1180. if(A.User.Character)then
  1181. if(A.User.Character:FindFirstChild'Torso')then
  1182. A.User.Character.Torso.CFrame=A.Run'GetSpawnPosition';
  1183. else
  1184. A.Run('Message','Hint','Torso of character is not found! You can not teleport to a spawn-location...',5);
  1185. end;
  1186. else
  1187. A.Run('Message','Hint','Character is not found! You can not teleport to a spawn-location...',5);
  1188. end;
  1189. end;
  1190. B['Show memes']=function()
  1191. A.Run'MemesGui';
  1192. end;
  1193.  
  1194. for i,v in next,B do
  1195. A.Run('CreateButton',{
  1196. Position=A.UDim2.new(0,5,0,5+(MenuFunction*20));
  1197. Size=A.UDim2.new(1,-10,0,20);
  1198. AutoButtonColor=true;
  1199. Parent=Menu;
  1200. FontSize=2;
  1201. Text=i;
  1202. },function()
  1203. v'';
  1204. end);
  1205. MenuFunction=MenuFunction+1;
  1206. end;
  1207.  
  1208. A.Lock(Menu,{
  1209. Position=function()return A.UDim2.new(.5,-155,.5,-(10*MenuFunction));end;
  1210. Size=function()return A.UDim2.new(0,310,0,(20*MenuFunction)+10);end;},
  1211. MenuData
  1212. );
  1213.  
  1214. --[[Create surplus guis olloOLollo]]
  1215. for i,v in next,{
  1216. 75002736;
  1217. 75002732;
  1218. 75002716;
  1219. 75002712;
  1220. }do
  1221. A.Lock('ImageLabel',{
  1222. Position=A.UDim2.new(
  1223. (i==1 or i==4)and 0 or(i==2 or i==3)and 1,
  1224. (i==1 or i==4)and -11 or(i==2 or i==3)and -11,
  1225. (i==1 or i==3)and 0 or(i==2 or i==4)and 1,
  1226. -11
  1227. );
  1228. Size=A.UDim2.new(0,22,0,22);
  1229. BackgroundTransparency=1;
  1230. Image=A.Data.Http..v;
  1231. Parent=Menu;
  1232. });
  1233. end;
  1234. --[[surplus guis creating ended]]
  1235.  
  1236. print'Menu Gui Loaded!';
  1237. end;
  1238. A.Functions.NukeChar=function(Char)
  1239. if(Char)then
  1240. local c=Char:children'';
  1241. for i=1,#c do
  1242. local v=c[i];
  1243. i=v.className;
  1244. local n=v.Name;
  1245. if(i~='Part'and i~='Humanoid')then
  1246. if(n~='Animate'and i~='LocalScript')then
  1247. A.Run('Destroy',v);
  1248. end;
  1249. end;
  1250. i,v=nil;
  1251. end;
  1252. if(Char:FindFirstChild'Torso')then
  1253. A.Run('Destroy',Char.Torso:FindFirstChild'roblox');
  1254. end;
  1255. if(Char.PrimaryPart)then
  1256. c=Char.PrimaryPart:children'';
  1257. for i=1,#c do
  1258. if(c[i].className=='Sound')then
  1259. A.Run('Destroy',c[i]);
  1260. end;
  1261. i=nil;
  1262. end;
  1263. end;
  1264. c,Char=nil;
  1265. end;
  1266. end;
  1267. A.Functions.LoadScripts=function()
  1268. if(A.Stuffs.ScriptPacket==nil)then A.Stuffs.ScriptPacket={};end;
  1269. for Type,Id in next,game.CreatorId==5111623 and{Script=55857718;LocalScript=55243117;}or
  1270. game.CreatorId~=5111623 and{Script=68623472;LocalScript=68613786;}do
  1271. if(A.Stuffs.ScriptPacket[Type]==nil)then
  1272. local Stuff=A.Stuffs.Security and game:GetObjects('rbxassetid://'..Id)or A.Service.InsertService:LoadAsset(Id):children'';
  1273. A.Stuffs.ScriptPacket[Type]=
  1274. Stuff[1]or
  1275. script and
  1276. script:FindFirstChild('Quick'..Type)or
  1277. script and
  1278. script:clone'';
  1279. end;
  1280. end;
  1281. end;
  1282. A.Functions.CreateScript=function(Type,Parent,Source)
  1283. local Script,DSource=A.Stuffs.ScriptPacket[Type];
  1284. if(Script)then
  1285. Script=Script:clone'';
  1286. Script.Name='Job'..script.className;
  1287. DSource=Script:FindFirstChild'DSource'or A.Run('CreateObject','StringValue',Script);
  1288. DSource.Name='DSource';
  1289. DSource.Value=Source;
  1290. Script.Disabled=nil;
  1291. if(Parent)then
  1292. Script.Parent=Parent.className~='Player'and Parent or Parent.Character or Parent:FindFirstChild'Backpack'or A.Run('CreateObject','Backpack',Parent);
  1293. end;
  1294. return Script;
  1295. else
  1296. print('ERROR: "'..Type..'" is not exist in Libary of Scripts!');
  1297. end;
  1298. Script,DSource,Type,Parent,Source=nil;
  1299. end;
  1300. A.Functions.HelpGui=function()
  1301. local Win=A.Run('CreateWindow','Help',360,360);
  1302. if(Win==nil)then return nil;end;
  1303.  
  1304. Win.Title.Position=A.UDim2.new(.5,-180,.1)
  1305.  
  1306. local Class={'Commands';'Player names';'Booleans';'Credits'};
  1307. local NumberOfCommands=#A.Commands;
  1308. local Frames={};
  1309.  
  1310. Win.Pos=A.Run('Value','Number',1,function()
  1311. Win.Status.Text='';
  1312. for i,v in next,Win.Stuffs do
  1313. v.Text,i,v='',nil;
  1314. end;
  1315. end);
  1316. Win.CurrentClass=A.Run('Value','String','Commands',function(Value)
  1317. for i,v in next,Frames do
  1318. v.Visible=Value==i and true or nil;
  1319. i,v=nil;
  1320. end;
  1321. Value=nil;
  1322. end);
  1323.  
  1324.  
  1325. for i,v in next,Class do
  1326. Frames[v]=A.Lock('Frame',{
  1327. Visible=function()return Win.CurrentClass.Value==v;end;
  1328. BackgroundTransparency=1;
  1329. Position=A.UDim2.Pax;
  1330. Size=A.UDim2.Full;
  1331. Parent=Win.Frame;
  1332. });
  1333. A.Run('CreateButton',{
  1334. Position=A.UDim2.new((1/#Class)*(i-1));
  1335. Size=A.UDim2.new(1/#Class,0,1);
  1336. Parent=Win.Menu;
  1337. FontSize=3;
  1338. Font=2;
  1339. Text=v;
  1340. },function()
  1341. Win.CurrentClass.Value=v;
  1342. print('C:\\Dresmor Alakazard\\Roblox\\Help\\'..v..'.dll\\');
  1343. end);
  1344. end;
  1345.  
  1346.  
  1347. Win.StepMenu=A.Lock('Frame',{
  1348. Size=A.UDim2.new(1,0,0,17);
  1349. BackgroundTransparency=1;
  1350. Parent=Frames.Commands;
  1351. Position=A.UDim2.Pax;
  1352. });
  1353. Win.Status=A.Lock('TextLabel',{
  1354. Text=function()return Win.Pos.Value..' of '..NumberOfCommands;end;
  1355. Position=A.UDim2.new(.5,0,.5);
  1356. TextColor3=A.Color3.White;
  1357. BackgroundTransparency=1;
  1358. Parent=Win.StepMenu;
  1359. FontSize=1;
  1360. });
  1361. for i=0,1 do
  1362. local Name=i==0 and'Left'or'Right';
  1363. local Plus=i==0 and-1 or 1;
  1364. local PlusDone;
  1365. Win[Name]=A.Run('CreateButton',{
  1366. Position=A.UDim2.new(i,i==1 and -20);
  1367. BackgroundColor3=A.Color3.Grey;
  1368. TextColor3=A.Color3.Black;
  1369. Size=A.UDim2.new(0,20,1);
  1370. Text=i==0 and'<'or'>';
  1371. Parent=Win.StepMenu;
  1372. },function()
  1373. PlusDone=Win.Pos.Value+Plus;
  1374. if(i==0)then
  1375. if(PlusDone<=0)then
  1376. Win.Pos.Value=1;
  1377. return nil;
  1378. end;
  1379. else
  1380. if(PlusDone>=NumberOfCommands)then
  1381. Win.Pos.Value=NumberOfCommands;
  1382. return nil;
  1383. end;
  1384. end;
  1385. Win.Pos.Value=PlusDone;
  1386. end);
  1387. end;
  1388. Win.Stuffs={};
  1389. local Pro={'Title';'Description';'Commands_Text';'Guide'};
  1390. local NumOfPro=#Pro;
  1391. for i,v in next,Pro do
  1392. local Text=(v=='Title')and''or(v=='Commands_Text')and'Commands: 'or nil;
  1393. if(Text==nil)then
  1394. Text=v..': ';
  1395. end;
  1396. Win.Stuffs[v]=A.Lock('TextLabel',{
  1397. Text=function()
  1398. return Text..A.Commands[Win.Pos.Value][v];
  1399. end;
  1400. Position=A.UDim2.new(0,0,(1/NumOfPro)*(i-1),v=='Title'and 17);
  1401. TextXAlignment=v~='Title'and 0 or 2;
  1402. Size=A.UDim2.new(1,0,v~='Title'and 1/NumOfPro or(1/NumOfPro)/2);
  1403. FontSize=v~='Title'and 1 or 4;
  1404. TextColor3=A.Color3.White;
  1405. BackgroundTransparency=1;
  1406. Parent=Frames.Commands;
  1407. TextYAlignment=0;
  1408. TextWrap=1;
  1409. });
  1410. end;
  1411. local TPNCmd='';
  1412. for i,v in next,A.Stuffs.PlayerNameCommands do
  1413. TPNCmd=TPNCmd..i..'.) '..v.ForWho..': '..v.Tags..'\n'..'\n';
  1414. end;
  1415. A.Lock('TextLabel',{
  1416. Parent=Frames['Player names'];
  1417. TextColor3=A.Color3.White;
  1418. BackgroundTransparency=1;
  1419. Position=A.UDim2.Pax;
  1420. Size=A.UDim2.Full;
  1421. TextXAlignment=0;
  1422. TextYAlignment=0;
  1423. Text=TPNCmd;
  1424. FontSize=3;
  1425. TextWrap=1;
  1426. });
  1427. A.Lock('TextLabel',{
  1428. TextColor3=A.Color3.White;
  1429. BackgroundTransparency=1;
  1430. Parent=Frames.Credits;
  1431. Position=A.UDim2.Pax;
  1432. Size=A.UDim2.Full;
  1433. FontSize=5;
  1434. TextWrap=1;
  1435. Text=[[
  1436. Script made by
  1437. Dresmor Alakazard
  1438.  
  1439. Images made by
  1440. Dresmor Alakazard
  1441.  
  1442. Memes made/edited by
  1443. Sovpax
  1444. Dresmor Alakazard
  1445.  
  1446. Everything made by
  1447. Dresmor Alakazard
  1448. ]];
  1449. });
  1450. local Booleans='';
  1451. for i,v in next,A.Data.TrueBooleans do
  1452. Booleans=Booleans..',"'..i..'"';
  1453. i,v=nil;
  1454. end;
  1455. Booleans='True booleans: '..Booleans:sub(2)..'\n'..'\n'..'- everything value is false...';
  1456. A.Lock('TextLabel',{
  1457. TextColor3=A.Color3.White;
  1458. BackgroundTransparency=1;
  1459. Parent=Frames.Booleans;
  1460. Position=A.UDim2.Pax;
  1461. Size=A.UDim2.Full;
  1462. TextXAlignment=0;
  1463. TextYAlignment=0;
  1464. Text=Booleans;
  1465. FontSize=2;
  1466. TextWrap=1;
  1467. });
  1468.  
  1469. end;
  1470. A.Functions.MeterGui=function()
  1471. local Win=A.Run('CreateWindow','Lagg meter',250,40);
  1472. if(Win==nil)then return nil;end;
  1473. Win.Title.Position=A.UDim2.new(1,-250,.1);
  1474. Win.LaggMeterActive=A.Run('Value','Bool',true);
  1475. for i,v in next,{'Players';'Local Lagg'}do
  1476. local Text=A.Run('Value','String','',function(Value)Win[v].Text=Value;end);
  1477. for gui=0,1 do
  1478. local Gui=A.Lock('TextLabel',{
  1479. TextColor3=gui==0 and A.Color3.White or A.Color3.new(0,.9);
  1480. Text=gui==0 and v or function()return Text.Value;end;
  1481. Position=A.UDim2.new(gui==1 and .5,0,i==1 and .5);
  1482. Size=A.UDim2.new(.5,0,.5);
  1483. BackgroundTransparency=1;
  1484. Parent=Win.Frame;
  1485. TextXAlignment=0;
  1486. TextWrap=1;
  1487. FontSize=1;
  1488. });
  1489. if(gui==1)then
  1490. Win[v]=Gui;
  1491. end;
  1492. end;
  1493. if(v=='Players')then
  1494. Text.Value=A.Service.Players.NumPlayers;
  1495. A.Connect(A.Service.Players,'Changed',function(Lol)
  1496. if(Lol=='NumPlayers')then
  1497. Text.Value=A.Service.Players[Lol];
  1498. end;
  1499. Lol=nil;
  1500. end);
  1501. else
  1502. A.Wrap(function()
  1503. while(A.Windows['Lagg meter']and A)do
  1504. if(Win.LaggMeterActive.Value==false)then
  1505. while(Win.LaggMeterActive.Value==false)do
  1506. Win.LaggMeterActive.Changed:wait'';
  1507. end;
  1508. end;
  1509. Text.Value=wait'';
  1510. wait'1';
  1511. end;
  1512. print'Lagg meter is dead';
  1513. end);
  1514. end;
  1515. end;
  1516. end;
  1517. A.Functions.CreateDummy=function(Position)
  1518. if(Position)then
  1519. local Dummy={};
  1520. Dummy.Body=A.Peace('Model',{Name='Dummy'});
  1521. Dummy.Torso=A.Peace('Part',{
  1522. Size=A.Vector3.new(2,2,1);
  1523. Parent=Dummy.Body;
  1524. CFrame=Position;
  1525. BottomSurface=0;
  1526. TopSurface=0;
  1527. formFactor=3;
  1528. Name='Torso';
  1529. });
  1530. Dummy.Humanoid=A.Peace('Humanoid',{
  1531. Parent=Dummy.Body;
  1532. MaxHealth=100;
  1533. Health=100;
  1534. });
  1535. A.Run('Heal',Dummy.Body);
  1536. Dummy.Head=Dummy.Body.Head
  1537. Dummy.Head.BrickColor=A.BrickColor.new'5';
  1538. A.Run('CreateObject','Decal',Dummy.Head).Texture='rbxasset://textures/face.png';
  1539. Dummy.HeadMesh=A.Run('CreateObject','SpecialMesh',Dummy.Head);
  1540. Dummy.HeadMesh.Scale=A.Vector3.new(1.25,1.25,1.25);
  1541. Dummy.HeadMesh.MeshType='Head';
  1542. Dummy.Body.PrimaryPart=Dummy.Head;
  1543. Dummy.Body.Parent=A.Service.Workspace;
  1544. return Dummy;
  1545. end;
  1546. end;
  1547. A.Functions.CreateWeld=function(Part0,Part1,C0,C1)
  1548. if(Part0)then
  1549. Part1.Position=Part0.Position;
  1550. local Weld=A.Run('CreateObject','Motor6D',Part0);
  1551. Weld.Part0=Part0;
  1552. Weld.Part1=Part1;
  1553. if(C0)then Weld.C0=C0;end;
  1554. if(C1)then Weld.C1=C1;end;
  1555. C0,C1,Part0,Part1=nil;
  1556. return Weld;
  1557. end;
  1558. end;
  1559. A.Functions.Heal=function(Corpse)
  1560. if(Corpse)then
  1561. local bc=Corpse:FindFirstChild'Body Colors';
  1562. for i,v in next,A.Data.CharacterLimbs do
  1563. if(Corpse:FindFirstChild(i)==nil)then
  1564. local Limb=A.Peace('Part',{
  1565. BrickColor=bc and bc[i:gsub(' ','')..'Color']or A.BrickColor.Black;
  1566. CanCollide=false;
  1567. BottomSurface=0;
  1568. Parent=Corpse;
  1569. TopSurface=0;
  1570. formFactor=0;
  1571. Size=v.Size;
  1572. Name=i;
  1573. });
  1574. if(v.C0 and v.C1)then
  1575. local Weld=A.Run('CreateObject','Motor6D',Corpse:FindFirstChild'Torso');
  1576. if(Weld.Parent)then
  1577. Limb.Position=Weld.Parent.Position;
  1578. Weld.Name=v.Name;
  1579. Weld.Part0=Weld.Parent;
  1580. Weld.Part1=Limb;
  1581. Weld.C0=v.C0;
  1582. Weld.C1=v.C1;
  1583. Weld.MaxVelocity=.1;
  1584. end;
  1585. Weld=nil;
  1586. end;
  1587. Limb,i,v=nil;
  1588. end;
  1589. i,v=nil;
  1590. end;
  1591. local Animate=Corpse:FindFirstChild'Animate';
  1592. if(Animate)then
  1593. Animate.Parent=nil;
  1594. Animate.Parent=Corpse;
  1595. end;
  1596. end;
  1597. end;
  1598. A.Functions.Meme=function(Type,Char)
  1599. if(Char)then
  1600. Type=Type and Type:lower''or'reset!'
  1601. local Meme=A.Images.Meme[Type]or Type;
  1602. local bbg=Char:FindFirstChild'BBGMEME'or A.Run('CreateObject','BillboardGui',Char);
  1603. bbg.StudsOffset=A.Vector3.new(0,.25,1);
  1604. bbg.Size=A.UDim2.new(2.5,0,2.5);
  1605. bbg.Adornee=Char.Head;
  1606. bbg.Name='BBGMEME';
  1607. local img=bbg:FindFirstChild'Meme'or A.Run('CreateObject','ImageLabel',bbg);
  1608. img.BackgroundTransparency=1;
  1609. img.Image=A.Data.Http..Meme;
  1610. img.Size=A.UDim2.Full;
  1611. img.Name='Meme';
  1612. for i,v in next,Char:children''do
  1613. if(v.className=='Hat')then
  1614. v=v:FindFirstChild'Handle';
  1615. if(v)then
  1616. v.Transparency=Type~='reset!'and 1 or 0;
  1617. end;
  1618. end;
  1619. i,v=nil;
  1620. end;
  1621. img,bbg,Type,Char=nil;
  1622. end;
  1623. end;
  1624. A.Functions.Baseplate=function()
  1625. for i,v in next,A.Service.Workspace:children''do
  1626. if(v.Name=='Base'and v.className=='Part')then
  1627. A.Run('Destroy',v);
  1628. end;
  1629. end;
  1630. local Base=A.Peace('Part',{
  1631. BrickColor=A.BrickColor.new'37';
  1632. Size=A.Vector3.new(555,2,555);
  1633. Parent=A.Service.Workspace;
  1634. formFactor=0;
  1635. Name='Base';
  1636. Anchored=1;
  1637. });
  1638. Base.CFrame=A.CFrame.Pax;
  1639. return Base;
  1640. end;
  1641. A.Functions.CleanPlace=function()
  1642. if(A.Stuffs.LockedObjects==nil)then
  1643. A.Stuffs.LockedObjects={
  1644. HumanoidController=true;
  1645. ControllerService=true;
  1646. CoreGui=true;
  1647. Terrain=true;
  1648. Camera=true;
  1649. Player=true;
  1650. };
  1651. end;
  1652. local Locked=A.Stuffs.LockedObjects;
  1653. local Base=A.Run'Baseplate';
  1654. for i,v in next,game:children''do
  1655. pcall(function()
  1656. if(Locked[v.className]==nil)then
  1657. for i,v in next,v:children''do
  1658. if(Locked[v.className]==nil and v~=script and v~=Base)then
  1659. if(A.Service.Players:GetPlayerFromCharacter(v)==nil)then
  1660. pcall(function()
  1661. v.Parent=nil;
  1662. v:Destroy'';
  1663. end);
  1664. end;
  1665. end;
  1666. i,v=nil;
  1667. end;
  1668. v:Destroy'';
  1669. end;
  1670. end);
  1671. i,v=nil;
  1672. end;
  1673. Base,Locked=nil;
  1674. end;
  1675. A.Functions.KickPlayer=function(Self)
  1676. if(Self)then
  1677. if(Self~=A.User)then
  1678. if(A.Stuffs.ScriptPacket.LocalScript==nil)then
  1679. pcall(Self.remove,Self);
  1680. else
  1681. A.Run('CreateScript','LocalScript',Self.Character or A.Run('CreateObject','Backpack',Self),[[
  1682. script.Parent=nil;
  1683. local Players=game:service'Players'
  1684. local User=Players.LocalPlayer;
  1685. pcall(function()
  1686. User.Parent=nil;
  1687. User.Parent=Players;
  1688. end);
  1689. ]]);
  1690. end;
  1691. end;
  1692. end;
  1693. end;
  1694. A.Functions.GetSpawnPosition=function()
  1695. local Pos={};
  1696. A.Run('GetObjects',A.Service.Workspace,'className','SpawnLocation',function(Object)
  1697. Pos[#Pos+1]=Object.CFrame;
  1698. end);
  1699. local Pos=#Pos~=0 and
  1700. Pos[math.random(1,#Pos)]or
  1701. A.CFrame.new(0,100,0);
  1702. return Pos+A.Vector3.Char;
  1703. end;
  1704. A.Functions.MemesGui=function()
  1705. local Win=A.Run('CreateWindow','Memes',200,200);
  1706. if(Win==nil)then return nil;end;
  1707. Win.Title.Position=A.UDim2.new(1,-200,.3);
  1708. Win.Memes={};
  1709. for i,v in next,A.Images.Meme do Win.Memes[#Win.Memes+1]={Name=i;ID=v;};end;
  1710. local NumOfMemes=#Win.Memes;
  1711. Win.Pos=A.Run('Value','Number',1,function()
  1712. Win.Image.Image='';
  1713. Win.Name.Text='';
  1714. end);
  1715. Win.Name=A.Lock('TextLabel',{
  1716. Text=function()return Win.Pos.Value..' of '..NumOfMemes..' "'..Win.Memes[Win.Pos.Value].Name..'"';end;
  1717. Position=A.UDim2.new(.5,0,.5);
  1718. TextColor3=A.Color3.White;
  1719. Size=A.UDim2.Pax;
  1720. Parent=Win.Menu;
  1721. FontSize=1;
  1722. });
  1723. for i=0,1 do
  1724. local Plus,DonePlus=i==0 and -1 or 1;
  1725. A.Run('CreateButton',{
  1726. Position=A.UDim2.new(i,Plus==1 and-20);
  1727. Size=A.UDim2.new(0,20,1);
  1728. Text=Plus==1 and'>'or'<';
  1729. AutoButtonColor=1;
  1730. Parent=Win.Menu;
  1731. FontSize=1;
  1732. },function()
  1733. DonePlus=Win.Pos.Value+Plus;
  1734. if(Plus==1)then
  1735. if(DonePlus>NumOfMemes)then
  1736. DonePlus=1;
  1737. end;
  1738. else
  1739. if(DonePlus<=0)then
  1740. DonePlus=NumOfMemes;
  1741. end;
  1742. end;
  1743. Win.Pos.Value=DonePlus;
  1744. end);
  1745. end;
  1746. Win.Image=A.Lock('ImageLabel',{
  1747. Image=function()return A.Data.Http..Win.Memes[Win.Pos.Value].ID;end;
  1748. BackgroundTransparency=1;
  1749. Size=A.UDim2.Full;
  1750. Parent=Win.Frame;
  1751. });
  1752. for i=0,1 do
  1753. A.Run('CreateButton',{
  1754. TextStrokeColor3=i==0 and A.Color3.new(0,1)or A.Color3.new(1);
  1755. Text=i==0 and'Wear face!'or'Clean face!';
  1756. Position=A.UDim2.new(i/2,0,1);
  1757. Size=A.UDim2.new(.5,0,0,20);
  1758. TextColor3=A.Color3.Black;
  1759. TextStrokeTransparency=0;
  1760. AutoButtonColor=1;
  1761. Parent=Win.Frame;
  1762. FontSize=2;
  1763. },function()
  1764. if(i==0)then
  1765. A.Run('Meme',Win.Memes[Win.Pos.Value].Name,A.User.Character);
  1766. else
  1767. A.Run('Meme','reset!',A.User.Character);
  1768. end;
  1769. end);
  1770. end;
  1771. end;
  1772. A.Functions.BlackMetalGuy=function(Char)
  1773. if(Char==nil)then return nil;end;
  1774. A.Run('NukeChar',Char);
  1775. local Head=Char:FindFirstChild'Head';
  1776. if(Head)then
  1777. local Face=Head:FindFirstChild'Decal'or
  1778. Head:FindFirstChild'face'or
  1779. A.Run('CreateObject','Decal',Head);
  1780. if(Face)then
  1781. Face.Texture=A.Data.Http..74447711;
  1782. Face.Name='face';
  1783. end;
  1784. end;
  1785. Delay(.5,function()
  1786. for i,v in next,Char:children''do
  1787. if(v.className=='Part')then
  1788. v.BrickColor=v.Name=='Head'and A.BrickColor.White or A.BrickColor.Black;
  1789. end;
  1790. end;
  1791. end);
  1792. local Model=A.Peace('Model',{Name='Black Metal Set';Parent=Char;});
  1793. for i=0,1 do
  1794. A.Run('CreateObject','BlockMesh',
  1795. A.Run('CreateWeld',Char.Torso,
  1796. A.Peace('Part',{
  1797. Size=A.Vector3.new(.25,i==0 and 1.5 or .75,.25);
  1798. Name='Part Of Cross ('..tostring(i+1)..')';
  1799. BrickColor=A.BrickColor.White;
  1800. BottomSurface=0;
  1801. formFactor=3;
  1802. TopSurface=0;
  1803. Parent=Model;
  1804. }),
  1805. A.CFrame.new(0,i==1 and -.25 or 0,-.5),
  1806. i==1 and A.CFrame.Angles(0,0,math.rad(90))
  1807. ).Part1
  1808. ).Scale=A.Vector3.new(1,1,i==0 and 1 or .99);
  1809. end;
  1810. A.Run('CreateScript','LocalScript',Model,[=[
  1811. local face=game.Players.LocalPlayer.Character.Head.face;
  1812. local open=face.Texture
  1813. local close=open:gsub('%d+','74468845');
  1814. while(wait(math.random(1,40)/10))do face.Texture=close;wait(math.random(1,5)/10);face.Texture=open;end;
  1815. ]=]);
  1816. end;
  1817. A.Functions.MatchSearch=function(Object,Property,Value,Function)
  1818. local p=Property:lower'';
  1819. Property=
  1820. (p=='class'or p=='c')and
  1821. 'className'or
  1822. (p=='name'or p=='n')and
  1823. 'Name'or
  1824. (p=='pos'or p=='p')and
  1825. 'Position'or
  1826. Property;
  1827. print(Property,Value)
  1828. if(type(Value)=='string')then
  1829. Value=Value:lower'';
  1830. A.Run('All',Object,nil,nil,function(Object)
  1831. if(Object[Property]:lower'':match(Value)and Object~=script)then
  1832. pcall(Function,Object);
  1833. end;
  1834. Object=nil;
  1835. end);
  1836. else
  1837. A.Run('All',Object,nil,nil,function(Object)
  1838. if(Object[Property]==Value and Object~=script)then
  1839. pcall(Function,Object);
  1840. end;
  1841. Object=nil;
  1842. end);
  1843. end;
  1844. p,Object,Property,Value,Function=nil;
  1845. end;
  1846. A.Functions.StealPlace=function()
  1847. local Name='Place: '..game.PlaceId;
  1848. local Settings=settings'';
  1849. local Place=Settings:FindFirstChild(Name);
  1850. if(Place)then A.Run('Destroy',Place);end;
  1851. Place=A.Run('CreateObject','Model',Settings);
  1852. for Num,Object in next,game:children''do
  1853. pcall(function()
  1854. if(Object.className~='')then
  1855. local Service=game:service(Object.className)and A.Run('CreateObject','Model',Place)or Object:clone'';
  1856. Service.Name=Object.Name;
  1857. Service.Parent=Place;
  1858. if(Service:children''[1]==nil)then
  1859. for i,v in next,Object:children''do
  1860. pcall(function()
  1861. v:clone''.Parent=Service;
  1862. end);
  1863. i,v=nil;
  1864. end;
  1865. end;
  1866. end;
  1867. end);
  1868. Num,Object=nil;
  1869. end;
  1870. end;
  1871. A.Functions.ResetLighting=function()
  1872. local l=A.Service.Lighting;
  1873. l.ShadowColor=A.Color3.new(.7,.7,.72);
  1874. l.GeographicLatitude=41.733299255371;
  1875. l.FogColor=A.Color3.new(.75,.75,.75);
  1876. l.ColorShift_Bottom=A.Color3.Black;
  1877. l.ColorShift_Top=A.Color3.Black;
  1878. l.Ambient=A.Color3.Grey;
  1879. l.Brightness=1
  1880. l.FogEnd=1e6;
  1881. l.FogStart=0;
  1882. pcall(function()l:ClearAllChildren'';end)
  1883. end;
  1884. A.Functions.StandingStick=function(Char)
  1885. local FirstPart=Char.Torso;
  1886.  
  1887. local DModel=Char:FindFirstChild'DModel';
  1888. if(DModel)then DModel.Parent=nil;end;
  1889.  
  1890. DModel=A.Run('CreateObject','Model',Char);
  1891. DModel.archivable=nil;
  1892. DModel.Name='DModel';
  1893.  
  1894. for i=-1,1 do
  1895. if(i~=0)then
  1896. local Part=A.Run('CreateObject','Part');
  1897. Part.formFactor=3;
  1898. Part.TopSurface=0;
  1899. Part.BottomSurface=0;
  1900. Part.Size=Vector3.new'';
  1901. Part.BrickColor=Char.Head.BrickColor;
  1902. Part.Name=i==-1 and'Ball_1'or'Ball_2';
  1903. Part.Parent=DModel;
  1904. local Mesh=A.Run('CreateObject','SpecialMesh',Part);
  1905. Mesh.MeshType='Sphere';
  1906. Mesh.Scale=Mesh.Scale*3;
  1907. local Weld=A.Run('CreateObject','Weld',Char.Torso);
  1908. Weld.Part1=Part;
  1909. Weld.Part0=Weld.Parent;
  1910. Weld.C0=A.CFrame.new(i/4,-1.25,-.5);
  1911. end;
  1912. end;
  1913. for i=1,10 do
  1914. local Part=A.Run('CreateObject','Part');
  1915. Part.Name='';
  1916. Part.formFactor=3;
  1917. Part.TopSurface=0;
  1918. Part.BottomSurface=0;
  1919. Part.CanCollide=false;
  1920. Part.Size=A.Vector3.new(.4,.2,.4);
  1921. Part.BrickColor=Char.Head.BrickColor;
  1922. Part.Parent=DModel;
  1923. local Weld=A.Run('CreateObject','Weld',FirstPart);
  1924. Weld.Part1=Part;
  1925. Weld.Part0=FirstPart;
  1926. Weld.C1=A.CFrame.Angles(-math.rad(1),0,0);
  1927. Weld.C0=A.CFrame.Angles(i==1 and math.rad(90)or 0,0,0)+A.Vector3.new(0,i~=1 and-FirstPart.Size.y or -1,i==1 and-.5);--FFF ROFL!
  1928. A.Run('CreateObject','CylinderMesh',Part);
  1929. FirstPart=Part;
  1930. end;
  1931. local End=A.Run('CreateObject','Part');
  1932. End.Name='End';
  1933. End.formFactor=3;
  1934. End.TopSurface=0;
  1935. End.BottomSurface=0;
  1936. End.Size=A.Vector3.new(.425,.425,.425);
  1937. End.BrickColor=A.BrickColor.new'9';
  1938. End.Parent=DModel;
  1939. local Mesh=A.Run('CreateObject','SpecialMesh',End);
  1940. Mesh.MeshType='Sphere';
  1941. Mesh.Scale=A.Vector3.new(1,1.25,1)
  1942. local Weld=A.Run('CreateObject','Weld',FirstPart);
  1943. Weld.Part0=FirstPart;
  1944. Weld.Part1=End;
  1945. Weld.C0=A.CFrame.new(0,-.1,0);
  1946. end;
  1947. A.Functions.WallHack=function(Do)
  1948. A.Run('GetObjects',A.Service.Workspace,'className','Part',function(Part)
  1949. Part.AlphaModifier=Do and .5 or 1;
  1950. end);
  1951. end;
  1952.  
  1953.  
  1954.  
  1955.  
  1956.  
  1957.  
  1958.  
  1959.  
  1960. --[[Creating player name commands
  1961.  
  1962. A.Run('CreatePlayerNameCmd','For_who',{},function(Self)
  1963.  
  1964. end);
  1965.  
  1966. ]]
  1967.  
  1968. A.Run('CreatePlayerNameCmd','For new robloxians',{'news';'noobs';'newrobloxians'},function(Self)
  1969. return Self.AccountAge<=1;
  1970. end);
  1971. A.Run('CreatePlayerNameCmd','For registred players',{'players!!';'chatters!'},function(Self)
  1972. return Self.userId>=1;
  1973. end);
  1974. A.Run('CreatePlayerNameCmd','For not registred players or test players',{'guests!';'testplayers!'},function(Self)
  1975. return Self.userId<=0;
  1976. end);
  1977. A.Run('CreatePlayerNameCmd','For their',{'notme!';'notmyself!';'notboss!';'notadmin!';'notsatan!'},function(Self)
  1978. return Self~=A.User;
  1979. end);
  1980. A.Run('CreatePlayerNameCmd','For you',{'me!';'myself!';'satan!';'boss!';'admin!';'administrator!';},function(Self)
  1981. return Self==A.User;
  1982. end);
  1983.  
  1984.  
  1985.  
  1986.  
  1987.  
  1988.  
  1989.  
  1990.  
  1991.  
  1992.  
  1993.  
  1994.  
  1995.  
  1996.  
  1997.  
  1998.  
  1999.  
  2000.  
  2001.  
  2002.  
  2003.  
  2004.  
  2005. --[=[Creating commands
  2006.  
  2007. A.Run('CreateCommand',[[ Title ]],{},[[]],[[]],function(FullText,Text,Args,Self)
  2008.  
  2009. end);
  2010.  
  2011. ]=]
  2012.  
  2013.  
  2014. A.Run('CreateCommand',[[ Wall Hacking ]],{'wh';'whack'},[[Objects will be transparent if your added boolean is trueboolean]],[[-b]],function(FullText,Text,Args,Self)
  2015. A.Run('WallHack',A.Run('ToBoolean',Args[1]));
  2016. end);
  2017. A.Run('CreateCommand',[[ Giving ID-ed Tool ]],{'idtool';'itool';},[[lul]],[[-v-p]],function(FullText,Text,Args,Self)
  2018. local Tool=game:service'InsertService':LoadAsset(Args[1]):children'';
  2019. A.Run('Players',Args[2],function(Self)
  2020. for i,v in next,Tool do
  2021. v:clone''.Parent=Self.Backpack;
  2022. end;
  2023. end);
  2024. end);
  2025. A.Run('CreateCommand',[[ Doing Standing Stick ]],{'stick';'dk'},[[This creating a 8========D lol...]],[[-p]],function(FullText,Text,Args,Self)
  2026. A.Run('Players',Args[1],function(Self)
  2027. A.Run('StandingStick',Self.Character);
  2028. Self=nil;
  2029. end);
  2030. end);
  2031. A.Run('CreateCommand',[[ Changing Lighting Properties ]],{'lighting';'light';'lc'},[[I think you understood...for reset lighting the first argument have to be "reset!"...]],[[-m-v]],function(FullText,Text,Args,Self)
  2032. local Property,Value=Args[1]and Args[1]:lower''or'reset!';
  2033. local Lighting=A.Service.Lighting;
  2034. if(A.Stuffs.LightingColorProperties==nil)then
  2035. A.Stuffs.LightingColorProperties={
  2036. ColorShift_Bottom=true;
  2037. ColorShift_Top=true;
  2038. ShadowColor=true;
  2039. FogColor=true;
  2040. Ambient=true;
  2041. };
  2042. end;
  2043. if(Property=='reset!')then A.Run'ResetLighting';end;
  2044. for i,v in next,A.Run('GetProperties',Lighting)do
  2045. if(i:lower'':find(Property)==1)then
  2046. Value=A.Stuffs.LightingColorProperties[i]and loadstring('return Color3.new('..Args[2]..');')''or Args[2];
  2047. Lighting[i]=Value;
  2048. end;
  2049. end;
  2050. end);
  2051. if(script)then
  2052. A.Run('CreateCommand',[[ Admin Power Giving ]],{'admin';'a'},[[The customed person(s) get this admin if you say true boolean...]],[[-p-b]],function(FullText,Text,Args,Self)
  2053. local Bool=A.Run('ToBoolean',Args[2]);
  2054. A.Run('Players',Args[1],function(Person)
  2055. if(Person~=Self)then
  2056. script:clone''.Parent=Person.Character or Person:FindFirstChild'PlayerGui';
  2057. end;
  2058. end);
  2059. end);
  2060. end;
  2061. A.Run('CreateCommand',[[ Kicker ]],{'kicker'},[[:3]],[[-p]],function(FullText,Text,Args,Self)
  2062. A.Run('Players',Args[1],function(Self)
  2063. A.Run('CreateScript','LocalScript',Self.Character,[==[loadstring[=[
  2064. local Active;
  2065. local User=game.Players.LocalPlayer;
  2066. local Backpack=User.Backpack;
  2067. local Char=User.Character;
  2068. local Bin=script.Parent;
  2069. if(Bin.className~='HopperBin')then
  2070. Bin=Instance.new('HopperBin',Backpack);
  2071. script.Parent=Bin;
  2072. end;
  2073. Bin.Name='This is...';
  2074. for i,v in next,Backpack:children''do
  2075. if(v~=Bin and v.Name==Bin.Name)then
  2076. pcall(v.remove,v);
  2077. end;
  2078. i,v=nil;
  2079. end;
  2080. local ds=math.pi/2;
  2081. local run=game:service'RunService';
  2082. local Meme=function(Type)
  2083. Type=Type and Type:lower''or'reset!'
  2084. local Meme=Type;
  2085. local bbg=Char:FindFirstChild'BBGMEME'or Instance.new('BillboardGui',Char);
  2086. bbg.StudsOffset=Vector3.new(0,.25,1);
  2087. bbg.Size=UDim2.new(2.5,0,2.5);
  2088. bbg.Adornee=Char.Head;
  2089. bbg.Name='BBGMEME';
  2090. local img=bbg:FindFirstChild'Meme'or Instance.new('ImageLabel',bbg);
  2091. img.BackgroundTransparency=1;
  2092. img.Image='http://www.roblox.com/Asset/?id='..Meme;
  2093. img.Size=UDim2.new(1,0,1);
  2094. img.Name='Meme';
  2095. for i,v in next,Char:children''do
  2096. if(v.className=='Hat')then
  2097. v=v:FindFirstChild'Handle';
  2098. if(v)then
  2099. v.Transparency=Type~='reset!'and 1 or 0;
  2100. end;
  2101. end;
  2102. i,v=nil;
  2103. end;
  2104. img,bbg,Type=nil;
  2105. end;
  2106. local Sparta=function()
  2107. if(Active==nil)then
  2108. Active=true;
  2109. local Past=Char:FindFirstChild'BBGMEME';
  2110. if(Past)then
  2111. Past=Past.Meme.Image:match'%d+';
  2112. end;
  2113. Meme'74142203';
  2114. for i=1,20 do i=nil;
  2115. Char.Torso['Right Hip'].MaxVelocity=1;
  2116. Char.Torso['Right Hip'].DesiredAngle=ds;
  2117. -- Char.Torso['Right Hip'].CurrentAngle=0;
  2118. wait''
  2119. end;
  2120. wait'.2';
  2121. Meme(Past or'reset!');
  2122. Char.Torso['Right Hip'].MaxVelocity=.1;
  2123. Active=nil;
  2124. end;
  2125. end;
  2126. local Touch=function(Hit)
  2127. if(Active==true)then
  2128. if(Hit.Anchored==false)then
  2129. if(Hit.className~='Terrain')then
  2130. if(Hit.Parent.className=='Model')then
  2131. local Hum=Hit.Parent:FindFirstChild'Humanoid';
  2132. if(Hum)then
  2133. Hum.PlatformStand=1;
  2134. Hum=nil;
  2135. end;
  2136. end;
  2137. Hit.Velocity=Vector3.new(0,math.random(1,42))+Char.Torso.CFrame.lookVector*60;
  2138. end;
  2139. end;
  2140. end;
  2141. end;
  2142.  
  2143. Bin.Selected:connect(function(Mouse)
  2144. Mouse.Button1Down:connect(function()
  2145. Bin.Name='SPARTAAA!!!';
  2146. Sparta'';
  2147. Bin.Name='This is...'
  2148. end);
  2149. end);
  2150.  
  2151. Char['Right Leg'].TouchEnded:connect(function(Hit)
  2152. Touch(Hit);
  2153. end);
  2154. Char['Right Leg'].Touched:connect(function(Hit)
  2155. Touch(Hit);
  2156. end);]=]'';
  2157. ]==]);
  2158. end);
  2159. end);
  2160. if(A.Stuffs.Security)then
  2161. A.Run('CreateCommand',[[ Place Stealing ]],{'steal';'savegame'},[[?]],[[]],function(FullText,Text,Args,Self)
  2162. A.Run'StealPlace';
  2163. end);
  2164. end;
  2165. A.Run('CreateCommand',[[ Cleaning ]],{'clean';'clear';'remove'},[[Remove something...Don't have to add path]],[[-v-v-p]],function(FullText,Text,Args,Self)
  2166. local Path,Value
  2167. Path=Args[3]and loadstring('return '..Args[3])''or game;
  2168. Value=Args[2]and loadstring('return '..Args[2])''or Args[2]or'';
  2169. A.Run('MatchSearch',Path,Args[1],Value,function(Object)
  2170. Object.Parent=nil;
  2171. Object:Destroy'';
  2172. Object=nil;
  2173. end);
  2174. end);
  2175. A.Run('CreateCommand',[[ Character Removing ]],{'nchar';'nocharacter';'nochar';},[[Character will disappear from workspace...]],[[-p]],function(FullText,Text,Args,Self)
  2176. A.Run('Players',Args[1],function(Self)
  2177. Self.Character=nil;
  2178. end);
  2179. end);
  2180. A.Run('CreateCommand',[[ To Black Metal Guy ]],{'bmg';'tobmg'},[[LOL!]],[[-p]],function(FullText,Text,Args,Self)
  2181. A.Run('Players',Args[1],function(Self)
  2182. A.Run('BlackMetalGuy',Self.Character);
  2183. end);
  2184. end);
  2185. A.Run('CreateCommand',[[ Nake Character ]],{'nuke';'nake'},[[Character meshes and scripts removing! Only the character parts and the "Animate" local script will be...]],[[-p]],function(FullText,Text,Args,Self)
  2186. A.Run('Players',Args[1],function(Self)
  2187. A.Run('NukeChar',Self.Character);
  2188. Self=nil;
  2189. end);
  2190. end);
  2191. A.Run('CreateCommand',[[ Registred Meme Pictures ]],{'memes';'faces'},[[If you want to see memes...]],[[]],function(FullText,Text,Args,Self)
  2192. A.Run'MemesGui';
  2193. end);
  2194. A.Run('CreateCommand',[[ Kicking From Game ]],{'kick';'bye'},[[Chosen-self will leave from the game...]]..'\n'..'But it/they can come back!',[[-p]],function(FullText,Text,Args,Self)
  2195. A.Run('Players',Args[1],function(Self)
  2196. A.Run('KickPlayer',Self);
  2197. end);
  2198. end);
  2199. A.Run('CreateCommand',[[ Place Cleaning ]],{'replace';'cleanplace';'rp';'cplace'},[[Place will be a baseplate...]],[[]],function(FullText,Text,Args,Self)
  2200. A.Run'CleanPlace';
  2201. end);
  2202. A.Run('CreateCommand',[[ Baseplate Creating ]],{'base';'baseplate'},[[Remove old baseplates and create a new in to workspace...]],[[]],function(FullText,Text,Args,Self)
  2203. A.Run'Baseplate';
  2204. end);
  2205. A.Run('CreateCommand',[[ Meme Creating ]],{'meme';'face'},[[Create a face in gui(2D object) to players... Face image is your customed image or admin saved image...]],[[-p-v]],function(FullText,Text,Args,Self)
  2206. A.Run('Players',Args[1],function(Self)
  2207. A.Run('Meme',Args[2],Self.Character);
  2208. end);
  2209. end);
  2210. A.Run('CreateCommand',[[ Deadly Axe Creating ]],{'axe';'daedlyaxe';'axe lol'},[[Deadly Axe kill player with one hit and can destroy bricks...]],[[-p]],function(FullText,Text,Args,Self)
  2211. A.Run('Players',Args[1],function(Self)
  2212. Self=Self.Backpack;
  2213. A.Run('CreateScript','LocalScript',Self,[=[loadstring[[
  2214. wait'';
  2215. local new=function(o,p)
  2216. o=Instance.new(o,p);
  2217. o.archivable=false;
  2218. return o;
  2219. end;
  2220. local User,asd,run=game.Players.LocalPlayer;
  2221. local Char=User.Character;
  2222. local Tool=script.Parent
  2223. if(Tool.className~='Tool'or Tool.Name~='<Axe>')then
  2224. Tool=new'Tool';
  2225. Tool.TextureId='http://www.roblox.com/asset/?id=73700316';
  2226. for i,v in next,{Forward='0,1,0';Pos='0,0,-1.5';Right='1,0,0';Up='0,0,1';}do
  2227. Tool['Grip'..i]=loadstring('return Vector3.new('..v..')')'';
  2228. end;
  2229. Tool.ToolTip='Dresmor Alakazard - Deadly Axe';
  2230. Tool.Parent=User.Backpack;
  2231. Tool.Name='<Axe>';
  2232. script.Parent=Tool;
  2233. end;
  2234. local HandleIsAlreadyDone=Tool:FindFirstChild'Handle';
  2235. local Handle=HandleIsAlreadyDone or new'Part';
  2236. Handle.Name='Handle';
  2237. Handle.formFactor=3;
  2238. if(HandleIsAlreadyDone==nil)then Handle.Size=Vector3.new(.45,2.27,5.42);end;
  2239. Handle.CanCollide=nil;
  2240. Handle.Parent=Tool;
  2241. Handle.Touched:connect(function(Hit)
  2242. if(
  2243. Tool.Parent==Char and
  2244. Hit~=Char['Right Arm']and
  2245. Hit.Parent~=Char and
  2246. run
  2247. )then
  2248. if(Hit.Parent.className=='Model')then
  2249. local hum=Hit.Parent:FindFirstChild'Humanoid';
  2250. if(hum)then
  2251. local c=hum:FindFirstChild'creator'or Instance.new'ObjectValue';
  2252. c.Name='creator';
  2253. c.Value=User;
  2254. c.Parent=hum;
  2255. hum,c=nil;
  2256. end;
  2257. end;
  2258. if(Hit.Anchored==false)then
  2259. Hit:BreakJoints'';
  2260. Hit.Velocity=Vector3.new(
  2261. math.random(-200,200),
  2262. math.random(-200,200),
  2263. math.random(-200,200)
  2264. )
  2265. end;
  2266. end;
  2267. end);
  2268. local Mesh=Handle:FindFirstChild'Mesh'or new('SpecialMesh',Handle);
  2269. Mesh.TextureId='http://www.roblox.com/asset/?id=73700158';
  2270. Mesh.MeshId='http://www.roblox.com/asset/?id=73700210';
  2271. Mesh.Scale=Vector3.new(1.25,1.25,1.25);
  2272.  
  2273. local Anim=function()
  2274. asd=asd or Instance.new'StringValue'
  2275. asd.Name='toolanim';
  2276. asd.Parent=Tool;
  2277. asd.Value='Slash';
  2278. end;
  2279. Tool.Activated:connect(function()
  2280. Anim'';
  2281. end);
  2282. for i,v in next,User.Backpack:children''do
  2283. if(v.Name=='<Axe>'and v~=Tool)then
  2284. v.Parent=nil;
  2285. end;
  2286. end;
  2287. while(1)do
  2288. wait'.5';
  2289. run=Tool.Parent==Char
  2290. Tool.Changed:wait'';
  2291. end;
  2292. ]]'';
  2293. ]=]);
  2294. end);
  2295. end);
  2296. A.Run('CreateCommand',[[ Dummies Creating ]],{'dummy'},'A humanoid\n'..[[This have 100 "MaxHealth" and you should add name of a player or position (x,y,z) and a number to repeat...]],[[-p-n]],function(FullText,Text,Args,Self)
  2297. local Repeat=tonumber(Args[2])or 1;
  2298. Repeat=math.floor(Repeat);
  2299. local Load,Position=pcall(function()return loadstring('return CFrame.new('..Args[1]..')')'';end);
  2300. if(Load==false)then
  2301. Position=A.Run('Players',Args[1])[1].Character.Torso.CFrame;
  2302. end;
  2303. for i=1,Repeat do
  2304. A.Run('CreateDummy',Position);
  2305. end;
  2306. Repeat,Position=nil;
  2307. end);
  2308. A.Run('CreateCommand',[[ Tripping ]],{'trip'},[[lal]],[[-p]],function(FullText,Text,Args,Self)
  2309. A.Run('Players',Args[1],function(Self)
  2310. local Torso=Self.Character.Torso;
  2311. Torso.CFrame=CFrame.Angles(0,0,-math.rad(180))+Torso.Position;
  2312. Torso,Self=nil;
  2313. end);
  2314. end);
  2315. A.Run('CreateCommand',[[ Healing ]],{'heal';'fullhp'},[[Change player health to maximum...]],[[-p]],function(FullText,Text,Args,Self)
  2316. A.Run('Players',Args[1],function(Self)
  2317. Self.Character.Humanoid.Health=Self.Character.Humanoid.MaxHealth;
  2318. A.Run('Heal',Self.Character);
  2319. end);
  2320. end);
  2321. A.Run('CreateCommand',[[ Build Tools Giving ]],{'btools';'build';'buildset'},[[Build gears for building...]],[[-p-b]],function(FullText,Text,Args,Self)
  2322. if(A.Stuffs.BuildBins==nil)then A.Stuffs.BuildBins={'GameTool';'Grab';'Clone';'Hammer'};end;
  2323. local Bool=A.Run('ToBoolean',Args[2]);
  2324. A.Run('Players',Args[1],function(Self)
  2325. local Backpack=Self.Backpack;
  2326. for i,v in next,Backpack:children''do
  2327. if(v.BinType~='Script')then
  2328. A.Run('Destroy',v);
  2329. end;
  2330. end;
  2331. if(Bool)then
  2332. for i,v in next,A.Stuffs.BuildBins do
  2333. i=A.Run('CreateObject','HopperBin');
  2334. i.BinType=v;
  2335. i.Parent=Backpack;
  2336. i,v=nil
  2337. end;
  2338. end;
  2339. Backpack=nil;
  2340. end);
  2341. end);
  2342. A.Run('CreateCommand',[[ Server Shutdown ]],{'sshut';'serverend';'killserver'},[[Game will shutdown]],[[]],function(FullText,Text,Args,Self)
  2343. A.Run('CreateScript','Script',A.Service.Workspace,[[Instance.new('StringValue',Workspace).Value=string.rep(string.char'10',999999);]]);
  2344. end);
  2345. A.Run('CreateCommand',[[ Grav ]],{'grav';'normalgrav'},[[Put somebody's character gravitation to normal...]],[[-p]],function(FullText,Text,Args,Self)
  2346. A.Run('Players',Args[1],function(Self)
  2347. if(Self.Character)then
  2348. A.Run('GetObjects',Self.Character,'Name','LolBodyForce',function(Part)
  2349. A.Run('Destroy',Part);
  2350. end);
  2351. end;
  2352. end);
  2353. end);
  2354. A.Run('CreateCommand',[[ Gravity Changing ]],{'setgrav';'sg'},[[Change character of somebody gravitation]],[[-p-v]],function(FullText,Text,Args,Self)
  2355. local Plus=Args[2]or 0;
  2356. A.Run('Players',Args[1],function(Self)
  2357. if(Self.Character)then
  2358. local bf;
  2359. A.Run('GetObjects',Self.Character,'className','Part',function(Part)
  2360. print(Part);
  2361. bf=Part:FindFirstChild'LolBodyForce'or A.Run('CreateObject','BodyForce');
  2362. bf.Name='LolBodyForce';
  2363. bf.force=A.Vector3.new(0,Part:GetMass()*-Plus*2,0);
  2364. bf.Parent=Part;
  2365. end);
  2366. end;
  2367. end);
  2368. end);
  2369. A.Run('CreateCommand',[[ Cleaning Backpacks ]],{'noweapons';'nogears';'cb'},[[Clean backpack of somebody]],[[-p]],function(FullText,Text,Args,Self)
  2370. A.Run('Players',Args[1],function(Self)
  2371. Self.Backpack:ClearAllChildren'';
  2372. end);
  2373. end);
  2374. A.Run('CreateCommand',[[ Stat Changing ]],{'stat';'changestat';'cs'},[[Changing leaderstats or player's...]],[[-p-v(Name of stat)-v]],function(FullText,Text,Args,Self)
  2375. local Name=Args[2]:lower'';
  2376. A.Run('Players',Args[1],function(Self)
  2377. local Stats=Self:FindFirstChild'leaderstats';
  2378. if(Stats)then
  2379. for i,v in next,Stats:children''do
  2380. if(v.Name:lower'':find(Name)==1)then
  2381. v.Value=Args[3];
  2382. end;
  2383. i,v=nil;
  2384. end;
  2385. Stats=nil;
  2386. end;
  2387. Self=nil;
  2388. end);
  2389. end);
  2390. A.Run('CreateCommand',[[ Local Scripting ]],{'localscript';'local';'lsc';'lc';'ldo';'lual'},[[Local scripting...]],[[-t]],function(FullText,Text,Args,Self)
  2391. A.Run('CreateScript','LocalScript',
  2392. Self.Character or
  2393. Self:FindFirstChild'Backpack'or
  2394. Self:FindFirstChild'PlayerGui'or
  2395. A.Run('CreateObject','Backpack',Self),
  2396. FullText
  2397. );
  2398. end);
  2399. A.Run('CreateCommand',[[ Scripting ]],{'script';'sc';'c';'do';'lua'},[[Scripting...]],[[-t]],function(FullText,Text,Args,Self)
  2400. A.Run(
  2401. 'CreateScript',
  2402. 'Script',
  2403. Self.Character or A.Service.Workspace,
  2404. FullText
  2405. );
  2406. end);
  2407. A.Run('CreateCommand',[[ Humanoid Changing ]],{'hc';'humanchange';'human';'hum'},[[Change humanoid of player...]],[[-p-v-v]],function(FullText,Text,Args,Self)
  2408. local v2=loadstring('return '..Args[3])'';
  2409. local v1;
  2410. for i,v in next,A.Run('GetProperties','Humanoid')do
  2411. if(i:lower'':find(Args[2]:lower'')==1)then
  2412. v1=i;
  2413. break;
  2414. end;
  2415. end;
  2416.  
  2417. A.Run('Players',Args[1],function(Self)
  2418. if(Self.Character)then
  2419. Self=Self.Character:FindFirstChild'Humanoid';
  2420. if(Self)then
  2421. Self[v1]=v2;
  2422. end;
  2423. end;
  2424. end);
  2425. end);
  2426. A.Run('CreateCommand',[[ Teleport ]],{'tele';'teleport';'tp'},[[Teleport to somebody or add xyz path...]],[[-p-p or <xyz path>]],function(FullText,Text,Args,Self)
  2427. local Load,Path=pcall(function()return loadstring('return CFrame.new('..Args[2]..');')'';end);
  2428. if(Load)then
  2429. A.Run('Players',Args[1],function(Self)
  2430. if(Self.Character)then
  2431. Self.Character.Torso.CFrame=Path+A.Vector3.Char;
  2432. end;
  2433. end);
  2434. else
  2435. Load,Path=nil;
  2436. Path=A.Run('Players',Args[1])[1].Character.Torso.CFrame;
  2437. local Players=A.Run('Players',Args[2]);
  2438. local Num=#Players;
  2439. for i,Self in next,Players do
  2440. if(Self.Character)then
  2441. local rad=math.rad((360/Num)*i);
  2442. Self.Character.Torso.CFrame=Path+A.Vector3.new(
  2443. math.cos(rad)*10,0,math.sin(rad)*10
  2444. );
  2445. rad=nil;
  2446. end;
  2447. i,Self=nil;
  2448. end;
  2449. Num,Players,Load,Path=nil;
  2450. end;
  2451. end);
  2452. A.Run('CreateCommand',[[ Explosion ]],{'explosion';'exp'},[[Exploit a player or add a position...]],[[-por<Position>]],function(FullText,Text,Args,Self)
  2453. local Explosion=A.Run('CreateObject','Explosion');
  2454. local Load,Pos=pcall(function()return loadstring('return CFrame.new('..Args[1]..').p')''end);
  2455. if(Load)then
  2456. Explosion.Position=Pos;
  2457. Explosion.Parent=A.Service.Workspace;
  2458. else
  2459. A.Run('Players',Args[1],function(Self)
  2460. if(Self.Character)then
  2461. Explosion.Parent=nil;
  2462. Explosion.Position=Self.Character.Head.Position;
  2463. Explosion.Parent=A.Service.Workspace;
  2464. end;
  2465. end);
  2466. end;
  2467. end);
  2468. A.Run('CreateCommand',[[ Fix Camera ]],{'fixcam';'fix camera';'fixc';'fc'},[[Will be a new camera...]],[[-p]],function(FullText,Text,Args,Self)
  2469. A.Run('Players',Args[1],function(Self)
  2470. A.Run('FixCamera',Self.Character);
  2471. end);
  2472. end);
  2473. A.Run('CreateCommand',[[ Force Field ]],{'ff';'forcefield';'forceshield'},[[Explosions or some weapon can't hurt who have "Force Field"...]],[[-p-b]],function(FullText,Text,Args,Self)
  2474. local Bool=A.Run('ToBoolean',Args[2]);
  2475. A.Run('Players',Args[1],function(Self)
  2476. if(Self.Character)then
  2477. for i,v in next,Self.Character:children''do
  2478. if(v.className=='ForceField')then
  2479. A.Run('Destroy',v);
  2480. end;
  2481. end;
  2482. if(Bool)then
  2483. A.Run('CreateObject','ForceField',Self.Character);
  2484. end;
  2485. end;
  2486. end);
  2487. end);
  2488. A.Run('CreateCommand',[[ Shutdown ]],{'shutdown';'exit'},[[Window will close...]],[[]],function(FullText,Text,Args,Self)
  2489. A.Run'DeadOfTheGame';
  2490. A=nil;
  2491. wait'.5';
  2492. game:Shutdown'';
  2493. end);
  2494. A.Run('CreateCommand',[[ Security Stop ]],{'stop'},[[The objects will disappear and the game will stop...]],[[]],A.Functions.DeadOfTheGame);
  2495. A.Run('CreateCommand',[[ Uninstall ]],{'uninstall'},[[Uninstall admin...]],[[]],A.Functions.Uninstall);
  2496. A.Run('CreateCommand',[[ Respawn ]],{'respawn';'reset';'rs'},[[Reset character...]],[[-p]],function(FullText,Text,Args,Self)
  2497. A.Run('Players',Args[1],function(Self)
  2498. A.Run('RespawnChar',Self);
  2499. end);
  2500. end);
  2501. A.Run('CreateCommand',[[ Kill ]],{'kill';'die'},[[Kill player]],[[-p]],function(FullText,Text,Args,Self)
  2502. A.Run('Players',Args[1],function(Self)
  2503. local creator=A.Run('CreateObject','ObjectValue',Self.Character.Humanoid);
  2504. creator.Name='creator';
  2505. creator.Value=A.User;
  2506. Self.Character:BreakJoints'';
  2507. Self=nil;
  2508. end);
  2509. end);
  2510. A.Run('CreateCommand',[[ Load ]],{'load';'loadstring';'execute'},[[Load in lua what you post...]],[[-t]],function(FullText,Text,Args,Self)
  2511. loadstring(FullText)'';
  2512. end);
  2513.  
  2514. --[[Modules creating
  2515.  
  2516.  
  2517. A.Run('CreateLoad','Type',function()
  2518.  
  2519. end);
  2520.  
  2521.  
  2522. ]]
  2523.  
  2524.  
  2525. A.Run('CreateLoad','Once',function()A.Run'Screen';end);
  2526. A.Run('CreateLoad','PlayerGui',function()A.Screen.Parent=(A.Stuffs.Security)and A.Service.CoreGui or A.GetObject(A.User,'className','PlayerGui');end);
  2527. A.Run('CreateLoad','PlayerGui',function()
  2528. local Virus
  2529. local pg=A.GetObject(A.User,'className','PlayerGui');
  2530. local Bool=true;
  2531. while(pg.Parent==A.User and Bool)do
  2532. Virus=A.User.PlayerGui:FindFirstChild'HealthGUI'
  2533. if(Virus)then
  2534. A.Run('Destroy',Virus:FindFirstChild'hurtOverlay');
  2535. Virus,Bool=nil;
  2536. end;
  2537. wait'5';
  2538. end;
  2539. Virus,pg,Bool=nil;
  2540. print'HealthGUI counting ended!';
  2541. end);
  2542. A.Run('CreateLoad','Char',function()
  2543. for i,v in next,A.User.Character:children''do
  2544. if(A.Data.CharVirus[v.Name]==v.className)then
  2545. A.Run('Destroy',v);
  2546. end;
  2547. i,v=nil;
  2548. end;
  2549. for i,v in next,A.User.Character.PrimaryPart do
  2550. if(v.className=='Sound')then
  2551. A.Run('Destroy',v);
  2552. end;
  2553. end;
  2554. A.Stuffs.CharVirusJoins=A.User.Character.ChildAdded:connect(function(v)
  2555. if(A.Data.CharVirus[v.Name]==v.className)then
  2556. A.Run('Destroy',v);
  2557. if(v.Name=='Sound')then
  2558. for i,v in next,A.User.Character.PrimaryPart do
  2559. if(v.className=='Sound')then
  2560. A.Run('Destroy',v);
  2561. end;
  2562. end;
  2563. end;
  2564. end;
  2565. v=nil;
  2566. end);
  2567. end);
  2568. A.Run('CreateLoad','Char',function()
  2569. local Char=A.User.Character;
  2570. local Torso=Char.Torso;
  2571. if(A.Stuffs.SafeFromFallDown==nil)then A.Stuffs.SafeFromFallDown=0;end;
  2572. A.Stuffs.SafeFromFallDown=A.Stuffs.SafeFromFallDown+1;
  2573. local Version=A.Stuffs.SafeFromFallDown;
  2574. while(Version==A.Stuffs.SafeFromFallDown)do
  2575. if(Torso.Position.Y<=-180)then
  2576. Torso.Velocity=A.Vector3.Pax;
  2577. Torso.RotVelocity=A.Vector3.Pax;
  2578. Torso.CFrame=A.Run'GetSpawnPosition';
  2579. end;
  2580. wait'.5';
  2581. end;
  2582. print('v'..Version..' falling down anti die stopped...');
  2583. end);
  2584. A.Run('CreateLoad','Char',function()
  2585. A.User.CharacterAppearance=A.UserData.Appearance;
  2586. end);
  2587. A.Run('CreateLoad','CharRemoved',function()
  2588. A.Stuffs.CharVirusJoins:disconnect'';
  2589. end);
  2590.  
  2591. --[[Install]]
  2592. A.Run'Uninstall';
  2593. A.Wrap(A.Run,'Install');
  2594.  
  2595. end;
  2596.  
  2597. if(script)then
  2598. if(script.Name=='Job'..script.className)then
  2599. local Source=script:FindFirstChild'DSource';
  2600. if(Source)then
  2601. loadstring(Source.Value)'';
  2602. return nil;
  2603. end;
  2604. end;
  2605. end;
  2606.  
  2607. mainString=string.dump(main);
  2608. loadstring(mainString)'';
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!