Subversion Repositories Kolibri OS

Rev

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

Rev 134 Rev 139
Line 89... Line 89...
89 
    mov  ecx,16
 89 
    mov  ecx,16
90 
    mov  edi,fileinfo.name
 90 
    mov  edi,fileinfo.name
91 
    mov  esi,fname_buf
 91 
    mov  esi,fname_buf
92 
    rep  movsd
 92 
    rep  movsd
93 
 load_file:
 93 
 load_file:
94 
    xor  eax,eax
 94 
        mov     eax, 70
95 
    mov  ebx,fileinfo
 95 
        and     [fileattr+32], 0
96 
    mov  [ebx+4],eax
 96 
        mov     ebx, attrinfo
97 
    inc  eax
 97 
        int     0x40
98 
    mov  [fileinfo.size],eax
 98 
        mov     ebx, [fileattr+32]
99 
    mcall 58
 - 
 
100 
    dpd  ebx
 - 
 
101 
    and  [wSave],0
 - 
 
102 
    mov  [HClick],-100
 - 
 
103 
 load_help:
 - 
 
104 
    test eax,eax
 99 
        test    eax, eax
105 
    jz   .sizok
 100 
        jz      .sizok
106 
    cmp  eax,5
 - 
 
107 
    je   .sizok
 - 
 
108 
  .nosizok:
 - 
 
109 
    mov  dword[fileinfo.name],N_A
 101 
        mov     dword [fileinfo.name], N_A
110 
  .sizok:
 102 
.sizok:
- 
 
 103 
    and  [wSave],0
- 
 
 104 
    mov  [HClick],-100
111 
    mov  eax,ebx
 105 
    mov  eax,ebx
112 
    and  eax,RTFSIZE-1
 106 
    and  eax,RTFSIZE-1
113 
    add  eax,I_END
 107 
    add  eax,I_END
114 
    mov  [tail],eax
 108 
    mov  [tail],eax
115 
    shr  ebx,16
 109 
    shr  ebx,16
Line 498... Line 492...
498 
    db '+ - '
 492 
    db '+ - '
499 
  end if
 493 
  end if
500 
    db '< > L A C H'
 494 
    db '< > L A C H'
501 
btn_end:
 495 
btn_end:
Line -... Line 496...
- 
 
 496 
 
- 
 
 497 
attrinfo:
- 
 
 498 
        dd      5
- 
 
 499 
        dd      0
- 
 
 500 
        dd      0
- 
 
 501 
        dd      0
- 
 
 502 
        dd      fileattr
- 
 
 503 
        db      0
- 
 
 504 
        dd      fileinfo.name
502 
 
 505 
 
503 
fileinfo:
 506 
fileinfo:
504 
  dd 0
 507 
  dd 0
505 
.block:
 508 
.block:
- 
 
 509 
  dd 0
506 
  dd 0
 510 
  dd 0
507 
.size  dd 1
 511 
.size  dd 1
508 
  dd I_END
 - 
 
509 
  dd sys_mem
 512 
  dd I_END
510 
.name:
 513 
.name:
511 
;   db '//'
 514 
;   db '//'
512 
;  db ' /HD/1/RTF/texts/FASM.TXT',0
 515 
;  db ' /HD/1/RTF/texts/FASM.TXT',0
513 
;  db '/HD/1/RTF/TEST2.RTF',0
 516 
;  db '/HD/1/RTF/TEST2.RTF',0
Line 547... Line 550...
547 
  Free BGIfree FONT_NAME,0,0,1.0,1.0,char,1,0x44000000,0
 550 
  Free BGIfree FONT_NAME,0,0,1.0,1.0,char,1,0x44000000,0
548 
end if
 551 
end if
549 
I_END0:
 552 
I_END0:
550 
fname_buf:
 553 
fname_buf:
551 
        rb      1024+16
 554 
        rb      1024+16
- 
 
 555 
fileattr rd 40/4
552 
if BENCH eq 1
 556 
if BENCH eq 1
553 
  bench dd ?
 557 
  bench dd ?
554 
end if
 558 
end if
555 
tail dd ?
 559 
tail dd ?
556 
cGroup dd ?
 560 
cGroup dd ?