Subversion Repositories Kolibri OS

Rev

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

Rev 1705 Rev 1706
Line 71... Line 71...
71
		cmp ebx,MAX_OPT_FIELDS
71
		cmp ebx,MAX_OPT_FIELDS
72
	jl .draw_column
72
	jl .draw_column
73
	.exit_fun:
73
	.exit_fun:
74
	ret
74
	ret
Line -... Line 75...
-
 
75
 
75
 
76
;¯®¤­¨¬ ¥¬ ®¡ê¥ªâ ¢¢¥àå ¯® ᯨáªã
76
align 4
77
align 4
77
but_obj_move_up:
78
but_obj_move_up:
78
	stdcall [tl_node_move_up], tree2
79
	stdcall [tl_node_move_up], tree2
Line -... Line 80...
-
 
80
	ret
79
	ret
81
 
80
 
82
;®¯ã᪠¥¬ ®¡ê¥ªâ ¢­¨§ ¯® ᯨáªã
81
align 4
83
align 4
82
but_obj_move_down:
84
but_obj_move_down:
Line -... Line 85...
-
 
85
	stdcall [tl_node_move_down], tree2
-
 
86
	ret
-
 
87
 
-
 
88
;ª®¯¨à㥬 ®¡ê¥ªâ
-
 
89
align 4
-
 
90
but_obj_copy:
-
 
91
push ecx esi edi
-
 
92
	stdcall [tl_node_get_data], tree2
-
 
93
	pop esi
-
 
94
	mov edi,[tree2.data_info] ;¤ ­­ë¥ 0-£® 㧫 , ¨á¯®«ì§ã¥¬ ¤«ï ª®¯¨à®¢ ­¨ï
-
 
95
	xor ecx,ecx
-
 
96
	mov cx,word[tree2.info_size]
-
 
97
	cld
-
 
98
	rep movsb
-
 
99
pop edi esi ecx
-
 
100
	ret
-
 
101
 
-
 
102
;¢áâ ¢«ï¥¬ ®¡ê¥ªâ
-
 
103
align 4
-
 
104
but_obj_paste:
-
 
105
push eax ebx ecx edi
-
 
106
		mov eax,[tree2.data_info] ;¤ ­­ë¥ 0-£® 㧫 , ¨á¯®«ì§ã¥¬ ¤«ï ª®¯¨à®¢ ­¨ï
-
 
107
		mov bl,byte[eax]
-
 
108
		call find_obj_in_opt
-
 
109
		xor ecx,ecx
-
 
110
		mov cx,word[edi+obj_opt.img-obj_opt] ;cx - ¨­¤¥ªá £« ¢­®© ¨ª®­ª¨ ¤®¡ ¢«ï¥¬®£® ®¡ê¥ªâ 
-
 
111
		shl ecx,16
-
 
112
		stdcall [tl_node_add], eax, ecx, tree2 ;¤®¡ ¢«ï¥¬ ®¡ê¥ªâ
-
 
113
		stdcall [tl_draw], tree2
83
	stdcall [tl_node_move_down], tree2
114
pop edi ecx ebx eax
84
	ret
115
	ret
85
 
116
 
86
;®¡­®¢«¥­¨¥ ®¡ê¥ªâ®¢ ¢ tree2, ¯® §­ ç¥­¨ï¬ ⥪á⮢ëå ¯®«¥©
117
;®¡­®¢«¥­¨¥ ®¡ê¥ªâ®¢ ¢ tree2, ¯® §­ ç¥­¨ï¬ ⥪á⮢ëå ¯®«¥©
87
;äã­ªæ¨ï ®¡à â­ ï ª ¤ ­­®© on_file_object_select
118
;äã­ªæ¨ï ®¡à â­ ï ª ¤ ­­®© on_file_object_select