API tools faq
paste
Advertisement
hamidy

gui ##

hamidy
Aug 28th, 2021
874
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
C 30.44 KB | None | 0 0
raw download clone embed print report
  1. repeat wait() until game:IsLoaded() == true
  2.  
  3. local function GetURL(scripturl)
  4.     if shared.VapeDeveloper then
  5.         return readfile("vape/"..scripturl)
  6.     else
  7.         return game:HttpGet("https://raw.githubusercontent.com/7GrandDadPGN/VapeV4ForRoblox/main/"..scripturl, true)
  8.     end
  9. end
  10.  
  11. local getasset = getsynasset or getcustomasset
  12. local queueteleport = syn and syn.queue_on_teleport or queue_on_teleport
  13. local request = syn and syn.request or http and http.request or http_request
  14. local function getcustomassetfunc(path)
  15.     if not isfile(path) then
  16.         local req = request({
  17.             Url = "https://raw.githubusercontent.com/7GrandDadPGN/VapeV4ForRoblox/main/"..path:gsub("vape/assets", "assets"),
  18.             Method = "GET"
  19.         })
  20.         writefile(path, req.Body)
  21.     end
  22.     return getasset(path)
  23. end
  24.  
  25. local function checkpublicrepo(id)
  26.     local req = request({
  27.         Url = "https://raw.githubusercontent.com/7GrandDadPGN/VapeV4ForRoblox/main/CustomModules/"..id..".vape",
  28.         Method = "GET"
  29.     })
  30.     if req.StatusCode == 200 then
  31.         return req.Body
  32.     end
  33.     return nil
  34. end
  35.  
  36. if not (getasset and request and queueteleport) then
  37.     print("Vape not supported with your exploit.")
  38.     return
  39. end
  40.  
  41. if shared.VapeExecuted then
  42.     error("Vape Already Injected")
  43.     return
  44. else
  45.     shared.VapeExecuted = true
  46. end
  47.  
  48. if isfolder("vape") == false then
  49.     makefolder("vape")
  50. end
  51. if isfolder("vape/CustomModules") == false then
  52.     makefolder("vape/CustomModules")
  53. end
  54. if isfolder("vape/Profiles") == false then
  55.     makefolder("vape/Profiles")
  56. end
  57. if isfolder("vape/assets") == false then
  58.     makefolder("vape/assets")
  59. end
  60.  
  61. local GuiLibrary = loadstring(GetURL("NewGuiLibrary.lua"))()
  62. shared.GuiLibrary = GuiLibrary
  63. local workspace = game:GetService("Workspace")
  64. local cam = workspace.CurrentCamera
  65. local selfdestruct = false
  66. local GUI = GuiLibrary.CreateMainWindow()
  67. local Combat = GuiLibrary.CreateWindow("Combat", "vape/assets/CombatIcon.png", 15, UDim2.new(0, 223, 0, 6), false)
  68. local Blatant = GuiLibrary.CreateWindow("Blatant", "vape/assets/BlatantIcon.png", 16, UDim2.new(0, 223, 0, 6), false)
  69. local Render = GuiLibrary.CreateWindow("Render", "vape/assets/RenderIcon.png", 17, UDim2.new(0, 223, 0, 6), false)
  70. local Utility = GuiLibrary.CreateWindow("Utility", "vape/assets/UtilityIcon.png", 17, UDim2.new(0, 223, 0, 6), false)
  71. local World = GuiLibrary.CreateWindow("World", "vape/assets/WorldIcon.png", 16, UDim2.new(0, 223, 0, 6), false)
  72. local Other = GuiLibrary.CreateWindow("Other", "vape/assets/OtherIcon.png", 20, UDim2.new(0, 223, 0, 6), false)
  73. local Friends = GuiLibrary.CreateWindow2("Friends", "vape/assets/FriendsIcon.png", 17, UDim2.new(0, 177, 0, 6), false)
  74. GUI.CreateDivider()
  75. GUI.CreateButton("Combat", function() Combat.SetVisible(true) end, function() Combat.SetVisible(false) end, "vape/assets/CombatIcon.png", 15)
  76. GUI.CreateButton("Blatant", function() Blatant.SetVisible(true) end, function() Blatant.SetVisible(false) end, "vape/assets/BlatantIcon.png", 16)
  77. GUI.CreateButton("Render", function() Render.SetVisible(true) end, function() Render.SetVisible(false) end, "vape/assets/RenderIcon.png", 17)
  78. GUI.CreateButton("Utility", function() Utility.SetVisible(true) end, function() Utility.SetVisible(false) end, "vape/assets/UtilityIcon.png", 17)
  79. GUI.CreateButton("World", function() World.SetVisible(true) end, function() World.SetVisible(false) end, "vape/assets/WorldIcon.png", 16)
  80. GUI.CreateButton("Other", function() Other.SetVisible(true) end, function() Other.SetVisible(false) end, "vape/assets/OtherIcon.png", 20)
  81. GUI.CreateDivider("MISC")
  82. GUI.CreateButton("Friends", function() Friends.SetVisible(true) end, function() Friends.SetVisible(false) end)
  83. local FriendsTextList = {["RefreshValues"] = function() end}
  84. FriendsTextList = Friends.CreateTextList("FriendsList", "Username / Alias", function(user)
  85.     table.insert(GuiLibrary["FriendsObject"]["Friends"], user)
  86.     FriendsTextList["RefreshValues"](GuiLibrary["FriendsObject"]["Friends"])
  87.     GuiLibrary["SaveFriends"]()
  88. end, function(num)
  89.     table.remove(GuiLibrary["FriendsObject"]["Friends"], num)
  90.     FriendsTextList["RefreshValues"](GuiLibrary["FriendsObject"]["Friends"])
  91.     GuiLibrary["SaveFriends"]()
  92. end, function(obj)
  93.     local friendcircle = Instance.new("Frame")
  94.     friendcircle.Size = UDim2.new(0, 10, 0, 10)
  95.     friendcircle.Name = "FriendCircle"
  96.     friendcircle.BackgroundColor3 = Color3.fromHSV(0.44, 1, 1)
  97.     friendcircle.BorderSizePixel = 0
  98.     friendcircle.Position = UDim2.new(0, 10, 0, 13)
  99.     friendcircle.Parent = obj
  100.     local friendcorner = Instance.new("UICorner")
  101.     friendcorner.CornerRadius = UDim.new(0, 8)
  102.     friendcorner.Parent = friendcircle
  103.     obj.ItemText.Position = UDim2.new(0, 36, 0, 0)
  104.     obj.ItemText.Size = UDim2.new(0, 157, 0, 33)
  105. end)
  106. Friends.CreateColorSlider("Friends Color", function(val)
  107.     GuiLibrary["FriendsObject"]["Color"] = val
  108.     pcall(function()
  109.         FriendsTextList["Object"].AddBoxBKG.AddButton.ImageColor3 = Color3.fromHSV(GuiLibrary["FriendsObject"]["Color"], 1, 1)
  110.     end)
  111.     for i, v in pairs(FriendsTextList["ScrollingObject"].ScrollingFrame:GetChildren()) do
  112.         pcall(function()
  113.             if v:IsA("Frame") then
  114.                 v.FriendCircle.BackgroundColor3 = Color3.fromHSV(GuiLibrary["FriendsObject"]["Color"], 1, 1)
  115.             end
  116.         end)
  117.     end
  118. end)
  119. Friends.CreateToggle("Use Friends", function() end, function() end, false, "")  
  120. Friends.CreateToggle("Use Roblox Friends", function() end, function() end, false, "")
  121. Friends.CreateToggle("Use color", function() end, function() end, false, "")
  122. GuiLibrary["FriendsObject"]["MiddleClickFunc"] = function(user)
  123.     if table.find(GuiLibrary["FriendsObject"]["Friends"], user) == nil then
  124.         table.insert(GuiLibrary["FriendsObject"]["Friends"], user)
  125.         FriendsTextList["RefreshValues"](GuiLibrary["FriendsObject"]["Friends"])
  126.         GuiLibrary["SaveFriends"]()
  127.     else
  128.         table.remove(GuiLibrary["FriendsObject"]["Friends"], table.find(GuiLibrary["FriendsObject"]["Friends"], user))
  129.         FriendsTextList["RefreshValues"](GuiLibrary["FriendsObject"]["Friends"])
  130.         GuiLibrary["SaveFriends"]()
  131.     end
  132. end
  133. GUI.CreateDivider()
  134. ---GUI.CreateCustomButton("Favorites", "vape/assets/FavoritesListIcon.png", UDim2.new(0, 17, 0, 14), function() end, function() end)
  135. --GUI.CreateCustomButton("Text GUIVertical", "vape/assets/TextGUIIcon3.png", UDim2.new(1, -56, 0, 15), function() end, function() end)
  136. local TextGui = GuiLibrary.CreateCustomWindow("Text GUI", "vape/assets/TextGUIIcon1.png", 21, UDim2.new(0, 177, 0, 6), false)
  137. --GUI.CreateCustomButton("Text GUI", "vape/assets/TextGUIIcon2.png", UDim2.new(1, -23, 0, 15), function() TextGui.SetVisible(true) end, function() TextGui.SetVisible(false) end, "OptionsButton")
  138. GUI.CreateCustomToggle("Text GUI", "vape/assets/TextGUIIcon3.png", function() TextGui.SetVisible(true) end, function() TextGui.SetVisible(false) end, false, "OptionsButton", 2)
  139.  
  140. local rainbowval = ColorSequence.new({ColorSequenceKeypoint.new(0, Color3.fromHSV(0, 0, 1)), ColorSequenceKeypoint.new(1, Color3.fromHSV(0, 0, 1))})
  141. local rainbowval2 = ColorSequence.new({ColorSequenceKeypoint.new(0, Color3.fromHSV(0, 0, 0.42)), ColorSequenceKeypoint.new(1, Color3.fromHSV(0, 0, 0.42))})
  142. local rainbowval3 = ColorSequence.new({ColorSequenceKeypoint.new(0, Color3.fromHSV(0, 0, 1)), ColorSequenceKeypoint.new(1, Color3.fromHSV(0, 0, 1))})
  143. local guicolorslider = {["RainbowValue"] = false}
  144.  
  145. local onething = Instance.new("ImageLabel")
  146. onething.Parent = TextGui.GetCustomChildren()
  147. onething.Name = "Logo"
  148. onething.Size = UDim2.new(0, 100, 0, 27)
  149. onething.Position = UDim2.new(1, -140, 0, 3)
  150. onething.BackgroundColor3 = Color3.new(0, 0, 0)
  151. onething.BorderSizePixel = 0
  152. onething.BackgroundTransparency = 1
  153. onething.Visible = false
  154. onething.Image = getcustomassetfunc("vape/assets/VapeLogo3.png")
  155. local onething2 = Instance.new("ImageLabel")
  156. onething2.Parent = onething
  157. onething2.Size = UDim2.new(0, 40, 0, 27)
  158. onething2.Name = "Logo2"
  159. onething2.Position = UDim2.new(1, 0, 0, 0)
  160. onething2.BorderSizePixel = 0
  161. onething2.BackgroundColor3 = Color3.new(0, 0, 0)
  162. onething2.BackgroundTransparency = 1
  163. onething2.Image = getcustomassetfunc("vape/assets/VapeLogo4.png")
  164. local onething3 = onething:Clone()
  165. onething3.ImageColor3 = Color3.new(0, 0, 0)
  166. onething3.ImageTransparency = 0.5
  167. onething3.ZIndex = 0
  168. onething3.Position = UDim2.new(0, 1, 0, 1)
  169. onething3.Visible = false
  170. onething3.Parent = onething
  171. onething3.Logo2.ImageColor3 = Color3.new(0, 0, 0)
  172. onething3.Logo2.ZIndex = 0
  173. onething3.Logo2.ImageTransparency = 0.5
  174. local onetext = Instance.new("TextLabel")
  175. onetext.Parent = TextGui.GetCustomChildren()
  176. onetext.Size = UDim2.new(1, 0, 1, 0)
  177. onetext.Position = UDim2.new(1, -154, 0, 35)
  178. onetext.TextColor3 = Color3.new(1, 1, 1)
  179. onetext.RichText = true
  180. onetext.BackgroundTransparency = 1
  181. onetext.TextXAlignment = Enum.TextXAlignment.Left
  182. onetext.TextYAlignment = Enum.TextYAlignment.Top
  183. onetext.BorderSizePixel = 0
  184. onetext.BackgroundColor3 = Color3.new(0, 0, 0)
  185. onetext.Font = Enum.Font.Gotham
  186. onetext.Text = ""
  187. onetext.TextSize = 20
  188. local onetext2 = Instance.new("TextLabel")
  189. onetext2.Name = "ExtraText"
  190. onetext2.Parent = onetext
  191. onetext2.Size = UDim2.new(1, 0, 1, 0)
  192. onetext2.Position = UDim2.new(0, 1, 0, 1)
  193. onetext2.BorderSizePixel = 0
  194. onetext2.Visible = false
  195. onetext2.ZIndex = 0
  196. onetext2.Text = ""
  197. onetext2.BackgroundTransparency = 1
  198. onetext2.TextTransparency = 0.5
  199. onetext2.TextXAlignment = Enum.TextXAlignment.Left
  200. onetext2.TextYAlignment = Enum.TextYAlignment.Top
  201. onetext2.TextColor3 = Color3.new(0, 0, 0)
  202. onetext2.Font = Enum.Font.Gotham
  203. onetext2.TextSize = 20
  204. local onetext3 = onetext:Clone()
  205. onetext3.Name = "ExtraText"
  206. onetext3.Position = UDim2.new(0, 0, 0, 0)
  207. onetext3.TextColor3 = Color3.new(0.65, 0.65, 0.65)
  208. onetext3.Parent = onetext
  209. local onetext4 = onetext3.ExtraText
  210. onetext4.TextColor3 = Color3.new(0, 0, 0)
  211. onetext4.TextTransparency = 0.5
  212. onetext3:GetPropertyChangedSignal("Text"):connect(function() onetext4.Text = onetext3.Text end)
  213. TextGui.GetCustomChildren().Parent:GetPropertyChangedSignal("Position"):connect(function()
  214.     if (TextGui.GetCustomChildren().Parent.Position.X.Offset + TextGui.GetCustomChildren().Parent.Size.X.Offset / 2) >= (cam.ViewportSize.X / 2) then
  215.         onetext.TextXAlignment = Enum.TextXAlignment.Right
  216.         onetext2.TextXAlignment = Enum.TextXAlignment.Right
  217.         onetext3.TextXAlignment = Enum.TextXAlignment.Right
  218.         onetext4.TextXAlignment = Enum.TextXAlignment.Right
  219.         onetext2.Position = UDim2.new(0, 1, 0, 1)
  220.         onething.Position = UDim2.new(1, -142, 0, 8)
  221.         onetext.Position = UDim2.new(1, -154, 0, (onething.Visible and 35 or 5))
  222.     else
  223.         onetext.TextXAlignment = Enum.TextXAlignment.Left
  224.         onetext2.TextXAlignment = Enum.TextXAlignment.Left
  225.         onetext2.Position = UDim2.new(0, 4, 0, 1)
  226.         onetext3.TextXAlignment = Enum.TextXAlignment.Left
  227.         onetext4.TextXAlignment = Enum.TextXAlignment.Left
  228.         onething.Position = UDim2.new(0, 2, 0, 8)
  229.         onetext.Position = UDim2.new(0, 6, 0, (onething.Visible and 35 or 5))
  230.     end
  231. end)
  232.  
  233. onething.Visible = true onetext.Position = UDim2.new(0, 0, 0, 35)
  234.  
  235. local sortingmethod = "Alphabetical"
  236. local textwithoutthing = ""
  237. local function getSpaces(str)
  238.         local strSize = game:GetService("TextService"):GetTextSize(str, 20, Enum.Font.SourceSans, Vector2.new(10000, 10000))
  239.         return math.ceil(strSize.X / 3)
  240. end
  241. local function UpdateHud()
  242.     local text = ""
  243.     local text2 = ""
  244.     local tableofmodules = {}
  245.     local first = true
  246.    
  247.     for i,v in pairs(GuiLibrary["ObjectsThatCanBeSaved"]) do
  248.         if v["Type"] == "OptionsButton" and v["Api"]["Name"] ~= "Text GUI" then
  249.             if v["Api"]["Enabled"] then
  250.                 table.insert(tableofmodules, {["Text"] = v["Api"]["Name"], ["ExtraText"] = v["Api"]["GetExtraText"]})
  251.             end
  252.         end
  253.     end
  254.     if sortingmethod == "Alphabetical" then
  255.         table.sort(tableofmodules, function(a, b) return a["Text"]:lower() < b["Text"]:lower() end)
  256.     end
  257.     for i2,v2 in pairs(tableofmodules) do
  258.         if first then
  259.             text = v2["Text"]..string.rep(" ", getSpaces(v2["ExtraText"]()))
  260.             text2 = string.rep(" ", getSpaces(v2["Text"]))..v2["ExtraText"]()
  261.             first = false
  262.         else
  263.             text = text..'\n'..v2["Text"]..string.rep(" ", getSpaces(v2["ExtraText"]()))
  264.             text2 = text2..'\n'..string.rep(" ", getSpaces(v2["Text"]))..v2["ExtraText"]()
  265.         end
  266.     end
  267.     textwithoutthing = text
  268.     onetext.Text = text
  269.     onetext2.Text = text
  270.     onetext3.Text = text2
  271.     local newsize = game:GetService("TextService"):GetTextSize(text, onetext.TextSize, onetext.Font, Vector2.new(1000000, 1000000))
  272.     onetext.Size = UDim2.new(0, 154, 0, newsize.Y)
  273.     onetext3.Size = UDim2.new(0, 154, 0, newsize.Y)
  274.     if TextGui.GetCustomChildren().Parent then
  275.         if (TextGui.GetCustomChildren().Parent.Position.X.Offset + TextGui.GetCustomChildren().Parent.Size.X.Offset / 2) >= (cam.ViewportSize.X / 2) then
  276.             onetext.TextXAlignment = Enum.TextXAlignment.Right
  277.             onetext2.Position = UDim2.new(0, 1, 0, 1)
  278.             onetext2.TextXAlignment = Enum.TextXAlignment.Right
  279.             onetext3.TextXAlignment = Enum.TextXAlignment.Right
  280.             onetext4.TextXAlignment = Enum.TextXAlignment.Right
  281.             onething.Position = UDim2.new(1, -142, 0, 8)
  282.             onetext.Position = UDim2.new(1, -154, 0, (onething.Visible and 35 or 5))
  283.         else
  284.             onetext.TextXAlignment = Enum.TextXAlignment.Left
  285.             onetext2.TextXAlignment = Enum.TextXAlignment.Left
  286.             onetext2.Position = UDim2.new(0, 4, 0, 1)
  287.             onetext3.TextXAlignment = Enum.TextXAlignment.Left
  288.             onetext4.TextXAlignment = Enum.TextXAlignment.Left
  289.             onething.Position = UDim2.new(0, 2, 0, 8)
  290.             onetext.Position = UDim2.new(0, 6, 0, (onething.Visible and 35 or 5))
  291.         end
  292.     end
  293. end
  294.  
  295. GuiLibrary["UpdateHudEvent"].Event:connect(UpdateHud)
  296.  
  297. TextGui.CreateToggle("Watermark", function()
  298.     onething.Visible = true
  299.     if (TextGui.GetCustomChildren().Parent.Position.X.Offset + TextGui.GetCustomChildren().Parent.Size.X.Offset / 2) >= (cam.ViewportSize.X / 2) then
  300.         onetext.TextXAlignment = Enum.TextXAlignment.Right
  301.         onetext2.TextXAlignment = Enum.TextXAlignment.Right
  302.         onetext2.Position = UDim2.new(0, 1, 0, 1)
  303.         onetext3.TextXAlignment = Enum.TextXAlignment.Right
  304.         onetext4.TextXAlignment = Enum.TextXAlignment.Right
  305.         onething.Position = UDim2.new(1, -142, 0, 8)
  306.         onetext.Position = UDim2.new(1, -154, 0, (onething.Visible and 35 or 5))
  307.     else
  308.         onetext.TextXAlignment = Enum.TextXAlignment.Left
  309.         onetext2.TextXAlignment = Enum.TextXAlignment.Left
  310.         onetext2.Position = UDim2.new(0, 4, 0, 1)
  311.         onetext3.TextXAlignment = Enum.TextXAlignment.Left
  312.         onetext4.TextXAlignment = Enum.TextXAlignment.Left
  313.         onething.Position = UDim2.new(0, 2, 0, 8)
  314.         onetext.Position = UDim2.new(0, 6, 0, (onething.Visible and 35 or 5))
  315.     end
  316. end, function()
  317.     onething.Visible = false
  318.     if (TextGui.GetCustomChildren().Parent.Position.X.Offset + TextGui.GetCustomChildren().Parent.Size.X.Offset / 2) >= (cam.ViewportSize.X / 2) then
  319.         onetext.TextXAlignment = Enum.TextXAlignment.Right
  320.         onetext2.TextXAlignment = Enum.TextXAlignment.Right
  321.         onetext2.Position = UDim2.new(0, 1, 0, 1)
  322.         onetext3.TextXAlignment = Enum.TextXAlignment.Right
  323.         onetext4.TextXAlignment = Enum.TextXAlignment.Right
  324.         onething.Position = UDim2.new(1, -142, 0, 8)
  325.         onetext.Position = UDim2.new(1, -154, 0, (onething.Visible and 35 or 5))
  326.     else
  327.         onetext.TextXAlignment = Enum.TextXAlignment.Left
  328.         onetext2.TextXAlignment = Enum.TextXAlignment.Left
  329.         onetext2.Position = UDim2.new(0, 4, 0, 1)
  330.         onetext3.TextXAlignment = Enum.TextXAlignment.Left
  331.         onetext4.TextXAlignment = Enum.TextXAlignment.Left
  332.         onething.Position = UDim2.new(0, 2, 0, 8)
  333.         onetext.Position = UDim2.new(0, 6, 0, (onething.Visible and 35 or 5))
  334.     end
  335. end)
  336. TextGui.CreateToggle("Shadow", function() onetext2.Visible = true onetext4.Visible = true onething3.Visible = true end, function() onetext2.Visible = false onetext4.Visible = false onething3.Visible = false end)
  337. TextGui.CreateToggle("Render background", function()
  338.     onething.BackgroundTransparency = 0.5
  339.     onething2.BackgroundTransparency = 0.5
  340.     onetext.BackgroundTransparency = 0.5
  341. end, function()
  342.     onething.BackgroundTransparency = 1
  343.     onething2.BackgroundTransparency = 1
  344.     onetext.BackgroundTransparency = 1
  345. end)
  346.  
  347. local TargetInfo = GuiLibrary.CreateCustomWindow("Target Info", "vape/assets/TargetInfoIcon1.png", 16, UDim2.new(0, 177, 0, 6), false)
  348. local targetinfobkg1 = Instance.new("Frame")
  349. targetinfobkg1.BackgroundColor3 = Color3.fromRGB(26, 25, 26)
  350. targetinfobkg1.BorderSizePixel = 0
  351. targetinfobkg1.Size = UDim2.new(0, 220, 0, 72)
  352. targetinfobkg1.Position = UDim2.new(0, 0, 0, 0)
  353. targetinfobkg1.Parent = TargetInfo.GetCustomChildren()
  354. local targetinfobkg2 = targetinfobkg1:Clone()
  355. targetinfobkg2.ZIndex = 0
  356. targetinfobkg2.Position = UDim2.new(0, 0, 0, -6)
  357. targetinfobkg2.Size = UDim2.new(0, 220, 0, 86)
  358. targetinfobkg2.Parent = targetinfobkg1
  359. local targetinfobkg3 = Instance.new("Frame")
  360. targetinfobkg3.BackgroundColor3 = Color3.fromRGB(31, 30, 31)
  361. targetinfobkg3.Size = UDim2.new(0, 220, 0, 80)
  362. targetinfobkg3.Position = UDim2.new(0, 0, 0, -5)
  363. targetinfobkg3.Name = "MainInfo"
  364. targetinfobkg3.Parent = targetinfobkg1
  365. local targetname = Instance.new("TextLabel")
  366. targetname.TextSize = 17
  367. targetname.Font = Enum.Font.SourceSans
  368. targetname.TextColor3 = Color3.new(1, 1, 1)
  369. targetname.Position = UDim2.new(0, 72, 0, 6)
  370. targetname.BackgroundTransparency = 1
  371. targetname.Size = UDim2.new(0, 80, 0, 14)
  372. targetname.TextScaled = true
  373. targetname.Text = "Target name"
  374. targetname.ZIndex = 2
  375. targetname.TextXAlignment = Enum.TextXAlignment.Left
  376. targetname.TextYAlignment = Enum.TextYAlignment.Top
  377. targetname.Parent = targetinfobkg3
  378. local targethealth = Instance.new("TextLabel")
  379. targethealth.TextColor3 = Color3.fromRGB(95, 94, 95)
  380. targethealth.Font = Enum.Font.SourceSans
  381. targethealth.Size = UDim2.new(0, 0, 0, 0)
  382. targethealth.TextSize = 17
  383. targethealth.Position = UDim2.new(0, 210, 0, 6)
  384. targethealth.BackgroundTransparency = 1
  385. targethealth.Text = '20'..' hp'
  386. targethealth.TextScaled = false
  387. targethealth.ZIndex = 2
  388. targethealth.TextXAlignment = Enum.TextXAlignment.Right
  389. targethealth.TextYAlignment = Enum.TextYAlignment.Top
  390. targethealth.Parent = targetinfobkg3
  391. local targethealthbkg = Instance.new("Frame")
  392. targethealthbkg.BackgroundColor3 = Color3.fromRGB(43, 42, 43)
  393. targethealthbkg.Size = UDim2.new(0, 138, 0, 4)
  394. targethealthbkg.Position = UDim2.new(0, 72, 0, 29)
  395. targethealthbkg.Parent = targetinfobkg3
  396. local targethealthgreen = Instance.new("Frame")
  397. targethealthgreen.BackgroundColor3 = Color3.fromRGB(40, 137, 109)
  398. targethealthgreen.Size = UDim2.new(1, 0, 0, 4)
  399. targethealthgreen.Parent = targethealthbkg
  400. local targetimage = Instance.new("ImageLabel")
  401. targetimage.Size = UDim2.new(0, 61, 0, 61)
  402. targetimage.BackgroundTransparency = 1
  403. targetimage.Image = 'rbxthumb://type=AvatarHeadShot&id='..game:GetService("Players").LocalPlayer.UserId..'&w=420&h=420'
  404. targetimage.Position = UDim2.new(0, 5, 0, 10)
  405. targetimage.Parent = targetinfobkg3
  406. local round1 = Instance.new("UICorner")
  407. round1.CornerRadius = UDim.new(0, 4)
  408. round1.Parent = targetinfobkg2
  409. local round2 = Instance.new("UICorner")
  410. round2.CornerRadius = UDim.new(0, 4)
  411. round2.Parent = targetinfobkg3
  412. local round3 = Instance.new("UICorner")
  413. round3.CornerRadius = UDim.new(0, 4)
  414. round3.Parent = targethealthbkg
  415. local round4 = Instance.new("UICorner")
  416. round4.CornerRadius = UDim.new(0, 4)
  417. round4.Parent = targethealthgreen
  418. local round5 = Instance.new("UICorner")
  419. round5.CornerRadius = UDim.new(0, 4)
  420. round5.Parent = targetimage
  421. TargetInfo.GetCustomChildren().Parent:GetPropertyChangedSignal("Size"):connect(function()
  422.     if TargetInfo.GetCustomChildren().Parent.Size ~= UDim2.new(0, 220, 0, 0) then
  423.         targetinfobkg3.Position = UDim2.new(0, 0, 0, -5)
  424.         targetinfobkg2.BackgroundTransparency = 0
  425.         targetinfobkg1.BackgroundTransparency = 0
  426.     else
  427.         targetinfobkg3.Position = UDim2.new(0, 0, 0, 0)
  428.         targetinfobkg2.BackgroundTransparency = 1
  429.         targetinfobkg1.BackgroundTransparency = 1
  430.     end
  431. end)
  432. shared.VapeTargetInfo = {
  433.     ["UpdateInfo"] = function(tab, targetsize)
  434.         targetinfobkg3.Visible = (targetsize > 0) or (TargetInfo.GetCustomChildren().Parent.Size ~= UDim2.new(0, 220, 0, 0))
  435.         for i,v in pairs(tab) do
  436.             targetimage.Image = 'rbxthumb://type=AvatarHeadShot&id='..v["UserId"]..'&w=420&h=420'
  437.             targethealthgreen:TweenSize(UDim2.new(v["Health"] / v["MaxHealth"], 0, 0, 4), Enum.EasingDirection.InOut, Enum.EasingStyle.Quad, 0.05, true)
  438.             targethealth.Text = math.floor(v["Health"]).." hp"
  439.             targetname.Text = i
  440.         end
  441.     end,
  442.     ["Object"] = TargetInfo
  443. }
  444. GUI.CreateCustomToggle("Target Info", "vape/assets/TargetInfoIcon2.png", function() TargetInfo.SetVisible(true) end, function() TargetInfo.SetVisible(false) end, false, "OptionsButton", 1)
  445.  
  446. GUI.CreateDivider2("MODULE SETTINGS")
  447. GUI.CreateToggle("Players", function() end, function() end, true, "")
  448. GUI.CreateToggle("NPCs", function() end, function() end, false, "")
  449. GUI.CreateToggle("Ignore naked", function() end, function() end, false, "")
  450. GUI.CreateToggle("Teams by server", function() end, function() end, false, "")
  451. GUI.CreateToggle("Teams by color", function() end, function() end, true, "")
  452. GUI.CreateToggle("MiddleClick friends", function() GuiLibrary["FriendsObject"]["MiddleClickFriends"] = true end, function() GuiLibrary["FriendsObject"]["MiddleClickFriends"] = false end, false, "")
  453. local blatantmode = GUI.CreateToggle("Blatant mode", function()
  454.  
  455. end, function()
  456.  
  457. end, false, "")
  458. GUI.CreateDivider2("GENERAL SETTINGS")
  459. guicolorslider = GUI.CreateColorSlider("GUI Theme", function(val) GuiLibrary["Settings"]["GUIObject"]["Color"] = val GuiLibrary["UpdateUI"]() end)
  460.  
  461. GuiLibrary["UpdateUI"] = function()
  462.     pcall(function()
  463.         GuiLibrary["ObjectsThatCanBeSaved"]["GUIWindow"]["Object"].Children.Extras.MainButton.ImageColor3 = (GUI["GetVisibleIcons"]() > 0 and Color3.fromHSV(GuiLibrary["Settings"]["GUIObject"]["Color"], 1, 1) or Color3.fromRGB(199, 199, 199))
  464.         GuiLibrary["ObjectsThatCanBeSaved"]["GUIWindow"]["Object"].Logo1.Logo2.ImageColor3 = Color3.fromHSV(GuiLibrary["Settings"]["GUIObject"]["Color"], 1, 1)
  465.         onething.ImageColor3 = Color3.fromHSV(GuiLibrary["Settings"]["GUIObject"]["Color"], 1, 1)
  466.         onetext.TextColor3 = Color3.fromHSV(GuiLibrary["Settings"]["GUIObject"]["Color"], 1, 1)
  467.         local newtext = ""
  468.         local newfirst = false
  469.         for i2,v2 in pairs(textwithoutthing:split("\n")) do
  470.             local rainbowsub = 2
  471.             local rainbowcolor = GuiLibrary["Settings"]["GUIObject"]["Color"] + (-0.015 * i2)
  472.             if rainbowcolor < 0 then rainbowsub = 3 rainbowcolor = rainbowcolor * 0.25 end
  473.             local str = tostring(rainbowcolor)
  474.             local newcol = tonumber("0"..string.sub(str, rainbowsub, string.len(str)))
  475.             local newcolor = Color3.fromHSV(newcol, 1, 1)
  476.             newtext = newtext..(newfirst and "\n" or " ")..'<font color="rgb('..tostring(math.floor(newcolor.R * 255))..","..tostring(math.floor(newcolor.G * 255))..","..tostring(math.floor(newcolor.B * 255))..')">'..v2..'</font>'
  477.             newfirst = true
  478.         end
  479.         onetext.Text = newtext
  480.         for i,v in pairs(GuiLibrary["ObjectsThatCanBeSaved"]) do
  481.             if v["Type"] == "Button" and v["Api"]["Enabled"] then
  482.                 v["Object"].ButtonText.TextColor3 = Color3.fromHSV(GuiLibrary["Settings"]["GUIObject"]["Color"], 1, 1)
  483.                 if v["Object"]:FindFirstChild("ButtonIcon") then
  484.                     v["Object"].ButtonIcon.ImageColor3 = Color3.fromHSV(GuiLibrary["Settings"]["GUIObject"]["Color"], 1, 1)
  485.                 end
  486.             end
  487.             if v["Type"] == "OptionsButton" then
  488.                 if v["Api"]["Enabled"] then
  489.                     v["Object"].BackgroundColor3 = Color3.fromHSV(GuiLibrary["Settings"]["GUIObject"]["Color"], 1, 1)
  490.                 end
  491.             end
  492.             if v["Type"] == "ExtrasButton" then
  493.                 if v["Api"]["Enabled"] then
  494.                     v["Object"].ImageColor3 = Color3.fromHSV(GuiLibrary["Settings"]["GUIObject"]["Color"], 1, 1)
  495.                 end
  496.             end
  497.             if v["Type"] == "Toggle" and v["Api"]["Enabled"] then
  498.                     v["Object"].ToggleFrame1.BackgroundColor3 = Color3.fromHSV(GuiLibrary["Settings"]["GUIObject"]["Color"], 1, 1)
  499.             end
  500.             if v["Type"] == "Slider" then
  501.                 v["Object"].Slider.FillSlider.BackgroundColor3 = Color3.fromHSV(GuiLibrary["Settings"]["GUIObject"]["Color"], 1, 1)
  502.                 v["Object"].Slider.FillSlider.ButtonSlider.ImageColor3 = Color3.fromHSV(GuiLibrary["Settings"]["GUIObject"]["Color"], 1, 1)
  503.             end
  504.             if v["Type"] == "TwoSlider" then
  505.                 v["Object"].Slider.FillSlider.BackgroundColor3 = Color3.fromHSV(GuiLibrary["Settings"]["GUIObject"]["Color"], 1, 1)
  506.                 v["Object"].Slider.ButtonSlider.ImageColor3 = Color3.fromHSV(GuiLibrary["Settings"]["GUIObject"]["Color"], 1, 1)
  507.                 v["Object"].Slider.ButtonSlider2.ImageColor3 = Color3.fromHSV(GuiLibrary["Settings"]["GUIObject"]["Color"], 1, 1)
  508.             end
  509.         end
  510.     end)
  511. end
  512.  
  513. GUI.CreateToggle("Auto-load module states", function() end, function() end, false, "VapeOptions")
  514. GUI.CreateToggle("Blur Background", function() GuiLibrary["MainBlur"].Size = 25 end, function() GuiLibrary["MainBlur"].Size = 0 end, true, "VapeOptions")
  515. local rescale = GUI.CreateToggle("Rescale", function()
  516.     GuiLibrary["MainRescale"].Scale = cam.ViewportSize.X / 1920
  517. end, function()
  518.     GuiLibrary["MainRescale"].Scale = 1
  519. end, true, "VapeOptions")
  520. cam:GetPropertyChangedSignal("ViewportSize"):connect(function()
  521.     if rescale["Enabled"] then
  522.         GuiLibrary["MainRescale"].Scale = cam.ViewportSize.X / 1920
  523.     end
  524. end)
  525. GUI.CreateToggle("Enable Multi-Keybinding", function() end, function() end, false, "VapeOptions")
  526. local welcomemsg = GUI.CreateToggle("GUI bind indicator", function() end, function() end, true, "VapeOptions")
  527. GUI.CreateToggle("Smooth font", function()
  528.     for i,v in pairs(GuiLibrary["MainGui"]:GetDescendants()) do
  529.         if (v:IsA("TextLabel") or v:IsA("TextButton") or v:IsA("TextBox")) then
  530.             v.Font = Enum.Font.SourceSans
  531.             if v.Name == "DividerLabel" then
  532.                 local string1 = v.Text:sub(2, v.Text:len())
  533.                 v.Text = "  "..string1
  534.             end
  535.         end
  536.     end
  537.     for i2,v2 in pairs(GuiLibrary["ObjectsThatCanBeSaved"]) do
  538.         if v2["Type"] == "Toggle" then
  539.             v2["Object"].Text = "   "..v2["Object"].Name
  540.             v2["Object"].TextSize = 18
  541.         end
  542.     end
  543. end, function()
  544.     for i,v in pairs(GuiLibrary["MainGui"]:GetDescendants()) do
  545.         if (v:IsA("TextLabel") or v:IsA("TextButton") or v:IsA("TextBox")) then
  546.             v.Font = Enum.Font.Sarpanch
  547.             if v.Name == "DividerLabel" then
  548.                 local string1 = v.Text:sub(3, v.Text:len())
  549.                 v.Text = " "..string1
  550.             end
  551.         end
  552.     end
  553.     for i2,v2 in pairs(GuiLibrary["ObjectsThatCanBeSaved"]) do
  554.         if v2["Type"] == "Toggle" then
  555.             v2["Object"].Text = "   "..v2["Object"].Name
  556.             v2["Object"].TextSize = 16
  557.         end
  558.     end
  559. end, true, "VapeOptions")
  560. GUI.CreateToggle("Show Tooltips", function() GuiLibrary["ToggleTooltips"] = true end, function() GuiLibrary["ToggleTooltips"] = false end, true, "VapeOptions")
  561. GUI.CreateToggle("Discord integration", function() end, function() end, false, "VapeOptions")
  562. GUI.CreateToggle("Notifications", function() GuiLibrary["ToggleNotifications"] = true end, function() GuiLibrary["ToggleNotifications"] = false end, true, "VapeOptions")
  563.  
  564. local teleportfunc = game:GetService("Players").LocalPlayer.OnTeleport:Connect(function(State)
  565.     if State == Enum.TeleportState.Started then
  566.         queueteleport('shared.VapeSwitchServers = true if shared.VapeDeveloper then loadstring(readfile("vape/NewMainScript.lua"))() else loadstring(game:HttpGet("https://raw.githubusercontent.com/7GrandDadPGN/VapeV4ForRoblox/main/NewMainScript.lua", true))() end')
  567.     end
  568. end)
  569.  
  570. local SelfDestructButton = {["ToggleButton"] = function() end}
  571. SelfDestructButton = Other.CreateOptionsButton("SelfDestruct", function()
  572.     selfdestruct = true
  573.     SelfDestructButton["ToggleButton"](false)
  574.     GuiLibrary["SaveSettings"]()
  575.     GuiLibrary["SaveFriends"]()
  576.     for i,v in pairs(GuiLibrary["ObjectsThatCanBeSaved"]) do
  577.         if (v["Type"] == "Button" or v["Type"] == "OptionsButton") and v["Api"]["Enabled"] then
  578.             v["Api"]["ToggleButton"](false)
  579.         end
  580.     end
  581.     shared.VapeExecuted = nil
  582.     shared.VapeSwitchServers = nil
  583.     shared.GuiLibrary = nil
  584.     GuiLibrary["KeyInputHandler"]:Disconnect()
  585.     GuiLibrary["KeyInputHandler2"]:Disconnect()
  586.     teleportfunc:Disconnect()
  587.     GuiLibrary["MainGui"]:Remove()
  588.     GuiLibrary["MainBlur"]:Remove()
  589. end, function() end, false)
  590.  
  591. loadstring(GetURL("AnyGame.vape"))()
  592. if pcall(function() readfile("vape/CustomModules/"..game.PlaceId..".vape") end) then
  593.     loadstring(readfile("vape/CustomModules/"..game.PlaceId..".vape"))()
  594. else
  595.     local publicrepo = checkpublicrepo(game.PlaceId)
  596.     if publicrepo then
  597.         loadstring(publicrepo)()
  598.     end
  599. end
  600.  
  601. GuiLibrary["LoadSettings"]()
  602. GuiLibrary["LoadFriends"]()
  603. FriendsTextList["RefreshValues"](GuiLibrary["FriendsObject"]["Friends"])
  604. GuiLibrary["UpdateUI"]()
  605. if blatantmode["Enabled"] then
  606.     pcall(function()
  607.         local frame = GuiLibrary["CreateNotification"]("Blatant Enabled", "Vape is now in Blatant Mode.", 4, "⚠️")
  608.         frame.Frame.BackgroundColor3 = Color3.fromRGB(218, 134, 75)
  609.         frame.Frame.Frame.BackgroundColor3 = Color3.fromRGB(218, 134, 75)
  610.     end)
  611. end
  612. if not shared.VapeSwitchServers then
  613.     GuiLibrary["LoadedAnimation"](welcomemsg["Enabled"])
  614. else
  615.     shared.VapeSwitchServers = nil
  616. end
  617.  
  618. spawn(function()
  619.     while wait(10) do
  620.         if not selfdestruct then
  621.             GuiLibrary["SaveSettings"]()
  622.         end
  623.     end
  624. 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!