WebSVN – Kolibri OS – Diff – /programs/fs/kfm/trunk/scroll.inc



     pusha
     add   ebx,1 shl 16
     mov   bx,14
     add   ecx,16 shl 16
     sub   cx,31
	mcall
     popa
     xor   edx,edx
     push  ebx
     mov   bx,1
	mcall
     push  ecx
     add   ebx,15 shl 16
	mcall
     pop   ecx
     pop   ebx
     mov   [draw_scroll_character],1
     call  draw_scroll_bar_srectangle
     xor  eax,eax

     xor   edx,edx
     mov   eax,13
     mov   cx,1
     cmp   [draw_scroll_character],2
     je   .draw_center
	mcall
     pusha
     add   ecx,1 shl 16
     add   ebx,1 shl 16
     mov   cx,14
     mov   bx,14
     mov   edx,0xbbddff
	mcall
     xor   edx,edx
     cmp   [draw_scroll_character],1
     jne   .draw_down
     add   ebx,3 shl 16
     mov   bx,7
     add   ecx,8 shl 16
     mov   cx,1
	mcall
     sub   ecx,1 shl 16
     add   ebx,1 shl 16
     mov   bx,5
	mcall
     sub   ecx,1 shl 16
     add   ebx,1 shl 16
     mov   bx,3
	mcall
     sub   ecx,1 shl 16
     add   ebx,1 shl 16
     mov   bx,1
	mcall
     jmp   .continue
.draw_down:
     add   ebx,3 shl 16
     mov   bx,7
     add   ecx,5 shl 16
     mov   cx,1
	mcall
     add   ecx,1 shl 16
     add   ebx,1 shl 16
     mov   bx,5
	mcall
     add   ecx,1 shl 16
     add   ebx,1 shl 16
     mov   bx,3
	mcall
     add   ecx,1 shl 16
     add   ebx,1 shl 16
     mov   bx,1
	mcall
.continue:
     popa
     add   ecx,15 shl 16
	mcall
     pop   ecx
     ret

 
.draw_center:

     add   ecx,[right_scroll_compens]
     shl   cx,1
.draw_center_continue:
     mov   bx,14
     mov   edx,0xbbddff
	mcall
     xor   edx,edx
     mov   cx,1
     sub   ecx,1 shl 16
	mcall
     pop   ecx
     cmp   [scroll_pointer_1],1
     jne   .right_1
     cmp   [left_scroll_compens],8
     jb    .continue_1

     sub   ecx,8 shl 16
     add   ebx,2 shl 16
     mov   bx,10
     add   ecx,4 shl 16
     mov   cx,1
	mcall
     add   ecx,3 shl 16
     sub   ebx,1 shl 16
     mov   bx,12
	mcall
     add   ebx,1 shl 16
     mov   bx,10
     add   ecx,3 shl 16
	mcall
.continue_1:
     popa
     ror   ecx,16
     cmp   [scroll_pointer_1],1
     jne   @f

     jmp   .draw_center_continue_2
@@:
     add   ecx,[right_scroll_compens]
.draw_center_continue_2:
     rol   ecx,16
	mcall
     pop   ecx
     ret
;---------------------------------------------------------------------


Rev 1792	Rev 3840
Line 341...	Line 341...
341	pusha	341	pusha
342	add ebx,1 shl 16	342	add ebx,1 shl 16
343	mov bx,14	343	mov bx,14
344	add ecx,16 shl 16	344	add ecx,16 shl 16
345	sub cx,31	345	sub cx,31
346	int 0x40	346	mcall
347	popa	347	popa
348	xor edx,edx	348	xor edx,edx
349	push ebx	349	push ebx
350	mov bx,1	350	mov bx,1
351	int 0x40	351	mcall
352	push ecx	352	push ecx
353	add ebx,15 shl 16	353	add ebx,15 shl 16
354	int 0x40	354	mcall
355	pop ecx	355	pop ecx
356	pop ebx	356	pop ebx
357	mov [draw_scroll_character],1	357	mov [draw_scroll_character],1
358	call draw_scroll_bar_srectangle	358	call draw_scroll_bar_srectangle
359	xor eax,eax	359	xor eax,eax
Line 417...	Line 417...
417	xor edx,edx	417	xor edx,edx
418	mov eax,13	418	mov eax,13
419	mov cx,1	419	mov cx,1
420	cmp [draw_scroll_character],2	420	cmp [draw_scroll_character],2
421	je .draw_center	421	je .draw_center
422	int 0x40	422	mcall
423	pusha	423	pusha
424	add ecx,1 shl 16	424	add ecx,1 shl 16
425	add ebx,1 shl 16	425	add ebx,1 shl 16
426	mov cx,14	426	mov cx,14
427	mov bx,14	427	mov bx,14
428	mov edx,0xbbddff	428	mov edx,0xbbddff
429	int 0x40	429	mcall
430	xor edx,edx	430	xor edx,edx
431	cmp [draw_scroll_character],1	431	cmp [draw_scroll_character],1
432	jne .draw_down	432	jne .draw_down
433	add ebx,3 shl 16	433	add ebx,3 shl 16
434	mov bx,7	434	mov bx,7
435	add ecx,8 shl 16	435	add ecx,8 shl 16
436	mov cx,1	436	mov cx,1
437	int 0x40	437	mcall
438	sub ecx,1 shl 16	438	sub ecx,1 shl 16
439	add ebx,1 shl 16	439	add ebx,1 shl 16
440	mov bx,5	440	mov bx,5
441	int 0x40	441	mcall
442	sub ecx,1 shl 16	442	sub ecx,1 shl 16
443	add ebx,1 shl 16	443	add ebx,1 shl 16
444	mov bx,3	444	mov bx,3
445	int 0x40	445	mcall
446	sub ecx,1 shl 16	446	sub ecx,1 shl 16
447	add ebx,1 shl 16	447	add ebx,1 shl 16
448	mov bx,1	448	mov bx,1
449	int 0x40	449	mcall
450	jmp .continue	450	jmp .continue
451	.draw_down:	451	.draw_down:
452	add ebx,3 shl 16	452	add ebx,3 shl 16
453	mov bx,7	453	mov bx,7
454	add ecx,5 shl 16	454	add ecx,5 shl 16
455	mov cx,1	455	mov cx,1
456	int 0x40	456	mcall
457	add ecx,1 shl 16	457	add ecx,1 shl 16
458	add ebx,1 shl 16	458	add ebx,1 shl 16
459	mov bx,5	459	mov bx,5
460	int 0x40	460	mcall
461	add ecx,1 shl 16	461	add ecx,1 shl 16
462	add ebx,1 shl 16	462	add ebx,1 shl 16
463	mov bx,3	463	mov bx,3
464	int 0x40	464	mcall
465	add ecx,1 shl 16	465	add ecx,1 shl 16
466	add ebx,1 shl 16	466	add ebx,1 shl 16
467	mov bx,1	467	mov bx,1
468	int 0x40	468	mcall
469	.continue:	469	.continue:
470	popa	470	popa
471	add ecx,15 shl 16	471	add ecx,15 shl 16
472	int 0x40	472	mcall
473	pop ecx	473	pop ecx
474	ret	474	ret
Line 475...	Line 475...
475		475
476	.draw_center:	476	.draw_center:
Line 495...	Line 495...
495	add ecx,[right_scroll_compens]	495	add ecx,[right_scroll_compens]
496	shl cx,1	496	shl cx,1
497	.draw_center_continue:	497	.draw_center_continue:
498	mov bx,14	498	mov bx,14
499	mov edx,0xbbddff	499	mov edx,0xbbddff
500	int 0x40	500	mcall
501	xor edx,edx	501	xor edx,edx
502	mov cx,1	502	mov cx,1
503	sub ecx,1 shl 16	503	sub ecx,1 shl 16
504	int 0x40	504	mcall
505	pop ecx	505	pop ecx
506	cmp [scroll_pointer_1],1	506	cmp [scroll_pointer_1],1
507	jne .right_1	507	jne .right_1
508	cmp [left_scroll_compens],8	508	cmp [left_scroll_compens],8
509	jb .continue_1	509	jb .continue_1
Line 515...	Line 515...
515	sub ecx,8 shl 16	515	sub ecx,8 shl 16
516	add ebx,2 shl 16	516	add ebx,2 shl 16
517	mov bx,10	517	mov bx,10
518	add ecx,4 shl 16	518	add ecx,4 shl 16
519	mov cx,1	519	mov cx,1
520	int 0x40	520	mcall
521	add ecx,3 shl 16	521	add ecx,3 shl 16
522	sub ebx,1 shl 16	522	sub ebx,1 shl 16
523	mov bx,12	523	mov bx,12
524	int 0x40	524	mcall
525	add ebx,1 shl 16	525	add ebx,1 shl 16
526	mov bx,10	526	mov bx,10
527	add ecx,3 shl 16	527	add ecx,3 shl 16
528	int 0x40	528	mcall
529	.continue_1:	529	.continue_1:
530	popa	530	popa
531	ror ecx,16	531	ror ecx,16
532	cmp [scroll_pointer_1],1	532	cmp [scroll_pointer_1],1
533	jne @f	533	jne @f
Line 535...	Line 535...
535	jmp .draw_center_continue_2	535	jmp .draw_center_continue_2
536	@@:	536	@@:
537	add ecx,[right_scroll_compens]	537	add ecx,[right_scroll_compens]
538	.draw_center_continue_2:	538	.draw_center_continue_2:
539	rol ecx,16	539	rol ecx,16
540	int 0x40	540	mcall
541	pop ecx	541	pop ecx
542	ret	542	ret
543	;---------------------------------------------------------------------	543	;---------------------------------------------------------------------
544		544

Subversion Repositories Kolibri OS

(root)/programs/fs/kfm/trunk/scroll.inc – Rev 1792 → 3840