
Key Required

-- special thanks to: https://scriptblox.com/script/PARKOUR-Halloween-bag-auto-farm-9167
-- to refresh the texts, simply rerun the script
wait(1)
SPECIFIC_NAME = "Konethorix"
plr = game.Players:FindFirstChild(SPECIFIC_NAME) or game.Players.LocalPlayer
oldcontainer = workspace:FindFirstChild("MARKERTAINER")
if oldcontainer then oldcontainer:Destroy() end
container = Instance.new("Folder")
container.Name = "MARKERTAINER"
container.Parent = workspace
--//////////////////////////////////////
function checkValid(bag)
-- check if the bag is touching anything and not floating in mid air or deep inside a building
local params = OverlapParams.new()
params.FilterType = Enum.RaycastFilterType.Exclude
params.FilterDescendantsInstances = {bag}
local cf,size = bag:GetBoundingBox()
local touchers = workspace:GetPartBoundsInBox(cf, size + Vector3.new(2,2,2), params)
for _,v in pairs(touchers) do
if v.CanCollide and v.Size.Magnitude >= 30 then
local size = v.Size
local relcf = v.CFrame:ToObjectSpace(cf)
local relX = relcf.X
local checkX = relX <= -size.X / 2 or relX >= size.X / 2
local relZ = relcf.Z
local checkZ = relZ <= -size.Z / 2 or relZ >= size.Z / 2
local relY = relcf.Y
local checkY = relY <= -size.Y / 2 or relY >= size.Y / 2
if not checkX and not checkZ and not checkY then return false end
end
end
return #touchers > 0
end
function mark(bag)
local tip = Instance.new("Part")
tip.CanTouch = false
tip.CanQuery = false
tip.Anchored = true
tip.CFrame = bag:GetModelCFrame()
tip.Transparency = 1
tip.CanCollide = false
tip.Parent = container
local bill = Instance.new("BillboardGui")
bill.AlwaysOnTop = true
bill.Size = UDim2.new(0,30,0,30)
bill.Adornee = tip
bill.Parent = tip
local lab = Instance.new("TextLabel")
lab.Text = "distance"
lab.Size = UDim2.new(1,0,1,0)
lab.BackgroundTransparency = 1
lab.TextStrokeTransparency = 0
lab.TextColor3 = Color3.new(1,1,1)
lab.TextScaled = true
lab.Parent = bill
end
rarity = {"Uncommon", "Common", "Rare", "Epic", "Legendary", "Ultimate", "Resplendent", "Halloween"}
for _,v in pairs(workspace:GetDescendants()) do
if v:IsA("StringValue") and table.find(rarity, v.Value) and checkValid(v.Parent) then
mark(v.Parent)
end
end
while container.Parent do
local root = plr.Character and plr.Character:FindFirstChild("HumanoidRootPart")
if root then
for _,tip in pairs(container:GetChildren()) do
local dist = (tip.Position - root.Position).Magnitude
local alpha = math.clamp(dist-50, 0, 1000)/1000
local postalpha = math.sin(math.rad(alpha*90))^0.5
local lab = tip.BillboardGui.TextLabel
lab.TextColor3 = Color3.new(0,1,0):Lerp(Color3.new(1,1,1), postalpha)
lab.Text = tostring(math.round(dist))
lab.Visible = dist <= 1500 and true or false
end
end
wait()
end


works but when you grab the bag the numbers dont disappear