Subversion Repositories Kolibri OS

Rev

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

Rev 1607 Rev 1654
Line 52... Line 52...
52 
;---------------------------------------------------------------------
 52 
;---------------------------------------------------------------------
53 
START:
 53 
START:
54 
	mcall	68,11
 54 
	mcall	68,11
55 
	mcall	66,1,1
 55 
	mcall	66,1,1
56 
	mcall	40,0x27
 56 
	mcall	40,0x27
57 
	call	get_active_pocess
 - 
 
58 
 
 - 
 
59 
	call	get_communication_area
 57 
	call	get_communication_area
Line -... Line 58...
- 
 
 58
- 
 
 59 
	call	get_active_pocess
60 
 
 60 
 
61 
load_libraries	l_libs_start,end_l_libs
 61 
load_libraries	l_libs_start,end_l_libs
62 
	test	eax,eax
 62 
	test	eax,eax
63 
	jnz	button.exit
 63 
	jnz	button.exit
64 
; initialize sort
 64 
; initialize sort
Line 372... Line 372...
372 
	jnz	@f
 372 
	jnz	@f
373 
	call	control_minimal_window_size
 373 
	call	control_minimal_window_size
374 
	call	draw_window
 374 
	call	draw_window
375 
	ret
 375 
	ret
376 
@@:
 376 
@@:
377 
	add	eax,12
 377 
	add	eax,16	;12
378 
;copy_path	user_selected_name,dir_pach,eax,0
 378 
;copy_path	user_selected_name,dir_pach,eax,0
379 
	mov	esi,dir_pach
 379 
	mov	esi,dir_pach
380 
	mov	edi,eax
 380 
	mov	edi,eax
381 
	call	copy_dir_name
 381 
	call	copy_dir_name
382 
	mov	[edi-1],byte '/'
 382 
	mov	[edi-1],byte '/'
Line 965... Line 965...
965 
	test	eax,eax
 965 
	test	eax,eax
966 
	jz	.1
 966 
	jz	.1
967 
	movzx	ebx,word [eax]
 967 
	movzx	ebx,word [eax]
968 
	test	eax,eax
 968 
	test	eax,eax
969 
	jz	.1
 969 
	jz	.1
970 
	add	eax,12 ;4
 970 
	add	eax,16	;12 ;4
971 
	mov	esi,eax
 971 
	mov	esi,eax
972 
	push	esi
 972 
	push	esi
973 
	mov	esi,[communication_area]
 973 
	mov	esi,[communication_area]
974 
	add	esi,3840 ;4096-256
 974 
	add	esi,3840 ;4096-256
975 
	mov	eax,[esi]
 975 
	mov	eax,[esi]
Line 1121... Line 1121...
1121 
	call	draw_window
 1121 
	call	draw_window
1122 
	pop	ebx
 1122 
	pop	ebx
1123 
	ret
 1123 
	ret
1124 
@@:
 1124 
@@:
1125 
	mov	edi,eax
 1125 
	mov	edi,eax
1126 
	add	edi,12
 1126 
	add	edi,16	;12
1127 
	mov	esi,file_name
1127 
	mov	esi,file_name
1128 
	call	copy_dir_name
 1128 
	call	copy_dir_name
Line 1129... Line 1129...
1129
1129
1130 
	pop	esi
 1130 
	pop	esi
Line 1620... Line 1620...
1620 
	mov	eax,[file_browser_data_1.max_panel_line]
 1620 
	mov	eax,[file_browser_data_1.max_panel_line]
1621 
	mov	[scroll_bar_data_vertical.cur_area],eax
 1621 
	mov	[scroll_bar_data_vertical.cur_area],eax
1622 
	ret
 1622 
	ret
1623 
;---------------------------------------------------------------------
 1623 
;---------------------------------------------------------------------
1624 
get_active_pocess:
 1624 
get_active_pocess:
- 
 
 1625 
;	mcall	9,procinfo,-1
- 
 
 1626 
;	mov	eax,[ebx+30]
- 
 
 1627 
;	mov	[PID],eax
- 
 
 1628 
;	xor	ecx,ecx
- 
 
 1629 
;@@:
- 
 
 1630 
;	inc	ecx
- 
 
 1631 
;	mcall	9,procinfo
- 
 
 1632 
;	mov	eax,[PID]
- 
 
 1633 
;	cmp	eax,[ebx+30]
- 
 
 1634 
;	jne	@r
- 
 
 1635 
;	mov	[active_process],ecx
- 
 
 1636 
 
1625 
	mcall	9,procinfo,-1
 1637 
	mcall	9,procinfo,-1
1626 
	mov	eax,[ebx+30]
 1638 
	mov	ecx,[ebx+30]	; PID
1627 
	mov	[PID],eax
 1639 
	mcall	18,21
1628 
	xor	ecx,ecx
 - 
 
1629 
@@:
 - 
 
1630 
	inc	ecx
 - 
 
1631 
	mcall	9,procinfo
 1640 
	mov	[active_process],eax	; WINDOW SLOT
1632 
	mov	eax,[PID]
 1641 
	mov	ebx,[communication_area]
1633 
	cmp	eax,[ebx+30]
 1642 
	test	ebx,ebx
1634 
	jne	@r
 1643 
	jz	.1
1635 
	mov	[active_process],ecx
 1644 
	mov	[ebx+12],eax	; WINDOW SLOT to com. area
- 
 
 1645 
.1:
1636 
	ret
 1646 
	ret
1637 
;---------------------------------------------------------------------
 1647 
;---------------------------------------------------------------------
1638 
get_window_param:
 1648 
get_window_param:
1639 
	mcall	9,procinfo,-1
 1649 
	mcall	9,procinfo,-1
1640 
	mov	eax,[ebx+66]
 1650 
	mov	eax,[ebx+66]