Rev 178 | Rev 280 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed
Rev | Author | Line No. | Line |
---|---|---|---|
178 | heavyiron | 1 | ;POP_WIDTH = (popup_text.max_title+popup_text.max_accel+6)*6 |
2 | POP_IHEIGHT = 16 |
||
3 | ;POP_HEIGHT = popup_text.cnt_item*POP_IHEIGHT+popup_text.cnt_sep*4+4 |
||
4 | |||
5 | popup_thread_start: |
||
6 | mov [popup_active],1 |
||
7 | mov [pi_cur],0 |
||
8 | mov ebp,[esp] |
||
9 | mcall 14 |
||
10 | movzx ebx,ax |
||
11 | shr eax,16 |
||
12 | movzx ecx,[ebp+POPUP.x] |
||
13 | add cx,[ebp+POPUP.width] |
||
14 | cmp ecx,eax |
||
15 | jle @f |
||
16 | mov cx,[ebp+POPUP.width] |
||
17 | sub [ebp+POPUP.x],cx |
||
18 | @@: movzx ecx,[ebp+POPUP.y] |
||
19 | add cx,[ebp+POPUP.height] |
||
20 | cmp ecx,ebx |
||
21 | jle @f |
||
22 | mov cx,[ebp+POPUP.height] |
||
23 | sub [ebp+POPUP.y],cx |
||
24 | @@: mcall 40,01100111b ; ipc mouse button key redraw |
||
25 | cmp [mi_cur],0 |
||
26 | jl .2 |
||
27 | sub esp,32-16 |
||
28 | push 0 0 8 0 |
||
29 | mcall 60,1,esp,32 |
||
30 | .2: call draw_popup_wnd |
||
31 | |||
32 | still_popup: |
||
33 | cmp [main_closed],1 |
||
34 | je close_popup |
||
35 | mcall 10 |
||
36 | cmp eax,1 |
||
37 | je popup_thread_start.2 |
||
38 | cmp eax,2 |
||
39 | je key_popup |
||
40 | cmp eax,3 |
||
41 | je button_popup |
||
42 | cmp eax,6 |
||
43 | je mouse_popup |
||
44 | cmp eax,7 |
||
45 | jne still_popup |
||
46 | |||
47 | mov ebp,[POPUP_STACK];-32+12+4] |
||
48 | mov dword[POPUP_STACK-32+4],8 |
||
49 | movzx ebx,[ebp+POPUP.x] |
||
50 | movzx ecx,[ebp+POPUP.y] |
||
51 | movzx edx,[ebp+POPUP.width] |
||
52 | movzx esi,[ebp+POPUP.height] |
||
53 | mcall 67 |
||
54 | ; call draw_popup_wnd |
||
55 | jmp still_popup |
||
56 | |||
57 | mouse_popup: |
||
58 | mov ecx,mst2 |
||
59 | call get_mouse_event |
||
60 | cmp al,MEV_LDOWN |
||
61 | je check_popup_click |
||
62 | cmp al,MEV_MOVE |
||
63 | je check_popup_move |
||
64 | |||
65 | mcall 9,p_info2,-1 |
||
66 | cmp ax,[p_info2.window_stack_position] |
||
67 | jne close_popup |
||
68 | |||
69 | jmp still_popup |
||
70 | |||
71 | check_popup_click: |
||
72 | mov eax,[pi_cur] |
||
73 | or al,al |
||
74 | js close_popup |
||
75 | jz still_popup |
||
76 | mov ebx,[ebp+POPUP.actions] |
||
77 | mov [just_from_popup],1 |
||
78 | call dword[ebx+eax*4-4];dword[popup_text.actions+eax*4-4] |
||
79 | inc [just_from_popup] |
||
80 | jmp close_popup |
||
81 | |||
82 | check_popup_move: |
||
83 | mov eax,[pi_cur] |
||
84 | call get_active_popup_item |
||
85 | cmp eax,[pi_cur] |
||
86 | je still_popup |
||
87 | call draw_popup_wnd |
||
88 | jmp still_popup |
||
89 | |||
90 | key_popup: |
||
91 | mcall ;2 |
||
92 | cmp ah,27 |
||
93 | jne still_popup |
||
94 | |||
95 | button_popup: |
||
96 | mcall 17 |
||
97 | |||
98 | close_popup: |
||
99 | mcall 18,3,[p_info.PID] |
||
100 | mov [popup_active],0 |
||
101 | mcall -1 |
||
102 | |||
103 | func draw_popup_wnd |
||
104 | mcall 12,1 |
||
105 | |||
106 | ; mcall 48,3,sc,sizeof.system_colors |
||
107 | ; call calc_3d_colors |
||
108 | |||
109 | ; mov ebx,[p_pos] |
||
110 | ; mov ecx,[p_pos-2] |
||
111 | ; mov bx,POP_WIDTH |
||
112 | ; mov cx,POP_HEIGHT |
||
113 | mov ebx,dword[ebp+POPUP.x-2] |
||
114 | mov bx,[ebp+POPUP.width] |
||
115 | mov ecx,dword[ebp+POPUP.y-2] |
||
116 | mov cx,[ebp+POPUP.height] |
||
117 | mcall 0,,,0x01000000,0x01000000 |
||
118 | |||
119 | movzx ebx,bx |
||
120 | movzx ecx,cx |
||
121 | pushd 0 0 ebx ecx ;POP_WIDTH POP_HEIGHT |
||
122 | call draw_3d_panel |
||
123 | |||
124 | mov [pi_sel],0 |
||
125 | ; mcall 37,1 |
||
126 | ; movsx ebx,ax |
||
127 | ; sar eax,16 |
||
128 | ; mov [c_pos.x],eax |
||
129 | ; mov [c_pos.y],ebx |
||
130 | |||
131 | mov eax,4 |
||
132 | mpack ebx,3*6,3 |
||
133 | mov ecx,[sc.work_text] |
||
134 | mov edx,[ebp+POPUP.data];popup_text.data |
||
135 | @@: inc [pi_sel] |
||
136 | inc edx |
||
137 | movzx esi,byte[edx-1] |
||
138 | cmp byte[edx],'-' |
||
139 | jne .lp1 |
||
140 | pushad |
||
141 | mov ecx,ebx |
||
142 | shl ecx,16 |
||
143 | mov cx,bx |
||
144 | movzx ebx,[ebp+POPUP.width] |
||
145 | add ebx,0x00010000-1 |
||
146 | ; mpack ebx,1,POP_WIDTH-1 |
||
147 | add ecx,0x00010001 |
||
148 | mcall 38,,,[cl_3d_inset];0x006382BF;[sc.work_text] |
||
149 | add ecx,0x00010001 |
||
150 | mcall ,,,[cl_3d_outset];0x00FFFFFF |
||
151 | popad |
||
152 | add ebx,4 |
||
153 | jmp .lp2 |
||
154 | .lp1: mov edi,[pi_sel] |
||
155 | cmp edi,[pi_cur] |
||
156 | jne .lp3 |
||
157 | test byte[ebp+edi-1],0x01 ; byte[popup_text+edi-1],0x01 |
||
158 | jz .lp3 |
||
159 | pushad |
||
160 | movzx ecx,bx |
||
161 | shl ecx,16 |
||
162 | mov cl,POP_IHEIGHT-1 |
||
163 | movzx ebx,[ebp+POPUP.width] |
||
164 | add ebx,0x00010000-1 |
||
165 | ; mpack ebx,1,POP_WIDTH-1 |
||
166 | mcall 13,,,[cl_3d_pushed];0x00A3B8CC |
||
167 | rol ecx,16 |
||
168 | mov ax,cx |
||
169 | rol ecx,16 |
||
170 | mov cx,ax |
||
171 | mcall 38,,,[cl_3d_inset];0x006382BF |
||
172 | add ecx,(POP_IHEIGHT-1)*65536+POP_IHEIGHT-1 |
||
173 | mcall ,,,[cl_3d_outset];0x00FFFFFF |
||
174 | popad |
||
175 | .lp3: add ebx,(POP_IHEIGHT-7)/2 |
||
176 | |||
177 | pushad |
||
178 | test byte[ebp+edi-1],0x02 |
||
179 | jz .lp8 |
||
180 | movzx ecx,bx |
||
181 | shl ecx,16 |
||
182 | mov cx,bx |
||
183 | shr ebx,16 |
||
184 | push bx |
||
185 | shl ebx,16 |
||
186 | pop bx |
||
187 | add ecx,0x00040003 |
||
188 | sub ebx,0x000A000B |
||
189 | mcall 38,,,[sc.work_text] |
||
190 | add ecx,0x00010001 |
||
191 | mcall |
||
192 | add ebx,4 |
||
193 | sub ecx,2 |
||
194 | mcall |
||
195 | sub ecx,0x00010001 |
||
196 | mcall |
||
197 | .lp8: popad |
||
198 | |||
199 | mov ecx,[sc.work_text];0x00000000 |
||
200 | test byte[ebp+edi-1],0x01 ; byte[popup_text+edi-1],0x01 |
||
201 | jnz .lp5 |
||
202 | add ebx,0x00010001 |
||
203 | mov ecx,[cl_3d_outset] |
||
204 | mcall |
||
205 | sub ebx,0x00010001 |
||
206 | mov ecx,[cl_3d_inset] |
||
207 | ;mov ecx,[sc.grab_text];0x007F7F7F |
||
208 | .lp5: mcall |
||
209 | push ebx |
||
210 | add edx,esi |
||
211 | inc edx |
||
212 | movzx esi,byte[edx-1] |
||
213 | add ebx,[ebp+POPUP.acc_ofs] ; ((popup_text.max_title+2)*6-1)*65536 |
||
214 | cmp edi,[pi_cur] |
||
215 | je .lp4 |
||
216 | mov ecx,[cl_3d_inset];0x006382BF |
||
217 | .lp4: test byte[ebp+edi-1],0x01 ; byte[popup_text+edi-1],0x01 |
||
218 | jnz .lp6 |
||
219 | add ebx,0x00010001 |
||
220 | mov ecx,[cl_3d_outset] |
||
221 | mcall |
||
222 | sub ebx,0x00010001 |
||
223 | mov ecx,[cl_3d_inset] |
||
224 | ;mov ecx,[sc.grab_text];0x007F7F7F |
||
225 | .lp6: mcall |
||
226 | pop ebx |
||
227 | add ebx,POP_IHEIGHT-(POP_IHEIGHT-7)/2 |
||
228 | .lp2: add edx,esi |
||
229 | cmp byte[edx],0 |
||
230 | jne @b |
||
231 | .exit: |
||
232 | mcall 12,2 |
||
233 | ret |
||
234 | endf |
||
235 | |||
267 | mikedld | 236 | func setup_main_menu_popup |
237 | mov ebx,[p_info.box.left] |
||
238 | add ebx,[p_info.client_box.left] |
||
239 | @@: dec ecx |
||
240 | jz @f |
||
241 | add edx,8+1 |
||
242 | movzx esi,byte[edx-1] |
||
243 | add edx,esi |
||
244 | jmp @b |
||
245 | @@: movzx ecx,word[edx+2] |
||
246 | add ebx,ecx |
||
247 | |||
248 | mov [eax+POPUP.x],bx |
||
249 | mov ebx,[p_info.box.top] |
||
250 | add ebx,[p_info.client_box.top] |
||
251 | add ebx,ATOPH-1 |
||
252 | mov [eax+POPUP.y],bx |
||
253 | mov [POPUP_STACK],eax |
||
254 | ret |
||
255 | endf |
||
256 | |||
257 | onshow: |
||
258 | |||
259 | .file: |
||
260 | or byte[mm.File+3],0x01 |
||
261 | cmp [f_info.length],0 |
||
262 | jne @f |
||
263 | and byte[mm.File+3],0xFE |
||
264 | @@: ret |
||
265 | |||
266 | .edit: |
||
267 | or byte[mm.Edit+2],0x01 |
||
268 | cmp [copy_size],0 |
||
269 | jne @f |
||
270 | and byte[mm.Edit+2],0xFE |
||
271 | @@: or dword[mm.Edit+0],0x01000101 |
||
272 | cmp [sel.selected],0 |
||
273 | jne @f |
||
274 | and dword[mm.Edit+0],0xFEFFFEFE |
||
275 | @@: ret |
||
276 | |||
277 | .search: |
||
278 | mov byte[mm.Search+0],0 |
||
279 | ret |
||
280 | .run: |
||
281 | ret |
||
282 | .recode: |
||
283 | ret |
||
284 | .options: |
||
285 | mov word[mm.Options+0],0 |
||
286 | mov byte[mm.Options+5],0 |
||
287 | or byte[mm.Options+2],0x02 |
||
288 | test [options],OPTS_SECURESEL |
||
289 | jnz @f |
||
290 | and byte[mm.Options+2],0xFD |
||
291 | @@: or byte[mm.Options+3],0x02 |
||
292 | test [options],OPTS_AUTOBRACES |
||
293 | jnz @f |
||
294 | and byte[mm.Options+3],0xFD |
||
295 | @@: or byte[mm.Options+4],0x02 |
||
296 | test [options],OPTS_AUTOINDENT |
||
297 | jnz @f |
||
298 | and byte[mm.Options+4],0xFD |
||
299 | @@: or byte[mm.Options+6],0x02 |
||
300 | test [options],OPTS_OPTIMSAVE |
||
301 | jnz @f |
||
302 | and byte[mm.Options+6],0xFD |
||
303 | @@: or byte[mm.Options+8],0x02 |
||
304 | test [options],OPTS_LINENUMS |
||
305 | jnz @f |
||
306 | and byte[mm.Options+8],0xFD |
||
307 | @@: ret |
||
308 | |||
178 | heavyiron | 309 | pi_sel dd ? |
310 | pi_cur dd ? |
||
311 | p_pos dd ? |
||
312 | popup_active db 0 |