home *** CD-ROM | disk | FTP | other *** search
- /*********************************************************************/
- /* SOFTWARE INSTALLER */
- /* 5621-434 (C) COPYRIGHT IBM CORP. 1991, 1993. ALL RIGHTS RESERVED. */
- /* LICENSED MATERIALS - PROPERTY OF IBM */
- /*********************************************************************/
- /*
- ** DO NOT MAKE ANY CHANGES TO THIS FILE!
- */
- Prefix = 'EPFPREFIX:EPF'
-
- /* Query the new prefix */
- if pos(':', Prefix) <> 0
- then do
- /* Prefix found */
- parse value Prefix with . ':' RenamedPrefix
- end /* end then */
- else do
- /* Prefix not found; use default */
- RenamedPrefix = 'EPF'
- end /* end else */
-
- intro.1 = " --------------------------------------------------------"
- intro.2 = " This command file builds the customized IIRC.RC file and"
- intro.3 = " binds it to the" RenamedPrefix"IDLDS.EXE executable. In order to "
- intro.4 = " successfully perform this build, the following must be "
- intro.5 = " true: "
- intro.6 = " 1. The IBM OS/2 2.0 Toolkit must be installed. The "
- intro.7 = " build process uses the resource compiler that is "
- intro.8 = " included in the Toolkit. "
- intro.9 = " "
- intro.10 = " 2. The following files must be present in the "
- intro.11 = " current directory: "
- intro.12 = " IIRC.RC IIRCH.H "
- intro.13 = " " RenamedPrefix"IIIRS.RES " RenamedPrefix"IDLDS.EXE "
- intro.14 = " (any bitmap file that IIRC.RC references) "
- intro.15 = " "
- intro.16 = " --------------------------------------------------------"
- intro.17 = " Press <enter> to start the build. "
-
- compiling.1 = "--------------------------------------------------"
- compiling.2 = "- Compiling the customizable resource file. . . -"
- compiling.3 = "--------------------------------------------------"
-
- creating.1 = "--------------------------------------------------"
- creating.2 = "- Creating the bindable resource file . . . -"
- creating.3 = "--------------------------------------------------"
-
- binding.1 = "--------------------------------------------------"
- binding.2 = "- Binding resources to the" RenamedPrefix"IDLDS.EXE . . . -"
- binding.3 = "--------------------------------------------------"
-
- complete.1 = "**************************************************"
- complete.2 = "* Build completed successfully. You can now run *"
- complete.3 = "* " RenamedPrefix"IDLDS.EXE to test your changes. *"
- complete.4 = "**************************************************"
-
- error.1 = "**************************************************"
- error.2 = "* Error occurred. The build was not successful. *"
- error.3 = "**************************************************"
-
- 'cls'
- say intro.1
- say " "
- say intro.2
- say intro.3
- say intro.4
- say intro.5
- say intro.6
- say intro.7
- say intro.8
- say intro.9
- say intro.10
- say intro.11
- say intro.12
- say intro.13
- say intro.14
- say intro.15
- say intro.16
- say intro.17
- pull .
-
-
- /**************************************************************/
- /* Compile IIRC.RC. */
- /**************************************************************/
- 'cls'
- say " "
- say compiling.1
- say compiling.2
- say compiling.3
- 'rc -r iirc.rc iirc.res'
- if \(rc = 0) then signal error;
-
- /**************************************************************/
- /* Concatenate the EPFIIIRS.RES file and the IIRC.RES file */
- /* together into ALL.RES. */
- /**************************************************************/
- 'cls'
- say " "
- say creating.1
- say creating.2
- say creating.3
- 'copy' RenamedPrefix'iiirs.res /B + iirc.res /B all.res'
- if \(rc = 0) then signal error;
-
- /**************************************************************/
- /* Bind ALL.RES to EPFIDLDS.EXE. */
- /**************************************************************/
- 'cls'
- say " "
- say binding.1
- say binding.2
- say binding.3
- 'rc all.res' RenamedPrefix'idlds.exe'
- if \(rc = 0) then signal error;
-
- say complete.1
- say complete.2
- say complete.3
- say complete.4
- call beep 1000,500
- 'erase all.res'
- exit 0
-
- error:
- say " "
- say error.1
- say error.2
- say error.3
- exit rc