home *** CD-ROM | disk | FTP | other *** search
/ DP Tool Club 19 / CD_ASCQ_19_010295.iso / vrac / 95calend.zip / CAL95W.BAT < prev    next >
DOS Batch File  |  1994-10-20  |  4KB  |  86 lines

  1. @ECHO OFF
  2. GETMONTH
  3. IF ERRORLEVEL 1 IF NOT ERRORLEVEL 2 GOTO THIRD1
  4. IF ERRORLEVEL 2 IF NOT ERRORLEVEL 3 GOTO THIRD1
  5. IF ERRORLEVEL 3 IF NOT ERRORLEVEL 4 GOTO THIRD1
  6. IF ERRORLEVEL 4 IF NOT ERRORLEVEL 5 GOTO THIRD1
  7. IF ERRORLEVEL 5 IF NOT ERRORLEVEL 6 GOTO THIRD2
  8. IF ERRORLEVEL 6 IF NOT ERRORLEVEL 7 GOTO THIRD2
  9. IF ERRORLEVEL 7 IF NOT ERRORLEVEL 8 GOTO THIRD2
  10. IF ERRORLEVEL 8 IF NOT ERRORLEVEL 9 GOTO THIRD2
  11. IF ERRORLEVEL 9 IF NOT ERRORLEVEL 10 GOTO THIRD3
  12. IF ERRORLEVEL 10 IF NOT ERRORLEVEL 11 GOTO THIRD3
  13. IF ERRORLEVEL 11 IF NOT ERRORLEVEL 12 GOTO THIRD3
  14. IF ERRORLEVEL 12 GOTO THIRD3
  15. GOTO END
  16. :THIRD1
  17. ECHO                   JANUARY                        FEBRUARY            
  18. ECHO.
  19. ECHO          S   M   T   W   T   F   S      S   M   T   W   T   F   S 
  20. ECHO         ══════════════════════════     ══════════════════════════ 
  21. ECHO          1   2   3   4   5   6   7                  1   2   3   4  
  22. ECHO          8   9   10  11  12  13  14     5   6   7   8   9   10  11  
  23. ECHO          15  16  17  18  19  20  21     12  13  14  15  16  17  18  
  24. ECHO          22  23  24  25  26  27  28     19  20  21  22  23  24  25 
  25. ECHO          29  30  31                     26  27  28                     
  26. ECHO.
  27. ECHO                    MARCH                          APRIL
  28. ECHO.
  29. ECHO          S   M   T   W   T   F   S      S   M   T   W   T   F   S
  30. ECHO          ══════════════════════════     ══════════════════════════
  31. ECHO                      1   2   3   4                              1 
  32. ECHO          5   6   7   8   9   10  11     2   3   4   5   6   7   8  
  33. ECHO          12  13  14  15  16  17  18     9   10  11  12  13  14  15 
  34. ECHO          19  20  21  22  23  24  25     16  17  18  19  20  21  22 
  35. ECHO          26  27  28  29  30  31         23  24  25  26  27  28  29
  36. ECHO                                         30
  37. ECHO.
  38. GOTO END
  39. :THIRD2
  40. ECHO                      MAY                           JUNE              
  41. ECHO.
  42. ECHO          S   M   T   W   T   F   S      S   M   T   W   T   F   S 
  43. ECHO         ══════════════════════════     ══════════════════════════ 
  44. ECHO              1   2   3   4   5   6                      1   2   3    
  45. ECHO          7   8   9   10  11  12  13     4   5   6   7   8   9   10    
  46. ECHO          14  15  16  17  18  19  20     11  12  13  14  15  16  17    
  47. ECHO          21  22  23  24  25  26  27     18  19  20  21  22  23  24  
  48. ECHO          28  29  30  31                 25  26  27  28  29  30             
  49. ECHO.
  50. ECHO                     JULY                         AUGUST
  51. ECHO.
  52. ECHO          S   M   T   W   T   F   S      S   M   T   W   T   F   S
  53. ECHO          ══════════════════════════     ══════════════════════════
  54. ECHO                                  1              1   2   3   4   5 
  55. ECHO          2   3   4   5   6   7   8      6   7   8   9   10  11  12 
  56. ECHO          9   10  11  12  13  14  15     13  14  15  16  17  18  19 
  57. ECHO          16  17  18  19  20  21  22     20  21  22  23  24  25  26 
  58. ECHO          23  24  25  26  27  28  29     27  28  29  30  31            
  59. ECHO          30  31
  60. ECHO.
  61. GOTO END
  62. :THIRD3
  63. ECHO                   SEPTEMBER                      OCTOBER             
  64. ECHO.
  65. ECHO          S   M   T   W   T   F   S      S   M   T   W   T   F   S 
  66. ECHO         ══════════════════════════     ══════════════════════════ 
  67. ECHO                              1   2      1   2   3   4   5   6   7      
  68. ECHO          3   4   5   6   7   8   9      8   9   10  11  12  13  14   
  69. ECHO          10  11  12  13  14  15  16     15  16  17  18  19  20  21 
  70. ECHO          17  18  19  20  21  22  23     22  23  24  25  26  27  28     
  71. ECHO          24  25  26  27  28  29  30     29  30  31                      
  72. ECHO.
  73. ECHO                   NOVEMBER                      DECEMBER
  74. ECHO.
  75. ECHO          S   M   T   W   T   F   S      S   M   T   W   T   F   S
  76. ECHO          ══════════════════════════     ══════════════════════════
  77. ECHO                      1   2   3   4                          1   2  
  78. ECHO          5   6   7   8   9   10  11     3   4   5   6   7   8   9 
  79. ECHO          12  13  14  15  16  17  18     10  11  12  13  14  15  16
  80. ECHO          19  20  21  22  23  24  25     17  18  19  20  21  22  23 
  81. ECHO          26  27  28  29  30  31         24  25  26  27  28  29  30
  82. ECHO                                         31
  83. ECHO.
  84. GOTO END
  85. :END
  86. PAUSE