Subversion Repositories Kolibri OS

Rev

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

Rev 131 Rev 134
Line 383... Line 383...
383 
    mov  eax,edx
 383 
    mov  eax,edx
384 
    ret
 384 
    ret
385 
}
 385 
}
Line 386... Line 386...
386 
 
 386 
 
387 
StartPad:
 - 
 
388 
;    mcall 19,editorcmd,dumpfile
 387 
StartPad:
389 
    pusha
 388 
    pusha
390 
    mov   esi,[outfile.size]
 389 
    mov   esi,[outfile.size]
- 
 
 390 
;    dpd  esi
- 
 
 391 
; convert number in esi to decimal representation
- 
 
 392 
        mov     ecx, 10
- 
 
 393 
        push    -'0'
- 
 
 394 
        mov     eax, esi
- 
 
 395 
@@:
- 
 
 396 
        xor	edx, edx
- 
 
 397 
        div     ecx
- 
 
 398 
        push    edx
- 
 
 399 
        test    eax, eax
391 
;    dpd  esi
 400 
        jnz     @b
- 
 
 401 
        mov     edi, par_fsize
- 
 
 402 
@@:
- 
 
 403 
        pop     eax
- 
 
 404 
        add     al, '0'
- 
 
 405 
        stosb
392 
    mov   [par_fsize],esi
 406 
        jnz     @b
393 
    mcall 19,editorcmd,editor_par
 407 
    mcall 70,fileinfo
394 
    mov  ecx,eax
 408 
    mov  ecx,eax
395 
    mcall 5,20
 409 
    mcall 5,20
396 
    mcall 60,2,,[outfile.out];output
 410 
    mcall 60,2,,[outfile.out];output
397 
    mcall 64,1,MEMINIT
 411 
    mcall 64,1,MEMINIT
398 
    popa
 412 
    popa
Line -... Line 413...
- 
 
 413 
    ret
- 
 
 414 
 
- 
 
 415 
fileinfo:
- 
 
 416 
        dd      7
- 
 
 417 
        dd      0
- 
 
 418 
        dd      editor_par
399 
    ret
 419 
        dd      0
400 
 
 420 
        dd      0
401 
editorcmd db 'TINYPAD    '
 421 
        db      '/RD/1/TINYPAD',0
402 
editor_par db '*'
 422 
editor_par db '*'
403 
par_fsize  dd ?
 423 
par_fsize rb 11