home *** CD-ROM | disk | FTP | other *** search
/ ftp.wwiv.com / ftp.wwiv.com.zip / ftp.wwiv.com / pub / BBS / CIL20KTA.ZIP / KITCOLOR.BAT < prev    next >
DOS Batch File  |  1992-10-22  |  5KB  |  222 lines
  1. @ECHO OFF
  2. REM Don't forget to copy this to other BAT if used by SHELL and EXTx.bat.
  3. REM I use this as 2.bat during SHELL and EXTDOWN2.BAT....
  4. REM TAGIT
  5. CLS
  6. :CHOICE
  7. CALL SETS.BAT
  8. SET EX=%0.BAT
  9. CLS
  10. SET TXHOW=
  11. TYPE SHOWKIT.SCR
  12. REM "ECHO's are followed by ALT 255, a blank"
  13. ECHO  
  14. CIASK Enter your choice : TXHOW
  15. CLS
  16. IF ".%TXHOW%"=="." SET TXHOW=%DP%
  17. FOR %%F IN (0 x X) DO IF '%TXHOW%'=='%%F' GOTO END
  18. REM ═══════════════════════════════
  19. REM Checks for Protocols
  20. REM DSZ/GSZ Checks
  21. FOR %%F IN (z Z) DO IF '%TXHOW%'=='%%F' DSZBOTH.BAT
  22. FOR %%F IN (g G) DO IF '%TXHOW%'=='%%F' ZYMGBOTH.BAT
  23. FOR %%F IN (y Y) DO IF '%TXHOW%'=='%%F' ZYMOBOTH.BAT
  24. FOR %%F IN (f F) DO IF '%TXHOW%'=='%%F' ZXKGBOTH.BAT
  25. FOR %%F IN (q Q) DO IF '%TXHOW%'=='%%F' ZX1KBOTH.BAT
  26. FOR %%F IN (c C) DO IF '%TXHOW%'=='%%F' ZXCRBOTH.BAT
  27. FOR %%F IN (w W) DO IF '%TXHOW%'=='%%F' ZXOTBOTH.BAT
  28. FOR %%F IN (o O) DO IF '%TXHOW%'=='%%F' CALL DSZTERM.BAT
  29. IF .%TXHOW%==.1 GSZBOTH.BAT
  30. IF .%TXHOW%==.2 GYGMBOTH.BAT
  31. IF .%TXHOW%==.3 GYMOBOTH.BAT
  32. IF .%TXHOW%==.4 GXKGBOTH.BAT
  33. IF .%TXHOW%==.5 GX1KBOTH.BAT
  34. IF .%TXHOW%==.6 GXCRBOTH.BAT
  35. IF .%TXHOW%==.7 CALL GSZTERM.BAT
  36. FOR %%F IN (o O 7) DO IF '%TXHOW%'=='%%F' GOTO CHOICE
  37. REM Individual Checks
  38. FOR %%F IN (h H) DO IF '%TXHOW%'=='%%F' HSLBOTH.BAT
  39. FOR %%F IN (s S) DO IF '%TXHOW%'=='%%F' SZBOTH.BAT
  40. FOR %%F IN (t T) DO IF '%TXHOW%'=='%%F' TBOTH.BAT
  41. FOR %%F IN (a A) DO IF '%TXHOW%'=='%%F' ZITCBOTH.BAT
  42. FOR %%F IN (b B) DO IF '%TXHOW%'=='%%F' BIMOBOTH.BAT
  43. FOR %%F IN (m M) DO IF '%TXHOW%'=='%%F' MPTBOTH.BAT
  44. FOR %%F IN (d D) DO IF '%TXHOW%'=='%%F' DBOTH.BAT
  45. FOR %%F IN (e E) DO IF '%TXHOW%'=='%%F' EBOTH.BAT
  46. FOR %%F IN (i I) DO IF '%TXHOW%'=='%%F' IBOTH.BAT
  47. FOR %%F IN (j J) DO IF '%TXHOW%'=='%%F' JBOTH.BAT
  48. FOR %%F IN (k K) DO IF '%TXHOW%'=='%%F' KBOTH.BAT
  49. FOR %%F IN (l L) DO IF '%TXHOW%'=='%%F' ZMAXBOTH.BAT
  50. FOR %%F IN (n N) DO IF '%TXHOW%'=='%%F' NBOTH.BAT
  51. FOR %%F IN (p P) DO IF '%TXHOW%'=='%%F' PBOTH.BAT
  52. FOR %%F IN (r R) DO IF '%TXHOW%'=='%%F' RBOTH.BAT
  53. FOR %%F IN (v V) DO IF '%TXHOW%'=='%%F' VBOTH.BAT
  54. REM ═════════════
  55. REM Checks for "User Options" "Shells" "Tools"
  56. rem IF .%TXHOW%==.` GOTO REVMARK
  57. IF .%TXHOW%==.+ GOTO HSLSHELL
  58. IF .%TXHOW%==.- GOTO EDITHSL
  59. IF .%TXHOW%==._ GOTO SHOWHSLST
  60. IF ."%TXHOW%"==."'" GOTO HSL2FILES
  61. IF .%TXHOW%==.( GOTO TAGFILES
  62. IF .%TXHOW%==.) CALL USHELL1.BAT
  63. IF .%TXHOW%==.) GOTO CHOICE
  64. FOR %%F IN (u U) DO IF '%TXHOW%'=='%%F' CALL USHELL2.BAT
  65. FOR %%F IN (u U) DO IF '%TXHOW%'=='%%F' GOTO CHOICE
  66. IF .%TXHOW%==.{ GOTO MEMORY
  67. IF .%TXHOW%==.} GOTO MEMTOOL
  68. IF .%TXHOW%==.%;% GOTO FILES2HSL
  69. IF ."%TXHOW%"==."." GOTO SHOWFILES
  70. IF .%TXHOW%==.[ GOTO EDITOR
  71. IF .%TXHOW%==.] GOTO FILEMGR
  72. IF ."%TXHOW%"==."\" GOTO EDITLST
  73. IF ."%TXHOW%"==."/" GOTO QUICKTAG
  74. IF ."%TXHOW%"==."?" CALL HELPKIT.BAT
  75. IF ."%TXHOW%"==."?" GOTO CHOICE
  76. IF ."%TXHOW%"==.""" GOTO ASKDIR
  77. IF ".%TXHOW%"==".~" GOTO SHOWENV
  78. IF ".%TXHOW%"==".!" GOTO EDITEXTBAT
  79. IF ".%TXHOW%"==".@" GOTO EDITSETS
  80. IF .%TXHOW%==.# GOTO #MARK
  81. IF .%TXHOW%==.$ GOTO $MARK
  82. IF ."%TXHOW%"==."%%%" GOTO PCTMARK
  83. IF ."%TXHOW%"==."^" GOTO ^MARK
  84. IF .%TXHOW%==.& GOTO &MARK
  85. IF .%TXHOW%==.* GOTO STARMARK
  86. IF .%TXHOW%==.8 GOTO 8MARK
  87. IF .%TXHOW%==.9 GOTO 9MARK
  88. REM Display message for Unrecognized or Non-supported Command.
  89. CLS
  90. ECHO  
  91. ECHO  
  92. ECHO  
  93. ECHO  
  94. ECHO  
  95. ECHO Command :   %TXHOW%   -  is not supported !
  96. ECHO  
  97. ECHO  
  98. ECHO  
  99. ECHO  
  100. ECHO  
  101. PAUSE
  102. GOTO CHOICE
  103. :ASKDIR
  104. CLS
  105. ECHO  
  106. ECHO                 Direstory Listing for TAGIT
  107. ECHO  
  108. ECHO               Press ALT SPACE to Activate TAGIT
  109. ECHO  
  110. ECHO         C:\UPLOAD or C:\DOCS\*.DOC or C:\FILES\T*.ZIP
  111. ECHO  
  112. ECHO     Default = %UL%\*.*    BLANK= Current Directory
  113. ECHO  
  114. SET TXHOW=%UL%
  115. CIASK Search Path : TXHOW
  116. CLS
  117. DIR %TXHOW% |MORE
  118. PAUSE
  119. GOTO CHOICE
  120. REM ═════════════
  121. REM Tools Section
  122. :MEMORY
  123. MEM /C |MORE
  124. PAUSE
  125. GOTO CHOICE
  126. :MEMTOOL
  127. REM MFT is QEMM Manifest; you can replace as needed
  128. MFT
  129. GOTO CHOICE
  130. :FILES2HSL
  131. IF EXIST %FL% COPY %FL% %HL%
  132. ECHO COPIED %FL% TO %HL%
  133. PAUSE
  134. GOTO CHOICE
  135. :SHOWFILES
  136. TYPE %FL% |MORE
  137. PAUSE
  138. GOTO CHOICE
  139. :EDITOR
  140. %ED%
  141. GOTO CHOICE
  142. :FILEMGR
  143. REM Put file manager here, like Nortom Commander. Watch memory !
  144. ECHO Place File Manager for "]" after :FILEMGR
  145. PAUSE
  146. GOTO CHOICE
  147. :EDITLST
  148. %ED% %FL%
  149. GOTO CHOICE
  150. :QUICKTAG
  151. DIRN.EXE
  152. GOTO CHOICE
  153. REM ══════════════
  154. REM Shells Section
  155. :HSLSHELL
  156. HSLSHELL
  157. GOTO CHOICE
  158. :EDITHSL
  159. %ED% %HL%
  160. GOTO CHOICE
  161. :SHOWHSLST
  162. TYPE HSLSHELL.LST |MORE
  163. PAUSE
  164. GOTO CHOICE
  165. :HSL2FILES
  166. IF EXIST %HL% COPY %HL% %FL%
  167. ECHO COPIED %HL% TO %FL%
  168. PAUSE
  169. GOTO CHOICE
  170. :TAGFILES
  171. TAGFILE
  172. GOTO CHOICE
  173. REM ════════════
  174. REM User Options
  175. :SHOWENV
  176. SET |MORE
  177. PAUSE
  178. GOTO CHOICE
  179. :EDITEXTBAT
  180. EDITORX.BAT 
  181. :EDITSETS
  182. %ED% SETS.BAT
  183. GOTO CHOICE
  184. :#MARK
  185. ECHO Place Command for "#" after :#MARK
  186. PAUSE
  187. GOTO CHOICE
  188. :$MARK
  189. ECHO Place Command for "$" after :$MARK
  190. PAUSE
  191. GOTO CHOICE
  192. :PCTMARK
  193. ECHO Place Command for "%TXHOW%" after :PCTMARK
  194. PAUSE
  195. GOTO CHOICE
  196. :^MARK
  197. ECHO Place Command for "^" after :^MARK
  198. PAUSE
  199. GOTO CHOICE
  200. :&MARK
  201. ECHO Place Command for "&" after :&MARK
  202. PAUSE
  203. GOTO CHOICE
  204. :STARMARK
  205. ECHO Place Command for "*" after :STARMARK
  206. PAUSE
  207. GOTO CHOICE
  208. :8MARK
  209. ECHO Place Command for "8" after :8MARK
  210. PAUSE
  211. GOTO CHOICE
  212. :9MARK
  213. ECHO Place Command for "9" after :9MARK
  214. PAUSE
  215. GOTO CHOICE
  216. :REVMARK
  217. ECHO Place Command for "`" after REVMARK
  218. PAUSE
  219. GOTO CHOICE
  220. GOTO END
  221. :END
  222.