Subversion Repositories Kolibri OS

Rev

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

Rev 227 Rev 233
Line 1728... Line 1728...
1728
 
1728
 
1729
align 4
1729
align 4
1730
mousefn dd msscreen, mswin, msbutton, msset
1730
mousefn dd msscreen, mswin, msbutton, msset
1731
        dd app_load_cursor
1731
        dd app_load_cursor
1732
        dd app_set_cursor
1732
        dd app_set_cursor
Line 1733... Line 1733...
1733
        dd msset    ;app_delete_cursor
1733
        dd app_delete_cursor
Line 1734... Line 1734...
1734
 
1734
 
1735
readmousepos:
1735
readmousepos:
Line 1787... Line 1787...
1787
app_set_cursor:
1787
app_set_cursor:
1788
           stdcall set_cursor, ebx
1788
           stdcall set_cursor, ebx
1789
           mov [esp+36], eax
1789
           mov [esp+36], eax
1790
           ret
1790
           ret
Line -... Line 1791...
-
 
1791
 
-
 
1792
app_delete_cursor:
-
 
1793
           stdcall delete_cursor, ebx
-
 
1794
           mov [esp+36], eax
Line 1791... Line 1795...
1791
 
1795
           ret
Line 1792... Line 1796...
1792
 
1796
 
1793
is_input:
1797
is_input:
1794
 
1798
 
1795
   push edx
1799
   push edx
1796
   mov  dx,word [midisp]
1800
   mov  dx,word [midisp]
1797
   in   al,dx
1801
   in   al,dx
Line 1798... Line -...
1798
   and  al,0x80
-
 
1799
   pop  edx
1802
   and  al,0x80
Line 1800... Line 1803...
1800
   ret
1803
   pop  edx
1801
 
1804
   ret
1802
 
1805