home *** CD-ROM | disk | FTP | other *** search
/ Compaq Presario Promotional / NEW.iso / demo.bat < prev    next >
Encoding:
DOS Batch File  |  1994-11-22  |  1.7 KB  |  116 lines
  1. @echo off
  2.  
  3. rem
  4. rem Archivo INKEY.COM (C) 1994 ERBE /MCM Software, S.A.
  5. rem 
  6.  
  7.  
  8. set what=
  9. set cd_u=
  10.  
  11. \what ye
  12.  
  13. set cd_u=%what%
  14.  
  15. :pide1
  16.  
  17. cls
  18.  
  19. Echo Pulsa A para leer LEAME.TXT
  20. Echo Pulsa B para cargar VESA 
  21. Echo .
  22. Echo Pulsa cualquier otra para CONTINUAR
  23.  
  24. pause > nul
  25. %cd_u%:\erbe\catalogo\inkey
  26.  
  27. if errorlevel 67 goto pide
  28. if errorlevel 66 goto vesa
  29. if errorlevel 65 goto intru
  30. goto pide
  31.  
  32. :intru
  33. cls
  34. more < leame.txt
  35. goto pide1
  36.  
  37. :vesa
  38. cls
  39. echo Por favor, lee los términos indicados en LEAME.TXT para ver las condiciones
  40. echo de uso para poder utilizar este controlador.
  41. echo .
  42.  
  43. \univbe43\univbe
  44.  
  45. echo .
  46. \what ce "Pulsa tecla para continuar."
  47.  
  48.  
  49. :pide
  50.  
  51. cls
  52.  
  53. Echo Pulsa A para jugar con The Incredible Machine
  54. Echo Pulsa B para ver las Demos
  55.  
  56. pause > nul
  57. %cd_u%:\erbe\catalogo\inkey
  58.  
  59. if errorlevel 67 goto pide
  60. if errorlevel 66 goto demos
  61. if errorlevel 65 goto juego
  62. goto pide
  63.  
  64. :juego
  65. cd \tim
  66. call start 
  67. goto pide
  68.  
  69. :demos
  70.  
  71. set what=
  72.  
  73. if exist c:\sierra\democd\inkey.com goto vale0
  74.  
  75. md c:\sierra
  76. md c:\sierra\democd
  77. copy \erbe\catalogo\inkey.com c:\sierra\democd > nul
  78.  
  79. :vale0
  80.  
  81. cls
  82. if exist c:\erbedemo\aniplay.exe goto vale1
  83.  
  84. md c:\erbedemo
  85.  
  86. copy \erbe\catalogo\inkey.com c:\erbedemo >nul
  87. copy \erbe\aniplay.exe c:\erbedemo > nul
  88. copy \erbe\aa.cfg c:\erbedemo >nul
  89.  
  90. md c:\erbedemo\resource
  91.  
  92. copy \erbe\resource\*.* c:\erbedemo\resource > nul
  93.  
  94. :vale1
  95.  
  96. if exist c:\erbedemo\catalogo.bat goto vale
  97.  
  98. copy \erbe\catalogo\catalogo.bat c:\erbedemo\catalogo.bat >nul
  99. goto vale2
  100.  
  101. :vale
  102. del c:\erbedemo\catalogo.bat >nul
  103. copy \erbe\catalogo\catalogo.bat c:\erbedemo\catalogo.bat >nul
  104.  
  105. :vale2
  106. c:
  107. cd \erbedemo
  108. call catalogo
  109. %cd_u%:
  110. cd \
  111.  
  112. \what v 3
  113. goto vale2
  114.  
  115.  
  116.