Subversion Repositories Kolibri OS

Rev

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

Rev 3829 Rev 4878
Line 1... Line 1...
1
;*****************************************************************************
1
;*****************************************************************************
-
 
2
;*****************************************************************************
2
; zSea - advanced image viewer for KolibriOS
3
; zSea - advanced image viewer for KolibriOS
3
; Copyright (c) 2008-2013, Marat Zakiyanov aka Mario79, aka Mario
4
; Copyright (c) 2008-2014, Marat Zakiyanov aka Mario79, aka Mario
4
; All rights reserved.
5
; All rights reserved.
5
;
6
;
6
; Redistribution and use in source and binary forms, with or without
7
; Redistribution and use in source and binary forms, with or without
7
; modification, are permitted provided that the following conditions are met:
8
; modification, are permitted provided that the following conditions are met:
8
;	 * Redistributions of source code must retain the above copyright
9
;	 * Redistributions of source code must retain the above copyright
Line 23... Line 24...
23
; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
24
; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
24
; ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
25
; ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
25
; (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
26
; (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
26
; SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
27
; SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
27
;*****************************************************************************
28
;*****************************************************************************
28
;	v.1.0 rñ5 26.03.2013
29
;	v.1.0 rñ5 22.04.2014
29
;******************************************************************************
30
;******************************************************************************
30
	use32
31
	use32
31
	org 0x0
32
	org 0x0
32
	db 'MENUET01'	; 8 byte id
33
	db 'MENUET01'	; 8 byte id
33
	dd 0x01		; header version
34
	dd 0x01		; header version
Line 209... Line 210...
209
;---------------------------------------------------------------------
210
;---------------------------------------------------------------------
210
	cmp	[wnd_width],635
211
	cmp	[wnd_width],635
211
	jae	@f
212
	jae	@f
212
	mov	[wnd_width],635
213
	mov	[wnd_width],635
213
@@:
214
@@:
-
 
215
	mcall 48, 5     ; GetClientTop, fix for case when @patel in the top
-
 
216
    shr ebx, 16
-
 
217
	mov	ecx,ebx
-
 
218
	shl ecx,16
-
 
219
	add ecx,150	   ; [y start] *65536 + [y size]
214
	cmp	[wnd_height],150
220
	cmp	[wnd_height],ecx
215
	jae	@f
221
	jae	@f
216
	mov	[wnd_height],150
222
	mov	[wnd_height],ecx
217
@@:
223
@@:
218
;	call draw_window
224
;	call draw_window
219
red:
225
red:
220
;draw_still:
226
;draw_still:
221
;	pusha
227
;	pusha