@echo off
setlocal enabledelayedexpansion
if not exist newseq md newseq
for /f "delims=" %%a in ('dir /b /a-d *.seq') do (
  set/p firstline=<%%a
  for /f "tokens=1,* delims=-" %%i in ("!firstline!") do (
    echo;%%i,WP_COI_gene
    more +1 %%a
  )>newseq\%%a
)
copy /b newseq\*.seq newseq\big.fasta
echo;处理完毕&pause>nul
复制代码

#@&cls&powershell "gc '%~0'|out-string|iex"&pause&exit/b
$str="WP_COI_gene"
dir -filter *.seq|%{
    $new=@()
    $content=(gc $_).split("")
    if($content[0] -match '>(\d+)-'){
        $new+=$matches[0].replace('-',',')+$str
        $new+=$content|select -skip 1
        sc -path $_ $new
        ac -path all.fasta $new
    }
}
复制代码

#@&cls&powershell "gc '%~0'|out-string|iex"&pause&exit/b
$str="WP_COI_gene"
dir -filter *.seq|%{
    $new=@()
    $content=(gc $_).split("")
    $new+=$content[0].substring(0,$content[0].indexof('-'))+","+$str
#取第一行字符串的开头到短横线“-”之间的内容，然后加逗号再加"自定义字符串"
    $new+=$content|select -skip 1
    sc -path $_ $new
    ac -path all.fasta $new
}
复制代码