home *** CD-ROM | disk | FTP | other *** search
/ Internet Access: To the Information Highway / InternetAccessToTheInformationHighway1994.disc1of1.iso / go.bat < prev    next >
DOS Batch File  |  1994-06-08  |  3KB  |  152 lines
  1. @echo off
  2.  
  3.  
  4. cd \
  5.  
  6. if not exist .\cdidx\cs\pic\emerald2.pcx goto fail
  7.  
  8. goto end0
  9.  
  10. :fail
  11. cls
  12. echo.
  13. echo.
  14. echo Sorry, you are on the wrong drive. Move to CD-ROM drive before executing.
  15. echo.
  16. pause
  17. echo.
  18. goto end
  19.  
  20. :end0
  21.  
  22. @echo off
  23. set derml=
  24. set envtest1=
  25. set envtest2=
  26. set cdr=
  27. set cdidx=
  28. set CDT=
  29. set cdidxtmp=
  30. set bd=
  31. set goinst=
  32.  
  33. echo Checking to see if you are on the correct drive...
  34. if not exist .\cdidx\cdidx.exe goto oops
  35. echo Checking your available environment space...
  36. set envtest1=xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
  37. set envtest2=xxxxxxxxxxxxxxx
  38. if %envtest2% == xxxxxxxxxxxxxxx goto envok
  39. set envtest1=
  40. set envtest2=
  41. goto envnok
  42.  
  43. :envok
  44. set envtest1=
  45. set envtest2=
  46. echo Environment space adequate.
  47. goto envcont
  48.  
  49. :envnok
  50. cls
  51. echo.
  52. echo.
  53. echo.
  54. echo                             !!!!!! WARNING !!!!!!
  55. echo.
  56. echo You do not have enough environment space to install the CdIdx variables. 
  57. echo Please consult your DOS manual about expanding it. You need at least
  58. echo 70 bytes of free environment space to complete the initialization
  59. echo  processes.
  60. echo.
  61. set cont=n
  62. pause
  63. cls
  64. goto end
  65.  
  66. :envcont
  67. echo @echo off >c:\tmp.bat
  68. echo Determining which drive is your CD-ROM drive...
  69. cd >c:\tmp1.dat
  70. \cdidx\cstring -f1 -d: <c:\tmp1.dat >c:\tmp2.dat
  71. \cdidx\strdt s/^/"set CDR=" <c:\tmp2.dat >>c:\tmp.bat
  72.  
  73. echo Determining your boot drive...
  74.  
  75. set >c:\tmp1.dat
  76. \cdidx\fstring "COMSPEC=" <c:\tmp1.dat >c:\tmp2.dat
  77. \cdidx\cstring -c9-9 <c:\tmp2.dat >c:\tmp3.dat
  78. \cdidx\strdt s/^/"set BD=" <c:\tmp3.dat >>c:\tmp.bat
  79. echo Setting Environment Variables (Running generated C:\TMP.BAT)...
  80. call c:\tmp.bat
  81. echo Cleanup: Erasing C:\tmp1.dat, C:\tmp2.dat, C:\tmp3.dat...
  82. erase C:\tmp1.dat
  83. erase C:\tmp2.dat
  84. erase C:\tmp3.dat
  85.  
  86. echo Attemping to create %bd%:\cdidxtmp directory...
  87. md %bd%:\cdidxtmp >\nul
  88. set CDT=\cdidxtmp
  89. set cdidx=%bd%%cdr%1%CDT%
  90.  
  91. echo Setup finished.
  92.  
  93. echo.
  94. echo   Boot drive was found to be drive: %bd%:
  95. echo CD-ROM drive was found to be drive: %cdr%:
  96. echo.
  97. echo If this is INCORRECT, you may need to run INSTALL to specify them.
  98. echo.
  99. echo CdIdx is next.
  100. pause
  101. if no == %cdidxg% goto nograph
  102. if exist .\cdidx\cs\pic\emerald2.pcx \cdidx\cs\cshow \cdidx\cs\pic\emerald2.pcx+x>c:\nul
  103. \cdidx\sleep 5
  104. goto donegraph
  105.  
  106. :nograph
  107. cls
  108. echo.
  109. echo.
  110. echo.
  111. echo.
  112. echo.
  113. echo.
  114. echo                E M E R A L D   S O F T W A R E   P R E S E N T S :
  115. echo.
  116. echo.
  117. echo.
  118. echo                    Internet Access to the Information Highway.
  119. echo.
  120. echo.
  121. echo.
  122. echo.
  123. echo.
  124. echo.
  125. echo.
  126. echo.
  127. pause
  128. goto donegraph
  129.  
  130. :donegraph
  131. cd \cdidx
  132. cdidx
  133. cd \
  134. cls
  135. goto end
  136.  
  137. :oops
  138. cls 
  139. echo.
  140. echo.
  141. echo.
  142. echo                          !!!!! WARNING !!!!!
  143. echo.
  144. echo You must make the drive you run GO.BAT from your default drive.
  145. goto end
  146.  
  147. :end
  148. echo.
  149.  
  150. REM Mike: Set the env var "cdidxg" to "no" and it shuts off the logo screen.
  151. REM So, "set cdidxg=no" turns off the logo. "set cdidxg=" turns on the logo.
  152.