Subversion Repositories Kolibri OS

Rev

Go to most recent revision | Blame | Last modification | View Log | Download | RSS feed

  1. format ELF
  2. section '.text' executable
  3. public _msys_make_button
  4. _msys_make_button:
  5. ;arg1 - x
  6. ;arg2 - y
  7. ;arg3 - xsize
  8. ;arg4 - ysize
  9. ;arg5 - id
  10. ;arg6 - color
  11.   push  ebx esi
  12.   mov   ebx,[esp+12]
  13.   shl   ebx,16
  14.   mov   bx,[esp+20]
  15.   mov   ecx,[esp+16]
  16.   shl   ecx,16
  17.   mov   cx,[esp+24]
  18.   mov   edx,[esp+28]
  19.   mov   esi,[esp+32]
  20.   mov   eax,8
  21.   int   0x40
  22.   pop   esi ebx
  23.   ret   24
  24.  
  25. public _msys_get_button_id  
  26. _msys_get_button_id:
  27.   mov   eax,17
  28.   int   0x40
  29.   test  al,al
  30.   jnz   .no_button
  31.   shr   eax,8
  32.   ret
  33. .no_button:
  34.   xor   eax,eax
  35.   dec   eax
  36.   ret