Subversion Repositories NedoOS

Rev

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

Rev 2350 Rev 2351
Line 1471... Line 1471...
1471
        dec d
1471
        dec d
1472
        ld e,0
1472
        ld e,0
1473
        call nv_setxy ;keeps de,hl,ix
1473
        call nv_setxy ;keeps de,hl,ix
1474
        call clearrestofline
1474
        call clearrestofline
1475
       else
1475
       else
1476
        call nv_copyscreen1to0
1476
        ;call nv_copyscreen1to0
1477
        ld e,-1
1477
        ;ld e,-1
1478
        OS_SETGFX ;disable gfx, give focus ;before RUNAPP!!!
1478
        ;OS_SETGFX ;disable gfx, give focus ;before RUNAPP!!! (если убрать, то не получится ходить кнопками в view/play)
1479
       endif
1479
       endif
-
 
1480
       if PRSTDIO ;1==1
1480
        ld ix,leftpanel
1481
        ld ix,leftpanel
1481
        call strdelpages
1482
        call strdelpages
1482
        ld ix,rightpanel
1483
        ld ix,rightpanel
1483
        call strdelpages
1484
        call strdelpages
1484
        call deletepages
1485
        call deletepages
-
 
1486
       endif
1485
;loadandrun_waitpid_looploadandrun
1487
;loadandrun_waitpid_looploadandrun
1486
;loadandrun_waitpid_string=$+1
1488
;loadandrun_waitpid_string=$+1
1487
;       ld hl,0
1489
;       ld hl,0
1488
       pop hl ;hl=cmdbuf или cmdprompt
1490
       pop hl ;hl=cmdbuf или cmdprompt
1489
         ;call setcurpaneldir
1491
         ;call setcurpaneldir
1490
        call loadandrun ;nz=error, e=id
1492
        call loadandrun ;nz=error, e=id
-
 
1493
     if PRSTDIO ;1==1
1491
        jp nz,execcmd_error
1494
        jp nz,execcmd_error
1492
;команда scratch - реально cmd scratch в текущем терминале
1495
;команда scratch - реально cmd scratch в текущем терминале
1493
        WAITPID
1496
        WAITPID
1494
;HL - результат, который вернула дочерняя задача
1497
;HL - результат, который вернула дочерняя задача
1495
        ld a,h
1498
        ld a,h
Line 1521... Line 1524...
1521
       if PRSTDIO
1524
       if PRSTDIO
1522
        CLS_ ;scroll what was printed
1525
        CLS_ ;scroll what was printed
1523
       endif
1526
       endif
1524
execcmd_error
1527
execcmd_error
1525
        call assignpages
1528
        call assignpages
-
 
1529
     endif
1526
       if PRSTDIO == 0
1530
       if PRSTDIO == 0
1527
        ld e,6 ;textmode
1531
        ;ld e,6 ;textmode
1528
        OS_SETGFX ;take focus (can be random after closing cmd)
1532
        ;OS_SETGFX ;take focus (can be random after closing cmd)
1529
        call nv_copyscreen0to1
1533
        ;call nv_copyscreen0to1
1530
        YIELDGETKEY ;key refresh
1534
        ;YIELDGETKEY ;key refresh
1531
       endif
1535
       endif
1532
        xor a
1536
        xor a
1533
        ld (cmdbuf),a
1537
        ld (cmdbuf),a
1534
        ld (curcmdscroll),a
1538
        ld (curcmdscroll),a
1535
        jp editcmd_reprintall_keepcursor
1539
        jp editcmd_reprintall_keepcursor