Subversion Repositories Kolibri OS

Rev

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

Rev 585 Rev 588
Line 53... Line 53...
53
 
53
 
Line 54... Line 54...
54
;---------------------------------------------------------------------
54
;---------------------------------------------------------------------
55
 
55
 
56
  button:
-
 
57
    mcall 17	    ; 17 - ïîëó÷èòü èäåíòèôèêàòîð íàæàòîé êíîïêè
-
 
58
    cmp   ah,2
56
  button:
59
    jne   b3
-
 
60
    mov   dword [load_tray.name],cd0
-
 
61
    jmp   b5.1
57
    mcall 17	    ; 17 - ïîëó÷èòü èäåíòèôèêàòîð íàæàòîé êíîïêè
62
  b3:
-
 
63
    cmp   ah,3
-
 
64
    jne   b4
-
 
65
    mov   dword [load_tray.name],cd1
-
 
66
    jmp   b5.1
58
; êíîïêè 2,3,4,5 - load tray CD0/CD1/CD2/CD3
67
  b4:
-
 
68
    cmp   ah,4
-
 
69
    jne   b5
-
 
70
    mov   dword [load_tray.name],cd2
-
 
71
    jmp   b5.1
59
        movzx   ecx, ah
72
  b5:
60
        sub     ecx, 2
73
    cmp   ah,5
-
 
74
    jne   b6
-
 
75
    mov   dword [load_tray.name],cd3
61
        cmp     ecx, 3
76
  .1:  
62
        ja      b6
77
     mcall 70, load_tray
63
        mcall 24,5
78
    jmp   red
-
 
79
  b6:
-
 
80
    cmp   ah,6
64
        jmp     red
81
    jne   b7
-
 
82
    mov   dword [eject_tray.name],cd0
-
 
83
    jmp   b9.1
65
  b6:
84
  b7:
-
 
85
    cmp   ah,7
-
 
86
    jne   b8
-
 
87
    mov   dword [eject_tray.name],cd1
-
 
88
    jmp   b9.1
66
; êíîïêè 6,7,8,9 - eject tray CD0/CD1/CD2/CD3
89
  b8:
-
 
90
    cmp   ah,8
-
 
91
    jne   b9
67
        sub     ecx, 4
92
    mov   dword [eject_tray.name],cd2
-
 
93
    jmp   b9.1
68
        cmp     ecx, 3
94
  b9:
-
 
95
    cmp   ah,9
-
 
96
    jne   b1
-
 
97
    mov   dword [eject_tray.name],cd3
-
 
98
  .1:  
69
        ja      b1
99
     mcall 70, eject_tray
70
        mcall 24,4
100
    jmp   red
71
        jmp     red
101
  b1:
72
  b1:
Line 158... Line 129...
158
;---------------------------------------------------------------------
129
;---------------------------------------------------------------------
159
header db ' ATAPI Device Tray Control',0
130
header db ' ATAPI Device Tray Control',0
160
text3 db 'eject   eject   eject   eject',0
131
text3 db 'eject   eject   eject   eject',0
161
text2 db 'load    load    load    load',0
132
text2 db 'load    load    load    load',0
162
text1 db '/cd0/   /cd1/   /cd2/   /cd3/',0
133
text1 db '/cd0/   /cd1/   /cd2/   /cd3/',0
163
cd0:  db '/cd0/1/',0
-
 
164
cd1:  db '/cd1/1/',0
-
 
165
cd2:  db '/cd2/1/',0
-
 
166
cd3:  db '/cd3/1/',0
-
 
167
;---------------------------------------------------------------------
134
;---------------------------------------------------------------------
168
load_tray:
-
 
169
    .subfunction dd   11
-
 
170
    .rezerv   dd   0
-
 
171
    .rezerv1  dd   0
-
 
172
    .rezerv2  dd   0
-
 
173
    .rezerv3  dd   0
-
 
174
    db 0
-
 
175
    .name: dd cd0
-
 
176
 
-
 
177
eject_tray:
-
 
178
    .subfunction dd   10
-
 
179
    .rezerv   dd   0
-
 
180
    .rezerv1  dd   0
-
 
181
    .rezerv2  dd   0
-
 
182
    .rezerv3  dd   0
-
 
183
    db 0
-
 
184
    .name: dd cd0
-
 
Line 185... Line 135...
185
    
135