home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / INFO / BATUTL / BAT204C.ZIP / PRTDIR.BAT < prev    next >
Encoding:
DOS Batch File  |  1986-02-25  |  3.0 KB  |  125 lines
  1. ECHO OFF
  2. bat CLS BEGTYPE
  3.  \0EPRTDIR  print status of specified disk(ette) drive\07
  4.        02/25/86  DPbyDB  Huntington Woods, MI 48070
  5.  
  6. END
  7. rem      11/14/85  dab
  8. rem                Using NORTON UTILITIES v3.10
  9. rem                Using EXTENDED BATCH LANGUAGE v2.04
  10. rem      02/12/86  dab
  11. rem                Substitute public domain SDIR24C for
  12. rem                      DOS 'DIR' command
  13. rem                If %2 = PRN  ask if TOF is desired
  14. rem      02/25/86  dab
  15. rem                Substitute public domain EFFIC for
  16. rem                      NORTON DIRSORT command
  17. rem                Sort directory by name via SDIR24C
  18.  
  19. bat * Check if PRN selected as output file on command line
  20. bat *       if PRN NOT selected, use default log name
  21. bat IF .%2 = . %2 = %0.LOG | SKIP 1
  22. bat IF %2 <> PRN %2 = %0.LOG
  23. bat * Check validity of disk parameter on command line
  24. bat IF .%1 <> . %3 = %1 $ 1 1 | SKIP 4
  25.  
  26. bat -rd.1 INKEY     Which disk(ette)? (A-D or Q) %3
  27. bat IF %3 > KEY BEEP TYPE | GOTO -rd.1
  28. bat TYPE %3
  29. bat CALL -chker | %1 = %3 | IF .%3 = . GOTO -rd.1
  30. bat IF %1 = Q GOTO -exit
  31.  
  32. rem      NORTON tm.com   [elapsed time logger]
  33. TM START /C1/L/LOG>%2
  34. TM START /C2/L/LOG
  35. bat TYPE
  36. echo ** %1: Drive Directory Information **
  37. bat BEGTYPE
  38.  \82         Step 1 of 4\07
  39. END
  40.  
  41. rem      DOS chkdsk.com  [standard disk(ette) I/O status]
  42. CHKDSK %1:>>%2
  43. bat *  re-display step again
  44. bat BEGTYPE
  45.  \00\48 ;
  46.         Step 1 of 4\07 ... ;
  47. END
  48. TM STOP /C2/L/N
  49. TM START /C2/L/LOG/N
  50. bat BEGTYPE
  51.  \82         Step 2 of 4\07
  52. END
  53.  
  54. rem      NORTON dt.com   [enhanced disk(ette) I/O status]
  55. DT %1:/D/LOG>>%2
  56. bat *  re-display step again
  57. bat BEGTYPE
  58.  \00\48 ;
  59.         Step 2 of 4\07 ... ;
  60. END
  61. TM STOP /C2/L/N
  62. TM START /C2/L/LOG/N
  63. bat BEGTYPE
  64.  \82         Step 3 of 4\07 ;
  65. END
  66.  
  67. rem      Public Domain   [EFFIC.PAS - disk efficiency ]
  68. rem                      [-Q    - non contigous only  ]
  69. rem                      [-S    - use designated drive]
  70. EFFIC -Q -S %1:>>%2
  71. bat *  re-display step again
  72. bat BEGTYPE
  73.  \00\48 ;
  74.         Step 3 of 4\07 ... ;
  75. END
  76. TM STOP /C2/L/N
  77. TM START /C2/L/LOG/N
  78. bat BEGTYPE
  79.  \82         Step 4 of 4\07
  80. END
  81.  
  82. rem      Public Domain   [directory list] [/A - display Hidden files]
  83. rem                                       [/E - no screen erase     ]
  84. SDIR24C %1:/A/E>>%2
  85. bat *  re-display step again
  86. bat BEGTYPE
  87.  \00\48 ;
  88.         Step 4 of 4\07 ... ;
  89. END
  90. TM STOP /C2/L/N
  91. bat IF %2 = %0.LOG SKIP 11
  92.  
  93. bat -rd.2 TYPE
  94. bat INKEY Top-of-form desired? (Y/N) %A
  95. bat TYPE %A
  96. bat IF %A = Y SKIP 3
  97. bat IF %A = N GOTO -exit
  98. bat GOTO -rd.2
  99.  
  100. TOF
  101. bat GOTO -exit
  102.  
  103. bat TYPE
  104. echo %0 has completed successfully ... Results are in %2
  105.  
  106. bat -exit
  107. bat *  display total elapsed time
  108. bat BEGTYPE
  109.  \00\48 ;
  110.         All Steps  \07 ... ;
  111. END
  112. TM STOP /C1/L/N
  113. bat EXIT
  114.  
  115. rem      subroutine which checks the drive spec for validity.
  116. bat -chker
  117. bat     IF %3 = Q SKIP 5
  118. bat     IF %3 = A SKIP 4
  119. bat     IF %3 = B SKIP 3
  120. bat     IF %3 = C SKIP 2
  121. bat     IF %3 = D SKIP 1
  122. bat     BEEP %3 =
  123. bat -chk.ok RETURN
  124.  
  125.