home *** CD-ROM | disk | FTP | other *** search
/ Amiga Times / AmigaTimes.iso / internet / Term / Extras / Source / term-source.lha / TerminalPanel.c < prev    next >
Encoding:
C/C++ Source or Header  |  1996-10-20  |  16.6 KB  |  668 lines
  1. /*
  2. **    TerminalPanel.c
  3. **
  4. **    Editing panel for terminal configuration
  5. **
  6. **    Copyright © 1990-1996 by Olaf `Olsen' Barthel
  7. **        All Rights Reserved
  8. **
  9. **    :ts=4
  10. */
  11.  
  12. #ifndef _GLOBAL_H
  13. #include "Global.h"
  14. #endif
  15.  
  16. enum    {    GAD_EMULATIONTYPE=1000, GAD_EMULATIONLIBRARY, GAD_COLUMNS, GAD_LINES,
  17.             GAD_KEYMAP, GAD_TEXTFONT, GAD_FONTMODE, GAD_EMULATIONTASK, GAD_IBMFONT,
  18.             GAD_USE, GAD_CANCEL, GAD_PAGER, GAD_PAGEGROUP, GAD_BBS_ANSI_COMPLIANT,
  19.             GAD_AUTO_SIZE
  20.         };
  21.  
  22. STATIC LONG LocalMaxColumns,LocalMaxLines;
  23.  
  24. STATIC STRPTR SAVE_DS STACKARGS
  25. ShowColumn(struct Gadget *UnusedGadget,LONG Level)
  26. {
  27.     STATIC UBYTE Buffer[10];
  28.  
  29.     if(Level == LocalMaxColumns + 1)
  30.         strcpy(Buffer,LocaleString(MSG_TERMINALPANEL_MAXIMUM_TXT));
  31.     else
  32.         LimitedSPrintf(sizeof(Buffer),Buffer,LocaleBase ? "%9lD" : "%9ld",Level);
  33.  
  34.     return(Buffer);
  35. }
  36.  
  37. STATIC STRPTR SAVE_DS STACKARGS
  38. ShowLine(struct Gadget *UnusedGadget,LONG Level)
  39. {
  40.     STATIC UBYTE Buffer[10];
  41.  
  42.     if(Level == LocalMaxLines + 1)
  43.         strcpy(Buffer,LocaleString(MSG_TERMINALPANEL_MAXIMUM_TXT));
  44.     else
  45.         LimitedSPrintf(sizeof(Buffer),Buffer,LocaleBase ? "%9lD" : "%9ld",Level);
  46.  
  47.     return(Buffer);
  48. }
  49.  
  50.     /* SelectKeymap(UBYTE *Name,struct Window *ParentWindow):
  51.      *
  52.      *    Select a new keymap file using the asl.library file requester.
  53.      */
  54.  
  55. STATIC BOOL
  56. SelectKeymap(STRPTR Name,LONG NameSize,struct Window *ParentWindow)
  57. {
  58.     UBYTE LocalBuffer[MAX_FILENAME_LENGTH];
  59.     struct FileRequester *FileRequester;
  60.     BOOL NewMap;
  61.  
  62.     NewMap = FALSE;
  63.  
  64.     if(FilePart(Name) == Name)
  65.     {
  66.         STRPTR DrawerName;
  67.         BPTR FileLock;
  68.         APTR OldPtr;
  69.  
  70.         DisableDOSRequesters(&OldPtr);
  71.  
  72.         if(FileLock = Lock(DrawerName = "KEYMAPS:",ACCESS_READ))
  73.             UnLock(FileLock);
  74.         else
  75.             DrawerName = "DEVS:Keymaps";
  76.  
  77.         EnableDOSRequesters(OldPtr);
  78.  
  79.         strcpy(LocalBuffer,DrawerName);
  80.         AddPart(LocalBuffer,Name,sizeof(LocalBuffer));
  81.     }
  82.     else
  83.         LimitedStrcpy(sizeof(LocalBuffer),LocalBuffer,Name);
  84.  
  85.     if(FileRequester = OpenSingleFile(ParentWindow,LocaleString(MSG_TERMINALPANEL_SELECT_KEYMAP_TXT),NULL,NULL,LocalBuffer,sizeof(LocalBuffer)))
  86.     {
  87.         FreeAslRequest(FileRequester);
  88.  
  89.         if(Stricmp(LocalBuffer,Name))
  90.         {
  91.             LimitedStrcpy(NameSize,Name,LocalBuffer);
  92.  
  93.             NewMap = TRUE;
  94.         }
  95.     }
  96.  
  97.     return(NewMap);
  98. }
  99.  
  100. BOOL
  101. TerminalPanel(struct Window *Parent,struct Configuration *LocalConfig)
  102. {
  103.     STATIC LONG PageTitleID[5] =
  104.     {
  105.         MSG_V36_1024,
  106.         MSG_V36_1020,
  107.         MSG_V36_1021,
  108.         MSG_V36_1025,
  109.         -1
  110.     };
  111.  
  112.     STATIC BYTE InitialPage = 0;
  113.  
  114.     LayoutHandle *Handle;
  115.     BOOL UseIt;
  116.  
  117.     UseIt = FALSE;
  118.  
  119.     SaveConfig(LocalConfig,PrivateConfig);
  120.  
  121.     if(Handle = LT_CreateHandleTags(Parent->WScreen,
  122.         LAHN_LocaleHook,    &LocaleHook,
  123.         LAHN_ExitFlush,    FALSE,
  124.     TAG_DONE))
  125.     {
  126.         UBYTE FontName[MAX_FILENAME_LENGTH],IBMName[MAX_FILENAME_LENGTH];
  127.         LONG LocalColumns,LocalLines;
  128.         struct Window *PanelWindow;
  129.  
  130.         BuildFontName(FontName,sizeof(FontName),PrivateConfig->TerminalConfig->TextFontName,PrivateConfig->TerminalConfig->TextFontHeight);
  131.         BuildFontName(IBMName,sizeof(IBMName),PrivateConfig->TerminalConfig->IBMFontName,PrivateConfig->TerminalConfig->IBMFontHeight);
  132.  
  133.         if(PrivateConfig != Config)
  134.         {
  135.             LocalMaxColumns    = 132;
  136.             LocalMaxLines    = 64;
  137.         }
  138.         else
  139.         {
  140.             LONG Width,Height;
  141.  
  142.             if(Screen)
  143.             {
  144.                 struct Rectangle DisplayClip;
  145.  
  146.                 Width    = PrivateConfig->ScreenConfig->DisplayWidth;
  147.                 Height    = PrivateConfig->ScreenConfig->DisplayHeight;
  148.  
  149.                 QueryOverscan(PrivateConfig->ScreenConfig->DisplayMode,&DisplayClip,PrivateConfig->ScreenConfig->OverscanType);
  150.  
  151.                 if(!Width)
  152.                     Width = DisplayClip . MaxX - DisplayClip . MinX + 1;
  153.  
  154.                 if(!Height)
  155.                     Height = DisplayClip . MaxY - DisplayClip . MinY + 1;
  156.             }
  157.             else
  158.             {
  159.                 Width    = Window->WScreen->Width - Window->WScreen->WBorLeft - Window->WScreen->WBorRight;
  160.                 Height    = Window->WScreen->Height - Window->WScreen->WBorTop - Window->WScreen->WBorBottom - Window->WScreen->Font->ta_YSize - 1;
  161.  
  162.                 if(!StatusWindow)
  163.                     Height -= StatusDisplayHeight;
  164.  
  165.                 if(ChatMode)
  166.                     Height -= UserFontHeight + 2;
  167.             }
  168.  
  169.             if(WindowWidth > Width)
  170.                 Width = WindowWidth;
  171.  
  172.             if(WindowHeight > Height)
  173.                 Height = WindowHeight;
  174.  
  175.             LocalMaxColumns    = Width  / TextFontWidth;
  176.             LocalMaxLines    = Height / TextFontHeight;
  177.  
  178.             if(LocalMaxColumns < 20)
  179.                 LocalMaxColumns = 20;
  180.  
  181.             if(LocalMaxLines < 20)
  182.                 LocalMaxLines = 20;
  183.         }
  184.  
  185.         LT_New(Handle,
  186.             LA_Type,    VERTICAL_KIND,
  187.         TAG_DONE);
  188.         {
  189.             LT_New(Handle,
  190.                 LA_Type,VERTICAL_KIND,
  191.             TAG_DONE);
  192.             {
  193.                 LT_New(Handle,
  194.                     LA_Type,        TAB_KIND,
  195.                     LA_ID,            GAD_PAGER,
  196.                     LA_LabelID,        MSG_XFER_PAGE_TXT,
  197.                     LACY_LabelTable,PageTitleID,
  198.                     LACY_AutoPageID,GAD_PAGEGROUP,
  199.                     LACY_TabKey,    TRUE,
  200.                     LA_BYTE,        &InitialPage,
  201.                     LATB_FullWidth,    TRUE,
  202.                 TAG_DONE);
  203.  
  204.                 LT_EndGroup(Handle);
  205.             }
  206.  
  207.             LT_New(Handle,
  208.                 LA_Type,        VERTICAL_KIND,
  209.                 LA_ID,            GAD_PAGEGROUP,
  210.                 LAGR_ActivePage,InitialPage,
  211.             TAG_DONE);
  212.             {
  213.                 LT_New(Handle,
  214.                     LA_Type,    VERTICAL_KIND,
  215.                 TAG_DONE);
  216.                 {
  217.                     LT_New(Handle,
  218.                         LA_Type,    VERTICAL_KIND,
  219.                     TAG_DONE);
  220.                     {
  221.                         LT_New(Handle,
  222.                             LA_Type,        CHECKBOX_KIND,
  223.                             LA_LabelID,        MSG_BBS_ANSI_COMPLIANT_TXT,
  224.                             LA_ID,            GAD_BBS_ANSI_COMPLIANT,
  225.                             GTCB_Checked,    PrivateConfig->TerminalConfig->FontMode != FONT_STANDARD && PrivateConfig->TerminalConfig->NumColumns == 80 && PrivateConfig->TerminalConfig->NumLines == 25,
  226.                         TAG_DONE);
  227.  
  228.                         LT_New(Handle,
  229.                             LA_Type,XBAR_KIND,
  230.                         TAG_DONE);
  231.  
  232.                         LT_EndGroup(Handle);
  233.                     }
  234.  
  235.                     LT_New(Handle,
  236.                         LA_Type,    VERTICAL_KIND,
  237.                     TAG_DONE);
  238.                     {
  239.                         LT_New(Handle,
  240.                             LA_Type,        TEXT_KIND,
  241.                             LA_LabelID,        MSG_TERMINALPANEL_TEXT_FONT_GAD,
  242.                             LA_Chars,        20,
  243.                             LA_ID,            GAD_TEXTFONT,
  244.                             GTTX_Text,        FontName,
  245.                             GTTX_Border,    TRUE,
  246.                             LATX_Picker,    TRUE,
  247.                             LATX_LockSize,    TRUE,
  248.                             GA_Disabled,    PrivateConfig->TerminalConfig->EmulationMode == EMULATION_EXTERNAL,
  249.                         TAG_DONE);
  250.  
  251.                         LT_New(Handle,
  252.                             LA_Type,        TEXT_KIND,
  253.                             LA_LabelID,        MSG_TERMINALPANEL_IBM_FONT_GAD,
  254.                             LA_Chars,        20,
  255.                             LA_ID,            GAD_IBMFONT,
  256.                             GTTX_Text,        IBMName,
  257.                             GTTX_Border,    TRUE,
  258.                             LATX_Picker,    TRUE,
  259.                             LATX_LockSize,    TRUE,
  260.                             GA_Disabled,    PrivateConfig->TerminalConfig->EmulationMode == EMULATION_EXTERNAL,
  261.                         TAG_DONE);
  262.  
  263.                         LT_New(Handle,
  264.                             LA_Type,        CYCLE_KIND,
  265.                             LA_LabelID,        MSG_TERMINALPANEL_FONT_GAD,
  266.                             LA_ID,            GAD_FONTMODE,
  267.                             LA_BYTE,        &PrivateConfig->TerminalConfig->FontMode,
  268.                             LACY_FirstLabel,MSG_TERMINALPANEL_FONT_STANDARD_TXT,
  269.                             LACY_LastLabel,    MSG_TERMINALPANEL_FONT_PC_RAW,
  270.                             GA_Disabled,    PrivateConfig->TerminalConfig->EmulationMode == EMULATION_EXTERNAL,
  271.                         TAG_DONE);
  272.  
  273.                         LT_New(Handle,
  274.                             LA_Type,XBAR_KIND,
  275.                         TAG_DONE);
  276.  
  277.                         if(PrivateConfig->TerminalConfig->NumColumns < 20)
  278.                             LocalColumns = LocalMaxColumns;
  279.                         else
  280.                             LocalColumns = PrivateConfig->TerminalConfig->NumColumns;
  281.  
  282.                         LT_New(Handle,
  283.                             LA_Type,            SliderType,
  284.                             LA_LabelID,            MSG_TERMINALPANEL_NUMCOLUMNS_GAD,
  285.                             LA_ID,                GAD_COLUMNS,
  286.                             LA_LONG,            &LocalColumns,
  287.                             GTSL_Min,            20,
  288.                             GTSL_Max,            LocalMaxColumns + 1,
  289.                             GTSL_DispFunc,        ShowColumn,
  290.                             GTSL_LevelFormat,    "%s",
  291.                         TAG_DONE);
  292.  
  293.                         if(PrivateConfig->TerminalConfig->NumLines < 20)
  294.                             LocalLines = LocalMaxLines;
  295.                         else
  296.                             LocalLines = PrivateConfig->TerminalConfig->NumLines;
  297.  
  298.                         LT_New(Handle,
  299.                             LA_Type,            SliderType,
  300.                             LA_LabelID,            MSG_TERMINALPANEL_NUMLINES_GAD,
  301.                             LA_LONG,            &LocalLines,
  302.                             LA_ID,                GAD_LINES,
  303.                             GTSL_Min,            20,
  304.                             GTSL_Max,            LocalMaxLines + 1,
  305.                             GTSL_DispFunc,        ShowLine,
  306.                             GTSL_LevelFormat,    "%s",
  307.                         TAG_DONE);
  308.  
  309.                         LT_EndGroup(Handle);
  310.                     }
  311.  
  312.                     if(PrivateConfig->ScreenConfig->UseWorkbench || PrivateConfig->ScreenConfig->ShareScreen)
  313.                     {
  314.                         LT_New(Handle,
  315.                             LA_Type,VERTICAL_KIND,
  316.                         TAG_DONE);
  317.                         {
  318.                             LT_New(Handle,
  319.                                 LA_Type,    CHECKBOX_KIND,
  320.                                 LA_LabelID,    MSG_AUTO_ADAPT_WINDOW_SIZE_GAD,
  321.                                 LA_ID,        GAD_AUTO_SIZE,
  322.                                 LA_BYTE,    &PrivateConfig->TerminalConfig->AutoSize,
  323.                             TAG_DONE);
  324.  
  325.                             LT_EndGroup(Handle);
  326.                         }
  327.                     }
  328.  
  329.                     LT_EndGroup(Handle);
  330.                 }
  331.  
  332.                 LT_New(Handle,
  333.                     LA_Type,    VERTICAL_KIND,
  334.                 TAG_DONE);
  335.                 {
  336.                     LT_New(Handle,
  337.                         LA_Type,        CYCLE_KIND,
  338.                         LA_LabelID,        MSG_TERMINALPANEL_EMULATION_GAD,
  339.                         LA_ID,            GAD_EMULATIONTYPE,
  340.                         LA_BYTE,        &PrivateConfig->TerminalConfig->EmulationMode,
  341.                         LACY_FirstLabel,MSG_TERMINALPANEL_EMULATION_ANSI_VT102_TXT,
  342.                         LACY_LastLabel,    MSG_TERMINALPANEL_EMULATION_HEX_TXT,
  343.                     TAG_DONE);
  344.  
  345.                     LT_New(Handle,
  346.                         LA_Type,        STRING_KIND,
  347.                         LA_LabelID,        MSG_TERMINALPANEL_EMULATION_NAME_GAD,
  348.                         LA_Chars,        20,
  349.                         LA_ID,            GAD_EMULATIONLIBRARY,
  350.                         LA_STRPTR,        PrivateConfig->TerminalConfig->EmulationFileName,
  351.                         GTST_MaxChars,    sizeof(PrivateConfig->TerminalConfig->EmulationFileName) - 1,
  352.                         LAST_Picker,    TRUE,
  353.                         GA_Disabled,    PrivateConfig->TerminalConfig->EmulationMode != EMULATION_EXTERNAL,
  354.                     TAG_DONE);
  355.  
  356.                     LT_New(Handle,
  357.                         LA_Type,        CHECKBOX_KIND,
  358.                         LA_LabelID,        MSG_EMULATIONPANEL_USE_TERMINAL_TASK_TXT,
  359.                         LA_BYTE,        &PrivateConfig->TerminalConfig->UseTerminalTask,
  360.                         LA_ID,            GAD_EMULATIONTASK,
  361.                         GA_Disabled,    PrivateConfig->TerminalConfig->EmulationMode == EMULATION_EXTERNAL,
  362.                     TAG_DONE);
  363.  
  364.                     LT_EndGroup(Handle);
  365.                 }
  366.  
  367.                 LT_New(Handle,
  368.                     LA_Type,    VERTICAL_KIND,
  369.                 TAG_DONE);
  370.                 {
  371.                     LT_New(Handle,
  372.                         LA_Type,        CYCLE_KIND,
  373.                         LA_LabelID,        MSG_TERMINALPANEL_BELL_GAD,
  374.                         LA_BYTE,        &PrivateConfig->TerminalConfig->BellMode,
  375.                         LACY_FirstLabel,MSG_TERMINALPANEL_BELL_IGNORE_TXT,
  376.                         LACY_LastLabel,    MSG_TERMINALPANEL_BELL_DEFAULT_TXT,
  377.                     TAG_DONE);
  378.  
  379.                     LT_New(Handle,
  380.                         LA_Type,        STRING_KIND,
  381.                         LA_LabelID,        MSG_TERMINALPANEL_KEYMAP_FILE_GAD,
  382.                         LA_Chars,        20,
  383.                         LA_ID,            GAD_KEYMAP,
  384.                         LA_STRPTR,        PrivateConfig->TerminalConfig->KeyMapFileName,
  385.                         GTST_MaxChars,    sizeof(PrivateConfig->TerminalConfig->KeyMapFileName) - 1,
  386.                         LAST_Picker,    TRUE,
  387.                     TAG_DONE);
  388.  
  389.                     LT_EndGroup(Handle);
  390.                 }
  391.  
  392.                 LT_New(Handle,
  393.                     LA_Type,    VERTICAL_KIND,
  394.                 TAG_DONE);
  395.                 {
  396.                     LT_New(Handle,
  397.                         LA_Type,        CYCLE_KIND,
  398.                         LA_LabelID,        MSG_TERMINALPANEL_SEND_CR_GAD,
  399.                         LA_BYTE,        &PrivateConfig->TerminalConfig->SendCR,
  400.                         GTCY_Labels,    EOL_Labels,
  401.                     TAG_DONE);
  402.  
  403.                     LT_New(Handle,
  404.                         LA_Type,        CYCLE_KIND,
  405.                         LA_LabelID,        MSG_TERMINALPANEL_SEND_LF_GAD,
  406.                         LA_BYTE,        &PrivateConfig->TerminalConfig->SendLF,
  407.                         GTCY_Labels,    EOL_Labels,
  408.                     TAG_DONE);
  409.  
  410.                     LT_New(Handle,
  411.                         LA_Type,    XBAR_KIND,
  412.                     TAG_DONE);
  413.  
  414.                     LT_New(Handle,
  415.                         LA_Type,        CYCLE_KIND,
  416.                         LA_LabelID,        MSG_TERMINALPANEL_RECEIVE_CR_GAD,
  417.                         LA_BYTE,        &PrivateConfig->TerminalConfig->ReceiveCR,
  418.                         GTCY_Labels,    EOL_Labels,
  419.                     TAG_DONE);
  420.  
  421.                     LT_New(Handle,
  422.                         LA_Type,        CYCLE_KIND,
  423.                         LA_LabelID,        MSG_TERMINALPANEL_RECEIVE_LF_GAD,
  424.                         LA_BYTE,        &PrivateConfig->TerminalConfig->ReceiveLF,
  425.                         GTCY_Labels,    EOL_Labels,
  426.                     TAG_DONE);
  427.  
  428.                     LT_EndGroup(Handle);
  429.                 }
  430.  
  431.                 LT_EndGroup(Handle);
  432.             }
  433.  
  434.             LT_New(Handle,
  435.                 LA_Type,    VERTICAL_KIND,
  436.             TAG_DONE);
  437.             {
  438.                 LT_New(Handle,LA_Type,XBAR_KIND,LAXB_FullSize,TRUE,TAG_DONE);
  439.  
  440.                 LT_EndGroup(Handle);
  441.             }
  442.  
  443.             LT_New(Handle,LA_Type,HORIZONTAL_KIND,
  444.                 LAGR_SameSize,    TRUE,
  445.                 LAGR_Spread,    TRUE,
  446.             TAG_DONE);
  447.             {
  448.                 LT_New(Handle,
  449.                     LA_Type,        BUTTON_KIND,
  450.                     LA_LabelID,        MSG_GLOBAL_USE_GAD,
  451.                     LA_ID,            GAD_USE,
  452.                     LABT_ReturnKey,    TRUE,
  453.                     LABT_ExtraFat,    TRUE,
  454.                 TAG_DONE);
  455.  
  456.                 LT_New(Handle,
  457.                     LA_Type,        BUTTON_KIND,
  458.                     LA_LabelID,        MSG_GLOBAL_CANCEL_GAD,
  459.                     LA_ID,            GAD_CANCEL,
  460.                     LABT_EscKey,    TRUE,
  461.                     LABT_ExtraFat,    TRUE,
  462.                 TAG_DONE);
  463.  
  464.                 LT_EndGroup(Handle);
  465.             }
  466.  
  467.             LT_EndGroup(Handle);
  468.         }
  469.  
  470.         if(PanelWindow = LT_Build(Handle,
  471.             LAWN_TitleID,        MSG_TERMINALPANEL_TERMINAL_PREFERENCES_TXT,
  472.             LAWN_HelpHook,        &GuideHook,
  473.             LAWN_Parent,        Parent,
  474.             WA_DepthGadget,        TRUE,
  475.             WA_DragBar,            TRUE,
  476.             WA_RMBTrap,            TRUE,
  477.             WA_Activate,        TRUE,
  478.             WA_SimpleRefresh,    TRUE,
  479.         TAG_DONE))
  480.         {
  481.             UBYTE DummyBuffer[MAX_FILENAME_LENGTH];
  482.             UBYTE LocalBuffer[MAX_FILENAME_LENGTH];
  483.             struct IntuiMessage    *Message;
  484.             struct Gadget *MsgGadget;
  485.             ULONG MsgClass;
  486.             BOOL Done;
  487.  
  488.             GuideContext(CONTEXT_TERMINAL);
  489.  
  490.             PushWindow(PanelWindow);
  491.  
  492.             LT_ShowWindow(Handle,TRUE);
  493.  
  494.             Done = FALSE;
  495.  
  496.             do
  497.             {
  498.                 if(Wait(PORTMASK(PanelWindow->UserPort) | SIG_BREAK) & SIG_BREAK)
  499.                     break;
  500.  
  501.                 while(Message = (struct IntuiMessage *)LT_GetIMsg(Handle))
  502.                 {
  503.                     MsgClass    = Message->Class;
  504.                     MsgGadget    = (struct Gadget *)Message->IAddress;
  505.  
  506.                     LT_ReplyIMsg(Message);
  507.  
  508.                     if(MsgClass == IDCMP_GADGETUP)
  509.                     {
  510.                         switch(MsgGadget->GadgetID)
  511.                         {
  512.                             case GAD_COLUMNS:
  513.                             case GAD_LINES:
  514.                             case GAD_FONTMODE:
  515.  
  516.                                 LT_SetAttributes(Handle,GAD_BBS_ANSI_COMPLIANT,
  517.                                     GTCB_Checked,    PrivateConfig->TerminalConfig->FontMode != FONT_STANDARD && (LocalColumns % (LocalMaxColumns + 1)) == 80 && (LocalLines % (LocalMaxLines + 1)) == 25,
  518.                                 TAG_DONE);
  519.  
  520.                                 break;
  521.  
  522.                             case GAD_BBS_ANSI_COMPLIANT:
  523.  
  524.                                 LT_SetAttributes(Handle,GAD_COLUMNS,
  525.                                     GTSL_Level,    80,
  526.                                 TAG_DONE);
  527.  
  528.                                 LT_SetAttributes(Handle,GAD_LINES,
  529.                                     GTSL_Level,    25,
  530.                                 TAG_DONE);
  531.  
  532.                                 LT_SetAttributes(Handle,GAD_FONTMODE,
  533.                                     GTCY_Active,    PrivateConfig->TerminalConfig->FontMode == FONT_STANDARD ? FONT_IBM : PrivateConfig->TerminalConfig->FontMode,
  534.                                 TAG_DONE);
  535.  
  536.                                 break;
  537.  
  538.                             case GAD_USE:
  539.  
  540.                                 LT_UpdateStrings(Handle);
  541.  
  542.                                 PrivateConfig->TerminalConfig->NumColumns    = LocalColumns % (LocalMaxColumns + 1);
  543.                                 PrivateConfig->TerminalConfig->NumLines        = LocalLines % (LocalMaxLines + 1);
  544.  
  545.                                 if(!PrivateConfig->TerminalConfig->EmulationFileName[0] && PrivateConfig->TerminalConfig->EmulationMode == EMULATION_EXTERNAL)
  546.                                     PrivateConfig->TerminalConfig->EmulationMode = EMULATION_ANSIVT100;
  547.  
  548.                                 UseIt = Done = TRUE;
  549.                                 break;
  550.  
  551.                             case GAD_EMULATIONTYPE:
  552.  
  553.                                 LT_SetAttributes(Handle,GAD_TEXTFONT,
  554.                                     GA_Disabled,    PrivateConfig->TerminalConfig->EmulationMode == EMULATION_EXTERNAL,
  555.                                 TAG_DONE);
  556.  
  557.                                 LT_SetAttributes(Handle,GAD_IBMFONT,
  558.                                     GA_Disabled,    PrivateConfig->TerminalConfig->EmulationMode == EMULATION_EXTERNAL,
  559.                                 TAG_DONE);
  560.  
  561.                                 LT_SetAttributes(Handle,GAD_FONTMODE,
  562.                                     GA_Disabled,    PrivateConfig->TerminalConfig->EmulationMode == EMULATION_EXTERNAL,
  563.                                 TAG_DONE);
  564.  
  565.                                 LT_SetAttributes(Handle,GAD_EMULATIONLIBRARY,
  566.                                     GA_Disabled,    PrivateConfig->TerminalConfig->EmulationMode != EMULATION_EXTERNAL,
  567.                                 TAG_DONE);
  568.  
  569.                                 LT_SetAttributes(Handle,GAD_EMULATIONTASK,
  570.                                     GA_Disabled,    PrivateConfig->TerminalConfig->EmulationMode == EMULATION_EXTERNAL,
  571.                                 TAG_DONE);
  572.  
  573.                                 break;
  574.  
  575.                             case GAD_CANCEL:
  576.  
  577.                                 Done = TRUE;
  578.                                 break;
  579.                         }
  580.                     }
  581.  
  582.                     if(MsgClass == IDCMP_IDCMPUPDATE)
  583.                     {
  584.                         switch(MsgGadget->GadgetID)
  585.                         {
  586.                             case GAD_EMULATIONLIBRARY:
  587.  
  588.                                 LT_LockWindow(PanelWindow);
  589.  
  590.                                 strcpy(DummyBuffer,LT_GetString(Handle,GAD_EMULATIONLIBRARY));
  591.                                 strcpy(LocalBuffer,DummyBuffer);
  592.  
  593.                                 if(PickFile(PanelWindow,"Libs:","xem#?.library",LocaleString(MSG_TERMINALPANEL_SELECT_EMULATOR_TXT),DummyBuffer,NT_LIBRARY))
  594.                                 {
  595.                                     if(Stricmp(LocalBuffer,DummyBuffer))
  596.                                     {
  597.                                         LT_SetAttributes(Handle,GAD_EMULATIONLIBRARY,
  598.                                             GTST_String,DummyBuffer,
  599.                                         TAG_DONE);
  600.                                     }
  601.                                 }
  602.  
  603.                                 LT_ShowWindow(Handle,TRUE);
  604.  
  605.                                 LT_UnlockWindow(PanelWindow);
  606.                                 break;
  607.  
  608.                             case GAD_KEYMAP:
  609.  
  610.                                 LT_LockWindow(PanelWindow);
  611.  
  612.                                 strcpy(DummyBuffer,LT_GetString(Handle,GAD_KEYMAP));
  613.  
  614.                                 if(SelectKeymap(DummyBuffer,sizeof(DummyBuffer),PanelWindow))
  615.                                 {
  616.                                     LT_SetAttributes(Handle,GAD_KEYMAP,
  617.                                         GTST_String,    DummyBuffer,
  618.                                     TAG_DONE);
  619.                                 }
  620.  
  621.                                 LT_UnlockWindow(PanelWindow);
  622.                                 break;
  623.  
  624.                             case GAD_TEXTFONT:
  625.  
  626.                                 if(OpenFixedFont(PanelWindow,PrivateConfig->TerminalConfig->TextFontName,&PrivateConfig->TerminalConfig->TextFontHeight))
  627.                                 {
  628.                                     BuildFontName(FontName,sizeof(FontName),PrivateConfig->TerminalConfig->TextFontName,PrivateConfig->TerminalConfig->TextFontHeight);
  629.  
  630.                                     LT_SetAttributes(Handle,GAD_TEXTFONT,
  631.                                         GTTX_Text,    FontName,
  632.                                     TAG_DONE);
  633.                                 }
  634.  
  635.                                 break;
  636.  
  637.                             case GAD_IBMFONT:
  638.  
  639.                                 if(OpenFixedFont(PanelWindow,PrivateConfig->TerminalConfig->IBMFontName,&PrivateConfig->TerminalConfig->IBMFontHeight))
  640.                                 {
  641.                                     BuildFontName(IBMName,sizeof(IBMName),PrivateConfig->TerminalConfig->IBMFontName,PrivateConfig->TerminalConfig->IBMFontHeight);
  642.  
  643.                                     LT_SetAttributes(Handle,GAD_IBMFONT,
  644.                                         GTTX_Text,    IBMName,
  645.                                     TAG_DONE);
  646.                                 }
  647.  
  648.                                 break;
  649.                         }
  650.                     }
  651.                 }
  652.             }
  653.             while(!Done);
  654.  
  655.             PopWindow();
  656.         }
  657.  
  658.         LT_DeleteHandle(Handle);
  659.     }
  660.  
  661.     if(UseIt)
  662.         SwapConfig(LocalConfig,PrivateConfig);
  663.     else
  664.         SaveConfig(LocalConfig,PrivateConfig);
  665.  
  666.     return(UseIt);
  667. }
  668.