Subversion Repositories Kolibri OS

Rev

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

Rev 431 Rev 465
Line 1... Line 1...
1
$Revision: 431 $
1
$Revision: 465 $
2
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
2
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
3
;;                                                              ;;
3
;;                                                              ;;
4
;; Copyright (C) KolibriOS team 2004-2007. All rights reserved. ;;
4
;; Copyright (C) KolibriOS team 2004-2007. All rights reserved. ;;
5
;; Copyright (C) MenuetOS 2000-2004 Ville Mikael Turjanmaa      ;;
5
;; Copyright (C) MenuetOS 2000-2004 Ville Mikael Turjanmaa      ;;
6
;; Distributed under terms of the GNU General Public License    ;;
6
;; Distributed under terms of the GNU General Public License    ;;
Line 1779... Line 1779...
1779
;  eax = 1    shape area scale
1779
;  eax = 1    shape area scale
1780
;      ebx    2^ebx scale
1780
;      ebx    2^ebx scale
Line 1781... Line 1781...
1781
 
1781
 
1782
     test eax, eax
1782
     test eax, eax
1783
     jne  rsw_no_address
1783
     jne  rsw_no_address
1784
     mov  eax,[CURRENT_TASK]
-
 
1785
     shl  eax,8
-
 
1786
 
1784
     mov  eax,[current_slot]
1787
     mov  [eax+SLOT_BASE+APPDATA.wnd_shape],ebx
1785
     mov  [eax+APPDATA.wnd_shape],ebx
Line 1788... Line 1786...
1788
   rsw_no_address:
1786
rsw_no_address:
1789
 
1787
 
1790
     cmp  eax,1
1788
     cmp  eax,1
1791
     jne  rsw_no_scale
-
 
1792
     mov  eax,[CURRENT_TASK]
1789
     jne  rsw_no_scale
1793
     shl  eax,8
1790
     mov  eax,[current_slot]
Line 1794... Line 1791...
1794
     mov  byte [eax+SLOT_BASE+APPDATA.wnd_shape_scale], bl
1791
     mov  byte [eax+APPDATA.wnd_shape_scale], bl