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 |