Subversion Repositories Kolibri OS

Rev

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

Rev 134 Rev 485
Line 27... Line 27...
27 
    test [flag],FL_MUTE
 27 
    test [flag],FL_MUTE
28 
    jnz   .nosound
 28 
    jnz   .nosound
29 
    mov  esi,play_area
 29 
    mov  esi,play_area
30 
    mov  eax,55
 30 
    mov  eax,55
31 
    mov  ebx,eax
 31 
    mov  ebx,eax
32 
    int  0x40
 32 
    mcall
33 
  .nosound:
 33 
  .nosound:
34 
  end if
 34 
  end if
35 
    movzx ebx,byte[play_area]
 35 
    movzx ebx,byte[play_area]
36 
    and  ebx,0x7f
 36 
    and  ebx,0x7f
37 
    add  [cur_tick],ebx
 37 
    add  [cur_tick],ebx
38 
    mov  eax,23
 38 
    mov  eax,23
39 
    int  0x40
 39 
    mcall
40 
    cmp  word[edi],0
 40 
    cmp  word[edi],0
41 
    jne  .checkevt
 41 
    jne  .checkevt
42 
    mov  eax,IPC_NEXT
 42 
    mov  eax,IPC_NEXT
43 
    call ipc_send
 43 
    call ipc_send
44 
    jmp  tstill
 44 
    jmp  tstill