Advertisement
KevinMitnickHKR

Granny: Multiplayer - Free - πŸ§“πŸΏπŸ

Aug 17th, 2024 (edited)
7,168
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 37.08 KB | None | 0 0
  1. local placeId = game.PlaceId
  2. local chapter1PlaceId = 4480809144
  3. local chapter2PlaceId = 10384852727
  4. local chapter3PlaceId = 10384858885
  5.  
  6. if placeId == chapter1PlaceId then
  7. print("Chapter 1")
  8. wait(1)
  9. game:GetService("StarterGui"):SetCore("SendNotification", {
  10. Title = "Chapter 1",
  11. Text = "Loading...",
  12. Duration = 3
  13. })
  14. wait(2)
  15.  
  16. local DrRayLibrary = loadstring(game:HttpGet("https://raw.githubusercontent.com/AZYsGithub/DrRay-UI-Library/main/DrRay.lua"))()
  17. local window = DrRayLibrary:Load("Granny: Multiplayer - Free - πŸ§“πŸΏπŸ", "Default")
  18.  
  19. local HighlightLib = {}
  20.  
  21. local DepthMode = "AlwaysOnTop"
  22. local FillTransparency = 0.5
  23. local OutlineTransparency = 0.5
  24. local CoreGui = game:FindService("CoreGui")
  25. local Workspace = game.Workspace
  26. local Storage = Instance.new("Folder")
  27. Storage.Parent = CoreGui
  28. Storage.Name = "Highlight_Storage"
  29.  
  30. HighlightLib.Models = {}
  31. HighlightLib.Parts = {}
  32.  
  33. local function addNameTag(instance, name, color)
  34. local nameTag = Instance.new("BillboardGui")
  35. nameTag.Adornee = instance
  36. nameTag.Size = UDim2.new(0, 75, 0, 30)
  37. nameTag.StudsOffset = Vector3.new(0, 3, 0)
  38. nameTag.AlwaysOnTop = true
  39.  
  40. local textLabel = Instance.new("TextLabel")
  41. textLabel.Size = UDim2.new(1, 0, 1, 0)
  42. textLabel.BackgroundTransparency = 1
  43. textLabel.TextColor3 = color
  44. textLabel.TextStrokeTransparency = 0
  45. textLabel.Text = name
  46. textLabel.TextScaled = true
  47. textLabel.TextStrokeColor3 = Color3.new(0, 0, 0)
  48. textLabel.TextSize = 12
  49. textLabel.Parent = nameTag
  50.  
  51. nameTag.Parent = instance
  52. end
  53.  
  54. local function HighlightPart(name, fillColor, outlineColor)
  55. for _, object in ipairs(Workspace:GetDescendants()) do
  56. if object:IsA("BasePart") then
  57. if object.Name:lower() == name:lower() then
  58. local Highlight = Instance.new("Highlight")
  59. Highlight.Parent = Storage
  60. Highlight.Adornee = object
  61. Highlight.FillColor = fillColor
  62. Highlight.DepthMode = DepthMode
  63. Highlight.FillTransparency = FillTransparency
  64. Highlight.OutlineColor = outlineColor
  65. Highlight.OutlineTransparency = OutlineTransparency
  66. addNameTag(object, name, outlineColor)
  67. table.insert(HighlightLib.Parts, {object, Highlight})
  68. end
  69. end
  70. end
  71. end
  72.  
  73. local function HighlightModel(name, fillColor, outlineColor)
  74. for _, model in ipairs(Workspace:GetDescendants()) do
  75. if model:IsA("Model") and model.Name:lower() == name:lower() then
  76. local highlight = Instance.new("Highlight")
  77. highlight.Name = model.Name
  78. highlight.FillColor = fillColor
  79. highlight.DepthMode = DepthMode
  80. highlight.FillTransparency = FillTransparency
  81. highlight.OutlineColor = outlineColor
  82. highlight.OutlineTransparency = OutlineTransparency
  83. highlight.Parent = Storage
  84. highlight.Adornee = model
  85. table.insert(HighlightLib.Models, {model, highlight})
  86. addNameTag(model, model.Name, outlineColor)
  87. return
  88. end
  89. end
  90. end
  91.  
  92. local function UpdateHighlights()
  93. for _, highlightedPart in pairs(HighlightLib.Parts) do
  94. local part, highlight = highlightedPart[1], highlightedPart[2]
  95. if part and part.Parent then
  96. highlight.Adornee = part
  97. else
  98. highlight:Destroy()
  99. table.remove(HighlightLib.Parts, _)
  100. end
  101. end
  102.  
  103. for _, highlightedModel in pairs(HighlightLib.Models) do
  104. local model, highlight = highlightedModel[1], highlightedModel[2]
  105. if model and model.Parent then
  106. highlight.Adornee = model
  107. else
  108. highlight:Destroy()
  109. table.remove(HighlightLib.Models, _)
  110. end
  111. end
  112. end
  113.  
  114. Workspace.DescendantAdded:Connect(function(instance)
  115. if instance:IsA("BasePart") or instance:IsA("Model") then
  116. UpdateHighlights()
  117. end
  118. end)
  119.  
  120. HighlightLib.HighlightModel = function(name, fillColor, outlineColor)
  121. HighlightModel(name, fillColor, outlineColor)
  122. end
  123.  
  124. HighlightLib.HighlightPart = function(name, fillColor, outlineColor)
  125. HighlightPart(name, fillColor, outlineColor)
  126. end
  127.  
  128. local tab = DrRayLibrary.newTab("Chapter 1", "ImageIdHere")
  129.  
  130. tab.newLabel("Items")
  131.  
  132. local lighting = game.Lighting
  133. local presets = {"Preset1", "Preset2", "Preset3", "Preset4", "Preset5"}
  134.  
  135. tab.newInput("Item", "Enter Item Name To Obtain", function(inputText)
  136. if lighting then
  137. for _, tool in pairs(lighting:GetChildren()) do
  138. if tool:IsA("Tool") and tool.Name:lower():find(inputText:lower()) then
  139. for _, presetName in ipairs(presets) do
  140. local preset = workspace:FindFirstChild(presetName)
  141. if preset then
  142. local toolObject = preset:FindFirstChild(tool.Name)
  143. if toolObject and toolObject:FindFirstChild("InteractRemote") then
  144. local args = {
  145. [1] = game:GetService("Players").LocalPlayer
  146. }
  147. toolObject.InteractRemote:FireServer(unpack(args))
  148. wait(0.1)
  149. end
  150. end
  151. end
  152. end
  153. end
  154. else
  155. warn("Lighting not found.")
  156. end
  157. end)
  158.  
  159. tab.newButton("Obtain Items", "Obtains Items", function()
  160. local lighting = game.Lighting
  161. local presets = {"Preset1", "Preset2", "Preset3", "Preset4", "Preset5"}
  162.  
  163. if lighting then
  164. for _, tool in pairs(lighting:GetChildren()) do
  165. if tool:IsA("Tool") then
  166. for _, presetName in ipairs(presets) do
  167. local preset = workspace:FindFirstChild(presetName)
  168. if preset then
  169. local toolObject = preset:FindFirstChild(tool.Name)
  170. if toolObject and toolObject:FindFirstChild("InteractRemote") then
  171. local args = {
  172. [1] = game:GetService("Players").LocalPlayer
  173. }
  174. toolObject.InteractRemote:FireServer(unpack(args))
  175. wait(0.1)
  176. end
  177. end
  178. end
  179. end
  180. end
  181. else
  182. warn("Please Don't Skid ;-;")
  183. end
  184. end)
  185.  
  186. tab.newButton("Obtain General Items","Obtains General Items", function()
  187. local generalItems = {"Crossbow", "Note", "FreezeTrap", "Pepper spray"}
  188.  
  189. local args = {
  190. [1] = game:GetService("Players").LocalPlayer
  191. }
  192.  
  193. local function interactWithItem(itemName)
  194. local generalItemsFolder = workspace:FindFirstChild("General Items")
  195. if generalItemsFolder then
  196. local item = generalItemsFolder:FindFirstChild(itemName)
  197. if item and item:FindFirstChild("InteractRemote") then
  198. item.InteractRemote:FireServer(unpack(args))
  199. return true
  200. end
  201. end
  202. return false
  203. end
  204.  
  205. for _, itemName in ipairs(generalItems) do
  206. interactWithItem(itemName)
  207. wait(0.1)
  208. end
  209. end)
  210.  
  211. tab.newButton("Obtain Keys","Obtains Keys", function()
  212. local lighting = game.Lighting
  213. local presets = {"Preset1", "Preset2", "Preset3", "Preset4", "Preset5"}
  214.  
  215. if lighting then
  216. for _, tool in pairs(lighting:GetChildren()) do
  217. if tool:IsA("Tool") and tool.Name:find("key") then
  218. for _, presetName in ipairs(presets) do
  219. local preset = workspace:FindFirstChild(presetName)
  220. if preset then
  221. local toolObject = preset:FindFirstChild(tool.Name)
  222. if toolObject and toolObject:FindFirstChild("InteractRemote") then
  223. local args = {
  224. [1] = game:GetService("Players").LocalPlayer
  225. }
  226. toolObject.InteractRemote:FireServer(unpack(args))
  227. wait(0.1)
  228. end
  229. end
  230. end
  231. end
  232. end
  233. else
  234. warn("Please Don't Skid ;-;")
  235. end
  236. end)
  237. tab.newLabel("Highlights")
  238. tab.newButton("Highlight Granny", "Esp/Chams", function()
  239. HighlightLib.HighlightModel("Granny", Color3.fromRGB(255, 0, 0), Color3.fromRGB(255, 0, 0))
  240.  
  241. workspace.DescendantAdded:Connect(function(descendant)
  242. if descendant:IsA("Model") and descendant.Name == "Granny" then
  243. HighlightLib.HighlightModel("Granny", Color3.fromRGB(255, 0, 0), Color3.fromRGB(255, 0, 0))
  244. end
  245. end)
  246. end)
  247. tab.newButton("Highlight Slendrina's Mother", "Esp/Chams", function()
  248. HighlightLib.HighlightModel("SlendrinaMother", Color3.fromRGB(255, 0, 0), Color3.fromRGB(255, 0, 0))
  249.  
  250. workspace.DescendantAdded:Connect(function(descendant)
  251. if descendant:IsA("Model") and descendant.Name == "SlendrinaMother" then
  252. HighlightLib.HighlightModel("SlendrinaMother", Color3.fromRGB(255, 0, 0), Color3.fromRGB(255, 0, 0))
  253. end
  254. end)
  255. end)
  256. tab.newButton("Highlight Items", "Esp/Chams", function()
  257. local lighting = game.Lighting
  258. local presets = {"Preset1", "Preset2", "Preset3", "Preset4", "Preset5"}
  259.  
  260. local toolNames = {}
  261. if lighting then
  262. for _, tool in pairs(lighting:GetChildren()) do
  263. if tool:IsA("Tool") then
  264. table.insert(toolNames, tool.Name)
  265. end
  266. end
  267. end
  268.  
  269. local function highlightMatchingParts()
  270. for _, part in ipairs(workspace:GetDescendants()) do
  271. if part:IsA("BasePart") and table.find(toolNames, part.Name) then
  272. HighlightLib.HighlightPart(part.Name, Color3.fromRGB(0, 225, 0), Color3.fromRGB(0, 225, 0))
  273. end
  274. end
  275. end
  276.  
  277. highlightMatchingParts()
  278.  
  279. workspace.DescendantAdded:Connect(function(descendant)
  280. if descendant:IsA("BasePart") and table.find(toolNames, descendant.Name) then
  281. HighlightLib.HighlightPart(descendant.Name, Color3.fromRGB(0, 255, 0), Color3.fromRGB(0, 225, 0))
  282. end
  283. end)
  284. end)
  285. tab.newLabel("Extra")
  286. tab.newButton("Practice Mode","Practice Gamemode", function()
  287. for _, object in pairs(workspace:GetDescendants()) do
  288. if object:IsA("Model") and object.Name == "Granny" then
  289. object:Destroy()
  290. end
  291. end
  292. wait(0.1)
  293. for _, object in pairs(workspace:GetDescendants()) do
  294. if object:IsA("Model") and object.Name == "SlendrinaMother" then
  295. object:Destroy()
  296. end
  297. end
  298. end)
  299. tab.newButton("Instant Interact","Proximity Prompt", function()
  300. game:GetService("ProximityPromptService").PromptButtonHoldBegan:Connect(function(prompt)
  301. fireproximityprompt(prompt)
  302. end)
  303. end)
  304. tab.newButton("Remove Bear Traps","Removes Bear Trap Objects", function()
  305. while true do
  306. for _, object in pairs(workspace:GetDescendants()) do
  307. if object:IsA("Part") and object.Name == "Close" then
  308. object:Destroy()
  309. end
  310. end
  311. wait(5)
  312. end
  313. end)
  314. tab.newLabel("OP'S")
  315. local isToggled = false
  316. local hiddenButtons = {}
  317.  
  318. local function hideDropButtons(container)
  319. for _, v in pairs(container:GetDescendants()) do
  320. if v:IsA("TextButton") and v.Text:find("DROP") then
  321. if v.Visible then
  322. v.Visible = false
  323. table.insert(hiddenButtons, v)
  324. end
  325. end
  326. end
  327. end
  328.  
  329. local function showHiddenButtons()
  330. for _, v in ipairs(hiddenButtons) do
  331. if v and v.Parent then
  332. v.Visible = true
  333. end
  334. end
  335. hiddenButtons = {}
  336. end
  337.  
  338. tab.newToggle("Spawn FreezeTraps", "Click To Loop", false, function(bool)
  339. isToggled = bool
  340.  
  341. if not isToggled then
  342. hideDropButtons(workspace)
  343. hideDropButtons(game:GetService("Players"))
  344. else
  345. showHiddenButtons()
  346. end
  347.  
  348. while isToggled do
  349. task.wait(0.1)
  350. local args = {
  351. [1] = game:GetService("Players").LocalPlayer
  352. }
  353. local player = game:GetService("Players").LocalPlayer
  354. local character = player.Character
  355. local backpack = player:FindFirstChildOfClass("Backpack")
  356.  
  357. local freezeTrapTool = backpack and backpack:FindFirstChild("Freeze trap")
  358. if freezeTrapTool and character then
  359. local humanoid = character:FindFirstChildOfClass("Humanoid")
  360. if humanoid then
  361. humanoid:EquipTool(freezeTrapTool)
  362. end
  363. end
  364.  
  365. local freezeTrap = workspace:FindFirstChild("General Items"):FindFirstChild("FreezeTrap")
  366. if freezeTrap and freezeTrap:FindFirstChild("InteractRemote") then
  367. freezeTrap.InteractRemote:FireServer(unpack(args))
  368. end
  369. task.wait(0.1)
  370.  
  371. local freezeTrapInCharacter = character and character:FindFirstChild("Freeze trap")
  372. if freezeTrapInCharacter and freezeTrapInCharacter:FindFirstChild("FireEvent") then
  373. freezeTrapInCharacter.FireEvent:FireServer(unpack(args))
  374. end
  375. task.wait(0.1)
  376. end
  377.  
  378. if not isToggled then
  379. hideDropButtons(workspace)
  380. hideDropButtons(game:GetService("Players"))
  381. end
  382. end)
  383.  
  384. elseif placeId == chapter2PlaceId then
  385. print("Chapter 2")
  386. wait(1)
  387. game:GetService("StarterGui"):SetCore("SendNotification", {
  388. Title = "Chapter 2",
  389. Text = "Loading...",
  390. Duration = 3
  391. })
  392. wait(2)
  393.  
  394. local DrRayLibrary = loadstring(game:HttpGet("https://raw.githubusercontent.com/AZYsGithub/DrRay-UI-Library/main/DrRay.lua"))()
  395. local window = DrRayLibrary:Load("Granny: Multiplayer - Free - πŸ§“πŸΏπŸ", "Default")
  396.  
  397. local HighlightLib = {}
  398.  
  399. local DepthMode = "AlwaysOnTop"
  400. local FillTransparency = 0.5
  401. local OutlineTransparency = 0.5
  402. local CoreGui = game:FindService("CoreGui")
  403. local Workspace = game.Workspace
  404. local Storage = Instance.new("Folder")
  405. Storage.Parent = CoreGui
  406. Storage.Name = "Highlight_Storage"
  407.  
  408. HighlightLib.Models = {}
  409. HighlightLib.Parts = {}
  410.  
  411. local function addNameTag(instance, name, color)
  412. local nameTag = Instance.new("BillboardGui")
  413. nameTag.Adornee = instance
  414. nameTag.Size = UDim2.new(0, 75, 0, 30)
  415. nameTag.StudsOffset = Vector3.new(0, 3, 0)
  416. nameTag.AlwaysOnTop = true
  417.  
  418. local textLabel = Instance.new("TextLabel")
  419. textLabel.Size = UDim2.new(1, 0, 1, 0)
  420. textLabel.BackgroundTransparency = 1
  421. textLabel.TextColor3 = color
  422. textLabel.TextStrokeTransparency = 0
  423. textLabel.Text = name
  424. textLabel.TextScaled = true
  425. textLabel.TextStrokeColor3 = Color3.new(0, 0, 0)
  426. textLabel.TextSize = 12
  427. textLabel.Parent = nameTag
  428.  
  429. nameTag.Parent = instance
  430. end
  431.  
  432. local function HighlightPart(name, fillColor, outlineColor)
  433. for _, object in ipairs(Workspace:GetDescendants()) do
  434. if object:IsA("BasePart") then
  435. if object.Name:lower() == name:lower() then
  436. local Highlight = Instance.new("Highlight")
  437. Highlight.Parent = Storage
  438. Highlight.Adornee = object
  439. Highlight.FillColor = fillColor
  440. Highlight.DepthMode = DepthMode
  441. Highlight.FillTransparency = FillTransparency
  442. Highlight.OutlineColor = outlineColor
  443. Highlight.OutlineTransparency = OutlineTransparency
  444. addNameTag(object, name, outlineColor)
  445. table.insert(HighlightLib.Parts, {object, Highlight})
  446. end
  447. end
  448. end
  449. end
  450.  
  451. local function HighlightModel(name, fillColor, outlineColor)
  452. for _, model in ipairs(Workspace:GetDescendants()) do
  453. if model:IsA("Model") and model.Name:lower() == name:lower() then
  454. local highlight = Instance.new("Highlight")
  455. highlight.Name = model.Name
  456. highlight.FillColor = fillColor
  457. highlight.DepthMode = DepthMode
  458. highlight.FillTransparency = FillTransparency
  459. highlight.OutlineColor = outlineColor
  460. highlight.OutlineTransparency = OutlineTransparency
  461. highlight.Parent = Storage
  462. highlight.Adornee = model
  463. table.insert(HighlightLib.Models, {model, highlight})
  464. addNameTag(model, model.Name, outlineColor)
  465. return
  466. end
  467. end
  468. end
  469.  
  470. local function UpdateHighlights()
  471. for _, highlightedPart in pairs(HighlightLib.Parts) do
  472. local part, highlight = highlightedPart[1], highlightedPart[2]
  473. if part and part.Parent then
  474. highlight.Adornee = part
  475. else
  476. highlight:Destroy()
  477. table.remove(HighlightLib.Parts, _)
  478. end
  479. end
  480.  
  481. for _, highlightedModel in pairs(HighlightLib.Models) do
  482. local model, highlight = highlightedModel[1], highlightedModel[2]
  483. if model and model.Parent then
  484. highlight.Adornee = model
  485. else
  486. highlight:Destroy()
  487. table.remove(HighlightLib.Models, _)
  488. end
  489. end
  490. end
  491.  
  492. Workspace.DescendantAdded:Connect(function(instance)
  493. if instance:IsA("BasePart") or instance:IsA("Model") then
  494. UpdateHighlights()
  495. end
  496. end)
  497.  
  498. HighlightLib.HighlightModel = function(name, fillColor, outlineColor)
  499. HighlightModel(name, fillColor, outlineColor)
  500. end
  501.  
  502. HighlightLib.HighlightPart = function(name, fillColor, outlineColor)
  503. HighlightPart(name, fillColor, outlineColor)
  504. end
  505.  
  506. local tab = DrRayLibrary.newTab("Chapter 2", "ImageIdHere")
  507.  
  508. tab.newLabel("Items")
  509.  
  510. local lighting = game.Lighting
  511. local presets = {"Preset1", "Preset2", "Preset3", "Preset4", "Preset5"}
  512.  
  513. tab.newInput("Item", "Enter Item Name To Obtain", function(inputText)
  514. if lighting then
  515. for _, tool in pairs(lighting:GetChildren()) do
  516. if tool:IsA("Tool") and tool.Name:lower():find(inputText:lower()) then
  517. for _, presetName in ipairs(presets) do
  518. local preset = workspace:FindFirstChild(presetName)
  519. if preset then
  520. local toolObject = preset:FindFirstChild(tool.Name)
  521. if toolObject and toolObject:FindFirstChild("InteractRemote") then
  522. local args = {
  523. [1] = game:GetService("Players").LocalPlayer
  524. }
  525. toolObject.InteractRemote:FireServer(unpack(args))
  526. wait(0.1)
  527. end
  528. end
  529. end
  530. end
  531. end
  532. else
  533. warn("Lighting not found.")
  534. end
  535. end)
  536.  
  537. tab.newButton("Obtain Items", "Obtains Items", function()
  538. local lighting = game.Lighting
  539. local presets = {"Preset1", "Preset2", "Preset3", "Preset4", "Preset5"}
  540.  
  541. if lighting then
  542. for _, tool in pairs(lighting:GetChildren()) do
  543. if tool:IsA("Tool") then
  544. for _, presetName in ipairs(presets) do
  545. local preset = workspace:FindFirstChild(presetName)
  546. if preset then
  547. local toolObject = preset:FindFirstChild(tool.Name)
  548. if toolObject and toolObject:FindFirstChild("InteractRemote") then
  549. local args = {
  550. [1] = game:GetService("Players").LocalPlayer
  551. }
  552. toolObject.InteractRemote:FireServer(unpack(args))
  553. wait(0.1)
  554. end
  555. end
  556. end
  557. end
  558. end
  559. else
  560. warn("Please Don't Skid ;-;")
  561. end
  562. end)
  563.  
  564. tab.newButton("Obtain Keys","Obtains Keys", function()
  565. local lighting = game.Lighting
  566. local presets = {"Preset1", "Preset2", "Preset3", "Preset4", "Preset5"}
  567.  
  568. if lighting then
  569. for _, tool in pairs(lighting:GetChildren()) do
  570. if tool:IsA("Tool") and tool.Name:find("key") then
  571. for _, presetName in ipairs(presets) do
  572. local preset = workspace:FindFirstChild(presetName)
  573. if preset then
  574. local toolObject = preset:FindFirstChild(tool.Name)
  575. if toolObject and toolObject:FindFirstChild("InteractRemote") then
  576. local args = {
  577. [1] = game:GetService("Players").LocalPlayer
  578. }
  579. toolObject.InteractRemote:FireServer(unpack(args))
  580. wait(0.1)
  581. end
  582. end
  583. end
  584. end
  585. end
  586. else
  587. warn("Please Don't Skid ;-;")
  588. end
  589. end)
  590. tab.newLabel("Highlights")
  591. tab.newButton("Highlight Granny", "Esp/Chams", function()
  592. HighlightLib.HighlightModel("Granny", Color3.fromRGB(255, 0, 0), Color3.fromRGB(255, 0, 0))
  593.  
  594. workspace.DescendantAdded:Connect(function(descendant)
  595. if descendant:IsA("Model") and descendant.Name == "Granny" then
  596. HighlightLib.HighlightModel("Granny", Color3.fromRGB(255, 0, 0), Color3.fromRGB(255, 0, 0))
  597. end
  598. end)
  599. end)
  600. tab.newButton("Highlight Grandpa", "Esp/Chams", function()
  601. HighlightLib.HighlightModel("Grandpa", Color3.fromRGB(255, 0, 0), Color3.fromRGB(255, 0, 0))
  602.  
  603. workspace.DescendantAdded:Connect(function(descendant)
  604. if descendant:IsA("Model") and descendant.Name == "Grandpa" then
  605. HighlightLib.HighlightModel("Grandpa", Color3.fromRGB(255, 0, 0), Color3.fromRGB(255, 0, 0))
  606. end
  607. end)
  608. end)
  609.  
  610. tab.newButton("Highlight Items", "Esp/Chams", function()
  611. local lighting = game.Lighting
  612. local presets = {"Preset1", "Preset2", "Preset3", "Preset4", "Preset5"}
  613.  
  614. local toolNames = {}
  615. if lighting then
  616. for _, tool in pairs(lighting:GetChildren()) do
  617. if tool:IsA("Tool") then
  618. table.insert(toolNames, tool.Name)
  619. end
  620. end
  621. end
  622.  
  623. local function highlightMatchingParts()
  624. for _, part in ipairs(workspace:GetDescendants()) do
  625. if part:IsA("BasePart") and table.find(toolNames, part.Name) then
  626. HighlightLib.HighlightPart(part.Name, Color3.fromRGB(0, 225, 0), Color3.fromRGB(0, 225, 0))
  627. end
  628. end
  629. end
  630.  
  631. highlightMatchingParts()
  632.  
  633. workspace.DescendantAdded:Connect(function(descendant)
  634. if descendant:IsA("BasePart") and table.find(toolNames, descendant.Name) then
  635. HighlightLib.HighlightPart(descendant.Name, Color3.fromRGB(0, 255, 0), Color3.fromRGB(0, 225, 0))
  636. end
  637. end)
  638. end)
  639. tab.newLabel("Extra")
  640. tab.newButton("Practice Mode","Practice Gamemode", function()
  641. for _, object in pairs(workspace:GetDescendants()) do
  642. if object:IsA("Model") and object.Name == "Granny" then
  643. object:Destroy()
  644. end
  645. end
  646. wait(0.1)
  647. for _, object in pairs(workspace:GetDescendants()) do
  648. if object:IsA("Model") and object.Name == "Grandpa" then
  649. object:Destroy()
  650. end
  651. end
  652. end)
  653. tab.newButton("Instant Interact","Proximity Prompt", function()
  654. game:GetService("ProximityPromptService").PromptButtonHoldBegan:Connect(function(prompt)
  655. fireproximityprompt(prompt)
  656. end)
  657. end)
  658. tab.newButton("Remove Bear Traps","Removes Bear Trap Objects", function()
  659. while true do
  660. for _, object in pairs(workspace:GetDescendants()) do
  661. if object:IsA("Part") and object.Name == "Close" then
  662. object:Destroy()
  663. end
  664. end
  665. wait(5)
  666. end
  667. end)
  668. tab.newLabel("OP'S")
  669. tab.newButton("Throw Grenade","Button", function()
  670. local screenGui = Instance.new("ScreenGui")
  671. screenGui.Name = "ActionMenu"
  672. screenGui.ResetOnSpawn = false
  673. screenGui.Parent = game.Players.LocalPlayer:WaitForChild("PlayerGui")
  674.  
  675. local button = Instance.new("TextButton")
  676. button.Size = UDim2.new(0, 100, 0, 30)
  677. button.Position = UDim2.new(0, 10, 0, 10)
  678. button.Text = "Throw-G"
  679. button.Font = Enum.Font.SourceSans
  680. button.FontSize = Enum.FontSize.Size24
  681. button.TextColor3 = Color3.new(1, 1, 1)
  682. button.BackgroundColor3 = Color3.new(0.2, 0.2, 0.2)
  683.  
  684. button.Parent = screenGui
  685.  
  686. local toggleButton = Instance.new("TextButton")
  687. toggleButton.Size = UDim2.new(0, 100, 0, 30)
  688. toggleButton.Position = UDim2.new(0, 10, 0, 50)
  689. toggleButton.Text = "Toggle Drag"
  690. toggleButton.Name = "ToggleDragButton" -- Unique identifier
  691. toggleButton.Font = Enum.Font.SourceSans
  692. toggleButton.FontSize = Enum.FontSize.Size24
  693. toggleButton.TextColor3 = Color3.new(1, 1, 1)
  694. toggleButton.BackgroundColor3 = Color3.new(0.2, 0.2, 0.2)
  695.  
  696. toggleButton.Parent = screenGui
  697.  
  698. -- Remove duplicates of "ToggleDragButton"
  699. for _, gui in pairs(screenGui:GetChildren()) do
  700. if gui:IsA("TextButton") and gui.Name == "ToggleDragButton" and gui ~= toggleButton then
  701. gui:Destroy()
  702. end
  703. end
  704.  
  705. local UserInputService = game:GetService("UserInputService")
  706.  
  707. local dragToggle = false
  708. local dragInput = nil
  709. local dragStart = nil
  710. local startPos = nil
  711.  
  712. local function updateInput(input)
  713. local delta = input.Position - dragStart
  714. button.Position = UDim2.new(startPos.X.Scale, startPos.X.Offset + delta.X, startPos.Y.Scale, startPos.Y.Offset + delta.Y)
  715. end
  716.  
  717. local function toggleDraggable()
  718. dragToggle = not dragToggle
  719. if not dragToggle then
  720. button.AnchorPoint = Vector2.new(0.5, 0.5)
  721. button.Position = UDim2.new(0, button.Position.X.Offset, 0, button.Position.Y.Offset)
  722. if button:FindFirstChild("AnchorsConstraint") then
  723. button.AnchorsConstraint:Destroy()
  724. end
  725. end
  726. end
  727.  
  728. button.InputBegan:Connect(function(input)
  729. if (input.UserInputType == Enum.UserInputType.Touch or input.UserInputType == Enum.UserInputType.MouseButton1) and dragToggle then
  730. dragStart = input.Position
  731. startPos = button.Position
  732. input.Changed:Connect(function()
  733. if input.UserInputState == Enum.UserInputState.End then
  734. dragToggle = false
  735. end
  736. end)
  737. end
  738. end)
  739.  
  740. UserInputService.InputChanged:Connect(function(input)
  741. if dragToggle and (input.UserInputType == Enum.UserInputType.Touch or input.UserInputType == Enum.UserInputType.MouseMovement) then
  742. updateInput(input)
  743. end
  744. end)
  745.  
  746. toggleButton.MouseButton1Click:Connect(toggleDraggable)
  747.  
  748. button.MouseButton1Click:Connect(function()
  749. local args = {
  750. [1] = game:GetService("Players").LocalPlayer
  751. }
  752.  
  753. game:GetService("Players").LocalPlayer.PlayerGui.MainGUI.ScreenGUI.HandGrenadeGUI.EnemyDamage:FireServer(unpack(args))
  754. end)
  755. end)
  756.  
  757. elseif placeId == chapter3PlaceId then
  758. print("Chapter 3")
  759. wait(1)
  760. game:GetService("StarterGui"):SetCore("SendNotification", {
  761. Title = "Chapter 3",
  762. Text = "Loading...",
  763. Duration = 3
  764. })
  765. wait(2)
  766.  
  767. local DrRayLibrary = loadstring(game:HttpGet("https://raw.githubusercontent.com/AZYsGithub/DrRay-UI-Library/main/DrRay.lua"))()
  768. local window = DrRayLibrary:Load("Granny: Multiplayer - Free - πŸ§“πŸΏπŸ", "Default")
  769.  
  770. local HighlightLib = {}
  771.  
  772. local DepthMode = "AlwaysOnTop"
  773. local FillTransparency = 0.5
  774. local OutlineTransparency = 0.5
  775. local CoreGui = game:FindService("CoreGui")
  776. local Workspace = game.Workspace
  777. local Storage = Instance.new("Folder")
  778. Storage.Parent = CoreGui
  779. Storage.Name = "Highlight_Storage"
  780.  
  781. HighlightLib.Models = {}
  782. HighlightLib.Parts = {}
  783.  
  784. local function addNameTag(instance, name, color)
  785. local nameTag = Instance.new("BillboardGui")
  786. nameTag.Adornee = instance
  787. nameTag.Size = UDim2.new(0, 75, 0, 30)
  788. nameTag.StudsOffset = Vector3.new(0, 3, 0)
  789. nameTag.AlwaysOnTop = true
  790.  
  791. local textLabel = Instance.new("TextLabel")
  792. textLabel.Size = UDim2.new(1, 0, 1, 0)
  793. textLabel.BackgroundTransparency = 1
  794. textLabel.TextColor3 = color
  795. textLabel.TextStrokeTransparency = 0
  796. textLabel.Text = name
  797. textLabel.TextScaled = true
  798. textLabel.TextStrokeColor3 = Color3.new(0, 0, 0)
  799. textLabel.TextSize = 12
  800. textLabel.Parent = nameTag
  801.  
  802. nameTag.Parent = instance
  803. end
  804.  
  805. local function HighlightPart(name, fillColor, outlineColor)
  806. for _, object in ipairs(Workspace:GetDescendants()) do
  807. if object:IsA("BasePart") then
  808. if object.Name:lower() == name:lower() then
  809. local Highlight = Instance.new("Highlight")
  810. Highlight.Parent = Storage
  811. Highlight.Adornee = object
  812. Highlight.FillColor = fillColor
  813. Highlight.DepthMode = DepthMode
  814. Highlight.FillTransparency = FillTransparency
  815. Highlight.OutlineColor = outlineColor
  816. Highlight.OutlineTransparency = OutlineTransparency
  817. addNameTag(object, name, outlineColor)
  818. table.insert(HighlightLib.Parts, {object, Highlight})
  819. end
  820. end
  821. end
  822. end
  823.  
  824. local function HighlightModel(name, fillColor, outlineColor)
  825. for _, model in ipairs(Workspace:GetDescendants()) do
  826. if model:IsA("Model") and model.Name:lower() == name:lower() then
  827. local highlight = Instance.new("Highlight")
  828. highlight.Name = model.Name
  829. highlight.FillColor = fillColor
  830. highlight.DepthMode = DepthMode
  831. highlight.FillTransparency = FillTransparency
  832. highlight.OutlineColor = outlineColor
  833. highlight.OutlineTransparency = OutlineTransparency
  834. highlight.Parent = Storage
  835. highlight.Adornee = model
  836. table.insert(HighlightLib.Models, {model, highlight})
  837. addNameTag(model, model.Name, outlineColor)
  838. return
  839. end
  840. end
  841. end
  842.  
  843. local function UpdateHighlights()
  844. for _, highlightedPart in pairs(HighlightLib.Parts) do
  845. local part, highlight = highlightedPart[1], highlightedPart[2]
  846. if part and part.Parent then
  847. highlight.Adornee = part
  848. else
  849. highlight:Destroy()
  850. table.remove(HighlightLib.Parts, _)
  851. end
  852. end
  853.  
  854. for _, highlightedModel in pairs(HighlightLib.Models) do
  855. local model, highlight = highlightedModel[1], highlightedModel[2]
  856. if model and model.Parent then
  857. highlight.Adornee = model
  858. else
  859. highlight:Destroy()
  860. table.remove(HighlightLib.Models, _)
  861. end
  862. end
  863. end
  864.  
  865. Workspace.DescendantAdded:Connect(function(instance)
  866. if instance:IsA("BasePart") or instance:IsA("Model") then
  867. UpdateHighlights()
  868. end
  869. end)
  870.  
  871. HighlightLib.HighlightModel = function(name, fillColor, outlineColor)
  872. HighlightModel(name, fillColor, outlineColor)
  873. end
  874.  
  875. HighlightLib.HighlightPart = function(name, fillColor, outlineColor)
  876. HighlightPart(name, fillColor, outlineColor)
  877. end
  878.  
  879. local tab = DrRayLibrary.newTab("Chapter 3", "ImageIdHere")
  880.  
  881. tab.newLabel("Items")
  882.  
  883. local lighting = game.Lighting
  884. local presets = {"Preset1", "Preset2", "Preset3", "Preset4", "Preset5"}
  885.  
  886. tab.newInput("Item", "Enter Item Name To Obtain", function(inputText)
  887. if lighting then
  888. for _, tool in pairs(lighting:GetChildren()) do
  889. if tool:IsA("Tool") and tool.Name:lower():find(inputText:lower()) then
  890. for _, presetName in ipairs(presets) do
  891. local preset = workspace:FindFirstChild(presetName)
  892. if preset then
  893. local toolObject = preset:FindFirstChild(tool.Name)
  894. if toolObject and toolObject:FindFirstChild("InteractRemote") then
  895. local args = {
  896. [1] = game:GetService("Players").LocalPlayer
  897. }
  898. toolObject.InteractRemote:FireServer(unpack(args))
  899. wait(0.1)
  900. end
  901. end
  902. end
  903. end
  904. end
  905. else
  906. warn("Lighting not found.")
  907. end
  908. end)
  909.  
  910. tab.newButton("Obtain Items", "Obtains Items", function()
  911. local lighting = game.Lighting
  912. local presets = {"Preset1", "Preset2", "Preset3", "Preset4", "Preset5"}
  913.  
  914. if lighting then
  915. for _, tool in pairs(lighting:GetChildren()) do
  916. if tool:IsA("Tool") then
  917. for _, presetName in ipairs(presets) do
  918. local preset = workspace:FindFirstChild(presetName)
  919. if preset then
  920. local toolObject = preset:FindFirstChild(tool.Name)
  921. if toolObject and toolObject:FindFirstChild("InteractRemote") then
  922. local args = {
  923. [1] = game:GetService("Players").LocalPlayer
  924. }
  925. toolObject.InteractRemote:FireServer(unpack(args))
  926. wait(0.1)
  927. end
  928. end
  929. end
  930. end
  931. end
  932. else
  933. warn("Please Don't Skid ;-;")
  934. end
  935. end)
  936.  
  937. tab.newButton("Obtain Keys","Obtains Keys", function()
  938. local lighting = game.Lighting
  939. local presets = {"Preset1", "Preset2", "Preset3", "Preset4", "Preset5"}
  940.  
  941. if lighting then
  942. for _, tool in pairs(lighting:GetChildren()) do
  943. if tool:IsA("Tool") and tool.Name:find("key") then
  944. for _, presetName in ipairs(presets) do
  945. local preset = workspace:FindFirstChild(presetName)
  946. if preset then
  947. local toolObject = preset:FindFirstChild(tool.Name)
  948. if toolObject and toolObject:FindFirstChild("InteractRemote") then
  949. local args = {
  950. [1] = game:GetService("Players").LocalPlayer
  951. }
  952. toolObject.InteractRemote:FireServer(unpack(args))
  953. wait(0.1)
  954. end
  955. end
  956. end
  957. end
  958. end
  959. else
  960. warn("Please Don't Skid ;-;")
  961. end
  962. end)
  963. tab.newLabel("Highlights")
  964. tab.newButton("Highlight Granny", "Esp/Chams", function()
  965. HighlightLib.HighlightModel("Granny", Color3.fromRGB(255, 0, 0), Color3.fromRGB(255, 0, 0))
  966.  
  967. workspace.DescendantAdded:Connect(function(descendant)
  968. if descendant:IsA("Model") and descendant.Name == "Granny" then
  969. HighlightLib.HighlightModel("Granny", Color3.fromRGB(255, 0, 0), Color3.fromRGB(255, 0, 0))
  970. end
  971. end)
  972. end)
  973. tab.newButton("Highlight Grandpa", "Esp/Chams", function()
  974. HighlightLib.HighlightModel("Grandpa", Color3.fromRGB(255, 0, 0), Color3.fromRGB(255, 0, 0))
  975.  
  976. workspace.DescendantAdded:Connect(function(descendant)
  977. if descendant:IsA("Model") and descendant.Name == "Grandpa" then
  978. HighlightLib.HighlightModel("Grandpa", Color3.fromRGB(255, 0, 0), Color3.fromRGB(255, 0, 0))
  979. end
  980. end)
  981. end)
  982. tab.newButton("Highlight Slendrina", "Esp/Chams", function()
  983. HighlightLib.HighlightModel("Slendrina", Color3.fromRGB(255, 0, 0), Color3.fromRGB(255, 0, 0))
  984.  
  985. workspace.DescendantAdded:Connect(function(descendant)
  986. if descendant:IsA("Model") and descendant.Name == "Slendrina" then
  987. HighlightLib.HighlightModel("Slendrina", Color3.fromRGB(255, 0, 0), Color3.fromRGB(255, 0, 0))
  988. end
  989. end)
  990. end)
  991.  
  992. tab.newButton("Highlight Items", "Esp/Chams", function()
  993. local lighting = game.Lighting
  994. local presets = {"Preset1", "Preset2", "Preset3", "Preset4", "Preset5"}
  995.  
  996. local toolNames = {}
  997. if lighting then
  998. for _, tool in pairs(lighting:GetChildren()) do
  999. if tool:IsA("Tool") then
  1000. table.insert(toolNames, tool.Name)
  1001. end
  1002. end
  1003. end
  1004.  
  1005. local function highlightMatchingParts()
  1006. for _, part in ipairs(workspace:GetDescendants()) do
  1007. if part:IsA("BasePart") and table.find(toolNames, part.Name) then
  1008. HighlightLib.HighlightPart(part.Name, Color3.fromRGB(0, 225, 0), Color3.fromRGB(0, 225, 0))
  1009. end
  1010. end
  1011. end
  1012.  
  1013. highlightMatchingParts()
  1014.  
  1015. workspace.DescendantAdded:Connect(function(descendant)
  1016. if descendant:IsA("BasePart") and table.find(toolNames, descendant.Name) then
  1017. HighlightLib.HighlightPart(descendant.Name, Color3.fromRGB(0, 255, 0), Color3.fromRGB(0, 225, 0))
  1018. end
  1019. end)
  1020. end)
  1021. tab.newLabel("Extra")
  1022. tab.newButton("Practice Mode","Practice Gamemode", function()
  1023. for _, object in pairs(workspace:GetDescendants()) do
  1024. if object:IsA("Model") and object.Name == "Granny" then
  1025. object:Destroy()
  1026. end
  1027. end
  1028. wait(0.1)
  1029. for _, object in pairs(workspace:GetDescendants()) do
  1030. if object:IsA("Model") and object.Name == "Grandpa" then
  1031. object:Destroy()
  1032. end
  1033. end
  1034. wait(0.1)
  1035. for _, object in pairs(workspace:GetDescendants()) do
  1036. if object:IsA("Model") and object.Name == "Slendrina" then
  1037. object:Destroy()
  1038. end
  1039. end
  1040. end)
  1041. tab.newButton("Instant Interact","Proximity Prompt", function()
  1042. game:GetService("ProximityPromptService").PromptButtonHoldBegan:Connect(function(prompt)
  1043. fireproximityprompt(prompt)
  1044. end)
  1045. end)
  1046. tab.newButton("Remove Bear Traps","Removes Bear Trap Objects", function()
  1047. while true do
  1048. for _, object in pairs(workspace:GetDescendants()) do
  1049. if object:IsA("Part") and object.Name == "Close" then
  1050. object:Destroy()
  1051. end
  1052. end
  1053. wait(5)
  1054. end
  1055. end)
  1056. tab.newLabel("OP'S")
  1057.  
  1058. else
  1059. warn("An Error Occured Please Report It In Our Server")
  1060. end
  1061.  
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement