WebSVN – Kolibri OS – Blame – /programs/media/animage/trunk/screen.inc

Rev	Author	Line No.	Line
255	heavyiron	1	;----------------------------------------------------------
		2	;--------Move picture from array to work screeen-----------
		3	;----------------------------------------------------------
		4	MovePictureToWorkScreen:
1643	mario79	5	call cleare_screen
		6	mov eax,[Picture_SizeX]
		7	mov ebx,[Picture_SizeY]
		8	mov ecx,[MaxWorkScreen_SizeX]
		9	mov edx,[MaxWorkScreen_SizeY]
		10	mov esi,[k]
		11	imul eax,esi
		12	imul ebx,esi
		13	cmp eax,ecx
		14	jle lab1
255	heavyiron	15
1643	mario79	16	mov eax,[MaxWorkScreen_SizeX]
		17	mov [WorkScreen_SizeX],eax
		18	jmp lab2
255	heavyiron	19
1643	mario79	20	lab1:
		21	mov [WorkScreen_SizeX],eax
255	heavyiron	22
1643	mario79	23	lab2:
		24	cmp ebx,edx
		25	jle lab3
		26	mov ebx,[MaxWorkScreen_SizeY]
		27	mov [WorkScreen_SizeY],ebx
		28	jmp lab4
255	heavyiron	29
1643	mario79	30	lab3:
		31	mov [WorkScreen_SizeY],ebx
255	heavyiron	32
1643	mario79	33	lab4:
		34	mov eax,[WorkScreen_SizeX]
		35	mov ebx,[k]
255	heavyiron	36	cdq
1643	mario79	37	idiv ebx
		38	mov [CounterX],eax
		39	mov eax,[WorkScreen_SizeY]
255	heavyiron	40	cdq
1643	mario79	41	idiv ebx
		42	mov [CounterY],eax
255	heavyiron	43
1643	mario79	44	mov eax,[WorkScreen_SizeX]
		45	mov ecx,eax
		46	mov ebx,[k]
255	heavyiron	47	cdq
1643	mario79	48	idiv ebx
		49	imul eax,ebx
		50	sub ecx,eax
		51	lea ecx,[ecx+ecx*2]
255	heavyiron	52
1643	mario79	53	mov eax,[WorkScreen_SizeX]
		54	mov ebx,[k]
		55	dec ebx
		56	imul eax,ebx
		57	lea eax,[eax+eax*2]
		58	add eax,ecx
		59	mov [OffsetYWorkScreen],eax
255	heavyiron	60
1643	mario79	61	mov ebx,[Picture_SizeX]
		62	mov eax,[CounterX]
		63	sub ebx,eax
		64	lea ebx,[ebx+ebx*2]
		65	mov [OffsetYPicture],ebx
255	heavyiron	66
1643	mario79	67	mov eax,[WorkScreen_SizeX]
		68	mov ebx,[k]
		69	sub eax,ebx
		70	lea eax,[eax+eax*2]
		71	mov [OffsetYBigPixel],eax
255	heavyiron	72
1643	mario79	73	mov eax,[PosX]
		74	mov ebx,[PosY]
		75	mov ecx,[Picture_SizeX]
		76	imul ecx,ebx
		77	add eax,ecx
		78	lea eax,[eax+eax*2]
		79	add eax,[PointerToPicture]
255	heavyiron	80
1643	mario79	81	mov ebx,[ScreenPointer]
		82	mov edi,[CounterY]
255	heavyiron	83
1643	mario79	84	;if size of picture natural(mastab is 1) than move picture to work screen
		85	cmp [k],1
		86	jne no_zoom_1_
255	heavyiron	87
1643	mario79	88	screen_y_1:
		89	mov esi,[CounterX]
255	heavyiron	90
1643	mario79	91	screen_x_1:
		92	mov ecx,[eax]
		93	and ecx,0xffffff
		94	mov ebp,ecx
		95	shr ecx,16
		96	mov [ebx],bp
		97	mov [ebx+2],cl
		98	add ebx,3;
		99	add eax,3
		100	dec esi
		101	jnz screen_x_1
		102	add eax,[OffsetYPicture]
		103	add ebx,[OffsetYWorkScreen]
		104	dec edi
		105	jnz screen_y_1
		106	jmp fps
255	heavyiron	107
1643	mario79	108	no_zoom_1_:
		109	cmp [k],2
		110	jne no_zoom_2
255	heavyiron	111
1643	mario79	112	screen_y_2:
		113	mov esi,[CounterX]
255	heavyiron	114
1643	mario79	115	screen_x_2:
		116	mov ecx,[eax]
		117	and ecx,0xffffff
		118	mov ebp,ecx
		119	shr ecx,16
		120	mov edx,ebx
		121	mov [edx],bp
		122	mov [edx+2],cl
		123	mov [edx+3],bp
		124	mov [edx+3+2],cl
		125	add edx,3*2
		126	add edx,[OffsetYBigPixel]
		127	mov [edx],bp
		128	mov [edx+2],cl
		129	mov [edx+3],bp
		130	mov [edx+3+2],cl
		131	add edx,3*2
		132	add edx,[OffsetYBigPixel]
		133	add ebx,3*2
		134	add eax,3
		135	dec esi
		136	jnz screen_x_2
		137	add eax,[OffsetYPicture]
		138	add ebx,[OffsetYWorkScreen]
		139	dec edi
		140	jnz screen_y_2
		141	jmp fps
255	heavyiron	142
1643	mario79	143	no_zoom_2:
		144	cmp [k],4
		145	jne no_zoom_4
255	heavyiron	146
1643	mario79	147	screen_y_4:
		148	mov esi,[CounterX]
255	heavyiron	149
1643	mario79	150	screen_x_4:
		151	mov ecx,[eax]
		152	and ecx,0xffffff
		153	mov ebp,ecx
		154	shr ecx,16
		155	mov edx,ebx
		156	mov [edx],bp
		157	mov [edx+2],cl
		158	mov [edx+3],bp
		159	mov [edx+3+2],cl
		160	mov [edx+6],bp
		161	mov [edx+6+2],cl
		162	mov [edx+9],bp
		163	mov [edx+9+2],cl
		164	add edx,3*4
		165	add edx,[OffsetYBigPixel]
		166	mov [edx],bp
		167	mov [edx+2],cl
		168	mov [edx+3],bp
		169	mov [edx+3+2],cl
		170	mov [edx+6],bp
		171	mov [edx+6+2],cl
		172	mov [edx+9],bp
		173	mov [edx+9+2],cl
		174	add edx,3*4
		175	add edx,[OffsetYBigPixel]
		176	mov [edx],bp
		177	mov [edx+2],cl
		178	mov [edx+3],bp
		179	mov [edx+3+2],cl
		180	mov [edx+6],bp
		181	mov [edx+6+2],cl
		182	mov [edx+9],bp
		183	mov [edx+9+2],cl
		184	add edx,3*4
		185	add edx,[OffsetYBigPixel]
		186	mov [edx],bp
		187	mov [edx+2],cl
		188	mov [edx+3],bp
		189	mov [edx+3+2],cl
		190	mov [edx+6],bp
		191	mov [edx+6+2],cl
		192	mov [edx+9],bp
		193	mov [edx+9+2],cl
		194	add edx,3*4
		195	add edx,[OffsetYBigPixel]
		196	add ebx,4*3
		197	add eax,3
		198	dec esi
		199	jnz screen_x_4
		200	add eax,[OffsetYPicture]
		201	add ebx,[OffsetYWorkScreen]
		202	dec edi
		203	jnz screen_y_4
		204	jmp fps
		205
		206	no_zoom_4:
		207	;if zoom more than 4
		208	screen_y:
		209	mov esi,[CounterX]
		210
		211	screen_x:
		212	mov ecx,[eax]
		213	and ecx,0xffffff
		214	mov ebp,ecx
		215	shr ecx,16
		216	;---------------------------------------------------------
		217	push ebx eax
		218	mov edx,[k]
		219
		220	big_pixel_y:
		221	mov eax,[k]
		222
		223	big_pixel_x:
		224	mov [ebx],bp
		225	mov [ebx+2],cl
		226	add ebx,3
		227	dec eax
		228	jnz big_pixel_x
		229	add ebx,[OffsetYBigPixel]
		230	dec edx
		231	jnz big_pixel_y
		232	pop eax ebx
		233	;---------------------------------------------------------
		234	mov edx,[k]
		235	lea edx,[edx+edx*2]
		236	add ebx,edx
		237	add eax,3
		238	dec esi
		239	jnz screen_x
		240	add eax,[OffsetYPicture]
		241	add ebx,[OffsetYWorkScreen]
		242	dec edi
		243	jnz screen_y
		244
		245	fps:
		246	mov ebx,[ScreenPointer]
		247	mov ecx,[WorkScreen_SizeX]
		248	mov edx,[WorkScreen_SizeY]
		249	shl ecx,16
		250	add ecx,edx
6357	IgorA	251	mov edx,((ci_edit_wnd_x_pos+ci_edit_wnd_border) shl 16)\
		252	+ (ci_edit_wnd_y_pos+ci_edit_wnd_border)
6341	IgorA	253	mcall SF_PUT_IMAGE
1643	mario79	254	ret
255	heavyiron	255	;----------------------------------------------------------
		256	;--------------------clear screen--------------------------
		257	;----------------------------------------------------------
		258	cleare_screen:
6341	IgorA	259	mov edi,[ScreenPointer]
		260	mov ebx,[WorkScreen_SizeX]
		261	imul ebx,[WorkScreen_SizeY]
		262	lea ebx,[ebx+ebx*2]
		263	mov eax,0xffffffff
		264	mov ecx,ebx
		265	shr ecx,2
		266	rep stosd
		267	mov ecx,ebx
		268	and ecx,3
		269	rep stosb
255	heavyiron	270	ret
		271	;----------------------------------------------------------
		272	;-------------cleare work arrea(work screen)---------------
		273	;----------------------------------------------------------
		274	cleare_work_arrea:
6341	IgorA	275	mov edi,[PointerToPicture]
		276	mov ebx,[Picture_SizeX]
		277	imul ebx,[Picture_SizeY]
		278	lea ebx,[ebx+ebx*2]
		279	mov eax,0xffffffff
		280	mov ecx,ebx
		281	shr ecx,2
		282	rep stosd
		283	mov ecx,ebx
		284	and ecx,3
		285	rep stosb
255	heavyiron	286	ret
		287	;-----------------------------------------------------------
		288	;calculate position work screen on a picture
		289	;-----------------------------------------------------------
		290	CalculatePositionScreen:
6357	IgorA	291	mov eax,[Picture_SizeX]
		292	sub eax,[CounterX]
		293	cmp [PosX],eax
		294	jle @f
		295	mov [PosX],eax
		296	@@:
		297	cmp [PosX],0
		298	jns @f
		299	mov [PosX],0
		300	@@:
		301	mov ebx,[Picture_SizeY]
		302	sub ebx,[CounterY]
		303	cmp [PosY],ebx
		304	jle @f
		305	mov [PosY],ebx
		306	@@:
		307	cmp [PosY],0
		308	jns @f
		309	mov [PosY],0
		310	@@:
1643	mario79	311	ret
255	heavyiron	312	;-----------------------------------------------------------
		313	;-----------calculate cordinats on work picture--------------
		314	;-----------------------------------------------------------
		315	GetScreenCordinats:
6357	IgorA	316	mov eax,[MouseX]
		317	mov ebx,[MouseY]
		318	sub eax,ci_edit_wnd_x_pos+ci_edit_wnd_border
		319	cmp eax,0
		320	jge @f
		321	xor eax,eax
		322	@@:
		323	sub ebx,ci_edit_wnd_y_pos+ci_edit_wnd_border
		324	cmp ebx,0
		325	jge @f
		326	xor ebx,ebx
		327	@@:
		328	mov ecx,[k]
255	heavyiron	329	cdq
6357	IgorA	330	idiv ecx
		331	mov [ScreenX],eax
		332	mov eax,ebx
255	heavyiron	333	cdq
6357	IgorA	334	idiv ecx
		335	mov [ScreenY],eax
255	heavyiron	336	ret

Subversion Repositories Kolibri OS

(root)/programs/media/animage/trunk/screen.inc – Rev 6357