接入指南

Add-Type -AssemblyName System.Drawing

$package = @(Get-AppxPackage -Name 'Claude' -ErrorAction SilentlyContinue) |
    Where-Object { $_.Status -eq 'Ok' } |
    Sort-Object -Property Version -Descending |
    Select-Object -First 1
if (-not $package) { throw '未检测到官方 Claude Desktop，请先安装并打开一次。' }

$manifest = Get-AppxPackageManifest -Package $package.PackageFullName
$appNodes = @($manifest.SelectNodes("//*[local-name()='Applications']/*[local-name()='Application']"))
$appNode = $appNodes | Where-Object { $_.GetAttribute('Id') -eq 'Claude' } | Select-Object -First 1
if (-not $appNode) {
    $appNode = $appNodes | Where-Object {
        [IO.Path]::GetFileName(($_.GetAttribute('Executable')).Replace('/', '\')) -ieq 'Claude.exe'
    } | Select-Object -First 1
}
if (-not $appNode) { throw '无法从 Claude AppxManifest.xml 定位主应用。' }

$visual = $appNode.SelectSingleNode("./*[local-name()='VisualElements']")
if (-not $visual) { throw 'Claude AppxManifest.xml 中没有 VisualElements。' }
$logicalAssets = @($visual.GetAttribute('Square44x44Logo'), $visual.GetAttribute('Square150x150Logo')) |
    Where-Object { -not [string]::IsNullOrWhiteSpace($_) } | Select-Object -Unique
if (-not $logicalAssets) { throw '未找到 Claude 官方图标声明。' }

$candidatePaths = @{}
foreach ($logicalAsset in $logicalAssets) {
    $relative = ([string]$logicalAsset).Replace('/', '\').TrimStart('\')
    $relativeDir = [IO.Path]::GetDirectoryName($relative)
    $stem = [IO.Path]::GetFileNameWithoutExtension([IO.Path]::GetFileName($relative))
    $extension = [IO.Path]::GetExtension($relative)
    $stem = $stem -replace '\.(scale|targetsize|contrast|altform)-.*$', ''
    $assetDir = $package.InstallLocation
    if (-not [string]::IsNullOrWhiteSpace($relativeDir)) { $assetDir = Join-Path $assetDir $relativeDir }
    if (-not (Test-Path -LiteralPath $assetDir -PathType Container)) { continue }
    $pattern = '^{0}(?:\..*)?{1}$' -f [regex]::Escape($stem), [regex]::Escape($extension)
    Get-ChildItem -LiteralPath $assetDir -File -Recurse -ErrorAction SilentlyContinue |
        Where-Object { $_.Name -imatch $pattern } |
        ForEach-Object { $candidatePaths[$_.FullName] = $_.FullName }
}
if ($candidatePaths.Count -eq 0) { throw '未找到 Claude 官方 PNG 图标资产。' }

$assetInfo = @(foreach ($path in $candidatePaths.Values) {
    $image = $null
    try {
        $image = [System.Drawing.Image]::FromFile($path)
        [pscustomobject]@{
            Path = $path; Name = [IO.Path]::GetFileName($path)
            Width = $image.Width; Height = $image.Height
            Pixels = [int64]$image.Width * [int64]$image.Height
            Unplated = ([IO.Path]::GetFileName($path) -imatch 'altform-unplated')
            Target256 = ([IO.Path]::GetFileName($path) -imatch 'targetsize-256')
        }
    } catch { } finally { if ($null -ne $image) { $image.Dispose() } }
})
if ($assetInfo.Count -eq 0) { throw 'Claude 官方 PNG 图标无法读取。' }

$source = $assetInfo | Where-Object { $_.Target256 -and $_.Unplated } |
    Sort-Object Pixels -Descending | Select-Object -First 1
if (-not $source) { $source = $assetInfo | Where-Object { $_.Target256 } | Sort-Object Pixels -Descending | Select-Object -First 1 }
if (-not $source) { $source = $assetInfo | Where-Object { $_.Unplated -and $_.Width -ge 256 -and $_.Height -ge 256 } | Sort-Object Pixels -Descending | Select-Object -First 1 }
if (-not $source) { $source = $assetInfo | Sort-Object Pixels -Descending | Select-Object -First 1 }

$sourceImage = $null
$frames = @()
try {
    $sourceImage = [System.Drawing.Image]::FromFile($source.Path)
    foreach ($size in @(256, 128, 96, 64, 48, 32, 24, 16)) {
        $bitmap = $null; $graphics = $null; $memory = $null
        try {
            $bitmap = [System.Drawing.Bitmap]::new($size, $size, [System.Drawing.Imaging.PixelFormat]::Format32bppArgb)
            $graphics = [System.Drawing.Graphics]::FromImage($bitmap)
            $graphics.Clear([System.Drawing.Color]::Transparent)
            $graphics.CompositingMode = [System.Drawing.Drawing2D.CompositingMode]::SourceCopy
            $graphics.CompositingQuality = [System.Drawing.Drawing2D.CompositingQuality]::HighQuality
            $graphics.InterpolationMode = [System.Drawing.Drawing2D.InterpolationMode]::HighQualityBicubic
            $graphics.SmoothingMode = [System.Drawing.Drawing2D.SmoothingMode]::HighQuality
            $graphics.PixelOffsetMode = [System.Drawing.Drawing2D.PixelOffsetMode]::HighQuality
            $ratio = [Math]::Min($size / [double]$sourceImage.Width, $size / [double]$sourceImage.Height)
            $drawWidth = [Math]::Max(1, [int][Math]::Round($sourceImage.Width * $ratio))
            $drawHeight = [Math]::Max(1, [int][Math]::Round($sourceImage.Height * $ratio))
            $destination = [System.Drawing.Rectangle]::new([int](($size - $drawWidth) / 2), [int](($size - $drawHeight) / 2), $drawWidth, $drawHeight)
            $graphics.DrawImage($sourceImage, $destination, 0, 0, $sourceImage.Width, $sourceImage.Height, [System.Drawing.GraphicsUnit]::Pixel)
            $memory = [System.IO.MemoryStream]::new()
            $bitmap.Save($memory, [System.Drawing.Imaging.ImageFormat]::Png)
            $frames += [pscustomobject]@{ Size = $size; Bytes = $memory.ToArray() }
        } finally {
            if ($null -ne $memory) { $memory.Dispose() }
            if ($null -ne $graphics) { $graphics.Dispose() }
            if ($null -ne $bitmap) { $bitmap.Dispose() }
        }
    }
} finally { if ($null -ne $sourceImage) { $sourceImage.Dispose() } }

$iconDir = Join-Path $env:LOCALAPPDATA 'FengyuToken\ShortcutAssets'
$iconPath = Join-Path $iconDir 'Claude-Official-Color.ico'
New-Item -ItemType Directory -Path $iconDir -Force | Out-Null
$file = $null; $writer = $null
try {
    $file = [System.IO.File]::Open($iconPath, [System.IO.FileMode]::Create, [System.IO.FileAccess]::Write, [System.IO.FileShare]::Read)
    $writer = [System.IO.BinaryWriter]::new($file)
    $writer.Write([uint16]0); $writer.Write([uint16]1); $writer.Write([uint16]$frames.Count)
    $offset = [uint32](6 + (16 * $frames.Count))
    foreach ($frame in $frames) {
        $dimension = if ($frame.Size -eq 256) { [byte]0 } else { [byte]$frame.Size }
        $writer.Write($dimension); $writer.Write($dimension); $writer.Write([byte]0); $writer.Write([byte]0)
        $writer.Write([uint16]1); $writer.Write([uint16]32)
        $writer.Write([uint32]$frame.Bytes.Length); $writer.Write([uint32]$offset)
        $offset = [uint32]($offset + $frame.Bytes.Length)
    }
    foreach ($frame in $frames) { $writer.Write([byte[]]$frame.Bytes) }
} finally {
    if ($null -ne $writer) { $writer.Dispose() } elseif ($null -ne $file) { $file.Dispose() }
}

$desktop = [Environment]::GetFolderPath('Desktop')
$linkPath = Join-Path $desktop '启动 FengyuToken Claude Code.lnk'
$wsh = New-Object -ComObject WScript.Shell
$link = $wsh.CreateShortcut($linkPath)
$link.TargetPath = Join-Path $env:WINDIR 'explorer.exe'
$link.Arguments = 'claude://code/new'
$link.WorkingDirectory = $env:USERPROFILE
$link.IconLocation = "$iconPath,0"
$link.Description = '启动 FengyuToken Claude Code'
$link.Save()
Start-Process (Join-Path $env:WINDIR 'System32\ie4uinit.exe') -ArgumentList '-show' -WindowStyle Hidden -ErrorAction SilentlyContinue
Write-Host '已创建桌面快捷方式：启动 FengyuToken Claude Code' -ForegroundColor Green