Subversion Repositories NedoOS

Rev

Rev 1509 | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log

Rev 1509 Rev 1518
Line 60... Line 60...
60
        ret nz ;no memory
60
        ret nz ;no memory
61
;nvview_load0nonewpg        
61
;nvview_load0nonewpg        
62
        ld a,0xc000/256
62
        ld a,0xc000/256
63
        call cmd_loadpage
63
        call cmd_loadpage
64
        jr nz,nvview_load0q
64
        jr nz,nvview_load0q
65
        ex de,hl
-
 
66
        add hl,bc
65
        add hl,bc
67
        ex de,hl
-
 
68
        jr nc,$+3
66
        jr nc,$+3
69
        inc hl
67
        inc de
70
         ;TODO nvview_load0nonewpg with new pointer if no new page
68
         ;TODO nvview_load0nonewpg with new pointer if no new page
71
        ld a,b
69
        ld a,b
72
        or c
70
        or c
73
        jr nz,nvview_load0
71
        jr nz,nvview_load0
74
nvview_load0q
72
nvview_load0q
75
;hlde=true file size (for TRDOSFS)
73
;dehl=true file size (for TRDOSFS)
76
        ld (filesize),de
74
        ld (filesize),hl
77
        ld (filesizeHSW),hl
75
        ld (filesizeHSW),de
78
        call nv_closehandle
76
        call nv_closehandle
79
 
77
 
80
        call setunchanged
78
        call setunchanged
81
 
79
 
82
        ld hl,filenametext
80
        ld hl,filenametext
Line 478... Line 476...
478
fchanged=$+1
476
fchanged=$+1
479
        ld a,' '
477
        ld a,' '
480
        MYPRCHAR
478
        MYPRCHAR
481
nvview_ncurline=$+1
479
nvview_ncurline=$+1
482
        ld hl,0
480
        ld hl,0
483
        exx
-
 
484
        ld hl,0
481
        ld de,0
485
        exx
-
 
486
        call prdword
482
        call prdword_dehl
487
        ;ix
-
 
488
        ld a,'/'
483
        ld a,'/'
489
        MYPRCHAR
484
        MYPRCHAR
490
        ld hl,(nlines)
485
        ld hl,(nlines)
491
        exx
-
 
492
        ld hl,0
486
        ld de,0
493
        exx
-
 
494
        call prdword
487
        call prdword_dehl
495
        ld a,' '
488
        ld a,' '
496
        MYPRCHAR
489
        MYPRCHAR
497
        ld hl,(filesizeHSW)
-
 
498
        exx
-
 
499
        ld hl,(filesize)
490
        ld hl,(filesize)
-
 
491
        ld de,(filesizeHSW)
500
        call prdword
492
        call prdword_dehl
501
        ld de,tspaces_filename
493
        ld de,tspaces_filename
502
        ld hl,TSPACES_FILENAME_SZ
494
        ld hl,TSPACES_FILENAME_SZ
503
        call sendchars
495
        call sendchars
504
        ;ld e,NVVIEW_PANELCOLOR;#38
496
        ;ld e,NVVIEW_PANELCOLOR;#38
505
        ;OS_PRATTR
497
        ;OS_PRATTR