Rev 111 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed
| Rev 111 | Rev 135 | ||
|---|---|---|---|
| Line 1... | Line -... | ||
| 1 | lang equ ru ; ru en fr ge fi |
- | |
| 2 | - | ||
| 3 | ; |
1 | ; |
| 4 | ; Assembler |
2 | ; Assembler |
| 5 | ; SMALL |
3 | ; SMALL |
| 6 | ; CODE |
4 | ; CODE |
| 7 | ; Libary |
5 | ; Libary |
| Line 218... | Line 216... | ||
| 218 | ; |
216 | ; |
| Line 219... | Line 217... | ||
| 219 | 217 | ||
| 220 | cld |
218 | cld |
| 221 | ;; mov esi,path |
219 | ;; mov esi,path |
| 222 | mov edi,path |
220 | mov edi,path |
| 223 | mov eax,0 |
221 | xor eax,eax |
| 224 | mov ecx,200 |
222 | mov ecx,(1024+16)/4 |
| Line 225... | Line 223... | ||
| 225 | rep stosb |
223 | rep stosd |
| 226 | 224 | ||
| Line 227... | Line 225... | ||
| 227 | ;mov [get_loops],0 |
225 | ;mov [get_loops],0 |
| Line 262... | Line 260... | ||
| 262 | 260 | ||
| 263 | ; define IPC memory |
261 | ; define IPC memory |
| 264 | mov eax,60 |
262 | mov eax,60 |
| 265 | mov ebx,1 ; define IPC |
263 | mov ebx,1 ; define IPC |
| 266 | mov ecx,path ; offset of area |
264 | mov ecx,path ; offset of area |
| 267 | mov edx,150 ; size 150 bytes |
265 | mov edx,1024+16 ; size |
| Line 268... | Line 266... | ||
| 268 | int 0x40 |
266 | int 0x40 |
| 269 | 267 | ||
| 270 | ; change wanted events list 7-bit IPC event |
268 | ; change wanted events list 7-bit IPC event |
| Line 274... | Line 272... | ||
| 274 | 272 | ||
| 275 | ; |
273 | ; |
| 276 | ; STEP 3 run SYSTEM XTREE with parameters |
274 | ; STEP 3 run SYSTEM XTREE with parameters |
| Line 277... | Line 275... | ||
| 277 | ; |
275 | ; |
| 278 | 276 | ||
| 279 | mov eax,58 |
277 | mov eax,70 |
| Line 280... | Line 278... | ||
| 280 | mov ebx,run_fileinfo |
278 | mov ebx,run_fileinfo |
| Line 281... | Line 279... | ||
| 281 | int 0x40 |
279 | int 0x40 |
| 282 | 280 | ||
| 283 | call redproc |
281 | call redproc |
| 284 | 282 | ||
| 285 | mov [get_loops],0 |
283 | mov [get_loops],0 |
| 286 | getmesloop: |
- | |
| 287 | mov eax,23 |
284 | getmesloop: |
| 288 | mov ebx,50 ;0.5 sec |
285 | mov eax,23 |
| 289 | int 0x40 |
286 | mov ebx,50 ;0.5 sec |
| 290 | 287 | int 0x40 |
|
| 291 | cmp eax,1 |
288 | dec eax |
| 292 | je mred |
289 | jz mred |
| 293 | cmp eax,2 |
290 | dec eax |
| 294 | je mkey |
291 | jz mkey |
| Line 295... | Line 292... | ||
| 295 | cmp eax,3 |
292 | dec eax |
| 296 | je mbutton |
293 | jz mbutton |
| 297 | cmp eax,7 |
294 | cmp al, 7-3 |
| 298 | je mgetmes |
295 | jz mgetmes |
| Line 386... | Line 383... | ||
| 386 | ; shl path string on 16 bytes |
383 | ; shl path string on 16 bytes |
| 387 | ; |
384 | ; |
| 388 | cld |
385 | cld |
| 389 | mov esi,path+16 |
386 | mov esi,path+16 |
| 390 | mov edi,path |
387 | mov edi,path |
| 391 | mov ecx,200 |
388 | mov ecx,1024/4 |
| 392 | rep movsb |
389 | rep movsd |
| 393 | mov [edi],byte 0 |
390 | mov [edi],byte 0 |
| Line 394... | Line 391... | ||
| 394 | 391 | ||
| Line 403... | Line 400... | ||
| 403 | param: |
400 | param: |
| 404 | dd 0 ; My dec PID |
401 | dd 0 ; My dec PID |
| 405 | dd 0,0 ; Type of dialog |
402 | dd 0,0 ; Type of dialog |
| Line 406... | Line 403... | ||
| 406 | 403 | ||
| 407 | run_fileinfo: |
404 | run_fileinfo: |
| 408 | dd 16 |
405 | dd 7 |
| 409 | dd 0 |
406 | dd 0 |
| 410 | dd param |
407 | dd param |
| 411 | dd 0 |
408 | dd 0 |
| 412 | dd procinfo ; 0x10000 |
409 | dd 0 |
| 413 | ;run_filepath |
410 | ;run_filepath |
| Line 414... | Line 411... | ||
| 414 | db '/RD/1/SYSXTREE',0 |
411 | db '/RD/1/SYSXTREE',0 |
| 415 | 412 | ||
| Line 430... | Line 427... | ||
| 430 | ; |
427 | ; |
| Line 431... | Line 428... | ||
| 431 | 428 | ||
| 432 | cld |
429 | cld |
| 433 | ;; mov esi,path |
430 | ;; mov esi,path |
| 434 | mov edi,path |
431 | mov edi,path |
| 435 | mov eax,0 |
432 | xor eax,eax |
| 436 | mov ecx,200 |
433 | mov ecx,(1024+16)/4 |
| Line 437... | Line 434... | ||
| 437 | rep stosb |
434 | rep stosd |
| 438 | 435 | ||
| Line 439... | Line 436... | ||
| 439 | ;mov [get_loops],0 |
436 | ;mov [get_loops],0 |
| Line 474... | Line 471... | ||
| 474 | 471 | ||
| 475 | ; define IPC memory |
472 | ; define IPC memory |
| 476 | mov eax,60 |
473 | mov eax,60 |
| 477 | mov ebx,1 ; define IPC |
474 | mov ebx,1 ; define IPC |
| 478 | mov ecx,path ; offset of area |
475 | mov ecx,path ; offset of area |
| 479 | mov edx,150 ; size 150 bytes |
476 | mov edx,1024+16 ; size |
| Line 480... | Line 477... | ||
| 480 | int 0x40 |
477 | int 0x40 |
| 481 | 478 | ||
| 482 | ; change wanted events list 7-bit IPC event |
479 | ; change wanted events list 7-bit IPC event |
| Line 486... | Line 483... | ||
| 486 | 483 | ||
| 487 | ; |
484 | ; |
| 488 | ; STEP 3 run SYSTEM XTREE with parameters |
485 | ; STEP 3 run SYSTEM XTREE with parameters |
| Line 489... | Line 486... | ||
| 489 | ; |
486 | ; |
| 490 | 487 | ||
| 491 | mov eax,58 |
488 | mov eax,70 |
| Line 492... | Line 489... | ||
| 492 | mov ebx,run_fileinfo |
489 | mov ebx,run_fileinfo |
| Line 493... | Line 490... | ||
| 493 | int 0x40 |
490 | int 0x40 |
| 494 | 491 | ||
| 495 | call redproc |
492 | call redproc |
| 496 | 493 | ||
| 497 | mov [get_loops],0 |
494 | mov [get_loops],0 |
| 498 | getmesloop: |
- | |
| 499 | mov eax,23 |
495 | getmesloop: |
| 500 | mov ebx,50 ;0.5 sec |
496 | mov eax,23 |
| 501 | int 0x40 |
497 | mov ebx,50 ;0.5 sec |
| 502 | 498 | int 0x40 |
|
| 503 | cmp eax,1 |
499 | dec eax |
| 504 | je mred |
500 | jz mred |
| 505 | cmp eax,2 |
501 | dec eax |
| 506 | je mkey |
502 | jz mkey |
| Line 507... | Line 503... | ||
| 507 | cmp eax,3 |
503 | dec eax |
| 508 | je mbutton |
504 | jz mbutton |
| 509 | cmp eax,7 |
505 | cmp al, 7-3 |
| 510 | je mgetmes |
506 | jz mgetmes |
| Line 598... | Line 594... | ||
| 598 | ; shl path string on 16 bytes |
594 | ; shl path string on 16 bytes |
| 599 | ; |
595 | ; |
| 600 | cld |
596 | cld |
| 601 | mov esi,path+16 |
597 | mov esi,path+16 |
| 602 | mov edi,path |
598 | mov edi,path |
| 603 | mov ecx,200 |
599 | mov ecx,1024/4 |
| 604 | rep movsb |
600 | rep movsd |
| 605 | mov [edi],byte 0 |
601 | mov [edi],byte 0 |
| Line 606... | Line 602... | ||
| 606 | 602 | ||
| Line 615... | Line 611... | ||
| 615 | param: |
611 | param: |
| 616 | dd 0 ; My dec PID |
612 | dd 0 ; My dec PID |
| 617 | dd 0,0 ; Type of dialog |
613 | dd 0,0 ; Type of dialog |
| Line 618... | Line 614... | ||
| 618 | 614 | ||
| 619 | run_fileinfo: |
615 | run_fileinfo: |
| 620 | dd 16 |
616 | dd 7 |
| 621 | dd 0 |
617 | dd 0 |
| 622 | dd param |
618 | dd param |
| 623 | dd 0 |
619 | dd 0 |
| 624 | dd procinfo |
620 | dd 0 |
| 625 | ;run_filepath: |
621 | ;run_filepath: |
| Line 626... | Line 622... | ||
| 626 | db '/RD/1/SYSXTREE',0 |
622 | db '/RD/1/SYSXTREE',0 |
| 627 | 623 | ||