home *** CD-ROM | disk | FTP | other *** search
/ DOS/V Power Report 1996 July / VPR9607B.BIN / driver / canon / shot / dospb120 / instfd.sup < prev    next >
Text File  |  1995-10-05  |  48KB  |  364 lines
  1. #------------------------------------------------------------------------------
  2. # □PBUDDY1.0 ｲﾝｽﾄｰﾙ･ｾｯﾄｱｯﾌﾟ用 MAOIXｽｸﾘﾌﾟ
  3. #------------------------------------------------------------------------------
  4. .title = "「PrintBuddy」ｲﾝｽﾄｰﾙ･ｾｯﾄｱｯﾌﾟ ﾌﾟﾛｸﾞﾗﾑ";
  5. .maker = "";
  6. .sname = "INSTALL";
  7. .usedir = "PBUDDY";
  8. .mount = "NULL";
  9. .mmspace = 200;
  10. .jfep = "VJES,ATOK6,ATOK7,ATOK8,MTTK2,MTTK3,MTTK86,KTN4,NECCAI,DFJ";
  11. %rcpdos  = 1;    %rcpdosi = 1;    %stsdos  = 1;    %comdrv  = 1;    %rcp  = 430000;
  12. %rcpi = 70000;    %sts  = 60000;    %com  = 30000;    %maxsize = 600000;    %cassette = 1;
  13. %dupkey  = 1;    %commode = 2;    %direction = 1;    %setupmode = 0;    %ret = 1;
  14. #------------------------------------------------------------------------------
  15. HDINST_START:    cls();
  16. locate(10, 1);    print("+----------------------------------------------------------------+");    locate(10, 2);    print("|                           ようこそ                             |");
  17. locate(10, 3);    print("+----------------------------------------------------------------+");    locate(10, 4);    print("|                                                                |");
  18. locate(10, 5);    print("|                     PrintBuddy へようこそ                      |");    locate(10, 6);    print("|                                                                |");
  19. locate(10, 7);    print("|                                                                |");    locate(10, 8);    print("|       この PrintBuddy ｲﾝｽﾄｰﾙﾌﾟﾛｸﾞﾗﾑは、IBM PC互換機および      |");
  20. locate(10, 9);    print("|       NEC PC-9800ｼﾘｰｽﾞに PrintBuddy をｲﾝｽﾄｰﾙするための         |");    locate(10, 10);    print("|       ﾌﾟﾛｸﾞﾗﾑです。                                            |");
  21. locate(10, 11);    print("|                                                                |");    locate(10, 12);    print("|                                                                |");
  22. locate(10, 13);    print("|                                                                |");    locate(10, 14);    print("|          PrintBuddy ｲﾝｽﾄｰﾙﾌﾟﾛｸﾞﾗﾑを継続しますか？ [Y/N]        |");
  23. locate(10, 15);    print("|                                                                |");    locate(10, 16);    print("+----------------------------------------------------------------+");
  24. %hardmode = call("COMCHK /1");    while(1){    clrkey();    %ans = getkey();
  25. if((%ans == 89) || (%ans == 121)){    goto SELECT_COM;    }    if((%ans == 78) || (%ans == 110)){    %backf = 0;    goto END_MSG;    }    }    goto HDINST_START;
  26. #------------------------------------------------------------------------------
  27. END_MSG:    cls();
  28. locate(10, 8);    print("+----------------------------------------------------------------+");    locate(10, 9);    print("|                                                                |");
  29. locate(10, 10);    print("|          PrintBuddy ｲﾝｽﾄｰﾗを終了しますか？ [Y/N]               |");    locate(10, 11);    print("|                                                                |");
  30. locate(10, 12);    print("+----------------------------------------------------------------+");    while(1){    clrkey();    %ans = getkey();
  31. if((%ans == 89) || (%ans == 121)){    goto END_INSTALL;    }    if((%ans == 78) || (%ans == 110)){
  32. switch(%backf){    case 0:    goto HDINST_START;    case 1:    goto INST_MENU;    case 2:    goto SELECT_PRN;    }    }    }    goto END_MSG;
  33. #------------------------------------------------------------------------------
  34. SELECT_COM:    cls();
  35. if(%hardmode == 2){    %ret = call("COMCHK.EXE /2");    switch(%ret){    case 0:    %direction = 0;    %comdrv = 0;    %stsdos = 0;    %commode = 1;
  36. locate(10, 1);    print("+----------------------------------------------------------------+");    locate(10, 2);    print("|                            ｲﾝﾀｰﾌｪｰｽ                            |");
  37. locate(10, 3);    print("+----------------------------------------------------------------+");    locate(10, 4);    print("|                                                                |");
  38. locate(10, 5);    print("|                                                                |");    locate(10, 6);    print("|      このｺﾝﾋﾟｭｰﾀでは双方向機能を利用することはできません。     |");
  39. locate(10, 7);    print("|                                                                |");    locate(10, 8);    print("|                                                                |");
  40. locate(10, 9);    print("|                 [いずれかのｷｰを押してください]                 |");    locate(10, 10);    print("|                                                                |");
  41. locate(10, 11);    print("+----------------------------------------------------------------+");    clrkey();    getkey();    break;    case 1:    %direction = 1;    break;    }    }    goto SELECT_PRN;
  42. #------------------------------------------------------------------------------
  43. SELECT_PRN:    cls();
  44. locate(10, 1);    print("+----------------------------------------------------------------+");    locate(10, 2);    print("|                        対象ﾌﾟﾘﾝﾀの選択                         |");
  45. locate(10, 3);    print("+----------------------------------------------------------------+");    locate(10, 4);    print("|                                                                |");
  46. locate(10, 5);    print("|     使用するﾌﾟﾘﾝﾀの機種を次の中から選択してください。          |");    locate(10, 6);    print("|                                                                |");
  47. locate(10, 7);    print("|                                                                |");    locate(10, 8);    print("|     [1:LBP-730]     LASER SHOT LBP-730用にｲﾝｽﾄｰﾙします。       |");
  48. locate(10, 9);    print("|                                                                |");    locate(10, 10);    print("|     [2:LBP-720]     LASER SHOT LBP-720用にｲﾝｽﾄｰﾙします。       |");
  49. locate(10, 11);    print("|                                                                |");    locate(10, 12);    print("|     [3:LBP-450]     LASER SHOT LBP-450用にｲﾝｽﾄｰﾙします。       |");
  50. locate(10, 13);    print("|                                                                |");    locate(10, 14);    print("|                                                                |");
  51. locate(10, 15);    print("|                                                                |");    locate(10, 16);    print("|              いずれかを選択してください？ [1-3]                |");
  52. locate(10, 17);    print("|        [ESC]ｷｰで PrintBuddy ｲﾝｽﾄｰﾙﾌﾟﾛｸﾞﾗﾑを終了します。        |");    locate(10, 18);    print("|                                                                |");
  53. locate(10, 19);    print("+----------------------------------------------------------------+");
  54. while(1){    clrkey();    %ans = getkey();    if(%ans == 49){    %prnmode = 730;    goto INST_MENU;    }    if(%ans == 50){    %prnmode = 720;    goto INST_MENU;    }
  55. if(%ans == 51){    %prnmode = 450;    goto INST_MENU;    }    if(%ans == 27){    %backf = 2;    goto END_MSG;    }    }    goto SELECT_PRN;
  56. #------------------------------------------------------------------------------
  57. INST_MENU:    cls();
  58. locate(10, 1);    print("+----------------------------------------------------------------+");    locate(10, 2);    print("|                     PrintBuddy ｲﾝｽﾄｰﾗﾒﾆｭｰ                      |");
  59. locate(10, 3);    print("+----------------------------------------------------------------+");    locate(10, 4);    print("|                                                                |");
  60. locate(10, 5);    print("|     ｲﾝｽﾄｰﾙを開始します。次のいずれかを選択してください。       |");    locate(10, 6);    print("|                                                                |");
  61. locate(10, 7);    print("|                                                                |");    locate(10, 8);    print("|     [1:標準ｲﾝｽﾄｰﾙ]     PrintBuddy をｲﾝｽﾄｰﾙします。             |");
  62. locate(10, 9);    print("|                                                                |");    locate(10, 10);    print("|     [2:ｶｽﾀﾑｲﾝｽﾄｰﾙ]     必要なｿﾌﾄｳｪｱを選択してｲﾝｽﾄｰﾙします。    |");
  63. locate(10, 11);    print("|                                                                |");    locate(10, 12);    print("|                                                                |");
  64. locate(10, 13);    print("|                                                                |");    locate(10, 14);    print("|              いずれかを選択してください？ [1-2]                |");
  65. locate(10, 15);    print("|        [ESC]ｷｰで PrintBuddy ｲﾝｽﾄｰﾙﾌﾟﾛｸﾞﾗﾑを終了します。        |");    locate(10, 16);    print("|                                                                |");
  66. locate(10, 17);    print("+----------------------------------------------------------------+");    while(1){    clrkey();    %ans = getkey();    if(%ans == 49){    %instmode = 1;    goto INST_DIR;    }
  67. if(%ans == 50){    %instmode = 2;    goto SELECT_INST;    }    if(%ans == 27){    %backf = 1;    goto END_MSG;    }    }    goto INST_MENU;
  68. #------------------------------------------------------------------------------
  69. SELECT_INST:    cls();
  70. locate(10, 1);    print("+----------------------------------------------------------------+");    locate(10, 2);    print("|                          ｶｽﾀﾑｲﾝｽﾄｰﾙ                            |");
  71. locate(10, 3);    print("+----------------------------------------------------------------+");    locate(10, 4);    print("|                                                                |");
  72. locate(10, 5);    print("|    +-- ｲﾝｽﾄｰﾙﾓｼﾞｭｰﾙ: ------------------------+------------+    |");    locate(10, 6);    print("|    |                                         |            |    |");
  73. locate(10, 7);    print("|    |   1. ﾘﾓｰﾄﾊﾟﾈﾙ非常駐版                   |            |    |");    locate(10, 8);    print("|    |                                         |            |    |");
  74. locate(10, 9);    print("|    |   2. ﾘﾓｰﾄﾊﾟﾈﾙ常駐版                     |            |    |");    locate(10,10);    print("|    |                                         |            |    |");
  75. locate(10,11);    print("|    |                                         |            |    |");    if(%ret == 1){    locate(19,11);  print("3. ｽﾃｰﾀｽﾓﾆﾀ");    }
  76. locate(10,12);    print("|    |                                         |            |    |");    locate(10,13);    print("|    |                                         |            |    |");
  77. if(%ret == 1){    locate(19,13);  print("4. 双方向ｺﾐｭﾆｹｰｼｮﾝﾄﾞﾗｲﾊﾞ");    }    locate(10,14);    print("|    |                                         |            |    |");
  78. locate(10,15);    print("|    +-----------------------------------------+------------+    |");    locate(10,16);    print("|    +--説明：----------------------------------------------+    |");
  79. locate(10,17);    print("|    |                                                      |    |");    locate(10,18);    print("|    |                                                      |    |");
  80. locate(10,19);    print("|    +------------------------------------------------------+    |");
  81. if(%ret != 1){    locate(10,20);    print("|             ｲﾝｽﾄｰﾙﾓｼﾞｭｰﾙを選択してください。[1-2]              |");    } else {
  82. locate(10,20);    print("|             ｲﾝｽﾄｰﾙﾓｼﾞｭｰﾙを選択してください。[1-4]              |");    }    locate(10,21);    print("|                                                                |");
  83. locate(10,22);    print("|        [ENTER]ｷｰで設定を有効にします。                         |");    locate(10,23);    print("|        [ESC]ｷｰで PrintBuddy のｲﾝｽﾄｰﾙを中断します。             |");
  84. locate(10,24);    print("+----------------------------------------------------------------+");
  85. if(%rcpdos == 1){    locate(62,7); print("選択");    }    if(%rcpdosi == 1){    locate(62,9); print("選択");    }
  86. if(%stsdos == 1){    locate(62,11); print("選択");    }    if(%comdrv == 1){    locate(62,13); print("選択");    }    while(1){
  87. NEXT:
  88. locate(75,24);    clrkey();    %ans = getkey();    if((%ans >= 49) && (%ans <= 52)){    switch(%ans){
  89. case 49:    %select = %rcpdos;    locate(18, 17);    print("ﾘﾓｰﾄﾊﾟﾈﾙ非常駐版はﾌﾟﾘﾝﾀの設定をｺﾝﾋﾟｭｰﾀで行えます。  ");    locate(18, 18);    print("ﾌｧｲﾙ名は[RCPDOS.EXE]です。                          ");    break;
  90. case 50:    %select = %rcpdosi;    locate(18, 17);    print("ﾘﾓｰﾄﾊﾟﾈﾙ常駐版はDOSのﾒﾓﾘに常駐して他のｱﾌﾟﾘｹｰｼｮﾝｿﾌﾄが");    locate(18, 18);    print("動作中でも使用できます。ﾌｧｲﾙ名は[RCPDOSI.EXE]です。 ");    break;
  91. case 51:    %select = %stsdos;
  92. if(%ret == 1){    locate(18, 17);    print("ｽﾃｰﾀｽﾓﾆﾀはﾌﾟﾘﾝﾀの印刷状況やｴﾗｰﾒｯｾｰｼﾞ等を表示します。");    locate(18, 18);    print("ﾌｧｲﾙ名は[STSDOS.EXE]です。                          ");
  93. } else {    goto NEXT;    }    break;    case 52:    %select = %comdrv;
  94. if(%ret == 1){    locate(18, 17);    print("双方向ｺﾐｭﾆｹｰｼｮﾝﾄﾞﾗｲﾊﾞはﾌﾟﾘﾝﾀと双方向通信を行います。");    locate(18, 18);    print("ﾌｧｲﾙ名は[COMDRV.EXE]です。                          ");
  95. } else {    goto NEXT;    }    break;    }    locate(62,(%ans - 42) + (%ans - 49));
  96. if(%select == 0){    print("選択");    %select = 1;    } else {    print("    ");    %select = 0;    }
  97. switch(%ans){    case 49:    %rcpdos  = %select;    break;    case 50:    %rcpdosi = %select;    break;    case 51:    %stsdos  = %select;    break;    case 52:    %comdrv  = %select;    break;    }    }
  98. if(%ans == 13){    if(%rcpdos == 0){    %maxsize = %maxsize - %rcp;    }    if(%rcpdosi == 0){    %maxsize = %maxsize - %rcpi;    }    if(%stsdos == 0){    %maxsize = %maxsize - %sts;    }
  99. if(%comdrv == 0){    %maxsize = %maxsize - %com;    }    goto INST_DIR;    }    if(%ans == 27){    %backf = 3;    goto INST_STOP;    }    }    goto SELECT_INST;
  100. #------------------------------------------------------------------------------
  101. INST_DIR:    cls();
  102. locate(10, 1);    print("+----------------------------------------------------------------+");    locate(10, 2);    print("|                         ｲﾝｽﾄｰﾙ先の入力                         |");
  103. locate(10, 3);    print("+----------------------------------------------------------------+");    locate(10, 4);    print("|                                                                |");
  104. locate(10, 5);    print("|                                                                |");    locate(10, 6);    print("|                                                                |");
  105. locate(10, 7);    print("|                                                                |");    locate(10, 8);    print("|                                                                |");
  106. locate(10, 9);    print("|                                                                |");    locate(10, 10);    print("|                                                                |");
  107. locate(10, 11);    print("|                                                                |");    locate(10, 12);    print("|                                                                |");
  108. locate(10, 13);    print("|                                                                |");    locate(10, 14);    print("|                                                                |");
  109. locate(10, 15);    print("|                                                                |");    locate(10, 16);    print("|                                                                |");
  110. locate(10, 17);    print("|                                                                |");    locate(10, 18);    print("|                                                                |");
  111. locate(10, 19);    print("|                                                                |");    locate(10, 20);    print("|                                                                |");
  112. locate(10, 21);    print("|                                                                |");    locate(10, 22);    print("+----------------------------------------------------------------+");
  113. %maxdrv = maxdrive();    $maxdrv = drvname(%maxdrv);    locate(10, 5);    print("|  ｲﾝｽﾄｰﾙ先のﾄﾞﾗｲﾌﾞを入力してください。");
  114. locate(10, 7);    print("|       ﾄﾞﾗｲﾌﾞ [A-"~$maxdrv~"]: ");    if(%hardmode == 2){    %inst_drv = qesdrive(%maxdrv,1);    } else {    %inst_drv = qesdrive(%maxdrv,3);    }
  115. $inst_drv = drvname(%inst_drv);    locate(10, 9);    print("|  ｲﾝｽﾄｰﾙ先のﾃﾞｨﾚｸﾄﾘを入力してください。                         |");
  116. locate(10, 11);    print("|       ﾃﾞｨﾚｸﾄﾘ: ");    $inst_dir = qespath("\\PBUDDY", 35);    locate(10, 13);    print("|  ｲﾝｽﾄｰﾙﾌﾟﾛｸﾞﾗﾑは、以下のﾃﾞｨﾚｸﾄﾘに PrintBuddy をｲﾝｽﾄｰﾙします。  |");
  117. locate(10, 14);    print("|  このﾃﾞｨﾚｸﾄﾘ内に PrintBuddy のﾌｧｲﾙがあった場合、それを         |");    locate(10, 15);    print("|  上書きします。                                                |");
  118. locate(10, 17);    print("|       ｲﾝｽﾄｰﾙ先: ["~$inst_drv~":"~$inst_dir~"] ");    locate(10, 19);    print("|               上記の設定でいいですか？ [Y/N]                   |");
  119. locate(10, 20);    print("|        [ESC]ｷｰで PrintBuddy のｲﾝｽﾄｰﾙを中断します。             |");
  120. while(1){    clrkey();    %ans = getkey();    if((%ans == 89) || (%ans == 121)){    goto DRIVE_CHK;    }    if((%ans == 78) || (%ans == 110)){    goto INST_DIR;    }
  121. if(%ans == 27){    %backf = 2;    goto INST_STOP;    }    }    goto INST_DIR;
  122. #------------------------------------------------------------------------------
  123. DRIVE_CHK:
  124. %drv_chk = diskfree(%inst_drv);    if(%drv_chk == -1){    %backf = 2;    goto DRIVE_ERR;    }
  125. %cls_size = clstsize(%inst_drv);    %drv_chk = %cls_size * %drv_chk;    if(%drv_chk < %maxsize){    goto DRIVE_SIZE_CHK;    }
  126. if((%rcpdos)||(%rcpdosi)||(%stsdos)||(%comdrv)){    chdir(""~$inst_drv~":\\");    %ans = exist(""~$inst_drv~":"~$inst_dir~"");
  127. if(%ans == 0){    %ans = mkdir(""~$inst_drv~":"~$inst_dir~"");    %ans = mkdir(""~$inst_drv~":"~$inst_dir~"\\DOS");    %ans = mkdir(""~$inst_drv~":"~$inst_dir~"\\DOS\\SETUP");
  128. if(%ans != 0){    goto DIR_ERR_MSG;    }    }    }    if(%ret == 0){    goto SEND_P390;    } else {    goto SELECT_NET;    }
  129. #------------------------------------------------------------------------------
  130. DIR_ERR_MSG:    cls();
  131. locate(9, 1);    print("+-----------------------------------------------------------------+");    locate(9, 2);    print("|                         ｲﾝｽﾄｰﾙ先ｴﾗｰ                             |");
  132. locate(9, 3);    print("+-----------------------------------------------------------------+");    locate(9, 4);    print("|                                                                 |");
  133. locate(9, 5);    print("|      ｲﾝｽﾄｰﾙ先:                                                  |");    locate(9, 6);    print("|                                                                 |");
  134. locate(9, 7);    print("|  にｲﾝｽﾄｰﾙすることはできません。                                 |");    locate(9, 8);    print("|  ﾄﾞﾗｲﾌﾞおよびﾃﾞｨﾚｸﾄﾘを確認して再度ｲﾝｽﾄｰﾙ先を入力してください。  |");
  135. locate(9, 9);    print("|                                                                 |");    locate(9, 10);    print("|                                                                 |");
  136. locate(9, 11);    print("|                [いずれかのｷｰを押してください]                   |");    locate(9, 12);    print("|                                                                 |");
  137. locate(9, 13);    print("+-----------------------------------------------------------------+");    locate(26,5);    print("["~$inst_drv~":"~$inst_dir~"]");    getkey();    goto INST_DIR;
  138. #------------------------------------------------------------------------------
  139. DRIVE_SIZE_CHK:    cls();
  140. locate(10, 1);    print("+----------------------------------------------------------------+");    locate(10, 2);    print("|                       ﾃﾞｨｽｸ容量の不足                          |");
  141. locate(10, 3);    print("+----------------------------------------------------------------+");    locate(10, 4);    print("|                                                                |");
  142. locate(10, 5);    print("|     選択されたﾌｧｲﾙすべてをｲﾝｽﾄｰﾙするためにはﾃﾞｨｽｸの容量が      |");    locate(10, 6);    print("|     不足しています。選択した設定からいくつかのﾌｧｲﾙを外すか、   |");
  143. locate(10, 7);    print("|     またはｲﾝｽﾄｰﾙ先を変更してください。                         |");    locate(10, 8);    print("|                                                                |");
  144. locate(10, 9);    print("|                                                                |");    locate(10, 10);    print("|                 [いずれかのｷｰを押してください]                 |");
  145. locate(10, 11);    print("|                                                                |");    locate(10, 12);    print("+----------------------------------------------------------------+");
  146. getkey();    goto INST_DIR;
  147. #------------------------------------------------------------------------------
  148. SELECT_NET:    cls();
  149. locate(10, 1);    print("+----------------------------------------------------------------+");    locate(10, 2);    print("|                    ﾌﾟﾘﾝﾀの設置場所の選択                       |");
  150. locate(10, 3);    print("+----------------------------------------------------------------+");    locate(10, 4);    print("|                                                                |");
  151. locate(10, 5);    print("|     ﾌﾟﾘﾝﾀの設置場所を設定します。                              |");    locate(10, 6);    print("|                                                                |");
  152. locate(10, 7);    print("|                                                                |");    locate(10, 8);    print("|     <ﾈｯﾄﾜｰｸ>を選択した場合にはﾌﾟﾘﾝﾀとの双方向通信はできなく    |");
  153. locate(10, 9);    print("|     なります。<ﾛｰｶﾙ>を選択した場合にはそれが可能になります。   |");    locate(10, 10);    print("|                                                                |");
  154. locate(10, 11);    print("|                                                                |");    locate(10, 12);    print("|                [1: ﾈｯﾄﾜｰｸ]           [2: ﾛｰｶﾙ]                 |");
  155. locate(10, 13);    print("|                                                                |");    locate(10, 14);    print("|               いずれかを選択してください？ [1-2]               |");
  156. locate(10, 15);    print("|                                                                |");    locate(10, 16);    print("|      [ENTER]ｷｰで設定を有効にします。                           |");
  157. locate(10, 17);    print("|      [ESC]ｷｰで PrintBuddy ｲﾝｽﾄｰﾙﾌﾟﾛｸﾞﾗﾑを終了します。          |");    locate(10, 18);    print("|                                                                |");
  158. locate(10, 19);    print("+----------------------------------------------------------------+");    %esc = %commode;    locate(61,14);    print("2");
  159. while(1){    clrkey();    %ans = getkey();    locate(61, 14);    if(%ans == 49){    %commode = 1;    print("1");    }    if(%ans == 50){    %commode = 2;    print("2");    }
  160. if(%ans == 13){    goto SEND_P390;    }    if(%ans == 27){    %commode = %esc;    %backf = 4;    goto INST_STOP;    }    }    goto SELECT_NET;
  161. #------------------------------------------------------------------------------
  162. SEND_P390:    cls();
  163. locate(10, 1);    print("+----------------------------------------------------------------+");    locate(10, 2);    print("|                      PrintBuddy のｲﾝｽﾄｰﾙ中                     |");
  164. locate(10, 3);    print("+----------------------------------------------------------------+");    locate(10, 4);    print("|                                                                |");
  165. locate(10, 5);    print("|     転送元ﾌｧｲﾙ:                                                |");    locate(10, 6);    print("|                                                                |");
  166. locate(10, 7);    print("|     転送先ﾌｧｲﾙ:                                                |");    locate(10, 8);    print("|                                                                |");
  167. locate(10, 9);    print("|                                                                |");    locate(10, 10);    print("|     +----------------------------------------------------+     |");
  168. locate(10, 11);    print("|     |                                                    |     |");    locate(10, 12);    print("|     +----------------------------------------------------+     |");
  169. locate(10, 13);    print("|                                                                |");    locate(10, 14);    print("|                                                                |");
  170. locate(10, 15);    print("+----------------------------------------------------------------+");
  171. %i = 0;    if((%rcpdos)||(%rcpdosi)||(%stsdos)||(%comdrv)){    $a = drvname(0);
  172. if(%rcpdos == 1){    locate(17+(%i*4), 11);    print("■■");    %i=%i+1;    clrline(20); clrline(21); clrline(22); clrline(23);    %s = exist(""~$inst_drv~":"~$inst_dir~"\\DOS\\RCPDOS.EXE");
  173. if(%s != 0){    delete(""~$inst_drv~":"~$inst_dir~"\\DOS\\RCPDOS.EXE");    }
  174. locate(16,6);    print("                                                       ");    locate(16,8);    print("                                                       ");
  175. if(%hardmode == 1){    locate(16,6);    print(""~$a~":\\DOSV\\RCP.EXE");    locate(16,8);    print(""~$inst_drv~":"~$inst_dir~"\\DOS\\RCPDOS.EXE");    locate(20,17);
  176. %ans2 = call(""~$a~":\\DOSV\\RCP.EXE /e"~$inst_drv~":"~$inst_dir~"\\DOS");    } else {
  177. locate(16,6);    print(""~$a~":\\PC98\\RCP.EXE");    locate(16,8);    print(""~$inst_drv~":"~$inst_dir~"\\DOS\\RCPDOS.EXE");    locate(20,17);
  178. %ans2 = call(""~$a~":\\PC98\\RCP.EXE /e"~$inst_drv~":"~$inst_dir~"\\DOS");    }    locate(17+(%i*4), 11);    print("■■");    %i=%i+1;    locate(17+(%i*4), 11);    print("■■");    %i=%i+1;
  179. clrline(17); clrline(18); clrline(19); clrline(20); clrline(21); clrline(22); clrline(23);    locate(16,6);
  180. print("                                                         ");    locate(16,8);    print("                                                         ");    locate(16,6);    print(""~$a~":\\RCPHLP.EXE");
  181. locate(16,8);    print(""~$inst_drv~":"~$inst_dir~"\\DOS\\RCPDOS.HLP");    %s = exist(""~$inst_drv~":"~$inst_dir~"\\DOS\\RCPDOS.HLP");
  182. if(%s != 0){    delete(""~$inst_drv~":"~$inst_dir~"\\DOS\\RCPDOS.HLP");    }
  183. locate(20,17);    %ans2 = call(""~$a~":\\RCPHLP.EXE /e"~$inst_drv~":"~$inst_dir~"\\DOS");    locate(17+(%i*4), 11);    print("■■");    %i=%i+1;    wait(1);    if(%ans2 == -1){    goto MEM_ERR_MSG;    }    }
  184. if(%rcpdosi == 1){    locate(17+(%i*4), 11);    print("■■");    %i=%i+1;    clrline(17); clrline(18); clrline(19); clrline(20); clrline(21); clrline(22); clrline(23);
  185. %s = exist(""~$inst_drv~":"~$inst_dir~"\\DOS\\RCPDOSI.EXE");    if(%s != 0){    delete(""~$inst_drv~":"~$inst_dir~"\\DOS\\RCPDOSI.EXE");    }
  186. %s = exist(""~$inst_drv~":"~$inst_dir~"\\DOS\\RCPDOSI.LIB");    if(%s != 0){    delete(""~$inst_drv~":"~$inst_dir~"\\DOS\\RCPDOSI.LIB");    }
  187. locate(16,6);    print("                                                         ");    locate(16,8);    print("                                                         ");
  188. if(%hardmode == 1){    locate(16,6);    print(""~$a~":\\DOSV\\RCPI.EXE");    locate(16,8);    print(""~$inst_drv~":"~$inst_dir~"\\DOS\\RCPDOSI.EXE");
  189. locate(20,17);    %ans2 = call(""~$a~":\\DOSV\\RCPI.EXE /e"~$inst_drv~":"~$inst_dir~"\\DOS");    locate(16,6);    print("                                                         ");
  190. locate(16,8);    print("                                                         ");    locate(16,6);    print(""~$a~":\\DOSV\\RCPI.EXE");    locate(16,8);
  191. print(""~$inst_drv~":"~$inst_dir~"\\DOS\\RCPDOSI.LIB");    wait(1);    } else {
  192. locate(16,6);    print(""~$a~":\\PC98\\RCPI.EXE");    locate(16,8);    print(""~$inst_drv~":"~$inst_dir~"\\DOS\\RCPDOSI.EXE");
  193. locate(20,17);    %ans2 = call(""~$a~":\\PC98\\RCPI.EXE /e"~$inst_drv~":"~$inst_dir~"\\DOS");
  194. locate(16,6);    print("                                                         ");    locate(16,8);    print("                                                         ");
  195. locate(16,6);    print(""~$a~":\\PC98\\RCPI.EXE");    locate(16,8);    print(""~$inst_drv~":"~$inst_dir~"\\DOS\\RCPDOSI.LIB");        wait(1);    }    if(%ans2 == -1){    goto MEM_ERR_MSG;    }    }
  196. if(%stsdos == 1){    locate(17+(%i*4), 11);    print("■■");    %i=%i+1;    clrline(17); clrline(18); clrline(19); clrline(20); clrline(21); clrline(22); clrline(23);
  197. %s = exist(""~$inst_drv~":"~$inst_dir~"\\DOS\\STSDOS.EXE");    if(%s != 0){    delete(""~$inst_drv~":"~$inst_dir~"\\DOS\\STSDOS.EXE");    }
  198. %s = exist(""~$inst_drv~":"~$inst_dir~"\\DOS\\STSDOS.LIB");    if(%s != 0){    delete(""~$inst_drv~":"~$inst_dir~"\\DOS\\STSDOS.LIB");    }
  199. locate(16,6);    print("                                                         ");    locate(16,8);    print("                                                         ");
  200. if(%hardmode == 1){    locate(16,6);    print(""~$a~":\\DOSV\\STS.EXE");    locate(16,8);    print(""~$inst_drv~":"~$inst_dir~"\\DOS\\STSDOS.EXE");
  201. locate(20,17);    %ans2 = call(""~$a~":\\DOSV\\STS.EXE /e"~$inst_drv~":"~$inst_dir~"\\DOS");
  202. locate(16,6);    print("                                                         ");    locate(16,8);    print("                                                         ");
  203. locate(16,6);    print(""~$a~":\\DOSV\\STS.EXE");    locate(16,8);    print(""~$inst_drv~":"~$inst_dir~"\\DOS\\STSDOS.LIB");    wait(1);    } else {
  204. locate(16,6);    print(""~$a~":\\PC98\\STS.EXE");    locate(16,8);    print(""~$inst_drv~":"~$inst_dir~"\\DOS\\STSDOS.EXE");
  205. locate(20,17);    %ans2 = call(""~$a~":\\PC98\\STS.EXE /e"~$inst_drv~":"~$inst_dir~"\\DOS");
  206. locate(16,6);    print("                                                         ");    locate(16,8);    print("                                                         ");
  207. locate(16,6);    print(""~$a~":\\PC98\\STS.EXE");    locate(16,8);    print(""~$inst_drv~":"~$inst_dir~"\\DOS\\STSDOS.LIB");    wait(1);    }
  208. locate(17+(%i*4), 11);    print("■■");    %i=%i+1;    clrline(17); clrline(18); clrline(19); clrline(20); clrline(21); clrline(22); clrline(23);
  209. locate(16,6);    print("                                                         ");    locate(16,8);    print("                                                         ");
  210. locate(16,6);    print(""~$a~":\\STSMSG.EXE");    locate(16,8);    print(""~$inst_drv~":"~$inst_dir~"\\DOS\\STSDOS.TXT");    %s = exist(""~$inst_drv~":"~$inst_dir~"\\DOS\\STSDOS.TXT");
  211. if(%s != 0){    delete(""~$inst_drv~":"~$inst_dir~"\\DOS\\STSDOS.TXT");    }
  212. locate(20,17);    %ans2 = call(""~$a~":\\STSMSG.EXE /e"~$inst_drv~":"~$inst_dir~"\\DOS");        locate(17+(%i*4), 11);    print("■■");    %i=%i+1;    wait(1);
  213. if(%ans2 == -1){    goto MEM_ERR_MSG;    }    }
  214. if(%comdrv == 1){    locate(17+(%i*4), 11);    print("■■");    %i=%i+1;    clrline(17); clrline(18); clrline(19); clrline(20); clrline(21); clrline(22); clrline(23);
  215. %s = exist(""~$inst_drv~":"~$inst_dir~"\\DOS\\COMDRV.EXE");    if(%s != 0){    delete(""~$inst_drv~":"~$inst_dir~"\\DOS\\COMDRV.EXE");    }
  216. locate(16,6);    print("                                                         ");    locate(16,8);    print("                                                         ");
  217. if(%hardmode == 1){    locate(16,6);    print(""~$a~":\\DOSV\\COM.EXE");    locate(16,8);    print(""~$inst_drv~":"~$inst_dir~"\\DOS\\COMDRV.EXE");
  218. locate(20,17);    %ans2 = call(""~$a~":\\DOSV\\COM.EXE /e"~$inst_drv~":"~$inst_dir~"\\DOS");    } else {
  219. locate(16,6);    print(""~$a~":\\PC98\\COM.EXE");    locate(16,8);    print(""~$inst_drv~":"~$inst_dir~"\\DOS\\COMDRV.EXE");
  220. locate(20,17);    %ans2 = call(""~$a~":\\PC98\\COM.EXE /e"~$inst_drv~":"~$inst_dir~"\\DOS");    }    locate(17+(%i*4), 11);    print("■■");    %i=%i+1;
  221. if(%ans2 == -1){    goto MEM_ERR_MSG;    }    }    clrline(17); clrline(18); clrline(19); clrline(20); clrline(21); clrline(22); clrline(23);
  222. locate(16,6);    print("                                                           ");    locate(16,8);    print("                                                           ");
  223. locate(16,6);    print(""~$a~":\\INSTHD.EXE");    locate(16,8);    print(""~$inst_drv~":"~$inst_dir~"\\DOS\\SETUP\\INSTHD.SUP");
  224. %s = exist(""~$inst_drv~":"~$inst_dir~"\\DOS\\SETUP\\INSTHD.SUP");    if(%s != 0){    delete(""~$inst_drv~":"~$inst_dir~"\\DOS\\SETUP\\INSTHD.SUP");    }
  225. locate(20,17);    %ans2 = call(""~$a~":\\INSTHD.EXE /e"~$inst_drv~":"~$inst_dir~"\\DOS\\SETUP");    clrline(17); clrline(18); clrline(19); clrline(20); clrline(21); clrline(22); clrline(23);
  226. %pb_ini = exist(""~$inst_drv~":"~$inst_dir~"\\PBUDDY.INI");    if(%pb_ini == 0){
  227. locate(16,6);    print("                                                           ");    locate(16,8);    print("                                                           ");
  228. locate(16,6);    print(""~$a~":\\PBUDDY.INI");    locate(16,8);    print(""~$inst_drv~":"~$inst_dir~"\\PBUDDY.INI");    copy("PBUDDY.INI",$inst_drv~":"~$inst_dir);    }
  229. locate(17+(%i*4), 11);    print("■■");    %i=%i+1;
  230. locate(16,6);    print("                                                           ");    locate(16,8);    print("                                                           ");    locate(16,6);
  231. switch(%prnmode){    case 730:    print(""~$a~":\\DEF730.EXE");    break;
  232. case 720:    print(""~$a~":\\DEF720.EXE");    break;    case 450:    print(""~$a~":\\DEF450.EXE");    break;    }    locate(16,8);    print(""~$inst_drv~":"~$inst_dir~"\\DEFAULT.RCT");
  233. %s = exist(""~$inst_drv~":"~$inst_dir~"\\DEFAULT.RCT");    if(%s != 0){    delete(""~$inst_drv~":"~$inst_dir~"\\DEFAULT.RCT");    }    locate(20,17);
  234. switch(%prnmode){    case 730:    %ans2 = call(""~$a~":\\DEF730.EXE /e"~$inst_drv~":"~$inst_dir~"");    break;
  235. case 720:    %ans2 = call(""~$a~":\\DEF720.EXE /e"~$inst_drv~":"~$inst_dir~"");    break;
  236. case 450:    %ans2 = call(""~$a~":\\DEF450.EXE /e"~$inst_drv~":"~$inst_dir~"");    break;    }
  237. clrline(17); clrline(18); clrline(19); clrline(20); clrline(21); clrline(22); clrline(23);
  238. locate(16,6);    print("                                                           ");    locate(16,8);    print("                                                           ");
  239. locate(16,6);    print(""~$a~":\\INSTALL.INI");    locate(16,8);    print(""~$inst_drv~":"~$inst_dir~"\\DOS\\SETUP\\INSTALL.INI");    copy("INSTALL.INI",""~$inst_drv~":"~$inst_dir~"\\DOS\\SETUP");
  240. locate(17+(%i*4), 11);    print("■■");    %i=%i+1;
  241. locate(16,6);    print("                                                           ");    locate(16,8);    print("                                                           ");
  242. if(%hardmode == 1){    locate(16,6);    print(""~$a~":\\DOSV\\MAOIX.EXE");    } else {    locate(16,6);    print(""~$a~":\\PC98\\MAOIX.EXE");    }
  243. locate(16,8);    print(""~$inst_drv~":"~$inst_dir~"\\DOS\\SETUP\\MAOIX.EXE");
  244. %s = exist(""~$inst_drv~":"~$inst_dir~"\\DOS\\SETUP\\MAOIX.EXE");    if(%s != 0){    delete(""~$inst_drv~":"~$inst_dir~"\\DOS\\SETUP\\MAOIX.EXE");    }
  245. locate(20,17);    if(%hardmode == 1){    %ans2 = call(""~$a~":\\DOSV\\MAOIX.EXE /e"~$inst_drv~":"~$inst_dir~"\\DOS\\SETUP");
  246. } else {    %ans2 = call(""~$a~":\\PC98\\MAOIX.EXE /e"~$inst_drv~":"~$inst_dir~"\\DOS\\SETUP");    }
  247. clrline(17); clrline(18); clrline(19); clrline(20); clrline(21); clrline(22); clrline(23);
  248. locate(16,6);    print("                                                           ");    locate(16,8);    print("                                                           ");    locate(16,6);
  249. switch(%prnmode){
  250. case 730:    
  251.     print(""~$a~":\\LBP730.EXE");    locate(16,8);
  252.     print(""~$inst_drv~":"~$inst_dir~"\\DOS\\LBP730.PDR");
  253.     %s = exist(""~$inst_drv~":"~$inst_dir~"\\DOS\\LBP730.PDR");
  254.     if(%s != 0){    delete(""~$inst_drv~":"~$inst_dir~"\\DOS\\LBP730.PDR");    }    break;
  255. case 720:    print(""~$a~":\\LBP720.EXE");    locate(16,8);    print(""~$inst_drv~":"~$inst_dir~"\\DOS\\LBP720.PDR");    %s = exist(""~$inst_drv~":"~$inst_dir~"\\DOS\\LBP720.PDR");
  256. if(%s != 0){    delete(""~$inst_drv~":"~$inst_dir~"\\DOS\\LBP720.PDR");    }    break;
  257. case 450:    print(""~$a~":\\LBP450.EXE");    locate(16,8);    print(""~$inst_drv~":"~$inst_dir~"\\DOS\\LBP450.PDR");    %s = exist(""~$inst_drv~":"~$inst_dir~"\\DOS\\LBP450.PDR");
  258. if(%s != 0){    delete(""~$inst_drv~":"~$inst_dir~"\\DOS\\LBP450.PDR");    }    break;    }
  259. locate(20,17);    switch(%prnmode){    case 730:    %ans2 = call(""~$a~":\\LBP730.EXE /e"~$inst_drv~":"~$inst_dir~"\\DOS");    break;
  260. case 720:    %ans2 = call(""~$a~":\\LBP720.EXE /e"~$inst_drv~":"~$inst_dir~"\\DOS");    break;    case 450:    %ans2 = call(""~$a~":\\LBP450.EXE /e"~$inst_drv~":"~$inst_dir~"\\DOS");    break;    }
  261. clrline(17); clrline(18); clrline(19); clrline(20); clrline(21); clrline(22); clrline(23);
  262. if(%ans2 == -1){    goto MEM_ERR_MSG;    }    }    while(%i < 13){    locate(17+(%i*4), 11);    print("■■");    %i=%i+1;    }    wait(1);    goto INIT_P390;
  263. #------------------------------------------------------------------------------
  264. MEM_ERR_MSG:    cls();
  265. locate(10, 5);    print("+----------------------------------------------------------------+");    locate(10, 6);    print("|                                                                |");
  266. locate(10, 7);    print("|     PrintBuddy は正常にｲﾝｽﾄｰﾙされませんでした。                |");    locate(10, 8);    print("|     PrintBuddy をｲﾝｽﾄｰﾙするためには再度ｲﾝｽﾄｰﾙﾌﾟﾛｸﾞﾗﾑ           |");
  267. locate(10, 9);    print("|     を実行してください。                                       |");    locate(10, 10);    print("|                                                                |");
  268. locate(10, 11);    print("|                                                                |");    locate(10, 12);    print("|                [いずれかのｷｰを押してください]                  |");
  269. locate(10, 13);    print("|                                                                |");    locate(10, 14);    print("+----------------------------------------------------------------+");
  270. clrkey();    getkey();    goto ERR_EXIT;
  271. #------------------------------------------------------------------------------
  272. INIT_P390:    cls();
  273. locate(10, 8);    print("+----------------------------------------------------------------+");    locate(10, 9);    print("|                                                                |");
  274. locate(10, 10);    print("|      PrintBuddy の初期化中、しばらくお待ちください...          |");    locate(10, 11);    print("|                                                                |");
  275. locate(10, 12);    print("+----------------------------------------------------------------+");    create($inst_drv~":"~$inst_dir~"\\SETUP.BAT");    close();
  276. if((%rcpdos)||(%rcpdosi)||(%stsdos)||(%comdrv)){    open($inst_drv~":"~$inst_dir~"\\SETUP.BAT");    seek(1);
  277. addline("ECHO OFF");    addline(""~$inst_drv~":");    addline("CD "~$inst_drv~":\\");    addline("CD "~$inst_drv~":"~$inst_dir~"");    addline("IF NOT EXIST DOS\\SETUP\\MAOIX.EXE GOTO MSG");
  278. addline("DOS\\SETUP\\MAOIX DOS\\SETUP\\INSTHD.SUP");    addline("GOTO END");    addline(":MSG");    addline("ECHO PrintBuddy DOS版はｲﾝｽﾄｰﾙされていません。");    addline(":END");
  279. close();    open($inst_drv~":"~$inst_dir~"\\PBUDDY.INI");    seek(1);    %v = forward("MODEL");
  280. if(%v != 0){    seek(%v);    delline();    } else {    %v = forward("PRINTBUDDY");    if(%v != 0){    seek(%v+1);    } else {    goto INST_END;    }    }
  281. switch(%prnmode){    case 730:    insline("MODEL=LBP-730");    break;    case 720:    insline("MODEL=LBP-720");    break;    case 450:    insline("MODEL=LBP-450");    break;    }    %v = forward("MODELTITLE");
  282. if(%v != 0){    seek(%v);    delline();    } else {    %v = forward("PRINTBUDDY");    if(%v != 0){    seek(%v+2);    } else {    goto INST_END;    }    }
  283. switch(%prnmode){    case 730:    insline("MODELTITLE=ﾌﾟﾘﾝﾀ情報");    break;    case 720:    insline("MODELTITLE=ﾌﾟﾘﾝﾀ情報");    break;    case 450:    insline("MODELTITLE=ﾌﾟﾘﾝﾀ情報");    break;    }
  284. if(%hardmode == 1){    %v = forward("98-DOS");    } else {    %v = forward("DOS/V");    }    seek(%v);    %v = forward("PBUDDYDIR");
  285. if(%v != 0){    seek(%v);    delline();    }    if(%hardmode == 1){    insline(";PBUDDYDIR=C:\\PBUDDY");    } else {    insline(";PBUDDYDIR=A:\\PBUDDY");    }    %v = forward("PBUDDYWINDIR");
  286. if(%v != 0){    seek(%v);    delline();    }    if(%hardmode == 1){    insline(";PBUDDYWINDIR=C:\\PBUDDY\\WIN");    } else {    insline(";PBUDDYWINDIR=A:\\PBUDDY\\WIN");    }    %v = forward("PBUDDYDOSDIR");
  287. if(%v != 0){    seek(%v);    delline();    }    if(%hardmode == 1){    insline(";PBUDDYDOSDIR=C:\\PBUDDY\\DOS");    } else {    insline(";PBUDDYDOSDIR=A:\\PBUDDY\\DOS");    }    seek(1);
  288. if(%hardmode == 1){    %v = forward("DOS/V");    } else {    %v = forward("98-DOS");    }    seek(%v);    %v = forward("PBUDDYDIR");
  289. if(%v != 0){    seek(%v);    delline();    }    insline("PBUDDYDIR="~$inst_drv~":"~$inst_dir);    %v = forward("PBUDDYWINDIR");
  290. if(%v != 0){    seek(%v);    delline();    }    insline("PBUDDYWINDIR="~$inst_drv~":"~$inst_dir~"\\WIN");    %v = forward("PBUDDYDOSDIR");
  291. if(%v != 0){    seek(%v);    delline();    }    insline("PBUDDYDOSDIR="~$inst_drv~":"~$inst_dir~"\\DOS");    seek(1);    %v = forward("MODE");
  292. if(%v == 0){    insline("[MODE]");    seek(1);    %v = forward("MODE");    }    seek(%v);    %v = forward("Direction");
  293. if(%v != 0){    seek(%v);    delline();    }    insline("Direction="~%commode - 1~"");    if(%pb_ini != 0){    seek(1);    %v = forward("[OPTION-TRANSLATOR]");
  294. seek(%v);    %vv = forward("@N201=3");    if(%vv != 0){    seek(%vv);    delline();    insline("@N201=2");    }
  295. seek(%v);    %vv = forward("@N201=1");    if(%vv != 0){    seek(%vv);    delline();    insline("@N201=0");    }
  296. seek(%v);    %vv = forward("@ESCP=3");    if(%vv != 0){    seek(%vv);    delline();    insline("@ESCP=2");    }
  297. seek(%v);    %vv = forward("@ESCP=1");    if(%vv != 0){    seek(%vv);    delline();    insline("@ESCP=0");    }    }
  298. close();    open($inst_drv~":"~$inst_dir~"\\DOS\\SETUP\\INSTALL.INI");    seek(1);    %v = forward("[HARDMODE]");
  299. if(%v != 0){    seek(%v+1);    delline();    if(%hardmode == 1){    insline("DOSV");    } else {    insline("PC98");    }    }    seek(1);    %v = forward("[OPTIONDIR]");
  300. if(%v != 0){    seek(%v+1);    delline();    insline(""~$inst_drv~":"~$inst_dir~"");    }
  301. if(%ret == 0){    seek(0);    insline("");    insline("2");    insline("[INTERFACE-NORMAL]");    }    close();    wait(1);    } else {    wait(1);    goto END_INSTALL;    }    goto INST_END;
  302. #------------------------------------------------------------------------------
  303. INST_END:    cls();
  304. locate(10, 1);    print("+----------------------------------------------------------------+");    locate(10, 2);    print("|                     PrintBuddy の組み込み                      |");
  305. locate(10, 3);    print("+----------------------------------------------------------------+");    locate(10, 4);    print("|                                                                |");
  306. locate(10, 5);    print("|                                                                |");    locate(10, 6);    print("|    ｺﾝﾋﾟｭｰﾀ起動時に PrintBuddy を組み込みますか？ [Y/N]         |");
  307. locate(10, 7);    print("|                                                                |");    locate(10, 8);    print("|                                                                |");
  308. locate(10, 9);    print("|        [ESC]ｷｰで PrintBuddy のｲﾝｽﾄｰﾙを中断します。             |");    locate(10, 10);    print("|                                                                |");
  309. locate(10, 11);    print("+----------------------------------------------------------------+");    while(1){    clrkey();    %ans = getkey();    if((%ans == 89) || (%ans == 121)){    cls();
  310. locate(10, 3);    print("+----------------------------------------------------------------+");    locate(10, 4);    print("|                                                                |");
  311. locate(10, 5);    print("|                                                                |");    locate(10, 6);    print("|    ｺﾝﾋﾟｭｰﾀ起動時のﾄﾞﾗｲﾌﾞを入力してください。[A-"~$maxdrv~"]              |");
  312. locate(10, 7);    print("|                                                                |");    locate(10, 8);    print("|                                                                |");
  313. locate(10, 9);    print("+----------------------------------------------------------------+");    locate(62, 6);
  314. if(%hardmode == 2){    %inst_drv2 = qesdrive(%maxdrv,1);    } else {    %inst_drv2 = qesdrive(%maxdrv,3);    }    $inst_drv2 = drvname(%inst_drv2);    cls();
  315. locate(10, 7);    print("+----------------------------------------------------------------+");    locate(10, 8);    print("|                                                                |");
  316. locate(10, 9);    print("|        AUTOEXEC.BATの初期化中、しばらくお待ちください...       |");    locate(10,10);    print("|                                                                |");
  317. locate(10,11);    print("+----------------------------------------------------------------+");    wait(1);
  318. if((%rcpdos)||(%rcpdosi)||(%stsdos)||(%comdrv)){    %ans = exist($inst_drv2~":\\AUTOEXEC.BAT");    if(%ans == 0){
  319. locate(8, 7);    print("+-------------------------------------------------------------------+");    locate(8, 8);    print("|                                                                   |");
  320. locate(8, 9);    print("|  ﾄﾞﾗｲﾌﾞ:[ ]にAUTOEXEC.BATはありません。新規に作成しますか？[Y/N]  |");    locate(8,10);    print("|                                                                   |");
  321. locate(8,11);    print("+-------------------------------------------------------------------+");    locate(19,9);    print($inst_drv2);
  322. while(1){    clrkey();    %ans = getkey();    if((%ans == 89)||(%ans == 121)){    create($inst_drv2~":\\AUTOEXEC.BAT");    close();    goto AUTO_WRITE;    }
  323. if((%ans == 78)||(%ans ==110)){    goto INST_END;    }    }    } else {    create($inst_drv2~":\\AUTOEXEC.OLD");    close();    copy($inst_drv2~":\\AUTOEXEC.BAT", $inst_drv2~":\\AUTOEXEC.OLD");    }
  324. AUTO_WRITE:
  325. open($inst_drv2~":\\AUTOEXEC.BAT");    seek(0);    if(%rcpdosi){    insline("REM "~$inst_drv~":"~$inst_dir~"\\DOS\\RCPDOSI.EXE");    }
  326. if((%commode == 2) && (%direction == 1)){    if(%stsdos){    insline("REM "~$inst_drv~":"~$inst_dir~"\\DOS\\STSDOS.EXE");    }
  327. if(%comdrv){    insline(""~$inst_drv~":"~$inst_dir~"\\DOS\\COMDRV.EXE");    }    }    insline("cd "~$inst_drv~":\\");    close();
  328. open($inst_drv~":"~$inst_dir~"\\DOS\\SETUP\\INSTALL.INI");    seek(0); insline("[AUTOEXEC]");    seek(0);    insline($inst_drv2);    close();    }    wait(2);    goto END_INSTALL;    }
  329. if((%ans == 78) || (%ans == 110)){    goto END_INSTALL;    }    if(%ans == 27){        %backf = 6;    goto    INST_STOP;    }    }    goto INST_END;
  330. #------------------------------------------------------------------------------
  331. INST_STOP:    cls();
  332. locate(10, 5);    print("+----------------------------------------------------------------+");    locate(10, 6);    print("|                                                                |");
  333. locate(10, 7);    print("|     PrintBuddy のｲﾝｽﾄｰﾙ処理は完了していません。ここで終了した  |");    locate(10, 8);    print("|     場合には、PrintBuddy は正しくｲﾝｽﾄｰﾙされないかもしれません。|");
  334. locate(10, 9);    print("|     完全にｲﾝｽﾄｰﾙを行うためには、再度 Printbuddy のｲﾝｽﾄｰﾗ       |");    locate(10, 10);    print("|     を実行してください。                                       |");
  335. locate(10, 11);    print("|                                                                |");    locate(10, 12);    print("|             PrintBuddy ｲﾝｽﾄｰﾗを中断しますか？ [Y/N]            |");
  336. locate(10, 13);    print("|                                                                |");
  337. locate(10, 14);    print("+----------------------------------------------------------------+");
  338. while(1){    clrkey();    %ans = getkey();    if((%ans == 89) || (%ans == 121)){goto INST_STOP2;    }    if((%ans == 78) || (%ans == 110)){
  339. switch(%backf){    case 0:    goto HDINST_START;    case 1:    goto INST_MENU;    case 2:    goto INST_DIR;
  340. case 3:    goto SELECT_INST;    case 4:    goto SELECT_NET;    case 5:    goto SEND_P390;    case 6:    goto INST_END;    default:    break;    }    }    }    goto INST_STOP;
  341. #------------------------------------------------------------------------------
  342. INST_STOP2:    cls();
  343. locate(10, 5);    print("+----------------------------------------------------------------+");    locate(10, 6);    print("|                                                                |");
  344. locate(10, 7);    print("|     PrintBuddy は正常にｲﾝｽﾄｰﾙされませんでした。                |");    locate(10, 8);    print("|     PrintBuddy をｲﾝｽﾄｰﾙするためには再度ｲﾝｽﾄｰﾙﾌﾟﾛｸﾞﾗﾑ           |");
  345. locate(10, 9);    print("|     を実行してください。                                       |");    locate(10, 10);    print("|                                                                |");
  346. locate(10, 11);    print("|                                                                |");    locate(10, 12);    print("|                [いずれかのｷｰを押してください]                  |");
  347. locate(10, 13);    print("|                                                                |");    locate(10, 14);    print("+----------------------------------------------------------------+");
  348. clrkey();    getkey();    goto END_INSTALL;
  349. #------------------------------------------------------------------------------
  350. DRIVE_ERR:    cls();
  351. locate(10, 7);    print("+----------------------------------------------------------------+");    locate(10, 8);    print("|                                                                |");
  352. locate(10, 9);    print("|               ドライブの指定がまちがっています。               |");    locate(10, 10);    print("|                                                                |");
  353. locate(10, 11);    print("|                [いずれかのｷｰを押してください]                  |");    locate(10, 12);    print("|                                                                |");
  354. locate(10, 13);    print("+----------------------------------------------------------------+");    while(1){    clrkey();    %ans = getkey();
  355. switch(%backf){    case 0:    goto HDINST_START;    case 1:    goto INST_MENU;    case 2:    goto INST_DIR;    case 3:    goto SELECT_INST;    case 4:    default:    break;    }    }    goto DRIVE_ERR;
  356. #------------------------------------------------------------------------------
  357. ERR_EXIT:    cls();
  358. locate(10, 7);    print("+----------------------------------------------------------------+");    locate(10, 8);    print("|                                                                |");
  359. locate(10, 9);    print("|             PrintBuddy のｲﾝｽﾄｰﾙに失敗しました。                |");    locate(10, 10);    print("|                                                                |");
  360. locate(10, 11);    print("|                [いずれかのｷｰを押してください]                  |");    locate(10, 12);    print("|                                                                |");
  361. locate(10, 13);    print("+----------------------------------------------------------------+");    getkey();    goto END_INSTALL;
  362. #------------------------------------------------------------------------------
  363. END_INSTALL:    cls();    locate(20, 12);    print("PrintBuddy のｲﾝｽﾄｰﾙを終了します。");
  364.