Subversion Repositories Kolibri OS

Rev

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

Rev 1658 Rev 3418
Line 1... Line 1...
1
;*****************************************************************************
1
;*****************************************************************************
2
; Macro for use Open Dialog - for Kolibri OS
2
; Macro for use Open Dialog - for Kolibri OS
3
; Copyright (c) 2009 2010, Marat Zakiyanov aka Mario79, aka Mario
3
; Copyright (c) 2009-2013, Marat Zakiyanov aka Mario79, aka Mario
4
; All rights reserved.
4
; All rights reserved.
5
;
5
;
6
; Redistribution and use in source and binary forms, with or without
6
; Redistribution and use in source and binary forms, with or without
7
; modification, are permitted provided that the following conditions are met:
7
; modification, are permitted provided that the following conditions are met:
8
;	 * Redistributions of source code must retain the above copyright
8
;	 * Redistributions of source code must retain the above copyright
Line 23... Line 23...
23
; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
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
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
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.
26
; SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
27
;*****************************************************************************
27
;*****************************************************************************
-
 
28
;---------------------------------------------------------------------
-
 
29
;Some documentation for memory
-
 
30
;
-
 
31
;area name db 'FFFFFFFF_open_dialog',0 ; FFFFFFFF = PID
-
 
32
;
-
 
33
; communication area data
-
 
34
; flag  ; +0
-
 
35
; dw 0   ; 0 - empty, 1 - file for open, 2 -folder for open,
-
 
36
;          3 - cancel, 4 - path=name of area 6822.
-
 
37
;
-
 
38
; type of dialog:  0-Open, 1-Save, 2-Dir
-
 
39
; dw 0 ; +2
-
 
40
;
-
 
41
; window X size ; +4
-
 
42
; dw 0
-
 
43
;
-
 
44
; window X position ; +6 
-
 
45
; dw 0
-
 
46
;
-
 
47
; window y size ; +8
-
 
48
; dw 0
-
 
49
;
-
 
50
; window Y position ; +10
-
 
51
; dw 0
-
 
52
;
-
 
53
; OpenDialog WINDOW SLOT ; +12
-
 
54
; dd 0
-
 
55
;
-
 
56
; file_path ; +16
-
 
57
; rb 3824 ; path to file
-
 
58
;
-
 
59
; file name ; +3840
-
 
60
; rb 256
-
 
61
;
-
 
62
; filtration flag ; +4096
-
 
63
; dd 0 ; flag 0 - no filtration,  1 - filtering
-
 
64
;
-
 
65
; area for storage of filtering values ; +4100
-
 
66
; rb 4092
-
 
67
;---------------------------------------------------------------------
28
;*****************************************************************************
68
;*****************************************************************************
29
macro	OpenDialog_exit
69
macro	OpenDialog_exit
30
{
70
{
31
popa
71
popa
32
ret 4
72
ret 4