【完成】60元求合并epub

<item id="style377399.css" href="Styles/style377399.css" media-type="text/css"/>
    <item id="____002___ai_4753.xhtml" href="Text/____002___ai_4753.xhtml" media-type="application/xhtml+xml"/>
复制代码

    <itemref idref="____002___ai_4753.xhtml"/>
复制代码

<#*,:
@echo off
cd /d "%~dp0"
set "batchfile=%~f0"
Powershell -ExecutionPolicy Bypass -C "Set-Location -LiteralPath ([Environment]::CurrentDirectory);. ([ScriptBlock]::Create([IO.File]::ReadAllText($env:batchfile,[Text.Encoding]::GetEncoding(0) )) )"
pause
exit /b
#>
# 合并epub xhtml css,此脚本放到 解包后 文件夹内

Get-ChildItem -Path . | Where-Object { $_ -is [IO.DirectoryInfo] -and $_.FullName -ne $env:batchfile } | Group-Object -Property @{
  Expression = { $_.Name -replace '第\s+\d+\s+卷' }
} | ForEach-Object {
  $di1 = $_.Group | Where-Object { $_.Name -match '第\s+(\d+)\s+卷' -and $Matches[1] -eq '1' } | Select-Object -First 1
  if ($null -eq $di1) { return }
  if($_.Group.Count -le 1){return}
  $opf = [IO.Path]::Combine($di1.FullName, 'OEBPS\content.opf')
  $xml = [IO.File]::ReadAllText($opf)
  if (-not $?) { return }
  # 把第一个里面的xhtml后面加001，或者直接改001 。把后面文件夹的，依次复制到第一个那里。并且命名002，003等等。
  # Get-ChildItem -LiteralPath ([IO.Path]::Combine($di1.FullName,'OEBPS\pages')) -Filter *.xhtml|Rename-Item -NewName '001.xhtml'
  $di1.Name | Out-Host
  $_.Group | Where-Object { $_ -ne $di1 } | ForEach-Object {
    # $null = $_.Name -match '第\s+(\d+)\s+卷'
    # $strctr = $Matches[1]
    Get-ChildItem -LiteralPath ([IO.Path]::Combine($_.FullName, 'OEBPS\pages')) -Filter *.xhtml | ForEach-Object {
      $fi2 = $_ | Copy-Item -Destination ([IO.Path]::Combine($di1.FullName, "OEBPS\pages")) -PassThru
      if ($fi2) {
        $xml = $xml.Replace("</manifest>", @"
<item id="$($fi2.Name)" href="Text/$($fi2.Name)" media-type="application/xhtml+xml"/></manifest>
"@).Replace("</spine>", @"
<itemref idref="$($fi2.Name)"/></spine>
"@)
      }
    }
    Get-ChildItem -LiteralPath ([IO.Path]::Combine($_.FullName, 'OEBPS\style')) -Filter *.css | ForEach-Object {
      $fi2 = $_ | Copy-Item -Destination ([IO.Path]::Combine($di1.FullName, "OEBPS\style")) -PassThru
      if ($fi2) {
        $xml = $xml.Replace("</manifest>", @"
<item id="$($fi2.Name)" href="Styles/$($fi2.Name)" media-type="text/css"/></manifest>
"@)
      }

    }
  }
  [IO.File]::WriteAllText($opf, $xml)
}
复制代码

    <itemref idref="toc"/>
    <meta content="0.9.10" name="Sigil version" />
    <meta property="dcterms:modified">2024-09-29T07:04:17Z</meta>
    <meta property="dcterms:modified">2024-10-04T18:04:46Z</meta>
<package version="3.0" unique-identifier="db-id" xmlns:dc="http://purl.org/dc/elements/1.1/" xmlns="http://www.idpf.org/2007/opf">
<package version="3.0" unique-identifier="db-id" xmlns="http://www.idpf.org/2007/opf" xmlns:dc="http://purl.org/dc/elements/1.1/">
复制代码