home *** CD-ROM | disk | FTP | other *** search
/ The Fred Fish Collection 1.5 / ffcollection-1-5-1992-11.iso / ff_disks / 100-199 / ff193.lzh / KeyMapEd / Source / KME_KeyReq.h < prev    next >
C/C++ Source or Header  |  1989-03-13  |  117KB  |  3,635 lines
  1. /*
  2.  * Key Map Editor Key Editor Requester
  3.  *
  4.  * by: Tim Friest
  5.  * on: January 9, 1989
  6.  * using: Power Windows 2.5
  7.  */
  8.  
  9. /*
  10.  * Some standard strings
  11.  */
  12.  
  13. char    KRAloneString[]    = "Alone";
  14. char    KRShiftString[] = "Shift";
  15. char    KRAltString[] = "Alt";
  16. char    KRShiftAltString[] = "Shift+Alt";
  17. char    KRCtrlString[] = "Ctrl";
  18. char    KRCtrlShiftString[] = "Ctrl+Shift";
  19. char    KRCtrlAltString[] = "Ctrl+Alt";
  20. char    KRVanillaString[] = "Vanilla";
  21.  
  22. /*
  23.  * Some Standard borders and Gadgets
  24.  */
  25.  
  26. SHORT KREndGadBordVectors[] = {
  27.     0,0,
  28.     57,0,
  29.     57,13,
  30.     0,13,
  31.     0,0
  32. };
  33. struct Border KREndGadBorder = {
  34.     -1,-1,    /* origin */
  35.     2,0,JAM1,    /* front pen, back pen and drawmode */
  36.     5,    /* number of vectors */
  37.     KREndGadBordVectors,    /* pointer to vectors */
  38.     NULL    /* next border */
  39. };
  40.  
  41. struct Border KRQualGadBorder = {
  42.     -1,-1,    /* origin */
  43.     3,0,JAM1,    /* front pen, back pen and drawmode */
  44.     5,    /* number of vectors */
  45.     KREndGadBordVectors,    /* pointer to vectors */
  46.     NULL    /* next border */
  47. };
  48.  
  49. struct Border KRTypeGadBorder = {
  50.     -1,-1,    /* origin */
  51.     1,0,JAM1,    /* front pen, back pen and drawmode */
  52.     5,    /* number of vectors */
  53.     KREndGadBordVectors,    /* pointer to vectors */
  54.     NULL    /* next border */
  55. };
  56.  
  57. struct IntuiText KRCancelIText = {
  58.     1,0,JAM1,    /* front and back text pens, drawmode and fill byte */
  59.     5,2,    /* origin */
  60.     NULL,    /* font pointer or NULL for default */
  61.     "Cancel",    /* pointer to text */
  62.     NULL    /* next IntuiText structure */
  63. };
  64.  
  65. struct Gadget KRCancelGadget = {
  66.     NULL,    /* next gadget */
  67.     150,122,    /* origin of hit box */
  68.     56,12,    /* hit box width and height */
  69.     GADGHCOMP,    /* flags */
  70.     RELVERIFY,    /* activation flags */
  71.     BOOLGADGET|REQGADGET,    /* type flags */
  72.     (APTR)&KREndGadBorder,    /* render border */
  73.     NULL,    /* select image */
  74.     &KRCancelIText,    /* IntuiText list */
  75.     NULL,    /* mutual-exclude (unused) */
  76.     NULL,    /* SpecialInfo structure */
  77.     0xFE,    /* GadgetID */
  78.     NULL    /* pointer to user data */
  79. };
  80.  
  81. struct IntuiText KRUseIText = {
  82.     1,0,JAM1,    /* frontpen, backpen, and drawmode */
  83.     14,2,    /* origin */
  84.     NULL,    /* font */
  85.     "Use",    /* text */
  86.     NULL    /* next IntuiText */
  87. };
  88.  
  89. struct Gadget KRUseGadget = {
  90.     &KRCancelGadget,    /* next gadget */
  91.     40,122,    /* origin of hit box */
  92.     56,12,    /* hit box width and height */
  93.     GADGHCOMP,    /* flags */
  94.     RELVERIFY,    /* activation flags */
  95.     BOOLGADGET|REQGADGET,    /* type flags */
  96.     (APTR)&KREndGadBorder,    /* render border */
  97.     NULL,    /* select image */
  98.     &KRUseIText,    /* IntuiText list */
  99.     NULL,    /* mutual-exclude (unused) */
  100.     NULL,    /* SpecialInfo structure */
  101.     0xFF,    /* GadgetID */
  102.     NULL    /* pointer to user data */
  103. };
  104.  
  105. #define KRNOPGadgetList &KRUseGadget
  106.  
  107. /*
  108.  * Key Requester Dead Requester
  109.  */
  110.  
  111. UBYTE KRDUndoBuffer[5];
  112.  
  113. /*
  114.  * Dead Key Requester Gadget Borders
  115.  */
  116.  
  117. SHORT KRDOptBordVectors[] = {
  118.     0,0,
  119.     36,0,
  120.     36,9,
  121.     0,9,
  122.     0,0
  123. };
  124. struct Border KRDOptBorder = {
  125.     -1,-1,    /* origin */
  126.     1,0,JAM1,    /* front pen, back pen and drawmode */
  127.     5,    /* number of vectors */
  128.     KRDOptBordVectors,    /* pointer to vectors */
  129.     NULL    /* next border */
  130. };
  131.  
  132. SHORT KRDNormalStrBordVectors[] = {
  133.     0,0,
  134.     41,0,
  135.     41,9,
  136.     0,9,
  137.     0,0
  138. };
  139. struct Border KRDNormalStrBorder = {
  140.     -1,-1,    /* origin */
  141.     1,0,JAM1,    /* front pen, back pen and drawmode */
  142.     5,    /* number of vectors */
  143.     KRDNormalStrBordVectors,    /* pointer to vectors */
  144.     NULL    /* next border */
  145. };
  146.  
  147. SHORT KRDModStrBordVectors[] = {
  148.     0,0,
  149.     17,0,
  150.     17,9,
  151.     0,9,
  152.     0,0
  153. };
  154. struct Border KRDModStrBorder = {
  155.     -1,-1,    /* origin */
  156.     1,0,JAM1,    /* front pen, back pen and drawmode */
  157.     5,    /* number of vectors */
  158.     KRDModStrBordVectors,    /* pointer to vectors */
  159.     NULL    /* next border */
  160. };
  161.  
  162. USHORT chip KRDAccentImageData[] = {
  163.     0xFFFF,0xC000,0x8000,0x4000,0x8000,0x4000,0x8000,0x4000,
  164.     0x8000,0x4000,0x8000,0x4000,0x8000,0x4000,0x8000,0x4000,
  165.     0x8000,0x4000,0xFFFF,0xC000
  166. };
  167. struct Image KRDAccentImage = {
  168.     -1,-1,    /* origin */
  169.     18,10,    /* width and height */
  170.     2,    /* number of bitplanes */
  171.     KRDAccentImageData,    /* ImageData */
  172.     0x0001,0x0000,    /* PlanePick and PlaneOnOff */
  173.     NULL    /* next Image */
  174. };
  175.  
  176. /*
  177.  * Dead Key Requester Gadget Text
  178.  */
  179.  
  180. struct IntuiText KRDDeadIText = {
  181.     1,0,JAM1,    /* frontpen, backpen, and drawmode */
  182.     2,0,    /* origin */
  183.     NULL,    /* font */
  184.     "Dead",    /* text */
  185.     NULL    /* next IntuiText */
  186. };
  187.  
  188. struct IntuiText KRDModIText = {
  189.     1,0,JAM1,    /* frontpen, backpen, and drawmode */
  190.     6,0,    /* origin */
  191.     NULL,    /* font */
  192.     "Mod",    /* text */
  193.     NULL    /* next IntuiText */
  194. };
  195.  
  196. struct IntuiText KRDAcc5IText = {
  197.     3,0,JAM1,    /* frontpen, backpen, and drawmode */
  198.     4,0,    /* origin */
  199.     NULL,    /* font */
  200.     "\xA8",    /* text */
  201.     NULL    /* next IntuiText */
  202. };
  203.  
  204. struct IntuiText KRDAcc4IText = {
  205.     3,0,JAM1,    /* frontpen, backpen, and drawmode */
  206.     4,0,    /* origin */
  207.     NULL,    /* font */
  208.     "~",    /* text */
  209.     NULL    /* next IntuiText */
  210. };
  211.  
  212. struct IntuiText KRDAcc3IText = {
  213.     3,0,JAM1,    /* frontpen, backpen, and drawmode */
  214.     4,0,    /* origin */
  215.     NULL,    /* font */
  216.     "^",    /* text */
  217.     NULL    /* next IntuiText */
  218. };
  219.  
  220. struct IntuiText KRDAcc2IText = {
  221.     3,0,JAM1,    /* frontpen, backpen, and drawmode */
  222.     4,0,    /* origin */
  223.     NULL,    /* font */
  224.     "`",    /* text */
  225.     NULL    /* next IntuiText */
  226. };
  227.  
  228. struct IntuiText KRDAcc1IText = {
  229.     3,0,JAM1,    /* frontpen, backpen, and drawmode */
  230.     4,0,    /* origin */
  231.     NULL,    /* font */
  232.     "\xB4",    /* text */
  233.     NULL    /* next IntuiText */
  234. };
  235.  
  236. /*
  237.  * Dead Key Requester Vanilla gadgets
  238.  */
  239.  
  240. struct Gadget KRDVanillaAcc5Gadget = {
  241.     &KRUseGadget,    /* next gadget */
  242.     218,109,    /* origin of hit box */
  243.     16,8,    /* hit box width and height */
  244.     GADGHCOMP|GADGIMAGE,    /* flags */
  245.     RELVERIFY|TOGGLESELECT,    /* activation flags */
  246.     BOOLGADGET|REQGADGET,    /* type flags */
  247.     (APTR)&KRDAccentImage,    /* render image */
  248.     NULL,    /* select image */
  249.     &KRDAcc5IText,    /* IntuiText list */
  250.     NULL,    /* mutual-exclude (unused) */
  251.     NULL,    /* SpecialInfo structure */
  252.     0xBD,    /* GadgetID */
  253.     NULL    /* pointer to user data */
  254. };
  255.  
  256. struct Gadget KRDVanillaAcc4Gadget = {
  257.     &KRDVanillaAcc5Gadget,    /* next gadget */
  258.     201,109,    /* origin of hit box */
  259.     16,8,    /* hit box width and height */
  260.     GADGHCOMP|GADGIMAGE,    /* flags */
  261.     RELVERIFY|TOGGLESELECT,    /* activation flags */
  262.     BOOLGADGET|REQGADGET,    /* type flags */
  263.     (APTR)&KRDAccentImage,    /* render image */
  264.     NULL,    /* select image */
  265.     &KRDAcc4IText,    /* IntuiText list */
  266.     NULL,    /* mutual-exclude (unused) */
  267.     NULL,    /* SpecialInfo structure */
  268.     0xBC,    /* GadgetID */
  269.     NULL    /* pointer to user data */
  270. };
  271.  
  272. struct Gadget KRDVanillaAcc3Gadget = {
  273.     &KRDVanillaAcc4Gadget,    /* next gadget */
  274.     184,109,    /* origin of hit box */
  275.     16,8,    /* hit box width and height */
  276.     GADGHCOMP|GADGIMAGE,    /* flags */
  277.     RELVERIFY|TOGGLESELECT,    /* activation flags */
  278.     BOOLGADGET|REQGADGET,    /* type flags */
  279.     (APTR)&KRDAccentImage,    /* render image */
  280.     NULL,    /* select image */
  281.     &KRDAcc3IText,    /* IntuiText list */
  282.     NULL,    /* mutual-exclude (unused) */
  283.     NULL,    /* SpecialInfo structure */
  284.     0xBB,    /* GadgetID */
  285.     NULL    /* pointer to user data */
  286. };
  287.  
  288. struct Gadget KRDVanillaAcc2Gadget = {
  289.     &KRDVanillaAcc3Gadget,    /* next gadget */
  290.     167,109,    /* origin of hit box */
  291.     16,8,    /* hit box width and height */
  292.     GADGHCOMP|GADGIMAGE,    /* flags */
  293.     RELVERIFY|TOGGLESELECT,    /* activation flags */
  294.     BOOLGADGET|REQGADGET,    /* type flags */
  295.     (APTR)&KRDAccentImage,    /* render image */
  296.     NULL,    /* select image */
  297.     &KRDAcc2IText,    /* IntuiText list */
  298.     NULL,    /* mutual-exclude (unused) */
  299.     NULL,    /* SpecialInfo structure */
  300.     0xBA,    /* GadgetID */
  301.     NULL    /* pointer to user data */
  302. };
  303.  
  304. struct Gadget KRDVanillaAcc1Gadget = {
  305.     &KRDVanillaAcc2Gadget,    /* next gadget */
  306.     150,109,    /* origin of hit box */
  307.     16,8,    /* hit box width and height */
  308.     GADGHCOMP|GADGIMAGE,    /* flags */
  309.     RELVERIFY|TOGGLESELECT,    /* activation flags */
  310.     BOOLGADGET|REQGADGET,    /* type flags */
  311.     (APTR)&KRDAccentImage,    /* render image */
  312.     NULL,    /* select image */
  313.     &KRDAcc1IText,    /* IntuiText list */
  314.     NULL,    /* mutual-exclude (unused) */
  315.     NULL,    /* SpecialInfo structure */
  316.     0xB9,    /* GadgetID */
  317.     NULL    /* pointer to user data */
  318. };
  319.  
  320. UBYTE KRDVanillaMod5StrGadSIBuff[5];
  321. struct StringInfo KRDVanillaMod5StrGadSInfo = {
  322.     KRDVanillaMod5StrGadSIBuff,    /* buffer where text will be edited */
  323.     KRDUndoBuffer,    /* optional undo buffer */
  324.     0,    /* character position in buffer */
  325.     5,    /* maximum number of characters */
  326.     0,    /* first displayed character buffer position */
  327.     0,0,0,0,0,    /* Intuition initialized and maintained variables */
  328.     0,    /* Rastport of gadget */
  329.     0,    /* initial value for integer gadgets */
  330.     NULL    /* alternate keymap (fill in if you set the flag) */
  331. };
  332.  
  333. struct Gadget KRDVanillaMod5StrGadget = {
  334.     &KRUseGadget,    /* next gadget */
  335.     226,109,    /* origin of hit box */
  336.     16,8,    /* hit box width and height */
  337.     NULL,    /* flags */
  338.     RELVERIFY|STRINGCENTER,    /* activation flags */
  339.     STRGADGET|REQGADGET,    /* type flags */
  340.     (APTR)&KRDModStrBorder,    /* render border */
  341.     NULL,    /* select image */
  342.     NULL,    /* IntuiText list */
  343.     NULL,    /* mutual-exclude (unused) */
  344.     (APTR)&KRDVanillaMod5StrGadSInfo,    /* SpecialInfo structure */
  345.     0xB8,    /* GadgetID */
  346.     NULL    /* pointer to user data */
  347. };
  348.  
  349. UBYTE KRDVanillaMod4StrGadSIBuff[5];
  350. struct StringInfo KRDVanillaMod4StrGadSInfo = {
  351.     KRDVanillaMod4StrGadSIBuff,    /* buffer where text will be edited */
  352.     KRDUndoBuffer,    /* optional undo buffer */
  353.     0,    /* character position in buffer */
  354.     5,    /* maximum number of characters */
  355.     0,    /* first displayed character buffer position */
  356.     0,0,0,0,0,    /* Intuition initialized and maintained variables */
  357.     0,    /* Rastport of gadget */
  358.     0,    /* initial value for integer gadgets */
  359.     NULL    /* alternate keymap (fill in if you set the flag) */
  360. };
  361.  
  362. struct Gadget KRDVanillaMod4StrGadget = {
  363.     &KRDVanillaMod5StrGadget,    /* next gadget */
  364.     209,109,    /* origin of hit box */
  365.     16,8,    /* hit box width and height */
  366.     NULL,    /* flags */
  367.     RELVERIFY|STRINGCENTER,    /* activation flags */
  368.     STRGADGET|REQGADGET,    /* type flags */
  369.     (APTR)&KRDModStrBorder,    /* render border */
  370.     NULL,    /* select image */
  371.     NULL,    /* IntuiText list */
  372.     NULL,    /* mutual-exclude (unused) */
  373.     (APTR)&KRDVanillaMod4StrGadSInfo,    /* SpecialInfo structure */
  374.     0xB7,    /* GadgetID */
  375.     NULL    /* pointer to user data */
  376. };
  377.  
  378. UBYTE KRDVanillaMod3StrGadSIBuff[5];
  379. struct StringInfo KRDVanillaMod3StrGadSInfo = {
  380.     KRDVanillaMod3StrGadSIBuff,    /* buffer where text will be edited */
  381.     KRDUndoBuffer,    /* optional undo buffer */
  382.     0,    /* character position in buffer */
  383.     5,    /* maximum number of characters */
  384.     0,    /* first displayed character buffer position */
  385.     0,0,0,0,0,    /* Intuition initialized and maintained variables */
  386.     0,    /* Rastport of gadget */
  387.     0,    /* initial value for integer gadgets */
  388.     NULL    /* alternate keymap (fill in if you set the flag) */
  389. };
  390.  
  391. struct Gadget KRDVanillaMod3StrGadget = {
  392.     &KRDVanillaMod4StrGadget,    /* next gadget */
  393.     192,109,    /* origin of hit box */
  394.     16,8,    /* hit box width and height */
  395.     NULL,    /* flags */
  396.     RELVERIFY|STRINGCENTER,    /* activation flags */
  397.     STRGADGET|REQGADGET,    /* type flags */
  398.     (APTR)&KRDModStrBorder,    /* render border */
  399.     NULL,    /* select image */
  400.     NULL,    /* IntuiText list */
  401.     NULL,    /* mutual-exclude (unused) */
  402.     (APTR)&KRDVanillaMod3StrGadSInfo,    /* SpecialInfo structure */
  403.     0xB6,    /* GadgetID */
  404.     NULL    /* pointer to user data */
  405. };
  406.  
  407. UBYTE KRDVanillaMod2StrGadSIBuff[5];
  408. struct StringInfo KRDVanillaMod2StrGadSInfo = {
  409.     KRDVanillaMod2StrGadSIBuff,    /* buffer where text will be edited */
  410.     KRDUndoBuffer,    /* optional undo buffer */
  411.     0,    /* character position in buffer */
  412.     5,    /* maximum number of characters */
  413.     0,    /* first displayed character buffer position */
  414.     0,0,0,0,0,    /* Intuition initialized and maintained variables */
  415.     0,    /* Rastport of gadget */
  416.     0,    /* initial value for integer gadgets */
  417.     NULL    /* alternate keymap (fill in if you set the flag) */
  418. };
  419.  
  420. struct Gadget KRDVanillaMod2StrGadget = {
  421.     &KRDVanillaMod3StrGadget,    /* next gadget */
  422.     175,109,    /* origin of hit box */
  423.     16,8,    /* hit box width and height */
  424.     NULL,    /* flags */
  425.     RELVERIFY|STRINGCENTER,    /* activation flags */
  426.     STRGADGET|REQGADGET,    /* type flags */
  427.     (APTR)&KRDModStrBorder,    /* render border */
  428.     NULL,    /* select image */
  429.     NULL,    /* IntuiText list */
  430.     NULL,    /* mutual-exclude (unused) */
  431.     (APTR)&KRDVanillaMod2StrGadSInfo,    /* SpecialInfo structure */
  432.     0xB5,    /* GadgetID */
  433.     NULL    /* pointer to user data */
  434. };
  435.  
  436. UBYTE KRDVanillaMod1StrGadSIBuff[5];
  437. struct StringInfo KRDVanillaMod1StrGadSInfo = {
  438.     KRDVanillaMod1StrGadSIBuff,    /* buffer where text will be edited */
  439.     KRDUndoBuffer,    /* optional undo buffer */
  440.     0,    /* character position in buffer */
  441.     5,    /* maximum number of characters */
  442.     0,    /* first displayed character buffer position */
  443.     0,0,0,0,0,    /* Intuition initialized and maintained variables */
  444.     0,    /* Rastport of gadget */
  445.     0,    /* initial value for integer gadgets */
  446.     NULL    /* alternate keymap (fill in if you set the flag) */
  447. };
  448.  
  449. struct Gadget KRDVanillaMod1StrGadget = {
  450.     &KRDVanillaMod2StrGadget,    /* next gadget */
  451.     158,109,    /* origin of hit box */
  452.     16,8,    /* hit box width and height */
  453.     NULL,    /* flags */
  454.     RELVERIFY|STRINGCENTER,    /* activation flags */
  455.     STRGADGET|REQGADGET,    /* type flags */
  456.     (APTR)&KRDModStrBorder,    /* render border */
  457.     NULL,    /* select image */
  458.     NULL,    /* IntuiText list */
  459.     NULL,    /* mutual-exclude (unused) */
  460.     (APTR)&KRDVanillaMod1StrGadSInfo,    /* SpecialInfo structure */
  461.     0xB4,    /* GadgetID */
  462.     NULL    /* pointer to user data */
  463. };
  464.  
  465. UBYTE KRDVanillaMod0StrGadSIBuff[5];
  466. struct StringInfo KRDVanillaMod0StrGadSInfo = {
  467.     KRDVanillaMod0StrGadSIBuff,    /* buffer where text will be edited */
  468.     KRDUndoBuffer,    /* optional undo buffer */
  469.     0,    /* character position in buffer */
  470.     5,    /* maximum number of characters */
  471.     0,    /* first displayed character buffer position */
  472.     0,0,0,0,0,    /* Intuition initialized and maintained variables */
  473.     0,    /* Rastport of gadget */
  474.     0,    /* initial value for integer gadgets */
  475.     NULL    /* alternate keymap (fill in if you set the flag) */
  476. };
  477.  
  478. struct Gadget KRDVanillaMod0StrGadget = {
  479.     &KRDVanillaMod1StrGadget,    /* next gadget */
  480.     141,109,    /* origin of hit box */
  481.     16,8,    /* hit box width and height */
  482.     NULL,    /* flags */
  483.     RELVERIFY|STRINGCENTER,    /* activation flags */
  484.     STRGADGET|REQGADGET,    /* type flags */
  485.     (APTR)&KRDModStrBorder,    /* render border */
  486.     NULL,    /* select image */
  487.     NULL,    /* IntuiText list */
  488.     NULL,    /* mutual-exclude (unused) */
  489.     (APTR)&KRDVanillaMod0StrGadSInfo,    /* SpecialInfo structure */
  490.     0xB3,    /* GadgetID */
  491.     NULL    /* pointer to user data */
  492. };
  493.  
  494. UBYTE KRDVanillaNormalStrGadSIBuff[5];
  495. struct StringInfo KRDVanillaNormalStrGadSInfo = {
  496.     KRDVanillaNormalStrGadSIBuff,    /* buffer where text will be edited */
  497.     KRDUndoBuffer,    /* optional undo buffer */
  498.     0,    /* character position in buffer */
  499.     5,    /* maximum number of characters */
  500.     0,    /* first displayed character buffer position */
  501.     0,0,0,0,0,    /* Intuition initialized and maintained variables */
  502.     0,    /* Rastport of gadget */
  503.     0,    /* initial value for integer gadgets */
  504.     NULL    /* alternate keymap (fill in if you set the flag) */
  505. };
  506.  
  507. struct Gadget KRDVanillaNormalStrGadget = {
  508.     &KRUseGadget,    /* next gadget */
  509.     171,109,    /* origin of hit box */
  510.     40,8,    /* hit box width and height */
  511.     NULL,    /* flags */
  512.     RELVERIFY|STRINGCENTER,    /* activation flags */
  513.     STRGADGET|REQGADGET,    /* type flags */
  514.     (APTR)&KRDNormalStrBorder,    /* render border */
  515.     NULL,    /* select image */
  516.     NULL,    /* IntuiText list */
  517.     NULL,    /* mutual-exclude (unused) */
  518.     (APTR)&KRDVanillaNormalStrGadSInfo,    /* SpecialInfo structure */
  519.     0xB2,    /* GadgetID */
  520.     NULL    /* pointer to user data */
  521. };
  522.  
  523. struct Gadget KRDVanillaDeadGadget = {
  524.     &KRDVanillaNormalStrGadget,    /* next gadget */
  525.     105,109,    /* origin of hit box */
  526.     35,8,    /* hit box width and height */
  527.     GADGHCOMP,    /* flags */
  528.     RELVERIFY|ENDGADGET|TOGGLESELECT,    /* activation flags */
  529.     BOOLGADGET|REQGADGET,    /* type flags */
  530.     (APTR)&KRDOptBorder,    /* render border */
  531.     NULL,    /* select image */
  532.     &KRDDeadIText,    /* IntuiText list */
  533.     NULL,    /* mutual-exclude (unused) */
  534.     NULL,    /* SpecialInfo structure */
  535.     0xB1,    /* GadgetID */
  536.     NULL    /* pointer to user data */
  537. };
  538.  
  539. struct Gadget KRDVanillaModGadget = {
  540.     &KRDVanillaDeadGadget,    /* next gadget */
  541.     69,109,    /* origin of hit box */
  542.     35,8,    /* hit box width and height */
  543.     GADGHCOMP,    /* flags */
  544.     RELVERIFY|ENDGADGET|TOGGLESELECT,    /* activation flags */
  545.     BOOLGADGET|REQGADGET,    /* type flags */
  546.     (APTR)&KRDOptBorder,    /* render border */
  547.     NULL,    /* select image */
  548.     &KRDModIText,    /* IntuiText list */
  549.     NULL,    /* mutual-exclude (unused) */
  550.     NULL,    /* SpecialInfo structure */
  551.     0xB0,    /* GadgetID */
  552.     NULL    /* pointer to user data */
  553. };
  554.  
  555. /*
  556.  * Dead Key Requester CtrlAlt gadgets
  557.  */
  558.  
  559. struct Gadget KRDCtrlAltAcc5Gadget = {
  560.     &KRDVanillaModGadget,    /* next gadget */
  561.     218,100,    /* origin of hit box */
  562.     16,8,    /* hit box width and height */
  563.     GADGHCOMP|GADGIMAGE,    /* flags */
  564.     RELVERIFY|TOGGLESELECT,    /* activation flags */
  565.     BOOLGADGET|REQGADGET,    /* type flags */
  566.     (APTR)&KRDAccentImage,    /* render image */
  567.     NULL,    /* select image */
  568.     &KRDAcc5IText,    /* IntuiText list */
  569.     NULL,    /* mutual-exclude (unused) */
  570.     NULL,    /* SpecialInfo structure */
  571.     0xAD,    /* GadgetID */
  572.     NULL    /* pointer to user data */
  573. };
  574.  
  575. struct Gadget KRDCtrlAltAcc4Gadget = {
  576.     &KRDCtrlAltAcc5Gadget,    /* next gadget */
  577.     201,100,    /* origin of hit box */
  578.     16,8,    /* hit box width and height */
  579.     GADGHCOMP|GADGIMAGE,    /* flags */
  580.     RELVERIFY|TOGGLESELECT,    /* activation flags */
  581.     BOOLGADGET|REQGADGET,    /* type flags */
  582.     (APTR)&KRDAccentImage,    /* render image */
  583.     NULL,    /* select image */
  584.     &KRDAcc4IText,    /* IntuiText list */
  585.     NULL,    /* mutual-exclude (unused) */
  586.     NULL,    /* SpecialInfo structure */
  587.     0xAC,    /* GadgetID */
  588.     NULL    /* pointer to user data */
  589. };
  590.  
  591. struct Gadget KRDCtrlAltAcc3Gadget = {
  592.     &KRDCtrlAltAcc4Gadget,    /* next gadget */
  593.     184,100,    /* origin of hit box */
  594.     16,8,    /* hit box width and height */
  595.     GADGHCOMP|GADGIMAGE,    /* flags */
  596.     RELVERIFY|TOGGLESELECT,    /* activation flags */
  597.     BOOLGADGET|REQGADGET,    /* type flags */
  598.     (APTR)&KRDAccentImage,    /* render image */
  599.     NULL,    /* select image */
  600.     &KRDAcc3IText,    /* IntuiText list */
  601.     NULL,    /* mutual-exclude (unused) */
  602.     NULL,    /* SpecialInfo structure */
  603.     0xAB,    /* GadgetID */
  604.     NULL    /* pointer to user data */
  605. };
  606.  
  607. struct Gadget KRDCtrlAltAcc2Gadget = {
  608.     &KRDCtrlAltAcc3Gadget,    /* next gadget */
  609.     167,100,    /* origin of hit box */
  610.     16,8,    /* hit box width and height */
  611.     GADGHCOMP|GADGIMAGE,    /* flags */
  612.     RELVERIFY|TOGGLESELECT,    /* activation flags */
  613.     BOOLGADGET|REQGADGET,    /* type flags */
  614.     (APTR)&KRDAccentImage,    /* render image */
  615.     NULL,    /* select image */
  616.     &KRDAcc2IText,    /* IntuiText list */
  617.     NULL,    /* mutual-exclude (unused) */
  618.     NULL,    /* SpecialInfo structure */
  619.     0xAA,    /* GadgetID */
  620.     NULL    /* pointer to user data */
  621. };
  622.  
  623. struct Gadget KRDCtrlAltAcc1Gadget = {
  624.     &KRDCtrlAltAcc2Gadget,    /* next gadget */
  625.     150,100,    /* origin of hit box */
  626.     16,8,    /* hit box width and height */
  627.     GADGHCOMP|GADGIMAGE,    /* flags */
  628.     RELVERIFY|TOGGLESELECT,    /* activation flags */
  629.     BOOLGADGET|REQGADGET,    /* type flags */
  630.     (APTR)&KRDAccentImage,    /* render image */
  631.     NULL,    /* select image */
  632.     &KRDAcc1IText,    /* IntuiText list */
  633.     NULL,    /* mutual-exclude (unused) */
  634.     NULL,    /* SpecialInfo structure */
  635.     0xA9,    /* GadgetID */
  636.     NULL    /* pointer to user data */
  637. };
  638.  
  639. UBYTE KRDCtrlAltMod5StrGadSIBuff[5];
  640. struct StringInfo KRDCtrlAltMod5StrGadSInfo = {
  641.     KRDCtrlAltMod5StrGadSIBuff,    /* buffer where text will be edited */
  642.     KRDUndoBuffer,    /* optional undo buffer */
  643.     0,    /* character position in buffer */
  644.     5,    /* maximum number of characters */
  645.     0,    /* first displayed character buffer position */
  646.     0,0,0,0,0,    /* Intuition initialized and maintained variables */
  647.     0,    /* Rastport of gadget */
  648.     0,    /* initial value for integer gadgets */
  649.     NULL    /* alternate keymap (fill in if you set the flag) */
  650. };
  651.  
  652. struct Gadget KRDCtrlAltMod5StrGadget = {
  653.     &KRDVanillaModGadget,    /* next gadget */
  654.     226,100,    /* origin of hit box */
  655.     16,8,    /* hit box width and height */
  656.     NULL,    /* flags */
  657.     RELVERIFY|STRINGCENTER,    /* activation flags */
  658.     STRGADGET|REQGADGET,    /* type flags */
  659.     (APTR)&KRDModStrBorder,    /* render border */
  660.     NULL,    /* select image */
  661.     NULL,    /* IntuiText list */
  662.     NULL,    /* mutual-exclude (unused) */
  663.     (APTR)&KRDCtrlAltMod5StrGadSInfo,    /* SpecialInfo structure */
  664.     0xA8,    /* GadgetID */
  665.     NULL    /* pointer to user data */
  666. };
  667.  
  668. UBYTE KRDCtrlAltMod4StrGadSIBuff[5];
  669. struct StringInfo KRDCtrlAltMod4StrGadSInfo = {
  670.     KRDCtrlAltMod4StrGadSIBuff,    /* buffer where text will be edited */
  671.     KRDUndoBuffer,    /* optional undo buffer */
  672.     0,    /* character position in buffer */
  673.     5,    /* maximum number of characters */
  674.     0,    /* first displayed character buffer position */
  675.     0,0,0,0,0,    /* Intuition initialized and maintained variables */
  676.     0,    /* Rastport of gadget */
  677.     0,    /* initial value for integer gadgets */
  678.     NULL    /* alternate keymap (fill in if you set the flag) */
  679. };
  680.  
  681. struct Gadget KRDCtrlAltMod4StrGadget = {
  682.     &KRDCtrlAltMod5StrGadget,    /* next gadget */
  683.     209,100,    /* origin of hit box */
  684.     16,8,    /* hit box width and height */
  685.     NULL,    /* flags */
  686.     RELVERIFY|STRINGCENTER,    /* activation flags */
  687.     STRGADGET|REQGADGET,    /* type flags */
  688.     (APTR)&KRDModStrBorder,    /* render border */
  689.     NULL,    /* select image */
  690.     NULL,    /* IntuiText list */
  691.     NULL,    /* mutual-exclude (unused) */
  692.     (APTR)&KRDCtrlAltMod4StrGadSInfo,    /* SpecialInfo structure */
  693.     0xA7,    /* GadgetID */
  694.     NULL    /* pointer to user data */
  695. };
  696.  
  697. UBYTE KRDCtrlAltMod3StrGadSIBuff[5];
  698. struct StringInfo KRDCtrlAltMod3StrGadSInfo = {
  699.     KRDCtrlAltMod3StrGadSIBuff,    /* buffer where text will be edited */
  700.     KRDUndoBuffer,    /* optional undo buffer */
  701.     0,    /* character position in buffer */
  702.     5,    /* maximum number of characters */
  703.     0,    /* first displayed character buffer position */
  704.     0,0,0,0,0,    /* Intuition initialized and maintained variables */
  705.     0,    /* Rastport of gadget */
  706.     0,    /* initial value for integer gadgets */
  707.     NULL    /* alternate keymap (fill in if you set the flag) */
  708. };
  709.  
  710. struct Gadget KRDCtrlAltMod3StrGadget = {
  711.     &KRDCtrlAltMod4StrGadget,    /* next gadget */
  712.     192,100,    /* origin of hit box */
  713.     16,8,    /* hit box width and height */
  714.     NULL,    /* flags */
  715.     RELVERIFY|STRINGCENTER,    /* activation flags */
  716.     STRGADGET|REQGADGET,    /* type flags */
  717.     (APTR)&KRDModStrBorder,    /* render border */
  718.     NULL,    /* select image */
  719.     NULL,    /* IntuiText list */
  720.     NULL,    /* mutual-exclude (unused) */
  721.     (APTR)&KRDCtrlAltMod3StrGadSInfo,    /* SpecialInfo structure */
  722.     0xA6,    /* GadgetID */
  723.     NULL    /* pointer to user data */
  724. };
  725.  
  726. UBYTE KRDCtrlAltMod2StrGadSIBuff[5];
  727. struct StringInfo KRDCtrlAltMod2StrGadSInfo = {
  728.     KRDCtrlAltMod2StrGadSIBuff,    /* buffer where text will be edited */
  729.     KRDUndoBuffer,    /* optional undo buffer */
  730.     0,    /* character position in buffer */
  731.     5,    /* maximum number of characters */
  732.     0,    /* first displayed character buffer position */
  733.     0,0,0,0,0,    /* Intuition initialized and maintained variables */
  734.     0,    /* Rastport of gadget */
  735.     0,    /* initial value for integer gadgets */
  736.     NULL    /* alternate keymap (fill in if you set the flag) */
  737. };
  738.  
  739. struct Gadget KRDCtrlAltMod2StrGadget = {
  740.     &KRDCtrlAltMod3StrGadget,    /* next gadget */
  741.     175,100,    /* origin of hit box */
  742.     16,8,    /* hit box width and height */
  743.     NULL,    /* flags */
  744.     RELVERIFY|STRINGCENTER,    /* activation flags */
  745.     STRGADGET|REQGADGET,    /* type flags */
  746.     (APTR)&KRDModStrBorder,    /* render border */
  747.     NULL,    /* select image */
  748.     NULL,    /* IntuiText list */
  749.     NULL,    /* mutual-exclude (unused) */
  750.     (APTR)&KRDCtrlAltMod2StrGadSInfo,    /* SpecialInfo structure */
  751.     0xA5,    /* GadgetID */
  752.     NULL    /* pointer to user data */
  753. };
  754.  
  755. UBYTE KRDCtrlAltMod1StrGadSIBuff[5];
  756. struct StringInfo KRDCtrlAltMod1StrGadSInfo = {
  757.     KRDCtrlAltMod1StrGadSIBuff,    /* buffer where text will be edited */
  758.     KRDUndoBuffer,    /* optional undo buffer */
  759.     0,    /* character position in buffer */
  760.     5,    /* maximum number of characters */
  761.     0,    /* first displayed character buffer position */
  762.     0,0,0,0,0,    /* Intuition initialized and maintained variables */
  763.     0,    /* Rastport of gadget */
  764.     0,    /* initial value for integer gadgets */
  765.     NULL    /* alternate keymap (fill in if you set the flag) */
  766. };
  767.  
  768. struct Gadget KRDCtrlAltMod1StrGadget = {
  769.     &KRDCtrlAltMod2StrGadget,    /* next gadget */
  770.     158,100,    /* origin of hit box */
  771.     16,8,    /* hit box width and height */
  772.     NULL,    /* flags */
  773.     RELVERIFY|STRINGCENTER,    /* activation flags */
  774.     STRGADGET|REQGADGET,    /* type flags */
  775.     (APTR)&KRDModStrBorder,    /* render border */
  776.     NULL,    /* select image */
  777.     NULL,    /* IntuiText list */
  778.     NULL,    /* mutual-exclude (unused) */
  779.     (APTR)&KRDCtrlAltMod1StrGadSInfo,    /* SpecialInfo structure */
  780.     0xA4,    /* GadgetID */
  781.     NULL    /* pointer to user data */
  782. };
  783.  
  784. UBYTE KRDCtrlAltMod0StrGadSIBuff[5];
  785. struct StringInfo KRDCtrlAltMod0StrGadSInfo = {
  786.     KRDCtrlAltMod0StrGadSIBuff,    /* buffer where text will be edited */
  787.     KRDUndoBuffer,    /* optional undo buffer */
  788.     0,    /* character position in buffer */
  789.     5,    /* maximum number of characters */
  790.     0,    /* first displayed character buffer position */
  791.     0,0,0,0,0,    /* Intuition initialized and maintained variables */
  792.     0,    /* Rastport of gadget */
  793.     0,    /* initial value for integer gadgets */
  794.     NULL    /* alternate keymap (fill in if you set the flag) */
  795. };
  796.  
  797. struct Gadget KRDCtrlAltMod0StrGadget = {
  798.     &KRDCtrlAltMod1StrGadget,    /* next gadget */
  799.     141,100,    /* origin of hit box */
  800.     16,8,    /* hit box width and height */
  801.     NULL,    /* flags */
  802.     RELVERIFY|STRINGCENTER,    /* activation flags */
  803.     STRGADGET|REQGADGET,    /* type flags */
  804.     (APTR)&KRDModStrBorder,    /* render border */
  805.     NULL,    /* select image */
  806.     NULL,    /* IntuiText list */
  807.     NULL,    /* mutual-exclude (unused) */
  808.     (APTR)&KRDCtrlAltMod0StrGadSInfo,    /* SpecialInfo structure */
  809.     0xA3,    /* GadgetID */
  810.     NULL    /* pointer to user data */
  811. };
  812.  
  813. UBYTE KRDCtrlAltNormalStrGadSIBuff[5];
  814. struct StringInfo KRDCtrlAltNormalStrGadSInfo = {
  815.     KRDCtrlAltNormalStrGadSIBuff,    /* buffer where text will be edited */
  816.     KRDUndoBuffer,    /* optional undo buffer */
  817.     0,    /* character position in buffer */
  818.     5,    /* maximum number of characters */
  819.     0,    /* first displayed character buffer position */
  820.     0,0,0,0,0,    /* Intuition initialized and maintained variables */
  821.     0,    /* Rastport of gadget */
  822.     0,    /* initial value for integer gadgets */
  823.     NULL    /* alternate keymap (fill in if you set the flag) */
  824. };
  825.  
  826. struct Gadget KRDCtrlAltNormalStrGadget = {
  827.     &KRDVanillaModGadget,    /* next gadget */
  828.     171,100,    /* origin of hit box */
  829.     40,8,    /* hit box width and height */
  830.     NULL,    /* flags */
  831.     RELVERIFY|STRINGCENTER,    /* activation flags */
  832.     STRGADGET|REQGADGET,    /* type flags */
  833.     (APTR)&KRDNormalStrBorder,    /* render border */
  834.     NULL,    /* select image */
  835.     NULL,    /* IntuiText list */
  836.     NULL,    /* mutual-exclude (unused) */
  837.     (APTR)&KRDCtrlAltNormalStrGadSInfo,    /* SpecialInfo structure */
  838.     0xA2,    /* GadgetID */
  839.     NULL    /* pointer to user data */
  840. };
  841.  
  842. struct Gadget KRDCtrlAltDeadGadget = {
  843.     &KRDCtrlAltNormalStrGadget,    /* next gadget */
  844.     105,100,    /* origin of hit box */
  845.     35,8,    /* hit box width and height */
  846.     GADGHCOMP,    /* flags */
  847.     RELVERIFY|ENDGADGET|TOGGLESELECT,    /* activation flags */
  848.     BOOLGADGET|REQGADGET,    /* type flags */
  849.     (APTR)&KRDOptBorder,    /* render border */
  850.     NULL,    /* select image */
  851.     &KRDDeadIText,    /* IntuiText list */
  852.     NULL,    /* mutual-exclude (unused) */
  853.     NULL,    /* SpecialInfo structure */
  854.     0xA1,    /* GadgetID */
  855.     NULL    /* pointer to user data */
  856. };
  857.  
  858. struct Gadget KRDCtrlAltModGadget = {
  859.     &KRDCtrlAltDeadGadget,    /* next gadget */
  860.     69,100,    /* origin of hit box */
  861.     35,8,    /* hit box width and height */
  862.     GADGHCOMP,    /* flags */
  863.     RELVERIFY|ENDGADGET|TOGGLESELECT,    /* activation flags */
  864.     BOOLGADGET|REQGADGET,    /* type flags */
  865.     (APTR)&KRDOptBorder,    /* render border */
  866.     NULL,    /* select image */
  867.     &KRDModIText,    /* IntuiText list */
  868.     NULL,    /* mutual-exclude (unused) */
  869.     NULL,    /* SpecialInfo structure */
  870.     0xA0,    /* GadgetID */
  871.     NULL    /* pointer to user data */
  872. };
  873.  
  874. /*
  875.  * Dead Key Requester CtrlShift gadgets
  876.  */
  877.  
  878. struct Gadget KRDCtrlShiftAcc5Gadget = {
  879.     &KRDCtrlAltModGadget,    /* next gadget */
  880.     218,91,    /* origin of hit box */
  881.     16,8,    /* hit box width and height */
  882.     GADGHCOMP|GADGIMAGE,    /* flags */
  883.     RELVERIFY|TOGGLESELECT,    /* activation flags */
  884.     BOOLGADGET|REQGADGET,    /* type flags */
  885.     (APTR)&KRDAccentImage,    /* render image */
  886.     NULL,    /* select image */
  887.     &KRDAcc5IText,    /* IntuiText list */
  888.     NULL,    /* mutual-exclude (unused) */
  889.     NULL,    /* SpecialInfo structure */
  890.     0x9D,    /* GadgetID */
  891.     NULL    /* pointer to user data */
  892. };
  893.  
  894. struct Gadget KRDCtrlShiftAcc4Gadget = {
  895.     &KRDCtrlShiftAcc5Gadget,    /* next gadget */
  896.     201,91,    /* origin of hit box */
  897.     16,8,    /* hit box width and height */
  898.     GADGHCOMP|GADGIMAGE,    /* flags */
  899.     RELVERIFY|TOGGLESELECT,    /* activation flags */
  900.     BOOLGADGET|REQGADGET,    /* type flags */
  901.     (APTR)&KRDAccentImage,    /* render image */
  902.     NULL,    /* select image */
  903.     &KRDAcc4IText,    /* IntuiText list */
  904.     NULL,    /* mutual-exclude (unused) */
  905.     NULL,    /* SpecialInfo structure */
  906.     0x9C,    /* GadgetID */
  907.     NULL    /* pointer to user data */
  908. };
  909.  
  910. struct Gadget KRDCtrlShiftAcc3Gadget = {
  911.     &KRDCtrlShiftAcc4Gadget,    /* next gadget */
  912.     184,91,    /* origin of hit box */
  913.     16,8,    /* hit box width and height */
  914.     GADGHCOMP|GADGIMAGE,    /* flags */
  915.     RELVERIFY|TOGGLESELECT,    /* activation flags */
  916.     BOOLGADGET|REQGADGET,    /* type flags */
  917.     (APTR)&KRDAccentImage,    /* render image */
  918.     NULL,    /* select image */
  919.     &KRDAcc3IText,    /* IntuiText list */
  920.     NULL,    /* mutual-exclude (unused) */
  921.     NULL,    /* SpecialInfo structure */
  922.     0x9B,    /* GadgetID */
  923.     NULL    /* pointer to user data */
  924. };
  925.  
  926. struct Gadget KRDCtrlShiftAcc2Gadget = {
  927.     &KRDCtrlShiftAcc3Gadget,    /* next gadget */
  928.     167,91,    /* origin of hit box */
  929.     16,8,    /* hit box width and height */
  930.     GADGHCOMP|GADGIMAGE,    /* flags */
  931.     RELVERIFY|TOGGLESELECT,    /* activation flags */
  932.     BOOLGADGET|REQGADGET,    /* type flags */
  933.     (APTR)&KRDAccentImage,    /* render image */
  934.     NULL,    /* select image */
  935.     &KRDAcc2IText,    /* IntuiText list */
  936.     NULL,    /* mutual-exclude (unused) */
  937.     NULL,    /* SpecialInfo structure */
  938.     0x9A,    /* GadgetID */
  939.     NULL    /* pointer to user data */
  940. };
  941.  
  942. struct Gadget KRDCtrlShiftAcc1Gadget = {
  943.     &KRDCtrlShiftAcc2Gadget,    /* next gadget */
  944.     150,91,    /* origin of hit box */
  945.     16,8,    /* hit box width and height */
  946.     GADGHCOMP|GADGIMAGE,    /* flags */
  947.     RELVERIFY|TOGGLESELECT,    /* activation flags */
  948.     BOOLGADGET|REQGADGET,    /* type flags */
  949.     (APTR)&KRDAccentImage,    /* render image */
  950.     NULL,    /* select image */
  951.     &KRDAcc1IText,    /* IntuiText list */
  952.     NULL,    /* mutual-exclude (unused) */
  953.     NULL,    /* SpecialInfo structure */
  954.     0x99,    /* GadgetID */
  955.     NULL    /* pointer to user data */
  956. };
  957.  
  958. UBYTE KRDCtrlShiftMod5StrGadSIBuff[5];
  959. struct StringInfo KRDCtrlShiftMod5StrGadSInfo = {
  960.     KRDCtrlShiftMod5StrGadSIBuff,    /* buffer where text will be edited */
  961.     KRDUndoBuffer,    /* optional undo buffer */
  962.     0,    /* character position in buffer */
  963.     5,    /* maximum number of characters */
  964.     0,    /* first displayed character buffer position */
  965.     0,0,0,0,0,    /* Intuition initialized and maintained variables */
  966.     0,    /* Rastport of gadget */
  967.     0,    /* initial value for integer gadgets */
  968.     NULL    /* alternate keymap (fill in if you set the flag) */
  969. };
  970.  
  971. struct Gadget KRDCtrlShiftMod5StrGadget = {
  972.     &KRDCtrlAltModGadget,    /* next gadget */
  973.     226,91,    /* origin of hit box */
  974.     16,8,    /* hit box width and height */
  975.     NULL,    /* flags */
  976.     RELVERIFY|STRINGCENTER,    /* activation flags */
  977.     STRGADGET|REQGADGET,    /* type flags */
  978.     (APTR)&KRDModStrBorder,    /* render border */
  979.     NULL,    /* select image */
  980.     NULL,    /* IntuiText list */
  981.     NULL,    /* mutual-exclude (unused) */
  982.     (APTR)&KRDCtrlShiftMod5StrGadSInfo,    /* SpecialInfo structure */
  983.     0x98,    /* GadgetID */
  984.     NULL    /* pointer to user data */
  985. };
  986.  
  987. UBYTE KRDCtrlShiftMod4StrGadSIBuff[5];
  988. struct StringInfo KRDCtrlShiftMod4StrGadSInfo = {
  989.     KRDCtrlShiftMod4StrGadSIBuff,    /* buffer where text will be edited */
  990.     KRDUndoBuffer,    /* optional undo buffer */
  991.     0,    /* character position in buffer */
  992.     5,    /* maximum number of characters */
  993.     0,    /* first displayed character buffer position */
  994.     0,0,0,0,0,    /* Intuition initialized and maintained variables */
  995.     0,    /* Rastport of gadget */
  996.     0,    /* initial value for integer gadgets */
  997.     NULL    /* alternate keymap (fill in if you set the flag) */
  998. };
  999.  
  1000. struct Gadget KRDCtrlShiftMod4StrGadget = {
  1001.     &KRDCtrlShiftMod5StrGadget,    /* next gadget */
  1002.     209,91,    /* origin of hit box */
  1003.     16,8,    /* hit box width and height */
  1004.     NULL,    /* flags */
  1005.     RELVERIFY|STRINGCENTER,    /* activation flags */
  1006.     STRGADGET|REQGADGET,    /* type flags */
  1007.     (APTR)&KRDModStrBorder,    /* render border */
  1008.     NULL,    /* select image */
  1009.     NULL,    /* IntuiText list */
  1010.     NULL,    /* mutual-exclude (unused) */
  1011.     (APTR)&KRDCtrlShiftMod4StrGadSInfo,    /* SpecialInfo structure */
  1012.     0x97,    /* GadgetID */
  1013.     NULL    /* pointer to user data */
  1014. };
  1015.  
  1016. UBYTE KRDCtrlShiftMod3StrGadSIBuff[5];
  1017. struct StringInfo KRDCtrlShiftMod3StrGadSInfo = {
  1018.     KRDCtrlShiftMod3StrGadSIBuff,    /* buffer where text will be edited */
  1019.     KRDUndoBuffer,    /* optional undo buffer */
  1020.     0,    /* character position in buffer */
  1021.     5,    /* maximum number of characters */
  1022.     0,    /* first displayed character buffer position */
  1023.     0,0,0,0,0,    /* Intuition initialized and maintained variables */
  1024.     0,    /* Rastport of gadget */
  1025.     0,    /* initial value for integer gadgets */
  1026.     NULL    /* alternate keymap (fill in if you set the flag) */
  1027. };
  1028.  
  1029. struct Gadget KRDCtrlShiftMod3StrGadget = {
  1030.     &KRDCtrlShiftMod4StrGadget,    /* next gadget */
  1031.     192,91,    /* origin of hit box */
  1032.     16,8,    /* hit box width and height */
  1033.     NULL,    /* flags */
  1034.     RELVERIFY|STRINGCENTER,    /* activation flags */
  1035.     STRGADGET|REQGADGET,    /* type flags */
  1036.     (APTR)&KRDModStrBorder,    /* render border */
  1037.     NULL,    /* select image */
  1038.     NULL,    /* IntuiText list */
  1039.     NULL,    /* mutual-exclude (unused) */
  1040.     (APTR)&KRDCtrlShiftMod3StrGadSInfo,    /* SpecialInfo structure */
  1041.     0x96,    /* GadgetID */
  1042.     NULL    /* pointer to user data */
  1043. };
  1044.  
  1045. UBYTE KRDCtrlShiftMod2StrGadSIBuff[5];
  1046. struct StringInfo KRDCtrlShiftMod2StrGadSInfo = {
  1047.     KRDCtrlShiftMod2StrGadSIBuff,    /* buffer where text will be edited */
  1048.     KRDUndoBuffer,    /* optional undo buffer */
  1049.     0,    /* character position in buffer */
  1050.     5,    /* maximum number of characters */
  1051.     0,    /* first displayed character buffer position */
  1052.     0,0,0,0,0,    /* Intuition initialized and maintained variables */
  1053.     0,    /* Rastport of gadget */
  1054.     0,    /* initial value for integer gadgets */
  1055.     NULL    /* alternate keymap (fill in if you set the flag) */
  1056. };
  1057.  
  1058. struct Gadget KRDCtrlShiftMod2StrGadget = {
  1059.     &KRDCtrlShiftMod3StrGadget,    /* next gadget */
  1060.     175,91,    /* origin of hit box */
  1061.     16,8,    /* hit box width and height */
  1062.     NULL,    /* flags */
  1063.     RELVERIFY|STRINGCENTER,    /* activation flags */
  1064.     STRGADGET|REQGADGET,    /* type flags */
  1065.     (APTR)&KRDModStrBorder,    /* render border */
  1066.     NULL,    /* select image */
  1067.     NULL,    /* IntuiText list */
  1068.     NULL,    /* mutual-exclude (unused) */
  1069.     (APTR)&KRDCtrlShiftMod2StrGadSInfo,    /* SpecialInfo structure */
  1070.     0x95,    /* GadgetID */
  1071.     NULL    /* pointer to user data */
  1072. };
  1073.  
  1074. UBYTE KRDCtrlShiftMod1StrGadSIBuff[5];
  1075. struct StringInfo KRDCtrlShiftMod1StrGadSInfo = {
  1076.     KRDCtrlShiftMod1StrGadSIBuff,    /* buffer where text will be edited */
  1077.     KRDUndoBuffer,    /* optional undo buffer */
  1078.     0,    /* character position in buffer */
  1079.     5,    /* maximum number of characters */
  1080.     0,    /* first displayed character buffer position */
  1081.     0,0,0,0,0,    /* Intuition initialized and maintained variables */
  1082.     0,    /* Rastport of gadget */
  1083.     0,    /* initial value for integer gadgets */
  1084.     NULL    /* alternate keymap (fill in if you set the flag) */
  1085. };
  1086.  
  1087. struct Gadget KRDCtrlShiftMod1StrGadget = {
  1088.     &KRDCtrlShiftMod2StrGadget,    /* next gadget */
  1089.     158,91,    /* origin of hit box */
  1090.     16,8,    /* hit box width and height */
  1091.     NULL,    /* flags */
  1092.     RELVERIFY|STRINGCENTER,    /* activation flags */
  1093.     STRGADGET|REQGADGET,    /* type flags */
  1094.     (APTR)&KRDModStrBorder,    /* render border */
  1095.     NULL,    /* select image */
  1096.     NULL,    /* IntuiText list */
  1097.     NULL,    /* mutual-exclude (unused) */
  1098.     (APTR)&KRDCtrlShiftMod1StrGadSInfo,    /* SpecialInfo structure */
  1099.     0x94,    /* GadgetID */
  1100.     NULL    /* pointer to user data */
  1101. };
  1102.  
  1103. UBYTE KRDCtrlShiftMod0StrGadSIBuff[5];
  1104. struct StringInfo KRDCtrlShiftMod0StrGadSInfo = {
  1105.     KRDCtrlShiftMod0StrGadSIBuff,    /* buffer where text will be edited */
  1106.     KRDUndoBuffer,    /* optional undo buffer */
  1107.     0,    /* character position in buffer */
  1108.     5,    /* maximum number of characters */
  1109.     0,    /* first displayed character buffer position */
  1110.     0,0,0,0,0,    /* Intuition initialized and maintained variables */
  1111.     0,    /* Rastport of gadget */
  1112.     0,    /* initial value for integer gadgets */
  1113.     NULL    /* alternate keymap (fill in if you set the flag) */
  1114. };
  1115.  
  1116. struct Gadget KRDCtrlShiftMod0StrGadget = {
  1117.     &KRDCtrlShiftMod1StrGadget,    /* next gadget */
  1118.     141,91,    /* origin of hit box */
  1119.     16,8,    /* hit box width and height */
  1120.     NULL,    /* flags */
  1121.     RELVERIFY|STRINGCENTER,    /* activation flags */
  1122.     STRGADGET|REQGADGET,    /* type flags */
  1123.     (APTR)&KRDModStrBorder,    /* render border */
  1124.     NULL,    /* select image */
  1125.     NULL,    /* IntuiText list */
  1126.     NULL,    /* mutual-exclude (unused) */
  1127.     (APTR)&KRDCtrlShiftMod0StrGadSInfo,    /* SpecialInfo structure */
  1128.     0x93,    /* GadgetID */
  1129.     NULL    /* pointer to user data */
  1130. };
  1131.  
  1132. UBYTE KRDCtrlShiftNormalStrGadSIBuff[5];
  1133. struct StringInfo KRDCtrlShiftNormalStrGadSInfo = {
  1134.     KRDCtrlShiftNormalStrGadSIBuff,    /* buffer where text will be edited */
  1135.     KRDUndoBuffer,    /* optional undo buffer */
  1136.     0,    /* character position in buffer */
  1137.     5,    /* maximum number of characters */
  1138.     0,    /* first displayed character buffer position */
  1139.     0,0,0,0,0,    /* Intuition initialized and maintained variables */
  1140.     0,    /* Rastport of gadget */
  1141.     0,    /* initial value for integer gadgets */
  1142.     NULL    /* alternate keymap (fill in if you set the flag) */
  1143. };
  1144.  
  1145. struct Gadget KRDCtrlShiftNormalStrGadget = {
  1146.     &KRDCtrlAltModGadget,    /* next gadget */
  1147.     171,91,    /* origin of hit box */
  1148.     40,8,    /* hit box width and height */
  1149.     NULL,    /* flags */
  1150.     RELVERIFY|STRINGCENTER,    /* activation flags */
  1151.     STRGADGET|REQGADGET,    /* type flags */
  1152.     (APTR)&KRDNormalStrBorder,    /* render border */
  1153.     NULL,    /* select image */
  1154.     NULL,    /* IntuiText list */
  1155.     NULL,    /* mutual-exclude (unused) */
  1156.     (APTR)&KRDCtrlShiftNormalStrGadSInfo,    /* SpecialInfo structure */
  1157.     0x92,    /* GadgetID */
  1158.     NULL    /* pointer to user data */
  1159. };
  1160.  
  1161. struct Gadget KRDCtrlShiftDeadGadget = {
  1162.     &KRDCtrlShiftNormalStrGadget,    /* next gadget */
  1163.     105,91,    /* origin of hit box */
  1164.     35,8,    /* hit box width and height */
  1165.     GADGHCOMP,    /* flags */
  1166.     RELVERIFY|ENDGADGET|TOGGLESELECT,    /* activation flags */
  1167.     BOOLGADGET|REQGADGET,    /* type flags */
  1168.     (APTR)&KRDOptBorder,    /* render border */
  1169.     NULL,    /* select image */
  1170.     &KRDDeadIText,    /* IntuiText list */
  1171.     NULL,    /* mutual-exclude (unused) */
  1172.     NULL,    /* SpecialInfo structure */
  1173.     0x91,    /* GadgetID */
  1174.     NULL    /* pointer to user data */
  1175. };
  1176.  
  1177. struct Gadget KRDCtrlShiftModGadget = {
  1178.     &KRDCtrlShiftDeadGadget,    /* next gadget */
  1179.     69,91,    /* origin of hit box */
  1180.     35,8,    /* hit box width and height */
  1181.     GADGHCOMP,    /* flags */
  1182.     RELVERIFY|ENDGADGET|TOGGLESELECT,    /* activation flags */
  1183.     BOOLGADGET|REQGADGET,    /* type flags */
  1184.     (APTR)&KRDOptBorder,    /* render border */
  1185.     NULL,    /* select image */
  1186.     &KRDModIText,    /* IntuiText list */
  1187.     NULL,    /* mutual-exclude (unused) */
  1188.     NULL,    /* SpecialInfo structure */
  1189.     0x90,    /* GadgetID */
  1190.     NULL    /* pointer to user data */
  1191. };
  1192.  
  1193. /*
  1194.  * Dead Key Requester Ctrl gadgets
  1195.  */
  1196.  
  1197. struct Gadget KRDCtrlAcc5Gadget = {
  1198.     &KRDCtrlShiftModGadget,    /* next gadget */
  1199.     218,82,    /* origin of hit box */
  1200.     16,8,    /* hit box width and height */
  1201.     GADGHCOMP|GADGIMAGE,    /* flags */
  1202.     RELVERIFY|TOGGLESELECT,    /* activation flags */
  1203.     BOOLGADGET|REQGADGET,    /* type flags */
  1204.     (APTR)&KRDAccentImage,    /* render image */
  1205.     NULL,    /* select image */
  1206.     &KRDAcc5IText,    /* IntuiText list */
  1207.     NULL,    /* mutual-exclude (unused) */
  1208.     NULL,    /* SpecialInfo structure */
  1209.     0x8D,    /* GadgetID */
  1210.     NULL    /* pointer to user data */
  1211. };
  1212.  
  1213. struct Gadget KRDCtrlAcc4Gadget = {
  1214.     &KRDCtrlAcc5Gadget,    /* next gadget */
  1215.     201,82,    /* origin of hit box */
  1216.     16,8,    /* hit box width and height */
  1217.     GADGHCOMP|GADGIMAGE,    /* flags */
  1218.     RELVERIFY|TOGGLESELECT,    /* activation flags */
  1219.     BOOLGADGET|REQGADGET,    /* type flags */
  1220.     (APTR)&KRDAccentImage,    /* render image */
  1221.     NULL,    /* select image */
  1222.     &KRDAcc4IText,    /* IntuiText list */
  1223.     NULL,    /* mutual-exclude (unused) */
  1224.     NULL,    /* SpecialInfo structure */
  1225.     0x8C,    /* GadgetID */
  1226.     NULL    /* pointer to user data */
  1227. };
  1228.  
  1229. struct Gadget KRDCtrlAcc3Gadget = {
  1230.     &KRDCtrlAcc4Gadget,    /* next gadget */
  1231.     184,82,    /* origin of hit box */
  1232.     16,8,    /* hit box width and height */
  1233.     GADGHCOMP|GADGIMAGE,    /* flags */
  1234.     RELVERIFY|TOGGLESELECT,    /* activation flags */
  1235.     BOOLGADGET|REQGADGET,    /* type flags */
  1236.     (APTR)&KRDAccentImage,    /* render image */
  1237.     NULL,    /* select image */
  1238.     &KRDAcc3IText,    /* IntuiText list */
  1239.     NULL,    /* mutual-exclude (unused) */
  1240.     NULL,    /* SpecialInfo structure */
  1241.     0x8B,    /* GadgetID */
  1242.     NULL    /* pointer to user data */
  1243. };
  1244.  
  1245. struct Gadget KRDCtrlAcc2Gadget = {
  1246.     &KRDCtrlAcc3Gadget,    /* next gadget */
  1247.     167,82,    /* origin of hit box */
  1248.     16,8,    /* hit box width and height */
  1249.     GADGHCOMP|GADGIMAGE,    /* flags */
  1250.     RELVERIFY|TOGGLESELECT,    /* activation flags */
  1251.     BOOLGADGET|REQGADGET,    /* type flags */
  1252.     (APTR)&KRDAccentImage,    /* render image */
  1253.     NULL,    /* select image */
  1254.     &KRDAcc2IText,    /* IntuiText list */
  1255.     NULL,    /* mutual-exclude (unused) */
  1256.     NULL,    /* SpecialInfo structure */
  1257.     0x8A,    /* GadgetID */
  1258.     NULL    /* pointer to user data */
  1259. };
  1260.  
  1261. struct Gadget KRDCtrlAcc1Gadget = {
  1262.     &KRDCtrlAcc2Gadget,    /* next gadget */
  1263.     150,82,    /* origin of hit box */
  1264.     16,8,    /* hit box width and height */
  1265.     GADGHCOMP|GADGIMAGE,    /* flags */
  1266.     RELVERIFY|TOGGLESELECT,    /* activation flags */
  1267.     BOOLGADGET|REQGADGET,    /* type flags */
  1268.     (APTR)&KRDAccentImage,    /* render image */
  1269.     NULL,    /* select image */
  1270.     &KRDAcc1IText,    /* IntuiText list */
  1271.     NULL,    /* mutual-exclude (unused) */
  1272.     NULL,    /* SpecialInfo structure */
  1273.     0x89,    /* GadgetID */
  1274.     NULL    /* pointer to user data */
  1275. };
  1276.  
  1277. UBYTE KRDCtrlMod5StrGadSIBuff[5];
  1278. struct StringInfo KRDCtrlMod5StrGadSInfo = {
  1279.     KRDCtrlMod5StrGadSIBuff,    /* buffer where text will be edited */
  1280.     KRDUndoBuffer,    /* optional undo buffer */
  1281.     0,    /* character position in buffer */
  1282.     5,    /* maximum number of characters */
  1283.     0,    /* first displayed character buffer position */
  1284.     0,0,0,0,0,    /* Intuition initialized and maintained variables */
  1285.     0,    /* Rastport of gadget */
  1286.     0,    /* initial value for integer gadgets */
  1287.     NULL    /* alternate keymap (fill in if you set the flag) */
  1288. };
  1289.  
  1290. struct Gadget KRDCtrlMod5StrGadget = {
  1291.     &KRDCtrlShiftModGadget,    /* next gadget */
  1292.     226,82,    /* origin of hit box */
  1293.     16,8,    /* hit box width and height */
  1294.     NULL,    /* flags */
  1295.     RELVERIFY|STRINGCENTER,    /* activation flags */
  1296.     STRGADGET|REQGADGET,    /* type flags */
  1297.     (APTR)&KRDModStrBorder,    /* render border */
  1298.     NULL,    /* select image */
  1299.     NULL,    /* IntuiText list */
  1300.     NULL,    /* mutual-exclude (unused) */
  1301.     (APTR)&KRDCtrlMod5StrGadSInfo,    /* SpecialInfo structure */
  1302.     0x88,    /* GadgetID */
  1303.     NULL    /* pointer to user data */
  1304. };
  1305.  
  1306. UBYTE KRDCtrlMod4StrGadSIBuff[5];
  1307. struct StringInfo KRDCtrlMod4StrGadSInfo = {
  1308.     KRDCtrlMod4StrGadSIBuff,    /* buffer where text will be edited */
  1309.     KRDUndoBuffer,    /* optional undo buffer */
  1310.     0,    /* character position in buffer */
  1311.     5,    /* maximum number of characters */
  1312.     0,    /* first displayed character buffer position */
  1313.     0,0,0,0,0,    /* Intuition initialized and maintained variables */
  1314.     0,    /* Rastport of gadget */
  1315.     0,    /* initial value for integer gadgets */
  1316.     NULL    /* alternate keymap (fill in if you set the flag) */
  1317. };
  1318.  
  1319. struct Gadget KRDCtrlMod4StrGadget = {
  1320.     &KRDCtrlMod5StrGadget,    /* next gadget */
  1321.     209,82,    /* origin of hit box */
  1322.     16,8,    /* hit box width and height */
  1323.     NULL,    /* flags */
  1324.     RELVERIFY|STRINGCENTER,    /* activation flags */
  1325.     STRGADGET|REQGADGET,    /* type flags */
  1326.     (APTR)&KRDModStrBorder,    /* render border */
  1327.     NULL,    /* select image */
  1328.     NULL,    /* IntuiText list */
  1329.     NULL,    /* mutual-exclude (unused) */
  1330.     (APTR)&KRDCtrlMod4StrGadSInfo,    /* SpecialInfo structure */
  1331.     0x87,    /* GadgetID */
  1332.     NULL    /* pointer to user data */
  1333. };
  1334.  
  1335. UBYTE KRDCtrlMod3StrGadSIBuff[5];
  1336. struct StringInfo KRDCtrlMod3StrGadSInfo = {
  1337.     KRDCtrlMod3StrGadSIBuff,    /* buffer where text will be edited */
  1338.     KRDUndoBuffer,    /* optional undo buffer */
  1339.     0,    /* character position in buffer */
  1340.     5,    /* maximum number of characters */
  1341.     0,    /* first displayed character buffer position */
  1342.     0,0,0,0,0,    /* Intuition initialized and maintained variables */
  1343.     0,    /* Rastport of gadget */
  1344.     0,    /* initial value for integer gadgets */
  1345.     NULL    /* alternate keymap (fill in if you set the flag) */
  1346. };
  1347.  
  1348. struct Gadget KRDCtrlMod3StrGadget = {
  1349.     &KRDCtrlMod4StrGadget,    /* next gadget */
  1350.     192,82,    /* origin of hit box */
  1351.     16,8,    /* hit box width and height */
  1352.     NULL,    /* flags */
  1353.     RELVERIFY|STRINGCENTER,    /* activation flags */
  1354.     STRGADGET|REQGADGET,    /* type flags */
  1355.     (APTR)&KRDModStrBorder,    /* render border */
  1356.     NULL,    /* select image */
  1357.     NULL,    /* IntuiText list */
  1358.     NULL,    /* mutual-exclude (unused) */
  1359.     (APTR)&KRDCtrlMod3StrGadSInfo,    /* SpecialInfo structure */
  1360.     0x86,    /* GadgetID */
  1361.     NULL    /* pointer to user data */
  1362. };
  1363.  
  1364. UBYTE KRDCtrlMod2StrGadSIBuff[5];
  1365. struct StringInfo KRDCtrlMod2StrGadSInfo = {
  1366.     KRDCtrlMod2StrGadSIBuff,    /* buffer where text will be edited */
  1367.     KRDUndoBuffer,    /* optional undo buffer */
  1368.     0,    /* character position in buffer */
  1369.     5,    /* maximum number of characters */
  1370.     0,    /* first displayed character buffer position */
  1371.     0,0,0,0,0,    /* Intuition initialized and maintained variables */
  1372.     0,    /* Rastport of gadget */
  1373.     0,    /* initial value for integer gadgets */
  1374.     NULL    /* alternate keymap (fill in if you set the flag) */
  1375. };
  1376.  
  1377. struct Gadget KRDCtrlMod2StrGadget = {
  1378.     &KRDCtrlMod3StrGadget,    /* next gadget */
  1379.     175,82,    /* origin of hit box */
  1380.     16,8,    /* hit box width and height */
  1381.     NULL,    /* flags */
  1382.     RELVERIFY|STRINGCENTER,    /* activation flags */
  1383.     STRGADGET|REQGADGET,    /* type flags */
  1384.     (APTR)&KRDModStrBorder,    /* render border */
  1385.     NULL,    /* select image */
  1386.     NULL,    /* IntuiText list */
  1387.     NULL,    /* mutual-exclude (unused) */
  1388.     (APTR)&KRDCtrlMod2StrGadSInfo,    /* SpecialInfo structure */
  1389.     0x85,    /* GadgetID */
  1390.     NULL    /* pointer to user data */
  1391. };
  1392.  
  1393. UBYTE KRDCtrlMod1StrGadSIBuff[5];
  1394. struct StringInfo KRDCtrlMod1StrGadSInfo = {
  1395.     KRDCtrlMod1StrGadSIBuff,    /* buffer where text will be edited */
  1396.     KRDUndoBuffer,    /* optional undo buffer */
  1397.     0,    /* character position in buffer */
  1398.     5,    /* maximum number of characters */
  1399.     0,    /* first displayed character buffer position */
  1400.     0,0,0,0,0,    /* Intuition initialized and maintained variables */
  1401.     0,    /* Rastport of gadget */
  1402.     0,    /* initial value for integer gadgets */
  1403.     NULL    /* alternate keymap (fill in if you set the flag) */
  1404. };
  1405.  
  1406. struct Gadget KRDCtrlMod1StrGadget = {
  1407.     &KRDCtrlMod2StrGadget,    /* next gadget */
  1408.     158,82,    /* origin of hit box */
  1409.     16,8,    /* hit box width and height */
  1410.     NULL,    /* flags */
  1411.     RELVERIFY|STRINGCENTER,    /* activation flags */
  1412.     STRGADGET|REQGADGET,    /* type flags */
  1413.     (APTR)&KRDModStrBorder,    /* render border */
  1414.     NULL,    /* select image */
  1415.     NULL,    /* IntuiText list */
  1416.     NULL,    /* mutual-exclude (unused) */
  1417.     (APTR)&KRDCtrlMod1StrGadSInfo,    /* SpecialInfo structure */
  1418.     0x84,    /* GadgetID */
  1419.     NULL    /* pointer to user data */
  1420. };
  1421.  
  1422. UBYTE KRDCtrlMod0StrGadSIBuff[5];
  1423. struct StringInfo KRDCtrlMod0StrGadSInfo = {
  1424.     KRDCtrlMod0StrGadSIBuff,    /* buffer where text will be edited */
  1425.     KRDUndoBuffer,    /* optional undo buffer */
  1426.     0,    /* character position in buffer */
  1427.     5,    /* maximum number of characters */
  1428.     0,    /* first displayed character buffer position */
  1429.     0,0,0,0,0,    /* Intuition initialized and maintained variables */
  1430.     0,    /* Rastport of gadget */
  1431.     0,    /* initial value for integer gadgets */
  1432.     NULL    /* alternate keymap (fill in if you set the flag) */
  1433. };
  1434.  
  1435. struct Gadget KRDCtrlMod0StrGadget = {
  1436.     &KRDCtrlMod1StrGadget,    /* next gadget */
  1437.     141,82,    /* origin of hit box */
  1438.     16,8,    /* hit box width and height */
  1439.     NULL,    /* flags */
  1440.     RELVERIFY|STRINGCENTER,    /* activation flags */
  1441.     STRGADGET|REQGADGET,    /* type flags */
  1442.     (APTR)&KRDModStrBorder,    /* render border */
  1443.     NULL,    /* select image */
  1444.     NULL,    /* IntuiText list */
  1445.     NULL,    /* mutual-exclude (unused) */
  1446.     (APTR)&KRDCtrlMod0StrGadSInfo,    /* SpecialInfo structure */
  1447.     0x83,    /* GadgetID */
  1448.     NULL    /* pointer to user data */
  1449. };
  1450.  
  1451. UBYTE KRDCtrlNormalStrGadSIBuff[5];
  1452. struct StringInfo KRDCtrlNormalStrGadSInfo = {
  1453.     KRDCtrlNormalStrGadSIBuff,    /* buffer where text will be edited */
  1454.     KRDUndoBuffer,    /* optional undo buffer */
  1455.     0,    /* character position in buffer */
  1456.     5,    /* maximum number of characters */
  1457.     0,    /* first displayed character buffer position */
  1458.     0,0,0,0,0,    /* Intuition initialized and maintained variables */
  1459.     0,    /* Rastport of gadget */
  1460.     0,    /* initial value for integer gadgets */
  1461.     NULL    /* alternate keymap (fill in if you set the flag) */
  1462. };
  1463.  
  1464. struct Gadget KRDCtrlNormalStrGadget = {
  1465.     &KRDCtrlShiftModGadget,    /* next gadget */
  1466.     171,82,    /* origin of hit box */
  1467.     40,8,    /* hit box width and height */
  1468.     NULL,    /* flags */
  1469.     RELVERIFY|STRINGCENTER,    /* activation flags */
  1470.     STRGADGET|REQGADGET,    /* type flags */
  1471.     (APTR)&KRDNormalStrBorder,    /* render border */
  1472.     NULL,    /* select image */
  1473.     NULL,    /* IntuiText list */
  1474.     NULL,    /* mutual-exclude (unused) */
  1475.     (APTR)&KRDCtrlNormalStrGadSInfo,    /* SpecialInfo structure */
  1476.     0x82,    /* GadgetID */
  1477.     NULL    /* pointer to user data */
  1478. };
  1479.  
  1480. struct Gadget KRDCtrlDeadGadget = {
  1481.     &KRDCtrlNormalStrGadget,    /* next gadget */
  1482.     105,82,    /* origin of hit box */
  1483.     35,8,    /* hit box width and height */
  1484.     GADGHCOMP,    /* flags */
  1485.     RELVERIFY|ENDGADGET|TOGGLESELECT,    /* activation flags */
  1486.     BOOLGADGET|REQGADGET,    /* type flags */
  1487.     (APTR)&KRDOptBorder,    /* render border */
  1488.     NULL,    /* select image */
  1489.     &KRDDeadIText,    /* IntuiText list */
  1490.     NULL,    /* mutual-exclude (unused) */
  1491.     NULL,    /* SpecialInfo structure */
  1492.     0x81,    /* GadgetID */
  1493.     NULL    /* pointer to user data */
  1494. };
  1495.  
  1496. struct Gadget KRDCtrlModGadget = {
  1497.     &KRDCtrlDeadGadget,    /* next gadget */
  1498.     69,82,    /* origin of hit box */
  1499.     35,8,    /* hit box width and height */
  1500.     GADGHCOMP,    /* flags */
  1501.     RELVERIFY|ENDGADGET|TOGGLESELECT,    /* activation flags */
  1502.     BOOLGADGET|REQGADGET,    /* type flags */
  1503.     (APTR)&KRDOptBorder,    /* render border */
  1504.     NULL,    /* select image */
  1505.     &KRDModIText,    /* IntuiText list */
  1506.     NULL,    /* mutual-exclude (unused) */
  1507.     NULL,    /* SpecialInfo structure */
  1508.     0x80,    /* GadgetID */
  1509.     NULL    /* pointer to user data */
  1510. };
  1511.  
  1512. /*
  1513.  * Dead Key Requester ShiftAlt Gadgets
  1514.  */
  1515.  
  1516. struct Gadget KRDShiftAltAcc5Gadget = {
  1517.     &KRDCtrlModGadget,    /* next gadget */
  1518.     218,73,    /* origin of hit box */
  1519.     16,8,    /* hit box width and height */
  1520.     GADGHCOMP|GADGIMAGE,    /* flags */
  1521.     RELVERIFY|TOGGLESELECT,    /* activation flags */
  1522.     BOOLGADGET|REQGADGET,    /* type flags */
  1523.     (APTR)&KRDAccentImage,    /* render image */
  1524.     NULL,    /* select image */
  1525.     &KRDAcc5IText,    /* IntuiText list */
  1526.     NULL,    /* mutual-exclude (unused) */
  1527.     NULL,    /* SpecialInfo structure */
  1528.     0x7D,    /* GadgetID */
  1529.     NULL    /* pointer to user data */
  1530. };
  1531.  
  1532. struct Gadget KRDShiftAltAcc4Gadget = {
  1533.     &KRDShiftAltAcc5Gadget,    /* next gadget */
  1534.     201,73,    /* origin of hit box */
  1535.     16,8,    /* hit box width and height */
  1536.     GADGHCOMP|GADGIMAGE,    /* flags */
  1537.     RELVERIFY|TOGGLESELECT,    /* activation flags */
  1538.     BOOLGADGET|REQGADGET,    /* type flags */
  1539.     (APTR)&KRDAccentImage,    /* render image */
  1540.     NULL,    /* select image */
  1541.     &KRDAcc4IText,    /* IntuiText list */
  1542.     NULL,    /* mutual-exclude (unused) */
  1543.     NULL,    /* SpecialInfo structure */
  1544.     0x7C,    /* GadgetID */
  1545.     NULL    /* pointer to user data */
  1546. };
  1547.  
  1548. struct Gadget KRDShiftAltAcc3Gadget = {
  1549.     &KRDShiftAltAcc4Gadget,    /* next gadget */
  1550.     184,73,    /* origin of hit box */
  1551.     16,8,    /* hit box width and height */
  1552.     GADGHCOMP|GADGIMAGE,    /* flags */
  1553.     RELVERIFY|TOGGLESELECT,    /* activation flags */
  1554.     BOOLGADGET|REQGADGET,    /* type flags */
  1555.     (APTR)&KRDAccentImage,    /* render image */
  1556.     NULL,    /* select image */
  1557.     &KRDAcc3IText,    /* IntuiText list */
  1558.     NULL,    /* mutual-exclude (unused) */
  1559.     NULL,    /* SpecialInfo structure */
  1560.     0x7B,    /* GadgetID */
  1561.     NULL    /* pointer to user data */
  1562. };
  1563.  
  1564. struct Gadget KRDShiftAltAcc2Gadget = {
  1565.     &KRDShiftAltAcc3Gadget,    /* next gadget */
  1566.     167,73,    /* origin of hit box */
  1567.     16,8,    /* hit box width and height */
  1568.     GADGHCOMP|GADGIMAGE,    /* flags */
  1569.     RELVERIFY|TOGGLESELECT,    /* activation flags */
  1570.     BOOLGADGET|REQGADGET,    /* type flags */
  1571.     (APTR)&KRDAccentImage,    /* render image */
  1572.     NULL,    /* select image */
  1573.     &KRDAcc2IText,    /* IntuiText list */
  1574.     NULL,    /* mutual-exclude (unused) */
  1575.     NULL,    /* SpecialInfo structure */
  1576.     0x7A,    /* GadgetID */
  1577.     NULL    /* pointer to user data */
  1578. };
  1579.  
  1580. struct Gadget KRDShiftAltAcc1Gadget = {
  1581.     &KRDShiftAltAcc2Gadget,    /* next gadget */
  1582.     150,73,    /* origin of hit box */
  1583.     16,8,    /* hit box width and height */
  1584.     GADGHCOMP|GADGIMAGE,    /* flags */
  1585.     RELVERIFY|TOGGLESELECT,    /* activation flags */
  1586.     BOOLGADGET|REQGADGET,    /* type flags */
  1587.     (APTR)&KRDAccentImage,    /* render image */
  1588.     NULL,    /* select image */
  1589.     &KRDAcc1IText,    /* IntuiText list */
  1590.     NULL,    /* mutual-exclude (unused) */
  1591.     NULL,    /* SpecialInfo structure */
  1592.     0x79,    /* GadgetID */
  1593.     NULL    /* pointer to user data */
  1594. };
  1595.  
  1596. UBYTE KRDShiftAltMod5StrGadSIBuff[5];
  1597. struct StringInfo KRDShiftAltMod5StrGadSInfo = {
  1598.     KRDShiftAltMod5StrGadSIBuff,    /* buffer where text will be edited */
  1599.     KRDUndoBuffer,    /* optional undo buffer */
  1600.     0,    /* character position in buffer */
  1601.     5,    /* maximum number of characters */
  1602.     0,    /* first displayed character buffer position */
  1603.     0,0,0,0,0,    /* Intuition initialized and maintained variables */
  1604.     0,    /* Rastport of gadget */
  1605.     0,    /* initial value for integer gadgets */
  1606.     NULL    /* alternate keymap (fill in if you set the flag) */
  1607. };
  1608.  
  1609. struct Gadget KRDShiftAltMod5StrGadget = {
  1610.     &KRDCtrlModGadget,    /* next gadget */
  1611.     226,73,    /* origin of hit box */
  1612.     16,8,    /* hit box width and height */
  1613.     NULL,    /* flags */
  1614.     RELVERIFY|STRINGCENTER,    /* activation flags */
  1615.     STRGADGET|REQGADGET,    /* type flags */
  1616.     (APTR)&KRDModStrBorder,    /* render border */
  1617.     NULL,    /* select image */
  1618.     NULL,    /* IntuiText list */
  1619.     NULL,    /* mutual-exclude (unused) */
  1620.     (APTR)&KRDShiftAltMod5StrGadSInfo,    /* SpecialInfo structure */
  1621.     0x78,    /* GadgetID */
  1622.     NULL    /* pointer to user data */
  1623. };
  1624.  
  1625. UBYTE KRDShiftAltMod4StrGadSIBuff[5];
  1626. struct StringInfo KRDShiftAltMod4StrGadSInfo = {
  1627.     KRDShiftAltMod4StrGadSIBuff,    /* buffer where text will be edited */
  1628.     KRDUndoBuffer,    /* optional undo buffer */
  1629.     0,    /* character position in buffer */
  1630.     5,    /* maximum number of characters */
  1631.     0,    /* first displayed character buffer position */
  1632.     0,0,0,0,0,    /* Intuition initialized and maintained variables */
  1633.     0,    /* Rastport of gadget */
  1634.     0,    /* initial value for integer gadgets */
  1635.     NULL    /* alternate keymap (fill in if you set the flag) */
  1636. };
  1637.  
  1638. struct Gadget KRDShiftAltMod4StrGadget = {
  1639.     &KRDShiftAltMod5StrGadget,    /* next gadget */
  1640.     209,73,    /* origin of hit box */
  1641.     16,8,    /* hit box width and height */
  1642.     NULL,    /* flags */
  1643.     RELVERIFY|STRINGCENTER,    /* activation flags */
  1644.     STRGADGET|REQGADGET,    /* type flags */
  1645.     (APTR)&KRDModStrBorder,    /* render border */
  1646.     NULL,    /* select image */
  1647.     NULL,    /* IntuiText list */
  1648.     NULL,    /* mutual-exclude (unused) */
  1649.     (APTR)&KRDShiftAltMod4StrGadSInfo,    /* SpecialInfo structure */
  1650.     0x77,    /* GadgetID */
  1651.     NULL    /* pointer to user data */
  1652. };
  1653.  
  1654. UBYTE KRDShiftAltMod3StrGadSIBuff[5];
  1655. struct StringInfo KRDShiftAltMod3StrGadSInfo = {
  1656.     KRDShiftAltMod3StrGadSIBuff,    /* buffer where text will be edited */
  1657.     KRDUndoBuffer,    /* optional undo buffer */
  1658.     0,    /* character position in buffer */
  1659.     5,    /* maximum number of characters */
  1660.     0,    /* first displayed character buffer position */
  1661.     0,0,0,0,0,    /* Intuition initialized and maintained variables */
  1662.     0,    /* Rastport of gadget */
  1663.     0,    /* initial value for integer gadgets */
  1664.     NULL    /* alternate keymap (fill in if you set the flag) */
  1665. };
  1666.  
  1667. struct Gadget KRDShiftAltMod3StrGadget = {
  1668.     &KRDShiftAltMod4StrGadget,    /* next gadget */
  1669.     192,73,    /* origin of hit box */
  1670.     16,8,    /* hit box width and height */
  1671.     NULL,    /* flags */
  1672.     RELVERIFY|STRINGCENTER,    /* activation flags */
  1673.     STRGADGET|REQGADGET,    /* type flags */
  1674.     (APTR)&KRDModStrBorder,    /* render border */
  1675.     NULL,    /* select image */
  1676.     NULL,    /* IntuiText list */
  1677.     NULL,    /* mutual-exclude (unused) */
  1678.     (APTR)&KRDShiftAltMod3StrGadSInfo,    /* SpecialInfo structure */
  1679.     0x76,    /* GadgetID */
  1680.     NULL    /* pointer to user data */
  1681. };
  1682.  
  1683. UBYTE KRDShiftAltMod2StrGadSIBuff[5];
  1684. struct StringInfo KRDShiftAltMod2StrGadSInfo = {
  1685.     KRDShiftAltMod2StrGadSIBuff,    /* buffer where text will be edited */
  1686.     KRDUndoBuffer,    /* optional undo buffer */
  1687.     0,    /* character position in buffer */
  1688.     5,    /* maximum number of characters */
  1689.     0,    /* first displayed character buffer position */
  1690.     0,0,0,0,0,    /* Intuition initialized and maintained variables */
  1691.     0,    /* Rastport of gadget */
  1692.     0,    /* initial value for integer gadgets */
  1693.     NULL    /* alternate keymap (fill in if you set the flag) */
  1694. };
  1695.  
  1696. struct Gadget KRDShiftAltMod2StrGadget = {
  1697.     &KRDShiftAltMod3StrGadget,    /* next gadget */
  1698.     175,73,    /* origin of hit box */
  1699.     16,8,    /* hit box width and height */
  1700.     NULL,    /* flags */
  1701.     RELVERIFY|STRINGCENTER,    /* activation flags */
  1702.     STRGADGET|REQGADGET,    /* type flags */
  1703.     (APTR)&KRDModStrBorder,    /* render border */
  1704.     NULL,    /* select image */
  1705.     NULL,    /* IntuiText list */
  1706.     NULL,    /* mutual-exclude (unused) */
  1707.     (APTR)&KRDShiftAltMod2StrGadSInfo,    /* SpecialInfo structure */
  1708.     0x75,    /* GadgetID */
  1709.     NULL    /* pointer to user data */
  1710. };
  1711.  
  1712. UBYTE KRDShiftAltMod1StrGadSIBuff[5];
  1713. struct StringInfo KRDShiftAltMod1StrGadSInfo = {
  1714.     KRDShiftAltMod1StrGadSIBuff,    /* buffer where text will be edited */
  1715.     KRDUndoBuffer,    /* optional undo buffer */
  1716.     0,    /* character position in buffer */
  1717.     5,    /* maximum number of characters */
  1718.     0,    /* first displayed character buffer position */
  1719.     0,0,0,0,0,    /* Intuition initialized and maintained variables */
  1720.     0,    /* Rastport of gadget */
  1721.     0,    /* initial value for integer gadgets */
  1722.     NULL    /* alternate keymap (fill in if you set the flag) */
  1723. };
  1724.  
  1725. struct Gadget KRDShiftAltMod1StrGadget = {
  1726.     &KRDShiftAltMod2StrGadget,    /* next gadget */
  1727.     158,73,    /* origin of hit box */
  1728.     16,8,    /* hit box width and height */
  1729.     NULL,    /* flags */
  1730.     RELVERIFY|STRINGCENTER,    /* activation flags */
  1731.     STRGADGET|REQGADGET,    /* type flags */
  1732.     (APTR)&KRDModStrBorder,    /* render border */
  1733.     NULL,    /* select image */
  1734.     NULL,    /* IntuiText list */
  1735.     NULL,    /* mutual-exclude (unused) */
  1736.     (APTR)&KRDShiftAltMod1StrGadSInfo,    /* SpecialInfo structure */
  1737.     0x74,    /* GadgetID */
  1738.     NULL    /* pointer to user data */
  1739. };
  1740.  
  1741. UBYTE KRDShiftAltMod0StrGadSIBuff[5];
  1742. struct StringInfo KRDShiftAltMod0StrGadSInfo = {
  1743.     KRDShiftAltMod0StrGadSIBuff,    /* buffer where text will be edited */
  1744.     KRDUndoBuffer,    /* optional undo buffer */
  1745.     0,    /* character position in buffer */
  1746.     5,    /* maximum number of characters */
  1747.     0,    /* first displayed character buffer position */
  1748.     0,0,0,0,0,    /* Intuition initialized and maintained variables */
  1749.     0,    /* Rastport of gadget */
  1750.     0,    /* initial value for integer gadgets */
  1751.     NULL    /* alternate keymap (fill in if you set the flag) */
  1752. };
  1753.  
  1754. struct Gadget KRDShiftAltMod0StrGadget = {
  1755.     &KRDShiftAltMod1StrGadget,    /* next gadget */
  1756.     141,73,    /* origin of hit box */
  1757.     16,8,    /* hit box width and height */
  1758.     NULL,    /* flags */
  1759.     RELVERIFY|STRINGCENTER,    /* activation flags */
  1760.     STRGADGET|REQGADGET,    /* type flags */
  1761.     (APTR)&KRDModStrBorder,    /* render border */
  1762.     NULL,    /* select image */
  1763.     NULL,    /* IntuiText list */
  1764.     NULL,    /* mutual-exclude (unused) */
  1765.     (APTR)&KRDShiftAltMod0StrGadSInfo,    /* SpecialInfo structure */
  1766.     0x73,    /* GadgetID */
  1767.     NULL    /* pointer to user data */
  1768. };
  1769.  
  1770. UBYTE KRDShiftAltNormalStrGadSIBuff[5];
  1771. struct StringInfo KRDShiftAltNormalStrGadSInfo = {
  1772.     KRDShiftAltNormalStrGadSIBuff,    /* buffer where text will be edited */
  1773.     KRDUndoBuffer,    /* optional undo buffer */
  1774.     0,    /* character position in buffer */
  1775.     5,    /* maximum number of characters */
  1776.     0,    /* first displayed character buffer position */
  1777.     0,0,0,0,0,    /* Intuition initialized and maintained variables */
  1778.     0,    /* Rastport of gadget */
  1779.     0,    /* initial value for integer gadgets */
  1780.     NULL    /* alternate keymap (fill in if you set the flag) */
  1781. };
  1782.  
  1783. struct Gadget KRDShiftAltNormalStrGadget = {
  1784.     &KRDCtrlModGadget,    /* next gadget */
  1785.     171,73,    /* origin of hit box */
  1786.     40,8,    /* hit box width and height */
  1787.     NULL,    /* flags */
  1788.     RELVERIFY|STRINGCENTER,    /* activation flags */
  1789.     STRGADGET|REQGADGET,    /* type flags */
  1790.     (APTR)&KRDNormalStrBorder,    /* render border */
  1791.     NULL,    /* select image */
  1792.     NULL,    /* IntuiText list */
  1793.     NULL,    /* mutual-exclude (unused) */
  1794.     (APTR)&KRDShiftAltNormalStrGadSInfo,    /* SpecialInfo structure */
  1795.     0x72,    /* GadgetID */
  1796.     NULL    /* pointer to user data */
  1797. };
  1798.  
  1799. struct Gadget KRDShiftAltDeadGadget = {
  1800.     &KRDShiftAltNormalStrGadget,    /* next gadget */
  1801.     105,73,    /* origin of hit box */
  1802.     35,8,    /* hit box width and height */
  1803.     GADGHCOMP,    /* flags */
  1804.     RELVERIFY|ENDGADGET|TOGGLESELECT,    /* activation flags */
  1805.     BOOLGADGET|REQGADGET,    /* type flags */
  1806.     (APTR)&KRDOptBorder,    /* render border */
  1807.     NULL,    /* select image */
  1808.     &KRDDeadIText,    /* IntuiText list */
  1809.     NULL,    /* mutual-exclude (unused) */
  1810.     NULL,    /* SpecialInfo structure */
  1811.     0x71,    /* GadgetID */
  1812.     NULL    /* pointer to user data */
  1813. };
  1814.  
  1815. struct Gadget KRDShiftAltModGadget = {
  1816.     &KRDShiftAltDeadGadget,    /* next gadget */
  1817.     69,73,    /* origin of hit box */
  1818.     35,8,    /* hit box width and height */
  1819.     GADGHCOMP,    /* flags */
  1820.     RELVERIFY|ENDGADGET|TOGGLESELECT,    /* activation flags */
  1821.     BOOLGADGET|REQGADGET,    /* type flags */
  1822.     (APTR)&KRDOptBorder,    /* render border */
  1823.     NULL,    /* select image */
  1824.     &KRDModIText,    /* IntuiText list */
  1825.     NULL,    /* mutual-exclude (unused) */
  1826.     NULL,    /* SpecialInfo structure */
  1827.     0x70,    /* GadgetID */
  1828.     NULL    /* pointer to user data */
  1829. };
  1830.  
  1831. /*
  1832.  * Dead Key Requester Alt Gadgets
  1833.  */
  1834.  
  1835. struct Gadget KRDAltAcc5Gadget = {
  1836.     &KRDShiftAltModGadget,    /* next gadget */
  1837.     218,64,    /* origin of hit box */
  1838.     16,8,    /* hit box width and height */
  1839.     GADGHCOMP|GADGIMAGE,    /* flags */
  1840.     RELVERIFY|TOGGLESELECT,    /* activation flags */
  1841.     BOOLGADGET|REQGADGET,    /* type flags */
  1842.     (APTR)&KRDAccentImage,    /* render image */
  1843.     NULL,    /* select image */
  1844.     &KRDAcc5IText,    /* IntuiText list */
  1845.     NULL,    /* mutual-exclude (unused) */
  1846.     NULL,    /* SpecialInfo structure */
  1847.     0x6D,    /* GadgetID */
  1848.     NULL    /* pointer to user data */
  1849. };
  1850.  
  1851. struct Gadget KRDAltAcc4Gadget = {
  1852.     &KRDAltAcc5Gadget,    /* next gadget */
  1853.     201,64,    /* origin of hit box */
  1854.     16,8,    /* hit box width and height */
  1855.     GADGHCOMP|GADGIMAGE,    /* flags */
  1856.     RELVERIFY|TOGGLESELECT,    /* activation flags */
  1857.     BOOLGADGET|REQGADGET,    /* type flags */
  1858.     (APTR)&KRDAccentImage,    /* render image */
  1859.     NULL,    /* select image */
  1860.     &KRDAcc4IText,    /* IntuiText list */
  1861.     NULL,    /* mutual-exclude (unused) */
  1862.     NULL,    /* SpecialInfo structure */
  1863.     0x6C,    /* GadgetID */
  1864.     NULL    /* pointer to user data */
  1865. };
  1866.  
  1867. struct Gadget KRDAltAcc3Gadget = {
  1868.     &KRDAltAcc4Gadget,    /* next gadget */
  1869.     184,64,    /* origin of hit box */
  1870.     16,8,    /* hit box width and height */
  1871.     GADGHCOMP|GADGIMAGE,    /* flags */
  1872.     RELVERIFY|TOGGLESELECT,    /* activation flags */
  1873.     BOOLGADGET|REQGADGET,    /* type flags */
  1874.     (APTR)&KRDAccentImage,    /* render image */
  1875.     NULL,    /* select image */
  1876.     &KRDAcc3IText,    /* IntuiText list */
  1877.     NULL,    /* mutual-exclude (unused) */
  1878.     NULL,    /* SpecialInfo structure */
  1879.     0x6B,    /* GadgetID */
  1880.     NULL    /* pointer to user data */
  1881. };
  1882.  
  1883. struct Gadget KRDAltAcc2Gadget = {
  1884.     &KRDAltAcc3Gadget,    /* next gadget */
  1885.     167,64,    /* origin of hit box */
  1886.     16,8,    /* hit box width and height */
  1887.     GADGHCOMP|GADGIMAGE,    /* flags */
  1888.     RELVERIFY|TOGGLESELECT,    /* activation flags */
  1889.     BOOLGADGET|REQGADGET,    /* type flags */
  1890.     (APTR)&KRDAccentImage,    /* render image */
  1891.     NULL,    /* select image */
  1892.     &KRDAcc2IText,    /* IntuiText list */
  1893.     NULL,    /* mutual-exclude (unused) */
  1894.     NULL,    /* SpecialInfo structure */
  1895.     0x6A,    /* GadgetID */
  1896.     NULL    /* pointer to user data */
  1897. };
  1898.  
  1899. struct Gadget KRDAltAcc1Gadget = {
  1900.     &KRDAltAcc2Gadget,    /* next gadget */
  1901.     150,64,    /* origin of hit box */
  1902.     16,8,    /* hit box width and height */
  1903.     GADGHCOMP|GADGIMAGE,    /* flags */
  1904.     RELVERIFY|TOGGLESELECT,    /* activation flags */
  1905.     BOOLGADGET|REQGADGET,    /* type flags */
  1906.     (APTR)&KRDAccentImage,    /* render image */
  1907.     NULL,    /* select image */
  1908.     &KRDAcc1IText,    /* IntuiText list */
  1909.     NULL,    /* mutual-exclude (unused) */
  1910.     NULL,    /* SpecialInfo structure */
  1911.     0x69,    /* GadgetID */
  1912.     NULL    /* pointer to user data */
  1913. };
  1914.  
  1915. UBYTE KRDAltMod5StrGadSIBuff[5];
  1916. struct StringInfo KRDAltMod5StrGadSInfo = {
  1917.     KRDAltMod5StrGadSIBuff,    /* buffer where text will be edited */
  1918.     KRDUndoBuffer,    /* optional undo buffer */
  1919.     0,    /* character position in buffer */
  1920.     5,    /* maximum number of characters */
  1921.     0,    /* first displayed character buffer position */
  1922.     0,0,0,0,0,    /* Intuition initialized and maintained variables */
  1923.     0,    /* Rastport of gadget */
  1924.     0,    /* initial value for integer gadgets */
  1925.     NULL    /* alternate keymap (fill in if you set the flag) */
  1926. };
  1927.  
  1928. struct Gadget KRDAltMod5StrGadget = {
  1929.     &KRDShiftAltModGadget,    /* next gadget */
  1930.     226,64,    /* origin of hit box */
  1931.     16,8,    /* hit box width and height */
  1932.     NULL,    /* flags */
  1933.     RELVERIFY|STRINGCENTER,    /* activation flags */
  1934.     STRGADGET|REQGADGET,    /* type flags */
  1935.     (APTR)&KRDModStrBorder,    /* render border */
  1936.     NULL,    /* select image */
  1937.     NULL,    /* IntuiText list */
  1938.     NULL,    /* mutual-exclude (unused) */
  1939.     (APTR)&KRDAltMod5StrGadSInfo,    /* SpecialInfo structure */
  1940.     0x68,    /* GadgetID */
  1941.     NULL    /* pointer to user data */
  1942. };
  1943.  
  1944. UBYTE KRDAltMod4StrGadSIBuff[5];
  1945. struct StringInfo KRDAltMod4StrGadSInfo = {
  1946.     KRDAltMod4StrGadSIBuff,    /* buffer where text will be edited */
  1947.     KRDUndoBuffer,    /* optional undo buffer */
  1948.     0,    /* character position in buffer */
  1949.     5,    /* maximum number of characters */
  1950.     0,    /* first displayed character buffer position */
  1951.     0,0,0,0,0,    /* Intuition initialized and maintained variables */
  1952.     0,    /* Rastport of gadget */
  1953.     0,    /* initial value for integer gadgets */
  1954.     NULL    /* alternate keymap (fill in if you set the flag) */
  1955. };
  1956.  
  1957. struct Gadget KRDAltMod4StrGadget = {
  1958.     &KRDAltMod5StrGadget,    /* next gadget */
  1959.     209,64,    /* origin of hit box */
  1960.     16,8,    /* hit box width and height */
  1961.     NULL,    /* flags */
  1962.     RELVERIFY|STRINGCENTER,    /* activation flags */
  1963.     STRGADGET|REQGADGET,    /* type flags */
  1964.     (APTR)&KRDModStrBorder,    /* render border */
  1965.     NULL,    /* select image */
  1966.     NULL,    /* IntuiText list */
  1967.     NULL,    /* mutual-exclude (unused) */
  1968.     (APTR)&KRDAltMod4StrGadSInfo,    /* SpecialInfo structure */
  1969.     0x67,    /* GadgetID */
  1970.     NULL    /* pointer to user data */
  1971. };
  1972.  
  1973. UBYTE KRDAltMod3StrGadSIBuff[5];
  1974. struct StringInfo KRDAltMod3StrGadSInfo = {
  1975.     KRDAltMod3StrGadSIBuff,    /* buffer where text will be edited */
  1976.     KRDUndoBuffer,    /* optional undo buffer */
  1977.     0,    /* character position in buffer */
  1978.     5,    /* maximum number of characters */
  1979.     0,    /* first displayed character buffer position */
  1980.     0,0,0,0,0,    /* Intuition initialized and maintained variables */
  1981.     0,    /* Rastport of gadget */
  1982.     0,    /* initial value for integer gadgets */
  1983.     NULL    /* alternate keymap (fill in if you set the flag) */
  1984. };
  1985.  
  1986. struct Gadget KRDAltMod3StrGadget = {
  1987.     &KRDAltMod4StrGadget,    /* next gadget */
  1988.     192,64,    /* origin of hit box */
  1989.     16,8,    /* hit box width and height */
  1990.     NULL,    /* flags */
  1991.     RELVERIFY|STRINGCENTER,    /* activation flags */
  1992.     STRGADGET|REQGADGET,    /* type flags */
  1993.     (APTR)&KRDModStrBorder,    /* render border */
  1994.     NULL,    /* select image */
  1995.     NULL,    /* IntuiText list */
  1996.     NULL,    /* mutual-exclude (unused) */
  1997.     (APTR)&KRDAltMod3StrGadSInfo,    /* SpecialInfo structure */
  1998.     0x66,    /* GadgetID */
  1999.     NULL    /* pointer to user data */
  2000. };
  2001.  
  2002. UBYTE KRDAltMod2StrGadSIBuff[5];
  2003. struct StringInfo KRDAltMod2StrGadSInfo = {
  2004.     KRDAltMod2StrGadSIBuff,    /* buffer where text will be edited */
  2005.     KRDUndoBuffer,    /* optional undo buffer */
  2006.     0,    /* character position in buffer */
  2007.     5,    /* maximum number of characters */
  2008.     0,    /* first displayed character buffer position */
  2009.     0,0,0,0,0,    /* Intuition initialized and maintained variables */
  2010.     0,    /* Rastport of gadget */
  2011.     0,    /* initial value for integer gadgets */
  2012.     NULL    /* alternate keymap (fill in if you set the flag) */
  2013. };
  2014.  
  2015. struct Gadget KRDAltMod2StrGadget = {
  2016.     &KRDAltMod3StrGadget,    /* next gadget */
  2017.     175,64,    /* origin of hit box */
  2018.     16,8,    /* hit box width and height */
  2019.     NULL,    /* flags */
  2020.     RELVERIFY|STRINGCENTER,    /* activation flags */
  2021.     STRGADGET|REQGADGET,    /* type flags */
  2022.     (APTR)&KRDModStrBorder,    /* render border */
  2023.     NULL,    /* select image */
  2024.     NULL,    /* IntuiText list */
  2025.     NULL,    /* mutual-exclude (unused) */
  2026.     (APTR)&KRDAltMod2StrGadSInfo,    /* SpecialInfo structure */
  2027.     0x65,    /* GadgetID */
  2028.     NULL    /* pointer to user data */
  2029. };
  2030.  
  2031. UBYTE KRDAltMod1StrGadSIBuff[5];
  2032. struct StringInfo KRDAltMod1StrGadSInfo = {
  2033.     KRDAltMod1StrGadSIBuff,    /* buffer where text will be edited */
  2034.     KRDUndoBuffer,    /* optional undo buffer */
  2035.     0,    /* character position in buffer */
  2036.     5,    /* maximum number of characters */
  2037.     0,    /* first displayed character buffer position */
  2038.     0,0,0,0,0,    /* Intuition initialized and maintained variables */
  2039.     0,    /* Rastport of gadget */
  2040.     0,    /* initial value for integer gadgets */
  2041.     NULL    /* alternate keymap (fill in if you set the flag) */
  2042. };
  2043.  
  2044. struct Gadget KRDAltMod1StrGadget = {
  2045.     &KRDAltMod2StrGadget,    /* next gadget */
  2046.     158,64,    /* origin of hit box */
  2047.     16,8,    /* hit box width and height */
  2048.     NULL,    /* flags */
  2049.     RELVERIFY|STRINGCENTER,    /* activation flags */
  2050.     STRGADGET|REQGADGET,    /* type flags */
  2051.     (APTR)&KRDModStrBorder,    /* render border */
  2052.     NULL,    /* select image */
  2053.     NULL,    /* IntuiText list */
  2054.     NULL,    /* mutual-exclude (unused) */
  2055.     (APTR)&KRDAltMod1StrGadSInfo,    /* SpecialInfo structure */
  2056.     0x64,    /* GadgetID */
  2057.     NULL    /* pointer to user data */
  2058. };
  2059.  
  2060. UBYTE KRDAltMod0StrGadSIBuff[5];
  2061. struct StringInfo KRDAltMod0StrGadSInfo = {
  2062.     KRDAltMod0StrGadSIBuff,    /* buffer where text will be edited */
  2063.     KRDUndoBuffer,    /* optional undo buffer */
  2064.     0,    /* character position in buffer */
  2065.     5,    /* maximum number of characters */
  2066.     0,    /* first displayed character buffer position */
  2067.     0,0,0,0,0,    /* Intuition initialized and maintained variables */
  2068.     0,    /* Rastport of gadget */
  2069.     0,    /* initial value for integer gadgets */
  2070.     NULL    /* alternate keymap (fill in if you set the flag) */
  2071. };
  2072.  
  2073. struct Gadget KRDAltMod0StrGadget = {
  2074.     &KRDAltMod1StrGadget,    /* next gadget */
  2075.     141,64,    /* origin of hit box */
  2076.     16,8,    /* hit box width and height */
  2077.     NULL,    /* flags */
  2078.     RELVERIFY|STRINGCENTER,    /* activation flags */
  2079.     STRGADGET|REQGADGET,    /* type flags */
  2080.     (APTR)&KRDModStrBorder,    /* render border */
  2081.     NULL,    /* select image */
  2082.     NULL,    /* IntuiText list */
  2083.     NULL,    /* mutual-exclude (unused) */
  2084.     (APTR)&KRDAltMod0StrGadSInfo,    /* SpecialInfo structure */
  2085.     0x63,    /* GadgetID */
  2086.     NULL    /* pointer to user data */
  2087. };
  2088.  
  2089. UBYTE KRDAltNormalStrGadSIBuff[5];
  2090. struct StringInfo KRDAltNormalStrGadSInfo = {
  2091.     KRDAltNormalStrGadSIBuff,    /* buffer where text will be edited */
  2092.     KRDUndoBuffer,    /* optional undo buffer */
  2093.     0,    /* character position in buffer */
  2094.     5,    /* maximum number of characters */
  2095.     0,    /* first displayed character buffer position */
  2096.     0,0,0,0,0,    /* Intuition initialized and maintained variables */
  2097.     0,    /* Rastport of gadget */
  2098.     0,    /* initial value for integer gadgets */
  2099.     NULL    /* alternate keymap (fill in if you set the flag) */
  2100. };
  2101.  
  2102. struct Gadget KRDAltNormalStrGadget = {
  2103.     &KRDShiftAltModGadget,    /* next gadget */
  2104.     171,64,    /* origin of hit box */
  2105.     40,8,    /* hit box width and height */
  2106.     NULL,    /* flags */
  2107.     RELVERIFY|STRINGCENTER,    /* activation flags */
  2108.     STRGADGET|REQGADGET,    /* type flags */
  2109.     (APTR)&KRDNormalStrBorder,    /* render border */
  2110.     NULL,    /* select image */
  2111.     NULL,    /* IntuiText list */
  2112.     NULL,    /* mutual-exclude (unused) */
  2113.     (APTR)&KRDAltNormalStrGadSInfo,    /* SpecialInfo structure */
  2114.     0x62,    /* GadgetID */
  2115.     NULL    /* pointer to user data */
  2116. };
  2117.  
  2118. struct Gadget KRDAltDeadGadget = {
  2119.     &KRDAltNormalStrGadget,    /* next gadget */
  2120.     105,64,    /* origin of hit box */
  2121.     35,8,    /* hit box width and height */
  2122.     GADGHCOMP,    /* flags */
  2123.     RELVERIFY|ENDGADGET|TOGGLESELECT,    /* activation flags */
  2124.     BOOLGADGET|REQGADGET,    /* type flags */
  2125.     (APTR)&KRDOptBorder,    /* render border */
  2126.     NULL,    /* select image */
  2127.     &KRDDeadIText,    /* IntuiText list */
  2128.     NULL,    /* mutual-exclude (unused) */
  2129.     NULL,    /* SpecialInfo structure */
  2130.     0x61,    /* GadgetID */
  2131.     NULL    /* pointer to user data */
  2132. };
  2133.  
  2134. struct Gadget KRDAltModGadget = {
  2135.     &KRDAltDeadGadget,    /* next gadget */
  2136.     69,64,    /* origin of hit box */
  2137.     35,8,    /* hit box width and height */
  2138.     GADGHCOMP,    /* flags */
  2139.     RELVERIFY|ENDGADGET|TOGGLESELECT,    /* activation flags */
  2140.     BOOLGADGET|REQGADGET,    /* type flags */
  2141.     (APTR)&KRDOptBorder,    /* render border */
  2142.     NULL,    /* select image */
  2143.     &KRDModIText,    /* IntuiText list */
  2144.     NULL,    /* mutual-exclude (unused) */
  2145.     NULL,    /* SpecialInfo structure */
  2146.     0x60,    /* GadgetID */
  2147.     NULL    /* pointer to user data */
  2148. };
  2149.  
  2150. /*
  2151.  * Dead Key Requester Shift gadgets
  2152.  */
  2153.  
  2154. struct Gadget KRDShiftAcc5Gadget = {
  2155.     &KRDAltModGadget,    /* next gadget */
  2156.     218,55,    /* origin of hit box */
  2157.     16,8,    /* hit box width and height */
  2158.     GADGHCOMP|GADGIMAGE,    /* flags */
  2159.     RELVERIFY|TOGGLESELECT,    /* activation flags */
  2160.     BOOLGADGET|REQGADGET,    /* type flags */
  2161.     (APTR)&KRDAccentImage,    /* render image */
  2162.     NULL,    /* select image */
  2163.     &KRDAcc5IText,    /* IntuiText list */
  2164.     NULL,    /* mutual-exclude (unused) */
  2165.     NULL,    /* SpecialInfo structure */
  2166.     0x5D,    /* GadgetID */
  2167.     NULL    /* pointer to user data */
  2168. };
  2169.  
  2170. struct Gadget KRDShiftAcc4Gadget = {
  2171.     &KRDShiftAcc5Gadget,    /* next gadget */
  2172.     201,55,    /* origin of hit box */
  2173.     16,8,    /* hit box width and height */
  2174.     GADGHCOMP|GADGIMAGE,    /* flags */
  2175.     RELVERIFY|TOGGLESELECT,    /* activation flags */
  2176.     BOOLGADGET|REQGADGET,    /* type flags */
  2177.     (APTR)&KRDAccentImage,    /* render image */
  2178.     NULL,    /* select image */
  2179.     &KRDAcc4IText,    /* IntuiText list */
  2180.     NULL,    /* mutual-exclude (unused) */
  2181.     NULL,    /* SpecialInfo structure */
  2182.     0x5C,    /* GadgetID */
  2183.     NULL    /* pointer to user data */
  2184. };
  2185.  
  2186. struct Gadget KRDShiftAcc3Gadget = {
  2187.     &KRDShiftAcc4Gadget,    /* next gadget */
  2188.     184,55,    /* origin of hit box */
  2189.     16,8,    /* hit box width and height */
  2190.     GADGHCOMP|GADGIMAGE,    /* flags */
  2191.     RELVERIFY|TOGGLESELECT,    /* activation flags */
  2192.     BOOLGADGET|REQGADGET,    /* type flags */
  2193.     (APTR)&KRDAccentImage,    /* render image */
  2194.     NULL,    /* select image */
  2195.     &KRDAcc3IText,    /* IntuiText list */
  2196.     NULL,    /* mutual-exclude (unused) */
  2197.     NULL,    /* SpecialInfo structure */
  2198.     0x5B,    /* GadgetID */
  2199.     NULL    /* pointer to user data */
  2200. };
  2201.  
  2202. struct Gadget KRDShiftAcc2Gadget = {
  2203.     &KRDShiftAcc3Gadget,    /* next gadget */
  2204.     167,55,    /* origin of hit box */
  2205.     16,8,    /* hit box width and height */
  2206.     GADGHCOMP|GADGIMAGE,    /* flags */
  2207.     RELVERIFY|TOGGLESELECT,    /* activation flags */
  2208.     BOOLGADGET|REQGADGET,    /* type flags */
  2209.     (APTR)&KRDAccentImage,    /* render image */
  2210.     NULL,    /* select image */
  2211.     &KRDAcc2IText,    /* IntuiText list */
  2212.     NULL,    /* mutual-exclude (unused) */
  2213.     NULL,    /* SpecialInfo structure */
  2214.     0x5A,    /* GadgetID */
  2215.     NULL    /* pointer to user data */
  2216. };
  2217.  
  2218. struct Gadget KRDShiftAcc1Gadget = {
  2219.     &KRDShiftAcc2Gadget,    /* next gadget */
  2220.     150,55,    /* origin of hit box */
  2221.     16,8,    /* hit box width and height */
  2222.     GADGHCOMP|GADGIMAGE,    /* flags */
  2223.     RELVERIFY|TOGGLESELECT,    /* activation flags */
  2224.     BOOLGADGET|REQGADGET,    /* type flags */
  2225.     (APTR)&KRDAccentImage,    /* render image */
  2226.     NULL,    /* select image */
  2227.     &KRDAcc1IText,    /* IntuiText list */
  2228.     NULL,    /* mutual-exclude (unused) */
  2229.     NULL,    /* SpecialInfo structure */
  2230.     0x59,    /* GadgetID */
  2231.     NULL    /* pointer to user data */
  2232. };
  2233.  
  2234. UBYTE KRDShiftMod5StrGadSIBuff[5];
  2235. struct StringInfo KRDShiftMod5StrGadSInfo = {
  2236.     KRDShiftMod5StrGadSIBuff,    /* buffer where text will be edited */
  2237.     KRDUndoBuffer,    /* optional undo buffer */
  2238.     0,    /* character position in buffer */
  2239.     5,    /* maximum number of characters */
  2240.     0,    /* first displayed character buffer position */
  2241.     0,0,0,0,0,    /* Intuition initialized and maintained variables */
  2242.     0,    /* Rastport of gadget */
  2243.     0,    /* initial value for integer gadgets */
  2244.     NULL    /* alternate keymap (fill in if you set the flag) */
  2245. };
  2246.  
  2247. struct Gadget KRDShiftMod5StrGadget = {
  2248.     &KRDAltModGadget,    /* next gadget */
  2249.     226,55,    /* origin of hit box */
  2250.     16,8,    /* hit box width and height */
  2251.     NULL,    /* flags */
  2252.     RELVERIFY|STRINGCENTER,    /* activation flags */
  2253.     STRGADGET|REQGADGET,    /* type flags */
  2254.     (APTR)&KRDModStrBorder,    /* render border */
  2255.     NULL,    /* select image */
  2256.     NULL,    /* IntuiText list */
  2257.     NULL,    /* mutual-exclude (unused) */
  2258.     (APTR)&KRDShiftMod5StrGadSInfo,    /* SpecialInfo structure */
  2259.     0x58,    /* GadgetID */
  2260.     NULL    /* pointer to user data */
  2261. };
  2262.  
  2263. UBYTE KRDShiftMod4StrGadSIBuff[5];
  2264. struct StringInfo KRDShiftMod4StrGadSInfo = {
  2265.     KRDShiftMod4StrGadSIBuff,    /* buffer where text will be edited */
  2266.     KRDUndoBuffer,    /* optional undo buffer */
  2267.     0,    /* character position in buffer */
  2268.     5,    /* maximum number of characters */
  2269.     0,    /* first displayed character buffer position */
  2270.     0,0,0,0,0,    /* Intuition initialized and maintained variables */
  2271.     0,    /* Rastport of gadget */
  2272.     0,    /* initial value for integer gadgets */
  2273.     NULL    /* alternate keymap (fill in if you set the flag) */
  2274. };
  2275.  
  2276. struct Gadget KRDShiftMod4StrGadget = {
  2277.     &KRDShiftMod5StrGadget,    /* next gadget */
  2278.     209,55,    /* origin of hit box */
  2279.     16,8,    /* hit box width and height */
  2280.     NULL,    /* flags */
  2281.     RELVERIFY|STRINGCENTER,    /* activation flags */
  2282.     STRGADGET|REQGADGET,    /* type flags */
  2283.     (APTR)&KRDModStrBorder,    /* render border */
  2284.     NULL,    /* select image */
  2285.     NULL,    /* IntuiText list */
  2286.     NULL,    /* mutual-exclude (unused) */
  2287.     (APTR)&KRDShiftMod4StrGadSInfo,    /* SpecialInfo structure */
  2288.     0x57,    /* GadgetID */
  2289.     NULL    /* pointer to user data */
  2290. };
  2291.  
  2292. UBYTE KRDShiftMod3StrGadSIBuff[5];
  2293. struct StringInfo KRDShiftMod3StrGadSInfo = {
  2294.     KRDShiftMod3StrGadSIBuff,    /* buffer where text will be edited */
  2295.     KRDUndoBuffer,    /* optional undo buffer */
  2296.     0,    /* character position in buffer */
  2297.     5,    /* maximum number of characters */
  2298.     0,    /* first displayed character buffer position */
  2299.     0,0,0,0,0,    /* Intuition initialized and maintained variables */
  2300.     0,    /* Rastport of gadget */
  2301.     0,    /* initial value for integer gadgets */
  2302.     NULL    /* alternate keymap (fill in if you set the flag) */
  2303. };
  2304.  
  2305. struct Gadget KRDShiftMod3StrGadget = {
  2306.     &KRDShiftMod4StrGadget,    /* next gadget */
  2307.     192,55,    /* origin of hit box */
  2308.     16,8,    /* hit box width and height */
  2309.     NULL,    /* flags */
  2310.     RELVERIFY|STRINGCENTER,    /* activation flags */
  2311.     STRGADGET|REQGADGET,    /* type flags */
  2312.     (APTR)&KRDModStrBorder,    /* render border */
  2313.     NULL,    /* select image */
  2314.     NULL,    /* IntuiText list */
  2315.     NULL,    /* mutual-exclude (unused) */
  2316.     (APTR)&KRDShiftMod3StrGadSInfo,    /* SpecialInfo structure */
  2317.     0x56,    /* GadgetID */
  2318.     NULL    /* pointer to user data */
  2319. };
  2320.  
  2321. UBYTE KRDShiftMod2StrGadSIBuff[5];
  2322. struct StringInfo KRDShiftMod2StrGadSInfo = {
  2323.     KRDShiftMod2StrGadSIBuff,    /* buffer where text will be edited */
  2324.     KRDUndoBuffer,    /* optional undo buffer */
  2325.     0,    /* character position in buffer */
  2326.     5,    /* maximum number of characters */
  2327.     0,    /* first displayed character buffer position */
  2328.     0,0,0,0,0,    /* Intuition initialized and maintained variables */
  2329.     0,    /* Rastport of gadget */
  2330.     0,    /* initial value for integer gadgets */
  2331.     NULL    /* alternate keymap (fill in if you set the flag) */
  2332. };
  2333.  
  2334. struct Gadget KRDShiftMod2StrGadget = {
  2335.     &KRDShiftMod3StrGadget,    /* next gadget */
  2336.     175,55,    /* origin of hit box */
  2337.     16,8,    /* hit box width and height */
  2338.     NULL,    /* flags */
  2339.     RELVERIFY|STRINGCENTER,    /* activation flags */
  2340.     STRGADGET|REQGADGET,    /* type flags */
  2341.     (APTR)&KRDModStrBorder,    /* render border */
  2342.     NULL,    /* select image */
  2343.     NULL,    /* IntuiText list */
  2344.     NULL,    /* mutual-exclude (unused) */
  2345.     (APTR)&KRDShiftMod2StrGadSInfo,    /* SpecialInfo structure */
  2346.     0x55,    /* GadgetID */
  2347.     NULL    /* pointer to user data */
  2348. };
  2349.  
  2350. UBYTE KRDShiftMod1StrGadSIBuff[5];
  2351. struct StringInfo KRDShiftMod1StrGadSInfo = {
  2352.     KRDShiftMod1StrGadSIBuff,    /* buffer where text will be edited */
  2353.     KRDUndoBuffer,    /* optional undo buffer */
  2354.     0,    /* character position in buffer */
  2355.     5,    /* maximum number of characters */
  2356.     0,    /* first displayed character buffer position */
  2357.     0,0,0,0,0,    /* Intuition initialized and maintained variables */
  2358.     0,    /* Rastport of gadget */
  2359.     0,    /* initial value for integer gadgets */
  2360.     NULL    /* alternate keymap (fill in if you set the flag) */
  2361. };
  2362.  
  2363. struct Gadget KRDShiftMod1StrGadget = {
  2364.     &KRDShiftMod2StrGadget,    /* next gadget */
  2365.     158,55,    /* origin of hit box */
  2366.     16,8,    /* hit box width and height */
  2367.     NULL,    /* flags */
  2368.     RELVERIFY|STRINGCENTER,    /* activation flags */
  2369.     STRGADGET|REQGADGET,    /* type flags */
  2370.     (APTR)&KRDModStrBorder,    /* render border */
  2371.     NULL,    /* select image */
  2372.     NULL,    /* IntuiText list */
  2373.     NULL,    /* mutual-exclude (unused) */
  2374.     (APTR)&KRDShiftMod1StrGadSInfo,    /* SpecialInfo structure */
  2375.     0x54,    /* GadgetID */
  2376.     NULL    /* pointer to user data */
  2377. };
  2378.  
  2379. UBYTE KRDShiftMod0StrGadSIBuff[5];
  2380. struct StringInfo KRDShiftMod0StrGadSInfo = {
  2381.     KRDShiftMod0StrGadSIBuff,    /* buffer where text will be edited */
  2382.     KRDUndoBuffer,    /* optional undo buffer */
  2383.     0,    /* character position in buffer */
  2384.     5,    /* maximum number of characters */
  2385.     0,    /* first displayed character buffer position */
  2386.     0,0,0,0,0,    /* Intuition initialized and maintained variables */
  2387.     0,    /* Rastport of gadget */
  2388.     0,    /* initial value for integer gadgets */
  2389.     NULL    /* alternate keymap (fill in if you set the flag) */
  2390. };
  2391.  
  2392. struct Gadget KRDShiftMod0StrGadget = {
  2393.     &KRDShiftMod1StrGadget,    /* next gadget */
  2394.     141,55,    /* origin of hit box */
  2395.     16,8,    /* hit box width and height */
  2396.     NULL,    /* flags */
  2397.     RELVERIFY|STRINGCENTER,    /* activation flags */
  2398.     STRGADGET|REQGADGET,    /* type flags */
  2399.     (APTR)&KRDModStrBorder,    /* render border */
  2400.     NULL,    /* select image */
  2401.     NULL,    /* IntuiText list */
  2402.     NULL,    /* mutual-exclude (unused) */
  2403.     (APTR)&KRDShiftMod0StrGadSInfo,    /* SpecialInfo structure */
  2404.     0x53,    /* GadgetID */
  2405.     NULL    /* pointer to user data */
  2406. };
  2407.  
  2408. UBYTE KRDShiftNormalStrGadSIBuff[5];
  2409. struct StringInfo KRDShiftNormalStrGadSInfo = {
  2410.     KRDShiftNormalStrGadSIBuff,    /* buffer where text will be edited */
  2411.     KRDUndoBuffer,    /* optional undo buffer */
  2412.     0,    /* character position in buffer */
  2413.     5,    /* maximum number of characters */
  2414.     0,    /* first displayed character buffer position */
  2415.     0,0,0,0,0,    /* Intuition initialized and maintained variables */
  2416.     0,    /* Rastport of gadget */
  2417.     0,    /* initial value for integer gadgets */
  2418.     NULL    /* alternate keymap (fill in if you set the flag) */
  2419. };
  2420.  
  2421. struct Gadget KRDShiftNormalStrGadget = {
  2422.     &KRDAltModGadget,    /* next gadget */
  2423.     171,55,    /* origin of hit box */
  2424.     40,8,    /* hit box width and height */
  2425.     NULL,    /* flags */
  2426.     RELVERIFY|STRINGCENTER,    /* activation flags */
  2427.     STRGADGET|REQGADGET,    /* type flags */
  2428.     (APTR)&KRDNormalStrBorder,    /* render border */
  2429.     NULL,    /* select image */
  2430.     NULL,    /* IntuiText list */
  2431.     NULL,    /* mutual-exclude (unused) */
  2432.     (APTR)&KRDShiftNormalStrGadSInfo,    /* SpecialInfo structure */
  2433.     0x52,    /* GadgetID */
  2434.     NULL    /* pointer to user data */
  2435. };
  2436.  
  2437. struct Gadget KRDShiftDeadGadget = {
  2438.     &KRDShiftNormalStrGadget,    /* next gadget */
  2439.     105,55,    /* origin of hit box */
  2440.     35,8,    /* hit box width and height */
  2441.     GADGHCOMP,    /* flags */
  2442.     RELVERIFY|ENDGADGET|TOGGLESELECT,    /* activation flags */
  2443.     BOOLGADGET|REQGADGET,    /* type flags */
  2444.     (APTR)&KRDOptBorder,    /* render border */
  2445.     NULL,    /* select image */
  2446.     &KRDDeadIText,    /* IntuiText list */
  2447.     NULL,    /* mutual-exclude (unused) */
  2448.     NULL,    /* SpecialInfo structure */
  2449.     0x51,    /* GadgetID */
  2450.     NULL    /* pointer to user data */
  2451. };
  2452.  
  2453. struct Gadget KRDShiftModGadget = {
  2454.     &KRDShiftDeadGadget,    /* next gadget */
  2455.     69,55,    /* origin of hit box */
  2456.     35,8,    /* hit box width and height */
  2457.     GADGHCOMP,    /* flags */
  2458.     RELVERIFY|ENDGADGET|TOGGLESELECT,    /* activation flags */
  2459.     BOOLGADGET|REQGADGET,    /* type flags */
  2460.     (APTR)&KRDOptBorder,    /* render border */
  2461.     NULL,    /* select image */
  2462.     &KRDModIText,    /* IntuiText list */
  2463.     NULL,    /* mutual-exclude (unused) */
  2464.     NULL,    /* SpecialInfo structure */
  2465.     0x50,    /* GadgetID */
  2466.     NULL    /* pointer to user data */
  2467. };
  2468.  
  2469. /*
  2470.  * Dead Key Requester Alone gadgets
  2471.  */
  2472.  
  2473. struct Gadget KRDAloneAcc5Gadget = {
  2474.     &KRDShiftModGadget,    /* next gadget */
  2475.     218,46,    /* origin of hit box */
  2476.     16,8,    /* hit box width and height */
  2477.     GADGHCOMP|GADGIMAGE,    /* flags */
  2478.     RELVERIFY|TOGGLESELECT,    /* activation flags */
  2479.     BOOLGADGET|REQGADGET,    /* type flags */
  2480.     (APTR)&KRDAccentImage,    /* render image */
  2481.     NULL,    /* select image */
  2482.     &KRDAcc5IText,    /* IntuiText list */
  2483.     NULL,    /* mutual-exclude (unused) */
  2484.     NULL,    /* SpecialInfo structure */
  2485.     0x4D,    /* GadgetID */
  2486.     NULL    /* pointer to user data */
  2487. };
  2488.  
  2489. struct Gadget KRDAloneAcc4Gadget = {
  2490.     &KRDAloneAcc5Gadget,    /* next gadget */
  2491.     201,46,    /* origin of hit box */
  2492.     16,8,    /* hit box width and height */
  2493.     GADGHCOMP|GADGIMAGE,    /* flags */
  2494.     RELVERIFY|TOGGLESELECT,    /* activation flags */
  2495.     BOOLGADGET|REQGADGET,    /* type flags */
  2496.     (APTR)&KRDAccentImage,    /* render image */
  2497.     NULL,    /* select image */
  2498.     &KRDAcc4IText,    /* IntuiText list */
  2499.     NULL,    /* mutual-exclude (unused) */
  2500.     NULL,    /* SpecialInfo structure */
  2501.     0x4C,    /* GadgetID */
  2502.     NULL    /* pointer to user data */
  2503. };
  2504.  
  2505. struct Gadget KRDAloneAcc3Gadget = {
  2506.     &KRDAloneAcc4Gadget,    /* next gadget */
  2507.     184,46,    /* origin of hit box */
  2508.     16,8,    /* hit box width and height */
  2509.     GADGHCOMP|GADGIMAGE,    /* flags */
  2510.     RELVERIFY|TOGGLESELECT,    /* activation flags */
  2511.     BOOLGADGET|REQGADGET,    /* type flags */
  2512.     (APTR)&KRDAccentImage,    /* render image */
  2513.     NULL,    /* select image */
  2514.     &KRDAcc3IText,    /* IntuiText list */
  2515.     NULL,    /* mutual-exclude (unused) */
  2516.     NULL,    /* SpecialInfo structure */
  2517.     0x4B,    /* GadgetID */
  2518.     NULL    /* pointer to user data */
  2519. };
  2520.  
  2521. struct Gadget KRDAloneAcc2Gadget = {
  2522.     &KRDAloneAcc3Gadget,    /* next gadget */
  2523.     167,46,    /* origin of hit box */
  2524.     16,8,    /* hit box width and height */
  2525.     GADGHCOMP|GADGIMAGE,    /* flags */
  2526.     RELVERIFY|TOGGLESELECT,    /* activation flags */
  2527.     BOOLGADGET|REQGADGET,    /* type flags */
  2528.     (APTR)&KRDAccentImage,    /* render image */
  2529.     NULL,    /* select image */
  2530.     &KRDAcc2IText,    /* IntuiText list */
  2531.     NULL,    /* mutual-exclude (unused) */
  2532.     NULL,    /* SpecialInfo structure */
  2533.     0x4A,    /* GadgetID */
  2534.     NULL    /* pointer to user data */
  2535. };
  2536.  
  2537. struct Gadget KRDAloneAcc1Gadget = {
  2538.     &KRDAloneAcc2Gadget,    /* next gadget */
  2539.     150,46,    /* origin of hit box */
  2540.     16,8,    /* hit box width and height */
  2541.     GADGHCOMP|GADGIMAGE,    /* flags */
  2542.     RELVERIFY|TOGGLESELECT,    /* activation flags */
  2543.     BOOLGADGET|REQGADGET,    /* type flags */
  2544.     (APTR)&KRDAccentImage,    /* render image */
  2545.     NULL,    /* select image */
  2546.     &KRDAcc1IText,    /* IntuiText list */
  2547.     NULL,    /* mutual-exclude (unused) */
  2548.     NULL,    /* SpecialInfo structure */
  2549.     0x49,    /* GadgetID */
  2550.     NULL    /* pointer to user data */
  2551. };
  2552.  
  2553. UBYTE KRDAloneMod5StrGadSIBuff[5];
  2554. struct StringInfo KRDAloneMod5StrGadSInfo = {
  2555.     KRDAloneMod5StrGadSIBuff,    /* buffer where text will be edited */
  2556.     KRDUndoBuffer,    /* optional undo buffer */
  2557.     0,    /* character position in buffer */
  2558.     5,    /* maximum number of characters */
  2559.     0,    /* first displayed character buffer position */
  2560.     0,0,0,0,0,    /* Intuition initialized and maintained variables */
  2561.     0,    /* Rastport of gadget */
  2562.     0,    /* initial value for integer gadgets */
  2563.     NULL    /* alternate keymap (fill in if you set the flag) */
  2564. };
  2565.  
  2566. struct Gadget KRDAloneMod5StrGadget = {
  2567.     &KRDShiftModGadget,    /* next gadget */
  2568.     226,46,    /* origin of hit box */
  2569.     16,8,    /* hit box width and height */
  2570.     NULL,    /* flags */
  2571.     RELVERIFY|STRINGCENTER,    /* activation flags */
  2572.     STRGADGET|REQGADGET,    /* type flags */
  2573.     (APTR)&KRDModStrBorder,    /* render border */
  2574.     NULL,    /* select image */
  2575.     NULL,    /* IntuiText list */
  2576.     NULL,    /* mutual-exclude (unused) */
  2577.     (APTR)&KRDAloneMod5StrGadSInfo,    /* SpecialInfo structure */
  2578.     0x48,    /* GadgetID */
  2579.     NULL    /* pointer to user data */
  2580. };
  2581.  
  2582. UBYTE KRDAloneMod4StrGadSIBuff[5];
  2583. struct StringInfo KRDAloneMod4StrGadSInfo = {
  2584.     KRDAloneMod4StrGadSIBuff,    /* buffer where text will be edited */
  2585.     KRDUndoBuffer,    /* optional undo buffer */
  2586.     0,    /* character position in buffer */
  2587.     5,    /* maximum number of characters */
  2588.     0,    /* first displayed character buffer position */
  2589.     0,0,0,0,0,    /* Intuition initialized and maintained variables */
  2590.     0,    /* Rastport of gadget */
  2591.     0,    /* initial value for integer gadgets */
  2592.     NULL    /* alternate keymap (fill in if you set the flag) */
  2593. };
  2594.  
  2595. struct Gadget KRDAloneMod4StrGadget = {
  2596.     &KRDAloneMod5StrGadget,    /* next gadget */
  2597.     209,46,    /* origin of hit box */
  2598.     16,8,    /* hit box width and height */
  2599.     NULL,    /* flags */
  2600.     RELVERIFY|STRINGCENTER,    /* activation flags */
  2601.     STRGADGET|REQGADGET,    /* type flags */
  2602.     (APTR)&KRDModStrBorder,    /* render border */
  2603.     NULL,    /* select image */
  2604.     NULL,    /* IntuiText list */
  2605.     NULL,    /* mutual-exclude (unused) */
  2606.     (APTR)&KRDAloneMod4StrGadSInfo,    /* SpecialInfo structure */
  2607.     0x47,    /* GadgetID */
  2608.     NULL    /* pointer to user data */
  2609. };
  2610.  
  2611. UBYTE KRDAloneMod3StrGadSIBuff[5];
  2612. struct StringInfo KRDAloneMod3StrGadSInfo = {
  2613.     KRDAloneMod3StrGadSIBuff,    /* buffer where text will be edited */
  2614.     KRDUndoBuffer,    /* optional undo buffer */
  2615.     0,    /* character position in buffer */
  2616.     5,    /* maximum number of characters */
  2617.     0,    /* first displayed character buffer position */
  2618.     0,0,0,0,0,    /* Intuition initialized and maintained variables */
  2619.     0,    /* Rastport of gadget */
  2620.     0,    /* initial value for integer gadgets */
  2621.     NULL    /* alternate keymap (fill in if you set the flag) */
  2622. };
  2623.  
  2624. struct Gadget KRDAloneMod3StrGadget = {
  2625.     &KRDAloneMod4StrGadget,    /* next gadget */
  2626.     192,46,    /* origin of hit box */
  2627.     16,8,    /* hit box width and height */
  2628.     NULL,    /* flags */
  2629.     RELVERIFY|STRINGCENTER,    /* activation flags */
  2630.     STRGADGET|REQGADGET,    /* type flags */
  2631.     (APTR)&KRDModStrBorder,    /* render border */
  2632.     NULL,    /* select image */
  2633.     NULL,    /* IntuiText list */
  2634.     NULL,    /* mutual-exclude (unused) */
  2635.     (APTR)&KRDAloneMod3StrGadSInfo,    /* SpecialInfo structure */
  2636.     0x46,    /* GadgetID */
  2637.     NULL    /* pointer to user data */
  2638. };
  2639.  
  2640. UBYTE KRDAloneMod2StrGadSIBuff[5];
  2641. struct StringInfo KRDAloneMod2StrGadSInfo = {
  2642.     KRDAloneMod2StrGadSIBuff,    /* buffer where text will be edited */
  2643.     KRDUndoBuffer,    /* optional undo buffer */
  2644.     0,    /* character position in buffer */
  2645.     5,    /* maximum number of characters */
  2646.     0,    /* first displayed character buffer position */
  2647.     0,0,0,0,0,    /* Intuition initialized and maintained variables */
  2648.     0,    /* Rastport of gadget */
  2649.     0,    /* initial value for integer gadgets */
  2650.     NULL    /* alternate keymap (fill in if you set the flag) */
  2651. };
  2652.  
  2653. struct Gadget KRDAloneMod2StrGadget = {
  2654.     &KRDAloneMod3StrGadget,    /* next gadget */
  2655.     175,46,    /* origin of hit box */
  2656.     16,8,    /* hit box width and height */
  2657.     NULL,    /* flags */
  2658.     RELVERIFY|STRINGCENTER,    /* activation flags */
  2659.     STRGADGET|REQGADGET,    /* type flags */
  2660.     (APTR)&KRDModStrBorder,    /* render border */
  2661.     NULL,    /* select image */
  2662.     NULL,    /* IntuiText list */
  2663.     NULL,    /* mutual-exclude (unused) */
  2664.     (APTR)&KRDAloneMod2StrGadSInfo,    /* SpecialInfo structure */
  2665.     0x45,    /* GadgetID */
  2666.     NULL    /* pointer to user data */
  2667. };
  2668.  
  2669. UBYTE KRDAloneMod1StrGadSIBuff[5];
  2670. struct StringInfo KRDAloneMod1StrGadSInfo = {
  2671.     KRDAloneMod1StrGadSIBuff,    /* buffer where text will be edited */
  2672.     KRDUndoBuffer,    /* optional undo buffer */
  2673.     0,    /* character position in buffer */
  2674.     5,    /* maximum number of characters */
  2675.     0,    /* first displayed character buffer position */
  2676.     0,0,0,0,0,    /* Intuition initialized and maintained variables */
  2677.     0,    /* Rastport of gadget */
  2678.     0,    /* initial value for integer gadgets */
  2679.     NULL    /* alternate keymap (fill in if you set the flag) */
  2680. };
  2681.  
  2682. struct Gadget KRDAloneMod1StrGadget = {
  2683.     &KRDAloneMod2StrGadget,    /* next gadget */
  2684.     158,46,    /* origin of hit box */
  2685.     16,8,    /* hit box width and height */
  2686.     NULL,    /* flags */
  2687.     RELVERIFY|STRINGCENTER,    /* activation flags */
  2688.     STRGADGET|REQGADGET,    /* type flags */
  2689.     (APTR)&KRDModStrBorder,    /* render border */
  2690.     NULL,    /* select image */
  2691.     NULL,    /* IntuiText list */
  2692.     NULL,    /* mutual-exclude (unused) */
  2693.     (APTR)&KRDAloneMod1StrGadSInfo,    /* SpecialInfo structure */
  2694.     0x44,    /* GadgetID */
  2695.     NULL    /* pointer to user data */
  2696. };
  2697.  
  2698. UBYTE KRDAloneMod0StrGadSIBuff[5];
  2699. struct StringInfo KRDAloneMod0StrGadSInfo = {
  2700.     KRDAloneMod0StrGadSIBuff,    /* buffer where text will be edited */
  2701.     KRDUndoBuffer,    /* optional undo buffer */
  2702.     0,    /* character position in buffer */
  2703.     5,    /* maximum number of characters */
  2704.     0,    /* first displayed character buffer position */
  2705.     0,0,0,0,0,    /* Intuition initialized and maintained variables */
  2706.     0,    /* Rastport of gadget */
  2707.     0,    /* initial value for integer gadgets */
  2708.     NULL    /* alternate keymap (fill in if you set the flag) */
  2709. };
  2710.  
  2711. struct Gadget KRDAloneMod0StrGadget = {
  2712.     &KRDAloneMod1StrGadget,    /* next gadget */
  2713.     141,46,    /* origin of hit box */
  2714.     16,8,    /* hit box width and height */
  2715.     NULL,    /* flags */
  2716.     RELVERIFY|STRINGCENTER,    /* activation flags */
  2717.     STRGADGET|REQGADGET,    /* type flags */
  2718.     (APTR)&KRDModStrBorder,    /* render border */
  2719.     NULL,    /* select image */
  2720.     NULL,    /* IntuiText list */
  2721.     NULL,    /* mutual-exclude (unused) */
  2722.     (APTR)&KRDAloneMod0StrGadSInfo,    /* SpecialInfo structure */
  2723.     0x43,    /* GadgetID */
  2724.     NULL    /* pointer to user data */
  2725. };
  2726.  
  2727. UBYTE KRDAloneNormalStrGadSIBuff[5];
  2728. struct StringInfo KRDAloneNormalStrGadSInfo = {
  2729.     KRDAloneNormalStrGadSIBuff,    /* buffer where text will be edited */
  2730.     KRDUndoBuffer,    /* optional undo buffer */
  2731.     0,    /* character position in buffer */
  2732.     5,    /* maximum number of characters */
  2733.     0,    /* first displayed character buffer position */
  2734.     0,0,0,0,0,    /* Intuition initialized and maintained variables */
  2735.     0,    /* Rastport of gadget */
  2736.     0,    /* initial value for integer gadgets */
  2737.     NULL    /* alternate keymap (fill in if you set the flag) */
  2738. };
  2739.  
  2740. struct Gadget KRDAloneNormalStrGadget = {
  2741.     &KRDShiftModGadget,    /* next gadget */
  2742.     171,46,    /* origin of hit box */
  2743.     40,8,    /* hit box width and height */
  2744.     NULL,    /* flags */
  2745.     RELVERIFY|STRINGCENTER,    /* activation flags */
  2746.     STRGADGET|REQGADGET,    /* type flags */
  2747.     (APTR)&KRDNormalStrBorder,    /* render border */
  2748.     NULL,    /* select image */
  2749.     NULL,    /* IntuiText list */
  2750.     NULL,    /* mutual-exclude (unused) */
  2751.     (APTR)&KRDAloneNormalStrGadSInfo,    /* SpecialInfo structure */
  2752.     0x42,    /* GadgetID */
  2753.     NULL    /* pointer to user data */
  2754. };
  2755.  
  2756. struct Gadget KRDAloneDeadGadget = {
  2757.     &KRDAloneNormalStrGadget,    /* next gadget */
  2758.     105,46,    /* origin of hit box */
  2759.     35,8,    /* hit box width and height */
  2760.     GADGHCOMP,    /* flags */
  2761.     RELVERIFY|ENDGADGET|TOGGLESELECT,    /* activation flags */
  2762.     BOOLGADGET|REQGADGET,    /* type flags */
  2763.     (APTR)&KRDOptBorder,    /* render border */
  2764.     NULL,    /* select image */
  2765.     &KRDDeadIText,    /* IntuiText list */
  2766.     NULL,    /* mutual-exclude (unused) */
  2767.     NULL,    /* SpecialInfo structure */
  2768.     0x41,    /* GadgetID */
  2769.     NULL    /* pointer to user data */
  2770. };
  2771.  
  2772. struct Gadget KRDAloneModGadget = {
  2773.     &KRDAloneDeadGadget,    /* next gadget */
  2774.     69,46,    /* origin of hit box */
  2775.     35,8,    /* hit box width and height */
  2776.     GADGHCOMP,    /* flags */
  2777.     RELVERIFY|ENDGADGET|TOGGLESELECT,    /* activation flags */
  2778.     BOOLGADGET|REQGADGET,    /* type flags */
  2779.     (APTR)&KRDOptBorder,    /* render border */
  2780.     NULL,    /* select image */
  2781.     &KRDModIText,    /* IntuiText list */
  2782.     NULL,    /* mutual-exclude (unused) */
  2783.     NULL,    /* SpecialInfo structure */
  2784.     0x40,    /* GadgetID */
  2785.     NULL    /* pointer to user data */
  2786. };
  2787.  
  2788. #define KRDeadGadgetList &KRDAloneModGadget
  2789.  
  2790. struct IntuiText KRDVanillaIText = {
  2791.     1,0,JAM1,    /* frontpen, backpen, and drawmode */
  2792.     10,109,    /* origin */
  2793.     NULL,    /* font */
  2794.     KRVanillaString,    /* text */
  2795.     NULL    /* next IntuiText */
  2796. };
  2797.  
  2798. struct IntuiText KRDCtrlAltIText = {
  2799.     1,0,JAM1,    /* frontpen, backpen, and drawmode */
  2800.     2,100,    /* origin */
  2801.     NULL,    /* font */
  2802.     KRCtrlAltString,    /* text */
  2803.     &KRDVanillaIText    /* next IntuiText */
  2804. };
  2805.  
  2806. struct IntuiText KRDCtrlShiftIText = {
  2807.     1,0,JAM1,    /* frontpen, backpen, and drawmode */
  2808.     2,91,    /* origin */
  2809.     NULL,    /* font */
  2810.     "CtrlShft",    /* text */
  2811.     &KRDCtrlAltIText    /* next IntuiText */
  2812. };
  2813.  
  2814. struct IntuiText KRDCtrlIText = {
  2815.     1,0,JAM1,    /* frontpen, backpen, and drawmode */
  2816.     34,82,    /* origin */
  2817.     NULL,    /* font */
  2818.     KRCtrlString,    /* text */
  2819.     &KRDCtrlShiftIText    /* next IntuiText */
  2820. };
  2821.  
  2822. struct IntuiText KRDShiftAltIText = {
  2823.     1,0,JAM1,    /* frontpen, backpen, and drawmode */
  2824.     2,73,    /* origin */
  2825.     NULL,    /* font */
  2826.     "Shft+Alt",    /* text */
  2827.     &KRDCtrlIText    /* next IntuiText */
  2828. };
  2829.  
  2830. struct IntuiText KRDAltIText = {
  2831.     1,0,JAM1,    /* frontpen, backpen, and drawmode */
  2832.     42,64,    /* origin */
  2833.     NULL,    /* font */
  2834.     KRAltString,    /* text */
  2835.     &KRDShiftAltIText    /* next IntuiText */
  2836. };
  2837.  
  2838. struct IntuiText KRDShiftIText = {
  2839.     1,0,JAM1,    /* frontpen, backpen, and drawmode */
  2840.     26,55,    /* origin */
  2841.     NULL,    /* font */
  2842.     KRShiftString,    /* text */
  2843.     &KRDAltIText    /* next IntuiText */
  2844. };
  2845.  
  2846. struct IntuiText KRDAloneIText = {
  2847.     1,0,JAM1,    /* frontpen, backpen, and drawmode */
  2848.     26,46,    /* origin */
  2849.     NULL,    /* font */
  2850.     KRAloneString,    /* text */
  2851.     &KRDShiftIText    /* next IntuiText */
  2852. };
  2853.  
  2854. #define KRDeadITextList &KRDAloneIText
  2855.  
  2856. /*
  2857.  * Key Requester String Requester
  2858.  */
  2859.  
  2860. SHORT KRSStrGadBordVectors[] = {
  2861.     0,0,
  2862.     161,0,
  2863.     161,9,
  2864.     0,9,
  2865.     0,0
  2866. };
  2867. struct Border KRSStrGadBorder = {
  2868.     -1,-1,    /* origin */
  2869.     1,0,JAM1,    /* front pen, back pen and drawmode */
  2870.     5,    /* number of vectors */
  2871.     KRSStrGadBordVectors,    /* pointer to vectors */
  2872.     NULL    /* next border */
  2873. };
  2874.  
  2875. UBYTE KRSUndoBuffer[128];
  2876.  
  2877. UBYTE KRSVanillaStrGadSIBuff[128];
  2878. struct StringInfo KRSVanillaStrGadSInfo = {
  2879.     KRSVanillaStrGadSIBuff,    /* buffer where text will be edited */
  2880.     KRSUndoBuffer,    /* optional undo buffer */
  2881.     0,    /* character position in buffer */
  2882.     128,    /* maximum number of characters to allow */
  2883.     0,    /* first displayed character buffer position */
  2884.     0,0,0,0,0,    /* Intuition initialized and maintained variables */
  2885.     0,    /* Rastport of gadget */
  2886.     0,    /* initial value for integer gadgets */
  2887.     NULL    /* alternate keymap (fill in if you set the flag) */
  2888. };
  2889.  
  2890. struct Gadget KRSVanillaStrGadget = {
  2891.     &KRUseGadget,    /* next gadget */
  2892.     82,109,    /* origin of hit box */
  2893.     160,8,    /* hit box width and height */
  2894.     NULL,    /* flags */
  2895.     RELVERIFY|STRINGCENTER,    /* activation flags */
  2896.     STRGADGET|REQGADGET,    /* type flags */
  2897.     (APTR)&KRSStrGadBorder,    /* render border */
  2898.     NULL,    /* select image */
  2899.     NULL,    /* IntuiText list */
  2900.     NULL,    /* mutual-exclude (unused) */
  2901.     (APTR)&KRSVanillaStrGadSInfo,    /* SpecialInfo structure */
  2902.     0x37,    /* GadgetID */
  2903.     NULL    /* pointer to user data */
  2904. };
  2905.  
  2906. UBYTE KRSCtrlAltStrGadSIBuff[128];
  2907. struct StringInfo KRSCtrlAltStrGadSInfo = {
  2908.     KRSCtrlAltStrGadSIBuff,    /* buffer where text will be edited */
  2909.     KRSUndoBuffer,    /* optional undo buffer */
  2910.     0,    /* character position in buffer */
  2911.     128,    /* maximum number of characters to allow */
  2912.     0,    /* first displayed character buffer position */
  2913.     0,0,0,0,0,    /* Intuition initialized and maintained variables */
  2914.     0,    /* Rastport of gadget */
  2915.     0,    /* initial value for integer gadgets */
  2916.     NULL    /* alternate keymap (fill in if you set the flag) */
  2917. };
  2918.  
  2919. struct Gadget KRSCtrlAltStrGadget = {
  2920.     &KRSVanillaStrGadget,    /* next gadget */
  2921.     82,100,    /* origin of hit box */
  2922.     160,8,    /* hit box width and height */
  2923.     NULL,    /* flags */
  2924.     RELVERIFY|STRINGCENTER,    /* activation flags */
  2925.     STRGADGET|REQGADGET,    /* type flags */
  2926.     (APTR)&KRSStrGadBorder,    /* render border */
  2927.     NULL,    /* select image */
  2928.     NULL,    /* IntuiText list */
  2929.     NULL,    /* mutual-exclude (unused) */
  2930.     (APTR)&KRSCtrlAltStrGadSInfo,    /* SpecialInfo structure */
  2931.     0x36,    /* GadgetID */
  2932.     NULL    /* pointer to user data */
  2933. };
  2934.  
  2935. UBYTE KRSCtrlShiftStrGadSIBuff[128];
  2936. struct StringInfo KRSCtrlShiftStrGadSInfo = {
  2937.     KRSCtrlShiftStrGadSIBuff,    /* buffer where text will be edited */
  2938.     KRSUndoBuffer,    /* optional undo buffer */
  2939.     0,    /* character position in buffer */
  2940.     128,    /* maximum number of characters to allow */
  2941.     0,    /* first displayed character buffer position */
  2942.     0,0,0,0,0,    /* Intuition initialized and maintained variables */
  2943.     0,    /* Rastport of gadget */
  2944.     0,    /* initial value for integer gadgets */
  2945.     NULL    /* alternate keymap (fill in if you set the flag) */
  2946. };
  2947.  
  2948. struct Gadget KRSCtrlShiftStrGadget = {
  2949.     &KRSCtrlAltStrGadget,    /* next gadget */
  2950.     82,91,    /* origin of hit box */
  2951.     160,8,    /* hit box width and height */
  2952.     NULL,    /* flags */
  2953.     RELVERIFY|STRINGCENTER,    /* activation flags */
  2954.     STRGADGET|REQGADGET,    /* type flags */
  2955.     (APTR)&KRSStrGadBorder,    /* render border */
  2956.     NULL,    /* select image */
  2957.     NULL,    /* IntuiText list */
  2958.     NULL,    /* mutual-exclude (unused) */
  2959.     (APTR)&KRSCtrlShiftStrGadSInfo,    /* SpecialInfo structure */
  2960.     0x35,    /* GadgetID */
  2961.     NULL    /* pointer to user data */
  2962. };
  2963.  
  2964. UBYTE KRSCtrlStrGadSIBuff[128];
  2965. struct StringInfo KRSCtrlStrGadSInfo = {
  2966.     KRSCtrlStrGadSIBuff,    /* buffer where text will be edited */
  2967.     KRSUndoBuffer,    /* optional undo buffer */
  2968.     0,    /* character position in buffer */
  2969.     128,    /* maximum number of characters to allow */
  2970.     0,    /* first displayed character buffer position */
  2971.     0,0,0,0,0,    /* Intuition initialized and maintained variables */
  2972.     0,    /* Rastport of gadget */
  2973.     0,    /* initial value for integer gadgets */
  2974.     NULL    /* alternate keymap (fill in if you set the flag) */
  2975. };
  2976.  
  2977. struct Gadget KRSCtrlStrGadget = {
  2978.     &KRSCtrlShiftStrGadget,    /* next gadget */
  2979.     82,82,    /* origin of hit box */
  2980.     160,8,    /* hit box width and height */
  2981.     NULL,    /* flags */
  2982.     RELVERIFY|STRINGCENTER,    /* activation flags */
  2983.     STRGADGET|REQGADGET,    /* type flags */
  2984.     (APTR)&KRSStrGadBorder,    /* render border */
  2985.     NULL,    /* select image */
  2986.     NULL,    /* IntuiText list */
  2987.     NULL,    /* mutual-exclude (unused) */
  2988.     (APTR)&KRSCtrlStrGadSInfo,    /* SpecialInfo structure */
  2989.     0x34,    /* GadgetID */
  2990.     NULL    /* pointer to user data */
  2991. };
  2992.  
  2993. UBYTE KRSShiftAltStrGadSIBuff[128];
  2994. struct StringInfo KRSShiftAltStrGadSInfo = {
  2995.     KRSShiftAltStrGadSIBuff,    /* buffer where text will be edited */
  2996.     KRSUndoBuffer,    /* optional undo buffer */
  2997.     0,    /* character position in buffer */
  2998.     128,    /* maximum number of characters to allow */
  2999.     0,    /* first displayed character buffer position */
  3000.     0,0,0,0,0,    /* Intuition initialized and maintained variables */
  3001.     0,    /* Rastport of gadget */
  3002.     0,    /* initial value for integer gadgets */
  3003.     NULL    /* alternate keymap (fill in if you set the flag) */
  3004. };
  3005.  
  3006. struct Gadget KRSShiftAltStrGadget = {
  3007.     &KRSCtrlStrGadget,    /* next gadget */
  3008.     82,73,    /* origin of hit box */
  3009.     160,8,    /* hit box width and height */
  3010.     NULL,    /* flags */
  3011.     RELVERIFY|STRINGCENTER,    /* activation flags */
  3012.     STRGADGET|REQGADGET,    /* type flags */
  3013.     (APTR)&KRSStrGadBorder,    /* render border */
  3014.     NULL,    /* select image */
  3015.     NULL,    /* IntuiText list */
  3016.     NULL,    /* mutual-exclude (unused) */
  3017.     (APTR)&KRSShiftAltStrGadSInfo,    /* SpecialInfo structure */
  3018.     0x33,    /* GadgetID */
  3019.     NULL    /* pointer to user data */
  3020. };
  3021.  
  3022. UBYTE KRSAltStrGadSIBuff[128];
  3023. struct StringInfo KRSAltStrGadSInfo = {
  3024.     KRSAltStrGadSIBuff,    /* buffer where text will be edited */
  3025.     KRSUndoBuffer,    /* optional undo buffer */
  3026.     0,    /* character position in buffer */
  3027.     128,    /* maximum number of characters to allow */
  3028.     0,    /* first displayed character buffer position */
  3029.     0,0,0,0,0,    /* Intuition initialized and maintained variables */
  3030.     0,    /* Rastport of gadget */
  3031.     0,    /* initial value for integer gadgets */
  3032.     NULL    /* alternate keymap (fill in if you set the flag) */
  3033. };
  3034.  
  3035. struct Gadget KRSAltStrGadget = {
  3036.     &KRSShiftAltStrGadget,    /* next gadget */
  3037.     82,64,    /* origin of hit box */
  3038.     160,8,    /* hit box width and height */
  3039.     NULL,    /* flags */
  3040.     RELVERIFY|STRINGCENTER,    /* activation flags */
  3041.     STRGADGET|REQGADGET,    /* type flags */
  3042.     (APTR)&KRSStrGadBorder,    /* render border */
  3043.     NULL,    /* select image */
  3044.     NULL,    /* IntuiText list */
  3045.     NULL,    /* mutual-exclude (unused) */
  3046.     (APTR)&KRSAltStrGadSInfo,    /* SpecialInfo structure */
  3047.     0x32,    /* GadgetID */
  3048.     NULL    /* pointer to user data */
  3049. };
  3050.  
  3051. UBYTE KRSShiftStrGadSIBuff[128];
  3052. struct StringInfo KRSShiftStrGadSInfo = {
  3053.     KRSShiftStrGadSIBuff,    /* buffer where text will be edited */
  3054.     KRSUndoBuffer,    /* optional undo buffer */
  3055.     0,    /* character position in buffer */
  3056.     128,    /* maximum number of characters to allow */
  3057.     0,    /* first displayed character buffer position */
  3058.     0,0,0,0,0,    /* Intuition initialized and maintained variables */
  3059.     0,    /* Rastport of gadget */
  3060.     0,    /* initial value for integer gadgets */
  3061.     NULL    /* alternate keymap (fill in if you set the flag) */
  3062. };
  3063.  
  3064. struct Gadget KRSShiftStrGadget = {
  3065.     &KRSAltStrGadget,    /* next gadget */
  3066.     82,55,    /* origin of hit box */
  3067.     160,8,    /* hit box width and height */
  3068.     NULL,    /* flags */
  3069.     RELVERIFY|STRINGCENTER,    /* activation flags */
  3070.     STRGADGET|REQGADGET,    /* type flags */
  3071.     (APTR)&KRSStrGadBorder,    /* render border */
  3072.     NULL,    /* select image */
  3073.     NULL,    /* IntuiText list */
  3074.     NULL,    /* mutual-exclude (unused) */
  3075.     (APTR)&KRSShiftStrGadSInfo,    /* SpecialInfo structure */
  3076.     0x31,    /* GadgetID */
  3077.     NULL    /* pointer to user data */
  3078. };
  3079.  
  3080. UBYTE KRSAloneStrGadSIBuff[128];
  3081. struct StringInfo KRSAloneStrGadSInfo = {
  3082.     KRSAloneStrGadSIBuff,    /* buffer where text will be edited */
  3083.     KRSUndoBuffer,    /* optional undo buffer */
  3084.     0,    /* character position in buffer */
  3085.     128,    /* maximum number of characters to allow */
  3086.     0,    /* first displayed character buffer position */
  3087.     0,0,0,0,0,    /* Intuition initialized and maintained variables */
  3088.     0,    /* Rastport of gadget */
  3089.     0,    /* initial value for integer gadgets */
  3090.     NULL    /* alternate keymap (fill in if you set the flag) */
  3091. };
  3092.  
  3093. struct Gadget KRSAloneStrGadget = {
  3094.     &KRSShiftStrGadget,    /* next gadget */
  3095.     82,46,    /* origin of hit box */
  3096.     160,8,    /* hit box width and height */
  3097.     NULL,    /* flags */
  3098.     RELVERIFY|STRINGCENTER,    /* activation flags */
  3099.     STRGADGET|REQGADGET,    /* type flags */
  3100.     (APTR)&KRSStrGadBorder,    /* render border */
  3101.     NULL,    /* select image */
  3102.     NULL,    /* IntuiText list */
  3103.     NULL,    /* mutual-exclude (unused) */
  3104.     (APTR)&KRSAloneStrGadSInfo,    /* SpecialInfo structure */
  3105.     0x30,    /* GadgetID */
  3106.     NULL    /* pointer to user data */
  3107. };
  3108.  
  3109. #define KRStringGadgetList &KRSAloneStrGadget
  3110.  
  3111. struct IntuiText KRStringIText7 = {
  3112.     1,0,JAM1,    /* frontpen, backpen, and drawmode */
  3113.     23,109,    /* origin */
  3114.     NULL,    /* font */
  3115.     KRVanillaString,    /* text */
  3116.     NULL    /* next IntuiText */
  3117. };
  3118.  
  3119. struct IntuiText KRStringIText6 = {
  3120.     1,0,JAM1,    /* frontpen, backpen, and drawmode */
  3121.     16,100,    /* origin */
  3122.     NULL,    /* font */
  3123.     KRCtrlAltString,    /* text */
  3124.     &KRStringIText7    /* next IntuiText */
  3125. };
  3126.  
  3127. struct IntuiText KRStringIText5 = {
  3128.     1,0,JAM1,    /* frontpen, backpen, and drawmode */
  3129.     0,91,    /* origin */
  3130.     NULL,    /* font */
  3131.     KRCtrlShiftString,    /* text */
  3132.     &KRStringIText6    /* next IntuiText */
  3133. };
  3134.  
  3135. struct IntuiText KRStringIText4 = {
  3136.     1,0,JAM1,    /* frontpen, backpen, and drawmode */
  3137.     49,82,    /* origin */
  3138.     NULL,    /* font */
  3139.     KRCtrlString,    /* text */
  3140.     &KRStringIText5    /* next IntuiText */
  3141. };
  3142.  
  3143. struct IntuiText KRStringIText3 = {
  3144.     1,0,JAM1,    /* frontpen, backpen, and drawmode */
  3145.     8,73,    /* origin */
  3146.     NULL,    /* font */
  3147.     KRShiftAltString,    /* text */
  3148.     &KRStringIText4    /* next IntuiText */
  3149. };
  3150.  
  3151. struct IntuiText KRStringIText2 = {
  3152.     1,0,JAM1,    /* frontpen, backpen, and drawmode */
  3153.     56,64,    /* origin */
  3154.     NULL,    /* font */
  3155.     KRAltString,    /* text */
  3156.     &KRStringIText3    /* next IntuiText */
  3157. };
  3158.  
  3159. struct IntuiText KRStringIText1 = {
  3160.     1,0,JAM1,    /* frontpen, backpen, and drawmode */
  3161.     40,55,    /* origin */
  3162.     NULL,    /* font */
  3163.     KRShiftString,    /* text */
  3164.     &KRStringIText2    /* next IntuiText */
  3165. };
  3166.  
  3167. struct IntuiText KRStringIText0 = {
  3168.     1,0,JAM1,    /* frontpen, backpen, and drawmode */
  3169.     40,46,    /* origin */
  3170.     NULL,    /* font */
  3171.     KRAloneString,    /* text */
  3172.     &KRStringIText1    /* next IntuiText */
  3173. };
  3174.  
  3175. #define KRStringITextList &KRStringIText0
  3176.  
  3177. /*
  3178.  * Normal Key Requester
  3179.  */
  3180.  
  3181. SHORT KRNStrGadBordVectors[] = {
  3182.     0,0,
  3183.     41,0,
  3184.     41,9,
  3185.     0,9,
  3186.     0,0
  3187. };
  3188. struct Border KRNStrGadBorder = {
  3189.     -1,-1,    /* origin */
  3190.     1,0,JAM1,    /* front pen, back pen and drawmode */
  3191.     5,    /* number of vectors */
  3192.     KRNStrGadBordVectors,    /* pointer to vectors */
  3193.     NULL    /* next border */
  3194. };
  3195.  
  3196. UBYTE KRNUndoBuffer[5];
  3197.  
  3198. UBYTE KRNOpt3StrGadSIBuff[5];
  3199. struct StringInfo KRNOpt3StrGadSInfo = {
  3200.     KRNOpt3StrGadSIBuff,    /* buffer where text will be edited */
  3201.     KRNUndoBuffer,    /* optional undo buffer */
  3202.     0,    /* character position in buffer */
  3203.     5,    /* maximum number of characters */
  3204.     0,    /* first displayed character buffer position */
  3205.     0,0,0,0,0,    /* Intuition initialized and maintained variables */
  3206.     0,    /* Rastport of gadget */
  3207.     0,    /* initial value for integer gadgets */
  3208.     NULL    /* alternate keymap (fill in if you set the flag) */
  3209. };
  3210.  
  3211. struct Gadget KRNOpt3StrGadget = {
  3212.     &KRUseGadget,    /* next gadget */
  3213.     160,88,    /* origin of hit box */
  3214.     40,8,    /* hit box width and height */
  3215.     NULL,    /* flags */
  3216.     RELVERIFY|STRINGCENTER,    /* activation flags */
  3217.     STRGADGET|REQGADGET,    /* type flags */
  3218.     (APTR)&KRNStrGadBorder,    /* render border */
  3219.     NULL,    /* select image */
  3220.     NULL,    /* IntuiText list */
  3221.     NULL,    /* mutual-exclude (unused) */
  3222.     (APTR)&KRNOpt3StrGadSInfo,    /* SpecialInfo structure */
  3223.     0x23,    /* GadgetID */
  3224.     NULL    /* pointer to user data */
  3225. };
  3226.  
  3227. UBYTE KRNOpt2StrGadSIBuff[5];
  3228. struct StringInfo KRNOpt2StrGadSInfo = {
  3229.     KRNOpt2StrGadSIBuff,    /* buffer where text will be edited */
  3230.     KRNUndoBuffer,    /* optional undo buffer */
  3231.     0,    /* character position in buffer */
  3232.     5,    /* maximum number of characters */
  3233.     0,    /* first displayed character buffer position */
  3234.     0,0,0,0,0,    /* Intuition initialized and maintained variables */
  3235.     0,    /* Rastport of gadget */
  3236.     0,    /* initial value for integer gadgets */
  3237.     NULL    /* alternate keymap (fill in if you set the flag) */
  3238. };
  3239.  
  3240. struct Gadget KRNOpt2StrGadget = {
  3241.     &KRNOpt3StrGadget,    /* next gadget */
  3242.     45,88,    /* origin of hit box */
  3243.     40,8,    /* hit box width and height */
  3244.     NULL,    /* flags */
  3245.     RELVERIFY|STRINGCENTER,    /* activation flags */
  3246.     STRGADGET|REQGADGET,    /* type flags */
  3247.     (APTR)&KRNStrGadBorder,    /* render border */
  3248.     NULL,    /* select image */
  3249.     NULL,    /* IntuiText list */
  3250.     NULL,    /* mutual-exclude (unused) */
  3251.     (APTR)&KRNOpt2StrGadSInfo,    /* SpecialInfo structure */
  3252.     0x22,    /* GadgetID */
  3253.     NULL    /* pointer to user data */
  3254. };
  3255.  
  3256. UBYTE KRNOpt1StrGadSIBuff[5];
  3257. struct StringInfo KRNOpt1StrGadSInfo = {
  3258.     KRNOpt1StrGadSIBuff,    /* buffer where text will be edited */
  3259.     KRNUndoBuffer,    /* optional undo buffer */
  3260.     0,    /* character position in buffer */
  3261.     5,    /* maximum number of characters */
  3262.     0,    /* first displayed character buffer position */
  3263.     0,0,0,0,0,    /* Intuition initialized and maintained variables */
  3264.     0,    /* Rastport of gadget */
  3265.     0,    /* initial value for integer gadgets */
  3266.     NULL    /* alternate keymap (fill in if you set the flag) */
  3267. };
  3268.  
  3269. struct Gadget KRNOpt1StrGadget = {
  3270.     &KRNOpt2StrGadget,    /* next gadget */
  3271.     160,62,    /* origin of hit box */
  3272.     40,8,    /* hit box width and height */
  3273.     NULL,    /* flags */
  3274.     RELVERIFY|STRINGCENTER,    /* activation flags */
  3275.     STRGADGET|REQGADGET,    /* type flags */
  3276.     (APTR)&KRNStrGadBorder,    /* render border */
  3277.     NULL,    /* select image */
  3278.     NULL,    /* IntuiText list */
  3279.     NULL,    /* mutual-exclude (unused) */
  3280.     (APTR)&KRNOpt1StrGadSInfo,    /* SpecialInfo structure */
  3281.     0x21,    /* GadgetID */
  3282.     NULL    /* pointer to user data */
  3283. };
  3284.  
  3285. UBYTE KRNAloneStrGadSIBuff[5];
  3286. struct StringInfo KRNAloneStrGadSInfo = {
  3287.     KRNAloneStrGadSIBuff,    /* buffer where text will be edited */
  3288.     KRNUndoBuffer,    /* optional undo buffer */
  3289.     0,    /* character position in buffer */
  3290.     5,    /* maximum number of characters */
  3291.     0,    /* first displayed character buffer position */
  3292.     0,0,0,0,0,    /* Intuition initialized and maintained variables */
  3293.     0,    /* Rastport of gadget */
  3294.     0,    /* initial value for integer gadgets */
  3295.     NULL    /* alternate keymap (fill in if you set the flag) */
  3296. };
  3297.  
  3298. struct Gadget KRNAloneStrGadget = {
  3299.     &KRNOpt1StrGadget,    /* next gadget */
  3300.     45,62,    /* origin of hit box */
  3301.     40,8,    /* hit box width and height */
  3302.     NULL,    /* flags */
  3303.     RELVERIFY|STRINGCENTER,    /* activation flags */
  3304.     STRGADGET|REQGADGET,    /* type flags */
  3305.     (APTR)&KRNStrGadBorder,    /* render border */
  3306.     NULL,    /* select image */
  3307.     NULL,    /* IntuiText list */
  3308.     NULL,    /* mutual-exclude (unused) */
  3309.     (APTR)&KRNAloneStrGadSInfo,    /* SpecialInfo structure */
  3310.     0x20,    /* GadgetID */
  3311.     NULL    /* pointer to user data */
  3312. };
  3313.  
  3314. #define KRNormalGadgetList &KRNAloneStrGadget
  3315.  
  3316. struct IntuiText KRNormalIText3 = {
  3317.     1,0,JAM1,    /* frontpen, backpen, and drawmode */
  3318.     144,78,    /* origin */
  3319.     NULL,    /* font */
  3320.     KRShiftAltString,    /* text */
  3321.     NULL    /* next IntuiText */
  3322. };
  3323.  
  3324. struct IntuiText KRNormalIText2 = {
  3325.     1,0,JAM1,    /* frontpen, backpen, and drawmode */
  3326.     54,78,    /* origin */
  3327.     NULL,    /* font */
  3328.     KRAltString,    /* text */
  3329.     &KRNormalIText3    /* next IntuiText */
  3330. };
  3331.  
  3332. struct IntuiText KRNormalIText1 = {
  3333.     1,0,JAM1,    /* frontpen, backpen, and drawmode */
  3334.     161,53,    /* origin */
  3335.     NULL,    /* font */
  3336.     KRShiftString,    /* text */
  3337.     &KRNormalIText2    /* next IntuiText */
  3338. };
  3339.  
  3340. struct IntuiText KRNormalIText0 = {
  3341.     1,0,JAM1,    /* frontpen, backpen, and drawmode */
  3342.     45,53,    /* origin */
  3343.     NULL,    /* font */
  3344.     KRAloneString,    /* text */
  3345.     &KRNormalIText1    /* next IntuiText */
  3346. };
  3347.  
  3348. #define KRNormalITextList &KRNormalIText0
  3349.  
  3350. /*
  3351.  * Key Requester Window
  3352.  */
  3353.  
  3354. SHORT KRRepeatableGadBordVectors[] = {
  3355.     0,0,
  3356.     92,0,
  3357.     92,13,
  3358.     0,13,
  3359.     0,0
  3360. };
  3361. struct Border KRRepeatableGadBorder = {
  3362.     -1,-1,    /* origin */
  3363.     1,0,JAM1,    /* front pen, back pen and drawmode */
  3364.     5,    /* number of vectors */
  3365.     KRRepeatableGadBordVectors,    /* pointer to vectors */
  3366.     NULL    /* next border */
  3367. };
  3368.  
  3369. struct IntuiText KRRepeatableGadIText = {
  3370.     3,0,JAM1,    /* frontpen, backpen, and drawmode */
  3371.     6,2,    /* origin */
  3372.     NULL,    /* font */
  3373.     "Repeatable",    /* text */
  3374.     NULL    /* next IntuiText */
  3375. };
  3376.  
  3377. struct Gadget KRRepeatableGadget = {
  3378.     &KRUseGadget,    /* next gadget */
  3379.     122,30,    /* origin of hit box */
  3380.     91,12,    /* hit box width and height */
  3381.     GADGHCOMP,    /* flags */
  3382.     RELVERIFY|TOGGLESELECT,    /* activation flags */
  3383.     BOOLGADGET,    /* type flags */
  3384.     (APTR)&KRRepeatableGadBorder,    /* render border */
  3385.     NULL,    /* select image */
  3386.     &KRRepeatableGadIText,    /* IntuiText list */
  3387.     NULL,    /* mutual-exclude (unused) */
  3388.     NULL,    /* SpecialInfo structure */
  3389.     0x14,    /* GadgetID */
  3390.     NULL    /* pointer to user data */
  3391. };
  3392.  
  3393. SHORT KRCapsableGadBordVectors[] = {
  3394.     0,0,
  3395.     81,0,
  3396.     81,13,
  3397.     0,13,
  3398.     0,0
  3399. };
  3400. struct Border KRCapsableGadBorder = {
  3401.     -1,-1,    /* origin */
  3402.     1,0,JAM1,    /* front pen, back pen and drawmode */
  3403.     5,    /* number of vectors */
  3404.     KRCapsableGadBordVectors,    /* pointer to vectors */
  3405.     NULL    /* next border */
  3406. };
  3407.  
  3408. struct IntuiText KRCapsableGadIText = {
  3409.     3,0,JAM1,    /* frontpen, backpen, and drawmode */
  3410.     10,2,    /* origin */
  3411.     NULL,    /* font */
  3412.     "Capsable",    /* text */
  3413.     NULL    /* next IntuiText */
  3414. };
  3415.  
  3416. struct Gadget KRCapsableGadget = {
  3417.     &KRRepeatableGadget,    /* next gadget */
  3418.     39,30,    /* origin of hit box */
  3419.     80,12,    /* hit box width and height */
  3420.     GADGHCOMP,    /* flags */
  3421.     RELVERIFY|TOGGLESELECT,    /* activation flags */
  3422.     BOOLGADGET,    /* type flags */
  3423.     (APTR)&KRCapsableGadBorder,    /* render border */
  3424.     NULL,    /* select image */
  3425.     &KRCapsableGadIText,    /* IntuiText list */
  3426.     NULL,    /* mutual-exclude (unused) */
  3427.     NULL,    /* SpecialInfo structure */
  3428.     0x13,    /* GadgetID */
  3429.     NULL    /* pointer to user data */
  3430. };
  3431.  
  3432. struct IntuiText KRCtrlGadIText = {
  3433.     3,0,JAM1,    /* frontpen, backpen, and drawmode */
  3434.     14,2,    /* origin */
  3435.     NULL,    /* font */
  3436.     "Ctrl",    /* text */
  3437.     NULL    /* next IntuiText */
  3438. };
  3439.  
  3440. struct Gadget KRCtrlGadget = {
  3441.     &KRCapsableGadget,    /* next gadget */
  3442.     157,16,    /* origin of hit box */
  3443.     56,12,    /* hit box width and height */
  3444.     GADGHCOMP,    /* flags */
  3445.     RELVERIFY|ENDGADGET|TOGGLESELECT,    /* activation flags */
  3446.     BOOLGADGET,    /* type flags */
  3447.     (APTR)&KRTypeGadBorder,    /* render border */
  3448.     NULL,    /* select image */
  3449.     &KRCtrlGadIText,    /* IntuiText list */
  3450.     NULL,    /* mutual-exclude (unused) */
  3451.     NULL,    /* SpecialInfo structure */
  3452.     0x12,    /* GadgetID */
  3453.     NULL    /* pointer to user data */
  3454. };
  3455.  
  3456. struct IntuiText KRAltGadIText = {
  3457.     3,0,JAM1,    /* frontpen, backpen, and drawmode */
  3458.     17,2,    /* origin */
  3459.     NULL,    /* font */
  3460.     "Alt",    /* text */
  3461.     NULL    /* next IntuiText */
  3462. };
  3463.  
  3464. struct Gadget KRAltGadget = {
  3465.     &KRCtrlGadget,    /* next gadget */
  3466.     98,16,    /* origin of hit box */
  3467.     56,12,    /* hit box width and height */
  3468.     GADGHCOMP,    /* flags */
  3469.     RELVERIFY|ENDGADGET|TOGGLESELECT,    /* activation flags */
  3470.     BOOLGADGET,    /* type flags */
  3471.     (APTR)&KRTypeGadBorder,    /* render border */
  3472.     NULL,    /* select image */
  3473.     &KRAltGadIText,    /* IntuiText list */
  3474.     NULL,    /* mutual-exclude (unused) */
  3475.     NULL,    /* SpecialInfo structure */
  3476.     0x11,    /* GadgetID */
  3477.     NULL    /* pointer to user data */
  3478. };
  3479.  
  3480. struct IntuiText KRShiftGadIText = {
  3481.     3,0,JAM1,    /* frontpen, backpen, and drawmode */
  3482.     9,2,    /* origin */
  3483.     NULL,    /* font */
  3484.     "Shift",    /* text */
  3485.     NULL    /* next IntuiText */
  3486. };
  3487.  
  3488. struct Gadget KRShiftGadget = {
  3489.     &KRAltGadget,    /* next gadget */
  3490.     39,16,    /* origin of hit box */
  3491.     56,12,    /* hit box width and height */
  3492.     GADGHCOMP,    /* flags */
  3493.     RELVERIFY|ENDGADGET|TOGGLESELECT,    /* activation flags */
  3494.     BOOLGADGET,    /* type flags */
  3495.     (APTR)&KRTypeGadBorder,    /* render border */
  3496.     NULL,    /* select image */
  3497.     &KRShiftGadIText,    /* IntuiText list */
  3498.     NULL,    /* mutual-exclude (unused) */
  3499.     NULL,    /* SpecialInfo structure */
  3500.     0x10,    /* GadgetID */
  3501.     NULL    /* pointer to user data */
  3502. };
  3503.  
  3504. struct IntuiText KRDeadGadIText = {
  3505.     3,0,JAM1,    /* frontpen, backpen, and drawmode */
  3506.     12,2,    /* origin */
  3507.     NULL,    /* font */
  3508.     "Dead",    /* text */
  3509.     NULL    /* next IntuiText */
  3510. };
  3511.  
  3512. struct Gadget KRDeadGadget = {
  3513.     &KRShiftGadget,    /* next gadget */
  3514.     184,2,    /* origin of hit box */
  3515.     56,12,    /* hit box width and height */
  3516.     GADGHCOMP,    /* flags */
  3517.     RELVERIFY|TOGGLESELECT,    /* activation flags */
  3518.     BOOLGADGET,    /* type flags */
  3519.     (APTR)&KRQualGadBorder,    /* render border */
  3520.     NULL,    /* select image */
  3521.     &KRDeadGadIText,    /* IntuiText list */
  3522.     NULL,    /* mutual-exclude (unused) */
  3523.     NULL,    /* SpecialInfo structure */
  3524.     0x03,    /* GadgetID */
  3525.     NULL    /* pointer to user data */
  3526. };
  3527.  
  3528. struct IntuiText KRStringGadIText = {
  3529.     3,0,JAM1,    /* frontpen, backpen, and drawmode */
  3530.     4,2,    /* origin */
  3531.     NULL,    /* font */
  3532.     "String",    /* text */
  3533.     NULL    /* next IntuiText */
  3534. };
  3535.  
  3536. struct Gadget KRStringGadget = {
  3537.     &KRDeadGadget,    /* next gadget */
  3538.     125,2,    /* origin of hit box */
  3539.     56,12,    /* hit box width and height */
  3540.     GADGHCOMP,    /* flags */
  3541.     RELVERIFY|TOGGLESELECT,    /* activation flags */
  3542.     BOOLGADGET,    /* type flags */
  3543.     (APTR)&KRQualGadBorder,    /* render border */
  3544.     NULL,    /* select image */
  3545.     &KRStringGadIText,    /* IntuiText list */
  3546.     NULL,    /* mutual-exclude (unused) */
  3547.     NULL,    /* SpecialInfo structure */
  3548.     0x02,    /* GadgetID */
  3549.     NULL    /* pointer to user data */
  3550. };
  3551.  
  3552. struct IntuiText KRNoQualGadIText = {
  3553.     3,0,JAM1,    /* frontpen, backpen, and drawmode */
  3554.     5,2,    /* origin */
  3555.     NULL,    /* font */
  3556.     "Normal",    /* text */
  3557.     NULL    /* next IntuiText */
  3558. };
  3559.  
  3560. struct Gadget KRNoQualGadget = {
  3561.     &KRStringGadget,    /* next gadget */
  3562.     66,2,    /* origin of hit box */
  3563.     56,12,    /* hit box width and height */
  3564.     GADGHCOMP,    /* flags */
  3565.     RELVERIFY|TOGGLESELECT,    /* activation flags */
  3566.     BOOLGADGET,    /* type flags */
  3567.     (APTR)&KRQualGadBorder,    /* render border */
  3568.     NULL,    /* select image */
  3569.     &KRNoQualGadIText,    /* IntuiText list */
  3570.     NULL,    /* mutual-exclude (unused) */
  3571.     NULL,    /* SpecialInfo structure */
  3572.     0x01,    /* GadgetID */
  3573.     NULL    /* pointer to user data */
  3574. };
  3575.  
  3576. struct IntuiText KRNOPGadIText = {
  3577.     3,0,JAM1,    /* frontpen, backpen, and drawmode */
  3578.     17,2,    /* origin */
  3579.     NULL,    /* font */
  3580.     "NOP",    /* text */
  3581.     NULL    /* next IntuiText */
  3582. };
  3583.  
  3584. struct Gadget KRNOPGadget = {
  3585.     &KRNoQualGadget,    /* next gadget */
  3586.     7,2,    /* origin of hit box */
  3587.     56,12,    /* hit box width and height */
  3588.     GADGHCOMP,    /* flags */
  3589.     RELVERIFY|TOGGLESELECT,    /* activation flags */
  3590.     BOOLGADGET,    /* type flags */
  3591.     (APTR)&KRQualGadBorder,    /* render border */
  3592.     NULL,    /* select image */
  3593.     &KRNOPGadIText,    /* IntuiText list */
  3594.     NULL,    /* mutual-exclude (unused) */
  3595.     NULL,    /* SpecialInfo structure */
  3596.     0x00,    /* GadgetID */
  3597.     NULL    /* pointer to user data */
  3598. };
  3599.  
  3600. #define KRGadgetList &KRNOPGadget
  3601.  
  3602. struct Requester KRRequester = {
  3603.     NULL,    /* previous requester (filled by Intuition) */
  3604.     2,10,    /* origin relative to window */
  3605.     246,138,    /* width and height */
  3606.     0,0,    /* relative to these mouse offsets if POINTREL is set */
  3607.     KRGadgetList,    /* list */
  3608.     NULL,    /* box's border */
  3609.     NULL,    /* text */
  3610.     NULL,    /* flags */
  3611.     0,    /* back-plane fill pen */
  3612.     NULL,    /* reserved */
  3613.     NULL,    /* custom bitmap if PREDRAWN is set */
  3614.     NULL    /* reserved */
  3615. };
  3616.  
  3617. #define    KRWLEFTEDGE    130
  3618. #define    KRWTOPEDGE    19
  3619.  
  3620. struct NewWindow NewKeyReqWindow = {
  3621.     KRWLEFTEDGE,KRWTOPEDGE,    /* origin */
  3622.     250,150,    /* width and height */
  3623.     0,1,    /* detail and block pens */
  3624.     GADGETUP|REQSET,    /* GadgetIDCMP flags */
  3625.     WINDOWDRAG|ACTIVATE|NOCAREREFRESH,    /* flags */
  3626.     NULL,    /* Gadget list */
  3627.     NULL,    /* custom CHECKMARK imagery */
  3628.     "Key Map Editor - Key Editor",    /* title */
  3629.     NULL,    /* custom screen pointer */
  3630.     NULL,    /* custom bitmap */
  3631.     250,150,    /* minimum width and height */
  3632.     -1,-1,    /* maximum width and height */
  3633.     WBENCHSCREEN    /* destination screen type */
  3634. };
  3635.