home *** CD-ROM | disk | FTP | other *** search
/ CD Actual 8 / CDACTUAL8.iso / share / dos / varios / texlotto / install.bat < prev    next >
Encoding:
DOS Batch File  |  1996-10-12  |  4.0 KB  |  141 lines
  1. ECHO OFF
  2. CLS
  3. BLUE.COM
  4. ECHO                 TEXLOTTO Installation program 
  5. ECHO   ---------------------------------------------------------------
  6. ECHO          Hard drive installation is preferred method. 
  7. ECHO   ( loading of data files is slowed considerbly if ran from floppy )
  8. ECHO   ---------------------------------------------------------------
  9. ECHO   Press  1  if installing to HARD DRIVE (preferred option)
  10. ECHO   Press  2  To run TEXLOTTO FROM floppy. 
  11. ECHO   Press  Q  to quit/abort process
  12. ECHO   ---------------------------------------------------------------
  13. getkey ,Q81,q81,149,2/E
  14. IF ERRORLEVEL 81 GOTO abort
  15. IF ERRORLEVEL 49 GOTO hardrive
  16. IF ERRORLEVEL 2 GOTO floppydrive
  17. :floppydrive
  18. cls
  19. BLUE.COM
  20. ECHO If you don't have a hard drive, you might consider buying one.
  21. ECHO --------------------------------------------------------------
  22. ECHO Please standby while I crank this thing up.
  23. TEXLOTTO
  24. GOTO QUIT
  25. echo ------------------------------------------------------------
  26. :hardrive
  27. cls
  28. BLUE.COM
  29. ECHO ---------------------------------------------------------------
  30. ECHO Hard drive installation will prepare a directory named 
  31. echo \TEXLOTTO on your hard drive and install files to that area. 
  32. ECHO ---------------------------------------------------------------
  33. echo What hard drive letter will you install TO as your target?
  34. ECHO ---------------------------------------------------------------
  35. echo press  C  for  Hard drive C:
  36. echo press  D  for  Hard drive D:
  37. echo press  E  for  Hard drive E:
  38. echo press  F  for  Hard drive F:
  39. echo press  G  for  Hard drive G:
  40. echo press  Q  to quit/abort
  41. ECHO ---------------------------------------------------------------
  42. getkey ,Q81,q81,G71,g71,F70,f70,E69,e69,D68,d68,C67,c67/E
  43. IF ERRORLEVEL 81 GOTO abort
  44. IF ERRORLEVEL 71 goto hdg
  45. IF ERRORLEVEL 70 GOTO hdf
  46. IF ERRORLEVEL 69 GOTO hde
  47. IF ERRORLEVEL 68 GOTO hdd
  48. IF ERRORLEVEL 67 GOTO hdc
  49. :hdc
  50. cls
  51. BLUE.COM
  52. MD C:\TEXLOTTO
  53. if not exist C:\NUL goto abort
  54. ECHO Files now being copied to C:\TEXLOTTO.
  55. COPY TEXLOTTO.* C:\TEXLOTTO
  56. COPY TEXLOGO.BMP C:\TEXLOTTO
  57. COPY ORDER.FRM C:\TEXLOTTO
  58. COPY PRETEST.TXT C:\TEXLOTTO
  59. COPY WINNGNOS.TXT C:\TEXLOTTO
  60. C:
  61. CD\TEXLOTTO
  62. TEXLOTTO.EXE
  63. GOTO QUIT
  64. :hdd
  65. cls
  66. BLUE.COM
  67. MD D:\TEXLOTTO
  68. if not exist D:\NUL goto abort
  69. ECHO Files now being copied to D:\TEXLOTTO.
  70. COPY TEXLOTTO.* D:\TEXLOTTO
  71. COPY TEXLOGO.BMP D:\TEXLOTTO
  72. COPY ORDER.FRM D:\TEXLOTTO
  73. COPY PRETEST.TXT D:\TEXLOTTO
  74. COPY WINNGNOS.TXT D:\TEXLOTTO
  75. D:
  76. CD\TEXLOTTO
  77. TEXLOTTO.EXE
  78. GOTO QUIT
  79. :hde
  80. cls
  81. BLUE.COM
  82. MD E:\TEXLOTTO
  83. if not exist E:\NUL goto abort
  84. ECHO Files now being copied to E:\TEXLOTTO.
  85. COPY TEXLOTTO.* E:\TEXLOTTO
  86. COPY TEXLOGO.BMP E:\TEXLOTTO
  87. COPY ORDER.FRM E:\TEXLOTTO
  88. COPY PRETEST.TXT E:\TEXLOTTO
  89. COPY WINNGNOS.TXT E:\TEXLOTTO
  90. E:
  91. CD\TEXLOTTO
  92. TEXLOTTO.EXE
  93. GOTO QUIT
  94. :hdf
  95. cls
  96. BLUE.COM
  97. MD F:\TEXLOTTO
  98. if not exist F:\NUL goto abort
  99. ECHO Files now being copied to F:\TEXLOTTO.
  100. COPY TEXLOTTO.* F:\TEXLOTTO
  101. COPY TEXLOGO.BMP F:\TEXLOTTO
  102. COPY ORDER.FRM F:\TEXLOTTO
  103. COPY PRETEST.TXT F:\TEXLOTTO
  104. COPY WINNGNOS.TXT F:\TEXLOTTO
  105. F:
  106. CD\TEXLOTTO
  107. TEXLOTTO.EXE
  108. GOTO QUIT
  109. :hdg
  110. cls
  111. BLUE.COM
  112. MD G:\TEXLOTTO
  113. if not exist G:\NUL goto abort
  114. ECHO Files now being copied to G:\TEXLOTTO.
  115. COPY TEXLOTTO.* G:\TEXLOTTO
  116. COPY TEXLOGO.BMP G:\TEXLOTTO
  117. COPY ORDER.FRM G:\TEXLOTTO
  118. COPY PRETEST.TXT G:\TEXLOTTO
  119. COPY WINNGNOS.TXT G:\TEXLOTTO
  120. G:
  121. CD\TEXLOTTO
  122. TEXLOTTO.EXE
  123. GOTO QUIT
  124. :ABORT
  125. cls
  126. BLUE.COM
  127. ECHO  Installation process aborted
  128. GOTO END
  129. :QUIT
  130. cls
  131. ECHO ------------------------------------------------------------------
  132. ECHO For future runs of TEXLOTTO, move to this directory, type 
  133. ECHO TEXLOTTO and press enter or set up a bat file to do so.
  134. ECHO ------------------------------------------------------------------
  135. ECHO OR:            *** for Windows installation ***
  136. ECHO From Windows, select File,New,Program to set up an icon in Windows.
  137. ECHO ------------------------------------------------------------------
  138. ECHO Thank you for using TEXLOTTO.
  139. :END
  140. pause
  141.