WebSVN – Kolibri OS – Blame – /kernel/trunk/gui/window.inc

Rev	Author	Line No.	Line
1362	mikedld	1	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
		2	;; ;;
2455	mario79	3	;; Copyright (C) KolibriOS team 2004-2012. All rights reserved. ;;
1362	mikedld	4	;; Copyright (C) MenuetOS 2000-2004 Ville Mikael Turjanmaa ;;
		5	;; Distributed under terms of the GNU General Public License ;;
		6	;; ;;
		7	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
		8
		9	$Revision: 2514 $
		10
		11	;==============================================================================
		12	;///// public functions ///////////////////////////////////////////////////////
		13	;==============================================================================
		14
1391	mikedld	15	window.BORDER_SIZE = 5
		16
		17	macro FuncTable name, table_name, [label]
1362	mikedld	18	{
		19	common
		20	align 4
1391	mikedld	21	\label name#.#table_name dword
1362	mikedld	22	forward
		23	dd name#.#label
		24	common
1391	mikedld	25	name#.sizeof.#table_name = $ - name#.#table_name
1362	mikedld	26	}
		27
		28	uglobal
1391	mikedld	29	common_colours rd 32
		30	draw_limits RECT
1362	mikedld	31	endg
		32
		33	align 4
		34	;------------------------------------------------------------------------------
1391	mikedld	35	syscall_draw_window: ;///// system function 0 /////////////////////////////////
		36	;------------------------------------------------------------------------------
		37	;?
		38	;------------------------------------------------------------------------------
		39	mov eax, edx
		40	shr eax, 24
		41	and al, 0x0f
		42	cmp al, 5
		43	jae .exit
		44
		45	push eax
		46	call window._.sys_set_window
		47	pop eax
		48
		49	or al, al
		50	jnz @f
		51
		52	; type I - original style
		53	call drawwindow_I
		54	jmp window._.draw_window_caption.2
2436	mario79	55	;--------------------------------------
		56	align 4
		57	@@:
2288	clevermous	58	dec al
1391	mikedld	59	jnz @f
		60
		61	; type II - only reserve area, no draw
2436	mario79	62	; call sys_window_mouse
2453	mario79	63	; call [draw_pointer]
		64	call __sys_draw_pointer
1391	mikedld	65	jmp .exit
2436	mario79	66	;--------------------------------------
		67	align 4
		68	@@:
2288	clevermous	69	dec al
1391	mikedld	70	jnz @f
		71
		72	; type III - new style
		73	call drawwindow_III
		74	jmp window._.draw_window_caption.2
		75
		76	; type IV & V - skinned window (resizable & not)
2436	mario79	77	;--------------------------------------
		78	align 4
		79	@@:
2288	clevermous	80	mov eax, [TASK_COUNT]
1391	mikedld	81	movzx eax, word[WIN_POS + eax * 2]
		82	cmp eax, [CURRENT_TASK]
		83	setz al
		84	movzx eax, al
		85	push eax
		86	call drawwindow_IV
		87	jmp window._.draw_window_caption.2
2436	mario79	88	;--------------------------------------
		89	align 4
		90	.exit:
1391	mikedld	91	ret
2436	mario79	92	;------------------------------------------------------------------------------
1391	mikedld	93	align 4
		94	;------------------------------------------------------------------------------
1362	mikedld	95	syscall_display_settings: ;///// system function 48 ///////////////////////////
		96	;------------------------------------------------------------------------------
		97	;; Redraw screen:
		98	;< ebx = 0
		99	; - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
		100	;; Set button style:
		101	;< ebx = 1
		102	;< ecx = 0 (flat) or 1 (with gradient)
		103	; - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
		104	;; Set system color palette:
		105	;< ebx = 2
		106	;< ecx = pointer to color table
		107	;< edx = size of color table
		108	; - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
		109	;; Get system color palette:
		110	;< ebx = 3
		111	;< ecx = pointer to color table buffer
		112	;< edx = size of color table buffer
		113	; - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
		114	;; Get skinned caption height:
		115	;< ebx = 4
		116	;> eax = height in pixels
		117	; - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
		118	;; Get screen working area:
		119	;< ebx = 5
		120	;> eax = pack[16(left), 16(right)]
		121	;> ebx = pack[16(top), 16(bottom)]
		122	; - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
		123	;; Set screen working area:
		124	;< ebx = 6
		125	;< ecx = pack[16(left), 16(right)]
		126	;< edx = pack[16(top), 16(bottom)]
		127	; - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
		128	;; Get skin margins:
		129	;< ebx = 7
		130	;> eax = pack[16(left), 16(right)]
		131	;> ebx = pack[16(top), 16(bottom)]
		132	; - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
		133	;; Set skin:
		134	;< ebx = 8
		135	;< ecx = pointer to FileInfoBlock struct
		136	;> eax = FS error code
		137	;------------------------------------------------------------------------------
		138	cmp ebx, .sizeof.ftable / 4
		139	ja @f
		140	jmp [.ftable + ebx * 4]
2436	mario79	141	;--------------------------------------
		142	align 4
		143	@@:
2288	clevermous	144	ret
2436	mario79	145	;------------------------------------------------------------------------------
1362	mikedld	146	align 4
		147	syscall_display_settings.00:
		148	xor eax, eax
		149	inc ebx
		150	cmp [windowtypechanged], ebx
		151	jne .exit
		152	mov [windowtypechanged], eax
		153
		154	jmp syscall_display_settings._.redraw_whole_screen
2436	mario79	155	;--------------------------------------
		156	align 4
		157	.exit:
1362	mikedld	158	ret
2436	mario79	159	;------------------------------------------------------------------------------
1362	mikedld	160	align 4
		161	syscall_display_settings.01:
		162	and ecx, 1
		163	cmp ecx, [buttontype]
		164	je .exit
		165	mov [buttontype], ecx
		166	mov [windowtypechanged], ebx
2436	mario79	167	;--------------------------------------
		168	align 4
1362	mikedld	169	.exit:
		170	ret
2436	mario79	171	;------------------------------------------------------------------------------
1362	mikedld	172	align 4
		173	syscall_display_settings.02:
		174	dec ebx
		175	mov esi, ecx
		176	and edx, 127
		177	mov edi, common_colours
		178	mov ecx, edx
2288	clevermous	179	rep movsb
1362	mikedld	180	mov [windowtypechanged], ebx
		181	ret
2436	mario79	182	;------------------------------------------------------------------------------
1362	mikedld	183	align 4
		184	syscall_display_settings.03:
		185	mov edi, ecx
		186	and edx, 127
		187	mov esi, common_colours
		188	mov ecx, edx
2288	clevermous	189	rep movsb
1362	mikedld	190	ret
2436	mario79	191	;------------------------------------------------------------------------------
1362	mikedld	192	align 4
		193	syscall_display_settings.04:
		194	mov eax, [_skinh]
		195	mov [esp + 32], eax
		196	ret
2436	mario79	197	;------------------------------------------------------------------------------
1362	mikedld	198	align 4
		199	syscall_display_settings.05:
		200	mov eax, [screen_workarea.left - 2]
		201	mov ax, word[screen_workarea.right]
		202	mov [esp + 32], eax
		203	mov eax, [screen_workarea.top - 2]
		204	mov ax, word[screen_workarea.bottom]
		205	mov [esp + 20], eax
		206	ret
2436	mario79	207	;------------------------------------------------------------------------------
1362	mikedld	208	align 4
		209	syscall_display_settings.06:
		210	xor esi, esi
		211
		212	mov edi, [Screen_Max_X]
		213	mov eax, ecx
		214	movsx ebx, ax
		215	sar eax, 16
		216	cmp eax, ebx
		217	jge .check_horizontal
		218	inc esi
		219	or eax, eax
		220	jge @f
		221	xor eax, eax
2436	mario79	222	;--------------------------------------
		223	align 4
		224	@@:
2288	clevermous	225	mov [screen_workarea.left], eax
1362	mikedld	226	cmp ebx, edi
		227	jle @f
		228	mov ebx, edi
2436	mario79	229	;--------------------------------------
		230	align 4
		231	@@:
2288	clevermous	232	mov [screen_workarea.right], ebx
2436	mario79	233	;--------------------------------------
		234	align 4
		235	.check_horizontal:
1362	mikedld	236	mov edi, [Screen_Max_Y]
		237	mov eax, edx
		238	movsx ebx, ax
		239	sar eax, 16
		240	cmp eax, ebx
		241	jge .check_if_redraw_needed
		242	inc esi
		243	or eax, eax
		244	jge @f
		245	xor eax, eax
2436	mario79	246	;--------------------------------------
		247	align 4
		248	@@:
2288	clevermous	249	mov [screen_workarea.top], eax
1362	mikedld	250	cmp ebx, edi
		251	jle @f
		252	mov ebx, edi
2436	mario79	253	;--------------------------------------
		254	align 4
		255	@@:
2288	clevermous	256	mov [screen_workarea.bottom], ebx
2436	mario79	257	;--------------------------------------
		258	align 4
		259	.check_if_redraw_needed:
1362	mikedld	260	or esi, esi
		261	jz .exit
		262
		263	call repos_windows
		264	jmp syscall_display_settings._.calculate_whole_screen
2436	mario79	265	;--------------------------------------
		266	align 4
		267	.exit:
1362	mikedld	268	ret
2436	mario79	269	;------------------------------------------------------------------------------
1362	mikedld	270	align 4
		271	syscall_display_settings.07:
		272	mov eax, [_skinmargins + 0]
		273	mov [esp + 32], eax
		274	mov eax, [_skinmargins + 4]
		275	mov [esp + 20], eax
		276	ret
2436	mario79	277	;------------------------------------------------------------------------------
1362	mikedld	278	align 4
		279	syscall_display_settings.08:
		280	mov ebx, ecx
		281	call read_skin_file
		282	mov [esp + 32], eax
		283	test eax, eax
		284	jnz .exit
		285
		286	call syscall_display_settings._.calculate_whole_screen
		287	jmp syscall_display_settings._.redraw_whole_screen
2436	mario79	288	;--------------------------------------
		289	align 4
		290	.exit:
1362	mikedld	291	ret
2436	mario79	292	;------------------------------------------------------------------------------
		293	align 4
1362	mikedld	294	syscall_display_settings._.calculate_whole_screen:
		295	xor eax, eax
		296	xor ebx, ebx
		297	mov ecx, [Screen_Max_X]
		298	mov edx, [Screen_Max_Y]
		299	jmp calculatescreen
2436	mario79	300	;------------------------------------------------------------------------------
		301	align 4
1362	mikedld	302	syscall_display_settings._.redraw_whole_screen:
		303	xor eax, eax
		304	mov [draw_limits.left], eax
		305	mov [draw_limits.top], eax
		306	mov eax, [Screen_Max_X]
		307	mov [draw_limits.right], eax
		308	mov eax, [Screen_Max_Y]
		309	mov [draw_limits.bottom], eax
		310	mov eax, window_data
		311	jmp redrawscreen
2436	mario79	312	;------------------------------------------------------------------------------
1362	mikedld	313	align 4
		314	;------------------------------------------------------------------------------
		315	syscall_set_window_shape: ;///// system function 50 ///////////////////////////
		316	;------------------------------------------------------------------------------
		317	;; Set window shape address:
1369	Lrz	318	;> ebx = 0
		319	;> ecx = shape data address
1362	mikedld	320	; - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
		321	;; Set window shape scale:
1369	Lrz	322	;> ebx = 1
		323	;> ecx = scale power (resulting scale is 2^ebx)
1362	mikedld	324	;------------------------------------------------------------------------------
		325	mov edi, [current_slot]
		326
1369	Lrz	327	test ebx, ebx
1362	mikedld	328	jne .shape_scale
1369	Lrz	329	mov [edi + APPDATA.wnd_shape], ecx
2436	mario79	330	;--------------------------------------
		331	align 4
		332	.shape_scale:
1369	Lrz	333	dec ebx
1362	mikedld	334	jnz .exit
1369	Lrz	335	mov [edi + APPDATA.wnd_shape_scale], ecx
2436	mario79	336	;--------------------------------------
		337	align 4
		338	.exit:
1362	mikedld	339	ret
2436	mario79	340	;------------------------------------------------------------------------------
1362	mikedld	341	align 4
		342	;------------------------------------------------------------------------------
1391	mikedld	343	syscall_move_window: ;///// system function 67 ////////////////////////////////
		344	;------------------------------------------------------------------------------
		345	;?
		346	;------------------------------------------------------------------------------
		347	mov edi, [CURRENT_TASK]
		348	shl edi, 5
		349	add edi, window_data
		350
1563	diamond	351	test [edi + WDATA.fl_wdrawn], 1
		352	jz .exit
		353
1391	mikedld	354	test [edi + WDATA.fl_wstate], WSTATE_MAXIMIZED
		355	jnz .exit
		356
		357	cmp ebx, -1
		358	jne @f
		359	mov ebx, [edi + WDATA.box.left]
2436	mario79	360	;--------------------------------------
		361	align 4
		362	@@:
2288	clevermous	363	cmp ecx, -1
1391	mikedld	364	jne @f
		365	mov ecx, [edi + WDATA.box.top]
2436	mario79	366	;--------------------------------------
		367	align 4
		368	@@:
2288	clevermous	369	cmp edx, -1
1391	mikedld	370	jne @f
		371	mov edx, [edi + WDATA.box.width]
2436	mario79	372	;--------------------------------------
		373	align 4
		374	@@:
2288	clevermous	375	cmp esi, -1
1391	mikedld	376	jne @f
		377	mov esi, [edi + WDATA.box.height]
2436	mario79	378	;--------------------------------------
		379	align 4
		380	@@:
2288	clevermous	381	push esi edx ecx ebx
1391	mikedld	382	mov eax, esp
		383	mov bl, [edi + WDATA.fl_wstate]
		384	call window._.set_window_box
2381	hidnplayr	385	add esp, sizeof.BOX
1391	mikedld	386
		387	; NOTE: do we really need this? to be reworked
		388	; mov byte[DONT_DRAW_MOUSE], 0 ; mouse pointer
		389	; mov byte[MOUSE_BACKGROUND], 0 ; no mouse under
		390	; mov byte[MOUSE_DOWN], 0 ; react to mouse up/down
		391
		392	; NOTE: do we really need this? to be reworked
		393	; call [draw_pointer]
2436	mario79	394	;--------------------------------------
		395	align 4
		396	.exit:
1391	mikedld	397	ret
2436	mario79	398	;------------------------------------------------------------------------------
1391	mikedld	399	align 4
		400	;------------------------------------------------------------------------------
		401	syscall_window_settings: ;///// system function 71 /////////////////////////////
		402	;------------------------------------------------------------------------------
		403	;?
		404	;------------------------------------------------------------------------------
		405	dec ebx ; subfunction #1 - set window caption
		406	jnz .exit_fail
		407
		408	; NOTE: only window owner thread can set its caption,
		409	; so there's no parameter for PID/TID
		410
		411	mov edi, [CURRENT_TASK]
		412	shl edi, 5
		413
		414	mov [edi * 8 + SLOT_BASE + APPDATA.wnd_caption], ecx
		415	or [edi + window_data + WDATA.fl_wstyle], WSTYLE_HASCAPTION
		416
		417	call window._.draw_window_caption
		418
		419	xor eax, eax ; eax = 0 (success)
		420	ret
		421
		422	; .get_window_caption:
		423	; dec eax ; subfunction #2 - get window caption
		424	; jnz .exit_fail
		425
		426	; not implemented yet
2436	mario79	427	;--------------------------------------
		428	align 4
		429	.exit_fail:
1391	mikedld	430	xor eax, eax
		431	inc eax ; eax = 1 (fail)
		432	ret
2436	mario79	433	;------------------------------------------------------------------------------
1391	mikedld	434	align 4
		435	;------------------------------------------------------------------------------
1362	mikedld	436	set_window_defaults: ;/////////////////////////////////////////////////////////
		437	;------------------------------------------------------------------------------
		438	;?
		439	;------------------------------------------------------------------------------
1540	diamond	440	mov byte [window_data + 0x20 + WDATA.cl_titlebar + 3], 1 ; desktop is not movable
1362	mikedld	441	push eax ecx
		442	xor eax, eax
		443	mov ecx, WIN_STACK
2436	mario79	444	;--------------------------------------
		445	align 4
		446	@@:
2288	clevermous	447	inc eax
1362	mikedld	448	add ecx, 2
		449	; process no
		450	mov [ecx + 0x000], ax
		451	; positions in stack
		452	mov [ecx + 0x400], ax
		453	cmp ecx, WIN_POS - 2
		454	jne @b
		455	pop ecx eax
		456	ret
2436	mario79	457	;------------------------------------------------------------------------------
1362	mikedld	458	align 4
		459	;------------------------------------------------------------------------------
		460	calculatescreen: ;/////////////////////////////////////////////////////////////
		461	;------------------------------------------------------------------------------
		462	;? Scan all windows from bottom to top, calling `setscreen` for each one
		463	;? intersecting given screen area
		464	;------------------------------------------------------------------------------
		465	;> eax = left
		466	;> ebx = top
		467	;> ecx = right
		468	;> edx = bottom
		469	;------------------------------------------------------------------------------
		470	push esi
		471	pushfd
		472	cli
		473
		474	mov esi, 1
		475	call window._.set_screen
		476
		477	push ebp
		478
		479	mov ebp, [TASK_COUNT]
		480	cmp ebp, 1
		481	jbe .exit
		482
		483	push edx ecx ebx eax
2436	mario79	484	;--------------------------------------
		485	align 4
		486	.next_window:
1362	mikedld	487	movzx edi, word[WIN_POS + esi * 2]
		488	shl edi, 5
		489
		490	cmp [CURRENT_TASK + edi + TASKDATA.state], TSTATE_FREE
		491	je .skip_window
		492
		493	add edi, window_data
		494	test [edi + WDATA.fl_wstate], WSTATE_MINIMIZED
		495	jnz .skip_window
		496
		497	mov eax, [edi + WDATA.box.left]
		498	cmp eax, [esp + RECT.right]
1368	mikedld	499	jg .skip_window
1362	mikedld	500	mov ebx, [edi + WDATA.box.top]
		501	cmp ebx, [esp + RECT.bottom]
1368	mikedld	502	jg .skip_window
1362	mikedld	503	mov ecx, [edi + WDATA.box.width]
		504	add ecx, eax
		505	cmp ecx, [esp + RECT.left]
1368	mikedld	506	jl .skip_window
1362	mikedld	507	mov edx, [edi + WDATA.box.height]
		508	add edx, ebx
		509	cmp edx, [esp + RECT.top]
1368	mikedld	510	jl .skip_window
1362	mikedld	511
		512	cmp eax, [esp + RECT.left]
		513	jae @f
		514	mov eax, [esp + RECT.left]
2436	mario79	515	;--------------------------------------
		516	align 4
		517	@@:
2288	clevermous	518	cmp ebx, [esp + RECT.top]
1362	mikedld	519	jae @f
		520	mov ebx, [esp + RECT.top]
2436	mario79	521	;--------------------------------------
		522	align 4
		523	@@:
2288	clevermous	524	cmp ecx, [esp + RECT.right]
1362	mikedld	525	jbe @f
		526	mov ecx, [esp + RECT.right]
2436	mario79	527	;--------------------------------------
		528	align 4
		529	@@:
2288	clevermous	530	cmp edx, [esp + RECT.bottom]
1362	mikedld	531	jbe @f
		532	mov edx, [esp + RECT.bottom]
2436	mario79	533	;--------------------------------------
		534	align 4
		535	@@:
2288	clevermous	536	push esi
1362	mikedld	537	movzx esi, word[WIN_POS + esi * 2]
		538	call window._.set_screen
		539	pop esi
2436	mario79	540	;--------------------------------------
		541	align 4
		542	.skip_window:
1362	mikedld	543	inc esi
		544	dec ebp
		545	jnz .next_window
		546
		547	pop eax ebx ecx edx
2436	mario79	548	;--------------------------------------
		549	align 4
		550	.exit:
1362	mikedld	551	pop ebp
2443	Serge	552	inc [_display.mask_seqno]
1362	mikedld	553	popfd
		554	pop esi
		555	ret
2436	mario79	556	;------------------------------------------------------------------------------
1362	mikedld	557	align 4
		558	;------------------------------------------------------------------------------
		559	repos_windows: ;///////////////////////////////////////////////////////////////
		560	;------------------------------------------------------------------------------
		561	;?
		562	;------------------------------------------------------------------------------
		563	mov ecx, [TASK_COUNT]
2381	hidnplayr	564	mov edi, window_data + sizeof.WDATA * 2
1362	mikedld	565	call force_redraw_background
		566	dec ecx
		567	jle .exit
2436	mario79	568	;--------------------------------------
		569	align 4
		570	.next_window:
1362	mikedld	571	mov [edi + WDATA.fl_redraw], 1
		572	test [edi + WDATA.fl_wstate], WSTATE_MAXIMIZED
		573	jnz .fix_maximized
		574
		575	mov eax, [edi + WDATA.box.left]
		576	add eax, [edi + WDATA.box.width]
		577	mov ebx, [Screen_Max_X]
		578	cmp eax, ebx
		579	jle .fix_vertical
		580	mov eax, [edi + WDATA.box.width]
		581	sub eax, ebx
		582	jle @f
		583	mov [edi + WDATA.box.width], ebx
2436	mario79	584	;--------------------------------------
		585	align 4
		586	@@:
2288	clevermous	587	sub ebx, [edi + WDATA.box.width]
1362	mikedld	588	mov [edi + WDATA.box.left], ebx
2436	mario79	589	;--------------------------------------
		590	align 4
		591	.fix_vertical:
1362	mikedld	592	mov eax, [edi + WDATA.box.top]
		593	add eax, [edi + WDATA.box.height]
		594	mov ebx, [Screen_Max_Y]
		595	cmp eax, ebx
		596	jle .fix_client_box
		597	mov eax, [edi + WDATA.box.height]
		598	sub eax, ebx
		599	jle @f
		600	mov [edi + WDATA.box.height], ebx
2436	mario79	601	;--------------------------------------
		602	align 4
		603	@@:
2288	clevermous	604	sub ebx, [edi + WDATA.box.height]
1362	mikedld	605	mov [edi + WDATA.box.top], ebx
2436	mario79	606	;--------------------------------------
		607	align 4
		608	.fix_client_box:
		609	call window._.set_window_clientbox
		610	add edi, sizeof.WDATA
		611	loop .next_window
		612	;--------------------------------------
		613	align 4
		614	.exit:
		615	ret
		616	;--------------------------------------
		617	align 4
		618	.fix_maximized:
1362	mikedld	619	mov eax, [screen_workarea.left]
		620	mov [edi + WDATA.box.left], eax
		621	sub eax, [screen_workarea.right]
		622	neg eax
		623	mov [edi + WDATA.box.width], eax
		624	mov eax, [screen_workarea.top]
		625	mov [edi + WDATA.box.top], eax
		626	test [edi + WDATA.fl_wstate], WSTATE_ROLLEDUP
		627	jnz .fix_client_box
		628	sub eax, [screen_workarea.bottom]
		629	neg eax
		630	mov [edi + WDATA.box.height], eax
2436	mario79	631	jmp .fix_client_box
1362	mikedld	632	;------------------------------------------------------------------------------
2436	mario79	633	;align 4
1362	mikedld	634	;------------------------------------------------------------------------------
2436	mario79	635	;sys_window_mouse: ;////////////////////////////////////////////////////////////
		636	;------------------------------------------------------------------------------
1362	mikedld	637	;?
		638	;------------------------------------------------------------------------------
1391	mikedld	639	; NOTE: commented out since doesn't provide necessary functionality
		640	; anyway, to be reworked
		641	; push eax
		642	;
		643	; mov eax, [timer_ticks]
		644	; cmp [new_window_starting], eax
		645	; jb .exit
		646	;
		647	; mov byte[MOUSE_BACKGROUND], 0
		648	; mov byte[DONT_DRAW_MOUSE], 0
		649	;
		650	; mov [new_window_starting], eax
		651	;
		652	; .exit:
		653	; pop eax
2436	mario79	654	; ret
		655	;------------------------------------------------------------------------------
1362	mikedld	656	align 4
		657	;------------------------------------------------------------------------------
		658	draw_rectangle: ;//////////////////////////////////////////////////////////////
		659	;------------------------------------------------------------------------------
		660	;> eax = pack[16(left), 16(right)]
		661	;> ebx = pack[16(top), 16(bottom)]
		662	;> esi = color
2423	mario79	663	; ?? RR GG BB ; 0x01000000 negation
		664	; ; 0x02000000 used for draw_rectangle without top line
		665	; ; for example drawwindow_III and drawwindow_IV
1362	mikedld	666	;------------------------------------------------------------------------------
		667	push eax ebx ecx edi
		668
		669	xor edi, edi
2436	mario79	670	;--------------------------------------
		671	align 4
		672	.flags_set:
1362	mikedld	673	push ebx
		674
		675	; set line color
		676	mov ecx, esi
		677	; draw top border
		678	rol ebx, 16
		679	push ebx
		680	rol ebx, 16
		681	pop bx
2423	mario79	682	test ecx, 1 shl 25
		683	jnz @f
		684	sub ecx, 1 shl 25
2453	mario79	685	; call [draw_line]
		686	call __sys_draw_line
2436	mario79	687	;--------------------------------------
		688	align 4
2423	mario79	689	@@:
1362	mikedld	690	; draw bottom border
		691	mov ebx, [esp - 2]
		692	pop bx
2453	mario79	693	; call [draw_line]
		694	call __sys_draw_line
1362	mikedld	695
		696	pop ebx
		697	add ebx, 1 * 65536 - 1
		698
		699	; draw left border
		700	rol eax, 16
		701	push eax
		702	rol eax, 16
		703	pop ax
2453	mario79	704	; call [draw_line]
		705	call __sys_draw_line
1362	mikedld	706
		707	; draw right border
		708	mov eax, [esp - 2]
		709	pop ax
2453	mario79	710	; call [draw_line]
		711	call __sys_draw_line
1362	mikedld	712
		713	pop edi ecx ebx eax
		714	ret
2436	mario79	715	;--------------------------------------
		716	align 4
		717	.forced:
1362	mikedld	718	push eax ebx ecx edi
		719	xor edi, edi
		720	inc edi
		721	jmp .flags_set
2436	mario79	722	;------------------------------------------------------------------------------
1362	mikedld	723	align 4
		724	;------------------------------------------------------------------------------
		725	drawwindow_I_caption: ;////////////////////////////////////////////////////////
		726	;------------------------------------------------------------------------------
		727	;?
		728	;------------------------------------------------------------------------------
		729	push [edx + WDATA.cl_titlebar]
		730	mov esi, edx
		731
		732	mov edx, [esi + WDATA.box.top]
		733	mov eax, edx
		734	lea ebx, [edx + 21]
		735	inc edx
		736	add eax, [esi + WDATA.box.height]
		737
		738	cmp ebx, eax
		739	jbe @f
		740	mov ebx, eax
2436	mario79	741	;--------------------------------------
		742	align 4
		743	@@:
2288	clevermous	744	push ebx
1362	mikedld	745
		746	xor edi, edi
2436	mario79	747	;--------------------------------------
		748	align 4
		749	.next_line:
1362	mikedld	750	mov ebx, edx
		751	shl ebx, 16
		752	add ebx, edx
		753	mov eax, [esi + WDATA.box.left]
		754	inc eax
		755	shl eax, 16
		756	add eax, [esi + WDATA.box.left]
		757	add eax, [esi + WDATA.box.width]
		758	dec eax
		759	mov ecx, [esi + WDATA.cl_titlebar]
		760	test ecx, 0x80000000
		761	jz @f
		762	sub ecx, 0x00040404
		763	mov [esi + WDATA.cl_titlebar], ecx
2436	mario79	764	;--------------------------------------
		765	align 4
		766	@@:
2288	clevermous	767	and ecx, 0x00ffffff
2453	mario79	768	; call [draw_line]
		769	call __sys_draw_line
1362	mikedld	770	inc edx
		771	cmp edx, [esp]
		772	jb .next_line
		773
		774	add esp, 4
		775	pop [esi + WDATA.cl_titlebar]
		776	ret
2436	mario79	777	;------------------------------------------------------------------------------
1362	mikedld	778	align 4
		779	;------------------------------------------------------------------------------
		780	drawwindow_I: ;////////////////////////////////////////////////////////////////
		781	;------------------------------------------------------------------------------
		782	;?
		783	;------------------------------------------------------------------------------
		784	pushad
		785
		786	; window border
		787
		788	mov eax, [edx + WDATA.box.left - 2]
		789	mov ax, word[edx + WDATA.box.left]
		790	add ax, word[edx + WDATA.box.width]
		791	mov ebx, [edx + WDATA.box.top - 2]
		792	mov bx, word[edx + WDATA.box.top]
		793	add bx, word[edx + WDATA.box.height]
		794
		795	mov esi, [edx + WDATA.cl_frames]
		796	call draw_rectangle
		797
		798	; window caption
		799
		800	call drawwindow_I_caption
		801
		802	; window client area
		803
		804	; do we need to draw it?
		805	mov edi, [esi + WDATA.cl_workarea]
		806	test edi, 0x40000000
		807	jnz .exit
		808
		809	; does client area have a positive size on screen?
		810	mov edx, [esi + WDATA.box.top]
		811	add edx, 21 + 5
		812	mov ebx, [esi + WDATA.box.top]
		813	add ebx, [esi + WDATA.box.height]
		814	cmp edx, ebx
		815	jg .exit
		816
		817	; okay, let's draw it
		818	mov eax, 1
		819	mov ebx, 21
		820	mov ecx, [esi + WDATA.box.width]
		821	mov edx, [esi + WDATA.box.height]
2453	mario79	822	; call [drawbar]
		823	call vesa20_drawbar
2436	mario79	824	;--------------------------------------
		825	align 4
		826	.exit:
1362	mikedld	827	popad
		828	ret
2436	mario79	829	;------------------------------------------------------------------------------
1362	mikedld	830	align 4
		831	;------------------------------------------------------------------------------
		832	drawwindow_III_caption: ;/////////////////////////////////////////////////////
		833	;------------------------------------------------------------------------------
		834	;?
		835	;------------------------------------------------------------------------------
		836	mov ecx, [edx + WDATA.cl_titlebar]
		837	push ecx
		838	mov esi, edx
		839	mov edx, [esi + WDATA.box.top]
		840	add edx, 4
		841	mov ebx, [esi + WDATA.box.top]
		842	add ebx, 20
		843	mov eax, [esi + WDATA.box.top]
		844	add eax, [esi + WDATA.box.height]
		845
		846	cmp ebx, eax
		847	jb @f
		848	mov ebx, eax
2436	mario79	849	;--------------------------------------
		850	align 4
		851	@@:
2288	clevermous	852	push ebx
1362	mikedld	853
		854	xor edi, edi
2436	mario79	855	;--------------------------------------
		856	align 4
		857	.next_line:
1362	mikedld	858	mov ebx, edx
		859	shl ebx, 16
		860	add ebx, edx
		861	mov eax, [esi + WDATA.box.left]
		862	shl eax, 16
		863	add eax, [esi + WDATA.box.left]
		864	add eax, [esi + WDATA.box.width]
		865	add eax, 4 * 65536 - 4
		866	mov ecx, [esi + WDATA.cl_titlebar]
		867	test ecx, 0x40000000
		868	jz @f
		869	add ecx, 0x00040404
2436	mario79	870	;--------------------------------------
		871	align 4
		872	@@:
2288	clevermous	873	test ecx, 0x80000000
1362	mikedld	874	jz @f
		875	sub ecx, 0x00040404
2436	mario79	876	;--------------------------------------
		877	align 4
		878	@@:
2288	clevermous	879	mov [esi + WDATA.cl_titlebar], ecx
1362	mikedld	880	and ecx, 0x00ffffff
2453	mario79	881	; call [draw_line]
		882	call __sys_draw_line
1362	mikedld	883	inc edx
		884	cmp edx, [esp]
		885	jb .next_line
		886
		887	add esp, 4
		888	pop [esi + WDATA.cl_titlebar]
		889	ret
2436	mario79	890	;------------------------------------------------------------------------------
1362	mikedld	891	align 4
		892	;------------------------------------------------------------------------------
		893	drawwindow_III: ;//////////////////////////////////////////////////////////////
		894	;------------------------------------------------------------------------------
		895	;?
		896	;------------------------------------------------------------------------------
		897	pushad
		898
		899	; window border
		900
		901	mov eax, [edx + WDATA.box.left - 2]
		902	mov ax, word[edx + WDATA.box.left]
		903	add ax, word[edx + WDATA.box.width]
		904	mov ebx, [edx + WDATA.box.top - 2]
		905	mov bx, word[edx + WDATA.box.top]
		906	add bx, word[edx + WDATA.box.height]
		907
		908	mov esi, [edx + WDATA.cl_frames]
		909	shr esi, 1
		910	and esi, 0x007f7f7f
		911	call draw_rectangle
		912
		913	push esi
		914	mov ecx, 3
		915	mov esi, [edx + WDATA.cl_frames]
2436	mario79	916	;--------------------------------------
		917	align 4
		918	.next_frame:
1362	mikedld	919	add eax, 1 * 65536 - 1
2458	mario79	920	add ebx, 1 * 65536 - 1
1362	mikedld	921	call draw_rectangle
		922	dec ecx
		923	jnz .next_frame
		924
		925	pop esi
		926	add eax, 1 * 65536 - 1
2458	mario79	927	add ebx, 1 * 65536 - 1
1362	mikedld	928	call draw_rectangle
		929
		930	; window caption
		931
		932	call drawwindow_III_caption
		933
		934	; window client area
		935
		936	; do we need to draw it?
		937	mov edi, [esi + WDATA.cl_workarea]
		938	test edi, 0x40000000
		939	jnz .exit
		940
		941	; does client area have a positive size on screen?
		942	mov edx, [esi + WDATA.box.top]
		943	add edx, 21 + 5
		944	mov ebx, [esi + WDATA.box.top]
		945	add ebx, [esi + WDATA.box.height]
		946	cmp edx, ebx
		947	jg .exit
		948
		949	; okay, let's draw it
		950	mov eax, 5
		951	mov ebx, 20
		952	mov ecx, [esi + WDATA.box.width]
		953	mov edx, [esi + WDATA.box.height]
		954	sub ecx, 4
		955	sub edx, 4
2453	mario79	956	; call [drawbar]
		957	call vesa20_drawbar
2436	mario79	958	;--------------------------------------
		959	align 4
		960	.exit:
1362	mikedld	961	popad
		962	ret
2436	mario79	963	;------------------------------------------------------------------------------
1362	mikedld	964	align 4
		965	;------------------------------------------------------------------------------
		966	waredraw: ;////////////////////////////////////////////////////////////////////
		967	;------------------------------------------------------------------------------
		968	;? Activate window, redrawing if necessary
		969	;------------------------------------------------------------------------------
1465	mario79	970	push -1
1391	mikedld	971	mov eax, [TASK_COUNT]
		972	lea eax, [WIN_POS + eax * 2]
		973	cmp eax, esi
1465	mario79	974	pop eax
1391	mikedld	975	je .exit
		976
1362	mikedld	977	; is it overlapped by another window now?
		978	push ecx
		979	call window._.check_window_draw
		980	test ecx, ecx
		981	pop ecx
		982	jz .do_not_draw
		983
		984	; yes it is, activate and update screen buffer
		985	mov byte[MOUSE_DOWN], 1
		986	call window._.window_activate
		987
		988	pushad
		989	mov edi, [TASK_COUNT]
		990	movzx esi, word[WIN_POS + edi * 2]
		991	shl esi, 5
		992	add esi, window_data
		993
		994	mov eax, [esi + WDATA.box.left]
		995	mov ebx, [esi + WDATA.box.top]
		996	mov ecx, [esi + WDATA.box.width]
		997	mov edx, [esi + WDATA.box.height]
		998
		999	add ecx, eax
		1000	add edx, ebx
		1001
		1002	mov edi, [TASK_COUNT]
		1003	movzx esi, word[WIN_POS + edi * 2]
		1004	call window._.set_screen
2443	Serge	1005	inc [_display.mask_seqno]
1362	mikedld	1006	popad
		1007
		1008	; tell application to redraw itself
		1009	mov [edi + WDATA.fl_redraw], 1
1391	mikedld	1010	xor eax, eax
		1011	jmp .exit
2436	mario79	1012	;--------------------------------------
		1013	align 4
		1014	.do_not_draw:
1362	mikedld	1015	; no it's not, just activate the window
		1016	call window._.window_activate
1391	mikedld	1017	xor eax, eax
1460	Lrz	1018	mov byte[MOUSE_BACKGROUND], al
		1019	mov byte[DONT_DRAW_MOUSE], al
2436	mario79	1020	;--------------------------------------
		1021	align 4
		1022	.exit:
1391	mikedld	1023	mov byte[MOUSE_DOWN], 0
		1024	inc eax
1362	mikedld	1025	ret
2436	mario79	1026	;------------------------------------------------------------------------------
1362	mikedld	1027	align 4
		1028	;------------------------------------------------------------------------------
		1029	minimize_window: ;/////////////////////////////////////////////////////////////
		1030	;------------------------------------------------------------------------------
		1031	;> eax = window number on screen
		1032	;------------------------------------------------------------------------------
		1033	;# corrupts [dl*]
		1034	;------------------------------------------------------------------------------
		1035	push edi
		1036	pushfd
		1037	cli
		1038
		1039	; is it already minimized?
		1040	movzx edi, word[WIN_POS + eax * 2]
		1041	shl edi, 5
		1042	add edi, window_data
		1043	test [edi + WDATA.fl_wstate], WSTATE_MINIMIZED
		1044	jnz .exit
		1045
		1046	push eax ebx ecx edx esi
		1047
		1048	; no it's not, let's do that
		1049	or [edi + WDATA.fl_wstate], WSTATE_MINIMIZED
		1050	mov eax, [edi + WDATA.box.left]
		1051	mov [draw_limits.left], eax
		1052	mov ecx, eax
		1053	add ecx, [edi + WDATA.box.width]
		1054	mov [draw_limits.right], ecx
		1055	mov ebx, [edi + WDATA.box.top]
		1056	mov [draw_limits.top], ebx
		1057	mov edx, ebx
		1058	add edx, [edi + WDATA.box.height]
		1059	mov [draw_limits.bottom], edx
		1060	call calculatescreen
		1061	xor esi, esi
		1062	xor eax, eax
		1063	call redrawscreen
		1064
		1065	pop esi edx ecx ebx eax
2436	mario79	1066	;--------------------------------------
		1067	align 4
		1068	.exit:
1362	mikedld	1069	popfd
		1070	pop edi
		1071	ret
2436	mario79	1072	;------------------------------------------------------------------------------
1362	mikedld	1073	align 4
		1074	;------------------------------------------------------------------------------
		1075	restore_minimized_window: ;////////////////////////////////////////////////////
		1076	;------------------------------------------------------------------------------
		1077	;> eax = window number on screen
		1078	;------------------------------------------------------------------------------
		1079	;# corrupts [dl*]
		1080	;------------------------------------------------------------------------------
		1081	pushad
		1082	pushfd
		1083	cli
		1084
		1085	; is it already restored?
		1086	movzx esi, word[WIN_POS + eax * 2]
		1087	mov edi, esi
		1088	shl edi, 5
		1089	add edi, window_data
		1090	test [edi + WDATA.fl_wstate], WSTATE_MINIMIZED
		1091	jz .exit
		1092
		1093	; no it's not, let's do that
		1094	mov [edi + WDATA.fl_redraw], 1
		1095	and [edi + WDATA.fl_wstate], not WSTATE_MINIMIZED
		1096	mov ebp, window._.set_screen
		1097	cmp eax, [TASK_COUNT]
		1098	jz @f
		1099	mov ebp, calculatescreen
2436	mario79	1100	;--------------------------------------
		1101	align 4
		1102	@@:
2288	clevermous	1103	mov eax, [edi + WDATA.box.left]
1362	mikedld	1104	mov ebx, [edi + WDATA.box.top]
		1105	mov ecx, [edi + WDATA.box.width]
		1106	mov edx, [edi + WDATA.box.height]
		1107	add ecx, eax
		1108	add edx, ebx
		1109	call ebp
2443	Serge	1110	inc [_display.mask_seqno]
1362	mikedld	1111	mov byte[MOUSE_BACKGROUND], 0
2436	mario79	1112	;--------------------------------------
		1113	align 4
		1114	.exit:
1362	mikedld	1115	popfd
		1116	popad
		1117	ret
2436	mario79	1118	;------------------------------------------------------------------------------
1362	mikedld	1119	align 4
1391	mikedld	1120	; TODO: remove this proc
1362	mikedld	1121	;------------------------------------------------------------------------------
1391	mikedld	1122	window_check_events: ;/////////////////////////////////////////////////////////
1362	mikedld	1123	;------------------------------------------------------------------------------
1391	mikedld	1124	;?
1362	mikedld	1125	;------------------------------------------------------------------------------
		1126	; do we have window minimize/restore request?
		1127	cmp [window_minimize], 0
1391	mikedld	1128	je .exit
1362	mikedld	1129
		1130	; okay, minimize or restore top-most window and exit
		1131	mov eax, [TASK_COUNT]
		1132	mov bl, 0
		1133	xchg [window_minimize], bl
		1134	dec bl
		1135	jnz @f
		1136	call minimize_window
1391	mikedld	1137	jmp .exit
2436	mario79	1138	;--------------------------------------
		1139	align 4
		1140	@@:
2288	clevermous	1141	call restore_minimized_window
2436	mario79	1142	;--------------------------------------
		1143	align 4
		1144	.exit:
1391	mikedld	1145	ret
2436	mario79	1146	;------------------------------------------------------------------------------
1391	mikedld	1147	align 4
		1148	;------------------------------------------------------------------------------
		1149	sys_window_maximize_handler: ;/////////////////////////////////////////////////
		1150	;------------------------------------------------------------------------------
		1151	;?
		1152	;------------------------------------------------------------------------------
		1153	;> esi = process slot
		1154	;------------------------------------------------------------------------------
		1155	mov edi, esi
		1156	shl edi, 5
		1157	add edi, window_data
1362	mikedld	1158
1391	mikedld	1159	; can window change its height?
1526	diamond	1160	; only types 2 and 3 can be resized
1391	mikedld	1161	mov dl, [edi + WDATA.fl_wstyle]
1526	diamond	1162	test dl, 2
		1163	jz .exit
1362	mikedld	1164
1391	mikedld	1165	; toggle normal/maximized window state
		1166	mov bl, [edi + WDATA.fl_wstate]
		1167	xor bl, WSTATE_MAXIMIZED
1362	mikedld	1168
1391	mikedld	1169	; calculate and set appropriate window bounds
		1170	test bl, WSTATE_MAXIMIZED
		1171	jz .restore_size
1362	mikedld	1172
1391	mikedld	1173	mov eax, [screen_workarea.left]
		1174	mov ecx, [screen_workarea.top]
		1175	push [screen_workarea.bottom] \
		1176	[screen_workarea.right] \
		1177	ecx \
		1178	eax
		1179	sub [esp + BOX.width], eax
		1180	sub [esp + BOX.height], ecx
		1181	mov eax, esp
		1182	jmp .set_box
2436	mario79	1183	;--------------------------------------
		1184	align 4
		1185	.restore_size:
1391	mikedld	1186	mov eax, esi
		1187	shl eax, 8
		1188	add eax, SLOT_BASE + APPDATA.saved_box
		1189	push [eax + BOX.height] \
		1190	[eax + BOX.width] \
		1191	[eax + BOX.top] \
		1192	[eax + BOX.left]
		1193	mov eax, esp
2436	mario79	1194	;--------------------------------------
		1195	align 4
		1196	.set_box:
1391	mikedld	1197	test bl, WSTATE_ROLLEDUP
		1198	jz @f
1362	mikedld	1199
1391	mikedld	1200	xchg eax, ecx
		1201	call window._.get_rolledup_height
		1202	mov [ecx + BOX.height], eax
		1203	xchg eax, ecx
2436	mario79	1204	;--------------------------------------
		1205	align 4
		1206	@@:
2288	clevermous	1207	call window._.set_window_box
2381	hidnplayr	1208	add esp, sizeof.BOX
2436	mario79	1209	;--------------------------------------
		1210	align 4
		1211	.exit:
2443	Serge	1212	inc [_display.mask_seqno]
1391	mikedld	1213	ret
2436	mario79	1214	;------------------------------------------------------------------------------
1391	mikedld	1215	align 4
		1216	;------------------------------------------------------------------------------
		1217	sys_window_rollup_handler: ;///////////////////////////////////////////////////
		1218	;------------------------------------------------------------------------------
		1219	;?
		1220	;------------------------------------------------------------------------------
		1221	;> esi = process slot
		1222	;------------------------------------------------------------------------------
		1223	mov edx, esi
		1224	shl edx, 8
		1225	add edx, SLOT_BASE
1362	mikedld	1226
1391	mikedld	1227	; toggle normal/rolled up window state
		1228	mov bl, [edi + WDATA.fl_wstate]
		1229	xor bl, WSTATE_ROLLEDUP
1362	mikedld	1230
1391	mikedld	1231	; calculate and set appropriate window bounds
		1232	test bl, WSTATE_ROLLEDUP
		1233	jz .restore_size
1362	mikedld	1234
1391	mikedld	1235	call window._.get_rolledup_height
		1236	push eax \
		1237	[edi + WDATA.box.width] \
		1238	[edi + WDATA.box.top] \
		1239	[edi + WDATA.box.left]
		1240	mov eax, esp
		1241	jmp .set_box
2436	mario79	1242	;--------------------------------------
		1243	align 4
		1244	.restore_size:
1391	mikedld	1245	test bl, WSTATE_MAXIMIZED
		1246	jnz @f
2381	hidnplayr	1247	add esp, -sizeof.BOX
1391	mikedld	1248	lea eax, [edx + APPDATA.saved_box]
		1249	jmp .set_box
2436	mario79	1250	;--------------------------------------
		1251	align 4
		1252	@@:
2288	clevermous	1253	mov eax, [screen_workarea.top]
1391	mikedld	1254	push [screen_workarea.bottom] \
		1255	[edi + WDATA.box.width] \
		1256	eax \
		1257	[edi + WDATA.box.left]
		1258	sub [esp + BOX.height], eax
		1259	mov eax, esp
2436	mario79	1260	;--------------------------------------
		1261	align 4
		1262	.set_box:
1391	mikedld	1263	call window._.set_window_box
2381	hidnplayr	1264	add esp, sizeof.BOX
1391	mikedld	1265	ret
2436	mario79	1266	;------------------------------------------------------------------------------
1391	mikedld	1267	align 4
		1268	;------------------------------------------------------------------------------
		1269	sys_window_start_moving_handler: ;/////////////////////////////////////////////
		1270	;------------------------------------------------------------------------------
		1271	;?
		1272	;------------------------------------------------------------------------------
		1273	;> eax = old (original) window box
		1274	;> esi = process slot
		1275	;------------------------------------------------------------------------------
		1276	mov edi, eax
		1277	call window._.draw_negative_box
		1278	ret
2436	mario79	1279	;------------------------------------------------------------------------------
1391	mikedld	1280	align 4
		1281	;------------------------------------------------------------------------------
		1282	sys_window_end_moving_handler: ;///////////////////////////////////////////////
		1283	;------------------------------------------------------------------------------
		1284	;?
		1285	;------------------------------------------------------------------------------
		1286	;> eax = old (original) window box
		1287	;> ebx = new (final) window box
		1288	;> esi = process slot
		1289	;------------------------------------------------------------------------------
		1290	mov edi, ebx
2233	mario79	1291	call window._.end_moving__box
1362	mikedld	1292
1391	mikedld	1293	mov edi, esi
		1294	shl edi, 5
		1295	add edi, window_data
1362	mikedld	1296
1391	mikedld	1297	mov eax, ebx
		1298	mov bl, [edi + WDATA.fl_wstate]
		1299	call window._.set_window_box
		1300	ret
2436	mario79	1301	;------------------------------------------------------------------------------
1391	mikedld	1302	align 4
		1303	;------------------------------------------------------------------------------
		1304	sys_window_moving_handler: ;///////////////////////////////////////////////////
		1305	;------------------------------------------------------------------------------
		1306	;?
		1307	;------------------------------------------------------------------------------
		1308	;> eax = old (from previous call) window box
		1309	;> ebx = new (current) window box
		1310	;> esi = process_slot
		1311	;------------------------------------------------------------------------------
		1312	mov edi, eax
		1313	call window._.draw_negative_box
		1314	mov edi, ebx
		1315	call window._.draw_negative_box
		1316	ret
		1317	;==============================================================================
		1318	;///// private functions //////////////////////////////////////////////////////
		1319	;==============================================================================
1362	mikedld	1320
1391	mikedld	1321	iglobal
		1322	FuncTable syscall_display_settings, ftable, \
		1323	00, 01, 02, 03, 04, 05, 06, 07, 08
1362	mikedld	1324
1391	mikedld	1325	align 4
		1326	window_topleft dd \
		1327	1, 21, \ ;type 0
		1328	0, 0, \ ;type 1
		1329	5, 20, \ ;type 2
		1330	5, ?, \ ;type 3 {set by skin}
		1331	5, ? ;type 4 {set by skin}
		1332	endg
1362	mikedld	1333
1391	mikedld	1334	;uglobal
		1335	; NOTE: commented out since doesn't provide necessary functionality anyway,
		1336	; to be reworked
		1337	; new_window_starting dd ?
		1338	;endg
2436	mario79	1339	;------------------------------------------------------------------------------
1391	mikedld	1340	align 4
		1341	;------------------------------------------------------------------------------
		1342	window._.invalidate_screen: ;//////////////////////////////////////////////////
		1343	;------------------------------------------------------------------------------
		1344	;?
		1345	;------------------------------------------------------------------------------
		1346	;> eax = old (original) window box
		1347	;> ebx = new (final) window box
		1348	;> edi = pointer to WDATA struct
		1349	;------------------------------------------------------------------------------
1362	mikedld	1350	push eax ebx
		1351
1391	mikedld	1352	; TODO: do we really need `draw_limits`?
1550	diamond	1353	; Yes, they are used by background drawing code.
2514	mario79	1354
		1355	; we need only to restore the background windows at the old place!
		1356	mov ecx, [ebx + BOX.left]
2288	clevermous	1357	mov [draw_limits.left], ecx
2514	mario79	1358	add ecx, [ebx + BOX.width]
2288	clevermous	1359	mov [draw_limits.right], ecx
2514	mario79	1360	mov ecx, [ebx + BOX.top]
2288	clevermous	1361	mov [draw_limits.top], ecx
2514	mario79	1362	add ecx, [ebx + BOX.height]
2288	clevermous	1363	mov [draw_limits.bottom], ecx
2514	mario79	1364	; recalculate screen buffer at old position
1391	mikedld	1365	push ebx
		1366	mov edx, [eax + BOX.height]
		1367	mov ecx, [eax + BOX.width]
		1368	mov ebx, [eax + BOX.top]
		1369	mov eax, [eax + BOX.left]
		1370	add ecx, eax
		1371	add edx, ebx
		1372	call calculatescreen
		1373	pop eax
2514	mario79	1374	; recalculate screen buffer at new position
1391	mikedld	1375	mov edx, [eax + BOX.height]
		1376	mov ecx, [eax + BOX.width]
		1377	mov ebx, [eax + BOX.top]
		1378	mov eax, [eax + BOX.left]
		1379	add ecx, eax
		1380	add edx, ebx
		1381	call calculatescreen
1362	mikedld	1382
1391	mikedld	1383	mov eax, edi
		1384	call redrawscreen
1362	mikedld	1385
1391	mikedld	1386	; tell window to redraw itself
		1387	mov [edi + WDATA.fl_redraw], 1
1362	mikedld	1388
1391	mikedld	1389	pop ebx eax
		1390	ret
2436	mario79	1391	;------------------------------------------------------------------------------
1391	mikedld	1392	align 4
		1393	;------------------------------------------------------------------------------
		1394	window._.set_window_box: ;/////////////////////////////////////////////////////
		1395	;------------------------------------------------------------------------------
		1396	;?
		1397	;------------------------------------------------------------------------------
		1398	;> eax = pointer to BOX struct
		1399	;> bl = new window state flags
		1400	;> edi = pointer to WDATA struct
		1401	;------------------------------------------------------------------------------
		1402	push eax ebx esi
1362	mikedld	1403
1474	diamond	1404	; don't do anything if the new box is identical to the old
2288	clevermous	1405	cmp bl, [edi + WDATA.fl_wstate]
		1406	jnz @f
		1407	mov esi, eax
		1408	push edi
1474	diamond	1409	if WDATA.box
2288	clevermous	1410	add edi, WDATA.box
1474	diamond	1411	end if
2288	clevermous	1412	mov ecx, 4
		1413	repz cmpsd
		1414	pop edi
		1415	jz .exit
2436	mario79	1416	;--------------------------------------
		1417	align 4
1474	diamond	1418	@@:
2381	hidnplayr	1419	add esp, -sizeof.BOX
1391	mikedld	1420	mov ebx, esp
1424	diamond	1421	if WDATA.box
1391	mikedld	1422	lea esi, [edi + WDATA.box]
1424	diamond	1423	else
2288	clevermous	1424	mov esi, edi ; optimization for WDATA.box = 0
1424	diamond	1425	end if
1391	mikedld	1426	xchg eax, esi
2381	hidnplayr	1427	mov ecx, sizeof.BOX
1391	mikedld	1428	call memmove
		1429	xchg eax, esi
		1430	xchg ebx, esi
		1431	call memmove
1424	diamond	1432	mov eax, ebx
		1433	mov ebx, esi
1362	mikedld	1434
1391	mikedld	1435	call window._.check_window_position
		1436	call window._.set_window_clientbox
		1437	call window._.invalidate_screen
1362	mikedld	1438
2381	hidnplayr	1439	add esp, sizeof.BOX
1362	mikedld	1440
1391	mikedld	1441	mov cl, [esp + 4]
		1442	mov ch, cl
		1443	xchg cl, [edi + WDATA.fl_wstate]
1362	mikedld	1444
1391	mikedld	1445	or cl, ch
		1446	test cl, WSTATE_MAXIMIZED
		1447	jnz .exit
1362	mikedld	1448
1391	mikedld	1449	mov eax, edi
		1450	sub eax, window_data
		1451	shl eax, 3
		1452	add eax, SLOT_BASE
1362	mikedld	1453
1391	mikedld	1454	lea ebx, [edi + WDATA.box]
		1455	xchg esp, ebx
1362	mikedld	1456
1391	mikedld	1457	pop [eax + APPDATA.saved_box.left] \
		1458	[eax + APPDATA.saved_box.top] \
		1459	[eax + APPDATA.saved_box.width] \
		1460	edx
1362	mikedld	1461
1391	mikedld	1462	xchg esp, ebx
1362	mikedld	1463
1391	mikedld	1464	test ch, WSTATE_ROLLEDUP
		1465	jnz .exit
1362	mikedld	1466
1391	mikedld	1467	mov [eax + APPDATA.saved_box.height], edx
2436	mario79	1468	;--------------------------------------
		1469	align 4
		1470	.exit:
1391	mikedld	1471	pop esi ebx eax
		1472	ret
2436	mario79	1473	;------------------------------------------------------------------------------
1391	mikedld	1474	align 4
		1475	;------------------------------------------------------------------------------
		1476	window._.set_window_clientbox: ;///////////////////////////////////////////////
		1477	;------------------------------------------------------------------------------
		1478	;?
		1479	;------------------------------------------------------------------------------
		1480	;> edi = pointer to WDATA struct
		1481	;------------------------------------------------------------------------------
		1482	push eax ecx edi
1362	mikedld	1483
1391	mikedld	1484	mov eax, [_skinh]
		1485	mov [window_topleft + 8 * 3 + 4], eax
		1486	mov [window_topleft + 8 * 4 + 4], eax
1362	mikedld	1487
1391	mikedld	1488	mov ecx, edi
		1489	sub edi, window_data
		1490	shl edi, 3
		1491	test [ecx + WDATA.fl_wstyle], WSTYLE_CLIENTRELATIVE
		1492	jz .whole_window
1362	mikedld	1493
1391	mikedld	1494	movzx eax, [ecx + WDATA.fl_wstyle]
		1495	and eax, 0x0F
		1496	mov eax, [eax * 8 + window_topleft + 0]
		1497	mov [edi + SLOT_BASE + APPDATA.wnd_clientbox.left], eax
		1498	shl eax, 1
		1499	neg eax
		1500	add eax, [ecx + WDATA.box.width]
		1501	mov [edi + SLOT_BASE + APPDATA.wnd_clientbox.width], eax
1362	mikedld	1502
1391	mikedld	1503	movzx eax, [ecx + WDATA.fl_wstyle]
		1504	and eax, 0x0F
		1505	push [eax * 8 + window_topleft + 0]
		1506	mov eax, [eax * 8 + window_topleft + 4]
		1507	mov [edi + SLOT_BASE + APPDATA.wnd_clientbox.top], eax
		1508	neg eax
		1509	sub eax, [esp]
		1510	add eax, [ecx + WDATA.box.height]
		1511	mov [edi + SLOT_BASE + APPDATA.wnd_clientbox.height], eax
		1512	add esp, 4
		1513	jmp .exit
2436	mario79	1514	;--------------------------------------
		1515	align 4
		1516	.whole_window:
1391	mikedld	1517	xor eax, eax
		1518	mov [edi + SLOT_BASE + APPDATA.wnd_clientbox.left], eax
		1519	mov [edi + SLOT_BASE + APPDATA.wnd_clientbox.top], eax
		1520	mov eax, [ecx + WDATA.box.width]
		1521	mov [edi + SLOT_BASE + APPDATA.wnd_clientbox.width], eax
		1522	mov eax, [ecx + WDATA.box.height]
		1523	mov [edi + SLOT_BASE + APPDATA.wnd_clientbox.height], eax
2436	mario79	1524	;--------------------------------------
		1525	align 4
		1526	.exit:
1391	mikedld	1527	pop edi ecx eax
		1528	ret
2436	mario79	1529	;------------------------------------------------------------------------------
1391	mikedld	1530	align 4
		1531	;------------------------------------------------------------------------------
		1532	window._.sys_set_window: ;/////////////////////////////////////////////////////
		1533	;------------------------------------------------------------------------------
		1534	;?
		1535	;------------------------------------------------------------------------------
		1536	;< edx = pointer to WDATA struct
		1537	;------------------------------------------------------------------------------
		1538	mov eax, [CURRENT_TASK]
		1539	shl eax, 5
		1540	add eax, window_data
1362	mikedld	1541
1391	mikedld	1542	; save window colors
		1543	mov [eax + WDATA.cl_workarea], edx
		1544	mov [eax + WDATA.cl_titlebar], esi
		1545	mov [eax + WDATA.cl_frames], edi
1362	mikedld	1546
1391	mikedld	1547	mov edi, eax
1362	mikedld	1548
1391	mikedld	1549	; was it already defined before?
		1550	test [edi + WDATA.fl_wdrawn], 1
		1551	jnz .set_client_box
1563	diamond	1552	or [edi + WDATA.fl_wdrawn], 1
2503	mario79	1553	; After first draw_window we need redraw mouse necessarily!
		1554	; Otherwise the user can see cursor specified by f.37.5 from another window.
		1555	; He will be really unhappy! He is terrible in rage - usually he throws stones!
		1556	mov [redrawmouse_unconditional], 1
1391	mikedld	1557	; NOTE: commented out since doesn't provide necessary functionality
		1558	; anyway, to be reworked
		1559	; mov eax, [timer_ticks] ; [0xfdf0]
		1560	; add eax, 100
		1561	; mov [new_window_starting], eax
		1562
		1563	; no it wasn't, performing initial window definition
		1564	movzx eax, bx
1362	mikedld	1565	mov [edi + WDATA.box.width], eax
1391	mikedld	1566	movzx eax, cx
1362	mikedld	1567	mov [edi + WDATA.box.height], eax
1391	mikedld	1568	sar ebx, 16
		1569	sar ecx, 16
		1570	mov [edi + WDATA.box.left], ebx
		1571	mov [edi + WDATA.box.top], ecx
1362	mikedld	1572
1391	mikedld	1573	call window._.check_window_position
1362	mikedld	1574
1391	mikedld	1575	push ecx edi
1362	mikedld	1576
1391	mikedld	1577	mov cl, [edi + WDATA.fl_wstyle]
		1578	mov eax, [edi + WDATA.cl_frames]
1362	mikedld	1579
1391	mikedld	1580	sub edi, window_data
		1581	shl edi, 3
		1582	add edi, SLOT_BASE
1362	mikedld	1583
1391	mikedld	1584	and cl, 0x0F
		1585	cmp cl, 3
		1586	je @f
		1587	cmp cl, 4
		1588	je @f
1362	mikedld	1589
1391	mikedld	1590	xor eax, eax
2436	mario79	1591	;--------------------------------------
		1592	align 4
		1593	@@:
2288	clevermous	1594	mov [edi + APPDATA.wnd_caption], eax
1362	mikedld	1595
1391	mikedld	1596	mov esi, [esp]
		1597	add edi, APPDATA.saved_box
		1598	movsd
		1599	movsd
		1600	movsd
		1601	movsd
1362	mikedld	1602
1391	mikedld	1603	pop edi ecx
		1604
		1605	mov esi, [CURRENT_TASK]
		1606	movzx esi, word[WIN_STACK + esi * 2]
		1607	lea esi, [WIN_POS + esi * 2]
		1608	call waredraw
		1609
1362	mikedld	1610	mov eax, [edi + WDATA.box.left]
		1611	mov ebx, [edi + WDATA.box.top]
		1612	mov ecx, [edi + WDATA.box.width]
		1613	mov edx, [edi + WDATA.box.height]
		1614	add ecx, eax
		1615	add edx, ebx
		1616	call calculatescreen
		1617
1391	mikedld	1618	mov byte[KEY_COUNT], 0 ; empty keyboard buffer
		1619	mov byte[BTN_COUNT], 0 ; empty button buffer
2436	mario79	1620	;--------------------------------------
		1621	align 4
		1622	.set_client_box:
1391	mikedld	1623	; update window client box coordinates
		1624	call window._.set_window_clientbox
1362	mikedld	1625
1391	mikedld	1626	; reset window redraw flag and exit
		1627	mov [edi + WDATA.fl_redraw], 0
		1628	mov edx, edi
		1629	ret
2436	mario79	1630	;------------------------------------------------------------------------------
1391	mikedld	1631	align 4
		1632	;------------------------------------------------------------------------------
		1633	window._.check_window_position: ;//////////////////////////////////////////////
		1634	;------------------------------------------------------------------------------
		1635	;? Check if window is inside screen area
		1636	;------------------------------------------------------------------------------
		1637	;> edi = pointer to WDATA
		1638	;------------------------------------------------------------------------------
		1639	push eax ebx ecx edx esi
1362	mikedld	1640
1391	mikedld	1641	mov eax, [edi + WDATA.box.left]
		1642	mov ebx, [edi + WDATA.box.top]
		1643	mov ecx, [edi + WDATA.box.width]
		1644	mov edx, [edi + WDATA.box.height]
1362	mikedld	1645
1391	mikedld	1646	mov esi, [Screen_Max_X]
		1647	cmp ecx, esi
		1648	ja .fix_width_high
2436	mario79	1649	;--------------------------------------
		1650	align 4
		1651	.check_left:
1391	mikedld	1652	or eax, eax
		1653	jl .fix_left_low
		1654	add eax, ecx
		1655	cmp eax, esi
		1656	jg .fix_left_high
2436	mario79	1657	;--------------------------------------
		1658	align 4
		1659	.check_height:
1391	mikedld	1660	mov esi, [Screen_Max_Y]
		1661	cmp edx, esi
		1662	ja .fix_height_high
2436	mario79	1663	;--------------------------------------
		1664	align 4
		1665	.check_top:
1391	mikedld	1666	or ebx, ebx
		1667	jl .fix_top_low
		1668	add ebx, edx
		1669	cmp ebx, esi
		1670	jg .fix_top_high
2436	mario79	1671	;--------------------------------------
		1672	align 4
		1673	.exit:
1391	mikedld	1674	pop esi edx ecx ebx eax
1362	mikedld	1675	ret
2436	mario79	1676	;--------------------------------------
		1677	align 4
		1678	.fix_width_high:
1391	mikedld	1679	mov ecx, esi
		1680	mov [edi + WDATA.box.width], esi
		1681	jmp .check_left
2436	mario79	1682	;--------------------------------------
		1683	align 4
		1684	.fix_left_low:
1391	mikedld	1685	xor eax, eax
		1686	mov [edi + WDATA.box.left], eax
		1687	jmp .check_height
2436	mario79	1688	;--------------------------------------
		1689	align 4
		1690	.fix_left_high:
1391	mikedld	1691	mov eax, esi
		1692	sub eax, ecx
		1693	mov [edi + WDATA.box.left], eax
		1694	jmp .check_height
2436	mario79	1695	;--------------------------------------
		1696	align 4
		1697	.fix_height_high:
1391	mikedld	1698	mov edx, esi
		1699	mov [edi + WDATA.box.height], esi
		1700	jmp .check_top
2436	mario79	1701	;--------------------------------------
		1702	align 4
		1703	.fix_top_low:
1391	mikedld	1704	xor ebx, ebx
		1705	mov [edi + WDATA.box.top], ebx
		1706	jmp .exit
2436	mario79	1707	;--------------------------------------
		1708	align 4
		1709	.fix_top_high:
1391	mikedld	1710	mov ebx, esi
		1711	sub ebx, edx
		1712	mov [edi + WDATA.box.top], ebx
		1713	jmp .exit
2436	mario79	1714	;------------------------------------------------------------------------------
1362	mikedld	1715	align 4
		1716	;------------------------------------------------------------------------------
		1717	window._.get_titlebar_height: ;////////////////////////////////////////////////
		1718	;------------------------------------------------------------------------------
1391	mikedld	1719	;?
		1720	;------------------------------------------------------------------------------
1362	mikedld	1721	;> edi = pointer to WDATA
		1722	;------------------------------------------------------------------------------
		1723	mov al, [edi + WDATA.fl_wstyle]
		1724	and al, 0x0f
		1725	cmp al, 0x03
		1726	jne @f
		1727	mov eax, [_skinh]
		1728	ret
2436	mario79	1729	;--------------------------------------
		1730	align 4
		1731	@@:
2288	clevermous	1732	mov eax, 21
1362	mikedld	1733	ret
2436	mario79	1734	;------------------------------------------------------------------------------
1362	mikedld	1735	align 4
		1736	;------------------------------------------------------------------------------
		1737	window._.get_rolledup_height: ;////////////////////////////////////////////////
		1738	;------------------------------------------------------------------------------
1391	mikedld	1739	;?
		1740	;------------------------------------------------------------------------------
1362	mikedld	1741	;> edi = pointer to WDATA
		1742	;------------------------------------------------------------------------------
		1743	mov al, [edi + WDATA.fl_wstyle]
		1744	and al, 0x0f
		1745	cmp al, 0x03
		1746	jb @f
		1747	mov eax, [_skinh]
		1748	add eax, 3
		1749	ret
2436	mario79	1750	;--------------------------------------
		1751	align 4
		1752	@@:
2288	clevermous	1753	or al, al
1362	mikedld	1754	jnz @f
		1755	mov eax, 21
		1756	ret
2436	mario79	1757	;--------------------------------------
		1758	align 4
		1759	@@:
2288	clevermous	1760	mov eax, 21 + 2
1362	mikedld	1761	ret
2436	mario79	1762	;------------------------------------------------------------------------------
1362	mikedld	1763	align 4
		1764	;------------------------------------------------------------------------------
		1765	window._.set_screen: ;/////////////////////////////////////////////////////////
		1766	;------------------------------------------------------------------------------
		1767	;? Reserve window area in screen buffer
		1768	;------------------------------------------------------------------------------
		1769	;> eax = left
		1770	;> ebx = top
		1771	;> ecx = right
		1772	;> edx = bottom
		1773	;> esi = process number
		1774	;------------------------------------------------------------------------------
		1775	virtual at esp
		1776	ff_x dd ?
		1777	ff_y dd ?
		1778	ff_width dd ?
		1779	ff_xsz dd ?
		1780	ff_ysz dd ?
		1781	ff_scale dd ?
		1782	end virtual
		1783
		1784	pushad
		1785
		1786	cmp esi, 1
		1787	jz .check_for_shaped_window
		1788	mov edi, esi
		1789	shl edi, 5
		1790	cmp [window_data + edi + WDATA.box.width], 0
		1791	jnz .check_for_shaped_window
		1792	cmp [window_data + edi + WDATA.box.height], 0
		1793	jz .exit
2436	mario79	1794	;--------------------------------------
		1795	align 4
		1796	.check_for_shaped_window:
1362	mikedld	1797	mov edi, esi
		1798	shl edi, 8
		1799	add edi, SLOT_BASE
		1800	cmp [edi + APPDATA.wnd_shape], 0
		1801	jne .shaped_window
		1802
		1803	; get x&y size
		1804	sub ecx, eax
		1805	sub edx, ebx
		1806	inc ecx
		1807	inc edx
		1808
		1809	; get WinMap start
1368	mikedld	1810	push esi
2446	mario79	1811	; mov edi, [Screen_Max_X]
		1812	; inc edi
		1813	; mov esi, edi
		1814	mov esi, [Screen_Max_X]
		1815	inc esi
		1816	; imul edi, ebx
		1817	mov edi, [d_width_calc_area + ebx*4]
		1818
1362	mikedld	1819	add edi, eax
		1820	add edi, [_WinMapAddress]
1368	mikedld	1821	pop eax
		1822	mov ah, al
		1823	push ax
		1824	shl eax, 16
		1825	pop ax
2436	mario79	1826	;--------------------------------------
		1827	align 4
		1828	.next_line:
1362	mikedld	1829	push ecx
1368	mikedld	1830	shr ecx, 2
2288	clevermous	1831	rep stosd
1368	mikedld	1832	mov ecx, [esp]
		1833	and ecx, 3
2288	clevermous	1834	rep stosb
1362	mikedld	1835	pop ecx
1368	mikedld	1836	add edi, esi
1362	mikedld	1837	sub edi, ecx
		1838	dec edx
		1839	jnz .next_line
		1840
		1841	jmp .exit
2436	mario79	1842	;--------------------------------------
		1843	align 4
		1844	.shaped_window:
1362	mikedld	1845	; for (y=0; y <= x_size; y++)
		1846	; for (x=0; x <= x_size; x++)
		1847	; if (shape[coord(x,y,scale)]==1)
		1848	; set_pixel(x, y, process_number);
		1849
		1850	sub ecx, eax
		1851	sub edx, ebx
		1852	inc ecx
		1853	inc edx
		1854
		1855	push [edi + APPDATA.wnd_shape_scale] ; push scale first -> for loop
		1856
		1857	; get WinMap start -> ebp
		1858	push eax
2446	mario79	1859	; mov eax, [Screen_Max_X] ; screen_sx
		1860	; inc eax
		1861	; imul eax, ebx
		1862	mov eax, [d_width_calc_area + ebx*4]
		1863
1362	mikedld	1864	add eax, [esp]
		1865	add eax, [_WinMapAddress]
		1866	mov ebp, eax
		1867
		1868	mov edi, [edi + APPDATA.wnd_shape]
		1869	pop eax
		1870
		1871	; eax = x_start
		1872	; ebx = y_start
		1873	; ecx = x_size
		1874	; edx = y_size
		1875	; esi = process_number
		1876	; edi = &shape
		1877	; [scale]
		1878	push edx ecx ; for loop - x,y size
		1879
		1880	mov ecx, esi
		1881	shl ecx, 5
		1882	mov edx, [window_data + ecx + WDATA.box.top]
		1883	push [window_data + ecx + WDATA.box.width] ; for loop - width
		1884	mov ecx, [window_data + ecx + WDATA.box.left]
		1885	sub ebx, edx
		1886	sub eax, ecx
		1887	push ebx eax ; for loop - x,y
		1888
		1889	add [ff_xsz], eax
		1890	add [ff_ysz], ebx
		1891
		1892	mov ebx, [ff_y]
2436	mario79	1893	;--------------------------------------
		1894	align 4
		1895	.ff_new_y:
1362	mikedld	1896	mov edx, [ff_x]
2436	mario79	1897	;--------------------------------------
		1898	align 4
		1899	.ff_new_x:
1362	mikedld	1900	; -- body --
		1901	mov ecx, [ff_scale]
		1902	mov eax, [ff_width]
		1903	inc eax
		1904	shr eax, cl
		1905	push ebx edx
		1906	shr ebx, cl
		1907	shr edx, cl
		1908	imul eax, ebx
		1909	add eax, edx
		1910	pop edx ebx
		1911	add eax, edi
		1912	call .read_byte
2288	clevermous	1913	test al, al
1362	mikedld	1914	jz @f
		1915	mov eax, esi
		1916	mov [ebp], al
		1917	; -- end body --
2436	mario79	1918	;--------------------------------------
		1919	align 4
		1920	@@:
2288	clevermous	1921	inc ebp
1362	mikedld	1922	inc edx
		1923	cmp edx, [ff_xsz]
		1924	jb .ff_new_x
		1925
		1926	sub ebp, [ff_xsz]
		1927	add ebp, [ff_x]
		1928	add ebp, [Screen_Max_X] ; screen.x
		1929	inc ebp
		1930	inc ebx
		1931	cmp ebx, [ff_ysz]
		1932	jb .ff_new_y
		1933
		1934	add esp, 24
2436	mario79	1935	;--------------------------------------
		1936	align 4
		1937	.exit:
1362	mikedld	1938	popad
2443	Serge	1939	inc [_display.mask_seqno]
1362	mikedld	1940	ret
2436	mario79	1941	;--------------------------------------
		1942	align 4
		1943	.read_byte:
1362	mikedld	1944	; eax - address
		1945	; esi - slot
		1946	push eax ecx edx esi
		1947	xchg eax, esi
		1948	lea ecx, [esp + 12]
		1949	mov edx, 1
		1950	call read_process_memory
		1951	pop esi edx ecx eax
		1952	ret
2436	mario79	1953	;------------------------------------------------------------------------------
1362	mikedld	1954	align 4
		1955	;------------------------------------------------------------------------------
		1956	window._.window_activate: ;////////////////////////////////////////////////////
		1957	;------------------------------------------------------------------------------
		1958	;? Activate window
		1959	;------------------------------------------------------------------------------
		1960	;> esi = pointer to WIN_POS+ window data
		1961	;------------------------------------------------------------------------------
		1962	push eax ebx
		1963
		1964	; if type of current active window is 3 or 4, it must be redrawn
1368	mikedld	1965	mov ebx, [TASK_COUNT]
2288	clevermous	1966
		1967	; DEBUGF 1, "K : TASK_COUNT (0x%x)\n", ebx
		1968
1368	mikedld	1969	movzx ebx, word[WIN_POS + ebx * 2]
		1970	shl ebx, 5
1362	mikedld	1971	add eax, window_data
1368	mikedld	1972	mov al, [window_data + ebx + WDATA.fl_wstyle]
		1973	and al, 0x0f
		1974	cmp al, 0x03
1362	mikedld	1975	je .set_window_redraw_flag
1368	mikedld	1976	cmp al, 0x04
		1977	jne .move_others_down
2436	mario79	1978	;--------------------------------------
		1979	align 4
		1980	.set_window_redraw_flag:
1368	mikedld	1981	mov [window_data + ebx + WDATA.fl_redraw], 1
2436	mario79	1982	;--------------------------------------
		1983	align 4
		1984	.move_others_down:
1362	mikedld	1985	; ax <- process no
1368	mikedld	1986	movzx ebx, word[esi]
1362	mikedld	1987	; ax <- position in window stack
1368	mikedld	1988	movzx ebx, word[WIN_STACK + ebx * 2]
1362	mikedld	1989
		1990	; drop others
1368	mikedld	1991	xor eax, eax
2436	mario79	1992	;--------------------------------------
		1993	align 4
		1994	.next_stack_window:
1368	mikedld	1995	cmp eax, [TASK_COUNT]
1362	mikedld	1996	jae .move_self_up
1368	mikedld	1997	inc eax
2288	clevermous	1998
		1999	; push ebx
		2000	; xor ebx,ebx
		2001	; mov bx,[WIN_STACK + eax * 2]
		2002	; DEBUGF 1, "K : DEC WIN_STACK (0x%x)\n",ebx
		2003	; pop ebx
		2004
1368	mikedld	2005	cmp [WIN_STACK + eax * 2], bx
1362	mikedld	2006	jbe .next_stack_window
1368	mikedld	2007	dec word[WIN_STACK + eax * 2]
1362	mikedld	2008	jmp .next_stack_window
2436	mario79	2009	;--------------------------------------
		2010	align 4
		2011	.move_self_up:
1368	mikedld	2012	movzx ebx, word[esi]
1362	mikedld	2013	; number of processes
1368	mikedld	2014	mov ax, [TASK_COUNT]
1362	mikedld	2015	; this is the last (and the upper)
1368	mikedld	2016	mov [WIN_STACK + ebx * 2], ax
1362	mikedld	2017
		2018	; update on screen - window stack
1368	mikedld	2019	xor eax, eax
2436	mario79	2020	;--------------------------------------
		2021	align 4
		2022	.next_window_pos:
1368	mikedld	2023	cmp eax, [TASK_COUNT]
1362	mikedld	2024	jae .reset_vars
1368	mikedld	2025	inc eax
		2026	movzx ebx, word[WIN_STACK + eax * 2]
		2027	mov [WIN_POS + ebx * 2], ax
1362	mikedld	2028	jmp .next_window_pos
2436	mario79	2029	;--------------------------------------
		2030	align 4
		2031	.reset_vars:
1362	mikedld	2032	mov byte[KEY_COUNT], 0
		2033	mov byte[BTN_COUNT], 0
		2034	mov word[MOUSE_SCROLL_H], 0
		2035	mov word[MOUSE_SCROLL_V], 0
		2036
		2037	pop ebx eax
		2038	ret
2244	mario79	2039	;------------------------------------------------------------------------------
		2040	window._.window_deactivate: ;////////////////////////////////////////////////////
		2041	;------------------------------------------------------------------------------
		2042	;? Deactivate window
		2043	;------------------------------------------------------------------------------
		2044	;> esi = pointer to WIN_POS+ window data
		2045	;------------------------------------------------------------------------------
2288	clevermous	2046	push eax ebx
2436	mario79	2047	;--------------------------------------
		2048	align 4
2244	mario79	2049	.move_others_up:
2288	clevermous	2050	; ax <- process no
		2051	movzx ebx, word[esi]
		2052	; ax <- position in window stack
		2053	movzx ebx, word[WIN_STACK + ebx * 2]
		2054	; up others
		2055	xor eax, eax
2436	mario79	2056	;--------------------------------------
		2057	align 4
2244	mario79	2058	.next_stack_window:
2288	clevermous	2059	cmp eax, [TASK_COUNT]
		2060	jae .move_self_down
		2061	inc eax
		2062	cmp [WIN_STACK + eax * 2], bx
		2063	jae .next_stack_window
		2064	inc word[WIN_STACK + eax * 2]
		2065	jmp .next_stack_window
2436	mario79	2066	;--------------------------------------
		2067	align 4
2244	mario79	2068	.move_self_down:
2288	clevermous	2069	movzx ebx, word[esi]
		2070	; this is the last (and the low)
		2071	mov [WIN_STACK + ebx * 2], word 1
		2072	; update on screen - window stack
		2073	xor eax, eax
2436	mario79	2074	;--------------------------------------
		2075	align 4
2244	mario79	2076	.next_window_pos:
2288	clevermous	2077	cmp eax, [TASK_COUNT]
		2078	jae .reset_vars
		2079	inc eax
		2080	movzx ebx, word[WIN_STACK + eax * 2]
		2081	mov [WIN_POS + ebx * 2], ax
		2082	jmp .next_window_pos
2436	mario79	2083	;--------------------------------------
		2084	align 4
2244	mario79	2085	.reset_vars:
2288	clevermous	2086	mov byte[KEY_COUNT], 0
		2087	mov byte[BTN_COUNT], 0
		2088	mov word[MOUSE_SCROLL_H], 0
		2089	mov word[MOUSE_SCROLL_V], 0
		2090	pop ebx eax
		2091	ret
		2092	;------------------------------------------------------------------------------
1362	mikedld	2093	align 4
		2094	;------------------------------------------------------------------------------
		2095	window._.check_window_draw: ;//////////////////////////////////////////////////
		2096	;------------------------------------------------------------------------------
		2097	;? Check if window is necessary to draw
		2098	;------------------------------------------------------------------------------
		2099	;> edi = pointer to WDATA
		2100	;------------------------------------------------------------------------------
		2101	mov cl, [edi + WDATA.fl_wstyle]
		2102	and cl, 0x0f
1391	mikedld	2103	cmp cl, 3
1362	mikedld	2104	je .exit.redraw ; window type 3
1391	mikedld	2105	cmp cl, 4
1362	mikedld	2106	je .exit.redraw ; window type 4
		2107
		2108	push eax ebx edx esi
		2109
		2110	mov eax, edi
		2111	sub eax, window_data
		2112	shr eax, 5
		2113
		2114	movzx eax, word[WIN_STACK + eax * 2] ; get value of the curr process
		2115	lea esi, [WIN_POS + eax * 2] ; get address of this process at 0xC400
2436	mario79	2116	;--------------------------------------
		2117	align 4
		2118	.next_window:
1362	mikedld	2119	add esi, 2
		2120
		2121	mov eax, [TASK_COUNT]
		2122	lea eax, word[WIN_POS + eax * 2] ; number of the upper window
		2123
		2124	cmp esi, eax
		2125	ja .exit.no_redraw
		2126
		2127	movzx edx, word[esi]
		2128	shl edx, 5
		2129	cmp [CURRENT_TASK + edx + TASKDATA.state], TSTATE_FREE
		2130	je .next_window
		2131
		2132	mov eax, [edi + WDATA.box.top]
		2133	mov ebx, [edi + WDATA.box.height]
		2134	add ebx, eax
		2135
		2136	mov ecx, [window_data + edx + WDATA.box.top]
		2137	cmp ecx, ebx
		2138	jge .next_window
		2139	add ecx, [window_data + edx + WDATA.box.height]
		2140	cmp eax, ecx
		2141	jge .next_window
		2142
		2143	mov eax, [edi + WDATA.box.left]
		2144	mov ebx, [edi + WDATA.box.width]
		2145	add ebx, eax
		2146
		2147	mov ecx, [window_data + edx + WDATA.box.left]
		2148	cmp ecx, ebx
		2149	jge .next_window
		2150	add ecx, [window_data + edx + WDATA.box.width]
		2151	cmp eax, ecx
		2152	jge .next_window
		2153
		2154	pop esi edx ebx eax
2436	mario79	2155	;--------------------------------------
		2156	align 4
		2157	.exit.redraw:
1362	mikedld	2158	xor ecx, ecx
		2159	inc ecx
		2160	ret
2436	mario79	2161	;--------------------------------------
		2162	align 4
		2163	.exit.no_redraw:
1362	mikedld	2164	pop esi edx ebx eax
		2165	xor ecx, ecx
		2166	ret
2436	mario79	2167	;------------------------------------------------------------------------------
1362	mikedld	2168	align 4
		2169	;------------------------------------------------------------------------------
1391	mikedld	2170	window._.draw_window_caption: ;////////////////////////////////////////////////
1362	mikedld	2171	;------------------------------------------------------------------------------
1391	mikedld	2172	;?
1362	mikedld	2173	;------------------------------------------------------------------------------
1391	mikedld	2174	xor eax, eax
		2175	mov edx, [TASK_COUNT]
		2176	movzx edx, word[WIN_POS + edx * 2]
		2177	cmp edx, [CURRENT_TASK]
		2178	jne @f
		2179	inc eax
2436	mario79	2180	;--------------------------------------
		2181	align 4
		2182	@@:
2288	clevermous	2183	mov edx, [CURRENT_TASK]
1391	mikedld	2184	shl edx, 5
		2185	add edx, window_data
		2186	movzx ebx, [edx + WDATA.fl_wstyle]
		2187	and bl, 0x0F
		2188	cmp bl, 3
		2189	je .draw_caption_style_3
		2190	cmp bl, 4
		2191	je .draw_caption_style_3
1362	mikedld	2192
1391	mikedld	2193	jmp .not_style_3
2436	mario79	2194	;--------------------------------------
		2195	align 4
		2196	.draw_caption_style_3:
1391	mikedld	2197	push edx
		2198	call drawwindow_IV_caption
		2199	add esp, 4
		2200	jmp .2
2436	mario79	2201	;--------------------------------------
		2202	align 4
		2203	.not_style_3:
1391	mikedld	2204	cmp bl, 2
		2205	jne .not_style_2
		2206
		2207	call drawwindow_III_caption
		2208	jmp .2
2436	mario79	2209	;--------------------------------------
		2210	align 4
		2211	.not_style_2:
1391	mikedld	2212	cmp bl, 0
		2213	jne .2
		2214
		2215	call drawwindow_I_caption
2436	mario79	2216	;--------------------------------------
		2217	align 4
		2218	.2:
2288	clevermous	2219	mov edi, [CURRENT_TASK]
1391	mikedld	2220	shl edi, 5
		2221	test [edi + window_data + WDATA.fl_wstyle], WSTYLE_HASCAPTION
		2222	jz .exit
		2223	mov edx, [edi * 8 + SLOT_BASE + APPDATA.wnd_caption]
		2224	or edx, edx
		2225	jz .exit
		2226
		2227	movzx eax, [edi + window_data + WDATA.fl_wstyle]
		2228	and al, 0x0F
		2229	cmp al, 3
		2230	je .skinned
		2231	cmp al, 4
		2232	je .skinned
		2233
		2234	jmp .not_skinned
2436	mario79	2235	;--------------------------------------
		2236	align 4
		2237	.skinned:
1391	mikedld	2238	mov ebp, [edi + window_data + WDATA.box.left - 2]
		2239	mov bp, word[edi + window_data + WDATA.box.top]
		2240	movzx eax, word[edi + window_data + WDATA.box.width]
		2241	sub ax, [_skinmargins.left]
		2242	sub ax, [_skinmargins.right]
		2243	push edx
		2244	cwde
		2245	cdq
		2246	mov ebx, 6
		2247	idiv ebx
		2248	pop edx
		2249	or eax, eax
		2250	js .exit
		2251
		2252	mov esi, eax
		2253	mov ebx, dword[_skinmargins.left - 2]
		2254	mov bx, word[_skinh]
		2255	sub bx, [_skinmargins.bottom]
		2256	sub bx, [_skinmargins.top]
		2257	sar bx, 1
		2258	adc bx, 0
		2259	add bx, [_skinmargins.top]
		2260	add bx, -3
		2261	add ebx, ebp
		2262	jmp .dodraw
2436	mario79	2263	;--------------------------------------
		2264	align 4
		2265	.not_skinned:
1391	mikedld	2266	cmp al, 1
		2267	je .exit
		2268
		2269	mov ebp, [edi + window_data + WDATA.box.left - 2]
		2270	mov bp, word[edi + window_data + WDATA.box.top]
		2271	movzx eax, word[edi + window_data + WDATA.box.width]
		2272	sub eax, 16
		2273	push edx
		2274	cwde
		2275	cdq
		2276	mov ebx, 6
		2277	idiv ebx
		2278	pop edx
		2279	or eax, eax
		2280	js .exit
		2281
		2282	mov esi, eax
		2283	mov ebx, 0x00080007
		2284	add ebx, ebp
2436	mario79	2285	;--------------------------------------
		2286	align 4
		2287	.dodraw:
1391	mikedld	2288	mov ecx, [common_colours + 16]
		2289	or ecx, 0x80000000
		2290	xor edi, edi
		2291	call dtext_asciiz_esi
2436	mario79	2292	;--------------------------------------
		2293	align 4
		2294	.exit:
2453	mario79	2295	; call [draw_pointer]
		2296	call __sys_draw_pointer
1362	mikedld	2297	ret
2436	mario79	2298	;------------------------------------------------------------------------------
1391	mikedld	2299	align 4
		2300	;------------------------------------------------------------------------------
		2301	window._.draw_negative_box: ;//////////////////////////////////////////////////
		2302	;------------------------------------------------------------------------------
		2303	;? Draw negative box
		2304	;------------------------------------------------------------------------------
		2305	;> edi = pointer to BOX struct
		2306	;------------------------------------------------------------------------------
		2307	push eax ebx esi
2233	mario79	2308	mov esi, 0x01000000
2436	mario79	2309	;--------------------------------------
		2310	align 4
2233	mario79	2311	.1:
1391	mikedld	2312	mov eax, [edi + BOX.left - 2]
		2313	mov ax, word[edi + BOX.left]
		2314	add ax, word[edi + BOX.width]
		2315	mov ebx, [edi + BOX.top - 2]
		2316	mov bx, word[edi + BOX.top]
		2317	add bx, word[edi + BOX.height]
		2318	call draw_rectangle.forced
		2319	pop esi ebx eax
		2320	ret
2233	mario79	2321	;------------------------------------------------------------------------------
2436	mario79	2322	align 4
		2323	;------------------------------------------------------------------------------
2233	mario79	2324	window._.end_moving__box: ;//////////////////////////////////////////////////
		2325	;------------------------------------------------------------------------------
		2326	;? Draw positive box
		2327	;------------------------------------------------------------------------------
		2328	;> edi = pointer to BOX struct
		2329	;------------------------------------------------------------------------------
		2330	push eax ebx esi
2288	clevermous	2331	xor esi, esi
		2332	jmp window._.draw_negative_box.1
2341	Serge	2333	;------------------------------------------------------------------------------
2436	mario79	2334	align 4
		2335	;------------------------------------------------------------------------------
2341	Serge	2336	window._.get_rect: ;/////////////////////////////////////////////////////
		2337	;------------------------------------------------------------------------------
		2338	;? void __fastcall get_window_rect(struct RECT* rc);
		2339	;------------------------------------------------------------------------------
		2340	;> ecx = pointer to RECT
		2341	;------------------------------------------------------------------------------
		2342	mov eax, [TASK_BASE]
		2343
		2344	mov edx, [eax-twdw + WDATA.box.left]
		2345	mov [ecx+RECT.left], edx
		2346
		2347	add edx, [eax-twdw + WDATA.box.width]
		2348	mov [ecx+RECT.right], edx
		2349
		2350	mov edx, [eax-twdw + WDATA.box.top]
		2351	mov [ecx+RECT.top], edx
		2352
		2353	add edx, [eax-twdw + WDATA.box.height]
		2354	mov [ecx+RECT.bottom], edx
		2355	ret
2436	mario79	2356	;------------------------------------------------------------------------------

Subversion Repositories Kolibri OS

(root)/kernel/trunk/gui/window.inc @ 9941 – Rev 2514