1 /* $Id: scroll.c,v 1.3 2004-12-19 15:21:11 btb Exp $ */
3 THE COMPUTER CODE CONTAINED HEREIN IS THE SOLE PROPERTY OF PARALLAX
4 SOFTWARE CORPORATION ("PARALLAX"). PARALLAX, IN DISTRIBUTING THE CODE TO
5 END-USERS, AND SUBJECT TO ALL OF THE TERMS AND CONDITIONS HEREIN, GRANTS A
6 ROYALTY-FREE, PERPETUAL LICENSE TO SUCH END-USERS FOR USE BY SUCH END-USERS
7 IN USING, DISPLAYING, AND CREATING DERIVATIVE WORKS THEREOF, SO LONG AS
8 SUCH USE, DISPLAY OR CREATION IS FOR NON-COMMERCIAL, ROYALTY OR REVENUE
9 FREE PURPOSES. IN NO EVENT SHALL THE END-USER USE THE COMPUTER CODE
10 CONTAINED HEREIN FOR REVENUE-BEARING PURPOSES. THE END-USER UNDERSTANDS
11 AND AGREES TO THE TERMS HEREIN AND ACCEPTS THE SAME BY USE OF THIS FILE.
12 COPYRIGHT 1993-1999 PARALLAX SOFTWARE CORPORATION. ALL RIGHTS RESERVED.
16 static char rcsid[] = "$Id: scroll.c,v 1.3 2004-12-19 15:21:11 btb Exp $";
31 #define TICKER (*(volatile int *)0x46C)
33 void ui_draw_scrollbar( UI_GADGET_SCROLLBAR * scrollbar )
37 if (scrollbar->status==0)
40 scrollbar->status = 0;
43 gr_set_current_canvas( scrollbar->canvas );
45 if (CurWindow->keyboard_focus_gadget == (UI_GADGET *)scrollbar)
50 gr_rect( 0, 0, scrollbar->width-1, scrollbar->fake_position-1 );
51 gr_rect( 0, scrollbar->fake_position+scrollbar->fake_size, scrollbar->width-1, scrollbar->height-1);
53 ui_draw_box_out(0, scrollbar->fake_position, scrollbar->width-1, scrollbar->fake_position+scrollbar->fake_size-1 );
59 UI_GADGET_SCROLLBAR * ui_add_gadget_scrollbar( UI_WINDOW * wnd, short x, short y, short w, short h, int start, int stop, int position, int window_size )
63 UI_GADGET_SCROLLBAR * scrollbar;
66 up[0] = 30; up[1] = 0;
67 down[0] = 31; down[1] = 0;
69 gr_get_string_size( up, &tw, &th, &taw );
73 if (stop < start ) stop = start;
75 scrollbar = (UI_GADGET_SCROLLBAR *)ui_gadget_add( wnd, 3, x, y+w, x+w-1, y+h-w-1 );
77 scrollbar->up_button = ui_add_gadget_button( wnd, x, y, w, w, up, NULL );
78 scrollbar->up_button->parent = (UI_GADGET *)scrollbar;
80 scrollbar->down_button =ui_add_gadget_button( wnd, x, y+h-w, w, w, down, NULL );
81 scrollbar->down_button->parent = (UI_GADGET *)scrollbar;
84 scrollbar->width = scrollbar->x2-scrollbar->x1+1;
85 scrollbar->height = scrollbar->y2-scrollbar->y1+1;
86 scrollbar->start = start;
87 scrollbar->stop = stop;
88 scrollbar->position = position;
89 scrollbar->window_size = window_size;
90 scrollbar->fake_length = scrollbar->height;
91 scrollbar->fake_position = 0;
93 scrollbar->fake_size = (window_size * scrollbar->height)/(stop-start+1+window_size);
95 scrollbar->fake_size = scrollbar->height;
97 if (scrollbar->fake_size < 7) scrollbar->fake_size = 7;
98 scrollbar->dragging = 0;
100 scrollbar->last_scrolled = 0;
105 void ui_scrollbar_do( UI_GADGET_SCROLLBAR * scrollbar, int keypress )
107 int OnMe, OnSlider, keyfocus;
114 if (CurWindow->keyboard_focus_gadget==(UI_GADGET *)scrollbar)
117 if (scrollbar->start==scrollbar->stop)
119 scrollbar->position = 0;
120 scrollbar->fake_position = 0;
121 ui_draw_scrollbar( scrollbar );
125 op = scrollbar->position;
127 oldpos = scrollbar->fake_position;
129 scrollbar->moved = 0;
132 if ( (scrollbar->up_button->position!=0) || (keyfocus && keyd_pressed[KEY_UP]) )
134 if (TICKER > scrollbar->last_scrolled+1)
136 scrollbar->last_scrolled = TICKER;
137 scrollbar->position--;
138 if (scrollbar->position < scrollbar->start )
139 scrollbar->position = scrollbar->start;
140 scrollbar->fake_position = scrollbar->position-scrollbar->start;
141 scrollbar->fake_position *= scrollbar->height-scrollbar->fake_size;
142 scrollbar->fake_position /= (scrollbar->stop-scrollbar->start);
146 if ( (scrollbar->down_button->position!=0) || (keyfocus && keyd_pressed[KEY_DOWN]) )
148 if (TICKER > scrollbar->last_scrolled+1)
150 scrollbar->last_scrolled = TICKER;
151 scrollbar->position++;
152 if (scrollbar->position > scrollbar->stop )
153 scrollbar->position = scrollbar->stop;
154 scrollbar->fake_position = scrollbar->position-scrollbar->start;
155 scrollbar->fake_position *= scrollbar->height-scrollbar->fake_size;
156 scrollbar->fake_position /= (scrollbar->stop-scrollbar->start);
160 OnMe = ui_mouse_on_gadget( (UI_GADGET *)scrollbar );
162 //gr_ubox(0, scrollbar->fake_position, scrollbar->width-1, scrollbar->fake_position+scrollbar->fake_size-1 );
165 scrollbar->dragging = 0;
167 //if (B1_PRESSED && OnMe )
168 // listbox->dragging = 1;
172 if ((Mouse.y >= scrollbar->fake_position+scrollbar->y1) && \
173 (Mouse.y < scrollbar->fake_position+scrollbar->y1+scrollbar->fake_size) && OnMe )
176 if (B1_JUST_PRESSED && OnSlider )
178 scrollbar->dragging = 1;
179 scrollbar->drag_x = Mouse.x;
180 scrollbar->drag_y = Mouse.y;
181 scrollbar->drag_starting = scrollbar->fake_position;
184 if ( B1_PRESSED && OnMe && !OnSlider && (TICKER > scrollbar->last_scrolled+4) )
186 scrollbar->last_scrolled = TICKER;
188 if ( Mouse.y < scrollbar->fake_position+scrollbar->y1 )
191 scrollbar->position -= scrollbar->window_size;
192 if (scrollbar->position < scrollbar->start )
193 scrollbar->position = scrollbar->start;
197 scrollbar->position += scrollbar->window_size;
198 if (scrollbar->position > scrollbar->stop )
199 scrollbar->position = scrollbar->stop;
201 scrollbar->fake_position = scrollbar->position-scrollbar->start;
202 scrollbar->fake_position *= scrollbar->height-scrollbar->fake_size;
203 scrollbar->fake_position /= (scrollbar->stop-scrollbar->start);
206 if ((selected_gadget==(UI_GADGET *)scrollbar) && B1_PRESSED && scrollbar->dragging )
208 //Mouse.x = scrollbar->drag_x;
209 scrollbar->fake_position = scrollbar->drag_starting + (Mouse.y - scrollbar->drag_y );
210 if (scrollbar->fake_position<0)
212 scrollbar->fake_position = 0;
213 //Mouse.y = scrollbar->fake_position + scrollbar->drag_y - scrollbar->drag_starting;
215 if (scrollbar->fake_position > (scrollbar->height-scrollbar->fake_size))
217 scrollbar->fake_position = (scrollbar->height-scrollbar->fake_size);
218 //Mouse.y = scrollbar->fake_position + scrollbar->drag_y - scrollbar->drag_starting;
221 //mouse_set_pos( Mouse.x, Mouse.y );
223 scrollbar->position = scrollbar->fake_position;
224 scrollbar->position *= (scrollbar->stop-scrollbar->start);
225 scrollbar->position /= ( scrollbar->height-scrollbar->fake_size ) ;
226 scrollbar->position += scrollbar->start;
228 if (scrollbar->position > scrollbar->stop )
229 scrollbar->position = scrollbar->stop;
231 if (scrollbar->position < scrollbar->start )
232 scrollbar->position = scrollbar->start;
234 //scrollbar->fake_position = scrollbar->position-scrollbar->start;
235 //scrollbar->fake_position *= scrollbar->height-scrollbar->fake_size;
236 //scrollbar->fake_position /= (scrollbar->stop-scrollbar->start);
240 if (op != scrollbar->position )
241 scrollbar->moved = 1;
243 if (oldpos != scrollbar->fake_position)
244 scrollbar->status = 1;
245 ui_draw_scrollbar( scrollbar );