home *** CD-ROM | disk | FTP | other *** search
/ Free/Shareware Compilatio… / OK PC / MP Multipress / M-27902-94-D2UTILSHAREWARE.img / INSTALAR.BAT
Encoding:
DOS Batch File  |  1994-09-12  |  11.1 KB  |  302 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 OCTUBRE '94                  ║
  22. echo ╚═════════════════════════════════════════════════════════════════════════════╝
  23. echo.
  24. echo     ┌──────────────────────────────────────────────────────────────────────┐
  25. echo     │ A.- Instalar el juego "Stellar II" en su disco %2.                   │
  26. echo     │ B.- Instalar el puzzle "Jigsaw" en su disco %2.                      │
  27. echo     │ C.- Instalar el juego "Dschump" en su disco %2.                      │
  28. echo     │ D.- Instalar la utilidad "TimeTalk" en su disco %2.                  │
  29. echo     │ E.- Instalar la utilidad "ThumbsUp" en su disco %2.                  │
  30. echo     │ F.- Instalar la utilidad "Quik Menu 3" en su disco %2.               │
  31. echo     │ G.- Instalar la utilidad "View 9.1" en su disco %2.                  │
  32. echo     ├──────────────────────────────────────────────────────────────────────┤
  33. echo     │ H.- Abandonar la utilidad de instalación.                            │
  34. echo     └──────────────────────────────────────────────────────────────────────┘
  35. echo.
  36. echo ╔═════════════════════════════════════════════════════════════════════════════╗
  37. echo ║ Elija cualquiera de las opciones para instalar el programa correspondiente. ║
  38. echo ║        Pulse la opción "H" para abandonar la utilidad de instalación.       ║
  39. echo ╚═════════════════════════════════════════════════════════════════════════════╝
  40. ask .
  41. if errorlevel 9 goto start
  42. if errorlevel 8 goto end
  43. if errorlevel 7 goto view
  44. if errorlevel 6 goto qm3
  45. if errorlevel 5 goto thumb
  46. if errorlevel 4 goto timetalk
  47. if errorlevel 3 goto dschump
  48. if errorlevel 2 goto jigsaw
  49. if errorlevel 1 goto stellar
  50. goto start
  51.  
  52. :timetalk
  53.         cls
  54.         batchman direxist %2\timetalk
  55.         if errorlevel 1 goto yaexiste
  56.         espacio %2 120000
  57.         if not errorlevel 1 goto space
  58.         :tdisco2
  59.                 cls
  60.                 echo.
  61.                 echo Introduzca el disquete 2/2 en la unidad %1, por favor.
  62.                 pause
  63.                 if not exist %1\timetalk\tt.com goto tdisco2
  64.                 md %2\timetalk >nul
  65.                 echo Copiando ficheros de "TimeTalk" al disco %2...
  66.                 copy \timetalk\*.* %2\timetalk\*.* /v >nul
  67.         :tdisco1
  68.                 cls
  69.                 echo.
  70.                 echo Introduzca de nuevo el disquete 1/2 (Instalar) en la unidad %1.
  71.                 pause
  72.                 if not exist %1\jigsaw\jigsw.exe goto tdisco1
  73.                 echo.
  74.         echo.
  75.         echo Ha finalizado la instalación de "TimeTalk".
  76.         pause
  77.         goto start
  78.  
  79. :thumb
  80.         cls
  81.         batchman direxist %2\thumb
  82.         if errorlevel 1 goto yaexiste
  83.         espacio %2 867000
  84.         if not errorlevel 1 goto space
  85.         :adisco2
  86.                 cls
  87.                 echo.
  88.                 echo Introduzca el disquete 2/2 en la unidad %1, por favor.
  89.                 pause
  90.                 if not exist %1\thumb\thumbsup.exe goto adisco2
  91.                 md %2\thumb >nul
  92.                 echo Copiando ficheros de "Thumb" al disco %2...
  93.                 copy \thumb\*.* %2\thumb\*.* /v >nul
  94.         :adisco1
  95.                 cls
  96.                 echo.
  97.                 echo Introduzca de nuevo el disquete 1/2 (Instalar) en la unidad %1.
  98.                 pause
  99.                 if not exist %1\jigsaw\jigsw.exe goto adisco1
  100.                 echo.
  101.         echo.
  102.         echo Ha finalizado la instalación de "ThumbsUp".
  103.         pause
  104.         goto start
  105.  
  106. :qm3
  107.         cls
  108.         batchman direxist %2\qm3
  109.         if errorlevel 1 goto yaexiste
  110.         espacio %2 840000
  111.         if not errorlevel 1 goto space
  112.  
  113.         :xdisco2
  114.                 cls
  115.                 echo.
  116.                 echo Introduzca el disquete 2/2 en la unidad %1, por favor.
  117.                 pause
  118.                 if not exist %1\qm3\compqm3.exe goto xdisco2
  119.                 md %2\qm3 >nul
  120.                 echo Copiando ficheros de "QM3" al disco %2...
  121.                 copy \qm3\*.* %2\qm3\*.* /v >nul
  122.                 %2
  123.                 cd\qm3
  124.                 compqm3 >nul
  125.                 del compqm3.exe>nul
  126.                 %1
  127.         :xdisco1
  128.                 cls
  129.                 echo.
  130.                 echo Introduzca de nuevo el disquete 1/2 (Instalar) en la unidad %1.
  131.                 pause
  132.                 if not exist %1\jigsaw\jigsw.exe goto xdisco1
  133.                 echo.
  134.         echo.
  135.         echo Ha finalizado la instalación de "Quik Menu 3".
  136.         pause
  137.         goto start
  138.  
  139. :view
  140.         cls
  141.         batchman direxist %2\view91
  142.         if errorlevel 1 goto yaexiste
  143.         espacio %2 126000
  144.         if not errorlevel 1 goto space
  145.         :vdisco2
  146.                 cls
  147.                 echo.
  148.                 echo Introduzca el disquete 2/2 en la unidad %1, por favor.
  149.                 pause
  150.                 if not exist %1\view91\vw91cfg.com goto vdisco2
  151.                 md %2\view91 >nul
  152.                 echo Copiando ficheros de "View" al disco %2...
  153.                 copy \view91\*.* %2\view91\*.* /v >nul
  154.         :vdisco1
  155.                 cls
  156.                 echo.
  157.                 echo Introduzca de nuevo el disquete 1/2 (Instalar) en la unidad %1.
  158.                 pause
  159.                 if not exist %1\jigsaw\jigsw.exe goto vdisco1
  160.                 echo.
  161.         echo.
  162.         echo Ha finalizado la instalación de "View 9.1".
  163.         pause
  164.         goto start
  165.  
  166. :dschump
  167.         cls
  168.         batchman direxist %2\dschump
  169.         if errorlevel 1 goto yaexiste
  170.         espacio %2 914000
  171.         if not errorlevel 1 goto space
  172.         md %2\dschump >nul
  173.         echo Copiando ficheros de "Dschump" al disco %2...
  174.         copy \dschump\*.* %2\dschump\*.* /v >nul
  175.         %2
  176.         cd\dschump
  177.         dsch >nul
  178.         del dsch.exe
  179.         %1
  180.         echo.
  181.         echo Ha finalizado la instalación de "Dschump".
  182.         pause
  183.         goto start
  184.  
  185. :jigsaw
  186.         cls
  187.         batchman direxist %2\jigsaw
  188.         if errorlevel 1 goto yaexiste
  189.         espacio %2 1370000
  190.         if not errorlevel 1 goto space
  191.         md %2\jigsaw >nul
  192.         echo.
  193.         echo Copiando ficheros del programa "Jigsaw" al disco %2...
  194.         copy \jigsaw\*.* %2\jigsaw\*.* /v >nul
  195.         %2
  196.         cd\jigsaw
  197.         jigsw >nul
  198.         del jigsw.exe >nul
  199.         %1
  200.         echo.
  201.         echo Ha concluido la instalación de "Jigsaw".
  202.         pause
  203.         goto start
  204.  
  205. :stellar
  206.         cls
  207.         batchman direxist %2\stellar
  208.         if errorlevel 1 goto yaexiste
  209.         espacio %2 1600000
  210.         if not errorlevel 1 goto space
  211.         md %2\stellar >nul
  212.         echo.
  213.         echo Copiando ficheros del programa "Stellar 2.0" al disco %2...
  214.         copy \stellar\*.* %2\stellar\*.* /v >nul
  215.         %2
  216.         cd\stellar
  217.         stellar.exe >nul
  218.         del stellar.exe >nul
  219.         %1
  220.         echo.
  221.         echo Ha concluido la instalación de "Stellar 2.0".
  222.         pause
  223.         goto start
  224. :end
  225. cls 
  226. echo.
  227. echo.
  228. echo ╔═════════════════════════════════════════════════════════════════════════════╗
  229. echo ║      FIN DE LA INSTALACION DE PROGRAMAS SHAREWARE DE INFORMATICA FACIL      ║
  230. echo ║    ─────────────────────────────────────────────────────────────────────    ║
  231. echo ║    EN CASO DE HABERSE INSTALADO ALGUN PROGRAMA, ESTE SE ENCONTRARA EN EL    ║
  232. echo ║      DIRECTORIO CORRESPONDIENTE, DE ACUERDO CON LA SIGUIENTE RELACION:      ║
  233. echo ╚═════════════════════════════════════════════════════════════════════════════╝
  234. echo.
  235. echo     ┌────────────────────────────────────────────────────────────────────┐
  236. echo     │ "Stellar II"          SE HABRIA INSTALADO EN      ──── %2\STELLAR  │
  237. echo     │ "Jigsaw"              SE HABRIA INSTALADO EN      ──── %2\JIGSAW   │
  238. echo     │ "Dschump"             SE HABRIA INSTALADO EN      ──── %2\DSCHUMP  │
  239. echo     │ "TimeTalk"            SE HABRIA INSTALADO EN      ──── %2\TIMETALK │
  240. echo     │ "ThumbsUp"            SE HABRIA INSTALADO EN      ──── %2\THUMB    │
  241. echo     │ "Quik Menu 3"         SE HABRIA INSTALADO EN      ──── %2\QM3      │
  242. echo     │ "View 9.1"            SE HABRIA INSTALADO EN      ──── %2\VIEW91   │
  243. echo     └────────────────────────────────────────────────────────────────────┘
  244. echo.
  245. echo  ╔═══════════════════════════════════════════════════════════════════════════╗
  246. echo  ║  Utilice el comando CD de MS-DOS para acceder al directorio deseado y ya  ║
  247. echo  ║ en él ejecute el fichero "*.EXE" correspondiente para activar el programa ║
  248. echo  ╚═══════════════════════════════════════════════════════════════════════════╝
  249. goto fin
  250.  
  251.  
  252. :space
  253. cls
  254. echo.
  255. echo.
  256. echo   ╔═══════════════════════════════════════════════════════════════════════════╗
  257. echo   ║     El programa seleccionado del disquete de Informática Fácil nº 19      ║
  258. echo   ║      necesita más espacio libre en el disco duro del que hay ahora.       ║ 
  259. echo   ║       Elimine ficheros innecesarios del disco e inténtelo de nuevo.       ║
  260. echo   ╚═══════════════════════════════════════════════════════════════════════════╝
  261. pause
  262. goto start
  263.  
  264. :use
  265. echo Para instalar los programas del disquete de Informática Fácil en su disco duro:
  266. echo ──────────────────────────────────────────────────────────────────────────
  267. echo 1.  Teclee INSTALAR [UNIDAD-ORIGEN] [UNIDAD-DESTINO]
  268. echo     ────────────────────────────────────────────────
  269. echo     Las posibles opciones para UNIDAD-ORIGEN, dependiendo
  270. echo     de su sistema, son:
  271. echo         A:
  272. echo         B:
  273. echo         etc.
  274. echo     Las posibles opciones para UNIDAD-DESTINO, dependiendo
  275. echo     de su sistema, son:
  276. echo         C:
  277. echo         D:
  278. echo 2.  Pulse Enter
  279. echo     ─────────────────────────────────────────────────
  280. echo Por ejemplo, para instalar los programas en la unidad C: desde un disquete
  281. echo en la unidad A:, teclee:
  282. echo              INSTALAR A: C:
  283. goto Fin
  284.  
  285. :yaexiste
  286.         cls
  287.         echo.
  288.         echo   ╔═══════════════════════════════════════════════════════════════════════════╗
  289.         echo   ║       El programa seleccionado ya se encuentra instalado en su disco      ║
  290.         echo   ║      duro %2, o al menos el directorio sobre el que se ha de instalar     ║
  291.         echo   ║     ya existe. Elimine del disco  duro dicho directorio y los ficheros    ║
  292.         echo   ║             que contiene antes de proseguir con la instalación.           ║
  293.         echo   ╚═══════════════════════════════════════════════════════════════════════════╝
  294.         pause
  295.         goto start
  296.         
  297.         
  298. :Fin
  299. %2
  300. cd\ 
  301. echo on
  302.