home *** CD-ROM | disk | FTP | other *** search
/ Free/Shareware Compilatio… / OK PC / MP Multipress / M-35751-94-IF-UTILSHAREWARE.img / INSTALAR.BAT < prev   
Encoding:
DOS Batch File  |  1994-11-02  |  10.1 KB  |  266 lines
  1. cls
  2. @echo off
  3. cls
  4. if %1x==x goto use
  5. if %2x==x goto use
  6. for %%f in (a:,b:) do if %1 == %%f goto check2        
  7. for %%f in (A:,B:) do if %1 == %%f goto check2
  8. goto use
  9.  
  10. :check2
  11. for %%f in (c:,d:,e:,f:,g:,h:,i:,j:,k:,l:,m:,n:,o:,p:,q:,r:,s:,t:,u:,v:,w:,x:,y:,z:) do if %2 == %%f goto start
  12. for %%f in (C:,D:,E:,F:,G:,H:,I:,J:,K:,L:,M:,N:,O:,P:,Q:,R:,S:,T:,U:,V:,W:,X:,Y:,Z:) do if %2 == %%f goto start
  13. goto use
  14.  
  15. :start
  16. cls
  17. echo.
  18. echo ╔═════════════════════════════════════════════════════════════════════════════╗
  19. echo ║             UTILIDAD DE INSTALACION DE LOS PROGRAMAS SHAREWARE DE           ║
  20. echo ║  ─────────────────────────────────────────────────────────────────────────  ║
  21. echo ║                  "INFORMATICA FACIL", ENTREGA DICIEMBRE '94                 ║
  22. echo ╚═════════════════════════════════════════════════════════════════════════════╝
  23. echo.
  24. echo       ┌──────────────────────────────────────────────────────────────────┐
  25. echo       │ A.- Instalar el programa "Top Draw" en su disco %2.              │
  26. echo       │ B.- Instalar la aplicación "MIDI Made v2.0" en su disco %2.      │
  27. echo       │ C.- Copiar los ficheros de sonido de "Yabdabdo" en su disco %2.  │
  28. echo       │ D.- Instalar el juego "Aquanoid v1.35" en su disco %2.           │
  29. echo       │ E.- Instalar el juego "Machine Nation" en su disco %2.           │
  30. echo       │ F.- Instalar el juego "Xargon 1: Beyond Reality" en su disco %2. │
  31. echo       ├──────────────────────────────────────────────────────────────────┤
  32. echo       │ G.- Abandonar la utilidad de instalación.                        │
  33. echo       └──────────────────────────────────────────────────────────────────┘
  34. echo.
  35. echo ╔═════════════════════════════════════════════════════════════════════════════╗
  36. echo ║ Elija cualquiera de las opciones para instalar el programa correspondiente. ║
  37. echo ║        Pulse la opción "G" para abandonar la utilidad de instalación.       ║
  38. echo ╚═════════════════════════════════════════════════════════════════════════════╝
  39. ask .
  40. if errorlevel 7 goto end
  41. if errorlevel 6 goto xargon
  42. if errorlevel 5 goto machine
  43. if errorlevel 4 goto aqua
  44. if errorlevel 3 goto sonidowv
  45. if errorlevel 2 goto midimade
  46. if errorlevel 1 goto topdraw
  47. goto start
  48.  
  49. :topdraw
  50.         cls
  51.         batchman direxist %2\topdraw
  52.         if errorlevel 1 goto yaexiste
  53.         espacio %2 2800000
  54.         if not errorlevel 1 goto space
  55.         md %2\topdraw >nul
  56.         echo.
  57.         echo Copiando ficheros del programa "Top Draw" al disco %2...
  58.         copy \topdraw\*.* %2\topdraw\*.* /v >nul
  59.         %2
  60.         cd\topdraw
  61.         topdcomp.exe >nul
  62.         del topdcomp.exe >nul
  63.         %1
  64.         echo.
  65.         echo Ha concluido la instalación de "Top Draw".
  66.         pause
  67.         goto start
  68.  
  69. :midimade
  70.         cls
  71.         batchman direxist %2\midimade
  72.         if errorlevel 1 goto yaexiste
  73.         espacio %2 1400000
  74.         if not errorlevel 1 goto space
  75.         md %2\midimade >nul
  76.         echo.
  77.         echo Copiando ficheros del programa "MIDI Made v2.0" al disco %2...
  78.         copy \midimade\*.* %2\midimade\*.* /v >nul
  79.         echo.
  80.         echo Ha concluido la instalación de "MIDI Made v2.0".
  81.         pause
  82.         goto start
  83.  
  84. :sonidowv
  85.         cls
  86.         batchman direxist %2\sonidowv
  87.         if errorlevel 1 goto yaexiste
  88.         espacio %2 700000
  89.         if not errorlevel 1 goto space
  90.         md %2\sonidowv >nul
  91.         echo.
  92.         echo Copiando ficheros del programa "Yabdabdo.wav" al disco %2...
  93.         copy \sonidowv\*.* %2\sonidowv\*.* /v >nul
  94.         %2
  95.         cd\sonidowv
  96.         yabad-.exe >nul
  97.         del yabad-.exe >nul
  98.         %1
  99.         echo.
  100.         echo Ha concluido la instalación de "Yabdabdo.wav".
  101.         pause
  102.         goto start
  103.  
  104. :aqua
  105.         cls
  106.         batchman direxist %2\aqua
  107.         if errorlevel 1 goto yaexiste
  108.         espacio %2 1200000
  109.         if not errorlevel 1 goto space
  110.         :chdisco2
  111.                 cls
  112.                 echo.
  113.                 echo Introduzca el disquete 2/2 en la unidad %1, por favor.
  114.                 pause
  115.                 if not exist %1\aqua\aqua.exe goto chdisco2
  116.                 md %2\aqua >nul
  117.                 echo Copiando ficheros de "Aquanoid v1.35" al disco %2...
  118.                 copy \aqua\*.* %2\aqua\*.* /v >nul
  119.         :chdisco1
  120.                 cls
  121.                 echo.
  122.                 echo Introduzca de nuevo el disquete 1/2 (Instalar) en la unidad %1.
  123.                 pause
  124.                 if not exist %1\topdraw\topdcomp.exe goto chdisco1
  125.                 echo.
  126.         echo Ha finalizado la instalación de "Aquanoid v1.35".
  127.         echo.
  128.         pause
  129.         goto start
  130.  
  131. :machine
  132.         cls
  133.         batchman direxist %2\machine
  134.         if errorlevel 1 goto yaexiste
  135.         espacio %2 1600000
  136.         if not errorlevel 1 goto space
  137.         :pdisco2
  138.                 cls
  139.                 echo.
  140.                 echo Introduzca el disquete 2/2 en la unidad %1, por favor.
  141.                 pause
  142.                 if not exist %1\machine\machine.exe goto pdisco2
  143.                 md %2\machine >nul
  144.                 echo Copiando ficheros de "Machine Nation" al disco %2...
  145.                 copy \machine\*.* %2\machine\*.* /v >nul
  146.         :pdisco1
  147.                 cls
  148.                 echo.
  149.                 echo Introduzca de nuevo el disquete 1/2 (Instalar) en la unidad %1.
  150.                 pause
  151.                 if not exist %1\topdraw\topdcomp.exe goto pdisco1
  152.                 echo.
  153.         echo Ha finalizado la instalación de "Machine Nation".
  154.         echo.
  155.         pause
  156.         goto start
  157.  
  158. :xargon
  159.         cls
  160.         batchman direxist %2\xargon
  161.         if errorlevel 1 goto yaexiste
  162.         espacio %2 2800000
  163.         if not errorlevel 1 goto space
  164.         :yodisco2
  165.                 cls
  166.                 echo.
  167.                 echo Introduzca el disquete 2/2 en la unidad %1, por favor.
  168.                 pause
  169.                 if not exist %1\machine\machine.exe goto yodisco2
  170.                 md %2\xargon >nul
  171.                 echo Copiando ficheros de "Xargon 1: Beyond Reality" al disco %2...
  172.                 copy \xargon\*.* %2\xargon\*.* /v >nul
  173.                 %2
  174.                 cd\xargon
  175.                 xargoncp.exe >nul
  176.                 del xargoncp.exe >nul
  177.                 %1
  178.         :yodisco1
  179.                 cls
  180.                 echo.
  181.                 echo Introduzca de nuevo el disquete 1/2 (Instalar) en la unidad %1.
  182.                 pause
  183.                 if not exist %1\topdraw\topdcomp.exe goto yodisco1
  184.                 echo.
  185.         echo Ha finalizado la instalación de "Xargon 1: Beyond Reality".
  186.         echo.
  187.         pause
  188.         goto start
  189.  
  190. :end
  191. cls 
  192. echo.
  193. echo.
  194. echo ╔═════════════════════════════════════════════════════════════════════════════╗
  195. echo ║      FIN DE LA INSTALACION DE PROGRAMAS SHAREWARE DE INFORMATICA FACIL      ║
  196. echo ║    ─────────────────────────────────────────────────────────────────────    ║
  197. echo ║    EN CASO DE HABERSE INSTALADO ALGUN PROGRAMA, ESTE SE ENCONTRARA EN EL    ║
  198. echo ║      DIRECTORIO CORRESPONDIENTE, DE ACUERDO CON LA SIGUIENTE RELACION:      ║
  199. echo ╚═════════════════════════════════════════════════════════════════════════════╝
  200. echo.
  201. echo    ┌────────────────────────────────────────────────────────────────────────┐
  202. echo    │ "Top Draw"                 SE HABRIA INSTALADO EN   ────   %2\TOPDRAW  │
  203. echo    │ "MIDI Made v2.0"           SE HABRIA INSTALADO EN   ────   %2\MIDIMADE │
  204. echo    │ "Yabdabdo.wav"             SE HABRIA INSTALADO EN   ────   %2\SONIDOWV │
  205. echo    │ "Aquanoid v1.35"           SE HABRIA INSTALADO EN   ────   %2\AQUA     │
  206. echo    │ "Machine Nation"           SE HABRIA INSTALADO EN   ────   %2\MACHINE  │
  207. echo    │ "Xargon 1: Beyond Reality" SE HABRIA INSTALADO EN   ────   %2\XARGON   │
  208. echo    └────────────────────────────────────────────────────────────────────────┘
  209. echo.
  210. echo  ╔═════════════════════════════════════════════════════════════════════════════╗
  211. echo  ║ Utilice el comando CD  de MS-DOS para acceder al directorio deseado y ya en ║
  212. echo  ║ en él cargue el fichero ejecutable correspondiente para activar el programa ║
  213. echo  ╚═════════════════════════════════════════════════════════════════════════════╝
  214. goto fin
  215.  
  216. :space
  217. cls
  218. echo.
  219. echo.
  220. echo   ╔═══════════════════════════════════════════════════════════════════════════╗
  221. echo   ║     El programa seleccionado del disquete de Informática Fácil nº 21      ║
  222. echo   ║      necesita más espacio libre en el disco duro del que hay ahora.       ║ 
  223. echo   ║       Elimine ficheros innecesarios del disco e inténtelo de nuevo.       ║
  224. echo   ╚═══════════════════════════════════════════════════════════════════════════╝
  225. pause
  226. goto start
  227.  
  228. :use
  229. echo Para instalar los programas del disquete de Informática Fácil en su disco duro:
  230. echo ──────────────────────────────────────────────────────────────────────────
  231. echo 1.  Teclee INSTALAR [UNIDAD-ORIGEN] [UNIDAD-DESTINO]
  232. echo     ────────────────────────────────────────────────
  233. echo     Las posibles opciones para UNIDAD-ORIGEN, dependiendo
  234. echo     de su sistema, son:
  235. echo         A:
  236. echo         B:
  237. echo         etc.
  238. echo     Las posibles opciones para UNIDAD-DESTINO, dependiendo
  239. echo     de su sistema, son:
  240. echo         C:
  241. echo         D:
  242. echo 2.  Pulse Enter
  243. echo     ─────────────────────────────────────────────────
  244. echo Por ejemplo, para instalar los programas en la unidad C: desde un disquete
  245. echo en la unidad A:, teclee:
  246. echo              INSTALAR A: C:
  247. goto Fin
  248.  
  249. :yaexiste
  250.         cls
  251.         echo.
  252.         echo   ╔═══════════════════════════════════════════════════════════════════════════╗
  253.         echo   ║       El programa seleccionado ya se encuentra instalado en su disco      ║
  254.         echo   ║      duro %2, o al menos el directorio sobre el que se ha de instalar     ║
  255.         echo   ║     ya existe. Elimine del disco duro  dicho directorio y los ficheros    ║
  256.         echo   ║             que contiene antes de proseguir con la instalación.           ║
  257.         echo   ╚═══════════════════════════════════════════════════════════════════════════╝
  258.         pause
  259.         goto start
  260.         
  261.         
  262. :Fin
  263. %2
  264. cd\ 
  265. echo on
  266.