home *** CD-ROM | disk | FTP | other *** search
/ Frozen Fish 1: Amiga / FrozenFish-Apr94.iso / bbs / alib / d9xx / d912 / yak.lha / Yak / Source / Source.lha / popup.c < prev    next >
C/C++ Source or Header  |  1993-08-02  |  19KB  |  636 lines
  1. /*
  2.  *  Source machine generated by GadToolsBox V2.0b
  3.  *  which is (c) Copyright 1991-1993 Jaba Development
  4.  *
  5.  *  GUI Designed by : Martin W Scott and Gaël Marziou
  6.  */
  7.  
  8.  
  9.  
  10.  
  11. #include <exec/types.h>
  12. #include <intuition/intuition.h>
  13. #include <intuition/classes.h>
  14. #include <intuition/classusr.h>
  15. #include <intuition/imageclass.h>
  16. #include <intuition/gadgetclass.h>
  17. #include <libraries/gadtools.h>
  18. #include <graphics/displayinfo.h>
  19. #include <graphics/gfxbase.h>
  20. #include <clib/exec_protos.h>
  21. #include <clib/intuition_protos.h>
  22. #include <clib/gadtools_protos.h>
  23. #include <clib/graphics_protos.h>
  24. #include <clib/locale_protos.h>
  25. #include <clib/utility_protos.h>
  26. #include <string.h>
  27. #include <pragmas/exec_pragmas.h>
  28. #include <pragmas/intuition_pragmas.h>
  29. #include <pragmas/gadtools_pragmas.h>
  30. #include <pragmas/graphics_pragmas.h>
  31. #include <pragmas/utility_pragmas.h>
  32.  
  33. #include "popup.h"
  34. #include "popup_fix.h"  /**** ADDED */
  35. #define CATCOMP_ARRAY
  36. #include "popup_locale_strings.h"
  37.  
  38. extern struct LocaleBase *LocaleBase;
  39. extern struct Catalog    *Catalog;
  40.  
  41. struct Screen         *Scr = NULL;
  42. UBYTE                 *PubScreenName = "Workbench";
  43. APTR                   VisualInfo = NULL;
  44. struct Window         *HelpWnd = NULL;
  45. struct Window         *HotKeyWnd = NULL;
  46. struct Gadget         *HelpGList = NULL;
  47. struct Gadget         *HotKeyGList = NULL;
  48. struct Menu           *HelpMenus = NULL;
  49. UWORD                  HelpZoom[4];
  50. struct Gadget         *HelpGadgets[20];
  51. struct Gadget         *HotKeyGadgets[8];
  52. UWORD                  HelpLeft = 0;
  53. UWORD                  HelpTop = 11;
  54. UWORD                  HelpWidth = 632;
  55. UWORD                  HelpHeight = 164;
  56. UWORD                  HotKeyLeft = 0;
  57. UWORD                  HotKeyTop = 11;
  58. UWORD                  HotKeyWidth = 455;
  59. UWORD                  HotKeyHeight = 150;
  60. UBYTE                 *HelpWdt = NULL;
  61. UBYTE                 *HotKeyWdt = NULL;
  62. struct TextAttr       *Font, Attr;
  63. UWORD                  FontX, FontY; 
  64. UWORD                  OffX, OffY;
  65.  
  66.  
  67. UBYTE *getString (int n)
  68. {
  69.     UBYTE *result;
  70.     STRPTR s = CatCompArray[n].cca_Str;
  71.     if (Catalog)
  72.         result = (UBYTE *) GetCatalogStr(Catalog, n, s);
  73.     else {
  74.         result = (UBYTE *) s;
  75.     }
  76.     return result;
  77. }
  78.  
  79.  
  80. UBYTE *MBMethod0Labels[4];
  81.  
  82. void InitMBMethod0Labels (void)
  83. {
  84.     MBMethod0Labels[0] = getString(NONE_STRING);
  85.     MBMethod0Labels[1] = getString(SPRITES_STRING);
  86.     MBMethod0Labels[2] = getString(COPPER_STRING);
  87.     MBMethod0Labels[3] = NULL ;
  88. }
  89.  
  90. UBYTE *Options1Labels[4];
  91.  
  92. void InitOptions1Label (void)
  93. {
  94.     Options1Labels[0] = getString(NO_SCREEN_CHANGE_STRING);
  95.     Options1Labels[1] = getString(WORKBENCH_TO_FRONT_STRING);
  96.     Options1Labels[2] = getString(DEFAULT_PUBSCR_TO_FRONT_STRING);
  97.     Options1Labels[3] = NULL ;
  98. }
  99.  
  100.  
  101. extern struct MinList Actions1List;
  102.  
  103. struct Node Actions1Nodes[] = {
  104.     &Actions1Nodes[1], ( struct Node * )&Actions1List.mlh_Head, 0, 0, NULL,
  105.     &Actions1Nodes[2], &Actions1Nodes[0], 0, 0, NULL,
  106.     &Actions1Nodes[3], &Actions1Nodes[1], 0, 0, NULL,
  107.     &Actions1Nodes[4], &Actions1Nodes[2], 0, 0, NULL,
  108.     &Actions1Nodes[5], &Actions1Nodes[3], 0, 0, NULL,
  109.     &Actions1Nodes[6], &Actions1Nodes[4], 0, 0, NULL,
  110.     &Actions1Nodes[7], &Actions1Nodes[5], 0, 0, NULL,
  111.     &Actions1Nodes[8], &Actions1Nodes[6], 0, 0, NULL,
  112.     &Actions1Nodes[9], &Actions1Nodes[7], 0, 0, NULL,
  113.     &Actions1Nodes[10], &Actions1Nodes[8], 0, 0, NULL,
  114.     &Actions1Nodes[11], &Actions1Nodes[9], 0, 0, NULL,
  115.     &Actions1Nodes[12], &Actions1Nodes[10], 0, 0, NULL,
  116.     &Actions1Nodes[13], &Actions1Nodes[11], 0, 0, NULL,
  117.     &Actions1Nodes[14], &Actions1Nodes[12], 0, 0, NULL,
  118.     ( struct Node * )&Actions1List.mlh_Tail, &Actions1Nodes[13], 0, 0, NULL };
  119.  
  120. void InitActions1Nodes (void)
  121. {
  122.     Actions1Nodes[0].ln_Name  = getString(DOS_Command_ACT);
  123.     Actions1Nodes[1].ln_Name  = getString(Close_Window_ACT);
  124.     Actions1Nodes[2].ln_Name  = getString(Zip_Window_ACT);
  125.     Actions1Nodes[3].ln_Name  = getString(Shrink_Window_ACT);
  126.     Actions1Nodes[4].ln_Name  = getString(Expand_Window_ACT);
  127.     Actions1Nodes[5].ln_Name  = getString(Cycle_Windows_ACT);
  128.     Actions1Nodes[6].ln_Name  = getString(Open_Palette_ACT);
  129.     Actions1Nodes[7].ln_Name  = getString(Screen_to_Front_ACT);
  130.     Actions1Nodes[8].ln_Name  = getString(Screen_to_Back_ACT);
  131.     Actions1Nodes[9].ln_Name  = getString(Activate_Workbench_ACT);
  132.     Actions1Nodes[10].ln_Name  = getString(Centre_Screen_ACT);
  133.     Actions1Nodes[11].ln_Name = getString(Blank_Display_ACT);
  134.     Actions1Nodes[12].ln_Name = getString(Insert_Text_ACT);
  135.     Actions1Nodes[13].ln_Name = getString(Insert_Date_ACT);
  136.     Actions1Nodes[14].ln_Name = getString(Show_Yak_Interface_ACT);
  137. }
  138.  
  139. struct MinList Actions1List = {
  140.     ( struct MinNode * )&Actions1Nodes[0], 
  141.     ( struct MinNode * )NULL, 
  142.     ( struct MinNode * )&Actions1Nodes[14] };
  143.  
  144. struct IntuiText HelpIText[] = {
  145.     2, 0, JAM1,40, 11, NULL, NULL, NULL,
  146.     2, 0, JAM1,84, 93, NULL, NULL, NULL,
  147.     2, 0, JAM1,508, 11, NULL, NULL, NULL,
  148.     2, 0, JAM1,488, 85, NULL, NULL, NULL };
  149.  
  150.  
  151. #define Help_TNUM 4
  152.  
  153. void InitHelpIText (void)
  154. {
  155.    HelpIText[0].IText = getString(TOGGLES_STRING);
  156.    HelpIText[1].IText = getString(INCLUSION_PATTERNS_STRING);
  157.    HelpIText[2].IText = getString(MISCELLANEOUS_STRING);
  158.    HelpIText[3].IText = getString(TIMEOUT_STRING);
  159. }
  160.  
  161. struct NewMenu HelpNewMenu[] = {
  162.     NM_TITLE, NULL, NULL, 0, NULL, NULL,
  163.     NM_ITEM, NULL, NULL, 0, 0L, NULL,
  164.     NM_ITEM, NULL, NULL, 0, 0L, NULL,
  165.     NM_ITEM, NULL, NULL, 0, 0L, NULL,
  166.     NM_ITEM, NULL, NULL, 0, 0L, NULL,
  167.     NM_ITEM, NULL, NULL, 0, NULL, NULL,
  168.     NM_SUB, NULL, NULL, 0, 0L, NULL,
  169.     NM_SUB, NULL, NULL, 0, 0L, NULL,
  170.     NM_SUB, NULL, NULL, 0, 0L, NULL,
  171.     NM_SUB, NULL, NULL, 0, 0L, NULL,
  172.     NM_SUB, NULL, NULL, 0, 0L, NULL,    
  173.     NM_END, NULL, NULL, 0, 0L, NULL };
  174.  
  175. void InitHelpNewMenu (void)
  176. {
  177.     HelpNewMenu[0].nm_Label   = (STRPTR)getString(PROJECT_STRING);
  178.     HelpNewMenu[1].nm_Label   = (STRPTR)getString(LOAD_SETTINGS_STRING);
  179.     HelpNewMenu[1].nm_CommKey = (STRPTR)getString(LOAD_SHORTCUT);
  180.     HelpNewMenu[2].nm_Label   = (STRPTR)getString(SAVE_SETTINGS_STRING);
  181.     HelpNewMenu[2].nm_CommKey = (STRPTR)getString(SAVE_SHORTCUT);
  182.     HelpNewMenu[3].nm_Label   = (STRPTR)getString(HIDE_WINDOW_STRING);
  183.     HelpNewMenu[3].nm_CommKey = (STRPTR)getString(HIDE_SHORTCUT);
  184.     HelpNewMenu[4].nm_Label   = (STRPTR)getString(QUIT_STRING);
  185.     HelpNewMenu[4].nm_CommKey = (STRPTR)getString(QUIT_SHORTCUT);
  186.     HelpNewMenu[5].nm_Label   = (STRPTR)getString(Credits_STRING);
  187.     HelpNewMenu[6].nm_Label   = (STRPTR)getString(Credits_Line1_STRING);
  188.     HelpNewMenu[7].nm_Label   = (STRPTR)getString(Credits_Line2_STRING);
  189.     HelpNewMenu[8].nm_Label   = (STRPTR)getString(Credits_Line3_STRING);
  190.     HelpNewMenu[9].nm_Label   = (STRPTR)getString(Credits_Line4_STRING);
  191.     HelpNewMenu[10].nm_Label  = (STRPTR)getString(Credits_Line5_STRING);
  192. }
  193.  
  194. UWORD HelpGTypes[] = {
  195.     BUTTON_KIND,
  196.     BUTTON_KIND,
  197.     CHECKBOX_KIND,
  198.     CHECKBOX_KIND,
  199.     CHECKBOX_KIND,
  200.     CHECKBOX_KIND,
  201.     CHECKBOX_KIND,
  202.     CHECKBOX_KIND,
  203.     CHECKBOX_KIND,
  204.     CHECKBOX_KIND,
  205.     CYCLE_KIND,
  206.     CHECKBOX_KIND,
  207.     BUTTON_KIND,
  208.     STRING_KIND,
  209.     STRING_KIND,
  210.     STRING_KIND,
  211.     STRING_KIND,
  212.     INTEGER_KIND,
  213.     INTEGER_KIND,
  214.     INTEGER_KIND
  215. };
  216.  
  217. UWORD HotKeyGTypes[] = {
  218.     LISTVIEW_KIND,
  219.     LISTVIEW_KIND,
  220.     STRING_KIND,
  221.     STRING_KIND,
  222.     CYCLE_KIND,
  223.     BUTTON_KIND,
  224.     BUTTON_KIND,
  225.     BUTTON_KIND
  226. };
  227.  
  228. struct NewGadget HelpNGad[] = {
  229.     449, 143, 89, 19, NULL, NULL, GD_Hide, PLACETEXT_IN, NULL, NULL,
  230.     543, 143, 85, 19, NULL, NULL, GD_Quit, PLACETEXT_IN, NULL, NULL,
  231.     11, 23, 26, 11, NULL, NULL, GD_AutoCheck, PLACETEXT_RIGHT, NULL, NULL,
  232.     202, 23, 26, 11, NULL, NULL, GD_KeyActCheck, PLACETEXT_RIGHT, NULL, NULL,
  233.     11, 56, 26, 11, NULL, NULL, GD_CTFCheck, PLACETEXT_RIGHT, NULL, NULL,
  234.     11, 67, 26, 11, NULL, NULL, GD_CTBCheck, PLACETEXT_RIGHT, NULL, NULL,
  235.     202, 34, 26, 11, NULL, NULL, GD_ScrCycleCheck, PLACETEXT_RIGHT, NULL, NULL,
  236.     202, 56, 26, 11, NULL, NULL, GD_WildStarCheck, PLACETEXT_RIGHT, NULL, NULL,
  237.     202, 45, 26, 11, NULL, NULL, GD_ScrActCheck, PLACETEXT_RIGHT, NULL, NULL,
  238.     11, 34, 26, 11, NULL, NULL, GD_AutoPopCheck, PLACETEXT_RIGHT, NULL, NULL,
  239.     463, 53, 153, 17, NULL, NULL, GD_MBMethod, PLACETEXT_ABOVE, NULL, NULL,
  240.     11, 45, 26, 11, NULL, NULL, GD_RMBActCheck, PLACETEXT_RIGHT, NULL, NULL,
  241.     449, 121, 179, 20, NULL, NULL, GD_EditHotkeys, PLACETEXT_IN, NULL, NULL,
  242.     225, 107, 215, 12, NULL, NULL, GD_AutoPat, PLACETEXT_LEFT, NULL, NULL,
  243.     225, 120, 215, 12, NULL, NULL, GD_ClickPat, PLACETEXT_LEFT, NULL, NULL,
  244.     225, 133, 215, 12, NULL, NULL, GD_PopPat, PLACETEXT_LEFT, NULL, NULL,
  245.     225, 146, 215, 12, NULL, NULL, GD_ClickWinPat, PLACETEXT_LEFT, NULL, NULL,
  246.     577, 21, 44, 12, NULL, NULL, GD_ClickVol, PLACETEXT_LEFT, NULL, NULL,
  247.     577, 90, 44, 12, NULL, NULL, GD_ScrTONum, PLACETEXT_LEFT, NULL, NULL,
  248.     577, 103, 44, 12, NULL, NULL, GD_MouseTONum, PLACETEXT_LEFT, NULL, NULL
  249. };
  250.  
  251. void InitHelpNGad (void)
  252. {
  253.     HelpNGad[0].ng_GadgetText = getString(HIDE_STRING);
  254.     HelpNGad[1].ng_GadgetText = getString(QUIT_STRING);
  255.     HelpNGad[2].ng_GadgetText = getString(AUTOPOINT_STRING);
  256.     HelpNGad[3].ng_GadgetText = getString(KEY_ACTIVATE_STRING);
  257.     HelpNGad[4].ng_GadgetText = getString(CLICK_TO_FRONT_STRING);
  258.     HelpNGad[5].ng_GadgetText = getString(CLICK_TO_BACK_STRING);
  259.     HelpNGad[6].ng_GadgetText = getString(SCREEN_TO_BACK_STRING);
  260.     HelpNGad[7].ng_GadgetText = getString(WILD_STAR_STRING);
  261.     HelpNGad[8].ng_GadgetText = getString(SCREEN_ACTIVATE_STRING);
  262.     HelpNGad[9].ng_GadgetText = getString(AUTOPOPTOFRONT_STRING);
  263.     HelpNGad[10].ng_GadgetText = getString(MOUSEBLANK_METHOD_STRING);
  264.     HelpNGad[11].ng_GadgetText = getString(RMB_ACTIVATE_STRING);
  265.     HelpNGad[12].ng_GadgetText = getString(EDIT_HOTKEYS_STRING);
  266.     HelpNGad[13].ng_GadgetText = getString(AUTOSCREENS_STRING);
  267.     HelpNGad[14].ng_GadgetText = getString(CLICKSCREENS_STRING);
  268.     HelpNGad[15].ng_GadgetText = getString(POPWINDOWS_STRING);
  269.     HelpNGad[16].ng_GadgetText = getString(CLICKWINDOWS_STRING);
  270.     HelpNGad[17].ng_GadgetText = getString(CLICKVOLUME_STRING);
  271.     HelpNGad[18].ng_GadgetText = getString(SCREENTIMEOUT_STRING);
  272.     HelpNGad[19].ng_GadgetText = getString(MOUSETIMEOUT_STRING);
  273. }
  274.  
  275. struct NewGadget HotKeyNGad[] = {
  276.     225, 19, 214, 64, NULL, NULL, GD_Hotkeys, PLACETEXT_ABOVE|NG_HIGHLABEL, NULL, NULL,
  277.     16, 19, 189, 88, NULL, NULL, GD_Actions, PLACETEXT_ABOVE|NG_HIGHLABEL, NULL, NULL,
  278.     225, 80, 214, 13, NULL, NULL, GD_HKStr, 0, NULL, NULL,
  279.     96, 117, 223, 13, NULL, NULL, GD_Argument, PLACETEXT_LEFT, NULL, NULL,
  280.     96, 131, 223, 13, NULL, NULL, GD_Options, PLACETEXT_LEFT, NULL, NULL,
  281.     225, 94, 106, 13, NULL, NULL, GD_Add, PLACETEXT_IN, NULL, NULL,
  282.     333, 94, 106, 13, NULL, NULL, GD_Delete, PLACETEXT_IN, NULL, NULL,
  283.     339, 117, 100, 27, NULL, NULL, GD_Return, PLACETEXT_IN, NULL, NULL
  284. };
  285.  
  286. void InitHotKeyNGad (void)
  287. {
  288.     HotKeyNGad[0].ng_GadgetText = getString(HOTKEYS_STRING);
  289.     HotKeyNGad[1].ng_GadgetText = getString(ACTIONS_STRING);
  290.     HotKeyNGad[3].ng_GadgetText = getString(ARGUMENT_STRING);
  291.     HotKeyNGad[4].ng_GadgetText = getString(OPTIONS_STRING);
  292.     HotKeyNGad[5].ng_GadgetText = getString(ADD_STRING);
  293.     HotKeyNGad[6].ng_GadgetText = getString(DELETE_STRING);
  294.     HotKeyNGad[7].ng_GadgetText = getString(RETURN_STRING);
  295. }
  296.  
  297.  
  298. void InitGUI (void)
  299. {
  300.  
  301.     HotKeyWdt = HelpWdt;
  302.  
  303.     InitMBMethod0Labels ();
  304.     InitOptions1Label ();
  305.     InitHelpIText ();
  306.     InitHelpNewMenu ();
  307.     InitHelpNGad ();
  308.     InitActions1Nodes ();
  309.     InitHotKeyNGad ();
  310. }
  311.  
  312.  
  313. ULONG HelpGTags[] = {
  314.     (TAG_DONE),
  315.     (TAG_DONE),
  316.     (TAG_DONE),
  317.     (TAG_DONE),
  318.     (TAG_DONE),
  319.     (TAG_DONE),
  320.     (TAG_DONE),
  321.     (TAG_DONE),
  322.     (TAG_DONE),
  323.     (TAG_DONE),
  324.     (GTCY_Labels), (ULONG)&MBMethod0Labels[ 0 ], (TAG_DONE),
  325.     (TAG_DONE),
  326.     (TAG_DONE),
  327.     (GTST_MaxChars), 99, (TAG_DONE),
  328.     (GTST_MaxChars), 99, (TAG_DONE),
  329.     (GTST_MaxChars), 99, (TAG_DONE),
  330.     (GTST_MaxChars), 99, (TAG_DONE),
  331.     (GTIN_Number), 0, (GTIN_MaxChars), 4, (TAG_DONE),
  332.     (GTIN_Number), 0, (GTIN_MaxChars), 4, (TAG_DONE),
  333.     (GTIN_Number), 0, (GTIN_MaxChars), 4, (TAG_DONE)
  334. };
  335.  
  336. ULONG HotKeyGTags[] = {
  337.     (GT_Underscore), '_', (TAG_DONE),
  338.     (GTLV_Labels), (ULONG)&Actions1List, (GTLV_ShowSelected), NULL, (GT_Underscore), '_', (TAG_DONE),
  339.     (GTST_MaxChars), 256, (TAG_DONE),
  340.     (GTST_MaxChars), 512, (GT_Underscore), '_', (TAG_DONE),
  341.     (GTCY_Labels), (ULONG)&Options1Labels[ 0 ], (GT_Underscore), '_', (TAG_DONE),
  342.     (GT_Underscore), '_', (TAG_DONE),
  343.     (GT_Underscore), '_', (TAG_DONE),
  344.     (GT_Underscore), '_', (TAG_DONE)
  345. };
  346.  
  347. static UWORD ComputeX( UWORD value )
  348. {
  349.     return(( UWORD )((( FontX * value ) + 4 ) / 8 ));
  350. }
  351.  
  352. static UWORD ComputeY( UWORD value )
  353. {
  354.     return(( UWORD )((( FontY * value ) + 4 ) / 8 ));
  355. }
  356.  
  357. static void ComputeFont( UWORD width, UWORD height )
  358. {
  359.     Font = &Attr;
  360.     Font->ta_Name = (STRPTR)Scr->RastPort.Font->tf_Message.mn_Node.ln_Name;
  361.     Font->ta_YSize = FontY = Scr->RastPort.Font->tf_YSize;
  362.  
  363. /*    FontX = Scr->RastPort.Font->tf_XSize; */ 
  364. /**** ADDED NEXT LINE */
  365.     FontX = CalcFontX(); 
  366.  
  367.     OffX = Scr->WBorLeft;
  368.     OffY = Scr->RastPort.TxHeight + Scr->WBorTop + 1;
  369.  
  370.     if ( width && height ) {
  371.         if (( ComputeX( width ) + OffX + Scr->WBorRight ) > Scr->Width )
  372.         goto UseTopaz;
  373.         if (( ComputeY( height ) + OffY + Scr->WBorBottom ) > Scr->Height )
  374.         goto UseTopaz;
  375.     }
  376.     return;
  377.  
  378. UseTopaz:
  379.     Font->ta_Name = (STRPTR)"topaz.font";
  380.     FontX = FontY = Font->ta_YSize = 8;
  381. }
  382.  
  383. int SetupScreen( void )
  384. {
  385.     if ( ! ( Scr = LockPubScreen( PubScreenName )))
  386.         return( 1L );
  387.  
  388.     ComputeFont( 0, 0 );
  389.  
  390.     if ( ! ( VisualInfo = GetVisualInfo( Scr, TAG_DONE )))
  391.         return( 2L );
  392.  
  393.     return( 0L );
  394. }
  395.  
  396. void CloseDownScreen( void )
  397. {
  398.     if ( VisualInfo ) {
  399.         FreeVisualInfo( VisualInfo );
  400.         VisualInfo = NULL;
  401.     }
  402.  
  403.     if ( Scr        ) {
  404.         UnlockPubScreen( NULL, Scr );
  405.         Scr = NULL;
  406.     }
  407. }
  408.  
  409. void HelpRender( void )
  410. {
  411.     UWORD            cnt;
  412.     UWORD X,Y;
  413.  
  414.     ComputeFont( HelpWidth, HelpHeight );
  415.  
  416.     /* TimeOut Box */
  417.     X = OffX + ComputeX( 448 );
  418.     Y = OffY + ComputeY( 77 );
  419.     DrawBevelBox( HelpWnd->RPort, X, Y,
  420.                     ComputeX( 180 ),
  421.                     ComputeY( 42 ),
  422.                     GT_VisualInfo, VisualInfo, TAG_DONE );
  423.         HelpIText[ 3 ].LeftEdge  = X + 4;
  424.         HelpIText[ 3 ].TopEdge   = Y + 3;
  425.  
  426.         /* Miscellaneous box */
  427.         X = OffX + ComputeX( 448 );
  428.     Y = OffY + ComputeY( 3 );
  429.     DrawBevelBox( HelpWnd->RPort, X, Y,
  430.                     ComputeX( 179 ),
  431.                     ComputeY( 72 ),
  432.                     GT_VisualInfo, VisualInfo, TAG_DONE );
  433.         HelpIText[ 2 ].LeftEdge  = X + 4;
  434.         HelpIText[ 2 ].TopEdge   = Y + 3;
  435.  
  436.     /* Inclusion Patterns box */
  437.     X = OffX + ComputeX( 4 );
  438.     Y = OffY + ComputeY( 85 );
  439.         DrawBevelBox( HelpWnd->RPort, X, Y,
  440.                     ComputeX( 441 ),
  441.                     ComputeY( 77 ),
  442.                     GT_VisualInfo, VisualInfo, TAG_DONE );
  443.         HelpIText[ 1 ].LeftEdge  = X + 4;
  444.         HelpIText[ 1 ].TopEdge   = Y + 3;
  445.  
  446.     /* Toggles box */
  447.     X = OffX + ComputeX( 4 );
  448.     Y = OffY + ComputeY( 3 );
  449.         DrawBevelBox( HelpWnd->RPort, X, Y,
  450.                     ComputeX( 440 ),
  451.                     ComputeY( 80 ),
  452.                     GT_VisualInfo, VisualInfo, TAG_DONE );
  453.         HelpIText[ 0 ].LeftEdge  = X + 4;
  454.         HelpIText[ 0 ].TopEdge   = Y + 3;
  455.  
  456.     for ( cnt = 0; cnt < Help_TNUM; cnt++ ) {
  457.         HelpIText[ cnt ].ITextFont = Font;
  458.         PrintIText( HelpWnd->RPort, &HelpIText[ cnt ], 0, 0 );    
  459.     }
  460.  
  461. }
  462.  
  463.  
  464. int OpenHelpWindow( void )
  465. {
  466.     struct NewGadget    ng;
  467.     struct Gadget    *g;
  468.     UWORD        lc, tc;
  469.     UWORD        wleft = HelpLeft, wtop = HelpTop, ww, wh;
  470.  
  471.  
  472.     ComputeFont( HelpWidth, HelpHeight );
  473.  
  474.     ww = ComputeX( HelpWidth );
  475.     wh = ComputeY( HelpHeight );
  476.  
  477.     if (( wleft + ww + OffX + Scr->WBorRight ) > Scr->Width ) wleft = Scr->Width - ww;
  478.     if (( wtop + wh + OffY + Scr->WBorBottom ) > Scr->Height ) wtop = Scr->Height - wh;
  479.  
  480.     if ( ! ( g = CreateContext( &HelpGList )))
  481.         return( 1L );
  482.  
  483.     for( lc = 0, tc = 0; lc < Help_CNT; lc++ ) {
  484.  
  485.         CopyMem((char * )&HelpNGad[ lc ], (char * )&ng, (long)sizeof( struct NewGadget ));
  486.  
  487.         ng.ng_VisualInfo = VisualInfo;
  488.         ng.ng_TextAttr   = Font;
  489.         ng.ng_LeftEdge   = OffX + ComputeX( ng.ng_LeftEdge );
  490.         ng.ng_TopEdge    = OffY + ComputeY( ng.ng_TopEdge );
  491.         ng.ng_Width      = ComputeX( ng.ng_Width );
  492.         ng.ng_Height     = ComputeY( ng.ng_Height);
  493.  
  494.         HelpGadgets[ lc ] = g = CreateGadgetA((ULONG)HelpGTypes[ lc ], g, &ng, ( struct TagItem * )&HelpGTags[ tc ] );
  495.  
  496.         while( HelpGTags[ tc ] ) tc += 2;
  497.         tc++;
  498.  
  499.         if ( NOT g )
  500.             return( 2L );
  501.     }
  502.  
  503.     /**** CHANGED */
  504.     if ( ! ( HelpMenus = CreateMenus( HelpNewMenu, GTMN_NewLookMenus, 
  505.                                      TRUE, 0L, 
  506.                                      TAG_DONE )))
  507.         return( 3L );
  508.  
  509.     LayoutMenus( HelpMenus, VisualInfo, GTMN_NewLookMenus, TRUE, TAG_DONE );
  510.  
  511.         HelpZoom[0] = HelpZoom[1] = 0;
  512.     if ( HelpWdt )
  513.         HelpZoom[2] = TextLength( &Scr->RastPort, (UBYTE *)HelpWdt, strlen((char *)HelpWdt )) + 80;
  514.     else
  515.         HelpZoom[2]  = 80L;
  516.         HelpZoom[3] = Scr->WBorTop + Scr->RastPort.TxHeight + 1;
  517.  
  518.     if ( ! ( HelpWnd = OpenWindowTags( NULL,
  519.                 WA_Left,    wleft,
  520.                 WA_Top,        wtop,
  521.                 WA_Width,    ww + OffX + Scr->WBorRight,
  522.                 WA_Height,    wh + OffY + Scr->WBorBottom,
  523.                 WA_IDCMP,    BUTTONIDCMP|CHECKBOXIDCMP|CYCLEIDCMP|STRINGIDCMP|INTEGERIDCMP|IDCMP_GADGETDOWN|IDCMP_INTUITICKS|IDCMP_MOUSEMOVE|IDCMP_MOUSEBUTTONS|
  524.                         
  525.                         IDCMP_MENUPICK|IDCMP_CLOSEWINDOW|
  526.                         
  527.                         
  528.                         IDCMP_CHANGEWINDOW|IDCMP_REFRESHWINDOW,
  529.                 WA_Flags,    WFLG_DRAGBAR|WFLG_DEPTHGADGET|WFLG_CLOSEGADGET|WFLG_SMART_REFRESH|WFLG_ACTIVATE,
  530.                 WA_Gadgets,    HelpGList,
  531.                 WA_Title,    HelpWdt,
  532.                 WA_ScreenTitle,    getString(COPYRIGHT_STRING),
  533.                 WA_Zoom,    HelpZoom,
  534.                 WA_AutoAdjust,    TRUE,
  535. /**** ADDED */                  WA_NewLookMenus,TRUE,
  536.                 TAG_DONE )))
  537.     return( 4L );
  538.  
  539.     SetMenuStrip( HelpWnd, HelpMenus );
  540.     GT_RefreshWindow( HelpWnd, NULL );
  541.  
  542.     HelpRender();
  543.  
  544.     return( 0L );
  545. }
  546.  
  547. void CloseHelpWindow( void )
  548. {
  549.     if ( HelpMenus      ) {
  550.         ClearMenuStrip( HelpWnd );
  551.         FreeMenus( HelpMenus );
  552.         HelpMenus = NULL;    }
  553.  
  554.     if ( HelpWnd        ) {
  555.         CloseWindow( HelpWnd );
  556.         HelpWnd = NULL;
  557.     }
  558.  
  559.     if ( HelpGList      ) {
  560.         FreeGadgets( HelpGList );
  561.         HelpGList = NULL;
  562.     }
  563. }
  564.  
  565. int OpenHotKeyWindow( void )
  566. {
  567.     struct NewGadget    ng;
  568.     struct Gadget    *g;
  569.     UWORD        lc, tc;
  570.     UWORD        wleft = HotKeyLeft, wtop = HotKeyTop, ww, wh;
  571.  
  572.     ComputeFont( HotKeyWidth, HotKeyHeight );
  573.  
  574.     ww = ComputeX( HotKeyWidth );
  575.     wh = ComputeY( HotKeyHeight );
  576.  
  577.     if (( wleft + ww + OffX + Scr->WBorRight ) > Scr->Width ) wleft = Scr->Width - ww;
  578.     if (( wtop + wh + OffY + Scr->WBorBottom ) > Scr->Height ) wtop = Scr->Height - wh;
  579.  
  580.     if ( ! ( g = CreateContext( &HotKeyGList )))
  581.         return( 1L );
  582.  
  583.     for( lc = 0, tc = 0; lc < HotKey_CNT; lc++ ) {
  584.  
  585.         CopyMem((char * )&HotKeyNGad[ lc ], (char * )&ng, (long)sizeof( struct NewGadget ));
  586.  
  587.         ng.ng_VisualInfo = VisualInfo;
  588.         ng.ng_TextAttr   = Font;
  589.         ng.ng_LeftEdge   = OffX + ComputeX( ng.ng_LeftEdge );
  590.         ng.ng_TopEdge    = OffY + ComputeY( ng.ng_TopEdge );
  591.         ng.ng_Width      = ComputeX( ng.ng_Width );
  592.         ng.ng_Height     = ComputeY( ng.ng_Height);
  593.  
  594.         HotKeyGadgets[ lc ] = g = CreateGadgetA((ULONG)HotKeyGTypes[ lc ], g, &ng, ( struct TagItem * )&HotKeyGTags[ tc ] );
  595.  
  596.         while( HotKeyGTags[ tc ] ) tc += 2;
  597.         tc++;
  598.  
  599.         if ( NOT g )
  600.             return( 2L );
  601.     }
  602.  
  603.     if ( ! ( HotKeyWnd = OpenWindowTags( NULL,
  604.                 WA_Left,    wleft,
  605.                 WA_Top,        wtop,
  606.                 WA_Width,    ww + OffX + Scr->WBorRight,
  607.                 WA_Height,    wh + OffY + Scr->WBorBottom,
  608.                 WA_IDCMP,    LISTVIEWIDCMP|STRINGIDCMP|CYCLEIDCMP|BUTTONIDCMP|IDCMP_CLOSEWINDOW|IDCMP_VANILLAKEY|IDCMP_REFRESHWINDOW,
  609.                 WA_Flags,    WFLG_DRAGBAR|WFLG_DEPTHGADGET|WFLG_CLOSEGADGET|WFLG_SMART_REFRESH,
  610.                 WA_Gadgets,    HotKeyGList,
  611.                 WA_Title,    HotKeyWdt,
  612.                 WA_ScreenTitle, getString(COPYRIGHT_STRING),
  613.                 TAG_DONE )))
  614.     return( 4L );
  615.  
  616.     GT_RefreshWindow( HotKeyWnd, NULL );
  617.  
  618.     return( 0L );
  619. }
  620.  
  621. void CloseHotKeyWindow( void )
  622. {
  623.     if ( HotKeyWnd        ) {
  624.         CloseWindow( HotKeyWnd );
  625.         HotKeyWnd = NULL;
  626.     }
  627.  
  628.     if ( HotKeyGList      ) {
  629.         FreeGadgets( HotKeyGList );
  630.         HotKeyGList = NULL;
  631.     }
  632. }
  633.  
  634.  
  635.  
  636.