Subversion Repositories Kolibri OS

Rev

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

Rev 617 Rev 824
Line -... Line 1...
-
 
1
diff16 'tp-editor.asm',0,$
Line 1... Line 2...
1
;-----------------------------------------------------------------------------
2
 
2
proc draw_editor ;///// DRAW EDITOR //////////////////////////////////////////
3
;-----------------------------------------------------------------------------
3
;-----------------------------------------------------------------------------
4
proc draw_editor ;///// DRAW EDITOR //////////////////////////////////////////
Line 997... Line 998...
997
	call	.check_cursor_visibility
998
;-----------------------------------------------------------------------------
998
  .direct:
999
	call	.check_cursor_visibility
999
	xor	edx,edx
1000
  .direct:
1000
 
1001
	xor	edx,edx
Line -... Line 1002...
-
 
1002
 
-
 
1003
	mov	ecx,[cur_editor.Caret.Y]
-
 
1004
	call	get_line_offset
-
 
1005
	call	get_real_length
-
 
1006
	mov	ecx,eax
1001
	mov	eax,[cur_editor.Lines.Count]
1007
 
1002
	cmp	eax,[checker_ed.Lines.Count]
1008
	mov	eax,[cur_editor.Lines.Count]
1003
	je	@f
1009
	cmp	eax,[checker_ed.Lines.Count]
1004
	or	dl,REDRAW_TEXT+REDRAW_VSCROLL+REDRAW_HSCROLL
1010
	je	@f
1005
    @@: mov	eax,[cur_editor.TopLeft.Y]
1011
	or	dl,REDRAW_TEXT+REDRAW_VSCROLL+REDRAW_HSCROLL
Line 1012... Line 1018...
1012
	or	dl,REDRAW_TEXT+REDRAW_HSCROLL
1018
	je	@f
1013
    @@: or	dl,dl
1019
	or	dl,REDRAW_TEXT+REDRAW_HSCROLL
1014
	jnz	.redraw
1020
    @@: or	dl,dl
1015
 
1021
	jnz	.redraw
Line 1016... Line -...
1016
	mov	ecx,[cur_editor.Caret.Y]
-
 
1017
	call	get_line_offset
-
 
1018
	call	get_real_length
-
 
1019
	cmp	eax,[checker_ed_ll]
1022
 
1020
	je	@f
1023
	cmp	ecx,[checker_ed_ll]
1021
	mov	[checker_ed_ll],eax
1024
	je	@f
1022
	or	dl,REDRAW_ONELINE
1025
	mov	[checker_ed_ll],ecx
1023
    @@:
1026
	or	dl,REDRAW_ONELINE
1024
	mov	eax,[cur_editor.Caret.Y]
1027
    @@:
1025
	cmp	eax,[checker_ed.Caret.Y]
1028
	mov	eax,[cur_editor.Caret.Y]
1026
	je	@f
1029
	cmp	eax,[checker_ed.Caret.Y]
Line 1105... Line 1108...
1105
	call	draw_editor_caret
1108
    @@: call	draw_editor_text.part
1106
	jmp	.exit
1109
	call	draw_editor_caret
1107
 
1110
	jmp	.exit
Line 1108... Line 1111...
1108
  .redraw:
1111
 
-
 
1112
  .redraw:
1109
	push	edx
1113
	mov	[checker_ed_ll],ecx
1110
	call	draw_editor_gutter
1114
	push	edx
1111
	call	draw_editor_text
1115
	call	draw_editor_gutter
1112
	call	draw_editor_caret
1116
	call	draw_editor_text
1113
	test	byte[esp],REDRAW_VSCROLL
1117
	call	draw_editor_caret