Subversion Repositories Kolibri OS

Rev

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

Rev 139 Rev 485
Line 13... Line 13...
13
   and  [counter],0
13
   and  [counter],0
14
   mov  ebx,PL_X+255
14
   mov  ebx,PL_X+255
15
   mov  eax,13
15
   mov  eax,13
16
   mov  ecx,PL_Y-1 shl 16+4+9*LISTITEMS
16
   mov  ecx,PL_Y-1 shl 16+4+9*LISTITEMS
17
   xor  edx,edx
17
   xor  edx,edx
18
   int  0x40
18
   mcall
19
   movzx  ecx,byte[list_count]
19
   movzx  ecx,byte[list_count]
20
   test ecx,ecx
20
   test ecx,ecx
21
   jz   .ex2
21
   jz   .ex2
22
   push ecx
22
   push ecx
23
   imul ecx,9
23
   imul ecx,9
24
   add  ecx,PL_Y-1 shl 16-2
24
   add  ecx,PL_Y-1 shl 16-2
25
   mov  edx,11+1 shl 29+1 shl 30
25
   mov  edx,11+1 shl 29+1 shl 30
26
   mov  eax,8
26
   mov  eax,8
27
   int  0x40
27
   mcall
28
   pop  ecx
28
   pop  ecx
29
   mov  edi,[pl_ptr]
29
   mov  edi,[pl_ptr]
30
   mov  eax,4
30
   mov  eax,4
31
   mov  ebx,PL_XY+2 shl 16
31
   mov  ebx,PL_XY+2 shl 16
32
 .sh_loop:
32
 .sh_loop:
Line 43... Line 43...
43
   imul ecx,9
43
   imul ecx,9
44
   shl  ecx,16
44
   shl  ecx,16
45
   add  ecx,PL_Y-1 shl 16+8
45
   add  ecx,PL_Y-1 shl 16+8
46
   mov  edx,0xc6
46
   mov  edx,0xc6
47
   mov  eax,13
47
   mov  eax,13
48
   int  0x40
48
   mcall
49
   popa
49
   popa
50
 .nosel:
50
 .nosel:
51
   pusha
51
   pusha
52
   mov  edx,ebx
52
   mov  edx,ebx
53
   mov  esi,0xa0a0a0;0x508cec
53
   mov  esi,0xa0a0a0;0x508cec
Line 59... Line 59...
59
   jmp  .int
59
   jmp  .int
60
 .high:
60
 .high:
61
   mov  ecx,PCOLOR
61
   mov  ecx,PCOLOR
62
 .int:
62
 .int:
63
   add  ebx,25 shl 16
63
   add  ebx,25 shl 16
64
   int  0x40
64
   mcall
65
   popa
65
   popa
66
   add  edi,esi
66
   add  edi,esi
67
   add  ebx,9
67
   add  ebx,9
68
   inc  [counter]
68
   inc  [counter]
69
   loop .sh_loop2
69
   loop .sh_loop2
Line 142... Line 142...
142
 
142
 
143
PL_getitemclick:
143
PL_getitemclick:
144
;  out: eax- item # (0..n)
144
;  out: eax- item # (0..n)
145
   mov  ebx,1
145
   mov  ebx,1
146
   mov  eax,37
146
   mov  eax,37
147
   int  0x40
147
   mcall
148
   sub  eax,PLY-1
148
   sub  eax,PLY-1
149
   mov  ebx,9
149
   mov  ebx,9
150
   div  bl
150
   div  bl
151
   movzx eax,al
151
   movzx eax,al
Line 238... Line 238...
238
   mov  ebx,PL_info
238
   mov  ebx,PL_info
239
   mov  dword[ebx+16],playlist
239
   mov  dword[ebx+16],playlist
240
   and  dword[ebx],0
240
   and  dword[ebx],0
241
   mov  dword[ebx+12],20*512
241
   mov  dword[ebx+12],20*512
242
   mov  eax,70
242
   mov  eax,70
243
   int  0x40
243
   mcall
244
   test eax,eax
244
   test eax,eax
245
   jz   .ok1     ; ebx- filesize
245
   jz   .ok1     ; ebx- filesize
246
   cmp  eax,6
246
   cmp  eax,6
247
   jne  .ex
247
   jne  .ex
248
 .ok1:
248
 .ok1:
Line 308... Line 308...
308
   sub  edi,[pl_ptr]
308
   sub  edi,[pl_ptr]
309
   mov  ebx,PL_info
309
   mov  ebx,PL_info
310
   mov  [ebx+12],edi
310
   mov  [ebx+12],edi
311
   mov  byte[ebx],2
311
   mov  byte[ebx],2
312
   mov  eax,70
312
   mov  eax,70
313
   int  0x40
313
   mcall
314
 .ex:
314
 .ex:
315
   ret
315
   ret
Line 316... Line 316...
316
 
316
 
317
PL_swap:  ; swap [ebx] with [ebx+1]
317
PL_swap:  ; swap [ebx] with [ebx+1]