ยินดีต้อนรับ สู่ Thailand Generating Batch Scripts

Blogger นี้จัดทำขึ้นมาเพื่อแบ่งปัน Batch Scripts ที่ผู้เขียนได้จัดทำขึ้นเพื่อใช้ในงานต่างๆ ทั้งการจัดการให้ระบบ Computer สามารถทำงานได้ด้วยความถูกต้อง

พร้อมทั้งเพิ่มความสะดวก สำหรับการจัดการดูแลรวมถึงการประยุกต์ใช้งานต่างๆได้ หวังเพียงให้โลกของเรามีการแบ่งปันเอื้อเฟื้อซึ่งกันและกัน ขอให้ประโยชน์สุขก์จงเกิดแก่มนุษย์โลกทุกท่าน

(เพื่อต่อยอดให้เกิดการแบ่งปันแก่มนุษย์โลกสืบต่อไป)

วันพุธที่ 18 มกราคม พ.ศ. 2555

CURRENT DATE TIME AND IDENTIFY LAST 5 MINUTE

@ECHO OFF
:: FIND CURRENT TIME AND IDENTIFY LAST 5 MINUTE
SETlocal enabledelayedexpansion
REM FOR /F "tokens=1,2,3* delims==" %%A IN ('reg query "HKCU\Control Panel\International" ^| find /i "sShortDate"') DO (SET FDATE=%%C)
FOR /F "tokens=1,2,3* delims==: " %%A IN ('DATE /T') DO (SET CDATE=%%B)
FOR /F "tokens=1,2,3* delims==: " %%A IN ('TIME /T') DO (
SET TH=%%A
SET TM=%%B
SET AMPM=%%C
)
ECHO Current Date Time=%CDATE% %TH%:%TM% %AMPM%
SET Z=0
SET X=1
SET THZ=%TH%
:LOOP
IF !X! EQU 6 GOTO :ENDLOOP
SET TH%X%=%THZ%
SET N=%TM%
SET /a N-=%X%
IF !N! LSS 0 GOTO :LST60
IF !N! GEQ 10 SET LS%X%M=%N%
IF !N! LSS 10 SET LS%X%M=0%N%
SET /a X+=1
GOTO :LOOP
:LST60
SET /a N+=60
IF !N! GEQ 10 SET LS%X%M=%N%
IF !N! LSS 10 SET LS%X%M=0%N%
IF !Z! EQU 0 SET /a THZ-=1
SET TH%X%=%THZ%
SET /a X+=1
IF !X! EQU 6 GOTO :ENDLOOP
IF !Z! EQU 1 GOTO :LOOP
SET /a Z+=1
GOTO :LOOP
:ENDLOOP

SET LS1=%CDATE% %TH1%:%LS1M% %AMPM%
SET LS2=%CDATE% %TH2%:%LS2M% %AMPM%
SET LS3=%CDATE% %TH3%:%LS3M% %AMPM%
SET LS4=%CDATE% %TH4%:%LS4M% %AMPM%
SET LS5=%CDATE% %TH5%:%LS5M% %AMPM%
@ECHO Last 1 Mins=%LS1%
@ECHO Last 2 Mins=%LS2%
@ECHO Last 3 Mins=%LS3%
@ECHO Last 4 Mins=%LS4%
@ECHO Last 5 Mins=%LS5%
ENDLOCAL
PAUSE
EXIT

ไม่มีความคิดเห็น:

แสดงความคิดเห็น

ผู้ติดตาม