PasteShr

New Paste Browse

local Players = game:GetService("Players")
local UserInputService = game:GetService("UserInputService")
local ContextActionService = game:GetService("ContextActionService")
local ReplicatedStorage = game:GetService("ReplicatedStorage"):WaitForChild("ReplicatedStorage", 5) or game:GetService("ReplicatedStorage")
local TweenService = game:GetService("TweenService")
local CollectionService = game:GetService("CollectionService")
local RunService = game:GetService("RunService")
local pcall = pcall

local TouchEnabled = UserInputService.TouchEnabled

local player = Players.LocalPlayer
local playerGui = player:WaitForChild("PlayerGui", 5)

-- Wait for character and handle respawns
local character = player.Character or player.CharacterAdded:Wait()
local humanoid = character:WaitForChild("Humanoid", 5)
local rootPart = character:WaitForChild("HumanoidRootPart", 5)

player.CharacterAdded:Connect(function(newChar)
    character = newChar
    humanoid = newChar:WaitForChild("Humanoid", 5)
    rootPart = newChar:WaitForChild("HumanoidRootPart", 5)
end)

-- Create or get RemoteEvent with safety
local counterRemote
pcall(function()
    counterRemote = ReplicatedStorage:WaitForChild("CounterAttack", 3)
    if not counterRemote then
        counterRemote = Instance.new("RemoteEvent")
        counterRemote.Name = "CounterAttack"
        counterRemote.Parent = ReplicatedStorage
    end
end)

-- Config: Move-specific ranges
local DETECTION_RANGES = {
    ChargeGrab = 15,
    MeleeSwing = 8,
    GodsTrickery = 12,
    Default = 10
}

-- Known attack keywords
local ATTACK_KEYWORDS = {"attack", "swing", "charge", "grab", "punch", "slash", "trick", "hit", "strike", "melee", "god"}

local COOLDOWN = 2
local isBlocking = false
local lastCounter = 0
local frameCounter = 0  -- For throttling

-- Per-enemy debounce
local enemyDebounce = {}

-- Auto-Tag Common Executioners (shallower recursion for Delta perf)
local possibleEnemyNames = {"_2011X", "Fleetway", "V1", "Chaos", "Executioner", "Killer"}
local function findAndTagEnemies(parent, depth)
    if depth > 3 then return end  -- Limit depth
    pcall(function()
        for _, obj in ipairs(parent:GetChildren()) do
            if obj:IsA("Model") and table.find(possibleEnemyNames, obj.Name) and obj:FindFirstChild("Humanoid") and not CollectionService:HasTag(obj, "EnemyAttacker") then
                CollectionService:AddTag(obj, "EnemyAttacker")
            end
            findAndTagEnemies(obj, depth + 1)
        end
    end)
end

local function autoTagEnemies()
    pcall(findAndTagEnemies, workspace, 0)
end
autoTagEnemies()
task.spawn(function()
    while task.wait(10) do  -- Slower poll for Delta
        autoTagEnemies()
    end
end)

-- GUI Setup (Delta-safe)
local screenGui = Instance.new("ScreenGui")
screenGui.Name = "KnucklesCounterGUI"
screenGui.ResetOnSpawn = false
screenGui.Parent = playerGui

local mainFrame = Instance.new("Frame")
mainFrame.Size = UDim2.new(0, 220, 0, 120)
mainFrame.Position = UDim2.new(0, 10, 0, 10)
mainFrame.BackgroundColor3 = Color3.new(0, 0, 0)
mainFrame.BackgroundTransparency = 0.5
mainFrame.BorderSizePixel = 2
mainFrame.BorderColor3 = Color3.new(1, 0, 0)
mainFrame.Parent = screenGui

local titleLabel = Instance.new("TextLabel")
titleLabel.Size = UDim2.new(1, 0, 0.3, 0)
titleLabel.BackgroundTransparency = 1
titleLabel.Text = "Knuckles Auto-Counter"
titleLabel.TextColor3 = Color3.new(1, 0, 0)
titleLabel.TextScaled = true
titleLabel.Font = Enum.Font.SourceSansBold
titleLabel.Parent = mainFrame

local statusLabel = Instance.new("TextLabel")
statusLabel.Size = UDim2.new(1, 0, 0.3, 0)
statusLabel.Position = UDim2.new(0, 0, 0.3, 0)
statusLabel.BackgroundTransparency = 1
statusLabel.Text = TouchEnabled and "Tap Button to Toggle Block" or "Hold E to Block"
statusLabel.TextColor3 = Color3.new(1, 1, 1)
statusLabel.TextScaled = true
statusLabel.Font = Enum.Font.SourceSansItalic
statusLabel.Parent = mainFrame

local instructLabel = Instance.new("TextLabel")
instructLabel.Size = UDim2.new(1, 0, 0.2, 0)
instructLabel.Position = UDim2.new(0, 0, 0.6, 0)
instructLabel.BackgroundTransparency = 1
instructLabel.Text = "Auto-tags & detects attacks!"
instructLabel.TextColor3 = Color3.new(0, 1, 0)
instructLabel.TextScaled = true
instructLabel.Font = Enum.Font.SourceSans
instructLabel.Parent = mainFrame

-- Toggle Button (Mobile)
local toggleButton = Instance.new("TextButton")
toggleButton.Size = UDim2.new(0.9, 0, 0.2, 0)
toggleButton.Position = UDim2.new(0.05, 0, 0.8, 0)
toggleButton.BackgroundColor3 = Color3.new(1, 0, 0)
toggleButton.Text = "Toggle Block (Off)"
toggleButton.TextColor3 = Color3.new(1, 1, 1)
toggleButton.TextScaled = true
toggleButton.Font = Enum.Font.SourceSansBold
toggleButton.Visible = TouchEnabled
toggleButton.Parent = mainFrame

local function setBlocking(state)
    isBlocking = state
    if humanoid then
        humanoid.WalkSpeed = state and 8 or 16
    end
    toggleButton.Text = "Toggle Block (" .. (state and "On" or "Off") .. ")"
    toggleButton.BackgroundColor3 = state and Color3.new(0, 1, 0) or Color3.new(1, 0, 0)
    updateStatusGUI()
end

toggleButton.MouseButton1Click:Connect(function()
    setBlocking(not isBlocking)
end)

-- Input: Use ContextActionService for better Delta support
local blockAction = "BlockAction"
ContextActionService:BindAction(blockAction, function(actionName, inputState, inputObj)
    if actionName == blockAction then
        if inputState == Enum.UserInputState.Begin then
            setBlocking(true)
        elseif inputState == Enum.UserInputState.End then
            setBlocking(false)
        end
        return Enum.ContextActionResult.Sink
    end
end, false, Enum.KeyCode.E)
if TouchEnabled then
    ContextActionService:BindAction(blockAction, function() end, true, Enum.KeyCode.ButtonA)  -- Fallback for mobile
end

-- Update GUI (throttled)
local function updateStatusGUI()
    if not statusLabel then return end
    local baseText = isBlocking and "Blocking... Scanning attacks!" or (TouchEnabled and "Tap Button to Toggle Block" or "Hold E to Block")
    statusLabel.Text = baseText
    
    local cooldownLeft = COOLDOWN - (tick() - lastCounter)
    if cooldownLeft > 0 then
        statusLabel.Text = baseText .. "\nCooldown: " .. string.format("%.1f", cooldownLeft) .. "s"
        statusLabel.TextColor3 = Color3.new(1, 1, 0)
    else
        statusLabel.TextColor3 = isBlocking and Color3.new(0, 1, 0) or Color3.new(1, 1, 1)
    end
end

-- Punch effect (non-blocking)
local function playPunchEffect(moveType)
    pcall(function()
        local punchSound = Instance.new("Sound")
        punchSound.SoundId = "rbxassetid://156894510"
        punchSound.Volume = 1
        if rootPart then punchSound.Parent = rootPart end
        punchSound:Play()
        game:GetService("Debris"):AddItem(punchSound, 5)
        
        local camera = workspace.CurrentCamera
        local originalFOV = camera.FieldOfView
        local shake = TweenService:Create(camera, TweenInfo.new(0.1, Enum.EasingStyle.Linear, Enum.EasingDirection.Out, 5, true), {FieldOfView = originalFOV + math.random(-5, 5)})
        shake:Play()
        task.spawn(function()
            shake.Completed:Wait()
            camera.FieldOfView = originalFOV
        end)
        
        local flash = TweenService:Create(mainFrame, TweenInfo.new(0.2), {BackgroundTransparency = 0.2})
        flash:Play()
        task.spawn(function()
            flash.Completed:Wait()
            TweenService:Create(mainFrame, TweenInfo.new(0.2), {BackgroundTransparency = 0.5}):Play()
        end)
    end)
end

-- Infer move type
local function inferMoveType(name)
    if not name then return "Default" end
    name = name:lower()
    if name:find("charge") or name:find("grab") then return "ChargeGrab"
    elseif name:find("melee") or name:find("swing") or name:find("punch") or name:find("slash") then return "MeleeSwing"
    elseif name:find("god") or name:find("trick") then return "GodsTrickery"
    end
    return "Default"
end

-- Is attack
local function isAttackName(name)
    if not name then return false end
    name = name:lower()
    for _, keyword in ipairs(ATTACK_KEYWORDS) do
        if name:find(keyword) then return true end
    end
    return false
end

-- Connections cache
local animConnections = {}
local soundConnections = {}

-- Connect to enemy
local function connectEnemyDetection(enemy)
    if animConnections[enemy] then return end
    local hum = enemy:FindFirstChild("Humanoid")
    if not hum then return end
    
    pcall(function()
        local animConn = hum.AnimationPlayed:Connect(function(track)
            if track.IsPlaying and track.Animation and isAttackName(track.Animation.Name) then
                local moveType = inferMoveType(track.Animation.Name)
                performCounterIfInRange(enemy, moveType)
            end
        end)
        animConnections[enemy] = animConn
        
        local root = enemy:FindFirstChild("HumanoidRootPart") or enemy
        local soundConn = root.ChildAdded:Connect(function(child)
            if child:IsA("Sound") and child.IsPlaying and isAttackName(child.Name) then
                local moveType = inferMoveType(child.Name)
                performCounterIfInRange(enemy, moveType)
            end
        end)
        soundConnections[enemy] = soundConn
    end)
end

-- Shared counter logic with debounce
local function performCounterIfInRange(enemy, moveType)
    if not isBlocking or tick() - lastCounter < COOLDOWN then return end
    local now = tick()
    if enemyDebounce[enemy] and now - enemyDebounce[enemy] < 0.5 then return end  -- Per-enemy debounce
    enemyDebounce[enemy] = now
    
    local enemyRoot = enemy:FindFirstChild("HumanoidRootPart")
    if enemyRoot and rootPart then
        local distance = (rootPart.Position - enemyRoot.Position).Magnitude
        local range = DETECTION_RANGES[moveType] or DETECTION_RANGES.Default
        if distance <= range then
            pcall(function()
                counterRemote:FireServer(enemy.Name, moveType)  -- Send name instead of instance for safety
                playPunchEffect(moveType)
                lastCounter = now
                updateStatusGUI()
            end)
        end
    end
end

-- Main Detection Loop (throttled)
RunService.Heartbeat:Connect(function()
    frameCounter = frameCounter + 1
    if frameCounter % 2 ~= 0 then return end  -- Every 2nd frame
    updateStatusGUI()
    
    if not isBlocking then return end
    
    local myPos = rootPart and rootPart.Position
    if not myPos then return end
    
    pcall(function()
        for _, enemy in ipairs(CollectionService:GetTagged("EnemyAttacker")) do
            if enemy and enemy:FindFirstChild("HumanoidRootPart") and enemy:FindFirstChild("Humanoid") and enemy.Humanoid.Health > 0 then
                connectEnemyDetection(enemy)
                
                -- Proactive checks
                local hum = enemy.Humanoid
                for _, track in ipairs(hum:GetPlayingAnimationTracks()) do
                    if track.IsPlaying and track.Animation and isAttackName(track.Animation.Name) then
                        local moveType = inferMoveType(track.Animation.Name)
                        performCounterIfInRange(enemy, moveType)
                    end
                end
                
                local root = enemy:FindFirstChild("HumanoidRootPart") or enemy
                for _, child in ipairs(root:GetChildren()) do
                    if child:IsA("Sound") and child.IsPlaying and isAttackName(child.Name) then
                        local moveType = inferMoveType(child.Name)
                        performCounterIfInRange(enemy, moveType)
                    end
                end
            end
        end
    end)
end)

-- Cleanup
CollectionService:GetInstanceRemovedSignal("EnemyAttacker"):Connect(function(enemy)
    if animConnections[enemy] then
        animConnections[enemy]:Disconnect()
        animConnections[enemy] = nil
    end
    if soundConnections[enemy] then
        soundConnections[enemy]:Disconnect()
        soundConnections[enemy] = nil
    end
    enemyDebounce[enemy] = nil
end)

Paste Settings

Paste Title : [Optional]

Paste Folder : [Optional]

Syntax Highlighting : [Optional]

Paste Expiration : [Optional]

Paste Status : [Optional]

Password : [Optional]

Description: [Optional]

Tags: [Optional]

Encrypt Paste (?)

You are currently not logged in, this means you can not edit or delete anything you paste. Sign Up or Login

Recent Pastes

galaxy sprint iready game
Plaintext | 0 | 1 minute ago
prodigy x hack menu
Plaintext | 0 | 1 minute ago
invisible character ascii
Plaintext | 0 | 1 minute ago
gen 3 ou
Plaintext | 0 | 1 minute ago
ban script roblox
Plaintext | 0 | 1 minute ago
copypasta bee movie script
Plaintext | 0 | 6 minutes ago
typing club script
Plaintext | 0 | 6 minutes ago

Paste Settings

Site Languages