[文本处理] [已解决]批处理怎样实现通话时长当日合计？

@echo off&setlocal enabledelayedexpansion
for /f "tokens=1-3" %%i in ('wmic path Win32_LocalTime get Month^,Day^,Year') do set "ymd=%%k年%%j月%%i日"
for /f "delims=U" %%a in ('cmd /u/c echo,唉') do set "tab=%%a"
(for /f "tokens=1,3,7 delims=;" %%i in ('findstr /ic:"%ymd% " a.txt') do (
	for /f %%a in (%%i) do set str1=%%~a
	for /f %%a in (%%j) do set str2=%%~a
	for /f "tokens=1-3 delims=:" %%a in ("%%k") do (
		set /a "t1+=1%%a%%100,t2+=1%%b%%100,t3+=1%%c%%100"
	)
	echo %%k !str1!%Tab%!str2!%Tab%%%k
))>$.t
	for /f "tokens=1*" %%i in ('sort /r $.t') do echo %%j
	set /a "t2+=t3/60,t1+=t2/60,t2%%=60,t3%%=60"
	echo !t1!:!t2!:!t3!
	del $.t
pause
复制代码

@echo off
for /f "tokens=1-3delims=-./" %%a in ("%date:~,10%") do (
    set /a yy=%%a,mm=1%%b-100,dd=1%%c-100
)

(for /f "tokens=1-7delims=;" %%a in ('findstr %yy%年%mm%月%dd%日 a.txt')do (
    for /f %%i in ("%%~a") do echo,%%g %%i     %%~c     %%g
    for /f "tokens=1-3 delims=:" %%i in ("%%g") do (
        set /a h+=1%%i-100,m+=1%%j-100,s+=1%%k-100
    )
))>$

set /a k1=s/60,s=s%%60+100,m+=k1,k2=m/60,m=m%%60+100,h+=k2

(
    for /f "tokens=1*" %%a in ('sort /r $') do echo,%%b
    echo,&echo,合计：%h%:%m:~1%:%s:~1%
)>b.txt
del $
复制代码

for /f "delims=U" %%a in ('cmd /u/c echo,唉') do set "tab=%%a"
复制代码

    for /f %%i in ("%%~a") do echo,%%g %%i%tab%%%~c%tab%%%g
复制代码