Advertisement
Credenzio

Untitled

Oct 21st, 2019
158
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 7.95 KB | None | 0 0
  1. repeat wait() until game.Players.LocalPlayer.Character
  2. local main = script.Parent
  3. local plr = game.Players.LocalPlayer
  4. local char = plr.Character
  5. local m = plr:GetMouse()
  6. local cam = workspace.CurrentCamera
  7. local inv = main.blind.InventoryBase
  8. local info = inv.InfoBase
  9. local MaterialTab = inv.MaterialScroll
  10. local OtherTab = inv.OtherScroll
  11. local SwordTab = inv.SwordScroll
  12. local MaterialList = {"","","","","","","","","","","","","","","","","","","","","","","","","","",""}
  13. local OtherList = {}
  14. local SwordList = {}
  15. local CurrentScrollTab = MaterialTab
  16. local Library = require(game.Lighting.LibraryTwo)
  17. local TweenService = game:GetService("TweenService")
  18. local InventoryAngles = game.Lighting.cameraangles
  19.  
  20.  
  21.  
  22. function CreateSlot(ImageID,X,Y)
  23. local img = Instance.new("ImageButton")
  24. img.Parent = CurrentScrollTab
  25. img.Size = UDim2.new(0,75,0,75)
  26. img.BackgroundColor3 = Color3.new(0,0,0)
  27. img.BackgroundTransparency = 0.4
  28. img.Position = UDim2.new(X,0,Y,0)
  29. img.Image = ImageID
  30. local nn = inv.boop:Clone()
  31. nn.Parent = img
  32. nn.Disabled = false
  33. end
  34. function CreateEmpty(tab)
  35. local a = Instance.new("TextBox")
  36. a.Parent = CurrentScrollTab
  37. a.Size = UDim2.new(1,0,.8,0)
  38. a.Position = UDim2.new(0,0,0,0)
  39. a.BackgroundTransparency = .3
  40. a.BackgroundColor3 = Color3.new(0,0,0)
  41. a.TextColor3 = Color3.new(255,255,255)
  42. a.TextSize = 24
  43. a.Text = "This inventory is empty."
  44. a.TextEditable = false
  45. tab.ScrollBarImageTransparency = 1
  46. end
  47.  
  48. function RarityColor(y)
  49. if y == "I" then return Color3.new(0,255,0)
  50. elseif y == "II" then return Color3.new(255,255,0)
  51. elseif y == "III" then return Color3.new(255,150,0)
  52. elseif y == "IV" then return Color3.new(255,0,0)
  53. elseif y == "V" then return Color3.new(0,0,255)
  54. elseif y == "VI" then return Color3.new(255,0,255)
  55. end
  56. end
  57.  
  58. function infoTab(x)
  59. info.Visible = true
  60. info.ImageLabel.Image = Library[7][x]
  61. info.ItemName.Text = Library[1][x]
  62. info.ItemRarity.Text = "Rarity: "..Library[6][x]
  63. info.ItemRarity.TextStrokeColor3 = RarityColor(Library[6][x])
  64. info.ItemWeight.Text = Library[3][x]
  65. info.ItemDesc.Text = Library[4][x]
  66. end
  67.  
  68. function SlotAppear(tab,List)
  69. tab.ScrollBarImageTransparency = 0
  70. CurrentScrollTab.Visible = false
  71. CurrentScrollTab:ClearAllChildren()
  72. CurrentScrollTab = tab
  73. CurrentScrollTab.Visible = true--turn on new tab
  74. if CurrentScrollTab == SwordTab then inv.EquipmentBase.Visible = true else inv.EquipmentBase.Visible = false end
  75. if List[1]~=nil then
  76. local p = Instance.new("Frame",CurrentScrollTab)
  77. p.ZIndex = 5
  78. p.BorderSizePixel = 0
  79. p.Size = UDim2.new(.95,0,1,0)
  80. p.Position = UDim2.new(0,0,0,0)
  81. p.BackgroundColor3 = Color3.new(255,255,255)
  82. local xsc = 0.05
  83. local ysc = 0.05
  84. local tim = 6
  85. for i = 1,#List do
  86. CreateSlot(List[i],xsc,ysc)
  87. xsc = xsc+.15
  88. if i == tim then
  89. ysc = ysc+.2
  90. xsc = 0.05
  91. tim = tim+6
  92. end
  93. end
  94. for i = 1,5 do
  95. p.BackgroundTransparency = p.BackgroundTransparency+.2
  96. wait(0.01)
  97. end
  98. p:Destroy()
  99. else
  100. local pp = Instance.new("Frame",CurrentScrollTab)
  101. pp.ZIndex = 5
  102. pp.BorderSizePixel = 0
  103. pp.Size = UDim2.new(1,0,1,0)
  104. pp.Position = UDim2.new(0,0,0,0)
  105. pp.BackgroundColor3 = Color3.new(255,255,255)
  106. CreateEmpty(tab)
  107. for i = 1,5 do
  108. pp.BackgroundTransparency = pp.BackgroundTransparency+.2
  109. wait(0.01)
  110. end
  111. pp:Destroy()
  112. end
  113. end
  114.  
  115. local function KeyPress(key)
  116. if key == "e" and main.blind.Visible == false then
  117. char.Humanoid.WalkSpeed = 0
  118. main.blind.Visible = true
  119. local ins = InventoryAngles:Clone()
  120. ins.Parent = cam
  121. ins:SetPrimaryPartCFrame(plr.Character.Torso.CFrame)
  122. local InventoryTween = TweenService:Create(cam,TweenInfo.new(.5, Enum.EasingStyle.Quad, Enum.EasingDirection.Out),{CFrame = CFrame.new(ins.InvCFrame.Position,ins.InvFocus.Position)})
  123. cam.CameraType = "Scriptable"
  124. InventoryTween:Play()
  125. elseif key == "e" and main.blind.Visible == true then
  126. main.blind.Visible = false
  127. ins = cam:FindFirstChild("cameraangles")
  128. ins:Destroy()
  129. cam.CameraType = "Custom"
  130. char.Humanoid.WalkSpeed = 16
  131. end
  132. end
  133. m.KeyDown:connect(KeyPress)
  134.  
  135.  
  136.  
  137. inv.Tab1.MouseEnter:connect(function()
  138. inv.Tab1.TextLabel.Visible = true
  139. end)
  140. inv.Tab1.MouseLeave:connect(function()
  141. inv.Tab1.TextLabel.Visible = false
  142. end)
  143. inv.Tab2.MouseEnter:connect(function()
  144. inv.Tab2.TextLabel.Visible = true
  145. end)
  146. inv.Tab2.MouseLeave:connect(function()
  147. inv.Tab2.TextLabel.Visible = false
  148. end)
  149. inv.Tab3.MouseEnter:connect(function()
  150. inv.Tab3.TextLabel.Visible = true
  151. end)
  152. inv.Tab3.MouseLeave:connect(function()
  153. inv.Tab3.TextLabel.Visible = false
  154. end)
  155.  
  156.  
  157.  
  158.  
  159.  
  160. inv.EquipmentBase.Helm.MouseEnter:connect(function()
  161. if cam:FindFirstChild("cameraangles") then ins = cam:FindFirstChild("cameraangles")
  162. ins.Helm.Transparency = .7
  163. end
  164. end)
  165.  
  166. inv.EquipmentBase.Helm.MouseLeave:connect(function()
  167. if cam:FindFirstChild("cameraangles") then ins = cam:FindFirstChild("cameraangles")
  168. ins.Helm.Transparency = 1
  169. end
  170. end)
  171.  
  172. inv.EquipmentBase.Body.MouseEnter:connect(function()
  173. if cam:FindFirstChild("cameraangles") then ins = cam:FindFirstChild("cameraangles")
  174. ins.Body.Transparency = .7
  175. end
  176. end)
  177.  
  178. inv.EquipmentBase.Body.MouseLeave:connect(function()
  179. if cam:FindFirstChild("cameraangles") then ins = cam:FindFirstChild("cameraangles")
  180. ins.Body.Transparency = 1
  181. end
  182. end)
  183.  
  184. inv.EquipmentBase.WeaponL.MouseEnter:connect(function()
  185. if cam:FindFirstChild("cameraangles") then ins = cam:FindFirstChild("cameraangles")
  186. ins.WeaponL.Transparency = .7
  187. end
  188. end)
  189.  
  190. inv.EquipmentBase.WeaponL.MouseLeave:connect(function()
  191. if cam:FindFirstChild("cameraangles") then ins = cam:FindFirstChild("cameraangles")
  192. ins.WeaponL.Transparency = 1
  193. end
  194. end)
  195.  
  196. inv.EquipmentBase.WeaponM.MouseEnter:connect(function()
  197. if cam:FindFirstChild("cameraangles") then ins = cam:FindFirstChild("cameraangles")
  198. ins.WeaponM.Transparency = .7
  199. end
  200. end)
  201.  
  202. inv.EquipmentBase.WeaponM.MouseLeave:connect(function()
  203. if cam:FindFirstChild("cameraangles") then ins = cam:FindFirstChild("cameraangles")
  204. ins.WeaponM.Transparency = 1
  205. end
  206. end)
  207.  
  208. inv.EquipmentBase.WeaponS.MouseEnter:connect(function()
  209. if cam:FindFirstChild("cameraangles") then ins = cam:FindFirstChild("cameraangles")
  210. ins.WeaponS.Transparency = .7
  211. end
  212. end)
  213.  
  214. inv.EquipmentBase.WeaponS.MouseLeave:connect(function()
  215. if cam:FindFirstChild("cameraangles") then ins = cam:FindFirstChild("cameraangles")
  216. ins.WeaponS.Transparency = 1
  217. end
  218. end)
  219.  
  220. inv.EquipmentBase.Neck.MouseEnter:connect(function()
  221. if cam:FindFirstChild("cameraangles") then ins = cam:FindFirstChild("cameraangles")
  222. ins.Neck.Transparency = .7
  223. end
  224. end)
  225.  
  226. inv.EquipmentBase.Neck.MouseLeave:connect(function()
  227. if cam:FindFirstChild("cameraangles") then ins = cam:FindFirstChild("cameraangles")
  228. ins.Neck.Transparency = 1
  229. end
  230. end)
  231.  
  232. inv.EquipmentBase.Arms.MouseEnter:connect(function()
  233. if cam:FindFirstChild("cameraangles") then ins = cam:FindFirstChild("cameraangles")
  234. ins.RArm.Transparency = .7
  235. ins.LArm.Transparency = .7
  236. end
  237. end)
  238.  
  239. inv.EquipmentBase.Arms.MouseLeave:connect(function()
  240. if cam:FindFirstChild("cameraangles") then ins = cam:FindFirstChild("cameraangles")
  241. ins.RArm.Transparency = 1
  242. ins.LArm.Transparency = 1
  243. end
  244. end)
  245.  
  246. inv.EquipmentBase.Legs.MouseEnter:connect(function()
  247. if cam:FindFirstChild("cameraangles") then ins = cam:FindFirstChild("cameraangles")
  248. ins.RLeg.Transparency = .7
  249. ins.LLeg.Transparency = .7
  250. end
  251. end)
  252.  
  253. inv.EquipmentBase.Legs.MouseLeave:connect(function()
  254. if cam:FindFirstChild("cameraangles") then ins = cam:FindFirstChild("cameraangles")
  255. ins.RLeg.Transparency = 1
  256. ins.LLeg.Transparency = 1
  257. end
  258. end)
  259.  
  260.  
  261.  
  262. inv.Tab1.MouseButton1Click:Connect(function()
  263. info.Visible = false
  264. SlotAppear(MaterialTab,MaterialList)
  265. print("Viewing Materials")
  266. end)
  267. inv.Tab2.MouseButton1Click:Connect(function()
  268. info.Visible = false
  269. SlotAppear(SwordTab,SwordList)
  270. print("Viewing sword")
  271. end)
  272. inv.Tab3.MouseButton1Click:Connect(function()
  273. info.Visible = false
  274. SlotAppear(OtherTab,OtherList)
  275. print("Viewing other")
  276. end)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement