home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 8 Other / 08-Other.zip / font20.zip / dcp.cmd < prev    next >
OS/2 REXX Batch file  |  1999-08-09  |  5KB  |  124 lines
  1. /* REXX */
  2.  
  3. call rxFuncAdd 'SysLoadFuncs', 'RexxUtil', 'SysLoadFuncs'
  4. call SysLoadFuncs
  5.  
  6. Call SysCls
  7. '@ECHO OFF'
  8.  
  9. /* Sprache */
  10. FEHLER = SysIni('USER', 'Shield', 'Schrif~tartgröße...')
  11. IF FEHLER = 'ERROR:' THEN
  12.   SPRACHE = 'E'
  13. ELSE
  14.   SPRACHE = 'D'
  15.  
  16. /* you could also use VIOTBL.ISO */
  17. VIOTBL_NAME = 'VIOTBL.DCP'
  18. BOOTPATH = LEFT( VALUE( 'COMSPEC' , , 'OS2ENVIRONMENT' ) , 2 )'\OS2\BOOT\'
  19.  
  20. '@SET BPATH='BOOTPATH
  21. IF SysSearchPath( 'BPATH' , VIOTBL_NAME ) = '' THEN
  22.   DO
  23.     IF SPRACHE = 'D' THEN SAY BOOTPATH||VIOTBL_NAME' nicht gefunden * bitte per Hand kopieren ...'
  24.     IF SPRACHE = 'E' THEN SAY BOOTPATH||VIOTBL_NAME' not found * please copy by hand ...'
  25.     PULL TASTE
  26.     EXIT
  27.   END
  28.  
  29. /*****************************************************************************/  
  30. IF SPRACHE = 'D' THEN SAY 'entpacke 'BOOTPATH||VIOTBL_NAME' ...'
  31. IF SPRACHE = 'E' THEN SAY 'extracting 'BOOTPATH||VIOTBL_NAME' ...'
  32. '@DCP_X.EXE 'BOOTPATH||VIOTBL_NAME' .\'
  33.  
  34. /*****************************************************************************/
  35. IF SPRACHE = 'D' THEN SAY 'entpacke System.VIO Schriften ...'
  36. IF SPRACHE = 'E' THEN SAY 'extracting System.VIO fonts ...'
  37.  
  38. 'MD SYSTEM.VIO 2>NUL'
  39. 'CD SYSTEM.VIO'
  40.  
  41. /* get OS/2 fonts from DSPRES.DLL */
  42. '..\DSPRESX.EXE'
  43.  
  44. /* convert to raw fonts */ 
  45. '@FOR %%D IN ( 08 10 12 14 16 18 ) DO ..\OS2FNT_X VIO_8_%%D.FON 00437_%%D.FN8 437'
  46. '@FOR %%D IN ( 08 10 12 14 16 18 ) DO ..\OS2FNT_X VIO_8_%%D.FON 00850_%%D.FN8 850'
  47.  
  48. /* temp files */
  49. '@FOR %%D IN ( 08 10 12 14 16 18 ) DO DEL VIO_8_%%D.FON'
  50.  
  51. '@CD ..'
  52.  
  53. '@DEL VIOTBL.DIR'
  54.  
  55. /*****************************************************************************/
  56. IF SPRACHE = 'D' THEN SAY 'erstelle neue *.DCP-Dateien im Verzeichnis 'BOOTPATH' ...'
  57. IF SPRACHE = 'E' THEN SAY 'building new *.DCP-files in directory 'BOOTPATH' ...'
  58. CALL CREATEDCP '437','437','VT437'
  59. CALL CREATEDCP '437','850','VT437850'
  60. CALL CREATEDCP '850','850','VT850'
  61. CALL CREATEDCP '850','437','VT850437'
  62.  
  63. EXIT
  64.  
  65. /*****************************************************************************/
  66.  
  67. CREATEDCP:
  68.                 CP1=ARG(1)
  69.                 CP2=ARG(2)
  70.                 DCPNAME=ARG(3)
  71.  
  72.                 TEMP='DCP.TMP'
  73.                 '@ECHO O 'BOOTPATH||DCPNAME'.DCP>'TEMP
  74.  
  75.                 IF CP1 = CP2 THEN
  76.                   DO
  77.                     IF SPRACHE = 'D' THEN SAY 'für "CODEPAGE='CP1'" in der config.sys ...'
  78.                     IF SPRACHE = 'E' THEN SAY 'for "CODEPAGE='CP1'" in config.sys ...'
  79.                     '@ECHO T Version 0.00 * DCP.CMD ('CP1') >>'TEMP''
  80.  
  81.                     '@ECHO F .\VIOTBL.EXT\00'CP1'_08.FN8 'CP1' 8 >>'TEMP
  82.                     '@ECHO F .\SYSTEM.VIO\00'CP1'_10.FN8 'CP1' 8 >>'TEMP
  83.                     '@ECHO F .\SYSTEM.VIO\00'CP1'_12.FN8 'CP1' 8 >> 'TEMP
  84.                     '@ECHO F .\VIOTBL.EXT\00'CP1'_14.FN8 'CP1' 8 >> 'TEMP
  85.                     '@ECHO F .\VIOTBL.EXT\00'CP1'_16.FN8 'CP1' 8 >> 'TEMP
  86.                     '@ECHO F .\SYSTEM.VIO\00'CP1'_18.FN8 'CP1' 8 >> 'TEMP
  87.                     '@ECHO F .\CP'CP1'_20.FNT            'CP1' 8 >> 'TEMP
  88.                     '@ECHO F .\VIOTBL.EXT\00'CP1'_14.FN9 'CP1' 9 >> 'TEMP
  89.                     '@ECHO F .\VIOTBL.EXT\00'CP1'_16.FN9 'CP1' 9 >> 'TEMP
  90.                     '@ECHO F .\CP'CP1'_20.FNT            'CP1' 9 >> 'TEMP
  91.  
  92.                   END
  93.                 ELSE
  94.                   DO
  95.                     IF SPRACHE = 'D' THEN SAY 'für "CODEPAGE='CP1','CP2'" in der config.sys ...'
  96.                     IF SPRACHE = 'E' THEN SAY 'for "CODEPAGE='CP1'" in config.sys ...'
  97.                     '@ECHO O 'BOOTPATH||DCPNAME'.DCP>'TEMP''
  98.                     '@ECHO T Version 0.00 * DCP.CMD ('CP1','CP2') >>'TEMP
  99.  
  100.                     '@ECHO F .\VIOTBL.EXT\00'CP1'_08.FN8 'CP1' 8 >>'TEMP
  101.                     '@ECHO F .\SYSTEM.VIO\00'CP1'_10.FN8 'CP1' 8 >>'TEMP
  102.                     '@ECHO F .\VIOTBL.EXT\00'CP1'_14.FN8 'CP1' 8 >>'TEMP
  103.                     '@ECHO F .\VIOTBL.EXT\00'CP1'_16.FN8 'CP1' 8 >>'TEMP
  104.                     '@ECHO F .\CP'CP1'_20.FNT            'CP1' 8 >>'TEMP
  105.                     '@ECHO F .\VIOTBL.EXT\00'CP1'_14.FN9 'CP1' 9 >>'TEMP
  106.                     '@ECHO F .\VIOTBL.EXT\00'CP1'_16.FN9 'CP1' 9 >>'TEMP
  107.                     '@ECHO F .\CP'CP1'_20.FNT            'CP1' 9 >>'TEMP
  108.  
  109.                     '@ECHO F .\VIOTBL.EXT\00'CP2'_08.FN8 'CP2' 8 >>'TEMP
  110.                     '@ECHO F .\VIOTBL.EXT\00'CP2'_14.FN8 'CP2' 8 >>'TEMP
  111.                     '@ECHO F .\VIOTBL.EXT\00'CP2'_16.FN8 'CP2' 8 >>'TEMP
  112.                     '@ECHO F .\CP'CP2'_20.FNT            'CP2' 8 >>'TEMP
  113.                     '@ECHO F .\VIOTBL.EXT\00'CP2'_14.FN9 'CP2' 9 >>'TEMP
  114.                     '@ECHO F .\VIOTBL.EXT\00'CP2'_16.FN9 'CP2' 9 >>'TEMP
  115.                     '@ECHO F .\CP'CP2'_20.FNT            'CP2' 9 >>'TEMP
  116.  
  117.                   END
  118.  
  119.                 'DCP_A 'TEMP
  120.                 '@DEL 'TEMP
  121.                 RETURN
  122.  
  123. /*****************************************************************************/
  124.