home *** CD-ROM | disk | FTP | other *** search
/ vsiftp.vmssoftware.com / VSIPUBLIC@vsiftp.vmssoftware.com.tar / FREEWARE / FREEWARE40.ZIP / xv310a / xvbutt.c < prev    next >
C/C++ Source or Header  |  1995-06-12  |  34KB  |  1,243 lines
  1. /* 
  2.  * xvbutt.c - regular, 'radio', 'checkbox', and 'menu' pushbuttons
  3.  *
  4.  * callable functions:
  5.  *
  6.  *   BTCreate()             -  create a button
  7.  *   BTSetActive()          -  change 'active' status of button
  8.  *   BTRedraw()             -  redraw button
  9.  *   BTTrack()              -  clicked in button.  track until mouse up
  10.  *
  11.  *   RBCreate()             -  create an RBUTT and append to supplied list
  12.  *   RBRedraw()             -  redraw one or all RBUTTs in a list
  13.  *   RBSelect()             -  change selected item in list of RBUTTs
  14.  *   RBWhich()              -  returns index of selected RBUTT in list
  15.  *   RBCount()              -  returns # of RBUTTs in list
  16.  *   RBSetActive()          -  sets active status of an RBUTT
  17.  *   RBClick()              -  finds clicked-on rb in a list
  18.  *   RBTrack()              -  tracks rb after click, until release
  19.  * 
  20.  *   CBCreate()             -  create a CBUTT (checkbox button)
  21.  *   CBRedraw()             -  redraw a CBUTT
  22.  *   CBSetActive()          -  change active status of a CBUTT
  23.  *   CBClick()              -  returns true if given CB was clicked on
  24.  *   CBTrack()              -  tracks CBUTT after click, until release
  25.  *
  26.  *   MBCreate()             -  create a MBUTT (menu button)
  27.  *   MBRedraw()             -  redraw a MBUTT
  28.  *   MBSetActive()          -  change active status of a MBUTT
  29.  *   MBWhich()              -  returns # of first checked selection 
  30.  *   MBSelect()             -  similar to RBSelect() ...
  31.  *   MBClick()              -  returns true if given MB was clicked on
  32.  *   MBTrack()              -  tracks MBUTT after click, until release
  33.  */
  34.  
  35.  
  36. #include "copyright.h"
  37. #include "xv.h"
  38.  
  39. #include "bits/cboard50"
  40. #include "bits/rb_frame"
  41. #include "bits/rb_frame1"
  42. #include "bits/rb_top"
  43. #include "bits/rb_bot"
  44. #include "bits/rb_dtop"
  45. #include "bits/rb_dbot"
  46. #include "bits/rb_body"
  47. #include "bits/rb_dot"
  48. #include "bits/cb_check"
  49. #include "bits/mb_chk"
  50.  
  51.  
  52. static Pixmap cboard50 = (Pixmap) NULL;   /* 50% gray checkerboard */
  53.  
  54.  
  55. static int    rbpixmade = 0;
  56. static Pixmap rb_on, rb_on1, rb_off, rb_off1;
  57.  
  58. static int    cbpixmade = 0;
  59. static Pixmap cbcheck;
  60.  
  61. static int    mbpixmade = 0;
  62. static Pixmap mbchk;
  63.  
  64. static void drawRB     PARM((RBUTT *, int));
  65. static void drawCB     PARM((CBUTT *, int));
  66.  
  67.  
  68.  
  69. /******************* BUTT ROUTINES ************************/
  70.  
  71.  
  72.  
  73. /**********************************************/
  74. void BTCreate(bp,win,x,y,w,h,str,fg,bg,hi,lo)
  75.      BUTT         *bp;
  76.      Window        win;
  77.      int           x,y;
  78.      unsigned int  w,h;
  79.      char         *str;
  80.      unsigned long fg,bg,hi,lo;
  81. {
  82.   bp->win = win;
  83.   bp->x = x;  bp->y = y;  bp->w = w;  bp->h = h;
  84.   bp->str = str;
  85.   bp->fg = fg;  bp->bg = bg;  bp->hi = hi;  bp->lo = lo;
  86.   bp->lit = 0;
  87.   bp->active = 1;
  88.   bp->toggle = 0;
  89.   bp->pix = None;
  90.   bp->colorpix = 0;
  91.   bp->style = 0;
  92.   bp->fwidth = 3;
  93.  
  94.   if (!cboard50) {
  95.     cboard50 = MakePix1(rootW, cboard50_bits, cboard50_width, cboard50_height);
  96.     if (!cboard50) FatalError("Unable to create cboard50 bitmap\n");
  97.   }
  98. }
  99.  
  100.  
  101.  
  102. /**********************************************/
  103. void BTSetActive(bp,act)
  104. BUTT         *bp;
  105. int           act;
  106. {
  107.   if (bp->active != act) {
  108.     bp->active = act;
  109.     BTRedraw(bp);
  110.   }
  111. }
  112.  
  113.  
  114.  
  115. /**********************************************/
  116. void BTRedraw(bp)
  117. BUTT *bp;
  118. {
  119.   int          i,x,y,r,x1,y1;
  120.   unsigned int w,h;
  121.   XPoint       tpts[10], bpts[10], ipts[5];
  122.  
  123.   x = bp->x;  y=bp->y;  w=bp->w;  h=bp->h;  r=bp->fwidth;
  124.  
  125.   if (!bp->active) bp->lit = 0;
  126.   if (bp->lit) {
  127.     r -= 1;
  128.     if (r<0) r = 0;
  129.   }
  130.  
  131.   if (!ctrlColor) {
  132.     /* set up 'ipts' */
  133.     ipts[0].x = x+r;        ipts[0].y = y+r;         /* topleft */
  134.     ipts[1].x = x+r;        ipts[1].y = y+h-r;       /* botleft */
  135.     ipts[2].x = x+w-r;      ipts[2].y = y+h-r;       /* botright */
  136.     ipts[3].x = x+w-r;      ipts[3].y = y+r;         /* topright */
  137.     ipts[4].x = ipts[0].x;  ipts[4].y = ipts[0].y;   /* close path */
  138.  
  139.     /* top left polygon */
  140.     tpts[0].x = x;            tpts[0].y = y;
  141.     tpts[1].x = x;            tpts[1].y = y+h;
  142.     tpts[2].x = ipts[1].x;    tpts[2].y = ipts[1].y;
  143.     tpts[3].x = ipts[0].x;    tpts[3].y = ipts[0].y;
  144.     tpts[4].x = ipts[3].x;    tpts[4].y = ipts[3].y;
  145.     tpts[5].x = x+w;          tpts[5].y = y;
  146.     tpts[6].x = x;            tpts[6].y = y;
  147.  
  148.     /* bot left polygon */
  149.     bpts[0].x = x;            bpts[0].y = y+h;
  150.     bpts[1].x = ipts[1].x;    bpts[1].y = ipts[1].y;
  151.     bpts[2].x = ipts[2].x;    bpts[2].y = ipts[2].y;
  152.     bpts[3].x = ipts[3].x;    bpts[3].y = ipts[3].y;
  153.     bpts[4].x = x+w;          bpts[4].y = y;
  154.     bpts[5].x = x+w;          bpts[5].y = y+h;
  155.     bpts[6].x = x;            bpts[6].y = y+h;
  156.  
  157.  
  158.     /* clear button and draw frame */
  159.     XSetForeground(theDisp, theGC, bp->bg);
  160.     XFillRectangle(theDisp, bp->win, theGC, x, y, w, h);
  161.     XSetForeground(theDisp, theGC, bp->fg);
  162.     XDrawRectangle(theDisp, bp->win, theGC, x, y, w, h);
  163.  
  164.     XSetForeground(theDisp, theGC, bp->fg);
  165.     XSetFillStyle(theDisp, theGC, FillStippled);
  166.     XSetStipple(theDisp, theGC, cboard50);
  167.     XFillPolygon(theDisp, bp->win, theGC, bpts, 7, Nonconvex, CoordModeOrigin);
  168.     XSetFillStyle(theDisp,theGC,FillSolid);
  169.  
  170.     XSetForeground(theDisp, theGC, bp->fg);
  171.     XDrawLines(theDisp, bp->win, theGC, ipts, 5, CoordModeOrigin);  /* inset */
  172.  
  173.     XDrawLine(theDisp, bp->win, theGC, x+1,             y + 1,  
  174.           ipts[0].x, ipts[0].y);
  175.     XDrawLine(theDisp, bp->win, theGC, x+1,             y + (int) h - 1,
  176.           ipts[1].x, ipts[1].y);
  177.     XDrawLine(theDisp, bp->win, theGC, x + (int) w - 1, y + (int) h - 1,
  178.           ipts[2].x, ipts[2].y);
  179.     XDrawLine(theDisp, bp->win, theGC, x + (int) w - 1, y+1,  
  180.           ipts[3].x, ipts[3].y);
  181.  
  182.     if (bp->lit) {
  183.       XDrawRectangle(theDisp, bp->win, theGC, x+2, y+2, w-4, h-4);
  184.       XDrawRectangle(theDisp, bp->win, theGC, x+1, y+1, w-2, h-2);
  185.     }
  186.   }
  187.     
  188.   else {   /* ctrlColor */
  189.     XSetForeground(theDisp, theGC, bp->bg);
  190.     XFillRectangle(theDisp, bp->win, theGC, x+1, y+1, w-1, h-1);
  191.  
  192.     Draw3dRect(bp->win, x+1, y+1, w-2, h-2, R3D_OUT, bp->fwidth, 
  193.            bp->hi, bp->lo, bp->bg);
  194.  
  195.     XSetForeground(theDisp, theGC, bp->fg);
  196.     XDrawRectangle(theDisp, bp->win, theGC, x, y, w, h);
  197.  
  198.     if (bp->lit)
  199.       XDrawRectangle(theDisp, bp->win, theGC, x+1, y+1, w-2, h-2);
  200.   }
  201.     
  202.  
  203.  
  204.  
  205.   XSetForeground(theDisp, theGC, bp->fg);
  206.  
  207.   if (bp->pix != None) {                    /* draw pixmap centered in butt */
  208.     x1 = x+(1+w-bp->pw)/2;
  209.     y1 = y+(1+h-bp->ph)/2;
  210.  
  211.     XSetBackground(theDisp, theGC, bp->bg);
  212.  
  213.     if (bp->colorpix) 
  214.       XCopyArea (theDisp,bp->pix, bp->win, theGC, 0,0,bp->pw,bp->ph, x1,y1);
  215.     else
  216.       XCopyPlane(theDisp,bp->pix, bp->win, theGC, 0,0,bp->pw,bp->ph, x1,y1,1L);
  217.  
  218.     if (!bp->active) DimRect(bp->win, x1,y1, bp->pw, bp->ph, bp->bg);
  219.   }
  220.  
  221.   else {                                    /* draw string centered in butt */
  222.     x1 = CENTERX(mfinfo, x + w/2, bp->str);
  223.     y1 = CENTERY(mfinfo, y + h/2);
  224.  
  225.     if (bp->active) {
  226.       DrawString(bp->win, x1,y1, bp->str);
  227.     }
  228.     else {  /* stipple if not active */
  229.       XSetFillStyle(theDisp, theGC, FillStippled);
  230.       XSetStipple(theDisp, theGC, dimStip);
  231.       DrawString(bp->win, x1,y1, bp->str);
  232.       XSetFillStyle(theDisp,theGC,FillSolid);
  233.     }
  234.   }
  235.  
  236. }
  237.  
  238.  
  239.  
  240. /**********************************************/
  241. int BTTrack(bp)
  242. BUTT *bp;
  243. {
  244.   /* called when we've gotten a click inside 'bp'.  returns 1 if button
  245.      was still selected lit when mouse was released. */
  246.  
  247.   Window       rW, cW;
  248.   int          x, y, rx, ry, rval, inval;
  249.   unsigned int mask;
  250.  
  251.   if (!bp->active) return 0;   /* inactive button */
  252.  
  253.   inval = bp->lit;
  254.   bp->lit = !bp->lit;
  255.  
  256.   BTRedraw(bp);  XFlush(theDisp);
  257.   Timer(120);  /* long enough for turn on to be visible */
  258.  
  259.   while (XQueryPointer(theDisp,bp->win,&rW,&cW,&rx,&ry,&x,&y,&mask)) {
  260.     if (!(mask & Button1Mask)) break;    /* button released */
  261.  
  262.     if (bp->lit==inval && PTINRECT(x, y, bp->x, bp->y, bp->w, bp->h)) {
  263.       bp->lit = !inval;  BTRedraw(bp);  XFlush(theDisp);
  264.     }
  265.     
  266.     if (bp->lit!=inval && !PTINRECT(x, y, bp->x, bp->y, bp->w, bp->h)) {
  267.       bp->lit = inval;  BTRedraw(bp);  XFlush(theDisp);
  268.     }
  269.   }
  270.  
  271.   rval = (bp->lit != inval);
  272.   
  273.   if (bp->lit && !bp->toggle) 
  274.     { bp->lit = 0;  BTRedraw(bp);  XFlush(theDisp); }
  275.  
  276.   return(rval);
  277. }
  278.  
  279.  
  280.  
  281.  
  282. /******************* RBUTT ROUTINES ************************/
  283.  
  284.  
  285. #define RBSIZE rb_frame_width
  286.  
  287.  
  288. /***********************************************/
  289. RBUTT *RBCreate(rblist, win, x,y,str, fg, bg, hi, lo)
  290.       RBUTT        *rblist;
  291.       Window        win;
  292.       int           x,y;
  293.       char         *str;
  294.       unsigned long fg,bg,hi,lo;
  295. {
  296.   /* mallocs an RBUTT, fills in the fields, and appends it to rblist
  297.      if rblist is NULL, this is the first rb in the list.  It will
  298.      be made the 'selected' one 
  299.  
  300.      Note: no need to check return status.  It'll fatal error if it 
  301.      can't malloc */
  302.  
  303.   RBUTT *rb, *rbptr;
  304.   Pixmap rb_frame, rb_frame1, rb_top, rb_bot, rb_dtop, rb_dbot, rb_body, 
  305.          rb_dot;
  306.  
  307.   rb = (RBUTT *) malloc(sizeof(RBUTT));
  308.   if (!rb) FatalError("couldn't malloc RBUTT");
  309.  
  310.   /* fill in the fields of the structure */
  311.   rb->win      = win;
  312.   rb->x        = x;
  313.   rb->y        = y;
  314.   rb->str      = str;
  315.   rb->selected = 0;
  316.   rb->active   = 1;
  317.   rb->next     = (struct rbutt *) NULL;
  318.   rb->fg       = fg;
  319.   rb->bg       = bg;
  320.   rb->hi       = hi;
  321.   rb->lo       = lo;
  322.  
  323.   if (rblist) {            /* append to end of list */
  324.     rbptr = rblist;
  325.     while (rbptr->next) rbptr = (RBUTT *) rbptr->next;
  326.     rbptr->next = (struct rbutt *) rb;
  327.   }
  328.   else {                   /* this is the first one in the list.  select it */
  329.     rb->selected = 1;
  330.   }
  331.  
  332.  
  333.   /* and, on an unrelated note, if the RB pixmaps haven't been created yet,
  334.      do so.  We'll be needing them, y'see... */
  335.  
  336.   if (!rbpixmade) {
  337.     rb_frame  = MakePix1(rootW, rb_frame_bits,  RBSIZE, RBSIZE);
  338.     rb_frame1 = MakePix1(rootW, rb_frame1_bits, RBSIZE, RBSIZE);
  339.     rb_top    = MakePix1(rootW, rb_top_bits,    RBSIZE, RBSIZE);
  340.     rb_bot    = MakePix1(rootW, rb_bot_bits,    RBSIZE, RBSIZE);
  341.     rb_dtop   = MakePix1(rootW, rb_dtop_bits,   RBSIZE, RBSIZE);
  342.     rb_dbot   = MakePix1(rootW, rb_dbot_bits,   RBSIZE, RBSIZE);
  343.     rb_body   = MakePix1(rootW, rb_body_bits,   RBSIZE, RBSIZE);
  344.     rb_dot    = MakePix1(rootW, rb_dot_bits,    RBSIZE, RBSIZE);
  345.  
  346.     rb_on     = XCreatePixmap(theDisp, rootW, RBSIZE, RBSIZE, dispDEEP);
  347.     rb_on1    = XCreatePixmap(theDisp, rootW, RBSIZE, RBSIZE, dispDEEP);
  348.     rb_off    = XCreatePixmap(theDisp, rootW, RBSIZE, RBSIZE, dispDEEP);
  349.     rb_off1   = XCreatePixmap(theDisp, rootW, RBSIZE, RBSIZE, dispDEEP);
  350.  
  351.     if (!rb_frame || !rb_frame1 || !rb_top || !rb_bot || !rb_dtop || 
  352.     !rb_dbot  || !rb_body   || !rb_dot || !rb_on  || !rb_on1  ||
  353.     !rb_off   || !rb_off1)
  354.       FatalError("unable to create radio-button pixmaps");
  355.  
  356.  
  357.     /* generate rb_on,on1,off,off1 pixmaps from mask pixmaps */
  358.     XSetForeground(theDisp, theGC, bg);
  359.     XFillRectangle(theDisp, rb_on,   theGC, 0,0,RBSIZE,RBSIZE);
  360.     XFillRectangle(theDisp, rb_on1,  theGC, 0,0,RBSIZE,RBSIZE);
  361.     XFillRectangle(theDisp, rb_off,  theGC, 0,0,RBSIZE,RBSIZE);
  362.     XFillRectangle(theDisp, rb_off1, theGC, 0,0,RBSIZE,RBSIZE);
  363.  
  364.     XSetFillStyle(theDisp, theGC, FillStippled);
  365.  
  366.     if (ctrlColor) {
  367.       XSetStipple(theDisp, theGC, rb_top);
  368.       XSetForeground(theDisp, theGC, fg);
  369.       XFillRectangle(theDisp, rb_on,   theGC, 0,0,RBSIZE,RBSIZE);
  370.       XFillRectangle(theDisp, rb_on1,  theGC, 0,0,RBSIZE,RBSIZE);
  371.       XSetForeground(theDisp, theGC, hi);
  372.       XFillRectangle(theDisp, rb_off,  theGC, 0,0,RBSIZE,RBSIZE);
  373.       XFillRectangle(theDisp, rb_off1, theGC, 0,0,RBSIZE,RBSIZE);
  374.  
  375.       XSetStipple(theDisp, theGC, rb_body);
  376.       XSetForeground(theDisp, theGC, lo);
  377.       XFillRectangle(theDisp, rb_on,   theGC, 0,0,RBSIZE,RBSIZE);
  378.       XFillRectangle(theDisp, rb_on1,  theGC, 0,0,RBSIZE,RBSIZE);
  379.       XSetForeground(theDisp, theGC, bg);
  380.       XFillRectangle(theDisp, rb_off,  theGC, 0,0,RBSIZE,RBSIZE);
  381.       XFillRectangle(theDisp, rb_off1, theGC, 0,0,RBSIZE,RBSIZE);
  382.  
  383.       XSetStipple(theDisp, theGC, rb_bot);
  384.       XSetForeground(theDisp, theGC, bg);
  385.       XFillRectangle(theDisp, rb_on,   theGC, 0,0,RBSIZE,RBSIZE);
  386.       XFillRectangle(theDisp, rb_on1,  theGC, 0,0,RBSIZE,RBSIZE);
  387.       XSetForeground(theDisp, theGC, lo);
  388.       XFillRectangle(theDisp, rb_off,  theGC, 0,0,RBSIZE,RBSIZE);
  389.       XFillRectangle(theDisp, rb_off1, theGC, 0,0,RBSIZE,RBSIZE);
  390.  
  391.       XSetStipple(theDisp, theGC, rb_dtop);
  392.       XSetForeground(theDisp, theGC, bg);
  393.       XFillRectangle(theDisp, rb_on,   theGC, 0,0,RBSIZE,RBSIZE);
  394.       XFillRectangle(theDisp, rb_on1,  theGC, 0,0,RBSIZE,RBSIZE);
  395.       XSetForeground(theDisp, theGC, hi);
  396.       XFillRectangle(theDisp, rb_off,  theGC, 0,0,RBSIZE,RBSIZE);
  397.       XFillRectangle(theDisp, rb_off1, theGC, 0,0,RBSIZE,RBSIZE);
  398.  
  399.       XSetStipple(theDisp, theGC, rb_dbot);
  400.       XSetForeground(theDisp, theGC, fg);
  401.       XFillRectangle(theDisp, rb_on,   theGC, 0,0,RBSIZE,RBSIZE);
  402.       XFillRectangle(theDisp, rb_on1,  theGC, 0,0,RBSIZE,RBSIZE);
  403.       XSetForeground(theDisp, theGC, lo);
  404.       XFillRectangle(theDisp, rb_off,  theGC, 0,0,RBSIZE,RBSIZE);
  405.       XFillRectangle(theDisp, rb_off1, theGC, 0,0,RBSIZE,RBSIZE);
  406.     }
  407.     else {
  408.       XSetStipple(theDisp, theGC, rb_dot);
  409.       XSetForeground(theDisp, theGC, fg);
  410.       XFillRectangle(theDisp, rb_on,   theGC, 0,0,RBSIZE,RBSIZE);
  411.       XFillRectangle(theDisp, rb_on1,  theGC, 0,0,RBSIZE,RBSIZE);
  412.     }
  413.       
  414.     XSetStipple(theDisp, theGC, rb_frame);
  415.     XSetForeground(theDisp, theGC, fg);
  416.     XFillRectangle(theDisp, rb_on,   theGC, 0,0,RBSIZE,RBSIZE);
  417.     XFillRectangle(theDisp, rb_off,  theGC, 0,0,RBSIZE,RBSIZE);
  418.  
  419.     XSetStipple(theDisp, theGC, rb_frame1);
  420.     XSetForeground(theDisp, theGC, fg);
  421.     XFillRectangle(theDisp, rb_on1,  theGC, 0,0,RBSIZE,RBSIZE);
  422.     XFillRectangle(theDisp, rb_off1, theGC, 0,0,RBSIZE,RBSIZE);
  423.  
  424.     XSetFillStyle(theDisp, theGC, FillSolid);
  425.  
  426.     /* destroy mask pixmaps */
  427.     XFreePixmap(theDisp, rb_frame);
  428.     XFreePixmap(theDisp, rb_frame1);
  429.     XFreePixmap(theDisp, rb_top);
  430.     XFreePixmap(theDisp, rb_bot);
  431.     XFreePixmap(theDisp, rb_dtop);
  432.     XFreePixmap(theDisp, rb_dbot);
  433.     XFreePixmap(theDisp, rb_body);
  434.  
  435.     rbpixmade = 1;
  436.   }
  437.  
  438.   return(rb);
  439. }
  440.   
  441.  
  442.  
  443.  
  444. /***********************************************/
  445. void RBRedraw(rblist, num)
  446. RBUTT *rblist;
  447. int    num;
  448. {
  449.   /* redraws the 'num-th' RB in the list.  if num < 0, redraws entire list */
  450.  
  451.   RBUTT *rb;
  452.   int    i;
  453.  
  454.   /* point 'rb' at the appropriate RBUTT, *if* we're not drawing entire list */
  455.   if (num>=0) {
  456.     i=0;  rb=rblist;
  457.     while (i!=num && rb) { rb = (RBUTT *) rb->next;  i++; }
  458.     if (!rb) return;                     /* num is out of range.  do nothing */
  459.     drawRB(rb,0);
  460.   }
  461.  
  462.   else {                                 /* draw entire list */
  463.     rb = rblist;
  464.     while (rb) {
  465.       drawRB(rb,0);
  466.       rb = (RBUTT *) rb->next;
  467.     }
  468.   }
  469. }
  470.  
  471.  
  472. /***********************************************/
  473. static void drawRB(rb, lit)
  474.      RBUTT *rb;
  475.      int   lit;
  476. {
  477.   /* draws the rb being pointed at */
  478.   
  479.   Pixmap pix;
  480.   
  481.   if (!rb) return;  /* rb = NULL */
  482.   
  483.   XSetForeground(theDisp, theGC, rb->fg);
  484.   
  485.   if (rb->selected) { pix = (lit) ? rb_on1 : rb_on; }
  486.   else { pix = (lit) ? rb_off1 : rb_off; }
  487.   
  488.   XCopyArea(theDisp, pix, rb->win, theGC, 0,0,RBSIZE,RBSIZE, rb->x, rb->y);
  489.   DrawString(rb->win, rb->x + RBSIZE + 4, 
  490.          rb->y + RBSIZE/2 - CHIGH/2 + ASCENT, rb->str);
  491.  
  492.   if (!rb->active) {  /* if non-active, dim button and string */
  493.     DimRect(rb->win, rb->x, rb->y, RBSIZE, RBSIZE, rb->bg);
  494.     DimRect(rb->win, rb->x + RBSIZE + 4, rb->y + RBSIZE/2 - CHIGH/2, 
  495.         (u_int) StringWidth(rb->str), (u_int) CHIGH, rb->bg);
  496.   }
  497. }
  498.  
  499.  
  500. /***********************************************/
  501. void RBSelect(rblist, n)
  502. RBUTT *rblist;
  503. int    n;
  504. {
  505.   RBUTT *rbold, *rb;
  506.   int    i;
  507.  
  508.   /* makes rb #n the selected rb in the list.  Does all redrawing.  Does
  509.      nothing if rb already selected */
  510.  
  511.   /* get pointers to the currently selected rb and the desired rb */
  512.   rbold = rblist;
  513.   while (rbold && !rbold->selected) rbold = (RBUTT *) rbold->next;
  514.   if (!rbold) return;    /* no currently selected item.  shouldn't happen */
  515.  
  516.   rb = rblist;  i=0;
  517.   while (rb && i!=n) {rb = (RBUTT *) rb->next;  i++; }
  518.   if (!rb) return;    /* 'n' is out of range */
  519.  
  520.  
  521.   if (rb == rbold) return;   /* 'n' is already selected.  do nothing */
  522.  
  523.   rbold->selected = 0;
  524.   rb->selected    = 1;
  525.   drawRB(rbold, 0);
  526.   drawRB(rb, 0);
  527. }
  528.  
  529.  
  530.           
  531. /***********************************************/
  532. int RBWhich(rblist)
  533.      RBUTT *rblist;
  534. {
  535.   int i;
  536.   
  537.   /* returns index of currently selected rb.  if none, returns -1 */
  538.   
  539.   i = 0;
  540.   while (rblist && !rblist->selected) 
  541.     { rblist = (RBUTT *) rblist->next;  i++; }
  542.   
  543.   if (!rblist) return -1;             /* didn't find one */
  544.   return i;
  545. }
  546.  
  547.  
  548. /***********************************************/
  549. int RBCount(rblist)
  550.      RBUTT *rblist;
  551. {
  552.   int i;
  553.   
  554.   /* returns # of rb's in the list */
  555.   
  556.   i = 0;
  557.   while (rblist) { rblist = (RBUTT *) rblist->next; i++; }
  558.   return i;
  559. }
  560.  
  561.  
  562. /***********************************************/
  563. void RBSetActive(rblist, n, act)
  564.      RBUTT *rblist;
  565.      int n,act;
  566. {
  567.   RBUTT *rb;
  568.   int    i;
  569.   
  570.   /* sets 'active' status of rb #n.  does redrawing */
  571.   
  572.   rb=rblist;  i=0;
  573.   while (rb && i!=n) { rb = (RBUTT *) rb->next; i++; }
  574.   if (!rb) return;                         /* n out of range.  do nothing */
  575.   
  576.   if (rb->active != act) {
  577.     rb->active = act;
  578.     drawRB(rb, 0);
  579.   }
  580. }
  581.  
  582.  
  583. /***********************************************/
  584. int RBClick(rblist, mx, my)
  585. RBUTT *rblist;
  586. int    mx,my;
  587. {
  588.   int i;
  589.  
  590.   /* searches through rblist to see if mouse click at mx,my is in the
  591.      clickable region of any of the rb's.  If it finds one, it returns 
  592.      it's index in the list.  If not, returns -1 */
  593.  
  594.   i = 0;
  595.   while (rblist) {
  596.     if (PTINRECT(mx, my, rblist->x, rblist->y, RBSIZE, RBSIZE)) break;
  597.     
  598.     rblist = (RBUTT *) rblist->next;
  599.     i++;
  600.   }
  601.  
  602.   if (!rblist) return -1;
  603.   return(i);
  604. }
  605.  
  606.  
  607. /***********************************************/
  608. int RBTrack(rblist, n)
  609.      RBUTT *rblist;
  610.      int    n;
  611. {
  612.   RBUTT       *rb;
  613.   Window       rW, cW;
  614.   int          i, x, y, rx, ry, lit, rv;
  615.   unsigned int mask;
  616.   
  617.   /* returns '1' if selection changed */
  618.   
  619.   rb=rblist;  i=0;
  620.   while (rb && i!=n) { rb = (RBUTT *) rb->next; i++; }
  621.   if (!rb) return 0;                    /* n out of range */
  622.  
  623.   /* called once we've figured out that the mouse clicked in 'rb' */
  624.  
  625.   if (!rb->active) return 0;
  626.  
  627.   lit = 1;
  628.   drawRB(rb, lit);
  629.   XFlush(theDisp);
  630.   Timer(75);          /* give chance for 'turn on' to become visible */
  631.  
  632.   while (XQueryPointer(theDisp,rb->win,&rW,&cW,&rx,&ry,&x,&y,&mask)) {
  633.     if (!(mask & Button1Mask)) break;    /* button released */
  634.  
  635.     if (!lit && PTINRECT(x, y, rb->x, rb->y, RBSIZE, RBSIZE)) {
  636.       lit=1;
  637.       drawRB(rb, lit);
  638.       XFlush(theDisp);
  639.     }
  640.     
  641.     if (lit && !PTINRECT(x, y, rb->x, rb->y, RBSIZE, RBSIZE)) {
  642.       lit=0;
  643.       drawRB(rb, lit);
  644.       XFlush(theDisp);
  645.     }
  646.   }
  647.  
  648.   rv = 0;
  649.  
  650.   if (lit) {
  651.     drawRB(rb, 0);
  652.     if (RBWhich(rblist) != n) rv = 1;
  653.     RBSelect(rblist, n);
  654.   }
  655.  
  656.   XFlush(theDisp);
  657.   return rv;
  658. }
  659.  
  660.  
  661.  
  662.  
  663. /******************* CBUTT ROUTINES ************************/
  664.  
  665.  
  666.  
  667. #define XVCBSIZE 16
  668.  
  669. /***********************************************/
  670. void CBCreate(cb, win, x,y, str, fg, bg, hi, lo)
  671.       CBUTT        *cb;
  672.       Window        win;
  673.       int           x,y;
  674.       char         *str;
  675.       unsigned long fg,bg,hi,lo;
  676. {
  677.   /* fill in the fields of the structure */
  678.   cb->win      = win;
  679.   cb->x        = x;
  680.   cb->y        = y;
  681.   cb->str      = str;
  682.   cb->val      = 0;
  683.   cb->active   = 1;
  684.   cb->fg       = fg;
  685.   cb->bg       = bg;
  686.   cb->hi       = hi;
  687.   cb->lo       = lo;
  688.  
  689.   /* and, on an unrelated note, if the CB pixmaps haven't been created yet,
  690.      do so.  We'll be needing them, y'see... */
  691.  
  692.   if (!cbpixmade) {
  693.     cbcheck = XCreatePixmapFromBitmapData(theDisp, rootW, 
  694.          (char *) cb_check_bits,
  695.          cb_check_width, cb_check_height, fg, bg, dispDEEP);
  696.  
  697.     cbpixmade = 1;
  698.   }
  699. }
  700.   
  701.  
  702.  
  703.  
  704. /***********************************************/
  705. void CBRedraw(cb)
  706. CBUTT *cb;
  707. {
  708.   /* draws the cb being pointed at */
  709.  
  710.   XSetForeground(theDisp, theGC, cb->bg);
  711.   XFillRectangle(theDisp, cb->win, theGC, cb->x+2, cb->y+2, 
  712.          XVCBSIZE-3,XVCBSIZE-3);
  713.  
  714.   XSetForeground(theDisp, theGC, cb->fg);
  715.   XDrawRectangle(theDisp, cb->win, theGC, cb->x, cb->y, XVCBSIZE, XVCBSIZE);
  716.   Draw3dRect(cb->win, cb->x+1, cb->y+1, XVCBSIZE-2, XVCBSIZE-2, R3D_OUT, 2,
  717.          cb->hi, cb->lo, cb->bg); 
  718.  
  719.   if (cb->val) XCopyArea(theDisp, cbcheck, cb->win, theGC, 
  720.              0, 0, cb_check_width, cb_check_height, 
  721.              cb->x+3, cb->y+3);
  722.  
  723.   XSetForeground(theDisp, theGC, cb->fg);
  724.   DrawString(cb->win, cb->x + XVCBSIZE+4, 
  725.          cb->y+XVCBSIZE/2 - CHIGH/2 + ASCENT, cb->str);
  726.  
  727.   if (!cb->active) {  /* if non-active, dim button and string */
  728.     DimRect(cb->win, cb->x, cb->y, XVCBSIZE, XVCBSIZE, cb->bg);
  729.     DimRect(cb->win, cb->x + XVCBSIZE+4, cb->y+XVCBSIZE/2 - CHIGH/2, 
  730.         (u_int) StringWidth(cb->str), (u_int) CHIGH, cb->bg);
  731.   }
  732. }
  733.  
  734.  
  735. /**********************************************/
  736. void CBSetActive(cb,act)
  737. CBUTT        *cb;
  738. int           act;
  739. {
  740.   if (cb->active != act) {
  741.     cb->active = act;
  742.     CBRedraw(cb);
  743.   }
  744. }
  745.  
  746.  
  747. /***********************************************/
  748. int CBClick(cb, mx, my)
  749. CBUTT *cb;
  750. int    mx,my;
  751. {
  752.   if (PTINRECT(mx, my, cb->x, cb->y, XVCBSIZE,XVCBSIZE)) return 1;
  753.   return 0;
  754. }
  755.  
  756.  
  757. /***********************************************/
  758. int CBTrack(cb)
  759. CBUTT *cb;
  760. {
  761.   Window       rW, cW;
  762.   int          x, y, rx, ry, lit;
  763.   unsigned int mask;
  764.   Pixmap litpix, darkpix;
  765.  
  766.   /* called once we've figured out that the mouse clicked in 'cb' */
  767.  
  768.   if (!cb->active) return 0;
  769.  
  770.   XSetForeground(theDisp, theGC, cb->fg);
  771.  
  772.   lit = 1;
  773.   drawCB(cb, lit);
  774.   XFlush(theDisp);
  775.   Timer(75);          /* give chance for 'turn on' to become visible */
  776.  
  777.   while (XQueryPointer(theDisp,cb->win,&rW,&cW,&rx,&ry,&x,&y,&mask)) {
  778.     if (!(mask & Button1Mask)) break;    /* button released */
  779.  
  780.     if (!lit && PTINRECT(x, y, cb->x, cb->y, XVCBSIZE, XVCBSIZE)) {
  781.       lit=1;
  782.       drawCB(cb,lit);
  783.       XFlush(theDisp);
  784.     }
  785.     
  786.     if (lit && !PTINRECT(x, y, cb->x, cb->y, XVCBSIZE, XVCBSIZE)) {
  787.       lit=0;
  788.       drawCB(cb,lit);
  789.       XFlush(theDisp);
  790.     }
  791.   }
  792.  
  793.   if (lit) {
  794.     cb->val = !cb->val;
  795.     drawCB(cb,0);
  796.     CBRedraw(cb);
  797.   }
  798.  
  799.   XFlush(theDisp);
  800.  
  801.   return(lit);
  802. }
  803.  
  804.  
  805. /***********************************************/
  806. static void drawCB(cb, lit)
  807. CBUTT *cb;
  808. int lit;
  809. {
  810.   /* draws highlighting */
  811.   if (lit) {
  812.     if (ctrlColor) 
  813.       Draw3dRect(cb->win, cb->x+1, cb->y+1, XVCBSIZE-2, XVCBSIZE-2, R3D_IN, 2,
  814.          cb->hi, cb->lo, cb->bg);
  815.     else {
  816.       XSetForeground(theDisp, theGC, cb->fg);
  817.       XDrawRectangle(theDisp, cb->win, theGC, cb->x+1, cb->y+1, 
  818.              XVCBSIZE-2, XVCBSIZE-2);
  819.     }
  820.   }
  821.  
  822.   else {
  823.     if (ctrlColor) 
  824.       Draw3dRect(cb->win, cb->x+1, cb->y+1, XVCBSIZE-2, XVCBSIZE-2, R3D_OUT, 2,
  825.          cb->hi, cb->lo, cb->bg);
  826.     else {
  827.       XSetForeground(theDisp, theGC, cb->bg);
  828.       XDrawRectangle(theDisp, cb->win, theGC, cb->x+1, cb->y+1, 
  829.              XVCBSIZE-2, XVCBSIZE-2);
  830.     }
  831.   }
  832. }
  833.     
  834.  
  835.  
  836. /******************* MBUTT ROUTINES ************************/
  837.  
  838.  
  839.  
  840. /***********************************************/
  841. void MBCreate(mb, win, x,y,w,h, str, list, nlist, fg, bg, hi, lo)
  842.      MBUTT        *mb;
  843.      Window        win;
  844.      int           x,y;
  845.      unsigned int  w,h;
  846.      char         *str;
  847.      char        **list;
  848.      int           nlist;
  849.      unsigned long fg,bg,hi,lo;
  850. {
  851.   XSetWindowAttributes xswa;
  852.   unsigned long        xswamask;
  853.   int i;
  854.   
  855.   if (!mbpixmade) {
  856.     mbchk = XCreatePixmapFromBitmapData(theDisp, rootW, (char *) mb_chk_bits,
  857.          mb_chk_width, mb_chk_height, fg, bg, dispDEEP);
  858.     mbpixmade = 1;
  859.   }
  860.  
  861.  
  862.   /* fill in the fields of the structure */
  863.   mb->win      = win;
  864.   mb->x        = x;
  865.   mb->y        = y;
  866.   mb->w        = w;
  867.   mb->h        = h;
  868.   mb->title    = str;
  869.   mb->active   = 1;
  870.   mb->list     = list;
  871.   mb->nlist    = nlist;
  872.   mb->hascheck = 0;
  873.   mb->fg       = fg;
  874.   mb->bg       = bg;
  875.   mb->hi       = hi;
  876.   mb->lo       = lo;
  877.  
  878.   mb->pix      = (Pixmap) NULL;
  879.   mb->pw = mb->ph = 0;
  880.  
  881.   for (i=0; i<MAXMBLEN; i++) {
  882.     mb->flags[i] = 0;
  883.     mb->dim[i] = 0;
  884.   }
  885.  
  886.   /* create popup window (it gets mapped, pos'd and sized later) */
  887.   xswa.background_pixel = bg;
  888.   xswa.border_pixel     = fg;
  889.   xswa.save_under       = True;
  890.   xswamask = CWBackPixel | CWBorderPixel | CWSaveUnder;
  891.  
  892.   mb->mwin = XCreateWindow(theDisp, mb->win, x, y, w, h, 
  893.                (u_int) 2, (int) dispDEEP, InputOutput,
  894.                theVisual, xswamask, &xswa);
  895.  
  896.   if (!mb->mwin) FatalError("can't create popup menu window!");
  897.  
  898.   XSelectInput(theDisp, mb->mwin, ExposureMask | VisibilityChangeMask);
  899.   XSetTransientForHint(theDisp, mb->mwin, mb->win);
  900. }
  901.   
  902.  
  903.  
  904.  
  905. /***********************************************/
  906. void MBRedraw(mb)
  907.      MBUTT *mb;
  908. {
  909.   /* draws a menu button in it's normal state.  (When it's actively being
  910.      used (to select an item), all drawing is handled in MBTrack) */
  911.   
  912.   int          x,y,i,r,x1,y1;
  913.   unsigned int w,h;
  914.   
  915.   r = 2;  /* amt of shadow */
  916.   x = mb->x;  y = mb->y;  w = mb->w;  h = mb->h;
  917.   x1 = x + (int) w;  
  918.   y1 = y + (int) h;
  919.   
  920.   XSetForeground(theDisp, theGC, mb->bg);
  921.   XFillRectangle(theDisp, mb->win, theGC, x+1, y+1, w-1, h-1);
  922.  
  923.   XSetForeground(theDisp, theGC, mb->fg);
  924.   XDrawRectangle(theDisp, mb->win, theGC, x, y, w, h);
  925.   Draw3dRect(mb->win, x+1, y+1, w-2, h-2, R3D_OUT, 2, mb->hi, mb->lo, mb->bg);
  926.  
  927.   XSetForeground(theDisp, theGC, mb->fg);
  928.  
  929.   /* draw shadow */
  930.   for (i=1; i<=r; i++) {
  931.     XDrawLine(theDisp, mb->win, theGC, x+r,  y1+i, x1+i, y1+i);
  932.     XDrawLine(theDisp, mb->win, theGC, x1+i, y1+i, x1+i, y+r);
  933.   }
  934.  
  935.   if (mb->pix != None) {                    /* draw pixmap centered in butt */
  936.     x1 = x + (1+w - mb->pw)/2;
  937.     y1 = y + (1+h - mb->ph)/2;
  938.  
  939.     XSetForeground(theDisp, theGC, mb->fg);
  940.     XSetBackground(theDisp, theGC, mb->bg);
  941.     XCopyPlane(theDisp, mb->pix, mb->win, theGC, 0,0,
  942.            (u_int) mb->pw, (u_int) mb->ph, x1,y1, 1L);
  943.     if (!mb->active) 
  944.       DimRect(mb->win, x1,y1, (u_int) mb->pw, (u_int) mb->ph, mb->bg);
  945.   }
  946.  
  947.   else {                                    /* draw string centered in butt */
  948.     char *str, stbuf[256];
  949.  
  950.     if (mb->title) str = mb->title;
  951.     else {  /* find first checked item, and show that as the title */
  952.       int i;
  953.  
  954.       if (mb->list) {
  955.     for (i=0; i<mb->nlist && !mb->flags[i]; i++);
  956.     if (i==mb->nlist) i = 0;   /* shouldn't happen */
  957.     str = mb->list[i];
  958.       }
  959.       else str = "";
  960.     }
  961.  
  962.     /* truncate at TAB, if any */
  963.     strcpy(stbuf, str);
  964.     if ((str = (char *) index(stbuf, '\t')) != NULL) *str = '\0';
  965.     str = stbuf;
  966.  
  967.     x1 = CENTERX(mfinfo, x + w/2, str);
  968.     y1 = CENTERY(mfinfo, y + h/2);
  969.  
  970.     if (mb->active) {
  971.       DrawString(mb->win, x1,y1, str);
  972.     }
  973.     else {  /* stipple if not active */
  974.       XSetFillStyle(theDisp, theGC, FillStippled);
  975.       XSetStipple(theDisp, theGC, dimStip);
  976.       DrawString(mb->win, x1,y1, str);
  977.       XSetFillStyle(theDisp,theGC,FillSolid);
  978.     }
  979.   }
  980. }
  981.  
  982.  
  983. /**********************************************/
  984. void MBSetActive(mb,act)
  985.      MBUTT *mb;
  986.      int    act;
  987. {
  988.   if (mb->active != act) {
  989.     mb->active = act;
  990.     MBRedraw(mb);
  991.   }
  992. }
  993.  
  994.  
  995. /**********************************************/
  996. int MBWhich(mb)
  997.      MBUTT *mb;
  998. {
  999.   /* returns index of first checked selection, or '-1' if nothing selected */
  1000.   
  1001.   int i;
  1002.  
  1003.   if (!mb->hascheck) return -1;
  1004.  
  1005.   for (i=0; i<mb->nlist; i++)
  1006.     if (mb->flags[i]) return i;
  1007.   
  1008.   return -1;
  1009. }
  1010.  
  1011.  
  1012. /**********************************************/
  1013. void MBSelect(mb, n)
  1014.      MBUTT *mb;
  1015.      int    n;
  1016. {
  1017.   /* makes entry #n the selected entry (ie, the only one with a check mark)
  1018.      Does all redrawing.  Does nothing if entry #n already selected.
  1019.      Don't let it select 'dim' entries */
  1020.   
  1021.   int i;
  1022.   
  1023.   if (n<0 || n>mb->nlist) return;               /* # out of range */
  1024.   if (!mb->hascheck)      return;               /* shouldn't happen */
  1025.   if (mb->flags[n])       return;               /* already selected */
  1026.   
  1027.   for (i=0; i<MAXMBLEN; i++) mb->flags[i] = 0;
  1028.  
  1029.   mb->flags[n] = 1;
  1030.   if (!mb->title) MBRedraw(mb);                 /* mb shows cur selection */
  1031. }
  1032.  
  1033.  
  1034.  
  1035. /***********************************************/
  1036. int MBClick(mb, mx, my)
  1037. MBUTT *mb;
  1038. int    mx,my;
  1039. {
  1040.   if (PTINRECT(mx, my, mb->x, mb->y, mb->w, mb->h)) return 1;
  1041.   return 0;
  1042. }
  1043.  
  1044.  
  1045. /***********************************************/
  1046. int MBTrack(mb)
  1047.      MBUTT *mb;
  1048. {
  1049.   Window       rW, cW, win;
  1050.   int          i, x, y, rx, ry, extratop, hascheck;
  1051.   unsigned int mask;
  1052.   int          mwide, mhigh, mx, my, j, lit, lastlit;
  1053.   int          mtabwide;
  1054.   XSizeHints   hints;
  1055.   XEvent       event;
  1056.  
  1057.  
  1058.   /* returns selected menu choice index, or '-1' if none */
  1059.  
  1060.   if (!mb->active || !mb->nlist) return -1;
  1061.  
  1062.   extratop = (mb->title) ? LINEHIGH+3 : 1-SPACING; /*add extra line for title*/
  1063.  
  1064.   mtabwide = 0;
  1065.  
  1066.   mwide = 1;                              /* compute maximum width */
  1067.   for (i=0; i<mb->nlist; i++) {
  1068.     if (!index(mb->list[i], '\t')) {
  1069.       j = StringWidth(mb->list[i]);
  1070.       if (j > mwide) mwide = j;
  1071.     }
  1072.     else {
  1073.       char *sp, str[256];
  1074.  
  1075.       strcpy(str, mb->list[i]);
  1076.       sp = (char *) index(str, '\t');
  1077.       j = StringWidth(sp+1);
  1078.       if (j>mtabwide) mtabwide = j;
  1079.  
  1080.       *sp = '\0';
  1081.       j = StringWidth(str);
  1082.       if ((j + 4 + mtabwide)>mwide) mwide = (j+4+mtabwide);
  1083.     }
  1084.   }
  1085.   mwide += 8;                             /* extra room at edges */
  1086.   
  1087.   /* make wider if any checked menu items */
  1088.   for (i=0; i<mb->nlist && !mb->flags[i]; i++);
  1089.   hascheck = (i<mb->nlist || mb->hascheck);
  1090.  
  1091.   if (hascheck && mb->title) mwide += 8;
  1092.  
  1093.   if (mwide < (mb->w+1)) mwide = mb->w+1; /* at least as wide as button */
  1094.     
  1095.   mhigh = mb->nlist * LINEHIGH + 2 + extratop;
  1096.  
  1097.   mx = mb->x-1;  my = mb->y - 1;
  1098.   if (mb->title && mwide > mb->w) mx -= ((mwide - mb->w)/2);
  1099.  
  1100.  
  1101.   /* create/map window, and warp mouse if we had to move the window */
  1102.   win = mb->mwin;
  1103.   XMoveResizeWindow(theDisp, win, mx, my, (u_int) mwide, (u_int) mhigh);
  1104.  
  1105.   hints.width  = hints.min_width  = hints.max_width  = mwide;
  1106.   hints.height = hints.min_height = hints.max_height = mhigh;
  1107.   hints.x = mx;  hints.y = my;
  1108.   hints.flags  = (USSize | PMinSize | PMaxSize | PPosition);
  1109.   XSetNormalHints(theDisp, win, &hints);
  1110.  
  1111.   XMapRaised(theDisp, win);
  1112.  
  1113.   /* wait for window to become mapped */
  1114.   XWindowEvent(theDisp, win, VisibilityChangeMask, &event);
  1115.  
  1116.  
  1117.   /* draw the menu */
  1118.   XSetForeground(theDisp, theGC, mb->fg);
  1119.   x = (hascheck) ? 12 : 4;
  1120.   if (mb->title) {                /* draw a title on this menu */
  1121.     CenterString(win, mwide/2-1, (extratop-2)/2, mb->title);
  1122.  
  1123.     if (ctrlColor) {
  1124.       XSetForeground(theDisp, theGC, mb->fg);
  1125.       XDrawLine(theDisp, win, theGC, 0, extratop-2, mwide, extratop-2);
  1126.       XSetForeground(theDisp, theGC, mb->lo);
  1127.       XDrawLine(theDisp, win, theGC, 0, extratop-1, mwide, extratop-1);
  1128.       XSetForeground(theDisp, theGC, mb->hi);
  1129.       XDrawLine(theDisp, win, theGC, 0, extratop,   mwide, extratop);
  1130.       XSetForeground(theDisp, theGC, mb->fg);
  1131.     }
  1132.     else {  /* b/w system */
  1133.       XDrawLine(theDisp, win, theGC, 0, extratop-2, mwide, extratop-2);
  1134.       XDrawLine(theDisp, win, theGC, 0, extratop,   mwide, extratop);
  1135.     }
  1136.   }
  1137.  
  1138.   y = ASCENT + SPACING + extratop;
  1139.   for (i=0; i<mb->nlist; i++) {
  1140.     char txtstr[256], *tabstr;
  1141.     strcpy(txtstr, mb->list[i]);
  1142.     if ((tabstr = (char *) index(txtstr, '\t'))) {
  1143.       *tabstr = '\0';  tabstr++;
  1144.     }
  1145.  
  1146.     if (mb->flags[i]) {
  1147.       XCopyArea(theDisp, mbchk, win, theGC, 0, 0, mb_chk_width, mb_chk_height, 
  1148.         x - 10, y - 8);
  1149.     }
  1150.     
  1151.     if (!strcmp(mb->list[i], MBSEP)) {
  1152.       mb->dim[i] = 1;    /* don't select this one */
  1153.       if (ctrlColor) {
  1154.     XSetForeground(theDisp, theGC, mb->fg);
  1155.     XDrawLine(theDisp,win,theGC,4,y-(ASCENT/2)-1, mwide-5, y-(ASCENT/2)-1);
  1156.  
  1157.     XSetForeground(theDisp, theGC, mb->lo);
  1158.     XDrawLine(theDisp,win,theGC,4,y-(ASCENT/2),   mwide-5, y-(ASCENT/2));
  1159.  
  1160.     XSetForeground(theDisp, theGC, mb->hi);
  1161.     XDrawLine(theDisp,win,theGC,4,y-(ASCENT/2)+1, mwide-5, y-(ASCENT/2)+1);
  1162.     XSetForeground(theDisp, theGC, mb->fg);
  1163.       }
  1164.       else 
  1165.     XDrawLine(theDisp, win, theGC, 4, y-(ASCENT/2), mwide-5, y-(ASCENT/2));
  1166.     }
  1167.     else {
  1168.       DrawString(win, x, y, txtstr);
  1169.       if (tabstr) 
  1170.     DrawString(win, mwide - mtabwide - 4, y, tabstr);
  1171.  
  1172.       if (mb->dim[i]) 
  1173.     DimRect(win, x, y-ASCENT, (u_int) mwide, (u_int) CHIGH, mb->bg);
  1174.       XSetForeground(theDisp, theGC, mb->fg);
  1175.     }
  1176.  
  1177.     y += LINEHIGH;
  1178.   }
  1179.  
  1180.   XFlush(theDisp);
  1181.  
  1182.  
  1183.   /* track the mouse */
  1184.   XSetFunction(theDisp, theGC, GXinvert);         /* go in to 'invert' mode */
  1185.   XSetPlaneMask(theDisp, theGC, mb->fg ^ mb->bg);
  1186.  
  1187.   lit = lastlit = -1;
  1188.   while (XQueryPointer(theDisp,win,&rW,&cW,&rx,&ry,&x,&y,&mask)) {
  1189.     if (!(mask & Button1Mask)) break;    /* button released */
  1190.  
  1191.     /* determine which choice the mouse is in.  -1 if none */
  1192.     j = extratop+2;
  1193.     if (x < 0 || x > mwide) lit = -1;
  1194.     else {
  1195.       for (i=0; i<mb->nlist; i++, j+=LINEHIGH) {
  1196.     if (y>=j && y < j+LINEHIGH) { lit = i; break; }
  1197.       }
  1198.       if (i == mb->nlist) lit = -1;
  1199.     }
  1200.  
  1201.     /* handle dimmed selections */
  1202.     if (lit >= 0 && mb->dim[lit]) lit = -1;
  1203.  
  1204.     if (lit != lastlit) {
  1205.       if (lit >= 0) {
  1206.     y = extratop + 2 + lit*LINEHIGH;
  1207.     XFillRectangle(theDisp,win,theGC,0,y,(u_int) mwide,(u_int) LINEHIGH);
  1208.       }
  1209.       if (lastlit >= 0) {
  1210.     y = extratop + 2 + lastlit*LINEHIGH;
  1211.     XFillRectangle(theDisp,win,theGC,0,y,(u_int) mwide,(u_int) LINEHIGH);
  1212.       }
  1213.       lastlit = lit;
  1214.     }
  1215.   }
  1216.  
  1217.   /* flash the selected choice, if any */
  1218.   if (lit >= 0) {
  1219.     y = extratop + 2 + lit*LINEHIGH;
  1220.     for (i=0; i<5; i++) {
  1221.       XFillRectangle(theDisp, win, theGC, 0,y,(u_int) mwide,(u_int) LINEHIGH);
  1222.       XFlush(theDisp);
  1223.       Timer(50);
  1224.     }
  1225.   }
  1226.  
  1227.   XSetFunction(theDisp, theGC, GXcopy);   /* back to 'normal' mode */
  1228.   XSetPlaneMask(theDisp, theGC, AllPlanes);
  1229.  
  1230.   /* could try eating all remaining events for 'win' before unmapping */
  1231.  
  1232.   XSync(theDisp, False);                  /* make sure 'map' has taken place */
  1233.   XUnmapWindow(theDisp, win);
  1234.  
  1235.   MBRedraw(mb);
  1236.  
  1237.   return lit;
  1238. }
  1239.  
  1240.  
  1241.  
  1242.  
  1243.