rguiproc.c

十七种模拟器源代码 非常有用的作课程设计不可缺少的

}

// d_raine_button_proc():
// A button object (the dp field points to the text string). This object
// can be selected by clicking on it with the mouse or by pressing its 
// keyboard shortcut. If the D_EXIT flag is set, selecting it will close 
// the dialog, otherwise it will toggle on and off.
//
// Only MSG_DRAW is changed, all others fall back on the original d_button_proc

int d_raine_button_proc(int msg, DIALOG *d, int c)
{
   int state1, state2;
   int swap;
   int g;

   switch (msg) {

      case MSG_DRAW:

      if(d->flags & D_SELECTED){

      solid_3d_box_invert(d->x, d->y, d->x + d->w, d->y + d->h);

      //line(screen, d->x+1, d->y+1, d->x+1,      d->y+d->h-1, CGUI_BOX_COL_LOW_1);
      //line(screen, d->x+1, d->y+1, d->x+d->w-1, d->y+1,      CGUI_BOX_COL_LOW_1);

      g = 1;
      state1 = (d->flags & D_DISABLED) ? gui_mg_color : translate_color(d->fg);
      state2 = translate_color(d->bg);

      }
      else{

      solid_3d_box(d->x, d->y, d->x + d->w, d->y + d->h);

      //line(screen, d->x+1,      d->y+d->h-1, d->x+d->w-1, d->y+d->h-1, CGUI_BOX_COL_LOW_1);
      //line(screen, d->x+d->w-1, d->y+1,      d->x+d->w-1, d->y+d->h-1, CGUI_BOX_COL_LOW_1);

      g = 0; 
      state1 = (d->flags & D_DISABLED) ? gui_mg_color : translate_color(d->fg);
      state2 = translate_color(d->bg);

      }

      text_mode(-1);
      gui_textout(screen, raine_translate_text(d->dp), d->x+d->w/2+g, d->y+d->h/2-text_height(font)/2+g, state1, TRUE);

      if((d->flags & D_GOTFOCUS) && (!(d->flags & D_SELECTED) || !(d->flags & D_EXIT))){
	    dotted_rect(d->x+1+g, d->y+1+g, d->x+d->w-2+g, d->y+d->h-2+g);
      }

	 break;

      case MSG_WANTFOCUS:
	 return D_WANTFOCUS;

      case MSG_KEY:
	 /* close dialog? */
	 if (d->flags & D_EXIT) {
	    return D_CLOSE;
	 }

	 /* or just toggle */
	 d->flags ^= D_SELECTED;
	 scare_mouse();
	 SEND_MESSAGE(d, MSG_DRAW, 0);
	 unscare_mouse();
	 break;

      case MSG_CLICK:
	 /* what state was the button originally in? */
	 state1 = d->flags & D_SELECTED;
	 if (d->flags & D_EXIT)
	    swap = FALSE;
	 else
	    swap = state1;

	 /* track the mouse until it is released */
	 while (gui_mouse_b()) {
	    state2 = ((rgui_mouse_x() >= d->x) && (rgui_mouse_y() >= d->y) &&
		      (rgui_mouse_x() < d->x + d->w) && (rgui_mouse_y() < d->y + d->h));
	    if (swap)
	       state2 = !state2;

	    /* redraw? */
	    if (((state1) && (!state2)) || ((state2) && (!state1))) {
	       d->flags ^= D_SELECTED;
	       state1 = d->flags & D_SELECTED;
	       scare_mouse();
	       SEND_MESSAGE(d, MSG_DRAW, 0);
	       unscare_mouse();
	    }

	    /* let other objects continue to animate */
	    broadcast_dialog_message(MSG_IDLE, 0);
	 }

	 /* should we close the dialog? */
	 if ((d->flags & D_SELECTED) && (d->flags & D_EXIT)) {
	    d->flags ^= D_SELECTED;
	    return D_CLOSE;
	 }
	 break; 
   }

   return D_O_K;
}

int x_raine_button_proc(int msg, DIALOG *d, int c)
{
   return d_raine_button_proc(msg,d,c);
}

/* x_edit_proc */
int x_edit_proc(int msg, DIALOG *d, int c)
{
   int f, l, p, w, x, fg, b, scroll;
   char buf[16];
   char *s;
   int rtm;

   if (msg == MSG_DRAW) {
     s = d->dp;
     l = ustrlen(s);
     if (d->d2 > l) 
       d->d2 = l;

     /* calculate maximal number of displayable characters */
     if (d->d2 == l)  {
       usetc(buf+usetc(buf, ' '), 0);
       x = text_length(font, buf);
     }
     else
       x = 0;

     b = 0;

     for (p=d->d2; p>=0; p--) {
       usetc(buf+usetc(buf, ugetat(s, p)), 0);
       x += text_length(font, buf);
       b++;
       if (x > d->w) 
	 break;
     }

     if (x <= d->w) {
       b = l; 
       scroll = FALSE;
     }
     else {
       b--; 
       scroll = TRUE;
     }
     
     // Real drawing
     fg = (d->flags & D_DISABLED) ? gui_mg_color : translate_color(d->fg);
     x = 0;

     if (scroll) {
       p = d->d2-b+1; 
       b = d->d2; 
     }
     else 
       p = 0; 
     
     for (; p<=b; p++) {
       f = ugetat(s, p);
       usetc(buf+usetc(buf, (f) ? f : ' '), 0);
       w = text_length(font, buf);
       if (x+w > d->w) 
	 break;
       f = ((p == d->d2) && (d->flags & D_GOTFOCUS));
       rtm = text_mode((f) ? fg : translate_color(d->bg));
       textout(screen, font, buf, d->x+x, d->y, (f) ? translate_color(d->bg) : fg);
       text_mode(rtm);
       x += w;
     }
     if (x < d->w)
       rectfill(screen, d->x+x, d->y, d->x+d->w-1, d->y+text_height(font)-1, translate_color(d->bg));
   } else { // MSG_DRAW
     return d_edit_proc(msg,d,c);
   }
   
   return D_O_K;

}

// d_raine_radio_proc():
// GUI procedure for radio buttons.
// Parameters: d1-button group number; d2-button style (0=circle,1=square);
// dp-text to appear as label to the right of the button.
//
// Only MSG_DRAW is changed, all others fall back on the original d_radio_proc

int d_raine_radio_proc(int msg, DIALOG *d, int c)
{
   int x, center, r, fg;

   if(msg==MSG_DRAW){
	 fg = (d->flags & D_DISABLED) ? CGUI_BOX_COL_MIDDLE : translate_color(d->fg);
	 text_mode(CGUI_BOX_COL_MIDDLE);
	 gui_textout(screen, d->dp, d->x+d->h+text_height(font), d->y+(d->h-(text_height(font)-gui_font_baseline))/2, fg, FALSE);

	 x = d->x;
	 r = d->h/2;
	 center = x+r;
	 rectfill(screen, x+1, d->y+1, x+d->h-1, d->y+d->h-1, CGUI_BOX_COL_MIDDLE);

	 switch (d->d2) {

	    case 1:
	       trans_3d_box(x, d->y, x+d->h, d->y+d->h);
	       if (d->flags & D_SELECTED)
		  rectfill(screen, x+r/2, d->y+r/2, x+d->h-r/2, d->y+d->h-r/2, CGUI_BOX_COL_HIGH_2);
	       break;

	    default:
	       circle(screen, center, d->y+r, r, fg);
	       if (d->flags & D_SELECTED)
		  circlefill(screen, center, d->y+r, r/2, CGUI_BOX_COL_HIGH_2);
	       break;
	 }

	 if(d->flags & D_GOTFOCUS){
	    dotted_rect(x+1, d->y+1, x+d->h-1, d->y+d->h-1);
         }

      return D_O_K;
   }
   else{
      return d_radio_proc(msg,d,c);
   }
}

int x_raine_radio_proc(int msg, DIALOG *d, int c)
{
   int x, center, r, fg;

   if(msg==MSG_DRAW){
	 fg = (d->flags & D_DISABLED) ? CGUI_BOX_COL_MIDDLE : translate_color(d->fg);
	 text_mode(CGUI_BOX_COL_MIDDLE);
	 gui_textout(screen, raine_translate_text(d->dp), d->x+d->h+text_height(font), d->y+(d->h-(text_height(font)-gui_font_baseline))/2, fg, FALSE);

	 x = d->x;
	 r = d->h/2;
	 center = x+r;
	 rectfill(screen, x+1, d->y+1, x+d->h-1, d->y+d->h-1, CGUI_BOX_COL_MIDDLE);

	 switch (d->d2) {

	    case 1:
	       trans_3d_box(x, d->y, x+d->h, d->y+d->h);
	       if (d->flags & D_SELECTED)
		  rectfill(screen, x+r/2, d->y+r/2, x+d->h-r/2, d->y+d->h-r/2, CGUI_BOX_COL_HIGH_2);
	       break;

	    default:
	       circle(screen, center, d->y+r, r, fg);
	       if (d->flags & D_SELECTED)
		  circlefill(screen, center, d->y+r, r/2, CGUI_BOX_COL_HIGH_2);
	       break;
	 }

	 if(d->flags & D_GOTFOCUS){
	    dotted_rect(x+1, d->y+1, x+d->h-1, d->y+d->h-1);
         }

      return D_O_K;
   }
   else{
      return d_radio_proc(msg,d,c);
   }
}

/* _draw_raine_scrollable_frame:
 *  Helper function to draw a frame for all objects with vertical scrollbars.
 */
void _draw_raine_scrollable_frame(DIALOG *d, int listsize, int offset, int height, int fg_color)
{
   int i, len;
   int xx, yy;

   // possibly draw scrollbar
   if (listsize > height) {
      trans_3d_box(d->x, d->y, d->x+d->w-(8+5), d->y+d->h);
      trans_3d_box(d->x+d->w-(8+4), d->y, d->x+d->w, d->y+d->h);

      // scrollbar with focus
      if (d->flags & D_GOTFOCUS) {
	 dotted_rect(d->x+1, d->y+1, d->x+d->w-(8+6), d->y+d->h-1);
	 dotted_rect(d->x+d->w-(8+3), d->y+1, d->x+d->w-1, d->y+d->h-1);
      }
      else {
	 rect(screen, d->x+1, d->y+1, d->x+d->w-(8+6), d->y+d->h-1, CGUI_BOX_COL_MIDDLE);
	 rect(screen, d->x+d->w-(8+3), d->y+1, d->x+d->w-1, d->y+d->h-1, CGUI_BOX_COL_MIDDLE);
      }

      // create and draw the scrollbar
      i = ((d->h-4) * height + listsize/2) / listsize;
      xx = d->x+d->w-(8+2);
      yy = d->y+2;

      if (offset > 0) {
	 len = (((d->h-4) * offset) + listsize/2) / listsize;
	 rectfill(screen, xx, yy, xx+8, yy+len-1, CGUI_BOX_COL_MIDDLE);
	 yy += len;
      }
      if (yy+i+1 < d->y+d->h-2) {
         solid_3d_box(xx, yy, xx+8+1, yy+i+1);
	 yy += i+1;
	 rectfill(screen, xx, yy, xx+8, d->y+d->h-2, CGUI_BOX_COL_MIDDLE);
      }
      else {
         solid_3d_box(xx, yy, xx+8+1, d->y+d->h-1);
      }
   }
   else {
      trans_3d_box(d->x, d->y, d->x+d->w, d->y+d->h);

      // no scrollbar necessary
      if (d->flags & D_GOTFOCUS)
	 dotted_rect(d->x+1, d->y+1, d->x+d->w-1, d->y+d->h-1);
      else
	 rect(screen, d->x+1, d->y+1, d->x+d->w-1, d->y+d->h-1, CGUI_BOX_COL_MIDDLE);
   }
}


/* _draw_raine_listbox:
 *  Helper function to draw a listbox object.
 */
void _draw_raine_listbox(DIALOG *d)
{
   int height, listsize, i, len, bar, x, y, w;
   int fg_color, fg, bg;
   char *sel = d->dp2;
   char s[1024];

   (*(getfuncptr)d->dp)(-1, &listsize);
   height = (d->h-3) / text_height(gui_fixed_font);
   bar = (listsize > height);
   w = (bar ? d->w-14 : d->w-2);
   fg_color = (d->flags & D_DISABLED) ? gui_mg_color : CGUI_BOX_COL_HIGH_2;

   /* draw box contents */
   for (i=0; i<height; i++) {
      if (d->d2+i < listsize) {
	 if (d->d2+i == d->d1) {
	    fg = CGUI_COL_TEXT_1;
	    bg = CGUI_BOX_COL_HIGH_2;
	 } 
	 else if ((sel) && (sel[d->d2+i])) { 
	    fg = CGUI_COL_TEXT_1;
	    bg = CGUI_BOX_COL_MIDDLE;
	 }
	 else {
	    fg = CGUI_COL_TEXT_1;
	    bg = CGUI_BOX_COL_MIDDLE;
	 }
	 usetc(s, 0);
	 ustrncat(s, (*(getfuncptr)d->dp)(i+d->d2, NULL), sizeof(s)-ucwidth(0));
	 x = d->x + 2;
	 y = d->y + 2 + i*text_height(gui_fixed_font);
	 text_mode(bg);
	 rectfill(screen, x, y, x+7, y+text_height(gui_fixed_font)-1, bg); 
	 x += 8;
	 len = ustrlen(s);
	 while (text_length(gui_fixed_font, s) >= MAX(d->w - (bar ? 22 : 10), 1)) {
	    len--;
	    usetat(s, len, 0);
	 }
	 textout(screen, gui_fixed_font, s, x, y, CGUI_COL_TEXT_1); 
	 x += text_length(gui_fixed_font, s);
	 if (x <= d->x+w) 
	    rectfill(screen, x, y, d->x+w, y+text_height(gui_fixed_font)-1, bg);
      }
      else {
	 rectfill(screen, d->x+2,  d->y+2+i*text_height(gui_fixed_font), 
		  d->x+w, d->y+1+(i+1)*text_height(gui_fixed_font), CGUI_BOX_COL_MIDDLE);
      }
   }

   if (d->y+2+i*text_height(gui_fixed_font) <= d->y+d->h-2)
      rectfill(screen, d->x+2, d->y+2+i*text_height(gui_fixed_font), 
				       d->x+w, d->y+d->h-2, CGUI_BOX_COL_MIDDLE);

   /* draw frame, maybe with scrollbar */
   _draw_raine_scrollable_frame(d, listsize, d->d2, height, fg_color);

}

// d_raine_list_proc():
// A list box object. The dp field points to a function which it will call
// to obtain information about the list. This should follow the form:
//    char *<list_func_name> (int index, int *list_size);
// If index is zero or positive, the function should return a pointer to
// the string which is to be displayed at position index in the list. If
// index is  negative, it should return null and list_size should be set
// to the number of items in the list. The list box object will allow the