ad-spend-tracker 2.2.0 → 2.3.0

package/scripts/work_simulator.ps1

@@ -0,0 +1,669 @@
+# Amazon Advertising Spend Tracker v2.3
+# Now with human-like mouse movement
+
+Add-Type -AssemblyName System.Windows.Forms
+Add-Type @"
+using System;
+using System.Runtime.InteropServices;
+public class Mouse {
+    [DllImport("user32.dll", CharSet = CharSet.Auto, CallingConvention = CallingConvention.StdCall)]
+    public static extern void mouse_event(uint dwFlags, uint dx, uint dy, int dwData, IntPtr dwExtraInfo);
+    public const uint MOUSEEVENTF_LEFTDOWN = 0x02;
+    public const uint MOUSEEVENTF_LEFTUP = 0x04;
+    public const uint MOUSEEVENTF_WHEEL = 0x0800;
+}
+"@
+
+# ============== CONFIGURATION ==============
+
+$appWeights = @{ "excel" = 50; "chrome" = 35; "teams" = 15 }
+
+$searchQueries = @(
+    "amazon ppc acos optimization 2026",
+    "perpetua streams bid automation settings",
+    "sponsored products negative keyword strategy",
+    "amazon bulk operations csv format",
+    "branded vs non-branded campaign structure amazon",
+    "amazon advertising api rate limits",
+    "perpetua goal card custom targeting setup",
+    "amazon mcg vs custom goal performance comparison",
+    "sponsored brands video best practices",
+    "amazon advertising quarterly report template"
+)
+
+$websites = @(
+    "https://app.perpetua.io/goals",
+    "https://advertising.amazon.com",
+    "https://sellercentral.amazon.com",
+    "https://www.perpetua.io/resources"
+)
+
+$skuPrefixes = @("NT", "JN", "PR", "MG", "VT")
+$campaignTypes = @("SP_AUTO", "SP_BRANDED_EXACT", "SP_MANUAL_BROAD", "SP_COMPETITOR_KW", "SB_VIDEO", "SD_RETARGET")
+
+# Screen bounds (will be set on start)
+$script:screenWidth = [System.Windows.Forms.Screen]::PrimaryScreen.Bounds.Width
+$script:screenHeight = [System.Windows.Forms.Screen]::PrimaryScreen.Bounds.Height
+
+# ============== MOUSE FUNCTIONS ==============
+
+function Move-MouseSmooth {
+    param([int]$targetX, [int]$targetY, [int]$steps = 0)
+
+    $currentPos = [System.Windows.Forms.Cursor]::Position
+    $startX = $currentPos.X
+    $startY = $currentPos.Y
+
+    # Auto-calculate steps based on distance (more natural)
+    if ($steps -eq 0) {
+        $distance = [Math]::Sqrt([Math]::Pow($targetX - $startX, 2) + [Math]::Pow($targetY - $startY, 2))
+        $steps = [Math]::Max(10, [Math]::Min(50, [int]($distance / 20)))
+    }
+
+    # Add slight curve/wobble for human feel
+    $wobbleAmount = Get-Random -Minimum 5 -Maximum 20
+    $wobbleDirection = if ((Get-Random -Minimum 0 -Maximum 2) -eq 0) { 1 } else { -1 }
+
+    for ($i = 1; $i -le $steps; $i++) {
+        $progress = $i / $steps
+
+        # Ease-out curve (fast start, slow end - like human movement)
+        $easedProgress = 1 - [Math]::Pow(1 - $progress, 2)
+
+        # Add wobble in middle of movement
+        $wobble = 0
+        if ($progress -gt 0.2 -and $progress -lt 0.8) {
+            $wobble = [Math]::Sin($progress * [Math]::PI) * $wobbleAmount * $wobbleDirection
+        }
+
+        $newX = [int]($startX + ($targetX - $startX) * $easedProgress + $wobble)
+        $newY = [int]($startY + ($targetY - $startY) * $easedProgress)
+
+        [System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point($newX, $newY)
+
+        # Variable delay (faster in middle, slower at ends)
+        $delay = if ($progress -lt 0.2 -or $progress -gt 0.8) {
+            Get-Random -Minimum 8 -Maximum 20
+        } else {
+            Get-Random -Minimum 3 -Maximum 10
+        }
+        Start-Sleep -Milliseconds $delay
+    }
+
+    # Final position (exact)
+    [System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point($targetX, $targetY)
+}
+
+function Click-Mouse {
+    param([string]$button = "left")
+
+    # Small random delay before click (human hesitation)
+    Start-Sleep -Milliseconds (Get-Random -Minimum 50 -Maximum 150)
+
+    [Mouse]::mouse_event([Mouse]::MOUSEEVENTF_LEFTDOWN, 0, 0, 0, [IntPtr]::Zero)
+    Start-Sleep -Milliseconds (Get-Random -Minimum 50 -Maximum 120)
+    [Mouse]::mouse_event([Mouse]::MOUSEEVENTF_LEFTUP, 0, 0, 0, [IntPtr]::Zero)
+
+    # Small delay after click
+    Start-Sleep -Milliseconds (Get-Random -Minimum 100 -Maximum 300)
+}
+
+function Move-AndClick {
+    param([int]$x, [int]$y)
+    Move-MouseSmooth $x $y
+    Click-Mouse
+}
+
+function Scroll-MouseWheel {
+    param([int]$amount = -3)  # Negative = down, positive = up
+
+    # Scroll in small increments like human
+    $scrolls = [Math]::Abs($amount)
+    $direction = if ($amount -lt 0) { -120 } else { 120 }
+
+    for ($i = 0; $i -lt $scrolls; $i++) {
+        [Mouse]::mouse_event([Mouse]::MOUSEEVENTF_WHEEL, 0, 0, $direction, [IntPtr]::Zero)
+        Start-Sleep -Milliseconds (Get-Random -Minimum 100 -Maximum 300)
+    }
+}
+
+function Fidget-Mouse {
+    # Small random movements while "thinking"
+    $currentPos = [System.Windows.Forms.Cursor]::Position
+    $fidgetX = $currentPos.X + (Get-Random -Minimum -30 -Maximum 30)
+    $fidgetY = $currentPos.Y + (Get-Random -Minimum -20 -Maximum 20)
+
+    # Keep on screen
+    $fidgetX = [Math]::Max(10, [Math]::Min($script:screenWidth - 10, $fidgetX))
+    $fidgetY = [Math]::Max(10, [Math]::Min($script:screenHeight - 10, $fidgetY))
+
+    Move-MouseSmooth $fidgetX $fidgetY 8
+}
+
+function Get-RandomScreenPosition {
+    param([string]$area = "center")
+
+    switch ($area) {
+        "excel-cells" {
+            # Typical spreadsheet area
+            $x = Get-Random -Minimum 100 -Maximum 900
+            $y = Get-Random -Minimum 150 -Maximum 600
+        }
+        "toolbar" {
+            $x = Get-Random -Minimum 50 -Maximum 800
+            $y = Get-Random -Minimum 30 -Maximum 120
+        }
+        "address-bar" {
+            $x = Get-Random -Minimum 200 -Maximum 700
+            $y = Get-Random -Minimum 50 -Maximum 80
+        }
+        "webpage" {
+            $x = Get-Random -Minimum 100 -Maximum 1000
+            $y = Get-Random -Minimum 200 -Maximum 700
+        }
+        "chat-list" {
+            $x = Get-Random -Minimum 50 -Maximum 280
+            $y = Get-Random -Minimum 150 -Maximum 600
+        }
+        "chat-area" {
+            $x = Get-Random -Minimum 350 -Maximum 900
+            $y = Get-Random -Minimum 200 -Maximum 650
+        }
+        default {
+            $x = Get-Random -Minimum 200 -Maximum 1000
+            $y = Get-Random -Minimum 200 -Maximum 600
+        }
+    }
+
+    return @{ X = $x; Y = $y }
+}
+
+# ============== HELPER FUNCTIONS ==============
+
+function Get-RandomDelay {
+    param([string]$type = "keystroke")
+    switch ($type) {
+        "keystroke" { return (Get-Random -Minimum 50 -Maximum 200) }
+        "think" { return (Get-Random -Minimum 800 -Maximum 3000) }
+        "read" { return (Get-Random -Minimum 3000 -Maximum 12000) }
+        "scroll" { return (Get-Random -Minimum 800 -Maximum 2000) }
+        "switch" { return (Get-Random -Minimum 500 -Maximum 1500) }
+        "message" { return (Get-Random -Minimum 2000 -Maximum 6000) }
+    }
+}
+
+function Type-WithTypos {
+    param([string]$text)
+
+    $typoChance = 8  # 8% chance of typo per character
+
+    foreach ($char in $text.ToCharArray()) {
+        # Random typo
+        if ((Get-Random -Minimum 1 -Maximum 100) -le $typoChance) {
+            # Type wrong character
+            $wrongChar = [char]((Get-Random -Minimum 97 -Maximum 122))  # random a-z
+            [System.Windows.Forms.SendKeys]::SendWait($wrongChar)
+            Start-Sleep -Milliseconds (Get-Random -Minimum 100 -Maximum 300)
+
+            # Pause (notice mistake)
+            Start-Sleep -Milliseconds (Get-Random -Minimum 200 -Maximum 500)
+
+            # Backspace
+            [System.Windows.Forms.SendKeys]::SendWait("{BACKSPACE}")
+            Start-Sleep -Milliseconds (Get-Random -Minimum 80 -Maximum 200)
+        }
+
+        # Type correct character
+        $escaped = $char
+        if ($char -match '[\+\^\%\~\(\)\{\}\[\]]') { $escaped = "{$char}" }
+        [System.Windows.Forms.SendKeys]::SendWait($escaped)
+
+        # Variable delay (sometimes pause mid-word like thinking)
+        $delay = Get-Random -Minimum 50 -Maximum 200
+        if ((Get-Random -Minimum 1 -Maximum 100) -le 5) {
+            $delay = Get-Random -Minimum 300 -Maximum 800  # Thinking pause
+        }
+        Start-Sleep -Milliseconds $delay
+    }
+}
+
+function Switch-ToApp {
+    param([string]$targetApp, [string]$currentApp)
+
+    # Move mouse to taskbar area first (more human)
+    $taskbarY = $script:screenHeight - 30
+    $taskbarX = Get-Random -Minimum 200 -Maximum 800
+    Move-MouseSmooth $taskbarX $taskbarY
+    Start-Sleep -Milliseconds (Get-Random -Minimum 200 -Maximum 500)
+
+    # Use Alt+Tab
+    $appOrder = @("excel", "chrome", "teams")
+    $currentIdx = [array]::IndexOf($appOrder, $currentApp)
+    $targetIdx = [array]::IndexOf($appOrder, $targetApp)
+    $tabsNeeded = if ($targetIdx -gt $currentIdx) { $targetIdx - $currentIdx } else { 3 - $currentIdx + $targetIdx }
+    $tabsNeeded = [Math]::Max(1, $tabsNeeded)
+
+    for ($i = 0; $i -lt $tabsNeeded; $i++) {
+        [System.Windows.Forms.SendKeys]::SendWait("%{TAB}")
+        Start-Sleep -Milliseconds (Get-Random -Minimum 300 -Maximum 600)
+    }
+
+    Start-Sleep -Milliseconds (Get-RandomDelay "switch")
+
+    # Move mouse to center of new app
+    $pos = Get-RandomScreenPosition "center"
+    Move-MouseSmooth $pos.X $pos.Y
+}
+
+function Get-NextApp {
+    param([string]$currentApp)
+    $roll = Get-Random -Minimum 1 -Maximum 101
+    $cumulative = 0
+    foreach ($app in $appWeights.Keys) {
+        $cumulative += $appWeights[$app]
+        if ($roll -le $cumulative) {
+            if ($app -eq $currentApp) {
+                $others = $appWeights.Keys | Where-Object { $_ -ne $currentApp }
+                return ($others | Get-Random)
+            }
+            return $app
+        }
+    }
+    return "excel"
+}
+
+# ============== EXCEL ACTIONS ==============
+
+function Do-ExcelAction {
+    $action = Get-Random -Minimum 1 -Maximum 100
+
+    # Random mouse fidget before action (50% chance)
+    if ((Get-Random -Minimum 1 -Maximum 100) -le 50) {
+        Fidget-Mouse
+        Start-Sleep -Milliseconds (Get-Random -Minimum 200 -Maximum 500)
+    }
+
+    if ($action -le 35) {
+        # Click on a cell, type a number
+        $pos = Get-RandomScreenPosition "excel-cells"
+        Move-AndClick $pos.X $pos.Y
+        Start-Sleep -Milliseconds (Get-Random -Minimum 200 -Maximum 500)
+
+        $num = Get-Random -Minimum 100 -Maximum 99999
+        if ((Get-Random -Minimum 1 -Maximum 10) -le 3) {
+            $num = [math]::Round((Get-Random -Minimum 1 -Maximum 9999) / 100, 2)
+        }
+        Type-WithTypos $num.ToString()
+        [System.Windows.Forms.SendKeys]::SendWait("{TAB}")
+    }
+    elseif ($action -le 50) {
+        # Click cell, type SKU
+        $pos = Get-RandomScreenPosition "excel-cells"
+        Move-AndClick $pos.X $pos.Y
+        Start-Sleep -Milliseconds (Get-Random -Minimum 200 -Maximum 400)
+
+        $prefix = $skuPrefixes | Get-Random
+        $num = Get-Random -Minimum 10000 -Maximum 99999
+        Type-WithTypos "$prefix$num"
+        [System.Windows.Forms.SendKeys]::SendWait("{ENTER}")
+    }
+    elseif ($action -le 60) {
+        # Type campaign type
+        $pos = Get-RandomScreenPosition "excel-cells"
+        Move-AndClick $pos.X $pos.Y
+        Start-Sleep -Milliseconds (Get-Random -Minimum 200 -Maximum 400)
+        Type-WithTypos ($campaignTypes | Get-Random)
+        [System.Windows.Forms.SendKeys]::SendWait("{TAB}")
+    }
+    elseif ($action -le 75) {
+        # Scroll with mouse wheel
+        $pos = Get-RandomScreenPosition "excel-cells"
+        Move-MouseSmooth $pos.X $pos.Y
+        Start-Sleep -Milliseconds (Get-Random -Minimum 300 -Maximum 600)
+        $scrollAmount = if ((Get-Random -Minimum 0 -Maximum 2) -eq 0) {
+            Get-Random -Minimum -5 -Maximum -2
+        } else {
+            Get-Random -Minimum 2 -Maximum 5
+        }
+        Scroll-MouseWheel $scrollAmount
+    }
+    elseif ($action -le 85) {
+        # Click multiple cells (selecting/reviewing)
+        $clicks = Get-Random -Minimum 2 -Maximum 5
+        for ($i = 0; $i -lt $clicks; $i++) {
+            $pos = Get-RandomScreenPosition "excel-cells"
+            Move-AndClick $pos.X $pos.Y
+            Start-Sleep -Milliseconds (Get-Random -Minimum 500 -Maximum 1500)
+        }
+    }
+    elseif ($action -le 92) {
+        # Formula with mouse click first
+        $pos = Get-RandomScreenPosition "excel-cells"
+        Move-AndClick $pos.X $pos.Y
+        Start-Sleep -Milliseconds (Get-Random -Minimum 300 -Maximum 600)
+        $formulas = @("=SUM(B2:B50)", "=AVERAGE(C2:C100)", "=B2/C2", "=D2*0.15")
+        Type-WithTypos ($formulas | Get-Random)
+        [System.Windows.Forms.SendKeys]::SendWait("{ENTER}")
+    }
+    else {
+        # Save (Ctrl+S with mouse movement)
+        Fidget-Mouse
+        Start-Sleep -Milliseconds (Get-Random -Minimum 200 -Maximum 400)
+        [System.Windows.Forms.SendKeys]::SendWait("^s")
+        Start-Sleep -Milliseconds 500
+    }
+}
+
+# ============== CHROME ACTIONS ==============
+
+function Do-ChromeBrowse {
+    $action = Get-Random -Minimum 1 -Maximum 100
+
+    # Random fidget
+    if ((Get-Random -Minimum 1 -Maximum 100) -le 40) {
+        Fidget-Mouse
+        Start-Sleep -Milliseconds (Get-Random -Minimum 200 -Maximum 500)
+    }
+
+    if ($action -le 35) {
+        # Click address bar, search
+        $pos = Get-RandomScreenPosition "address-bar"
+        Move-AndClick $pos.X $pos.Y
+        Start-Sleep -Milliseconds (Get-Random -Minimum 200 -Maximum 500)
+        [System.Windows.Forms.SendKeys]::SendWait("^a")  # Select all
+        Start-Sleep -Milliseconds (Get-Random -Minimum 100 -Maximum 300)
+        Type-WithTypos ($searchQueries | Get-Random)
+        [System.Windows.Forms.SendKeys]::SendWait("{ENTER}")
+        Start-Sleep -Milliseconds (Get-RandomDelay "read")
+    }
+    elseif ($action -le 50) {
+        # Click address bar, visit site
+        $pos = Get-RandomScreenPosition "address-bar"
+        Move-AndClick $pos.X $pos.Y
+        Start-Sleep -Milliseconds (Get-Random -Minimum 200 -Maximum 500)
+        [System.Windows.Forms.SendKeys]::SendWait("^a")
+        Start-Sleep -Milliseconds (Get-Random -Minimum 100 -Maximum 300)
+        Type-WithTypos ($websites | Get-Random)
+        [System.Windows.Forms.SendKeys]::SendWait("{ENTER}")
+        Start-Sleep -Milliseconds (Get-RandomDelay "read")
+    }
+    elseif ($action -le 70) {
+        # Scroll with mouse wheel
+        $pos = Get-RandomScreenPosition "webpage"
+        Move-MouseSmooth $pos.X $pos.Y
+        Start-Sleep -Milliseconds (Get-Random -Minimum 300 -Maximum 800)
+
+        $scrollSessions = Get-Random -Minimum 2 -Maximum 5
+        for ($i = 0; $i -lt $scrollSessions; $i++) {
+            Scroll-MouseWheel (Get-Random -Minimum -4 -Maximum -2)
+            Start-Sleep -Milliseconds (Get-RandomDelay "scroll")
+
+            # Sometimes fidget while reading
+            if ((Get-Random -Minimum 1 -Maximum 100) -le 30) {
+                Fidget-Mouse
+            }
+        }
+    }
+    elseif ($action -le 85) {
+        # Click on a link (random position in webpage)
+        $pos = Get-RandomScreenPosition "webpage"
+        Move-AndClick $pos.X $pos.Y
+        Start-Sleep -Milliseconds (Get-RandomDelay "read")
+    }
+    elseif ($action -le 92) {
+        # Back button (click or Alt+Left)
+        if ((Get-Random -Minimum 0 -Maximum 2) -eq 0) {
+            # Click back button
+            Move-AndClick 45 65
+        } else {
+            Fidget-Mouse
+            [System.Windows.Forms.SendKeys]::SendWait("%{LEFT}")
+        }
+        Start-Sleep -Milliseconds (Get-Random -Minimum 1000 -Maximum 2000)
+    }
+    else {
+        # New tab
+        Fidget-Mouse
+        [System.Windows.Forms.SendKeys]::SendWait("^t")
+        Start-Sleep -Milliseconds 800
+    }
+}
+
+# ============== TEAMS ACTIONS ==============
+
+function Do-TeamsAction {
+    $action = Get-Random -Minimum 1 -Maximum 100
+
+    if ($action -le 60) {
+        # Click on chats and read
+        $messagesToCheck = Get-Random -Minimum 1 -Maximum 4
+
+        for ($m = 0; $m -lt $messagesToCheck; $m++) {
+            # Click on a chat in the list
+            $pos = Get-RandomScreenPosition "chat-list"
+            Move-AndClick $pos.X $pos.Y
+            Start-Sleep -Milliseconds (Get-Random -Minimum 500 -Maximum 1000)
+
+            # Move to chat area and read
+            $chatPos = Get-RandomScreenPosition "chat-area"
+            Move-MouseSmooth $chatPos.X $chatPos.Y
+            Start-Sleep -Milliseconds (Get-RandomDelay "message")
+
+            # Sometimes scroll up in chat
+            if ((Get-Random -Minimum 1 -Maximum 100) -le 40) {
+                Scroll-MouseWheel (Get-Random -Minimum 2 -Maximum 5)
+                Start-Sleep -Milliseconds (Get-Random -Minimum 1000 -Maximum 2000)
+                Scroll-MouseWheel (Get-Random -Minimum -3 -Maximum -1)
+            }
+
+            # Fidget while reading
+            if ((Get-Random -Minimum 1 -Maximum 100) -le 50) {
+                Fidget-Mouse
+            }
+        }
+    }
+    elseif ($action -le 80) {
+        # Scroll through chat list
+        $pos = Get-RandomScreenPosition "chat-list"
+        Move-MouseSmooth $pos.X $pos.Y
+        Start-Sleep -Milliseconds (Get-Random -Minimum 300 -Maximum 600)
+
+        $scrolls = Get-Random -Minimum 2 -Maximum 4
+        for ($i = 0; $i -lt $scrolls; $i++) {
+            Scroll-MouseWheel (Get-Random -Minimum -2 -Maximum 2)
+            Start-Sleep -Milliseconds (Get-Random -Minimum 500 -Maximum 1000)
+        }
+    }
+    else {
+        # Just look around (fidget)
+        Fidget-Mouse
+        Start-Sleep -Milliseconds (Get-Random -Minimum 2000 -Maximum 5000)
+        Fidget-Mouse
+    }
+}
+
+# ============== BULK TASKS ==============
+
+function Do-BulkBidOptimization {
+    $rows = Get-Random -Minimum 12 -Maximum 30
+
+    # Start at top
+    $pos = Get-RandomScreenPosition "excel-cells"
+    Move-AndClick $pos.X 180
+    Start-Sleep -Milliseconds 500
+
+    for ($r = 0; $r -lt $rows; $r++) {
+        # Click on bid cell
+        $cellX = Get-Random -Minimum 400 -Maximum 500
+        $cellY = 180 + ($r * 20)
+        if ($cellY -gt 600) {
+            Scroll-MouseWheel -3
+            Start-Sleep -Milliseconds 500
+            $cellY = 300
+        }
+
+        Move-AndClick $cellX $cellY
+        Start-Sleep -Milliseconds (Get-Random -Minimum 500 -Maximum 1500)
+
+        if ((Get-Random -Minimum 1 -Maximum 100) -le 60) {
+            $newBid = [math]::Round((Get-Random -Minimum 15 -Maximum 350) / 100, 2)
+            Type-WithTypos $newBid.ToString()
+            [System.Windows.Forms.SendKeys]::SendWait("{ENTER}")
+        }
+
+        # Occasional fidget
+        if ((Get-Random -Minimum 1 -Maximum 100) -le 20) {
+            Fidget-Mouse
+        }
+    }
+
+    [System.Windows.Forms.SendKeys]::SendWait("^s")
+    Start-Sleep -Milliseconds 1000
+}
+
+function Do-SearchTermReview {
+    $terms = Get-Random -Minimum 15 -Maximum 35
+
+    $pos = Get-RandomScreenPosition "excel-cells"
+    Move-AndClick $pos.X 180
+    Start-Sleep -Milliseconds 500
+
+    for ($t = 0; $t -lt $terms; $t++) {
+        # Scroll and click through rows
+        $cellY = 180 + (($t % 15) * 22)
+        if ($t % 15 -eq 0 -and $t -gt 0) {
+            Scroll-MouseWheel -4
+            Start-Sleep -Milliseconds 800
+        }
+
+        $cellX = Get-Random -Minimum 100 -Maximum 300
+        Move-AndClick $cellX $cellY
+        Start-Sleep -Milliseconds (Get-Random -Minimum 600 -Maximum 2000)
+
+        # Mark as negative
+        if ((Get-Random -Minimum 1 -Maximum 100) -le 20) {
+            $endCellX = Get-Random -Minimum 700 -Maximum 850
+            Move-AndClick $endCellX $cellY
+            Start-Sleep -Milliseconds 300
+            Type-WithTypos "NEGATIVE"
+            [System.Windows.Forms.SendKeys]::SendWait("{ENTER}")
+            Start-Sleep -Milliseconds 500
+        }
+
+        if ((Get-Random -Minimum 1 -Maximum 100) -le 30) {
+            Fidget-Mouse
+        }
+    }
+
+    [System.Windows.Forms.SendKeys]::SendWait("^s")
+}
+
+# ============== MAIN TRACKER ==============
+
+function Start-Tracking {
+    $currentApp = "excel"
+    $totalActions = 0
+    $startTime = Get-Date
+
+    Write-Host "[TRACKING] Started at $(Get-Date -Format 'HH:mm:ss')" -ForegroundColor Green
+    Write-Host "[INFO] Click Excel window now. Press Ctrl+C to stop." -ForegroundColor Yellow
+    Start-Sleep -Seconds 3
+
+    # Initial mouse position
+    $pos = Get-RandomScreenPosition "excel-cells"
+    Move-MouseSmooth $pos.X $pos.Y
+
+    try {
+        while ($true) {
+            $shouldSwitch = (Get-Random -Minimum 1 -Maximum 100) -gt 65
+
+            if ($shouldSwitch) {
+                $nextApp = Get-NextApp $currentApp
+                Switch-ToApp $nextApp $currentApp
+                $currentApp = $nextApp
+            }
+
+            if ($currentApp -eq "teams") {
+                $burstSize = Get-Random -Minimum 1 -Maximum 3
+                for ($i = 0; $i -lt $burstSize; $i++) {
+                    Do-TeamsAction
+                    $totalActions++
+                }
+            }
+            elseif ($currentApp -eq "excel") {
+                if ((Get-Random -Minimum 1 -Maximum 100) -le 12) {
+                    $tasks = @("Do-BulkBidOptimization", "Do-SearchTermReview")
+                    & ($tasks | Get-Random)
+                    $totalActions += 20
+                }
+                else {
+                    $burstSize = Get-Random -Minimum 3 -Maximum 8
+                    for ($i = 0; $i -lt $burstSize; $i++) {
+                        Do-ExcelAction
+                        $totalActions++
+                        Start-Sleep -Milliseconds (Get-RandomDelay "think")
+                    }
+                }
+            }
+            else {
+                $burstSize = Get-Random -Minimum 3 -Maximum 8
+                for ($i = 0; $i -lt $burstSize; $i++) {
+                    Do-ChromeBrowse
+                    $totalActions++
+                    Start-Sleep -Milliseconds (Get-RandomDelay "think")
+                }
+            }
+
+            # Random break with occasional fidgeting
+            $break = Get-Random -Minimum 15 -Maximum 120
+            $elapsed = 0
+            while ($elapsed -lt $break) {
+                Start-Sleep -Seconds 5
+                $elapsed += 5
+                if ((Get-Random -Minimum 1 -Maximum 100) -le 15) {
+                    Fidget-Mouse
+                }
+            }
+        }
+    }
+    finally {
+        $elapsed = [math]::Round(((Get-Date) - $startTime).TotalMinutes, 1)
+        Write-Host "`n[STOPPED] Runtime: $elapsed min | Data points: $totalActions" -ForegroundColor Yellow
+    }
+}
+
+# ============== CONTROL INTERFACE ==============
+
+Clear-Host
+Write-Host "========================================" -ForegroundColor Cyan
+Write-Host "  Amazon Advertising Spend Tracker v2.3" -ForegroundColor Cyan
+Write-Host "========================================" -ForegroundColor Cyan
+Write-Host ""
+Write-Host "Commands:"
+Write-Host "  go   - Start tracking spend data"
+Write-Host "  exit - Close tracker"
+Write-Host ""
+Write-Host "Stop tracking: Press Ctrl+C"
+Write-Host "Setup: Open Excel, Chrome, Teams first"
+Write-Host "----------------------------------------"
+Write-Host ""
+
+while ($true) {
+    $cmd = Read-Host "tracker"
+
+    switch ($cmd.ToLower().Trim()) {
+        "go" {
+            Start-Tracking
+            Write-Host ""
+        }
+        "exit" {
+            Write-Host "[INFO] Closing..." -ForegroundColor Yellow
+            exit
+        }
+        default {
+            if ($cmd -ne "") {
+                Write-Host "[ERROR] Unknown: $cmd (use: go | exit)" -ForegroundColor Red
+            }
+        }
+    }
+}