Subversion Repositories Kolibri OS

Rev

Rev 1632 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

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