Rev 1509 | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log
Rev 1509 | Rev 1518 | ||
---|---|---|---|
Line 71... | Line 71... | ||
71 | pop af ;CY=error |
71 | pop af ;CY=error |
72 | 72 | ||
73 | pop hl |
73 | pop hl |
74 | pop de |
74 | pop de |
75 | push af ;CY=error |
75 | push af ;CY=error |
76 | ex de,hl |
- | |
77 | add hl,bc |
76 | add hl,bc |
78 | ex de,hl |
- | |
79 | jr nc,$+3 |
77 | jr nc,$+3 |
80 | inc hl |
78 | inc de |
81 | pop af ;CY=error |
79 | pop af ;CY=error |
82 | jr nc,nvview_load0 |
80 | jr nc,nvview_load0 |
83 | ;hlde=true file size (for TRDOSFS) |
81 | ;dehl=true file size (for TRDOSFS) |
84 | ld (filesize),de |
82 | ld (filesize),hl |
85 | ld (filesizeHSW),hl |
83 | ld (filesizeHSW),de |
86 | 84 | ||
87 | ;закрываем файл сами, иначе cmd когда будет закрывать? |
85 | ;закрываем файл сами, иначе cmd когда будет закрывать? |
88 | ld a,(stdinhandle) |
86 | ld a,(stdinhandle) |
89 | ld b,a |
87 | ld b,a |
90 | OS_CLOSEHANDLE ;hl=size actually received |
88 | OS_CLOSEHANDLE ;hl=size actually received |
Line 403... | Line 401... | ||
403 | 401 | ||
404 | ld a,' ' |
402 | ld a,' ' |
405 | PRCHAR |
403 | PRCHAR |
406 | nvview_ncurline=$+1 |
404 | nvview_ncurline=$+1 |
407 | ld hl,0 |
405 | ld hl,0 |
408 | exx |
- | |
409 | ld hl,0 |
406 | ld de,0 |
410 | exx |
- | |
411 | call prdword |
407 | call prdword_dehl |
412 | ;ix |
- | |
413 | ld a,'/' |
408 | ld a,'/' |
414 | PRCHAR |
409 | PRCHAR |
415 | ld hl,(nlines) |
410 | ld hl,(nlines) |
416 | exx |
- | |
417 | ld hl,0 |
411 | ld de,0 |
418 | exx |
- | |
419 | call prdword |
412 | call prdword_dehl |
420 | ld a,' ' |
413 | ld a,' ' |
421 | PRCHAR |
414 | PRCHAR |
422 | ld hl,(filesizeHSW) |
- | |
423 | exx |
- | |
424 | ld hl,(filesize) |
415 | ld hl,(filesize) |
- | 416 | ld de,(filesizeHSW) |
|
425 | call prdword |
417 | call prdword_dehl |
426 | ld b,43 |
418 | ld b,43 |
427 | nvview_panel0 |
419 | nvview_panel0 |
428 | ld a,' ' |
420 | ld a,' ' |
429 | push bc |
421 | push bc |
430 | PRCHAR |
422 | PRCHAR |