Subversion Repositories Kolibri OS

Rev

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

Rev 205 Rev 485
Line 50... Line 50...
50 
  dd     esp_end     ; ª®«¨ç¥á⢮ ¯ ¬ïâ¨
 50 
  dd     esp_end     ; ª®«¨ç¥á⢮ ¯ ¬ïâ¨
51 
  dd     sys_mem     ;  ¤à¥á ¢¥à設ë áâíª 
 51 
  dd     sys_mem     ;  ¤à¥á ¢¥à設ë áâíª 
52 
  dd     fname_buf   ;  ¤à¥á ¡ãä¥à  ¤«ï ¯ à ¬¥â஢ (­¥ ¨á¯®«ì§ã¥âáï)
 52 
  dd     fname_buf   ;  ¤à¥á ¡ãä¥à  ¤«ï ¯ à ¬¥â஢ (­¥ ¨á¯®«ì§ã¥âáï)
53 
  dd     0x0         ; § à¥§¥à¢¨à®¢ ­®
 53 
  dd     0x0         ; § à¥§¥à¢¨à®¢ ­®
Line 54... Line 54...
54 
 
 54 
 
55 
include 'MACROS.INC' ; ¬ ªà®áë ®¡«¥£ç îâ ¦¨§­ì  áᥬ¡«¥à騪®¢!
 55 
include '..\..\..\MACROS.INC' ; ¬ ªà®áë ®¡«¥£ç îâ ¦¨§­ì  áᥬ¡«¥à騪®¢!
56 
include 'debug.inc'
 56 
include 'debug.inc'
57 
if ~ RENDER eq PIX
 57 
if ~ RENDER eq PIX
58 
  TOP=TOP+4
 58 
  TOP=TOP+4
59 
  include 'bgifont.inc'
 59 
  include 'bgifont.inc'
Line 92... Line 92...
92 
    rep  movsd
 92 
    rep  movsd
93 
 load_file:
 93 
 load_file:
94 
        mov     eax, 70
 94 
        mov     eax, 70
95 
        and     [fileattr+32], 0
 95 
        and     [fileattr+32], 0
96 
        mov     ebx, attrinfo
 96 
        mov     ebx, attrinfo
97 
        int     0x40
 97 
        mcall
98 
        mov     ebx, [fileattr+32]
 98 
        mov     ebx, [fileattr+32]
99 
        test    eax, eax
 99 
        test    eax, eax
100 
        jz      .sizok
 100 
        jz      .sizok
101 
        mov     dword [fileinfo.name], N_A
 101 
        mov     dword [fileinfo.name], N_A
102 
.sizok:
 102 
.sizok:
Line 130... Line 130...
130 
 
 130 
 
131 
    cmp  eax,1          ; ¯¥à¥à¨á®¢ âì ®ª­® ?
 131 
    cmp  eax,1          ; ¯¥à¥à¨á®¢ âì ®ª­® ?
132 
    je   red            ; ¥á«¨ ¤  - ­  ¬¥âªã red
 132 
    je   red            ; ¥á«¨ ¤  - ­  ¬¥âªã red
133 
    cmp  eax,3          ; ­ ¦ â  ª­®¯ª  ?
 133 
    cmp  eax,3          ; ­ ¦ â  ª­®¯ª  ?
134 
    je   button         ; ¥á«¨ ¤  - ­  button
 - 
 
135 
    cmp  eax,2          ; ­ ¦ â  ª« ¢¨è  ?
 - 
 
136 
    je   key            ; ¥á«¨ ¤  - ­  key
 - 
 
137 
 
 - 
 
138 
    jmp  still          ; ¥á«¨ ¤à㣮¥ ᮡë⨥ - ¢ ­ ç «® 横« 
 - 
 
Line 139... Line 134...
139 
 
 134 
    je   button         ; ¥á«¨ ¤  - ­  button
Line 140... Line 135...
140 
 
 135 
 
Line 313... Line 308...
313 
    mcall 12, 1                    ; äã­ªæ¨ï 12: á®®¡é¨âì Ž‘ ®¡ ®âà¨á®¢ª¥ ®ª­ 
 308 
    mcall 12, 1                    ; äã­ªæ¨ï 12: á®®¡é¨âì Ž‘ ®¡ ®âà¨á®¢ª¥ ®ª­ 
314 
                                   ; 1 - ­ ç¨­ ¥¬ à¨á®¢ âì
 309 
                                   ; 1 - ­ ç¨­ ¥¬ à¨á®¢ âì
Line 315... Line 310...
315 
 
 310 
 
316 
    mcall 0, <10,WINW>, <100,WINH>, WIN_COLOR,0x805080D0, 0x005080D0
 311 
    mcall 0, <10,WINW>, <100,WINH>, WIN_COLOR,0x805080D0, 0x005080D0
317 
    mcall 9,procinfo,-1
 312 
    mcall 9,procinfo,-1
318 
    mov   eax,[procinfo.x_size]
 313 
    mov   eax,[procinfo.box.left]
319 
    cmp   eax,1
 314 
    cmp   eax,1
320 
    ja      .temp12345
 315 
    ja      .temp12345
321 
    ret
 316 
    ret
Line 322... Line 317...
322 
  .temp12345:
 317 
  .temp12345:
323 
 
 318 
 
324 
    mcall 4, <8,8>, 0x10DDEEFF, header, headersize-header
 319 
    mcall 4, <8,8>, 0x10DDEEFF, title, titlesize-title
325 
    mov  esi,ecx
 320 
    mov  esi,ecx
326 
    mcall 47,0x30000,isymImplemented,<114,8>
 321 
    mcall 47,0x30000,isymImplemented,<114,8>
327 
    add  edx,36 shl 16
 322 
    add  edx,36 shl 16
Line 481... Line 476...
481 
;---  „€›… Žƒ€ŒŒ›  ----------------------------------------------
 476 
;---  „€›… Žƒ€ŒŒ›  ----------------------------------------------
482 
;---------------------------------------------------------------------
 477 
;---------------------------------------------------------------------
Line 483... Line 478...
483 
 
 478 
 
484 
; ¨­â¥àä¥©á ¯à®£à ¬¬ë ¬­®£®ï§ëç­ë©
 479 
; ¨­â¥àä¥©á ¯à®£à ¬¬ë ¬­®£®ï§ëç­ë©
485 
;  ‚ë ¬®¦¥â¥ § ¤ âì ï§ëª ¢ MACROS.INC (lang fix ï§ëª)
 - 
 
- 
 
 480 
;  ‚ë ¬®¦¥â¥ § ¤ âì ï§ëª ¢ MACROS.INC (lang fix ï§ëª)
486 
procinfo process_information
 481 
 
487 
header:
 482 
title:
488 
  db 'RTF READER v1.    (     ):'
 483 
  db 'RTF READER v1.    (     ):'
489 
headersize:
 484 
titlesize:
490 
btn_text:
 485 
btn_text:
491 
  if RENDER eq FREE
 486 
  if RENDER eq FREE
492 
    db '+ - '
 487 
    db '+ - '
493 
  end if
 488 
  end if
Line 604... Line 599...
604 
listptr dd ?
 599 
listptr dd ?
605 
szKeyword rb 31
 600 
szKeyword rb 31
606 
szParameter rb 21
 601 
szParameter rb 21
607 
block_end dd ?
 602 
block_end dd ?
608 
I_END:                             ; ¬¥âª  ª®­æ  ¯à®£à ¬¬ë
 603 
I_END:                             ; ¬¥âª  ª®­æ  ¯à®£à ¬¬ë
- 
 
 604 
 
- 
 
 605 
procinfo process_information
609 
rb RTFSIZE
 606 
rb RTFSIZE
610 
esp1:
 607 
esp1:
611 
rb ESPSIZE
 608 
rb ESPSIZE
612 
sys_mem:
 609 
sys_mem:
613 
rb ESPSIZE
 610 
rb ESPSIZE