API tools faq
paste
Advertisement
Guest User

Untitled

a guest
Jun 26th, 2016
75
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 88.44 KB | None | 0 0
raw download clone embed print report
  1. -- mediafire -----------------------------------------------------------------------------------------------------------------------------------------------------------------------
  2.  
  3.  
  4. script.Parent = nil
  5.  
  6.  
  7.  
  8.  
  9. it = Instance.new
  10.  
  11.  
  12. v3=Vector3.new
  13.  
  14.  
  15. bc=BrickColor.new
  16.  
  17.  
  18. c3=Color3.new
  19.  
  20.  
  21. cn=CFrame.new
  22.  
  23.  
  24. ca=CFrame.Angles
  25.  
  26.  
  27. ca2=function(a,b,c)
  28.  
  29.  
  30. return ca(math.rad(a),math.rad(b),math.rad(c))
  31.  
  32.  
  33. end
  34.  
  35.  
  36. ti=table.insert
  37.  
  38.  
  39. tr=table.remove
  40.  
  41.  
  42. rn=math.random
  43.  
  44.  
  45. rd=math.rad
  46.  
  47.  
  48. mf=math.floor
  49.  
  50.  
  51. ud = UDim2.new
  52.  
  53.  
  54. inf=math.huge
  55.  
  56.  
  57. dg=math.deg
  58.  
  59.  
  60. mdeg=math.deg
  61.  
  62.  
  63. v310=v3(1/0,1/0,1/0)
  64.  
  65.  
  66. pi=math.pi
  67.  
  68.  
  69. w=wait
  70.  
  71.  
  72. cf=cn
  73.  
  74.  
  75. bn=bc
  76.  
  77.  
  78. ts=tostring
  79.  
  80.  
  81.  
  82.  
  83. Workspace=game:GetService("Workspace")
  84.  
  85.  
  86. Players=game:GetService("Players")
  87.  
  88.  
  89. Player=Players.LocalPlayer
  90.  
  91.  
  92. Lighting=game:GetService("Lighting")
  93.  
  94.  
  95. Debris=game:GetService("Debris")
  96.  
  97.  
  98.  
  99.  
  100. work=Workspace
  101.  
  102.  
  103. server=Players
  104.  
  105.  
  106. tb=Player
  107.  
  108.  
  109. lighting=Lighting
  110.  
  111.  
  112. deb=Debris
  113.  
  114.  
  115.  
  116.  
  117. asset = "http://www.roblox.com/asset/?id="
  118.  
  119.  
  120. Asset=asset
  121.  
  122.  
  123.  
  124.  
  125. ids = {}
  126.  
  127.  
  128. ids.Shoot = 10209633
  129.  
  130.  
  131. ids.Reload = 10209636
  132.  
  133.  
  134. ids.Crown = 20329976
  135.  
  136.  
  137. ids.Crown2 = 1323306
  138.  
  139.  
  140. ids.Icon = 52611635
  141.  
  142.  
  143. ids.Explode = 2697431
  144.  
  145.  
  146. ids.Ring = 3270017
  147.  
  148.  
  149.  
  150.  
  151. for i,v in pairs(ids) do
  152.  
  153.  
  154. if type(v)=='number' then
  155.  
  156.  
  157. ids[i]='http://www.roblox.com/asset/?id='..v
  158.  
  159.  
  160. end
  161.  
  162.  
  163. game:GetService("ContentProvider"):Preload(ids[i])
  164.  
  165.  
  166. end
  167.  
  168.  
  169.  
  170.  
  171. qi = function(ttz)
  172.  
  173.  
  174. local qii = it(ttz[1]) table.foreach(ttz,function(oi,oi2)
  175.  
  176.  
  177. if oi ~= 1 and oi ~= 2 then qii[oi] = oi2 end end) qii.Parent=ttz[2] return qii end
  178.  
  179.  
  180.  
  181.  
  182. q = function(f)
  183.  
  184.  
  185. coroutine.resume(coroutine.create(function() f() end)) end
  186.  
  187.  
  188.  
  189.  
  190.  
  191. ft = function(tablez,item)
  192.  
  193.  
  194. for i=1,#tablez do if tablez[i] == item then return i end end return nil end
  195.  
  196.  
  197.  
  198.  
  199. ft2 = function(tablez,item)
  200.  
  201.  
  202. for i=1,#tablez do if tablez[i][1] == item then return i end end return nil end
  203.  
  204.  
  205.  
  206.  
  207. pa = function(pa,pn,sh,x,y,z,c,a,tr,re,bc2)
  208.  
  209.  
  210. local fp=nil
  211.  
  212.  
  213. if sh ~= "Wedge" and sh ~= "CornerWedge" and sh ~= "VehicleSeat" and sh ~= "Seat" then
  214.  
  215.  
  216. fp=it("Part",pa)
  217.  
  218.  
  219. fp.Shape=sh or "Block"
  220.  
  221.  
  222. fp.formFactor="Custom"
  223.  
  224.  
  225. elseif sh == "Wedge" then
  226.  
  227.  
  228. fp=it("WedgePart",pa)
  229.  
  230.  
  231. fp.formFactor="Custom"
  232.  
  233.  
  234. elseif sh == "CornerWedge" then
  235.  
  236.  
  237. fp=it("CornerWedgePart",pa)
  238.  
  239.  
  240. elseif sh == "VehicleSeat" then
  241.  
  242.  
  243. fp=it("VehicleSeat",pa)
  244.  
  245.  
  246. elseif sh == "Seat" then
  247.  
  248.  
  249. fp=it("Seat",pa)
  250.  
  251.  
  252. end
  253.  
  254.  
  255. fp.Size=v3(x or 4,y or 2,z or 2)
  256.  
  257.  
  258. fp.Friction = 2
  259.  
  260.  
  261. fp.CanCollide=c or true
  262.  
  263.  
  264. fp.Anchored=a or false
  265.  
  266.  
  267. fp.BrickColor=bc(bc2 or "")
  268.  
  269.  
  270. fp.Transparency=tr or 0
  271.  
  272.  
  273. fp.Reflectance=re or 0
  274.  
  275.  
  276. fp.BottomSurface=0
  277.  
  278.  
  279. fp.Name=pn or "TBLib Part"
  280.  
  281.  
  282. fp.Locked = true
  283.  
  284.  
  285. fp.TopSurface=0
  286.  
  287.  
  288. fp.CFrame=cn(0,0,0)
  289.  
  290.  
  291. fp:BreakJoints()
  292.  
  293.  
  294. fp.Anchored = a
  295.  
  296.  
  297. return fp
  298.  
  299.  
  300. end
  301.  
  302.  
  303.  
  304.  
  305. function ClearClass(Object,Class)
  306.  
  307.  
  308. for _,v in pairs(Object:GetChildren()) do
  309.  
  310.  
  311. if v:IsA(Class) then
  312.  
  313.  
  314. v:Destroy()
  315.  
  316.  
  317. end
  318.  
  319.  
  320. end
  321.  
  322.  
  323. end
  324.  
  325.  
  326.  
  327.  
  328. function GetClass(Object,Class)
  329.  
  330.  
  331. for _,v in pairs(Object:GetChildren()) do
  332.  
  333.  
  334. if v:IsA(Class) then
  335.  
  336.  
  337. return v
  338.  
  339.  
  340. end
  341.  
  342.  
  343. end
  344.  
  345.  
  346. end
  347.  
  348.  
  349.  
  350.  
  351. function re(par,obj)
  352.  
  353.  
  354. if par:findFirstChild(obj) then
  355.  
  356.  
  357. par[obj]:Remove''
  358.  
  359.  
  360. end
  361.  
  362.  
  363. end
  364.  
  365.  
  366.  
  367.  
  368. function invis(o)
  369.  
  370.  
  371. for i,v in pairs(o:children()) do
  372.  
  373.  
  374. if v:IsA("BasePart") then
  375.  
  376.  
  377. v.Transparency=1
  378.  
  379.  
  380. end
  381.  
  382.  
  383. invis(v)
  384.  
  385.  
  386. end
  387.  
  388.  
  389. end
  390.  
  391.  
  392.  
  393.  
  394. function newhats(p,o,o2)
  395.  
  396.  
  397. for i,v in pairs(p:children()) do
  398.  
  399.  
  400. if v:IsA("Hat") then
  401.  
  402.  
  403. local np=v.Handle:Clone''
  404.  
  405.  
  406. np.Transparency=0
  407.  
  408.  
  409. np.Mesh.Scale=np.Mesh.Scale*1.04
  410.  
  411.  
  412. np.Parent=o
  413.  
  414.  
  415. np.CFrame=v.Handle.CFrame
  416.  
  417.  
  418. np.Name="Hat"
  419.  
  420.  
  421. stick2(np,o2,o)
  422.  
  423.  
  424. end
  425.  
  426.  
  427. end
  428.  
  429.  
  430. end
  431.  
  432.  
  433.  
  434.  
  435. fade = function(prt,incr)
  436.  
  437.  
  438. q(function()
  439.  
  440.  
  441. for i=prt.Transparency,1,incr do
  442.  
  443.  
  444. prt.Transparency=i
  445.  
  446.  
  447. wait()
  448.  
  449.  
  450. end
  451.  
  452.  
  453. prt:Remove''
  454.  
  455.  
  456. end)
  457.  
  458.  
  459. end
  460.  
  461.  
  462.  
  463.  
  464.  
  465. function weld(pa,p0,p1,x,y,z,a,b,c)
  466.  
  467.  
  468. local fw=it("Weld",pa)
  469.  
  470.  
  471. fw.Part0=p0
  472.  
  473.  
  474. fw.Part1=p1
  475.  
  476.  
  477. fw.C0=cn(x,y,z)*ca(a,b,c)
  478.  
  479.  
  480. return fw
  481.  
  482.  
  483. end
  484.  
  485.  
  486.  
  487.  
  488.  
  489.  
  490. stick = function(hit2,hit)
  491.  
  492.  
  493. return qi({"Weld",hit2,Part0=hit2,Part1=hit,C0=hit2.CFrame:inverse()*cn(hit2.Position),C1=hit.CFrame:inverse()*cn(hit2.Position)})
  494.  
  495.  
  496. end
  497.  
  498.  
  499.  
  500.  
  501. function stick2(hit2,hit,tostick)
  502.  
  503.  
  504. local weld=it("Weld")
  505.  
  506.  
  507. weld.Part0=tostick
  508.  
  509.  
  510. weld.Part1=hit2
  511.  
  512.  
  513. local HitPos=hit.Position
  514.  
  515.  
  516. local CJ=cn(HitPos)
  517.  
  518.  
  519. local C0=hit2.CFrame:inverse() *CJ
  520.  
  521.  
  522. local C1=hit.CFrame:inverse() * CJ weld.C0=C1
  523.  
  524.  
  525. weld.C1=C0
  526.  
  527.  
  528. weld.Parent=hit2
  529.  
  530.  
  531. end
  532.  
  533.  
  534.  
  535.  
  536. ray = function(Pos, Dir,tab)
  537.  
  538.  
  539. return workspace:FindPartOnRay(Ray.new(Pos, Dir.unit *999),tab)
  540.  
  541.  
  542. end
  543.  
  544.  
  545.  
  546.  
  547.  
  548. function rtab(tabz,obj)
  549.  
  550.  
  551. for i=1,#tabz do
  552.  
  553.  
  554. if tabz[i] == obj then
  555.  
  556.  
  557. tr(tabz,i)
  558.  
  559.  
  560. break
  561.  
  562.  
  563. end
  564.  
  565.  
  566. end
  567.  
  568.  
  569. end
  570.  
  571.  
  572.  
  573.  
  574. sTrail={}
  575.  
  576.  
  577. function Trail2(lopz,ob,waitz,col,thickz,ofz) cw(function() ti(sTrail,ob)
  578.  
  579.  
  580. local oldpos=(ob.CFrame *ofz).p local lopz2=0
  581.  
  582.  
  583. local function loltr() local obp=(ob.CFrame *ofz).p lopz2=lopz2 + 1
  584.  
  585.  
  586. local mag=(oldpos - obp).magnitude
  587.  
  588.  
  589. local tr=pa(ob,"trail","Block",0,0,0,false,false,0.5,0.15,col) tr.Anchored=true
  590.  
  591.  
  592. tr.CFrame=cn(oldpos,obp)
  593.  
  594.  
  595. tr.CFrame=tr.CFrame + tr.CFrame.lookVector* (mag/2)
  596.  
  597.  
  598. local trm=it("CylinderMesh",tr) trm.Scale=v3(5*thickz,mag*5,5*thickz)
  599.  
  600.  
  601. cw(function() for i=5*thickz,0,-5*thickz/10 do trm.Scale=v3(i,mag*5,i) w() end tr:Remove'' end)
  602.  
  603.  
  604. tr.CFrame=tr.CFrame *ca(rd(90),0,0) oldpos=obp end
  605.  
  606.  
  607. repeat loltr()
  608.  
  609.  
  610. wait(waitz) until ft(sTrail,ob) == nil or lopz2 == lopz loltr() end) end
  611.  
  612.  
  613.  
  614.  
  615. Trail = function(ob,times,waitz,col,thickz,ofz) -- Brick Trail
  616.  
  617.  
  618. q(function()
  619.  
  620.  
  621. local oldpos=(ob.CFrame *ofz).p
  622.  
  623.  
  624. for i=1,times do
  625.  
  626.  
  627. if effon==true then
  628.  
  629.  
  630. local obp=(ob.CFrame *ofz).p
  631.  
  632.  
  633. local mag=(oldpos - obp).magnitude
  634.  
  635.  
  636. local tr=pa(ob,"trail","Block",0,0,0,false,false,0.5,0.15,col)
  637.  
  638.  
  639. tr.Anchored=true
  640.  
  641.  
  642. tr.CFrame=cn(oldpos,obp)
  643.  
  644.  
  645. tr.CFrame=tr.CFrame + tr.CFrame.lookVector* (mag/2)
  646.  
  647.  
  648. trm=it("CylinderMesh",tr)
  649.  
  650.  
  651. trm.Scale=v3(thickz,mag*5,thickz)
  652.  
  653.  
  654. q(function()
  655.  
  656.  
  657. for i=thickz,0,thickz/10 do
  658.  
  659.  
  660. trm.Scale=v3(i,mag*5,i)
  661.  
  662.  
  663. wait()
  664.  
  665.  
  666. end
  667.  
  668.  
  669. tr:Remove''
  670.  
  671.  
  672. end)
  673.  
  674.  
  675. tr.CFrame=tr.CFrame *ca(rd(90),0,0)
  676.  
  677.  
  678. oldpos=obp wait(waitz)
  679.  
  680.  
  681. end
  682.  
  683.  
  684. end
  685.  
  686.  
  687. end)
  688.  
  689.  
  690. end
  691.  
  692.  
  693.  
  694.  
  695. de = function(it,ti) game:service'Debris':AddItem(it,ti) end -- Debris
  696.  
  697.  
  698.  
  699.  
  700. GlowMesh = function(anch,meshid2,rootz,mv3,colzz,adjus,l1,l2,l3) q(function() -- Glowmesh
  701.  
  702.  
  703. 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
  704.  
  705.  
  706. 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
  707.  
  708.  
  709. for i=l1,l2,l3 do spi.Transparency=i spim.Scale=mv3*(i+0.3) wait() end spi:Remove'' end)
  710.  
  711.  
  712. end
  713.  
  714.  
  715.  
  716.  
  717. DetectSurface = function(pos, part) -- Surface Detector
  718.  
  719.  
  720. local surface = nil local pospos = part.CFrame
  721.  
  722.  
  723. local pos2 = pospos:pointToObjectSpace(pos) local siz = part.Size local shaep = part.Shape
  724.  
  725.  
  726. if shaep == Enum.PartType.Ball or shaep == Enum.PartType.Cylinder then
  727.  
  728.  
  729. surface = {"Anything", cn(pospos.p, pos)*cn(0, 0, -(pospos.p - pos).magnitude+0.12)*ca(rd(-90), 0, 0)}
  730.  
  731.  
  732. else if pos2.Y > ((siz.Y/2)-0.01) then surface = {"Top", ca(0, 0, 0)}
  733.  
  734.  
  735. 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))}
  736.  
  737.  
  738. 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
  739.  
  740.  
  741.  
  742.  
  743. BulletHole = function(HitPos,HitObj,sc,img,par) -- Bullethole function
  744.  
  745.  
  746. local Surface = DetectSurface(HitPos, HitObj)
  747.  
  748.  
  749. local C = cn(HitPos) * ca(HitObj.CFrame:toEulerAnglesXYZ()) * Surface[2]
  750.  
  751.  
  752. if Surface[1] == "Anything" then C = Surface[2] end local theimg = img or ds.BulletHole
  753.  
  754.  
  755. local bl = pa(workspace or par,"bullethole","Block",sc,0,sc,false,true,1,0,"") qi({"Decal",bl,Face="Top",Texture=theimg})
  756.  
  757.  
  758. 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)
  759.  
  760.  
  761. end
  762.  
  763.  
  764.  
  765.  
  766. so = function(id,par,vol,pit) q(function() -- Sound maker
  767.  
  768.  
  769. local sou = qi({"Sound",par or workspace,Volume=vol,Pitch=pit or 1,SoundId=id})
  770.  
  771.  
  772. wait() sou:play() wait(6) sou:Remove() end) end
  773.  
  774.  
  775.  
  776.  
  777. -- local/so(asset..ds.GothicMusic,workspace,1,2.6)
  778.  
  779.  
  780.  
  781.  
  782. function GetRegion(p0,p1,f,f2) q(function()
  783.  
  784.  
  785. 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
  786.  
  787.  
  788. end) end
  789.  
  790.  
  791.  
  792.  
  793.  
  794. FindGround = function(pos) -- ground finder
  795.  
  796.  
  797. local ax,ay,az = pos:toEulerAnglesXYZ()
  798.  
  799.  
  800. local bhit,bpos=ray(pos.p,pos.p - (pos.p + v3(0,200,0)))
  801.  
  802.  
  803. if bhit and bpos then
  804.  
  805.  
  806. return cn(bpos)*ca(ax,ay,az)
  807.  
  808.  
  809. end
  810.  
  811.  
  812. return nil
  813.  
  814.  
  815. end
  816.  
  817.  
  818.  
  819.  
  820. function NPC(Name, Position) -- npc maker
  821.  
  822.  
  823. local Character = Instance.new("Model")
  824.  
  825.  
  826. Character.Name = Name
  827.  
  828.  
  829. local Humanoid = Instance.new("Humanoid")
  830.  
  831.  
  832. Humanoid.Parent = Character
  833.  
  834.  
  835. local Template = Instance.new("Part")
  836.  
  837.  
  838. Template.FormFactor = "Custom"
  839.  
  840.  
  841. Template.Size = Vector3.new(1, 2, 1)
  842.  
  843.  
  844. Template.Locked = true
  845.  
  846.  
  847. local Head = Template:Clone()
  848.  
  849.  
  850. Head.Name = "Head"
  851.  
  852.  
  853. Head.TopSurface = "Smooth"
  854.  
  855.  
  856. Head.BottomSurface = "Smooth"
  857.  
  858.  
  859. Head.Size = Vector3.new(2, 1, 1)
  860.  
  861.  
  862. Head.Parent = Character
  863.  
  864.  
  865. local Mesh = Instance.new("SpecialMesh")
  866.  
  867.  
  868. Mesh.MeshType = "Head"
  869.  
  870.  
  871. Mesh.Scale = Vector3.new(1.25, 1.25, 1.25)
  872.  
  873.  
  874. Mesh.Parent = Head
  875.  
  876.  
  877. local Face = Instance.new("Decal")
  878.  
  879.  
  880. Face.Name = "face"
  881.  
  882.  
  883. Face.Texture = "rbxasset://textures/face.png"
  884.  
  885.  
  886. Face.Parent = Head
  887.  
  888.  
  889. local Torso = Template:Clone()
  890.  
  891.  
  892. Torso.Name = "Torso"
  893.  
  894.  
  895. Torso.LeftSurface = "Weld"
  896.  
  897.  
  898. Torso.RightSurface = "Weld"
  899.  
  900.  
  901. Torso.CFrame = CFrame.new(0, 10000, 0)
  902.  
  903.  
  904. Torso.Size = Vector3.new(2, 2, 1)
  905.  
  906.  
  907. Torso.Parent = Character
  908.  
  909.  
  910. local TShirt = Instance.new("Decal")
  911.  
  912.  
  913. TShirt.Name = "roblox"
  914.  
  915.  
  916. TShirt.Parent = Torso
  917.  
  918.  
  919. local LeftArm = Template:Clone()
  920.  
  921.  
  922. LeftArm.Name = "Left Arm"
  923.  
  924.  
  925. LeftArm.Parent = Character
  926.  
  927.  
  928. local RightArm = Template:Clone()
  929.  
  930.  
  931. RightArm.Name = "Right Arm"
  932.  
  933.  
  934. RightArm.Parent = Character
  935.  
  936.  
  937. local LeftLeg = Template:Clone()
  938.  
  939.  
  940. LeftLeg.Name = "Left Leg"
  941.  
  942.  
  943. LeftLeg.Parent = Character
  944.  
  945.  
  946. local RightLeg = Template:Clone()
  947.  
  948.  
  949. RightLeg.Name = "Right Leg"
  950.  
  951.  
  952. RightLeg.Parent = Character
  953.  
  954.  
  955. Character:BreakJoints()
  956.  
  957.  
  958. local Neck = Instance.new("Weld")
  959.  
  960.  
  961. Neck.Name = "Neck"
  962.  
  963.  
  964. Neck.Part0 = Torso
  965.  
  966.  
  967. Neck.Part1 = Head
  968.  
  969.  
  970. Neck.C0 = CFrame.new(0, 1.5, 0)
  971.  
  972.  
  973. Neck.Parent = Torso
  974.  
  975.  
  976. local LeftShoulder = Instance.new("Motor")
  977.  
  978.  
  979. LeftShoulder.Name = "Left Shoulder"
  980.  
  981.  
  982. LeftShoulder.Part0 = Torso
  983.  
  984.  
  985. LeftShoulder.Part1 = LeftArm
  986.  
  987.  
  988. LeftShoulder.MaxVelocity = 0.1
  989.  
  990.  
  991. LeftShoulder.C0 = CFrame.new(-Torso.Size.x / 2 - RightArm.Size.x / 2, LeftArm.Size.y / 4, 0) * CFrame.fromEulerAnglesXYZ(0, -math.pi / 2, 0)
  992.  
  993.  
  994. LeftShoulder.C1 = CFrame.new(0, LeftArm.Size.y / 4, 0) * CFrame.fromEulerAnglesXYZ(0, -math.pi / 2, 0)
  995.  
  996.  
  997. LeftShoulder.Parent = Torso
  998.  
  999.  
  1000. local RightShoulder = Instance.new("Motor")
  1001.  
  1002.  
  1003. RightShoulder.Name = "Right Shoulder"
  1004.  
  1005.  
  1006. RightShoulder.Part0 = Torso
  1007.  
  1008.  
  1009. RightShoulder.Part1 = RightArm
  1010.  
  1011.  
  1012. RightShoulder.MaxVelocity = 0.1
  1013.  
  1014.  
  1015. RightShoulder.C0 = CFrame.new(Torso.Size.x / 2 + RightArm.Size.x / 2, RightArm.Size.y / 4, 0) * CFrame.fromEulerAnglesXYZ(0, math.pi / 2, 0)
  1016.  
  1017.  
  1018. RightShoulder.C1 = CFrame.new(0, RightArm.Size.y / 4, 0) * CFrame.fromEulerAnglesXYZ(0, math.pi / 2, 0)
  1019.  
  1020.  
  1021. RightShoulder.Parent = Torso
  1022.  
  1023.  
  1024. local LeftHip = Instance.new("Motor")
  1025.  
  1026.  
  1027. LeftHip.Name = "Left Hip"
  1028.  
  1029.  
  1030. LeftHip.Part0 = Torso
  1031.  
  1032.  
  1033. LeftHip.Part1 = LeftLeg
  1034.  
  1035.  
  1036. LeftHip.MaxVelocity = 0.1
  1037.  
  1038.  
  1039. LeftHip.C0 = CFrame.new(-LeftLeg.Size.x / 2, -LeftLeg.Size.y / 2, 0) * CFrame.fromEulerAnglesXYZ(0, -math.pi / 2, 0)
  1040.  
  1041.  
  1042. LeftHip.C1 = CFrame.new(0, LeftLeg.Size.y / 2, 0) * CFrame.fromEulerAnglesXYZ(0, -math.pi / 2, 0)
  1043.  
  1044.  
  1045. LeftHip.Parent = Torso
  1046.  
  1047.  
  1048. local RightHip = Instance.new("Motor")
  1049.  
  1050.  
  1051. RightHip.Name = "Right Hip"
  1052.  
  1053.  
  1054. RightHip.Part0 = Torso
  1055.  
  1056.  
  1057. RightHip.Part1 = RightLeg
  1058.  
  1059.  
  1060. RightHip.MaxVelocity = 0.1
  1061.  
  1062.  
  1063. RightHip.C0 = CFrame.new(RightLeg.Size.x / 2, -RightLeg.Size.y / 2, 0) * CFrame.fromEulerAnglesXYZ(0, math.pi / 2, 0)
  1064.  
  1065.  
  1066. RightHip.C1 = CFrame.new(0, RightLeg.Size.y / 2, 0) * CFrame.fromEulerAnglesXYZ(0, math.pi / 2, 0)
  1067.  
  1068.  
  1069. RightHip.Parent = Torso
  1070.  
  1071.  
  1072. local BodyColors = Instance.new("BodyColors")
  1073.  
  1074.  
  1075. BodyColors.LeftArmColor = BrickColor.new("Bright yellow")
  1076.  
  1077.  
  1078. BodyColors.RightArmColor = BrickColor.new("Bright yellow")
  1079.  
  1080.  
  1081. BodyColors.LeftLegColor = BrickColor.new("Br. yellowish green")
  1082.  
  1083.  
  1084. BodyColors.RightLegColor = BrickColor.new("Br. yellowish green")
  1085.  
  1086.  
  1087. BodyColors.HeadColor = BrickColor.new("Bright yellow")
  1088.  
  1089.  
  1090. BodyColors.TorsoColor = BrickColor.new("Bright blue")
  1091.  
  1092.  
  1093. BodyColors.Parent = Character
  1094.  
  1095.  
  1096. Character.Parent = Workspace
  1097.  
  1098.  
  1099. Character:MoveTo(Position)
  1100.  
  1101.  
  1102. Character:MoveTo(Torso.Position + Vector3.new(0, 3, 0))
  1103.  
  1104.  
  1105. return Character
  1106.  
  1107.  
  1108. end
  1109.  
  1110.  
  1111.  
  1112.  
  1113. AddBV=function(str,cfr,par,debt)
  1114.  
  1115.  
  1116. if not par then return end
  1117.  
  1118.  
  1119. if par:findFirstChild'LibBV' then par.LibBV:Remove() end
  1120.  
  1121.  
  1122. tbbodyvelocity=qi{'BodyVelocity',par,velocity=cfr.lookVector*str,maxForce=v3(1/0,1/0,1/0),Name='LibBV'} deb:AddItem(tbbodyvelocity,debt)
  1123.  
  1124.  
  1125. end
  1126.  
  1127.  
  1128.  
  1129.  
  1130. AddBG=function(str,par,debt)
  1131.  
  1132.  
  1133. if not par then return end
  1134.  
  1135.  
  1136. if par:findFirstChild'LibBG' then par.LibBG:Remove() end
  1137.  
  1138.  
  1139. tbbodygyro=qi{'BodyGyro',par,maxTorque=v3(1/0,1/0,1/0),P=100000,cframe=str,Name='LibBG'} deb:AddItem(tbbodygyro,debt)
  1140.  
  1141.  
  1142. end
  1143.  
  1144.  
  1145.  
  1146.  
  1147. AddBAV=function(vec3,par,debt)
  1148.  
  1149.  
  1150. if not par then return end
  1151.  
  1152.  
  1153. if par:findFirstChild'LibBAV' then par.LibBAV:Remove() end
  1154.  
  1155.  
  1156. tbbodyangularvelocity=qi{'BodyAngularVelocity',par,maxTorque=v3(1/0,1/0,1/0),angularvelocity=vec3,Name='LibBAV'} deb:AddItem(tbbodyangularvelocity,debt)
  1157.  
  1158.  
  1159. end
  1160.  
  1161.  
  1162.  
  1163.  
  1164. Dmg = function(Hum,Dealt,Critical)
  1165.  
  1166.  
  1167. local HM=Hum.Parent
  1168.  
  1169.  
  1170. local HMT,HMB=HM:findFirstChild'Torso',HM:findFirstChild'Block'
  1171.  
  1172.  
  1173. local Blocks=HMB and HMB.Value>0
  1174.  
  1175.  
  1176. if HMT then
  1177.  
  1178.  
  1179. local mm=qi{'Model',HMT} qi{'Humanoid',mm,MaxHealth=0} deb:AddItem(mm,1)
  1180.  
  1181.  
  1182. 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}
  1183.  
  1184.  
  1185. if Blocks then
  1186.  
  1187.  
  1188. mm.Name='Block!'
  1189.  
  1190.  
  1191. mp.BrickColor=bn'Bright blue'
  1192.  
  1193.  
  1194. HMB.Value=HMB.Value-1
  1195.  
  1196.  
  1197. elseif not Blocks then
  1198.  
  1199.  
  1200. mm.Name=Dealt
  1201.  
  1202.  
  1203. mp.BrickColor=bn'Bright red'
  1204.  
  1205.  
  1206. end
  1207.  
  1208.  
  1209. end
  1210.  
  1211.  
  1212. if not Blocks then
  1213.  
  1214.  
  1215. Hum:TakeDamage(Dealt)
  1216.  
  1217.  
  1218. end
  1219.  
  1220.  
  1221. end
  1222.  
  1223.  
  1224.  
  1225.  
  1226. GetHum = function(part)
  1227.  
  1228.  
  1229. local Hum,HT,block
  1230.  
  1231.  
  1232. for i,v in pairs(part.Parent:children()) do
  1233.  
  1234.  
  1235. if v:IsA("Humanoid") then
  1236.  
  1237.  
  1238. Hum=v
  1239.  
  1240.  
  1241. elseif v.Name=='Torso' then
  1242.  
  1243.  
  1244. HT=v
  1245.  
  1246.  
  1247. elseif v.Name=='Block' and v:IsA("NumberValue") then
  1248.  
  1249.  
  1250. block=v
  1251.  
  1252.  
  1253. end
  1254.  
  1255.  
  1256. end
  1257.  
  1258.  
  1259. return Hum,HT,block
  1260.  
  1261.  
  1262. end
  1263.  
  1264.  
  1265.  
  1266.  
  1267. Lightning = function(p0,p1,tym,ofs,col,th,tra) -- start end times offset color thickness
  1268.  
  1269.  
  1270. local magz = (p0 - p1).magnitude local curpos = p0 local trz = {-ofs,ofs}
  1271.  
  1272.  
  1273. for i=1,tym do
  1274.  
  1275.  
  1276. local li = it("Part",c) li.TopSurface =0 li.BottomSurface = 0 li.Anchored = true li.Transparency = tra or 0.4 li.BrickColor = bc(col)
  1277.  
  1278.  
  1279. 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)])
  1280.  
  1281.  
  1282. local trolpos = cn(curpos,p1)*cn(0,0,magz/tym).p+ofz
  1283.  
  1284.  
  1285. if tym == i then
  1286.  
  1287.  
  1288. local magz2 = (curpos - p1).magnitude li.Size = v3(th,th,magz2)
  1289.  
  1290.  
  1291. li.CFrame = cn(curpos,p1)*cn(0,0,-magz2/2)
  1292.  
  1293.  
  1294. else
  1295.  
  1296.  
  1297. li.CFrame = cn(curpos,trolpos)*cn(0,0,magz/tym/2)
  1298.  
  1299.  
  1300. end
  1301.  
  1302.  
  1303. curpos = li.CFrame*cn(0,0,magz/tym/2).p de(li,0.25)
  1304.  
  1305.  
  1306. end
  1307.  
  1308.  
  1309. end
  1310.  
  1311.  
  1312.  
  1313.  
  1314. MakeCrater = function(pos,sc,tyms,debz,par) -- crater maker
  1315.  
  1316.  
  1317. q(function()
  1318.  
  1319.  
  1320. if not debz then
  1321.  
  1322.  
  1323. debz = 5
  1324.  
  1325.  
  1326. end
  1327.  
  1328.  
  1329. local bhit,bpos=ray(pos,pos - (pos + v3(0,200,0)))
  1330.  
  1331.  
  1332. if bhit and bpos then
  1333.  
  1334.  
  1335. for i=1,tyms do
  1336.  
  1337.  
  1338. q(function()
  1339.  
  1340.  
  1341. 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)
  1342.  
  1343.  
  1344. gr.Material = bhit.Material
  1345.  
  1346.  
  1347. gr.TopSurface = bhit.TopSurface
  1348.  
  1349.  
  1350. 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)))
  1351.  
  1352.  
  1353. wait(debz)
  1354.  
  1355.  
  1356. fade(gr,0.1)
  1357.  
  1358.  
  1359. end)
  1360.  
  1361.  
  1362. end
  1363.  
  1364.  
  1365. end
  1366.  
  1367.  
  1368. end)
  1369.  
  1370.  
  1371. end
  1372.  
  1373.  
  1374.  
  1375.  
  1376. MakeCrack = function(pos,sc,debz,par) -- crackmaker
  1377.  
  1378.  
  1379. q(function()
  1380.  
  1381.  
  1382. if not debz then
  1383.  
  1384.  
  1385. debz = 5
  1386.  
  1387.  
  1388. end
  1389.  
  1390.  
  1391. local bhit,bpos=ray(pos,pos - (pos + v3(0,10,0)))
  1392.  
  1393.  
  1394. if bhit and bpos then
  1395.  
  1396.  
  1397. local cr = pa(par or workspace,"Crack","Block",sc,0,sc,false,true,1,0,"") cr.CFrame = cn(bpos)
  1398.  
  1399.  
  1400. local dec=qi({"Decal",cr,Face="Top",Texture=ds.Crack}) de(cr,debz)
  1401.  
  1402.  
  1403. end
  1404.  
  1405.  
  1406. end)
  1407.  
  1408.  
  1409. end
  1410.  
  1411.  
  1412.  
  1413.  
  1414. a = {}
  1415.  
  1416.  
  1417. a.insw={}
  1418.  
  1419.  
  1420. function cleanweld(wexx,namzi)
  1421.  
  1422.  
  1423. local tn=ft2(a.insw,wexx)
  1424.  
  1425.  
  1426. if tn==nil then return end
  1427.  
  1428.  
  1429. if namzi=="p0" then
  1430.  
  1431.  
  1432. a.insw[tn][2]["p0x"],a.insw[tn][2]["p0y"],a.insw[tn][2]["p0z"]=0,0,0 elseif namzi=="p1" then
  1433.  
  1434.  
  1435. a.insw[tn][2]["p1x"],a.insw[tn][2]["p1y"],a.insw[tn][2]["p1z"]=0,0,0 elseif namzi=="a0" then
  1436.  
  1437.  
  1438. a.insw[tn][2]["a0x"],a.insw[tn][2]["a0y"],a.insw[tn][2]["a0z"]=0,0,0 elseif namzi=="a1" then
  1439.  
  1440.  
  1441. a.insw[tn][2]["a1x"],a.insw[tn][2]["a1y"],a.insw[tn][2]["a1z"]=0,0,0
  1442.  
  1443.  
  1444. end
  1445.  
  1446.  
  1447. end
  1448.  
  1449.  
  1450. function c2(wexx,smmx,c0orc1,aa,bb,cc,xx,yy,zz)
  1451.  
  1452.  
  1453. q(function()
  1454.  
  1455.  
  1456. c1(wexx,smmx,c0orc1,aa,bb,cc,xx,yy,zz)
  1457.  
  1458.  
  1459. end)
  1460.  
  1461.  
  1462. end
  1463.  
  1464.  
  1465. a.Welding=0
  1466.  
  1467.  
  1468. function c1(wexx,smmx,c0orc1,aa,bb,cc,xx,yy,zz)
  1469.  
  1470.  
  1471. if ft2(a.insw,wexx)==nil then
  1472.  
  1473.  
  1474. ti(a.insw,{wexx,{}})
  1475.  
  1476.  
  1477. local tn=ft2(a.insw,wexx)
  1478.  
  1479.  
  1480. a.insw[tn][2]["p0x"],a.insw[tn][2]["p0y"],a.insw[tn][2]["p0z"]=wexx.C0.x,wexx.C0.y,wexx.C0.z
  1481.  
  1482.  
  1483. a.insw[tn][2]["p1x"],a.insw[tn][2]["p1y"],a.insw[tn][2]["p1z"]=wexx.C1.x,wexx.C1.y,wexx.C1.z
  1484.  
  1485.  
  1486. a.insw[tn][2]["a0x"],a.insw[tn][2]["a0y"],a.insw[tn][2]["a0z"]=wexx.C0:toEulerAnglesXYZ()
  1487.  
  1488.  
  1489. a.insw[tn][2]["a1x"],a.insw[tn][2]["a1y"],a.insw[tn][2]["a1z"]=wexx.C1:toEulerAnglesXYZ()
  1490.  
  1491.  
  1492. end
  1493.  
  1494.  
  1495. local tn=ft2(a.insw,wexx)
  1496.  
  1497.  
  1498. local xx2,yy2,zz2=0,0,0
  1499.  
  1500.  
  1501. local x2,y2,z2=0,0,0
  1502.  
  1503.  
  1504. if c0orc1==0 then
  1505.  
  1506.  
  1507. xx2,yy2,zz2=a.insw[tn][2]["a0x"],a.insw[tn][2]["a0y"],a.insw[tn][2]["a0z"]
  1508.  
  1509.  
  1510. x2,y2,z2=a.insw[tn][2]["p0x"],a.insw[tn][2]["p0y"],a.insw[tn][2]["p0z"]
  1511.  
  1512.  
  1513. elseif c0orc1==1 then
  1514.  
  1515.  
  1516. xx2,yy2,zz2=a.insw[tn][2]["a1x"],a.insw[tn][2]["a1y"],a.insw[tn][2]["a1z"]
  1517.  
  1518.  
  1519. x2,y2,z2=a.insw[tn][2]["p1x"],a.insw[tn][2]["p1y"],a.insw[tn][2]["p1z"]
  1520.  
  1521.  
  1522. else
  1523.  
  1524.  
  1525. xx2,yy2,zz2=a.insw[tn][2]["a1x"],a.insw[tn][2]["a1y"],a.insw[tn][2]["a1z"]
  1526.  
  1527.  
  1528. x2,y2,z2=a.insw[tn][2]["p0x"],a.insw[tn][2]["p0y"],a.insw[tn][2]["p0z"]
  1529.  
  1530.  
  1531. end a.Welding=a.Welding + 1
  1532.  
  1533.  
  1534. local twa=1
  1535.  
  1536.  
  1537. if smmx >= 1 then
  1538.  
  1539.  
  1540. else
  1541.  
  1542.  
  1543. for i=smmx,0.8,smmx do
  1544.  
  1545.  
  1546. twa = 1
  1547.  
  1548.  
  1549. if c0orc1==0 then
  1550.  
  1551.  
  1552. 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))
  1553.  
  1554.  
  1555. elseif c0orc1==1 then
  1556.  
  1557.  
  1558. 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))
  1559.  
  1560.  
  1561. else local x,y,z = wexx.C0:toEulerAnglesXYZ()
  1562.  
  1563.  
  1564. wexx.C0=cn(x2-(((x2-aa)/twa)*i),y2-(((y2-bb)/twa)*i),z2-(((z2-cc)/twa)*i))*ca(x,y,z)
  1565.  
  1566.  
  1567. 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))
  1568.  
  1569.  
  1570. end
  1571.  
  1572.  
  1573. if fu then
  1574.  
  1575.  
  1576. q(fu)
  1577.  
  1578.  
  1579. end
  1580.  
  1581.  
  1582. wait()
  1583.  
  1584.  
  1585. end
  1586.  
  1587.  
  1588. for i=0.8,1,smmx*0.45 do
  1589.  
  1590.  
  1591. twa = 1
  1592.  
  1593.  
  1594. if c0orc1==0 then
  1595.  
  1596.  
  1597. 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))
  1598.  
  1599.  
  1600. elseif c0orc1==1 then
  1601.  
  1602.  
  1603. 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))
  1604.  
  1605.  
  1606. else local x,y,z = wexx.C0:toEulerAnglesXYZ()
  1607.  
  1608.  
  1609. wexx.C0=cn(x2-(((x2-aa)/twa)*i),y2-(((y2-bb)/twa)*i),z2-(((z2-cc)/twa)*i))*ca(x,y,z)
  1610.  
  1611.  
  1612. 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))
  1613.  
  1614.  
  1615. end
  1616.  
  1617.  
  1618. wait()
  1619.  
  1620.  
  1621. end
  1622.  
  1623.  
  1624. end
  1625.  
  1626.  
  1627. local i=1
  1628.  
  1629.  
  1630. if c0orc1==0 then
  1631.  
  1632.  
  1633. 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))
  1634.  
  1635.  
  1636. elseif c0orc1==1 then
  1637.  
  1638.  
  1639. 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))
  1640.  
  1641.  
  1642. else local x,y,z = wexx.C0:toEulerAnglesXYZ()
  1643.  
  1644.  
  1645. wexx.C0=cn(x2-(((x2-aa)/twa)*i),y2-(((y2-bb)/twa)*i),z2-(((z2-cc)/twa)*i))*ca(x,y,z)
  1646.  
  1647.  
  1648. 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))
  1649.  
  1650.  
  1651. end
  1652.  
  1653.  
  1654. a.Welding=a.Welding - 1
  1655.  
  1656.  
  1657. local tn=ft2(a.insw,wexx)
  1658.  
  1659.  
  1660. if c0orc1==0 then
  1661.  
  1662.  
  1663. 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)
  1664.  
  1665.  
  1666. 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)
  1667.  
  1668.  
  1669. elseif c0orc1==1 then
  1670.  
  1671.  
  1672. 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)
  1673.  
  1674.  
  1675. 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)
  1676.  
  1677.  
  1678. elseif c0orc1==3 then
  1679.  
  1680.  
  1681. local x,y,z=wexx.C0.x,wexx.C0.y,wexx.C0.z
  1682.  
  1683.  
  1684. 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)
  1685.  
  1686.  
  1687. local x,y,z=wexx.C1:toEulerAnglesXYZ()
  1688.  
  1689.  
  1690. 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)
  1691.  
  1692.  
  1693. end
  1694.  
  1695.  
  1696. end
  1697.  
  1698.  
  1699.  
  1700.  
  1701. Welds={}
  1702.  
  1703.  
  1704. Ani=function(w,a,b,c,d,e,f,ty,inc,sined)
  1705.  
  1706.  
  1707. if not Welds[w] then
  1708.  
  1709.  
  1710. local d0,e0,f0=w.C0:toEulerAnglesXYZ() local d1,e1,f1=w.C1:toEulerAnglesXYZ()
  1711.  
  1712.  
  1713. local d0,e0,f0=mdeg(d0),mdeg(e0),mdeg(f0) local d1,e1,f1=mdeg(d1),mdeg(e1),mdeg(f1)
  1714.  
  1715.  
  1716. 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}}
  1717.  
  1718.  
  1719. end
  1720.  
  1721.  
  1722. local c0,c1=Welds[w][0],Welds[w][1]
  1723.  
  1724.  
  1725. c0[1],c0[2],c0[3]=w.C0.x,w.C0.y,w.C0.z
  1726.  
  1727.  
  1728. c1[1],c1[2],c1[3]=w.C1.x,w.C1.y,w.C1.z
  1729.  
  1730.  
  1731. local A0,B0,C0,D0,E0,F0 = unpack(c0)
  1732.  
  1733.  
  1734. local A1,B1,C1,D1,E1,F1 = unpack(c1)
  1735.  
  1736.  
  1737. local Do = function(i)
  1738.  
  1739.  
  1740. if ty==0 then
  1741.  
  1742.  
  1743. 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) )
  1744.  
  1745.  
  1746. elseif ty==1 then
  1747.  
  1748.  
  1749. 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) )
  1750.  
  1751.  
  1752. else
  1753.  
  1754.  
  1755. w.C0=cn( A0-((A0-a)*i) , B0-((B0-b)*i) , C0-((C0-c)*i) ) * ca2(D0,E0,F0)
  1756.  
  1757.  
  1758. w.C1=cn(A1,B1,C1) * ca2( D1-((D1-d)*i) , E1-(((E1-e)/1)*i) , F1-((F1-f)*i) )
  1759.  
  1760.  
  1761. end
  1762.  
  1763.  
  1764. end
  1765.  
  1766.  
  1767. for i=inc,1,inc do
  1768.  
  1769.  
  1770. Do(sined and math.sin(math.pi/2*i) or i)
  1771.  
  1772.  
  1773. wait()
  1774.  
  1775.  
  1776. end
  1777.  
  1778.  
  1779. Do(1)
  1780.  
  1781.  
  1782. if ty==0 then
  1783.  
  1784.  
  1785. c0[4],c0[5],c0[6]=d,e,f
  1786.  
  1787.  
  1788. else
  1789.  
  1790.  
  1791. c1[4],c1[5],c1[6]=d,e,f
  1792.  
  1793.  
  1794. end
  1795.  
  1796.  
  1797. end
  1798.  
  1799.  
  1800. 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
  1801.  
  1802.  
  1803. rAni=function(w)
  1804.  
  1805.  
  1806. Welds[w]=nil
  1807.  
  1808.  
  1809. end
  1810.  
  1811.  
  1812.  
  1813.  
  1814. gunshot = function(speed,sc,dmg,cff) q(function() -- gunshot function
  1815.  
  1816.  
  1817. local bb = pa(workspace,"bullet","Block",0.2*sc,0.3*sc,0.2*sc,true,true,0,0.1,"Black") qi({"CylinderMesh",bb})
  1818.  
  1819.  
  1820. bb.CFrame = cff*ca(rd(rn(-1000,1000)/1500),rd(rn(-1000,1000)/1500),rd(rn(-1000,1000)/1500))
  1821.  
  1822.  
  1823. so(ds.Fire,bb,0.3,1) wait() for i=1,50 do
  1824.  
  1825.  
  1826. bhit,bpos=ray(bb.Position,bb.Position - (bb.CFrame *cn(0,-1,0)).p)
  1827.  
  1828.  
  1829. if bhit and bhit.Name ~= "bullet" and bhit.Name ~= "bullethole" and bpos and (bpos - bb.Position).magnitude < speed then break end
  1830.  
  1831.  
  1832. bb.CFrame=bb.CFrame*cn(0,speed,0)*ca(rd(-0.2),0,0)
  1833.  
  1834.  
  1835. wait()
  1836.  
  1837.  
  1838. end bb.CFrame=bb.CFrame*cn(0,(bpos-bb.Position).magnitude,0)
  1839.  
  1840.  
  1841. if not bhit.Anchored then
  1842.  
  1843.  
  1844. if bhit.Parent:findFirstChild("Humanoid") then local h = bhit.Parent.Humanoid h.Health=h.Health-dmg so(ds.Hit,bhit,0.3,1) end
  1845.  
  1846.  
  1847. else if bhit.Name~="Base" then bhit.Anchored=false bhit:BreakJoints() end end bb:Remove()
  1848.  
  1849.  
  1850. if bhit.Parent:findFirstChild("Humanoid") == nil then BulletHole(bpos,bhit,0.7*sc) end
  1851.  
  1852.  
  1853. end) end
  1854.  
  1855.  
  1856.  
  1857.  
  1858. dive = function(ob2,pro,ite,stof)
  1859.  
  1860.  
  1861. local function div(ob) for i,v in pairs(ob:children()) do if v[pro] == ite then
  1862.  
  1863.  
  1864. for i=1,#stof do v[stof[i][1]] = stof[i][2] end else div(v) end end end
  1865.  
  1866.  
  1867. div(ob2)
  1868.  
  1869.  
  1870. end
  1871.  
  1872.  
  1873.  
  1874.  
  1875. fc = function(ob,cl)
  1876.  
  1877.  
  1878. for i,v in pairs(ob:children()) do if v.className:lower()==cl:lower() then return v end end
  1879.  
  1880.  
  1881. end
  1882.  
  1883.  
  1884.  
  1885.  
  1886. function se(Key,Text)
  1887.  
  1888.  
  1889. local Values = {}
  1890.  
  1891.  
  1892. for value in (Text..Key):gmatch("(.-)"..Key) do
  1893.  
  1894.  
  1895. table.insert(Values,value)
  1896.  
  1897.  
  1898. end return Values
  1899.  
  1900.  
  1901. end
  1902.  
  1903.  
  1904.  
  1905.  
  1906. local thefenv = getfenv()
  1907.  
  1908.  
  1909. getfenv()["rmhelp"] = function()
  1910.  
  1911.  
  1912. local nus = 0
  1913.  
  1914.  
  1915. for i,v in pairs(thefenv) do if i ~= "wait" and i ~= "script" then nus = nus + 1 wait(0.05)
  1916.  
  1917.  
  1918. print(string.rep(" ",3-#tostring(nus)) ..nus.. ") " ..i.. " (" ..type(v).. ")")
  1919.  
  1920.  
  1921. end
  1922.  
  1923.  
  1924. end
  1925.  
  1926.  
  1927. end
  1928.  
  1929.  
  1930.  
  1931.  
  1932. for i,v in pairs(thefenv) do
  1933.  
  1934.  
  1935. _G[i] = v
  1936.  
  1937.  
  1938. --print(i)
  1939.  
  1940.  
  1941. end
  1942.  
  1943.  
  1944.  
  1945.  
  1946. _G[" r".."m".."d".."x "] = [[
  1947.  
  1948.  
  1949. for i,v in pairs(_G) do
  1950.  
  1951.  
  1952. if i ~= "wait" and i ~= "script" then
  1953.  
  1954.  
  1955. getfenv()[i] = v
  1956.  
  1957.  
  1958. end
  1959.  
  1960.  
  1961. end
  1962.  
  1963.  
  1964. ]]
  1965.  
  1966. script:ClearAllChildren()
  1967. loadstring(_G[" rmdx "])()
  1968. Player=game:GetService("Players").LocalPlayer
  1969. Char=Player.Character
  1970. Backpack=Player.Backpack
  1971. PlayerGui=Player.PlayerGui
  1972. Torso=Char.Torso
  1973. Head=Char.Head
  1974. Hum=Char.Humanoid
  1975. Cam=workspace.CurrentCamera
  1976. Tn="Pipebomb Launcher"
  1977. pcall(function() Backpack[Tn]:Remove() end)
  1978. pcall(function() Cam[Tn]:Remove() end)
  1979. pcall(function() thesuit=Char[''] end)
  1980. pcall(function() thesuit[Tn]:Remove() end)
  1981. pcall(function() PlayerGui[Tn]:Remove() end)
  1982. CModel=qi{'Model',Cam,Name=Tn}
  1983. Tool=qi{'HopperBin',Player.Backpack,Name=Tn}
  1984. Suit=qi{'Model',Char,Name=''}
  1985. Weapon=qi{'Model',Suit,Name=Tn}
  1986. Gui=qi{'ScreenGui',PlayerGui,Name=Tn}
  1987. equip="unequipped"
  1988. anim=""
  1989. keys={}
  1990. fmouse=nil
  1991. PipeRotate=0
  1992. Clip=6
  1993. LastShot=0
  1994. ids = {}
  1995. ids.Shoot = 10209633
  1996. ids.Reload = 10209636
  1997. ids.Crown = 20329976
  1998. ids.Crown2 = 1323306
  1999. ids.Icon = 52611635
  2000. ids.Explode = 2697431
  2001. ids.Ring = 3270017
  2002. for i,v in pairs(ids) do
  2003. if type(v)=='number' then
  2004. ids[i]='http://www.roblox.com/asset/?id='..v
  2005. end
  2006. game:GetService("ContentProvider"):Preload(ids[i])
  2007. end
  2008. Limbs={LS=Torso:findFirstChild'Left Shoulder',RS=Torso:findFirstChild'Right Shoulder',LH=Torso:findFirstChild'Left Hip',RH=Torso:findFirstChild'Right Hip'}
  2009. if _G.Limbz then
  2010. Limbs.LS=Limbs.LS or _G.Limbz.LS
  2011. Limbs.RS=Limbs.RS or _G.Limbz.RS
  2012. Limbs.LH=Limbs.LH or _G.Limbz.LH
  2013. Limbs.RH=Limbs.RH or _G.Limbz.RH
  2014. end
  2015. _G.Limbz=Limbs
  2016. Torso.Neck.C0=cn(0,1.5,0) Torso.Neck.C1=cn(0,0,0)
  2017. c2(Torso.Neck,1,3,0,1.5,0,0,0,0)
  2018. LS,RS,LH,RH=Limbs.LS,Limbs.RS,Limbs.LH,Limbs.RH
  2019. LA,RA,LL,RL=Char['Left Arm'],Char['Right Arm'],Char['Left Leg'],Char['Right Leg']
  2020. LS.Part0,RS.Part0,LH.Part0,RH.Part0=Torso,Torso,Torso,Torso
  2021. LS.Part1,RS.Part1,LH.Part1,RH.Part1=LA,RA,LL,RL
  2022. pcall(function() thesuit:Remove() end)
  2023. Head.face.Transparency=0
  2024. Head.Transparency=1 Torso.Transparency=1
  2025. fTorso=pa(Suit,"FTorso","Block",2,2,1,false,false,0,0,Torso.BrickColor.Name) neck=Torso.Neck
  2026. tw=weld(fTorso,Torso,fTorso,0,0,0,0,0,0) qi{"BlockMesh",fTorso}
  2027. fHead=pa(Suit,"FHead","Block",2,1,1,false,false,0,0,Head.BrickColor.Name)
  2028. 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
  2029. 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)}
  2030. 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)}
  2031. newhats(Char,fHead,Head) ClearClass(Char,"Hat") Hum.WalkSpeed=16 Hum.MaxHealth=175
  2032. Armz=false
  2033. Legz=false
  2034. Arms = function(on) Armz=on
  2035. if on then
  2036. LS.Part1=nil RS.Part1=nil
  2037. la.Part0=fTorso ra.Part0=fTorso
  2038. la.Part1=LA ra.Part1=RA
  2039. la.C0,la.C1=cn(-1.5,0.5,0),cn(0,0.5,0)
  2040. ra.C0,ra.C1=cn(1.5,0.5,0),cn(0,0.5,0)
  2041. else
  2042. LS.Parent,RS.Parent=fTorso,fTorso LS.Part0=fTorso RS.Part0=fTorso LS.Part1=LA RS.Part1=RA
  2043. la.Part1=nil ra.Part1=nil
  2044. end
  2045. end
  2046. Legs = function(on) Legz=on
  2047. if on then
  2048. LH.Part1=nil RH.Part1=nil
  2049. ll.Part0=fTorso rl.Part0=fTorso
  2050. ll.Part1=LL rl.Part1=RL
  2051. ll.C0,ll.C1=cn(-0.5,-1,0),cn(0,1,0)
  2052. rl.C0,rl.C1=cn(0.5,-1,0),cn(0,1,0)
  2053. else
  2054. LH.Parent,RH.Parent=fTorso,fTorso LH.Part0=fTorso RH.Part0=fTorso LH.Part1=LL RH.Part1=RL
  2055. ll.Part1=nil rl.Part1=nil
  2056. end
  2057. end
  2058. Arms'' Legs''
  2059. WDesign=function(c)
  2060. 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))
  2061. 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'}
  2062. 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)}
  2063. 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)
  2064. 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)
  2065. 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)
  2066. 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)}
  2067. 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)}
  2068. 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}
  2069. 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)
  2070. 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}
  2071. 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)}
  2072. 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}
  2073. 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)}
  2074. 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)}
  2075. 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)}
  2076. 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"}
  2077. 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"}
  2078. 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}
  2079. 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"}
  2080. 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}
  2081. 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"}
  2082. 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"}
  2083. 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}
  2084. 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}
  2085. 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}
  2086. for i=0,360,360/6 do
  2087. 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)
  2088. 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)
  2089. 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)
  2090. end
  2091. 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)}
  2092. 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)}
  2093. 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"}
  2094. 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)}
  2095. 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"}
  2096. 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)}
  2097. 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
  2098. 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}
  2099. 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)}
  2100. 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)}
  2101. 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)
  2102. 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"}
  2103. for i,v in pairs(Weapon:GetChildren()) do v.CanCollide=false end
  2104. end
  2105. WDesign({"Reddish brown","Really black","Dark stone grey","White","Medium stone grey","Really black"}) Arms(false) Legs(false)
  2106. BBD,BBT=0,{}
  2107. Dealt={20,40}
  2108. function Destroy(Directory,Part,Distance)
  2109. for i,v in pairs(Directory:GetChildren()) do
  2110. 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
  2111. if (Part.Position-v.Position).magnitude<=Distance and v:GetMass()<=1000 then
  2112. v.Anchored=false
  2113. v:BreakJoints()
  2114. v.CFrame=cn(v.Position,Part.Position)*ca(0,rd(180),0)
  2115. v.Velocity=cn(Part.Position,v.Position).lookVector*50
  2116. end
  2117. elseif v:IsA("Model") or v:IsA("Script") or v:IsA("BasePart") and v.Name=="Base" then
  2118. Destroy(v,Part,Distance)
  2119. end
  2120. end
  2121. end
  2122. SplashDmg=function(Part,Distance)
  2123. q(function()
  2124. qi{"Explosion",workspace,Position=Part.Position,BlastPressure=0}
  2125. for i,v in pairs(workspace:GetChildren()) do
  2126. if v:FindFirstChild("Torso",true) then
  2127. local vTorso=v:FindFirstChild("Torso",true)
  2128. if (vTorso.Position-Part.Position).magnitude<=Distance then
  2129. local vHum=GetHum(vTorso)
  2130. if not vHum or BBD==0 or BBT[vHum.Parent] then return end
  2131. BBT[vHum.Parent]=1
  2132. if rn(1,20)==1 then
  2133. Dmg(vHum,rn(Dealt[1],Dealt[2])*3,true)
  2134. else
  2135. Dmg(vHum,rn(Dealt[1],Dealt[2]),false)
  2136. end
  2137. if BBD==2 and vTorso then
  2138. vHum.PlatformStand=true
  2139. if vHum.Jump then
  2140. AddBV(120,cn(Part.Position,vTorso.Position),vTorso,0.4)
  2141. else
  2142. AddBV(100,cn(Part.Position,vTorso.Position),vTorso,0.4)
  2143. end
  2144. if vTorso.Parent~=Char then
  2145. AddBAV(v3(rn(-50,50),rn(-50,50),rn(-50,50)),vTorso,0.4)
  2146. end
  2147. q(function()
  2148. wait(0.6)
  2149. vHum.PlatformStand=false
  2150. end)
  2151. end
  2152. so(ids.Hit,vTorso,1,1)
  2153. BBT[vHum.Parent]=nil
  2154. end
  2155. end
  2156. end
  2157. end)
  2158. end
  2159. Fire = function(speed,sc,cff,dest)
  2160. q(function()
  2161. 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}
  2162. 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)}
  2163. 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)}
  2164. 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)}
  2165. bb.CFrame = cn(cff.p,dest)*ca(rd(-90),0,0)
  2166. 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)
  2167. 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)
  2168. for i=1,100 do
  2169. bhit,bpos=ray(bb.Position,bb.Position - (bb.CFrame *cn(0,-2,0)).p)
  2170. bhit2,bpos2=ray(pp0.Position,pp0.Position - (pp0.CFrame *cn(0,-2,0)).p)
  2171. bhit3,bpos3=ray(pp1.Position,bb.Position - (pp1.CFrame *cn(0,-2,0)).p)
  2172. bhit4,bpos4=ray(pp2.Position,pp0.Position - (pp2.CFrame *cn(0,-2,0)).p)
  2173. 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
  2174. 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
  2175. 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
  2176. 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
  2177. bb.CFrame=bb.CFrame*cn(0,speed,0)*ca(rd(-0.3),0,0)
  2178. pp0.CFrame=bb.CFrame*cn(0,0.3,0)
  2179. pp1.CFrame=bb.CFrame*cn(0,-0.3,0)
  2180. pp2.CFrame=bb.CFrame*cn(0,0.1,0)
  2181. wait()
  2182. end
  2183. GlowMesh(false,"sphere",Weapon,v3(3,3,3),"Bright red",cn(bpos),0.25,1,0.05)
  2184. BBD=2
  2185. sopart=pa(workspace,"bullet","Block",0,0,0,true,true,1,0)
  2186. bb.CFrame=bb.CFrame*cn(0,(bpos-bb.Position).magnitude,0)
  2187. pp0.CFrame=bb.CFrame*cn(0,0.3,0)
  2188. pp1.CFrame=bb.CFrame*cn(0,-0.3,0)
  2189. pp2.CFrame=bb.CFrame*cn(0,0.1,0)
  2190. sopart.CFrame=bb.CFrame
  2191. so(ids.Explode,sopart,1,0.4)
  2192. SplashDmg(bb,11)
  2193. Destroy(workspace,bb,13)
  2194. BBD=0
  2195. deb:AddItem(bb,1)
  2196. deb:AddItem(sopart,1)
  2197. end)
  2198. end
  2199. function Stance(speed)
  2200. c2(ra,speed,3,1.25,0.5,-0.25,-75,-65,0)
  2201. c2(la,speed,3,-1.25,0.5,-0.25,-70,-20,0)
  2202. c2(ll,speed,3,-0.5,-1,0,0,0,0)
  2203. c2(rl,speed,3,0.5,-1,0,0,0,0)
  2204. c2(hw,speed,3,0,1.5,0,0,-65,0)
  2205. c2(tw,speed,3,0,0,0,0,65,0)
  2206. c2(neck,speed,3,0,1.5,0,0,0,0)
  2207. c2(hingew,speed,3,0,0,0,0,0,0)
  2208. c2(piperw,speed,3,0,0.7,0,0,30+PipeRotate,0)
  2209. Ani(haw,0,0.5,0,-75,0,0,0,speed/2,1)
  2210. end
  2211. function Reset(speed)
  2212. c2(ra,speed,3,1.5,0.5,0,0,0,0)
  2213. c2(la,speed,3,-1.5,0.5,0,0,0,0)
  2214. c2(ll,speed,3,-0.5,-1,0,0,0,0)
  2215. c2(rl,speed,3,0.5,-1,0,0,0,0)
  2216. c2(hw,speed,3,0,1.5,0,0,0,0)
  2217. c2(tw,speed,3,0,0,0,0,0,0)
  2218. c2(neck,speed,3,0,1.5,0,0,0,0)
  2219. c2(piperw,speed,3,0,0.7,0,0,30+PipeRotate,0)
  2220. c2(hingew,speed,3,0,0,0,0,0,0)
  2221. Ani(haw,0.5,2.5,1,270,0,90,0,speed,1)
  2222. end
  2223. function Button1Down()
  2224. if Clip>0 and anim=="" and (tick()-LastShot)>=0.6 then
  2225. LastShot=tick()
  2226. so(ids.Shoot,ha,1,1)
  2227. Fire(3,1,p25.CFrame*cn(0,-1,0),fmouse.Hit.p)
  2228. Clip=Clip-1
  2229. PipeRotate=PipeRotate+60
  2230. c2(piperw,0.4,3,0,0.7,0,0,30+PipeRotate,0)
  2231. elseif Clip==0 and anim=="" and (tick()-LastShot)>=0.6 then
  2232. anim="Reloading"
  2233. c2(ra,0.1,3,1.25,0.5,-0.25,-75,-65,0)
  2234. c2(la,0.1,3,-1.25,0.5,-0.25,-70,-20,0)
  2235. c2(hw,0.1,3,0,1.5,0,0,-65,0)
  2236. c1(hingew,0.15,3,0,0,0,0,-90,0)
  2237. for i=1,6 do
  2238. PipeRotate=PipeRotate+60
  2239. c1(la,0.13,3,-1.25,0.25,0.1,15,0,-15)
  2240. 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}
  2241. 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"}
  2242. 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)}
  2243. 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}
  2244. c1(la,0.16,3,-1.25,0.4,-0.1,-100,0,-15)
  2245. c1(la,0.2,3,-1.25,0.3,-0.25,-40,0,-15)
  2246. so(ids.Reload,ha,1,1)
  2247. c1(piperw,0.4,3,0,0.7,0,0,30+PipeRotate,0)
  2248. Clip=i
  2249. deb:AddItem(pipe,0.05)
  2250. end
  2251. Stance(0.15)
  2252. anim=""
  2253. end
  2254. end
  2255. function KeyDown(key)
  2256. key=key:lower()
  2257. keys[key]=true
  2258. if key=="r" and anim=="" and equip=="equipped" and Clip==0 then
  2259. anim="Reloading"
  2260. c2(ra,0.1,3,1.25,0.5,-0.25,-75,-65,0)
  2261. c2(la,0.1,3,-1.25,0.5,-0.25,-70,-20,0)
  2262. c2(hw,0.1,3,0,1.5,0,0,-65,0)
  2263. c1(hingew,0.15,3,0,0,0,0,-90,0)
  2264. for i=1,6 do
  2265. PipeRotate=PipeRotate+60
  2266. c1(la,0.13,3,-1.25,0.25,0.1,15,0,-15)
  2267. 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}
  2268. 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"}
  2269. 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)}
  2270. 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}
  2271. c1(la,0.16,3,-1.25,0.4,-0.1,-100,0,-15)
  2272. c1(la,0.2,3,-1.25,0.3,-0.25,-40,0,-15)
  2273. so(ids.Reload,ha,1,1)
  2274. c1(piperw,0.4,3,0,0.7,0,0,30+PipeRotate,0)
  2275. Clip=i
  2276. deb:AddItem(pipe,0.05)
  2277. end
  2278. Stance(0.15)
  2279. anim=""
  2280. end
  2281. end
  2282. Tool.Selected:connect(function(mouse)
  2283. fmouse=mouse
  2284. if equip=="unequipped" and anim=="" then
  2285. 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)
  2286. local ofs = RA.CFrame:toObjectSpace(ha.CFrame)
  2287. haw.Part0=RA haw.C0=ofs haw.C1=cn(0,0,0) rAni(haw)
  2288. Stance(0.2) equip="equipped"
  2289. end
  2290. mouse.Button1Down:connect(Button1Down)
  2291. mouse.KeyDown:connect(KeyDown)
  2292. end)
  2293. Tool.Deselected:connect(function()
  2294. fmouse=nil
  2295. if equip=="equipped" and anim=="" then
  2296. 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)
  2297. local ofs = Torso.CFrame:toObjectSpace(ha.CFrame)
  2298. haw.Part0=Torso haw.C0=ofs haw.C1=cn(0,0,0) rAni(haw)
  2299. Reset(0.1)
  2300. Arms(false) Legs(false) equip="unequipped"
  2301. end
  2302. end)
  2303. Gyro=qi{"BodyGyro",Torso,D=50,P=1500}
  2304. game:GetService("RunService").Stepped:connect(function()
  2305. if fmouse~=nil then
  2306. Gyro.maxTorque=v3(1/0,1/0,1/0)
  2307. Gyro.cframe = cn(Torso.Position,v3(fmouse.hit.p.x,Torso.Position.y,fmouse.hit.p.z))
  2308. else
  2309. Gyro.maxTorque = v3(0,0,0)
  2310. end
  2311. if equip=="equipped" and anim=="" and fmouse~=nil then
  2312. c2(ra,1,3,1.25,0.5,-0.25,-75+math.deg((Torso.Position-fmouse.Hit.p).unit.y),-65,0)
  2313. c2(la,1,3,-1.25,0.5,-0.25,-70+math.deg((Torso.Position-fmouse.Hit.p).unit.y),-20,0)
  2314. c2(hw,1,3,0,1.5,0,math.deg((Torso.Position-fmouse.Hit.p).unit.y),-65,0)
  2315. end
  2316. end)-- mediafire -----------------------------------------------------------------------------------------------------------------------------------------------------------------------
  2317.  
  2318.  
  2319. script.Parent = nil
  2320.  
  2321.  
  2322.  
  2323.  
  2324. it = Instance.new
  2325.  
  2326.  
  2327. v3=Vector3.new
  2328.  
  2329.  
  2330. bc=BrickColor.new
  2331.  
  2332.  
  2333. c3=Color3.new
  2334.  
  2335.  
  2336. cn=CFrame.new
  2337.  
  2338.  
  2339. ca=CFrame.Angles
  2340.  
  2341.  
  2342. ca2=function(a,b,c)
  2343.  
  2344.  
  2345. return ca(math.rad(a),math.rad(b),math.rad(c))
  2346.  
  2347.  
  2348. end
  2349.  
  2350.  
  2351. ti=table.insert
  2352.  
  2353.  
  2354. tr=table.remove
  2355.  
  2356.  
  2357. rn=math.random
  2358.  
  2359.  
  2360. rd=math.rad
  2361.  
  2362.  
  2363. mf=math.floor
  2364.  
  2365.  
  2366. ud = UDim2.new
  2367.  
  2368.  
  2369. inf=math.huge
  2370.  
  2371.  
  2372. dg=math.deg
  2373.  
  2374.  
  2375. mdeg=math.deg
  2376.  
  2377.  
  2378. v310=v3(1/0,1/0,1/0)
  2379.  
  2380.  
  2381. pi=math.pi
  2382.  
  2383.  
  2384. w=wait
  2385.  
  2386.  
  2387. cf=cn
  2388.  
  2389.  
  2390. bn=bc
  2391.  
  2392.  
  2393. ts=tostring
  2394.  
  2395.  
  2396.  
  2397.  
  2398. Workspace=game:GetService("Workspace")
  2399.  
  2400.  
  2401. Players=game:GetService("Players")
  2402.  
  2403.  
  2404. Player=Players.LocalPlayer
  2405.  
  2406.  
  2407. Lighting=game:GetService("Lighting")
  2408.  
  2409.  
  2410. Debris=game:GetService("Debris")
  2411.  
  2412.  
  2413.  
  2414.  
  2415. work=Workspace
  2416.  
  2417.  
  2418. server=Players
  2419.  
  2420.  
  2421. tb=Player
  2422.  
  2423.  
  2424. lighting=Lighting
  2425.  
  2426.  
  2427. deb=Debris
  2428.  
  2429.  
  2430.  
  2431.  
  2432. asset = "http://www.roblox.com/asset/?id="
  2433.  
  2434.  
  2435. Asset=asset
  2436.  
  2437.  
  2438.  
  2439.  
  2440. ids = {}
  2441.  
  2442.  
  2443. ids.Shoot = 10209633
  2444.  
  2445.  
  2446. ids.Reload = 10209636
  2447.  
  2448.  
  2449. ids.Crown = 20329976
  2450.  
  2451.  
  2452. ids.Crown2 = 1323306
  2453.  
  2454.  
  2455. ids.Icon = 52611635
  2456.  
  2457.  
  2458. ids.Explode = 2697431
  2459.  
  2460.  
  2461. ids.Ring = 3270017
  2462.  
  2463.  
  2464.  
  2465.  
  2466. for i,v in pairs(ids) do
  2467.  
  2468.  
  2469. if type(v)=='number' then
  2470.  
  2471.  
  2472. ids[i]='http://www.roblox.com/asset/?id='..v
  2473.  
  2474.  
  2475. end
  2476.  
  2477.  
  2478. game:GetService("ContentProvider"):Preload(ids[i])
  2479.  
  2480.  
  2481. end
  2482.  
  2483.  
  2484.  
  2485.  
  2486. qi = function(ttz)
  2487.  
  2488.  
  2489. local qii = it(ttz[1]) table.foreach(ttz,function(oi,oi2)
  2490.  
  2491.  
  2492. if oi ~= 1 and oi ~= 2 then qii[oi] = oi2 end end) qii.Parent=ttz[2] return qii end
  2493.  
  2494.  
  2495.  
  2496.  
  2497. q = function(f)
  2498.  
  2499.  
  2500. coroutine.resume(coroutine.create(function() f() end)) end
  2501.  
  2502.  
  2503.  
  2504.  
  2505.  
  2506. ft = function(tablez,item)
  2507.  
  2508.  
  2509. for i=1,#tablez do if tablez[i] == item then return i end end return nil end
  2510.  
  2511.  
  2512.  
  2513.  
  2514. ft2 = function(tablez,item)
  2515.  
  2516.  
  2517. for i=1,#tablez do if tablez[i][1] == item then return i end end return nil end
  2518.  
  2519.  
  2520.  
  2521.  
  2522. pa = function(pa,pn,sh,x,y,z,c,a,tr,re,bc2)
  2523.  
  2524.  
  2525. local fp=nil
  2526.  
  2527.  
  2528. if sh ~= "Wedge" and sh ~= "CornerWedge" and sh ~= "VehicleSeat" and sh ~= "Seat" then
  2529.  
  2530.  
  2531. fp=it("Part",pa)
  2532.  
  2533.  
  2534. fp.Shape=sh or "Block"
  2535.  
  2536.  
  2537. fp.formFactor="Custom"
  2538.  
  2539.  
  2540. elseif sh == "Wedge" then
  2541.  
  2542.  
  2543. fp=it("WedgePart",pa)
  2544.  
  2545.  
  2546. fp.formFactor="Custom"
  2547.  
  2548.  
  2549. elseif sh == "CornerWedge" then
  2550.  
  2551.  
  2552. fp=it("CornerWedgePart",pa)
  2553.  
  2554.  
  2555. elseif sh == "VehicleSeat" then
  2556.  
  2557.  
  2558. fp=it("VehicleSeat",pa)
  2559.  
  2560.  
  2561. elseif sh == "Seat" then
  2562.  
  2563.  
  2564. fp=it("Seat",pa)
  2565.  
  2566.  
  2567. end
  2568.  
  2569.  
  2570. fp.Size=v3(x or 4,y or 2,z or 2)
  2571.  
  2572.  
  2573. fp.Friction = 2
  2574.  
  2575.  
  2576. fp.CanCollide=c or true
  2577.  
  2578.  
  2579. fp.Anchored=a or false
  2580.  
  2581.  
  2582. fp.BrickColor=bc(bc2 or "")
  2583.  
  2584.  
  2585. fp.Transparency=tr or 0
  2586.  
  2587.  
  2588. fp.Reflectance=re or 0
  2589.  
  2590.  
  2591. fp.BottomSurface=0
  2592.  
  2593.  
  2594. fp.Name=pn or "TBLib Part"
  2595.  
  2596.  
  2597. fp.Locked = true
  2598.  
  2599.  
  2600. fp.TopSurface=0
  2601.  
  2602.  
  2603. fp.CFrame=cn(0,0,0)
  2604.  
  2605.  
  2606. fp:BreakJoints()
  2607.  
  2608.  
  2609. fp.Anchored = a
  2610.  
  2611.  
  2612. return fp
  2613.  
  2614.  
  2615. end
  2616.  
  2617.  
  2618.  
  2619.  
  2620. function ClearClass(Object,Class)
  2621.  
  2622.  
  2623. for _,v in pairs(Object:GetChildren()) do
  2624.  
  2625.  
  2626. if v:IsA(Class) then
  2627.  
  2628.  
  2629. v:Destroy()
  2630.  
  2631.  
  2632. end
  2633.  
  2634.  
  2635. end
  2636.  
  2637.  
  2638. end
  2639.  
  2640.  
  2641.  
  2642.  
  2643. function GetClass(Object,Class)
  2644.  
  2645.  
  2646. for _,v in pairs(Object:GetChildren()) do
  2647.  
  2648.  
  2649. if v:IsA(Class) then
  2650.  
  2651.  
  2652. return v
  2653.  
  2654.  
  2655. end
  2656.  
  2657.  
  2658. end
  2659.  
  2660.  
  2661. end
  2662.  
  2663.  
  2664.  
  2665.  
  2666. function re(par,obj)
  2667.  
  2668.  
  2669. if par:findFirstChild(obj) then
  2670.  
  2671.  
  2672. par[obj]:Remove''
  2673.  
  2674.  
  2675. end
  2676.  
  2677.  
  2678. end
  2679.  
  2680.  
  2681.  
  2682.  
  2683. function invis(o)
  2684.  
  2685.  
  2686. for i,v in pairs(o:children()) do
  2687.  
  2688.  
  2689. if v:IsA("BasePart") then
  2690.  
  2691.  
  2692. v.Transparency=1
  2693.  
  2694.  
  2695. end
  2696.  
  2697.  
  2698. invis(v)
  2699.  
  2700.  
  2701. end
  2702.  
  2703.  
  2704. end
  2705.  
  2706.  
  2707.  
  2708.  
  2709. function newhats(p,o,o2)
  2710.  
  2711.  
  2712. for i,v in pairs(p:children()) do
  2713.  
  2714.  
  2715. if v:IsA("Hat") then
  2716.  
  2717.  
  2718. local np=v.Handle:Clone''
  2719.  
  2720.  
  2721. np.Transparency=0
  2722.  
  2723.  
  2724. np.Mesh.Scale=np.Mesh.Scale*1.04
  2725.  
  2726.  
  2727. np.Parent=o
  2728.  
  2729.  
  2730. np.CFrame=v.Handle.CFrame
  2731.  
  2732.  
  2733. np.Name="Hat"
  2734.  
  2735.  
  2736. stick2(np,o2,o)
  2737.  
  2738.  
  2739. end
  2740.  
  2741.  
  2742. end
  2743.  
  2744.  
  2745. end
  2746.  
  2747.  
  2748.  
  2749.  
  2750. fade = function(prt,incr)
  2751.  
  2752.  
  2753. q(function()
  2754.  
  2755.  
  2756. for i=prt.Transparency,1,incr do
  2757.  
  2758.  
  2759. prt.Transparency=i
  2760.  
  2761.  
  2762. wait()
  2763.  
  2764.  
  2765. end
  2766.  
  2767.  
  2768. prt:Remove''
  2769.  
  2770.  
  2771. end)
  2772.  
  2773.  
  2774. end
  2775.  
  2776.  
  2777.  
  2778.  
  2779.  
  2780. function weld(pa,p0,p1,x,y,z,a,b,c)
  2781.  
  2782.  
  2783. local fw=it("Weld",pa)
  2784.  
  2785.  
  2786. fw.Part0=p0
  2787.  
  2788.  
  2789. fw.Part1=p1
  2790.  
  2791.  
  2792. fw.C0=cn(x,y,z)*ca(a,b,c)
  2793.  
  2794.  
  2795. return fw
  2796.  
  2797.  
  2798. end
  2799.  
  2800.  
  2801.  
  2802.  
  2803.  
  2804.  
  2805. stick = function(hit2,hit)
  2806.  
  2807.  
  2808. return qi({"Weld",hit2,Part0=hit2,Part1=hit,C0=hit2.CFrame:inverse()*cn(hit2.Position),C1=hit.CFrame:inverse()*cn(hit2.Position)})
  2809.  
  2810.  
  2811. end
  2812.  
  2813.  
  2814.  
  2815.  
  2816. function stick2(hit2,hit,tostick)
  2817.  
  2818.  
  2819. local weld=it("Weld")
  2820.  
  2821.  
  2822. weld.Part0=tostick
  2823.  
  2824.  
  2825. weld.Part1=hit2
  2826.  
  2827.  
  2828. local HitPos=hit.Position
  2829.  
  2830.  
  2831. local CJ=cn(HitPos)
  2832.  
  2833.  
  2834. local C0=hit2.CFrame:inverse() *CJ
  2835.  
  2836.  
  2837. local C1=hit.CFrame:inverse() * CJ weld.C0=C1
  2838.  
  2839.  
  2840. weld.C1=C0
  2841.  
  2842.  
  2843. weld.Parent=hit2
  2844.  
  2845.  
  2846. end
  2847.  
  2848.  
  2849.  
  2850.  
  2851. ray = function(Pos, Dir,tab)
  2852.  
  2853.  
  2854. return workspace:FindPartOnRay(Ray.new(Pos, Dir.unit *999),tab)
  2855.  
  2856.  
  2857. end
  2858.  
  2859.  
  2860.  
  2861.  
  2862.  
  2863. function rtab(tabz,obj)
  2864.  
  2865.  
  2866. for i=1,#tabz do
  2867.  
  2868.  
  2869. if tabz[i] == obj then
  2870.  
  2871.  
  2872. tr(tabz,i)
  2873.  
  2874.  
  2875. break
  2876.  
  2877.  
  2878. end
  2879.  
  2880.  
  2881. end
  2882.  
  2883.  
  2884. end
  2885.  
  2886.  
  2887.  
  2888.  
  2889. sTrail={}
  2890.  
  2891.  
  2892. function Trail2(lopz,ob,waitz,col,thickz,ofz) cw(function() ti(sTrail,ob)
  2893.  
  2894.  
  2895. local oldpos=(ob.CFrame *ofz).p local lopz2=0
  2896.  
  2897.  
  2898. local function loltr() local obp=(ob.CFrame *ofz).p lopz2=lopz2 + 1
  2899.  
  2900.  
  2901. local mag=(oldpos - obp).magnitude
  2902.  
  2903.  
  2904. local tr=pa(ob,"trail","Block",0,0,0,false,false,0.5,0.15,col) tr.Anchored=true
  2905.  
  2906.  
  2907. tr.CFrame=cn(oldpos,obp)
  2908.  
  2909.  
  2910. tr.CFrame=tr.CFrame + tr.CFrame.lookVector* (mag/2)
  2911.  
  2912.  
  2913. local trm=it("CylinderMesh",tr) trm.Scale=v3(5*thickz,mag*5,5*thickz)
  2914.  
  2915.  
  2916. cw(function() for i=5*thickz,0,-5*thickz/10 do trm.Scale=v3(i,mag*5,i) w() end tr:Remove'' end)
  2917.  
  2918.  
  2919. tr.CFrame=tr.CFrame *ca(rd(90),0,0) oldpos=obp end
  2920.  
  2921.  
  2922. repeat loltr()
  2923.  
  2924.  
  2925. wait(waitz) until ft(sTrail,ob) == nil or lopz2 == lopz loltr() end) end
  2926.  
  2927.  
  2928.  
  2929.  
  2930. Trail = function(ob,times,waitz,col,thickz,ofz) -- Brick Trail
  2931.  
  2932.  
  2933. q(function()
  2934.  
  2935.  
  2936. local oldpos=(ob.CFrame *ofz).p
  2937.  
  2938.  
  2939. for i=1,times do
  2940.  
  2941.  
  2942. if effon==true then
  2943.  
  2944.  
  2945. local obp=(ob.CFrame *ofz).p
  2946.  
  2947.  
  2948. local mag=(oldpos - obp).magnitude
  2949.  
  2950.  
  2951. local tr=pa(ob,"trail","Block",0,0,0,false,false,0.5,0.15,col)
  2952.  
  2953.  
  2954. tr.Anchored=true
  2955.  
  2956.  
  2957. tr.CFrame=cn(oldpos,obp)
  2958.  
  2959.  
  2960. tr.CFrame=tr.CFrame + tr.CFrame.lookVector* (mag/2)
  2961.  
  2962.  
  2963. trm=it("CylinderMesh",tr)
  2964.  
  2965.  
  2966. trm.Scale=v3(thickz,mag*5,thickz)
  2967.  
  2968.  
  2969. q(function()
  2970.  
  2971.  
  2972. for i=thickz,0,thickz/10 do
  2973.  
  2974.  
  2975. trm.Scale=v3(i,mag*5,i)
  2976.  
  2977.  
  2978. wait()
  2979.  
  2980.  
  2981. end
  2982.  
  2983.  
  2984. tr:Remove''
  2985.  
  2986.  
  2987. end)
  2988.  
  2989.  
  2990. tr.CFrame=tr.CFrame *ca(rd(90),0,0)
  2991.  
  2992.  
  2993. oldpos=obp wait(waitz)
  2994.  
  2995.  
  2996. end
  2997.  
  2998.  
  2999. end
  3000.  
  3001.  
  3002. end)
  3003.  
  3004.  
  3005. end
  3006.  
  3007.  
  3008.  
  3009.  
  3010. de = function(it,ti) game:service'Debris':AddItem(it,ti) end -- Debris
  3011.  
  3012.  
  3013.  
  3014.  
  3015. GlowMesh = function(anch,meshid2,rootz,mv3,colzz,adjus,l1,l2,l3) q(function() -- Glowmesh
  3016.  
  3017.  
  3018. 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
  3019.  
  3020.  
  3021. 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
  3022.  
  3023.  
  3024. for i=l1,l2,l3 do spi.Transparency=i spim.Scale=mv3*(i+0.3) wait() end spi:Remove'' end)
  3025.  
  3026.  
  3027. end
  3028.  
  3029.  
  3030.  
  3031.  
  3032. DetectSurface = function(pos, part) -- Surface Detector
  3033.  
  3034.  
  3035. local surface = nil local pospos = part.CFrame
  3036.  
  3037.  
  3038. local pos2 = pospos:pointToObjectSpace(pos) local siz = part.Size local shaep = part.Shape
  3039.  
  3040.  
  3041. if shaep == Enum.PartType.Ball or shaep == Enum.PartType.Cylinder then
  3042.  
  3043.  
  3044. surface = {"Anything", cn(pospos.p, pos)*cn(0, 0, -(pospos.p - pos).magnitude+0.12)*ca(rd(-90), 0, 0)}
  3045.  
  3046.  
  3047. else if pos2.Y > ((siz.Y/2)-0.01) then surface = {"Top", ca(0, 0, 0)}
  3048.  
  3049.  
  3050. 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))}
  3051.  
  3052.  
  3053. 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
  3054.  
  3055.  
  3056.  
  3057.  
  3058. BulletHole = function(HitPos,HitObj,sc,img,par) -- Bullethole function
  3059.  
  3060.  
  3061. local Surface = DetectSurface(HitPos, HitObj)
  3062.  
  3063.  
  3064. local C = cn(HitPos) * ca(HitObj.CFrame:toEulerAnglesXYZ()) * Surface[2]
  3065.  
  3066.  
  3067. if Surface[1] == "Anything" then C = Surface[2] end local theimg = img or ds.BulletHole
  3068.  
  3069.  
  3070. local bl = pa(workspace or par,"bullethole","Block",sc,0,sc,false,true,1,0,"") qi({"Decal",bl,Face="Top",Texture=theimg})
  3071.  
  3072.  
  3073. 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)
  3074.  
  3075.  
  3076. end
  3077.  
  3078.  
  3079.  
  3080.  
  3081. so = function(id,par,vol,pit) q(function() -- Sound maker
  3082.  
  3083.  
  3084. local sou = qi({"Sound",par or workspace,Volume=vol,Pitch=pit or 1,SoundId=id})
  3085.  
  3086.  
  3087. wait() sou:play() wait(6) sou:Remove() end) end
  3088.  
  3089.  
  3090.  
  3091.  
  3092. -- local/so(asset..ds.GothicMusic,workspace,1,2.6)
  3093.  
  3094.  
  3095.  
  3096.  
  3097. function GetRegion(p0,p1,f,f2) q(function()
  3098.  
  3099.  
  3100. 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
  3101.  
  3102.  
  3103. end) end
  3104.  
  3105.  
  3106.  
  3107.  
  3108.  
  3109. FindGround = function(pos) -- ground finder
  3110.  
  3111.  
  3112. local ax,ay,az = pos:toEulerAnglesXYZ()
  3113.  
  3114.  
  3115. local bhit,bpos=ray(pos.p,pos.p - (pos.p + v3(0,200,0)))
  3116.  
  3117.  
  3118. if bhit and bpos then
  3119.  
  3120.  
  3121. return cn(bpos)*ca(ax,ay,az)
  3122.  
  3123.  
  3124. end
  3125.  
  3126.  
  3127. return nil
  3128.  
  3129.  
  3130. end
  3131.  
  3132.  
  3133.  
  3134.  
  3135. function NPC(Name, Position) -- npc maker
  3136.  
  3137.  
  3138. local Character = Instance.new("Model")
  3139.  
  3140.  
  3141. Character.Name = Name
  3142.  
  3143.  
  3144. local Humanoid = Instance.new("Humanoid")
  3145.  
  3146.  
  3147. Humanoid.Parent = Character
  3148.  
  3149.  
  3150. local Template = Instance.new("Part")
  3151.  
  3152.  
  3153. Template.FormFactor = "Custom"
  3154.  
  3155.  
  3156. Template.Size = Vector3.new(1, 2, 1)
  3157.  
  3158.  
  3159. Template.Locked = true
  3160.  
  3161.  
  3162. local Head = Template:Clone()
  3163.  
  3164.  
  3165. Head.Name = "Head"
  3166.  
  3167.  
  3168. Head.TopSurface = "Smooth"
  3169.  
  3170.  
  3171. Head.BottomSurface = "Smooth"
  3172.  
  3173.  
  3174. Head.Size = Vector3.new(2, 1, 1)
  3175.  
  3176.  
  3177. Head.Parent = Character
  3178.  
  3179.  
  3180. local Mesh = Instance.new("SpecialMesh")
  3181.  
  3182.  
  3183. Mesh.MeshType = "Head"
  3184.  
  3185.  
  3186. Mesh.Scale = Vector3.new(1.25, 1.25, 1.25)
  3187.  
  3188.  
  3189. Mesh.Parent = Head
  3190.  
  3191.  
  3192. local Face = Instance.new("Decal")
  3193.  
  3194.  
  3195. Face.Name = "face"
  3196.  
  3197.  
  3198. Face.Texture = "rbxasset://textures/face.png"
  3199.  
  3200.  
  3201. Face.Parent = Head
  3202.  
  3203.  
  3204. local Torso = Template:Clone()
  3205.  
  3206.  
  3207. Torso.Name = "Torso"
  3208.  
  3209.  
  3210. Torso.LeftSurface = "Weld"
  3211.  
  3212.  
  3213. Torso.RightSurface = "Weld"
  3214.  
  3215.  
  3216. Torso.CFrame = CFrame.new(0, 10000, 0)
  3217.  
  3218.  
  3219. Torso.Size = Vector3.new(2, 2, 1)
  3220.  
  3221.  
  3222. Torso.Parent = Character
  3223.  
  3224.  
  3225. local TShirt = Instance.new("Decal")
  3226.  
  3227.  
  3228. TShirt.Name = "roblox"
  3229.  
  3230.  
  3231. TShirt.Parent = Torso
  3232.  
  3233.  
  3234. local LeftArm = Template:Clone()
  3235.  
  3236.  
  3237. LeftArm.Name = "Left Arm"
  3238.  
  3239.  
  3240. LeftArm.Parent = Character
  3241.  
  3242.  
  3243. local RightArm = Template:Clone()
  3244.  
  3245.  
  3246. RightArm.Name = "Right Arm"
  3247.  
  3248.  
  3249. RightArm.Parent = Character
  3250.  
  3251.  
  3252. local LeftLeg = Template:Clone()
  3253.  
  3254.  
  3255. LeftLeg.Name = "Left Leg"
  3256.  
  3257.  
  3258. LeftLeg.Parent = Character
  3259.  
  3260.  
  3261. local RightLeg = Template:Clone()
  3262.  
  3263.  
  3264. RightLeg.Name = "Right Leg"
  3265.  
  3266.  
  3267. RightLeg.Parent = Character
  3268.  
  3269.  
  3270. Character:BreakJoints()
  3271.  
  3272.  
  3273. local Neck = Instance.new("Weld")
  3274.  
  3275.  
  3276. Neck.Name = "Neck"
  3277.  
  3278.  
  3279. Neck.Part0 = Torso
  3280.  
  3281.  
  3282. Neck.Part1 = Head
  3283.  
  3284.  
  3285. Neck.C0 = CFrame.new(0, 1.5, 0)
  3286.  
  3287.  
  3288. Neck.Parent = Torso
  3289.  
  3290.  
  3291. local LeftShoulder = Instance.new("Motor")
  3292.  
  3293.  
  3294. LeftShoulder.Name = "Left Shoulder"
  3295.  
  3296.  
  3297. LeftShoulder.Part0 = Torso
  3298.  
  3299.  
  3300. LeftShoulder.Part1 = LeftArm
  3301.  
  3302.  
  3303. LeftShoulder.MaxVelocity = 0.1
  3304.  
  3305.  
  3306. LeftShoulder.C0 = CFrame.new(-Torso.Size.x / 2 - RightArm.Size.x / 2, LeftArm.Size.y / 4, 0) * CFrame.fromEulerAnglesXYZ(0, -math.pi / 2, 0)
  3307.  
  3308.  
  3309. LeftShoulder.C1 = CFrame.new(0, LeftArm.Size.y / 4, 0) * CFrame.fromEulerAnglesXYZ(0, -math.pi / 2, 0)
  3310.  
  3311.  
  3312. LeftShoulder.Parent = Torso
  3313.  
  3314.  
  3315. local RightShoulder = Instance.new("Motor")
  3316.  
  3317.  
  3318. RightShoulder.Name = "Right Shoulder"
  3319.  
  3320.  
  3321. RightShoulder.Part0 = Torso
  3322.  
  3323.  
  3324. RightShoulder.Part1 = RightArm
  3325.  
  3326.  
  3327. RightShoulder.MaxVelocity = 0.1
  3328.  
  3329.  
  3330. RightShoulder.C0 = CFrame.new(Torso.Size.x / 2 + RightArm.Size.x / 2, RightArm.Size.y / 4, 0) * CFrame.fromEulerAnglesXYZ(0, math.pi / 2, 0)
  3331.  
  3332.  
  3333. RightShoulder.C1 = CFrame.new(0, RightArm.Size.y / 4, 0) * CFrame.fromEulerAnglesXYZ(0, math.pi / 2, 0)
  3334.  
  3335.  
  3336. RightShoulder.Parent = Torso
  3337.  
  3338.  
  3339. local LeftHip = Instance.new("Motor")
  3340.  
  3341.  
  3342. LeftHip.Name = "Left Hip"
  3343.  
  3344.  
  3345. LeftHip.Part0 = Torso
  3346.  
  3347.  
  3348. LeftHip.Part1 = LeftLeg
  3349.  
  3350.  
  3351. LeftHip.MaxVelocity = 0.1
  3352.  
  3353.  
  3354. LeftHip.C0 = CFrame.new(-LeftLeg.Size.x / 2, -LeftLeg.Size.y / 2, 0) * CFrame.fromEulerAnglesXYZ(0, -math.pi / 2, 0)
  3355.  
  3356.  
  3357. LeftHip.C1 = CFrame.new(0, LeftLeg.Size.y / 2, 0) * CFrame.fromEulerAnglesXYZ(0, -math.pi / 2, 0)
  3358.  
  3359.  
  3360. LeftHip.Parent = Torso
  3361.  
  3362.  
  3363. local RightHip = Instance.new("Motor")
  3364.  
  3365.  
  3366. RightHip.Name = "Right Hip"
  3367.  
  3368.  
  3369. RightHip.Part0 = Torso
  3370.  
  3371.  
  3372. RightHip.Part1 = RightLeg
  3373.  
  3374.  
  3375. RightHip.MaxVelocity = 0.1
  3376.  
  3377.  
  3378. RightHip.C0 = CFrame.new(RightLeg.Size.x / 2, -RightLeg.Size.y / 2, 0) * CFrame.fromEulerAnglesXYZ(0, math.pi / 2, 0)
  3379.  
  3380.  
  3381. RightHip.C1 = CFrame.new(0, RightLeg.Size.y / 2, 0) * CFrame.fromEulerAnglesXYZ(0, math.pi / 2, 0)
  3382.  
  3383.  
  3384. RightHip.Parent = Torso
  3385.  
  3386.  
  3387. local BodyColors = Instance.new("BodyColors")
  3388.  
  3389.  
  3390. BodyColors.LeftArmColor = BrickColor.new("Bright yellow")
  3391.  
  3392.  
  3393. BodyColors.RightArmColor = BrickColor.new("Bright yellow")
  3394.  
  3395.  
  3396. BodyColors.LeftLegColor = BrickColor.new("Br. yellowish green")
  3397.  
  3398.  
  3399. BodyColors.RightLegColor = BrickColor.new("Br. yellowish green")
  3400.  
  3401.  
  3402. BodyColors.HeadColor = BrickColor.new("Bright yellow")
  3403.  
  3404.  
  3405. BodyColors.TorsoColor = BrickColor.new("Bright blue")
  3406.  
  3407.  
  3408. BodyColors.Parent = Character
  3409.  
  3410.  
  3411. Character.Parent = Workspace
  3412.  
  3413.  
  3414. Character:MoveTo(Position)
  3415.  
  3416.  
  3417. Character:MoveTo(Torso.Position + Vector3.new(0, 3, 0))
  3418.  
  3419.  
  3420. return Character
  3421.  
  3422.  
  3423. end
  3424.  
  3425.  
  3426.  
  3427.  
  3428. AddBV=function(str,cfr,par,debt)
  3429.  
  3430.  
  3431. if not par then return end
  3432.  
  3433.  
  3434. if par:findFirstChild'LibBV' then par.LibBV:Remove() end
  3435.  
  3436.  
  3437. tbbodyvelocity=qi{'BodyVelocity',par,velocity=cfr.lookVector*str,maxForce=v3(1/0,1/0,1/0),Name='LibBV'} deb:AddItem(tbbodyvelocity,debt)
  3438.  
  3439.  
  3440. end
  3441.  
  3442.  
  3443.  
  3444.  
  3445. AddBG=function(str,par,debt)
  3446.  
  3447.  
  3448. if not par then return end
  3449.  
  3450.  
  3451. if par:findFirstChild'LibBG' then par.LibBG:Remove() end
  3452.  
  3453.  
  3454. tbbodygyro=qi{'BodyGyro',par,maxTorque=v3(1/0,1/0,1/0),P=100000,cframe=str,Name='LibBG'} deb:AddItem(tbbodygyro,debt)
  3455.  
  3456.  
  3457. end
  3458.  
  3459.  
  3460.  
  3461.  
  3462. AddBAV=function(vec3,par,debt)
  3463.  
  3464.  
  3465. if not par then return end
  3466.  
  3467.  
  3468. if par:findFirstChild'LibBAV' then par.LibBAV:Remove() end
  3469.  
  3470.  
  3471. tbbodyangularvelocity=qi{'BodyAngularVelocity',par,maxTorque=v3(1/0,1/0,1/0),angularvelocity=vec3,Name='LibBAV'} deb:AddItem(tbbodyangularvelocity,debt)
  3472.  
  3473.  
  3474. end
  3475.  
  3476.  
  3477.  
  3478.  
  3479. Dmg = function(Hum,Dealt,Critical)
  3480.  
  3481.  
  3482. local HM=Hum.Parent
  3483.  
  3484.  
  3485. local HMT,HMB=HM:findFirstChild'Torso',HM:findFirstChild'Block'
  3486.  
  3487.  
  3488. local Blocks=HMB and HMB.Value>0
  3489.  
  3490.  
  3491. if HMT then
  3492.  
  3493.  
  3494. local mm=qi{'Model',HMT} qi{'Humanoid',mm,MaxHealth=0} deb:AddItem(mm,1)
  3495.  
  3496.  
  3497. 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}
  3498.  
  3499.  
  3500. if Blocks then
  3501.  
  3502.  
  3503. mm.Name='Block!'
  3504.  
  3505.  
  3506. mp.BrickColor=bn'Bright blue'
  3507.  
  3508.  
  3509. HMB.Value=HMB.Value-1
  3510.  
  3511.  
  3512. elseif not Blocks then
  3513.  
  3514.  
  3515. mm.Name=Dealt
  3516.  
  3517.  
  3518. mp.BrickColor=bn'Bright red'
  3519.  
  3520.  
  3521. end
  3522.  
  3523.  
  3524. end
  3525.  
  3526.  
  3527. if not Blocks then
  3528.  
  3529.  
  3530. Hum:TakeDamage(Dealt)
  3531.  
  3532.  
  3533. end
  3534.  
  3535.  
  3536. end
  3537.  
  3538.  
  3539.  
  3540.  
  3541. GetHum = function(part)
  3542.  
  3543.  
  3544. local Hum,HT,block
  3545.  
  3546.  
  3547. for i,v in pairs(part.Parent:children()) do
  3548.  
  3549.  
  3550. if v:IsA("Humanoid") then
  3551.  
  3552.  
  3553. Hum=v
  3554.  
  3555.  
  3556. elseif v.Name=='Torso' then
  3557.  
  3558.  
  3559. HT=v
  3560.  
  3561.  
  3562. elseif v.Name=='Block' and v:IsA("NumberValue") then
  3563.  
  3564.  
  3565. block=v
  3566.  
  3567.  
  3568. end
  3569.  
  3570.  
  3571. end
  3572.  
  3573.  
  3574. return Hum,HT,block
  3575.  
  3576.  
  3577. end
  3578.  
  3579.  
  3580.  
  3581.  
  3582. Lightning = function(p0,p1,tym,ofs,col,th,tra) -- start end times offset color thickness
  3583.  
  3584.  
  3585. local magz = (p0 - p1).magnitude local curpos = p0 local trz = {-ofs,ofs}
  3586.  
  3587.  
  3588. for i=1,tym do
  3589.  
  3590.  
  3591. local li = it("Part",c) li.TopSurface =0 li.BottomSurface = 0 li.Anchored = true li.Transparency = tra or 0.4 li.BrickColor = bc(col)
  3592.  
  3593.  
  3594. 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)])
  3595.  
  3596.  
  3597. local trolpos = cn(curpos,p1)*cn(0,0,magz/tym).p+ofz
  3598.  
  3599.  
  3600. if tym == i then
  3601.  
  3602.  
  3603. local magz2 = (curpos - p1).magnitude li.Size = v3(th,th,magz2)
  3604.  
  3605.  
  3606. li.CFrame = cn(curpos,p1)*cn(0,0,-magz2/2)
  3607.  
  3608.  
  3609. else
  3610.  
  3611.  
  3612. li.CFrame = cn(curpos,trolpos)*cn(0,0,magz/tym/2)
  3613.  
  3614.  
  3615. end
  3616.  
  3617.  
  3618. curpos = li.CFrame*cn(0,0,magz/tym/2).p de(li,0.25)
  3619.  
  3620.  
  3621. end
  3622.  
  3623.  
  3624. end
  3625.  
  3626.  
  3627.  
  3628.  
  3629. MakeCrater = function(pos,sc,tyms,debz,par) -- crater maker
  3630.  
  3631.  
  3632. q(function()
  3633.  
  3634.  
  3635. if not debz then
  3636.  
  3637.  
  3638. debz = 5
  3639.  
  3640.  
  3641. end
  3642.  
  3643.  
  3644. local bhit,bpos=ray(pos,pos - (pos + v3(0,200,0)))
  3645.  
  3646.  
  3647. if bhit and bpos then
  3648.  
  3649.  
  3650. for i=1,tyms do
  3651.  
  3652.  
  3653. q(function()
  3654.  
  3655.  
  3656. 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)
  3657.  
  3658.  
  3659. gr.Material = bhit.Material
  3660.  
  3661.  
  3662. gr.TopSurface = bhit.TopSurface
  3663.  
  3664.  
  3665. 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)))
  3666.  
  3667.  
  3668. wait(debz)
  3669.  
  3670.  
  3671. fade(gr,0.1)
  3672.  
  3673.  
  3674. end)
  3675.  
  3676.  
  3677. end
  3678.  
  3679.  
  3680. end
  3681.  
  3682.  
  3683. end)
  3684.  
  3685.  
  3686. end
  3687.  
  3688.  
  3689.  
  3690.  
  3691. MakeCrack = function(pos,sc,debz,par) -- crackmaker
  3692.  
  3693.  
  3694. q(function()
  3695.  
  3696.  
  3697. if not debz then
  3698.  
  3699.  
  3700. debz = 5
  3701.  
  3702.  
  3703. end
  3704.  
  3705.  
  3706. local bhit,bpos=ray(pos,pos - (pos + v3(0,10,0)))
  3707.  
  3708.  
  3709. if bhit and bpos then
  3710.  
  3711.  
  3712. local cr = pa(par or workspace,"Crack","Block",sc,0,sc,false,true,1,0,"") cr.CFrame = cn(bpos)
  3713.  
  3714.  
  3715. local dec=qi({"Decal",cr,Face="Top",Texture=ds.Crack}) de(cr,debz)
  3716.  
  3717.  
  3718. end
  3719.  
  3720.  
  3721. end)
  3722.  
  3723.  
  3724. end
  3725.  
  3726.  
  3727.  
  3728.  
  3729. a = {}
  3730.  
  3731.  
  3732. a.insw={}
  3733.  
  3734.  
  3735. function cleanweld(wexx,namzi)
  3736.  
  3737.  
  3738. local tn=ft2(a.insw,wexx)
  3739.  
  3740.  
  3741. if tn==nil then return end
  3742.  
  3743.  
  3744. if namzi=="p0" then
  3745.  
  3746.  
  3747. a.insw[tn][2]["p0x"],a.insw[tn][2]["p0y"],a.insw[tn][2]["p0z"]=0,0,0 elseif namzi=="p1" then
  3748.  
  3749.  
  3750. a.insw[tn][2]["p1x"],a.insw[tn][2]["p1y"],a.insw[tn][2]["p1z"]=0,0,0 elseif namzi=="a0" then
  3751.  
  3752.  
  3753. a.insw[tn][2]["a0x"],a.insw[tn][2]["a0y"],a.insw[tn][2]["a0z"]=0,0,0 elseif namzi=="a1" then
  3754.  
  3755.  
  3756. a.insw[tn][2]["a1x"],a.insw[tn][2]["a1y"],a.insw[tn][2]["a1z"]=0,0,0
  3757.  
  3758.  
  3759. end
  3760.  
  3761.  
  3762. end
  3763.  
  3764.  
  3765. function c2(wexx,smmx,c0orc1,aa,bb,cc,xx,yy,zz)
  3766.  
  3767.  
  3768. q(function()
  3769.  
  3770.  
  3771. c1(wexx,smmx,c0orc1,aa,bb,cc,xx,yy,zz)
  3772.  
  3773.  
  3774. end)
  3775.  
  3776.  
  3777. end
  3778.  
  3779.  
  3780. a.Welding=0
  3781.  
  3782.  
  3783. function c1(wexx,smmx,c0orc1,aa,bb,cc,xx,yy,zz)
  3784.  
  3785.  
  3786. if ft2(a.insw,wexx)==nil then
  3787.  
  3788.  
  3789. ti(a.insw,{wexx,{}})
  3790.  
  3791.  
  3792. local tn=ft2(a.insw,wexx)
  3793.  
  3794.  
  3795. a.insw[tn][2]["p0x"],a.insw[tn][2]["p0y"],a.insw[tn][2]["p0z"]=wexx.C0.x,wexx.C0.y,wexx.C0.z
  3796.  
  3797.  
  3798. a.insw[tn][2]["p1x"],a.insw[tn][2]["p1y"],a.insw[tn][2]["p1z"]=wexx.C1.x,wexx.C1.y,wexx.C1.z
  3799.  
  3800.  
  3801. a.insw[tn][2]["a0x"],a.insw[tn][2]["a0y"],a.insw[tn][2]["a0z"]=wexx.C0:toEulerAnglesXYZ()
  3802.  
  3803.  
  3804. a.insw[tn][2]["a1x"],a.insw[tn][2]["a1y"],a.insw[tn][2]["a1z"]=wexx.C1:toEulerAnglesXYZ()
  3805.  
  3806.  
  3807. end
  3808.  
  3809.  
  3810. local tn=ft2(a.insw,wexx)
  3811.  
  3812.  
  3813. local xx2,yy2,zz2=0,0,0
  3814.  
  3815.  
  3816. local x2,y2,z2=0,0,0
  3817.  
  3818.  
  3819. if c0orc1==0 then
  3820.  
  3821.  
  3822. xx2,yy2,zz2=a.insw[tn][2]["a0x"],a.insw[tn][2]["a0y"],a.insw[tn][2]["a0z"]
  3823.  
  3824.  
  3825. x2,y2,z2=a.insw[tn][2]["p0x"],a.insw[tn][2]["p0y"],a.insw[tn][2]["p0z"]
  3826.  
  3827.  
  3828. elseif c0orc1==1 then
  3829.  
  3830.  
  3831. xx2,yy2,zz2=a.insw[tn][2]["a1x"],a.insw[tn][2]["a1y"],a.insw[tn][2]["a1z"]
  3832.  
  3833.  
  3834. x2,y2,z2=a.insw[tn][2]["p1x"],a.insw[tn][2]["p1y"],a.insw[tn][2]["p1z"]
  3835.  
  3836.  
  3837. else
  3838.  
  3839.  
  3840. xx2,yy2,zz2=a.insw[tn][2]["a1x"],a.insw[tn][2]["a1y"],a.insw[tn][2]["a1z"]
  3841.  
  3842.  
  3843. x2,y2,z2=a.insw[tn][2]["p0x"],a.insw[tn][2]["p0y"],a.insw[tn][2]["p0z"]
  3844.  
  3845.  
  3846. end a.Welding=a.Welding + 1
  3847.  
  3848.  
  3849. local twa=1
  3850.  
  3851.  
  3852. if smmx >= 1 then
  3853.  
  3854.  
  3855. else
  3856.  
  3857.  
  3858. for i=smmx,0.8,smmx do
  3859.  
  3860.  
  3861. twa = 1
  3862.  
  3863.  
  3864. if c0orc1==0 then
  3865.  
  3866.  
  3867. 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))
  3868.  
  3869.  
  3870. elseif c0orc1==1 then
  3871.  
  3872.  
  3873. 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))
  3874.  
  3875.  
  3876. else local x,y,z = wexx.C0:toEulerAnglesXYZ()
  3877.  
  3878.  
  3879. wexx.C0=cn(x2-(((x2-aa)/twa)*i),y2-(((y2-bb)/twa)*i),z2-(((z2-cc)/twa)*i))*ca(x,y,z)
  3880.  
  3881.  
  3882. 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))
  3883.  
  3884.  
  3885. end
  3886.  
  3887.  
  3888. if fu then
  3889.  
  3890.  
  3891. q(fu)
  3892.  
  3893.  
  3894. end
  3895.  
  3896.  
  3897. wait()
  3898.  
  3899.  
  3900. end
  3901.  
  3902.  
  3903. for i=0.8,1,smmx*0.45 do
  3904.  
  3905.  
  3906. twa = 1
  3907.  
  3908.  
  3909. if c0orc1==0 then
  3910.  
  3911.  
  3912. 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))
  3913.  
  3914.  
  3915. elseif c0orc1==1 then
  3916.  
  3917.  
  3918. 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))
  3919.  
  3920.  
  3921. else local x,y,z = wexx.C0:toEulerAnglesXYZ()
  3922.  
  3923.  
  3924. wexx.C0=cn(x2-(((x2-aa)/twa)*i),y2-(((y2-bb)/twa)*i),z2-(((z2-cc)/twa)*i))*ca(x,y,z)
  3925.  
  3926.  
  3927. 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))
  3928.  
  3929.  
  3930. end
  3931.  
  3932.  
  3933. wait()
  3934.  
  3935.  
  3936. end
  3937.  
  3938.  
  3939. end
  3940.  
  3941.  
  3942. local i=1
  3943.  
  3944.  
  3945. if c0orc1==0 then
  3946.  
  3947.  
  3948. 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))
  3949.  
  3950.  
  3951. elseif c0orc1==1 then
  3952.  
  3953.  
  3954. 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))
  3955.  
  3956.  
  3957. else local x,y,z = wexx.C0:toEulerAnglesXYZ()
  3958.  
  3959.  
  3960. wexx.C0=cn(x2-(((x2-aa)/twa)*i),y2-(((y2-bb)/twa)*i),z2-(((z2-cc)/twa)*i))*ca(x,y,z)
  3961.  
  3962.  
  3963. 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))
  3964.  
  3965.  
  3966. end
  3967.  
  3968.  
  3969. a.Welding=a.Welding - 1
  3970.  
  3971.  
  3972. local tn=ft2(a.insw,wexx)
  3973.  
  3974.  
  3975. if c0orc1==0 then
  3976.  
  3977.  
  3978. 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)
  3979.  
  3980.  
  3981. 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)
  3982.  
  3983.  
  3984. elseif c0orc1==1 then
  3985.  
  3986.  
  3987. 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)
  3988.  
  3989.  
  3990. 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)
  3991.  
  3992.  
  3993. elseif c0orc1==3 then
  3994.  
  3995.  
  3996. local x,y,z=wexx.C0.x,wexx.C0.y,wexx.C0.z
  3997.  
  3998.  
  3999. 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)
  4000.  
  4001.  
  4002. local x,y,z=wexx.C1:toEulerAnglesXYZ()
  4003.  
  4004.  
  4005. 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)
  4006.  
  4007.  
  4008. end
  4009.  
  4010.  
  4011. end
  4012.  
  4013.  
  4014.  
  4015.  
  4016. Welds={}
  4017.  
  4018.  
  4019. Ani=function(w,a,b,c,d,e,f,ty,inc,sined)
  4020.  
  4021.  
  4022. if not Welds[w] then
  4023.  
  4024.  
  4025. local d0,e0,f0=w.C0:toEulerAnglesXYZ() local d1,e1,f1=w.C1:toEulerAnglesXYZ()
  4026.  
  4027.  
  4028. local d0,e0,f0=mdeg(d0),mdeg(e0),mdeg(f0) local d1,e1,f1=mdeg(d1),mdeg(e1),mdeg(f1)
  4029.  
  4030.  
  4031. 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}}
  4032.  
  4033.  
  4034. end
  4035.  
  4036.  
  4037. local c0,c1=Welds[w][0],Welds[w][1]
  4038.  
  4039.  
  4040. c0[1],c0[2],c0[3]=w.C0.x,w.C0.y,w.C0.z
  4041.  
  4042.  
  4043. c1[1],c1[2],c1[3]=w.C1.x,w.C1.y,w.C1.z
  4044.  
  4045.  
  4046. local A0,B0,C0,D0,E0,F0 = unpack(c0)
  4047.  
  4048.  
  4049. local A1,B1,C1,D1,E1,F1 = unpack(c1)
  4050.  
  4051.  
  4052. local Do = function(i)
  4053.  
  4054.  
  4055. if ty==0 then
  4056.  
  4057.  
  4058. 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) )
  4059.  
  4060.  
  4061. elseif ty==1 then
  4062.  
  4063.  
  4064. 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) )
  4065.  
  4066.  
  4067. else
  4068.  
  4069.  
  4070. w.C0=cn( A0-((A0-a)*i) , B0-((B0-b)*i) , C0-((C0-c)*i) ) * ca2(D0,E0,F0)
  4071.  
  4072.  
  4073. w.C1=cn(A1,B1,C1) * ca2( D1-((D1-d)*i) , E1-(((E1-e)/1)*i) , F1-((F1-f)*i) )
  4074.  
  4075.  
  4076. end
  4077.  
  4078.  
  4079. end
  4080.  
  4081.  
  4082. for i=inc,1,inc do
  4083.  
  4084.  
  4085. Do(sined and math.sin(math.pi/2*i) or i)
  4086.  
  4087.  
  4088. wait()
  4089.  
  4090.  
  4091. end
  4092.  
  4093.  
  4094. Do(1)
  4095.  
  4096.  
  4097. if ty==0 then
  4098.  
  4099.  
  4100. c0[4],c0[5],c0[6]=d,e,f
  4101.  
  4102.  
  4103. else
  4104.  
  4105.  
  4106. c1[4],c1[5],c1[6]=d,e,f
  4107.  
  4108.  
  4109. end
  4110.  
  4111.  
  4112. end
  4113.  
  4114.  
  4115. 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
  4116.  
  4117.  
  4118. rAni=function(w)
  4119.  
  4120.  
  4121. Welds[w]=nil
  4122.  
  4123.  
  4124. end
  4125.  
  4126.  
  4127.  
  4128.  
  4129. gunshot = function(speed,sc,dmg,cff) q(function() -- gunshot function
  4130.  
  4131.  
  4132. local bb = pa(workspace,"bullet","Block",0.2*sc,0.3*sc,0.2*sc,true,true,0,0.1,"Black") qi({"CylinderMesh",bb})
  4133.  
  4134.  
  4135. bb.CFrame = cff*ca(rd(rn(-1000,1000)/1500),rd(rn(-1000,1000)/1500),rd(rn(-1000,1000)/1500))
  4136.  
  4137.  
  4138. so(ds.Fire,bb,0.3,1) wait() for i=1,50 do
  4139.  
  4140.  
  4141. bhit,bpos=ray(bb.Position,bb.Position - (bb.CFrame *cn(0,-1,0)).p)
  4142.  
  4143.  
  4144. if bhit and bhit.Name ~= "bullet" and bhit.Name ~= "bullethole" and bpos and (bpos - bb.Position).magnitude < speed then break end
  4145.  
  4146.  
  4147. bb.CFrame=bb.CFrame*cn(0,speed,0)*ca(rd(-0.2),0,0)
  4148.  
  4149.  
  4150. wait()
  4151.  
  4152.  
  4153. end bb.CFrame=bb.CFrame*cn(0,(bpos-bb.Position).magnitude,0)
  4154.  
  4155.  
  4156. if not bhit.Anchored then
  4157.  
  4158.  
  4159. if bhit.Parent:findFirstChild("Humanoid") then local h = bhit.Parent.Humanoid h.Health=h.Health-dmg so(ds.Hit,bhit,0.3,1) end
  4160.  
  4161.  
  4162. else if bhit.Name~="Base" then bhit.Anchored=false bhit:BreakJoints() end end bb:Remove()
  4163.  
  4164.  
  4165. if bhit.Parent:findFirstChild("Humanoid") == nil then BulletHole(bpos,bhit,0.7*sc) end
  4166.  
  4167.  
  4168. end) end
  4169.  
  4170.  
  4171.  
  4172.  
  4173. dive = function(ob2,pro,ite,stof)
  4174.  
  4175.  
  4176. local function div(ob) for i,v in pairs(ob:children()) do if v[pro] == ite then
  4177.  
  4178.  
  4179. for i=1,#stof do v[stof[i][1]] = stof[i][2] end else div(v) end end end
  4180.  
  4181.  
  4182. div(ob2)
  4183.  
  4184.  
  4185. end
  4186.  
  4187.  
  4188.  
  4189.  
  4190. fc = function(ob,cl)
  4191.  
  4192.  
  4193. for i,v in pairs(ob:children()) do if v.className:lower()==cl:lower() then return v end end
  4194.  
  4195.  
  4196. end
  4197.  
  4198.  
  4199.  
  4200.  
  4201. function se(Key,Text)
  4202.  
  4203.  
  4204. local Values = {}
  4205.  
  4206.  
  4207. for value in (Text..Key):gmatch("(.-)"..Key) do
  4208.  
  4209.  
  4210. table.insert(Values,value)
  4211.  
  4212.  
  4213. end return Values
  4214.  
  4215.  
  4216. end
  4217.  
  4218.  
  4219.  
  4220.  
  4221. local thefenv = getfenv()
  4222.  
  4223.  
  4224. getfenv()["rmhelp"] = function()
  4225.  
  4226.  
  4227. local nus = 0
  4228.  
  4229.  
  4230. for i,v in pairs(thefenv) do if i ~= "wait" and i ~= "script" then nus = nus + 1 wait(0.05)
  4231.  
  4232.  
  4233. print(string.rep(" ",3-#tostring(nus)) ..nus.. ") " ..i.. " (" ..type(v).. ")")
  4234.  
  4235.  
  4236. end
  4237.  
  4238.  
  4239. end
  4240.  
  4241.  
  4242. end
  4243.  
  4244.  
  4245.  
  4246.  
  4247. for i,v in pairs(thefenv) do
  4248.  
  4249.  
  4250. _G[i] = v
  4251.  
  4252.  
  4253. --print(i)
  4254.  
  4255.  
  4256. end
  4257.  
  4258.  
  4259.  
  4260.  
  4261. _G[" r".."m".."d".."x "] = [[
  4262.  
  4263.  
  4264. for i,v in pairs(_G) do
  4265.  
  4266.  
  4267. if i ~= "wait" and i ~= "script" then
  4268.  
  4269.  
  4270. getfenv()[i] = v
  4271.  
  4272.  
  4273. end
  4274.  
  4275.  
  4276. end
  4277.  
  4278.  
  4279. ]]
  4280.  
  4281. script:ClearAllChildren()
  4282. loadstring(_G[" rmdx "])()
  4283. Player=game:GetService("Players").LocalPlayer
  4284. Char=Player.Character
  4285. Backpack=Player.Backpack
  4286. PlayerGui=Player.PlayerGui
  4287. Torso=Char.Torso
  4288. Head=Char.Head
  4289. Hum=Char.Humanoid
  4290. Cam=workspace.CurrentCamera
  4291. Tn="Pipebomb Launcher"
  4292. pcall(function() Backpack[Tn]:Remove() end)
  4293. pcall(function() Cam[Tn]:Remove() end)
  4294. pcall(function() thesuit=Char[''] end)
  4295. pcall(function() thesuit[Tn]:Remove() end)
  4296. pcall(function() PlayerGui[Tn]:Remove() end)
  4297. CModel=qi{'Model',Cam,Name=Tn}
  4298. Tool=qi{'HopperBin',Player.Backpack,Name=Tn}
  4299. Suit=qi{'Model',Char,Name=''}
  4300. Weapon=qi{'Model',Suit,Name=Tn}
  4301. Gui=qi{'ScreenGui',PlayerGui,Name=Tn}
  4302. equip="unequipped"
  4303. anim=""
  4304. keys={}
  4305. fmouse=nil
  4306. PipeRotate=0
  4307. Clip=6
  4308. LastShot=0
  4309. ids = {}
  4310. ids.Shoot = 10209633
  4311. ids.Reload = 10209636
  4312. ids.Crown = 20329976
  4313. ids.Crown2 = 1323306
  4314. ids.Icon = 52611635
  4315. ids.Explode = 2697431
  4316. ids.Ring = 3270017
  4317. for i,v in pairs(ids) do
  4318. if type(v)=='number' then
  4319. ids[i]='http://www.roblox.com/asset/?id='..v
  4320. end
  4321. game:GetService("ContentProvider"):Preload(ids[i])
  4322. end
  4323. Limbs={LS=Torso:findFirstChild'Left Shoulder',RS=Torso:findFirstChild'Right Shoulder',LH=Torso:findFirstChild'Left Hip',RH=Torso:findFirstChild'Right Hip'}
  4324. if _G.Limbz then
  4325. Limbs.LS=Limbs.LS or _G.Limbz.LS
  4326. Limbs.RS=Limbs.RS or _G.Limbz.RS
  4327. Limbs.LH=Limbs.LH or _G.Limbz.LH
  4328. Limbs.RH=Limbs.RH or _G.Limbz.RH
  4329. end
  4330. _G.Limbz=Limbs
  4331. Torso.Neck.C0=cn(0,1.5,0) Torso.Neck.C1=cn(0,0,0)
  4332. c2(Torso.Neck,1,3,0,1.5,0,0,0,0)
  4333. LS,RS,LH,RH=Limbs.LS,Limbs.RS,Limbs.LH,Limbs.RH
  4334. LA,RA,LL,RL=Char['Left Arm'],Char['Right Arm'],Char['Left Leg'],Char['Right Leg']
  4335. LS.Part0,RS.Part0,LH.Part0,RH.Part0=Torso,Torso,Torso,Torso
  4336. LS.Part1,RS.Part1,LH.Part1,RH.Part1=LA,RA,LL,RL
  4337. pcall(function() thesuit:Remove() end)
  4338. Head.face.Transparency=0
  4339. Head.Transparency=1 Torso.Transparency=1
  4340. fTorso=pa(Suit,"FTorso","Block",2,2,1,false,false,0,0,Torso.BrickColor.Name) neck=Torso.Neck
  4341. tw=weld(fTorso,Torso,fTorso,0,0,0,0,0,0) qi{"BlockMesh",fTorso}
  4342. fHead=pa(Suit,"FHead","Block",2,1,1,false,false,0,0,Head.BrickColor.Name)
  4343. 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
  4344. 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)}
  4345. 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)}
  4346. newhats(Char,fHead,Head) ClearClass(Char,"Hat") Hum.WalkSpeed=16 Hum.MaxHealth=175
  4347. Armz=false
  4348. Legz=false
  4349. Arms = function(on) Armz=on
  4350. if on then
  4351. LS.Part1=nil RS.Part1=nil
  4352. la.Part0=fTorso ra.Part0=fTorso
  4353. la.Part1=LA ra.Part1=RA
  4354. la.C0,la.C1=cn(-1.5,0.5,0),cn(0,0.5,0)
  4355. ra.C0,ra.C1=cn(1.5,0.5,0),cn(0,0.5,0)
  4356. else
  4357. LS.Parent,RS.Parent=fTorso,fTorso LS.Part0=fTorso RS.Part0=fTorso LS.Part1=LA RS.Part1=RA
  4358. la.Part1=nil ra.Part1=nil
  4359. end
  4360. end
  4361. Legs = function(on) Legz=on
  4362. if on then
  4363. LH.Part1=nil RH.Part1=nil
  4364. ll.Part0=fTorso rl.Part0=fTorso
  4365. ll.Part1=LL rl.Part1=RL
  4366. ll.C0,ll.C1=cn(-0.5,-1,0),cn(0,1,0)
  4367. rl.C0,rl.C1=cn(0.5,-1,0),cn(0,1,0)
  4368. else
  4369. LH.Parent,RH.Parent=fTorso,fTorso LH.Part0=fTorso RH.Part0=fTorso LH.Part1=LL RH.Part1=RL
  4370. ll.Part1=nil rl.Part1=nil
  4371. end
  4372. end
  4373. Arms'' Legs''
  4374. WDesign=function(c)
  4375. 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))
  4376. 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'}
  4377. 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)}
  4378. 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)
  4379. 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)
  4380. 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)
  4381. 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)}
  4382. 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)}
  4383. 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}
  4384. 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)
  4385. 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}
  4386. 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)}
  4387. 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}
  4388. 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)}
  4389. 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)}
  4390. 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)}
  4391. 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"}
  4392. 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"}
  4393. 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}
  4394. 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"}
  4395. 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}
  4396. 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"}
  4397. 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"}
  4398. 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}
  4399. 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}
  4400. 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}
  4401. for i=0,360,360/6 do
  4402. 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)
  4403. 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)
  4404. 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)
  4405. end
  4406. 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)}
  4407. 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)}
  4408. 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"}
  4409. 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)}
  4410. 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"}
  4411. 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)}
  4412. 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
  4413. 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}
  4414. 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)}
  4415. 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)}
  4416. 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)
  4417. 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"}
  4418. for i,v in pairs(Weapon:GetChildren()) do v.CanCollide=false end
  4419. end
  4420. WDesign({"Reddish brown","Really black","Dark stone grey","White","Medium stone grey","Really black"}) Arms(false) Legs(false)
  4421. BBD,BBT=0,{}
  4422. Dealt={20,40}
  4423. function Destroy(Directory,Part,Distance)
  4424. for i,v in pairs(Directory:GetChildren()) do
  4425. 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
  4426. if (Part.Position-v.Position).magnitude<=Distance and v:GetMass()<=1000 then
  4427. v.Anchored=false
  4428. v:BreakJoints()
  4429. v.CFrame=cn(v.Position,Part.Position)*ca(0,rd(180),0)
  4430. v.Velocity=cn(Part.Position,v.Position).lookVector*50
  4431. end
  4432. elseif v:IsA("Model") or v:IsA("Script") or v:IsA("BasePart") and v.Name=="Base" then
  4433. Destroy(v,Part,Distance)
  4434. end
  4435. end
  4436. end
  4437. SplashDmg=function(Part,Distance)
  4438. q(function()
  4439. qi{"Explosion",workspace,Position=Part.Position,BlastPressure=0}
  4440. for i,v in pairs(workspace:GetChildren()) do
  4441. if v:FindFirstChild("Torso",true) then
  4442. local vTorso=v:FindFirstChild("Torso",true)
  4443. if (vTorso.Position-Part.Position).magnitude<=Distance then
  4444. local vHum=GetHum(vTorso)
  4445. if not vHum or BBD==0 or BBT[vHum.Parent] then return end
  4446. BBT[vHum.Parent]=1
  4447. if rn(1,20)==1 then
  4448. Dmg(vHum,rn(Dealt[1],Dealt[2])*3,true)
  4449. else
  4450. Dmg(vHum,rn(Dealt[1],Dealt[2]),false)
  4451. end
  4452. if BBD==2 and vTorso then
  4453. vHum.PlatformStand=true
  4454. if vHum.Jump then
  4455. AddBV(120,cn(Part.Position,vTorso.Position),vTorso,0.4)
  4456. else
  4457. AddBV(100,cn(Part.Position,vTorso.Position),vTorso,0.4)
  4458. end
  4459. if vTorso.Parent~=Char then
  4460. AddBAV(v3(rn(-50,50),rn(-50,50),rn(-50,50)),vTorso,0.4)
  4461. end
  4462. q(function()
  4463. wait(0.6)
  4464. vHum.PlatformStand=false
  4465. end)
  4466. end
  4467. so(ids.Hit,vTorso,1,1)
  4468. BBT[vHum.Parent]=nil
  4469. end
  4470. end
  4471. end
  4472. end)
  4473. end
  4474. Fire = function(speed,sc,cff,dest)
  4475. q(function()
  4476. 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}
  4477. 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)}
  4478. 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)}
  4479. 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)}
  4480. bb.CFrame = cn(cff.p,dest)*ca(rd(-90),0,0)
  4481. 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)
  4482. 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)
  4483. for i=1,100 do
  4484. bhit,bpos=ray(bb.Position,bb.Position - (bb.CFrame *cn(0,-2,0)).p)
  4485. bhit2,bpos2=ray(pp0.Position,pp0.Position - (pp0.CFrame *cn(0,-2,0)).p)
  4486. bhit3,bpos3=ray(pp1.Position,bb.Position - (pp1.CFrame *cn(0,-2,0)).p)
  4487. bhit4,bpos4=ray(pp2.Position,pp0.Position - (pp2.CFrame *cn(0,-2,0)).p)
  4488. 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
  4489. 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
  4490. 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
  4491. 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
  4492. bb.CFrame=bb.CFrame*cn(0,speed,0)*ca(rd(-0.3),0,0)
  4493. pp0.CFrame=bb.CFrame*cn(0,0.3,0)
  4494. pp1.CFrame=bb.CFrame*cn(0,-0.3,0)
  4495. pp2.CFrame=bb.CFrame*cn(0,0.1,0)
  4496. wait()
  4497. end
  4498. GlowMesh(false,"sphere",Weapon,v3(3,3,3),"Bright red",cn(bpos),0.25,1,0.05)
  4499. BBD=2
  4500. sopart=pa(workspace,"bullet","Block",0,0,0,true,true,1,0)
  4501. bb.CFrame=bb.CFrame*cn(0,(bpos-bb.Position).magnitude,0)
  4502. pp0.CFrame=bb.CFrame*cn(0,0.3,0)
  4503. pp1.CFrame=bb.CFrame*cn(0,-0.3,0)
  4504. pp2.CFrame=bb.CFrame*cn(0,0.1,0)
  4505. sopart.CFrame=bb.CFrame
  4506. so(ids.Explode,sopart,1,0.4)
  4507. SplashDmg(bb,11)
  4508. Destroy(workspace,bb,13)
  4509. BBD=0
  4510. deb:AddItem(bb,1)
  4511. deb:AddItem(sopart,1)
  4512. end)
  4513. end
  4514. function Stance(speed)
  4515. c2(ra,speed,3,1.25,0.5,-0.25,-75,-65,0)
  4516. c2(la,speed,3,-1.25,0.5,-0.25,-70,-20,0)
  4517. c2(ll,speed,3,-0.5,-1,0,0,0,0)
  4518. c2(rl,speed,3,0.5,-1,0,0,0,0)
  4519. c2(hw,speed,3,0,1.5,0,0,-65,0)
  4520. c2(tw,speed,3,0,0,0,0,65,0)
  4521. c2(neck,speed,3,0,1.5,0,0,0,0)
  4522. c2(hingew,speed,3,0,0,0,0,0,0)
  4523. c2(piperw,speed,3,0,0.7,0,0,30+PipeRotate,0)
  4524. Ani(haw,0,0.5,0,-75,0,0,0,speed/2,1)
  4525. end
  4526. function Reset(speed)
  4527. c2(ra,speed,3,1.5,0.5,0,0,0,0)
  4528. c2(la,speed,3,-1.5,0.5,0,0,0,0)
  4529. c2(ll,speed,3,-0.5,-1,0,0,0,0)
  4530. c2(rl,speed,3,0.5,-1,0,0,0,0)
  4531. c2(hw,speed,3,0,1.5,0,0,0,0)
  4532. c2(tw,speed,3,0,0,0,0,0,0)
  4533. c2(neck,speed,3,0,1.5,0,0,0,0)
  4534. c2(piperw,speed,3,0,0.7,0,0,30+PipeRotate,0)
  4535. c2(hingew,speed,3,0,0,0,0,0,0)
  4536. Ani(haw,0.5,2.5,1,270,0,90,0,speed,1)
  4537. end
  4538. function Button1Down()
  4539. if Clip>0 and anim=="" and (tick()-LastShot)>=0.6 then
  4540. LastShot=tick()
  4541. so(ids.Shoot,ha,1,1)
  4542. Fire(3,1,p25.CFrame*cn(0,-1,0),fmouse.Hit.p)
  4543. Clip=Clip-1
  4544. PipeRotate=PipeRotate+60
  4545. c2(piperw,0.4,3,0,0.7,0,0,30+PipeRotate,0)
  4546. elseif Clip==0 and anim=="" and (tick()-LastShot)>=0.6 then
  4547. anim="Reloading"
  4548. c2(ra,0.1,3,1.25,0.5,-0.25,-75,-65,0)
  4549. c2(la,0.1,3,-1.25,0.5,-0.25,-70,-20,0)
  4550. c2(hw,0.1,3,0,1.5,0,0,-65,0)
  4551. c1(hingew,0.15,3,0,0,0,0,-90,0)
  4552. for i=1,6 do
  4553. PipeRotate=PipeRotate+60
  4554. c1(la,0.13,3,-1.25,0.25,0.1,15,0,-15)
  4555. 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}
  4556. 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"}
  4557. 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)}
  4558. 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}
  4559. c1(la,0.16,3,-1.25,0.4,-0.1,-100,0,-15)
  4560. c1(la,0.2,3,-1.25,0.3,-0.25,-40,0,-15)
  4561. so(ids.Reload,ha,1,1)
  4562. c1(piperw,0.4,3,0,0.7,0,0,30+PipeRotate,0)
  4563. Clip=i
  4564. deb:AddItem(pipe,0.05)
  4565. end
  4566. Stance(0.15)
  4567. anim=""
  4568. end
  4569. end
  4570. function KeyDown(key)
  4571. key=key:lower()
  4572. keys[key]=true
  4573. if key=="r" and anim=="" and equip=="equipped" and Clip==0 then
  4574. anim="Reloading"
  4575. c2(ra,0.1,3,1.25,0.5,-0.25,-75,-65,0)
  4576. c2(la,0.1,3,-1.25,0.5,-0.25,-70,-20,0)
  4577. c2(hw,0.1,3,0,1.5,0,0,-65,0)
  4578. c1(hingew,0.15,3,0,0,0,0,-90,0)
  4579. for i=1,6 do
  4580. PipeRotate=PipeRotate+60
  4581. c1(la,0.13,3,-1.25,0.25,0.1,15,0,-15)
  4582. 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}
  4583. 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"}
  4584. 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)}
  4585. 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}
  4586. c1(la,0.16,3,-1.25,0.4,-0.1,-100,0,-15)
  4587. c1(la,0.2,3,-1.25,0.3,-0.25,-40,0,-15)
  4588. so(ids.Reload,ha,1,1)
  4589. c1(piperw,0.4,3,0,0.7,0,0,30+PipeRotate,0)
  4590. Clip=i
  4591. deb:AddItem(pipe,0.05)
  4592. end
  4593. Stance(0.15)
  4594. anim=""
  4595. end
  4596. end
  4597. Tool.Selected:connect(function(mouse)
  4598. fmouse=mouse
  4599. if equip=="unequipped" and anim=="" then
  4600. 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)
  4601. local ofs = RA.CFrame:toObjectSpace(ha.CFrame)
  4602. haw.Part0=RA haw.C0=ofs haw.C1=cn(0,0,0) rAni(haw)
  4603. Stance(0.2) equip="equipped"
  4604. end
  4605. mouse.Button1Down:connect(Button1Down)
  4606. mouse.KeyDown:connect(KeyDown)
  4607. end)
  4608. Tool.Deselected:connect(function()
  4609. fmouse=nil
  4610. if equip=="equipped" and anim=="" then
  4611. 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)
  4612. local ofs = Torso.CFrame:toObjectSpace(ha.CFrame)
  4613. haw.Part0=Torso haw.C0=ofs haw.C1=cn(0,0,0) rAni(haw)
  4614. Reset(0.1)
  4615. Arms(false) Legs(false) equip="unequipped"
  4616. end
  4617. end)
  4618. Gyro=qi{"BodyGyro",Torso,D=50,P=1500}
  4619. game:GetService("RunService").Stepped:connect(function()
  4620. if fmouse~=nil then
  4621. Gyro.maxTorque=v3(1/0,1/0,1/0)
  4622. Gyro.cframe = cn(Torso.Position,v3(fmouse.hit.p.x,Torso.Position.y,fmouse.hit.p.z))
  4623. else
  4624. Gyro.maxTorque = v3(0,0,0)
  4625. end
  4626. if equip=="equipped" and anim=="" and fmouse~=nil then
  4627. c2(ra,1,3,1.25,0.5,-0.25,-75+math.deg((Torso.Position-fmouse.Hit.p).unit.y),-65,0)
  4628. c2(la,1,3,-1.25,0.5,-0.25,-70+math.deg((Torso.Position-fmouse.Hit.p).unit.y),-20,0)
  4629. c2(hw,1,3,0,1.5,0,math.deg((Torso.Position-fmouse.Hit.p).unit.y),-65,0)
  4630. end
  4631. 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!