moved unused/ui to ui
[btb/d2x.git] / ui / scroll.c
1 /*
2 THE COMPUTER CODE CONTAINED HEREIN IS THE SOLE PROPERTY OF PARALLAX
3 SOFTWARE CORPORATION ("PARALLAX").  PARALLAX, IN DISTRIBUTING THE CODE TO
4 END-USERS, AND SUBJECT TO ALL OF THE TERMS AND CONDITIONS HEREIN, GRANTS A
5 ROYALTY-FREE, PERPETUAL LICENSE TO SUCH END-USERS FOR USE BY SUCH END-USERS
6 IN USING, DISPLAYING,  AND CREATING DERIVATIVE WORKS THEREOF, SO LONG AS
7 SUCH USE, DISPLAY OR CREATION IS FOR NON-COMMERCIAL, ROYALTY OR REVENUE
8 FREE PURPOSES.  IN NO EVENT SHALL THE END-USER USE THE COMPUTER CODE
9 CONTAINED HEREIN FOR REVENUE-BEARING PURPOSES.  THE END-USER UNDERSTANDS
10 AND AGREES TO THE TERMS HEREIN AND ACCEPTS THE SAME BY USE OF THIS FILE.  
11 COPYRIGHT 1993-1999 PARALLAX SOFTWARE CORPORATION.  ALL RIGHTS RESERVED.
12 */
13
14 #pragma off (unreferenced)
15 static char rcsid[] = "$Id: scroll.c,v 1.1 2004-12-19 13:08:49 btb Exp $";
16 #pragma on (unreferenced)
17 #include <stdlib.h>
18
19 #include "fix.h"
20 #include "types.h"
21 #include "gr.h"
22 #include "ui.h"
23 #include "key.h"
24
25 #define TICKER (*(volatile int *)0x46C)
26
27 void ui_draw_scrollbar( UI_GADGET_SCROLLBAR * scrollbar )
28 {
29         int x, y;
30
31         if (scrollbar->status==0)
32                 return;
33
34         scrollbar->status = 0;
35         x = y = 0;
36         ui_mouse_hide();
37         gr_set_current_canvas( scrollbar->canvas );
38
39         if (CurWindow->keyboard_focus_gadget == (UI_GADGET *)scrollbar)
40                 gr_setcolor( CRED );
41         else
42                 gr_setcolor( CGREY );
43
44         gr_rect( 0, 0, scrollbar->width-1, scrollbar->fake_position-1 );
45         gr_rect( 0, scrollbar->fake_position+scrollbar->fake_size, scrollbar->width-1, scrollbar->height-1);
46
47         ui_draw_box_out(0, scrollbar->fake_position, scrollbar->width-1, scrollbar->fake_position+scrollbar->fake_size-1 );
48
49         ui_mouse_show();
50
51 }
52
53 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  )
54 {
55         int tw, th, taw;
56
57         UI_GADGET_SCROLLBAR * scrollbar;
58         char up[2];
59         char down[2];
60         up[0] = 30; up[1] = 0;
61         down[0] = 31; down[1] = 0;
62
63         gr_get_string_size( up, &tw, &th, &taw );
64
65         w = tw + 10;
66
67         if (stop < start ) stop = start;
68
69         scrollbar = (UI_GADGET_SCROLLBAR *)ui_gadget_add( wnd, 3, x, y+w, x+w-1, y+h-w-1 );
70
71         scrollbar->up_button = ui_add_gadget_button( wnd, x, y, w, w, up, NULL );
72         scrollbar->up_button->parent = (UI_GADGET *)scrollbar;
73
74         scrollbar->down_button =ui_add_gadget_button( wnd, x, y+h-w, w, w, down, NULL );
75         scrollbar->down_button->parent = (UI_GADGET *)scrollbar;
76
77         scrollbar->horz = 0;
78         scrollbar->width = scrollbar->x2-scrollbar->x1+1;
79         scrollbar->height = scrollbar->y2-scrollbar->y1+1;
80         scrollbar->start = start;
81         scrollbar->stop = stop;
82         scrollbar->position = position;
83         scrollbar->window_size = window_size;
84         scrollbar->fake_length = scrollbar->height;
85         scrollbar->fake_position =  0;
86         if (stop!=start)
87                 scrollbar->fake_size = (window_size * scrollbar->height)/(stop-start+1+window_size);
88         else
89                 scrollbar->fake_size = scrollbar->height;
90
91         if (scrollbar->fake_size < 7) scrollbar->fake_size = 7;
92         scrollbar->dragging = 0;
93         scrollbar->moved=0;
94         scrollbar->last_scrolled = 0;
95         return scrollbar;
96
97 }
98
99 void ui_scrollbar_do( UI_GADGET_SCROLLBAR * scrollbar, int keypress )
100 {
101         int OnMe, OnSlider, keyfocus;
102
103         int oldpos, op;
104
105         keyfocus = 0;
106         keypress = keypress;
107
108         if (CurWindow->keyboard_focus_gadget==(UI_GADGET *)scrollbar)
109                 keyfocus = 1;
110
111         if (scrollbar->start==scrollbar->stop)
112         {
113                 scrollbar->position = 0;
114                 scrollbar->fake_position = 0;
115                 ui_draw_scrollbar( scrollbar );
116                 return;
117         }
118
119         op = scrollbar->position;
120
121         oldpos = scrollbar->fake_position;
122
123         scrollbar->moved = 0;
124
125
126         if ( (scrollbar->up_button->position!=0) || (keyfocus && keyd_pressed[KEY_UP]) )
127         {
128                 if (TICKER > scrollbar->last_scrolled+1)
129                 {
130                         scrollbar->last_scrolled = TICKER;
131                         scrollbar->position--;
132                         if (scrollbar->position < scrollbar->start )
133                                 scrollbar->position = scrollbar->start;
134                         scrollbar->fake_position = scrollbar->position-scrollbar->start;
135                         scrollbar->fake_position *= scrollbar->height-scrollbar->fake_size;
136                         scrollbar->fake_position /= (scrollbar->stop-scrollbar->start);
137                 }
138         }
139
140         if ( (scrollbar->down_button->position!=0) || (keyfocus && keyd_pressed[KEY_DOWN]) )
141         {
142                 if (TICKER > scrollbar->last_scrolled+1)
143                 {
144                         scrollbar->last_scrolled = TICKER;
145                         scrollbar->position++;
146                         if (scrollbar->position > scrollbar->stop )
147                                 scrollbar->position = scrollbar->stop;
148                         scrollbar->fake_position = scrollbar->position-scrollbar->start;
149                         scrollbar->fake_position *= scrollbar->height-scrollbar->fake_size;
150                         scrollbar->fake_position /= (scrollbar->stop-scrollbar->start);
151                 }
152         }
153
154         OnMe = ui_mouse_on_gadget( (UI_GADGET *)scrollbar );
155
156         //gr_ubox(0, scrollbar->fake_position, scrollbar->width-1, scrollbar->fake_position+scrollbar->fake_size-1 );
157
158         if (!B1_PRESSED )
159                 scrollbar->dragging = 0;
160
161         //if (B1_PRESSED && OnMe )
162         //    listbox->dragging = 1;
163
164
165         OnSlider = 0;
166         if ((Mouse.y >= scrollbar->fake_position+scrollbar->y1) && \
167                 (Mouse.y < scrollbar->fake_position+scrollbar->y1+scrollbar->fake_size) && OnMe )
168                 OnSlider = 1;
169
170         if (B1_JUST_PRESSED && OnSlider )
171         {
172                 scrollbar->dragging = 1;
173                 scrollbar->drag_x = Mouse.x;
174                 scrollbar->drag_y = Mouse.y;
175                 scrollbar->drag_starting = scrollbar->fake_position;
176         }
177
178         if  ( B1_PRESSED && OnMe && !OnSlider && (TICKER > scrollbar->last_scrolled+4) )
179         {
180                 scrollbar->last_scrolled = TICKER;
181
182                 if ( Mouse.y < scrollbar->fake_position+scrollbar->y1 )
183                 {
184                         // Page Up
185                         scrollbar->position -= scrollbar->window_size;
186                         if (scrollbar->position < scrollbar->start )
187                                 scrollbar->position = scrollbar->start;
188
189                 } else {
190                         // Page Down
191                         scrollbar->position += scrollbar->window_size;
192                         if (scrollbar->position > scrollbar->stop )
193                                 scrollbar->position = scrollbar->stop;
194                 }
195                 scrollbar->fake_position = scrollbar->position-scrollbar->start;
196                 scrollbar->fake_position *= scrollbar->height-scrollbar->fake_size;
197                 scrollbar->fake_position /= (scrollbar->stop-scrollbar->start);
198         }
199
200         if ((selected_gadget==(UI_GADGET *)scrollbar) && B1_PRESSED && scrollbar->dragging )
201         {
202                 //Mouse.x = scrollbar->drag_x;
203                 scrollbar->fake_position = scrollbar->drag_starting + (Mouse.y - scrollbar->drag_y );
204                 if (scrollbar->fake_position<0)
205                 {
206                         scrollbar->fake_position = 0;
207                         //Mouse.y = scrollbar->fake_position + scrollbar->drag_y - scrollbar->drag_starting;
208                 }
209                 if (scrollbar->fake_position > (scrollbar->height-scrollbar->fake_size))
210                 {
211                         scrollbar->fake_position = (scrollbar->height-scrollbar->fake_size);
212                         //Mouse.y = scrollbar->fake_position + scrollbar->drag_y - scrollbar->drag_starting;
213                 }
214
215                 //mouse_set_pos( Mouse.x, Mouse.y );
216
217                 scrollbar->position = scrollbar->fake_position;
218                 scrollbar->position *= (scrollbar->stop-scrollbar->start);
219                 scrollbar->position /= ( scrollbar->height-scrollbar->fake_size ) ;
220                 scrollbar->position += scrollbar->start;
221
222                 if (scrollbar->position > scrollbar->stop )
223                         scrollbar->position = scrollbar->stop;
224
225                 if (scrollbar->position < scrollbar->start )
226                         scrollbar->position = scrollbar->start;
227
228                 //scrollbar->fake_position = scrollbar->position-scrollbar->start;
229                 //scrollbar->fake_position *= scrollbar->height-scrollbar->fake_size;
230                 //scrollbar->fake_position /= (scrollbar->stop-scrollbar->start);
231
232         }
233
234         if (op != scrollbar->position )
235                 scrollbar->moved = 1;
236
237         if (oldpos != scrollbar->fake_position)
238                 scrollbar->status = 1;
239         ui_draw_scrollbar( scrollbar );
240
241 }
242