Advertisement
AxeuerAlt

Axe

Jul 9th, 2019
307
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 5.44 KB | None | 0 0
  1. -- Converted using Mokiros's Model to Script plugin
  2. -- Converted string size: 560
  3.  
  4. local Scripts = { function()
  5. wait(1)a=2 b=25 c=2 d=script.Parent e=0 function f()print("hitting")local k=Instance.new("StringValue")k.Name="toolanim"k.Value="Slash"k.Parent=d end function g()if not d.Enabled then return end d.Enabled=false f()d.Enabled=true end function h(k)if e==0 then e=1 if k.Parent.Name=="Tree"then i=game.Players:findFirstChild(d.Parent.Name)k.Parent.hit.Value=k.Parent.hit.Value-a if k.Parent.hit.Value<1 and k.Parent.Timber.Value==0 then i.leaderstats.Money.Value=i.leaderstats.Money.Value+b k.Parent.Timber.Value=1 wait(c)else wait(1)end end e=0 end end d.Activated:connect(g)j=d.Handle.Touched:connect(h)
  6. end; function()
  7. local e=script.Parent function a(f)e.Key.Value=e.Key.Value..f end b=false function c(f)if f==nil then print("Mouse not found")return end f.Icon="rbxasset://textures\\GunCursor.png"e.Handle.BrickColor=game.Players:FindFirstChild(e.Parent.Name).TeamColor e.Key.Value=""f.KeyDown:connect(a)b=true while b do wait(0.02)e.Target.Value=f.Target e.Origin.Value=f.Origin.p end end function d(f)b=false wait(0.05)e.Target.Value=nil e.Origin.Value=Vector3.new(0,0,0)end e.Equipped:connect(c)e.Unequipped:connect(d)
  8. end;}local ActualScripts = {}
  9. function s(var)
  10. local func = table.remove(Scripts,1)
  11. setfenv(func,setmetatable({script=var},{
  12. __index = getfenv(func),
  13. }))
  14. table.insert(ActualScripts,coroutine.wrap(func))
  15. end
  16.  
  17. local Decode = function(str,t,props,classes,values,ICList,Model,CurPar,LastIns,split,RemoveAndSplit,InstanceList)
  18. local tonum,table_remove,inst,parnt,comma,table_foreach = tonumber,table.remove,Instance.new,"Parent",",",
  19. function(t,f)
  20. for a,b in pairs(t) do
  21. f(a,b)
  22. end
  23. end
  24. local Types = {
  25. Color3 = Color3.new,
  26. Vector3 = Vector3.new,
  27. Vector2 = Vector2.new,
  28. UDim = UDim.new,
  29. UDim2 = UDim2.new,
  30. CFrame = CFrame.new,
  31. Rect = Rect.new,
  32. NumberRange = NumberRange.new,
  33. NumberSequence = function(...)
  34. local a = {...}
  35. local t = {}
  36. repeat
  37. t[#t+1] = NumberSequenceKeypoint.new(table_remove(a,1),table_remove(a,1),table_remove(a,1))
  38. until #a==0
  39. return NumberSequence.new(t)
  40. end,
  41. ColorSequence = function(...)
  42. local a = {...}
  43. local t = {}
  44. repeat
  45. t[#t+1] = ColorSequenceKeypoint.new(table_remove(a,1),Color3.new(table_remove(a,1),table_remove(a,1),table_remove(a,1)))
  46. until #a==0
  47. return ColorSequence.new(t)
  48. end,
  49. number = tonumber,
  50. boolean = function(a)
  51. return a=="1"
  52. end
  53. }
  54. split = function(str,sep)
  55. if not str then return end
  56. local fields = {}
  57. local ConcatNext = false
  58. str:gsub(("([^%s]+)"):format(sep),function(c)
  59. if ConcatNext == true then
  60. fields[#fields] = fields[#fields]..sep..c
  61. ConcatNext = false
  62. else
  63. fields[#fields+1] = c
  64. end
  65. if c:sub(#c)=="\\" then
  66. c = fields[#fields]
  67. fields[#fields] = c:sub(1,#c-1)
  68. ConcatNext = true
  69. end
  70. end)
  71. return fields
  72. end
  73. RemoveAndSplit = function(t)
  74. return split(table_remove(t,1),comma)
  75. end
  76. t = split(str,";")
  77. props = RemoveAndSplit(t)
  78. classes = RemoveAndSplit(t)
  79. values = split(table_remove(t,1),'|')
  80. ICList = RemoveAndSplit(t)
  81. InstanceList = {}
  82. Model = inst"Model"
  83. CurPar = Model
  84. table_foreach(t,function(ct,c)
  85. if c=="n" or c=="p" then
  86. CurPar = c=="n" and LastIns or CurPar[parnt]
  87. else
  88. ct = split(c,"|")
  89. local class = classes[tonum(table_remove(ct,1))]
  90. if class=="UnionOperation" then
  91. LastIns = {Locked="true",Anchored="true",UsePartColor="true"}
  92. else
  93. LastIns = inst(class)
  94. if LastIns:IsA"Script" then
  95. s(LastIns)
  96. end
  97. end
  98.  
  99. local function SetProperty(LastIns,p,str,s)
  100. s = Types[typeof(LastIns[p])]
  101. LastIns[p] = s and s(unpack(split(str,comma))) or str
  102. end
  103.  
  104. local UnionData
  105. table_foreach(ct,function(s,p,a,str)
  106. a = p:find":"
  107. p,str = props[tonum(p:sub(1,a-1))],values[tonum(p:sub(a+1))]
  108. if p=="UnionData" then
  109. UnionData = split(str," ")
  110. return
  111. end
  112. if class=="UnionOperation" then
  113. LastIns[p] = str
  114. return
  115. end
  116. SetProperty(LastIns,p,str)
  117. end)
  118.  
  119. if UnionData then
  120. local LI_Data = LastIns
  121. LastIns = DecodeUnion(UnionData)
  122. table_foreach(LI_Data,function(p,str)
  123. SetProperty(LastIns,p,str)
  124. end)
  125. end
  126. table.insert(InstanceList,LastIns)
  127. LastIns[parnt] = CurPar
  128. end
  129. end)
  130. table_remove(ICList,1)
  131. table_foreach(ICList,function(a,b)
  132. b = split(b,">")
  133. InstanceList[tonum(b[1])][props[tonum(b[2])]] = InstanceList[tonum(b[3])]
  134. end)
  135.  
  136. return Model:GetChildren()
  137. end
  138.  
  139. local Objects = Decode('Name,CanBeDropped,Grip,GripPos,Position,Orientation,Size,BottomSurface,TopSurface,Scale,MeshId,TextureId,MeshType,Texture,Face;Part,Tool,SpecialMesh,Decal,StringValue,Vector3Value,Script,ObjectValue,L'
  140. ..'ocalScript;Part|Axe|0|0,-1,0,1,0,0,0,1,0,0,0,1|0,-1,0|Handle|46.5,0.099,3.599|0,-90,-90|0.2,3.2,1|0|1,0.699,0.699|rbxassetid://145815658|rbxassetid://235687506|5|http://www.roblox.com/asset/?id=414474'
  141. ..'768|3|Key|Origin|Target|Local Gui;0;2|1:2|2:3|3:4|4:5;n;1|1:6|5:7|6:8|7:9|8:10|9:10;n;3|10:11|11:12|12:13|13:14;4|14:15|15:16;p;5|1:17;6|1:18;7;8|1:19;9|1:20;p;')
  142. for _,Object in pairs(Objects) do
  143. Object.Parent = script and script.Parent==workspace and script or workspace
  144. end
  145. for _,f in pairs(ActualScripts) do f() end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement