Rev 678 | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed
| Rev 678 | Rev 811 | ||
|---|---|---|---|
| Line 1... | Line 1... | ||
| 1 | 1 | ||
| 2 | ;LAST UPDATE: 15.09.2014 savelij |
2 | ;LAST UPDATE: 17.03.2019 savelij |
| 3 | 3 | ||
| 4 | RST8_CMP EX (SP),HL ;HL |
4 | RST8_CMP EX (SP),HL ;HL |
| 5 | PUSH AF ;AF |
5 | PUSH AF ;AF |
| 6 | LD A,(HL) |
6 | LD A,(HL) |
| 7 | CP _AY_PRN_INIT |
7 | CP _AY_PRN_INIT |
| Line 20... | Line 20... | ||
| 20 | LD A,R |
20 | LD A,R |
| 21 | RST8YES1 DI |
21 | RST8YES1 DI |
| 22 | PUSH AF ;RF |
22 | PUSH AF ;RF |
| 23 | PUSH HL ;ADR_RET |
23 | PUSH HL ;ADR_RET |
| 24 | PUSH DE ;RAMNROM+DOS7FFD |
24 | PUSH DE ;RAMNROM+DOS7FFD |
| 25 | LD BC,RD_1WINA0 |
25 | LD BC,RD_7FFD |
| 26 | IN H,(C) |
26 | IN A,(C) |
| - | 27 | AND 0X10 ;ПРОВЕРКА МАППЕРА ДЛЯ ЧТЕНИЯ НОМЕРА СТРАНИЦЫ В 0 ОКНЕ |
|
| - | 28 | LD B,HIGH (RD_1WINA0) ;АДРЕС ЧТЕНИЯ 0 ОКНА 0 МАППЕРА |
|
| - | 29 | JR NZ,RST8YES2 |
|
| - | 30 | LD B,HIGH (RD_0WINA0) ;АДРЕС ЧТЕНИЯ 0 ОКНА 1 МАППЕРА |
|
| - | 31 | RST8YES2 IN H,(C) |
|
| 27 | IN A,(PEVO_CONF) |
32 | IN A,(PEVO_CONF) |
| 28 | LD L,A |
33 | LD L,A |
| 29 | OR 1 |
34 | OR 1 |
| 30 | OUT (PEVO_CONF),A |
35 | OUT (PEVO_CONF),A |
| 31 | LD B,HIGH (RD_DOS7FFD) |
36 | LD B,HIGH (RD_DOS7FFD) |