Subversion Repositories Kolibri OS

Compare Revisions

Regard whitespace Rev 1369 → Rev 1368

/kernel/trunk/gui/window.inc
246,23 → 246,23
syscall_set_window_shape: ;///// system function 50 ///////////////////////////
;------------------------------------------------------------------------------
;; Set window shape address:
;> ebx = 0
;> ecx = shape data address
;> eax = 0
;> ebx = shape data address
; - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
;; Set window shape scale:
;> ebx = 1
;> ecx = scale power (resulting scale is 2^ebx)
;> eax = 1
;> ebx = scale power (resulting scale is 2^ebx)
;------------------------------------------------------------------------------
mov edi, [current_slot]
 
test ebx, ebx
test eax, eax
jne .shape_scale
mov [edi + APPDATA.wnd_shape], ecx
mov [edi + APPDATA.wnd_shape], ebx
 
.shape_scale:
dec ebx
dec eax
jnz .exit
mov [edi + APPDATA.wnd_shape_scale], ecx
mov [edi + APPDATA.wnd_shape_scale], ebx
 
.exit:
ret