Subversion Repositories Kolibri OS

Rev

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

Rev 1102 Rev 1143
Line 23... Line 23...
23 
 
 23 
 
24 
	stdcall dll.Load, @IMPORT
 24 
	stdcall dll.Load, @IMPORT
25 
	or	eax, eax
 25 
	or	eax, eax
Line 26... Line 26...
26 
	jnz	exit
 26 
	jnz	exit
Line 27... Line 27...
27 
 
 27 
 
28 
	invoke	sort.START, 1
 28 
;	invoke	sort.START, 1
29 
 
 29 
 
30 
	mov	ecx, 1	; for 15.4: 1 = tile
 30 
	mov	ecx, 1	; for 15.4: 1 = tile
Line 538... Line 538...
538 
	mov	eax, [directory_ptr]
 538 
	mov	eax, [directory_ptr]
539 
	pop	ebx
 539 
	pop	ebx
540 
	mov	[eax+4], ebx
 540 
	mov	[eax+4], ebx
541 
	test	ebx, ebx
 541 
	test	ebx, ebx
542 
	jz	free_directory
 542 
	jz	free_directory
543 
	push	0	; sort mode
 543 
;	push	0	; sort mode
544 
	push	ebx
 544 
;	push	ebx
545 
	add	eax, 32
 545 
;	add	eax, 32
546 
	push	eax
 546 
;	push	eax
547 
	call	[SortDir]
 547 
;	call	[SortDir]
548 
	xor	eax, eax
 548 
	xor	eax, eax
549 
	mov	edi, [directory_ptr]
 549 
	mov	edi, [directory_ptr]
550 
	add	edi, 32 + 40
 550 
	add	edi, 32 + 40
551 
.scan:
 551 
.scan:
552 
	mov	esi, [last_name_component]
 552 
	mov	esi, [last_name_component]
553 
	inc	esi
 553 
	inc	esi
554 
	push	edi
 554 
;	push	edi
555 
	invoke	strcmpi
 555 
;	invoke	strcmpi
556 
	pop	edi
 556 
;	pop	edi
557 
	jz	.found
 557 
	jz	.found
558 
	inc	eax
 558 
	inc	eax
559 
	add	edi, 304
 559 
	add	edi, 304
560 
	dec	ebx
 560 
	dec	ebx
561 
	jnz	.scan
 561 
	jnz	.scan
Line 993... Line 993...
993 
@IMPORT:
 993 
@IMPORT:
Line 994... Line 994...
994 
 
 994 
 
995 
library 			\
 995 
library 			\
996 
	libio  , 'libio.obj'  , \
 996 
	libio  , 'libio.obj'  , \
997 
	libgfx , 'libgfx.obj' , \
 997 
	libgfx , 'libgfx.obj' , \
998 
	libimg , 'libimg.obj' , \
 998 
	libimg , 'libimg.obj' ;, \
Line 999... Line 999...
999 
	sort   , 'sort.obj'
 999 
;	sort   , 'sort.obj'
1000 
 
 1000 
 
1001 
import	libio			  , \
 1001 
import	libio			  , \
1002 
	libio.init , 'lib_init'   , \
 1002 
	libio.init , 'lib_init'   , \
Line 1020... Line 1020...
1020 
	img.flip    , 'img_flip'   , \
 1020 
	img.flip    , 'img_flip'   , \
1021 
	img.rotate  , 'img_rotate' , \
 1021 
	img.rotate  , 'img_rotate' , \
1022 
	img.destroy , 'img_destroy', \
 1022 
	img.destroy , 'img_destroy', \
1023 
	img.draw    , 'img_draw'
 1023 
	img.draw    , 'img_draw'
Line 1024... Line 1024...
1024 
 
 1024 
 
Line 1025... Line 1025...
1025 
import  sort, sort.START, 'START', SortDir, 'SortDir', strcmpi, 'strcmpi'
 1025 
;import  sort, sort.START, 'START', SortDir, 'SortDir', strcmpi, 'strcmpi'
1026 
 
 1026 
 
Line 1027... Line 1027...
1027 
bFirstDraw	db	0
 1027 
bFirstDraw	db	0