Subversion Repositories Kolibri OS

Rev

Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
1951 mario79 1 
;---------------------------------------------------------------------
2 
  key:				; key
3 
    mcall 2
4 
    cmp   [extended_key],1
5 
    je	  .extended_key
6 
    test  al, al
7 
    jnz   still
8 
    cmp   ah, 0xE0
9 
    jne   @f
10 
    mov   [extended_key],1
11 
    jmp   still
12 
@@:
13 
    cmp   ah,151  ; i - file information
14 
	je    kinfo
15 
    cmp   ah,152  ; o - application options
16 
	je    check_key_O ;k_option
17 
    cmp   ah,159  ; s - sort mode
18 
	je    k_sort_directory
19 
    cmp   ah,145  ; w - wallpaper
20 
	je    k_background
21 
    cmp   ah,183  ; * - scaling to window
22 
	je    scaling
23 
    cmp   ah,139  ; 0 - scaling to window
24 
	je    scaling
25 
    cmp   ah,202  ; "-" - zoom minus
26 
	je    zoom_minus
27 
    cmp   ah,140  ; "-" - zoom minus
28 
	je    zoom_minus
29 
    cmp   ah,206  ; "+" - zoom plus
30 
	je    zoom_plus
31 
    cmp   ah,141  ; "+" - zoom plus
32 
	je    zoom_plus
33 
    cmp   ah,171  ; "\" - zoom 100%
34 
	je    no_scaling
35 
 
36 
	cmp   ah,72 ; up arrow
37 
	je    key_up_arrow
38 
	cmp   ah,80 ; down arrow
39 
	je    key_down_arrow
40 
	cmp   ah,75 ; left arrow
41 
	je    key_left_arrow
42 
	cmp   ah,77 ; right arrow
43 
	je    key_right_arrow
44 
 
45 
	cmp   ah,28 ; Enter
46 
	je    full_screen
47 
	cmp	ah,187	; F1
48 
	je	select_menu ;key_alt_down
49 
 
50 
	cmp	ah,42
51 
	je	key_shift_up
52 
	cmp	ah,54
53 
	je	key_shift_up
54 
	cmp	ah,170
55 
	je	key_shift_down
56 
	cmp	ah,182
57 
	je	key_shift_down
58 
	cmp	ah,29
59 
	je	key_ctrl_up
60 
	cmp	ah,157
61 
	je	key_ctrl_down
62 
	cmp	ah,56
63 
	je	key_alt_up
64 
	cmp	ah,184
65 
	je	key_alt_down
66 
 
67 
    jmp  still
68 
.extended_key:
69 
    mov  [extended_key],0
70 
	mov  [current_key_code],ah
71 
;	push  eax
72 
;	mcall 26,9
73 
;	mov  [timer_counter],eax
74 
;	pop   eax
75 
 
76 
;    mov  al,ah
77 
;    cmp  al,130  ; 1
78 
;    je	 kfile
79 
;    cmp  al,131  ; 2
80 
;    je	 kopen
81 
;    cmp  al,132  ; 3
82 
;    je	 kinfo
83 
;    cmp  al,133  ; 4
84 
;    je	 kbgrd
85 
	cmp  ah,73
86 
	je   move_to_left
87 
	cmp  ah,81
88 
	je   move_to_right
89 
	cmp  ah,71
90 
	je   left_limit
91 
	cmp  ah,79
92 
	je   right_limit
93 
    cmp   ah,181  ; / - zoom 100%
94 
	je    no_scaling
95 
 
96 
	cmp   ah,72 ; up arrow
97 
	je    key_up_arrow
98 
	cmp   ah,80 ; down arrow
99 
	je    key_down_arrow
100 
	cmp   ah,75 ; left arrow
101 
	je    key_left_arrow
102 
	cmp   ah,77 ; right arrow
103 
	je    key_right_arrow
104 
 
105 
	cmp   ah,28 ; Enter
106 
	je    full_screen
107 
 
108 
	cmp   ah,183 ; Print Screen  - Slides Show
109 
	je    slide_show.3
110 
 
111 
	cmp	ah,29
112 
	je	key_ctrl_up
113 
	cmp	ah,157
114 
	je	key_ctrl_down
115 
	cmp	ah,56
116 
	je	key_alt_up
117 
	cmp	ah,184
118 
	je	key_alt_down
119 
    jmp  still
120 
;---------------------------------------------------------------------
121 
key_shift_up:
122 
	mov	[shift_flag],1
123 
	jmp	still
124 
;---------------------------------------------------------------------
125 
key_shift_down:
126 
	mov	[shift_flag],0
127 
	jmp	still
128 
;---------------------------------------------------------------------
129 
key_ctrl_up:
130 
	mov	[ctrl_flag],1
131 
	jmp	still
132 
;---------------------------------------------------------------------
133 
key_ctrl_down:
134 
	mov	[ctrl_flag],0
135 
	jmp	still
136 
;---------------------------------------------------------------------
137 
key_alt_up:
138 
	mov	[alt_flag],1
139 
	jmp	still
140 
;---------------------------------------------------------------------
141 
key_alt_down:
142 
	mov	[alt_flag],0
143 
	jmp	still
144 
;---------------------------------------------------------------------
145 
check_key_O:
146 
	cmp	[ctrl_flag],0
147 
	jne	kfile
148 
	jmp	k_option
149 
;---------------------------------------------------------------------
150 
move_to_left:
151 
	xor   eax,eax
152 
	cmp   [load_file_number],eax
153 
	je    still
154 
    dec   [load_file_number]
155 
	jmp  right_limit.2
156 
;----------------------------------------
157 
move_to_right:
158 
	mov   eax,[load_directory_pointer]
159 
	mov   eax,[eax+4]
160 
	test  eax,eax
161 
	jz    @f
162 
	dec   eax
163 
@@:
164 
	cmp   [load_file_number],eax
165 
	je    still
166 
    inc   [load_file_number]
167 
	jmp  right_limit.2
168 
;----------------------------------------
169 
left_limit:
170 
	xor  eax,eax
171 
	jmp  right_limit.1
172 
;----------------------------------------
173 
right_limit:
174 
	mov   eax,[load_directory_pointer]
175 
	mov   eax,[eax+4]
176 
	test  eax,eax
177 
	jz    @f
178 
	dec   eax
179 
@@:
180 
.1:
181 
	cmp   [load_file_number],eax
182 
	je    still
183 
	mov  [load_file_number],eax
184 
.2:
185 
	imul  ebx,[load_file_number],304
186 
	add   ebx,32+40
187 
	add   ebx,[load_directory_pointer]
188 
 
189 
    mov   esi,string
190 
    mov   edi,plugin_pach
191 
    call  copy_file_path
192 
 
193 
	mov  esi,plugin_pach
194 
	mov  edi,string
195 
	mov  ecx,4096/4
196 
	cld
197 
	rep  movsd
198 
 
199 
;	jmp   kopen
200 
    mov  [open_file_flag],0
201 
    mov ecx,-1
202 
    call  getappinfo
203 
    call  load_image
204 
	test  eax,eax
205 
	jnz    kopen_1.err
206 
 
207 
    call  convert
208 
 
209 
	call load_directory.copy_dir_path
210 
 
211 
    call  get_window_param
212 
    test  [window_status],1b
213 
    jz    @f ;draw_still
214 
	mov   [no_draw_window],1
215 
    call  draw_other
216 
	mov   [no_draw_window],0
217 
	jmp   .3
218 
 
219 
@@:
220 
    call draw_window
221 
.3:
222 
	mov  al,[old_key_code]
223 
	mov  ah,[current_key_code]
224 
	mov  [old_key_code],ah
225 
	cmp  al,ah
226 
	jne  still  ;key.extended_key  ;still
227 
.still:
228 
    mcall 2
229 
    cmp   [extended_key],1
230 
    je	  .extended_key
231 
    test  al, al
232 
    jnz   still
233 
    cmp   ah, 0xE0
234 
    jne   @f
235 
    mov   [extended_key],1
236 
    jmp   .still
237 
@@:
238 
    jmp   still
239 
.extended_key:
240 
    mov  [extended_key],0
241 
	mov  [current_key_code],ah
242 
	jmp  .3
243 
.4:
244 
	mov  ah,[current_key_code]
245 
	mov  [old_key_code],ah
246 
	jmp  key.extended_key
247 
;---------------------------------------------------------------------
248 
slide_show:
249 
	mov   eax,[load_directory_pointer]
250 
	cmp   [eax+4],dword 1
251 
	jbe   still
252 
    mcall 26,9
253 
	cmp   [timer],eax
254 
	jbe   .1
255 
	jmp   .still
256 
.red:
257 
    call draw_window
258 
.still:
259 
	mcall 23,10
260 
    cmp  eax,1	      ; перерисовать окно ?
261 
    je	   .red
262 
    cmp  eax,2	      ; нажата клавиша ?
263 
    je	   .key	      ; если да - на key
264 
    cmp  eax,3	      ; нажата кнопка ?
265 
    je	   .button     ; если да - на button
266 
;	mcall 68,1
267 
	jmp   slide_show
268 
;-------------------------------------------
269 
.key:
270 
    mcall 2
271 
    cmp   [extended_key],1
272 
    je	  .extended_key
273 
    test  al, al
274 
    jnz   .still
275 
    cmp   ah, 0xE0
276 
    jne   @f
277 
    mov   [extended_key],1
278 
    jmp   .still
279 
@@:
280 
    cmp   ah,1  ; Esc
281 
	je    still
282 
    cmp   ah,185  ; Space
283 
	je    still
284 
	jmp  .still
285 
.extended_key:
286 
    mov  [extended_key],0
287 
	mov  [current_key_code],ah
288 
	jmp   .still
289 
;-------------------------------------------
290 
.button:			; button
291 
    mov  eax,17 		; get id
292 
    mcall
293 
    cmp  ah,1		  ; button id=1 ?
294 
	je  START.exit
295 
.noclose:
296 
    cmp  ah,2
297 
	je   still
298 
	jmp  slide_show
299 
;-------------------------------------------
300 
.1:
301 
;    mcall 26,9
302 
;	add  eax,[slide_show_delay]   ;500
303 
;	mov   [timer],eax
304 
 
305 
	mov   eax,[load_directory_pointer]
306 
	mov   eax,[eax+4]
307 
	test  eax,eax
308 
	jz    @f
309 
	dec   eax
310 
@@:
311 
	cmp   [load_file_number],eax
312 
	je    still
313 
    inc   [load_file_number]
314 
	imul  ebx,[load_file_number],304
315 
	add   ebx,32+40
316 
	add   ebx,[load_directory_pointer]
317 
 
318 
    mov   esi,string
319 
    mov   edi,plugin_pach
320 
    call  copy_file_path
321 
 
322 
	mov  esi,plugin_pach
323 
	mov  edi,string
324 
	mov  ecx,4096/4
325 
	cld
326 
	rep  movsd
327 
    mov  [open_file_flag],0
328 
    mov ecx,-1
329 
    call  getappinfo
330 
    call  load_image
331 
 
332 
	test  eax,eax
333 
	jnz    kopen_1.err
334 
 
335 
    call  convert
336 
	call load_directory.copy_dir_path
337 
 
338 
    call  get_window_param
339 
    test  [window_status],1b
340 
    jz    @f ;draw_still
341 
	mov   [no_draw_window],1
342 
    call  draw_other
343 
	mov   [no_draw_window],0
344 
	jmp   .3  ;slide_show
345 
@@:
346 
    call draw_window
347 
;	jmp   slide_show
348 
.3:
349 
    mcall 26,9
350 
	add  eax,[slide_show_delay]  ;500
351 
	mov   [timer],eax
352 
    jmp  slide_show
353 
;---------------------------------------------------------------------
354 
key_up_arrow:
355 
	mov  eax,[scroll_bar_data_vertical.ar_offset]
356 
	mov  ebx,scroll_bar_data_vertical.position
357 
	cmp  [ebx],eax
358 
	jbe  @f
359 
	sub  [ebx],eax
360 
	jmp  .1
361 
@@:
362 
	xor   eax,eax
363 
	cmp  [ebx],eax
364 
	je   still
365 
	mov   [ebx],eax
366 
.1:
367 
	call  drawimage
368 
	call  draw_scrollbars
369 
	jmp   still
370 
;---------------------------------------------------------------------
371 
key_down_arrow:
372 
	mov  ecx,[scroll_bar_data_vertical.ar_offset]
373 
	mov  ebx,scroll_bar_data_vertical.position
374 
	mov  eax,[scroll_bar_data_vertical.max_area]
375 
	sub  eax,[scroll_bar_data_vertical.cur_area]
376 
	cmp  [ebx],eax
377 
	je   still
378 
	push eax
379 
	sub  eax,ecx
380 
	cmp  [ebx],eax
381 
	pop  eax
382 
	jae  @f
383 
	add  [ebx],ecx
384 
	jmp  key_up_arrow.1
385 
@@:
386 
	mov  [ebx],eax
387 
	jmp  key_up_arrow.1
388 
;---------------------------------------------------------------------
389 
key_left_arrow:
390 
	mov  eax,[scroll_bar_data_horizontal.ar_offset]
391 
	mov  ebx,scroll_bar_data_horizontal.position
392 
	cmp  [ebx],eax
393 
	jbe  @f
394 
	sub  [ebx],eax
395 
	jmp  key_up_arrow.1
396 
@@:
397 
	xor   eax,eax
398 
	cmp  [ebx],eax
399 
	je   still
400 
	mov   [ebx],eax
401 
	jmp  key_up_arrow.1
402 
;---------------------------------------------------------------------
403 
key_right_arrow:
404 
	mov  ecx,[scroll_bar_data_horizontal.ar_offset]
405 
	mov  ebx,scroll_bar_data_horizontal.position
406 
	mov  eax,[scroll_bar_data_horizontal.max_area]
407 
	sub  eax,[scroll_bar_data_horizontal.cur_area]
408 
	cmp  [ebx],eax
409 
	je   still
410 
	push eax
411 
	sub  eax,ecx
412 
	cmp  [ebx],eax
413 
	pop  eax
414 
	jae  @f
415 
	add  [ebx],ecx
416 
	jmp  key_up_arrow.1
417 
@@:
418 
	mov  [ebx],eax
419 
 
420 
;	xor   eax,eax
421 
;	mov   ax,[scroll_bar_data_horizontal.size_x]
422 
;	sub   eax,[scroll_bar_data_horizontal.btn_high]
423 
;	sub   eax,[scroll_bar_data_horizontal.btn_high]
424 
;	sub   eax,[scroll_bar_data_horizontal.run_size]
425 
;	mov   [scroll_bar_data_horizontal.position2],eax
426 
	jmp  key_up_arrow.1
427 
;---------------------------------------------------------------------