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

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

Subversion Repositories Kolibri OS

(root)/kernel/trunk/gui/window.inc @ 5836 – Rev 2381