home *** CD-ROM | disk | FTP | other *** search
/ DP Tool Club 19 / CD_ASCQ_19_010295.iso / vrac / 95calend.zip / CAL95.BAT next >
DOS Batch File  |  1994-12-09  |  4KB  |  155 lines
  1. @ECHO OFF
  2. GETMONTH
  3. IF ERRORLEVEL 1 IF NOT ERRORLEVEL 2 GOTO JAN
  4. IF ERRORLEVEL 2 IF NOT ERRORLEVEL 3 GOTO FEB
  5. IF ERRORLEVEL 3 IF NOT ERRORLEVEL 4 GOTO MAR
  6. IF ERRORLEVEL 4 IF NOT ERRORLEVEL 5 GOTO APR
  7. IF ERRORLEVEL 5 IF NOT ERRORLEVEL 6 GOTO MAY
  8. IF ERRORLEVEL 6 IF NOT ERRORLEVEL 7 GOTO JUN
  9. IF ERRORLEVEL 7 IF NOT ERRORLEVEL 8 GOTO JUL
  10. IF ERRORLEVEL 8 IF NOT ERRORLEVEL 9 GOTO AUG
  11. IF ERRORLEVEL 9 IF NOT ERRORLEVEL 10 GOTO SEP
  12. IF ERRORLEVEL 10 IF NOT ERRORLEVEL 11 GOTO OCT
  13. IF ERRORLEVEL 11 IF NOT ERRORLEVEL 12 GOTO NOV
  14. IF ERRORLEVEL 12 GOTO DEC
  15. :JAN
  16. ECHO  January:
  17. GOTO CALSU31
  18. :FEB
  19. ECHO  February:
  20. GOTO FEBW28
  21. :MAR
  22. ECHO  March:
  23. GOTO CALW31
  24. :APR
  25. ECHO  April:
  26. GOTO CALSA30
  27. :MAY
  28. ECHO  May:
  29. GOTO CALM31
  30. :JUN
  31. ECHO  June:
  32. GOTO CALTH30
  33. :JUL
  34. ECHO  July:
  35. GOTO CALSA31
  36. :AUG
  37. ECHO  August:
  38. GOTO CALT31
  39. :SEP
  40. ECHO  September:
  41. GOTO CALF30
  42. :OCT
  43. ECHO  October:
  44. GOTO CALSU31
  45. :NOV
  46. ECHO  November:
  47. GOTO CALW30
  48. :DEC
  49. ECHO  December:
  50. GOTO CALF31
  51. :CALSU31
  52. ECHO   S   M   T   W   T   F   S
  53. ECHO   ══════════════════════════
  54. ECHO   1   2   3   4   5   6   7
  55. ECHO   8   9   10  11  12  13  14
  56. ECHO   15  16  17  18  19  20  21
  57. ECHO   22  23  24  25  26  27  28
  58. ECHO   29  30  31
  59. GOTO END
  60. :CALM31
  61. ECHO   S   M   T   W   T   F   S
  62. ECHO   ══════════════════════════
  63. ECHO       1   2   3   4   5   6
  64. ECHO   7   8   9   10  11  12  13
  65. ECHO   14  15  16  17  18  19  20
  66. ECHO   21  22  23  24  25  26  27
  67. ECHO   28  29  30  31
  68. GOTO END
  69. :CALT31
  70. ECHO   S   M   T   W   T   F   S
  71. ECHO   ══════════════════════════
  72. ECHO           1   2   3   4   5
  73. ECHO   6   7   8   9   10  11  12
  74. ECHO   13  14  15  16  17  18  19
  75. ECHO   20  21  22  23  24  25  26
  76. ECHO   27  28  29  30  31
  77. GOTO END
  78. :CALW31
  79. ECHO   S   M   T   W   T   F   S
  80. ECHO   ══════════════════════════
  81. ECHO               1   2   3   4
  82. ECHO   5   6   7   8   9   10  11
  83. ECHO   12  13  14  15  16  17  18
  84. ECHO   19  20  21  22  23  24  25
  85. ECHO   26  27  28  29  30  31
  86. ECHO 
  87. GOTO END
  88. :CALF31
  89. ECHO   S   M   T   W   T   F   S
  90. ECHO   ══════════════════════════
  91. ECHO                       1   2 
  92. ECHO   3   4   5   6   7   8   9    
  93. ECHO   10  11  12  13  14  15  16  
  94. ECHO   17  18  19  20  21  22  23 
  95. ECHO   24  25  26  27  28  29  30
  96. ECHO   31
  97. GOTO END
  98. :CALSA31
  99. ECHO   S   M   T   W   T   F   S
  100. ECHO   ══════════════════════════
  101. ECHO                           1  
  102. ECHO   2   3   4   5   6   7   8     
  103. ECHO   9   10  11  12  13  14  15  
  104. ECHO   16  17  18  19  20  21  22 
  105. ECHO   23  24  25  26  27  28  29
  106. ECHO   30  31
  107. GOTO END
  108. :CALW30
  109. ECHO   S   M   T   W   T   F   S
  110. ECHO   ══════════════════════════
  111. ECHO               1   2   3   4 
  112. ECHO   5   6   7   8   9   10  11
  113. ECHO   12  13  14  15  16  17  18
  114. ECHO   19  20  21  22  23  24  25
  115. ECHO   26  27  28  29  30 
  116. GOTO END
  117. :CALTH30
  118. ECHO   S   M   T   W   T   F   S
  119. ECHO   ══════════════════════════
  120. ECHO                   1   2   3  
  121. ECHO   4   5   6   7   8   9   10
  122. ECHO   11  12  13  14  15  16  17
  123. ECHO   18  19  20  21  22  23  24
  124. ECHO   24  26  27  28  29  30 
  125. GOTO END
  126. :CALF30
  127. ECHO   S   M   T   W   T   F   S
  128. ECHO   ══════════════════════════
  129. ECHO                       1   2 
  130. ECHO   3   4   5   6   7   8   9    
  131. ECHO   10  11  12  13  14  15  16  
  132. ECHO   17  18  19  20  21  22  23 
  133. ECHO   24  25  26  27  28  29  30
  134. GOTO END
  135. :CALSA30
  136. ECHO   S   M   T   W   T   F   S
  137. ECHO   ══════════════════════════
  138. ECHO                           1  
  139. ECHO   2   3   4   5   6   7   8     
  140. ECHO   9   10  11  12  13  14  15  
  141. ECHO   16  17  18  19  20  21  22 
  142. ECHO   23  24  25  26  27  28  29
  143. ECHO   30
  144. GOTO END
  145. :FEBW28
  146. ECHO   S   M   T   W   T   F   S
  147. ECHO   ══════════════════════════
  148. ECHO               1   2   3   4 
  149. ECHO   5   6   7   8   9   10  11
  150. ECHO   12  13  14  15  16  17  18
  151. ECHO   19  20  21  22  23  24  25
  152. ECHO   26  27  28
  153. GOTO END
  154. :END
  155. PAUSE