dsh-fish-pet 0.2.4 → 0.2.6

package/assets/fish-pet.ps1

@@ -49,10 +49,10 @@ $StatePath = Join-Path $DataDir 'state.json'
 $ConfigPath = Join-Path $DataDir 'config.json'
 function Load-Config {
     $def = [ordered]@{
-        persona = [ordered]@{ name = '大肥鱼'; dad = '光光'; mom = '丽丽'; birthday = '2026年10月30日'; birthplace = '中国广西北海'; likes = '白饭、被摸头、主人夸它'; dislikes = '被说胖、被冷落、吵'; ownerBirthday = ''; extra = '你说话简短、俏皮、微微傲娇，用中文，称呼用户为"主人"，每次回复不超过60个字，不要用表情符号。' }
+        persona = [ordered]@{ name = '大肥鱼'; nameEn = 'Mia'; dad = '光光'; mom = '丽丽'; birthday = '2026年10月30日'; birthplace = '中国广西北海'; likes = '白饭、被摸头、主人夸它'; dislikes = '被说胖、被冷落、吵'; ownerBirthday = ''; lang = 'auto'; extra = '你说话简短、俏皮、微微傲娇，用中文，称呼用户为"主人"，每次回复不超过30个字，不要用表情符号。' }
         bubble  = [ordered]@{ opacity = 0.15 }
         voice   = [ordered]@{ silenceGate = 1200; boost = 1; engine = 'cloud'; localConf = 0.55 }
-        tts     = [ordered]@{ engine = 'edge'; voice = 'zh-CN-XiaoxiaoNeural'; rate = '+12%'; pitch = '+10Hz' }
+        tts     = [ordered]@{ engine = 'edge'; voice = 'zh-CN-XiaoxiaoNeural'; rate = '+12%'; pitch = '+10Hz'; voiceEn = 'en-US-AnaNeural'; rateEn = '+8%'; pitchEn = '+15Hz' }
     }
     $script:cfg = $def
     try {
@@ -60,9 +60,9 @@ function Load-Config {
             [IO.File]::WriteAllText($ConfigPath, ($def | ConvertTo-Json -Depth 5), (New-Object Text.UTF8Encoding($false)))
         }
         $j = [IO.File]::ReadAllText($ConfigPath, [Text.Encoding]::UTF8) | ConvertFrom-Json
-        if ($j.persona) { foreach ($k in @('name','dad','mom','extra','birthday','birthplace','likes','dislikes','ownerBirthday')) { $v = $j.persona.$k; if ($v) { $script:cfg.persona[$k] = [string]$v } } }
+        if ($j.persona) { foreach ($k in @('name','nameEn','dad','mom','extra','birthday','birthplace','likes','dislikes','ownerBirthday','lang')) { $v = $j.persona.$k; if ($v) { $script:cfg.persona[$k] = [string]$v } } }
         if ($j.bubble -and $j.bubble.opacity) { $script:cfg.bubble.opacity = [double]$j.bubble.opacity }
-        if ($j.tts) { foreach ($k2 in @('engine','voice','rate','pitch')) { $v2 = $j.tts.$k2; if ($v2) { $script:cfg.tts[$k2] = [string]$v2 } } }
+        if ($j.tts) { foreach ($k2 in @('engine','voice','rate','pitch','voiceEn','rateEn','pitchEn')) { $v2 = $j.tts.$k2; if ($v2) { $script:cfg.tts[$k2] = [string]$v2 } } }
         if ($j.voice) {
             if ($j.voice.silenceGate) { $script:cfg.voice.silenceGate = [int]$j.voice.silenceGate }
             if ($j.voice.boost) { $script:cfg.voice.boost = [int]$j.voice.boost }
@@ -71,7 +71,25 @@ function Load-Config {
 }
 Load-Config
 $script:ttsEngine = $script:cfg.tts.engine
+# 启动自检：edge 音色需要 Python + edge-tts，缺了就退回本机语音并提示
+$script:ttsWarn = $false
+if ($script:ttsEngine -eq 'edge') {
+    $edgeOk = $false
+    try {
+        $null = & python -m edge_tts --version 2>$null
+        if ($LASTEXITCODE -eq 0) { $edgeOk = $true }
+    } catch { }
+    if (-not $edgeOk) {
+        $script:ttsEngine = 'sapi'
+        $script:ttsWarn = $true
+        Write-Err 'TTS-PY-MISSING（已退回本机 SAPI 语音）'
+    }
+}
 $script:ttsVoice  = $script:cfg.tts.voice
+$script:ttsVoiceEn = $script:cfg.tts.voiceEn
+$script:ttsRateEn  = $script:cfg.tts.rateEn
+$script:ttsPitchEn = $script:cfg.tts.pitchEn
+$script:langMode   = $script:cfg.persona.lang
 $script:ttsRate   = $script:cfg.tts.rate
 $script:ttsPitch  = $script:cfg.tts.pitch
 $PidPath   = Join-Path $DataDir 'pet.pid'
@@ -580,6 +598,26 @@ $miTalk   = $menu.Items.Add('开始听我说（麦克风）')
 $miVoice  = $menu.Items.Add('语音朗读：开')
 $miVoiceSet = New-Object System.Windows.Forms.ToolStripMenuItem('换个声音')
 $menu.Items.Add($miVoiceSet) | Out-Null
+$miLang = New-Object System.Windows.Forms.ToolStripMenuItem('语言模式')
+$langChoices = @(
+    @('zh', '中文'),
+    @('en', 'English'),
+    @('auto', '自动模式')
+)
+$script:langItemMap = @{}
+foreach ($lc in $langChoices) {
+    $itL = New-Object System.Windows.Forms.ToolStripMenuItem($lc[1])
+    $itL.Tag = $lc[0]
+    $itL.CheckOnClick = $false
+    $itL.Checked = ([string]$script:langMode -eq [string]$lc[0])
+    $itL.Add_Click({
+        param($s, $e)
+        Set-LangMode ([string]$s.Tag) ([string]$s.Text)
+    })
+    $miLang.DropDownItems.Add($itL) | Out-Null
+    $script:langItemMap[[string]$lc[0]] = $itL
+}
+$menu.Items.Add($miLang) | Out-Null
 $voiceChoices = @(
     @('zh-CN-XiaoyiNeural', '活泼少女·晓伊'),
     @('zh-CN-XiaoxiaoNeural', '温柔姐姐·晓晓'),
@@ -588,9 +626,12 @@ $voiceChoices = @(
     @('zh-CN-YunxiNeural', '阳光男声·云希'),
     @('zh-CN-YunxiaNeural', '可爱男声·云夏')
 )
+$script:voiceItemMap = @{}
 foreach ($vc in $voiceChoices) {
     $it = New-Object System.Windows.Forms.ToolStripMenuItem(($vc[1] + '（' + $vc[0] + '）'))
     $it.Tag = $vc[0]
+    $it.CheckOnClick = $false
+    $it.Checked = ([string]$script:ttsVoice -eq [string]$vc[0])
     $it.Add_Click({ 
         param($s, $e)
         $script:voicePickTag = [string]$s.Tag
@@ -598,6 +639,7 @@ foreach ($vc in $voiceChoices) {
         Set-TtsVoice $script:voicePickTag $script:voicePickLabel
     })
     $miVoiceSet.DropDownItems.Add($it) | Out-Null
+    $script:voiceItemMap[[string]$vc[0]] = $it
 }
 $miWake   = $menu.Items.Add('语音待命：开')
 $miChat   = $menu.Items.Add('语音聊天：开')
@@ -868,6 +910,33 @@ function Show-ReminderList {
 }
 
 # 切换朗读音色（立即生效并写入 config.json）
+# 切换中英文聊天模式（立即生效并写入 config.json）
+function Set-LangMode([string]$mode, [string]$label) {
+    try {
+        $script:langMode = $mode
+        try {
+            $cfg = Join-Path $DataDir 'config.json'
+            if (Test-Path $cfg) {
+                $j = [IO.File]::ReadAllText($cfg, [Text.Encoding]::UTF8) | ConvertFrom-Json
+                if (-not $j.persona) { $j | Add-Member -NotePropertyName persona -NotePropertyValue ([ordered]@{ lang = $mode }) }
+                elseif ($j.persona.PSObject.Properties.Name -notcontains 'lang') { $j.persona | Add-Member -NotePropertyName lang -NotePropertyValue $mode }
+                else { $j.persona.lang = $mode }
+                [IO.File]::WriteAllText($cfg, ($j | ConvertTo-Json -Depth 6), (New-Object Text.UTF8Encoding($false)))
+            }
+        } catch { }
+        # 更新子菜单的勾选状态（同时只勾一个）
+        try {
+            if ($script:langItemMap) {
+                foreach ($k in @($script:langItemMap.Keys)) { $script:langItemMap[$k].Checked = ([string]$k -eq [string]$mode) }
+                $script:langItemsFresh = $true
+            }
+        } catch { }
+        if ($mode -eq 'en') { Show-Bubble 'Language: English' }
+        elseif ($mode -eq 'auto') { Show-Bubble '语言：自动模式' }
+        else { Show-Bubble ('语言：' + $label) }
+    } catch { Write-Err 'LANG-SET-ERR' }
+}
+
 function Set-TtsVoice([string]$voice, [string]$label) {
     try {
         $script:ttsVoice = $voice
@@ -881,6 +950,11 @@ function Set-TtsVoice([string]$voice, [string]$label) {
             }
         } catch { }
         Show-Bubble ('声音换成：' + $label)
+        try {
+            if ($script:voiceItemMap) {
+                foreach ($k in @($script:voiceItemMap.Keys)) { $script:voiceItemMap[$k].Checked = ([string]$k -eq [string]$voice) }
+            }
+        } catch { }
         Speak-Text ('主人你好呀，我是大肥鱼，现在用的是' + $label + '的声音')
     } catch { Write-Err 'VOICE-SET-ERR' }
 }
@@ -1029,33 +1103,7 @@ function Show-Bubble([string]$text) {
     } catch { Write-Err 'BUBBLE-ERR' }
 }
 
-function Speak-Text([string]$text) {
-    if (-not $script:speakOn) { return }
-    $talkFile = Join-Path $DataDir 'asr.talking'
-    try { [IO.File]::WriteAllText($talkFile, '1') } catch { }
-    # 云语音（Edge 免费音色）优先；失败退回本机 SAPI
-    if ($script:ttsEngine -eq 'edge') {
-        try {
-            $mp3 = Join-Path $env:TEMP ('fish-tts-' + [guid]::NewGuid().ToString('N') + '.mp3')
-            $eargs = @('-m', 'edge_tts', '--voice', $script:ttsVoice, ('--rate=' + $script:ttsRate), ('--pitch=' + $script:ttsPitch), '--text', $text, '--write-media', $mp3)
-            & python @eargs 2>$null | Out-Null
-            if ((Test-Path $mp3) -and (Get-Item $mp3).Length -gt 2000) {
-                if ($null -eq $script:mp) {
-                    Add-Type -AssemblyName PresentationCore
-                    $script:mp = New-Object System.Windows.Media.MediaPlayer
-                    $script:mp.Add_MediaEnded({
-                        try { Remove-Item -LiteralPath (Join-Path $DataDir 'asr.talking') -Force -ErrorAction SilentlyContinue } catch { }
-                        try { [IO.File]::WriteAllText((Join-Path $DataDir 'asr.pause'), (Get-Date).ToString('o')) } catch { }
-                    })
-                }
-                $script:mp.Open([uri]$mp3)
-                $script:mp.Play()
-                Write-Err ('TTS-EDGE len=' + $text.Length + ' file=' + (Get-Item $mp3).Length)
-                try { Get-ChildItem $env:TEMP -Filter 'fish-tts-*.mp3' -ErrorAction SilentlyContinue | Where-Object { $_.LastWriteTime -lt (Get-Date).AddMinutes(-10) } | Remove-Item -Force -ErrorAction SilentlyContinue } catch { }
-                return
-            }
-        } catch { Write-Err ('TTS-EDGE-ERR ' + $_.Exception.Message) }
-    }
+function Speak-Sapi([string]$text) {
     try {
         if ($null -eq $script:synth) {
             Add-Type -AssemblyName System.Speech
@@ -1084,6 +1132,219 @@ function Speak-Text([string]$text) {
     } catch { Write-Err ('TTS-ERR ' + $_.Exception.Message) }
 }
 
+function Play-TtsFile([string]$mp3, [string]$voice) {
+    try {
+        if ($null -eq $script:mp) {
+            Add-Type -AssemblyName PresentationCore
+            $script:mp = New-Object System.Windows.Media.MediaPlayer
+            $script:mp.Add_MediaEnded({ Complete-TtsSegment })
+            $script:mp.Add_MediaOpened({
+                try { if ($script:mp.NaturalDuration.HasTimeSpan) { $script:speakEndAt = (Get-Date).AddSeconds($script:mp.NaturalDuration.TimeSpan.TotalSeconds + 0.8) } } catch { }
+            })
+        }
+        $script:mp.Open([uri]$mp3)
+        $script:mp.Play()
+        Write-Err ('TTS-EDGE voice=' + $voice + ' file=' + (Get-Item $mp3).Length)
+        try { Get-ChildItem $env:TEMP -Filter 'fish-tts-*.mp3' -ErrorAction SilentlyContinue | Where-Object { $_.LastWriteTime -lt (Get-Date).AddMinutes(-10) } | Remove-Item -Force -ErrorAction SilentlyContinue } catch { }
+    } catch { Write-Err ('TTS-PLAY-ERR ' + $_.Exception.Message) }
+}
+
+# 把回复拆成 1~3 段，边合成边播，缩短"开口等待"
+function Split-TtsSegments([string]$text) {
+    if (-not $text) { return @() }
+    $parts = @($text -split '(?<=[。！？!?；;…\.\r\n])' | Where-Object { $_.Trim() })
+    if ($parts.Count -le 1) { return @($text) }
+    # 第一段尽量短（先开口），后面合并成最多 2 段
+    $first = $parts[0].Trim()
+    $rest = ''
+    for ($i = 1; $i -lt $parts.Count; $i++) { $rest = $rest + $parts[$i] }
+    $rest = $rest.Trim()
+    if (-not $rest) { return @($text) }
+    if ($rest.Length -le 26) { return ,@($first, $rest) }
+    # 剩余拆成两半
+    $mid = [Math]::Floor($rest.Length / 2)
+    $cut = $rest.LastIndexOfAny([char[]]@('，', ',', '；', '、', ' ', '。', '.'), $mid)
+    if ($cut -lt 8) { $cut = $mid }
+    $a = $rest.Substring(0, $cut + 1).Trim()
+    $b = $rest.Substring($cut + 1).Trim()
+    if (-not $b) { return ,@($first, $a) }
+    return ,@($first, $a, $b)
+}
+
+function Start-TtsPipeline([string]$text, [string]$voice, [string]$rate, [string]$pitch) {
+    $segs = Split-TtsSegments $text
+    $script:ttsSegs = @($segs)
+    $script:ttsSegVoice = $voice
+    $script:ttsSegRate = $rate
+    $script:ttsSegPitch = $pitch
+    $script:ttsSegFiles = @()
+    $script:ttsSegDone = @()
+    $script:ttsSegPlayed = @()
+    $script:ttsSegReq = @()
+    for ($i = 0; $i -lt $script:ttsSegs.Count; $i++) {
+        $script:ttsSegFiles += (Join-Path $env:TEMP ('fish-tts-' + [guid]::NewGuid().ToString('N') + '.mp3'))
+        $script:ttsSegDone += $false
+        $script:ttsSegPlayed += $false
+        $script:ttsSegReq += ''
+    }
+    $script:ttsSegPlaying = -1
+    Write-Err ('TTS-PIPE segs=' + $script:ttsSegs.Count + ' len=' + $text.Length)
+    $script:ttsTimer.Start()
+}
+
+function Request-TtsSegment([int]$idx) {
+    if ($idx -lt 0 -or $idx -ge $script:ttsSegs.Count) { return }
+    if ($script:ttsSegReq[$idx]) { return }
+    try {
+        $reqId = '{0:D2}{1}' -f $idx, ([guid]::NewGuid().ToString('N').Substring(0, 8))
+        $reqFile = Join-Path $env:TEMP ('fish-tts-req-' + $reqId + '.json')
+        $reqObj = @{
+            id = $reqId
+            text = $script:ttsSegs[$idx]
+            voice = $script:ttsSegVoice
+            rate = $script:ttsSegRate
+            pitch = $script:ttsSegPitch
+            out = $script:ttsSegFiles[$idx]
+            status = $script:ttsStatusFile
+        } | ConvertTo-Json -Compress
+        [IO.File]::WriteAllText($reqFile, $reqObj, (New-Object Text.UTF8Encoding($false)))
+        $script:ttsProc.StandardInput.WriteLine('@' + $reqFile)
+        $script:ttsProc.StandardInput.Flush()
+        $script:ttsSegReq[$idx] = $reqId
+        Write-Err ('TTS-REQ idx=' + $idx + ' id=' + $reqId)
+    } catch { Write-Err ('TTS-REQ-ERR ' + $_.Exception.Message) }
+}
+
+function Complete-TtsSegment {
+    try {
+        $cur = $script:ttsSegPlaying
+        if ($cur -ge 0 -and $cur -lt $script:ttsSegPlayed.Count) { $script:ttsSegPlayed[$cur] = $true }
+        $script:ttsSegPlaying = -1
+        $script:speakEndAt = (Get-Date)
+    } catch { }
+}
+
+# 启动常驻 TTS 进程（复用连接，比每次启动 python 快一倍）
+function Start-TtsWorker {
+    try {
+        if ($script:ttsProc -and -not $script:ttsProc.HasExited) { return $true }
+        $workerPath = Join-Path (Split-Path -Parent $PSCommandPath) 'tts_worker.py'
+        if (-not (Test-Path $workerPath)) { Write-Err 'TTS-WORKER-MISSING'; return $false }
+        $psi = New-Object System.Diagnostics.ProcessStartInfo
+        $psi.FileName = 'python'
+        $psi.Arguments = '"' + $workerPath + '"'
+        $psi.UseShellExecute = $false
+        $psi.RedirectStandardInput = $true
+        $psi.CreateNoWindow = $true
+        $script:ttsProc = [System.Diagnostics.Process]::Start($psi)
+        Start-Sleep -Milliseconds 350
+        if ($script:ttsProc.HasExited) { Write-Err 'TTS-WORKER-DIED'; return $false }
+        $script:ttsStatusFile = Join-Path $env:TEMP 'fish-tts-status.txt'
+        Write-Err ('TTS-WORKER-START pid=' + $script:ttsProc.Id)
+        return $true
+    } catch { Write-Err ('TTS-WORKER-ERR ' + $_.Exception.Message); return $false }
+}
+
+function Speak-Text([string]$text) {
+    if (-not $script:speakOn) { return }
+    $talkFile = Join-Path $DataDir 'asr.talking'
+    try { [IO.File]::WriteAllText($talkFile, '1') } catch { }
+    if ($script:ttsEngine -eq 'edge') {
+        try {
+            $spkLang = Get-TextLang $text
+            if ($spkLang -eq 'en') { $vUse = $script:ttsVoiceEn; $rUse = $script:ttsRateEn; $pUse = $script:ttsPitchEn } else { $vUse = $script:ttsVoice; $rUse = $script:ttsRate; $pUse = $script:ttsPitch }
+            if (Start-TtsWorker) {
+                $script:ttsMode = 'worker'
+                $script:ttsVoiceUsed = $vUse
+                $script:ttsText = $text
+                Start-TtsPipeline $text $vUse $rUse $pUse
+                return
+            }
+            # 常驻进程起不来：退回后台线程整段合成
+            if ($null -eq $script:ttsPool) {
+                $script:ttsPool = [runspacefactory]::CreateRunspacePool(1, 2)
+                $script:ttsPool.Open()
+            }
+            $mp3 = Join-Path $env:TEMP ('fish-tts-' + [guid]::NewGuid().ToString('N') + '.mp3')
+            $ps = [PowerShell]::Create()
+            $ps.RunspacePool = $script:ttsPool
+            [void]$ps.AddScript({
+                param($exe, $voice, $rate, $pitch, $txt, $out)
+                & $exe -m edge_tts --voice $voice ('--rate=' + $rate) ('--pitch=' + $pitch) '--text' $txt '--write-media' $out 2>$null | Out-Null
+            }).AddArgument('python').AddArgument($vUse).AddArgument($rUse).AddArgument($pUse).AddArgument($text).AddArgument($mp3)
+            $script:ttsPS = $ps
+            $script:ttsHandle = $ps.BeginInvoke()
+            $script:ttsMode = 'thread'
+            $script:ttsMp3 = $mp3
+            $script:ttsVoiceUsed = $vUse
+            $script:ttsText = $text
+            $script:ttsTimer.Start()
+            Write-Err ('TTS-EDGE-START len=' + $text.Length + ' voice=' + $vUse + ' mode=thread')
+            return
+        } catch { Write-Err ('TTS-EDGE-ERR ' + $_.Exception.Message) }
+    }
+    Speak-Sapi $text
+}
+
+# 流水线调度：边合成边播
+$script:ttsTimer = New-Object System.Windows.Forms.Timer
+$script:ttsTimer.Interval = 90
+$script:ttsTimer.Add_Tick({
+    # ---- 常驻进程 + 分段流水线 ----
+    if ($script:ttsMode -eq 'worker' -and $script:ttsSegs.Count -gt 0) {
+        # 1) 扫状态文件，标记完成的分段
+        for ($i = 0; $i -lt $script:ttsSegs.Count; $i++) {
+            if ($script:ttsSegDone[$i] -or -not $script:ttsSegReq[$i]) { continue }
+            $rid = $script:ttsSegReq[$i]
+            try {
+                $hit = Get-Content $script:ttsStatusFile -ErrorAction SilentlyContinue | Where-Object { $_ -match ('^' + $rid + ' ') } | Select-Object -Last 1
+            } catch { $hit = $null }
+            if ($hit) {
+                if ($hit -like ('*' + $rid + ' OK*')) { $script:ttsSegDone[$i] = $true }
+                else { Write-Err ('TTS-SEG-FAIL idx=' + $i); $script:ttsSegDone[$i] = $true }
+            }
+        }
+        # 2) 没有在播 → 找下一段
+        if ($script:ttsSegPlaying -lt 0) {
+            $next = -1
+            for ($i = 0; $i -lt $script:ttsSegs.Count; $i++) { if (-not $script:ttsSegPlayed[$i]) { $next = $i; break } }
+            if ($next -lt 0) {
+                $script:ttsTimer.Stop()
+                $script:ttsSegs = @()
+                return
+            }
+            if ($script:ttsSegDone[$next]) {
+                $file = $script:ttsSegFiles[$next]
+                if ((Test-Path $file) -and (Get-Item $file).Length -gt 800) {
+                    $script:ttsSegPlaying = $next
+                    Play-TtsFile $file $script:ttsVoiceUsed
+                } else {
+                    $script:ttsSegPlayed[$next] = $true
+                }
+            } elseif (-not $script:ttsSegReq[$next]) {
+                Request-TtsSegment $next
+            }
+        } else {
+            # 3) 正在播：预取下一段
+            $nx = $script:ttsSegPlaying + 1
+            if ($nx -lt $script:ttsSegs.Count -and -not $script:ttsSegDone[$nx] -and -not $script:ttsSegReq[$nx]) { Request-TtsSegment $nx }
+        }
+        return
+    }
+    # ---- 后台线程整段模式 ----
+    if ($null -eq $script:ttsHandle) { $script:ttsTimer.Stop(); return }
+    if (-not $script:ttsHandle.IsCompleted) { return }
+    $script:ttsTimer.Stop()
+    $ps = $script:ttsPS; $h = $script:ttsHandle; $mp3 = $script:ttsMp3; $v = $script:ttsVoiceUsed; $tx = $script:ttsText
+    $script:ttsHandle = $null; $script:ttsPS = $null
+    try { [void]$ps.EndInvoke($h) } catch { Write-Err ('TTS-JOIN-ERR ' + $_.Exception.Message) }
+    try { $ps.Dispose() } catch { }
+    try {
+        if ((Test-Path $mp3) -and (Get-Item $mp3).Length -gt 2000) { Play-TtsFile $mp3 $v }
+        else { Speak-Sapi $tx }
+    } catch { Write-Err ('TTS-DONE-ERR ' + $_.Exception.Message) }
+})
+
 # ---------- 麦克风：离线中文识别 + 唤醒词 ----------
 $script:rec = $null
 $script:gWake = $null
@@ -1228,6 +1489,22 @@ function Fix-AsrText([string]$s) {
     foreach ($k in $map.Keys) { $s = $s.Replace($k, $map[$k]) }
     return $s
 }
+# 判断一段文字主要是什么语言（zh / en）
+function Get-TextLang([string]$t) {
+    if (-not $t) { return 'zh' }
+    $cjk = ([regex]::Matches($t, '[\u4e00-\u9fff]')).Count
+    $lat = ([regex]::Matches($t, '[A-Za-z]')).Count
+    if ($lat -gt ($cjk * 2) -and $lat -ge 4) { return 'en' }
+    return 'zh'
+}
+
+# 本次回复该用什么语言：中文 / English / 自动模式
+function Get-ReplyLang([string]$userText) {
+    if ($script:langMode -eq 'en') { return 'en' }
+    if ($script:langMode -eq 'zh') { return 'zh' }
+    return (Get-TextLang $userText)
+}
+
 function Start-Chat([string]$text) {
     Write-Err ('CHAT-START busy=' + $script:chatBusy + ' text=' + $text)
     $text = Fix-AsrText $text
@@ -1242,26 +1519,58 @@ function Start-Chat([string]$text) {
     $script:lastUser = $text
     Show-Bubble '…'
     $pn = $script:cfg.persona
-    $sys = '你是主人桌面上的一条圆滚滚的蓝色小鱼，名字叫' + $pn.name + '，爸爸叫' + $pn.dad + '，妈妈叫' + $pn.mom + '，生日是' + $pn.birthday + '，出生在' + $pn.birthplace + '。有人问起家人、生日、出生地就照这个答，不要瞎编。' + $pn.extra
+    $replyLang = Get-ReplyLang $text
+    if ($replyLang -eq 'en') {
+        $sys = 'YOU MUST REPLY IN ENGLISH ONLY, NO MATTER WHAT. You are a round, chubby blue fish living on the master''s Windows desktop. Your name is "' + $pn.nameEn + '" (in Chinese it is written 大肥鱼, said as Da Fei Yu). Your dad is Guangguang, your mom is Lili, your birthday is October 30 2026, you were born in Beihai, Guangxi, China. Answer questions about family/birthday/birthplace with these facts and never invent them. In English your name is always this one, never any other name; if earlier messages called you something different, correct them politely.'
+        $sys = $sys + ' Reply ONLY in English, max 20 words, playful and a little tsundere, call the user "master", no emoji.'
+        if ($pn.likes) { $sys = $sys + ' You like: ' + $pn.likes + ' .' }
+        if ($pn.dislikes) { $sys = $sys + ' You dislike: ' + $pn.dislikes + ' .' }
+    } else {
+        $sys = '你是主人桌面上的一条圆滚滚的蓝色小鱼，名字叫' + $pn.name + '，爸爸叫' + $pn.dad + '，妈妈叫' + $pn.mom + '，生日是' + $pn.birthday + '，出生在' + $pn.birthplace + '。有人问起家人、生日、出生地就照这个答，不要瞎编。' + $pn.extra
+        if ($pn.likes) { $sys = $sys + ' 你喜欢：' + $pn.likes + '。' }
+        if ($pn.dislikes) { $sys = $sys + ' 你讨厌：' + $pn.dislikes + '。' }
+    }
     $moodMap = @{ 'happy' = '心情很好'; 'sad' = '有点委屈'; 'hungry' = '肚子有点饿'; 'lonely' = '有点被冷落'; 'normal' = '心情平静' }
+    $moodMapEn = @{ 'happy' = 'happy'; 'sad' = 'a bit sad'; 'hungry' = 'a bit hungry'; 'lonely' = 'feeling ignored'; 'normal' = 'calm' }
     $moodDesc = $moodMap[[string]$script:mood]
     if (-not $moodDesc) { $moodDesc = '心情平静' }
-    if ($pn.likes) { $sys = $sys + ' 你喜欢：' + $pn.likes + '。' }
-    if ($pn.dislikes) { $sys = $sys + ' 你讨厌：' + $pn.dislikes + '。' }
+    $moodDescEn = $moodMapEn[[string]$script:mood]
+    if (-not $moodDescEn) { $moodDescEn = 'calm' }
     $noteArr = @(Load-Notes)
     if ($noteArr.Count -gt 0) {
         $noteText = (@($noteArr | Select-Object -Last 5 | ForEach-Object { [string]$_.text }) -join '；')
-        if ($noteText) { $sys = $sys + ' 主人交代过要你记住的事：' + $noteText + '。' }
+        if ($noteText) {
+            if ($replyLang -eq 'en') { $sys = $sys + ' Things the master asked you to remember: ' + $noteText + '.' }
+            else { $sys = $sys + ' 主人交代过要你记住的事：' + $noteText + '。' }
+        }
     }
     try {
-        if ($((Get-Date).ToString('MM-dd')) -eq $script:birthdayMMDD) { $sys = $sys + ' 提醒你：今天是你自己的生日，可以主动跟主人讨点好吃的。' }
+        if ($((Get-Date).ToString('MM-dd')) -eq $script:birthdayMMDD) {
+            if ($replyLang -eq 'en') { $sys = $sys + ' Note: today is your own birthday, you may ask the master for a treat.' }
+            else { $sys = $sys + ' 提醒你：今天是你自己的生日，可以主动跟主人讨点好吃的。' }
+        }
     } catch { }
-    $sys = $sys + ' 你现在的状态：' + $moodDesc + '，饥饿值约' + [int]$script:hunger + '，和主人的亲密度约' + [int]$script:intimacy + '。说话要自然带出这种状态，但不要报具体数字。'
-    if ($script:memorySummary) { $sys = $sys + ' 你记得之前和主人聊过：' + $script:memorySummary }
+    if ($replyLang -eq 'en') {
+        $sys = $sys + ' Right now you feel ' + $moodDescEn + ', hunger about ' + [int]$script:hunger + ', closeness to the master about ' + [int]$script:intimacy + '. Let that show naturally, never state the numbers.'
+        $sys = $sys + "`r`n`r`nIMPORTANT: Answer ONLY in English. Never write Chinese characters - not even your own name. Use your English name and write family names in pinyin (Guangguang, Lili). Everything you output must be English only."
+    } else {
+        $sys = $sys + ' 你现在的状态：' + $moodDesc + '，饥饿值约' + [int]$script:hunger + '，和主人的亲密度约' + [int]$script:intimacy + '。说话要自然带出这种状态，但不要报具体数字。'
+    }
+    if ($replyLang -eq 'en') { Write-Err ('SYS-EN[' + $sys.Length + ']: ' + ($sys -replace "[\r\n]+", ' | ')) }
     $msgs = @(@{ role = 'system'; content = $sys })
-    foreach ($m in $script:chatHistory) { $msgs += $m }
+    if ($replyLang -eq 'en') {
+        # 英文模式只带英文历史，避免被中文上下文带回去
+        $histEn = @($script:chatHistory | Where-Object { (Get-TextLang ([string]$_.content)) -eq 'en' -and ([string]$_.content) -notmatch 'Fatty Fish' })
+        if ($histEn.Count -gt 4) { $histEn = $histEn[($histEn.Count - 4)..($histEn.Count - 1)] }
+        foreach ($m in $histEn) { $msgs += $m }
+    } else {
+        # 中文模式只带中文历史，避免被上一段英文带跑
+        $histZh = @($script:chatHistory | Where-Object { (Get-TextLang ([string]$_.content)) -eq 'zh' })
+        if ($histZh.Count -gt 10) { $histZh = $histZh[($histZh.Count - 10)..($histZh.Count - 1)] }
+        foreach ($m in $histZh) { $msgs += $m }
+    }
     $msgs += @{ role = 'user'; content = $text }
-    $body  = @{ model = 'deepseek-flash'; messages = $msgs; max_tokens = 300; temperature = 0.9; thinking = @{ type = 'disabled' } } | ConvertTo-Json -Depth 6
+    $body  = @{ model = 'deepseek-flash'; messages = $msgs; max_tokens = 160; temperature = 0.9; thinking = @{ type = 'disabled' } } | ConvertTo-Json -Depth 6
     if ($null -eq $script:http) {
         $script:http = New-Object System.Net.Http.HttpClient
         $script:http.Timeout = [TimeSpan]::FromSeconds(40)
@@ -1374,6 +1683,8 @@ $script:menuTimer.Interval = 120
 $script:menuTimer.Add_Tick({
     $script:menuTimer.Stop()
     try {
+        try { foreach ($k in @($script:langItemMap.Keys)) { $script:langItemMap[$k].Checked = ([string]$k -eq [string]$script:langMode) } } catch { }
+        try { foreach ($k2 in @($script:voiceItemMap.Keys)) { $script:voiceItemMap[$k2].Checked = ([string]$k2 -eq [string]$script:ttsVoice) } } catch { }
         $miPause.Text = if ($script:paused) { '继续游' } else { '停下歇会儿' }
         try { $miBalance.Text = Get-BalanceText } catch { }
         $menu.Show($script:menuScreenPt)
@@ -1609,6 +1920,29 @@ $timer.Add_Tick({
             }
         }
 
+        # 缺 Python/edge-tts 时提示一次
+        if ($script:ttsWarn -and -not $script:ttsWarnShown) {
+            $script:ttsWarnShown = $true
+            Show-Bubble '没装 Python/edge-tts，先用本机声音；装好后能换少女音'
+        }
+
+        # 说完之后再恢复收音（否则会听见自己说话，自己跟自己聊）
+        if ($script:speakEndAt -and (Get-Date) -ge $script:speakEndAt) {
+            try { Remove-Item -LiteralPath (Join-Path $DataDir 'asr.talking') -Force -ErrorAction SilentlyContinue } catch { }
+            try { [IO.File]::WriteAllText((Join-Path $DataDir 'asr.pause'), (Get-Date).ToString('o')) } catch { }
+            $script:speakEndAt = $null
+        }
+        # 看门狗：收音开关卡住（超过 25 秒还没关）就强制恢复，避免鱼彻底听不见
+        $tkFile = Join-Path $DataDir 'asr.talking'
+        if (Test-Path $tkFile) {
+            $tkAge = ((Get-Date) - (Get-Item $tkFile).LastWriteTime).TotalSeconds
+            if ($tkAge -gt 25) {
+                try { Remove-Item -LiteralPath $tkFile -Force -ErrorAction SilentlyContinue } catch { }
+                $script:speakEndAt = $null
+                Write-Err ('TALKING-WATCHDOG age=' + [int]$tkAge)
+            }
+        }
+
         # 到点的提醒：主动冒泡 + 开口
         if ($script:frames % 600 -eq 0) {
             try {

package/assets/tts_worker.py

@@ -0,0 +1,67 @@
+"""常驻 TTS 工作进程：从 stdin 读 JSON 请求，合成后把结果追加到状态文件。
+请求格式（一行一个 JSON）：
+  {"id":"abc","text":"要念的话","voice":"zh-CN-XiaoxiaoNeural","rate":"+12%","pitch":"+10Hz","out":"C:/.../x.mp3","status":"C:/.../status.txt"}
+状态文件行格式： <id> OK <out路径>   或   <id> ERR <错误信息>
+"""
+import sys
+import json
+import asyncio
+import traceback
+
+try:
+    import edge_tts
+except Exception as exc:  # 依赖缺失时直接退出，让主程序回退到 SAPI
+    sys.stderr.write("NO_EDGE_TTS: %s\n" % exc)
+    sys.exit(3)
+
+
+def write_status(path, req_id, text):
+    try:
+        with open(path, "a", encoding="utf-8") as fh:
+            fh.write("%s %s\n" % (req_id, text))
+            fh.flush()
+    except Exception:
+        pass
+
+
+async def synth(req):
+    voice = req.get("voice") or "zh-CN-XiaoxiaoNeural"
+    rate = req.get("rate") or "+0%"
+    pitch = req.get("pitch") or "+0Hz"
+    communicate = edge_tts.Communicate(req["text"], voice, rate=rate, pitch=pitch)
+    await communicate.save(req["out"])
+    write_status(req["status"], req["id"], "OK " + req["out"])
+
+
+async def main():
+    loop = asyncio.get_event_loop()
+    while True:
+        line = await loop.run_in_executor(None, sys.stdin.readline)
+        if not line:
+            break
+        line = line.strip()
+        if not line:
+            continue
+        # 支持"@文件路径"形式：避免 Windows PowerShell 写 stdin 时的编码问题
+        if line.startswith("@"):
+            try:
+                with open(line[1:], "r", encoding="utf-8") as fh:
+                    req = json.loads(fh.read())
+            except Exception:
+                continue
+        else:
+            try:
+                req = json.loads(line)
+            except Exception:
+                continue
+        if req.get("cmd") == "quit":
+            break
+        try:
+            await synth(req)
+        except Exception as exc:
+            write_status(req["status"], req["id"], "ERR " + str(exc).replace("\n", " ")[:200])
+            traceback.print_exc()
+
+
+if __name__ == "__main__":
+    asyncio.run(main())

package/package.json

@@ -1,6 +1,6 @@
 {
   "name": "dsh-fish-pet",
-  "version": "0.2.4",
+  "version": "0.2.6",
   "description": "Desktop blue fish pet for DeepSeek Harness: per-pixel transparent WinForms window, text chat, and cloud speech-to-text voice conversation.",
   "type": "module",
   "main": "lib/index.js",