Subversion Repositories Kolibri OS

Rev

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

Rev 180 Rev 255
Line 10... Line 10...
10 
;
 10 
;
Line 11... Line 11...
11 
 
 11 
 
12 
    cld
 12 
    cld
13 
;;    mov esi,path
 13 
;;    mov esi,path
14 
    mov edi,path
 14 
    mov edi,path
15 
    mov eax,0
 15 
    xor eax,eax
16 
    mov ecx,200
 16 
    mov ecx,(1024+16)/4
Line 17... Line 17...
17 
    rep stosb
 17 
    rep stosd
18 
 
 18 
 
Line 19... Line 19...
19 
;mov [get_loops],0
 19 
;mov [get_loops],0
Line 54... Line 54...
54 
 
 54 
 
55 
; define IPC memory
 55 
; define IPC memory
56 
    mov eax,60
 56 
    mov eax,60
57 
    mov ebx,1	     ; define IPC
 57 
    mov ebx,1	     ; define IPC
58 
    mov ecx,path     ; offset of area
 58 
    mov ecx,path     ; offset of area
59 
    mov edx,150      ; size 150 bytes
 59 
    mov edx,1024+16  ; size
Line 60... Line 60...
60 
    int 0x40
 60 
    int 0x40
61 
 
 61 
 
62 
; change wanted events list 7-bit IPC event
 62 
; change wanted events list 7-bit IPC event
Line 66... Line 66...
66 
 
 66 
 
67 
;
 67 
;
68 
; STEP 3 run SYSTEM XTREE with parameters
 68 
; STEP 3 run SYSTEM XTREE with parameters
Line 69... Line 69...
69 
;
 69 
;
70 
 
 70 
 
71 
    mov eax,58
 71 
    mov eax,70
Line 72... Line 72...
72 
    mov ebx,run_fileinfo
 72 
    mov ebx,run_fileinfo
Line 73... Line 73...
73 
    int 0x40
 73 
    int 0x40
74 
 
 74 
 
75 
    call redproc
 75 
    call redproc
76 
 
 76 
 
77 
    mov [get_loops],0
 77 
    mov [get_loops],0
78 
getmesloop:
 - 
 
79 
    mov eax,23
 78 
getmesloop:
80 
    mov ebx,50	   ;0.5 sec
 79 
    mov eax,23
81 
    int 0x40
 80 
    mov ebx,50	   ;0.5 sec
82 
 
 81 
    int 0x40
83 
    cmp eax,1
 82 
        dec     eax
84 
    je	mred
 83 
        jz      mred
85 
    cmp eax,2
 84 
        dec     eax
86 
    je	mkey
 85 
        jz      mkey
Line 87... Line 86...
87 
    cmp eax,3
 86 
        dec     eax
88 
    je	mbutton
 87 
        jz      mbutton
89 
    cmp eax,7
 88 
        cmp     al, 7-3
90 
    je	mgetmes
 89 
        jz      mgetmes
Line 178... Line 177...
178 
; shl path string on 16 bytes
 177 
; shl path string on 16 bytes
179 
;
 178 
;
180 
    cld
 179 
    cld
181 
    mov esi,path+16
 180 
    mov esi,path+16
182 
    mov edi,path
 181 
    mov edi,path
183 
    mov ecx,200
 182 
    mov ecx,1024/4
184 
    rep movsb
 183 
    rep movsd
185 
    mov [edi],byte 0
 184 
    mov [edi],byte 0
Line 186... Line 185...
186 
 
 185 
 
Line 195... Line 194...
195 
param:
 194 
param:
196 
   dd 0    ; My dec PID
 195 
   dd 0    ; My dec PID
197 
   dd 0,0  ; Type of dialog
 196 
   dd 0,0  ; Type of dialog
Line 198... Line 197...
198 
 
 197 
 
199 
run_fileinfo:
 198 
run_fileinfo:
200 
 dd 16
 199 
 dd 7
201 
 dd 0
 200 
 dd 0
202 
 dd param
 201 
 dd param
203 
 dd 0
 202 
 dd 0
204 
 dd procinfo ; 0x10000
 203 
 dd 0
205 
;run_filepath
 204 
;run_filepath
Line 206... Line 205...
206 
 db '/RD/1/SYSXTREE',0
 205 
 db '/RD/1/SYSXTREE',0
207 
 
 206 
 
Line 222... Line 221...
222 
;
 221 
;
Line 223... Line 222...
223 
 
 222 
 
224 
    cld
 223 
    cld
225 
;;    mov esi,path
 224 
;;    mov esi,path
226 
    mov edi,path
 225 
    mov edi,path
227 
    mov eax,0
 226 
    xor eax,eax
228 
    mov ecx,200
 227 
    mov ecx,(1024+16)/4
Line 229... Line 228...
229 
    rep stosb
 228 
    rep stosb
230 
 
 229 
 
Line 266... Line 265...
266 
 
 265 
 
267 
; define IPC memory
 266 
; define IPC memory
268 
    mov eax,60
 267 
    mov eax,60
269 
    mov ebx,1	     ; define IPC
 268 
    mov ebx,1	     ; define IPC
270 
    mov ecx,path ; offset of area
 269 
    mov ecx,path     ; offset of area
271 
    mov edx,150      ; size 150 bytes
 270 
    mov edx,1024+16  ; size
Line 272... Line 271...
272 
    int 0x40
 271 
    int 0x40
273 
 
 272 
 
274 
; change wanted events list 7-bit IPC event
 273 
; change wanted events list 7-bit IPC event
Line 278... Line 277...
278 
 
 277 
 
279 
;
 278 
;
280 
; STEP 3 run SYSTEM XTREE with parameters
 279 
; STEP 3 run SYSTEM XTREE with parameters
Line 281... Line 280...
281 
;
 280 
;
282 
 
 281 
 
283 
    mov eax,58
 282 
    mov eax,70
Line 284... Line 283...
284 
    mov ebx,run_fileinfo
 283 
    mov ebx,run_fileinfo
Line 285... Line 284...
285 
    int 0x40
 284 
    int 0x40
286 
 
 285 
 
287 
    call redproc
 286 
    call redproc
288 
 
 287 
 
289 
    mov [get_loops],0
 288 
    mov [get_loops],0
290 
getmesloop:
 - 
 
291 
    mov eax,23
 289 
getmesloop:
292 
    mov ebx,50	   ;0.5 sec
 290 
    mov eax,23
293 
    int 0x40
 291 
    mov ebx,50	   ;0.5 sec
294 
 
 292 
    int 0x40
295 
    cmp eax,1
 293 
        dec     eax
296 
    je	mred
 294 
        jz      mred
297 
    cmp eax,2
 295 
        dec     eax
298 
    je	mkey
 296 
        jz      mkey
Line 299... Line 297...
299 
    cmp eax,3
 297 
        dec     eax
300 
    je	mbutton
 298 
        jz      mbutton
301 
    cmp eax,7
 299 
        cmp     al, 7-3
302 
    je	mgetmes
 300 
        jz      mgetmes
Line 390... Line 388...
390 
; shl path string on 16 bytes
 388 
; shl path string on 16 bytes
391 
;
 389 
;
392 
    cld
 390 
    cld
393 
    mov esi,path+16
 391 
    mov esi,path+16
394 
    mov edi,path
 392 
    mov edi,path
395 
    mov ecx,200
 393 
    mov ecx,1024/4
396 
    rep movsb
 394 
    rep movsd
397 
    mov [edi],byte 0
 395 
    mov [edi],byte 0
Line 398... Line 396...
398 
 
 396 
 
Line 407... Line 405...
407 
param:
 405 
param:
408 
   dd 0  ; My dec PID
 406 
   dd 0  ; My dec PID
409 
   dd 0,0  ; Type of dialog
 407 
   dd 0,0  ; Type of dialog
Line 410... Line 408...
410 
 
 408 
 
411 
run_fileinfo:
 409 
run_fileinfo:
412 
 dd 16
 410 
 dd 7
413 
 dd 0
 411 
 dd 0
414 
 dd param
 412 
 dd param
415 
 dd 0
 413 
 dd 0
416 
 dd procinfo
 414 
 dd 0
417 
;run_filepath:
 415 
;run_filepath:
Line 418... Line 416...
418 
 db '/RD/1/SYSXTREE',0
 416 
 db '/RD/1/SYSXTREE',0
419 
 
 417