Subversion Repositories SvarDOS

Rev

Rev 1639 | Rev 1661 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 1639 Rev 1659
Line 651... Line 651...
651
    }
651
    }
652
    fprintf(fd, "MODE CON CP SELECT=%u\r\n", locales->codepage);
652
    fprintf(fd, "MODE CON CP SELECT=%u\r\n", locales->codepage);
653
  }
653
  }
654
 
654
 
655
  if (locales->keybfile > 0) {
655
  if (locales->keybfile > 0) {
656
    fprintf(fd, "KEYB %s,%d,%%DOSDIR%%\\BIN\\", locales->keybcode, locales->codepage);
656
    fprintf(fd, "KEYB %s,%d,%%DOSDIR%%\\", locales->keybcode, locales->codepage);
657
    if (locales->keybfile == 1) {
657
    if (locales->keybfile == 1) {
658
      fprintf(fd, "KEYBOARD.SYS");
658
      fprintf(fd, "KEYBOARD.SYS");
659
    } else {
659
    } else {
660
      fprintf(fd, "KEYBRD%d.SYS", locales->keybfile);
660
      fprintf(fd, "KEYBRD%d.SYS", locales->keybfile);
661
    }
661
    }
Line 866... Line 866...
866
  fd = fopen(buff, "wb");
866
  fd = fopen(buff, "wb");
867
  if (fd == NULL) return(-1);
867
  if (fd == NULL) return(-1);
868
  fprintf(fd, "@ECHO OFF\r\n"
868
  fprintf(fd, "@ECHO OFF\r\n"
869
              "SET DOSDIR=C:\\SVARDOS\r\n"
869
              "SET DOSDIR=C:\\SVARDOS\r\n"
870
              "SET NLSPATH=%%DOSDIR%%\\NLS\r\n"
870
              "SET NLSPATH=%%DOSDIR%%\\NLS\r\n"
871
              "PATH %%DOSDIR%%\\BIN\r\n");
871
              "PATH %%DOSDIR%%\r\n");
872
  fprintf(fd, "CD TEMP\r\n"
872
  fprintf(fd, "CD TEMP\r\n"
873
              "postinst.bat\r\n");
873
              "postinst.bat\r\n");
874
  fclose(fd);
874
  fclose(fd);
875
 
875
 
876
  return(0);
876
  return(0);