Rev 551 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 551 | Rev 2703 | ||
---|---|---|---|
Line 26... | Line 26... | ||
26 | call draw_window ; at first, draw the window |
26 | call draw_window ; at first, draw the window |
Line 27... | Line 27... | ||
27 | 27 | ||
28 | still: |
28 | still: |
Line 29... | Line -... | ||
29 | call mouse_info |
- | |
30 | - | ||
31 | mov eax,23 |
29 | call mouse_info |
Line 32... | Line 30... | ||
32 | mov ebx,2 |
30 | |
33 | mcall |
31 | mcall 23, 2 |
34 | 32 | ||
35 | cmp eax,1 ; redraw request ? |
33 | cmp eax,1 ; redraw request ? |
Line 44... | Line 42... | ||
44 | red: ; redraw |
42 | red: ; redraw |
45 | call draw_window |
43 | call draw_window |
46 | jmp still |
44 | jmp still |
Line 47... | Line 45... | ||
47 | 45 | ||
48 | key: ; key |
46 | key: ; key |
49 | mov eax,2 ; just read it and ignore |
- | |
50 | mcall |
47 | mcall 2 ; just read it and ignore |
Line 51... | Line 48... | ||
51 | jmp still |
48 | jmp still |
52 | 49 | ||
53 | button: ; button |
- | |
Line 54... | Line 50... | ||
54 | mov eax,17 ; get id |
50 | button: ; button |
Line 55... | Line 51... | ||
55 | mcall |
51 | mcall 17 ; get id |
56 | 52 | ||
57 | shr eax,8 |
53 | shr eax,8 |
58 | - | ||
59 | cmp eax,1 ; button id=1 ? |
54 | |
Line 60... | Line 55... | ||
60 | jne noclose |
55 | cmp eax,1 ; button id=1 ? |
61 | mov eax,-1 ; close this program |
56 | jne noclose |
Line 71... | Line 66... | ||
71 | ; ******* WINDOW DEFINITIONS AND DRAW ******** |
66 | ; ******* WINDOW DEFINITIONS AND DRAW ******** |
72 | ; ********************************************* |
67 | ; ********************************************* |
Line 73... | Line 68... | ||
73 | 68 | ||
74 | - | ||
75 | draw_window: |
69 | |
76 | mov eax,12 ; function 12:tell os about windowdraw |
- | |
77 | mov ebx,1 ; 1, start of draw |
70 | draw_window: |
78 | mcall |
- | |
79 | ; DRAW WINDOW |
- | |
80 | mov eax,0 ; function 0 : define and draw window |
- | |
81 | mov ebx,100*65536+200 ; [x start] *65536 + [x size] |
- | |
82 | mov ecx,100*65536+200 ; [y start] *65536 + [y size] |
71 | mcall 12, 1 ; 1, start of draw |
83 | mov edx,0x14ffffff ; color of work area RRGGBB,8->color gl |
- | |
Line 84... | Line 72... | ||
84 | mov edi,title ; WINDOW LABEL |
72 | mcall 0, <100,200>, <100,200>, 0x14ffffff, , title ; DRAW WINDOW |
Line 85... | Line 73... | ||
85 | mcall |
73 | mcall 12,2 ; end WINDOW redraw |
86 | 74 | ||
Line 94... | Line 82... | ||
94 | call dword [App_Controls+ecx+4] ;call controls draw function |
82 | call dword [App_Controls+ecx+4] ;call controls draw function |
95 | add ecx, 12 |
83 | add ecx, 12 |
96 | jmp Draw_Controls_Loop |
84 | jmp Draw_Controls_Loop |
97 | Draw_Controls_Done: |
85 | Draw_Controls_Done: |
Line 98... | Line -... | ||
98 | - | ||
99 | - | ||
100 | mov eax,12 ; function 12:tell os about windowdraw |
- | |
101 | mov ebx,2 ; 2, end of draw |
- | |
102 | mcall |
- | |
103 | 86 | ||
Line 104... | Line 87... | ||
104 | ret |
87 | ret |
105 | 88 | ||
Line 110... | Line 93... | ||
110 | mousey dw 0 |
93 | mousey dw 0 |
111 | mousex dw 0 |
94 | mousex dw 0 |
112 | mouseb dd 0 |
95 | mouseb dd 0 |
Line 113... | Line 96... | ||
113 | 96 | ||
114 | mouse_info: |
97 | mouse_info: |
115 | mov eax, 37 ;get mouse cordinates |
- | |
116 | mov ebx, 1 ; |
- | |
117 | mcall ; |
98 | mcall 37, 1 ;get mouse cordinates |
118 | mov ecx, eax ; |
99 | mov ecx, eax ; |
119 | push ecx ; |
100 | push ecx ; |
120 | mov eax, 37 ;get mouse buttons |
- | |
121 | mov ebx, 2 ; |
- | |
122 | mcall ; |
101 | mcall 37, 2 ;get mouse buttons |
123 | cmp [mouseb], eax ;compare old mouse states to new states |
102 | cmp [mouseb], eax ;compare old mouse states to new states |
124 | jne redraw_mouse_info ; |
103 | jne redraw_mouse_info ; |
125 | cmp [mousey], cx ; |
104 | cmp [mousey], cx ; |
126 | jne redraw_mouse_info ; |
105 | jne redraw_mouse_info ; |
Line 169... | Line 148... | ||
169 | ;*********************************************** |
148 | ;*********************************************** |
Line 170... | Line 149... | ||
170 | 149 | ||
171 | 150 | ||
172 | draw_slider_info: |
- | |
173 | ;Repaint value background |
- | |
174 | mov eax, 13 |
- | |
175 | mov ebx, 0x00960028 |
151 | draw_slider_info: |
176 | mov ecx, 0x00240010 |
- | |
177 | mov edx, 0x00ffffff |
152 | ;Repaint value background |
178 | mcall |
153 | mcall 13, 144*65536+36, 72*65536+9, 0x00ffffff |
179 | ;Draw Color Box |
154 | ;Draw Color Box |
180 | xor edx, edx |
155 | xor edx, edx |
181 | movzx ecx,word [slider_1+12] |
156 | movzx ecx,word [slider_1+12] |
Line 192... | Line 167... | ||
192 | ;draw current value of slider |
167 | ;draw current value of slider |
193 | mov ecx, edx |
168 | mov ecx, edx |
194 | mov eax, 47 |
169 | mov eax, 47 |
195 | mov ebx, 0x00060100 |
170 | mov ebx, 0x00060100 |
196 | mov esi, 0 |
171 | mov esi, 0 |
197 | mov edx, 0x009A0029 |
172 | mov edx, 144*65536+72 |
198 | mcall |
173 | mcall |
199 | ret |
174 | ret |
Line 200... | Line 175... | ||
200 | 175 | ||
Line 265... | Line 240... | ||
265 | push edx |
240 | push edx |
266 | ;Draw slider background |
241 | ;Draw slider background |
267 | mov eax, 13 ;slider background |
242 | mov eax, 13 ;slider background |
268 | mov ebx, [ebp] ;x start/width |
243 | mov ebx, [ebp] ;x start/width |
269 | mov ecx, [ebp+4] ;y start/height |
244 | mov ecx, [ebp+4] ;y start/height |
270 | mov edx, 0x002288DD ;color |
245 | mov edx, 0x00EBEBEB ;color |
271 | mcall ;draw bar |
246 | mcall ;draw bar |
272 | ;Draw line for slide rail |
247 | ;Draw line for slide rail |
273 | mov eax, 38 ;draw vertical slide line |
248 | mov eax, 38 ;draw vertical slide line |
274 | movzx ebx,word [ebp] ;x |
249 | movzx ebx,word [ebp] ;x |
275 | shr ebx, 1 ; |
250 | shr ebx, 1 ; |