20 frselect(Frame *f, Mousectl *mc) /* when called, button 1 is down */
23 Point mp, pt0, pt1, qt;
30 frdrawsel(f, frptofchar(f, f->p0), f->p0, f->p1, 0);
31 p0 = p1 = frcharofpt(f, mp);
34 pt0 = frptofchar(f, p0);
35 pt1 = frptofchar(f, p1);
36 frdrawsel(f, pt0, p0, p1, 1);
41 if(mp.y < f->r.min.y){
42 (*f->scroll)(f, -(f->r.min.y-mp.y)/(int)f->font->height-1);
46 }else if(mp.y > f->r.max.y){
47 (*f->scroll)(f, (mp.y-f->r.max.y)/(int)f->font->height+1);
53 if(reg != region(p1, p0))
54 q = p0, p0 = p1, p1 = q; /* undo the swap that will happen below */
55 pt0 = frptofchar(f, p0);
56 pt1 = frptofchar(f, p1);
60 q = frcharofpt(f, mp);
62 if(reg != region(q, p0)){ /* crossed starting point; reset */
64 frdrawsel(f, pt0, p0, p1, 0);
66 frdrawsel(f, pt1, p1, p0, 0);
71 frdrawsel(f, pt0, p0, p1, 1);
73 qt = frptofchar(f, q);
76 frdrawsel(f, pt1, p1, q, 1);
78 frdrawsel(f, qt, q, p1, 0);
81 frdrawsel(f, pt1, p1, q, 0);
83 frdrawsel(f, qt, q, p1, 1);
99 flushimage(f->display, 1);
103 }while(mc->buttons == b);
107 frselectpaint(Frame *f, Point p0, Point p1, Image *col)
114 q0.y += f->font->height;
115 q1.y += f->font->height;
116 n = (p1.y-p0.y)/f->font->height;
118 drawerror(f->display, "frselectpaint b==0");
119 if(p0.y == f->r.max.y)
122 draw(f->b, Rpt(p0, q1), col, nil, ZP);
124 if(p0.x >= f->r.max.x)
126 draw(f->b, Rect(p0.x, p0.y, f->r.max.x, q0.y), col, nil, ZP);
128 draw(f->b, Rect(f->r.min.x, q0.y, f->r.max.x, p1.y),
130 draw(f->b, Rect(f->r.min.x, p1.y, q1.x, q1.y),