Subversion Repositories Kolibri OS

Rev

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

Rev 1792 Rev 3840
Line 95... Line 95...
95 
	mouse_edit_box copy_editboxes
 95 
	mouse_edit_box copy_editboxes
96 
	jmp .still
 96 
	jmp .still
97 
;-------------------------------------------------------------
 97 
;-------------------------------------------------------------
98 
.button_copy:
 98 
.button_copy:
99 
    mov eax,17
 99 
    mov eax,17
100 
    int 0x40
 100 
	mcall
101 
    test ah,ah
 101 
    test ah,ah
102 
    jz	.still
 102 
    jz	.still
103 
    cmp  ah,160
 103 
    cmp  ah,160
104 
    je	.exit_with_copy
 104 
    je	.exit_with_copy
105 
    cmp  ah,161
 105 
    cmp  ah,161
Line 125... Line 125...
125 
    mov  [move_file_flag],0
 125 
    mov  [move_file_flag],0
126 
    jmp  red
 126 
    jmp  red
127 
;-------------------------------------------------------------
 127 
;-------------------------------------------------------------
128 
.key_copy:
 128 
.key_copy:
129 
    mov eax,2
 129 
    mov eax,2
130 
    int 0x40
 130 
	mcall
131 
    cmp ah,13
 131 
    cmp ah,13
132 
    je	.exit_with_copy
 132 
    je	.exit_with_copy
133 
    cmp ah,27
 133 
    cmp ah,27
134 
    je	.exit_without_copy
 134 
    je	.exit_without_copy
135 
    key_edit_box copy_editboxes
 135 
    key_edit_box copy_editboxes
Line 163... Line 163...
163 
    mov   cx,15
 163 
    mov   cx,15
164 
    mov   bx,40
 164 
    mov   bx,40
165 
    mov   esi,0xffffff
 165 
    mov   esi,0xffffff
166 
    mov   edx,0x40000000+160
 166 
    mov   edx,0x40000000+160
167 
    mov   eax,8
 167 
    mov   eax,8
168 
    int   0x40
 168 
	mcall
169 
    add   ebx,50 shl 16
 169 
    add   ebx,50 shl 16
170 
    inc   edx
 170 
    inc   edx
171 
    int   0x40
 171 
	mcall
172 
    popa
 172 
    popa
Line 173... Line 173...
173 
 
 173 
 
174 
    push  ebx ecx
 174 
    push  ebx ecx
175 
    add   ebx,70 shl 16
 175 
    add   ebx,70 shl 16
Line 180... Line 180...
180 
    push  ebx ecx
 180 
    push  ebx ecx
181 
    sub   ecx,1 shl 16
 181 
    sub   ecx,1 shl 16
182 
    sub   ebx,1 shl 16
 182 
    sub   ebx,1 shl 16
183 
    mov   bx,42
 183 
    mov   bx,42
184 
    mov   cx,17
 184 
    mov   cx,17
185 
    int   0x40
 185 
	mcall
186 
    add   ebx,50 shl 16
 186 
    add   ebx,50 shl 16
187 
    int   0x40
 187 
	mcall
188 
    pop   ecx ebx
 188 
    pop   ecx ebx
189 
    mov   edx,0xff7700
 189 
    mov   edx,0xff7700
190 
    int   0x40
 190 
	mcall
191 
    mov   edx,0xaa00
 191 
    mov   edx,0xaa00
192 
    add   ebx,50 shl 16
 192 
    add   ebx,50 shl 16
193 
    int   0x40
 193 
	mcall
194 
    pop   ecx ebx
 194 
    pop   ecx ebx
Line 195... Line 195...
195 
 
 195 
 
196 
    shr   ecx,16
 196 
    shr   ecx,16
197 
    mov   bx,cx
 197 
    mov   bx,cx
Line 204... Line 204...
204 
    mov   edx,copy_type_1
 204 
    mov   edx,copy_type_1
205 
@@:
 205 
@@:
206 
    mcall 4, ,0x90ffffff
 206 
    mcall 4, ,0x90ffffff
207 
    add   ebx,18 shl 16+36
 207 
    add   ebx,18 shl 16+36
208 
    mov   edx,type_yes
 208 
    mov   edx,type_yes
209 
    int   0x40
 209 
	mcall
210 
    add   ebx,56 shl 16
 210 
    add   ebx,56 shl 16
211 
    mov   edx,type_no
 211 
    mov   edx,type_no
212 
    int   0x40
 212 
	mcall
213 
	ret
 213 
	ret
214 
;-------------------------------------------------------------
 214 
;-------------------------------------------------------------
215 
copy_file_1:
 215 
copy_file_1:
216 
    mov  ebx,create_dir_name
 216 
    mov  ebx,create_dir_name
217 
.1:
 217 
.1: