Subversion Repositories Kolibri OS

Rev

Rev 6357 | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
255 heavyiron 1
;------------------------------------------
2
;-------------KEYS-------------------------
3
;------------------------------------------
6357 IgorA 4
align 4
5
keys:
6371 IgorA 6
	mcall SF_GET_KEY
7
	shr eax,8
255 heavyiron 8
 
6371 IgorA 9
	cmp al,176
10
	jne @f
11
	sub [PosX],20
12
	jmp change_screen
13
@@:
14
	cmp al,179
15
	jne @f
16
	add [PosX],20
17
	jmp change_screen
18
@@:
19
	cmp al,177
20
	jne @f
21
	add [PosY],20
22
	jmp change_screen
23
@@:
24
	cmp al,178
25
	jne @f
26
	sub [PosY],20
27
	jmp change_screen
28
@@:
29
	cmp al,49 ;1
30
	jne @f
31
	mov [k],1
32
	jmp zoom_ch
33
@@:
34
	cmp al,50 ;2
35
	jne @f
36
	mov [k],2
37
	jmp zoom_ch
38
@@:
39
	cmp al,51 ;3
40
	jne @f
41
	mov [k],3
42
	jmp zoom_ch
43
@@:
44
	cmp al,52 ;4
45
	jne @f
46
	mov [k],4
47
	jmp zoom_ch
48
@@:
49
	cmp al,56 ;8
50
	jne @f
51
	mov [k],8
52
	jmp zoom_ch
53
@@:
54
	cmp al,48 ;0
55
	jne @f
56
	mov [k],16
57
zoom_ch:
58
	call scrollbar_move_00
59
	call drawwin
60
	jmp change_screen
61
@@:
62
	cmp al,255
63
	jne @f
64
	call analizing_picture_to_palette
65
	call drawwin
66
	jmp change_screen
67
@@:
68
	jmp still
255 heavyiron 69
 
6371 IgorA 70
	;cmp al,27 ;Esc
71
	;jne still
72
	;mov eax,CursorsID
73
	;call delete_cursors
1632 mario79 74
close:
6371 IgorA 75
	mcall SF_TERMINATE_PROCESS
255 heavyiron 76
 
6371 IgorA 77
change_screen:
78
	call CalculatePositionScreen
79
	call MovePictureToWorkScreen
80
	call draw_scrollers
81
	call PrintMousePos
82
	jmp still