home *** CD-ROM | disk | FTP | other *** search
/ Free/Shareware Compilatio… / OK PC / MP Multipress / M-19955-1994-D1-RMORF-QEDIT-BRIX-SOLITARIO.img / INSTALAR.BAT < prev   
Encoding:
DOS Batch File  |  1994-06-10  |  8.5 KB  |  216 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 JULIO-AGOSTO '94                ║
  22. echo ╚═════════════════════════════════════════════════════════════════════════════╝
  23. echo.
  24. echo     ┌──────────────────────────────────────────────────────────────────────┐
  25. echo     │ A.- Instalar el programa "RMORF v.0.3" en su disco %2.               │
  26. echo     │ B.- Instalar el editor "QEdit v.2.15" en su disco %2.                │
  27. echo     │ C.- Instalar el juego "BRIX" en su disco %2.                         │
  28. echo     │ D.- Instalar el juego "Idiot's Delight v.1.11" en su disco %2.       │
  29. echo     │ E.- Instalar el programa "Archiver 2.13" para Windows en su disco %2.│
  30. echo     │ F.- Instalar el programa de diagnóstico "Snooper 3.1" 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 6 para abandonar la utilidad de instalación.        ║
  38. echo ╚═════════════════════════════════════════════════════════════════════════════╝
  39. ask .
  40. if errorlevel 7 goto end
  41. if errorlevel 6 goto snooper
  42. if errorlevel 5 goto awin
  43. if errorlevel 4 goto id
  44. if errorlevel 3 goto brix
  45. if errorlevel 2 goto qedit
  46. if errorlevel 1 goto rmorf
  47. goto start
  48.  
  49. :snooper
  50.         cls
  51.         espacio %2 400000
  52.         if not errorlevel 1 goto space
  53.         :sdisco2
  54.                 cls
  55.                 echo.
  56.                 echo Introduzca el disquete 2/2 en la unidad %1, por favor.
  57.                 pause
  58.                 if not exist %1\snooper\snooper.exe goto sdisco2
  59.                 if not exist %2\snooper\snooper.exe md %2\snooper >nul
  60.                 echo Copiando ficheros del programa "Snooper" al disco %2...
  61.                 copy \snooper\*.* %2\snooper\*.* /v >nul
  62.         :sdisco1
  63.                 cls
  64.                 echo.
  65.                 echo introduzca de nuevo el disquete 1/2 (Instalar) en la unidad %1.
  66.                 pause
  67.                 if not exist %1\brix\brix1.exe goto sdisco1
  68.                 echo.
  69.         echo Ha finalizado la instalación de "Snooper 3.10".
  70.         pause
  71.         goto start
  72. :awin
  73.         cls
  74.         espacio %2 896000
  75.         if not errorlevel 1 goto space
  76.         :adisco2
  77.                 cls
  78.                 echo.
  79.                 echo Introduzca el disquete 2/2 en la unidad %1, por favor.
  80.                 pause
  81.                 if not exist %1\awin\archiver.exe goto adisco2
  82.                 if not exist %2\awin\archiver.exe md %2\awin >nul
  83.                 echo Copiando ficheros de "Archiver" para Windows al disco %2...
  84.                 copy \awin\*.* %2\awin\*.* /v >nul
  85.         :adisco1
  86.                 cls
  87.                 echo.
  88.                 echo introduzca de nuevo el disquete 1/2 (Instalar) en la unidad %1.
  89.                 pause
  90.                 if not exist %1\brix\brix1.exe goto sdisco1
  91.                 echo.
  92.         echo Ha finalizado la instalación de "Archiver 2.13" para Windows.
  93.         echo.
  94.         echo Ejecúte ARCHIVER.EXE desde el Administrador de archivos de Windows 
  95.         echo para acceder al programa o SETUP.EXE para configurarlo.
  96.         pause
  97.         goto start
  98.  
  99. :id
  100.         cls
  101.         espacio %2 206000
  102.         if not errorlevel 1 goto space
  103.         if not exist %2\id\id.exe md %2\id >nul
  104.         echo.
  105.         echo Copiando ficheros del juego "Idiot's Delight" al disco %2...
  106.         copy \id\*.* %2\ID\*.* /v >nul
  107.         echo.
  108.         echo Ha concluido la instalación de "Idiot's Delight".
  109.         pause
  110.         goto start
  111.  
  112. :brix
  113.         cls
  114.         espacio %2 266000
  115.         if not errorlevel 1 goto space
  116.         if not exist %2\brix\brix1.exe md %2\brix >nul
  117.         echo.
  118.         echo Copiando ficheros del juego "BRIX" al disco %2...
  119.         copy \brix\*.* %2\brix\*.* /v >nul
  120.         echo.
  121.         echo Ha concluido la instalación de "BRIX".
  122.         pause
  123.         goto start
  124.  
  125. :qedit
  126.         cls
  127.         espacio %2 470000
  128.         if not errorlevel 1 goto space
  129.         if not exist %2\qedit\q.exe md %2\qedit >nul
  130.         echo.
  131.         echo Copiando ficheros del programa "QEdit" al disco %2...
  132.         copy \qedit\*.* %2\qedit\*.* /v >nul
  133.         %2
  134.         cd\qedit
  135.         if not exist q.exe qedit215.exe >NUL
  136.         del QEDIT215.EXE >NUL
  137.         CD\
  138.         %1
  139.         echo.
  140.         echo Ha concluido la instalación de "QEdit".
  141.         pause
  142.         goto start
  143. :rmorf
  144.         cls
  145.         espacio %2 660000
  146.         if not errorlevel 1 goto space
  147.         if not exist %2\rmorf\rmorf.exe md %2\rmorf >nul
  148.         echo.
  149.         echo Copiando ficheros del programa "RMorf" al disco %2...
  150.         copy \rmorf\*.* %2\rmorf\*.* /v >nul
  151.         echo.
  152.         echo Ha concluido la instalación de "RMorf".
  153.         pause
  154.         goto start
  155. :end
  156. cls 
  157. echo.
  158. echo.
  159. echo ╔═════════════════════════════════════════════════════════════════════════════╗
  160. echo ║      FIN DE LA INSTALACION DE PROGRAMAS SHAREWARE DE INFORMATICA FACIL      ║
  161. echo ║    ─────────────────────────────────────────────────────────────────────    ║
  162. echo ║    EN CASO DE HABERSE INSTALADO ALGUN PROGRAMA, ESTE SE ENCONTRARA EN EL    ║
  163. echo ║      DIRECTORIO CORRESPONDIENTE, DE ACUERDO CON LA SIGUIENTE RELACION:      ║
  164. echo ╚═════════════════════════════════════════════════════════════════════════════╝
  165. echo.
  166. echo     ┌────────────────────────────────────────────────────────────────────┐
  167. echo     │ "RMORF v.0.3" SE HABRIA INSTALADO EN              ──── %2\RMORF    │
  168. echo     │ "QEdit v.2.15" SE HABRIA INSTALADO EN             ──── %2\QEDIT    │
  169. echo     │ "BRIX" SE HABRIA INSTALADO EN                     ──── %2\BRIX     │
  170. echo     │ "Idiot's Delight v.1.11" SE HABRIA INSTALADO EN   ──── %2\ID       │
  171. echo     │ "Archiver 2.13" SE HABRIA INSTALADO EN            ──── %2\AWIN     │
  172. echo     │ "Snooper 3.10" SE HABRIA INSTALADO EN             ──── %2\SNOOPER  │
  173. echo     └────────────────────────────────────────────────────────────────────┘
  174. echo.
  175. echo  ╔═══════════════════════════════════════════════════════════════════════════╗
  176. echo  ║  Utilice el comando CD de MS-DOS para acceder al directorio deseado y ya  ║
  177. echo  ║ en él ejecute el fichero "*.EXE" correspondiente para activar el programa ║
  178. echo  ╚═══════════════════════════════════════════════════════════════════════════╝
  179. goto fin
  180.  
  181.  
  182. :space
  183. cls
  184. echo.
  185. echo   ╔═══════════════════════════════════════════════════════════════════════════╗
  186. echo   ║   El programa seleccionado del disquete de Informática Fácil nº 16-17     ║
  187. echo   ║      necesita más espacio libre en el disco duro del que hay ahora.       ║ 
  188. echo   ║       Elimine ficheros innecesarios del disco e inténtelo de nuevo.       ║
  189. echo   ╚═══════════════════════════════════════════════════════════════════════════╝
  190. pause
  191. goto start
  192.  
  193. :use
  194. echo Para instalar los programas del disquete de Informática Fácil en su disco duro:
  195. echo ──────────────────────────────────────────────────────────────────────────
  196. echo 1.  Teclee INSTALAR [UNIDAD-ORIGEN] [UNIDAD-DESTINO]
  197. echo     ────────────────────────────────────────────────
  198. echo     Las posibles opciones para UNIDAD-ORIGEN, dependiendo
  199. echo     de su sistema, son:
  200. echo         C:
  201. echo         D:
  202. echo         etc.
  203. echo     Las posibles opciones para UNIDAD-DESTINO, dependiendo
  204. echo     de su sistema, son:
  205. echo         A:
  206. echo         B:
  207. echo 2.  Pulse Enter
  208. echo     ─────────────────────────────────────────────────
  209. echo Por ejemplo, para instalar los programas en la unidad C: desde un disquete
  210. echo en la unidad A:, teclee:
  211. echo              INSTALAR A: C:
  212. goto Fin
  213.  
  214. :Fin
  215. echo on
  216.