---

$paths = @(
    "C:\Program Files (x86)\Steam\userdata\37783387\3590\remote\game1_13.dat",
    "C:\ProgramData\PopCap Games\PlantsVsZombies\userdata\game1_13.dat",
    "C:\ProgramData\Steam\PlantsVsZombies\userdata\game1_13.dat"
)

foreach ($path in $paths) {
    if (Test-Path $path) {
        $b = [System.IO.File]::ReadAllBytes($path)
        # Меняем счетчик флагов (смещения 0x6C и 0x70)
        $b[0x6C] = 100
        $b[0x6D] = 0
        $b[0x70] = 100
        # Солнце 9990
        $b[0x14] = 0x06
        $b[0x15] = 0x27
        [System.IO.File]::WriteAllBytes($path, $b)
        Write-Host "Готово для: $path" -ForegroundColor Green
    }
}