home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Professional / OS2PRO194.ISO / os2 / prgramer / cenvi / isday_2.cmd < prev    next >
Encoding:
Text File  |  1994-03-08  |  744 b   |  14 lines
  1. @echo OFF
  2. REM *************************************************************************
  3. REM *** IsDay_2.cmd - This is like IsDay_1.cmd (Set ErrorLevel 1 if it is ***
  4. REM *** ver.1         requested day of the week, and ErrorLeve 0 if not), ***
  5. REM ***               but accomplishes this in only one quick call to     ***
  6. REM ***               CENVI.  Unlike IsDay_1.cmd, this does no error      ***
  7. REM ***               checking and provides no help.                      ***
  8. REM *************************************************************************
  9.  
  10. cenvi  day="%1"  day[3]=0    return( strstr(strupr(ctime(time())),strupr(day)) ? 1 : 0 )
  11.  
  12. if ErrorLevel 1 ECHO Yes, today is %1
  13. if not ErrorLevel 1 ECHO No, today is not %1
  14.