22 h = BIG*Dy(screen->r);
23 scrtmp = allocimage(display, Rect(0, 0, 32, h), screen->chan, 0, DNofill);
39 scrpos(Rectangle r, uint p0, uint p1, uint tot)
56 q.max.y -= h*(tot-p1)/tot;
57 if(q.max.y < q.min.y+2){
58 if(q.min.y+2 <= r.max.y)
73 if(b == nil || w->i == nil)
79 r2 = scrpos(r1, w->org, w->org+w->nchars, w->nr);
80 if(!eqrect(r2, w->lastsr)){
82 /* move r1, r2 to (0,0) to avoid clipping */
83 r2 = rectsubpt(r2, r1.min);
84 r1 = rectsubpt(r1, r1.min);
85 draw(b, r1, w->cols[BORD], nil, ZP);
86 draw(b, r2, w->cols[BACK], nil, ZP);
87 r2.min.x = r2.max.x-1;
88 draw(b, r2, w->cols[BORD], nil, ZP);
89 draw(w->i, r, b, nil, Pt(0, r1.min.y));
94 wscrsleep(Window *w, uint dt)
100 if(display->bufp > display->buf)
101 flushimage(display, 1);
102 timer = timerstart(dt);
105 alts[0].c = timer->c;
107 alts[0].op = CHANRCV;
109 alts[1].v = &w->mc.Mouse;
110 alts[1].op = CHANRCV;
111 alts[2].op = CHANEND;
118 if(abs(w->mc.xy.y-y)>2 || w->mc.buttons!=b){
127 wscroll(Window *w, int but)
133 s = insetrect(w->scrollr, 1);
147 if(w->nr > 1024*1024)
148 p0 = ((w->nr>>10)*(y-s.min.y)/h)<<10;
150 p0 = w->nr*(y-s.min.y)/h;
152 wsetorigin(w, p0, FALSE);
157 if(but == 1 || but == 4){
158 y = max(1, (my-s.min.y)/w->font->height);
159 p0 = wbacknl(w, w->org, y);
161 y = max(my, s.min.y+w->font->height);
162 p0 = w->org+frcharofpt(w, Pt(s.max.x, y));
165 wsetorigin(w, p0, TRUE);
169 if(display->bufp > display->buf)
170 flushimage(display, 1);
174 nbrecv(w->mc.c, &w->mc.Mouse);
178 }while(w->mc.buttons & (1<<(but-1)));