Subversion Repositories Kolibri OS

Rev

Rev 7466 | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 7466 Rev 10017
Line 8... Line 8...
8 
    WIN_HEIGHT  = (LIST_HEIGHT + 80)
 8 
    WIN_HEIGHT  = (LIST_HEIGHT + 80)
Line 9... Line 9...
9 
 
 9 
 
10 
    use32
 10 
    use32
11 
    org     0
 11 
    org     0
12 
    db	    'MENUET01'
 12 
    db      'MENUET01'
- 
 
 13 
    dd      1, main, dataend, memory, memory
- 
 
 14 
M01header.params:
Line 13... Line 15...
13 
    dd	    1, main, dataend, memory, memory, params, 0
 15 
    dd      params, 0
14 
 
 16 
 
15 
    include "../../proc32.inc"
 17 
    include "../../proc32.inc"
16 
    include "../../macros.inc"
 18 
    include "../../macros.inc"
Line 176... Line 178...
176 
 main:
 178 
 main:
177 
    mcall   68, 11
 179 
    mcall   68, 11
178 
    stdcall dll.Load, imports
 180 
    stdcall dll.Load, imports
Line 179... Line 181...
179 
 
 181 
 
180 
if DEBUG eq 1
 182 
if DEBUG eq 1
181 
    stdcall string.copy, std_param, params
 183 
    stdcall string.copy, std_param, [M01header.params]
Line 182... Line 184...
182 
end if
 184 
end if
183 
 
 185 
 
184 
 ;; trim params
 186 
 ;; trim params
185 
	stdcall string.copy, params, paramorig
 187 
        stdcall string.copy, [M01header.params], paramorig
186 
    stdcall string.trim_last, paramorig
 188 
    stdcall string.trim_last, paramorig
Line 187... Line 189...
187 
    stdcall string.trim_first, paramorig
 189 
    stdcall string.trim_first, paramorig
188 
	mov     [param_s], eax
 190 
        mov     [param_s], eax
189 
 
 191 
 
190 
    stdcall string.to_lower_case, params
 192 
    stdcall string.to_lower_case, [M01header.params]
Line 191... Line 193...
191 
    stdcall string.trim_last, params
 193 
    stdcall string.trim_last, [M01header.params]
192 
    stdcall string.trim_first, params
 194 
    stdcall string.trim_first, [M01header.params]
Line 1056... Line 1058...
1056 
 buffer4 rb 2048 ;OD
 1058 
 buffer4 rb 2048 ;OD
1057 
 buffer5 rb 2048 ;OD
 1059 
 buffer5 rb 2048 ;OD
1058 
 buffer6 rb 2048 ;check existance
 1060 
 buffer6 rb 2048 ;check existance
1059 
 buffer7 rb 32	 ;for sorting
 1061 
 buffer7 rb 32   ;for sorting
1060 
 buffer8 rd 2048
 1062 
 buffer8 rd 2048
1061 
 params rb 2048
 - 
 
1062 
 paramorig rb 2048
 1063 
 paramorig rb 2048
1063 
 _stack rb 2048
 1064 
 _stack rb 2048
- 
 
 1065 
 params rb 256
1064 
 memory:
 1066 
 memory: