Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- local Rayfield = loadstring(game:HttpGet('https://sirius.menu/rayfield'))()
- local Window = Rayfield:CreateWindow({
- Name = "Dead Shelter Script",
- LoadingTitle = "Dead Shelter Cheats",
- LoadingSubtitle = "by LuckyΓ 8",
- ConfigurationSaving = {
- Enabled = true,
- FolderName = "DeadShelterGrok",
- FileName = "Config"
- }
- })
- local Players = game:GetService("Players")
- local RunService = game:GetService("RunService")
- local player = Players.LocalPlayer
- local character = player.Character or player.CharacterAdded:Wait()
- local hrp = character:WaitForChild("HumanoidRootPart")
- player.CharacterAdded:Connect(function(new)
- character = new
- hrp = new:WaitForChild("HumanoidRootPart")
- end)
- -- ====================== ITEMS (GOLD BAR + SILVER BAR SEPARATE - NO "Bars") ======================
- local categoryGroups = {}
- local categoryDisplayToGroup = {}
- local CategoryDropdown
- local AmountSlider
- local function getCategory(objName)
- local lower = objName:lower()
- -- Your exact requested items
- if lower:find("deadbuck") then
- return "Deadbucks"
- elseif lower:find("vase") or lower:find("gold vase") then
- return "Vases"
- elseif lower:find("gold bar") or lower:find("goldbar") then
- return "Gold Bars"
- elseif lower:find("silver bar") or lower:find("silverbar") or lower:find("silver") then
- return "Silver Bars"
- elseif lower:find("barricade") or lower:find("brick") or lower:find("wood") or lower:find("plank") or lower:find("sheet metal") or lower:find("metal") then
- return "Building Materials"
- elseif lower:find("bandage") or lower:find("defibrillator") or lower:find("medkit") or lower:find("pill") or lower:find("painkiller") or lower:find("syringe") then
- return "Medical"
- -- Rest of categories (no combined "Bars")
- elseif lower:find("ammo") or lower:find("magazine") or lower:find("bullet") then
- return "Ammo"
- elseif lower:find("gun") or lower:find("pistol") or lower:find("rifle") or lower:find("shotgun") or lower:find("ar") or lower:find("ak") then
- return "Guns"
- elseif lower:find("crowbar") or lower:find("axe") or lower:find("knife") or lower:find("bat") then
- return "Melee"
- elseif lower:find("food") or lower:find("can") or lower:find("meat") or lower:find("apple") or lower:find("bread") then
- return "Food"
- elseif lower:find("water") or lower:find("drink") or lower:find("soda") then
- return "Drinks"
- elseif lower:find("key") or lower:find("card") or lower:find("id") then
- return "Keys"
- elseif lower:find("vest") or lower:find("helmet") or lower:find("armor") then
- return "Armor"
- elseif lower:find("backpack") or lower:find("bag") then
- return "Backpacks"
- else
- return "Supplies"
- end
- end
- local function refreshItems()
- categoryGroups = {
- Deadbucks = {}, Vases = {}, ["Gold Bars"] = {}, ["Silver Bars"] = {}, ["Building Materials"] = {}, Medical = {},
- Ammo = {}, Guns = {}, Melee = {}, Food = {}, Drinks = {}, Keys = {},
- Armor = {}, Backpacks = {}, Supplies = {}
- }
- local dragFolder = workspace:FindFirstChild("DraggableFolder")
- if not dragFolder then
- Rayfield:Notify({Title = "Error", Content = "DraggableFolder not found!", Duration = 5})
- return
- end
- for _, obj in ipairs(dragFolder:GetDescendants()) do
- if (obj:IsA("Tool") or obj:IsA("Model") or obj:IsA("BasePart") or obj:IsA("MeshPart"))
- and not obj:FindFirstChildWhichIsA("Humanoid") then
- local cat = getCategory(obj.Name)
- table.insert(categoryGroups[cat], obj)
- end
- end
- local dropdownOptions = {}
- categoryDisplayToGroup = {}
- for cat, items in pairs(categoryGroups) do
- if #items > 0 then
- local display = cat .. " (" .. #items .. ")"
- table.insert(dropdownOptions, display)
- categoryDisplayToGroup[display] = cat
- end
- end
- table.sort(dropdownOptions)
- if CategoryDropdown then
- CategoryDropdown:Refresh(dropdownOptions)
- end
- end
- local ItemsTab = Window:CreateTab("Items Bring", 4483362458)
- ItemsTab:CreateButton({
- Name = "π Refresh ALL Items in DraggableFolder",
- Callback = function()
- refreshItems()
- Rayfield:Notify({
- Title = "Categories Updated!",
- Content = "β Removed Bars folder\nβ Added Gold Bars + Silver Bars (separate)\nDeadbucks, Vases, Gold Bars, Silver Bars etc.",
- Duration = 6
- })
- end,
- })
- CategoryDropdown = ItemsTab:CreateDropdown({
- Name = "π Choose Folder",
- Options = {},
- CurrentOption = {},
- MultipleOptions = false,
- Callback = function() end
- })
- AmountSlider = ItemsTab:CreateSlider({
- Name = "How Many Items to Bring",
- Range = {1, 300},
- Increment = 1,
- CurrentValue = 50,
- Flag = "BringAmount",
- Callback = function(Value) end
- })
- ItemsTab:CreateButton({
- Name = "π¦ Bring X from Selected Folder (STACK/GLITCH)",
- Callback = function()
- local selectedDisplay = CategoryDropdown.CurrentOption and CategoryDropdown.CurrentOption[1]
- if not selectedDisplay then
- Rayfield:Notify({Title = "Error", Content = "Select a folder first!", Duration = 3})
- return
- end
- local cat = categoryDisplayToGroup[selectedDisplay]
- local items = categoryGroups[cat] or {}
- local amount = math.min(AmountSlider.CurrentValue, #items)
- if amount == 0 then return end
- local targetCFrame = hrp.CFrame * CFrame.new(0, 3, -5)
- for i = 1, amount do
- local item = items[i]
- pcall(function()
- if item:IsA("Model") then
- item:PivotTo(targetCFrame)
- elseif item:IsA("BasePart") then
- item.CFrame = targetCFrame
- elseif item:IsA("Tool") then
- local handle = item:FindFirstChild("Handle") or item:FindFirstChildWhichIsA("BasePart")
- if handle then handle.CFrame = targetCFrame end
- end
- end)
- end
- Rayfield:Notify({Title = "Stacked!", Content = "Brought " .. amount .. " " .. cat .. " (same spot glitch)", Duration = 5})
- end,
- })
- ItemsTab:CreateButton({
- Name = "π¦ Bring EVERYTHING (All Folders - STACK/GLITCH)",
- Callback = function()
- local total = 0
- local targetCFrame = hrp.CFrame * CFrame.new(0, 3, -5)
- local amountPerFolder = AmountSlider.CurrentValue
- for _, group in pairs(categoryGroups) do
- local toBring = math.min(amountPerFolder, #group)
- for i = 1, toBring do
- pcall(function()
- local item = group[i]
- if item:IsA("Model") then item:PivotTo(targetCFrame)
- elseif item:IsA("BasePart") then item.CFrame = targetCFrame
- elseif item:IsA("Tool") then
- local handle = item:FindFirstChild("Handle") or item:FindFirstChildWhichIsA("BasePart")
- if handle then handle.CFrame = targetCFrame end
- end
- end)
- total = total + 1
- end
- end
- Rayfield:Notify({Title = "Full Stack!", Content = "Brought " .. total .. " items (glitched same spot)", Duration = 5})
- end,
- })
- -- ====================== WEAPONS & AMMO ======================
- local WeaponsTab = Window:CreateTab("Weapons & Ammo", 4483362458)
- local function updateAmmo(tool)
- for _, v in ipairs(tool:GetDescendants()) do
- if (v:IsA("IntValue") or v:IsA("NumberValue")) and v.Value ~= nil then
- local nameLower = v.Name:lower()
- if nameLower:find("ammo") or nameLower:find("magazine") or nameLower:find("bullets") or
- nameLower:find("clip") or nameLower:find("rounds") or nameLower:find("currentammo") then
- v.Value = 999
- end
- end
- end
- end
- local infAmmoConn = nil
- WeaponsTab:CreateToggle({
- Name = "βΎοΈ Infinite Ammo / Magazine (999)",
- CurrentValue = false,
- Callback = function(state)
- if infAmmoConn then infAmmoConn:Disconnect() infAmmoConn = nil end
- if state then
- infAmmoConn = RunService.Heartbeat:Connect(function()
- pcall(function()
- for _, tool in ipairs(character:GetChildren()) do
- if tool:IsA("Tool") then updateAmmo(tool) end
- end
- for _, tool in ipairs(player.Backpack:GetChildren()) do
- if tool:IsA("Tool") then updateAmmo(tool) end
- end
- end)
- end)
- end
- end,
- })
- WeaponsTab:CreateButton({
- Name = "π« Set Current Gun Ammo/Magazine to 999",
- Callback = function()
- local found = false
- for _, tool in ipairs(character:GetChildren()) do
- if tool:IsA("Tool") then
- updateAmmo(tool)
- found = true
- end
- end
- Rayfield:Notify({
- Title = found and "Ammo Set" or "No Gun Equipped",
- Content = found and "Current gun ammo = 999" or "Equip a gun first!",
- Duration = 4
- })
- end,
- })
- -- ====================== ZOMBIES / NPCs ======================
- local EntitiesTab = Window:CreateTab("Zombies & NPCs", 4483362458)
- local function getEntities()
- local list = {}
- for _, obj in ipairs(workspace:GetDescendants()) do
- local hum = obj:FindFirstChild("Humanoid")
- local root = obj:FindFirstChild("HumanoidRootPart")
- if hum and root and hum.Health > 0 and obj ~= character and not Players:GetPlayerFromCharacter(obj) then
- table.insert(list, obj)
- end
- end
- return list
- end
- local killAuraConn = nil
- EntitiesTab:CreateToggle({
- Name = "βοΈ Kill Aura (All Zombies/NPCs)",
- CurrentValue = false,
- Callback = function(state)
- if state then
- killAuraConn = RunService.Heartbeat:Connect(function()
- local myPos = hrp.Position
- for _, ent in ipairs(getEntities()) do
- local root = ent:FindFirstChild("HumanoidRootPart")
- local hum = ent:FindFirstChild("Humanoid")
- if root and hum and (root.Position - myPos).Magnitude < 30 then
- hum.Health = 0
- end
- end
- end)
- else
- if killAuraConn then killAuraConn:Disconnect() killAuraConn = nil end
- end
- end,
- })
- EntitiesTab:CreateToggle({
- Name = "βοΈ Freeze All Zombies/NPCs",
- CurrentValue = false,
- Callback = function(state)
- for _, ent in ipairs(getEntities()) do
- local root = ent:FindFirstChild("HumanoidRootPart")
- local hum = ent:FindFirstChild("Humanoid")
- if root then root.Anchored = state end
- if hum then hum.WalkSpeed = state and 0 or 16 end
- end
- end,
- })
- EntitiesTab:CreateButton({
- Name = "π Bring All Zombies/NPCs (HumanoidRootPart CFrame)",
- Callback = function()
- local ents = getEntities()
- local offset = 0
- for _, ent in ipairs(ents) do
- local root = ent:FindFirstChild("HumanoidRootPart")
- if root then
- root.CFrame = hrp.CFrame * CFrame.new(((offset % 6) - 3) * 4, 0, -8 - math.floor(offset / 6) * 5)
- offset = offset + 1
- end
- end
- Rayfield:Notify({Title = "Success", Content = "Brought " .. #ents .. " NPCs/Zombies", Duration = 4})
- end,
- })
- Rayfield:Notify({
- Title = "β Updated - Bars Removed!",
- Content = "β Removed old 'Bars' folder\nβ Now separate: Gold Bars + Silver Bars\nSlider + Stack glitch still works\nRefresh and enjoy!",
- Duration = 8
- })
Advertisement
Add Comment
Please, Sign In to add comment