Rev 896 | Blame | Compare with Previous | Last modification | View Log | Download | RSS feed | ?url?
AS V1.42 Beta [Bld 146] - source file services.a80 - page 1 - 2/23/2020 18:58:441/ 0 :2/ 0 : ;LAST UPDATE: 12.02.2020 savelij3/ 0 :4/ 0 : include ../../svn/pentevo/rom/macros.a80(1) 1/ 0 :(1) 2/ 0 : ;LAST UPDATE: 12.09.2019 savelij(1) 3/ 0 :(1) 4/ 0 : ;автоопределение кодировки работает неправильно(1) 5/ 0 :(1) 6/ 0 : RELAXED ON(1) 7/ 0 : CPU Z80UNDOC(1) 8/ 0 :(1) 9/ 0 : =0H BUILD_DEBUG EQU 0(1) 10/ 0 : REZIDENT ;включение резидента в сборку(1) 11/ 0 :(1) 12/ 0 : DZ MACRO DEFZ(1) 13/ 0 : DB DEFZ,0(1) 14/ 0 : ENDM(1) 15/ 0 :(1) 16/ 0 : DC MACRO DEFC(1) 17/ 0 : IF STRLEN(DEFC)>1(1) 18/ 0 : DB SUBSTR(DEFC,0,STRLEN(DEFC)-1)(1) 19/ 0 : ENDIF(1) 20/ 0 : IF STRLEN(DEFC)>0(1) 21/ 0 : DB CHARFROMSTR(DEFC,STRLEN(DEFC)-1)|80H(1) 22/ 0 : ENDIF(1) 23/ 0 : ENDM(1) 24/ 0 :(1) 25/ 0 : SUM_HOB MACRO STR,AA,BB,CC(1) 26/ 0 : DB STR(1) 27/ 0 : DW AA(1) 28/ 0 : DW BB(1) 29/ 0 : DB 0(1) 30/ 0 : DB CC(1) 31/ 0 : $$I := 0(1) 32/ 0 : $$S := 0(1) 33/ 0 : REPT 9(1) 34/ 0 : $$N := CHARFROMSTR (STR,STRLEN(STR)+$$S-9)(1) 35/ 0 : $$I := ($$I+$$S+$$N+($$N*256))&0XFFFF(1) 36/ 0 : $$S := $$S+1(1) 37/ 0 : ENDM(1) 38/ 0 : $$I := ($$I+$$S+LOW (AA)+(LOW (AA)*0X100))&0XFFFF(1) 39/ 0 : $$S := $$S+1(1) 40/ 0 : $$I := ($$I+$$S+HIGH (AA)+(HIGH (AA)*0X100))&0XFFFF(1) 41/ 0 : $$S := $$S+1(1) 42/ 0 : $$I := ($$I+$$S+LOW (BB)+(LOW (BB)*0X100))&0XFFFF(1) 43/ 0 : $$S := $$S+1(1) 44/ 0 : $$I := ($$I+$$S+HIGH (BB)+(HIGH (BB)*0X100))&0XFFFF(1) 45/ 0 : $$S := $$S+1(1) 46/ 0 : $$I := ($$I+$$S+LOW (CC)+(LOW (CC)*0X100))&0XFFFF(1) 47/ 0 : $$S := $$S+1(1) 48/ 0 : $$I := ($$I+$$S+HIGH (CC)+(HIGH (CC)*0X100))&0XFFFF(1) 49/ 0 : $$S := $$S+1(1) 50/ 0 : DW $$I(1) 51/ 0 : ENDM(1) 52/ 0 :(1) 53/ 0 : DUPL MACRO LEN,FILL(1) 54/ 0 : DUPL:(1) 55/ 0 : $$N EQU (LEN) / 1024(1) 56/ 0 : $$M EQU (LEN) # 1024AS V1.42 Beta [Bld 146] - source file services.a80(../../svn/pentevo/rom/macros.a80) - page 2 - 2/23/2020 18:58:44(1) 57/ 0 : REPT $$N(1) 58/ 0 : DB 1024 DUP(FILL)(1) 59/ 0 : ENDM(1) 60/ 0 : IF $$M <> 0(1) 61/ 0 : IFB FILL(1) 62/ 0 : DB $$M DUP(0)(1) 63/ 0 : ELSE(1) 64/ 0 : DB $$M DUP(FILL)(1) 65/ 0 : ENDIF(1) 66/ 0 : ENDIF(1) 67/ 0 : ENDM(1) 68/ 0 :(1) 69/ 0 : HIGH FUNCTION X,((X >> 8) & 0XFF)(1) 70/ 0 : LOW FUNCTION X,(X & 0XFF)(1) 71/ 0 :(1) 72/ 0 : ROMCALL MACRO ADR,PAGE(1) 73/ 0 : RST 0X30(1) 74/ 0 : DW ADR(1) 75/ 0 : DB PAGE(1) 76/ 0 : ENDM(1) 77/ 0 :(1) 78/ 0 : RAMCALL MACRO ADR,PAGE(1) 79/ 0 : RST 0X20(1) 80/ 0 : DW ADR(1) 81/ 0 : DB PAGE(1) 82/ 0 : ENDM(1) 83/ 0 :(1) 84/ 0 : ATMPORT MACRO PORT,BYTE(1) 85/ 0 : LD BC,PORT(1) 86/ 0 : IF BYTE = 0(1) 87/ 0 : XOR A(1) 88/ 0 : ELSE(1) 89/ 0 : LD A,BYTE(1) 90/ 0 : ENDIF(1) 91/ 0 : OUT (C),A(1) 92/ 0 : ENDM(1) 93/ 0 :(1) 94/ 0 : EVOPORT MACRO PORT,BYTE(1) 95/ 0 : LD BC,PORT(1) 96/ 0 : IF BYTE = 0(1) 97/ 0 : XOR A(1) 98/ 0 : ELSE(1) 99/ 0 : LD A,BYTE(1) 100/ 0 : ENDIF(1) 101/ 0 : OUT (C),A(1) 102/ 0 : ENDM(1) 103/ 0 :(1) 104/ 0 : PEC_ON MACRO BYTE(1) 105/ 0 : IN A,(PEVO_CONF)(1) 106/ 0 : OR BYTE(1) 107/ 0 : OUT (PEVO_CONF),A(1) 108/ 0 : ENDM(1) 109/ 0 :(1) 110/ 0 : PEC_OFF MACRO BYTE(1) 111/ 0 : IN A,(PEVO_CONF)(1) 112/ 0 : AND BYTE!0XFF(1) 113/ 0 : OUT (PEVO_CONF),A(1) 114/ 0 : ENDM(1) 115/ 0 :(1) 116/ 0 : READ_7FFD MACROAS V1.42 Beta [Bld 146] - source file services.a80(../../svn/pentevo/rom/macros.a80) - page 3 - 2/23/2020 18:58:44(1) 117/ 0 : LD A,HIGH (RD_7FFD)(1) 118/ 0 : IN A,(LOW (RD_7FFD))(1) 119/ 0 : ENDM(1) 120/ 0 :(1) 121/ 0 : =9H SIZEDATE EQU STRLEN (DATE)(1) 122/ 0 : =8H SIZETIME EQU STRLEN (TIME)(1) 123/ 0 :(1) 124/ 0 : =>FALSE IF SIZEDATE=10(1) 125/ 0 : MMOUNTH EQU (CHARFROMSTR (DATE,0)-'0')*10+(CHARFROMSTR (DATE,1)-'0')(1) 126/ 0 : DDATE EQU (CHARFROMSTR (DATE,3)-'0')*10+(CHARFROMSTR (DATE,4)-'0')(1) 127/ 0 : YYEAR EQU (CHARFROMSTR (DATE,8)-'0')*10+(CHARFROMSTR (DATE,9)-'0')(1) 128/ 0 : =>FALSE ELSEIF SIZEDATE=8(1) 129/ 0 : MMOUNTH EQU (CHARFROMSTR (DATE,0)-'0')(1) 130/ 0 : DDATE EQU (CHARFROMSTR (DATE,2)-'0')(1) 131/ 0 : YYEAR EQU (CHARFROMSTR (DATE,6)-'0')*10+(CHARFROMSTR (DATE,7)-'0')(1) 132/ 0 : =>TRUE ELSEIF (CHARFROMSTR (DATE,1))=0X2F(1) 133/ 0 : =2H MMOUNTH EQU (CHARFROMSTR (DATE,0)-'0')(1) 134/ 0 : =17H DDATE EQU (CHARFROMSTR (DATE,2)-'0')*10+(CHARFROMSTR (DATE,3)-'0')(1) 135/ 0 : =14H YYEAR EQU (CHARFROMSTR (DATE,7)-'0')*10+(CHARFROMSTR (DATE,8)-'0')(1) 136/ 0 : =>FALSE ELSE(1) 137/ 0 : MMOUNTH EQU (CHARFROMSTR (DATE,0)-'0')*10+(CHARFROMSTR (DATE,1)-'0')(1) 138/ 0 : DDATE EQU (CHARFROMSTR (DATE,3)-'0')(1) 139/ 0 : YYEAR EQU (CHARFROMSTR (DATE,7)-'0')*10+(CHARFROMSTR (DATE,8)-'0')(1) 140/ 0 : [124] ENDIF(1) 141/ 0 :(1) 142/ 0 : =>FALSE IF SIZETIME=7(1) 143/ 0 : HHOUR EQU (CHARFROMSTR (TIME,0)-'0')(1) 144/ 0 : MMINUTE EQU (CHARFROMSTR (TIME,2)-'0')*10+(CHARFROMSTR (TIME,3)-'0')(1) 145/ 0 : SSECUND EQU (CHARFROMSTR (TIME,5)-'0')*10+(CHARFROMSTR (TIME,6)-'0')(1) 146/ 0 : =>TRUE ELSE(1) 147/ 0 : =12H HHOUR EQU (CHARFROMSTR (TIME,0)-'0')*10+(CHARFROMSTR (TIME,1)-'0')(1) 148/ 0 : =3AH MMINUTE EQU (CHARFROMSTR (TIME,3)-'0')*10+(CHARFROMSTR (TIME,4)-'0')(1) 149/ 0 : =2CH SSECUND EQU (CHARFROMSTR (TIME,6)-'0')*10+(CHARFROMSTR (TIME,7)-'0')(1) 150/ 0 : [142] ENDIF(1) 151/ 0 :(1) 152/ 0 : =A857H DATA_VERS EQU DDATE+(MMOUNTH<<5)+(YYEAR<<9)+0X8000 ;уже упаковано(1) 153/ 0 :(1) 154/ 0 : =5057H FAT_DATE EQU DDATE+(MMOUNTH<<5)+((2000+YYEAR-1980)&0x7F)<<9(1) 155/ 0 : =9756H FAT_TIME EQU SSECUND/2+(MMINUTE<<5)+(HHOUR<<11)(1) 156/ 0 :(1) 157/ 0 : TEXTDATE MACRO(1) 158/ 0 : TDATE DB ((DDATE/10)+'0'),(DDATE#10)+'0'(1) 159/ 0 : DB "."(1) 160/ 0 : TMOUNTH DB MMOUNTH/10+'0',MMOUNTH#10+'0'(1) 161/ 0 : DB ".",CHARFROMSTR (DATE,SIZEDATE-4),CHARFROMSTR (DATE,SIZEDATE-3)(1) 162/ 0 : DB CHARFROMSTR (DATE,SIZEDATE-2),CHARFROMSTR (DATE,SIZEDATE-1)(1) 163/ 0 : ENDM(1) 164/ 0 :(1) 165/ 0 : RST8 MACRO N1,N2,N3(1) 166/ 0 : RST 8(1) 167/ 0 : DB N1(1) 168/ 0 : IFNB N2(1) 169/ 0 : DB N2(1) 170/ 0 : ENDIF(1) 171/ 0 : IFNB N3(1) 172/ 0 : DB N3(1) 173/ 0 : ENDIF(1) 174/ 0 : ENDM(1) 175/ 0 :(1) 176/ 0 : =1H BYTE EQU 1AS V1.42 Beta [Bld 146] - source file services.a80(../../svn/pentevo/rom/macros.a80) - page 4 - 2/23/2020 18:58:44(1) 177/ 0 : =2H WORD EQU 2(1) 178/ 0 : =3H JUMP EQU 3(1) 179/ 0 : =4H DWORD EQU 4(1) 180/ 0 : =8H QWORD EQU 8(1) 181/ 0 :(1) 182/ 0 : BITMASK MACRO NAME,NUM(1) 183/ 0 : B_NAME EQU NUM(1) 184/ 0 : M_NAME EQU 1<<NUM(1) 185/ 0 : ENDM(1) 186/ 0 :(1) 187/ 0 : SETVAR MACRO NAME,SIZE(1) 188/ 0 : NAME EQU INITVAR(1) 189/ 0 : IFNB SIZE(1) 190/ 0 : INITVAR := INITVAR+SIZE(1) 191/ 0 : NAME_Size EQU SIZE(1) 192/ 0 : ELSE(1) 193/ 0 : INITVAR := INITVAR+BYTE(1) 194/ 0 : NAME_Size EQU BYTE(1) 195/ 0 : ENDIF(1) 196/ 0 : ENDM(1) 197/ 0 :(1) 198/ 0 : SUBVAR MACRO SIZE(1) 199/ 0 : INITVAR := INITVAR-SIZE(1) 200/ 0 : ENDM(1) 201/ 0 :(1) 202/ 0 : ADDVAR MACRO SIZE(1) 203/ 0 : INITVAR := INITVAR+SIZE(1) 204/ 0 : ENDM(1) 205/ 0 :(1) 206/ 0 : INIT_VAR MACRO START(1) 207/ 0 : IFNB START(1) 208/ 0 : INITVAR := START(1) 209/ 0 : ELSE(1) 210/ 0 : INITVAR := 0(1) 211/ 0 : ENDIF(1) 212/ 0 : ENDM(1) 213/ 0 :(1) 214/ 0 :(1) 215/ 0 : MALIGN MACRO(1) 216/ 0 : IF LOW($) = 0(1) 217/ 0 : DUPL (HIGH($) << 8) - $,0(1) 218/ 0 : ELSE(1) 219/ 0 : DUPL ((HIGH($) + 1) << 8) - $,0(1) 220/ 0 : ENDIF(1) 221/ 0 : ENDM(1) 222/ 0 :(1) 223/ 0 : ; выравнивание до сектора с учетом адреса компиляции(1) 224/ 0 : DALIGN MACRO ADDRESS(1) 225/ 0 : IF LOW(ADDRESS)(1) 226/ 0 : DB LOW (-$)+LOW(ADDRESS) DUP(0)(1) 227/ 0 : ELSE(1) 228/ 0 : DB LOW (-$) DUP (0)(1) 229/ 0 : ENDIF(1) 230/ 0 : ENDM(1) 231/ 0 :(1) 232/ 0 : ; преобразование 16 битного числа в текст(1) 233/ 0 : WORD2TXT MACRO WORD(1) 234/ 0 : $$DEC1 := (WORD)/10000(1) 235/ 0 : $$TMP := WORD-$$DEC1*10000(1) 236/ 0 : $$DEC2 := $$TMP/1000AS V1.42 Beta [Bld 146] - source file services.a80(../../svn/pentevo/rom/macros.a80) - page 5 - 2/23/2020 18:58:44(1) 237/ 0 : $$TMP := $$TMP-$$DEC2*1000(1) 238/ 0 : $$DEC3 := $$TMP/100(1) 239/ 0 : $$TMP := $$TMP-$$DEC3*100(1) 240/ 0 : $$DEC4 := $$TMP/10(1) 241/ 0 : $$TMP := $$TMP-$$DEC4*10(1) 242/ 0 : $$DEC5 := $$TMP(1) 243/ 0 : DB $$DEC1+'0',$$DEC2+'0',$$DEC3+'0',$$DEC4+'0',$$DEC5+'0'(1) 244/ 0 : ENDM(1) 245/ 0 :5/ 0 : include ../../svn/pentevo/rom/define.a80(1) 1/ 0 :(1) 2/ 0 : ;LAST UPDATE: 05.08.2019 savelij(1) 3/ 0 :(1) 4/ 0 : ;номера функций RST 8(1) 5/ 0 : (MACRO) INIT_VAR 0X40(1) 5/ 0 : =>NOT BLANK IFNB 0X40(1) 5/ 0 : =40H INITVAR := 0X40(1) 5/ 0 : =>FALSE ELSE(1) 5/ 0 : INITVAR := 0(1) 5/ 0 : [5] ENDIF(1) 6/ 0 : (MACRO) SETVAR _AY_PRN_INIT(1) 6/ 0 : =40H _AY_PRN_INIT EQU INITVAR(1) 6/ 0 : =>BLANK IFNB(1) 6/ 0 : INITVAR := INITVAR+(1) 6/ 0 : _AY_PRN_INIT_Size EQU(1) 6/ 0 : =>TRUE ELSE(1) 6/ 0 : =41H INITVAR := INITVAR+BYTE(1) 6/ 0 : =1H _AY_PRN_INIT_Size EQU BYTE(1) 6/ 0 : [6] ENDIF(1) 7/ 0 : (MACRO) SETVAR _AY_PRN_A_(1) 7/ 0 : =41H _AY_PRN_A_ EQU INITVAR(1) 7/ 0 : =>BLANK IFNB(1) 7/ 0 : INITVAR := INITVAR+(1) 7/ 0 : _AY_PRN_A__Size EQU(1) 7/ 0 : =>TRUE ELSE(1) 7/ 0 : =42H INITVAR := INITVAR+BYTE(1) 7/ 0 : =1H _AY_PRN_A__Size EQU BYTE(1) 7/ 0 : [7] ENDIF(1) 8/ 0 : (MACRO) SETVAR _AY_PRN_TOKEN(1) 8/ 0 : =42H _AY_PRN_TOKEN EQU INITVAR(1) 8/ 0 : =>BLANK IFNB(1) 8/ 0 : INITVAR := INITVAR+(1) 8/ 0 : _AY_PRN_TOKEN_Size EQU(1) 8/ 0 : =>TRUE ELSE(1) 8/ 0 : =43H INITVAR := INITVAR+BYTE(1) 8/ 0 : =1H _AY_PRN_TOKEN_Size EQU BYTE(1) 8/ 0 : [8] ENDIF(1) 9/ 0 : (MACRO) SETVAR _AY_PRN_SCR(1) 9/ 0 : =43H _AY_PRN_SCR EQU INITVAR(1) 9/ 0 : =>BLANK IFNB(1) 9/ 0 : INITVAR := INITVAR+(1) 9/ 0 : _AY_PRN_SCR_Size EQU(1) 9/ 0 : =>TRUE ELSE(1) 9/ 0 : =44H INITVAR := INITVAR+BYTE(1) 9/ 0 : =1H _AY_PRN_SCR_Size EQU BYTE(1) 9/ 0 : [9] ENDIF(1) 10/ 0 : (MACRO) SETVAR _TAPE_INIT(1) 10/ 0 : =44H _TAPE_INIT EQU INITVAR(1) 10/ 0 : =>BLANK IFNB(1) 10/ 0 : INITVAR := INITVAR+AS V1.42 Beta [Bld 146] - source file services.a80(../../svn/pentevo/rom/define.a80) - page 6 - 2/23/2020 18:58:44(1) 10/ 0 : _TAPE_INIT_Size EQU(1) 10/ 0 : =>TRUE ELSE(1) 10/ 0 : =45H INITVAR := INITVAR+BYTE(1) 10/ 0 : =1H _TAPE_INIT_Size EQU BYTE(1) 10/ 0 : [10] ENDIF(1) 11/ 0 : (MACRO) SETVAR _TAPE_EMUL(1) 11/ 0 : =45H _TAPE_EMUL EQU INITVAR(1) 11/ 0 : =>BLANK IFNB(1) 11/ 0 : INITVAR := INITVAR+(1) 11/ 0 : _TAPE_EMUL_Size EQU(1) 11/ 0 : =>TRUE ELSE(1) 11/ 0 : =46H INITVAR := INITVAR+BYTE(1) 11/ 0 : =1H _TAPE_EMUL_Size EQU BYTE(1) 11/ 0 : [11] ENDIF(1) 12/ 0 : (MACRO) SETVAR _WINW(1) 12/ 0 : =46H _WINW EQU INITVAR(1) 12/ 0 : =>BLANK IFNB(1) 12/ 0 : INITVAR := INITVAR+(1) 12/ 0 : _WINW_Size EQU(1) 12/ 0 : =>TRUE ELSE(1) 12/ 0 : =47H INITVAR := INITVAR+BYTE(1) 12/ 0 : =1H _WINW_Size EQU BYTE(1) 12/ 0 : [12] ENDIF(1) 13/ 0 : (MACRO) SETVAR _PRINT_MESSAGE(1) 13/ 0 : =47H _PRINT_MESSAGE EQU INITVAR(1) 13/ 0 : =>BLANK IFNB(1) 13/ 0 : INITVAR := INITVAR+(1) 13/ 0 : _PRINT_MESSAGE_Size EQU(1) 13/ 0 : =>TRUE ELSE(1) 13/ 0 : =48H INITVAR := INITVAR+BYTE(1) 13/ 0 : =1H _PRINT_MESSAGE_Size EQU BYTE(1) 13/ 0 : [13] ENDIF(1) 14/ 0 : (MACRO) SETVAR _PRINT_A(1) 14/ 0 : =48H _PRINT_A EQU INITVAR(1) 14/ 0 : =>BLANK IFNB(1) 14/ 0 : INITVAR := INITVAR+(1) 14/ 0 : _PRINT_A_Size EQU(1) 14/ 0 : =>TRUE ELSE(1) 14/ 0 : =49H INITVAR := INITVAR+BYTE(1) 14/ 0 : =1H _PRINT_A_Size EQU BYTE(1) 14/ 0 : [14] ENDIF(1) 15/ 0 : (MACRO) SETVAR _SCROLL_UP(1) 15/ 0 : =49H _SCROLL_UP EQU INITVAR(1) 15/ 0 : =>BLANK IFNB(1) 15/ 0 : INITVAR := INITVAR+(1) 15/ 0 : _SCROLL_UP_Size EQU(1) 15/ 0 : =>TRUE ELSE(1) 15/ 0 : =4AH INITVAR := INITVAR+BYTE(1) 15/ 0 : =1H _SCROLL_UP_Size EQU BYTE(1) 15/ 0 : [15] ENDIF(1) 16/ 0 : (MACRO) SETVAR _SCROLL_DOWN(1) 16/ 0 : =4AH _SCROLL_DOWN EQU INITVAR(1) 16/ 0 : =>BLANK IFNB(1) 16/ 0 : INITVAR := INITVAR+(1) 16/ 0 : _SCROLL_DOWN_Size EQU(1) 16/ 0 : =>TRUE ELSE(1) 16/ 0 : =4BH INITVAR := INITVAR+BYTE(1) 16/ 0 : =1H _SCROLL_DOWN_Size EQU BYTE(1) 16/ 0 : [16] ENDIF(1) 17/ 0 : (MACRO) SETVAR _SET_MODEAS V1.42 Beta [Bld 146] - source file services.a80(../../svn/pentevo/rom/define.a80) - page 7 - 2/23/2020 18:58:44(1) 17/ 0 : =4BH _SET_MODE EQU INITVAR(1) 17/ 0 : =>BLANK IFNB(1) 17/ 0 : INITVAR := INITVAR+(1) 17/ 0 : _SET_MODE_Size EQU(1) 17/ 0 : =>TRUE ELSE(1) 17/ 0 : =4CH INITVAR := INITVAR+BYTE(1) 17/ 0 : =1H _SET_MODE_Size EQU BYTE(1) 17/ 0 : [17] ENDIF(1) 18/ 0 : (MACRO) SETVAR _MATH(1) 18/ 0 : =4CH _MATH EQU INITVAR(1) 18/ 0 : =>BLANK IFNB(1) 18/ 0 : INITVAR := INITVAR+(1) 18/ 0 : _MATH_Size EQU(1) 18/ 0 : =>TRUE ELSE(1) 18/ 0 : =4DH INITVAR := INITVAR+BYTE(1) 18/ 0 : =1H _MATH_Size EQU BYTE(1) 18/ 0 : [18] ENDIF(1) 19/ 0 : (MACRO) SETVAR _VERSION(1) 19/ 0 : =4DH _VERSION EQU INITVAR(1) 19/ 0 : =>BLANK IFNB(1) 19/ 0 : INITVAR := INITVAR+(1) 19/ 0 : _VERSION_Size EQU(1) 19/ 0 : =>TRUE ELSE(1) 19/ 0 : =4EH INITVAR := INITVAR+BYTE(1) 19/ 0 : =1H _VERSION_Size EQU BYTE(1) 19/ 0 : [19] ENDIF(1) 20/ 0 :(1) 21/ 0 : (MACRO) INIT_VAR 0X4F(1) 21/ 0 : =>NOT BLANK IFNB 0X4F(1) 21/ 0 : =4FH INITVAR := 0X4F(1) 21/ 0 : =>FALSE ELSE(1) 21/ 0 : INITVAR := 0(1) 21/ 0 : [21] ENDIF(1) 22/ 0 : (MACRO) SETVAR _BIOS(1) 22/ 0 : =4FH _BIOS EQU INITVAR(1) 22/ 0 : =>BLANK IFNB(1) 22/ 0 : INITVAR := INITVAR+(1) 22/ 0 : _BIOS_Size EQU(1) 22/ 0 : =>TRUE ELSE(1) 22/ 0 : =50H INITVAR := INITVAR+BYTE(1) 22/ 0 : =1H _BIOS_Size EQU BYTE(1) 22/ 0 : [22] ENDIF(1) 23/ 0 : (MACRO) SETVAR _COM_DEV(1) 23/ 0 : =50H _COM_DEV EQU INITVAR(1) 23/ 0 : =>BLANK IFNB(1) 23/ 0 : INITVAR := INITVAR+(1) 23/ 0 : _COM_DEV_Size EQU(1) 23/ 0 : =>TRUE ELSE(1) 23/ 0 : =51H INITVAR := INITVAR+BYTE(1) 23/ 0 : =1H _COM_DEV_Size EQU BYTE(1) 23/ 0 : [23] ENDIF(1) 24/ 0 : (MACRO) SETVAR _COM_FAT(1) 24/ 0 : =51H _COM_FAT EQU INITVAR(1) 24/ 0 : =>BLANK IFNB(1) 24/ 0 : INITVAR := INITVAR+(1) 24/ 0 : _COM_FAT_Size EQU(1) 24/ 0 : =>TRUE ELSE(1) 24/ 0 : =52H INITVAR := INITVAR+BYTE(1) 24/ 0 : =1H _COM_FAT_Size EQU BYTE(1) 24/ 0 : [24] ENDIFAS V1.42 Beta [Bld 146] - source file services.a80(../../svn/pentevo/rom/define.a80) - page 8 - 2/23/2020 18:58:44(1) 25/ 0 : (MACRO) SETVAR _SORT_FINDFILES(1) 25/ 0 : =52H _SORT_FINDFILES EQU INITVAR(1) 25/ 0 : =>BLANK IFNB(1) 25/ 0 : INITVAR := INITVAR+(1) 25/ 0 : _SORT_FINDFILES_Size EQU(1) 25/ 0 : =>TRUE ELSE(1) 25/ 0 : =53H INITVAR := INITVAR+BYTE(1) 25/ 0 : =1H _SORT_FINDFILES_Size EQU BYTE(1) 25/ 0 : [25] ENDIF(1) 26/ 0 : (MACRO) SETVAR _MOUNTER(1) 26/ 0 : =53H _MOUNTER EQU INITVAR(1) 26/ 0 : =>BLANK IFNB(1) 26/ 0 : INITVAR := INITVAR+(1) 26/ 0 : _MOUNTER_Size EQU(1) 26/ 0 : =>TRUE ELSE(1) 26/ 0 : =54H INITVAR := INITVAR+BYTE(1) 26/ 0 : =1H _MOUNTER_Size EQU BYTE(1) 26/ 0 : [26] ENDIF(1) 27/ 0 : (MACRO) SETVAR _INST_FATBOOT(1) 27/ 0 : =54H _INST_FATBOOT EQU INITVAR(1) 27/ 0 : =>BLANK IFNB(1) 27/ 0 : INITVAR := INITVAR+(1) 27/ 0 : _INST_FATBOOT_Size EQU(1) 27/ 0 : =>TRUE ELSE(1) 27/ 0 : =55H INITVAR := INITVAR+BYTE(1) 27/ 0 : =1H _INST_FATBOOT_Size EQU BYTE(1) 27/ 0 : [27] ENDIF(1) 28/ 0 : (MACRO) SETVAR _CMOS_RW(1) 28/ 0 : =55H _CMOS_RW EQU INITVAR(1) 28/ 0 : =>BLANK IFNB(1) 28/ 0 : INITVAR := INITVAR+(1) 28/ 0 : _CMOS_RW_Size EQU(1) 28/ 0 : =>TRUE ELSE(1) 28/ 0 : =56H INITVAR := INITVAR+BYTE(1) 28/ 0 : =1H _CMOS_RW_Size EQU BYTE(1) 28/ 0 : [28] ENDIF(1) 29/ 0 : (MACRO) SETVAR _SETUP_PAL(1) 29/ 0 : =56H _SETUP_PAL EQU INITVAR(1) 29/ 0 : =>BLANK IFNB(1) 29/ 0 : INITVAR := INITVAR+(1) 29/ 0 : _SETUP_PAL_Size EQU(1) 29/ 0 : =>TRUE ELSE(1) 29/ 0 : =57H INITVAR := INITVAR+BYTE(1) 29/ 0 : =1H _SETUP_PAL_Size EQU BYTE(1) 29/ 0 : [29] ENDIF(1) 30/ 0 : (MACRO) SETVAR _SETUP_FONT(1) 30/ 0 : =57H _SETUP_FONT EQU INITVAR(1) 30/ 0 : =>BLANK IFNB(1) 30/ 0 : INITVAR := INITVAR+(1) 30/ 0 : _SETUP_FONT_Size EQU(1) 30/ 0 : =>TRUE ELSE(1) 30/ 0 : =58H INITVAR := INITVAR+BYTE(1) 30/ 0 : =1H _SETUP_FONT_Size EQU BYTE(1) 30/ 0 : [30] ENDIF(1) 31/ 0 :(1) 32/ 0 : ;функции изменения режимов работы(1) 33/ 0 : =1H _ZXSCR_MODE EQU %00000001 ;ZX SCREEN(1) 34/ 0 : =2H _TXTSCR_MODE EQU %00000010 ;TXT SCREEN(1) 35/ 0 : =10H _TURBO_LOW EQU %00010000 ;TURBO 3,5 MHZ(1) 36/ 0 : =20H _TURBO_HIGH EQU %00100000 ;TURBO 7,0 MHZAS V1.42 Beta [Bld 146] - source file services.a80(../../svn/pentevo/rom/define.a80) - page 9 - 2/23/2020 18:58:44(1) 37/ 0 : =30H _TURBO_MAX EQU %00110000 ;TURBO 14,0 MHZ(1) 38/ 0 : =40H _MEM_MODE_48 EQU %01000000 ;MEMORY MODE 48 KB(1) 39/ 0 : =80H _MEM_MODE_128 EQU %10000000 ;MEMORY MODE 128 KB(1) 40/ 0 : =C0H _MEM_MODE_PENT EQU %11000000 ;MEMORY MODE PENT 1024 KB(1) 41/ 0 :(1) 42/ 0 : ;функции деления, умножения, преобразования числа в текст(1) 43/ 0 : (MACRO) INIT_VAR(1) 43/ 0 : =>BLANK IFNB(1) 43/ 0 : INITVAR :=(1) 43/ 0 : =>TRUE ELSE(1) 43/ 0 : =0H INITVAR := 0(1) 43/ 0 : [43] ENDIF(1) 44/ 0 : (MACRO) SETVAR _DIVIDE16(1) 44/ 0 : =0H _DIVIDE16 EQU INITVAR(1) 44/ 0 : =>BLANK IFNB(1) 44/ 0 : INITVAR := INITVAR+(1) 44/ 0 : _DIVIDE16_Size EQU(1) 44/ 0 : =>TRUE ELSE(1) 44/ 0 : =1H INITVAR := INITVAR+BYTE(1) 44/ 0 : =1H _DIVIDE16_Size EQU BYTE(1) 44/ 0 : [44] ENDIF(1) 45/ 0 : (MACRO) SETVAR _MULTIPLY16(1) 45/ 0 : =1H _MULTIPLY16 EQU INITVAR(1) 45/ 0 : =>BLANK IFNB(1) 45/ 0 : INITVAR := INITVAR+(1) 45/ 0 : _MULTIPLY16_Size EQU(1) 45/ 0 : =>TRUE ELSE(1) 45/ 0 : =2H INITVAR := INITVAR+BYTE(1) 45/ 0 : =1H _MULTIPLY16_Size EQU BYTE(1) 45/ 0 : [45] ENDIF(1) 46/ 0 : (MACRO) SETVAR _DIVIDE32(1) 46/ 0 : =2H _DIVIDE32 EQU INITVAR(1) 46/ 0 : =>BLANK IFNB(1) 46/ 0 : INITVAR := INITVAR+(1) 46/ 0 : _DIVIDE32_Size EQU(1) 46/ 0 : =>TRUE ELSE(1) 46/ 0 : =3H INITVAR := INITVAR+BYTE(1) 46/ 0 : =1H _DIVIDE32_Size EQU BYTE(1) 46/ 0 : [46] ENDIF(1) 47/ 0 : (MACRO) SETVAR _MULTIPLY32(1) 47/ 0 : =3H _MULTIPLY32 EQU INITVAR(1) 47/ 0 : =>BLANK IFNB(1) 47/ 0 : INITVAR := INITVAR+(1) 47/ 0 : _MULTIPLY32_Size EQU(1) 47/ 0 : =>TRUE ELSE(1) 47/ 0 : =4H INITVAR := INITVAR+BYTE(1) 47/ 0 : =1H _MULTIPLY32_Size EQU BYTE(1) 47/ 0 : [47] ENDIF(1) 48/ 0 : (MACRO) SETVAR _HEX4DECTXT(1) 48/ 0 : =4H _HEX4DECTXT EQU INITVAR(1) 48/ 0 : =>BLANK IFNB(1) 48/ 0 : INITVAR := INITVAR+(1) 48/ 0 : _HEX4DECTXT_Size EQU(1) 48/ 0 : =>TRUE ELSE(1) 48/ 0 : =5H INITVAR := INITVAR+BYTE(1) 48/ 0 : =1H _HEX4DECTXT_Size EQU BYTE(1) 48/ 0 : [48] ENDIF(1) 49/ 0 : (MACRO) SETVAR _HEX2DECTXT(1) 49/ 0 : =5H _HEX2DECTXT EQU INITVAR(1) 49/ 0 : =>BLANK IFNBAS V1.42 Beta [Bld 146] - source file services.a80(../../svn/pentevo/rom/define.a80) - page 10 - 2/23/2020 18:58:44(1) 49/ 0 : INITVAR := INITVAR+(1) 49/ 0 : _HEX2DECTXT_Size EQU(1) 49/ 0 : =>TRUE ELSE(1) 49/ 0 : =6H INITVAR := INITVAR+BYTE(1) 49/ 0 : =1H _HEX2DECTXT_Size EQU BYTE(1) 49/ 0 : [49] ENDIF(1) 50/ 0 : (MACRO) SETVAR _HEX1DECTXT(1) 50/ 0 : =6H _HEX1DECTXT EQU INITVAR(1) 50/ 0 : =>BLANK IFNB(1) 50/ 0 : INITVAR := INITVAR+(1) 50/ 0 : _HEX1DECTXT_Size EQU(1) 50/ 0 : =>TRUE ELSE(1) 50/ 0 : =7H INITVAR := INITVAR+BYTE(1) 50/ 0 : =1H _HEX1DECTXT_Size EQU BYTE(1) 50/ 0 : [50] ENDIF(1) 51/ 0 :(1) 52/ 0 : ;функции работы с CMOS(1) 53/ 0 : (MACRO) INIT_VAR(1) 53/ 0 : =>BLANK IFNB(1) 53/ 0 : INITVAR :=(1) 53/ 0 : =>TRUE ELSE(1) 53/ 0 : =0H INITVAR := 0(1) 53/ 0 : [53] ENDIF(1) 54/ 0 : (MACRO) SETVAR _INIT_CMOS(1) 54/ 0 : =0H _INIT_CMOS EQU INITVAR(1) 54/ 0 : =>BLANK IFNB(1) 54/ 0 : INITVAR := INITVAR+(1) 54/ 0 : _INIT_CMOS_Size EQU(1) 54/ 0 : =>TRUE ELSE(1) 54/ 0 : =1H INITVAR := INITVAR+BYTE(1) 54/ 0 : =1H _INIT_CMOS_Size EQU BYTE(1) 54/ 0 : [54] ENDIF(1) 55/ 0 : (MACRO) SETVAR _READ_CMOS(1) 55/ 0 : =1H _READ_CMOS EQU INITVAR(1) 55/ 0 : =>BLANK IFNB(1) 55/ 0 : INITVAR := INITVAR+(1) 55/ 0 : _READ_CMOS_Size EQU(1) 55/ 0 : =>TRUE ELSE(1) 55/ 0 : =2H INITVAR := INITVAR+BYTE(1) 55/ 0 : =1H _READ_CMOS_Size EQU BYTE(1) 55/ 0 : [55] ENDIF(1) 56/ 0 : (MACRO) SETVAR _WRITE_CMOS(1) 56/ 0 : =2H _WRITE_CMOS EQU INITVAR(1) 56/ 0 : =>BLANK IFNB(1) 56/ 0 : INITVAR := INITVAR+(1) 56/ 0 : _WRITE_CMOS_Size EQU(1) 56/ 0 : =>TRUE ELSE(1) 56/ 0 : =3H INITVAR := INITVAR+BYTE(1) 56/ 0 : =1H _WRITE_CMOS_Size EQU BYTE(1) 56/ 0 : [56] ENDIF(1) 57/ 0 : (MACRO) SETVAR _CLEAR_CMOS(1) 57/ 0 : =3H _CLEAR_CMOS EQU INITVAR(1) 57/ 0 : =>BLANK IFNB(1) 57/ 0 : INITVAR := INITVAR+(1) 57/ 0 : _CLEAR_CMOS_Size EQU(1) 57/ 0 : =>TRUE ELSE(1) 57/ 0 : =4H INITVAR := INITVAR+BYTE(1) 57/ 0 : =1H _CLEAR_CMOS_Size EQU BYTE(1) 57/ 0 : [57] ENDIF(1) 58/ 0 :AS V1.42 Beta [Bld 146] - source file services.a80(../../svn/pentevo/rom/define.a80) - page 11 - 2/23/2020 18:58:44(1) 59/ 0 : ;функции монтировщика образов(1) 60/ 0 : (MACRO) INIT_VAR(1) 60/ 0 : =>BLANK IFNB(1) 60/ 0 : INITVAR :=(1) 60/ 0 : =>TRUE ELSE(1) 60/ 0 : =0H INITVAR := 0(1) 60/ 0 : [60] ENDIF(1) 61/ 0 : (MACRO) SETVAR _OPEN_MOUNT ; монтирование образа(1) 61/ 0 : =0H _OPEN_MOUNT EQU INITVAR(1) 61/ 0 : =>BLANK IFNB(1) 61/ 0 : INITVAR := INITVAR+(1) 61/ 0 : _OPEN_MOUNT_Size EQU(1) 61/ 0 : =>TRUE ELSE(1) 61/ 0 : =1H INITVAR := INITVAR+BYTE(1) 61/ 0 : =1H _OPEN_MOUNT_Size EQU BYTE(1) 61/ 0 : [61] ENDIF(1) 62/ 0 : (MACRO) SETVAR _RDWR_MOUNT ; чтение/запись примонтированных образов(1) 62/ 0 : =1H _RDWR_MOUNT EQU INITVAR(1) 62/ 0 : =>BLANK IFNB(1) 62/ 0 : INITVAR := INITVAR+(1) 62/ 0 : _RDWR_MOUNT_Size EQU(1) 62/ 0 : =>TRUE ELSE(1) 62/ 0 : =2H INITVAR := INITVAR+BYTE(1) 62/ 0 : =1H _RDWR_MOUNT_Size EQU BYTE(1) 62/ 0 : [62] ENDIF(1) 63/ 0 : (MACRO) SETVAR _FIND_MOUNTED ; поиск монтируемых образов прописанных в IMAGE.FNT(1) 63/ 0 : =2H _FIND_MOUNTED EQU INITVAR(1) 63/ 0 : =>BLANK IFNB(1) 63/ 0 : INITVAR := INITVAR+(1) 63/ 0 : _FIND_MOUNTED_Size EQU(1) 63/ 0 : =>TRUE ELSE(1) 63/ 0 : =3H INITVAR := INITVAR+BYTE(1) 63/ 0 : =1H _FIND_MOUNTED_Size EQU BYTE(1) 63/ 0 : [63] ENDIF(1) 64/ 0 : (MACRO) SETVAR _GET_MOUNTED ; получение буфера описателей примонтированных образов(1) 64/ 0 : =3H _GET_MOUNTED EQU INITVAR(1) 64/ 0 : =>BLANK IFNB(1) 64/ 0 : INITVAR := INITVAR+(1) 64/ 0 : _GET_MOUNTED_Size EQU(1) 64/ 0 : =>TRUE ELSE(1) 64/ 0 : =4H INITVAR := INITVAR+BYTE(1) 64/ 0 : =1H _GET_MOUNTED_Size EQU BYTE(1) 64/ 0 : [64] ENDIF(1) 65/ 0 : (MACRO) SETVAR _CLOSEMOUNT ; демонтирование образа(1) 65/ 0 : =4H _CLOSEMOUNT EQU INITVAR(1) 65/ 0 : =>BLANK IFNB(1) 65/ 0 : INITVAR := INITVAR+(1) 65/ 0 : _CLOSEMOUNT_Size EQU(1) 65/ 0 : =>TRUE ELSE(1) 65/ 0 : =5H INITVAR := INITVAR+BYTE(1) 65/ 0 : =1H _CLOSEMOUNT_Size EQU BYTE(1) 65/ 0 : [65] ENDIF(1) 66/ 0 : (MACRO) SETVAR _LOADIMAGE ; загрузка образа в рамдиск(1) 66/ 0 : =5H _LOADIMAGE EQU INITVAR(1) 66/ 0 : =>BLANK IFNB(1) 66/ 0 : INITVAR := INITVAR+(1) 66/ 0 : _LOADIMAGE_Size EQU(1) 66/ 0 : =>TRUE ELSE(1) 66/ 0 : =6H INITVAR := INITVAR+BYTE(1) 66/ 0 : =1H _LOADIMAGE_Size EQU BYTEAS V1.42 Beta [Bld 146] - source file services.a80(../../svn/pentevo/rom/define.a80) - page 12 - 2/23/2020 18:58:44(1) 66/ 0 : [66] ENDIF(1) 67/ 0 : (MACRO) SETVAR _REST_NAMELOAD ; получение описателя файла загруженного в рамдиск(1) 67/ 0 : =6H _REST_NAMELOAD EQU INITVAR(1) 67/ 0 : =>BLANK IFNB(1) 67/ 0 : INITVAR := INITVAR+(1) 67/ 0 : _REST_NAMELOAD_Size EQU(1) 67/ 0 : =>TRUE ELSE(1) 67/ 0 : =7H INITVAR := INITVAR+BYTE(1) 67/ 0 : =1H _REST_NAMELOAD_Size EQU BYTE(1) 67/ 0 : [67] ENDIF(1) 68/ 0 : (MACRO) SETVAR _CMP_DRIVE ; проверка примонтированного образа на указанной букве(1) 68/ 0 : =7H _CMP_DRIVE EQU INITVAR(1) 68/ 0 : =>BLANK IFNB(1) 68/ 0 : INITVAR := INITVAR+(1) 68/ 0 : _CMP_DRIVE_Size EQU(1) 68/ 0 : =>TRUE ELSE(1) 68/ 0 : =8H INITVAR := INITVAR+BYTE(1) 68/ 0 : =1H _CMP_DRIVE_Size EQU BYTE(1) 68/ 0 : [68] ENDIF(1) 69/ 0 : (MACRO) SETVAR _GET_VIRT_BITS ; получение битов смонтированных дисков(1) 69/ 0 : =8H _GET_VIRT_BITS EQU INITVAR(1) 69/ 0 : =>BLANK IFNB(1) 69/ 0 : INITVAR := INITVAR+(1) 69/ 0 : _GET_VIRT_BITS_Size EQU(1) 69/ 0 : =>TRUE ELSE(1) 69/ 0 : =9H INITVAR := INITVAR+BYTE(1) 69/ 0 : =1H _GET_VIRT_BITS_Size EQU BYTE(1) 69/ 0 : [69] ENDIF(1) 70/ 0 : (MACRO) SETVAR _MOUNT_RAMDISK ; монтирование рамдиска(1) 70/ 0 : =9H _MOUNT_RAMDISK EQU INITVAR(1) 70/ 0 : =>BLANK IFNB(1) 70/ 0 : INITVAR := INITVAR+(1) 70/ 0 : _MOUNT_RAMDISK_Size EQU(1) 70/ 0 : =>TRUE ELSE(1) 70/ 0 : =AH INITVAR := INITVAR+BYTE(1) 70/ 0 : =1H _MOUNT_RAMDISK_Size EQU BYTE(1) 70/ 0 : [70] ENDIF(1) 71/ 0 :(1) 72/ 0 : ;номера функций менеджера устройств(1) 73/ 0 : (MACRO) INIT_VAR(1) 73/ 0 : =>BLANK IFNB(1) 73/ 0 : INITVAR :=(1) 73/ 0 : =>TRUE ELSE(1) 73/ 0 : =0H INITVAR := 0(1) 73/ 0 : [73] ENDIF(1) 74/ 0 : (MACRO) SETVAR _DEVFIND ;00 ПОИСК УСТРОЙСТВ(1) 74/ 0 : =0H _DEVFIND EQU INITVAR(1) 74/ 0 : =>BLANK IFNB(1) 74/ 0 : INITVAR := INITVAR+(1) 74/ 0 : _DEVFIND_Size EQU(1) 74/ 0 : =>TRUE ELSE(1) 74/ 0 : =1H INITVAR := INITVAR+BYTE(1) 74/ 0 : =1H _DEVFIND_Size EQU BYTE(1) 74/ 0 : [74] ENDIF(1) 75/ 0 : (MACRO) SETVAR _SET_VOL ;01 ВЫБОР РАЗДЕЛА(1) 75/ 0 : =1H _SET_VOL EQU INITVAR(1) 75/ 0 : =>BLANK IFNB(1) 75/ 0 : INITVAR := INITVAR+(1) 75/ 0 : _SET_VOL_Size EQU(1) 75/ 0 : =>TRUE ELSEAS V1.42 Beta [Bld 146] - source file services.a80(../../svn/pentevo/rom/define.a80) - page 13 - 2/23/2020 18:58:44(1) 75/ 0 : =2H INITVAR := INITVAR+BYTE(1) 75/ 0 : =1H _SET_VOL_Size EQU BYTE(1) 75/ 0 : [75] ENDIF(1) 76/ 0 : (MACRO) SETVAR _KOL_VOL ;02 ЗАПРОС НАЙДЕНОГО(1) 76/ 0 : =2H _KOL_VOL EQU INITVAR(1) 76/ 0 : =>BLANK IFNB(1) 76/ 0 : INITVAR := INITVAR+(1) 76/ 0 : _KOL_VOL_Size EQU(1) 76/ 0 : =>TRUE ELSE(1) 76/ 0 : =3H INITVAR := INITVAR+BYTE(1) 76/ 0 : =1H _KOL_VOL_Size EQU BYTE(1) 76/ 0 : [76] ENDIF(1) 77/ 0 : (MACRO) SETVAR _GET_FNDVOLUME ;03 ПОЛУЧИТЬ ТАБЛИЦУ НАЙДЕННЫХ РАЗДЕЛОВ(1) 77/ 0 : =3H _GET_FNDVOLUME EQU INITVAR(1) 77/ 0 : =>BLANK IFNB(1) 77/ 0 : INITVAR := INITVAR+(1) 77/ 0 : _GET_FNDVOLUME_Size EQU(1) 77/ 0 : =>TRUE ELSE(1) 77/ 0 : =4H INITVAR := INITVAR+BYTE(1) 77/ 0 : =1H _GET_FNDVOLUME_Size EQU BYTE(1) 77/ 0 : [77] ENDIF(1) 78/ 0 : (MACRO) SETVAR _TO_DRV ;04 ВЫЗОВ ДРАЙВЕРА ВЫБРАННОГО УСТРОЙСТВА(1) 78/ 0 : =4H _TO_DRV EQU INITVAR(1) 78/ 0 : =>BLANK IFNB(1) 78/ 0 : INITVAR := INITVAR+(1) 78/ 0 : _TO_DRV_Size EQU(1) 78/ 0 : =>TRUE ELSE(1) 78/ 0 : =5H INITVAR := INITVAR+BYTE(1) 78/ 0 : =1H _TO_DRV_Size EQU BYTE(1) 78/ 0 : [78] ENDIF(1) 79/ 0 : (MACRO) SETVAR _SET_DEVICE ;05 УСТАНОВКА БИТОВ УСТРОЙСТВА И LBA РЕЖИМА(1) 79/ 0 : =5H _SET_DEVICE EQU INITVAR(1) 79/ 0 : =>BLANK IFNB(1) 79/ 0 : INITVAR := INITVAR+(1) 79/ 0 : _SET_DEVICE_Size EQU(1) 79/ 0 : =>TRUE ELSE(1) 79/ 0 : =6H INITVAR := INITVAR+BYTE(1) 79/ 0 : =1H _SET_DEVICE_Size EQU BYTE(1) 79/ 0 : [79] ENDIF(1) 80/ 0 : (MACRO) SETVAR _CONTROL_SD ;06 КОНТРОЛЬ НАЛИЧИЯ SD КАРТ(1) 80/ 0 : =6H _CONTROL_SD EQU INITVAR(1) 80/ 0 : =>BLANK IFNB(1) 80/ 0 : INITVAR := INITVAR+(1) 80/ 0 : _CONTROL_SD_Size EQU(1) 80/ 0 : =>TRUE ELSE(1) 80/ 0 : =7H INITVAR := INITVAR+BYTE(1) 80/ 0 : =1H _CONTROL_SD_Size EQU BYTE(1) 80/ 0 : [80] ENDIF(1) 81/ 0 : (MACRO) SETVAR _COMHDDN ;07 ПРЯМОЙ ВЫЗОВ ДРАЙВЕРА HDD NEMO (ВРЕМЕННАЯ ФУНКЦИЯ)(1) 81/ 0 : =7H _COMHDDN EQU INITVAR(1) 81/ 0 : =>BLANK IFNB(1) 81/ 0 : INITVAR := INITVAR+(1) 81/ 0 : _COMHDDN_Size EQU(1) 81/ 0 : =>TRUE ELSE(1) 81/ 0 : =8H INITVAR := INITVAR+BYTE(1) 81/ 0 : =1H _COMHDDN_Size EQU BYTE(1) 81/ 0 : [81] ENDIF(1) 82/ 0 : (MACRO) SETVAR _FREINIT_VOL ;08 ПОЛНАЯ ПЕРЕИНИЦИАЛИЗАЦИЯ РАЗДЕЛА(1) 82/ 0 : =8H _FREINIT_VOL EQU INITVAR(1) 82/ 0 : =>BLANK IFNBAS V1.42 Beta [Bld 146] - source file services.a80(../../svn/pentevo/rom/define.a80) - page 14 - 2/23/2020 18:58:44(1) 82/ 0 : INITVAR := INITVAR+(1) 82/ 0 : _FREINIT_VOL_Size EQU(1) 82/ 0 : =>TRUE ELSE(1) 82/ 0 : =9H INITVAR := INITVAR+BYTE(1) 82/ 0 : =1H _FREINIT_VOL_Size EQU BYTE(1) 82/ 0 : [82] ENDIF(1) 83/ 0 :(1) 84/ 0 : ;номера функций вызова драйвера устройства(1) 85/ 0 : (MACRO) INIT_VAR(1) 85/ 0 : =>BLANK IFNB(1) 85/ 0 : INITVAR :=(1) 85/ 0 : =>TRUE ELSE(1) 85/ 0 : =0H INITVAR := 0(1) 85/ 0 : [85] ENDIF(1) 86/ 0 : (MACRO) SETVAR _DEV_INIT ;00 ПОИСК И ИНИЦИАЛИЗАЦИЯ УСТРОЙСТВА(1) 86/ 0 : =0H _DEV_INIT EQU INITVAR(1) 86/ 0 : =>BLANK IFNB(1) 86/ 0 : INITVAR := INITVAR+(1) 86/ 0 : _DEV_INIT_Size EQU(1) 86/ 0 : =>TRUE ELSE(1) 86/ 0 : =1H INITVAR := INITVAR+BYTE(1) 86/ 0 : =1H _DEV_INIT_Size EQU BYTE(1) 86/ 0 : [86] ENDIF(1) 87/ 0 : (MACRO) SETVAR _DEV_STATUS ;01 ЗАПРОС СТАТУСА УСТРОЙСТВА. ПОКА ЗАГЛУШЕНА(1) 87/ 0 : =1H _DEV_STATUS EQU INITVAR(1) 87/ 0 : =>BLANK IFNB(1) 87/ 0 : INITVAR := INITVAR+(1) 87/ 0 : _DEV_STATUS_Size EQU(1) 87/ 0 : =>TRUE ELSE(1) 87/ 0 : =2H INITVAR := INITVAR+BYTE(1) 87/ 0 : =1H _DEV_STATUS_Size EQU BYTE(1) 87/ 0 : [87] ENDIF(1) 88/ 0 : (MACRO) SETVAR _DEV_READ ;02 ЧТЕНИЕ СЕКТОРОВ(1) 88/ 0 : =2H _DEV_READ EQU INITVAR(1) 88/ 0 : =>BLANK IFNB(1) 88/ 0 : INITVAR := INITVAR+(1) 88/ 0 : _DEV_READ_Size EQU(1) 88/ 0 : =>TRUE ELSE(1) 88/ 0 : =3H INITVAR := INITVAR+BYTE(1) 88/ 0 : =1H _DEV_READ_Size EQU BYTE(1) 88/ 0 : [88] ENDIF(1) 89/ 0 : (MACRO) SETVAR _DEV_WRITE ;03 ЗАПИСЬ СЕКТОРОВ(1) 89/ 0 : =3H _DEV_WRITE EQU INITVAR(1) 89/ 0 : =>BLANK IFNB(1) 89/ 0 : INITVAR := INITVAR+(1) 89/ 0 : _DEV_WRITE_Size EQU(1) 89/ 0 : =>TRUE ELSE(1) 89/ 0 : =4H INITVAR := INITVAR+BYTE(1) 89/ 0 : =1H _DEV_WRITE_Size EQU BYTE(1) 89/ 0 : [89] ENDIF(1) 90/ 0 : (MACRO) SETVAR _DEV_READID ;04 ЧТЕНИЕ ID СЕКТОРА(1) 90/ 0 : =4H _DEV_READID EQU INITVAR(1) 90/ 0 : =>BLANK IFNB(1) 90/ 0 : INITVAR := INITVAR+(1) 90/ 0 : _DEV_READID_Size EQU(1) 90/ 0 : =>TRUE ELSE(1) 90/ 0 : =5H INITVAR := INITVAR+BYTE(1) 90/ 0 : =1H _DEV_READID_Size EQU BYTE(1) 90/ 0 : [90] ENDIF(1) 91/ 0 :AS V1.42 Beta [Bld 146] - source file services.a80(../../svn/pentevo/rom/define.a80) - page 15 - 2/23/2020 18:58:44(1) 92/ 0 : ;номера вызываемых функций FAT драйвера(1) 93/ 0 : (MACRO) INIT_VAR(1) 93/ 0 : =>BLANK IFNB(1) 93/ 0 : INITVAR :=(1) 93/ 0 : =>TRUE ELSE(1) 93/ 0 : =0H INITVAR := 0(1) 93/ 0 : [93] ENDIF(1) 94/ 0 : (MACRO) SETVAR _INIT_FATVARS ;ИНИЦИАЛИЗАЦИЯ ПЕРЕМЕННЫХ FAT(1) 94/ 0 : =0H _INIT_FATVARS EQU INITVAR(1) 94/ 0 : =>BLANK IFNB(1) 94/ 0 : INITVAR := INITVAR+(1) 94/ 0 : _INIT_FATVARS_Size EQU(1) 94/ 0 : =>TRUE ELSE(1) 94/ 0 : =1H INITVAR := INITVAR+BYTE(1) 94/ 0 : =1H _INIT_FATVARS_Size EQU BYTE(1) 94/ 0 : [94] ENDIF(1) 95/ 0 : (MACRO) SETVAR _READ_DIR ;ПОЛУЧЕНИЕ ОПИСАТЕЛЯ ФАЙЛА(1) 95/ 0 : =1H _READ_DIR EQU INITVAR(1) 95/ 0 : =>BLANK IFNB(1) 95/ 0 : INITVAR := INITVAR+(1) 95/ 0 : _READ_DIR_Size EQU(1) 95/ 0 : =>TRUE ELSE(1) 95/ 0 : =2H INITVAR := INITVAR+BYTE(1) 95/ 0 : =1H _READ_DIR_Size EQU BYTE(1) 95/ 0 : [95] ENDIF(1) 96/ 0 : (MACRO) SETVAR _ENTER_DIR ;ВХОД/ВЫХОД В ДИР(1) 96/ 0 : =2H _ENTER_DIR EQU INITVAR(1) 96/ 0 : =>BLANK IFNB(1) 96/ 0 : INITVAR := INITVAR+(1) 96/ 0 : _ENTER_DIR_Size EQU(1) 96/ 0 : =>TRUE ELSE(1) 96/ 0 : =3H INITVAR := INITVAR+BYTE(1) 96/ 0 : =1H _ENTER_DIR_Size EQU BYTE(1) 96/ 0 : [96] ENDIF(1) 97/ 0 : (MACRO) SETVAR _GET_PATH ;ПОЛУЧЕНИЕ ТЕКУЩЕГО ПУТИ(1) 97/ 0 : =3H _GET_PATH EQU INITVAR(1) 97/ 0 : =>BLANK IFNB(1) 97/ 0 : INITVAR := INITVAR+(1) 97/ 0 : _GET_PATH_Size EQU(1) 97/ 0 : =>TRUE ELSE(1) 97/ 0 : =4H INITVAR := INITVAR+BYTE(1) 97/ 0 : =1H _GET_PATH_Size EQU BYTE(1) 97/ 0 : [97] ENDIF(1) 98/ 0 : (MACRO) SETVAR _GET_LONGNAME ;ПОЛУЧЕНИЕ ДЛИННОГО ИМЕНИ ФАЙЛА(1) 98/ 0 : =4H _GET_LONGNAME EQU INITVAR(1) 98/ 0 : =>BLANK IFNB(1) 98/ 0 : INITVAR := INITVAR+(1) 98/ 0 : _GET_LONGNAME_Size EQU(1) 98/ 0 : =>TRUE ELSE(1) 98/ 0 : =5H INITVAR := INITVAR+BYTE(1) 98/ 0 : =1H _GET_LONGNAME_Size EQU BYTE(1) 98/ 0 : [98] ENDIF(1) 99/ 0 : (MACRO) SETVAR _FIND_NAME ;ПОИСК ПО ИМЕНИ(1) 99/ 0 : =5H _FIND_NAME EQU INITVAR(1) 99/ 0 : =>BLANK IFNB(1) 99/ 0 : INITVAR := INITVAR+(1) 99/ 0 : _FIND_NAME_Size EQU(1) 99/ 0 : =>TRUE ELSE(1) 99/ 0 : =6H INITVAR := INITVAR+BYTE(1) 99/ 0 : =1H _FIND_NAME_Size EQU BYTEAS V1.42 Beta [Bld 146] - source file services.a80(../../svn/pentevo/rom/define.a80) - page 16 - 2/23/2020 18:58:44(1) 99/ 0 : [99] ENDIF(1) 100/ 0 : (MACRO) SETVAR _FIND_FILEITEM ;ПОИСК ВСЕХ ОПИСАТЕЛЕЙ С ВЫДАЧЕЙ НОМЕРОВ НАЙДЕННОГО(1) 100/ 0 : =6H _FIND_FILEITEM EQU INITVAR(1) 100/ 0 : =>BLANK IFNB(1) 100/ 0 : INITVAR := INITVAR+(1) 100/ 0 : _FIND_FILEITEM_Size EQU(1) 100/ 0 : =>TRUE ELSE(1) 100/ 0 : =7H INITVAR := INITVAR+BYTE(1) 100/ 0 : =1H _FIND_FILEITEM_Size EQU BYTE(1) 100/ 0 : [100] ENDIF(1) 101/ 0 : (MACRO) SETVAR _SET_MASK_EXT ;УСТАНОВКА МАСКИ РАСШИРЕНИЙ ДЛЯ ПОИСКА(1) 101/ 0 : =7H _SET_MASK_EXT EQU INITVAR(1) 101/ 0 : =>BLANK IFNB(1) 101/ 0 : INITVAR := INITVAR+(1) 101/ 0 : _SET_MASK_EXT_Size EQU(1) 101/ 0 : =>TRUE ELSE(1) 101/ 0 : =8H INITVAR := INITVAR+BYTE(1) 101/ 0 : =1H _SET_MASK_EXT_Size EQU BYTE(1) 101/ 0 : [101] ENDIF(1) 102/ 0 : (MACRO) SETVAR _OPEN_FILE ;ОТКРЫТИЕ ФАЙЛА(1) 102/ 0 : =8H _OPEN_FILE EQU INITVAR(1) 102/ 0 : =>BLANK IFNB(1) 102/ 0 : INITVAR := INITVAR+(1) 102/ 0 : _OPEN_FILE_Size EQU(1) 102/ 0 : =>TRUE ELSE(1) 102/ 0 : =9H INITVAR := INITVAR+BYTE(1) 102/ 0 : =1H _OPEN_FILE_Size EQU BYTE(1) 102/ 0 : [102] ENDIF(1) 103/ 0 : (MACRO) SETVAR _READ_FILE ;ПОСЛЕДОВАТЕЛЬНОЕ ЧТЕНИЕ ОТКРЫТОГО ФАЙЛА(1) 103/ 0 : =9H _READ_FILE EQU INITVAR(1) 103/ 0 : =>BLANK IFNB(1) 103/ 0 : INITVAR := INITVAR+(1) 103/ 0 : _READ_FILE_Size EQU(1) 103/ 0 : =>TRUE ELSE(1) 103/ 0 : =AH INITVAR := INITVAR+BYTE(1) 103/ 0 : =1H _READ_FILE_Size EQU BYTE(1) 103/ 0 : [103] ENDIF(1) 104/ 0 : (MACRO) SETVAR _INIT_TEKDIR ;СОЗДАНИЕ ТАБЛИЦЫ КЛАСТЕРОВ ТЕКУЩЕЙ ДИРЕКТОРИИ(1) 104/ 0 : =AH _INIT_TEKDIR EQU INITVAR(1) 104/ 0 : =>BLANK IFNB(1) 104/ 0 : INITVAR := INITVAR+(1) 104/ 0 : _INIT_TEKDIR_Size EQU(1) 104/ 0 : =>TRUE ELSE(1) 104/ 0 : =BH INITVAR := INITVAR+BYTE(1) 104/ 0 : =1H _INIT_TEKDIR_Size EQU BYTE(1) 104/ 0 : [104] ENDIF(1) 105/ 0 : (MACRO) SETVAR _POS_FILES ;РАБОТА С ТЕКУЩЕЙ ПОЗИЦИЕЙ(1) 105/ 0 : =BH _POS_FILES EQU INITVAR(1) 105/ 0 : =>BLANK IFNB(1) 105/ 0 : INITVAR := INITVAR+(1) 105/ 0 : _POS_FILES_Size EQU(1) 105/ 0 : =>TRUE ELSE(1) 105/ 0 : =CH INITVAR := INITVAR+BYTE(1) 105/ 0 : =1H _POS_FILES_Size EQU BYTE(1) 105/ 0 : [105] ENDIF(1) 106/ 0 :(1) 107/ 0 : ;подфункции функции _POS_FILES(1) 108/ 0 : (MACRO) INIT_VAR(1) 108/ 0 : =>BLANK IFNB(1) 108/ 0 : INITVAR :=AS V1.42 Beta [Bld 146] - source file services.a80(../../svn/pentevo/rom/define.a80) - page 17 - 2/23/2020 18:58:44(1) 108/ 0 : =>TRUE ELSE(1) 108/ 0 : =0H INITVAR := 0(1) 108/ 0 : [108] ENDIF(1) 109/ 0 : (MACRO) SETVAR _POSTF00 ;СОХРАНЕНИЕ ТЕКУЩЕЙ ПОЗИЦИИ ФАЙЛА(1) 109/ 0 : =0H _POSTF00 EQU INITVAR(1) 109/ 0 : =>BLANK IFNB(1) 109/ 0 : INITVAR := INITVAR+(1) 109/ 0 : _POSTF00_Size EQU(1) 109/ 0 : =>TRUE ELSE(1) 109/ 0 : =1H INITVAR := INITVAR+BYTE(1) 109/ 0 : =1H _POSTF00_Size EQU BYTE(1) 109/ 0 : [109] ENDIF(1) 110/ 0 : (MACRO) SETVAR _POSTF01 ;ВОССТАНОВЛЕНИЕ ТЕКУЩЕЙ ПОЗИЦИИ ФАЙЛА(1) 110/ 0 : =1H _POSTF01 EQU INITVAR(1) 110/ 0 : =>BLANK IFNB(1) 110/ 0 : INITVAR := INITVAR+(1) 110/ 0 : _POSTF01_Size EQU(1) 110/ 0 : =>TRUE ELSE(1) 110/ 0 : =2H INITVAR := INITVAR+BYTE(1) 110/ 0 : =1H _POSTF01_Size EQU BYTE(1) 110/ 0 : [110] ENDIF(1) 111/ 0 : (MACRO) SETVAR _POSTF02 ;СБРОС ТЕКУЩЕЙ ПОЗИЦИИ В 0 И ПОИСК ПЕРВОЙ "ЛЕГАЛЬНОЙ" ЗАПИСИ(1) 111/ 0 : =2H _POSTF02 EQU INITVAR(1) 111/ 0 : =>BLANK IFNB(1) 111/ 0 : INITVAR := INITVAR+(1) 111/ 0 : _POSTF02_Size EQU(1) 111/ 0 : =>TRUE ELSE(1) 111/ 0 : =3H INITVAR := INITVAR+BYTE(1) 111/ 0 : =1H _POSTF02_Size EQU BYTE(1) 111/ 0 : [111] ENDIF(1) 112/ 0 : (MACRO) SETVAR _POSTF03 ;ПЕРЕМОТАТЬ НА "B" ФАЙЛОВ НАЗАД(1) 112/ 0 : =3H _POSTF03 EQU INITVAR(1) 112/ 0 : =>BLANK IFNB(1) 112/ 0 : INITVAR := INITVAR+(1) 112/ 0 : _POSTF03_Size EQU(1) 112/ 0 : =>TRUE ELSE(1) 112/ 0 : =4H INITVAR := INITVAR+BYTE(1) 112/ 0 : =1H _POSTF03_Size EQU BYTE(1) 112/ 0 : [112] ENDIF(1) 113/ 0 : (MACRO) SETVAR _POSTF04 ;ПЕРЕМОТАТЬ НА "B" ФАЙЛОВ ВПЕРЕД(1) 113/ 0 : =4H _POSTF04 EQU INITVAR(1) 113/ 0 : =>BLANK IFNB(1) 113/ 0 : INITVAR := INITVAR+(1) 113/ 0 : _POSTF04_Size EQU(1) 113/ 0 : =>TRUE ELSE(1) 113/ 0 : =5H INITVAR := INITVAR+BYTE(1) 113/ 0 : =1H _POSTF04_Size EQU BYTE(1) 113/ 0 : [113] ENDIF(1) 114/ 0 : (MACRO) SETVAR _POSTF05 ;ПОДСЧЕТ КОЛИЧЕСТВА "ЛЕГАЛЬНЫХ" ЗАПИСЕЙ(1) 114/ 0 : =5H _POSTF05 EQU INITVAR(1) 114/ 0 : =>BLANK IFNB(1) 114/ 0 : INITVAR := INITVAR+(1) 114/ 0 : _POSTF05_Size EQU(1) 114/ 0 : =>TRUE ELSE(1) 114/ 0 : =6H INITVAR := INITVAR+BYTE(1) 114/ 0 : =1H _POSTF05_Size EQU BYTE(1) 114/ 0 : [114] ENDIF(1) 115/ 0 : (MACRO) SETVAR _POSTF06 ;УСТАНОВИТЬ НОМЕР "ЛЕГАЛЬНОЙ" ЗАПИСИ ИЗ "BC"(1) 115/ 0 : =6H _POSTF06 EQU INITVAR(1) 115/ 0 : =>BLANK IFNBAS V1.42 Beta [Bld 146] - source file services.a80(../../svn/pentevo/rom/define.a80) - page 18 - 2/23/2020 18:58:44(1) 115/ 0 : INITVAR := INITVAR+(1) 115/ 0 : _POSTF06_Size EQU(1) 115/ 0 : =>TRUE ELSE(1) 115/ 0 : =7H INITVAR := INITVAR+BYTE(1) 115/ 0 : =1H _POSTF06_Size EQU BYTE(1) 115/ 0 : [115] ENDIF(1) 116/ 0 : (MACRO) SETVAR _POSTF07 ;ВЕРНУТЬ В "BC" ТЕКУЩИЙ НОМЕР "ЛЕГАЛЬНОЙ" ЗАПИСИ(1) 116/ 0 : =7H _POSTF07 EQU INITVAR(1) 116/ 0 : =>BLANK IFNB(1) 116/ 0 : INITVAR := INITVAR+(1) 116/ 0 : _POSTF07_Size EQU(1) 116/ 0 : =>TRUE ELSE(1) 116/ 0 : =8H INITVAR := INITVAR+BYTE(1) 116/ 0 : =1H _POSTF07_Size EQU BYTE(1) 116/ 0 : [116] ENDIF(1) 117/ 0 :(1) 118/ 0 : ;номера поддерживаемых расширений для RST 8(1) 119/ 0 : ;"TRDSCLFDITAPSPG$C FNTBMPROM" ;RST 8(1) 120/ 0 : ;"TRDSCLFDITAPSPG$C BMPSNA" ;MAINMENU(1) 121/ 0 : (MACRO) INIT_VAR 1(1) 121/ 0 : =>NOT BLANK IFNB 1(1) 121/ 0 : =1H INITVAR := 1(1) 121/ 0 : =>FALSE ELSE(1) 121/ 0 : INITVAR := 0(1) 121/ 0 : [121] ENDIF(1) 122/ 0 : (MACRO) SETVAR _TRD ;TRD(1) 122/ 0 : =1H _TRD EQU INITVAR(1) 122/ 0 : =>BLANK IFNB(1) 122/ 0 : INITVAR := INITVAR+(1) 122/ 0 : _TRD_Size EQU(1) 122/ 0 : =>TRUE ELSE(1) 122/ 0 : =2H INITVAR := INITVAR+BYTE(1) 122/ 0 : =1H _TRD_Size EQU BYTE(1) 122/ 0 : [122] ENDIF(1) 123/ 0 : (MACRO) SETVAR _SCL ;SCL(1) 123/ 0 : =2H _SCL EQU INITVAR(1) 123/ 0 : =>BLANK IFNB(1) 123/ 0 : INITVAR := INITVAR+(1) 123/ 0 : _SCL_Size EQU(1) 123/ 0 : =>TRUE ELSE(1) 123/ 0 : =3H INITVAR := INITVAR+BYTE(1) 123/ 0 : =1H _SCL_Size EQU BYTE(1) 123/ 0 : [123] ENDIF(1) 124/ 0 : (MACRO) SETVAR _FDI ;FDI(1) 124/ 0 : =3H _FDI EQU INITVAR(1) 124/ 0 : =>BLANK IFNB(1) 124/ 0 : INITVAR := INITVAR+(1) 124/ 0 : _FDI_Size EQU(1) 124/ 0 : =>TRUE ELSE(1) 124/ 0 : =4H INITVAR := INITVAR+BYTE(1) 124/ 0 : =1H _FDI_Size EQU BYTE(1) 124/ 0 : [124] ENDIF(1) 125/ 0 : (MACRO) SETVAR _TAP ;TAP(1) 125/ 0 : =4H _TAP EQU INITVAR(1) 125/ 0 : =>BLANK IFNB(1) 125/ 0 : INITVAR := INITVAR+(1) 125/ 0 : _TAP_Size EQU(1) 125/ 0 : =>TRUE ELSE(1) 125/ 0 : =5H INITVAR := INITVAR+BYTE(1) 125/ 0 : =1H _TAP_Size EQU BYTEAS V1.42 Beta [Bld 146] - source file services.a80(../../svn/pentevo/rom/define.a80) - page 19 - 2/23/2020 18:58:44(1) 125/ 0 : [125] ENDIF(1) 126/ 0 : (MACRO) SETVAR _SPG ;SPG(1) 126/ 0 : =5H _SPG EQU INITVAR(1) 126/ 0 : =>BLANK IFNB(1) 126/ 0 : INITVAR := INITVAR+(1) 126/ 0 : _SPG_Size EQU(1) 126/ 0 : =>TRUE ELSE(1) 126/ 0 : =6H INITVAR := INITVAR+BYTE(1) 126/ 0 : =1H _SPG_Size EQU BYTE(1) 126/ 0 : [126] ENDIF(1) 127/ 0 : (MACRO) SETVAR _HOB ;$C(1) 127/ 0 : =6H _HOB EQU INITVAR(1) 127/ 0 : =>BLANK IFNB(1) 127/ 0 : INITVAR := INITVAR+(1) 127/ 0 : _HOB_Size EQU(1) 127/ 0 : =>TRUE ELSE(1) 127/ 0 : =7H INITVAR := INITVAR+BYTE(1) 127/ 0 : =1H _HOB_Size EQU BYTE(1) 127/ 0 : [127] ENDIF(1) 128/ 0 : (MACRO) SETVAR _FNT ;FNT(1) 128/ 0 : =7H _FNT EQU INITVAR(1) 128/ 0 : =>BLANK IFNB(1) 128/ 0 : INITVAR := INITVAR+(1) 128/ 0 : _FNT_Size EQU(1) 128/ 0 : =>TRUE ELSE(1) 128/ 0 : =8H INITVAR := INITVAR+BYTE(1) 128/ 0 : =1H _FNT_Size EQU BYTE(1) 128/ 0 : [128] ENDIF(1) 129/ 0 : (MACRO) SETVAR _BMP ;BMP(1) 129/ 0 : =8H _BMP EQU INITVAR(1) 129/ 0 : =>BLANK IFNB(1) 129/ 0 : INITVAR := INITVAR+(1) 129/ 0 : _BMP_Size EQU(1) 129/ 0 : =>TRUE ELSE(1) 129/ 0 : =9H INITVAR := INITVAR+BYTE(1) 129/ 0 : =1H _BMP_Size EQU BYTE(1) 129/ 0 : [129] ENDIF(1) 130/ 0 : (MACRO) SETVAR _ROM ;ROM(1) 130/ 0 : =9H _ROM EQU INITVAR(1) 130/ 0 : =>BLANK IFNB(1) 130/ 0 : INITVAR := INITVAR+(1) 130/ 0 : _ROM_Size EQU(1) 130/ 0 : =>TRUE ELSE(1) 130/ 0 : =AH INITVAR := INITVAR+BYTE(1) 130/ 0 : =1H _ROM_Size EQU BYTE(1) 130/ 0 : [130] ENDIF(1) 131/ 0 : ; SETVAR _HOB1 ;$??(1) 132/ 0 : ; SETVAR _HOB2 ;!??(1) 133/ 0 :(1) 134/ 0 : ;[внутренние номера типов разделов](1) 135/ 0 : (MACRO) INIT_VAR(1) 135/ 0 : =>BLANK IFNB(1) 135/ 0 : INITVAR :=(1) 135/ 0 : =>TRUE ELSE(1) 135/ 0 : =0H INITVAR := 0(1) 135/ 0 : [135] ENDIF(1) 136/ 0 : (MACRO) SETVAR _NO_INIT(1) 136/ 0 : =0H _NO_INIT EQU INITVAR(1) 136/ 0 : =>BLANK IFNB(1) 136/ 0 : INITVAR := INITVAR+AS V1.42 Beta [Bld 146] - source file services.a80(../../svn/pentevo/rom/define.a80) - page 20 - 2/23/2020 18:58:44(1) 136/ 0 : _NO_INIT_Size EQU(1) 136/ 0 : =>TRUE ELSE(1) 136/ 0 : =1H INITVAR := INITVAR+BYTE(1) 136/ 0 : =1H _NO_INIT_Size EQU BYTE(1) 136/ 0 : [136] ENDIF(1) 137/ 0 : (MACRO) SETVAR _FAT12 ;00 = 01 FAT12(1) 137/ 0 : =1H _FAT12 EQU INITVAR(1) 137/ 0 : =>BLANK IFNB(1) 137/ 0 : INITVAR := INITVAR+(1) 137/ 0 : _FAT12_Size EQU(1) 137/ 0 : =>TRUE ELSE(1) 137/ 0 : =2H INITVAR := INITVAR+BYTE(1) 137/ 0 : =1H _FAT12_Size EQU BYTE(1) 137/ 0 : [137] ENDIF(1) 138/ 0 : (MACRO) SETVAR _FAT16 ;01 = 04,06,0E FAT16(1) 138/ 0 : =2H _FAT16 EQU INITVAR(1) 138/ 0 : =>BLANK IFNB(1) 138/ 0 : INITVAR := INITVAR+(1) 138/ 0 : _FAT16_Size EQU(1) 138/ 0 : =>TRUE ELSE(1) 138/ 0 : =3H INITVAR := INITVAR+BYTE(1) 138/ 0 : =1H _FAT16_Size EQU BYTE(1) 138/ 0 : [138] ENDIF(1) 139/ 0 : (MACRO) SETVAR _FAT32 ;02 = 0B,0C FAT32(1) 139/ 0 : =3H _FAT32 EQU INITVAR(1) 139/ 0 : =>BLANK IFNB(1) 139/ 0 : INITVAR := INITVAR+(1) 139/ 0 : _FAT32_Size EQU(1) 139/ 0 : =>TRUE ELSE(1) 139/ 0 : =4H INITVAR := INITVAR+BYTE(1) 139/ 0 : =1H _FAT32_Size EQU BYTE(1) 139/ 0 : [139] ENDIF(1) 140/ 0 : (MACRO) SETVAR _TRDOS ;03 TR-DOS диск(1) 140/ 0 : =4H _TRDOS EQU INITVAR(1) 140/ 0 : =>BLANK IFNB(1) 140/ 0 : INITVAR := INITVAR+(1) 140/ 0 : _TRDOS_Size EQU(1) 140/ 0 : =>TRUE ELSE(1) 140/ 0 : =5H INITVAR := INITVAR+BYTE(1) 140/ 0 : =1H _TRDOS_Size EQU BYTE(1) 140/ 0 : [140] ENDIF(1) 141/ 0 : (MACRO) SETVAR _UNKNOWN ; файловая система еще не определена или неизвестна(1) 141/ 0 : =5H _UNKNOWN EQU INITVAR(1) 141/ 0 : =>BLANK IFNB(1) 141/ 0 : INITVAR := INITVAR+(1) 141/ 0 : _UNKNOWN_Size EQU(1) 141/ 0 : =>TRUE ELSE(1) 141/ 0 : =6H INITVAR := INITVAR+BYTE(1) 141/ 0 : =1H _UNKNOWN_Size EQU BYTE(1) 141/ 0 : [141] ENDIF(1) 142/ 0 :(1) 143/ 0 : ;описатели для рисования окна(1) 144/ 0 : (MACRO) INIT_VAR(1) 144/ 0 : =>BLANK IFNB(1) 144/ 0 : INITVAR :=(1) 144/ 0 : =>TRUE ELSE(1) 144/ 0 : =0H INITVAR := 0(1) 144/ 0 : [144] ENDIF(1) 145/ 0 : (MACRO) SETVAR _X_COORD(1) 145/ 0 : =0H _X_COORD EQU INITVARAS V1.42 Beta [Bld 146] - source file services.a80(../../svn/pentevo/rom/define.a80) - page 21 - 2/23/2020 18:58:44(1) 145/ 0 : =>BLANK IFNB(1) 145/ 0 : INITVAR := INITVAR+(1) 145/ 0 : _X_COORD_Size EQU(1) 145/ 0 : =>TRUE ELSE(1) 145/ 0 : =1H INITVAR := INITVAR+BYTE(1) 145/ 0 : =1H _X_COORD_Size EQU BYTE(1) 145/ 0 : [145] ENDIF(1) 146/ 0 : (MACRO) SETVAR _Y_COORD(1) 146/ 0 : =1H _Y_COORD EQU INITVAR(1) 146/ 0 : =>BLANK IFNB(1) 146/ 0 : INITVAR := INITVAR+(1) 146/ 0 : _Y_COORD_Size EQU(1) 146/ 0 : =>TRUE ELSE(1) 146/ 0 : =2H INITVAR := INITVAR+BYTE(1) 146/ 0 : =1H _Y_COORD_Size EQU BYTE(1) 146/ 0 : [146] ENDIF(1) 147/ 0 : (MACRO) SETVAR _V_SIZE(1) 147/ 0 : =2H _V_SIZE EQU INITVAR(1) 147/ 0 : =>BLANK IFNB(1) 147/ 0 : INITVAR := INITVAR+(1) 147/ 0 : _V_SIZE_Size EQU(1) 147/ 0 : =>TRUE ELSE(1) 147/ 0 : =3H INITVAR := INITVAR+BYTE(1) 147/ 0 : =1H _V_SIZE_Size EQU BYTE(1) 147/ 0 : [147] ENDIF(1) 148/ 0 : (MACRO) SETVAR _H_SIZE(1) 148/ 0 : =3H _H_SIZE EQU INITVAR(1) 148/ 0 : =>BLANK IFNB(1) 148/ 0 : INITVAR := INITVAR+(1) 148/ 0 : _H_SIZE_Size EQU(1) 148/ 0 : =>TRUE ELSE(1) 148/ 0 : =4H INITVAR := INITVAR+BYTE(1) 148/ 0 : =1H _H_SIZE_Size EQU BYTE(1) 148/ 0 : [148] ENDIF(1) 149/ 0 : (MACRO) SETVAR _COLOR_WIN(1) 149/ 0 : =4H _COLOR_WIN EQU INITVAR(1) 149/ 0 : =>BLANK IFNB(1) 149/ 0 : INITVAR := INITVAR+(1) 149/ 0 : _COLOR_WIN_Size EQU(1) 149/ 0 : =>TRUE ELSE(1) 149/ 0 : =5H INITVAR := INITVAR+BYTE(1) 149/ 0 : =1H _COLOR_WIN_Size EQU BYTE(1) 149/ 0 : [149] ENDIF(1) 150/ 0 : (MACRO) SETVAR _COLOR_CUR(1) 150/ 0 : =5H _COLOR_CUR EQU INITVAR(1) 150/ 0 : =>BLANK IFNB(1) 150/ 0 : INITVAR := INITVAR+(1) 150/ 0 : _COLOR_CUR_Size EQU(1) 150/ 0 : =>TRUE ELSE(1) 150/ 0 : =6H INITVAR := INITVAR+BYTE(1) 150/ 0 : =1H _COLOR_CUR_Size EQU BYTE(1) 150/ 0 : [150] ENDIF(1) 151/ 0 : (MACRO) SETVAR _FLAGS(1) 151/ 0 : =6H _FLAGS EQU INITVAR(1) 151/ 0 : =>BLANK IFNB(1) 151/ 0 : INITVAR := INITVAR+(1) 151/ 0 : _FLAGS_Size EQU(1) 151/ 0 : =>TRUE ELSE(1) 151/ 0 : =7H INITVAR := INITVAR+BYTE(1) 151/ 0 : =1H _FLAGS_Size EQU BYTEAS V1.42 Beta [Bld 146] - source file services.a80(../../svn/pentevo/rom/define.a80) - page 22 - 2/23/2020 18:58:44(1) 151/ 0 : [151] ENDIF(1) 152/ 0 : (MACRO) SETVAR _NUM_PKT(1) 152/ 0 : =7H _NUM_PKT EQU INITVAR(1) 152/ 0 : =>BLANK IFNB(1) 152/ 0 : INITVAR := INITVAR+(1) 152/ 0 : _NUM_PKT_Size EQU(1) 152/ 0 : =>TRUE ELSE(1) 152/ 0 : =8H INITVAR := INITVAR+BYTE(1) 152/ 0 : =1H _NUM_PKT_Size EQU BYTE(1) 152/ 0 : [152] ENDIF(1) 153/ 0 : (MACRO) SETVAR _TEK_PKT_L(1) 153/ 0 : =8H _TEK_PKT_L EQU INITVAR(1) 153/ 0 : =>BLANK IFNB(1) 153/ 0 : INITVAR := INITVAR+(1) 153/ 0 : _TEK_PKT_L_Size EQU(1) 153/ 0 : =>TRUE ELSE(1) 153/ 0 : =9H INITVAR := INITVAR+BYTE(1) 153/ 0 : =1H _TEK_PKT_L_Size EQU BYTE(1) 153/ 0 : [153] ENDIF(1) 154/ 0 : (MACRO) SETVAR _TEK_PKT_H(1) 154/ 0 : =9H _TEK_PKT_H EQU INITVAR(1) 154/ 0 : =>BLANK IFNB(1) 154/ 0 : INITVAR := INITVAR+(1) 154/ 0 : _TEK_PKT_H_Size EQU(1) 154/ 0 : =>TRUE ELSE(1) 154/ 0 : =AH INITVAR := INITVAR+BYTE(1) 154/ 0 : =1H _TEK_PKT_H_Size EQU BYTE(1) 154/ 0 : [154] ENDIF(1) 155/ 0 : (MACRO) SETVAR _NUM_KOL_L(1) 155/ 0 : =AH _NUM_KOL_L EQU INITVAR(1) 155/ 0 : =>BLANK IFNB(1) 155/ 0 : INITVAR := INITVAR+(1) 155/ 0 : _NUM_KOL_L_Size EQU(1) 155/ 0 : =>TRUE ELSE(1) 155/ 0 : =BH INITVAR := INITVAR+BYTE(1) 155/ 0 : =1H _NUM_KOL_L_Size EQU BYTE(1) 155/ 0 : [155] ENDIF(1) 156/ 0 : (MACRO) SETVAR _NUM_KOL_H(1) 156/ 0 : =BH _NUM_KOL_H EQU INITVAR(1) 156/ 0 : =>BLANK IFNB(1) 156/ 0 : INITVAR := INITVAR+(1) 156/ 0 : _NUM_KOL_H_Size EQU(1) 156/ 0 : =>TRUE ELSE(1) 156/ 0 : =CH INITVAR := INITVAR+BYTE(1) 156/ 0 : =1H _NUM_KOL_H_Size EQU BYTE(1) 156/ 0 : [156] ENDIF(1) 157/ 0 : (MACRO) SETVAR _ADR_TXT_L(1) 157/ 0 : =CH _ADR_TXT_L EQU INITVAR(1) 157/ 0 : =>BLANK IFNB(1) 157/ 0 : INITVAR := INITVAR+(1) 157/ 0 : _ADR_TXT_L_Size EQU(1) 157/ 0 : =>TRUE ELSE(1) 157/ 0 : =DH INITVAR := INITVAR+BYTE(1) 157/ 0 : =1H _ADR_TXT_L_Size EQU BYTE(1) 157/ 0 : [157] ENDIF(1) 158/ 0 : (MACRO) SETVAR _ADR_TXT_H(1) 158/ 0 : =DH _ADR_TXT_H EQU INITVAR(1) 158/ 0 : =>BLANK IFNB(1) 158/ 0 : INITVAR := INITVAR+(1) 158/ 0 : _ADR_TXT_H_Size EQUAS V1.42 Beta [Bld 146] - source file services.a80(../../svn/pentevo/rom/define.a80) - page 23 - 2/23/2020 18:58:44(1) 158/ 0 : =>TRUE ELSE(1) 158/ 0 : =EH INITVAR := INITVAR+BYTE(1) 158/ 0 : =1H _ADR_TXT_H_Size EQU BYTE(1) 158/ 0 : [158] ENDIF(1) 159/ 0 : (MACRO) SETVAR _ADR_PRG_L(1) 159/ 0 : =EH _ADR_PRG_L EQU INITVAR(1) 159/ 0 : =>BLANK IFNB(1) 159/ 0 : INITVAR := INITVAR+(1) 159/ 0 : _ADR_PRG_L_Size EQU(1) 159/ 0 : =>TRUE ELSE(1) 159/ 0 : =FH INITVAR := INITVAR+BYTE(1) 159/ 0 : =1H _ADR_PRG_L_Size EQU BYTE(1) 159/ 0 : [159] ENDIF(1) 160/ 0 : (MACRO) SETVAR _ADR_PRG_H(1) 160/ 0 : =FH _ADR_PRG_H EQU INITVAR(1) 160/ 0 : =>BLANK IFNB(1) 160/ 0 : INITVAR := INITVAR+(1) 160/ 0 : _ADR_PRG_H_Size EQU(1) 160/ 0 : =>TRUE ELSE(1) 160/ 0 : =10H INITVAR := INITVAR+BYTE(1) 160/ 0 : =1H _ADR_PRG_H_Size EQU BYTE(1) 160/ 0 : [160] ENDIF(1) 161/ 0 : (MACRO) SETVAR _ADR_MOUSE_L(1) 161/ 0 : =10H _ADR_MOUSE_L EQU INITVAR(1) 161/ 0 : =>BLANK IFNB(1) 161/ 0 : INITVAR := INITVAR+(1) 161/ 0 : _ADR_MOUSE_L_Size EQU(1) 161/ 0 : =>TRUE ELSE(1) 161/ 0 : =11H INITVAR := INITVAR+BYTE(1) 161/ 0 : =1H _ADR_MOUSE_L_Size EQU BYTE(1) 161/ 0 : [161] ENDIF(1) 162/ 0 : (MACRO) SETVAR _ADR_MOUSE_H(1) 162/ 0 : =11H _ADR_MOUSE_H EQU INITVAR(1) 162/ 0 : =>BLANK IFNB(1) 162/ 0 : INITVAR := INITVAR+(1) 162/ 0 : _ADR_MOUSE_H_Size EQU(1) 162/ 0 : =>TRUE ELSE(1) 162/ 0 : =12H INITVAR := INITVAR+BYTE(1) 162/ 0 : =1H _ADR_MOUSE_H_Size EQU BYTE(1) 162/ 0 : [162] ENDIF(1) 163/ 0 : (MACRO) SETVAR _ADR_HOTKEY_L(1) 163/ 0 : =12H _ADR_HOTKEY_L EQU INITVAR(1) 163/ 0 : =>BLANK IFNB(1) 163/ 0 : INITVAR := INITVAR+(1) 163/ 0 : _ADR_HOTKEY_L_Size EQU(1) 163/ 0 : =>TRUE ELSE(1) 163/ 0 : =13H INITVAR := INITVAR+BYTE(1) 163/ 0 : =1H _ADR_HOTKEY_L_Size EQU BYTE(1) 163/ 0 : [163] ENDIF(1) 164/ 0 : (MACRO) SETVAR _ADR_HOTKEY_H(1) 164/ 0 : =13H _ADR_HOTKEY_H EQU INITVAR(1) 164/ 0 : =>BLANK IFNB(1) 164/ 0 : INITVAR := INITVAR+(1) 164/ 0 : _ADR_HOTKEY_H_Size EQU(1) 164/ 0 : =>TRUE ELSE(1) 164/ 0 : =14H INITVAR := INITVAR+BYTE(1) 164/ 0 : =1H _ADR_HOTKEY_H_Size EQU BYTE(1) 164/ 0 : [164] ENDIF(1) 165/ 0 :(1) 166/ 0 : =3H JUMP_SIZE EQU 3AS V1.42 Beta [Bld 146] - source file services.a80(../../svn/pentevo/rom/define.a80) - page 24 - 2/23/2020 18:58:44(1) 167/ 0 :(1) 168/ 0 : (MACRO) INIT_VAR 0X100(1) 168/ 0 : =>NOT BLANK IFNB 0X100(1) 168/ 0 : =100H INITVAR := 0X100(1) 168/ 0 : =>FALSE ELSE(1) 168/ 0 : INITVAR := 0(1) 168/ 0 : [168] ENDIF(1) 169/ 0 : (MACRO) SETVAR _NEMO_RD_ID,JUMP_SIZE ;чтение сектора идентификации HDD с определением его наличия(1) 169/ 0 : =100H _NEMO_RD_ID EQU INITVAR(1) 169/ 0 : =>NOT BLANK IFNB JUMP_SIZE(1) 169/ 0 : =103H INITVAR := INITVAR+JUMP_SIZE(1) 169/ 0 : =3H _NEMO_RD_ID_Size EQU JUMP_SIZE(1) 169/ 0 : =>FALSE ELSE(1) 169/ 0 : INITVAR := INITVAR+BYTE(1) 169/ 0 : _NEMO_RD_ID_Size EQU BYTE(1) 169/ 0 : [169] ENDIF(1) 170/ 0 : (MACRO) SETVAR _NEMO_RD_SEC,JUMP_SIZE ;чтение секторов HDD(1) 170/ 0 : =103H _NEMO_RD_SEC EQU INITVAR(1) 170/ 0 : =>NOT BLANK IFNB JUMP_SIZE(1) 170/ 0 : =106H INITVAR := INITVAR+JUMP_SIZE(1) 170/ 0 : =3H _NEMO_RD_SEC_Size EQU JUMP_SIZE(1) 170/ 0 : =>FALSE ELSE(1) 170/ 0 : INITVAR := INITVAR+BYTE(1) 170/ 0 : _NEMO_RD_SEC_Size EQU BYTE(1) 170/ 0 : [170] ENDIF(1) 171/ 0 : (MACRO) SETVAR _NEMO_WR_SEC,JUMP_SIZE ;запись секторов HDD(1) 171/ 0 : =106H _NEMO_WR_SEC EQU INITVAR(1) 171/ 0 : =>NOT BLANK IFNB JUMP_SIZE(1) 171/ 0 : =109H INITVAR := INITVAR+JUMP_SIZE(1) 171/ 0 : =3H _NEMO_WR_SEC_Size EQU JUMP_SIZE(1) 171/ 0 : =>FALSE ELSE(1) 171/ 0 : INITVAR := INITVAR+BYTE(1) 171/ 0 : _NEMO_WR_SEC_Size EQU BYTE(1) 171/ 0 : [171] ENDIF(1) 172/ 0 :(1) 173/ 0 : (MACRO) SETVAR _ZCSD_RD_ID,JUMP_SIZE ;чтение сектора идентификации набортной SD карты(1) 173/ 0 : =109H _ZCSD_RD_ID EQU INITVAR(1) 173/ 0 : =>NOT BLANK IFNB JUMP_SIZE(1) 173/ 0 : =10CH INITVAR := INITVAR+JUMP_SIZE(1) 173/ 0 : =3H _ZCSD_RD_ID_Size EQU JUMP_SIZE(1) 173/ 0 : =>FALSE ELSE(1) 173/ 0 : INITVAR := INITVAR+BYTE(1) 173/ 0 : _ZCSD_RD_ID_Size EQU BYTE(1) 173/ 0 : [173] ENDIF(1) 174/ 0 : (MACRO) SETVAR _ZCSD_RD_SEC,JUMP_SIZE ;чтение секторов набортной SD карты(1) 174/ 0 : =10CH _ZCSD_RD_SEC EQU INITVAR(1) 174/ 0 : =>NOT BLANK IFNB JUMP_SIZE(1) 174/ 0 : =10FH INITVAR := INITVAR+JUMP_SIZE(1) 174/ 0 : =3H _ZCSD_RD_SEC_Size EQU JUMP_SIZE(1) 174/ 0 : =>FALSE ELSE(1) 174/ 0 : INITVAR := INITVAR+BYTE(1) 174/ 0 : _ZCSD_RD_SEC_Size EQU BYTE(1) 174/ 0 : [174] ENDIF(1) 175/ 0 : (MACRO) SETVAR _ZCSD_WR_SEC,JUMP_SIZE ;запись секторов набортной SD карты(1) 175/ 0 : =10FH _ZCSD_WR_SEC EQU INITVAR(1) 175/ 0 : =>NOT BLANK IFNB JUMP_SIZE(1) 175/ 0 : =112H INITVAR := INITVAR+JUMP_SIZE(1) 175/ 0 : =3H _ZCSD_WR_SEC_Size EQU JUMP_SIZE(1) 175/ 0 : =>FALSE ELSE(1) 175/ 0 : INITVAR := INITVAR+BYTEAS V1.42 Beta [Bld 146] - source file services.a80(../../svn/pentevo/rom/define.a80) - page 25 - 2/23/2020 18:58:44(1) 175/ 0 : _ZCSD_WR_SEC_Size EQU BYTE(1) 175/ 0 : [175] ENDIF(1) 176/ 0 :(1) 177/ 0 : (MACRO) SETVAR _NGSSD_RD_ID,JUMP_SIZE ;чтение сектора идентификации SD карты NeoGS(1) 177/ 0 : =112H _NGSSD_RD_ID EQU INITVAR(1) 177/ 0 : =>NOT BLANK IFNB JUMP_SIZE(1) 177/ 0 : =115H INITVAR := INITVAR+JUMP_SIZE(1) 177/ 0 : =3H _NGSSD_RD_ID_Size EQU JUMP_SIZE(1) 177/ 0 : =>FALSE ELSE(1) 177/ 0 : INITVAR := INITVAR+BYTE(1) 177/ 0 : _NGSSD_RD_ID_Size EQU BYTE(1) 177/ 0 : [177] ENDIF(1) 178/ 0 : (MACRO) SETVAR _NGSSD_RD_SEC,JUMP_SIZE ;чтение секторов SD карты NeoGS(1) 178/ 0 : =115H _NGSSD_RD_SEC EQU INITVAR(1) 178/ 0 : =>NOT BLANK IFNB JUMP_SIZE(1) 178/ 0 : =118H INITVAR := INITVAR+JUMP_SIZE(1) 178/ 0 : =3H _NGSSD_RD_SEC_Size EQU JUMP_SIZE(1) 178/ 0 : =>FALSE ELSE(1) 178/ 0 : INITVAR := INITVAR+BYTE(1) 178/ 0 : _NGSSD_RD_SEC_Size EQU BYTE(1) 178/ 0 : [178] ENDIF(1) 179/ 0 : (MACRO) SETVAR _NGSSD_WR_SEC,JUMP_SIZE ;запись секторов SD карты NeoGS(1) 179/ 0 : =118H _NGSSD_WR_SEC EQU INITVAR(1) 179/ 0 : =>NOT BLANK IFNB JUMP_SIZE(1) 179/ 0 : =11BH INITVAR := INITVAR+JUMP_SIZE(1) 179/ 0 : =3H _NGSSD_WR_SEC_Size EQU JUMP_SIZE(1) 179/ 0 : =>FALSE ELSE(1) 179/ 0 : INITVAR := INITVAR+BYTE(1) 179/ 0 : _NGSSD_WR_SEC_Size EQU BYTE(1) 179/ 0 : [179] ENDIF(1) 180/ 0 :(1) 181/ 0 : (MACRO) SETVAR _INIT_KEYB_PS2,JUMP_SIZE ;включение доступа к PS/2 клавиатуре(1) 181/ 0 : =11BH _INIT_KEYB_PS2 EQU INITVAR(1) 181/ 0 : =>NOT BLANK IFNB JUMP_SIZE(1) 181/ 0 : =11EH INITVAR := INITVAR+JUMP_SIZE(1) 181/ 0 : =3H _INIT_KEYB_PS2_Size EQU JUMP_SIZE(1) 181/ 0 : =>FALSE ELSE(1) 181/ 0 : INITVAR := INITVAR+BYTE(1) 181/ 0 : _INIT_KEYB_PS2_Size EQU BYTE(1) 181/ 0 : [181] ENDIF(1) 182/ 0 : (MACRO) SETVAR _READ_KEYB_PS2,JUMP_SIZE ;считывание и декодирование сканкодов PS/2(1) 182/ 0 : =11EH _READ_KEYB_PS2 EQU INITVAR(1) 182/ 0 : =>NOT BLANK IFNB JUMP_SIZE(1) 182/ 0 : =121H INITVAR := INITVAR+JUMP_SIZE(1) 182/ 0 : =3H _READ_KEYB_PS2_Size EQU JUMP_SIZE(1) 182/ 0 : =>FALSE ELSE(1) 182/ 0 : INITVAR := INITVAR+BYTE(1) 182/ 0 : _READ_KEYB_PS2_Size EQU BYTE(1) 182/ 0 : [182] ENDIF(1) 183/ 0 : (MACRO) SETVAR _READ_STAT_PS2,JUMP_SIZE ;чтение статуса и декодированных клавиш PS/2(1) 183/ 0 : =121H _READ_STAT_PS2 EQU INITVAR(1) 183/ 0 : =>NOT BLANK IFNB JUMP_SIZE(1) 183/ 0 : =124H INITVAR := INITVAR+JUMP_SIZE(1) 183/ 0 : =3H _READ_STAT_PS2_Size EQU JUMP_SIZE(1) 183/ 0 : =>FALSE ELSE(1) 183/ 0 : INITVAR := INITVAR+BYTE(1) 183/ 0 : _READ_STAT_PS2_Size EQU BYTE(1) 183/ 0 : [183] ENDIF(1) 184/ 0 :(1) 185/ 0 : (MACRO) SETVAR _INIT_TABLE_MEM,JUMP_SIZE ;получение таблицы занятых/свободных страниц памятиAS V1.42 Beta [Bld 146] - source file services.a80(../../svn/pentevo/rom/define.a80) - page 26 - 2/23/2020 18:58:44(1) 185/ 0 : =124H _INIT_TABLE_MEM EQU INITVAR(1) 185/ 0 : =>NOT BLANK IFNB JUMP_SIZE(1) 185/ 0 : =127H INITVAR := INITVAR+JUMP_SIZE(1) 185/ 0 : =3H _INIT_TABLE_MEM_Size EQU JUMP_SIZE(1) 185/ 0 : =>FALSE ELSE(1) 185/ 0 : INITVAR := INITVAR+BYTE(1) 185/ 0 : _INIT_TABLE_MEM_Size EQU BYTE(1) 185/ 0 : [185] ENDIF(1) 186/ 0 : (MACRO) SETVAR _GET_TABLE_MEM,JUMP_SIZE ;сброс всех занятых страницы памяти(1) 186/ 0 : =127H _GET_TABLE_MEM EQU INITVAR(1) 186/ 0 : =>NOT BLANK IFNB JUMP_SIZE(1) 186/ 0 : =12AH INITVAR := INITVAR+JUMP_SIZE(1) 186/ 0 : =3H _GET_TABLE_MEM_Size EQU JUMP_SIZE(1) 186/ 0 : =>FALSE ELSE(1) 186/ 0 : INITVAR := INITVAR+BYTE(1) 186/ 0 : _GET_TABLE_MEM_Size EQU BYTE(1) 186/ 0 : [186] ENDIF(1) 187/ 0 : (MACRO) SETVAR _ALLOC_PAGE,JUMP_SIZE ;получение номера свободной страницы памяти(1) 187/ 0 : =12AH _ALLOC_PAGE EQU INITVAR(1) 187/ 0 : =>NOT BLANK IFNB JUMP_SIZE(1) 187/ 0 : =12DH INITVAR := INITVAR+JUMP_SIZE(1) 187/ 0 : =3H _ALLOC_PAGE_Size EQU JUMP_SIZE(1) 187/ 0 : =>FALSE ELSE(1) 187/ 0 : INITVAR := INITVAR+BYTE(1) 187/ 0 : _ALLOC_PAGE_Size EQU BYTE(1) 187/ 0 : [187] ENDIF(1) 188/ 0 : (MACRO) SETVAR _FREE_PAGE,JUMP_SIZE ;освобождение по номеру страницы памяти(1) 188/ 0 : =12DH _FREE_PAGE EQU INITVAR(1) 188/ 0 : =>NOT BLANK IFNB JUMP_SIZE(1) 188/ 0 : =130H INITVAR := INITVAR+JUMP_SIZE(1) 188/ 0 : =3H _FREE_PAGE_Size EQU JUMP_SIZE(1) 188/ 0 : =>FALSE ELSE(1) 188/ 0 : INITVAR := INITVAR+BYTE(1) 188/ 0 : _FREE_PAGE_Size EQU BYTE(1) 188/ 0 : [188] ENDIF(1) 189/ 0 :6/ 0 : include ../../svn/pentevo/rom/global_vars.a80(1) 1/ 0 :(1) 2/ 0 : ;LAST UPDATE: 20.08.2019 savelij(1) 3/ 0 :(1) 4/ 0 : ;[СТРАНИЦЫ VIDEO RAM](1) 5/ 0 : =F7H VMODE7_0 EQU LOW (-0X08)-1;0XF7 ;СТРАНИЦА ОДНОСТРАНИЧНОГО ТЕКСТМОДА 0 ЭКРАН(1) 6/ 0 : =F5H VMODE7_1 EQU LOW (-0X0A)-1;0XF5 ;СТРАНИЦА ОДНОСТРАНИЧНОГО ТЕКСТМОДА 1 ЭКРАН(1) 7/ 0 : =FAH VMODE6_0M EQU LOW (-0X05)-1;0XFA ;СТРАНИЦА ATM ТЕКСТМОДА МОНОХРОМ 0 ЭКРАН(1) 8/ 0 : =FEH VMODE6_0C EQU LOW (-0X01)-1;0XFE ;СТРАНИЦА ATM ТЕКСТМОДА ЦВЕТ 0 ЭКРАН(1) 9/ 0 : =F8H VMODE6_1M EQU LOW (-0X07)-1;0XF8 ;СТРАНИЦА ATM ТЕКСТМОДА МОНОХРОМ 1 ЭКРАН(1) 10/ 0 : =FCH VMODE6_1C EQU LOW (-0X03)-1;0XFC ;СТРАНИЦА ATM ТЕКСТМОДА ЦВЕТ 1 ЭКРАН(1) 11/ 0 : =FAH ZXSCR_0 EQU LOW (-0X05)-1;0XFA ;СТРАНИЦА ZX ЭКРАНА 0(1) 12/ 0 : =F8H ZXSCR_1 EQU LOW (-0X07)-1;0XF8 ;СТРАНИЦА ZX ЭКРАНА 1(1) 13/ 0 :(1) 14/ 0 : ;[СТРАНИЦЫ ПАМЯТИ ZX СТАНДАРТА](1) 15/ 0 : =FAH ZXSTD_CPU1 EQU LOW (-0X05)-1;0XFA ;СТРАНИЦА 1 ОКНА ПРОЕЦИРОВАНИЯ(1) 16/ 0 : =FDH ZXSTD_CPU2 EQU LOW (-0X02)-1;0XFD ;СТРАНИЦА 2 ОКНА ПРОЕЦИРОВАНИЯ(1) 17/ 0 :(1) 18/ 0 : ;[СТРАНИЦЫ RAM](1) 19/ 0 : =1H RAM_EVODOS EQU 1 ;СТРАНИЦА КОПИИ EVO-DOS ДЛЯ ПЕРЕХВАТА(1) 20/ 0 : =2H RAM_FATVARS EQU 2 ;СТРАНИЦА ДЛЯ ПЕРЕМЕНЫХ FAT(1) 21/ 0 : =3H RAM_BASIC EQU 3 ;СТРАНИЦА BASIC СТАНДАРТНАЯ ВЕРСИЯ(1) 22/ 0 : =4H RAM_PROFROM EQU 4 ;СТРАНИЦА ПЕРЕМЕННЫХ PROFROM(1) 23/ 0 : =5H RAM_MOUNTER EQU 5 ;СТРАНИЦА ДЛЯ МОНТИРОВАНИЯ ОБРАЗОВAS V1.42 Beta [Bld 146] - source file services.a80(../../svn/pentevo/rom/global_vars.a80) - page 27 - 2/23/2020 18:58:44(1) 24/ 0 : =6H RAM_STS EQU 6 ;СТРАНИЦА ДЛЯ ОТЛАДЧИКА STS(1) 25/ 0 : =7H RAM_ADDSTS EQU 7 ;СТРАНИЦА ДЛЯ ОТЛАДКИ ROM(1) 26/ 0 : =8H RAM_SCR_FONT EQU 8 ;СТРАНИЦА СОХРАНЕННЫХ ЭКРАНОВ И ФОНТОВ(1) 27/ 0 : =9H RAM_TEMP EQU 9 ;СТРАНИЦА ВСЯКИХ ВРЕМЕННЫХ ПЕРЕМЕННЫХ(1) 28/ 0 : =AH RAM_RAMDISK EQU 0X0A ;СТРАНИЦА НАЧАЛА РАМДИСКА(1) 29/ 0 : =BH RAM_DATARAMD EQU 0X0B ;СТРАНИЦА НАЧАЛА ДАННЫХ РАМДИСКА(1) 30/ 0 : =3FH RAM_TEMP2 EQU 0X3F ;СТРАНИЦА СОРТИРОВКИ ФАЙЛОВ И ПРОСМОТРА СОДЕРЖИМОГО ОБРАЗОВ(1) 31/ 0 : =40H RAM_FLASHER EQU 0X40 ;СТРАНИЦА НАЧАЛА ЗАГРУЗКИ ПРОШИВКИ(1) 32/ 0 : =60H RAM_TAPE EQU 0X60 ;СТРАНИЦА ДЛЯ ЗАГРУЗКИ TAP ФАЙЛА(1) 33/ 0 :(1) 34/ 0 : ;[СТРАНИЦЫ ROM](1) 35/ 0 : =0H ROM_ERS EQU 0 ;НОМЕР СТРАНИЦЫ ROM EVO RESET SERVICE(1) 36/ 0 : =1H ROM_BAS128 EQU 1 ;НОМЕР СТРАНИЦЫ ROM BASIC 128(1) 37/ 0 : =2H ROM_DOS EQU 2 ;НОМЕР СТРАНИЦЫ ROM EVO-DOS ДЛЯ РЕАЛЬНОЙ ДИСКЕТЫ(1) 38/ 0 : =3H ROM_BAS48 EQU 3 ;НОМЕР СТРАНИЦЫ ROM BASIC 48(1) 39/ 0 :(1) 40/ 0 : =5H ROM_MAINMENU EQU 5 ;НОМЕР СТРАНИЦЫ УПАКОВАННОГО ГЛАВНОЕ МЕНЮ(1) 41/ 0 : =6H ROM_RST80 EQU 6 ;НОМЕР СТРАНИЦЫ ROM RST 8(1) 42/ 0 : =7H ROM_RST81 EQU 7 ;НОМЕР СТРАНИЦЫ ROM RST 8(1) 43/ 0 : =8H ROM_RST82 EQU 8 ;НОМЕР СТРАНИЦЫ ROM RST 8(1) 44/ 0 : =9H ROM_RST83 EQU 9 ;НОМЕР СТРАНИЦЫ ROM RST 8(1) 45/ 0 : =AH ROM_ADD_DOS EQU 0X0A ;НОМЕР СТРАНИЦЫ ROM EVO-DOS ДЛЯ ЭМУЛЯЦИИ(1) 46/ 0 : =BH ROM_ADD_BAS48 EQU 0X0B ;НОМЕР СТРАНИЦЫ ROM BASIC 48(1) 47/ 0 : =18H ROM_BAS48_STD EQU 0X18 ;НОМЕР СТРАНИЦЫ ROM BASIC 48 (СТАНДАРТНАЯ ВЕРСИЯ)(1) 48/ 0 : =19H ROM_BAS128_STD EQU 0X19 ;НОМЕР СТРАНИЦЫ ROM BASIC 128 (СТАНДАРТНАЯ ВЕРСИЯ)(1) 49/ 0 : =1AH ROM_BAS48_128 EQU 0X1A ;НОМЕР СТРАНИЦЫ ROM BASIC 48 (СТАНДАРТНАЯ ВЕРСИЯ ДЛЯ BASIC128)(1) 50/ 0 : =1BH ROM_ATMCPM EQU 0X1B ;НОМЕР СТРАНИЦЫ ROM АТМ CP/M(1) 51/ 0 :(1) 52/ 0 : =90H CONF4PROF EQU 0X90 ;СТАРТОВАЯ СТРАНИЦА ДЛЯ EVO PROFROM 128K(1) 53/ 0 : =94H CONF4GLUK EQU 0X94 ;СТАРТОВАЯ СТРАНИЦА ДЛЯ GLUK 64K(1) 54/ 0 : =9CH CONF4CUSTOM EQU 0X9C ;СТАРТОВАЯ СТРАНИЦА ДЛЯ ПОЛЬЗОВАТЕЛЬСКОЙ ПРОШИВКИ 64К(1) 55/ 0 :(1) 56/ 0 : =0H CPU0 EQU 0X0000 ;НАЧАЛО ОКНА ПРОЕЦИРОВАНИЯ 0(1) 57/ 0 : =4000H CPU1 EQU 0X4000 ;НАЧАЛО ОКНА ПРОЕЦИРОВАНИЯ 1(1) 58/ 0 : =8000H CPU2 EQU 0X8000 ;НАЧАЛО ОКНА ПРОЕЦИРОВАНИЯ 2(1) 59/ 0 : =C000H CPU3 EQU 0XC000 ;НАЧАЛО ОКНА ПРОЕЦИРОВАНИЯ 3(1) 60/ 0 :(1) 61/ 0 : ;[ПОРТЫ](1) 62/ 0 : =37F7H WIN_P0 EQU 0X37F7 ;АДРЕС 0 СТРАНИЦЫ ПРОЕЦИРОВАНИЯ PENTEVO(1) 63/ 0 : =77F7H WIN_P1 EQU 0X77F7 ;АДРЕС 1 СТРАНИЦЫ ПРОЕЦИРОВАНИЯ PENTEVO(1) 64/ 0 : =B7F7H WIN_P2 EQU 0XB7F7 ;АДРЕС 2 СТРАНИЦЫ ПРОЕЦИРОВАНИЯ PENTEVO(1) 65/ 0 : =F7F7H WIN_P3 EQU 0XF7F7 ;АДРЕС 3 СТРАНИЦЫ ПРОЕЦИРОВАНИЯ PENTEVO(1) 66/ 0 : =3BF7H WIN_R0 EQU 0X3BF7 ;АДРЕС ЗАЩИТЫ ОТ ЗАПИСИ В ОКНЕ 0(1) 67/ 0 : =7BF7H WIN_R1 EQU 0X7BF7 ;АДРЕС ЗАЩИТЫ ОТ ЗАПИСИ В ОКНЕ 1(1) 68/ 0 : =BBF7H WIN_R2 EQU 0XBBF7 ;АДРЕС ЗАЩИТЫ ОТ ЗАПИСИ В ОКНЕ 2(1) 69/ 0 : =FBF7H WIN_R3 EQU 0XFBF7 ;АДРЕС ЗАЩИТЫ ОТ ЗАПИСИ В ОКНЕ 3(1) 70/ 0 : =3FF7H WIN_A0 EQU 0X3FF7 ;АДРЕС 0 СТРАНИЦЫ ПРОЕЦИРОВАНИЯ ATM(1) 71/ 0 : =7FF7H WIN_A1 EQU 0X7FF7 ;АДРЕС 1 СТРАНИЦЫ ПРОЕЦИРОВАНИЯ ATM(1) 72/ 0 : =BFF7H WIN_A2 EQU 0XBFF7 ;АДРЕС 2 СТРАНИЦЫ ПРОЕЦИРОВАНИЯ ATM(1) 73/ 0 : =FFF7H WIN_A3 EQU 0XFFF7 ;АДРЕС 3 СТРАНИЦЫ ПРОЕЦИРОВАНИЯ ATM(1) 74/ 0 : =BFH PEVO_CONF EQU 0XBF ;АДРЕС ПОРТА КОНФИГА PENTEVO(1) 75/ 0 : =DEF7H CMOSD_SET_ADR EQU 0XDEF7 ;АДРЕС ПОРТА УСТАНОВКИ АДРЕСА CMOS ЯЧЕЙКИ ИЗ DOS(1) 76/ 0 : =BEF7H CMOSD_RD_WR EQU 0XBEF7 ;АДРЕС ПОРТА ЧТЕНИЯ/ЗАПИСИ БАЙТ CMOS ИЗ ДОСА(1) 77/ 0 : =DFF7H CMOS_SET_ADR EQU 0XDFF7 ;АДРЕС ПОРТА УСТАНОВКИ АДРЕСА CMOS ЯЧЕЙКИ(1) 78/ 0 : =BFF7H CMOS_RD_WR EQU 0XBFF7 ;АДРЕС ПОРТА ЧТЕНИЯ/ЗАПИСИ БАЙТ CMOS(1) 79/ 0 : =EFF7H PENT_CONF EQU 0XEFF7 ;АДРЕС ПОРТА КОНФИГА РЕЖИМА ПЕНТАГОНА(1) 80/ 0 : =7FFDH CONF_128 EQU 0X7FFD ;АДРЕС ПОРТА КОНФИГА 128 ПАМЯТИ(1) 81/ 0 : =FBDFH MOUSE_X EQU 0XFBDF ;АДРЕС ПОРТА X КООРДИНАТЫ МЫШИ(1) 82/ 0 : =FFDFH MOUSE_Y EQU 0XFFDF ;АДРЕС ПОРТА Y КООРДИНАТЫ МЫШИ(1) 83/ 0 : =FADFH MOUSE_KEYS EQU 0XFADF ;АДРЕС ПОРТА КНОПОК МЫШИAS V1.42 Beta [Bld 146] - source file services.a80(../../svn/pentevo/rom/global_vars.a80) - page 28 - 2/23/2020 18:58:44(1) 84/ 0 :(1) 85/ 0 : ;[МАСКА КНОПОК МЫШИ](1) 86/ 0 : (MACRO) BITMASK MOUSE_M_KEY, 2(1) 86/ 0 : =2H B_MOUSE_M_KEY EQU 2(1) 86/ 0 : =4H M_MOUSE_M_KEY EQU 1<<2(1) 87/ 0 : (MACRO) BITMASK MOUSE_R_KEY, 1(1) 87/ 0 : =1H B_MOUSE_R_KEY EQU 1(1) 87/ 0 : =2H M_MOUSE_R_KEY EQU 1<<1(1) 88/ 0 : (MACRO) BITMASK MOUSE_L_KEY, 0(1) 88/ 0 : =0H B_MOUSE_L_KEY EQU 0(1) 88/ 0 : =1H M_MOUSE_L_KEY EQU 1<<0(1) 89/ 0 : =F0H _MOUSE_WHEEL EQU %11110000(1) 90/ 0 :(1) 91/ 0 : ;[ПОРТЫ RS232](1) 92/ 0 : =F8EFH RS232_IO EQU 0XF8EF(1) 93/ 0 : =F8EFH RS232_DIV_L EQU 0XF8EF(1) 94/ 0 : =F9EFH RS232_IRQ_ENA EQU 0XF9EF(1) 95/ 0 : =F9EFH RS232_DIV_H EQU 0XF9EF(1) 96/ 0 : =FAEFH RS232_IRQ_ID EQU 0XFAEF(1) 97/ 0 : =FBEFH RS232_LINE_CTRL EQU 0XFBEF(1) 98/ 0 : =FCEFH RS232_MDM_CTRL EQU 0XFCEF(1) 99/ 0 : =FDEFH RS232_LINE_STAT EQU 0XFDEF(1) 100/ 0 : =FEEFH RS232_MDM_STAT EQU 0XFEEF(1) 101/ 0 : =FFEFH RS232_WORK_REG EQU 0XFFEF(1) 102/ 0 :(1) 103/ 0 : ;[СКОРОСТИ RS232](1) 104/ 0 : =417H BAUD110 EQU 115200/110(1) 105/ 0 : =300H BAUD150 EQU 115200/150(1) 106/ 0 : =180H BAUD300 EQU 115200/300(1) 107/ 0 : =C0H BAUD600 EQU 115200/600(1) 108/ 0 : =60H BAUD1200 EQU 115200/1200(1) 109/ 0 : =30H BAUD2400 EQU 115200/2400(1) 110/ 0 : =18H BAUD4800 EQU 115200/4800(1) 111/ 0 : =CH BAUD9600 EQU 115200/9600(1) 112/ 0 : =6H BAUD19200 EQU 115200/19200(1) 113/ 0 : =3H BAUD38400 EQU 115200/38400(1) 114/ 0 : =2H BAUD57600 EQU 115200/57600(1) 115/ 0 : =1H BAUD115200 EQU 115200/115200(1) 116/ 0 :(1) 117/ 0 : ;[ПОРТЫ ДЛЯ ЧТЕНИЯ ПОРТОВ КОНФИГУРАЦИИ](1) 118/ 0 : =BEH EXIT_PORT EQU 0XBE(1) 119/ 0 : =BEH RD_0WINA0 EQU 0X00BE ;АДРЕС ПОРТА 0 ОКНА ПРОЕЦИРОВАНИЯ 0 МАПЕРА(1) 120/ 0 : =1BEH RD_0WINA1 EQU 0X01BE ;АДРЕС ПОРТА 1 ОКНА ПРОЕЦИРОВАНИЯ 0 МАПЕРА(1) 121/ 0 : =2BEH RD_0WINA2 EQU 0X02BE ;АДРЕС ПОРТА 2 ОКНА ПРОЕЦИРОВАНИЯ 0 МАПЕРА(1) 122/ 0 : =3BEH RD_0WINA3 EQU 0X03BE ;АДРЕС ПОРТА 3 ОКНА ПРОЕЦИРОВАНИЯ 0 МАПЕРА(1) 123/ 0 : =4BEH RD_1WINA0 EQU 0X04BE ;АДРЕС ПОРТА 0 ОКНА ПРОЕЦИРОВАНИЯ 1 МАПЕРА(1) 124/ 0 : =5BEH RD_1WINA1 EQU 0X05BE ;АДРЕС ПОРТА 1 ОКНА ПРОЕЦИРОВАНИЯ 1 МАПЕРА(1) 125/ 0 : =6BEH RD_1WINA2 EQU 0X06BE ;АДРЕС ПОРТА 2 ОКНА ПРОЕЦИРОВАНИЯ 1 МАПЕРА(1) 126/ 0 : =7BEH RD_1WINA3 EQU 0X07BE ;АДРЕС ПОРТА 3 ОКНА ПРОЕЦИРОВАНИЯ 1 МАПЕРА(1) 127/ 0 : =8BEH RD_RAMNROM EQU 0X08BE ;АДРЕС ПОРТА БИТОВ RAM & ROM(1) 128/ 0 : =9BEH RD_DOS7FFD EQU 0X09BE ;АДРЕС ПОРТА БИТОВ DOS & 7FFD(1) 129/ 0 : =ABEH RD_7FFD EQU 0X0ABE ;АДРЕС ПОРТА 7FFD(1) 130/ 0 : =BBEH RD_EFF7 EQU 0X0BBE ;АДРЕС ПОРТА EFF7(1) 131/ 0 : =CBEH RD_77 EQU 0X0CBE ;АДРЕС ПОРТА xx77(1) 132/ 0 : =DBEH RD_PALITRA EQU 0X0DBE ;АДРЕС ПОРТА ПАЛИТРЫ(1) 133/ 0 : =10BEH BREAK_LOW_RD EQU 0X10BE ;МЛАДШИЙ БАЙТ АДРЕСА ПОРТА НА ЧТЕНИЕ АДРЕСА BREAK(1) 134/ 0 : =11BEH BREAK_HIGH_RD EQU 0X11BE ;СТАРШИЙ БАЙТ АДРЕСА ПОРТА НА ЧТЕНИЕ АДРЕСА BREAK(1) 135/ 0 : =13BEH NUM_LINE EQU 0X13BE ;НОМЕР СТРОКИ РАСТРА (0-159)(1) 136/ 0 :(1) 137/ 0 : =13BDH FDD_EMU_PORT EQU 0X13BDAS V1.42 Beta [Bld 146] - source file services.a80(../../svn/pentevo/rom/global_vars.a80) - page 29 - 2/23/2020 18:58:44(1) 138/ 0 :(1) 139/ 0 : =BDH BREAK_LOW_WR EQU 0X00BD ;МЛАДШИЙ БАЙТ АДРЕСА ПОРТА НА ЗАПИСЬ АДРЕСА BREAK(1) 140/ 0 : =1BDH BREAK_HIGH_WR EQU 0X01BD ;СТАРШИЙ БАЙТ АДРЕСА ПОРТА НА ЗАПИСЬ АДРЕСА BREAK(1) 141/ 0 :(1) 142/ 0 : ;[ОДНОСТРАНИЧНЫЙ ТЕКСТМОД](1) 143/ 0 : =1C0H LSYM EQU 0X01C0 ;СМЕЩЕНИЕ В СТРАНИЦЕ НАЧАЛА ЛЕВЫХ СИМВОЛОВ ТЕКСТМОДА(1) 144/ 0 : =31C0H LATTR EQU 0X31C0 ;СМЕЩЕНИЕ В СТРАНИЦЕ НАЧАЛА ЛЕВЫХ АТРИБУТОВ СИМВОЛОВ(1) 145/ 0 : =11C0H RSYM EQU 0X11C0 ;СМЕЩЕНИЕ В СТРАНИЦЕ НАЧАЛА ПРАВЫХ СИМВОЛОВ ТЕКСТМОДА(1) 146/ 0 : =21C1H RATTR EQU 0X21C1 ;СМЕЩЕНИЕ В СТРАНИЦЕ НАЧАЛА ПРАВЫХ АТРИБУТОВ СИМВОЛОВ(1) 147/ 0 :(1) 148/ 0 : ;[ATM ТЕСТМОД](1) 149/ 0 : =1C0H ALSYM EQU 0X01C0 ;СМЕЩЕНИЕ В СТРАНИЦЕ НАЧАЛА ЛЕВЫХ СИМВОЛОВ ТЕКСТМОДА(1) 150/ 0 : =21C0H ALATTR EQU 0X21C0 ;СМЕЩЕНИЕ В СТРАНИЦЕ НАЧАЛА ЛЕВЫХ АТРИБУТОВ СИМВОЛОВ(1) 151/ 0 : =21C0H ARSYM EQU 0X21C0 ;СМЕЩЕНИЕ В СТРАНИЦЕ НАЧАЛА ПРАВЫХ СИМВОЛОВ ТЕКСТМОДА(1) 152/ 0 : =1C1H ARATTR EQU 0X01C1 ;СМЕЩЕНИЕ В СТРАНИЦЕ НАЧАЛА ПРАВЫХ АТРИБУТОВ СИМВОЛОВ(1) 153/ 0 :(1) 154/ 0 : ;[ЦВЕТА И ЯРКОСТИ](1) 155/ 0 : =0H BLACK EQU 0(1) 156/ 0 : =1H BLUE EQU 1(1) 157/ 0 : =2H RED EQU 2(1) 158/ 0 : =3H MAGENTA EQU 3(1) 159/ 0 : =4H GREEN EQU 4(1) 160/ 0 : =5H CYAN EQU 5(1) 161/ 0 : =6H YELLOW EQU 6(1) 162/ 0 : =7H WHITE EQU 7(1) 163/ 0 : =40H BR_INK EQU 0X40(1) 164/ 0 : =80H BR_PAPER EQU 0X80(1) 165/ 0 :(1) 166/ 0 : ;[ЦВЕТА ДЛЯ ATM ВИДЕОРЕЖИМОВ](1) 167/ 0 : =80H G_L EQU %10000000(1) 168/ 0 : =10H G_H EQU %00010000(1) 169/ 0 : =40H R_L EQU %01000000(1) 170/ 0 : =2H R_H EQU %00000010(1) 171/ 0 : =20H B_L EQU %00100000(1) 172/ 0 : =1H B_H EQU %00000001(1) 173/ 0 :(1) 174/ 0 : ;[МАСКА ПОРТА 7FFD](1) 175/ 0 : =8H ZX_SCREEN EQU %00001000(1) 176/ 0 : =10H ZX_ROM EQU %00010000(1) 177/ 0 :(1) 178/ 0 : ;[МАСКА ПОРТА 0XBF](1) 179/ 0 : (MACRO) BITMASK RST8_BF, 6(1) 179/ 0 : =6H B_RST8_BF EQU 6(1) 179/ 0 : =40H M_RST8_BF EQU 1<<6(1) 180/ 0 : (MACRO) BITMASK EMUVG_BF, 5(1) 180/ 0 : =5H B_EMUVG_BF EQU 5(1) 180/ 0 : =20H M_EMUVG_BF EQU 1<<5(1) 181/ 0 : (MACRO) BITMASK BREAK_BF, 4 ;БИТ РАЗРЕШЕНИЯ СРАБАТЫВАНИЯ BREAK НА АДРЕСЕ(1) 181/ 0 : =4H B_BREAK_BF EQU 4(1) 181/ 0 : =10H M_BREAK_BF EQU 1<<4(1) 182/ 0 : (MACRO) BITMASK NMI_BF, 3 ;БИТ ГЕНЕРАЦИИ NMI(1) 182/ 0 : =3H B_NMI_BF EQU 3(1) 182/ 0 : =8H M_NMI_BF EQU 1<<3(1) 183/ 0 : (MACRO) BITMASK FONT_BF, 2 ;БИТ РАЗРЕШЕНИЯ ИЗМЕНЕНИЯ ШРИФТА(1) 183/ 0 : =2H B_FONT_BF EQU 2(1) 183/ 0 : =4H M_FONT_BF EQU 1<<2(1) 184/ 0 : (MACRO) BITMASK FLASH_BF, 1 ;БИТ РАЗРЕШЕНИЯ ПРОГРАММИРОВАНИЯ FLASH(1) 184/ 0 : =1H B_FLASH_BF EQU 1(1) 184/ 0 : =2H M_FLASH_BF EQU 1<<1(1) 185/ 0 : (MACRO) BITMASK SHADOW_BF, 0 ;БИТ РАЗРЕШЕНИЯ ДОСТУПА К ТЕНЕВЫМ ПОРТАМAS V1.42 Beta [Bld 146] - source file services.a80(../../svn/pentevo/rom/global_vars.a80) - page 30 - 2/23/2020 18:58:44(1) 185/ 0 : =0H B_SHADOW_BF EQU 0(1) 185/ 0 : =1H M_SHADOW_BF EQU 1<<0(1) 186/ 0 :(1) 187/ 0 : ;[МАСКА ПОРТА 0XEFF7](1) 188/ 0 : (MACRO) BITMASK PENT_CMOS, 7 ;БИТ РАЗРЕШЕНИЯ ДОСТУПА К КМОСУ(1) 188/ 0 : =7H B_PENT_CMOS EQU 7(1) 188/ 0 : =80H M_PENT_CMOS EQU 1<<7(1) 189/ 0 : (MACRO) BITMASK PENT_TURBO, 4 ;ТУРБОРЕЖИМ ПЕНТАГОНА(1) 189/ 0 : =4H B_PENT_TURBO EQU 4(1) 189/ 0 : =10H M_PENT_TURBO EQU 1<<4(1) 190/ 0 :(1) 191/ 0 : ;[МАСКИ РЕЖИМОВ](1) 192/ 0 : =10H MEMORY_ALL EQU %00010000 ;ДОСТУП К ПЕРВОМУ МЕГАБАЙТУ ЧЕРЕЗ ПОРТ EFF7(1) 193/ 0 : =20H MEMORY_48 EQU %00100000 ;ДОСТУПЕН ТОЛЬКО 48Kb ПАМЯТИ(1) 194/ 0 : =30H MEMORY_128 EQU %00110000 ;ДОСТУПНО ТОЛЬКО 128Kb ПАМЯТИ(1) 195/ 0 : =40H TURBO_3 EQU %01000000 ;ЧАСТОТА ПРОЦЕССОРА 3,5 МГц(1) 196/ 0 : =80H TURBO_7 EQU %10000000 ;ЧАСТОТА ПРОЦЕССОРА 7 МГц(1) 197/ 0 : =C0H TURBO_14 EQU %11000000 ;ЧАСТОТА ПРОЦЕССОРА 14 МГц(1) 198/ 0 : =0H NUM_EGA EQU %00000000 ;НОМЕР ВИДЕОРЕЖИМА ДЛЯ ATM ПОРТА (EGA МОД 320*200)(1) 199/ 0 : =2H NUM_APPMULTI EQU %00000010 ;НОМЕР ВИДЕОРЕЖИМА ДЛЯ ATM ПОРТА (АППАРАТНЫЙ МУЛЬТИКОЛОР 640*200)(1) 200/ 0 : =3H NUM_ZXSCR EQU %00000011 ;НОМЕР ВИДЕОРЕЖИМА ДЛЯ ATM ПОРТА (ZX SCREEN 6912)(1) 201/ 0 : =6H NUM_TXTATM EQU %00000110 ;НОМЕР ВИДЕОРЕЖИМА ДЛЯ ATM ПОРТА (ATM ТЕКСТМОД 80*25)(1) 202/ 0 : =7H NUM_TXTSCR EQU %00000111 ;НОМЕР ВИДЕОРЕЖИМА ДЛЯ ATM ПОРТА (ОДНОСТРАНИЧНЫЙ ТЕКСТМОД 80*25)(1) 203/ 0 :(1) 204/ 0 : =8H SET_VIDEOMODE EQU %00001000(1) 205/ 0 :(1) 206/ 0 : ;[НОМЕРА ВИДЕОРЕЖИМОВ С МАСКОЙ ДЛЯ ЗАПИСИ В ПОРТ](1) 207/ 0 : =A0H V_EGA EQU NUM_EGA | 0XA0(1) 208/ 0 : =A2H V_APPMULTI EQU NUM_APPMULTI | 0XA0(1) 209/ 0 : =A3H V_ZXSCR EQU NUM_ZXSCR | 0XA0(1) 210/ 0 : =A6H V_TXTATM EQU NUM_TXTATM | 0XA0(1) 211/ 0 : =A7H V_TXT1PAGE EQU NUM_TXTSCR | 0XA0(1) 212/ 0 :(1) 213/ 0 : ;[МАСКИ ОТЛАДЧИКА](1) 214/ 0 : (MACRO) BITMASK DBG_ACTIV, 7 ;АКТИВЕН ОТЛАДЧИК(1) 214/ 0 : =7H B_DBG_ACTIV EQU 7(1) 214/ 0 : =80H M_DBG_ACTIV EQU 1<<7(1) 215/ 0 : (MACRO) BITMASK TRACE_DBG, 6 ;ТРАССИРОВКА(1) 215/ 0 : =6H B_TRACE_DBG EQU 6(1) 215/ 0 : =40H M_TRACE_DBG EQU 1<<6(1) 216/ 0 : (MACRO) BITMASK STEP_DBG, 5 ;ПОШАГОВАЯ ОТЛАДКА(1) 216/ 0 : =5H B_STEP_DBG EQU 5(1) 216/ 0 : =20H M_STEP_DBG EQU 1<<5(1) 217/ 0 : ; BITMASK CASH_INST, 4 ;УСТАНОВЛЕН CASH REMEMBER(1) 218/ 0 : ; BITMASK CASH_ACTIV, 3 ;АКТИВЕН CASH REMEMBER(1) 219/ 0 :(1) 220/ 0 : ;[СМЕЩЕНИЯ FDI ОБРАЗА](1) 221/ 0 : =4000H FDI_TABLE_CYL EQU 0X4000 ;АДРЕС ТАБЛИЦЫ НАЧАЛ ДОРОЖЕК В ОБРАЗЕ(1) 222/ 0 : =40FFH FDI_PAGE_START EQU 0X40FF ;СМЕЩЕНИЕ В СТРАНИЦАХ НАЧАЛА СЕКТОРОВ ОБРАЗА(1) 223/ 0 : =41FEH FDI_BYTE_SMESH EQU 0X41FE ;СМЕЩЕНИЕ В БАЙТАХ НАЧАЛА ОБРАЗА ЗАГРУЖЕННОГО В РАМДИСК(1) 224/ 0 : =41FFH FDI_BLOCK_SMESH EQU 0X41FF ;СМЕЩЕНИЕ В БЛОКАХ (ПО 256 БАЙТ) НАЧАЛА СЕКТОРОВ ОБРАЗА(1) 225/ 0 : =4400H FDI_IMAGE1SECT EQU 0X4400 ;АДРЕС ЗАГРУЗКИ ПЕРВОГО СЕКТОРА ДЛЯ ОПРЕДЕЛЕНИЯ СМЕЩЕНИЯ(1) 226/ 0 :(1) 227/ 0 : ;ЯЧЕЙКИ В CMOS(1) 228/ 0 : =0H _CMOS_SECOND EQU 0 ;СЕКУНДЫ(1) 229/ 0 : =1H _CMOS_SECOND_AL EQU 1 ;СЕКУНДЫ БУДИЛЬНИКА(1) 230/ 0 : =2H _CMOS_MINUTE EQU 2 ;МИНУТЫ(1) 231/ 0 : =3H _CMOS_MINUTE_AL EQU 3 ;МИНУТЫ БУДИЛЬНИКА(1) 232/ 0 : =4H _CMOS_HOUR EQU 4 ;ЧАСЫ(1) 233/ 0 : =5H _CMOS_HOUR_AL EQU 5 ;ЧАСЫ БУДИЛЬНИКАAS V1.42 Beta [Bld 146] - source file services.a80(../../svn/pentevo/rom/global_vars.a80) - page 31 - 2/23/2020 18:58:44(1) 234/ 0 : =6H _CMOS_DAY EQU 6 ;ДЕНЬ НЕДЕЛИ(1) 235/ 0 : =7H _CMOS_DAY_MONTH EQU 7 ;ДЕНЬ МЕСЯЦА(1) 236/ 0 : =8H _CMOS_MONTH EQU 8 ;МЕСЯЦ(1) 237/ 0 : =9H _CMOS_YEAR EQU 9 ;ГОД(1) 238/ 0 :(1) 239/ 0 : ;[НОМЕРА ЯЧЕЕК CMOS И ИХ СОДЕРЖИМОЕ](1) 240/ 0 : =EFH CRCCMOSHIGH EQU 0XEF ;СТАРШИЙ БАЙТ CRC CMOS(1) 241/ 0 : =EEH CRCCMOSLOW EQU 0XEE ;МЛАДШИЙ БАЙТ CRC CMOS(1) 242/ 0 : =EDH CMOS_BYTE_00 EQU 0XED ;АДРЕС ХРАНЕНИЯ В CMOS(1) 243/ 0 : =ECH CMOS_BYTE_01 EQU 0XEC ;АДРЕС ХРАНЕНИЯ В CMOS(1) 244/ 0 : =EBH VIRT_REAL_DRIVE EQU 0XEB ;ХРАНЕНИЕ НОМЕРА РЕАЛЬНОГО И ВИРТУАЛЬНОГО ДИСКОВОДА, ТИП DOS(1) 245/ 0 : =EAH HDD_TIMEOUT EQU 0XEA ;ЗАДЕРЖКА ОПРЕДЕНИЯ НАЛИЧИЯ ВИНТА ПОСЛЕ ВКЛЮЧЕНИЯ ПИТАНИЯ(1) 246/ 0 : =E9H CMOS_BYTE_02 EQU 0XE9 ;АДРЕС ХРАНЕНИЯ В CMOS(1) 247/ 0 : =E8H CMOS_BYTE_03 EQU 0XE8 ;АДРЕС ХРАНЕНИЯ В CMOS(1) 248/ 0 :(1) 249/ 0 : ;[ЯЧЕЙКА CMOS 0XED CMOS_BYTE_00](1) 250/ 0 : (MACRO) BITMASK TURBO14, 7 ;РАЗРЕШЕНИЕ ВКЛЮЧЕНИЯ TURBO 14MHZ(1) 250/ 0 : =7H B_TURBO14 EQU 7(1) 250/ 0 : =80H M_TURBO14 EQU 1<<7(1) 251/ 0 : (MACRO) BITMASK EMUL_TAPE, 6 ;РАЗРЕШЕНИЕ ЭМУЛЯЦИИ ЗАГРУЗКИ С ЛЕНТЫ(1) 251/ 0 : =6H B_EMUL_TAPE EQU 6(1) 251/ 0 : =40H M_EMUL_TAPE EQU 1<<6(1) 252/ 0 : (MACRO) BITMASK PRINTER_AY, 5 ;РАЗРЕШЕНИЕ ПОДМЕНЫ ДРАЙВЕРА ПЕЧАТИ В BASIC48(1) 252/ 0 : =5H B_PRINTER_AY EQU 5(1) 252/ 0 : =20H M_PRINTER_AY EQU 1<<5(1) 253/ 0 : (MACRO) BITMASK RELOAD_FONT, 4 ;РАЗРЕШЕНИЕ ПЕРЕЗАГРУЗКИ ШРИФТА ПРИ СБРОСЕ(1) 253/ 0 : =4H B_RELOAD_FONT EQU 4(1) 253/ 0 : =10H M_RELOAD_FONT EQU 1<<4(1) 254/ 0 : (MACRO) BITMASK TYPE_FONT, 3 ;ВЫБОР КОДИРОВКИ ШРИФТА(1) 254/ 0 : =3H B_TYPE_FONT EQU 3(1) 254/ 0 : =8H M_TYPE_FONT EQU 1<<3(1) 255/ 0 : (MACRO) BITMASK AUTO_TAPE, 2 ;АВТОЗАПУСК TAP ФАЙЛОВ(1) 255/ 0 : =2H B_AUTO_TAPE EQU 2(1) 255/ 0 : =4H M_AUTO_TAPE EQU 1<<2(1) 256/ 0 :(1) 257/ 0 : ;[НОМЕРА СБРОСОВ, БИТЫ 1-0 ЯЧЕЙКИ 0XED (CMOS_BYTE_00)](1) 258/ 0 : =3H RESET2CUSTOM EQU 3 ;СБРОС В CUSTOM ROM(1) 259/ 0 : =2H RESET2PROFROM EQU 2 ;СБРОС В PROFROM(1) 260/ 0 : =1H RESET2GLUK EQU 1 ;СБРОС В GLUK SERVICE(1) 261/ 0 : =0H RESET2EVOSERV EQU 0 ;СБРОС В EVO SERVICE(1) 262/ 0 :(1) 263/ 0 : ;[ЯЧЕЙКА CMOS 0XEC CMOS_BYTE_01](1) 264/ 0 : (MACRO) BITMASK TURBO357, 7 ;ТУРБО РЕЖИМ 3,5 ИЛИ 7 МГЦ(1) 264/ 0 : =7H B_TURBO357 EQU 7(1) 264/ 0 : =80H M_TURBO357 EQU 1<<7(1) 265/ 0 : (MACRO) BITMASK SD_NGS_ONOFF, 6 ;ВКЛЮЧЕНИЕ/ВЫКЛЮЧЕНИЕ ДОСТУПА К SD КАРТЕ NEOGS(1) 265/ 0 : =6H B_SD_NGS_ONOFF EQU 6(1) 265/ 0 : =40H M_SD_NGS_ONOFF EQU 1<<6(1) 266/ 0 : (MACRO) BITMASK AUTOMOUNT, 5 ;ВКЛ/ВЫКЛ АВТОМОНТИРОВАНИЯ ИЗ ФАЙЛА(1) 266/ 0 : =5H B_AUTOMOUNT EQU 5(1) 266/ 0 : =20H M_AUTOMOUNT EQU 1<<5(1) 267/ 0 : (MACRO) BITMASK CLOCK_VIEW, 4 ;ХРАНЕНИЕ ОТОБРАЖЕНИЕ ЧАСОВ(1) 267/ 0 : =4H B_CLOCK_VIEW EQU 4(1) 267/ 0 : =10H M_CLOCK_VIEW EQU 1<<4(1) 268/ 0 : (MACRO) BITMASK SOUNDKEYS, 3 ;РАЗРЕШЕНИЕ ОЗВУЧИВАНИЯ НАЖАТЫХ КЛАВИШ(1) 268/ 0 : =3H B_SOUNDKEYS EQU 3(1) 268/ 0 : =8H M_SOUNDKEYS EQU 1<<3(1) 269/ 0 : (MACRO) BITMASK REZIDENT, 2 ;РАЗРЕШЕНИЕ ПРОВЕРКИ НАЛИЧИЯ РЕЗИДЕНТА(1) 269/ 0 : =2H B_REZIDENT EQU 2(1) 269/ 0 : =4H M_REZIDENT EQU 1<<2AS V1.42 Beta [Bld 146] - source file services.a80(../../svn/pentevo/rom/global_vars.a80) - page 32 - 2/23/2020 18:58:44(1) 270/ 0 :(1) 271/ 0 : ;[НОМЕРА МОДЕЛЕЙ ПАМЯТИ, БИТЫ 1-0 ЯЧЕЙКИ 0XEC (CMOS_BYTE_01)](1) 272/ 0 : =2H _128K EQU 2 ;ПАМЯТЬ 128 Кб(1) 273/ 0 : =1H _48K EQU 1 ;ПАМЯТЬ 48 Кб(1) 274/ 0 : =0H _1MB EQU 0 ;ПАМЯТЬ 1 Мб(1) 275/ 0 :(1) 276/ 0 : =4H KOL_MODES EQU 4 ;КОЛИЧЕСТВО РЕЖИМОВ СБРОСА(1) 277/ 0 : =3H MKOL_MODES EQU 3 ;МАСКА ДЛЯ КОЛИЧЕСТВА РЕЖИМОВ СБРОСА(1) 278/ 0 :(1) 279/ 0 : ;[ЯЧЕЙКА CMOS 0XEB](1) 280/ 0 : (MACRO) BITMASK ACCESSZCSD, 7 ;РАЗРЕШЕНИЕ ДОСТУПА К ZC SD CARD(1) 280/ 0 : =7H B_ACCESSZCSD EQU 7(1) 280/ 0 : =80H M_ACCESSZCSD EQU 1<<7(1) 281/ 0 : (MACRO) BITMASK ACCESSSDG, 6 ;РАЗРЕШЕНИЯ ДОСТУПА К SD КАРТЕ NEOGS(1) 281/ 0 : =6H B_ACCESSSDG EQU 6(1) 281/ 0 : =40H M_ACCESSSDG EQU 1<<6(1) 282/ 0 : (MACRO) BITMASK ACCESSHDDM, 5 ;РАЗРЕШЕНИЕ ДОСТУПА К HDD MASTER(1) 282/ 0 : =5H B_ACCESSHDDM EQU 5(1) 282/ 0 : =20H M_ACCESSHDDM EQU 1<<5(1) 283/ 0 : (MACRO) BITMASK ACCESSHDDS, 4 ;РАЗРЕШЕНИЕ ДОСТУПА К HDD SLAVE(1) 283/ 0 : =4H B_ACCESSHDDS EQU 4(1) 283/ 0 : =10H M_ACCESSHDDS EQU 1<<4(1) 284/ 0 : =CH _REAL_DRIVE EQU %00001100 ;МАСКА НОМЕРА РЕАЛЬНОГО ДИСКОВОДА(1) 285/ 0 : =3H _VIRT_DRIVE EQU %00000011 ;МАСКА НОМЕРА ВИРТУАЛЬНОГО ДИСКОВОДА(1) 286/ 0 :(1) 287/ 0 : ;[ЯЧЕЙКА CMOS 0XE9](1) 288/ 0 : (MACRO) BITMASK AUTOBOOT, 7 ;АВТОСТАРТ ЗАГРУЖАЕМОГО УСТРОЙСТВА(1) 288/ 0 : =7H B_AUTOBOOT EQU 7(1) 288/ 0 : =80H M_AUTOBOOT EQU 1<<7(1) 289/ 0 : =3H BOOTDEVICE EQU %00000011 ;НОМЕР ЗАГРУЖАЕМОГО УСТРОЙСТВА(1) 290/ 0 :(1) 291/ 0 : ;[ЯЧЕЙКА CMOS 0XE8](1) 292/ 0 : (MACRO) BITMASK KILL_REZIDENT, 7 ;ИЗМЕНЕНИЕ РЕЗИДЕНТА ПЕРЕД ЗАПУСКОМ(1) 292/ 0 : =7H B_KILL_REZIDENT EQU 7(1) 292/ 0 : =80H M_KILL_REZIDENT EQU 1<<7(1) 293/ 0 :(1) 294/ 0 : ;[НОМЕРА ЗАГРУЖАЕМЫХ УСТРОЙСТВ](1) 295/ 0 : =2H _SD EQU 2 ;SD КАРТА(1) 296/ 0 : =1H _HDD EQU 1 ;ВИНЧЕСТЕР(1) 297/ 0 : =0H _FDD EQU 0 ;ДИСКОВОД(1) 298/ 0 :(1) 299/ 0 : =80H _SD_NONE EQU 0X80 ;ПРИЗНАК НЕ ВСТАВЛЕННОЙ КАРТЫ(1) 300/ 0 :(1) 301/ 0 : ;[ПЕРЕМЕННЫЕ ДЛЯ 0 ОКНА ПРОЕЦИРОВАНИЯ](1) 302/ 0 : =13H DEBUG_ONOFF EQU 0X0013 ;ВКЛ/ВЫКЛ ОТЛАДЧИКА(1) 303/ 0 : =14H ADR_SEL_ROM EQU 0X0014 ;АДРЕС ПЕРЕКЛЮЧЕНИЯ СТРАНИЦ ROM(1) 304/ 0 : =2CH CONT_RST8 EQU 0X002C ;АДРЕС ПРОДОЛЖЕНИЯ ОБРАБОТКИ RST 8(1) 305/ 0 : =34H CONTINUE_MAGIC EQU 0X0034 ;АДРЕС ПЕРЕХОДА ПРОДОЛЖЕНИЯ ОБРАБОТЧИКА MAGIC(1) 306/ 0 : =36H ADR_PERFECT EQU 0X0036 ;АДРЕС РАСПОЛОЖЕНИЯ PERFECT COMANDER(1) 307/ 0 : =3EH EI_RET EQU 0X003E ;АДРЕС РАСПОЛОЖЕНИЯ EI:RET(1) 308/ 0 : =40H UNP_DOS_FE EQU 0X0040 ;АДРЕС РАСПАКОВЩИКА DOS FE(1) 309/ 0 : =80H UNPACK EQU 0X0080 ;АДРЕС РАСПАКОВЩИКА(1) 310/ 0 : =100H _BIOS_JUMPS EQU 0X0100 ;АДРЕС НАЧАЛА ТАБЛИЦЫ ПЕРЕХОДОВ В ДРАЙВЕРЫ ДЕВАЙСОВ(1) 311/ 0 : =569H ADRBRK_EMUTAP EQU 0X0569 ;АДРЕС УСТАНОВКИ БРЯКА ДЛЯ ЭМУЛЯЦИИ ЗАГРУЗКИ TAP(1) 312/ 0 : =C000H START_STS EQU 0XC000 ;АДРЕС ВХОДА В ОТЛАДЧИК(1) 313/ 0 : =3CE8H ADR_RST8END EQU 0X3CE8 ;АДРЕС ВОЗВРАТА ИЗ RST 8(1) 314/ 0 : =8000H ICALL2PAGE EQU 0X8000 ;АДРЕС ВЫЗЫВОВ КОДА ИЗ ДРУГОЙ СТРАНИЦЫ(1) 315/ 0 :(1) 316/ 0 : =0H OFFSET_FNTSAVE EQU 0 ;800 СМЕЩЕНИЕ В СТРАНИЦЕ ДЛЯ СОХРАНЕНИЯ СЧИТАННОГО ШРИФТА(1) 317/ 0 : =800H OFFSET_BUFSYM EQU OFFSET_FNTSAVE+0X800 ;800 СМЕЩЕНИЕ В СТРАНИЦЕ ТЕКУЩЕГО ШРИФТАAS V1.42 Beta [Bld 146] - source file services.a80(../../svn/pentevo/rom/global_vars.a80) - page 33 - 2/23/2020 18:58:44(1) 318/ 0 : =1000H OFFSET_SCRSAVE EQU OFFSET_BUFSYM+0X800 ;1B00 СМЕЩЕНИЕ В СТРАНИЦЕ ДЛЯ СОХРАНЕНИЯ ЭКРАНА(1) 319/ 0 : =2B00H OFFSET_USBDRV EQU OFFSET_SCRSAVE+0X1B00 ;??? СМЕЩЕНИЕ ДО НАЧАЛА USB ДРАЙВЕРА(1) 320/ 0 :(1) 321/ 0 : =BE00H BUF_512 EQU CPU3-0X200 ;200 БУФЕР СЕКТОРА(1) 322/ 0 : =BD00H BUF_TABLVOL EQU BUF_512-0X100 ;100 БУФЕР ТАБЛИЦЫ НАЙДЕННЫХ РАЗДЕЛОВ(1) 323/ 0 : =BC00H BUF_TEKVOL EQU BUF_TABLVOL-0X100 ;100 БУФЕР ВЫБРАННОГО РАЗДЕЛА(1) 324/ 0 : =B400H BUF_TDIRCLS EQU BUF_TEKVOL-0X800 ;800 БУФЕР КЛАСТЕРОВ ТЕКУЩЕЙ ДИРЕКТОРИИ(1) 325/ 0 : =B300H BUF_256 EQU BUF_TDIRCLS-0X100 ;100 БУФЕР 256 БАЙТ ДЛЯ ПЕРЕНОСОВ(1) 326/ 0 : =B200H BUF_PATH EQU BUF_256-0X100 ;100 БУФЕР ТЕКУЩЕГО ПУТИ(1) 327/ 0 : =B100H MOUNT_DRIVES EQU BUF_PATH-0X100 ;100 БУФЕР ОПИСАТЕЛЕЙ ПРИМОНТИРОВАННЫХ ФАЙЛОВ(1) 328/ 0 : =B000H BUF_LEVELDIR EQU MOUNT_DRIVES-0X100 ;200 БУФЕР СОХРАНЕНИЯ ПОЗИЦИЙ ОКОН ПРИ ПЕРЕХОДАХ ПО ДИРЕКТОРИЯМ(1) 329/ 0 : =AC00H BUF_WINPATH EQU BUF_LEVELDIR-0X400 ;400 БУФЕР СОХРАНЕНИЯ ПОЗИЦИЙ В ОКНЕ ПРИ ХОЖДЕНИИ ПО ДИРЕКТОРИЯМ(1) 330/ 0 :(1) 331/ 0 : ;[ПЕРЕМЕННЫЕ ДЛЯ МЕНЕДЖЕРА УСТРОЙСТВ](1) 332/ 0 : =BDE0H DEVICES EQU BUF_TABLVOL+0XE0 ;10 СПИСОК ОБНАРУЖЕННЫХ ДЕВАЙСОВ(1) 333/ 0 : =BDF0H GO_DEV EQU DEVICES+0X10 ;2 АДРЕС ВЫЗОВА ДРАЙВЕРА УСТРОЙСТВА(1) 334/ 0 : =BDF2H KOLDVOL EQU GO_DEV+2 ;1 КОЛИЧЕСТВО НАЙДЕННЫХ РАЗДЕЛОВ(1) 335/ 0 : =BDF3H SETDVOL EQU KOLDVOL+1 ;1 НОМЕР ВЫБРАННОГО РАЗДЕЛА(1) 336/ 0 : =BDF4H ADRTEKV EQU SETDVOL+1 ;2 АДРЕС ОПИСАТЕЛЯ ТЕКУЩЕГО РАЗДЕЛА(1) 337/ 0 : =BDF6H SAVE_TEK_VOL EQU ADRTEKV+2 ;1 ВРЕМЕННОЕ СОХРАНЕНИЕ ТЕКУЩЕГО РАЗДЕЛА(1) 338/ 0 : =BDF7H TEK_TYPE EQU SAVE_TEK_VOL+1 ;1 ВРЕМЕННОЕ ХРАНЕНИЕ ТИПА ТЕКУЩЕГО УСТРОЙСТВА(1) 339/ 0 : =BDF8H FLAGS_DRV EQU TEK_TYPE+1 ;1 ФЛАГОВЫЙ БАЙТ ДРАЙВЕРОВ(1) 340/ 0 : ;7 =0-ДРАЙВЕР SD КАРТЫ NEOGS НЕ УСТАНОВЛЕН, =1-УСТАНОВЛЕН(1) 341/ 0 : ;6(1) 342/ 0 : ;5(1) 343/ 0 : ;4(1) 344/ 0 : ;3(1) 345/ 0 : ;2(1) 346/ 0 : ;1 =0-SD ZC КАРТА НЕ ОБНАРУЖЕНА, 1-ОБНАРУЖЕНА(1) 347/ 0 : ;0 =0-SD NeoGS НЕ ОБНАРУЖЕНА, 1-ОБНАРУЖЕНА(1) 348/ 0 : =BDFEH CRC_DRVS EQU BUF_TABLVOL+0XFE ;2 КОНТРОЛЬНАЯ СУММА ТАБЛИЦЫ НАЙДЕННЫХ РАЗДЕЛОВ(1) 349/ 0 :(1) 350/ 0 : ;[ПЕРЕМЕННЫЕ ДЛЯ 1 ОКНА ПРОЕЦИРОВАНИЯ](1) 351/ 0 : =0H BUF_ALLVOL EQU 0 ;1000 БУФЕР ПЕРЕМЕННЫХ ДЛЯ ВСЕХ РАЗДЕЛОВ (16 MAX)(1) 352/ 0 : =1000H MOUNT_CLS EQU BUF_ALLVOL+0X1000 ;1000 БУФЕР КЛАСТЕРОВ ПРИМОНТИРОВАННЫХ ФАЙЛОВ(1) 353/ 0 : =2000H TEK_BUFPATH EQU MOUNT_CLS+0X1000 ;1000 БУФЕР ТЕКУЩИХ ПУТЕЙ НА РАЗДЕЛАХ(1) 354/ 0 : =3000H BUF_PATHMOUNT EQU TEK_BUFPATH+0X1000 ;400 БУФЕР ПУТЕЙ ДЛЯ ПОИСКА ПРИМОНТИРОВАННЫХ ФАЙЛОВ(1) 355/ 0 : =3400H BUF_DIRCEP EQU BUF_PATHMOUNT+0X400 ;100 БУФЕР ЦЕПОЧКИ ТЕКУЩЕЙ ДИРЕКТОРИИ(1) 356/ 0 : =3500H BUF_TEMPSEC EQU BUF_DIRCEP+0X100 ;200 БУФЕР СЕКТОРА ДЛЯ ЗАГРУЗКИ ОБРАЗОВ(1) 357/ 0 :7/ 0 : include ../../svn/pentevo/rom/evodos_vars.a80(1) 1/ 0 :(1) 2/ 0 : ;LAST UPDATE: 04.08.2019 savelij(1) 3/ 0 :(1) 4/ 0 : (MACRO) INIT_VAR ADR_RST8END-0X50(1) 4/ 0 : =>NOT BLANK IFNB ADR_RST8END-0X50(1) 4/ 0 : =3C98H INITVAR := ADR_RST8END-0X50(1) 4/ 0 : =>FALSE ELSE(1) 4/ 0 : INITVAR := 0(1) 4/ 0 : [4] ENDIF(1) 5/ 0 :(1) 6/ 0 : (MACRO) SETVAR IREG_E, BYTE ;1(1) 6/ 0 : =3C98H IREG_E EQU INITVAR(1) 6/ 0 : =>NOT BLANK IFNB BYTE(1) 6/ 0 : =3C99H INITVAR := INITVAR+BYTE(1) 6/ 0 : =1H IREG_E_Size EQU BYTE(1) 6/ 0 : =>FALSE ELSE(1) 6/ 0 : INITVAR := INITVAR+BYTE(1) 6/ 0 : IREG_E_Size EQU BYTE(1) 6/ 0 : [6] ENDIFAS V1.42 Beta [Bld 146] - source file services.a80(../../svn/pentevo/rom/evodos_vars.a80) - page 34 - 2/23/2020 18:58:44(1) 7/ 0 : (MACRO) SETVAR IREG_D, BYTE ;1(1) 7/ 0 : =3C99H IREG_D EQU INITVAR(1) 7/ 0 : =>NOT BLANK IFNB BYTE(1) 7/ 0 : =3C9AH INITVAR := INITVAR+BYTE(1) 7/ 0 : =1H IREG_D_Size EQU BYTE(1) 7/ 0 : =>FALSE ELSE(1) 7/ 0 : INITVAR := INITVAR+BYTE(1) 7/ 0 : IREG_D_Size EQU BYTE(1) 7/ 0 : [7] ENDIF(1) 8/ 0 : (MACRO) SETVAR IREG_L, BYTE ;1(1) 8/ 0 : =3C9AH IREG_L EQU INITVAR(1) 8/ 0 : =>NOT BLANK IFNB BYTE(1) 8/ 0 : =3C9BH INITVAR := INITVAR+BYTE(1) 8/ 0 : =1H IREG_L_Size EQU BYTE(1) 8/ 0 : =>FALSE ELSE(1) 8/ 0 : INITVAR := INITVAR+BYTE(1) 8/ 0 : IREG_L_Size EQU BYTE(1) 8/ 0 : [8] ENDIF(1) 9/ 0 : (MACRO) SETVAR IREG_H, BYTE ;1(1) 9/ 0 : =3C9BH IREG_H EQU INITVAR(1) 9/ 0 : =>NOT BLANK IFNB BYTE(1) 9/ 0 : =3C9CH INITVAR := INITVAR+BYTE(1) 9/ 0 : =1H IREG_H_Size EQU BYTE(1) 9/ 0 : =>FALSE ELSE(1) 9/ 0 : INITVAR := INITVAR+BYTE(1) 9/ 0 : IREG_H_Size EQU BYTE(1) 9/ 0 : [9] ENDIF(1) 10/ 0 : (MACRO) SETVAR DOS_STEK, WORD ;2 СОХРАНЕНИЕ ОСНОВНОГО СТЕКА И ДНО ВНУТРЕННЕГО СТЕКА(1) 10/ 0 : =3C9CH DOS_STEK EQU INITVAR(1) 10/ 0 : =>NOT BLANK IFNB WORD(1) 10/ 0 : =3C9EH INITVAR := INITVAR+WORD(1) 10/ 0 : =2H DOS_STEK_Size EQU WORD(1) 10/ 0 : =>FALSE ELSE(1) 10/ 0 : INITVAR := INITVAR+BYTE(1) 10/ 0 : DOS_STEK_Size EQU BYTE(1) 10/ 0 : [10] ENDIF(1) 11/ 0 : ; SETVAR BYTE_DRIVE, BYTE ;1 ТЕКУЩЕЕ СОСТОЯНИЕ ВИРТУЛЬНОГО/ТЕКУЩЕГО/ПРИМОНТИРОВАННОГО ДИСКА(1) 12/ 0 : (MACRO) SETVAR WR_1F, BYTE ;1 КОПИЯ ЗАПИСАННОГО В ПОРТ 1F (РЕГИСТР КОМАНД)(1) 12/ 0 : =3C9EH WR_1F EQU INITVAR(1) 12/ 0 : =>NOT BLANK IFNB BYTE(1) 12/ 0 : =3C9FH INITVAR := INITVAR+BYTE(1) 12/ 0 : =1H WR_1F_Size EQU BYTE(1) 12/ 0 : =>FALSE ELSE(1) 12/ 0 : INITVAR := INITVAR+BYTE(1) 12/ 0 : WR_1F_Size EQU BYTE(1) 12/ 0 : [12] ENDIF(1) 13/ 0 : (MACRO) SETVAR RD_1F, BYTE ;1 ОТВЕТ ДЛЯ ЧТЕНИЯ ИЗ ПОРТА 1F(1) 13/ 0 : =3C9FH RD_1F EQU INITVAR(1) 13/ 0 : =>NOT BLANK IFNB BYTE(1) 13/ 0 : =3CA0H INITVAR := INITVAR+BYTE(1) 13/ 0 : =1H RD_1F_Size EQU BYTE(1) 13/ 0 : =>FALSE ELSE(1) 13/ 0 : INITVAR := INITVAR+BYTE(1) 13/ 0 : RD_1F_Size EQU BYTE(1) 13/ 0 : [13] ENDIF(1) 14/ 0 : (MACRO) SETVAR PORT_3F, BYTE ;1 ЗНАЧЕНИЕ ПОРТА 3F(1) 14/ 0 : =3CA0H PORT_3F EQU INITVAR(1) 14/ 0 : =>NOT BLANK IFNB BYTE(1) 14/ 0 : =3CA1H INITVAR := INITVAR+BYTE(1) 14/ 0 : =1H PORT_3F_Size EQU BYTEAS V1.42 Beta [Bld 146] - source file services.a80(../../svn/pentevo/rom/evodos_vars.a80) - page 35 - 2/23/2020 18:58:44(1) 14/ 0 : =>FALSE ELSE(1) 14/ 0 : INITVAR := INITVAR+BYTE(1) 14/ 0 : PORT_3F_Size EQU BYTE(1) 14/ 0 : [14] ENDIF(1) 15/ 0 : (MACRO) SETVAR PORT_5F, BYTE ;1 ЗНАЧЕНИЕ ПОРТА 5F(1) 15/ 0 : =3CA1H PORT_5F EQU INITVAR(1) 15/ 0 : =>NOT BLANK IFNB BYTE(1) 15/ 0 : =3CA2H INITVAR := INITVAR+BYTE(1) 15/ 0 : =1H PORT_5F_Size EQU BYTE(1) 15/ 0 : =>FALSE ELSE(1) 15/ 0 : INITVAR := INITVAR+BYTE(1) 15/ 0 : PORT_5F_Size EQU BYTE(1) 15/ 0 : [15] ENDIF(1) 16/ 0 : (MACRO) SETVAR PORT_7F, BYTE ;1 ЗНАЧЕНИЕ ПОРТА 7F(1) 16/ 0 : =3CA2H PORT_7F EQU INITVAR(1) 16/ 0 : =>NOT BLANK IFNB BYTE(1) 16/ 0 : =3CA3H INITVAR := INITVAR+BYTE(1) 16/ 0 : =1H PORT_7F_Size EQU BYTE(1) 16/ 0 : =>FALSE ELSE(1) 16/ 0 : INITVAR := INITVAR+BYTE(1) 16/ 0 : PORT_7F_Size EQU BYTE(1) 16/ 0 : [16] ENDIF(1) 17/ 0 : (MACRO) SETVAR WR_FF, BYTE ;1 КОПИЯ ЗАПИСАННОГО В ПОРТ FF(1) 17/ 0 : =3CA3H WR_FF EQU INITVAR(1) 17/ 0 : =>NOT BLANK IFNB BYTE(1) 17/ 0 : =3CA4H INITVAR := INITVAR+BYTE(1) 17/ 0 : =1H WR_FF_Size EQU BYTE(1) 17/ 0 : =>FALSE ELSE(1) 17/ 0 : INITVAR := INITVAR+BYTE(1) 17/ 0 : WR_FF_Size EQU BYTE(1) 17/ 0 : [17] ENDIF(1) 18/ 0 : (MACRO) SETVAR RD_FF, BYTE ;1 ОТВЕТ ДЛЯ ЧТЕНИЯ ИЗ ПОРТА FF(1) 18/ 0 : =3CA4H RD_FF EQU INITVAR(1) 18/ 0 : =>NOT BLANK IFNB BYTE(1) 18/ 0 : =3CA5H INITVAR := INITVAR+BYTE(1) 18/ 0 : =1H RD_FF_Size EQU BYTE(1) 18/ 0 : =>FALSE ELSE(1) 18/ 0 : INITVAR := INITVAR+BYTE(1) 18/ 0 : RD_FF_Size EQU BYTE(1) 18/ 0 : [18] ENDIF(1) 19/ 0 : (MACRO) SETVAR BUFF_SECT, WORD ;2 АДРЕС ЧТЕНИЯ/ЗАПИСИ СЕКТОРА(1) 19/ 0 : =3CA5H BUFF_SECT EQU INITVAR(1) 19/ 0 : =>NOT BLANK IFNB WORD(1) 19/ 0 : =3CA7H INITVAR := INITVAR+WORD(1) 19/ 0 : =2H BUFF_SECT_Size EQU WORD(1) 19/ 0 : =>FALSE ELSE(1) 19/ 0 : INITVAR := INITVAR+BYTE(1) 19/ 0 : BUFF_SECT_Size EQU BYTE(1) 19/ 0 : [19] ENDIF(1) 20/ 0 : (MACRO) SETVAR ADDR_RET, WORD ;2 АДРЕС ВОЗВРАТА(1) 20/ 0 : =3CA7H ADDR_RET EQU INITVAR(1) 20/ 0 : =>NOT BLANK IFNB WORD(1) 20/ 0 : =3CA9H INITVAR := INITVAR+WORD(1) 20/ 0 : =2H ADDR_RET_Size EQU WORD(1) 20/ 0 : =>FALSE ELSE(1) 20/ 0 : INITVAR := INITVAR+BYTE(1) 20/ 0 : ADDR_RET_Size EQU BYTE(1) 20/ 0 : [20] ENDIF(1) 21/ 0 : (MACRO) SETVAR REG_IF, BYTE ;1(1) 21/ 0 : =3CA9H REG_IF EQU INITVARAS V1.42 Beta [Bld 146] - source file services.a80(../../svn/pentevo/rom/evodos_vars.a80) - page 36 - 2/23/2020 18:58:44(1) 21/ 0 : =>NOT BLANK IFNB BYTE(1) 21/ 0 : =3CAAH INITVAR := INITVAR+BYTE(1) 21/ 0 : =1H REG_IF_Size EQU BYTE(1) 21/ 0 : =>FALSE ELSE(1) 21/ 0 : INITVAR := INITVAR+BYTE(1) 21/ 0 : REG_IF_Size EQU BYTE(1) 21/ 0 : [21] ENDIF(1) 22/ 0 : (MACRO) SETVAR REG_I, BYTE ;1(1) 22/ 0 : =3CAAH REG_I EQU INITVAR(1) 22/ 0 : =>NOT BLANK IFNB BYTE(1) 22/ 0 : =3CABH INITVAR := INITVAR+BYTE(1) 22/ 0 : =1H REG_I_Size EQU BYTE(1) 22/ 0 : =>FALSE ELSE(1) 22/ 0 : INITVAR := INITVAR+BYTE(1) 22/ 0 : REG_I_Size EQU BYTE(1) 22/ 0 : [22] ENDIF(1) 23/ 0 : (MACRO) SETVAR REG_C, BYTE ;1(1) 23/ 0 : =3CABH REG_C EQU INITVAR(1) 23/ 0 : =>NOT BLANK IFNB BYTE(1) 23/ 0 : =3CACH INITVAR := INITVAR+BYTE(1) 23/ 0 : =1H REG_C_Size EQU BYTE(1) 23/ 0 : =>FALSE ELSE(1) 23/ 0 : INITVAR := INITVAR+BYTE(1) 23/ 0 : REG_C_Size EQU BYTE(1) 23/ 0 : [23] ENDIF(1) 24/ 0 : (MACRO) SETVAR REG_B, BYTE ;1(1) 24/ 0 : =3CACH REG_B EQU INITVAR(1) 24/ 0 : =>NOT BLANK IFNB BYTE(1) 24/ 0 : =3CADH INITVAR := INITVAR+BYTE(1) 24/ 0 : =1H REG_B_Size EQU BYTE(1) 24/ 0 : =>FALSE ELSE(1) 24/ 0 : INITVAR := INITVAR+BYTE(1) 24/ 0 : REG_B_Size EQU BYTE(1) 24/ 0 : [24] ENDIF(1) 25/ 0 : (MACRO) SETVAR REG_F, BYTE ;1(1) 25/ 0 : =3CADH REG_F EQU INITVAR(1) 25/ 0 : =>NOT BLANK IFNB BYTE(1) 25/ 0 : =3CAEH INITVAR := INITVAR+BYTE(1) 25/ 0 : =1H REG_F_Size EQU BYTE(1) 25/ 0 : =>FALSE ELSE(1) 25/ 0 : INITVAR := INITVAR+BYTE(1) 25/ 0 : REG_F_Size EQU BYTE(1) 25/ 0 : [25] ENDIF(1) 26/ 0 : (MACRO) SETVAR REG_A, BYTE ;1(1) 26/ 0 : =3CAEH REG_A EQU INITVAR(1) 26/ 0 : =>NOT BLANK IFNB BYTE(1) 26/ 0 : =3CAFH INITVAR := INITVAR+BYTE(1) 26/ 0 : =1H REG_A_Size EQU BYTE(1) 26/ 0 : =>FALSE ELSE(1) 26/ 0 : INITVAR := INITVAR+BYTE(1) 26/ 0 : REG_A_Size EQU BYTE(1) 26/ 0 : [26] ENDIF(1) 27/ 0 : (MACRO) SETVAR REG_L, BYTE ;1 АДРЕС ЗАГРУЗКИ/ЗАПИСИ(1) 27/ 0 : =3CAFH REG_L EQU INITVAR(1) 27/ 0 : =>NOT BLANK IFNB BYTE(1) 27/ 0 : =3CB0H INITVAR := INITVAR+BYTE(1) 27/ 0 : =1H REG_L_Size EQU BYTE(1) 27/ 0 : =>FALSE ELSE(1) 27/ 0 : INITVAR := INITVAR+BYTE(1) 27/ 0 : REG_L_Size EQU BYTEAS V1.42 Beta [Bld 146] - source file services.a80(../../svn/pentevo/rom/evodos_vars.a80) - page 37 - 2/23/2020 18:58:44(1) 27/ 0 : [27] ENDIF(1) 28/ 0 : (MACRO) SETVAR REG_H, BYTE ;1(1) 28/ 0 : =3CB0H REG_H EQU INITVAR(1) 28/ 0 : =>NOT BLANK IFNB BYTE(1) 28/ 0 : =3CB1H INITVAR := INITVAR+BYTE(1) 28/ 0 : =1H REG_H_Size EQU BYTE(1) 28/ 0 : =>FALSE ELSE(1) 28/ 0 : INITVAR := INITVAR+BYTE(1) 28/ 0 : REG_H_Size EQU BYTE(1) 28/ 0 : [28] ENDIF(1) 29/ 0 : (MACRO) SETVAR WR_BF, BYTE ;1(1) 29/ 0 : =3CB1H WR_BF EQU INITVAR(1) 29/ 0 : =>NOT BLANK IFNB BYTE(1) 29/ 0 : =3CB2H INITVAR := INITVAR+BYTE(1) 29/ 0 : =1H WR_BF_Size EQU BYTE(1) 29/ 0 : =>FALSE ELSE(1) 29/ 0 : INITVAR := INITVAR+BYTE(1) 29/ 0 : WR_BF_Size EQU BYTE(1) 29/ 0 : [29] ENDIF(1) 30/ 0 : (MACRO) SETVAR WR_77, BYTE ;1(1) 30/ 0 : =3CB2H WR_77 EQU INITVAR(1) 30/ 0 : =>NOT BLANK IFNB BYTE(1) 30/ 0 : =3CB3H INITVAR := INITVAR+BYTE(1) 30/ 0 : =1H WR_77_Size EQU BYTE(1) 30/ 0 : =>FALSE ELSE(1) 30/ 0 : INITVAR := INITVAR+BYTE(1) 30/ 0 : WR_77_Size EQU BYTE(1) 30/ 0 : [30] ENDIF(1) 31/ 0 : (MACRO) SETVAR WR_EFF7, BYTE ;1(1) 31/ 0 : =3CB3H WR_EFF7 EQU INITVAR(1) 31/ 0 : =>NOT BLANK IFNB BYTE(1) 31/ 0 : =3CB4H INITVAR := INITVAR+BYTE(1) 31/ 0 : =1H WR_EFF7_Size EQU BYTE(1) 31/ 0 : =>FALSE ELSE(1) 31/ 0 : INITVAR := INITVAR+BYTE(1) 31/ 0 : WR_EFF7_Size EQU BYTE(1) 31/ 0 : [31] ENDIF(1) 32/ 0 : (MACRO) SETVAR WR_7FFD, BYTE ;1(1) 32/ 0 : =3CB4H WR_7FFD EQU INITVAR(1) 32/ 0 : =>NOT BLANK IFNB BYTE(1) 32/ 0 : =3CB5H INITVAR := INITVAR+BYTE(1) 32/ 0 : =1H WR_7FFD_Size EQU BYTE(1) 32/ 0 : =>FALSE ELSE(1) 32/ 0 : INITVAR := INITVAR+BYTE(1) 32/ 0 : WR_7FFD_Size EQU BYTE(1) 32/ 0 : [32] ENDIF(1) 33/ 0 : (MACRO) SETVAR WR_DOS7FFD, BYTE ;1(1) 33/ 0 : =3CB5H WR_DOS7FFD EQU INITVAR(1) 33/ 0 : =>NOT BLANK IFNB BYTE(1) 33/ 0 : =3CB6H INITVAR := INITVAR+BYTE(1) 33/ 0 : =1H WR_DOS7FFD_Size EQU BYTE(1) 33/ 0 : =>FALSE ELSE(1) 33/ 0 : INITVAR := INITVAR+BYTE(1) 33/ 0 : WR_DOS7FFD_Size EQU BYTE(1) 33/ 0 : [33] ENDIF(1) 34/ 0 : (MACRO) SETVAR WR_RAMNROM, BYTE ;1(1) 34/ 0 : =3CB6H WR_RAMNROM EQU INITVAR(1) 34/ 0 : =>NOT BLANK IFNB BYTE(1) 34/ 0 : =3CB7H INITVAR := INITVAR+BYTE(1) 34/ 0 : =1H WR_RAMNROM_Size EQU BYTEAS V1.42 Beta [Bld 146] - source file services.a80(../../svn/pentevo/rom/evodos_vars.a80) - page 38 - 2/23/2020 18:58:44(1) 34/ 0 : =>FALSE ELSE(1) 34/ 0 : INITVAR := INITVAR+BYTE(1) 34/ 0 : WR_RAMNROM_Size EQU BYTE(1) 34/ 0 : [34] ENDIF(1) 35/ 0 : (MACRO) SETVAR WR_1WINA3, BYTE ;1(1) 35/ 0 : =3CB7H WR_1WINA3 EQU INITVAR(1) 35/ 0 : =>NOT BLANK IFNB BYTE(1) 35/ 0 : =3CB8H INITVAR := INITVAR+BYTE(1) 35/ 0 : =1H WR_1WINA3_Size EQU BYTE(1) 35/ 0 : =>FALSE ELSE(1) 35/ 0 : INITVAR := INITVAR+BYTE(1) 35/ 0 : WR_1WINA3_Size EQU BYTE(1) 35/ 0 : [35] ENDIF(1) 36/ 0 : (MACRO) SETVAR WR_1WINA2, BYTE ;1(1) 36/ 0 : =3CB8H WR_1WINA2 EQU INITVAR(1) 36/ 0 : =>NOT BLANK IFNB BYTE(1) 36/ 0 : =3CB9H INITVAR := INITVAR+BYTE(1) 36/ 0 : =1H WR_1WINA2_Size EQU BYTE(1) 36/ 0 : =>FALSE ELSE(1) 36/ 0 : INITVAR := INITVAR+BYTE(1) 36/ 0 : WR_1WINA2_Size EQU BYTE(1) 36/ 0 : [36] ENDIF(1) 37/ 0 : (MACRO) SETVAR WR_1WINA1, BYTE ;1(1) 37/ 0 : =3CB9H WR_1WINA1 EQU INITVAR(1) 37/ 0 : =>NOT BLANK IFNB BYTE(1) 37/ 0 : =3CBAH INITVAR := INITVAR+BYTE(1) 37/ 0 : =1H WR_1WINA1_Size EQU BYTE(1) 37/ 0 : =>FALSE ELSE(1) 37/ 0 : INITVAR := INITVAR+BYTE(1) 37/ 0 : WR_1WINA1_Size EQU BYTE(1) 37/ 0 : [37] ENDIF(1) 38/ 0 : (MACRO) SETVAR WR_1WINA0, BYTE ;1(1) 38/ 0 : =3CBAH WR_1WINA0 EQU INITVAR(1) 38/ 0 : =>NOT BLANK IFNB BYTE(1) 38/ 0 : =3CBBH INITVAR := INITVAR+BYTE(1) 38/ 0 : =1H WR_1WINA0_Size EQU BYTE(1) 38/ 0 : =>FALSE ELSE(1) 38/ 0 : INITVAR := INITVAR+BYTE(1) 38/ 0 : WR_1WINA0_Size EQU BYTE(1) 38/ 0 : [38] ENDIF(1) 39/ 0 : (MACRO) SETVAR WR_0WINA3, BYTE ;1(1) 39/ 0 : =3CBBH WR_0WINA3 EQU INITVAR(1) 39/ 0 : =>NOT BLANK IFNB BYTE(1) 39/ 0 : =3CBCH INITVAR := INITVAR+BYTE(1) 39/ 0 : =1H WR_0WINA3_Size EQU BYTE(1) 39/ 0 : =>FALSE ELSE(1) 39/ 0 : INITVAR := INITVAR+BYTE(1) 39/ 0 : WR_0WINA3_Size EQU BYTE(1) 39/ 0 : [39] ENDIF(1) 40/ 0 : (MACRO) SETVAR WR_0WINA2, BYTE ;1(1) 40/ 0 : =3CBCH WR_0WINA2 EQU INITVAR(1) 40/ 0 : =>NOT BLANK IFNB BYTE(1) 40/ 0 : =3CBDH INITVAR := INITVAR+BYTE(1) 40/ 0 : =1H WR_0WINA2_Size EQU BYTE(1) 40/ 0 : =>FALSE ELSE(1) 40/ 0 : INITVAR := INITVAR+BYTE(1) 40/ 0 : WR_0WINA2_Size EQU BYTE(1) 40/ 0 : [40] ENDIF(1) 41/ 0 : (MACRO) SETVAR WR_0WINA1, BYTE ;1(1) 41/ 0 : =3CBDH WR_0WINA1 EQU INITVARAS V1.42 Beta [Bld 146] - source file services.a80(../../svn/pentevo/rom/evodos_vars.a80) - page 39 - 2/23/2020 18:58:44(1) 41/ 0 : =>NOT BLANK IFNB BYTE(1) 41/ 0 : =3CBEH INITVAR := INITVAR+BYTE(1) 41/ 0 : =1H WR_0WINA1_Size EQU BYTE(1) 41/ 0 : =>FALSE ELSE(1) 41/ 0 : INITVAR := INITVAR+BYTE(1) 41/ 0 : WR_0WINA1_Size EQU BYTE(1) 41/ 0 : [41] ENDIF(1) 42/ 0 : (MACRO) SETVAR WR_0WINA0, BYTE ;1(1) 42/ 0 : =3CBEH WR_0WINA0 EQU INITVAR(1) 42/ 0 : =>NOT BLANK IFNB BYTE(1) 42/ 0 : =3CBFH INITVAR := INITVAR+BYTE(1) 42/ 0 : =1H WR_0WINA0_Size EQU BYTE(1) 42/ 0 : =>FALSE ELSE(1) 42/ 0 : INITVAR := INITVAR+BYTE(1) 42/ 0 : WR_0WINA0_Size EQU BYTE(1) 42/ 0 : [42] ENDIF(1) 43/ 0 : (MACRO) SETVAR BB_CPU1, BYTE ;1 БАЙТ ДЛЯ ЗАПИСИ В ОКНО CPU1(1) 43/ 0 : =3CBFH BB_CPU1 EQU INITVAR(1) 43/ 0 : =>NOT BLANK IFNB BYTE(1) 43/ 0 : =3CC0H INITVAR := INITVAR+BYTE(1) 43/ 0 : =1H BB_CPU1_Size EQU BYTE(1) 43/ 0 : =>FALSE ELSE(1) 43/ 0 : INITVAR := INITVAR+BYTE(1) 43/ 0 : BB_CPU1_Size EQU BYTE(1) 43/ 0 : [43] ENDIF(1) 44/ 0 : (MACRO) SETVAR BP_CPU1, BYTE ;1 СТАРШИЙ БАЙТ АДРЕСА ПОРТА CPU1(1) 44/ 0 : =3CC0H BP_CPU1 EQU INITVAR(1) 44/ 0 : =>NOT BLANK IFNB BYTE(1) 44/ 0 : =3CC1H INITVAR := INITVAR+BYTE(1) 44/ 0 : =1H BP_CPU1_Size EQU BYTE(1) 44/ 0 : =>FALSE ELSE(1) 44/ 0 : INITVAR := INITVAR+BYTE(1) 44/ 0 : BP_CPU1_Size EQU BYTE(1) 44/ 0 : [44] ENDIF(1) 45/ 0 : (MACRO) SETVAR BB_CPU2, BYTE ;1 БАЙТ ДЛЯ ЗАПИСИ В ОКНО CPU2(1) 45/ 0 : =3CC1H BB_CPU2 EQU INITVAR(1) 45/ 0 : =>NOT BLANK IFNB BYTE(1) 45/ 0 : =3CC2H INITVAR := INITVAR+BYTE(1) 45/ 0 : =1H BB_CPU2_Size EQU BYTE(1) 45/ 0 : =>FALSE ELSE(1) 45/ 0 : INITVAR := INITVAR+BYTE(1) 45/ 0 : BB_CPU2_Size EQU BYTE(1) 45/ 0 : [45] ENDIF(1) 46/ 0 : (MACRO) SETVAR BP_CPU2, BYTE ;1 СТАРШИЙ БАЙТ АДРЕСА ПОРТА CPU2(1) 46/ 0 : =3CC2H BP_CPU2 EQU INITVAR(1) 46/ 0 : =>NOT BLANK IFNB BYTE(1) 46/ 0 : =3CC3H INITVAR := INITVAR+BYTE(1) 46/ 0 : =1H BP_CPU2_Size EQU BYTE(1) 46/ 0 : =>FALSE ELSE(1) 46/ 0 : INITVAR := INITVAR+BYTE(1) 46/ 0 : BP_CPU2_Size EQU BYTE(1) 46/ 0 : [46] ENDIF(1) 47/ 0 : (MACRO) SETVAR MINT_STACK, WORD ;2(1) 47/ 0 : =3CC3H MINT_STACK EQU INITVAR(1) 47/ 0 : =>NOT BLANK IFNB WORD(1) 47/ 0 : =3CC5H INITVAR := INITVAR+WORD(1) 47/ 0 : =2H MINT_STACK_Size EQU WORD(1) 47/ 0 : =>FALSE ELSE(1) 47/ 0 : INITVAR := INITVAR+BYTE(1) 47/ 0 : MINT_STACK_Size EQU BYTEAS V1.42 Beta [Bld 146] - source file services.a80(../../svn/pentevo/rom/evodos_vars.a80) - page 40 - 2/23/2020 18:58:44(1) 47/ 0 : [47] ENDIF(1) 48/ 0 : (MACRO) SETVAR TEK_ROMPAGE, BYTE ;1(1) 48/ 0 : =3CC5H TEK_ROMPAGE EQU INITVAR(1) 48/ 0 : =>NOT BLANK IFNB BYTE(1) 48/ 0 : =3CC6H INITVAR := INITVAR+BYTE(1) 48/ 0 : =1H TEK_ROMPAGE_Size EQU BYTE(1) 48/ 0 : =>FALSE ELSE(1) 48/ 0 : INITVAR := INITVAR+BYTE(1) 48/ 0 : TEK_ROMPAGE_Size EQU BYTE(1) 48/ 0 : [48] ENDIF(1) 49/ 0 : (MACRO) SETVAR MASK_WRK_DRV, BYTE ;1 номер дисковода в порту FF(1) 49/ 0 : =3CC6H MASK_WRK_DRV EQU INITVAR(1) 49/ 0 : =>NOT BLANK IFNB BYTE(1) 49/ 0 : =3CC7H INITVAR := INITVAR+BYTE(1) 49/ 0 : =1H MASK_WRK_DRV_Size EQU BYTE(1) 49/ 0 : =>FALSE ELSE(1) 49/ 0 : INITVAR := INITVAR+BYTE(1) 49/ 0 : MASK_WRK_DRV_Size EQU BYTE(1) 49/ 0 : [49] ENDIF(1) 50/ 0 : (MACRO) SETVAR MASK_MNT_DRV, BYTE ;1 битовая маска примонтированного диска(1) 50/ 0 : =3CC7H MASK_MNT_DRV EQU INITVAR(1) 50/ 0 : =>NOT BLANK IFNB BYTE(1) 50/ 0 : =3CC8H INITVAR := INITVAR+BYTE(1) 50/ 0 : =1H MASK_MNT_DRV_Size EQU BYTE(1) 50/ 0 : =>FALSE ELSE(1) 50/ 0 : INITVAR := INITVAR+BYTE(1) 50/ 0 : MASK_MNT_DRV_Size EQU BYTE(1) 50/ 0 : [50] ENDIF(1) 51/ 0 : (MACRO) SETVAR VIRT_DRIVE, BYTE ;1 номер виртуального диска из CMOS(1) 51/ 0 : =3CC8H VIRT_DRIVE EQU INITVAR(1) 51/ 0 : =>NOT BLANK IFNB BYTE(1) 51/ 0 : =3CC9H INITVAR := INITVAR+BYTE(1) 51/ 0 : =1H VIRT_DRIVE_Size EQU BYTE(1) 51/ 0 : =>FALSE ELSE(1) 51/ 0 : INITVAR := INITVAR+BYTE(1) 51/ 0 : VIRT_DRIVE_Size EQU BYTE(1) 51/ 0 : [51] ENDIF(1) 52/ 0 : (MACRO) SETVAR REAL_DRIVE, BYTE ;1 номер реального диска из CMOS(1) 52/ 0 : =3CC9H REAL_DRIVE EQU INITVAR(1) 52/ 0 : =>NOT BLANK IFNB BYTE(1) 52/ 0 : =3CCAH INITVAR := INITVAR+BYTE(1) 52/ 0 : =1H REAL_DRIVE_Size EQU BYTE(1) 52/ 0 : =>FALSE ELSE(1) 52/ 0 : INITVAR := INITVAR+BYTE(1) 52/ 0 : REAL_DRIVE_Size EQU BYTE(1) 52/ 0 : [52] ENDIF(1) 53/ 0 : (MACRO) SETVAR COPY_VIRT_BITS, BYTE ;1(1) 53/ 0 : =3CCAH COPY_VIRT_BITS EQU INITVAR(1) 53/ 0 : =>NOT BLANK IFNB BYTE(1) 53/ 0 : =3CCBH INITVAR := INITVAR+BYTE(1) 53/ 0 : =1H COPY_VIRT_BITS_Size EQU BYTE(1) 53/ 0 : =>FALSE ELSE(1) 53/ 0 : INITVAR := INITVAR+BYTE(1) 53/ 0 : COPY_VIRT_BITS_Size EQU BYTE(1) 53/ 0 : [53] ENDIF(1) 54/ 0 : ; SETVAR VIRT_REAL_DRV, BYTE ;1(1) 55/ 0 : (MACRO) SETVAR OLD_PORT_BF, BYTE ;1(1) 55/ 0 : =3CCBH OLD_PORT_BF EQU INITVAR(1) 55/ 0 : =>NOT BLANK IFNB BYTE(1) 55/ 0 : =3CCCH INITVAR := INITVAR+BYTEAS V1.42 Beta [Bld 146] - source file services.a80(../../svn/pentevo/rom/evodos_vars.a80) - page 41 - 2/23/2020 18:58:44(1) 55/ 0 : =1H OLD_PORT_BF_Size EQU BYTE(1) 55/ 0 : =>FALSE ELSE(1) 55/ 0 : INITVAR := INITVAR+BYTE(1) 55/ 0 : OLD_PORT_BF_Size EQU BYTE(1) 55/ 0 : [55] ENDIF(1) 56/ 0 : (MACRO) SETVAR SECTOR_SIZE, BYTE ;1(1) 56/ 0 : =3CCCH SECTOR_SIZE EQU INITVAR(1) 56/ 0 : =>NOT BLANK IFNB BYTE(1) 56/ 0 : =3CCDH INITVAR := INITVAR+BYTE(1) 56/ 0 : =1H SECTOR_SIZE_Size EQU BYTE(1) 56/ 0 : =>FALSE ELSE(1) 56/ 0 : INITVAR := INITVAR+BYTE(1) 56/ 0 : SECTOR_SIZE_Size EQU BYTE(1) 56/ 0 : [56] ENDIF(1) 57/ 0 : (MACRO) SETVAR RDWR_MODE, BYTE ;1(1) 57/ 0 : =3CCDH RDWR_MODE EQU INITVAR(1) 57/ 0 : =>NOT BLANK IFNB BYTE(1) 57/ 0 : =3CCEH INITVAR := INITVAR+BYTE(1) 57/ 0 : =1H RDWR_MODE_Size EQU BYTE(1) 57/ 0 : =>FALSE ELSE(1) 57/ 0 : INITVAR := INITVAR+BYTE(1) 57/ 0 : RDWR_MODE_Size EQU BYTE(1) 57/ 0 : [57] ENDIF(1) 58/ 0 : (MACRO) SETVAR RDWR_PAGE, BYTE ;1(1) 58/ 0 : =3CCEH RDWR_PAGE EQU INITVAR(1) 58/ 0 : =>NOT BLANK IFNB BYTE(1) 58/ 0 : =3CCFH INITVAR := INITVAR+BYTE(1) 58/ 0 : =1H RDWR_PAGE_Size EQU BYTE(1) 58/ 0 : =>FALSE ELSE(1) 58/ 0 : INITVAR := INITVAR+BYTE(1) 58/ 0 : RDWR_PAGE_Size EQU BYTE(1) 58/ 0 : [58] ENDIF(1) 59/ 0 : (MACRO) SETVAR FLAG_RW_BREAK, BYTE ;1(1) 59/ 0 : =3CCFH FLAG_RW_BREAK EQU INITVAR(1) 59/ 0 : =>NOT BLANK IFNB BYTE(1) 59/ 0 : =3CD0H INITVAR := INITVAR+BYTE(1) 59/ 0 : =1H FLAG_RW_BREAK_Size EQU BYTE(1) 59/ 0 : =>FALSE ELSE(1) 59/ 0 : INITVAR := INITVAR+BYTE(1) 59/ 0 : FLAG_RW_BREAK_Size EQU BYTE(1) 59/ 0 : [59] ENDIF(1) 60/ 0 : (MACRO) SETVAR TEMP_SP, WORD ;2(1) 60/ 0 : =3CD0H TEMP_SP EQU INITVAR(1) 60/ 0 : =>NOT BLANK IFNB WORD(1) 60/ 0 : =3CD2H INITVAR := INITVAR+WORD(1) 60/ 0 : =2H TEMP_SP_Size EQU WORD(1) 60/ 0 : =>FALSE ELSE(1) 60/ 0 : INITVAR := INITVAR+BYTE(1) 60/ 0 : TEMP_SP_Size EQU BYTE(1) 60/ 0 : [60] ENDIF(1) 61/ 0 : (MACRO) SETVAR SAVED_RAM, 0X10 ;10(1) 61/ 0 : =3CD2H SAVED_RAM EQU INITVAR(1) 61/ 0 : =>NOT BLANK IFNB 0X10(1) 61/ 0 : =3CE2H INITVAR := INITVAR+0X10(1) 61/ 0 : =10H SAVED_RAM_Size EQU 0X10(1) 61/ 0 : =>FALSE ELSE(1) 61/ 0 : INITVAR := INITVAR+BYTE(1) 61/ 0 : SAVED_RAM_Size EQU BYTE(1) 61/ 0 : [61] ENDIF(1) 62/ 0 : END_VARSAS V1.42 Beta [Bld 146] - source file services.a80(../../svn/pentevo/rom/evodos_vars.a80) - page 42 - 2/23/2020 18:58:44(1) 63/ 0 :8/ 0 :9/ 0 : =6000H DEPKADR EQU 0X600010/ 0 :11/ 0 : ORG 0X000012/ 0 : F3 DI13/ 1 : C3 01 01 JP INITPAGE014/ 4 :15/ 4 : (MACRO) DUPL 0X0008-$,0XFF15/ 4 : DUPL:15/ 4 : =0H $$N EQU (0X0008-$) / 102415/ 4 : =4H $$M EQU (0X0008-$) # 102415/ 4 : REPT $$N15/ 4 : DB 1024 DUP(0XFF)15/ 4 : ENDM15/ 4 : =>TRUE IF $$M <> 015/ 4 : =>NOT BLANK IFB 0XFF15/ 4 : DB $$M DUP(0)15/ 4 : =>TRUE ELSE15/ 4 : FF FF FF FF DB $$M DUP(0XFF)15/ 8 : [15] ENDIF15/ 8 : [15] ENDIF16/ 8 : 00 NOP17/ 9 : C3 F6 3C JP DOS2RST818/ C :19/ C : (MACRO) DUPL ADR_SEL_ROM-$,0XFF19/ C : DUPL:19/ C : =0H $$N EQU (ADR_SEL_ROM-$) / 102419/ C : =8H $$M EQU (ADR_SEL_ROM-$) # 102419/ C : REPT $$N19/ C : DB 1024 DUP(0XFF)19/ C : ENDM19/ C : =>TRUE IF $$M <> 019/ C : =>NOT BLANK IFB 0XFF19/ C : DB $$M DUP(0)19/ C : =>TRUE ELSE19/ C : FF FF FF FF FF FF DB $$M DUP(0XFF)FF FF19/ 14 : [19] ENDIF19/ 14 : [19] ENDIF20/ 14 : ED 79 OUT (C),A21/ 16 : 00 NOP22/ 17 : C9 RET23/ 18 :24/ 18 : (MACRO) DUPL 0X0038-$,0XFF24/ 18 : DUPL:24/ 18 : =0H $$N EQU (0X0038-$) / 102424/ 18 : =20H $$M EQU (0X0038-$) # 102424/ 18 : REPT $$N24/ 18 : DB 1024 DUP(0XFF)24/ 18 : ENDM24/ 18 : =>TRUE IF $$M <> 024/ 18 : =>NOT BLANK IFB 0XFF24/ 18 : DB $$M DUP(0)24/ 18 : =>TRUE ELSE24/ 18 : FF FF FF FF FF FF DB $$M DUP(0XFF)FF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFAS V1.42 Beta [Bld 146] - source file services.a80 - page 43 - 2/23/2020 18:58:44FF FF24/ 38 : [24] ENDIF24/ 38 : [24] ENDIF25/ 38 : FB EI26/ 39 : C9 RET27/ 3A :28/ 3A : (MACRO) DUPL 0X0040-$,0XFF28/ 3A : DUPL:28/ 3A : =0H $$N EQU (0X0040-$) / 102428/ 3A : =6H $$M EQU (0X0040-$) # 102428/ 3A : REPT $$N28/ 3A : DB 1024 DUP(0XFF)28/ 3A : ENDM28/ 3A : =>TRUE IF $$M <> 028/ 3A : =>NOT BLANK IFB 0XFF28/ 3A : DB $$M DUP(0)28/ 3A : =>TRUE ELSE28/ 3A : FF FF FF FF FF FF DB $$M DUP(0XFF)28/ 40 : [28] ENDIF28/ 40 : [28] ENDIF29/ 40 : C3 5E 3D JP SET_MAPPER30/ 43 :31/ 43 : (MACRO) DUPL 0X0066-$,0XFF31/ 43 : DUPL:31/ 43 : =0H $$N EQU (0X0066-$) / 102431/ 43 : =23H $$M EQU (0X0066-$) # 102431/ 43 : REPT $$N31/ 43 : DB 1024 DUP(0XFF)31/ 43 : ENDM31/ 43 : =>TRUE IF $$M <> 031/ 43 : =>NOT BLANK IFB 0XFF31/ 43 : DB $$M DUP(0)31/ 43 : =>TRUE ELSE31/ 43 : FF FF FF FF FF FF DB $$M DUP(0XFF)FF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF31/ 66 : [31] ENDIF31/ 66 : [31] ENDIF32/ 66 : 00 NOP33/ 67 :34/ 67 : (MACRO) DUPL 0X0080-$,0XFF34/ 67 : DUPL:34/ 67 : =0H $$N EQU (0X0080-$) / 102434/ 67 : =19H $$M EQU (0X0080-$) # 102434/ 67 : REPT $$N34/ 67 : DB 1024 DUP(0XFF)34/ 67 : ENDM34/ 67 : =>TRUE IF $$M <> 034/ 67 : =>NOT BLANK IFB 0XFF34/ 67 : DB $$M DUP(0)34/ 67 : =>TRUE ELSE34/ 67 : FF FF FF FF FF FF DB $$M DUP(0XFF)FF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF34/ 80 : [34] ENDIFAS V1.42 Beta [Bld 146] - source file services.a80 - page 44 - 2/23/2020 18:58:4434/ 80 : [34] ENDIF35/ 80 : include ../../svn/pentevo/rom/dec40.a80(1) 1/ 80 : ;Z80 depacker for megalz V4 packed files (C) fyrex^mhm(1) 2/ 80 :(1) 3/ 80 : ; DESCRIPTION:(1) 4/ 80 : ;(1) 5/ 80 : ; Depacker is fully relocatable, not self-modifying,(1) 6/ 80 : ;it's length is 110 bytes starting from DEC40.(1) 7/ 80 : ;Register usage: AF,AF',BC,DE,HL. Must be CALL'ed, return is done by RET.(1) 8/ 80 : ;Provide extra stack location for store 2 bytes (1 word). Depacker does not(1) 9/ 80 : ;disable or enable interrupts, as well as could be interrupted at any time(1) 10/ 80 : ;(no f*cking wicked stack usage :).(1) 11/ 80 :(1) 12/ 80 : ; USAGE:(1) 13/ 80 : ;(1) 14/ 80 : ; - put depacker anywhere you want,(1) 15/ 80 : ; - put starting address of packed block in HL,(1) 16/ 80 : ; - put location where you want data to be depacked in DE,(1) 17/ 80 : ; (much like LDIR command, but without BC)(1) 18/ 80 : ; - make CALL to depacker (DEC40).(1) 19/ 80 : ; - enjoy! ;)(1) 20/ 80 :(1) 21/ 80 : ; PRECAUTIONS:(1) 22/ 80 : ;(1) 23/ 80 : ; Be very careful if packed and depacked blocks coincide somewhere in memory.(1) 24/ 80 : ;Here are some advices:(1) 25/ 80 : ;(1) 26/ 80 : ; 1. put packed block to the highest addresses possible.(1) 27/ 80 : ; Best if last byte of packed block has address #FFFF.(1) 28/ 80 : ;(1) 29/ 80 : ; 2. Leave some gap between ends of packed and depacked block.(1) 30/ 80 : ; For example, last byte of depacked block at #FF00,(1) 31/ 80 : ; last byte of packed block at #FFFF.(1) 32/ 80 : ;(1) 33/ 80 : ; 3. Place nonpackable data to the end of block.(1) 34/ 80 : ;(1) 35/ 80 : ; 4. Always check whether depacking occurs OK and neither corrupts depacked data(1) 36/ 80 : ; nor hangs computer.(1) 37/ 80 : ;(1) 38/ 80 :(1) 39/ 80 : DEC40(1) 40/ 80 : 3E 80 LD A,0X80(1) 41/ 82 : 08 EX AF,AF'(1) 42/ 83 : ED A0 MS LDI(1) 43/ 85 : 01 FF 02 M0 LD BC,0X2FF(1) 44/ 88 : 08 M1 EX AF,AF'(1) 45/ 89 : 87 M1X ADD A,A(1) 46/ 8A : 20 03 JR NZ,M2(1) 47/ 8C : 7E LD A,(HL)(1) 48/ 8D : 23 INC HL(1) 49/ 8E : 17 RLA(1) 50/ 8F : CB 11 M2 RL C(1) 51/ 91 : 30 F6 JR NC,M1X(1) 52/ 93 : 08 EX AF,AF'(1) 53/ 94 : 10 0F DJNZ X2(1) 54/ 96 : 3E 02 LD A,2(1) 55/ 98 : CB 29 SRA C(1) 56/ 9A : 38 18 JR C,N1(1) 57/ 9C : 3C INC A(1) 58/ 9D : 0C INC CAS V1.42 Beta [Bld 146] - source file services.a80(../../svn/pentevo/rom/dec40.a80) - page 45 - 2/23/2020 18:58:44(1) 59/ 9E : 28 0F JR Z,N2(1) 60/ A0 : 01 3F 03 LD BC,0X33F(1) 61/ A3 : 18 E3 JR M1(1) 62/ A5 :(1) 63/ A5 : 10 25 X2 DJNZ X3(1) 64/ A7 : CB 39 SRL C(1) 65/ A9 : 38 D8 JR C,MS(1) 66/ AB : 04 INC B(1) 67/ AC : 18 DA JR M1(1) 68/ AE : X6(1) 69/ AE : 81 ADD A,C(1) 70/ AF : N2(1) 71/ AF : 01 FF 04 LD BC,0X4FF(1) 72/ B2 : 18 D4 JR M1(1) 73/ B4 : N1(1) 74/ B4 : 0C INC C(1) 75/ B5 : 20 28 JR NZ,M4(1) 76/ B7 : 08 EX AF,AF'(1) 77/ B8 : 04 INC B(1) 78/ B9 : CB 19 N5 RR C(1) 79/ BB : D8 RET C(1) 80/ BC : CB 10 RL B(1) 81/ BE : 87 ADD A,A(1) 82/ BF : 20 03 JR NZ,N6(1) 83/ C1 : 7E LD A,(HL)(1) 84/ C2 : 23 INC HL(1) 85/ C3 : 17 RLA(1) 86/ C4 : 30 F3 N6 JR NC,N5(1) 87/ C6 : 08 EX AF,AF'(1) 88/ C7 : 80 ADD A,B(1) 89/ C8 : 06 06 LD B,6(1) 90/ CA : 18 BC JR M1(1) 91/ CC : X3(1) 92/ CC : 10 04 DJNZ X4(1) 93/ CE : 3E 01 LD A,1(1) 94/ D0 : 18 0F JR M3(1) 95/ D2 : 10 08 X4 DJNZ X5(1) 96/ D4 : 0C INC C(1) 97/ D5 : 20 08 JR NZ,M4(1) 98/ D7 : 01 1F 05 LD BC,0X51F(1) 99/ DA : 18 AC JR M1(1) 100/ DC : X5(1) 101/ DC : 10 D0 DJNZ X6(1) 102/ DE : 41 LD B,C(1) 103/ DF : 4E M4 LD C,(HL)(1) 104/ E0 : 23 INC HL(1) 105/ E1 : 05 M3 DEC B(1) 106/ E2 : E5 PUSH HL(1) 107/ E3 : 69 LD L,C(1) 108/ E4 : 60 LD H,B(1) 109/ E5 : 19 ADD HL,DE(1) 110/ E6 : 4F LD C,A(1) 111/ E7 : 06 00 LD B,0(1) 112/ E9 : ED B0 LDIR(1) 113/ EB : E1 POP HL(1) 114/ EC : 18 97 JR M0(1) 115/ EE : END_DEC40(1) 116/ EE :36/ EE :37/ EE : (MACRO) DUPL 0X00FF-$,0XFFAS V1.42 Beta [Bld 146] - source file services.a80 - page 46 - 2/23/2020 18:58:4437/ EE : DUPL:37/ EE : =0H $$N EQU (0X00FF-$) / 102437/ EE : =11H $$M EQU (0X00FF-$) # 102437/ EE : REPT $$N37/ EE : DB 1024 DUP(0XFF)37/ EE : ENDM37/ EE : =>TRUE IF $$M <> 037/ EE : =>NOT BLANK IFB 0XFF37/ EE : DB $$M DUP(0)37/ EE : =>TRUE ELSE37/ EE : FF FF FF FF FF FF DB $$M DUP(0XFF)FF FF FF FF FF FFFF FF FF FF FF37/ FF : [37] ENDIF37/ FF : [37] ENDIF38/ FF : 38 00 DW 0X003839/ 101 :40/ 101 : 31 00 60 INITPAGE0 LD SP,DEPKADR41/ 104 : FD 21 3A 5C LD IY,0X5C3A42/ 108 : 3E 3F LD A,0X3F43/ 10A : ED 47 LD I,A44/ 10C : ED 56 IM 145/ 10E : AF XOR A46/ 10F : D3 FE OUT (0XFE),A47/ 111 : 21 5F 3D LD HL,PAGES_CONF48/ 114 : 01 77 BC LD BC,0XBC7749/ 117 : 3E 02 LD A,250/ 119 : ED 79 OUT (C),A51/ 11B : 11 3F 10 LD DE,0X103F52/ 11E : 01 FD 7F INITPAGE2 LD BC,CONF_12853/ 121 : ED 51 OUT (C),D54/ 123 : 01 F7 00 LD BC,LOW (WIN_A0)55/ 126 : ED A3 INITPAGE1 OUTI56/ 128 : 78 LD A,B57/ 129 : 93 SUB E58/ 12A : 47 LD B,A59/ 12B : 20 F9 JR NZ,INITPAGE160/ 12D : 01 FD 7F LD BC,CONF_12861/ 130 : 7A LD A,D62/ 131 : EE 10 XOR 0X1063/ 133 : 57 LD D,A64/ 134 : 28 E8 JR Z,INITPAGE265/ 136 : 01 77 FF LD BC,0XFF7766/ 139 : 3E AB LD A,0XAB67/ 13B : ED 79 OUT (C),A68/ 13D : 01 F7 77 LD BC,WIN_P169/ 140 : 3E 01 LD A,RAM_EVODOS70/ 142 : ED 79 OUT (C),A71/ 144 : 01 F7 BF LD BC,WIN_A272/ 147 : 3E 03 LD A,ROM_BAS4873/ 149 : ED 79 OUT (C),A74/ 14B : 21 00 80 LD HL,CPU275/ 14E : 11 00 40 LD DE,CPU176/ 151 : 01 00 40 LD BC,0X400077/ 154 : ED B0 LDIR78/ 156 : 01 F7 7F LD BC,WIN_A179/ 159 : 3E 7A LD A,5 ! 0X7F80/ 15B : ED 79 OUT (C),A81/ 15D : 01 F7 BF LD BC,WIN_A282/ 160 : 3E 7D LD A,2 ! 0X7FAS V1.42 Beta [Bld 146] - source file services.a80 - page 47 - 2/23/2020 18:58:4483/ 162 : ED 79 OUT (C),A84/ 164 : 21 00 00 LD HL,085/ 167 : E5 PUSH HL86/ 168 : 21 2F 3D LD HL,0X3D2F87/ 16B : E5 PUSH HL88/ 16C : 21 00 60 LD HL,0X600089/ 16F : E5 PUSH HL90/ 170 : 36 C9 LD (HL),0XC991/ 172 : AF XOR A92/ 173 : D3 BF OUT (0XBF),A93/ 175 : 3E 10 LD A,0X1094/ 177 : C3 42 03 JP START_SELECT95/ 17A :96/ 17A :97/ 17A :98/ 17A :99/ 17A :100/ 17A :101/ 17A :102/ 17A :103/ 17A :104/ 17A :105/ 17A :106/ 17A :107/ 17A :108/ 17A :109/ 17A :110/ 17A :111/ 17A : (MACRO) PEC_ON M_SHADOW_BF111/ 17A : DB BF IN A,(PEVO_CONF)111/ 17C : F6 01 OR M_SHADOW_BF111/ 17E : D3 BF OUT (PEVO_CONF),A112/ 180 : 21 90 01 LD HL,INITPAGE3113/ 183 : E5 PUSH HL114/ 184 : 21 40 00 LD HL,0X40;INST_NMIRST115/ 187 : E5 PUSH HL116/ 188 : 01 F7 3F LD BC,WIN_A0117/ 18B : 3E 07 LD A,ROM_RST81118/ 18D : C3 14 00 JP ADR_SEL_ROM119/ 190 :120/ 190 : (MACRO) INITPAGE3 RST8 _CMOS_RW,_INIT_CMOS120/ 190 : CF RST 8120/ 191 : 55 DB _CMOS_RW120/ 192 : =>NOT BLANK IFNB _INIT_CMOS120/ 192 : 00 DB _INIT_CMOS120/ 193 : [120] ENDIF120/ 193 : =>BLANK IFNB120/ 193 : DB120/ 193 : [120] ENDIF121/ 193 : 21 5F 3D LD HL,PAGES_CONF122/ 196 : 3E EF LD A,0XEF123/ 198 : DB FE IN A,(0XFE)124/ 19A : 0F RRCA ;ПРОВЕРКА НАЖАТИЯ КНОПКИ "0" ПРИ СБРОСЕ125/ 19B : D4 AE 03 CALL NC,RES_REZIDENT126/ 19E : 30 41 JR NC,RSTRAM ;СБРОС В ОСНОВНОЕ ПЗУ127/ 1A0 : 0F RRCA128/ 1A1 : 0F RRCA129/ 1A2 : 0F RRCA130/ 1A3 : 0F RRCA ;ПРОВЕРКА НАЖАТИЯ КНОПКИ "6" ПРИ СБРОСЕ131/ 1A4 : 38 18 JR C,INITPAGE4AS V1.42 Beta [Bld 146] - source file services.a80 - page 48 - 2/23/2020 18:58:44132/ 1A6 : ;ВХОД В ОТЛАДЧИК133/ 1A6 : D9 EXX134/ 1A7 : 01 F7 B7 LD BC,WIN_P2135/ 1AA : AF XOR A136/ 1AB : ED 79 OUT (C),A137/ 1AD : 21 13 80 LD HL,CPU2+DEBUG_ONOFF138/ 1B0 : CB FE SET 7,(HL)139/ 1B2 : D9 EXX140/ 1B3 : DB BF IN A,(PEVO_CONF)141/ 1B5 : F6 08 OR M_NMI_BF142/ 1B7 : D3 BF OUT (PEVO_CONF),A143/ 1B9 : E6 F7 AND M_NMI_BF!0XFF144/ 1BB : D3 BF OUT (PEVO_CONF),A145/ 1BD : 76 HALT146/ 1BE : 01 F7 DE INITPAGE4 LD BC,CMOSD_SET_ADR147/ 1C1 : 3E ED LD A,CMOS_BYTE_00148/ 1C3 : ED 79 OUT (C),A149/ 1C5 : 06 BE LD B,HIGH (CMOSD_RD_WR)150/ 1C7 : ED 78 IN A,(C)151/ 1C9 : E6 03 AND MKOL_MODES152/ 1CB : FE 04 CP KOL_MODES153/ 1CD : 30 12 JR NC,RSTRAM154/ 1CF : A7 AND A155/ 1D0 : 28 0F JR Z,RSTRAM156/ 1D2 : 3D DEC A157/ 1D3 : 21 68 3D LD HL,PAGES_CONFGLUK ;КОНФИГУРИРОВАТЬ ДЛЯ GLUK158/ 1D6 : 28 09 JR Z,RSTRAM159/ 1D8 : 3D DEC A160/ 1D9 : 21 71 3D LD HL,PAGES_PROFROM ;КОНФИГУРИРОВАТЬ ДЛЯ PROFROM161/ 1DC : 28 03 JR Z,RSTRAM162/ 1DE : 21 7A 3D LD HL,PAGES_CUSTOM ;КОНФИГУРИРОВАТЬ ДЛЯ USER ROM163/ 1E1 : 3E EF RSTRAM LD A,0XEF164/ 1E3 : DB FE IN A,(0XFE)165/ 1E5 : 0F RRCA ;ПРОВЕРКА НЕ НАЖАТОСТИ КНОПКИ "0" ПРИ СБРОСЕ166/ 1E6 : 30 F9 JR NC,RSTRAM ;ЕСЛИ НАЖАТА ЖДЕМ ОТПУСКАНИЯ167/ 1E8 : 01 77 BC LD BC,0XBC77168/ 1EB : 3E 02 LD A,2169/ 1ED : ED 79 OUT (C),A170/ 1EF : 11 3F 10 LD DE,0X103F171/ 1F2 : 01 FD 7F LOOP2 LD BC,CONF_128172/ 1F5 : ED 51 OUT (C),D173/ 1F7 : 01 F7 00 LD BC,LOW (WIN_A0)174/ 1FA : ED A3 LOOP1 OUTI175/ 1FC : 78 LD A,B176/ 1FD : 93 SUB E177/ 1FE : 47 LD B,A178/ 1FF : 20 F9 JR NZ,LOOP1179/ 201 : 01 FD 7F LD BC,CONF_128180/ 204 : 7A LD A,D181/ 205 : EE 10 XOR 0X10182/ 207 : 57 LD D,A183/ 208 : 28 E8 JR Z,LOOP2184/ 20A : 7E RSTPAL LD A,(HL)185/ 20B : DD 67 LD IXH,A ;НОМЕР СТРАНИЦЫ ЗАВЕРШЕНИЯ ИНИТА МАНАГЕРА186/ 20D : 11 0F AB LD DE,0XAB0F ;ZX SCREEN MODE, TURBO ON 14MHZ187/ 210 : 01 77 FD LD BC,0XFD77 ;И ДОСТУП К ПАЛИТРЕ188/ 213 : ED 51 OUT (C),D189/ 215 : FB EI ;палитра190/ 216 : 76 HALT191/ 217 : F3 DIAS V1.42 Beta [Bld 146] - source file services.a80 - page 49 - 2/23/2020 18:58:44192/ 218 : 21 83 3D LD HL,TRSTPAL ;+15193/ 21B : 01 77 BD LD BC,0XBD77194/ 21E : ED 51 OUT (C),D ;вкл.PAL195/ 220 : 7B RSTPAL0 LD A,E196/ 221 : CB 5B BIT 3,E197/ 223 : D3 FE OUT (0XFE),A198/ 225 : 28 02 JR Z,$+4199/ 227 : D3 F6 OUT (0XF6),A200/ 229 : 7E LD A,(HL)201/ 22A : 23 INC HL202/ 22B : F6 0C OR %00001100203/ 22D : D3 FF OUT (0XFF),A204/ 22F : 1D DEC E205/ 230 : F2 20 02 JP P,RSTPAL0206/ 233 : 3E AB END_INIT LD A,0XAB207/ 235 : 01 77 FF LD BC,0XFF77208/ 238 : ED 79 OUT (C),A ;выкл.PAL209/ 23A : DD 7C LD A,IXH210/ 23C : 01 00 00 LD BC,0211/ 23F : E6 3C AND 0X3C212/ 241 : 28 28 JR Z,RSTKEYS2 ;RESET TO EVO SERVICE PAGE213/ 243 : FE 14 CP CONF4GLUK&0X3F214/ 245 : 28 07 JR Z,RSTKEYS3 ;RESET TO GLUK SERVICE PAGE215/ 247 : FE 1C CP CONF4CUSTOM&0X3F216/ 249 : 28 03 JR Z,RSTKEYS3 ;RESET TO CUSTOM ROM217/ 24B : C3 39 3D JP LDIR4PROFROM ;RESET TO PROFROM BASIC 128218/ 24E :219/ 24E : C5 RSTKEYS3 PUSH BC220/ 24F : 01 77 BC LD BC,0XBC77221/ 252 : 3E 02 LD A,2222/ 254 : ED 79 OUT (C),A223/ 256 : 01 F7 3F LD BC,WIN_A0224/ 259 : DD 7C LD A,IXH225/ 25B : ED 79 OUT (C),A226/ 25D : (MACRO) PEC_OFF M_SHADOW_BF226/ 25D : DB BF IN A,(PEVO_CONF)226/ 25F : E6 FE AND M_SHADOW_BF!0XFF226/ 261 : D3 BF OUT (PEVO_CONF),A227/ 263 : 01 77 FF LD BC,0XFF77228/ 266 : 3E A3 LD A,0XA3229/ 268 : C3 2D 3D JP 0X3D2D230/ 26B :231/ 26B : 26 ED RSTKEYS2 LD H,CMOS_BYTE_00232/ 26D : (MACRO) RST8 _CMOS_RW,_READ_CMOS232/ 26D : CF RST 8232/ 26E : 55 DB _CMOS_RW232/ 26F : =>NOT BLANK IFNB _READ_CMOS232/ 26F : 01 DB _READ_CMOS232/ 270 : [232] ENDIF232/ 270 : =>BLANK IFNB232/ 270 : DB232/ 270 : [232] ENDIF233/ 270 : E6 FC AND 0XFC ;СБРОС ДЛЯ ОСНОВНОГО ПЗУ234/ 272 : 6F LD L,A235/ 273 : (MACRO) RST8 _CMOS_RW,_WRITE_CMOS ;ПРИНУДИТЕЛЬНО ВЫСТАВЛЕНИЕ В КМОС СБРОСА НА EVO SERVICE235/ 273 : CF RST 8235/ 274 : 55 DB _CMOS_RW235/ 275 : =>NOT BLANK IFNB _WRITE_CMOS235/ 275 : 02 DB _WRITE_CMOS235/ 276 : [235] ENDIFAS V1.42 Beta [Bld 146] - source file services.a80 - page 50 - 2/23/2020 18:58:44235/ 276 : =>BLANK IFNB235/ 276 : DB235/ 276 : [235] ENDIF236/ 276 : =>UNDEFINED IFDEF DOS_FE237/ 276 : LD BC,WIN_A3238/ 276 : LD A,ROM_RST82239/ 276 : OUT (C),A240/ 276 : LD B,HIGH (WIN_P2)241/ 276 : LD A,RAM_EVODOS242/ 276 : OUT (C),A243/ 276 : LD A,(CPU2+COPY_VIRT_BITS)244/ 276 : PUSH AF245/ 276 : CALL UNP_DOS_FE+CPU3 ;РАСПАКОВКА DOS246/ 276 : POP AF247/ 276 : LD (CPU2+COPY_VIRT_BITS),A248/ 276 : =>TRUE ELSE249/ 276 : 01 F7 FF LD BC,WIN_A3250/ 279 : 3E 0A LD A,ROM_ADD_DOS251/ 27B : ED 79 OUT (C),A252/ 27D : 06 B7 LD B,HIGH (WIN_P2)253/ 27F : 3E 01 LD A,RAM_EVODOS254/ 281 : ED 79 OUT (C),A255/ 283 : 3A CA BC LD A,(CPU2+COPY_VIRT_BITS)256/ 286 : 21 00 C0 LD HL,CPU3257/ 289 : 11 00 80 LD DE,CPU2258/ 28C : 01 00 40 LD BC,0X4000259/ 28F : ED B0 LDIR ;ПЕРЕНОС DOS260/ 291 : 32 CA BC LD (CPU2+COPY_VIRT_BITS),A261/ 294 : [236] ENDIF262/ 294 : 01 F7 BF LD BC,WIN_A2263/ 297 : 3E 7D LD A,0X7D264/ 299 : ED 79 OUT (C),A265/ 29B : 06 FF LD B,HIGH (WIN_A3)266/ 29D : 3E FF LD A,0XFF267/ 29F : ED 79 OUT (C),A268/ 2A1 : ;ДЛЯ РЕЗИДЕНТА HONEY COMANDER269/ 2A1 : =>DEFINED IFDEF REZIDENT270/ 2A1 : CD BD 03 CALL CMP_REZIDENT ;ПРОВЕРКА РЕЗИДЕНТА271/ 2A4 : [269] ENDIF272/ 2A4 : 01 FF FE LD BC,0XFEFF273/ 2A7 : 78 RSTKEYS1 LD A,B274/ 2A8 : DB FE IN A,(0XFE)275/ 2AA : REPT 5276/ 2AA : RRA277/ 2AA : JR C,$+3278/ 2AA : INC C279/ 2AA : ENDM276/ 2AA : 1F RRA277/ 2AB : 38 01 JR C,$+3278/ 2AD : 0C INC C276/ 2AE : 1F RRA277/ 2AF : 38 01 JR C,$+3278/ 2B1 : 0C INC C276/ 2B2 : 1F RRA277/ 2B3 : 38 01 JR C,$+3278/ 2B5 : 0C INC C276/ 2B6 : 1F RRA277/ 2B7 : 38 01 JR C,$+3278/ 2B9 : 0C INC C276/ 2BA : 1F RRAAS V1.42 Beta [Bld 146] - source file services.a80 - page 51 - 2/23/2020 18:58:44277/ 2BB : 38 01 JR C,$+3278/ 2BD : 0C INC C280/ 2BE : CB 00 RLC B281/ 2C0 : 38 E5 JR C,RSTKEYS1282/ 2C2 : 0D DEC C283/ 2C3 : F2 24 03 JP P,GTSTKEY ;НАЖАТО БОЛЕЕ 1 КНОПКИ, ПЕРЕХОДИМ К ТЕСТУ КЛАВИАТУРЫ284/ 2C6 : DD 2E 00 LD IXL,0 ;ЗАПУСК НЕОСНОВНОЙ ПРОШИВКИ СЕРВИСА285/ 2C9 : 11 00 00 LD DE,0 ;1 НАЖАТА, ПРОВЕРЯЕМ ЧТО ЭТО286/ 2CC : 01 FD 7F LD BC,CONF_128287/ 2CF : D5 PUSH DE ;АДРЕС ПЕРЕХОДА В ПЗУ ЕСЛИ ВЫБРАНО288/ 2D0 : 3E FE LD A,0XFE289/ 2D2 : DB FE IN A,(0XFE) ;ЧТЕНИЕ НАЖАТОСТИ КНОПКИ "CS"290/ 2D4 : 1F RRA291/ 2D5 : 3E 00 LD A,0292/ 2D7 : D2 42 03 JP NC,START_SELECT ;ПРИ НАЖАТОЙ "CS" ПЕРЕХОДИМ В БЕЙСИК 128293/ 2DA : 3E 7F LD A,0X7F294/ 2DC : DB FE IN A,(0XFE) ;ЧТЕНИЕ НАЖАТОСТИ КНОПКИ "SS"295/ 2DE : 57 LD D,A296/ 2DF : 1F RRA297/ 2E0 : 1F RRA298/ 2E1 : 3E 30 LD A,0X30299/ 2E3 : D2 42 03 JP NC,START_SELECT ;ПРИ НАЖАТОЙ "SS" ПЕРЕХОДИМ В БЕЙСИК 48300/ 2E6 : 7A LD A,D301/ 2E7 : 1F RRA ;ПРОВЕРКА НАЖАТОСТИ КНОПКИ "SPACE"302/ 2E8 : 38 09 JR C,CMPCFG1 ;ПЕРЕХОДИМ ДАЛЕЕ ЕСЛИ НИЧЕГО НЕ НАЖАТО303/ 2EA : 3E 10 LD A,0X10304/ 2EC : 11 2F 3D LD DE,0X3D2F305/ 2EF : D5 PUSH DE306/ 2F0 : C3 42 03 JP START_SELECT ;ПРИ НАЖАТОЙ "SPACE" ПЕРЕХОДИМ В TR-DOS307/ 2F3 :308/ 2F3 : 3E FD CMPCFG1 LD A,0XFD309/ 2F5 : DB FE IN A,(0XFE)310/ 2F7 : E6 04 AND 4 ;НАЖАТО "D" ЗАПУСК ДЕМКИ311/ 2F9 : CA 35 03 JP Z,GDEMO312/ 2FC : DD 2E 01 LD IXL,1 ;ЗАПУСК ОСНОВНОЙ ПРОШИВКИ СЕРВИСА313/ 2FF : 21 00 60 LD HL,DEPKADR ;НИЧЕГО НЕ НАЖАТО, ЗАПУСКАЕМ ОСНОВНУЮ ПРОШИВКУ314/ 302 : F9 LD SP,HL315/ 303 : EB EX DE,HL316/ 304 : 21 14 03 LD HL,CMPCFG3317/ 307 : E5 PUSH HL318/ 308 : 21 01 01 LD HL,0X0101319/ 30B : E5 PUSH HL320/ 30C : 01 F7 3F LD BC,WIN_A0321/ 30F : 3E 05 LD A,ROM_MAINMENU322/ 311 : C3 14 00 JP ADR_SEL_ROM323/ 314 :324/ 314 : AF CMPCFG3 XOR A325/ 315 : DB FE IN A,(0XFE)326/ 317 : 2F CPL327/ 318 : E6 1F AND 0X1F328/ 31A : 3E 10 LD A,0X10329/ 31C : 20 09 JR NZ,CMOSHELP330/ 31E : 21 00 60 LD HL,0X6000331/ 321 : E5 PUSH HL332/ 322 : 18 1E JR START_SELECT333/ 324 :334/ 324 : 37 GTSTKEY SCF335/ 325 : 3E 10 LD A,0X10336/ 327 : 21 03 04 CMOSHELP LD HL,BONUADR ;CMOS setup & HELP337/ 32A : 11 00 60 LD DE,0X6000 ;РАСПАКОВКА И ЗАПУСК CMOS SETUPAS V1.42 Beta [Bld 146] - source file services.a80 - page 52 - 2/23/2020 18:58:44338/ 32D : D5 PUSH DE339/ 32E : F5 PUSH AF340/ 32F : CD 80 00 CALL DEC40341/ 332 : F1 POP AF342/ 333 : 18 0D JR START_SELECT343/ 335 :344/ 335 : 21 F8 5F GDEMO LD HL,0X6000-szdemoini345/ 338 : F9 LD SP,HL346/ 339 : EB EX DE,HL347/ 33A : D5 PUSH DE348/ 33B : 21 31 3D LD HL,DEMO349/ 33E : 06 03 LD B,3350/ 340 : ED B0 LDIR351/ 342 : 08 START_SELECT EX AF,AF' ;СОХРАНЕНИЕ А И ФЛАГОВ352/ 343 : 21 A0 03 LD HL,ERAM_CODE-1353/ 346 : 11 80 5C LD DE,0X5C80354/ 349 : 01 48 00 LD BC,ERAM_CODE-RAM_CODE355/ 34C : ED B8 LDDR356/ 34E : EB EX DE,HL357/ 34F : 23 INC HL358/ 350 : D9 EXX359/ 351 : DD 7D LD A,IXL360/ 353 : A7 AND A361/ 354 : =>TRUE IF 1362/ 354 : 11 02 AB LD DE,0XAB02363/ 357 : =>FALSE ELSE364/ 357 : LD D,0XA3365/ 357 : JR NZ,SET_MODE3366/ 357 : LD H,CMOS_BYTE_00;0XEF367/ 357 : CALL READCMOS368/ 357 : AND M_TURBO14;0X80369/ 357 : REPT 4370/ 357 : RRCA371/ 357 : ENDM372/ 357 : OR D;0XA3373/ 357 : LD D,A ;УСТАНОВКА ДЛЯ 14МГЦ374/ 357 : SET_MODE3 LD H,CMOS_BYTE_01;0X0E375/ 357 : CALL READCMOS376/ 357 : LD E,A ;УСТАНОВКА ДЛЯ 7.0/3.5МГЦ И МОДЕЛЬ ПАМЯТИ377/ 357 : PEC_OFF M_SHADOW_BF378/ 357 : [361] ENDIF379/ 357 : D9 EXX380/ 358 : E9 CMPCFG2 JP (HL)381/ 359 :382/ 359 : D9 RAM_CODE EXX383/ 35A : 01 F7 EF LD BC,PENT_CONF384/ 35D : DD 7D LD A,IXL385/ 35F : A7 AND A386/ 360 : 3E 10 LD A,0X10387/ 362 : 20 16 JR NZ,SET_MODE2388/ 364 : 7B LD A,E389/ 365 : E6 03 AND 3390/ 367 : 2E 00 LD L,0391/ 369 : 28 02 JR Z,SET_MODE1392/ 36B : 2E 04 LD L,4393/ 36D : 7B SET_MODE1 LD A,E394/ 36E : E6 80 AND M_TURBO357;0X80395/ 370 : REPT 3396/ 370 : RRCA397/ 370 : ENDMAS V1.42 Beta [Bld 146] - source file services.a80 - page 53 - 2/23/2020 18:58:44396/ 370 : 0F RRCA396/ 371 : 0F RRCA396/ 372 : 0F RRCA398/ 373 : B5 OR L399/ 374 : CB 5A BIT 3,D400/ 376 : 28 02 JR Z,SET_MODE2401/ 378 : CB E7 SET 4,A402/ 37A : ED 79 SET_MODE2 OUT (C),A403/ 37C : 01 FD 7F LD BC,CONF_128404/ 37F : AF XOR A405/ 380 : ED 79 OUT (C),A ;ВКЛЮЧИЛИ МАППЕР 0406/ 382 : (MACRO) PEC_ON M_SHADOW_BF406/ 382 : DB BF IN A,(PEVO_CONF)406/ 384 : F6 01 OR M_SHADOW_BF406/ 386 : D3 BF OUT (PEVO_CONF),A407/ 388 : 01 F7 3F LD BC,WIN_A0408/ 38B : DD 7C LD A,IXH409/ 38D : ED 79 OUT (C),A ;ЗАПРОГРАММИРОВАЛИ ROM ДЛЯ МАППЕР 0410/ 38F : 01 77 FF LD BC,0XFF77411/ 392 : ED 51 OUT (C),D ;ВЫСТАВИЛИ ТУРБО В ЗАВИСИМОСТИ ОТ УСТАНОВОК412/ 394 : (MACRO) PEC_OFF M_SHADOW_BF412/ 394 : DB BF IN A,(PEVO_CONF)412/ 396 : E6 FE AND M_SHADOW_BF!0XFF412/ 398 : D3 BF OUT (PEVO_CONF),A413/ 39A : 08 EX AF,AF'414/ 39B : 01 FD 7F LD BC,CONF_128415/ 39E : ED 79 OUT (C),A ;ВКЛЮЧИЛИ МАППЕР 1416/ 3A0 : C9 RET417/ 3A1 : ERAM_CODE418/ 3A1 :419/ 3A1 : ;НА ВХОДЕ: H-АДРЕС ЯЧЕЙКИ420/ 3A1 : ;НА ВЫХОДЕ: L,A-ПРОЧИТАННОЕ ЗНАЧЕНИЕ421/ 3A1 : C5 READCMOS PUSH BC422/ 3A2 : 01 F7 DE LD BC,CMOSD_SET_ADR423/ 3A5 : ED 61 OUT (C),H424/ 3A7 : 06 BE LD B,HIGH (CMOSD_RD_WR)425/ 3A9 : ED 68 IN L,(C)426/ 3AB : 7D LD A,L427/ 3AC : C1 POP BC428/ 3AD : C9 RET429/ 3AE :430/ 3AE : ;сброс включенного резидента431/ 3AE : F5 RES_REZIDENT PUSH AF432/ 3AF : E5 PUSH HL433/ 3B0 : 26 EC LD H,CMOS_BYTE_01434/ 3B2 : CD A1 03 CALL READCMOS435/ 3B5 : CB 95 RES B_REZIDENT,L436/ 3B7 : (MACRO) RST8 _CMOS_RW,_WRITE_CMOS436/ 3B7 : CF RST 8436/ 3B8 : 55 DB _CMOS_RW436/ 3B9 : =>NOT BLANK IFNB _WRITE_CMOS436/ 3B9 : 02 DB _WRITE_CMOS436/ 3BA : [436] ENDIF436/ 3BA : =>BLANK IFNB436/ 3BA : DB436/ 3BA : [436] ENDIF437/ 3BA : E1 POP HL438/ 3BB : F1 POP AF439/ 3BC : C9 RET440/ 3BD :AS V1.42 Beta [Bld 146] - source file services.a80 - page 54 - 2/23/2020 18:58:44441/ 3BD : ;ДЛЯ РЕЗИДЕНТА HONEY COMANDER442/ 3BD : =>DEFINED IFDEF REZIDENT443/ 3BD : 26 EC CMP_REZIDENT LD H,CMOS_BYTE_01444/ 3BF : CD A1 03 CALL READCMOS445/ 3C2 : E6 04 AND M_REZIDENT446/ 3C4 : C8 RET Z447/ 3C5 : 01 F7 FF LD BC,WIN_A3448/ 3C8 : 3E 60 LD A,0X1F ! 0X7F449/ 3CA : ED 79 OUT (C),A450/ 3CC : 21 00 C0 LD HL,CPU3451/ 3CF : 7E LD A,(HL)452/ 3D0 : FE C3 CP 0XC3453/ 3D2 : 20 27 JR NZ,.NOTFOUND454/ 3D4 : AF XOR A455/ 3D5 : 86 .NEXTBYTE ADD A,(HL)456/ 3D6 : CE 00 ADC A,0457/ 3D8 : 23 INC HL458/ 3D9 : CB 7C BIT 7,H459/ 3DB : 20 F8 JR NZ,.NEXTBYTE460/ 3DD : 3D DEC A461/ 3DE : 20 1B JR NZ,.NOTFOUND462/ 3E0 : 3E AA LD A,0XAA463/ 3E2 : 2B DEC HL464/ 3E3 : BE CP (HL)465/ 3E4 : 20 15 JR NZ,.NOTFOUND466/ 3E6 : 2F CPL467/ 3E7 : 2B DEC HL468/ 3E8 : BE CP (HL)469/ 3E9 : 20 10 JR NZ,.NOTFOUND470/ 3EB : 01 77 41 LD BC,0X4177471/ 3EE : 3E 06 LD A,6472/ 3F0 : ED 79 OUT (C),A473/ 3F2 : (MACRO) PEC_OFF M_SHADOW_BF473/ 3F2 : DB BF IN A,(PEVO_CONF)473/ 3F4 : E6 FE AND M_SHADOW_BF!0XFF473/ 3F6 : D3 BF OUT (PEVO_CONF),A474/ 3F8 : C3 00 C0 JP CPU3475/ 3FB :476/ 3FB : 01 F7 FF .NOTFOUND LD BC,WIN_A3477/ 3FE : 3E FF LD A,0XFF478/ 400 : ED 79 OUT (C),A479/ 402 : C9 RET480/ 403 : [442] ENDIF481/ 403 :482/ 403 : BONUADR ;binclude ../../mainmenu/cmosset_pack.rom483/ 403 :484/ 403 : (MACRO) DUPL ADR_RST8END-$,0XFF484/ 403 : DUPL:484/ 403 : =EH $$N EQU (ADR_RST8END-$) / 1024484/ 403 : =E5H $$M EQU (ADR_RST8END-$) # 1024484/ 403 : REPT $$N484/ 403 : DB 1024 DUP(0XFF)484/ 403 : ENDM484/ 403 : FF FF FF FF FF FF DB 1024 DUP(0XFF)FF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFAS V1.42 Beta [Bld 146] - source file services.a80 - page 55 - 2/23/2020 18:58:44FF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFAS V1.42 Beta [Bld 146] - source file services.a80 - page 56 - 2/23/2020 18:58:44FF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFAS V1.42 Beta [Bld 146] - source file services.a80 - page 57 - 2/23/2020 18:58:44FF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF484/ 803 : FF FF FF FF FF FF DB 1024 DUP(0XFF)FF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFAS V1.42 Beta [Bld 146] - source file services.a80 - page 58 - 2/23/2020 18:58:44FF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFAS V1.42 Beta [Bld 146] - source file services.a80 - page 59 - 2/23/2020 18:58:44FF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFAS V1.42 Beta [Bld 146] - source file services.a80 - page 60 - 2/23/2020 18:58:44FF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF484/ C03 : FF FF FF FF FF FF DB 1024 DUP(0XFF)FF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFAS V1.42 Beta [Bld 146] - source file services.a80 - page 61 - 2/23/2020 18:58:44FF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFAS V1.42 Beta [Bld 146] - source file services.a80 - page 62 - 2/23/2020 18:58:44FF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFAS V1.42 Beta [Bld 146] - source file services.a80 - page 63 - 2/23/2020 18:58:44FF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF484/ 1003 : FF FF FF FF FF FF DB 1024 DUP(0XFF)FF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFAS V1.42 Beta [Bld 146] - source file services.a80 - page 64 - 2/23/2020 18:58:44FF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFAS V1.42 Beta [Bld 146] - source file services.a80 - page 65 - 2/23/2020 18:58:44FF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFAS V1.42 Beta [Bld 146] - source file services.a80 - page 66 - 2/23/2020 18:58:44FF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF484/ 1403 : FF FF FF FF FF FF DB 1024 DUP(0XFF)FF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFAS V1.42 Beta [Bld 146] - source file services.a80 - page 67 - 2/23/2020 18:58:44FF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFAS V1.42 Beta [Bld 146] - source file services.a80 - page 68 - 2/23/2020 18:58:44FF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFAS V1.42 Beta [Bld 146] - source file services.a80 - page 69 - 2/23/2020 18:58:44FF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF484/ 1803 : FF FF FF FF FF FF DB 1024 DUP(0XFF)FF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFAS V1.42 Beta [Bld 146] - source file services.a80 - page 70 - 2/23/2020 18:58:44FF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFAS V1.42 Beta [Bld 146] - source file services.a80 - page 71 - 2/23/2020 18:58:44FF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF484/ 1C03 : FF FF FF FF FF FF DB 1024 DUP(0XFF)AS V1.42 Beta [Bld 146] - source file services.a80 - page 72 - 2/23/2020 18:58:44FF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFAS V1.42 Beta [Bld 146] - source file services.a80 - page 73 - 2/23/2020 18:58:44FF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFAS V1.42 Beta [Bld 146] - source file services.a80 - page 74 - 2/23/2020 18:58:44FF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF484/ 2003 : FF FF FF FF FF FF DB 1024 DUP(0XFF)FF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFAS V1.42 Beta [Bld 146] - source file services.a80 - page 75 - 2/23/2020 18:58:44FF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFAS V1.42 Beta [Bld 146] - source file services.a80 - page 76 - 2/23/2020 18:58:44FF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFAS V1.42 Beta [Bld 146] - source file services.a80 - page 77 - 2/23/2020 18:58:44FF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF484/ 2403 : FF FF FF FF FF FF DB 1024 DUP(0XFF)FF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFAS V1.42 Beta [Bld 146] - source file services.a80 - page 78 - 2/23/2020 18:58:44FF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFAS V1.42 Beta [Bld 146] - source file services.a80 - page 79 - 2/23/2020 18:58:44FF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFAS V1.42 Beta [Bld 146] - source file services.a80 - page 80 - 2/23/2020 18:58:44FF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF484/ 2803 : FF FF FF FF FF FF DB 1024 DUP(0XFF)FF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFAS V1.42 Beta [Bld 146] - source file services.a80 - page 81 - 2/23/2020 18:58:44FF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFAS V1.42 Beta [Bld 146] - source file services.a80 - page 82 - 2/23/2020 18:58:44FF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFAS V1.42 Beta [Bld 146] - source file services.a80 - page 83 - 2/23/2020 18:58:44FF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF484/ 2C03 : FF FF FF FF FF FF DB 1024 DUP(0XFF)FF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFAS V1.42 Beta [Bld 146] - source file services.a80 - page 84 - 2/23/2020 18:58:44FF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFAS V1.42 Beta [Bld 146] - source file services.a80 - page 85 - 2/23/2020 18:58:44FF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFAS V1.42 Beta [Bld 146] - source file services.a80 - page 86 - 2/23/2020 18:58:44FF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF484/ 3003 : FF FF FF FF FF FF DB 1024 DUP(0XFF)FF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFAS V1.42 Beta [Bld 146] - source file services.a80 - page 87 - 2/23/2020 18:58:44FF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFAS V1.42 Beta [Bld 146] - source file services.a80 - page 88 - 2/23/2020 18:58:44FF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFAS V1.42 Beta [Bld 146] - source file services.a80 - page 89 - 2/23/2020 18:58:44FF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF484/ 3403 : FF FF FF FF FF FF DB 1024 DUP(0XFF)FF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFAS V1.42 Beta [Bld 146] - source file services.a80 - page 90 - 2/23/2020 18:58:44FF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFAS V1.42 Beta [Bld 146] - source file services.a80 - page 91 - 2/23/2020 18:58:44FF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF484/ 3803 : FF FF FF FF FF FF DB 1024 DUP(0XFF)FF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFAS V1.42 Beta [Bld 146] - source file services.a80 - page 92 - 2/23/2020 18:58:44FF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFAS V1.42 Beta [Bld 146] - source file services.a80 - page 93 - 2/23/2020 18:58:44FF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFAS V1.42 Beta [Bld 146] - source file services.a80 - page 94 - 2/23/2020 18:58:44FF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF484/ 3C03 : =>TRUE IF $$M <> 0484/ 3C03 : =>NOT BLANK IFB 0XFF484/ 3C03 : DB $$M DUP(0)484/ 3C03 : =>TRUE ELSE484/ 3C03 : FF FF FF FF FF FF DB $$M DUP(0XFF)FF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFAS V1.42 Beta [Bld 146] - source file services.a80 - page 95 - 2/23/2020 18:58:44FF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF484/ 3CE8 : [484] ENDIF484/ 3CE8 : [484] ENDIF485/ 3CE8 : 7D EDOS2RST8 LD A,L486/ 3CE9 : D3 BF OUT (PEVO_CONF),A487/ 3CEB : D1 POP DE488/ 3CEC : E1 POP HL489/ 3CED : F1 POP AF490/ 3CEE : E2 F2 3C JP PO,EDOS2RST01491/ 3CF1 : FB EI492/ 3CF2 : C1 EDOS2RST01 POP BC493/ 3CF3 : F1 POP AF494/ 3CF4 : E3 EX (SP),HL495/ 3CF5 : C9 RET496/ 3CF6 :497/ 3CF6 : E3 DOS2RST8 EX (SP),HL ;HL498/ 3CF7 : F5 PUSH AF ;AF499/ 3CF8 : C5 PUSH BC ;BC500/ 3CF9 : ED 5F LD A,R501/ 3CFB : EA 00 3D JP PE,DOS2RST8_01502/ 3CFE : ED 5F LD A,R503/ 3D00 : F3 DOS2RST8_01 DI504/ 3D01 : F5 PUSH AF ;RF505/ 3D02 : E5 PUSH HL ;ADR_RET506/ 3D03 : D5 PUSH DE ;DE507/ 3D04 : DB BF IN A,(PEVO_CONF)508/ 3D06 : 6F LD L,A509/ 3D07 : F6 01 OR M_SHADOW_BF510/ 3D09 : D3 BF OUT (PEVO_CONF),A511/ 3D0B : 01 BE 00 LD BC,RD_0WINA0512/ 3D0E : ED 60 IN H,(C)AS V1.42 Beta [Bld 146] - source file services.a80 - page 96 - 2/23/2020 18:58:44513/ 3D10 : 06 09 LD B,HIGH (RD_DOS7FFD)514/ 3D12 : ED 58 IN E,(C)515/ 3D14 : CB A3 RES 4,E516/ 3D16 : 05 DEC B517/ 3D17 : ED 50 IN D,(C)518/ 3D19 : 01 F7 37 LD BC,WIN_P0519/ 3D1C : AF XOR A520/ 3D1D : C3 14 00 JP ADR_SEL_ROM521/ 3D20 :522/ 3D20 : (MACRO) DUPL 0X3D2D-$,0XFF522/ 3D20 : DUPL:522/ 3D20 : =0H $$N EQU (0X3D2D-$) / 1024522/ 3D20 : =DH $$M EQU (0X3D2D-$) # 1024522/ 3D20 : REPT $$N522/ 3D20 : DB 1024 DUP(0XFF)522/ 3D20 : ENDM522/ 3D20 : =>TRUE IF $$M <> 0522/ 3D20 : =>NOT BLANK IFB 0XFF522/ 3D20 : DB $$M DUP(0)522/ 3D20 : =>TRUE ELSE522/ 3D20 : FF FF FF FF FF FF DB $$M DUP(0XFF)FF FF FF FF FF FFFF522/ 3D2D : [522] ENDIF522/ 3D2D : [522] ENDIF523/ 3D2D : ED 79 OUT (C),A524/ 3D2F : 00 NOP525/ 3D30 : C9 RET526/ 3D31 :527/ 3D31 : 01 FD 7F DEMO LD BC,CONF_128528/ 3D34 : 3E 10 LD A,0X10529/ 3D36 : ED 79 OUT (C),A530/ 3D38 : FB EI531/ 3D39 : =8H szdemoini EQU $-DEMO532/ 3D39 :533/ 3D39 : ;binclude ../../mainmenu/src/grass.bin534/ 3D39 :535/ 3D39 : 21 5B 3D LDIR4PROFROM LD HL,JMP2PROFROM536/ 3D3C : 11 5B BD LD DE,JMP2PROFROM+0X8000537/ 3D3F : 01 03 00 LD BC,EJMP2PROFROM-JMP2PROFROM538/ 3D42 : ED B0 LDIR539/ 3D44 : C5 PUSH BC540/ 3D45 : 01 77 BC LD BC,0XBC77541/ 3D48 : 3E 03 LD A,3542/ 3D4A : ED 79 OUT (C),A543/ 3D4C : DD 7C LD A,IXH544/ 3D4E : 01 F7 3F LD BC,WIN_A0545/ 3D51 : ED 79 OUT (C),A546/ 3D53 : 01 77 FF LD BC,0XFF77547/ 3D56 : 3E A3 LD A,0XA3548/ 3D58 : C3 5B BD JP JMP2PROFROM+0X8000549/ 3D5B :550/ 3D5B : ED 79 JMP2PROFROM OUT (C),A551/ 3D5D : C9 RET552/ 3D5E : EJMP2PROFROM553/ 3D5E :554/ 3D5E : SET_MAPPER555/ 3D5E : C9 RET556/ 3D5F :557/ 3D5F : ;1000 0001 81 0 BASIC 128 |EVOAS V1.42 Beta [Bld 146] - source file services.a80 - page 97 - 2/23/2020 18:58:44558/ 3D5F : ;1000 0011 83 0 BASIC 48 |SERVICE559/ 3D5F :560/ 3D5F : ;1000 0101 85 1 BASIC 128 |ADDONS561/ 3D5F : ;1000 0111 87 1 BASIC 48 |RST8 SERVICE562/ 3D5F :563/ 3D5F : ;1000 1001 89 2 BASIC 128 |RESERVED564/ 3D5F : ;1000 1110 8B 2 BASIC 48 |EVODOS EMUL 3D2F565/ 3D5F :566/ 3D5F : ;1000 1101 8D 3 BASIC 128 |PROFROM 1567/ 3D5F : ;1000 1111 8F 3 BASIC 48 |PROFROM 1568/ 3D5F :569/ 3D5F : ;1001 0001 91 4 BASIC 128 |PROFROM 0570/ 3D5F : ;1001 0011 93 4 BASIC 48 |PROFROM 0571/ 3D5F :572/ 3D5F : ;1001 0101 95 5 BASIC 128 |GLUK573/ 3D5F : ;1001 0111 97 5 BASIC 48 |GLUK574/ 3D5F :575/ 3D5F : ;1001 1001 99 6 BASIC 128 |FREE576/ 3D5F : ;1001 1011 9B 6 BASIC 48 |FREE577/ 3D5F :578/ 3D5F : ;1001 1101 9D 7 BASIC 128 |CUSTOM579/ 3D5F : ;1001 1111 9F 7 BASIC 48 |CUSTOM580/ 3D5F :581/ 3D5F : ;ОСНОВНАЯ КОНФИГУРАЦИЯ ПО СБРОСУ, ИЗМЕНЯТЬ КАТЕГОРИЧЕСКИ НЕ РЕКОМЕНДУЕТСЯ582/ 3D5F : FF 7D 7A 83 PAGES_CONF DB 0XFF,0X7D,0X7A,0X83583/ 3D63 : FF 7D 7A 00 81 DB 0XFF,0X7D,0X7A,0X00,0X81584/ 3D68 :585/ 3D68 : ;КОНФИГУРАЦИЯ ДЛЯ GLUK586/ 3D68 : FF 7D 7A 97 PAGES_CONFGLUK DB 0XFF,0X7D,0X7A,CONF4GLUK+3587/ 3D6C : FF 7D 7A 00 95 DB 0XFF,0X7D,0X7A,0X00,CONF4GLUK+1588/ 3D71 :589/ 3D71 : ;КОНФИГУРАЦИЯ ДЛЯ EVO PROFROM590/ 3D71 : FF 7D 7A 93 PAGES_PROFROM DB 0XFF,0X7D,0X7A,CONF4PROF+3591/ 3D75 : FF 7D 7A 00 91 DB 0XFF,0X7D,0X7A,0X00,CONF4PROF+1592/ 3D7A :593/ 3D7A : ;КОНФИГУРАЦИЯ ДЛЯ ОТДЕЛЬНО ПРОШИВАЕМОЙ 64К ПРОШИВКИ (USER ROM)594/ 3D7A : FF 7D 7A 9F PAGES_CUSTOM DB 0XFF,0X7D,0X7A,CONF4CUSTOM+3595/ 3D7E : FF 7D 7A 00 9D DB 0XFF,0X7D,0X7A,0X00,CONF4CUSTOM+1596/ 3D83 :597/ 3D83 : ;ПАЛИТРА ДЛЯ SPECTRUM РЕЖИМА598/ 3D83 : TRSTPAL599/ 3D83 : 00 DB (R_H | R_L | G_H | G_L | B_H | B_L) ! 0xF3 ;00600/ 3D84 : 21 DB (R_H | R_L | G_H | G_L ) ! 0xF3 ;21601/ 3D85 : 42 DB ( G_H | G_L | B_H | B_L) ! 0xF3 ;42602/ 3D86 : 63 DB ( G_H | G_L ) ! 0xF3 ;63603/ 3D87 : 90 DB (R_H | R_L | B_H | B_L) ! 0xF3 ;90604/ 3D88 : B1 DB (R_H | R_L ) ! 0xF3 ;B1605/ 3D89 : D2 DB ( B_H | B_L) ! 0xF3 ;D2606/ 3D8A : F3 DB BLACK ! 0xF3 ;F3607/ 3D8B : E0 DB (R_H | G_H | B_H ) ! 0xF3 ;E0608/ 3D8C : E1 DB (R_H | G_H ) ! 0xF3 ;E1609/ 3D8D : E2 DB ( G_H | B_H ) ! 0xF3 ;E2610/ 3D8E : E3 DB ( G_H ) ! 0xF3 ;E3611/ 3D8F : F0 DB (R_H | B_H ) ! 0xF3 ;F0612/ 3D90 : F1 DB (R_H) ! 0xF3 ;F1613/ 3D91 : F2 DB ( B_H ) ! 0xF3 ;F2614/ 3D92 : F3 DB BLACK ! 0xF3 ;F3615/ 3D93 :616/ 3D93 : (MACRO) DUPL 0X3FF8-$,0XFF616/ 3D93 : DUPL:AS V1.42 Beta [Bld 146] - source file services.a80 - page 98 - 2/23/2020 18:58:44616/ 3D93 : =0H $$N EQU (0X3FF8-$) / 1024616/ 3D93 : =265H $$M EQU (0X3FF8-$) # 1024616/ 3D93 : REPT $$N616/ 3D93 : DB 1024 DUP(0XFF)616/ 3D93 : ENDM616/ 3D93 : =>TRUE IF $$M <> 0616/ 3D93 : =>NOT BLANK IFB 0XFF616/ 3D93 : DB $$M DUP(0)616/ 3D93 : =>TRUE ELSE616/ 3D93 : FF FF FF FF FF FF DB $$M DUP(0XFF)FF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFAS V1.42 Beta [Bld 146] - source file services.a80 - page 99 - 2/23/2020 18:58:44FF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF FF FF FF FF FFFF616/ 3FF8 : [616] ENDIF616/ 3FF8 : [616] ENDIF617/ 3FF8 : 48 45 47 4C 55 4B DB "HEGLUK"618/ 3FFE : 57 A8 DW DATA_VERS619/ 4000 :AS V1.42 Beta [Bld 146] - source file services.a80 - page 100 - 2/23/2020 18:58:44symbol table (* = unused):------------------------*ADDR_RET : 3CA7 - | *ADDR_RET_Size : 2 - |*ADRBRK_EMUTAP : 569 - | ADRTEKV : BDF4 - |*ADR_PERFECT : 36 - | ADR_RST8END : 3CE8 - |ADR_SEL_ROM : 14 - | *ALATTR : 21C0 - |*ALSYM : 1C0 - | *ARATTR : 1C1 - |*ARCHITECTURE : i386-unknown-win32 - | *ARSYM : 21C0 - |*BAUD110 : 417 - | *BAUD115200 : 1 - |*BAUD1200 : 60 - | *BAUD150 : 300 - |*BAUD19200 : 6 - | *BAUD2400 : 30 - |*BAUD300 : 180 - | *BAUD38400 : 3 - |*BAUD4800 : 18 - | *BAUD57600 : 2 - |*BAUD600 : C0 - | *BAUD9600 : C - |*BB_CPU1 : 3CBF - | *BB_CPU1_Size : 1 - |*BB_CPU2 : 3CC1 - | *BB_CPU2_Size : 1 - |*BIGENDIAN : 0 - | BLACK : 0 - |*BLUE : 1 - | BONUADR : 403 C |*BOOTDEVICE : 3 - | *BP_CPU1 : 3CC0 - |*BP_CPU1_Size : 1 - | *BP_CPU2 : 3CC2 - |*BP_CPU2_Size : 1 - | *BRANCHEXT : 0 - |*BREAK_HIGH_RD : 11BE - | *BREAK_HIGH_WR : 1BD - |*BREAK_LOW_RD : 10BE - | *BREAK_LOW_WR : BD - |*BR_INK : 40 - | *BR_PAPER : 80 - |*BUFF_SECT : 3CA5 - | *BUFF_SECT_Size : 2 - |BUF_256 : B300 - | BUF_512 : BE00 - |BUF_ALLVOL : 0 - | BUF_DIRCEP : 3400 - |BUF_LEVELDIR : B000 - | BUF_PATH : B200 - |BUF_PATHMOUNT : 3000 - | BUF_TABLVOL : BD00 - |BUF_TDIRCLS : B400 - | BUF_TEKVOL : BC00 - |*BUF_TEMPSEC : 3500 - | *BUF_WINPATH : AC00 - |*BUILD_DEBUG : 0 - | BYTE : 1 - |*B_ACCESSHDDM : 5 - | *B_ACCESSHDDS : 4 - |*B_ACCESSSDG : 6 - | *B_ACCESSZCSD : 7 - |*B_AUTOBOOT : 7 - | *B_AUTOMOUNT : 5 - |*B_AUTO_TAPE : 2 - | *B_BREAK_BF : 4 - |*B_CLOCK_VIEW : 4 - | *B_DBG_ACTIV : 7 - |*B_EMUL_TAPE : 6 - | *B_EMUVG_BF : 5 - |*B_FLASH_BF : 1 - | *B_FONT_BF : 2 - |B_H : 1 - | *B_KILL_REZIDENT : 7 - |B_L : 20 - | *B_MOUSE_L_KEY : 0 - |*B_MOUSE_M_KEY : 2 - | *B_MOUSE_R_KEY : 1 - |*B_NMI_BF : 3 - | *B_PENT_CMOS : 7 - |*B_PENT_TURBO : 4 - | *B_PRINTER_AY : 5 - |*B_RELOAD_FONT : 4 - | B_REZIDENT : 2 - |*B_RST8_BF : 6 - | *B_SD_NGS_ONOFF : 6 - |*B_SHADOW_BF : 0 - | *B_SOUNDKEYS : 3 - |*B_STEP_DBG : 5 - | *B_TRACE_DBG : 6 - |*B_TURBO14 : 7 - | *B_TURBO357 : 7 - |*B_TYPE_FONT : 3 - | *CASESENSITIVE : 1 - |CMOSD_RD_WR : BEF7 - | CMOSD_SET_ADR : DEF7 - |CMOSHELP : 327 C | CMOS_BYTE_00 : ED - |CMOS_BYTE_01 : EC - | *CMOS_BYTE_02 : E9 - |*CMOS_BYTE_03 : E8 - | *CMOS_RD_WR : BFF7 - |*CMOS_SET_ADR : DFF7 - | CMPCFG1 : 2F3 C |*CMPCFG2 : 358 C | CMPCFG3 : 314 C |CMP_REZIDENT : 3BD C | CMP_REZIDENT.NEXTBYTE : 3D5 C |CMP_REZIDENT.NOTFOUND : 3FB C | CONF4CUSTOM : 9C - |CONF4GLUK : 94 - | CONF4PROF : 90 - |AS V1.42 Beta [Bld 146] - source file services.a80 - page 101 - 2/23/2020 18:58:44CONF_128 : 7FFD - | *CONSTPI : 3.141592653589793 - |*CONTINUE_MAGIC : 34 - | *CONT_RST8 : 2C - |COPY_VIRT_BITS : 3CCA - | *COPY_VIRT_BITS_Size : 1 - |*CPU0 : 0 - | CPU1 : 4000 - |CPU2 : 8000 - | CPU3 : C000 - |*CRCCMOSHIGH : EF - | *CRCCMOSLOW : EE - |*CRC_DRVS : BDFE - | *CYAN : 5 - |DATA_VERS : A857 - | DATE : 2/23/2020 - |DDATE : 17 - | DEBUG_ONOFF : 13 - |DEC40 : 80 C | DEMO : 3D31 C |DEPKADR : 6000 - | DEVICES : BDE0 - |DOS2RST8 : 3CF6 C | DOS2RST8_01 : 3D00 C |*DOS_STEK : 3C9C - | *DOS_STEK_Size : 2 - |*DWORD : 4 - | EDOS2RST01 : 3CF2 C |*EDOS2RST8 : 3CE8 C | *EI_RET : 3E - |EJMP2PROFROM : 3D5E C | *END_DEC40 : EE C |*END_INIT : 233 C | *END_VARS : 0 C |ERAM_CODE : 3A1 C | *EXIT_PORT : BE - |*FALSE : 0 - | *FAT_DATE : 5057 - |*FAT_TIME : 9756 - | *FDD_EMU_PORT : 13BD - |*FDI_BLOCK_SMESH : 41FF - | *FDI_BYTE_SMESH : 41FE - |*FDI_IMAGE1SECT : 4400 - | *FDI_PAGE_START : 40FF - |*FDI_TABLE_CYL : 4000 - | *FLAGS_DRV : BDF8 - |*FLAG_RW_BREAK : 3CCF - | *FLAG_RW_BREAK_Size : 1 - |*FULLPMMU : 1 - | GDEMO : 335 C |GO_DEV : BDF0 - | *GREEN : 4 - |GTSTKEY : 324 C | G_H : 10 - |G_L : 80 - | *HAS64 : 1 - |*HASDSP : 0 - | *HASFPU : 0 - |*HASPMMU : 0 - | *HDD_TIMEOUT : EA - |HHOUR : 12 - | *ICALL2PAGE : 8000 - |*INEXTMODE : 0 - | INITPAGE0 : 101 C |INITPAGE1 : 126 C | INITPAGE2 : 11E C |INITPAGE3 : 190 C | INITPAGE4 : 1BE C |INITVAR : 3CE2 - | *INLWORDMODE : 0 - |*INMAXMODE : 0 - | *INSRCMODE : 0 - |*INSUPMODE : 0 - | *IREG_D : 3C99 - |*IREG_D_Size : 1 - | *IREG_E : 3C98 - |*IREG_E_Size : 1 - | *IREG_H : 3C9B - |*IREG_H_Size : 1 - | *IREG_L : 3C9A - |*IREG_L_Size : 1 - | JMP2PROFROM : 3D5B C |*JUMP : 3 - | JUMP_SIZE : 3 - |KOLDVOL : BDF2 - | KOL_MODES : 4 - |*LATTR : 31C0 - | LDIR4PROFROM : 3D39 C |*LISTON : 1 - | LOOP1 : 1FA C |LOOP2 : 1F2 C | *LSYM : 1C0 - |M0 : 85 C | M1 : 88 C |M1X : 89 C | M2 : 8F C |M3 : E1 C | M4 : DF C |M899 : 4 - | M900 : 8 - |M901 : 20 - | M902 : 6 - |M903 : 23 - | M904 : 19 - |M923 : 11 - | M955 : E5 - |M960 : D - | M972 : 265 - |*MACEXP : 7 - | *MAGENTA : 3 - |*MASK_MNT_DRV : 3CC7 - | *MASK_MNT_DRV_Size : 1 - |*MASK_WRK_DRV : 3CC6 - | *MASK_WRK_DRV_Size : 1 - |*MEMORY_128 : 30 - | *MEMORY_48 : 20 - |*MEMORY_ALL : 10 - | *MINT_STACK : 3CC3 - |*MINT_STACK_Size : 2 - | MKOL_MODES : 3 - |AS V1.42 Beta [Bld 146] - source file services.a80 - page 102 - 2/23/2020 18:58:44MMINUTE : 3A - | MMOUNTH : 2 - |*MOMCPU : 80DC - | *MOMCPUNAME : Z80UNDOC - |MOUNT_CLS : 1000 - | MOUNT_DRIVES : B100 - |*MOUSE_KEYS : FADF - | *MOUSE_X : FBDF - |*MOUSE_Y : FFDF - | MS : 83 C |*M_ACCESSHDDM : 20 - | *M_ACCESSHDDS : 10 - |*M_ACCESSSDG : 40 - | *M_ACCESSZCSD : 80 - |*M_AUTOBOOT : 80 - | *M_AUTOMOUNT : 20 - |*M_AUTO_TAPE : 4 - | *M_BREAK_BF : 10 - |*M_CLOCK_VIEW : 10 - | *M_DBG_ACTIV : 80 - |*M_EMUL_TAPE : 40 - | *M_EMUVG_BF : 20 - |*M_FLASH_BF : 2 - | *M_FONT_BF : 4 - |*M_KILL_REZIDENT : 80 - | *M_MOUSE_L_KEY : 1 - |*M_MOUSE_M_KEY : 4 - | *M_MOUSE_R_KEY : 2 - |M_NMI_BF : 8 - | *M_PENT_CMOS : 80 - |*M_PENT_TURBO : 10 - | *M_PRINTER_AY : 20 - |*M_RELOAD_FONT : 10 - | M_REZIDENT : 4 - |*M_RST8_BF : 40 - | *M_SD_NGS_ONOFF : 40 - |M_SHADOW_BF : 1 - | *M_SOUNDKEYS : 8 - |*M_STEP_DBG : 20 - | *M_TRACE_DBG : 40 - |*M_TURBO14 : 80 - | M_TURBO357 : 80 - |*M_TYPE_FONT : 8 - | N1 : B4 C |N2 : AF C | N5 : B9 C |N6 : C4 C | N899 : 0 - |N900 : 0 - | N901 : 0 - |N902 : 0 - | N903 : 0 - |N904 : 0 - | N923 : 0 - |N955 : E - | N960 : 0 - |N972 : 0 - | *NESTMAX : 100 - |NUM_APPMULTI : 2 - | NUM_EGA : 0 - |*NUM_LINE : 13BE - | NUM_TXTATM : 6 - |NUM_TXTSCR : 7 - | NUM_ZXSCR : 3 - |OFFSET_BUFSYM : 800 - | OFFSET_FNTSAVE : 0 - |OFFSET_SCRSAVE : 1000 - | *OFFSET_USBDRV : 2B00 - |*OLD_PORT_BF : 3CCB - | *OLD_PORT_BF_Size : 1 - |*PACKING : 0 - | *PADDING : 1 - |PAGES_CONF : 3D5F C | PAGES_CONFGLUK : 3D68 C |PAGES_CUSTOM : 3D7A C | PAGES_PROFROM : 3D71 C |PENT_CONF : EFF7 - | PEVO_CONF : BF - |*PORT_3F : 3CA0 - | *PORT_3F_Size : 1 - |*PORT_5F : 3CA1 - | *PORT_5F_Size : 1 - |*PORT_7F : 3CA2 - | *PORT_7F_Size : 1 - |*QWORD : 8 - | *RAM_ADDSTS : 7 - |*RAM_BASIC : 3 - | RAM_CODE : 359 C |*RAM_DATARAMD : B - | RAM_EVODOS : 1 - |*RAM_FATVARS : 2 - | *RAM_FLASHER : 40 - |*RAM_MOUNTER : 5 - | *RAM_PROFROM : 4 - |*RAM_RAMDISK : A - | *RAM_SCR_FONT : 8 - |*RAM_STS : 6 - | *RAM_TAPE : 60 - |*RAM_TEMP : 9 - | *RAM_TEMP2 : 3F - |*RATTR : 21C1 - | *RDWR_MODE : 3CCD - |*RDWR_MODE_Size : 1 - | *RDWR_PAGE : 3CCE - |*RDWR_PAGE_Size : 1 - | RD_0WINA0 : BE - |*RD_0WINA1 : 1BE - | *RD_0WINA2 : 2BE - |*RD_0WINA3 : 3BE - | *RD_1F : 3C9F - |*RD_1F_Size : 1 - | *RD_1WINA0 : 4BE - |*RD_1WINA1 : 5BE - | *RD_1WINA2 : 6BE - |*RD_1WINA3 : 7BE - | *RD_77 : CBE - |*RD_7FFD : ABE - | RD_DOS7FFD : 9BE - |*RD_EFF7 : BBE - | *RD_FF : 3CA4 - |AS V1.42 Beta [Bld 146] - source file services.a80 - page 103 - 2/23/2020 18:58:44*RD_FF_Size : 1 - | *RD_PALITRA : DBE - |*RD_RAMNROM : 8BE - | READCMOS : 3A1 C |*REAL_DRIVE : 3CC9 - | *REAL_DRIVE_Size : 1 - |*RED : 2 - | *REG_A : 3CAE - |*REG_A_Size : 1 - | *REG_B : 3CAC - |*REG_B_Size : 1 - | *REG_C : 3CAB - |*REG_C_Size : 1 - | *REG_F : 3CAD - |*REG_F_Size : 1 - | *REG_H : 3CB0 - |*REG_H_Size : 1 - | *REG_I : 3CAA - |*REG_IF : 3CA9 - | *REG_IF_Size : 1 - |*REG_I_Size : 1 - | *REG_L : 3CAF - |*REG_L_Size : 1 - | *RELAXED : 1 - |*RESET2CUSTOM : 3 - | *RESET2EVOSERV : 0 - |*RESET2GLUK : 1 - | *RESET2PROFROM : 2 - |RES_REZIDENT : 3AE C | *REZIDENT : 0 C |*ROM_ADD_BAS48 : B - | ROM_ADD_DOS : A - |*ROM_ATMCPM : 1B - | *ROM_BAS128 : 1 - |*ROM_BAS128_STD : 19 - | ROM_BAS48 : 3 - |*ROM_BAS48_128 : 1A - | *ROM_BAS48_STD : 18 - |*ROM_DOS : 2 - | *ROM_ERS : 0 - |ROM_MAINMENU : 5 - | *ROM_RST80 : 6 - |ROM_RST81 : 7 - | *ROM_RST82 : 8 - |*ROM_RST83 : 9 - | *RS232_DIV_H : F9EF - |*RS232_DIV_L : F8EF - | *RS232_IO : F8EF - |*RS232_IRQ_ENA : F9EF - | *RS232_IRQ_ID : FAEF - |*RS232_LINE_CTRL : FBEF - | *RS232_LINE_STAT : FDEF - |*RS232_MDM_CTRL : FCEF - | *RS232_MDM_STAT : FEEF - |*RS232_WORK_REG : FFEF - | RSTKEYS1 : 2A7 C |RSTKEYS2 : 26B C | RSTKEYS3 : 24E C |*RSTPAL : 20A C | RSTPAL0 : 220 C |RSTRAM : 1E1 C | *RSYM : 11C0 - |R_H : 2 - | R_L : 40 - |*SAVED_RAM : 3CD2 - | *SAVED_RAM_Size : 10 - |SAVE_TEK_VOL : BDF6 - | *SECTOR_SIZE : 3CCC - |*SECTOR_SIZE_Size : 1 - | SETDVOL : BDF3 - |SET_MAPPER : 3D5E C | SET_MODE1 : 36D C |SET_MODE2 : 37A C | *SET_VIDEOMODE : 8 - |SIZEDATE : 9 - | SIZETIME : 8 - |SSECUND : 2C - | START_SELECT : 342 C |*START_STS : C000 - | TEK_BUFPATH : 2000 - |*TEK_ROMPAGE : 3CC5 - | *TEK_ROMPAGE_Size : 1 - |TEK_TYPE : BDF7 - | *TEMP_SP : 3CD0 - |*TEMP_SP_Size : 2 - | TIME : 18:58:44 - |TRSTPAL : 3D83 C | *TRUE : 1 - |*TURBO_14 : C0 - | *TURBO_3 : 40 - |*TURBO_7 : 80 - | *UNPACK : 80 - |*UNP_DOS_FE : 40 - | *VERSION : 142F - |*VIRT_DRIVE : 3CC8 - | *VIRT_DRIVE_Size : 1 - |*VIRT_REAL_DRIVE : EB - | *VMODE6_0C : FE - |*VMODE6_0M : FA - | *VMODE6_1C : FC - |*VMODE6_1M : F8 - | *VMODE7_0 : F7 - |*VMODE7_1 : F5 - | *V_APPMULTI : A2 - |*V_EGA : A0 - | *V_TXT1PAGE : A7 - |*V_TXTATM : A6 - | *V_ZXSCR : A3 - |*WHITE : 7 - | WIN_A0 : 3FF7 - |WIN_A1 : 7FF7 - | WIN_A2 : BFF7 - |WIN_A3 : FFF7 - | WIN_P0 : 37F7 - |WIN_P1 : 77F7 - | WIN_P2 : B7F7 - |*WIN_P3 : F7F7 - | *WIN_R0 : 3BF7 - |*WIN_R1 : 7BF7 - | *WIN_R2 : BBF7 - |AS V1.42 Beta [Bld 146] - source file services.a80 - page 104 - 2/23/2020 18:58:44*WIN_R3 : FBF7 - | WORD : 2 - |*WR_0WINA0 : 3CBE - | *WR_0WINA0_Size : 1 - |*WR_0WINA1 : 3CBD - | *WR_0WINA1_Size : 1 - |*WR_0WINA2 : 3CBC - | *WR_0WINA2_Size : 1 - |*WR_0WINA3 : 3CBB - | *WR_0WINA3_Size : 1 - |*WR_1F : 3C9E - | *WR_1F_Size : 1 - |*WR_1WINA0 : 3CBA - | *WR_1WINA0_Size : 1 - |*WR_1WINA1 : 3CB9 - | *WR_1WINA1_Size : 1 - |*WR_1WINA2 : 3CB8 - | *WR_1WINA2_Size : 1 - |*WR_1WINA3 : 3CB7 - | *WR_1WINA3_Size : 1 - |*WR_77 : 3CB2 - | *WR_77_Size : 1 - |*WR_7FFD : 3CB4 - | *WR_7FFD_Size : 1 - |*WR_BF : 3CB1 - | *WR_BF_Size : 1 - |*WR_DOS7FFD : 3CB5 - | *WR_DOS7FFD_Size : 1 - |*WR_EFF7 : 3CB3 - | *WR_EFF7_Size : 1 - |*WR_FF : 3CA3 - | *WR_FF_Size : 1 - |*WR_RAMNROM : 3CB6 - | *WR_RAMNROM_Size : 1 - |X2 : A5 C | X3 : CC C |X4 : D2 C | X5 : DC C |X6 : AE C | *YELLOW : 6 - |YYEAR : 14 - | *ZXSCR_0 : FA - |*ZXSCR_1 : F8 - | *ZXSTD_CPU1 : FA - |*ZXSTD_CPU2 : FD - | *ZX_ROM : 10 - |*ZX_SCREEN : 8 - | *_128K : 2 - |*_1MB : 0 - | *_48K : 1 - |*_ADR_HOTKEY_H : 13 - | *_ADR_HOTKEY_H_Size : 1 - |*_ADR_HOTKEY_L : 12 - | *_ADR_HOTKEY_L_Size : 1 - |*_ADR_MOUSE_H : 11 - | *_ADR_MOUSE_H_Size : 1 - |*_ADR_MOUSE_L : 10 - | *_ADR_MOUSE_L_Size : 1 - |*_ADR_PRG_H : F - | *_ADR_PRG_H_Size : 1 - |*_ADR_PRG_L : E - | *_ADR_PRG_L_Size : 1 - |*_ADR_TXT_H : D - | *_ADR_TXT_H_Size : 1 - |*_ADR_TXT_L : C - | *_ADR_TXT_L_Size : 1 - |*_ALLOC_PAGE : 12A - | *_ALLOC_PAGE_Size : 3 - |*_AY_PRN_A_ : 41 - | *_AY_PRN_A__Size : 1 - |*_AY_PRN_INIT : 40 - | *_AY_PRN_INIT_Size : 1 - |*_AY_PRN_SCR : 43 - | *_AY_PRN_SCR_Size : 1 - |*_AY_PRN_TOKEN : 42 - | *_AY_PRN_TOKEN_Size : 1 - |*_BIOS : 4F - | *_BIOS_JUMPS : 100 - |*_BIOS_Size : 1 - | *_BMP : 8 - |*_BMP_Size : 1 - | *_CLEAR_CMOS : 3 - |*_CLEAR_CMOS_Size : 1 - | *_CLOSEMOUNT : 4 - |*_CLOSEMOUNT_Size : 1 - | *_CMOS_DAY : 6 - |*_CMOS_DAY_MONTH : 7 - | *_CMOS_HOUR : 4 - |*_CMOS_HOUR_AL : 5 - | *_CMOS_MINUTE : 2 - |*_CMOS_MINUTE_AL : 3 - | *_CMOS_MONTH : 8 - |_CMOS_RW : 55 - | *_CMOS_RW_Size : 1 - |*_CMOS_SECOND : 0 - | *_CMOS_SECOND_AL : 1 - |*_CMOS_YEAR : 9 - | *_CMP_DRIVE : 7 - |*_CMP_DRIVE_Size : 1 - | *_COLOR_CUR : 5 - |*_COLOR_CUR_Size : 1 - | *_COLOR_WIN : 4 - |*_COLOR_WIN_Size : 1 - | *_COMHDDN : 7 - |*_COMHDDN_Size : 1 - | *_COM_DEV : 50 - |*_COM_DEV_Size : 1 - | *_COM_FAT : 51 - |*_COM_FAT_Size : 1 - | *_CONTROL_SD : 6 - |*_CONTROL_SD_Size : 1 - | *_DEVFIND : 0 - |*_DEVFIND_Size : 1 - | *_DEV_INIT : 0 - |*_DEV_INIT_Size : 1 - | *_DEV_READ : 2 - |*_DEV_READID : 4 - | *_DEV_READID_Size : 1 - |*_DEV_READ_Size : 1 - | *_DEV_STATUS : 1 - |AS V1.42 Beta [Bld 146] - source file services.a80 - page 105 - 2/23/2020 18:58:44*_DEV_STATUS_Size : 1 - | *_DEV_WRITE : 3 - |*_DEV_WRITE_Size : 1 - | *_DIVIDE16 : 0 - |*_DIVIDE16_Size : 1 - | *_DIVIDE32 : 2 - |*_DIVIDE32_Size : 1 - | *_ENTER_DIR : 2 - |*_ENTER_DIR_Size : 1 - | *_FAT12 : 1 - |*_FAT12_Size : 1 - | *_FAT16 : 2 - |*_FAT16_Size : 1 - | *_FAT32 : 3 - |*_FAT32_Size : 1 - | *_FDD : 0 - |*_FDI : 3 - | *_FDI_Size : 1 - |*_FIND_FILEITEM : 6 - | *_FIND_FILEITEM_Size : 1 - |*_FIND_MOUNTED : 2 - | *_FIND_MOUNTED_Size : 1 - |*_FIND_NAME : 5 - | *_FIND_NAME_Size : 1 - |*_FLAGS : 6 - | *_FLAGS_Size : 1 - |*_FNT : 7 - | *_FNT_Size : 1 - |*_FREE_PAGE : 12D - | *_FREE_PAGE_Size : 3 - |*_FREINIT_VOL : 8 - | *_FREINIT_VOL_Size : 1 - |*_GET_FNDVOLUME : 3 - | *_GET_FNDVOLUME_Size : 1 - |*_GET_LONGNAME : 4 - | *_GET_LONGNAME_Size : 1 - |*_GET_MOUNTED : 3 - | *_GET_MOUNTED_Size : 1 - |*_GET_PATH : 3 - | *_GET_PATH_Size : 1 - |*_GET_TABLE_MEM : 127 - | *_GET_TABLE_MEM_Size : 3 - |*_GET_VIRT_BITS : 8 - | *_GET_VIRT_BITS_Size : 1 - |*_HDD : 1 - | *_HEX1DECTXT : 6 - |*_HEX1DECTXT_Size : 1 - | *_HEX2DECTXT : 5 - |*_HEX2DECTXT_Size : 1 - | *_HEX4DECTXT : 4 - |*_HEX4DECTXT_Size : 1 - | *_HOB : 6 - |*_HOB_Size : 1 - | *_H_SIZE : 3 - |*_H_SIZE_Size : 1 - | _INIT_CMOS : 0 - |*_INIT_CMOS_Size : 1 - | *_INIT_FATVARS : 0 - |*_INIT_FATVARS_Size : 1 - | *_INIT_KEYB_PS2 : 11B - |*_INIT_KEYB_PS2_Size : 3 - | *_INIT_TABLE_MEM : 124 - |*_INIT_TABLE_MEM_Size : 3 - | *_INIT_TEKDIR : A - |*_INIT_TEKDIR_Size : 1 - | *_INST_FATBOOT : 54 - |*_INST_FATBOOT_Size : 1 - | *_KOL_VOL : 2 - |*_KOL_VOL_Size : 1 - | *_LOADIMAGE : 5 - |*_LOADIMAGE_Size : 1 - | *_MATH : 4C - |*_MATH_Size : 1 - | *_MEM_MODE_128 : 80 - |*_MEM_MODE_48 : 40 - | *_MEM_MODE_PENT : C0 - |*_MOUNTER : 53 - | *_MOUNTER_Size : 1 - |*_MOUNT_RAMDISK : 9 - | *_MOUNT_RAMDISK_Size : 1 - |*_MOUSE_WHEEL : F0 - | *_MULTIPLY16 : 1 - |*_MULTIPLY16_Size : 1 - | *_MULTIPLY32 : 3 - |*_MULTIPLY32_Size : 1 - | *_NEMO_RD_ID : 100 - |*_NEMO_RD_ID_Size : 3 - | *_NEMO_RD_SEC : 103 - |*_NEMO_RD_SEC_Size : 3 - | *_NEMO_WR_SEC : 106 - |*_NEMO_WR_SEC_Size : 3 - | *_NGSSD_RD_ID : 112 - |*_NGSSD_RD_ID_Size : 3 - | *_NGSSD_RD_SEC : 115 - |*_NGSSD_RD_SEC_Size : 3 - | *_NGSSD_WR_SEC : 118 - |*_NGSSD_WR_SEC_Size : 3 - | *_NO_INIT : 0 - |*_NO_INIT_Size : 1 - | *_NUM_KOL_H : B - |*_NUM_KOL_H_Size : 1 - | *_NUM_KOL_L : A - |*_NUM_KOL_L_Size : 1 - | *_NUM_PKT : 7 - |*_NUM_PKT_Size : 1 - | *_OPEN_FILE : 8 - |*_OPEN_FILE_Size : 1 - | *_OPEN_MOUNT : 0 - |*_OPEN_MOUNT_Size : 1 - | *_POSTF00 : 0 - |*_POSTF00_Size : 1 - | *_POSTF01 : 1 - |*_POSTF01_Size : 1 - | *_POSTF02 : 2 - |*_POSTF02_Size : 1 - | *_POSTF03 : 3 - |*_POSTF03_Size : 1 - | *_POSTF04 : 4 - |*_POSTF04_Size : 1 - | *_POSTF05 : 5 - |AS V1.42 Beta [Bld 146] - source file services.a80 - page 106 - 2/23/2020 18:58:44*_POSTF05_Size : 1 - | *_POSTF06 : 6 - |*_POSTF06_Size : 1 - | *_POSTF07 : 7 - |*_POSTF07_Size : 1 - | *_POS_FILES : B - |*_POS_FILES_Size : 1 - | *_PRINT_A : 48 - |*_PRINT_A_Size : 1 - | *_PRINT_MESSAGE : 47 - |*_PRINT_MESSAGE_Size : 1 - | *_RDWR_MOUNT : 1 - |*_RDWR_MOUNT_Size : 1 - | _READ_CMOS : 1 - |*_READ_CMOS_Size : 1 - | *_READ_DIR : 1 - |*_READ_DIR_Size : 1 - | *_READ_FILE : 9 - |*_READ_FILE_Size : 1 - | *_READ_KEYB_PS2 : 11E - |*_READ_KEYB_PS2_Size : 3 - | *_READ_STAT_PS2 : 121 - |*_READ_STAT_PS2_Size : 3 - | *_REAL_DRIVE : C - |*_REST_NAMELOAD : 6 - | *_REST_NAMELOAD_Size : 1 - |*_ROM : 9 - | *_ROM_Size : 1 - |*_SCL : 2 - | *_SCL_Size : 1 - |*_SCROLL_DOWN : 4A - | *_SCROLL_DOWN_Size : 1 - |*_SCROLL_UP : 49 - | *_SCROLL_UP_Size : 1 - |*_SD : 2 - | *_SD_NONE : 80 - |*_SETUP_FONT : 57 - | *_SETUP_FONT_Size : 1 - |*_SETUP_PAL : 56 - | *_SETUP_PAL_Size : 1 - |*_SET_DEVICE : 5 - | *_SET_DEVICE_Size : 1 - |*_SET_MASK_EXT : 7 - | *_SET_MASK_EXT_Size : 1 - |*_SET_MODE : 4B - | *_SET_MODE_Size : 1 - |*_SET_VOL : 1 - | *_SET_VOL_Size : 1 - |*_SORT_FINDFILES : 52 - | *_SORT_FINDFILES_Size : 1 - |*_SPG : 5 - | *_SPG_Size : 1 - |*_TAP : 4 - | *_TAPE_EMUL : 45 - |*_TAPE_EMUL_Size : 1 - | *_TAPE_INIT : 44 - |*_TAPE_INIT_Size : 1 - | *_TAP_Size : 1 - |*_TEK_PKT_H : 9 - | *_TEK_PKT_H_Size : 1 - |*_TEK_PKT_L : 8 - | *_TEK_PKT_L_Size : 1 - |*_TO_DRV : 4 - | *_TO_DRV_Size : 1 - |*_TRD : 1 - | *_TRDOS : 4 - |*_TRDOS_Size : 1 - | *_TRD_Size : 1 - |*_TURBO_HIGH : 20 - | *_TURBO_LOW : 10 - |*_TURBO_MAX : 30 - | *_TXTSCR_MODE : 2 - |*_UNKNOWN : 5 - | *_UNKNOWN_Size : 1 - |*_VERSION : 4D - | *_VERSION_Size : 1 - |*_VIRT_DRIVE : 3 - | *_V_SIZE : 2 - |*_V_SIZE_Size : 1 - | *_WINW : 46 - |*_WINW_Size : 1 - | _WRITE_CMOS : 2 - |*_WRITE_CMOS_Size : 1 - | *_X_COORD : 0 - |*_X_COORD_Size : 1 - | *_Y_COORD : 1 - |*_Y_COORD_Size : 1 - | *_ZCSD_RD_ID : 109 - |*_ZCSD_RD_ID_Size : 3 - | *_ZCSD_RD_SEC : 10C - |*_ZCSD_RD_SEC_Size : 3 - | *_ZCSD_WR_SEC : 10F - |*_ZCSD_WR_SEC_Size : 3 - | *_ZXSCR_MODE : 1 - |szdemoini : 8 - |809 symbols637 unused symbolsAS V1.42 Beta [Bld 146] - source file services.a80 - page 107 - 2/23/2020 18:58:44defined macros:---------------ADDVAR | ATMPORTBITMASK | DALIGNDC | DUPLDZ | EVOPORTINIT_VAR | MALIGNPEC_OFF | PEC_ONRAMCALL | READ_7FFDROMCALL | RST8SETVAR | SUBVARSUM_HOB | TEXTDATEWORD2TXT |21 macrosAS V1.42 Beta [Bld 146] - source file services.a80 - page 108 - 2/23/2020 18:58:44defined functions:------------------LOW | HIGHAS V1.42 Beta [Bld 146] - source file services.a80 - page 109 - 2/23/2020 18:58:44codepages:----------STANDARD (0 changed characters)0.33 seconds assembly time1589 lines source file3398 lines incl. macro expansions2 passes0 errors0 warnings