bat計算兩個時間差

這個是腳本代碼[保存爲etime.bat放在當前路徑下便可:算法

免費內容:
:etime <begin_time> <end_time> <return>
rem 所測試任務的執行時間不超過1天 // 骨瘦如柴版 
setlocal&set be=%~1:%~2&set cc=(%%d-%%a)*360000+(1%%e-1%%b)*6000+1%%f-1%%c&set dy=-8640000
for /f "delims=: tokens=1-6" %%a in ("%be:.=%")do endlocal&set/a %3=%cc%,%3+=%dy%*("%3>>31")&exit/b

----------------------------------------------------------------------------------------------------------------------------------------函數

計算兩個時間點差的函數批處理etime測試

今天興趣大法思考了好多bat的問題,以致於通宵
在論壇逛看到有個求時間差的"函數"被打攪調用地方很多(大都是測試代碼執行效率的)優化

免費內容:

:time0
::計算時間差(封裝)
@echo off&setlocal&set /a n=0&rem code 隨風 @bbs.bathome.cn
for /f "tokens=1-8 delims=.: " %%a in ("%~1:%~2") do (
set /a n+=10%%a%%100*360000+10%%b%%100*6000+10%%c%%100*100+10%%d%%100
set /a n-=10%%e%%100*360000+10%%f%%100*6000+10%%g%%100*100+10%%h%%100)
set /a s=n/360000,n=n%%360000,f=n/6000,n=n%%6000,m=n/100,n=n%%100
set "ok=%s% 小時 %f% 分鐘 %m% 秒 %n% 毫秒"
endlocal&set %~3=%ok:-=%&goto :EOF

這個代碼的算法是統一找時間點凌晨0:00:00.00而後計算任何一個時間點到凌晨的時間差(單位跑秒)
而後任意兩個時間點求時間差就是他們相對凌晨時間點的時間數的差
對09這樣的非法8進制數的處理用到了一些技巧,還有兩個時間參數不分前後順序,可全可點,
可是這個代碼一行是能夠省去的(既然是常被人掉用天然體積越小越好):spa

免費內容:
@echo off&setlocal&set/a n=0&set "s=+:%~1^&echo -:%~2"
for /f "tokens=1-5 delims=.:" %%a in ('echo %s%') do (rem code 隨風 @bbs.bathome.cn
set/a n%%a=10%%b%%100*360000+10%%c%%100*6000+10%%d%%100*100+10%%e%%100)
set /a s=n/360000,n=n%%360000,f=n/6000,n=n%%6000,m=n/100,n=n%%100
set "ok=%s% 小時 %f% 分鐘 %m% 秒 %n% 秒"
endlocal&(if %3. equ . (echo %ok:-=%) else set %~3=%ok:-=%)&exit/b

再研究下,有更簡短的版本
這個代碼是我在cn-dos寫過的,今天再優化了下更簡短
代碼的算法深刻一層:
用hmsw(各字母表明一個兩位數字)表示標準時間
咱們記他到凌晨的相對時間數爲Tx
Tx=hmsw時間點-0:00:00.00時間點=h*3600*100+m*60*100+100*s+w
hmsw 8位10進制數表示的時間數(單位0.01秒)就是hmsw跑秒
hmsw=w+100*s+10000*m+1000000*h
hmsw-Tx=640000*h+4000*m
因此Tx=hmsw-(640000*h+4000*m)=hmsw-4000*(160*h+m)
那麼Tx_2-Tx_1=hmsw_2-hmsw_1-4000*(160*(h_2-h_1)+(m_2-m_1)) 
對與09這樣的非法8進制數咱們給他們每一個前面加上1就能夠保證是十進制數又能保證差值不變
對於非同一天的時間(這種狀況較少,除非你在接近0晨時調用)咱們把用8640000-去替換負號
再用set/a賦值
就是下面代碼用到的算法
Tx_2-Tx_1=hmsw_2-hmsw_1-4000*(160*(1h_2-1h_1)+(1m_2-1m_1)).net

免費內容:

rem  兼容時間點跨天的情行,時間格式00:00:00.00 或者 0:00:00.00 皆可
:_difftime <Begin_Time> <End_Time> [ret] //返回兩個時間點的差值(單位0.01秒)
Setlocal enabledelayedexpansion&set b=0%1&set e=0%2&set c=1!e:~-11!-1!b:~-11!&set c=!c::=!
set/a c=%c:.=%-4000*(160*(1%e:~-11,-9%-1%b:~-11,-9%)+1%e:~-8,-6%-1%b:~-8,-6%)
endlocal & (if %3.==. (echo %c:-=8640000-%) else set/a %3=%c:-=8640000-%)&exit/b

給difftime前面加上_是爲了代表不是臨時寫的子過程也爲了之後鏈接庫函數標籤的惟一性

// 題外話:
對於子過程,若啓用了變量延遲,原則上三行均可以寫完,儘可能寫緊湊些(由於沒人讀),可是對於算法,
思路性的東西要能捨得筆墨,越詳細越好,我發現即便你的代碼寫得再好,不會有人全搬,都會小修改,
你本身初寫代碼時不可能考慮到全部人使用的具體狀況,天然沒人願意很詳細看你的代碼,卻是你的思路爲
別人提供了一個方法,在此意義上函數庫的做用起到方法庫的做用code

出處:http://blog.csdn.net/wq1282/article/details/5008350blog

相關文章
相關標籤/搜索