Subversion Repositories Kolibri OS

Compare Revisions

Regard whitespace Rev 3839 → Rev 3840

/programs/fs/kfm/trunk/creatdir.inc
25,7 → 25,7
;-------------------------------------------------------------
.button_create:
mov eax,17
int 0x40
mcall
test ah,ah
jz .still
cmp ah,160
49,7 → 49,7
;-------------------------------------------------------------
.key_create:
mov eax,2
int 0x40
mcall
cmp ah,13
je .exit_with_create
cmp ah,27
87,10 → 87,10
mov esi,0xffffff
mov edx,0x40000000+160
mov eax,8
int 0x40
mcall
add ebx,50 shl 16
inc edx
int 0x40
mcall
popa
 
push ebx ecx
104,15 → 104,15
sub ebx,1 shl 16
mov bx,42
mov cx,17
int 0x40
mcall
add ebx,50 shl 16
int 0x40
mcall
pop ecx ebx
mov edx,0xff7700
int 0x40
mcall
mov edx,0xaa00
add ebx,50 shl 16
int 0x40
mcall
pop ecx ebx
 
shr ecx,16
121,10 → 121,10
mcall 4, ,0x90ffffff,create_dir ;[confirmation_type]
add ebx,48 shl 16+36
mov edx,type_yes
int 0x40
mcall
add ebx,56 shl 16
mov edx,type_no
int 0x40
mcall
ret
;-------------------------------------------------------------
create_directory_1: