home *** CD-ROM | disk | FTP | other *** search
/ ProfitPress Mega CDROM2 …eeware (MSDOS)(1992)(Eng) / ProfitPress-MegaCDROM2.B6I / COMM / MISC / SRC26_2.ZIP / SRC / SETUP.C < prev    next >
Encoding:
C/C++ Source or Header  |  1990-07-12  |  35.6 KB  |  1,252 lines
  1. /*
  2.  * setup.c: hterm set-up menu system (not regident)
  3.  *
  4.  * Author: HIRANO Satoshi
  5.  * (C) 1989, 1990  Halca Computer Science Laboratory TM
  6.  *           University of Tokyo
  7.  *
  8.  * 2.2 89/05/16 Halca.Hirano change Shift-JIS menu item to ASCII
  9.  *                V2.2 distribution
  10.  * 2.3 89/06/15 Halca.Hirano integrate 98 and PC
  11.  * 2.4 89/07/04 Halca.Hirano builtin mini mini emacs editor
  12.  * 2.5 89/07/15 Halca.Hirano add help system
  13.  * 2.6 89/07/20 Halca.Hirano add PFkey editor
  14.  * 2.7 89/07/27 Halca.Hirano make effort to reduce code size
  15.  *     ---- V2.3.-1 distribution ----
  16.  * 2.8 89/09/15 Halca.Hirano add RTS/CTS flow ctrl, fix lineMode bug
  17.  * 2.9 89/09/21 Halca.Hirano add xmodem file transfer facility
  18.  *    add file xfer options set-up
  19.  *    ---- V2.4.0 distribution ----
  20.  * 3.0 89/10/04 Halca.Hirano fix port number bug
  21.  *    move change directory to file.c
  22.  * 3.1 89/11/10 Tominaga@Titech ported to J3100, 
  23.  *    improve many items.
  24.  *        put 'done' message after clearing display
  25.  *        don't change lowScrRegion at resetTerminal()
  26.  *        locate(0,0) after returing from DOS
  27.  *        put 'not supported' or 'only this' messages instead of 'xx only'
  28.  *        put 'only this' messages properly
  29.  *        add ^U (erase to top of line) to mini-mini-emacs editor
  30.  * ----  V2.5.0 distribution ----
  31.  * 3.2 89/11/29 Halca.Hirano add audible/visible/both bell mode
  32.  * 3.3 89/12/04 Halca.Hirano add remap keys!
  33.  *    drop ER at exit
  34.  * 3.4 89/12/12 Halca.Hirano move getting filename for filexfer to 
  35.  *    kermit.c/xmodem.c so that these functions are able to be called from
  36.  *    communication mode.
  37.  * ---- V2.5.1 distribution ----
  38.  * 3.5 89/12/16 Halca.Hirano save/restore dropER in set-up file
  39.  * 3.6 90/06/16 Halca.Hirano
  40.  *    rewrite menu interpreter smaller
  41.  *        use locate/reverseMode instead of sprintf("ESC[10;20fESC[7m....
  42.  *
  43.  * $Header: setup.cv  1.21  90/07/04 18:02:18  hirano  Exp $
  44.  *
  45.  */
  46.  
  47. #include "option.h"
  48. #ifdef SETUP
  49. #include <stdio.h>
  50. #include <string.h>
  51. #include <stdlib.h>
  52. #include "config.h"
  53. #include "hterm.h"
  54. #include "default.h"
  55. #include "global.h"
  56. #include "version.h"
  57.  
  58.  
  59. /*
  60.  * menu entry
  61.  */
  62. struct _menu {
  63.     int x, y;            /* menu position            */
  64.     char *string;        /* menu label string        */
  65.     char *key;            /* help database index key    */
  66. };
  67.  
  68. #define sorry()    putStatus(future)
  69. #define onlyThis() putStatus(only)
  70. #define notSupported() putStatus(useOtherMachine)
  71.  
  72. static int first = YES;
  73. static char manual[70] = "intro";
  74. static char toNext[] = " To Next Set-Up ";
  75. static char toDir[] = " To Directory ";
  76. static char msg_prnNotRdy[] = "Printer not ready";
  77. static char msg_bsOff[] = " BS Key Watcher OFF ";
  78. static char msg_bsNum[] = " BS Key Watcher %2u%% ";
  79. static char useOtherMachine[] = "not supported";
  80. static char future[] = "Future Function";
  81. static char only[] = "Only this";
  82.  
  83. static    void mainDirectory(void);
  84. static  int displayDirectory(void );
  85. static  int dispEnhanstDirectory(void );
  86. static  int generalDirectory(void );
  87. static  int genEnhanstDirectory(void );
  88. static  int commDirectory(void );
  89. static  int printerDirectory(void );
  90. static  int keybdDirectory(void );
  91. static  int keyRemapDirectory(void );
  92. static  int tabDirectory(void );
  93. static  int fileXferDirectory(void );
  94. static  int xferOptionsDirectory(void );
  95. static  void putmenu(int num,struct _menu *p);
  96. static  int getmenu(int num,struct _menu *p,int menu);
  97.  
  98. void setup()
  99. {
  100.     showHelp = NO;
  101.     mode = M_SETUP;
  102.     showPage1();
  103.  
  104.     conPrint(versionString());
  105.     conPrint("Copyright (C) 1986, 1990  Halca Computer Science Laboratory  TM\n\r");
  106.     conPrint("                          University of Tokyo\n\r");
  107.     conPrint("All rights reserved.\n\r");
  108.     conPrint("Author: HIRANO Satoshi\n\r");
  109.     conPrint("Automatic hterm information: hterm@tkl.iis.u-tokyo.ac.jp\n\r");
  110.     conPrint("Bug report and contribution: hterm-bug@tkl.iis.u-tokyo.ac.jp\n\r");
  111.     conPrint("Please use this software freely, but only for peaceful purpose.\n\r\n");
  112.     reverseMode();
  113.     conPrint(" ? for help ");
  114.     normalMode();
  115.  
  116.     mainDirectory();
  117.  
  118.     mode = M_COMM;
  119.     showPage0();
  120. }
  121.  
  122. /*
  123. ** static void mainDirectory
  124.  *
  125.  * main set-up directory
  126.  */
  127. struct _menu smainmenu[] = 
  128. {/* 0 */ {0,  0, " hterm  Set-Up Directory", NULL}, 
  129.  /* 1 */ {0,  2, " Display ", "M1"}, 
  130.  /* 2 */ {10, 2, " General ", "M2"}, 
  131.  /* 3 */ {20, 2, " Communication ", "M3"},
  132.  /* 4 */ {36, 2, " Keyboard ", "M4"}, 
  133.  /* 5 */ {47, 2, " Printer ", "M5"}, 
  134.  /* 6 */ {57, 2, " Tabs ", "M6"},
  135.  /* 7 */ {0,  4, " File Xfer ", "M7"},
  136.  /* 8 */ {12, 4, " OS  ", "M8"},
  137.  /* 9 */ {18, 4, NULL, "M9"}, 
  138.  /* 10*/ {29, 4, " Clear Display ", "M10"}, 
  139.  /* 11*/ {45, 4, " Clear Comm ", "M11"},
  140.  /* 12*/ {58, 4, " Reset Terminal ", "M12"}, 
  141.  /* 13*/ {0,  6, " Redial ", "M13"}, 
  142.  /* 14*/ {9,  6, " Manual ", "intro"},
  143.  /* 15*/ {18, 6, " Save Set-Up ", "M15"}, 
  144.  /* 16*/ {32, 6, " Exit Set-up ", "M16"}, 
  145.  /* 17*/ {46, 6, " Exit hterm ", "M17"}};
  146. #define N_MENU 17
  147.  
  148. char *sm_online[] = {" Off Line ", " On Line  "};
  149.  
  150. static void mainDirectory()
  151. {
  152.     register int menu, status;
  153.     char *diag;
  154.  
  155.     smainmenu[9].string = sm_online[online];
  156.     menu = 1; status = M_DIRECTORY;
  157.     for(;;) {
  158.         if (status != M_NEXT) {
  159.             if (status != M_NOCHANGE)
  160.                 putmenu(N_MENU, smainmenu);
  161.             menu = getmenu(N_MENU, smainmenu, menu);
  162.         }
  163.         status = M_NOCHANGE;
  164.         switch(menu) {
  165.         case 1: status = displayDirectory(); break;
  166.         case 2: status = generalDirectory(); break;
  167.         case 3: status = commDirectory(); break;
  168.         case 4: status = keybdDirectory(); break;
  169.         case 5: status = printerDirectory(); break;
  170.         case 6: status = tabDirectory(); break;
  171.         case 7: status = fileXferDirectory(); break;
  172.         case 8: callOS(); goto redraw;
  173.         case 9:smainmenu[9].string = sm_online[online = !online]; break;
  174.         case 10:
  175.             clearSavedPage(page0Save);
  176.             clearSavedPage(ansiVramSave);
  177.             curYSave = 0, curXSave = 0; attrSave = eraseAttr;
  178. #ifdef UOP_GRAPHICS
  179.             plot_erase();
  180. #endif /* UOP_GRAPHICS */
  181.             goto redraw;
  182.         case 11: portSetup(); ansiSetup();
  183.             break;
  184.         case 12: 
  185.             resetTerminal();
  186. redraw:
  187.             putmenu(N_MENU, smainmenu);            
  188.             break;
  189.         case 13:
  190.             redial = !redial;
  191.             if (redial)
  192.                 putStatus("redial after set-up");
  193.             else
  194.                 putStatus("No redial");
  195.             break;
  196.         case 14: { 
  197.             char *nextKey;
  198.             strcpy(tmpBuf, manual);
  199.             if (emacs("Topics: ", tmpBuf, MAX_FILE_NAME, E_NO_HELP) == ERR)
  200.                 break;
  201.             if (tmpBuf[0] == '\0' || tmpBuf[0] == '?')
  202.                 strcpy(manual, "intro");
  203.             else
  204.                 strcpy(manual, tmpBuf);
  205.             if ((nextKey = helpSystem(manual)) != (char *)NULL);
  206.                 strcpy(manual, nextKey);
  207.             }
  208.             break;
  209.         case 15: strcpy(tmpBuf, setFileName);
  210.             if (emacs("Set-Up filename: ", tmpBuf, MAX_FILE_NAME, (E_HELP|E_FILE)) == ERR)
  211.                 break;
  212.             if ((diag = saveSetup(tmpBuf)) != NULL)  {
  213.                 putStatus(diag); bell(); 
  214.             } else {
  215.                 strcpy(setFileName, tmpBuf);
  216.             }
  217.             break;
  218.         case 16: return;
  219.         case 17:
  220.             showPage0(); termination();
  221.         case END_SETUP: return;
  222.         }
  223.         if (status == END_SETUP) return;
  224.         else if (status == M_NEXT)
  225.             if (++menu > 7) menu = 1;
  226.         if (status == M_DIRECTORY)
  227.             menu = 1;
  228.     } 
  229. } 
  230.  
  231.  
  232. /*
  233. ** displayDirectory()
  234.  *
  235.  * display setup directory
  236.  */
  237. struct _menu sdisplay[] = {
  238. /* 0 */{0,  0, " Display Set-Up", NULL},
  239. /* 1 */{0,  2, toNext, "D1"}, 
  240. /* 2 */{17, 2, toDir, "to dir"}, 
  241. /* 3 */{32, 2, NULL, "D3"}, /* interpret */
  242. /* 4 */{56, 2, NULL, "D4"}, /* auto wrap */
  243. /* 5 */{0,  4, NULL, "D5"}, /* soft font */
  244. /* 6 */{12, 4, NULL, "D6"}, /* cursor    */
  245. /* 7 */{24, 4, NULL, "D7"},    /* statline */
  246. /* 8 */{41, 4, NULL, "D8"}};/* backquote */
  247. #undef N_MENU
  248. #define N_MENU 8
  249.  
  250. char *sd_intCon[] = {" No Interpret Controls ", " Interpret Controls    "};
  251. char *sd_aWrap[] = {" No Auto Wrap ", " Auto Wrap    "};
  252. char *sd_softFont[] = {" ROM Font  ", " Soft Font "};
  253. char *sd_cur[] = {" No Cursor ", " Cursor    "};
  254. char *sd_sLine[] = {" No Status Line ", " Status Line    "};
  255. char *sd_backQ[] = {" No Backquote ", " Backquote    "};
  256.  
  257. static displayDirectory()
  258. {
  259.     register int menu;
  260.     int softFontDummy;
  261.     char *msg;
  262.  
  263.     sdisplay[3].string = sd_intCon[intConSave];
  264.     sdisplay[4].string = sd_aWrap[autoWrap];
  265.     sdisplay[5].string = sd_softFont[softFont];
  266.     sdisplay[6].string = sd_cur[cursorSave];
  267.     sdisplay[7].string = sd_sLine[0 /*stLineEnable*/];
  268.     sdisplay[8].string = sd_backQ[backQuote];
  269.     putmenu(N_MENU, sdisplay);
  270.     menu = 1;
  271.     for (;;) {
  272.         switch(menu = getmenu(N_MENU, sdisplay, menu)) {
  273.         case 1: return(dispEnhanstDirectory());
  274.         case 2: return(M_DIRECTORY);
  275.         case 3: sdisplay[3].string = sd_intCon[intConSave = !intConSave]; break;
  276.         case 4:    sdisplay[4].string = sd_aWrap[autoWrap = !autoWrap]; break;
  277.         case 5:
  278. #ifdef SOFT_FONT
  279.             softFontDummy = !softFont;
  280.             if (softFontDummy && fontFileLoaded == NO) {
  281.                 putStatus("Loading font...");
  282.                 msg = fontLoad(fontName);
  283.                 if (msg) {
  284.                     putStatus(msg);
  285.                     break;
  286.                 }
  287.             }
  288.             if (softFont)
  289.                 attrib = eraseAttr = _NORMAL;        /* normal attribute        */
  290.             initPage();
  291.             softFont = softFontDummy;
  292.             sdisplay[5].string = sd_softFont[softFont];
  293.             setCRTMode();
  294.             putmenu(N_MENU, sdisplay);
  295. #else
  296.             putStatus("soft font not installed");
  297. #endif    /* SOFT_FONT */
  298.             break;
  299.         case 6: sdisplay[6].string = sd_cur[cursorSave = !cursorSave]; break;
  300.         case 7: sorry(); break;
  301. #if 0
  302.         case 7: 
  303.             if ((statline = !statline) == YES) 
  304.                 enable25();
  305.             else
  306.                 disable25();
  307.             sdisplay[7].string = sd_sLine[statline]; break;
  308. #endif
  309.         case 8: /* PC98 only */
  310. #ifdef PC98
  311.             sdisplay[8].string = sd_backQ[backQuote = !backQuote]; break;
  312. #else
  313.             onlyThis(); break;
  314. #endif /* PC98 */
  315.         case END_SETUP: return(END_SETUP);
  316.         }
  317.     }
  318. } 
  319.  
  320. /*
  321. ** dispEnhanstDirectory()
  322.  *
  323.  * display enhancements set-up directory
  324.  */
  325. struct _menu sdispenhanst[] = {
  326. /* 0 */{0,  0, " Display Enhancements Set-Up", NULL},
  327. /* 1 */{0,  2, toNext, "d1"}, 
  328. /* 2 */{17, 2, toDir, "to dir"}, 
  329. /* 3 */{32, 2, " magenda char ", "d3"},    /* ccol */
  330. /* 4 */{47, 2, " magenda back ", "d4"},    /* bcol    */
  331. /* 5 */{62, 2, " magenda border ", "d5"},
  332. /* 6 */{0,  4, NULL, "d6"}, /*blink*/
  333. /* 7 */{18, 4, NULL, "d7"},    /* under */
  334. /* 8 */{43, 4, NULL, "d8"}};/*vbell*/
  335. #undef N_MENU
  336. #define N_MENU 8
  337.  
  338. char *sde_blinkCursor[] = {" Static Cursor   ", " Blinking Cursor "};
  339. char *sde_blockCursor[] = {" Underline Cursor Style ", " Block Cursor Style     "};
  340. char *sde_vbell[] = {" Audible Bell  ", " Visible Bell  ", " Both A/V Bell "};
  341. char *sde_ccol = " %s Char ";
  342. char *sde_ecol = " %s Back ";
  343. char *sde_bcol = " %s Border ";
  344. #ifdef PC98
  345. char *colname[] = {"Black  ","Blue   ","Red    ","Vioret ","Green  ",
  346.                     "Magenta", "Yellow ","White  "};
  347. #endif
  348. #if defined(IBMPC) || defined(J3100)
  349. char *colname[] = {"Black  ","Blue   ","Green  ",  "Cyan   ","Red    ",
  350.                     "Magenta", "Brown  ","White  "};
  351. #endif
  352.  
  353. static dispEnhanstDirectory()
  354. {
  355.     register int menu;
  356.     int ccol;
  357.     int ecol;
  358.     int bcol;
  359.  
  360.     if (softFont)
  361.         attrib = eraseAttr = _NORMAL;        /* normal attribute        */
  362.     
  363. #ifdef PC98
  364.     bcol = border>>4;
  365.  
  366.     if (eraseAttr & B_REVER) {
  367.         ecol = eraseAttr>>5;    /* non-black    */
  368.         ccol = 0;
  369.     } else {
  370.         ecol = 0;                /* black        */
  371.         ccol = attrib>>5;
  372.     }
  373. #endif
  374. #ifdef IBMPC
  375.     ccol = attrib & 0x07;
  376.     ecol = (attrib & 0x70) >> 4;
  377.     bcol = 0;
  378. #endif
  379. #ifdef J3100
  380.     ccol = 7;
  381.     ecol = 0;
  382.     bcol = 0;
  383. #endif
  384.     sprintf(sdispenhanst[3].string, sde_ccol, colname[ccol]);
  385.     sprintf(sdispenhanst[4].string, sde_ecol, colname[ecol]);
  386.     sprintf(sdispenhanst[5].string, sde_bcol, colname[bcol]);
  387.     sdispenhanst[6].string = sde_blinkCursor[blinkCursor];
  388.     sdispenhanst[7].string = sde_blockCursor[blockCursor];
  389.     sdispenhanst[8].string = sde_vbell[visibleBell];
  390.     putmenu(N_MENU, sdispenhanst);
  391.     menu = 1;
  392.     for (;;) {
  393.         switch(menu = getmenu(N_MENU, sdispenhanst, menu)) {
  394.         case 1: return(M_NEXT);
  395.         case 2: return(M_DIRECTORY);
  396. #ifdef PC98
  397.         case 3:
  398.             if (softFont)
  399.                 break;
  400.             if (ecol != 0) {
  401.                 putStatus("Only black char with non-black backgroud");
  402.                 break;
  403.             }
  404.             if (++ccol >= MAX_BACK_COLOR) ccol = 0;
  405.             eraseAttr = attrSave = attrib = (ccol<<5)|B_NORMAL;
  406.             goto clearAll;
  407.         case 4:    if (++ecol >= MAX_BACK_COLOR) ecol = 0;
  408.             if (softFont)
  409.                 break;
  410.             if (ecol == 0) {    /* black    */
  411.                 eraseAttr = A_WHITE|B_NORMAL;    
  412.                 ccol = 7;        /* white char    */
  413.             } else {
  414.                 eraseAttr = (ecol<<5)|B_REVER|B_NORMAL;
  415.                 ccol = 0;        /* black char */
  416.             }
  417.             attrSave = attrib = eraseAttr;
  418.             sprintf(sdispenhanst[4].string, sde_ecol, colname[ecol]);
  419. clearAll:    sprintf(sdispenhanst[3].string, sde_ccol, colname[ccol]);
  420.             initPage();
  421.             clearSavedPage(page0Save);
  422.             curXSave = curYSave = 0;
  423.             putmenu(N_MENU, sdispenhanst);
  424.             break;
  425.         case 5:    if (++bcol >= MAX_BACK_COLOR) bcol = 0;
  426.             border = (bcol << 4);
  427.             sprintf(sdispenhanst[5].string, sde_bcol, colname[bcol]);
  428.             setBorder(border);
  429.             break;
  430. #endif /* PC98 */
  431. #ifdef IBMPC
  432.         case 3:
  433.             if (softFont)
  434.                 break;
  435.             if (++ccol >= MAX_BACK_COLOR) ccol = 0;
  436.             goto clearAll;
  437.         case 4:    
  438.             if (softFont)
  439.                 break;
  440.             if (++ecol >= MAX_BACK_COLOR) ecol = 0;
  441. clearAll:    attrSave = eraseAttr = attrib = (ccol | (ecol<<4));
  442.             sprintf(sdispenhanst[3].string, sde_ccol, colname[ccol]);
  443.             sprintf(sdispenhanst[4].string, sde_ecol, colname[ecol]);
  444.             initPage();
  445.             clearSavedPage(page0Save);
  446.             curXSave = curYSave = 0;
  447.             putmenu(N_MENU, sdispenhanst);
  448.             break;
  449.         case 5:
  450.             break;
  451. #endif /* IBMPC */
  452. #ifdef J3100
  453.         case 3: case 4: case 5: break;
  454. #endif /* J3100 */
  455.         case 6:
  456.             sdispenhanst[6].string = sde_blinkCursor[blinkCursor = !blinkCursor]; 
  457.             break;
  458.         case 7:
  459.             sdispenhanst[7].string = sde_blockCursor[blockCursor = !blockCursor]; 
  460.             break;
  461.         case 8: if (++visibleBell > MAX_BELL_MODE) visibleBell = 0;
  462.             sdispenhanst[8].string = sde_vbell[visibleBell]; break;
  463.         case END_SETUP: return(END_SETUP);
  464.         }
  465.     }
  466. } 
  467.  
  468. /*
  469. ** generalDirectory
  470.  *
  471.  * general set-up directory
  472.  */
  473. struct _menu sgeneral[] = {
  474. /* 0 */{0,  0, " General Set-Up"},
  475. /* 1 */{0,  2, toNext, "G1"}, 
  476. /* 2 */{17, 2, toDir, "to dir"},
  477. /* 3 */{32, 2, " VT200 Mode, 7 Bit Controls ", "G3"}, 
  478. /* 4 */{61, 2, " VT220 ID ", "G4"},
  479. /* 5 */{0,  4, NULL, "G5"},    /*keypad*/
  480. /* 6 */{17, 4, NULL, "G6"},    /*cursor*/
  481. /* 7 */{38, 4, NULL, "G7"}, /*newline*/
  482. /* 8 */{52, 4, NULL, "G8"},    /*JIS*/
  483. /* 9 */{0,  6, NULL, "G9"},    /*fep*/
  484. /* 10*/{22, 6, NULL, "G10"},/*speed*/
  485. /* 11*/{37, 6, NULL, "G11"}};/*bskey*/
  486. #undef N_MENU
  487. #define N_MENU 11
  488.  
  489. char *sg_padkey[] = {" Numeric Keypad ", " Appl. Keypad   "};
  490. char *sg_curkey[] = {" Normal Cursor Keys ", " Appl. Cursor Keys  "};
  491. char *sg_newline[] = {" No New Line ", " New Line    "}; 
  492. char *sg_code[] = {" Shift JIS ", " Old JIS   ", " New JIS   ", 
  493.                    " EUC       ", " NEC KANJI "};
  494. #ifdef J3100
  495. char *sg_fep[] = {" KANJI-KEY FEP       "};
  496. #else /* !J3100 */
  497. char *sg_fep[] = {" No FEP              ", " CTRL-XFER FEP       ", 
  498.         " SHIFT-XFER FEP      ", " CTRL/SHIFT-XFER FEP "};
  499. #endif /* J3100 */
  500. char *sg_mSpeed[] = {" Mouse Fast   ", " Mouse Middle ", " Mouse Slow   "};
  501.  
  502. static generalDirectory()
  503. {
  504.     register int menu;
  505.     int tmp;
  506.     char buf[10];
  507.     char buf2[40];
  508.     extern int newline;
  509.  
  510.     sgeneral[5].string = sg_padkey[applKeypad];
  511.     sgeneral[6].string = sg_curkey[applCursor];
  512.     sgeneral[7].string = sg_newline[newline];
  513. #ifdef KANJI
  514.     sgeneral[8].string = sg_code[kanjiSave];
  515.     sgeneral[9].string = sg_fep[fepInvoke];
  516. #else
  517.     sgeneral[8].string = " No KANJI  ";
  518.     sgeneral[9].string = " No KANJI            ";
  519. #endif /* KANJI */
  520.     sgeneral[10].string = sg_mSpeed[mouseSpeed];
  521.     if (bsKeyRatio) {
  522.         sprintf(buf2, msg_bsNum /*" BS Key Watcher %2u%% "*/, bsKeyRatio);
  523.         sgeneral[11].string = buf2;
  524.     } else
  525.         sgeneral[11].string = msg_bsOff/*" BS Key Watcher OFF "*/;
  526.  
  527.     putmenu(N_MENU, sgeneral);
  528.     menu = 1;
  529.     for (;;) {
  530.         switch(menu = getmenu(N_MENU, sgeneral, menu)) {
  531.         case 1: return(genEnhanstDirectory());
  532.         case 2: return(M_DIRECTORY);
  533.         case 3: case 4: 
  534.             onlyThis(); break;
  535.         case 5: sgeneral[5].string = sg_padkey[applKeypad = !applKeypad]; break;
  536.         case 6: sgeneral[6].string = sg_curkey[applCursor = !applCursor]; break;
  537.         case 7: sgeneral[7].string = sg_newline[newline = !newline]; break;
  538. #ifdef KANJI
  539.         case 8: if (++kanjiSave > KMAX) kanjiSave = SJIS;
  540.             sgeneral[8].string = sg_code[kanjiSave]; break;
  541.         case 9: 
  542. #if MAX_FEP_XFER
  543.             if (++fepInvoke > MAX_FEP_XFER) 
  544.                 fepInvoke = 0;
  545.             sgeneral[9].string = sg_fep[fepInvoke];
  546.             if (fepInvoke == FEP_BOTHXFER)
  547.                 putStatus("Please take attention.");
  548.             else
  549.                 clearStatus();
  550. #else
  551.             onlyThis();
  552. #endif /* MAX_FEP_XFER */
  553.             break;
  554. #else
  555.         case 8: case 9: onlyThis(); break;
  556. #endif /* KANJI */
  557.         case 10: if (++mouseSpeed > MOUSE_SPEED_MAX)
  558.                 mouseSpeed = 0;
  559.             sgeneral[10].string = sg_mSpeed[mouseSpeed];
  560.             break;
  561.         case 11:
  562. #ifdef BS_WATCHER
  563.             sprintf(buf, "%d%%", bsKeyRatio);
  564.             if (emacs("BS key ratio (N% or off): ", buf, 10, E_NO_HELP) == ERR)
  565.                 break;
  566.             tmp = atoi(buf);
  567.             if (tmp < 0 || tmp > 99)
  568.                 break;
  569.             bsKeyRatio = tmp;
  570.             if (bsKeyRatio) {
  571.                 sprintf(buf2, msg_bsNum/*" BS Key Watcher %2u%% "*/, bsKeyRatio);
  572.                 sgeneral[11].string = buf2;
  573.             } else
  574.                 sgeneral[11].string = msg_bsOff /*" BS Key Watcher OFF "*/;
  575. #else
  576.             onlyThis();
  577. #endif /* BS_WATCHER */
  578.             break;
  579.         case END_SETUP: return(END_SETUP);
  580.         }
  581.     }
  582. } 
  583.  
  584. /*
  585. ** genEnhanstDirectory
  586.  *
  587.  * general enhansments set-up directory
  588.  */
  589. struct _menu sgenenhanst[] = {
  590. /* 0 */{0,  0, " General Enhancements Set-Up"},
  591. /* 1 */{0,  2, toNext, "g1"}, 
  592. /* 2 */{17, 2, toDir, "to dir"},
  593. /* 3 */{32, 2, NULL, "g3"},/*form*/
  594. /* 4 */{58, 2, NULL, "g4"},/*linemode*/
  595. /* 5 */{0,  4, NULL, "g5"},/*tab*/
  596. /* 6 */{12, 4, NULL, "g6"},/*saver*/
  597. /* 7 */{28, 4, NULL, "g7"},/*bsave*/
  598. /* 8 */{42, 4, NULL, "g8"},/*lock*/
  599. /* 9 */{0,  6, NULL, "g9"},/*dial*/
  600. /* 10*/{24, 6, " Dialing Sequence ", "g10"},/*seq*/
  601. /* 11*/{43, 6, " Default Command ", "g11"}};/*com*/
  602. #undef N_MENU
  603. #define N_MENU 11
  604.  
  605. char *sge_form[] = {" Form Feed: Line Feed    ", " Form Feed: Home & Clear "};
  606. char *sge_lineMode[] = {" 24 line mode ", " 25 line mode ", 
  607.             " 19 line mode ", " 20 line mode "};
  608. char *sge_tab[] = {" Skip Tab  ", " Space Tab "};
  609. char *sge_saver[] = {" CRT Saver Off ", " CRT Saver 3   ", " CRT Saver 10  "};
  610. char *sge_lock[] = {" No Shift/Ctrl Lock ", " Shift/Ctrl Lock    "};
  611. char *sge_dial[] = {" No Dialing at Startup ", " Dialing at Startup    "};
  612.  
  613. static genEnhanstDirectory()
  614. {
  615.     register int menu;
  616.     extern int formfeed;
  617.     extern char *saverName();    /* saver??.c    */
  618.  
  619.     sgenenhanst[3].string = sge_form[formfeed];
  620.     sgenenhanst[4].string = sge_lineMode[lineMode];
  621.     sgenenhanst[5].string = sge_tab[spaceTab];
  622.     sgenenhanst[6].string = sge_saver[saver];
  623.     sgenenhanst[7].string = saverName(saverType);
  624.     sgenenhanst[8].string = sge_lock[shiftLock];
  625.     sgenenhanst[9].string = sge_dial[dialStartup];
  626.  
  627.     putmenu(N_MENU, sgenenhanst);
  628.     menu = 1;
  629.     for (;;) {
  630.         switch(menu = getmenu(N_MENU, sgenenhanst, menu)) {
  631.         case 1: return(M_NEXT);
  632.         case 2: return(M_DIRECTORY);
  633.         case 3: sgenenhanst[3].string = sge_form[formfeed = !formfeed]; break;
  634.         case 4: if (++lineMode > MAX_LINE_MODE) lineMode = 0;
  635.             sgenenhanst[4].string = sge_lineMode[lineMode];
  636.             clearSavedPage(page0Save);
  637.             curXSave = curYSave = saveX = saveY = 0;
  638.             setLineMode(lineMode);
  639.             lowScrRgSave = bottomLine;
  640.             setLineMode(LINE_MODE_25);
  641.             break;
  642.         case 5: sgenenhanst[5].string = sge_tab[spaceTab = !spaceTab]; break;
  643.         case 6: if (++saver > MAX_CRT_SAVER) saver = 0;
  644.             setTimerValue();
  645.             sgenenhanst[6].string = sge_saver[saver];
  646.             break;
  647.         case 7: if (maxSaverType == 0) {
  648.                 onlyThis();
  649.             } else {
  650.                 if (++saverType > maxSaverType) saverType = 0;
  651.                 sgenenhanst[7].string = saverName(saverType);
  652.             }
  653.             break;
  654. #ifdef PC98
  655.         case 8: sgenenhanst[8].string = sge_lock[shiftLock = !shiftLock];
  656.             if (shiftLock)
  657.                 (void)helpSystem("shift lock");
  658.             else
  659.                 clearCopyright();
  660.             break;
  661. #else
  662.         case 8: notSupported(); break;
  663. #endif /* PC98 */
  664.         case 9: sgenenhanst[9].string = sge_dial[dialStartup = !dialStartup];
  665.             break;
  666.         case 10: strcpy(tmpBuf, phone);
  667.             if (emacs("Sequence: ", tmpBuf, MAX_PHONE, E_HELP) != ERR)
  668.                 strcpy(phone, tmpBuf);
  669.             break;
  670.         case 11: 
  671.             strcpy(tmpBuf, defaultCommandLine);
  672.             if (emacs("command: ", tmpBuf, MAX_FILE_NAME, E_HELP) != ERR)
  673.                 strcpy(defaultCommandLine, tmpBuf);
  674.             break;
  675.         case END_SETUP: return(END_SETUP);
  676.         }
  677.     }
  678. } 
  679.  
  680. /*
  681. ** commDirectory()
  682.  *
  683.  * communication set-up directory
  684.  */
  685. struct _menu scom[] = {
  686. /* 0 */{0,  0, " Communication Set-Up"},
  687. /* 1 */{0,  2, toNext, "C1"}, 
  688. /* 2 */{17, 2, toDir, "to dir"},
  689. /* 3 */{32, 2, " Baud Rate = 38400   ", "C3"}, 
  690. /* 4 */{52, 2, NULL, "C4"},/*parity*/
  691. /* 5 */{0,  4, NULL, "C5"},/*stop*/
  692. /* 6 */{13, 4, NULL, "C6"},/*echo*/
  693. /* 7 */{29, 4, NULL, "C7"},/*xon*/
  694. /* 8 */{44, 4, NULL, "C8"},/*port*/
  695. /* 9 */{52, 4, NULL, "C9"}};/*drop*/
  696. #undef N_MENU
  697. #define N_MENU 9
  698.  
  699. char *sc_baud = " Baud Rate = %5u ";
  700. char *sc_par[] = {" 8 Bits, No Parity    ", " 8 Bits, Even Parity  ",
  701. " 7 Bits, No Parity    ", " 7 Bits, Even Parity  ", " 7 Bits, Space Parity "};
  702. char *sc_stop[] = {" 1 Stop Bit ", " 2 Stop Bit "};
  703. char *sc_echo[] = {" No Local Echo ", " Local Echo    "};
  704. char *sc_xon[] = {" No Flow Ctrl ", " XON/XOFF     ", " RTS/CTS      "};
  705. char *sc_port[] = {" COM1: ", " COM2: ", " COM3: ", " COM4: ", " Ether "};
  706. char *sc_drop[] = {" Keep Line at Exit ", " Drop Line at Exit "};
  707.  
  708. static commDirectory()
  709. {
  710.     register int menu;
  711.  
  712.     sprintf(scom[3].string, sc_baud, numBaud(baud));
  713.     scom[4].string = sc_par[paritybit];
  714.     scom[5].string = sc_stop[stopbit];
  715.     scom[6].string = sc_echo[echoMode];
  716.     scom[7].string = sc_xon[xonXoff];
  717.     scom[8].string = sc_port[portNo];
  718.     scom[9].string = sc_drop[dropER];
  719.  
  720.     putmenu(N_MENU, scom);
  721.     menu = 1;
  722.     for (;;) {
  723.         switch(menu = getmenu(N_MENU, scom, menu)) {
  724.         case 1: return(M_NEXT);
  725.         case 2: return(M_DIRECTORY);
  726.         case 3: if (++baud > BAUD_NUM_MAX) baud = 1;
  727.             if (numBaud(baud) == 0)
  728.                 baud = 1;
  729.             sprintf(scom[3].string, sc_baud, numBaud(baud));
  730.             initPortDevice(baud, parity);
  731.             baudrate = numBaud(baud);
  732.             break;
  733.         case 4: if (++paritybit > MAX_PARITY) paritybit = 0;
  734.             scom[4].string = sc_par[paritybit];
  735.             parity = parcalc(paritybit, stopbit);
  736.             initPortDevice(baud, parity); 
  737.             break;
  738.         case 5: stopbit = !stopbit;
  739.             scom[5].string = sc_stop[stopbit];
  740.             parity = parcalc(paritybit, stopbit); 
  741.             initPortDevice(baud, parity); 
  742.             break;
  743.         case 6: scom[6].string = sc_echo[echoMode = !echoMode]; break;
  744.         case 7: if (++xonXoff > FLOWCTRL_MAX) xonXoff = 0;
  745.             scom[7].string = sc_xon[xonXoff]; 
  746.             break;
  747.         case 8: if (++portNo > MAX_PORT) portNo = 0;
  748.             scom[8].string = sc_port[portNo];
  749.             setPort(portNo);
  750.             break;
  751.         case 9: scom[9].string = sc_drop[dropER = !dropER]; break;
  752.         case END_SETUP: return(END_SETUP);
  753.         }
  754.     }
  755. } 
  756.  
  757. /*
  758. ** printerDirectory
  759.  *
  760.  * printer set-up directory
  761.  */
  762. struct _menu sprinter[] = {
  763. /* 0 */{0,  0, " Printer Set-Up"},
  764. /* 1 */{0,  2, toNext, "P1"},
  765. /* 2 */{17, 2, toDir, "to dir"},
  766. /* 3 */{32, 2, NULL, "P3"}, /*auto*/
  767. /* 4 */{45, 2, " Send Formfeed ", "P4"},/*form*/
  768. /* 5 */{61, 2, " Spacing=8 ", "P5"}};/*spacing*/
  769. #undef N_MENU
  770. #define N_MENU 5
  771.  
  772. char *sp_print[] = {" No Print   ", " Auto Print "};
  773. char *sp_space = " Spacing=%d ";
  774.  
  775. static printerDirectory()
  776. {
  777.     register int menu;
  778.  
  779.     sprinter[3].string = sp_print[printMSave];
  780.     sprintf(sprinter[5].string, sp_space, spacing);
  781.     putmenu(N_MENU, sprinter);
  782.     menu = 1;
  783.     for (;;) {
  784.         switch(menu = getmenu(N_MENU, sprinter, menu)) {
  785.         case 1: return(M_NEXT);
  786.         case 2: return(M_DIRECTORY);
  787.         case 3: printMSave = !printMSave;
  788.             if (printMSave == YES) 
  789.                 if (checkPrinterReady() == ERR) {
  790.                     printMSave = NO;
  791.                     putStatus(msg_prnNotRdy /*"Printer not ready"*/); bell();
  792.                 } else
  793.                     printOn();
  794.             sprinter[3].string = sp_print[printMSave];
  795.             break;
  796.         case 4: if (checkPrinterReady() == ERR) {
  797.                 putStatus(msg_prnNotRdy /*"Printer not ready"*/); bell();
  798.             } else
  799.                 outPrinter(0x0c); 
  800.             break;
  801.         case 5: /* PC98 only */
  802.             if (++spacing > 8) spacing = 0;
  803.             sprintf(sprinter[5].string, sp_space, spacing);
  804.             break;
  805.         case END_SETUP: return(END_SETUP);
  806.         }
  807.     }
  808. } 
  809.  
  810. /*
  811. ** keybdDirectory()
  812.  *
  813.  * keyboard set-up directory
  814.  */
  815. struct _menu skey[] = {
  816. /* 0 */{0,  0, " Keyboard Set-Up "},
  817. /* 1 */{0,  2, toNext, "K1"}, 
  818. /* 2 */{17, 2, toDir, "to dir"},
  819. /* 3 */{32, 2, NULL, "K3"},/*click*/
  820. /* 4 */{46, 2, NULL, "K4"},/*ansi*/
  821. /* 5 */{64, 2, NULL, "K5"},/*bs*/
  822. /* 6 */{0,  4, " Remap Keys ", "K6"}, 
  823. /* 7 */{13, 4, " Function Keys ", "K7"},
  824. /* 8 */{29, 4, " SHIFT-Function Keys ", "K8"},
  825. /* 9 */{51, 4, " CTRL-Function keys ", "K9"},
  826. /* 10*/{0,  6, " META-Function keys ", "K10"},
  827. /* 11*/{21, 6, " Normal Cursor Keys ", "K11"},
  828. /* 12*/{42, 6, " Appl. Cursor Keys ", "K12"},
  829. /* 13*/{62, 6, " Appl. Keypad ", "K13"}};
  830. #undef N_MENU
  831. #define N_MENU 13
  832.  
  833. char *sk_click[] = {" No Keyclick ", " Keyclick    "};
  834. char *sk_asckey[] = {" PC9801 Keyboard ", " ANSI Keyboard   "};
  835. char *sk_bsDel[] = {" BS key BS  ", " BS key DEL "};
  836.  
  837. static keybdDirectory()
  838. {
  839.     register int menu;
  840.  
  841.     skey[3].string = sk_click[clickFlag];
  842.     skey[4].string = sk_asckey[asckey];
  843.     skey[5].string = sk_bsDel[bsDel];
  844.  
  845.     putmenu(N_MENU, skey);
  846.     menu = 1;
  847.     for (;;) {
  848.         switch(menu = getmenu(N_MENU, skey, menu)) {
  849.         case 1: return(M_NEXT);
  850.         case 2: return(M_DIRECTORY);
  851.         case 3: skey[3].string = sk_click[clickFlag = !clickFlag]; break;
  852. #ifdef PC98
  853. #ifdef PC98XA
  854.         case 4: onlyThis(); break;
  855. #else
  856.         case 4: /* PC98 only */
  857.             skey[4].string = sk_asckey[asckey = !asckey];
  858.             keyMode(); break;
  859. #endif /* PC98XA */
  860. #else
  861.         case 4: onlyThis(); break;
  862. #endif /* PC98 */
  863.         case 5: skey[5].string = sk_bsDel[bsDel = !bsDel];
  864.             setBSDel(bsDel); break;
  865.         case 6: switch(keyRemapDirectory()) {
  866.             case M_DIRECTORY: return(M_DIRECTORY);
  867.             case M_NEXT: putmenu(N_MENU, skey); menu = 6; break;
  868.             default: return(END_SETUP);
  869.             }
  870.             break;
  871.         case 7: editPFKey(); break;
  872.         case 8: editSPFKey(); break;
  873.         case 9: (void)helpSystem(skey[9].key); break;
  874.         case 10: (void)helpSystem(skey[10].key); break;
  875.         case 11: editCursorKey(); break;
  876.         case 12: editAppCursorKey(); break;
  877.         case 13: editAppKeyPad(); break;
  878.         case END_SETUP: return(END_SETUP);
  879.         }
  880.     }
  881. } 
  882.  
  883. /*
  884. ** keyRemapDirectory()
  885.  *
  886.  * keyboard remap set-up directory
  887.  */
  888. struct _menu sremap[] = {
  889. /* 0 */{0,  0, " Keyboard Map Set-Up ", NULL},
  890. /* 1 */{0,  2, " To Directory ", "to dir"},
  891. /* 2 */{15, 2, " To Keyboard Set-Up ", "k2"},
  892. /* 3 */{36, 2, " Normal-Keys ", "k3"},
  893. /* 4 */{50, 2, " Shift-Keys ", "k4"},
  894. /* 5 */{63, 2, " CTRL-Keys ", "k5"},
  895. /* 6 */{0,  4, " Kana Keys ", "k6"},
  896. /* 7 */{12, 4, " Shift-Kana Keys ", "k7"},
  897. /* 8 */{30, 4, " hterm CTRL-Key Binding ", "k8"},
  898. /* 9 */{55, 4, " Swap keys ", "k9"}};
  899. #undef N_MENU
  900. #define N_MENU 9
  901.  
  902. static keyRemapDirectory()
  903. {
  904.     register int menu;
  905.  
  906.     putmenu(N_MENU, sremap);
  907.     menu = 1;
  908.     for (;;) {
  909.         switch(menu = getmenu(N_MENU, sremap, menu)) {
  910.         case 1: return(M_DIRECTORY);
  911.         case 2: return(M_NEXT);
  912.         case 8: editBinding(); break;
  913. #ifdef PC98
  914.         case 3: editNormalKeys(); break;
  915.         case 4: editShiftKeys(); break;
  916.         case 5: editCtrlKeys(); break;
  917.         case 6: editKanaKeys(); break;
  918.         case 7: editShKanaKeys(); break;
  919.         case 9: editKeySwapTable(); break;
  920. #else
  921.         case 3: case 4: case 5: case 6: case 7:    case 9: 
  922.             sorry();
  923.             break;
  924. #endif
  925.         case END_SETUP: return(END_SETUP);
  926.         }
  927.     }
  928. }
  929.  
  930. /*
  931. ** tabDirectory()
  932.  *
  933.  * tab set-up directory
  934.  */
  935. struct _menu stab[] = {
  936. /* 0 */{0,  0, " Tab Set-Up"},
  937. /* 1 */{0,  2, toNext, "T1"}, 
  938. /* 2 */{17, 2, toDir, "to dir"}, 
  939. /* 3 */{32, 2, " Clear All Tabs ", "T3"}, 
  940. /* 4 */{49, 2, NULL, "T4"},
  941. /* 5 */{0,  4, " Edit Tabs ", "T5"}};
  942. #undef N_MENU
  943. #define N_MENU 5
  944.  
  945. char *tab_ntab[] = {" Set 4 Column Tabs ", " Set 8 Column Tabs "};
  946.  
  947. static tabDirectory()
  948. {
  949.     register int menu;
  950.     static int tabn = 0;
  951.  
  952.     stab[4].string = tab_ntab[tabn];
  953.  
  954.     putmenu(N_MENU, stab);
  955.     menu = 1;
  956.     for (;;) {
  957.         dispTabs();
  958.         switch(menu = getmenu(N_MENU, stab, menu)) {
  959.         case 1: return(M_NEXT);
  960.         case 2: return(M_DIRECTORY);
  961.         case 3:    clearAllTabs(); dispTabs(); break;
  962.         case 4: stab[4].string = tab_ntab[tabn = !tabn];
  963.             setTabs(tabn ? 8 : 4); dispTabs(); break;
  964.         case 5: editTabs(); break;
  965.         case END_SETUP: return(END_SETUP);
  966.         }
  967.     }
  968. } 
  969.  
  970. /*
  971. ** fileXferDirectory()
  972.  *
  973.  * file transfer set-up directory
  974.  */
  975. struct _menu fxfer[] = {
  976. /* 0 */{0,  0, " File Transfer Set-Up"},
  977. /* 1 */{0,  2, toNext, "X1"}, 
  978. /* 2 */{17, 2, toDir, "to dir"},
  979. /* 3 */{32, 2, " Options ", "X3"},
  980. /* 4 */{42, 2, NULL, "X4"}, /* log*/
  981. /* 5 */{61, 2, NULL, "X5"}, /* up*/
  982. /* 6 */{0,  4, " XMODEM Receive ", "X6"}, 
  983. /* 7 */{17, 4, " XMODEM Send ", "X7"},
  984. /* 8 */{31, 4, " Change Directory ", "X8"},
  985. /* 9 */{0,  6, " KERMIT Receive ", "X9"}, 
  986. /* 10*/{17, 6, " KERMIT Send ", "X10"},
  987. /* 11*/{31, 6, " KERMIT Get ", "X11"}, 
  988. /* 12*/{44, 6, " KERMIT Finish ", "X12"}};
  989. #undef N_MENU
  990. #define N_MENU 12
  991.  
  992. char *fx_up[] = {" File Up Load Off ", " File Up Load On  "};
  993. char *fx_log[] = {" Logging Off ", " Logging On  "};
  994.  
  995. static fileXferDirectory()
  996. {
  997.     register int menu;
  998.  
  999.     fxfer[4].string = fx_up[upLoadSave ? 1 : 0];
  1000.     fxfer[5].string = fx_log[loggingSave ? 1 : 0];
  1001.  
  1002.     putmenu(N_MENU, fxfer);
  1003.     menu = 1;
  1004.     for (;;) {
  1005.         switch(menu = getmenu(N_MENU, fxfer, menu)) {
  1006.         case 1: return(M_NEXT);
  1007.         case 2: return(M_DIRECTORY);
  1008.         case 3: switch (xferOptionsDirectory()) {
  1009.             case M_DIRECTORY: return(M_DIRECTORY);
  1010.             case M_NEXT: putmenu(N_MENU, fxfer); menu = 3; break;
  1011.             default: return(END_SETUP);
  1012.             }
  1013.             break;
  1014.         case 4: fxfer[4].string = fx_up[setUpLoad()];
  1015.             break;
  1016.         case 5:    fxfer[5].string = fx_log[setLogging()];
  1017.             break;
  1018. #ifdef XMODEM
  1019.         case 6: xrec(); break;
  1020.         case 7: xsend(); break;
  1021. #else
  1022.         case 6: case 7:
  1023.             putStatus("XMODEM is not configured. Recompile hterm.");
  1024.             break;
  1025. #endif /* XMODEM */
  1026.         case 8: changeDirectory();        /* in file.c    */
  1027.             break;                    
  1028. #ifdef KERMIT
  1029.         case 9: krec(); break;
  1030.         case 10: ksend(); break;
  1031.         case 11: kget(); break;
  1032.         case 12: kfinish(); break;
  1033. #else
  1034.         case 9: case 10: case 11: case 12:
  1035.             putStatus("Kermit is not configured. Recompile hterm.");
  1036.             break;
  1037. #endif /* KERMIT */
  1038.         case END_SETUP: return(END_SETUP);
  1039.         }
  1040.     }
  1041. } 
  1042.  
  1043. /*
  1044. ** xferOptionsDirectory()
  1045.  *
  1046.  * file transfer options set-up direcotory
  1047.  */
  1048. struct _menu xsetup[] = {
  1049. /* 0 */{0,  0, " File Xfer Options Set-Up", NULL},
  1050. /* 1 */{0,  2, " To Directory ", "to dir"},
  1051. /* 2 */{15, 2, " To File Xfer ", "x2"},
  1052. /* 3 */{30, 2, NULL, "x3"},/*logtype*/
  1053. /* 4 */{47, 2, NULL, "x4"},/*uptype*/
  1054. /* 5 */{0,  4, NULL, "x5"},/*ftype*/
  1055. /* 6 */{16, 4, NULL, "x6"},/*longp*/
  1056. /* 7 */{31, 4, " Up Load Delay=100 ", "x7"}};/*delay*/
  1057. #undef N_MENU
  1058. #define N_MENU 7
  1059.  
  1060. char *xs_log[] = {" Logging Text   ", " Logging Binary "};
  1061. char *xs_up[] = {" Up Load Text   ", " Up Load Binary "};
  1062. char *xs_xtype[] = {" XMODEM Binary ", " XMODEM Text   "};
  1063. char *xs_longp[] = {" Short Packet ", " Long Packet  "};
  1064. char *xs_delay = " Up Load Delay=%3d ";
  1065.  
  1066. static xferOptionsDirectory()
  1067. {
  1068.     register int menu;
  1069.  
  1070.     xsetup[3].string = xs_log[loggingType-1];
  1071.     xsetup[4].string = xs_up[upLoadType-1];
  1072.     xsetup[5].string = xs_xtype[xmodemType];
  1073.     xsetup[6].string = xs_longp[xmodemLongP];
  1074.     sprintf(xsetup[7].string, xs_delay, upLoadDelay);
  1075.  
  1076.     putmenu(N_MENU, xsetup);
  1077.     menu = 1;
  1078.     for (;;) {
  1079.         switch(menu = getmenu(N_MENU, xsetup, menu)) {
  1080.         case 1: return (M_DIRECTORY);
  1081.         case 2: return (M_NEXT);
  1082.         case 3: loggingType = loggingType == LOG_CONVERT ? LOG_NO_CONVERT : LOG_CONVERT;
  1083.             xsetup[3].string = xs_log[loggingType-1];
  1084.             break;
  1085.         case 4: upLoadType = upLoadType == UP_CONVERT ? UP_NO_CONVERT : UP_CONVERT;
  1086.             xsetup[4].string = xs_up[upLoadType-1];
  1087.             break;
  1088.         case 5: xsetup[5].string = xs_xtype[xmodemType = !xmodemType];
  1089.             break;
  1090.         case 6:    xsetup[6].string = xs_longp[xmodemLongP  = !xmodemLongP];
  1091.             break;
  1092.         case 7: upLoadDelay += 10;
  1093.             if (upLoadDelay >= 80) upLoadDelay = 10;
  1094.             sprintf(xsetup[7].string, xs_delay, upLoadDelay);
  1095.             break;
  1096.         case END_SETUP:
  1097.             return(END_SETUP);
  1098.         }
  1099.     }
  1100. }
  1101.  
  1102. /*
  1103.  *
  1104.  * setup utilities and goodies
  1105.  *
  1106.  */
  1107.  
  1108. /*
  1109. ** static void putmenu(register int num, register struct _menu *p)
  1110.  *
  1111.  * display set-up direcotry menu
  1112.  */
  1113. static void putmenu(num, p)
  1114. register int num;
  1115. register struct _menu *p;
  1116. {
  1117.     if (first)
  1118.         showHelp = YES;
  1119.     else if (showHelp)
  1120.         clearCopyright();
  1121.     normalMode();
  1122.     clearLine(SETUP_LINE, BOTTOM_LINE_25_MODE);
  1123.     locate(p->x, (p->y)+SETUP_LINE);
  1124.     conPrint(p->string);
  1125.     p++; num--;
  1126.     reverseMode();
  1127.     while (num-- >= 0) {
  1128.         locate(p->x, (p->y)+SETUP_LINE);
  1129.         conPrint(p->string);
  1130.         p++;
  1131.     }
  1132.     normalMode();
  1133. }
  1134.  
  1135. /*
  1136. ** static getmenu(int num, register struct _menu p[], register int menu)
  1137.  *
  1138.  * return a selected item from menu
  1139.  */
  1140. static int getmenu(num, p, menu)
  1141. int num;
  1142. register struct _menu p[];
  1143. register int menu;
  1144. {
  1145.     int oldmenu;
  1146.     char i, j, k;
  1147.     u_short key;
  1148.  
  1149.     oldmenu = menu;
  1150. #ifdef J3100
  1151.     normalMode();
  1152.     locate(p[menu].x, p[menu].y+SETUP_LINE);
  1153. #else
  1154.     if (softFont)
  1155.         normalMode();
  1156.     else
  1157.         conPrint("\x1b[0;7;5;1m");
  1158.     locate(p[menu].x, p[menu].y+SETUP_LINE);
  1159. #endif /* J3100 */
  1160.     conPrint(p[menu].string);
  1161.     normalMode();
  1162.     for (;;) {
  1163.         oldmenu = menu;
  1164.         while ((int)(key = keyin()) == (-1)) {
  1165.             ;
  1166. #ifdef TIMER_TEST /* timer test facility for debug */
  1167. sprintf(tmpBuf, "%d  ", timerValue);
  1168. locate(0,24);
  1169. conPrint(tmpBuf);
  1170. #endif /* TIMER_TEST */
  1171.         }
  1172.         if ((key & 0xff) == 0x0d)
  1173.             return(menu);
  1174.         if (showHelp) {
  1175.             clearCopyright();
  1176.             showHelp = NO;
  1177.         }
  1178.         clearStatus();
  1179.         if (key == HOME_KEY || key == bindTab[C_TOL]) {
  1180.             menu = 1;
  1181.         } else if (key == END_KEY || key == bindTab[C_EOL]) {
  1182.             menu = num;
  1183.         } else if (key == LEFT_KEY || key == bindTab[C_BDEL] ||
  1184.             key == 'h' || key == DEL || key == bindTab[C_LEFT]) {
  1185.                 if (--menu <= 0) menu = num; 
  1186.         } else if (key == UP_KEY || key == 'k' || key == bindTab[C_UP]) {
  1187.             if (p[menu].y != 2) {
  1188.                 for (i = 0; i <= menu; i++)
  1189.                     if (p[menu].y - 2 == p[i].y)
  1190.                         break;    /* i = upper line first item */
  1191.                 for (j = i; j <= menu; j++)
  1192.                     if (p[menu].y == p[j].y)
  1193.                         break;    /* j = same line first item */
  1194.                 menu = (menu - j > j - 1) ? (j - 1) : (i + menu - j);
  1195.             }
  1196.         } else if (key == DOWN_KEY || key == 'j' || key == bindTab[C_DOWN]) {
  1197.             for (i = 0; i <= menu; i++)
  1198.                 if (p[menu].y == p[i].y)
  1199.                     break;    /* i = same line first item */
  1200.             for (j = i; j < num + 1; j++)
  1201.                 if (p[menu].y + 2 == p[j].y)
  1202.                     break;    /* j = lower line first item */
  1203.             if (j == num + 1)
  1204.                 ;    /* menu is lowest line */
  1205.             else {
  1206.                 for (k = j; k < (num + 1) && (p[menu].y+2) == p[k].y; k++)
  1207.                     ;
  1208.                 --k;            /* k = lower line last item */
  1209.                 menu = (menu - i + j >= k) ? k : (j + menu - i);
  1210.             }
  1211.         } else if (key == RIGHT_KEY || key == SPACE || key == 9 ||
  1212.             key == 'l' || key == bindTab[C_RIGHT]) {
  1213.             if (++menu > num) menu = 1;
  1214.         } else if (key == SETUP_KEY || key == META_PF9) {    /* exit set-up    */
  1215.             return(END_SETUP);
  1216.         } else if (key == STOP_KEY || key == META_PF10) {    /* exit hterm    */
  1217.             termination(); 
  1218.         } else if (key == ESC || key == bindTab[C_ESC]) {    /* escape    */
  1219.             if (p != smainmenu)
  1220.                 return(2);    /* to M_DIRECTORY */
  1221.             else
  1222.                 return(END_SETUP);    /* exit set-up    */
  1223.         } else if (key == '?' || key == HELP_KEY) {            /* help        */
  1224.             (void)helpSystem(p[menu].key);
  1225.         } else {
  1226.             bell();
  1227.         }
  1228.         reverseMode();
  1229.         locate(p[oldmenu].x, p[oldmenu].y+SETUP_LINE);
  1230.         conPrint(p[oldmenu].string);
  1231. #ifdef J3100
  1232.         normalMode();
  1233.         locate(p[menu].x, p[menu].y+SETUP_LINE);
  1234. #else
  1235.         if (softFont)
  1236.             normalMode();
  1237.         else
  1238.             conPrint("\x1b[0;7;5;1m");
  1239.         locate(p[menu].x, p[menu].y+SETUP_LINE);
  1240. #endif /* J3100 */
  1241.         conPrint(p[menu].string);
  1242.         normalMode();
  1243.     }
  1244. }
  1245. #else
  1246. char *sge_lineMode[] = {" 24 line mode ", " 25 line mode ", 
  1247.             " 19 line mode ", " 20 line mode "};
  1248. char *sc_baud = " Baud Rate = %5u ";
  1249. char *sc_par[] = {" 8 Bits, No Parity    ", " 8 Bits, Even Parity  ",
  1250. " 7 Bits, No Parity    ", " 7 Bits, Even Parity  ", " 7 Bits, Space Parity "};
  1251. #endif /* SETUP */
  1252.