Subversion Repositories Kolibri OS

Rev

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

Rev 1837 Rev 1851
Line 1... Line 1...
1 
;**************************************************************
 1 
;*****************************************************************************
2 
; KFM - Kolibri File Manager
 2 
; KFM - Kolibri File Manager
- 
 
 3 
; Copyright (c) 2006 - 2010, Marat Zakiyanov aka Mario79, aka Mario
- 
 
 4 
; All rights reserved.
- 
 
 5 
;
- 
 
 6 
; Redistribution and use in source and binary forms, with or without
- 
 
 7 
; modification, are permitted provided that the following conditions are met:
- 
 
 8 
;        * Redistributions of source code must retain the above copyright
- 
 
 9 
;          notice, this list of conditions and the following disclaimer.
- 
 
 10 
;        * Redistributions in binary form must reproduce the above copyright
- 
 
 11 
;          notice, this list of conditions and the following disclaimer in the
- 
 
 12 
;          documentation and/or other materials provided with the distribution.
- 
 
 13 
;        * Neither the name of the  nor the
- 
 
 14 
;          names of its contributors may be used to endorse or promote products
- 
 
 15 
;          derived from this software without specific prior written permission.
- 
 
 16 
;
- 
 
 17 
; THIS SOFTWARE IS PROVIDED BY Marat Zakiyanov ''AS IS'' AND ANY
- 
 
 18 
; EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
- 
 
 19 
; WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
- 
 
 20 
; DISCLAIMED. IN NO EVENT SHALL  BE LIABLE FOR ANY
- 
 
 21 
; DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
- 
 
 22 
; (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
- 
 
 23 
; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
- 
 
 24 
; ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
- 
 
 25 
; (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
- 
 
 26 
; SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
3 
;**************************************************************
 27 
;*****************************************************************************
4 
use32
 28 
use32
- 
 
 29 
org	0x0
- 
 
 30 
 
5 
    db	  'MENUET01'
 31 
    db	  'MENUET01'
6 
    dd	  0x01
 32 
    dd	  0x01
7 
    dd	  START
 33 
    dd	  START
8 
    dd	  I_END
 34 
    dd	  I_END
9 
    dd	  mem
 35 
    dd	  mem
Line 11... Line 37...
11 
    dd	  0x0
 37 
    dd	  0x0
12 
    dd	  path
 38 
    dd	  path
Line 13... Line 39...
13 
 
 39 
 
14 
;include   'lang.inc'
 40 
;include   'lang.inc'
15 
;include   'kglobals.inc'
 41 
;include   'kglobals.inc'
- 
 
 42 
;include   'macros.inc'
- 
 
 43 
include '../../../macros.inc'
- 
 
 44 
include '../../../config.inc'		;for nightbuild
16 
include   'macros.inc'
 45 
 
17 
include   'editbox.inc'
 46 
include   'editbox.inc'
18 
;use_edit_box
 47 
;use_edit_box
19 
use_edit_box procinfo
 48 
use_edit_box procinfo
20 
;include   'ASCGL.INC'
 49 
;include   'ASCGL.INC'
Line 116... Line 145...
116 
    mcall 0, <20,620>, <20,460>, 0x43cccccc   ; 0x805080D0, 0x005080D0
 145 
    mcall 0, <20,620>, <20,460>, 0x43cccccc   ; 0x805080D0, 0x005080D0
117 
    call  get_window_param
 146 
    call  get_window_param
118 
;    mov   ecx,[temp_esi]
 147 
;    mov   ecx,[temp_esi]
119 
    test  [window_status],10b
 148 
    test  [window_status],10b
120 
    jnz   @f
 149 
    jnz   @f
121 
    mcall 71, 1 , header
 150 
    mcall 71, 1 , header_text
122 
    ; create_dir_name
 151 
    ; create_dir_name
123 
    ; start_parameter
 152 
    ; start_parameter
124 
    ; file_name
 153 
    ; file_name
125 
    ; [temp_edi]
 154 
    ; [temp_edi]
126 
    ; header
 155 
    ; header