API tools faq
paste
Advertisement
Guest User

Untitled

a guest
Nov 18th, 2019
81
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 46.88 KB | None | 0 0
raw download clone embed print report
  1.  
  2. if game:GetService("RunService"):IsClient() then error("Script must be server-side in order to work; use h/ and not hl/") end
  3. local Player,Mouse,mouse,UserInputService,ContextActionService = owner
  4. do
  5. print("FE Compatibility code by Mokiros")
  6. script.Parent = Player.Character
  7.  
  8. --RemoteEvent for communicating
  9. local Event = Instance.new("RemoteEvent")
  10. Event.Name = "UserInput_Event"
  11.  
  12. --Fake event to make stuff like Mouse.KeyDown work
  13. local function fakeEvent()
  14. local t = {_fakeEvent=true,Connect=function(self,f)self.Function=f end}
  15. t.connect = t.Connect
  16. return t
  17. end
  18.  
  19. --Creating fake input objects with fake variables
  20. local m = {Target=nil,Hit=CFrame.new(),KeyUp=fakeEvent(),KeyDown=fakeEvent(),Button1Up=fakeEvent(),Button1Down=fakeEvent()}
  21. local UIS = {InputBegan=fakeEvent(),InputEnded=fakeEvent()}
  22. local CAS = {Actions={},BindAction=function(self,name,fun,touch,...)
  23. CAS.Actions[name] = fun and {Name=name,Function=fun,Keys={...}} or nil
  24. end}
  25. --Merged 2 functions into one by checking amount of arguments
  26. CAS.UnbindAction = CAS.BindAction
  27.  
  28. --This function will trigger the events that have been :Connect()'ed
  29. local function te(self,ev,...)
  30. local t = m[ev]
  31. if t and t._fakeEvent and t.Function then
  32. t.Function(...)
  33. end
  34. end
  35. m.TrigEvent = te
  36. UIS.TrigEvent = te
  37.  
  38. Event.OnServerEvent:Connect(function(plr,io)
  39. if plr~=Player then return end
  40. if io.isMouse then
  41. m.Target = io.Target
  42. m.Hit = io.Hit
  43. else
  44. local b = io.UserInputState == Enum.UserInputState.Begin
  45. if io.UserInputType == Enum.UserInputType.MouseButton1 then
  46. return m:TrigEvent(b and "Button1Down" or "Button1Up")
  47. end
  48. for _,t in pairs(CAS.Actions) do
  49. for _,k in pairs(t.Keys) do
  50. if k==io.KeyCode then
  51. t.Function(t.Name,io.UserInputState,io)
  52. end
  53. end
  54. end
  55. m:TrigEvent(b and "KeyDown" or "KeyUp",io.KeyCode.Name:lower())
  56. UIS:TrigEvent(b and "InputBegan" or "InputEnded",io,false)
  57. end
  58. end)
  59. Event.Parent = NLS([==[
  60. local Player = game:GetService("Players").LocalPlayer
  61. local Event = script:WaitForChild("UserInput_Event")
  62.  
  63. local UIS = game:GetService("UserInputService")
  64. local input = function(io,a)
  65. if a then return end
  66. --Since InputObject is a client-side instance, we create and pass table instead
  67. Event:FireServer({KeyCode=io.KeyCode,UserInputType=io.UserInputType,UserInputState=io.UserInputState})
  68. end
  69. UIS.InputBegan:Connect(input)
  70. UIS.InputEnded:Connect(input)
  71.  
  72. local Mouse = Player:GetMouse()
  73. local h,t
  74. --Give the server mouse data 30 times every second, but only if the values changed
  75. --If player is not moving their mouse, client won't fire events
  76. while wait(1/30) do
  77. if h~=Mouse.Hit or t~=Mouse.Target then
  78. h,t=Mouse.Hit,Mouse.Target
  79. Event:FireServer({isMouse=true,Target=t,Hit=h})
  80. end
  81. end]==],Player.Character)
  82. Mouse,mouse,UserInputService,ContextActionService = m,m,UIS,CAS
  83. end
  84.  
  85. it = Instance.new
  86.  
  87.  
  88. v3=Vector3.new
  89.  
  90.  
  91. bc=BrickColor.new
  92.  
  93.  
  94. c3=Color3.new
  95.  
  96.  
  97. cn=CFrame.new
  98.  
  99.  
  100. ca=CFrame.Angles
  101.  
  102.  
  103. ca2=function(a,b,c)
  104.  
  105.  
  106. return ca(math.rad(a),math.rad(b),math.rad(c))
  107.  
  108.  
  109. end
  110.  
  111.  
  112. ti=table.insert
  113.  
  114.  
  115. tr=table.remove
  116.  
  117.  
  118. rn=math.random
  119.  
  120.  
  121. rd=math.rad
  122.  
  123.  
  124. mf=math.floor
  125.  
  126.  
  127. ud = UDim2.new
  128.  
  129.  
  130. inf=math.huge
  131.  
  132.  
  133. dg=math.deg
  134.  
  135.  
  136. mdeg=math.deg
  137.  
  138.  
  139. v310=v3(1/0,1/0,1/0)
  140.  
  141.  
  142. pi=math.pi
  143.  
  144.  
  145. w=wait
  146.  
  147.  
  148. cf=cn
  149.  
  150.  
  151. bn=bc
  152.  
  153.  
  154. ts=tostring
  155.  
  156.  
  157.  
  158.  
  159. Workspace=game:GetService("Workspace")
  160.  
  161.  
  162. Players=game:GetService("Players")
  163.  
  164.  
  165. Player=Players.LocalPlayer
  166.  
  167.  
  168. Lighting=game:GetService("Lighting")
  169.  
  170.  
  171. Debris=game:GetService("Debris")
  172.  
  173.  
  174.  
  175.  
  176. work=Workspace
  177.  
  178.  
  179. server=Players
  180.  
  181.  
  182. tb=Player
  183.  
  184.  
  185. lighting=Lighting
  186.  
  187.  
  188. deb=Debris
  189.  
  190.  
  191.  
  192.  
  193. asset = "http://www.roblox.com/asset/?id="
  194.  
  195.  
  196. Asset=asset
  197.  
  198.  
  199.  
  200.  
  201. ids = {}
  202.  
  203.  
  204. ids.Shoot = 10209633
  205.  
  206.  
  207. ids.Reload = 10209636
  208.  
  209.  
  210. ids.Crown = 20329976
  211.  
  212.  
  213. ids.Crown2 = 1323306
  214.  
  215.  
  216. ids.Icon = 52611635
  217.  
  218.  
  219. ids.Explode = 2697431
  220.  
  221.  
  222. ids.Ring = 3270017
  223.  
  224.  
  225.  
  226.  
  227. for i,v in pairs(ids) do
  228.  
  229.  
  230. if type(v)=='number' then
  231.  
  232.  
  233. ids[i]='http://www.roblox.com/asset/?id='..v
  234.  
  235.  
  236. end
  237.  
  238.  
  239. game:GetService("ContentProvider"):Preload(ids[i])
  240.  
  241.  
  242. end
  243.  
  244.  
  245.  
  246.  
  247. qi = function(ttz)
  248.  
  249.  
  250. local qii = it(ttz[1]) table.foreach(ttz,function(oi,oi2)
  251.  
  252.  
  253. if oi ~= 1 and oi ~= 2 then qii[oi] = oi2 end end) qii.Parent=ttz[2] return qii end
  254.  
  255.  
  256.  
  257.  
  258. q = function(f)
  259.  
  260.  
  261. coroutine.resume(coroutine.create(function() f() end)) end
  262.  
  263.  
  264.  
  265.  
  266.  
  267. ft = function(tablez,item)
  268.  
  269.  
  270. for i=1,#tablez do if tablez[i] == item then return i end end return nil end
  271.  
  272.  
  273.  
  274.  
  275. ft2 = function(tablez,item)
  276.  
  277.  
  278. for i=1,#tablez do if tablez[i][1] == item then return i end end return nil end
  279.  
  280.  
  281.  
  282.  
  283. pa = function(pa,pn,sh,x,y,z,c,a,tr,re,bc2)
  284.  
  285.  
  286. local fp=nil
  287.  
  288.  
  289. if sh ~= "Wedge" and sh ~= "CornerWedge" and sh ~= "VehicleSeat" and sh ~= "Seat" then
  290.  
  291.  
  292. fp=it("Part",pa)
  293.  
  294.  
  295. fp.Shape=sh or "Block"
  296.  
  297.  
  298. fp.formFactor="Custom"
  299.  
  300.  
  301. elseif sh == "Wedge" then
  302.  
  303.  
  304. fp=it("WedgePart",pa)
  305.  
  306.  
  307. fp.formFactor="Custom"
  308.  
  309.  
  310. elseif sh == "CornerWedge" then
  311.  
  312.  
  313. fp=it("CornerWedgePart",pa)
  314.  
  315.  
  316. elseif sh == "VehicleSeat" then
  317.  
  318.  
  319. fp=it("VehicleSeat",pa)
  320.  
  321.  
  322. elseif sh == "Seat" then
  323.  
  324.  
  325. fp=it("Seat",pa)
  326.  
  327.  
  328. end
  329.  
  330.  
  331. fp.Size=v3(x or 4,y or 2,z or 2)
  332.  
  333.  
  334. fp.Friction = 2
  335.  
  336.  
  337. fp.CanCollide=c or true
  338.  
  339.  
  340. fp.Anchored=a or false
  341.  
  342.  
  343. fp.BrickColor=bc(bc2 or "")
  344.  
  345.  
  346. fp.Transparency=tr or 0
  347.  
  348.  
  349. fp.Reflectance=re or 0
  350.  
  351.  
  352. fp.BottomSurface=0
  353.  
  354.  
  355. fp.Name=pn or "TBLib Part"
  356.  
  357.  
  358. fp.Locked = true
  359.  
  360.  
  361. fp.TopSurface=0
  362.  
  363.  
  364. fp.CFrame=cn(0,0,0)
  365.  
  366.  
  367. fp:BreakJoints()
  368.  
  369.  
  370. fp.Anchored = a
  371.  
  372.  
  373. return fp
  374.  
  375.  
  376. end
  377.  
  378.  
  379.  
  380.  
  381. function ClearClass(Object,Class)
  382.  
  383.  
  384. for _,v in pairs(Object:GetChildren()) do
  385.  
  386.  
  387. if v:IsA(Class) then
  388.  
  389.  
  390. v:Destroy()
  391.  
  392.  
  393. end
  394.  
  395.  
  396. end
  397.  
  398.  
  399. end
  400.  
  401.  
  402.  
  403.  
  404. function GetClass(Object,Class)
  405.  
  406.  
  407. for _,v in pairs(Object:GetChildren()) do
  408.  
  409.  
  410. if v:IsA(Class) then
  411.  
  412.  
  413. return v
  414.  
  415.  
  416. end
  417.  
  418.  
  419. end
  420.  
  421.  
  422. end
  423.  
  424.  
  425.  
  426.  
  427. function re(par,obj)
  428.  
  429.  
  430. if par:findFirstChild(obj) then
  431.  
  432.  
  433. par[obj]:Remove''
  434.  
  435.  
  436. end
  437.  
  438.  
  439. end
  440.  
  441.  
  442.  
  443.  
  444. function invis(o)
  445.  
  446.  
  447. for i,v in pairs(o:children()) do
  448.  
  449.  
  450. if v:IsA("BasePart") then
  451.  
  452.  
  453. v.Transparency=1
  454.  
  455.  
  456. end
  457.  
  458.  
  459. invis(v)
  460.  
  461.  
  462. end
  463.  
  464.  
  465. end
  466.  
  467.  
  468.  
  469.  
  470. function newhats(p,o,o2)
  471.  
  472.  
  473. for i,v in pairs(p:children()) do
  474.  
  475.  
  476. if v:IsA("Hat") then
  477.  
  478.  
  479. local np=v.Handle:Clone''
  480.  
  481.  
  482. np.Transparency=0
  483.  
  484.  
  485. np.Mesh.Scale=np.Mesh.Scale*1.04
  486.  
  487.  
  488. np.Parent=o
  489.  
  490.  
  491. np.CFrame=v.Handle.CFrame
  492.  
  493.  
  494. np.Name="Hat"
  495.  
  496.  
  497. stick2(np,o2,o)
  498.  
  499.  
  500. end
  501.  
  502.  
  503. end
  504.  
  505.  
  506. end
  507.  
  508.  
  509.  
  510.  
  511. fade = function(prt,incr)
  512.  
  513.  
  514. q(function()
  515.  
  516.  
  517. for i=prt.Transparency,1,incr do
  518.  
  519.  
  520. prt.Transparency=i
  521.  
  522.  
  523. wait()
  524.  
  525.  
  526. end
  527.  
  528.  
  529. prt:Remove''
  530.  
  531.  
  532. end)
  533.  
  534.  
  535. end
  536.  
  537.  
  538.  
  539.  
  540.  
  541. function weld(pa,p0,p1,x,y,z,a,b,c)
  542.  
  543.  
  544. local fw=it("Weld",pa)
  545.  
  546.  
  547. fw.Part0=p0
  548.  
  549.  
  550. fw.Part1=p1
  551.  
  552.  
  553. fw.C0=cn(x,y,z)*ca(a,b,c)
  554.  
  555.  
  556. return fw
  557.  
  558.  
  559. end
  560.  
  561.  
  562.  
  563.  
  564.  
  565.  
  566. stick = function(hit2,hit)
  567.  
  568.  
  569. return qi({"Weld",hit2,Part0=hit2,Part1=hit,C0=hit2.CFrame:inverse()*cn(hit2.Position),C1=hit.CFrame:inverse()*cn(hit2.Position)})
  570.  
  571.  
  572. end
  573.  
  574.  
  575.  
  576.  
  577. function stick2(hit2,hit,tostick)
  578.  
  579.  
  580. local weld=it("Weld")
  581.  
  582.  
  583. weld.Part0=tostick
  584.  
  585.  
  586. weld.Part1=hit2
  587.  
  588.  
  589. local HitPos=hit.Position
  590.  
  591.  
  592. local CJ=cn(HitPos)
  593.  
  594.  
  595. local C0=hit2.CFrame:inverse() *CJ
  596.  
  597.  
  598. local C1=hit.CFrame:inverse() * CJ weld.C0=C1
  599.  
  600.  
  601. weld.C1=C0
  602.  
  603.  
  604. weld.Parent=hit2
  605.  
  606.  
  607. end
  608.  
  609.  
  610.  
  611.  
  612. ray = function(Pos, Dir,tab)
  613.  
  614.  
  615. return workspace:FindPartOnRay(Ray.new(Pos, Dir.unit *999),tab)
  616.  
  617.  
  618. end
  619.  
  620.  
  621.  
  622.  
  623.  
  624. function rtab(tabz,obj)
  625.  
  626.  
  627. for i=1,#tabz do
  628.  
  629.  
  630. if tabz[i] == obj then
  631.  
  632.  
  633. tr(tabz,i)
  634.  
  635.  
  636. break
  637.  
  638.  
  639. end
  640.  
  641.  
  642. end
  643.  
  644.  
  645. end
  646.  
  647.  
  648.  
  649.  
  650. sTrail={}
  651.  
  652.  
  653. function Trail2(lopz,ob,waitz,col,thickz,ofz) cw(function() ti(sTrail,ob)
  654.  
  655.  
  656. local oldpos=(ob.CFrame *ofz).p local lopz2=0
  657.  
  658.  
  659. local function loltr() local obp=(ob.CFrame *ofz).p lopz2=lopz2 + 1
  660.  
  661.  
  662. local mag=(oldpos - obp).magnitude
  663.  
  664.  
  665. local tr=pa(ob,"trail","Block",0,0,0,false,false,0.5,0.15,col) tr.Anchored=true
  666.  
  667.  
  668. tr.CFrame=cn(oldpos,obp)
  669.  
  670.  
  671. tr.CFrame=tr.CFrame + tr.CFrame.lookVector* (mag/2)
  672.  
  673.  
  674. local trm=it("CylinderMesh",tr) trm.Scale=v3(5*thickz,mag*5,5*thickz)
  675.  
  676.  
  677. cw(function() for i=5*thickz,0,-5*thickz/10 do trm.Scale=v3(i,mag*5,i) w() end tr:Remove'' end)
  678.  
  679.  
  680. tr.CFrame=tr.CFrame *ca(rd(90),0,0) oldpos=obp end
  681.  
  682.  
  683. repeat loltr()
  684.  
  685.  
  686. wait(waitz) until ft(sTrail,ob) == nil or lopz2 == lopz loltr() end) end
  687.  
  688.  
  689.  
  690.  
  691. Trail = function(ob,times,waitz,col,thickz,ofz) -- Brick Trail
  692.  
  693.  
  694. q(function()
  695.  
  696.  
  697. local oldpos=(ob.CFrame *ofz).p
  698.  
  699.  
  700. for i=1,times do
  701.  
  702.  
  703. if effon==true then
  704.  
  705.  
  706. local obp=(ob.CFrame *ofz).p
  707.  
  708.  
  709. local mag=(oldpos - obp).magnitude
  710.  
  711.  
  712. local tr=pa(ob,"trail","Block",0,0,0,false,false,0.5,0.15,col)
  713.  
  714.  
  715. tr.Anchored=true
  716.  
  717.  
  718. tr.CFrame=cn(oldpos,obp)
  719.  
  720.  
  721. tr.CFrame=tr.CFrame + tr.CFrame.lookVector* (mag/2)
  722.  
  723.  
  724. trm=it("CylinderMesh",tr)
  725.  
  726.  
  727. trm.Scale=v3(thickz,mag*5,thickz)
  728.  
  729.  
  730. q(function()
  731.  
  732.  
  733. for i=thickz,0,thickz/10 do
  734.  
  735.  
  736. trm.Scale=v3(i,mag*5,i)
  737.  
  738.  
  739. wait()
  740.  
  741.  
  742. end
  743.  
  744.  
  745. tr:Remove''
  746.  
  747.  
  748. end)
  749.  
  750.  
  751. tr.CFrame=tr.CFrame *ca(rd(90),0,0)
  752.  
  753.  
  754. oldpos=obp wait(waitz)
  755.  
  756.  
  757. end
  758.  
  759.  
  760. end
  761.  
  762.  
  763. end)
  764.  
  765.  
  766. end
  767.  
  768.  
  769.  
  770.  
  771. de = function(it,ti) game:service'Debris':AddItem(it,ti) end -- Debris
  772.  
  773.  
  774.  
  775.  
  776. GlowMesh = function(anch,meshid2,rootz,mv3,colzz,adjus,l1,l2,l3) q(function() -- Glowmesh
  777.  
  778.  
  779. local spi=pa(rootz,"glowmesh","Block",mv3.X,mv3.Y,mv3.Z,false,false,l1,0,colzz) local spim=it("SpecialMesh",spi) spi.CanCollide=false if meshid2:lower()=="sphere" then spim.MeshType="Sphere" elseif meshid2:lower()=="block" then spim=it("BlockMesh",spi) else spim.MeshType="FileMesh" spim.MeshId=meshid2 end
  780.  
  781.  
  782. if anch then local spiw=qi({"Weld",spi,Part0=rootz,Part1=spi}) spiw.C0 =spiw.C0 *adjus else spi.Anchored=true spi.CFrame=adjus end
  783.  
  784.  
  785. for i=l1,l2,l3 do spi.Transparency=i spim.Scale=mv3*(i+0.3) wait() end spi:Remove'' end)
  786.  
  787.  
  788. end
  789.  
  790.  
  791.  
  792.  
  793. DetectSurface = function(pos, part) -- Surface Detector
  794.  
  795.  
  796. local surface = nil local pospos = part.CFrame
  797.  
  798.  
  799. local pos2 = pospos:pointToObjectSpace(pos) local siz = part.Size local shaep = part.Shape
  800.  
  801.  
  802. if shaep == Enum.PartType.Ball or shaep == Enum.PartType.Cylinder then
  803.  
  804.  
  805. surface = {"Anything", cn(pospos.p, pos)*cn(0, 0, -(pospos.p - pos).magnitude+0.12)*ca(rd(-90), 0, 0)}
  806.  
  807.  
  808. else if pos2.Y > ((siz.Y/2)-0.01) then surface = {"Top", ca(0, 0, 0)}
  809.  
  810.  
  811. elseif pos2.Y < -((siz.Y/2)-0.01) then surface = {"Bottom", ca(-math.pi, 0, 0)} elseif pos2.X > ((siz.X/2)-0.01) then surface = {"Right", ca(0, 0, rd(-90))}
  812.  
  813.  
  814. elseif pos2.X < -((siz.X/2)-0.01) then surface = {"Left", ca(0, 0, rd(90))} elseif pos2.Z > ((siz.Z/2)-0.01) then surface = {"Back", ca(rd(90), 0, 0)} elseif pos2.Z < -((siz.Z/2)-0.01) then surface = {"Front", ca(rd(-90), 0, 0)} end end return surface end
  815.  
  816.  
  817.  
  818.  
  819. BulletHole = function(HitPos,HitObj,sc,img,par) -- Bullethole function
  820.  
  821.  
  822. local Surface = DetectSurface(HitPos, HitObj)
  823.  
  824.  
  825. local C = cn(HitPos) * ca(HitObj.CFrame:toEulerAnglesXYZ()) * Surface[2]
  826.  
  827.  
  828. if Surface[1] == "Anything" then C = Surface[2] end local theimg = img or ds.BulletHole
  829.  
  830.  
  831. local bl = pa(workspace or par,"bullethole","Block",sc,0,sc,false,true,1,0,"") qi({"Decal",bl,Face="Top",Texture=theimg})
  832.  
  833.  
  834. bl.CFrame = C*cn(0,-0.1,0) if not HitObj.Anchored then bl.Anchored = false stick(bl,HitObj) bl.ChildRemoved:connect(function() bl:Remove() end) end q(function() wait(5) for i=0,1,0.05 do bl.Size=v3(-i*sc,0,-i*sc) wait() end de(bl,0) end)
  835.  
  836.  
  837. end
  838.  
  839.  
  840.  
  841.  
  842. so = function(id,par,vol,pit) q(function() -- Sound maker
  843.  
  844.  
  845. local sou = qi({"Sound",par or workspace,Volume=vol,Pitch=pit or 1,SoundId=id})
  846.  
  847.  
  848. wait() sou:play() wait(6) sou:Remove() end) end
  849.  
  850.  
  851.  
  852.  
  853. -- local/so(asset..ds.GothicMusic,workspace,1,2.6)
  854.  
  855.  
  856.  
  857.  
  858. function GetRegion(p0,p1,f,f2) q(function()
  859.  
  860.  
  861. for i,v in pairs(workspace:FindPartsInRegion3(Region3.new(p0,p1),c,100) ) do if v.Parent:findFirstChild("Humanoid") and v.Parent.Humanoid.Health > 0 and v.Parent:findFirstChild("Torso") then q(function() f(v.Parent) end) elseif f2 and v.Parent.Parent:findFirstChild("Humanoid") == nil then f2(v) end end
  862.  
  863.  
  864. end) end
  865.  
  866.  
  867.  
  868.  
  869.  
  870. FindGround = function(pos) -- ground finder
  871.  
  872.  
  873. local ax,ay,az = pos:toEulerAnglesXYZ()
  874.  
  875.  
  876. local bhit,bpos=ray(pos.p,pos.p - (pos.p + v3(0,200,0)))
  877.  
  878.  
  879. if bhit and bpos then
  880.  
  881.  
  882. return cn(bpos)*ca(ax,ay,az)
  883.  
  884.  
  885. end
  886.  
  887.  
  888. return nil
  889.  
  890.  
  891. end
  892.  
  893.  
  894.  
  895.  
  896. function NPC(Name, Position) -- npc maker
  897.  
  898.  
  899. local Character = Instance.new("Model")
  900.  
  901.  
  902. Character.Name = Name
  903.  
  904.  
  905. local Humanoid = Instance.new("Humanoid")
  906.  
  907.  
  908. Humanoid.Parent = Character
  909.  
  910.  
  911. local Template = Instance.new("Part")
  912.  
  913.  
  914. Template.FormFactor = "Custom"
  915.  
  916.  
  917. Template.Size = Vector3.new(1, 2, 1)
  918.  
  919.  
  920. Template.Locked = true
  921.  
  922.  
  923. local Head = Template:Clone()
  924.  
  925.  
  926. Head.Name = "Head"
  927.  
  928.  
  929. Head.TopSurface = "Smooth"
  930.  
  931.  
  932. Head.BottomSurface = "Smooth"
  933.  
  934.  
  935. Head.Size = Vector3.new(2, 1, 1)
  936.  
  937.  
  938. Head.Parent = Character
  939.  
  940.  
  941. local Mesh = Instance.new("SpecialMesh")
  942.  
  943.  
  944. Mesh.MeshType = "Head"
  945.  
  946.  
  947. Mesh.Scale = Vector3.new(1.25, 1.25, 1.25)
  948.  
  949.  
  950. Mesh.Parent = Head
  951.  
  952.  
  953. local Face = Instance.new("Decal")
  954.  
  955.  
  956. Face.Name = "face"
  957.  
  958.  
  959. Face.Texture = "rbxasset://textures/face.png"
  960.  
  961.  
  962. Face.Parent = Head
  963.  
  964.  
  965. local Torso = Template:Clone()
  966.  
  967.  
  968. Torso.Name = "Torso"
  969.  
  970.  
  971. Torso.LeftSurface = "Weld"
  972.  
  973.  
  974. Torso.RightSurface = "Weld"
  975.  
  976.  
  977. Torso.CFrame = CFrame.new(0, 10000, 0)
  978.  
  979.  
  980. Torso.Size = Vector3.new(2, 2, 1)
  981.  
  982.  
  983. Torso.Parent = Character
  984.  
  985.  
  986. local TShirt = Instance.new("Decal")
  987.  
  988.  
  989. TShirt.Name = "roblox"
  990.  
  991.  
  992. TShirt.Parent = Torso
  993.  
  994.  
  995. local LeftArm = Template:Clone()
  996.  
  997.  
  998. LeftArm.Name = "Left Arm"
  999.  
  1000.  
  1001. LeftArm.Parent = Character
  1002.  
  1003.  
  1004. local RightArm = Template:Clone()
  1005.  
  1006.  
  1007. RightArm.Name = "Right Arm"
  1008.  
  1009.  
  1010. RightArm.Parent = Character
  1011.  
  1012.  
  1013. local LeftLeg = Template:Clone()
  1014.  
  1015.  
  1016. LeftLeg.Name = "Left Leg"
  1017.  
  1018.  
  1019. LeftLeg.Parent = Character
  1020.  
  1021.  
  1022. local RightLeg = Template:Clone()
  1023.  
  1024.  
  1025. RightLeg.Name = "Right Leg"
  1026.  
  1027.  
  1028. RightLeg.Parent = Character
  1029.  
  1030.  
  1031. Character:BreakJoints()
  1032.  
  1033.  
  1034. local Neck = Instance.new("Weld")
  1035.  
  1036.  
  1037. Neck.Name = "Neck"
  1038.  
  1039.  
  1040. Neck.Part0 = Torso
  1041.  
  1042.  
  1043. Neck.Part1 = Head
  1044.  
  1045.  
  1046. Neck.C0 = CFrame.new(0, 1.5, 0)
  1047.  
  1048.  
  1049. Neck.Parent = Torso
  1050.  
  1051.  
  1052. local LeftShoulder = Instance.new("Motor")
  1053.  
  1054.  
  1055. LeftShoulder.Name = "Left Shoulder"
  1056.  
  1057.  
  1058. LeftShoulder.Part0 = Torso
  1059.  
  1060.  
  1061. LeftShoulder.Part1 = LeftArm
  1062.  
  1063.  
  1064. LeftShoulder.MaxVelocity = 0.1
  1065.  
  1066.  
  1067. LeftShoulder.C0 = CFrame.new(-Torso.Size.x / 2 - RightArm.Size.x / 2, LeftArm.Size.y / 4, 0) * CFrame.fromEulerAnglesXYZ(0, -math.pi / 2, 0)
  1068.  
  1069.  
  1070. LeftShoulder.C1 = CFrame.new(0, LeftArm.Size.y / 4, 0) * CFrame.fromEulerAnglesXYZ(0, -math.pi / 2, 0)
  1071.  
  1072.  
  1073. LeftShoulder.Parent = Torso
  1074.  
  1075.  
  1076. local RightShoulder = Instance.new("Motor")
  1077.  
  1078.  
  1079. RightShoulder.Name = "Right Shoulder"
  1080.  
  1081.  
  1082. RightShoulder.Part0 = Torso
  1083.  
  1084.  
  1085. RightShoulder.Part1 = RightArm
  1086.  
  1087.  
  1088. RightShoulder.MaxVelocity = 0.1
  1089.  
  1090.  
  1091. RightShoulder.C0 = CFrame.new(Torso.Size.x / 2 + RightArm.Size.x / 2, RightArm.Size.y / 4, 0) * CFrame.fromEulerAnglesXYZ(0, math.pi / 2, 0)
  1092.  
  1093.  
  1094. RightShoulder.C1 = CFrame.new(0, RightArm.Size.y / 4, 0) * CFrame.fromEulerAnglesXYZ(0, math.pi / 2, 0)
  1095.  
  1096.  
  1097. RightShoulder.Parent = Torso
  1098.  
  1099.  
  1100. local LeftHip = Instance.new("Motor")
  1101.  
  1102.  
  1103. LeftHip.Name = "Left Hip"
  1104.  
  1105.  
  1106. LeftHip.Part0 = Torso
  1107.  
  1108.  
  1109. LeftHip.Part1 = LeftLeg
  1110.  
  1111.  
  1112. LeftHip.MaxVelocity = 0.1
  1113.  
  1114.  
  1115. LeftHip.C0 = CFrame.new(-LeftLeg.Size.x / 2, -LeftLeg.Size.y / 2, 0) * CFrame.fromEulerAnglesXYZ(0, -math.pi / 2, 0)
  1116.  
  1117.  
  1118. LeftHip.C1 = CFrame.new(0, LeftLeg.Size.y / 2, 0) * CFrame.fromEulerAnglesXYZ(0, -math.pi / 2, 0)
  1119.  
  1120.  
  1121. LeftHip.Parent = Torso
  1122.  
  1123.  
  1124. local RightHip = Instance.new("Motor")
  1125.  
  1126.  
  1127. RightHip.Name = "Right Hip"
  1128.  
  1129.  
  1130. RightHip.Part0 = Torso
  1131.  
  1132.  
  1133. RightHip.Part1 = RightLeg
  1134.  
  1135.  
  1136. RightHip.MaxVelocity = 0.1
  1137.  
  1138.  
  1139. RightHip.C0 = CFrame.new(RightLeg.Size.x / 2, -RightLeg.Size.y / 2, 0) * CFrame.fromEulerAnglesXYZ(0, math.pi / 2, 0)
  1140.  
  1141.  
  1142. RightHip.C1 = CFrame.new(0, RightLeg.Size.y / 2, 0) * CFrame.fromEulerAnglesXYZ(0, math.pi / 2, 0)
  1143.  
  1144.  
  1145. RightHip.Parent = Torso
  1146.  
  1147.  
  1148. local BodyColors = Instance.new("BodyColors")
  1149.  
  1150.  
  1151. BodyColors.LeftArmColor = BrickColor.new("Bright yellow")
  1152.  
  1153.  
  1154. BodyColors.RightArmColor = BrickColor.new("Bright yellow")
  1155.  
  1156.  
  1157. BodyColors.LeftLegColor = BrickColor.new("Br. yellowish green")
  1158.  
  1159.  
  1160. BodyColors.RightLegColor = BrickColor.new("Br. yellowish green")
  1161.  
  1162.  
  1163. BodyColors.HeadColor = BrickColor.new("Bright yellow")
  1164.  
  1165.  
  1166. BodyColors.TorsoColor = BrickColor.new("Bright blue")
  1167.  
  1168.  
  1169. BodyColors.Parent = Character
  1170.  
  1171.  
  1172. Character.Parent = Workspace
  1173.  
  1174.  
  1175. Character:MoveTo(Position)
  1176.  
  1177.  
  1178. Character:MoveTo(Torso.Position + Vector3.new(0, 3, 0))
  1179.  
  1180.  
  1181. return Character
  1182.  
  1183.  
  1184. end
  1185.  
  1186.  
  1187.  
  1188.  
  1189. AddBV=function(str,cfr,par,debt)
  1190.  
  1191.  
  1192. if not par then return end
  1193.  
  1194.  
  1195. if par:findFirstChild'LibBV' then par.LibBV:Remove() end
  1196.  
  1197.  
  1198. tbbodyvelocity=qi{'BodyVelocity',par,velocity=cfr.lookVector*str,maxForce=v3(1/0,1/0,1/0),Name='LibBV'} deb:AddItem(tbbodyvelocity,debt)
  1199.  
  1200.  
  1201. end
  1202.  
  1203.  
  1204.  
  1205.  
  1206. AddBG=function(str,par,debt)
  1207.  
  1208.  
  1209. if not par then return end
  1210.  
  1211.  
  1212. if par:findFirstChild'LibBG' then par.LibBG:Remove() end
  1213.  
  1214.  
  1215. tbbodygyro=qi{'BodyGyro',par,maxTorque=v3(1/0,1/0,1/0),P=100000,cframe=str,Name='LibBG'} deb:AddItem(tbbodygyro,debt)
  1216.  
  1217.  
  1218. end
  1219.  
  1220.  
  1221.  
  1222.  
  1223. AddBAV=function(vec3,par,debt)
  1224.  
  1225.  
  1226. if not par then return end
  1227.  
  1228.  
  1229. if par:findFirstChild'LibBAV' then par.LibBAV:Remove() end
  1230.  
  1231.  
  1232. tbbodyangularvelocity=qi{'BodyAngularVelocity',par,maxTorque=v3(1/0,1/0,1/0),angularvelocity=vec3,Name='LibBAV'} deb:AddItem(tbbodyangularvelocity,debt)
  1233.  
  1234.  
  1235. end
  1236.  
  1237.  
  1238.  
  1239.  
  1240. Dmg = function(Hum,Dealt,Critical)
  1241.  
  1242.  
  1243. local HM=Hum.Parent
  1244.  
  1245.  
  1246. local HMT,HMB=HM:findFirstChild'Torso',HM:findFirstChild'Block'
  1247.  
  1248.  
  1249. local Blocks=HMB and HMB.Value>0
  1250.  
  1251.  
  1252. if HMT then
  1253.  
  1254.  
  1255. local mm=qi{'Model',HMT} qi{'Humanoid',mm,MaxHealth=0} deb:AddItem(mm,1)
  1256.  
  1257.  
  1258. local mp= qi{'Part',mm,Name='Head',formFactor="Custom",Anchored=true,CanCollide=false,Size=v3(1,0.2,1),CFrame=HMT.CFrame*cn(rn(-100,100)/50,3,rn(-100,100)/50)} qi{'BlockMesh',mp}
  1259.  
  1260.  
  1261. if Blocks then
  1262.  
  1263.  
  1264. mm.Name='Block!'
  1265.  
  1266.  
  1267. mp.BrickColor=bn'Bright blue'
  1268.  
  1269.  
  1270. HMB.Value=HMB.Value-1
  1271.  
  1272.  
  1273. elseif not Blocks then
  1274.  
  1275.  
  1276. mm.Name=Dealt
  1277.  
  1278.  
  1279. mp.BrickColor=bn'Bright red'
  1280.  
  1281.  
  1282. end
  1283.  
  1284.  
  1285. end
  1286.  
  1287.  
  1288. if not Blocks then
  1289.  
  1290.  
  1291. Hum:TakeDamage(Dealt)
  1292.  
  1293.  
  1294. end
  1295.  
  1296.  
  1297. end
  1298.  
  1299.  
  1300.  
  1301.  
  1302. GetHum = function(part)
  1303.  
  1304.  
  1305. local Hum,HT,block
  1306.  
  1307.  
  1308. for i,v in pairs(part.Parent:children()) do
  1309.  
  1310.  
  1311. if v:IsA("Humanoid") then
  1312.  
  1313.  
  1314. Hum=v
  1315.  
  1316.  
  1317. elseif v.Name=='Torso' then
  1318.  
  1319.  
  1320. HT=v
  1321.  
  1322.  
  1323. elseif v.Name=='Block' and v:IsA("NumberValue") then
  1324.  
  1325.  
  1326. block=v
  1327.  
  1328.  
  1329. end
  1330.  
  1331.  
  1332. end
  1333.  
  1334.  
  1335. return Hum,HT,block
  1336.  
  1337.  
  1338. end
  1339.  
  1340.  
  1341.  
  1342.  
  1343. Lightning = function(p0,p1,tym,ofs,col,th,tra) -- start end times offset color thickness
  1344.  
  1345.  
  1346. local magz = (p0 - p1).magnitude local curpos = p0 local trz = {-ofs,ofs}
  1347.  
  1348.  
  1349. for i=1,tym do
  1350.  
  1351.  
  1352. local li = it("Part",c) li.TopSurface =0 li.BottomSurface = 0 li.Anchored = true li.Transparency = tra or 0.4 li.BrickColor = bc(col)
  1353.  
  1354.  
  1355. li.formFactor = "Custom" li.CanCollide = false li.Size = v3(th,th,magz/tym) local ofz = v3(trz[rn(1,2)],trz[rn(1,2)],trz[rn(1,2)])
  1356.  
  1357.  
  1358. local trolpos = cn(curpos,p1)*cn(0,0,magz/tym).p+ofz
  1359.  
  1360.  
  1361. if tym == i then
  1362.  
  1363.  
  1364. local magz2 = (curpos - p1).magnitude li.Size = v3(th,th,magz2)
  1365.  
  1366.  
  1367. li.CFrame = cn(curpos,p1)*cn(0,0,-magz2/2)
  1368.  
  1369.  
  1370. else
  1371.  
  1372.  
  1373. li.CFrame = cn(curpos,trolpos)*cn(0,0,magz/tym/2)
  1374.  
  1375.  
  1376. end
  1377.  
  1378.  
  1379. curpos = li.CFrame*cn(0,0,magz/tym/2).p de(li,0.25)
  1380.  
  1381.  
  1382. end
  1383.  
  1384.  
  1385. end
  1386.  
  1387.  
  1388.  
  1389.  
  1390. MakeCrater = function(pos,sc,tyms,debz,par) -- crater maker
  1391.  
  1392.  
  1393. q(function()
  1394.  
  1395.  
  1396. if not debz then
  1397.  
  1398.  
  1399. debz = 5
  1400.  
  1401.  
  1402. end
  1403.  
  1404.  
  1405. local bhit,bpos=ray(pos,pos - (pos + v3(0,200,0)))
  1406.  
  1407.  
  1408. if bhit and bpos then
  1409.  
  1410.  
  1411. for i=1,tyms do
  1412.  
  1413.  
  1414. q(function()
  1415.  
  1416.  
  1417. local gr = pa(par or workspace,"","Block",rn(5,13)/10*sc,0.25*sc,rn(4,10)/10*sc,true,true,bhit.Transparency,bhit.Reflectance,bhit.BrickColor.Name)
  1418.  
  1419.  
  1420. gr.Material = bhit.Material
  1421.  
  1422.  
  1423. gr.TopSurface = bhit.TopSurface
  1424.  
  1425.  
  1426. gr.CFrame = cn(bpos+v3(rn(-12,12)/10*sc,0,rn(-12,12)/10*sc))*ca(rd(rn(-40,40)),rd(rn(-360,360)),rd(rn(-40,40)))
  1427.  
  1428.  
  1429. wait(debz)
  1430.  
  1431.  
  1432. fade(gr,0.1)
  1433.  
  1434.  
  1435. end)
  1436.  
  1437.  
  1438. end
  1439.  
  1440.  
  1441. end
  1442.  
  1443.  
  1444. end)
  1445.  
  1446.  
  1447. end
  1448.  
  1449.  
  1450.  
  1451.  
  1452. MakeCrack = function(pos,sc,debz,par) -- crackmaker
  1453.  
  1454.  
  1455. q(function()
  1456.  
  1457.  
  1458. if not debz then
  1459.  
  1460.  
  1461. debz = 5
  1462.  
  1463.  
  1464. end
  1465.  
  1466.  
  1467. local bhit,bpos=ray(pos,pos - (pos + v3(0,10,0)))
  1468.  
  1469.  
  1470. if bhit and bpos then
  1471.  
  1472.  
  1473. local cr = pa(par or workspace,"Crack","Block",sc,0,sc,false,true,1,0,"") cr.CFrame = cn(bpos)
  1474.  
  1475.  
  1476. local dec=qi({"Decal",cr,Face="Top",Texture=ds.Crack}) de(cr,debz)
  1477.  
  1478.  
  1479. end
  1480.  
  1481.  
  1482. end)
  1483.  
  1484.  
  1485. end
  1486.  
  1487.  
  1488.  
  1489.  
  1490. a = {}
  1491.  
  1492.  
  1493. a.insw={}
  1494.  
  1495.  
  1496. function cleanweld(wexx,namzi)
  1497.  
  1498.  
  1499. local tn=ft2(a.insw,wexx)
  1500.  
  1501.  
  1502. if tn==nil then return end
  1503.  
  1504.  
  1505. if namzi=="p0" then
  1506.  
  1507.  
  1508. a.insw[tn][2]["p0x"],a.insw[tn][2]["p0y"],a.insw[tn][2]["p0z"]=0,0,0 elseif namzi=="p1" then
  1509.  
  1510.  
  1511. a.insw[tn][2]["p1x"],a.insw[tn][2]["p1y"],a.insw[tn][2]["p1z"]=0,0,0 elseif namzi=="a0" then
  1512.  
  1513.  
  1514. a.insw[tn][2]["a0x"],a.insw[tn][2]["a0y"],a.insw[tn][2]["a0z"]=0,0,0 elseif namzi=="a1" then
  1515.  
  1516.  
  1517. a.insw[tn][2]["a1x"],a.insw[tn][2]["a1y"],a.insw[tn][2]["a1z"]=0,0,0
  1518.  
  1519.  
  1520. end
  1521.  
  1522.  
  1523. end
  1524.  
  1525.  
  1526. function c2(wexx,smmx,c0orc1,aa,bb,cc,xx,yy,zz)
  1527.  
  1528.  
  1529. q(function()
  1530.  
  1531.  
  1532. c1(wexx,smmx,c0orc1,aa,bb,cc,xx,yy,zz)
  1533.  
  1534.  
  1535. end)
  1536.  
  1537.  
  1538. end
  1539.  
  1540.  
  1541. a.Welding=0
  1542.  
  1543.  
  1544. function c1(wexx,smmx,c0orc1,aa,bb,cc,xx,yy,zz)
  1545.  
  1546.  
  1547. if ft2(a.insw,wexx)==nil then
  1548.  
  1549.  
  1550. ti(a.insw,{wexx,{}})
  1551.  
  1552.  
  1553. local tn=ft2(a.insw,wexx)
  1554.  
  1555.  
  1556. a.insw[tn][2]["p0x"],a.insw[tn][2]["p0y"],a.insw[tn][2]["p0z"]=wexx.C0.x,wexx.C0.y,wexx.C0.z
  1557.  
  1558.  
  1559. a.insw[tn][2]["p1x"],a.insw[tn][2]["p1y"],a.insw[tn][2]["p1z"]=wexx.C1.x,wexx.C1.y,wexx.C1.z
  1560.  
  1561.  
  1562. a.insw[tn][2]["a0x"],a.insw[tn][2]["a0y"],a.insw[tn][2]["a0z"]=wexx.C0:toEulerAnglesXYZ()
  1563.  
  1564.  
  1565. a.insw[tn][2]["a1x"],a.insw[tn][2]["a1y"],a.insw[tn][2]["a1z"]=wexx.C1:toEulerAnglesXYZ()
  1566.  
  1567.  
  1568. end
  1569.  
  1570.  
  1571. local tn=ft2(a.insw,wexx)
  1572.  
  1573.  
  1574. local xx2,yy2,zz2=0,0,0
  1575.  
  1576.  
  1577. local x2,y2,z2=0,0,0
  1578.  
  1579.  
  1580. if c0orc1==0 then
  1581.  
  1582.  
  1583. xx2,yy2,zz2=a.insw[tn][2]["a0x"],a.insw[tn][2]["a0y"],a.insw[tn][2]["a0z"]
  1584.  
  1585.  
  1586. x2,y2,z2=a.insw[tn][2]["p0x"],a.insw[tn][2]["p0y"],a.insw[tn][2]["p0z"]
  1587.  
  1588.  
  1589. elseif c0orc1==1 then
  1590.  
  1591.  
  1592. xx2,yy2,zz2=a.insw[tn][2]["a1x"],a.insw[tn][2]["a1y"],a.insw[tn][2]["a1z"]
  1593.  
  1594.  
  1595. x2,y2,z2=a.insw[tn][2]["p1x"],a.insw[tn][2]["p1y"],a.insw[tn][2]["p1z"]
  1596.  
  1597.  
  1598. else
  1599.  
  1600.  
  1601. xx2,yy2,zz2=a.insw[tn][2]["a1x"],a.insw[tn][2]["a1y"],a.insw[tn][2]["a1z"]
  1602.  
  1603.  
  1604. x2,y2,z2=a.insw[tn][2]["p0x"],a.insw[tn][2]["p0y"],a.insw[tn][2]["p0z"]
  1605.  
  1606.  
  1607. end a.Welding=a.Welding + 1
  1608.  
  1609.  
  1610. local twa=1
  1611.  
  1612.  
  1613. if smmx >= 1 then
  1614.  
  1615.  
  1616. else
  1617.  
  1618.  
  1619. for i=smmx,0.8,smmx do
  1620.  
  1621.  
  1622. twa = 1
  1623.  
  1624.  
  1625. if c0orc1==0 then
  1626.  
  1627.  
  1628. wexx.C0=cn(x2-(((x2-aa)/twa)*i),y2-(((y2-bb)/twa)*i),z2-(((z2-cc)/twa)*i)) *ca(xx2-(((xx2-rd(xx))/twa)*i),yy2-(((yy2-rd(yy))/twa)*i),zz2-(((zz2-rd(zz))/twa)*i))
  1629.  
  1630.  
  1631. elseif c0orc1==1 then
  1632.  
  1633.  
  1634. wexx.C1=cn(x2-(((x2-aa)/twa)*i),y2-(((y2-bb)/twa)*i),z2-(((z2-cc)/twa)*i)) *ca(xx2-(((xx2-rd(xx))/twa)*i),yy2-(((yy2-rd(yy))/twa)*i),zz2-(((zz2-rd(zz))/twa)*i))
  1635.  
  1636.  
  1637. else local x,y,z = wexx.C0:toEulerAnglesXYZ()
  1638.  
  1639.  
  1640. wexx.C0=cn(x2-(((x2-aa)/twa)*i),y2-(((y2-bb)/twa)*i),z2-(((z2-cc)/twa)*i))*ca(x,y,z)
  1641.  
  1642.  
  1643. wexx.C1=cn(wexx.C1.x,wexx.C1.y,wexx.C1.z)*ca(xx2-(((xx2-rd(xx))/twa)*i),yy2-(((yy2-rd(yy))/twa)*i),zz2-(((zz2-rd(zz))/twa)*i))
  1644.  
  1645.  
  1646. end
  1647.  
  1648.  
  1649. if fu then
  1650.  
  1651.  
  1652. q(fu)
  1653.  
  1654.  
  1655. end
  1656.  
  1657.  
  1658. wait()
  1659.  
  1660.  
  1661. end
  1662.  
  1663.  
  1664. for i=0.8,1,smmx*0.45 do
  1665.  
  1666.  
  1667. twa = 1
  1668.  
  1669.  
  1670. if c0orc1==0 then
  1671.  
  1672.  
  1673. wexx.C0=cn(x2-(((x2-aa)/twa)*i),y2-(((y2-bb)/twa)*i),z2-(((z2-cc)/twa)*i)) *ca(xx2-(((xx2-rd(xx))/twa)*i),yy2-(((yy2-rd(yy))/twa)*i),zz2-(((zz2-rd(zz))/twa)*i))
  1674.  
  1675.  
  1676. elseif c0orc1==1 then
  1677.  
  1678.  
  1679. wexx.C1=cn(x2-(((x2-aa)/twa)*i),y2-(((y2-bb)/twa)*i),z2-(((z2-cc)/twa)*i)) *ca(xx2-(((xx2-rd(xx))/twa)*i),yy2-(((yy2-rd(yy))/twa)*i),zz2-(((zz2-rd(zz))/twa)*i))
  1680.  
  1681.  
  1682. else local x,y,z = wexx.C0:toEulerAnglesXYZ()
  1683.  
  1684.  
  1685. wexx.C0=cn(x2-(((x2-aa)/twa)*i),y2-(((y2-bb)/twa)*i),z2-(((z2-cc)/twa)*i))*ca(x,y,z)
  1686.  
  1687.  
  1688. wexx.C1=cn(wexx.C1.x,wexx.C1.y,wexx.C1.z)*ca(xx2-(((xx2-rd(xx))/twa)*i),yy2-(((yy2-rd(yy))/twa)*i),zz2-(((zz2-rd(zz))/twa)*i))
  1689.  
  1690.  
  1691. end
  1692.  
  1693.  
  1694. wait()
  1695.  
  1696.  
  1697. end
  1698.  
  1699.  
  1700. end
  1701.  
  1702.  
  1703. local i=1
  1704.  
  1705.  
  1706. if c0orc1==0 then
  1707.  
  1708.  
  1709. wexx.C0=cn(x2-(((x2-aa)/twa)*i),y2-(((y2-bb)/twa)*i),z2-(((z2-cc)/twa)*i)) *ca(xx2-(((xx2-rd(xx))/twa)*i),yy2-(((yy2-rd(yy))/twa)*i),zz2-(((zz2-rd(zz))/twa)*i))
  1710.  
  1711.  
  1712. elseif c0orc1==1 then
  1713.  
  1714.  
  1715. wexx.C1=cn(x2-(((x2-aa)/twa)*i),y2-(((y2-bb)/twa)*i),z2-(((z2-cc)/twa)*i)) *ca(xx2-(((xx2-rd(xx))/twa)*i),yy2-(((yy2-rd(yy))/twa)*i),zz2-(((zz2-rd(zz))/twa)*i))
  1716.  
  1717.  
  1718. else local x,y,z = wexx.C0:toEulerAnglesXYZ()
  1719.  
  1720.  
  1721. wexx.C0=cn(x2-(((x2-aa)/twa)*i),y2-(((y2-bb)/twa)*i),z2-(((z2-cc)/twa)*i))*ca(x,y,z)
  1722.  
  1723.  
  1724. wexx.C1=cn(wexx.C1.x,wexx.C1.y,wexx.C1.z)*ca(xx2-(((xx2-rd(xx))/twa)*i),yy2-(((yy2-rd(yy))/twa)*i),zz2-(((zz2-rd(zz))/twa)*i))
  1725.  
  1726.  
  1727. end
  1728.  
  1729.  
  1730. a.Welding=a.Welding - 1
  1731.  
  1732.  
  1733. local tn=ft2(a.insw,wexx)
  1734.  
  1735.  
  1736. if c0orc1==0 then
  1737.  
  1738.  
  1739. a.insw[tn][2]["p0x"],a.insw[tn][2]["p0y"],a.insw[tn][2]["p0z"]=x2-(((x2-aa)/twa)*i),y2-(((y2-bb)/twa)*i),z2-(((z2-cc)/twa)*i)
  1740.  
  1741.  
  1742. a.insw[tn][2]["a0x"],a.insw[tn][2]["a0y"],a.insw[tn][2]["a0z"]=xx2-(((xx2-rd(xx))/twa)*i),yy2-(((yy2-rd(yy))/twa)*i),zz2-(((zz2-rd(zz))/twa)*i)
  1743.  
  1744.  
  1745. elseif c0orc1==1 then
  1746.  
  1747.  
  1748. a.insw[tn][2]["p1x"],a.insw[tn][2]["p1y"],a.insw[tn][2]["p1z"]=x2-(((x2-aa)/twa)*i),y2-(((y2-bb)/twa)*i),z2-(((z2-cc)/twa)*i)
  1749.  
  1750.  
  1751. a.insw[tn][2]["a1x"],a.insw[tn][2]["a1y"],a.insw[tn][2]["a1z"]=xx2-(((xx2-rd(xx))/twa)*i),yy2-(((yy2-rd(yy))/twa)*i),zz2-(((zz2-rd(zz))/twa)*i)
  1752.  
  1753.  
  1754. elseif c0orc1==3 then
  1755.  
  1756.  
  1757. local x,y,z=wexx.C0.x,wexx.C0.y,wexx.C0.z
  1758.  
  1759.  
  1760. a.insw[tn][2]["p0x"],a.insw[tn][2]["p0y"],a.insw[tn][2]["p0z"]=x2-(((x2-aa)/twa)*i),y2-(((y2-bb)/twa)*i),z2-(((z2-cc)/twa)*i)
  1761.  
  1762.  
  1763. local x,y,z=wexx.C1:toEulerAnglesXYZ()
  1764.  
  1765.  
  1766. a.insw[tn][2]["a1x"],a.insw[tn][2]["a1y"],a.insw[tn][2]["a1z"]=xx2-(((xx2-rd(xx))/twa)*i),yy2-(((yy2-rd(yy))/twa)*i),zz2-(((zz2-rd(zz))/twa)*i)
  1767.  
  1768.  
  1769. end
  1770.  
  1771.  
  1772. end
  1773.  
  1774.  
  1775.  
  1776.  
  1777. Welds={}
  1778.  
  1779.  
  1780. Ani=function(w,a,b,c,d,e,f,ty,inc,sined)
  1781.  
  1782.  
  1783. if not Welds[w] then
  1784.  
  1785.  
  1786. local d0,e0,f0=w.C0:toEulerAnglesXYZ() local d1,e1,f1=w.C1:toEulerAnglesXYZ()
  1787.  
  1788.  
  1789. local d0,e0,f0=mdeg(d0),mdeg(e0),mdeg(f0) local d1,e1,f1=mdeg(d1),mdeg(e1),mdeg(f1)
  1790.  
  1791.  
  1792. Welds[w]={[0]={w.C0.x,w.C0.y,w.C0.z,d0,e0,f0},[1]={w.C1.x,w.C1.y,w.C1.z,d1,e1,f1}}
  1793.  
  1794.  
  1795. end
  1796.  
  1797.  
  1798. local c0,c1=Welds[w][0],Welds[w][1]
  1799.  
  1800.  
  1801. c0[1],c0[2],c0[3]=w.C0.x,w.C0.y,w.C0.z
  1802.  
  1803.  
  1804. c1[1],c1[2],c1[3]=w.C1.x,w.C1.y,w.C1.z
  1805.  
  1806.  
  1807. local A0,B0,C0,D0,E0,F0 = unpack(c0)
  1808.  
  1809.  
  1810. local A1,B1,C1,D1,E1,F1 = unpack(c1)
  1811.  
  1812.  
  1813. local Do = function(i)
  1814.  
  1815.  
  1816. if ty==0 then
  1817.  
  1818.  
  1819. w.C0=cn( A0-((A0-a)*i) , B0-((B0-b)*i) , C0-((C0-c)*i) ) * ca2( D0-((D0-d)*i) , E0-(((E0-e)/1)*i) , F0-((F0-f)*i) )
  1820.  
  1821.  
  1822. elseif ty==1 then
  1823.  
  1824.  
  1825. w.C1=cn( A1-((A1-a)*i) , B1-((B1-b)*i) , C1-((C1-c)*i) ) * ca2( D1-((D1-d)*i) , E1-(((E1-e)/1)*i) , F1-((F1-f)*i) )
  1826.  
  1827.  
  1828. else
  1829.  
  1830.  
  1831. w.C0=cn( A0-((A0-a)*i) , B0-((B0-b)*i) , C0-((C0-c)*i) ) * ca2(D0,E0,F0)
  1832.  
  1833.  
  1834. w.C1=cn(A1,B1,C1) * ca2( D1-((D1-d)*i) , E1-(((E1-e)/1)*i) , F1-((F1-f)*i) )
  1835.  
  1836.  
  1837. end
  1838.  
  1839.  
  1840. end
  1841.  
  1842.  
  1843. for i=inc,1,inc do
  1844.  
  1845.  
  1846. Do(sined and math.sin(math.pi/2*i) or i)
  1847.  
  1848.  
  1849. wait()
  1850.  
  1851.  
  1852. end
  1853.  
  1854.  
  1855. Do(1)
  1856.  
  1857.  
  1858. if ty==0 then
  1859.  
  1860.  
  1861. c0[4],c0[5],c0[6]=d,e,f
  1862.  
  1863.  
  1864. else
  1865.  
  1866.  
  1867. c1[4],c1[5],c1[6]=d,e,f
  1868.  
  1869.  
  1870. end
  1871.  
  1872.  
  1873. end
  1874.  
  1875.  
  1876. qAni=function(w,a,b,c,d,e,f,ty,inc,sined) q(function() Ani(w,a,b,c,d,e,f,ty,inc,sined) end) end
  1877.  
  1878.  
  1879. rAni=function(w)
  1880.  
  1881.  
  1882. Welds[w]=nil
  1883.  
  1884.  
  1885. end
  1886.  
  1887.  
  1888.  
  1889.  
  1890. gunshot = function(speed,sc,dmg,cff) q(function() -- gunshot function
  1891.  
  1892.  
  1893. local bb = pa(workspace,"bullet","Block",0.2*sc,0.3*sc,0.2*sc,true,true,0,0.1,"Black") qi({"CylinderMesh",bb})
  1894.  
  1895.  
  1896. bb.CFrame = cff*ca(rd(rn(-1000,1000)/1500),rd(rn(-1000,1000)/1500),rd(rn(-1000,1000)/1500))
  1897.  
  1898.  
  1899. so(ds.Fire,bb,0.3,1) wait() for i=1,50 do
  1900.  
  1901.  
  1902. bhit,bpos=ray(bb.Position,bb.Position - (bb.CFrame *cn(0,-1,0)).p)
  1903.  
  1904.  
  1905. if bhit and bhit.Name ~= "bullet" and bhit.Name ~= "bullethole" and bpos and (bpos - bb.Position).magnitude < speed then break end
  1906.  
  1907.  
  1908. bb.CFrame=bb.CFrame*cn(0,speed,0)*ca(rd(-0.2),0,0)
  1909.  
  1910.  
  1911. wait()
  1912.  
  1913.  
  1914. end bb.CFrame=bb.CFrame*cn(0,(bpos-bb.Position).magnitude,0)
  1915.  
  1916.  
  1917. if not bhit.Anchored then
  1918.  
  1919.  
  1920. if bhit.Parent:findFirstChild("Humanoid") then local h = bhit.Parent.Humanoid h.Health=h.Health-dmg so(ds.Hit,bhit,0.3,1) end
  1921.  
  1922.  
  1923. else if bhit.Name~="Base" then bhit.Anchored=false bhit:BreakJoints() end end bb:Remove()
  1924.  
  1925.  
  1926. if bhit.Parent:findFirstChild("Humanoid") == nil then BulletHole(bpos,bhit,0.7*sc) end
  1927.  
  1928.  
  1929. end) end
  1930.  
  1931.  
  1932.  
  1933.  
  1934. dive = function(ob2,pro,ite,stof)
  1935.  
  1936.  
  1937. local function div(ob) for i,v in pairs(ob:children()) do if v[pro] == ite then
  1938.  
  1939.  
  1940. for i=1,#stof do v[stof[i][1]] = stof[i][2] end else div(v) end end end
  1941.  
  1942.  
  1943. div(ob2)
  1944.  
  1945.  
  1946. end
  1947.  
  1948.  
  1949.  
  1950.  
  1951. fc = function(ob,cl)
  1952.  
  1953.  
  1954. for i,v in pairs(ob:children()) do if v.className:lower()==cl:lower() then return v end end
  1955.  
  1956.  
  1957. end
  1958.  
  1959.  
  1960.  
  1961.  
  1962. function se(Key,Text)
  1963.  
  1964.  
  1965. local Values = {}
  1966.  
  1967.  
  1968. for value in (Text..Key):gmatch("(.-)"..Key) do
  1969.  
  1970.  
  1971. table.insert(Values,value)
  1972.  
  1973.  
  1974. end return Values
  1975.  
  1976.  
  1977. end
  1978.  
  1979.  
  1980.  
  1981.  
  1982. local thefenv = getfenv()
  1983.  
  1984.  
  1985. getfenv()["rmhelp"] = function()
  1986.  
  1987.  
  1988. local nus = 0
  1989.  
  1990.  
  1991. for i,v in pairs(thefenv) do if i ~= "wait" and i ~= "script" then nus = nus + 1 wait(0.05)
  1992.  
  1993.  
  1994. print(string.rep(" ",3-#tostring(nus)) ..nus.. ") " ..i.. " (" ..type(v).. ")")
  1995.  
  1996.  
  1997. end
  1998.  
  1999.  
  2000. end
  2001.  
  2002.  
  2003. end
  2004.  
  2005.  
  2006.  
  2007.  
  2008. for i,v in pairs(thefenv) do
  2009.  
  2010.  
  2011. _G[i] = v
  2012.  
  2013.  
  2014. --print(i)
  2015.  
  2016.  
  2017. end
  2018.  
  2019.  
  2020.  
  2021.  
  2022. _G[" r".."m".."d".."x "] = [[
  2023.  
  2024.  
  2025. for i,v in pairs(_G) do
  2026.  
  2027.  
  2028. if i ~= "wait" and i ~= "script" then
  2029.  
  2030.  
  2031. getfenv()[i] = v
  2032.  
  2033.  
  2034. end
  2035.  
  2036.  
  2037. end
  2038.  
  2039.  
  2040. ]]
  2041.  
  2042. script:ClearAllChildren()
  2043. Player=game:GetService("Players").LocalPlayer
  2044. Char=Player.Character
  2045. Backpack=Player.Backpack
  2046. PlayerGui=Player.PlayerGui
  2047. Torso=Char.Torso
  2048. Head=Char.Head
  2049. Hum=Char.Humanoid
  2050. Cam=workspace.CurrentCamera
  2051. Tn="Pipebomb Launcher"
  2052. pcall(function() Backpack[Tn]:Remove() end)
  2053. pcall(function() Cam[Tn]:Remove() end)
  2054. pcall(function() thesuit=Char[''] end)
  2055. pcall(function() thesuit[Tn]:Remove() end)
  2056. pcall(function() PlayerGui[Tn]:Remove() end)
  2057. CModel=qi{'Model',Cam,Name=Tn}
  2058. Tool=qi{'HopperBin',Player.Backpack,Name=Tn}
  2059. Suit=qi{'Model',Char,Name=''}
  2060. Weapon=qi{'Model',Suit,Name=Tn}
  2061. Gui=qi{'ScreenGui',PlayerGui,Name=Tn}
  2062. equip="unequipped"
  2063. anim=""
  2064. keys={}
  2065. fmouse=nil
  2066. PipeRotate=0
  2067. Clip=6
  2068. LastShot=0
  2069. ids = {}
  2070. ids.Shoot = 10209633
  2071. ids.Reload = 10209636
  2072. ids.Crown = 20329976
  2073. ids.Crown2 = 1323306
  2074. ids.Icon = 52611635
  2075. ids.Explode = 2697431
  2076. ids.Ring = 3270017
  2077. for i,v in pairs(ids) do
  2078. if type(v)=='number' then
  2079. ids[i]='http://www.roblox.com/asset/?id='..v
  2080. end
  2081. game:GetService("ContentProvider"):Preload(ids[i])
  2082. end
  2083. Limbs={LS=Torso:findFirstChild'Left Shoulder',RS=Torso:findFirstChild'Right Shoulder',LH=Torso:findFirstChild'Left Hip',RH=Torso:findFirstChild'Right Hip'}
  2084. if _G.Limbz then
  2085. Limbs.LS=Limbs.LS or _G.Limbz.LS
  2086. Limbs.RS=Limbs.RS or _G.Limbz.RS
  2087. Limbs.LH=Limbs.LH or _G.Limbz.LH
  2088. Limbs.RH=Limbs.RH or _G.Limbz.RH
  2089. end
  2090. _G.Limbz=Limbs
  2091. Torso.Neck.C0=cn(0,1.5,0) Torso.Neck.C1=cn(0,0,0)
  2092. c2(Torso.Neck,1,3,0,1.5,0,0,0,0)
  2093. LS,RS,LH,RH=Limbs.LS,Limbs.RS,Limbs.LH,Limbs.RH
  2094. LA,RA,LL,RL=Char['Left Arm'],Char['Right Arm'],Char['Left Leg'],Char['Right Leg']
  2095. LS.Part0,RS.Part0,LH.Part0,RH.Part0=Torso,Torso,Torso,Torso
  2096. LS.Part1,RS.Part1,LH.Part1,RH.Part1=LA,RA,LL,RL
  2097. pcall(function() thesuit:Remove() end)
  2098. Head.face.Transparency=0
  2099. Head.Transparency=1 Torso.Transparency=1
  2100. fTorso=pa(Suit,"FTorso","Block",2,2,1,false,false,0,0,Torso.BrickColor.Name) neck=Torso.Neck
  2101. tw=weld(fTorso,Torso,fTorso,0,0,0,0,0,0) qi{"BlockMesh",fTorso}
  2102. fHead=pa(Suit,"FHead","Block",2,1,1,false,false,0,0,Head.BrickColor.Name)
  2103. hw=weld(fHead,fTorso,fHead,0,1.5,0,0,0,0) qi{"SpecialMesh",fHead,Scale=v3(1.15,1.15,1.15)} Head.face:Clone().Parent=fHead Head.face.Transparency=1
  2104. la=qi{'Weld',fTorso,Part0=fTorso,C0=cn(-1.5,0.5,0),C1=cn(0,0.5,0)} ra=qi{'Weld',fTorso,Part0=fTorso,C0=cn(1.5,0.5,0),C1=cn(0,0.5,0)}
  2105. ll=qi{'Weld',fTorso,Part0=fTorso,C0=cn(-0.5,-1,0),C1=cn(0,1,0)} rl=qi{'Weld',fTorso,Part0=fTorso,C0=cn(0.5,-1,0),C1=cn(0,1,0)}
  2106. newhats(Char,fHead,Head) ClearClass(Char,"Hat") Hum.WalkSpeed=16 Hum.MaxHealth=175
  2107. Armz=false
  2108. Legz=false
  2109. Arms = function(on) Armz=on
  2110. if on then
  2111. LS.Part1=nil RS.Part1=nil
  2112. la.Part0=fTorso ra.Part0=fTorso
  2113. la.Part1=LA ra.Part1=RA
  2114. la.C0,la.C1=cn(-1.5,0.5,0),cn(0,0.5,0)
  2115. ra.C0,ra.C1=cn(1.5,0.5,0),cn(0,0.5,0)
  2116. else
  2117. LS.Parent,RS.Parent=fTorso,fTorso LS.Part0=fTorso RS.Part0=fTorso LS.Part1=LA RS.Part1=RA
  2118. la.Part1=nil ra.Part1=nil
  2119. end
  2120. end
  2121. Legs = function(on) Legz=on
  2122. if on then
  2123. LH.Part1=nil RH.Part1=nil
  2124. ll.Part0=fTorso rl.Part0=fTorso
  2125. ll.Part1=LL rl.Part1=RL
  2126. ll.C0,ll.C1=cn(-0.5,-1,0),cn(0,1,0)
  2127. rl.C0,rl.C1=cn(0.5,-1,0),cn(0,1,0)
  2128. else
  2129. LH.Parent,RH.Parent=fTorso,fTorso LH.Part0=fTorso RH.Part0=fTorso LH.Part1=LL RH.Part1=RL
  2130. ll.Part1=nil rl.Part1=nil
  2131. end
  2132. end
  2133. Arms'' Legs''
  2134. WDesign=function(c)
  2135. ha=pa(Weapon,"","Block",0.2,0.5,1,false,false,0,0,c[1]) haw=weld(ha,Torso,ha,0.5,2.5,1,rd(270),0,rd(90))
  2136. gp=pa(Weapon,"","Block",0.2,1,0.2,false,false,0,0,c[1]) weld(gp,ha,gp,0,-0.35,0,rd(-90),0,0) qi{'SpecialMesh',gp,MeshType='Wedge'}
  2137. gp=pa(Weapon,"","Block",0.2,0.7,0.2,false,false,0,0,c[2]) weld(gp,ha,gp,0,-0.1,0.55,0,0,0) qi{'BlockMesh',gp,Scale=v3(1,1,0.5)}
  2138. gp=pa(Weapon,"","Block",0.2,0.5,0.5,false,false,0,0,c[1]) weld(gp,ha,gp,0,-0.115,-0.5,rd(45),0,0)
  2139. gp=pa(Weapon,"","Block",0.2,0.5,1,false,false,0,0,c[1]) weld(gp,ha,gp,0,-0.1,-0.95,rd(15),0,0)
  2140. gpp=pa(Weapon,"","Block",0.21,0.6,0.3,false,false,0,0,c[3]) weld(gpp,ha,gpp,0,0,-1.5,0,0,0)
  2141. gp=pa(Weapon,"","Block",0.2,0.2,0.2,false,false,0,0,c[3]) weld(gp,gpp,gp,0,-0.4,0.05,0,rd(90),0) qi{'SpecialMesh',gp,MeshId=ids.Ring,Scale=v3(0.35,0.35,1)}
  2142. gp=pa(Weapon,"","Block",0.2,0.2,0.2,false,false,0,0,c[3]) weld(gp,gpp,gp,0,-0.4,0.05,rd(10),rd(90),0) qi{'BlockMesh',gp,Scale=v3(0.25,1,0.25)}
  2143. gp1=pa(Weapon,"","Block",1.2,0.2,1.2,false,false,0,0,c[3]) weld(gp1,gpp,gp1,0,-0.25,-0.2,rd(90),0,0) qi{'CylinderMesh',gp1}
  2144. p1=pa(Weapon,"","Block",0.4,1.3,0.2,false,false,0,0,c[3]) weld(p1,gp1,p1,0,0,0.1,rd(90),0,0)
  2145. p2=pa(Weapon,"","Block",0.2,0.4,0.2,false,false,0,0,c[3]) weld(p2,p1,p2,0,1.3/2,0,0,0,rd(90)) qi{'CylinderMesh',p2}
  2146. hinge=pa(Weapon,"","Block",0.2,0.4,0.2,false,false,0,0,c[4]) hingew=weld(hinge,p2,hinge,0,0,0,0,rd(0),0) qi{'CylinderMesh',hinge,Scale=v3(0.6,1.001,0.6)}
  2147. p3=pa(Weapon,"","Block",0.4,0.3,0.2,false,false,0,0,c[3]) weld(p3,p1,p3,0,-1.3/2,0,0,0,0) qi{'BlockMesh',p3}
  2148. p4=pa(Weapon,"","Block",0.2,0.2,0.2,false,false,0,0,c[3]) weld(p4,p3,p4,0.15,-0.2,0,0,0,0) qi{'BlockMesh',p4,Scale=v3(0.5,1,1)}
  2149. p5=pa(Weapon,"","Block",0.2,0.2,0.2,false,false,0,0,c[3]) weld(p5,p3,p5,-0.15,-0.2,0,0,0,0) qi{'BlockMesh',p5,Scale=v3(0.5,1,1)}
  2150. p6=pa(Weapon,"","Block",0.4,0.2,0.7,false,false,0,0,c[3]) weld(p6,hinge,p6,0,0,0.35,0,0,rd(-90)) qi{'BlockMesh',p6,Scale=v3(1,0.5,1)}
  2151. p7=pa(Weapon,"","Block",0.4,0.2,0.4,false,false,0,0,c[3]) weld(p7,p6,p7,0,0,0.55,rd(180),0,0) qi{'SpecialMesh',p7,Scale=v3(1,0.5,1),MeshType="Wedge"}
  2152. p8=pa(Weapon,"","Block",0.4,0.2,0.4,false,false,0,0,c[3]) weld(p8,p7,p8,0,-0.15,0,rd(180),0,0) qi{'SpecialMesh',p8,MeshType="Wedge"}
  2153. p9=pa(Weapon,"","Block",0.4,0.2,0.3,false,false,0,0,c[3]) weld(p9,p8,p9,0,0,0.35,0,0,0) qi{'BlockMesh',p9}
  2154. p10=pa(Weapon,"","Block",0.4,0.2,0.3,false,false,0,0,c[3]) weld(p10,p9,p10,0,0,0.3,0,rd(180),0) qi{'SpecialMesh',p10,MeshType="Wedge"}
  2155. p11=pa(Weapon,"","Block",0.4,0.2,0.3,false,false,0,0,c[3]) weld(p11,p10,p11,0,-0.2,0,0,0,0) qi{'BlockMesh',p11}
  2156. p12=pa(Weapon,"","Block",0.3,0.2,0.3,false,false,0,0,c[3]) weld(p12,p11,p12,0.35,0,0,0,rd(-90),0) qi{'SpecialMesh',p12,MeshType="Wedge"}
  2157. p13=pa(Weapon,"","Block",0.3,0.2,0.3,false,false,0,0,c[3]) weld(p13,p11,p13,-0.35,0,0,0,rd(90),0) qi{'SpecialMesh',p13,MeshType="Wedge"}
  2158. p14=pa(Weapon,"","Block",1.5,0.3,1.5,false,false,0,0,c[3]) weld(p14,p11,p14,0,-0.7,0,rd(90),0,0) qi{'CylinderMesh',p14}
  2159. p15=pa(Weapon,"","Block",1.3,0.2,1.3,false,false,0,0,c[2]) weld(p15,p14,p15,0,0.25,0,0,0,0) qi{'CylinderMesh',p15}
  2160. p16=pa(Weapon,"","Block",0.2,1.4,0.2,false,false,0,0,c[2]) piperw=weld(p16,p15,p16,0,0.7,0,0,rd(30),0) qi{'CylinderMesh',p16}
  2161. for i=0,360,360/6 do
  2162. p16p=pa(Weapon,"","Block",0.5,1.1,0.5,false,false,0,0,c[2]) p16pw=weld(p16p,p16,p16p,0,0,0,0,0,0) qi{'CylinderMesh',p16p} p16pw.C0=cn(0,-0.05,0)*ca(0,rd(i),0)*cn(0.4,0,0)
  2163. p16p=pa(Weapon,"","Block",0.3,0.2,0.3,false,false,0,0,c[5]) p16pw=weld(p16p,p16,p16p,0,0,0,0,0,0) qi{'CylinderMesh',p16p,Scale=v3(1,0.1,1)} p16pw.C0=cn(0,0.5,0)*ca(0,rd(i),0)*cn(0.4,0,0)
  2164. p16p=pa(Weapon,"","Block",0.2,0.2,0.2,false,false,0,0,c[2]) p16pw=weld(p16p,p16,p16p,0,0,0,0,0,0) qi{'CylinderMesh',p16p,Scale=v3(1,0.1,1)} p16pw.C0=cn(0,0.51,0)*ca(0,rd(i),0)*cn(0.4,0,0)
  2165. end
  2166. p17=pa(Weapon,"","Block",0.2,0.2,0.3,false,false,0,0,c[3]) weld(p17,p14,p17,0,0,0.75,rd(90),rd(180),0) qi{'SpecialMesh',p17,MeshType="Wedge",Scale=v3(1,1,1)}
  2167. p18=pa(Weapon,"","Block",0.2,0.2,1.5,false,false,0,0,c[3]) weld(p18,p17,p18,0,0.05,0.9,0,0,0) qi{'BlockMesh',p18,Scale=v3(1,0.5,1)}
  2168. p19=pa(Weapon,"","Block",0.2,0.2,0.2,false,false,0,0,c[3]) weld(p19,p18,p19,0,0.1,0,0,0,0) qi{'SpecialMesh',p19,Scale=v3(0.5,0.5,1),MeshType="Wedge"}
  2169. p20=pa(Weapon,"","Block",0.2,0.2,0.3,false,false,0,0,c[3]) weld(p20,p19,p20,0,0,0.25,0,0,0) qi{'BlockMesh',p20,Scale=v3(0.5,0.5,1)}
  2170. p21=pa(Weapon,"","Block",0.2,0.2,0.2,false,false,0,0,c[3]) weld(p21,p20,p21,0,0,0.175,0,rd(180),0) qi{'SpecialMesh',p21,Scale=v3(0.5,0.5,0.25),MeshType="Wedge"}
  2171. p22=pa(Weapon,"","Block",0.2,0.2,0.2,false,false,0,0,c[4]) weld(p22,p20,p22,0,0,0.05,0,0,rd(90)) qi{'CylinderMesh',p22,Scale=v3(0.25,0.51,0.25)}
  2172. p23=pa(Weapon,"","Block",0.75,0.8,0.75,false,false,0,0,c[2]) weld(p23,p14,p23,0,0.1,0.3,0,0,0) qi{'SpecialMesh',p23} -- start of barrel
  2173. p24=pa(Weapon,"","Block",0.6,1.8,0.6,false,false,0,0,c[2]) weld(p24,p23,p24,0,-0.9,0,0,0,0) qi{'CylinderMesh',p24}
  2174. p25=pa(Weapon,"","Block",0.4,0.2,0.4,false,false,0,0,c[6]) weld(p25,p24,p25,0,-0.9,0,0,0,0) qi{'CylinderMesh',p25,Scale=v3(1,0.1,1)}
  2175. p26=pa(Weapon,"","Block",0.65,0.2,0.65,false,false,0,0,c[3]) weld(p26,p24,p26,0,-0.4,0,0,0,0) qi{'CylinderMesh',p26,Scale=v3(1,1,1)}
  2176. p26=pa(Weapon,"","Block",0.6,0.4,0.8,false,false,0,0,c[1]) weld(p26,p24,p26,0,0.17,-0.4,rd(90),0,0)
  2177. p27=pa(Weapon,"","Block",0.6,0.4,0.4,false,false,0,0,c[1]) weld(p27,p26,p27,0,0,0.6,rd(180),0,0) qi{'SpecialMesh',p27,MeshType="Wedge"}
  2178. for i,v in pairs(Weapon:GetChildren()) do v.CanCollide=false end
  2179. end
  2180. WDesign({"Reddish brown","Really black","Dark stone grey","White","Medium stone grey","Really black"}) Arms(false) Legs(false)
  2181. BBD,BBT=0,{}
  2182. Dealt={20,40}
  2183. function Destroy(Directory,Part,Distance)
  2184. for i,v in pairs(Directory:GetChildren()) do
  2185. if v:IsA("BasePart") and not GetHum(v) and v.Parent.Name~=Tn and v.Parent.Name~=Suit.Name and v.Name~="Ignore" and v.Name~="Base" then
  2186. if (Part.Position-v.Position).magnitude<=Distance and v:GetMass()<=1000 then
  2187. v.Anchored=false
  2188. v:BreakJoints()
  2189. v.CFrame=cn(v.Position,Part.Position)*ca(0,rd(180),0)
  2190. v.Velocity=cn(Part.Position,v.Position).lookVector*50
  2191. end
  2192. elseif v:IsA("Model") or v:IsA("Script") or v:IsA("BasePart") and v.Name=="Base" then
  2193. Destroy(v,Part,Distance)
  2194. end
  2195. end
  2196. end
  2197. SplashDmg=function(Part,Distance)
  2198. q(function()
  2199. qi{"Explosion",workspace,Position=Part.Position,BlastPressure=0}
  2200. for i,v in pairs(workspace:GetChildren()) do
  2201. if v:FindFirstChild("Torso",true) then
  2202. local vTorso=v:FindFirstChild("Torso",true)
  2203. if (vTorso.Position-Part.Position).magnitude<=Distance then
  2204. local vHum=GetHum(vTorso)
  2205. if not vHum or BBD==0 or BBT[vHum.Parent] then return end
  2206. BBT[vHum.Parent]=1
  2207. if rn(1,20)==1 then
  2208. Dmg(vHum,rn(Dealt[1],Dealt[2])*3,true)
  2209. else
  2210. Dmg(vHum,rn(Dealt[1],Dealt[2]),false)
  2211. end
  2212. if BBD==2 and vTorso then
  2213. vHum.PlatformStand=true
  2214. if vHum.Jump then
  2215. AddBV(120,cn(Part.Position,vTorso.Position),vTorso,0.4)
  2216. else
  2217. AddBV(100,cn(Part.Position,vTorso.Position),vTorso,0.4)
  2218. end
  2219. if vTorso.Parent~=Char then
  2220. AddBAV(v3(rn(-50,50),rn(-50,50),rn(-50,50)),vTorso,0.4)
  2221. end
  2222. q(function()
  2223. wait(0.6)
  2224. vHum.PlatformStand=false
  2225. end)
  2226. end
  2227. so(ids.Hit,vTorso,1,1)
  2228. BBT[vHum.Parent]=nil
  2229. end
  2230. end
  2231. end
  2232. end)
  2233. end
  2234. Fire = function(speed,sc,cff,dest)
  2235. q(function()
  2236. local bb = pa(workspace,"bullet","Block",0.4*sc,0.6*sc,0.4*sc,false,true,0,0,"Bright red") bb.CanCollide=false qi{"CylinderMesh",bb}
  2237. local pp0 = pa(bb,"bullet","Block",0.2*sc,0.2*sc,0.2*sc,false,true,0,0,"Bright red") pp0.CanCollide=false qi{"SpecialMesh",pp0,MeshType="Sphere",Scale=v3(2,2,2)}
  2238. local pp1 = pa(bb,"bullet","Block",0.2*sc,0.2*sc,0.2*sc,false,true,0,0,"Really black") pp1.CanCollide=false qi{"CylinderMesh",pp1,Scale=v3(2.02,0.25,2.02)}
  2239. local pp2 = pa(bb,"bullet","Block",0.2*sc,0.2*sc,0.2*sc,false,true,0,0,"Really black") pp2.CanCollide=false qi{"CylinderMesh",pp2,Scale=v3(2.02,2,2.02)}
  2240. bb.CFrame = cn(cff.p,dest)*ca(rd(-90),0,0)
  2241. local m=pa(Weapon,"muzzle","Block",1,1,1,false,false,0,0,"Bright orange") qi{"SpecialMesh",m,MeshId=ids.Crown,Scale=v3(0.5,0.5,0.5)} weld(m,p25,m,0,-0.6,0.05,rd(180),0,0) fade(m,0.2)
  2242. local m=pa(Weapon,"muzzle","Block",1,1,1,false,false,0,0,"Bright orange") qi{"SpecialMesh",m,MeshId=ids.Crown2,Scale=v3(0.4,0.7,0.4)} weld(m,p25,m,0,-0.8,0,rd(180),0,0) fade(m,0.2)
  2243. for i=1,100 do
  2244. bhit,bpos=ray(bb.Position,bb.Position - (bb.CFrame *cn(0,-2,0)).p)
  2245. bhit2,bpos2=ray(pp0.Position,pp0.Position - (pp0.CFrame *cn(0,-2,0)).p)
  2246. bhit3,bpos3=ray(pp1.Position,bb.Position - (pp1.CFrame *cn(0,-2,0)).p)
  2247. bhit4,bpos4=ray(pp2.Position,pp0.Position - (pp2.CFrame *cn(0,-2,0)).p)
  2248. if bhit and bhit.Name ~= "bullet" and bhit.Name ~= "bullethole" and bhit.Name~="muzzle" and bpos and (bpos - bb.Position).magnitude < speed then break end
  2249. if bhit2 and bhit2.Name ~= "bullet" and bhit2.Name ~= "bullethole" and bhit2.Name~="muzzle" and bpos2 and (bpos2 - bb.Position).magnitude < speed then break end
  2250. if bhit3 and bhit3.Name ~= "bullet" and bhit3.Name ~= "bullethole" and bhit3.Name~="muzzle" and bpos3 and (bpos3 - bb.Position).magnitude < speed then break end
  2251. if bhit4 and bhit4.Name ~= "bullet" and bhit4.Name ~= "bullethole" and bhit4.Name~="muzzle" and bpos4 and (bpos4 - bb.Position).magnitude < speed then break end
  2252. bb.CFrame=bb.CFrame*cn(0,speed,0)*ca(rd(-0.3),0,0)
  2253. pp0.CFrame=bb.CFrame*cn(0,0.3,0)
  2254. pp1.CFrame=bb.CFrame*cn(0,-0.3,0)
  2255. pp2.CFrame=bb.CFrame*cn(0,0.1,0)
  2256. wait()
  2257. end
  2258. GlowMesh(false,"sphere",Weapon,v3(3,3,3),"Bright red",cn(bpos),0.25,1,0.05)
  2259. BBD=2
  2260. sopart=pa(workspace,"bullet","Block",0,0,0,true,true,1,0)
  2261. bb.CFrame=bb.CFrame*cn(0,(bpos-bb.Position).magnitude,0)
  2262. pp0.CFrame=bb.CFrame*cn(0,0.3,0)
  2263. pp1.CFrame=bb.CFrame*cn(0,-0.3,0)
  2264. pp2.CFrame=bb.CFrame*cn(0,0.1,0)
  2265. sopart.CFrame=bb.CFrame
  2266. so(ids.Explode,sopart,1,0.4)
  2267. SplashDmg(bb,11)
  2268. Destroy(workspace,bb,13)
  2269. BBD=0
  2270. deb:AddItem(bb,1)
  2271. deb:AddItem(sopart,1)
  2272. end)
  2273. end
  2274. function Stance(speed)
  2275. c2(ra,speed,3,1.25,0.5,-0.25,-75,-65,0)
  2276. c2(la,speed,3,-1.25,0.5,-0.25,-70,-20,0)
  2277. c2(ll,speed,3,-0.5,-1,0,0,0,0)
  2278. c2(rl,speed,3,0.5,-1,0,0,0,0)
  2279. c2(hw,speed,3,0,1.5,0,0,-65,0)
  2280. c2(tw,speed,3,0,0,0,0,65,0)
  2281. c2(neck,speed,3,0,1.5,0,0,0,0)
  2282. c2(hingew,speed,3,0,0,0,0,0,0)
  2283. c2(piperw,speed,3,0,0.7,0,0,30+PipeRotate,0)
  2284. Ani(haw,0,0.5,0,-75,0,0,0,speed/2,1)
  2285. end
  2286. function Reset(speed)
  2287. c2(ra,speed,3,1.5,0.5,0,0,0,0)
  2288. c2(la,speed,3,-1.5,0.5,0,0,0,0)
  2289. c2(ll,speed,3,-0.5,-1,0,0,0,0)
  2290. c2(rl,speed,3,0.5,-1,0,0,0,0)
  2291. c2(hw,speed,3,0,1.5,0,0,0,0)
  2292. c2(tw,speed,3,0,0,0,0,0,0)
  2293. c2(neck,speed,3,0,1.5,0,0,0,0)
  2294. c2(piperw,speed,3,0,0.7,0,0,30+PipeRotate,0)
  2295. c2(hingew,speed,3,0,0,0,0,0,0)
  2296. Ani(haw,0.5,2.5,1,270,0,90,0,speed,1)
  2297. end
  2298. function Button1Down()
  2299. if Clip>0 and anim=="" and (tick()-LastShot)>=0.6 then
  2300. LastShot=tick()
  2301. so(ids.Shoot,ha,1,1)
  2302. Fire(3,1,p25.CFrame*cn(0,-1,0),fmouse.Hit.p)
  2303. Clip=Clip-1
  2304. PipeRotate=PipeRotate+60
  2305. c2(piperw,0.4,3,0,0.7,0,0,30+PipeRotate,0)
  2306. elseif Clip==0 and anim=="" and (tick()-LastShot)>=0.6 then
  2307. anim="Reloading"
  2308. c2(ra,0.1,3,1.25,0.5,-0.25,-75,-65,0)
  2309. c2(la,0.1,3,-1.25,0.5,-0.25,-70,-20,0)
  2310. c2(hw,0.1,3,0,1.5,0,0,-65,0)
  2311. c1(hingew,0.15,3,0,0,0,0,-90,0)
  2312. for i=1,6 do
  2313. PipeRotate=PipeRotate+60
  2314. c1(la,0.13,3,-1.25,0.25,0.1,15,0,-15)
  2315. local pipe=pa(Weapon,"","Block",0.4,0.7,0.4,false,false,0,0,"Bright red") weld(pipe,LA,pipe,0,-1.1,0,rd(-90),0,0) qi{"CylinderMesh",pipe}
  2316. local pp=pa(pipe,"","Block",0.4,0.4,0.4,false,false,0,0,"Bright red") weld(pp,pipe,pp,0,-0.35,0,0,0,0) qi{"SpecialMesh",pp,MeshType="Sphere"}
  2317. local pp=pa(pipe,"","Block",0.41,0.2,0.41,false,false,0,0,"Really black") weld(pp,pipe,pp,0,0.35,0,0,0,0) qi{"CylinderMesh",pp,Scale=v3(1,0.25,1)}
  2318. local pp=pa(pipe,"","Block",0.41,0.5,0.41,false,false,0,0,"Really black") weld(pp,pipe,pp,0,0,0,0,0,0) qi{"CylinderMesh",pp}
  2319. c1(la,0.16,3,-1.25,0.4,-0.1,-100,0,-15)
  2320. c1(la,0.2,3,-1.25,0.3,-0.25,-40,0,-15)
  2321. so(ids.Reload,ha,1,1)
  2322. c1(piperw,0.4,3,0,0.7,0,0,30+PipeRotate,0)
  2323. Clip=i
  2324. deb:AddItem(pipe,0.05)
  2325. end
  2326. Stance(0.15)
  2327. anim=""
  2328. end
  2329. end
  2330. function KeyDown(key)
  2331. key=key:lower()
  2332. keys[key]=true
  2333. if key=="r" and anim=="" and equip=="equipped" and Clip==0 then
  2334. anim="Reloading"
  2335. c2(ra,0.1,3,1.25,0.5,-0.25,-75,-65,0)
  2336. c2(la,0.1,3,-1.25,0.5,-0.25,-70,-20,0)
  2337. c2(hw,0.1,3,0,1.5,0,0,-65,0)
  2338. c1(hingew,0.15,3,0,0,0,0,-90,0)
  2339. for i=1,6 do
  2340. PipeRotate=PipeRotate+60
  2341. c1(la,0.13,3,-1.25,0.25,0.1,15,0,-15)
  2342. local pipe=pa(Weapon,"","Block",0.4,0.7,0.4,false,false,0,0,"Bright red") weld(pipe,LA,pipe,0,-1.1,0,rd(-90),0,0) qi{"CylinderMesh",pipe}
  2343. local pp=pa(pipe,"","Block",0.4,0.4,0.4,false,false,0,0,"Bright red") weld(pp,pipe,pp,0,-0.35,0,0,0,0) qi{"SpecialMesh",pp,MeshType="Sphere"}
  2344. local pp=pa(pipe,"","Block",0.41,0.2,0.41,false,false,0,0,"Really black") weld(pp,pipe,pp,0,0.35,0,0,0,0) qi{"CylinderMesh",pp,Scale=v3(1,0.25,1)}
  2345. local pp=pa(pipe,"","Block",0.41,0.5,0.41,false,false,0,0,"Really black") weld(pp,pipe,pp,0,0,0,0,0,0) qi{"CylinderMesh",pp}
  2346. c1(la,0.16,3,-1.25,0.4,-0.1,-100,0,-15)
  2347. c1(la,0.2,3,-1.25,0.3,-0.25,-40,0,-15)
  2348. so(ids.Reload,ha,1,1)
  2349. c1(piperw,0.4,3,0,0.7,0,0,30+PipeRotate,0)
  2350. Clip=i
  2351. deb:AddItem(pipe,0.05)
  2352. end
  2353. Stance(0.15)
  2354. anim=""
  2355. end
  2356. end
  2357. Tool.Selected:connect(function(mouse)
  2358. fmouse=mouse
  2359. if equip=="unequipped" and anim=="" then
  2360. equip="equipping" Arms(true) c2(la,0.1,3,-1.5,0.5,0,0,0,20) c1(ra,0.1,3,1.5,0.5,0,120,0,-70)
  2361. local ofs = RA.CFrame:toObjectSpace(ha.CFrame)
  2362. haw.Part0=RA haw.C0=ofs haw.C1=cn(0,0,0) rAni(haw)
  2363. Stance(0.2) equip="equipped"
  2364. end
  2365. mouse.Button1Down:connect(Button1Down)
  2366. mouse.KeyDown:connect(KeyDown)
  2367. end)
  2368. Tool.Deselected:connect(function()
  2369. fmouse=nil
  2370. if equip=="equipped" and anim=="" then
  2371. equip="unequipping" c2(la,0.1,3,-1.5,0.5,0,0,0,0) c1(ra,0.1,3,1.5,0.5,0,120,0,-70)
  2372. local ofs = Torso.CFrame:toObjectSpace(ha.CFrame)
  2373. haw.Part0=Torso haw.C0=ofs haw.C1=cn(0,0,0) rAni(haw)
  2374. Reset(0.1)
  2375. Arms(false) Legs(false) equip="unequipped"
  2376. end
  2377. end)
  2378. Gyro=qi{"BodyGyro",Torso,D=50,P=1500}
  2379. game:GetService("RunService").Stepped:connect(function()
  2380. if fmouse~=nil then
  2381. Gyro.maxTorque=v3(1/0,1/0,1/0)
  2382. Gyro.cframe = cn(Torso.Position,v3(fmouse.hit.p.x,Torso.Position.y,fmouse.hit.p.z))
  2383. else
  2384. Gyro.maxTorque = v3(0,0,0)
  2385. end
  2386. if equip=="equipped" and anim=="" and fmouse~=nil then
  2387. c2(ra,1,3,1.25,0.5,-0.25,-75+math.deg((Torso.Position-fmouse.Hit.p).unit.y),-65,0)
  2388. c2(la,1,3,-1.25,0.5,-0.25,-70+math.deg((Torso.Position-fmouse.Hit.p).unit.y),-20,0)
  2389. c2(hw,1,3,0,1.5,0,math.deg((Torso.Position-fmouse.Hit.p).unit.y),-65,0)
  2390. end
  2391. end)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
Public Pastes
Advertisement
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!