计算两个时间段相隔多少分种[简单]

bagpipe

没有时间考虑代码的臃肿性，随便写了一下，没有仔细测试过，只能输入24小时时间格式
例如：FIRST TIME :  07:30  
           SECOND TIME :23:21
也没有做错误处理，只是学习而用

1. 
   
2. @echo off&setlocal
   
3. set/p a=First Time:
   
4. set/p b=Second Time:
   
5. if %a% gtr %b% (goto a) else goto b
   
6. :a
   
7. set aa=%a:~0,2%
   
8. if %aa% equ 08 (set aa=%aa:~-1%) else (if %aa% equ 09 set aa=%aa:~-1%)
   
9. set bb=%b:~0,2%
   
10. if %bb% equ 08 (set bb=%bb:~-1%) else (if %bb% equ 09 set bb=%bb:~-1%)
    
11. set cc=%a:~-2%
    
12. if %cc% equ 08 (set cc=%cc:~-1%) else (if %cc% equ 09 set cc=%cc:~-1%)
    
13. set dd=%b:~-2%
    
14. if %dd% equ 08 (set dd=%dd:~-1%) else (if %dd% equ 09 set dd=%dd:~-1%)
    
15. set /a aaa=(%aa%-%bb%)*60
    
16. if %cc% gtr %dd% (set /a bbb=%cc%-%dd%) else (set /a bbb=%dd%-%cc%&goto d)
    
17. set /a aaa=%aaa%+%bbb%&goto c
    
18. :d
    
19. set /a aaa=%aaa%-%bbb%
    
20. :c
    
21. echo 相隔时间为 %aaa% 分种
    
22. goto :eof
    
23. 
    
24. :b
    
25. set aa=%a:~0,2%
    
26. if %aa% equ 08 (set aa=%aa:~-1%) else (if %aa% equ 09 set aa=%aa:~-1%)
    
27. set bb=%b:~0,2%
    
28. if %bb% equ 08 (set bb=%bb:~-1%) else (if %bb% equ 09 set bb=%bb:~-1%)
    
29. set cc=%a:~-2%
    
30. if %cc% equ 08 (set cc=%cc:~-1%) else (if %cc% equ 09 set cc=%cc:~-1%)
    
31. set dd=%b:~-2%
    
32. if %dd% equ 08 (set dd=%dd:~-1%) else (if %dd% equ 09 set dd=%dd:~-1%)
    
33. set /a aaa=(%bb%-%aa%)*60
    
34. if %cc% gtr %dd% (set /a bbb=%cc%-%dd%) else (set /a bbb=%dd%-%cc%&goto d)
    
35. set /a aaa=%aaa%-%bbb%&goto c
    
36. :d
    
37. set /a aaa=%aaa%+%bbb%
    
38. :c
    
39. echo 相隔时间为 %aaa% 分种
    

复制代码

[ 本帖最后由 bagpipe 于 2007-1-4 09:48 AM 编辑 ]

ccwan

呵呵，赶过来支持一下，抢了沙发了。^_^

namejm

　　抽根凳子坐下^_^。顺便发一段以前写的代码凑个热闹：

1. 
   
2. @echo off
   
3. :: 判断一个脚本执行完毕所需要的时间
   
4. :: 先取开始时间，然后在即将结束的时候取结束时间
   
5. :: 两个时间都分别提取小时、分和秒数
   
6. :: 分别对小时数、分钟数和秒数进行操作
   
7. :: 还要对08和09这两个数进行操作
   
8. :: 注意：set /a num=的格式只能处理两位数中是否高位为0，如果是多位数
   
9. ::       要去高位的所有0的话，要用循环测试高位是否为0或者在高位添1然后
   
10. ::       再减去1000之类的数字的方法
    
11. 
    
12. set time_begin=%time:~0,-3%
    
13. echo 脚本开始运行时间是 %time_begin%
    
14. :: 小于10的小时数前有空格，要做去空格操作
    
15. for /f "tokens=1,2,3 delims=:" %%i in ("%time_begin%") do (
    
16.     set /a hour_b=%%i
    
17.     set /a munite_b=%%j
    
18.     set /a second_b=%%k
    
19. )
    
20. pause
    
21. set time_end=%time:~0,-3%
    
22. for /f "tokens=1,2,3 delims=:" %%i in ("%time_end%") do (
    
23.     set /a hour_e=%%i
    
24.     set /a munite_e=%%j
    
25.     set /a second_e=%%k
    
26. )
    
27. call :time_lapse
    
28. echo 脚本结束运行的时间是 %time_end%
    
29. echo 共花费了 %hour_% 小时 %munite_% 分 %second_% 秒
    
30. pause>nul
    
31. goto :eof
    
32. 
    
33. :time_lapse
    
34. :: 一定要按照 秒=>分钟=>小时 的顺序操作
    
35. if %second_e% lss %second_b% (
    
36.     set /a munite_e=%munite_e%-1
    
37.     set /a second_e=%second_e%+60
    
38. )
    
39. set /a second_=%second_e%-%second_b%
    
40. 
    
41. if %munite_e% lss %munite_b% (
    
42.     set /a hour_e=%hour_e%-1
    
43.     set /a munite_e=%munite_e%+60
    
44. )
    
45. set /a munite_=%munite_e%-%munite_b%
    
46. 
    
47. if %hour_e% lss %hour_b% (
    
48.     set /a hour_e=%hour_e%+24
    
49. )
    
50. set /a hour_=%hour_e%-%hour_b%
    
51. goto :eof
    

复制代码

lxl1638

有意思，学习学习。