Subversion Repositories pentevo

Rev

Rev 896 | Blame | Compare with Previous | Last modification | View Log | Download | RSS feed | ?url?

 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 1 - 2/23/2020 18:58:45


       1/       0 :                     
       2/       0 :                     ;LAST UPDATE: 13.02.2020 savelij
       3/       0 :                     
       4/       0 :                     ; DOS_FE
       5/       0 :                     
       6/       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:
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80(../../svn/pentevo/rom/macros.a80) - page 2 - 2/23/2020 18:58:45


(1)   55/       0 :                     $$N             EQU (LEN) / 1024
(1)   56/       0 :                     $$M             EQU (LEN) # 1024
(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
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80(../../svn/pentevo/rom/macros.a80) - page 3 - 2/23/2020 18:58:45


(1)  115/       0 :                     
(1)  116/       0 :                     READ_7FFD       MACRO
(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
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80(../../svn/pentevo/rom/macros.a80) - page 4 - 2/23/2020 18:58:45


(1)  175/       0 :                     
(1)  176/       0 : =1H                 BYTE            EQU 1
(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
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80(../../svn/pentevo/rom/macros.a80) - page 5 - 2/23/2020 18:58:45


(1)  235/       0 :                     $$TMP := WORD-$$DEC1*10000
(1)  236/       0 :                     $$DEC2 := $$TMP/1000
(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 :                     
       7/       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                           ;СТРАНИЦА ДЛЯ МОНТИРОВАНИЯ ОБРАЗОВ
(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 (СТАНДАРТНАЯ ВЕРСИЯ)
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80(../../svn/pentevo/rom/global_vars.a80) - page 6 - 2/23/2020 18:58:45


(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                      ;АДРЕС ПОРТА КНОПОК МЫШИ
(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 :                     
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80(../../svn/pentevo/rom/global_vars.a80) - page 7 - 2/23/2020 18:58:45


(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 0X13BD
(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
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80(../../svn/pentevo/rom/global_vars.a80) - page 8 - 2/23/2020 18:58:45


(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                        ;БИТ РАЗРЕШЕНИЯ ДОСТУПА К ТЕНЕВЫМ ПОРТАМ
(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
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80(../../svn/pentevo/rom/global_vars.a80) - page 9 - 2/23/2020 18:58:45


(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                           ;ЧАСЫ БУДИЛЬНИКА
(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
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80(../../svn/pentevo/rom/global_vars.a80) - page 10 - 2/23/2020 18:58:45


(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<<2
(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 :                     
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80(../../svn/pentevo/rom/global_vars.a80) - page 11 - 2/23/2020 18:58:45


(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 СМЕЩЕНИЕ В СТРАНИЦЕ ТЕКУЩЕГО ШРИФТА
(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
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80(../../svn/pentevo/rom/global_vars.a80) - page 12 - 2/23/2020 18:58:45


(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 :                     
       8/       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
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80(../../svn/pentevo/rom/define.a80) - page 13 - 2/23/2020 18:58:45


(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+
(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+
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80(../../svn/pentevo/rom/define.a80) - page 14 - 2/23/2020 18:58:45


(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_MODE
(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 
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80(../../svn/pentevo/rom/define.a80) - page 15 - 2/23/2020 18:58:45


(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]                                ENDIF
(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
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80(../../svn/pentevo/rom/define.a80) - page 16 - 2/23/2020 18:58:45


(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 MHZ
(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
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80(../../svn/pentevo/rom/define.a80) - page 17 - 2/23/2020 18:58:45


(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                             IFNB 
(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+
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80(../../svn/pentevo/rom/define.a80) - page 18 - 2/23/2020 18:58:45


(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 :                     
(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
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80(../../svn/pentevo/rom/define.a80) - page 19 - 2/23/2020 18:58:45


(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 BYTE
(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
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80(../../svn/pentevo/rom/define.a80) - page 20 - 2/23/2020 18:58:45


(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                              ELSE
(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
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80(../../svn/pentevo/rom/define.a80) - page 21 - 2/23/2020 18:58:45


(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                             IFNB 
(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+
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80(../../svn/pentevo/rom/define.a80) - page 22 - 2/23/2020 18:58:45


(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 :                     
(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
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80(../../svn/pentevo/rom/define.a80) - page 23 - 2/23/2020 18:58:45


(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 BYTE
(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
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80(../../svn/pentevo/rom/define.a80) - page 24 - 2/23/2020 18:58:45


(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 := 
(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
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80(../../svn/pentevo/rom/define.a80) - page 25 - 2/23/2020 18:58:45


(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                             IFNB 
(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
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80(../../svn/pentevo/rom/define.a80) - page 26 - 2/23/2020 18:58:45


(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 BYTE
(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
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80(../../svn/pentevo/rom/define.a80) - page 27 - 2/23/2020 18:58:45


(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+
(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 
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80(../../svn/pentevo/rom/define.a80) - page 28 - 2/23/2020 18:58:45


(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 INITVAR
(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
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80(../../svn/pentevo/rom/define.a80) - page 29 - 2/23/2020 18:58:45


(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 BYTE
(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
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80(../../svn/pentevo/rom/define.a80) - page 30 - 2/23/2020 18:58:45


(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       EQU 
(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 
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80(../../svn/pentevo/rom/define.a80) - page 31 - 2/23/2020 18:58:45


(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 3
(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 карты
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80(../../svn/pentevo/rom/define.a80) - page 32 - 2/23/2020 18:58:45


(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+BYTE
(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
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80(../../svn/pentevo/rom/define.a80) - page 33 - 2/23/2020 18:58:45


(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               ;получение таблицы занятых/свободных страниц памяти
(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 :                     
       9/       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
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80(../../svn/pentevo/rom/evodos_vars.a80) - page 34 - 2/23/2020 18:58:45


(1)    6/       0 :                     IREG_E_Size       EQU BYTE
(1)    6/       0 : [6]                                 ENDIF
(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
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80(../../svn/pentevo/rom/evodos_vars.a80) - page 35 - 2/23/2020 18:58:45


(1)   14/       0 : =3CA1H              INITVAR := INITVAR+BYTE
(1)   14/       0 : =1H                 PORT_3F_Size       EQU BYTE
(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
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80(../../svn/pentevo/rom/evodos_vars.a80) - page 36 - 2/23/2020 18:58:45


(1)   21/       0 : (MACRO)              SETVAR REG_IF,         BYTE            ;1
(1)   21/       0 : =3CA9H              REG_IF            EQU INITVAR
(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
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80(../../svn/pentevo/rom/evodos_vars.a80) - page 37 - 2/23/2020 18:58:45


(1)   27/       0 :                     INITVAR := INITVAR+BYTE
(1)   27/       0 :                     REG_L_Size       EQU BYTE
(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
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80(../../svn/pentevo/rom/evodos_vars.a80) - page 38 - 2/23/2020 18:58:45


(1)   34/       0 : =3CB7H              INITVAR := INITVAR+BYTE
(1)   34/       0 : =1H                 WR_RAMNROM_Size       EQU BYTE
(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
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80(../../svn/pentevo/rom/evodos_vars.a80) - page 39 - 2/23/2020 18:58:45


(1)   41/       0 : (MACRO)              SETVAR WR_0WINA1,      BYTE            ;1
(1)   41/       0 : =3CBDH              WR_0WINA1            EQU INITVAR
(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
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80(../../svn/pentevo/rom/evodos_vars.a80) - page 40 - 2/23/2020 18:58:45


(1)   47/       0 :                     INITVAR := INITVAR+BYTE
(1)   47/       0 :                     MINT_STACK_Size       EQU BYTE
(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
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80(../../svn/pentevo/rom/evodos_vars.a80) - page 41 - 2/23/2020 18:58:45


(1)   55/       0 : =>NOT BLANK                         IFNB BYTE
(1)   55/       0 : =3CCCH              INITVAR := INITVAR+BYTE
(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
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80(../../svn/pentevo/rom/evodos_vars.a80) - page 42 - 2/23/2020 18:58:45


(1)   61/       0 : [61]                                ENDIF
(1)   62/       0 :                     END_VARS
(1)   63/       0 :                     
      10/       0 :                                     include define.a80
(1)    1/       0 :                     
(1)    2/       0 :                     ;LAST UPDATE: 13.02.2020 savelij
(1)    3/       0 :                     
(1)    4/       0 : =13BDH              BD_FDD_MASK     EQU 0X13BD
(1)    5/       0 :                     
      11/       0 :                     
      12/       0 : =DFFH               STACK           EQU 0X0DFF
      13/       0 :                     
      14/       0 : =DFBH               OLD_IF          EQU STACK-WORD*2
      15/       0 : =DFDH               OLD_AF          EQU STACK-WORD
      16/       0 :                     
      17/       0 :                     ;команда выхода и переход на обработчик
      18/       0 :                     JP_EMU          MACRO ADDRESS
      19/       0 :                                     DUPL ADDRESS-$,0;XFF
      20/       0 :                                     NOP
      21/       0 :                                     NOP
      22/       0 :                                     OUT (EXIT_PORT),A
      23/       0 :                                     ENDM
      24/       0 :                     
      25/       0 :                     DJP_EMU         MACRO ADDRESS
      26/       0 :                                     DUPL ADDRESS-$,0;XFF
      27/       0 :                                     NOP
      28/       0 :                                     NOP
      29/       0 :                                     DI
      30/       0 :                                     HALT
      31/       0 :                                     ENDM
      32/       0 :                     
      33/       0 :                     ;генерация адресов для таблицы
      34/       0 :                     LABEL_GEN       MACRO ADDRESS
      35/       0 :                     _ADDRESS        EQU ($-TABLE_VIRT)/4
      36/       0 :                                     DW ADDRESS,ADR_ADDRESS.WORK
      37/       0 :                                     ENDM
      38/       0 :                     
      39/       0 :                     ;переход на обработчик с кодом адреса
      40/       0 :                     EMU_JUMP        MACRO ADDRESS
      41/       0 :                     ADR_ADDRESS     EQU $
      42/       0 :                                     LD (OLD_AF+1),A
      43/       0 :                                     LD A,_ADDRESS
      44/       0 :                                     JP WORKER
      45/       0 :                     
      46/       0 :                     .WORK           EQU $
      47/       0 :                                     ENDM
      48/       0 :                     
      49/       0 :                                     ORG 0
      50/       0 : C3 02 03                            JP START_TEST
      51/       3 :                     
      52/       3 : (MACRO)                             DUPL 0X0038-$,0;XFF
      52/       3 :                     DUPL:
      52/       3 : =0H                 $$N             EQU (0X0038-$) / 1024
      52/       3 : =35H                $$M             EQU (0X0038-$) # 1024
      52/       3 :                                     REPT $$N
      52/       3 :                                     DB 1024 DUP(0)
      52/       3 :                                     ENDM
      52/       3 : =>TRUE                              IF $$M <> 0
      52/       3 : =>NOT BLANK                         IFB 0
      52/       3 :                                     DB $$M DUP(0)
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 43 - 2/23/2020 18:58:45


      52/       3 : =>TRUE                              ELSE
      52/       3 : 00 00 00 00 00 00                   DB $$M DUP(0)
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 
      52/      38 : [52]                                ENDIF
      52/      38 : [52]                                ENDIF
      53/      38 : FB                                  EI
      54/      39 : C9                                  RET
      55/      3A :                     
      56/      3A : (MACRO)                             DUPL 0X006F-$,0;XFF
      56/      3A :                     DUPL:
      56/      3A : =0H                 $$N             EQU (0X006F-$) / 1024
      56/      3A : =35H                $$M             EQU (0X006F-$) # 1024
      56/      3A :                                     REPT $$N
      56/      3A :                                     DB 1024 DUP(0)
      56/      3A :                                     ENDM
      56/      3A : =>TRUE                              IF $$M <> 0
      56/      3A : =>NOT BLANK                         IFB 0
      56/      3A :                                     DB $$M DUP(0)
      56/      3A : =>TRUE                              ELSE
      56/      3A : 00 00 00 00 00 00                   DB $$M DUP(0)
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 
      56/      6F : [56]                                ENDIF
      56/      6F : [56]                                ENDIF
      57/      6F : E9                                  JP (HL)
      58/      70 :                     
      59/      70 :                     ;               JP_EMU 0X02BE                   ; OUT      (0XFF), A
      60/      70 :                     
      61/      70 : (MACRO)                             DUPL 0X302-$
      61/      70 :                     DUPL:
      61/      70 : =0H                 $$N             EQU (0X302-$) / 1024
      61/      70 : =292H               $$M             EQU (0X302-$) # 1024
      61/      70 :                                     REPT $$N
      61/      70 :                                     DB 1024 DUP()
      61/      70 :                                     ENDM
      61/      70 : =>TRUE                              IF $$M <> 0
      61/      70 : =>BLANK                             IFB 
      61/      70 : 00 00 00 00 00 00                   DB $$M DUP(0)
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 44 - 2/23/2020 18:58:45


                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 45 - 2/23/2020 18:58:45


                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 
      61/     302 : =>FALSE                             ELSE
      61/     302 :                                     DB $$M DUP()
      61/     302 : [61]                                ENDIF
      61/     302 : [61]                                ENDIF
      62/     302 : (MACRO)             START_TEST      JP_EMU 0X0302
      62/     302 :  (MACRO-2)                          DUPL 0X0302-$,0;XFF
      62/     302 :                     DUPL:
      62/     302 : =0H                 $$N             EQU (0X0302-$) / 1024
      62/     302 : =0H                 $$M             EQU (0X0302-$) # 1024
      62/     302 :                                     REPT $$N
      62/     302 :                                     DB 1024 DUP(0)
      62/     302 :                                     ENDM
      62/     302 : =>FALSE                             IF $$M <> 0
      62/     302 :                                     IFB 0
      62/     302 :                                     DB $$M DUP(0)
      62/     302 :                                     ELSE
      62/     302 :                                     DB $$M DUP(0)
      62/     302 : [62]                                ENDIF
      62/     302 : [62]                                ENDIF
      62/     302 : 00                                  NOP
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 46 - 2/23/2020 18:58:45


      62/     303 : 00                                  NOP
      62/     304 : D3 BE                               OUT (EXIT_PORT),A
      63/     306 : (MACRO)                             JP_EMU 0X030A
      63/     306 :  (MACRO-2)                          DUPL 0X030A-$,0;XFF
      63/     306 :                     DUPL:
      63/     306 : =0H                 $$N             EQU (0X030A-$) / 1024
      63/     306 : =4H                 $$M             EQU (0X030A-$) # 1024
      63/     306 :                                     REPT $$N
      63/     306 :                                     DB 1024 DUP(0)
      63/     306 :                                     ENDM
      63/     306 : =>TRUE                              IF $$M <> 0
      63/     306 : =>NOT BLANK                         IFB 0
      63/     306 :                                     DB $$M DUP(0)
      63/     306 : =>TRUE                              ELSE
      63/     306 : 00 00 00 00                         DB $$M DUP(0)
      63/     30A : [63]                                ENDIF
      63/     30A : [63]                                ENDIF
      63/     30A : 00                                  NOP
      63/     30B : 00                                  NOP
      63/     30C : D3 BE                               OUT (EXIT_PORT),A
      64/     30E : (MACRO)                             JP_EMU 0X0312
      64/     30E :  (MACRO-2)                          DUPL 0X0312-$,0;XFF
      64/     30E :                     DUPL:
      64/     30E : =0H                 $$N             EQU (0X0312-$) / 1024
      64/     30E : =4H                 $$M             EQU (0X0312-$) # 1024
      64/     30E :                                     REPT $$N
      64/     30E :                                     DB 1024 DUP(0)
      64/     30E :                                     ENDM
      64/     30E : =>TRUE                              IF $$M <> 0
      64/     30E : =>NOT BLANK                         IFB 0
      64/     30E :                                     DB $$M DUP(0)
      64/     30E : =>TRUE                              ELSE
      64/     30E : 00 00 00 00                         DB $$M DUP(0)
      64/     312 : [64]                                ENDIF
      64/     312 : [64]                                ENDIF
      64/     312 : 00                                  NOP
      64/     313 : 00                                  NOP
      64/     314 : D3 BE                               OUT (EXIT_PORT),A
      65/     316 : (MACRO)                             JP_EMU 0X031A
      65/     316 :  (MACRO-2)                          DUPL 0X031A-$,0;XFF
      65/     316 :                     DUPL:
      65/     316 : =0H                 $$N             EQU (0X031A-$) / 1024
      65/     316 : =4H                 $$M             EQU (0X031A-$) # 1024
      65/     316 :                                     REPT $$N
      65/     316 :                                     DB 1024 DUP(0)
      65/     316 :                                     ENDM
      65/     316 : =>TRUE                              IF $$M <> 0
      65/     316 : =>NOT BLANK                         IFB 0
      65/     316 :                                     DB $$M DUP(0)
      65/     316 : =>TRUE                              ELSE
      65/     316 : 00 00 00 00                         DB $$M DUP(0)
      65/     31A : [65]                                ENDIF
      65/     31A : [65]                                ENDIF
      65/     31A : 00                                  NOP
      65/     31B : 00                                  NOP
      65/     31C : D3 BE                               OUT (EXIT_PORT),A
      66/     31E : (MACRO)                             JP_EMU 0X0322
      66/     31E :  (MACRO-2)                          DUPL 0X0322-$,0;XFF
      66/     31E :                     DUPL:
      66/     31E : =0H                 $$N             EQU (0X0322-$) / 1024
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 47 - 2/23/2020 18:58:45


      66/     31E : =4H                 $$M             EQU (0X0322-$) # 1024
      66/     31E :                                     REPT $$N
      66/     31E :                                     DB 1024 DUP(0)
      66/     31E :                                     ENDM
      66/     31E : =>TRUE                              IF $$M <> 0
      66/     31E : =>NOT BLANK                         IFB 0
      66/     31E :                                     DB $$M DUP(0)
      66/     31E : =>TRUE                              ELSE
      66/     31E : 00 00 00 00                         DB $$M DUP(0)
      66/     322 : [66]                                ENDIF
      66/     322 : [66]                                ENDIF
      66/     322 : 00                                  NOP
      66/     323 : 00                                  NOP
      66/     324 : D3 BE                               OUT (EXIT_PORT),A
      67/     326 : (MACRO)                             JP_EMU 0X032A
      67/     326 :  (MACRO-2)                          DUPL 0X032A-$,0;XFF
      67/     326 :                     DUPL:
      67/     326 : =0H                 $$N             EQU (0X032A-$) / 1024
      67/     326 : =4H                 $$M             EQU (0X032A-$) # 1024
      67/     326 :                                     REPT $$N
      67/     326 :                                     DB 1024 DUP(0)
      67/     326 :                                     ENDM
      67/     326 : =>TRUE                              IF $$M <> 0
      67/     326 : =>NOT BLANK                         IFB 0
      67/     326 :                                     DB $$M DUP(0)
      67/     326 : =>TRUE                              ELSE
      67/     326 : 00 00 00 00                         DB $$M DUP(0)
      67/     32A : [67]                                ENDIF
      67/     32A : [67]                                ENDIF
      67/     32A : 00                                  NOP
      67/     32B : 00                                  NOP
      67/     32C : D3 BE                               OUT (EXIT_PORT),A
      68/     32E : (MACRO)                             JP_EMU 0X0332
      68/     32E :  (MACRO-2)                          DUPL 0X0332-$,0;XFF
      68/     32E :                     DUPL:
      68/     32E : =0H                 $$N             EQU (0X0332-$) / 1024
      68/     32E : =4H                 $$M             EQU (0X0332-$) # 1024
      68/     32E :                                     REPT $$N
      68/     32E :                                     DB 1024 DUP(0)
      68/     32E :                                     ENDM
      68/     32E : =>TRUE                              IF $$M <> 0
      68/     32E : =>NOT BLANK                         IFB 0
      68/     32E :                                     DB $$M DUP(0)
      68/     32E : =>TRUE                              ELSE
      68/     32E : 00 00 00 00                         DB $$M DUP(0)
      68/     332 : [68]                                ENDIF
      68/     332 : [68]                                ENDIF
      68/     332 : 00                                  NOP
      68/     333 : 00                                  NOP
      68/     334 : D3 BE                               OUT (EXIT_PORT),A
      69/     336 : (MACRO)                             JP_EMU 0X033A
      69/     336 :  (MACRO-2)                          DUPL 0X033A-$,0;XFF
      69/     336 :                     DUPL:
      69/     336 : =0H                 $$N             EQU (0X033A-$) / 1024
      69/     336 : =4H                 $$M             EQU (0X033A-$) # 1024
      69/     336 :                                     REPT $$N
      69/     336 :                                     DB 1024 DUP(0)
      69/     336 :                                     ENDM
      69/     336 : =>TRUE                              IF $$M <> 0
      69/     336 : =>NOT BLANK                         IFB 0
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 48 - 2/23/2020 18:58:45


      69/     336 :                                     DB $$M DUP(0)
      69/     336 : =>TRUE                              ELSE
      69/     336 : 00 00 00 00                         DB $$M DUP(0)
      69/     33A : [69]                                ENDIF
      69/     33A : [69]                                ENDIF
      69/     33A : 00                                  NOP
      69/     33B : 00                                  NOP
      69/     33C : D3 BE                               OUT (EXIT_PORT),A
      70/     33E : (MACRO)                             JP_EMU 0X0342
      70/     33E :  (MACRO-2)                          DUPL 0X0342-$,0;XFF
      70/     33E :                     DUPL:
      70/     33E : =0H                 $$N             EQU (0X0342-$) / 1024
      70/     33E : =4H                 $$M             EQU (0X0342-$) # 1024
      70/     33E :                                     REPT $$N
      70/     33E :                                     DB 1024 DUP(0)
      70/     33E :                                     ENDM
      70/     33E : =>TRUE                              IF $$M <> 0
      70/     33E : =>NOT BLANK                         IFB 0
      70/     33E :                                     DB $$M DUP(0)
      70/     33E : =>TRUE                              ELSE
      70/     33E : 00 00 00 00                         DB $$M DUP(0)
      70/     342 : [70]                                ENDIF
      70/     342 : [70]                                ENDIF
      70/     342 : 00                                  NOP
      70/     343 : 00                                  NOP
      70/     344 : D3 BE                               OUT (EXIT_PORT),A
      71/     346 : (MACRO)                             JP_EMU 0X034A
      71/     346 :  (MACRO-2)                          DUPL 0X034A-$,0;XFF
      71/     346 :                     DUPL:
      71/     346 : =0H                 $$N             EQU (0X034A-$) / 1024
      71/     346 : =4H                 $$M             EQU (0X034A-$) # 1024
      71/     346 :                                     REPT $$N
      71/     346 :                                     DB 1024 DUP(0)
      71/     346 :                                     ENDM
      71/     346 : =>TRUE                              IF $$M <> 0
      71/     346 : =>NOT BLANK                         IFB 0
      71/     346 :                                     DB $$M DUP(0)
      71/     346 : =>TRUE                              ELSE
      71/     346 : 00 00 00 00                         DB $$M DUP(0)
      71/     34A : [71]                                ENDIF
      71/     34A : [71]                                ENDIF
      71/     34A : 00                                  NOP
      71/     34B : 00                                  NOP
      71/     34C : D3 BE                               OUT (EXIT_PORT),A
      72/     34E : (MACRO)                             JP_EMU 0X0355
      72/     34E :  (MACRO-2)                          DUPL 0X0355-$,0;XFF
      72/     34E :                     DUPL:
      72/     34E : =0H                 $$N             EQU (0X0355-$) / 1024
      72/     34E : =7H                 $$M             EQU (0X0355-$) # 1024
      72/     34E :                                     REPT $$N
      72/     34E :                                     DB 1024 DUP(0)
      72/     34E :                                     ENDM
      72/     34E : =>TRUE                              IF $$M <> 0
      72/     34E : =>NOT BLANK                         IFB 0
      72/     34E :                                     DB $$M DUP(0)
      72/     34E : =>TRUE                              ELSE
      72/     34E : 00 00 00 00 00 00                   DB $$M DUP(0)
                    00 
      72/     355 : [72]                                ENDIF
      72/     355 : [72]                                ENDIF
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 49 - 2/23/2020 18:58:45


      72/     355 : 00                                  NOP
      72/     356 : 00                                  NOP
      72/     357 : D3 BE                               OUT (EXIT_PORT),A
      73/     359 : (MACRO)                             JP_EMU 0X035D
      73/     359 :  (MACRO-2)                          DUPL 0X035D-$,0;XFF
      73/     359 :                     DUPL:
      73/     359 : =0H                 $$N             EQU (0X035D-$) / 1024
      73/     359 : =4H                 $$M             EQU (0X035D-$) # 1024
      73/     359 :                                     REPT $$N
      73/     359 :                                     DB 1024 DUP(0)
      73/     359 :                                     ENDM
      73/     359 : =>TRUE                              IF $$M <> 0
      73/     359 : =>NOT BLANK                         IFB 0
      73/     359 :                                     DB $$M DUP(0)
      73/     359 : =>TRUE                              ELSE
      73/     359 : 00 00 00 00                         DB $$M DUP(0)
      73/     35D : [73]                                ENDIF
      73/     35D : [73]                                ENDIF
      73/     35D : 00                                  NOP
      73/     35E : 00                                  NOP
      73/     35F : D3 BE                               OUT (EXIT_PORT),A
      74/     361 : (MACRO)                             JP_EMU 0X0367
      74/     361 :  (MACRO-2)                          DUPL 0X0367-$,0;XFF
      74/     361 :                     DUPL:
      74/     361 : =0H                 $$N             EQU (0X0367-$) / 1024
      74/     361 : =6H                 $$M             EQU (0X0367-$) # 1024
      74/     361 :                                     REPT $$N
      74/     361 :                                     DB 1024 DUP(0)
      74/     361 :                                     ENDM
      74/     361 : =>TRUE                              IF $$M <> 0
      74/     361 : =>NOT BLANK                         IFB 0
      74/     361 :                                     DB $$M DUP(0)
      74/     361 : =>TRUE                              ELSE
      74/     361 : 00 00 00 00 00 00                   DB $$M DUP(0)
      74/     367 : [74]                                ENDIF
      74/     367 : [74]                                ENDIF
      74/     367 : 00                                  NOP
      74/     368 : 00                                  NOP
      74/     369 : D3 BE                               OUT (EXIT_PORT),A
      75/     36B : (MACRO)                             JP_EMU 0X0371
      75/     36B :  (MACRO-2)                          DUPL 0X0371-$,0;XFF
      75/     36B :                     DUPL:
      75/     36B : =0H                 $$N             EQU (0X0371-$) / 1024
      75/     36B : =6H                 $$M             EQU (0X0371-$) # 1024
      75/     36B :                                     REPT $$N
      75/     36B :                                     DB 1024 DUP(0)
      75/     36B :                                     ENDM
      75/     36B : =>TRUE                              IF $$M <> 0
      75/     36B : =>NOT BLANK                         IFB 0
      75/     36B :                                     DB $$M DUP(0)
      75/     36B : =>TRUE                              ELSE
      75/     36B : 00 00 00 00 00 00                   DB $$M DUP(0)
      75/     371 : [75]                                ENDIF
      75/     371 : [75]                                ENDIF
      75/     371 : 00                                  NOP
      75/     372 : 00                                  NOP
      75/     373 : D3 BE                               OUT (EXIT_PORT),A
      76/     375 : (MACRO)                             JP_EMU 0X037B
      76/     375 :  (MACRO-2)                          DUPL 0X037B-$,0;XFF
      76/     375 :                     DUPL:
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 50 - 2/23/2020 18:58:45


      76/     375 : =0H                 $$N             EQU (0X037B-$) / 1024
      76/     375 : =6H                 $$M             EQU (0X037B-$) # 1024
      76/     375 :                                     REPT $$N
      76/     375 :                                     DB 1024 DUP(0)
      76/     375 :                                     ENDM
      76/     375 : =>TRUE                              IF $$M <> 0
      76/     375 : =>NOT BLANK                         IFB 0
      76/     375 :                                     DB $$M DUP(0)
      76/     375 : =>TRUE                              ELSE
      76/     375 : 00 00 00 00 00 00                   DB $$M DUP(0)
      76/     37B : [76]                                ENDIF
      76/     37B : [76]                                ENDIF
      76/     37B : 00                                  NOP
      76/     37C : 00                                  NOP
      76/     37D : D3 BE                               OUT (EXIT_PORT),A
      77/     37F : (MACRO)                             JP_EMU 0X0383
      77/     37F :  (MACRO-2)                          DUPL 0X0383-$,0;XFF
      77/     37F :                     DUPL:
      77/     37F : =0H                 $$N             EQU (0X0383-$) / 1024
      77/     37F : =4H                 $$M             EQU (0X0383-$) # 1024
      77/     37F :                                     REPT $$N
      77/     37F :                                     DB 1024 DUP(0)
      77/     37F :                                     ENDM
      77/     37F : =>TRUE                              IF $$M <> 0
      77/     37F : =>NOT BLANK                         IFB 0
      77/     37F :                                     DB $$M DUP(0)
      77/     37F : =>TRUE                              ELSE
      77/     37F : 00 00 00 00                         DB $$M DUP(0)
      77/     383 : [77]                                ENDIF
      77/     383 : [77]                                ENDIF
      77/     383 : 00                                  NOP
      77/     384 : 00                                  NOP
      77/     385 : D3 BE                               OUT (EXIT_PORT),A
      78/     387 : (MACRO)                             JP_EMU 0X038D
      78/     387 :  (MACRO-2)                          DUPL 0X038D-$,0;XFF
      78/     387 :                     DUPL:
      78/     387 : =0H                 $$N             EQU (0X038D-$) / 1024
      78/     387 : =6H                 $$M             EQU (0X038D-$) # 1024
      78/     387 :                                     REPT $$N
      78/     387 :                                     DB 1024 DUP(0)
      78/     387 :                                     ENDM
      78/     387 : =>TRUE                              IF $$M <> 0
      78/     387 : =>NOT BLANK                         IFB 0
      78/     387 :                                     DB $$M DUP(0)
      78/     387 : =>TRUE                              ELSE
      78/     387 : 00 00 00 00 00 00                   DB $$M DUP(0)
      78/     38D : [78]                                ENDIF
      78/     38D : [78]                                ENDIF
      78/     38D : 00                                  NOP
      78/     38E : 00                                  NOP
      78/     38F : D3 BE                               OUT (EXIT_PORT),A
      79/     391 : (MACRO)                             JP_EMU 0X0395
      79/     391 :  (MACRO-2)                          DUPL 0X0395-$,0;XFF
      79/     391 :                     DUPL:
      79/     391 : =0H                 $$N             EQU (0X0395-$) / 1024
      79/     391 : =4H                 $$M             EQU (0X0395-$) # 1024
      79/     391 :                                     REPT $$N
      79/     391 :                                     DB 1024 DUP(0)
      79/     391 :                                     ENDM
      79/     391 : =>TRUE                              IF $$M <> 0
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 51 - 2/23/2020 18:58:45


      79/     391 : =>NOT BLANK                         IFB 0
      79/     391 :                                     DB $$M DUP(0)
      79/     391 : =>TRUE                              ELSE
      79/     391 : 00 00 00 00                         DB $$M DUP(0)
      79/     395 : [79]                                ENDIF
      79/     395 : [79]                                ENDIF
      79/     395 : 00                                  NOP
      79/     396 : 00                                  NOP
      79/     397 : D3 BE                               OUT (EXIT_PORT),A
      80/     399 : (MACRO)                             JP_EMU 0X039F
      80/     399 :  (MACRO-2)                          DUPL 0X039F-$,0;XFF
      80/     399 :                     DUPL:
      80/     399 : =0H                 $$N             EQU (0X039F-$) / 1024
      80/     399 : =6H                 $$M             EQU (0X039F-$) # 1024
      80/     399 :                                     REPT $$N
      80/     399 :                                     DB 1024 DUP(0)
      80/     399 :                                     ENDM
      80/     399 : =>TRUE                              IF $$M <> 0
      80/     399 : =>NOT BLANK                         IFB 0
      80/     399 :                                     DB $$M DUP(0)
      80/     399 : =>TRUE                              ELSE
      80/     399 : 00 00 00 00 00 00                   DB $$M DUP(0)
      80/     39F : [80]                                ENDIF
      80/     39F : [80]                                ENDIF
      80/     39F : 00                                  NOP
      80/     3A0 : 00                                  NOP
      80/     3A1 : D3 BE                               OUT (EXIT_PORT),A
      81/     3A3 : (MACRO)                             JP_EMU 0X03A7
      81/     3A3 :  (MACRO-2)                          DUPL 0X03A7-$,0;XFF
      81/     3A3 :                     DUPL:
      81/     3A3 : =0H                 $$N             EQU (0X03A7-$) / 1024
      81/     3A3 : =4H                 $$M             EQU (0X03A7-$) # 1024
      81/     3A3 :                                     REPT $$N
      81/     3A3 :                                     DB 1024 DUP(0)
      81/     3A3 :                                     ENDM
      81/     3A3 : =>TRUE                              IF $$M <> 0
      81/     3A3 : =>NOT BLANK                         IFB 0
      81/     3A3 :                                     DB $$M DUP(0)
      81/     3A3 : =>TRUE                              ELSE
      81/     3A3 : 00 00 00 00                         DB $$M DUP(0)
      81/     3A7 : [81]                                ENDIF
      81/     3A7 : [81]                                ENDIF
      81/     3A7 : 00                                  NOP
      81/     3A8 : 00                                  NOP
      81/     3A9 : D3 BE                               OUT (EXIT_PORT),A
      82/     3AB : (MACRO)                             JP_EMU 0X03B1
      82/     3AB :  (MACRO-2)                          DUPL 0X03B1-$,0;XFF
      82/     3AB :                     DUPL:
      82/     3AB : =0H                 $$N             EQU (0X03B1-$) / 1024
      82/     3AB : =6H                 $$M             EQU (0X03B1-$) # 1024
      82/     3AB :                                     REPT $$N
      82/     3AB :                                     DB 1024 DUP(0)
      82/     3AB :                                     ENDM
      82/     3AB : =>TRUE                              IF $$M <> 0
      82/     3AB : =>NOT BLANK                         IFB 0
      82/     3AB :                                     DB $$M DUP(0)
      82/     3AB : =>TRUE                              ELSE
      82/     3AB : 00 00 00 00 00 00                   DB $$M DUP(0)
      82/     3B1 : [82]                                ENDIF
      82/     3B1 : [82]                                ENDIF
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 52 - 2/23/2020 18:58:45


      82/     3B1 : 00                                  NOP
      82/     3B2 : 00                                  NOP
      82/     3B3 : D3 BE                               OUT (EXIT_PORT),A
      83/     3B5 : (MACRO)                             JP_EMU 0X03B9
      83/     3B5 :  (MACRO-2)                          DUPL 0X03B9-$,0;XFF
      83/     3B5 :                     DUPL:
      83/     3B5 : =0H                 $$N             EQU (0X03B9-$) / 1024
      83/     3B5 : =4H                 $$M             EQU (0X03B9-$) # 1024
      83/     3B5 :                                     REPT $$N
      83/     3B5 :                                     DB 1024 DUP(0)
      83/     3B5 :                                     ENDM
      83/     3B5 : =>TRUE                              IF $$M <> 0
      83/     3B5 : =>NOT BLANK                         IFB 0
      83/     3B5 :                                     DB $$M DUP(0)
      83/     3B5 : =>TRUE                              ELSE
      83/     3B5 : 00 00 00 00                         DB $$M DUP(0)
      83/     3B9 : [83]                                ENDIF
      83/     3B9 : [83]                                ENDIF
      83/     3B9 : 00                                  NOP
      83/     3BA : 00                                  NOP
      83/     3BB : D3 BE                               OUT (EXIT_PORT),A
      84/     3BD : (MACRO)                             JP_EMU 0X03C3
      84/     3BD :  (MACRO-2)                          DUPL 0X03C3-$,0;XFF
      84/     3BD :                     DUPL:
      84/     3BD : =0H                 $$N             EQU (0X03C3-$) / 1024
      84/     3BD : =6H                 $$M             EQU (0X03C3-$) # 1024
      84/     3BD :                                     REPT $$N
      84/     3BD :                                     DB 1024 DUP(0)
      84/     3BD :                                     ENDM
      84/     3BD : =>TRUE                              IF $$M <> 0
      84/     3BD : =>NOT BLANK                         IFB 0
      84/     3BD :                                     DB $$M DUP(0)
      84/     3BD : =>TRUE                              ELSE
      84/     3BD : 00 00 00 00 00 00                   DB $$M DUP(0)
      84/     3C3 : [84]                                ENDIF
      84/     3C3 : [84]                                ENDIF
      84/     3C3 : 00                                  NOP
      84/     3C4 : 00                                  NOP
      84/     3C5 : D3 BE                               OUT (EXIT_PORT),A
      85/     3C7 : (MACRO)                             JP_EMU 0X03CB
      85/     3C7 :  (MACRO-2)                          DUPL 0X03CB-$,0;XFF
      85/     3C7 :                     DUPL:
      85/     3C7 : =0H                 $$N             EQU (0X03CB-$) / 1024
      85/     3C7 : =4H                 $$M             EQU (0X03CB-$) # 1024
      85/     3C7 :                                     REPT $$N
      85/     3C7 :                                     DB 1024 DUP(0)
      85/     3C7 :                                     ENDM
      85/     3C7 : =>TRUE                              IF $$M <> 0
      85/     3C7 : =>NOT BLANK                         IFB 0
      85/     3C7 :                                     DB $$M DUP(0)
      85/     3C7 : =>TRUE                              ELSE
      85/     3C7 : 00 00 00 00                         DB $$M DUP(0)
      85/     3CB : [85]                                ENDIF
      85/     3CB : [85]                                ENDIF
      85/     3CB : 00                                  NOP
      85/     3CC : 00                                  NOP
      85/     3CD : D3 BE                               OUT (EXIT_PORT),A
      86/     3CF : (MACRO)                             JP_EMU 0X03D5
      86/     3CF :  (MACRO-2)                          DUPL 0X03D5-$,0;XFF
      86/     3CF :                     DUPL:
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 53 - 2/23/2020 18:58:45


      86/     3CF : =0H                 $$N             EQU (0X03D5-$) / 1024
      86/     3CF : =6H                 $$M             EQU (0X03D5-$) # 1024
      86/     3CF :                                     REPT $$N
      86/     3CF :                                     DB 1024 DUP(0)
      86/     3CF :                                     ENDM
      86/     3CF : =>TRUE                              IF $$M <> 0
      86/     3CF : =>NOT BLANK                         IFB 0
      86/     3CF :                                     DB $$M DUP(0)
      86/     3CF : =>TRUE                              ELSE
      86/     3CF : 00 00 00 00 00 00                   DB $$M DUP(0)
      86/     3D5 : [86]                                ENDIF
      86/     3D5 : [86]                                ENDIF
      86/     3D5 : 00                                  NOP
      86/     3D6 : 00                                  NOP
      86/     3D7 : D3 BE                               OUT (EXIT_PORT),A
      87/     3D9 : (MACRO)                             JP_EMU 0X03DD
      87/     3D9 :  (MACRO-2)                          DUPL 0X03DD-$,0;XFF
      87/     3D9 :                     DUPL:
      87/     3D9 : =0H                 $$N             EQU (0X03DD-$) / 1024
      87/     3D9 : =4H                 $$M             EQU (0X03DD-$) # 1024
      87/     3D9 :                                     REPT $$N
      87/     3D9 :                                     DB 1024 DUP(0)
      87/     3D9 :                                     ENDM
      87/     3D9 : =>TRUE                              IF $$M <> 0
      87/     3D9 : =>NOT BLANK                         IFB 0
      87/     3D9 :                                     DB $$M DUP(0)
      87/     3D9 : =>TRUE                              ELSE
      87/     3D9 : 00 00 00 00                         DB $$M DUP(0)
      87/     3DD : [87]                                ENDIF
      87/     3DD : [87]                                ENDIF
      87/     3DD : 00                                  NOP
      87/     3DE : 00                                  NOP
      87/     3DF : D3 BE                               OUT (EXIT_PORT),A
      88/     3E1 : (MACRO)                             JP_EMU 0X03E7
      88/     3E1 :  (MACRO-2)                          DUPL 0X03E7-$,0;XFF
      88/     3E1 :                     DUPL:
      88/     3E1 : =0H                 $$N             EQU (0X03E7-$) / 1024
      88/     3E1 : =6H                 $$M             EQU (0X03E7-$) # 1024
      88/     3E1 :                                     REPT $$N
      88/     3E1 :                                     DB 1024 DUP(0)
      88/     3E1 :                                     ENDM
      88/     3E1 : =>TRUE                              IF $$M <> 0
      88/     3E1 : =>NOT BLANK                         IFB 0
      88/     3E1 :                                     DB $$M DUP(0)
      88/     3E1 : =>TRUE                              ELSE
      88/     3E1 : 00 00 00 00 00 00                   DB $$M DUP(0)
      88/     3E7 : [88]                                ENDIF
      88/     3E7 : [88]                                ENDIF
      88/     3E7 : 00                                  NOP
      88/     3E8 : 00                                  NOP
      88/     3E9 : D3 BE                               OUT (EXIT_PORT),A
      89/     3EB : (MACRO)                             JP_EMU 0X03EF
      89/     3EB :  (MACRO-2)                          DUPL 0X03EF-$,0;XFF
      89/     3EB :                     DUPL:
      89/     3EB : =0H                 $$N             EQU (0X03EF-$) / 1024
      89/     3EB : =4H                 $$M             EQU (0X03EF-$) # 1024
      89/     3EB :                                     REPT $$N
      89/     3EB :                                     DB 1024 DUP(0)
      89/     3EB :                                     ENDM
      89/     3EB : =>TRUE                              IF $$M <> 0
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 54 - 2/23/2020 18:58:45


      89/     3EB : =>NOT BLANK                         IFB 0
      89/     3EB :                                     DB $$M DUP(0)
      89/     3EB : =>TRUE                              ELSE
      89/     3EB : 00 00 00 00                         DB $$M DUP(0)
      89/     3EF : [89]                                ENDIF
      89/     3EF : [89]                                ENDIF
      89/     3EF : 00                                  NOP
      89/     3F0 : 00                                  NOP
      89/     3F1 : D3 BE                               OUT (EXIT_PORT),A
      90/     3F3 :                     
      91/     3F3 : (MACRO)                             DJP_EMU 0X0402
      91/     3F3 :  (MACRO-2)                          DUPL 0X0402-$,0;XFF
      91/     3F3 :                     DUPL:
      91/     3F3 : =0H                 $$N             EQU (0X0402-$) / 1024
      91/     3F3 : =FH                 $$M             EQU (0X0402-$) # 1024
      91/     3F3 :                                     REPT $$N
      91/     3F3 :                                     DB 1024 DUP(0)
      91/     3F3 :                                     ENDM
      91/     3F3 : =>TRUE                              IF $$M <> 0
      91/     3F3 : =>NOT BLANK                         IFB 0
      91/     3F3 :                                     DB $$M DUP(0)
      91/     3F3 : =>TRUE                              ELSE
      91/     3F3 : 00 00 00 00 00 00                   DB $$M DUP(0)
                    00 00 00 00 00 00 
                    00 00 00 
      91/     402 : [91]                                ENDIF
      91/     402 : [91]                                ENDIF
      91/     402 : 00                                  NOP
      91/     403 : 00                                  NOP
      91/     404 : F3                                  DI
      91/     405 : 76                                  HALT
      92/     406 : (MACRO)                             DJP_EMU 0X040A
      92/     406 :  (MACRO-2)                          DUPL 0X040A-$,0;XFF
      92/     406 :                     DUPL:
      92/     406 : =0H                 $$N             EQU (0X040A-$) / 1024
      92/     406 : =4H                 $$M             EQU (0X040A-$) # 1024
      92/     406 :                                     REPT $$N
      92/     406 :                                     DB 1024 DUP(0)
      92/     406 :                                     ENDM
      92/     406 : =>TRUE                              IF $$M <> 0
      92/     406 : =>NOT BLANK                         IFB 0
      92/     406 :                                     DB $$M DUP(0)
      92/     406 : =>TRUE                              ELSE
      92/     406 : 00 00 00 00                         DB $$M DUP(0)
      92/     40A : [92]                                ENDIF
      92/     40A : [92]                                ENDIF
      92/     40A : 00                                  NOP
      92/     40B : 00                                  NOP
      92/     40C : F3                                  DI
      92/     40D : 76                                  HALT
      93/     40E : (MACRO)                             DJP_EMU 0X0412
      93/     40E :  (MACRO-2)                          DUPL 0X0412-$,0;XFF
      93/     40E :                     DUPL:
      93/     40E : =0H                 $$N             EQU (0X0412-$) / 1024
      93/     40E : =4H                 $$M             EQU (0X0412-$) # 1024
      93/     40E :                                     REPT $$N
      93/     40E :                                     DB 1024 DUP(0)
      93/     40E :                                     ENDM
      93/     40E : =>TRUE                              IF $$M <> 0
      93/     40E : =>NOT BLANK                         IFB 0
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 55 - 2/23/2020 18:58:45


      93/     40E :                                     DB $$M DUP(0)
      93/     40E : =>TRUE                              ELSE
      93/     40E : 00 00 00 00                         DB $$M DUP(0)
      93/     412 : [93]                                ENDIF
      93/     412 : [93]                                ENDIF
      93/     412 : 00                                  NOP
      93/     413 : 00                                  NOP
      93/     414 : F3                                  DI
      93/     415 : 76                                  HALT
      94/     416 : (MACRO)                             DJP_EMU 0X041A
      94/     416 :  (MACRO-2)                          DUPL 0X041A-$,0;XFF
      94/     416 :                     DUPL:
      94/     416 : =0H                 $$N             EQU (0X041A-$) / 1024
      94/     416 : =4H                 $$M             EQU (0X041A-$) # 1024
      94/     416 :                                     REPT $$N
      94/     416 :                                     DB 1024 DUP(0)
      94/     416 :                                     ENDM
      94/     416 : =>TRUE                              IF $$M <> 0
      94/     416 : =>NOT BLANK                         IFB 0
      94/     416 :                                     DB $$M DUP(0)
      94/     416 : =>TRUE                              ELSE
      94/     416 : 00 00 00 00                         DB $$M DUP(0)
      94/     41A : [94]                                ENDIF
      94/     41A : [94]                                ENDIF
      94/     41A : 00                                  NOP
      94/     41B : 00                                  NOP
      94/     41C : F3                                  DI
      94/     41D : 76                                  HALT
      95/     41E : (MACRO)                             DJP_EMU 0X0422
      95/     41E :  (MACRO-2)                          DUPL 0X0422-$,0;XFF
      95/     41E :                     DUPL:
      95/     41E : =0H                 $$N             EQU (0X0422-$) / 1024
      95/     41E : =4H                 $$M             EQU (0X0422-$) # 1024
      95/     41E :                                     REPT $$N
      95/     41E :                                     DB 1024 DUP(0)
      95/     41E :                                     ENDM
      95/     41E : =>TRUE                              IF $$M <> 0
      95/     41E : =>NOT BLANK                         IFB 0
      95/     41E :                                     DB $$M DUP(0)
      95/     41E : =>TRUE                              ELSE
      95/     41E : 00 00 00 00                         DB $$M DUP(0)
      95/     422 : [95]                                ENDIF
      95/     422 : [95]                                ENDIF
      95/     422 : 00                                  NOP
      95/     423 : 00                                  NOP
      95/     424 : F3                                  DI
      95/     425 : 76                                  HALT
      96/     426 : (MACRO)                             DJP_EMU 0X042A
      96/     426 :  (MACRO-2)                          DUPL 0X042A-$,0;XFF
      96/     426 :                     DUPL:
      96/     426 : =0H                 $$N             EQU (0X042A-$) / 1024
      96/     426 : =4H                 $$M             EQU (0X042A-$) # 1024
      96/     426 :                                     REPT $$N
      96/     426 :                                     DB 1024 DUP(0)
      96/     426 :                                     ENDM
      96/     426 : =>TRUE                              IF $$M <> 0
      96/     426 : =>NOT BLANK                         IFB 0
      96/     426 :                                     DB $$M DUP(0)
      96/     426 : =>TRUE                              ELSE
      96/     426 : 00 00 00 00                         DB $$M DUP(0)
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 56 - 2/23/2020 18:58:45


      96/     42A : [96]                                ENDIF
      96/     42A : [96]                                ENDIF
      96/     42A : 00                                  NOP
      96/     42B : 00                                  NOP
      96/     42C : F3                                  DI
      96/     42D : 76                                  HALT
      97/     42E : (MACRO)                             DJP_EMU 0X0432
      97/     42E :  (MACRO-2)                          DUPL 0X0432-$,0;XFF
      97/     42E :                     DUPL:
      97/     42E : =0H                 $$N             EQU (0X0432-$) / 1024
      97/     42E : =4H                 $$M             EQU (0X0432-$) # 1024
      97/     42E :                                     REPT $$N
      97/     42E :                                     DB 1024 DUP(0)
      97/     42E :                                     ENDM
      97/     42E : =>TRUE                              IF $$M <> 0
      97/     42E : =>NOT BLANK                         IFB 0
      97/     42E :                                     DB $$M DUP(0)
      97/     42E : =>TRUE                              ELSE
      97/     42E : 00 00 00 00                         DB $$M DUP(0)
      97/     432 : [97]                                ENDIF
      97/     432 : [97]                                ENDIF
      97/     432 : 00                                  NOP
      97/     433 : 00                                  NOP
      97/     434 : F3                                  DI
      97/     435 : 76                                  HALT
      98/     436 : (MACRO)                             DJP_EMU 0X043A
      98/     436 :  (MACRO-2)                          DUPL 0X043A-$,0;XFF
      98/     436 :                     DUPL:
      98/     436 : =0H                 $$N             EQU (0X043A-$) / 1024
      98/     436 : =4H                 $$M             EQU (0X043A-$) # 1024
      98/     436 :                                     REPT $$N
      98/     436 :                                     DB 1024 DUP(0)
      98/     436 :                                     ENDM
      98/     436 : =>TRUE                              IF $$M <> 0
      98/     436 : =>NOT BLANK                         IFB 0
      98/     436 :                                     DB $$M DUP(0)
      98/     436 : =>TRUE                              ELSE
      98/     436 : 00 00 00 00                         DB $$M DUP(0)
      98/     43A : [98]                                ENDIF
      98/     43A : [98]                                ENDIF
      98/     43A : 00                                  NOP
      98/     43B : 00                                  NOP
      98/     43C : F3                                  DI
      98/     43D : 76                                  HALT
      99/     43E : (MACRO)                             DJP_EMU 0X0442
      99/     43E :  (MACRO-2)                          DUPL 0X0442-$,0;XFF
      99/     43E :                     DUPL:
      99/     43E : =0H                 $$N             EQU (0X0442-$) / 1024
      99/     43E : =4H                 $$M             EQU (0X0442-$) # 1024
      99/     43E :                                     REPT $$N
      99/     43E :                                     DB 1024 DUP(0)
      99/     43E :                                     ENDM
      99/     43E : =>TRUE                              IF $$M <> 0
      99/     43E : =>NOT BLANK                         IFB 0
      99/     43E :                                     DB $$M DUP(0)
      99/     43E : =>TRUE                              ELSE
      99/     43E : 00 00 00 00                         DB $$M DUP(0)
      99/     442 : [99]                                ENDIF
      99/     442 : [99]                                ENDIF
      99/     442 : 00                                  NOP
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 57 - 2/23/2020 18:58:45


      99/     443 : 00                                  NOP
      99/     444 : F3                                  DI
      99/     445 : 76                                  HALT
     100/     446 : (MACRO)                             DJP_EMU 0X044A
     100/     446 :  (MACRO-2)                          DUPL 0X044A-$,0;XFF
     100/     446 :                     DUPL:
     100/     446 : =0H                 $$N             EQU (0X044A-$) / 1024
     100/     446 : =4H                 $$M             EQU (0X044A-$) # 1024
     100/     446 :                                     REPT $$N
     100/     446 :                                     DB 1024 DUP(0)
     100/     446 :                                     ENDM
     100/     446 : =>TRUE                              IF $$M <> 0
     100/     446 : =>NOT BLANK                         IFB 0
     100/     446 :                                     DB $$M DUP(0)
     100/     446 : =>TRUE                              ELSE
     100/     446 : 00 00 00 00                         DB $$M DUP(0)
     100/     44A : [100]                               ENDIF
     100/     44A : [100]                               ENDIF
     100/     44A : 00                                  NOP
     100/     44B : 00                                  NOP
     100/     44C : F3                                  DI
     100/     44D : 76                                  HALT
     101/     44E : (MACRO)                             DJP_EMU 0X0455
     101/     44E :  (MACRO-2)                          DUPL 0X0455-$,0;XFF
     101/     44E :                     DUPL:
     101/     44E : =0H                 $$N             EQU (0X0455-$) / 1024
     101/     44E : =7H                 $$M             EQU (0X0455-$) # 1024
     101/     44E :                                     REPT $$N
     101/     44E :                                     DB 1024 DUP(0)
     101/     44E :                                     ENDM
     101/     44E : =>TRUE                              IF $$M <> 0
     101/     44E : =>NOT BLANK                         IFB 0
     101/     44E :                                     DB $$M DUP(0)
     101/     44E : =>TRUE                              ELSE
     101/     44E : 00 00 00 00 00 00                   DB $$M DUP(0)
                    00 
     101/     455 : [101]                               ENDIF
     101/     455 : [101]                               ENDIF
     101/     455 : 00                                  NOP
     101/     456 : 00                                  NOP
     101/     457 : F3                                  DI
     101/     458 : 76                                  HALT
     102/     459 : (MACRO)                             DJP_EMU 0X045D
     102/     459 :  (MACRO-2)                          DUPL 0X045D-$,0;XFF
     102/     459 :                     DUPL:
     102/     459 : =0H                 $$N             EQU (0X045D-$) / 1024
     102/     459 : =4H                 $$M             EQU (0X045D-$) # 1024
     102/     459 :                                     REPT $$N
     102/     459 :                                     DB 1024 DUP(0)
     102/     459 :                                     ENDM
     102/     459 : =>TRUE                              IF $$M <> 0
     102/     459 : =>NOT BLANK                         IFB 0
     102/     459 :                                     DB $$M DUP(0)
     102/     459 : =>TRUE                              ELSE
     102/     459 : 00 00 00 00                         DB $$M DUP(0)
     102/     45D : [102]                               ENDIF
     102/     45D : [102]                               ENDIF
     102/     45D : 00                                  NOP
     102/     45E : 00                                  NOP
     102/     45F : F3                                  DI
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 58 - 2/23/2020 18:58:45


     102/     460 : 76                                  HALT
     103/     461 : (MACRO)                             DJP_EMU 0X0467
     103/     461 :  (MACRO-2)                          DUPL 0X0467-$,0;XFF
     103/     461 :                     DUPL:
     103/     461 : =0H                 $$N             EQU (0X0467-$) / 1024
     103/     461 : =6H                 $$M             EQU (0X0467-$) # 1024
     103/     461 :                                     REPT $$N
     103/     461 :                                     DB 1024 DUP(0)
     103/     461 :                                     ENDM
     103/     461 : =>TRUE                              IF $$M <> 0
     103/     461 : =>NOT BLANK                         IFB 0
     103/     461 :                                     DB $$M DUP(0)
     103/     461 : =>TRUE                              ELSE
     103/     461 : 00 00 00 00 00 00                   DB $$M DUP(0)
     103/     467 : [103]                               ENDIF
     103/     467 : [103]                               ENDIF
     103/     467 : 00                                  NOP
     103/     468 : 00                                  NOP
     103/     469 : F3                                  DI
     103/     46A : 76                                  HALT
     104/     46B : (MACRO)                             DJP_EMU 0X0471
     104/     46B :  (MACRO-2)                          DUPL 0X0471-$,0;XFF
     104/     46B :                     DUPL:
     104/     46B : =0H                 $$N             EQU (0X0471-$) / 1024
     104/     46B : =6H                 $$M             EQU (0X0471-$) # 1024
     104/     46B :                                     REPT $$N
     104/     46B :                                     DB 1024 DUP(0)
     104/     46B :                                     ENDM
     104/     46B : =>TRUE                              IF $$M <> 0
     104/     46B : =>NOT BLANK                         IFB 0
     104/     46B :                                     DB $$M DUP(0)
     104/     46B : =>TRUE                              ELSE
     104/     46B : 00 00 00 00 00 00                   DB $$M DUP(0)
     104/     471 : [104]                               ENDIF
     104/     471 : [104]                               ENDIF
     104/     471 : 00                                  NOP
     104/     472 : 00                                  NOP
     104/     473 : F3                                  DI
     104/     474 : 76                                  HALT
     105/     475 : (MACRO)                             DJP_EMU 0X047B
     105/     475 :  (MACRO-2)                          DUPL 0X047B-$,0;XFF
     105/     475 :                     DUPL:
     105/     475 : =0H                 $$N             EQU (0X047B-$) / 1024
     105/     475 : =6H                 $$M             EQU (0X047B-$) # 1024
     105/     475 :                                     REPT $$N
     105/     475 :                                     DB 1024 DUP(0)
     105/     475 :                                     ENDM
     105/     475 : =>TRUE                              IF $$M <> 0
     105/     475 : =>NOT BLANK                         IFB 0
     105/     475 :                                     DB $$M DUP(0)
     105/     475 : =>TRUE                              ELSE
     105/     475 : 00 00 00 00 00 00                   DB $$M DUP(0)
     105/     47B : [105]                               ENDIF
     105/     47B : [105]                               ENDIF
     105/     47B : 00                                  NOP
     105/     47C : 00                                  NOP
     105/     47D : F3                                  DI
     105/     47E : 76                                  HALT
     106/     47F : (MACRO)                             DJP_EMU 0X0483
     106/     47F :  (MACRO-2)                          DUPL 0X0483-$,0;XFF
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 59 - 2/23/2020 18:58:45


     106/     47F :                     DUPL:
     106/     47F : =0H                 $$N             EQU (0X0483-$) / 1024
     106/     47F : =4H                 $$M             EQU (0X0483-$) # 1024
     106/     47F :                                     REPT $$N
     106/     47F :                                     DB 1024 DUP(0)
     106/     47F :                                     ENDM
     106/     47F : =>TRUE                              IF $$M <> 0
     106/     47F : =>NOT BLANK                         IFB 0
     106/     47F :                                     DB $$M DUP(0)
     106/     47F : =>TRUE                              ELSE
     106/     47F : 00 00 00 00                         DB $$M DUP(0)
     106/     483 : [106]                               ENDIF
     106/     483 : [106]                               ENDIF
     106/     483 : 00                                  NOP
     106/     484 : 00                                  NOP
     106/     485 : F3                                  DI
     106/     486 : 76                                  HALT
     107/     487 : (MACRO)                             DJP_EMU 0X048D
     107/     487 :  (MACRO-2)                          DUPL 0X048D-$,0;XFF
     107/     487 :                     DUPL:
     107/     487 : =0H                 $$N             EQU (0X048D-$) / 1024
     107/     487 : =6H                 $$M             EQU (0X048D-$) # 1024
     107/     487 :                                     REPT $$N
     107/     487 :                                     DB 1024 DUP(0)
     107/     487 :                                     ENDM
     107/     487 : =>TRUE                              IF $$M <> 0
     107/     487 : =>NOT BLANK                         IFB 0
     107/     487 :                                     DB $$M DUP(0)
     107/     487 : =>TRUE                              ELSE
     107/     487 : 00 00 00 00 00 00                   DB $$M DUP(0)
     107/     48D : [107]                               ENDIF
     107/     48D : [107]                               ENDIF
     107/     48D : 00                                  NOP
     107/     48E : 00                                  NOP
     107/     48F : F3                                  DI
     107/     490 : 76                                  HALT
     108/     491 : (MACRO)                             DJP_EMU 0X0495
     108/     491 :  (MACRO-2)                          DUPL 0X0495-$,0;XFF
     108/     491 :                     DUPL:
     108/     491 : =0H                 $$N             EQU (0X0495-$) / 1024
     108/     491 : =4H                 $$M             EQU (0X0495-$) # 1024
     108/     491 :                                     REPT $$N
     108/     491 :                                     DB 1024 DUP(0)
     108/     491 :                                     ENDM
     108/     491 : =>TRUE                              IF $$M <> 0
     108/     491 : =>NOT BLANK                         IFB 0
     108/     491 :                                     DB $$M DUP(0)
     108/     491 : =>TRUE                              ELSE
     108/     491 : 00 00 00 00                         DB $$M DUP(0)
     108/     495 : [108]                               ENDIF
     108/     495 : [108]                               ENDIF
     108/     495 : 00                                  NOP
     108/     496 : 00                                  NOP
     108/     497 : F3                                  DI
     108/     498 : 76                                  HALT
     109/     499 : (MACRO)                             DJP_EMU 0X049F
     109/     499 :  (MACRO-2)                          DUPL 0X049F-$,0;XFF
     109/     499 :                     DUPL:
     109/     499 : =0H                 $$N             EQU (0X049F-$) / 1024
     109/     499 : =6H                 $$M             EQU (0X049F-$) # 1024
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 60 - 2/23/2020 18:58:45


     109/     499 :                                     REPT $$N
     109/     499 :                                     DB 1024 DUP(0)
     109/     499 :                                     ENDM
     109/     499 : =>TRUE                              IF $$M <> 0
     109/     499 : =>NOT BLANK                         IFB 0
     109/     499 :                                     DB $$M DUP(0)
     109/     499 : =>TRUE                              ELSE
     109/     499 : 00 00 00 00 00 00                   DB $$M DUP(0)
     109/     49F : [109]                               ENDIF
     109/     49F : [109]                               ENDIF
     109/     49F : 00                                  NOP
     109/     4A0 : 00                                  NOP
     109/     4A1 : F3                                  DI
     109/     4A2 : 76                                  HALT
     110/     4A3 : (MACRO)                             DJP_EMU 0X04A7
     110/     4A3 :  (MACRO-2)                          DUPL 0X04A7-$,0;XFF
     110/     4A3 :                     DUPL:
     110/     4A3 : =0H                 $$N             EQU (0X04A7-$) / 1024
     110/     4A3 : =4H                 $$M             EQU (0X04A7-$) # 1024
     110/     4A3 :                                     REPT $$N
     110/     4A3 :                                     DB 1024 DUP(0)
     110/     4A3 :                                     ENDM
     110/     4A3 : =>TRUE                              IF $$M <> 0
     110/     4A3 : =>NOT BLANK                         IFB 0
     110/     4A3 :                                     DB $$M DUP(0)
     110/     4A3 : =>TRUE                              ELSE
     110/     4A3 : 00 00 00 00                         DB $$M DUP(0)
     110/     4A7 : [110]                               ENDIF
     110/     4A7 : [110]                               ENDIF
     110/     4A7 : 00                                  NOP
     110/     4A8 : 00                                  NOP
     110/     4A9 : F3                                  DI
     110/     4AA : 76                                  HALT
     111/     4AB : (MACRO)                             DJP_EMU 0X04B1
     111/     4AB :  (MACRO-2)                          DUPL 0X04B1-$,0;XFF
     111/     4AB :                     DUPL:
     111/     4AB : =0H                 $$N             EQU (0X04B1-$) / 1024
     111/     4AB : =6H                 $$M             EQU (0X04B1-$) # 1024
     111/     4AB :                                     REPT $$N
     111/     4AB :                                     DB 1024 DUP(0)
     111/     4AB :                                     ENDM
     111/     4AB : =>TRUE                              IF $$M <> 0
     111/     4AB : =>NOT BLANK                         IFB 0
     111/     4AB :                                     DB $$M DUP(0)
     111/     4AB : =>TRUE                              ELSE
     111/     4AB : 00 00 00 00 00 00                   DB $$M DUP(0)
     111/     4B1 : [111]                               ENDIF
     111/     4B1 : [111]                               ENDIF
     111/     4B1 : 00                                  NOP
     111/     4B2 : 00                                  NOP
     111/     4B3 : F3                                  DI
     111/     4B4 : 76                                  HALT
     112/     4B5 : (MACRO)                             DJP_EMU 0X04B9
     112/     4B5 :  (MACRO-2)                          DUPL 0X04B9-$,0;XFF
     112/     4B5 :                     DUPL:
     112/     4B5 : =0H                 $$N             EQU (0X04B9-$) / 1024
     112/     4B5 : =4H                 $$M             EQU (0X04B9-$) # 1024
     112/     4B5 :                                     REPT $$N
     112/     4B5 :                                     DB 1024 DUP(0)
     112/     4B5 :                                     ENDM
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 61 - 2/23/2020 18:58:45


     112/     4B5 : =>TRUE                              IF $$M <> 0
     112/     4B5 : =>NOT BLANK                         IFB 0
     112/     4B5 :                                     DB $$M DUP(0)
     112/     4B5 : =>TRUE                              ELSE
     112/     4B5 : 00 00 00 00                         DB $$M DUP(0)
     112/     4B9 : [112]                               ENDIF
     112/     4B9 : [112]                               ENDIF
     112/     4B9 : 00                                  NOP
     112/     4BA : 00                                  NOP
     112/     4BB : F3                                  DI
     112/     4BC : 76                                  HALT
     113/     4BD : (MACRO)                             DJP_EMU 0X04C3
     113/     4BD :  (MACRO-2)                          DUPL 0X04C3-$,0;XFF
     113/     4BD :                     DUPL:
     113/     4BD : =0H                 $$N             EQU (0X04C3-$) / 1024
     113/     4BD : =6H                 $$M             EQU (0X04C3-$) # 1024
     113/     4BD :                                     REPT $$N
     113/     4BD :                                     DB 1024 DUP(0)
     113/     4BD :                                     ENDM
     113/     4BD : =>TRUE                              IF $$M <> 0
     113/     4BD : =>NOT BLANK                         IFB 0
     113/     4BD :                                     DB $$M DUP(0)
     113/     4BD : =>TRUE                              ELSE
     113/     4BD : 00 00 00 00 00 00                   DB $$M DUP(0)
     113/     4C3 : [113]                               ENDIF
     113/     4C3 : [113]                               ENDIF
     113/     4C3 : 00                                  NOP
     113/     4C4 : 00                                  NOP
     113/     4C5 : F3                                  DI
     113/     4C6 : 76                                  HALT
     114/     4C7 : (MACRO)                             DJP_EMU 0X04CB
     114/     4C7 :  (MACRO-2)                          DUPL 0X04CB-$,0;XFF
     114/     4C7 :                     DUPL:
     114/     4C7 : =0H                 $$N             EQU (0X04CB-$) / 1024
     114/     4C7 : =4H                 $$M             EQU (0X04CB-$) # 1024
     114/     4C7 :                                     REPT $$N
     114/     4C7 :                                     DB 1024 DUP(0)
     114/     4C7 :                                     ENDM
     114/     4C7 : =>TRUE                              IF $$M <> 0
     114/     4C7 : =>NOT BLANK                         IFB 0
     114/     4C7 :                                     DB $$M DUP(0)
     114/     4C7 : =>TRUE                              ELSE
     114/     4C7 : 00 00 00 00                         DB $$M DUP(0)
     114/     4CB : [114]                               ENDIF
     114/     4CB : [114]                               ENDIF
     114/     4CB : 00                                  NOP
     114/     4CC : 00                                  NOP
     114/     4CD : F3                                  DI
     114/     4CE : 76                                  HALT
     115/     4CF : (MACRO)                             DJP_EMU 0X04D5
     115/     4CF :  (MACRO-2)                          DUPL 0X04D5-$,0;XFF
     115/     4CF :                     DUPL:
     115/     4CF : =0H                 $$N             EQU (0X04D5-$) / 1024
     115/     4CF : =6H                 $$M             EQU (0X04D5-$) # 1024
     115/     4CF :                                     REPT $$N
     115/     4CF :                                     DB 1024 DUP(0)
     115/     4CF :                                     ENDM
     115/     4CF : =>TRUE                              IF $$M <> 0
     115/     4CF : =>NOT BLANK                         IFB 0
     115/     4CF :                                     DB $$M DUP(0)
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 62 - 2/23/2020 18:58:45


     115/     4CF : =>TRUE                              ELSE
     115/     4CF : 00 00 00 00 00 00                   DB $$M DUP(0)
     115/     4D5 : [115]                               ENDIF
     115/     4D5 : [115]                               ENDIF
     115/     4D5 : 00                                  NOP
     115/     4D6 : 00                                  NOP
     115/     4D7 : F3                                  DI
     115/     4D8 : 76                                  HALT
     116/     4D9 : (MACRO)                             DJP_EMU 0X04DD
     116/     4D9 :  (MACRO-2)                          DUPL 0X04DD-$,0;XFF
     116/     4D9 :                     DUPL:
     116/     4D9 : =0H                 $$N             EQU (0X04DD-$) / 1024
     116/     4D9 : =4H                 $$M             EQU (0X04DD-$) # 1024
     116/     4D9 :                                     REPT $$N
     116/     4D9 :                                     DB 1024 DUP(0)
     116/     4D9 :                                     ENDM
     116/     4D9 : =>TRUE                              IF $$M <> 0
     116/     4D9 : =>NOT BLANK                         IFB 0
     116/     4D9 :                                     DB $$M DUP(0)
     116/     4D9 : =>TRUE                              ELSE
     116/     4D9 : 00 00 00 00                         DB $$M DUP(0)
     116/     4DD : [116]                               ENDIF
     116/     4DD : [116]                               ENDIF
     116/     4DD : 00                                  NOP
     116/     4DE : 00                                  NOP
     116/     4DF : F3                                  DI
     116/     4E0 : 76                                  HALT
     117/     4E1 : (MACRO)                             DJP_EMU 0X04E7
     117/     4E1 :  (MACRO-2)                          DUPL 0X04E7-$,0;XFF
     117/     4E1 :                     DUPL:
     117/     4E1 : =0H                 $$N             EQU (0X04E7-$) / 1024
     117/     4E1 : =6H                 $$M             EQU (0X04E7-$) # 1024
     117/     4E1 :                                     REPT $$N
     117/     4E1 :                                     DB 1024 DUP(0)
     117/     4E1 :                                     ENDM
     117/     4E1 : =>TRUE                              IF $$M <> 0
     117/     4E1 : =>NOT BLANK                         IFB 0
     117/     4E1 :                                     DB $$M DUP(0)
     117/     4E1 : =>TRUE                              ELSE
     117/     4E1 : 00 00 00 00 00 00                   DB $$M DUP(0)
     117/     4E7 : [117]                               ENDIF
     117/     4E7 : [117]                               ENDIF
     117/     4E7 : 00                                  NOP
     117/     4E8 : 00                                  NOP
     117/     4E9 : F3                                  DI
     117/     4EA : 76                                  HALT
     118/     4EB :                                     
     119/     4EB :                     
     120/     4EB : (MACRO)                             DUPL 0X801-$,0;XFF
     120/     4EB :                     DUPL:
     120/     4EB : =0H                 $$N             EQU (0X801-$) / 1024
     120/     4EB : =316H               $$M             EQU (0X801-$) # 1024
     120/     4EB :                                     REPT $$N
     120/     4EB :                                     DB 1024 DUP(0)
     120/     4EB :                                     ENDM
     120/     4EB : =>TRUE                              IF $$M <> 0
     120/     4EB : =>NOT BLANK                         IFB 0
     120/     4EB :                                     DB $$M DUP(0)
     120/     4EB : =>TRUE                              ELSE
     120/     4EB : 00 00 00 00 00 00                   DB $$M DUP(0)
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 63 - 2/23/2020 18:58:45


                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 64 - 2/23/2020 18:58:45


                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 65 - 2/23/2020 18:58:45


                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 
     120/     801 : [120]                               ENDIF
     120/     801 : [120]                               ENDIF
     121/     801 :                     ;[таблица адресов перехвата и вызыватора обработчиков]
     122/     801 :                     TABLE_VIRT
     123/     801 : (MACRO)                             LABEL_GEN 0X0302
     123/     801 : =0H                 _0X0302        EQU ($-TABLE_VIRT)/4
     123/     801 : 02 03 E9 08                         DW 0X0302,ADR_0X0302.WORK
     124/     805 : (MACRO)                             LABEL_GEN 0X030A
     124/     805 : =1H                 _0X030A        EQU ($-TABLE_VIRT)/4
     124/     805 : 0A 03 F1 08                         DW 0X030A,ADR_0X030A.WORK
     125/     809 : (MACRO)                             LABEL_GEN 0X0312
     125/     809 : =2H                 _0X0312        EQU ($-TABLE_VIRT)/4
     125/     809 : 12 03 F9 08                         DW 0X0312,ADR_0X0312.WORK
     126/     80D : (MACRO)                             LABEL_GEN 0X031A
     126/     80D : =3H                 _0X031A        EQU ($-TABLE_VIRT)/4
     126/     80D : 1A 03 01 09                         DW 0X031A,ADR_0X031A.WORK
     127/     811 : (MACRO)                             LABEL_GEN 0X0322
     127/     811 : =4H                 _0X0322        EQU ($-TABLE_VIRT)/4
     127/     811 : 22 03 09 09                         DW 0X0322,ADR_0X0322.WORK
     128/     815 : (MACRO)                             LABEL_GEN 0X032A
     128/     815 : =5H                 _0X032A        EQU ($-TABLE_VIRT)/4
     128/     815 : 2A 03 11 09                         DW 0X032A,ADR_0X032A.WORK
     129/     819 : (MACRO)                             LABEL_GEN 0X0332
     129/     819 : =6H                 _0X0332        EQU ($-TABLE_VIRT)/4
     129/     819 : 32 03 19 09                         DW 0X0332,ADR_0X0332.WORK
     130/     81D : (MACRO)                             LABEL_GEN 0X033A
     130/     81D : =7H                 _0X033A        EQU ($-TABLE_VIRT)/4
     130/     81D : 3A 03 21 09                         DW 0X033A,ADR_0X033A.WORK
     131/     821 : (MACRO)                             LABEL_GEN 0X0342
     131/     821 : =8H                 _0X0342        EQU ($-TABLE_VIRT)/4
     131/     821 : 42 03 29 09                         DW 0X0342,ADR_0X0342.WORK
     132/     825 : (MACRO)                             LABEL_GEN 0X034A
     132/     825 : =9H                 _0X034A        EQU ($-TABLE_VIRT)/4
     132/     825 : 4A 03 31 09                         DW 0X034A,ADR_0X034A.WORK
     133/     829 : (MACRO)                             LABEL_GEN 0X0355
     133/     829 : =AH                 _0X0355        EQU ($-TABLE_VIRT)/4
     133/     829 : 55 03 39 09                         DW 0X0355,ADR_0X0355.WORK
     134/     82D : (MACRO)                             LABEL_GEN 0X035D
     134/     82D : =BH                 _0X035D        EQU ($-TABLE_VIRT)/4
     134/     82D : 5D 03 41 09                         DW 0X035D,ADR_0X035D.WORK
     135/     831 : (MACRO)                             LABEL_GEN 0X0367
     135/     831 : =CH                 _0X0367        EQU ($-TABLE_VIRT)/4
     135/     831 : 67 03 49 09                         DW 0X0367,ADR_0X0367.WORK
     136/     835 : (MACRO)                             LABEL_GEN 0X0371
     136/     835 : =DH                 _0X0371        EQU ($-TABLE_VIRT)/4
     136/     835 : 71 03 51 09                         DW 0X0371,ADR_0X0371.WORK
     137/     839 : (MACRO)                             LABEL_GEN 0X037B
     137/     839 : =EH                 _0X037B        EQU ($-TABLE_VIRT)/4
     137/     839 : 7B 03 59 09                         DW 0X037B,ADR_0X037B.WORK
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 66 - 2/23/2020 18:58:45


     138/     83D : (MACRO)                             LABEL_GEN 0X0383
     138/     83D : =FH                 _0X0383        EQU ($-TABLE_VIRT)/4
     138/     83D : 83 03 61 09                         DW 0X0383,ADR_0X0383.WORK
     139/     841 : (MACRO)                             LABEL_GEN 0X038D
     139/     841 : =10H                _0X038D        EQU ($-TABLE_VIRT)/4
     139/     841 : 8D 03 69 09                         DW 0X038D,ADR_0X038D.WORK
     140/     845 : (MACRO)                             LABEL_GEN 0X0395
     140/     845 : =11H                _0X0395        EQU ($-TABLE_VIRT)/4
     140/     845 : 95 03 71 09                         DW 0X0395,ADR_0X0395.WORK
     141/     849 : (MACRO)                             LABEL_GEN 0X039F
     141/     849 : =12H                _0X039F        EQU ($-TABLE_VIRT)/4
     141/     849 : 9F 03 79 09                         DW 0X039F,ADR_0X039F.WORK
     142/     84D : (MACRO)                             LABEL_GEN 0X03A7
     142/     84D : =13H                _0X03A7        EQU ($-TABLE_VIRT)/4
     142/     84D : A7 03 81 09                         DW 0X03A7,ADR_0X03A7.WORK
     143/     851 : (MACRO)                             LABEL_GEN 0X03B1
     143/     851 : =14H                _0X03B1        EQU ($-TABLE_VIRT)/4
     143/     851 : B1 03 89 09                         DW 0X03B1,ADR_0X03B1.WORK
     144/     855 : (MACRO)                             LABEL_GEN 0X03B9
     144/     855 : =15H                _0X03B9        EQU ($-TABLE_VIRT)/4
     144/     855 : B9 03 91 09                         DW 0X03B9,ADR_0X03B9.WORK
     145/     859 : (MACRO)                             LABEL_GEN 0X03C3
     145/     859 : =16H                _0X03C3        EQU ($-TABLE_VIRT)/4
     145/     859 : C3 03 99 09                         DW 0X03C3,ADR_0X03C3.WORK
     146/     85D : (MACRO)                             LABEL_GEN 0X03CB
     146/     85D : =17H                _0X03CB        EQU ($-TABLE_VIRT)/4
     146/     85D : CB 03 A1 09                         DW 0X03CB,ADR_0X03CB.WORK
     147/     861 : (MACRO)                             LABEL_GEN 0X03D5
     147/     861 : =18H                _0X03D5        EQU ($-TABLE_VIRT)/4
     147/     861 : D5 03 A9 09                         DW 0X03D5,ADR_0X03D5.WORK
     148/     865 : (MACRO)                             LABEL_GEN 0X03DD
     148/     865 : =19H                _0X03DD        EQU ($-TABLE_VIRT)/4
     148/     865 : DD 03 B1 09                         DW 0X03DD,ADR_0X03DD.WORK
     149/     869 : (MACRO)                             LABEL_GEN 0X03E7
     149/     869 : =1AH                _0X03E7        EQU ($-TABLE_VIRT)/4
     149/     869 : E7 03 B9 09                         DW 0X03E7,ADR_0X03E7.WORK
     150/     86D : (MACRO)                             LABEL_GEN 0X03EF
     150/     86D : =1BH                _0X03EF        EQU ($-TABLE_VIRT)/4
     150/     86D : EF 03 C1 09                         DW 0X03EF,ADR_0X03EF.WORK
     151/     871 :                     
     152/     871 : (MACRO)                             LABEL_GEN 0X0402
     152/     871 : =1CH                _0X0402        EQU ($-TABLE_VIRT)/4
     152/     871 : 02 04 C9 09                         DW 0X0402,ADR_0X0402.WORK
     153/     875 : (MACRO)                             LABEL_GEN 0X040A
     153/     875 : =1DH                _0X040A        EQU ($-TABLE_VIRT)/4
     153/     875 : 0A 04 D1 09                         DW 0X040A,ADR_0X040A.WORK
     154/     879 : (MACRO)                             LABEL_GEN 0X0412
     154/     879 : =1EH                _0X0412        EQU ($-TABLE_VIRT)/4
     154/     879 : 12 04 D9 09                         DW 0X0412,ADR_0X0412.WORK
     155/     87D : (MACRO)                             LABEL_GEN 0X041A
     155/     87D : =1FH                _0X041A        EQU ($-TABLE_VIRT)/4
     155/     87D : 1A 04 E1 09                         DW 0X041A,ADR_0X041A.WORK
     156/     881 : (MACRO)                             LABEL_GEN 0X0422
     156/     881 : =20H                _0X0422        EQU ($-TABLE_VIRT)/4
     156/     881 : 22 04 E9 09                         DW 0X0422,ADR_0X0422.WORK
     157/     885 : (MACRO)                             LABEL_GEN 0X042A
     157/     885 : =21H                _0X042A        EQU ($-TABLE_VIRT)/4
     157/     885 : 2A 04 F1 09                         DW 0X042A,ADR_0X042A.WORK
     158/     889 : (MACRO)                             LABEL_GEN 0X0432
     158/     889 : =22H                _0X0432        EQU ($-TABLE_VIRT)/4
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 67 - 2/23/2020 18:58:45


     158/     889 : 32 04 F9 09                         DW 0X0432,ADR_0X0432.WORK
     159/     88D : (MACRO)                             LABEL_GEN 0X043A
     159/     88D : =23H                _0X043A        EQU ($-TABLE_VIRT)/4
     159/     88D : 3A 04 01 0A                         DW 0X043A,ADR_0X043A.WORK
     160/     891 : (MACRO)                             LABEL_GEN 0X0442
     160/     891 : =24H                _0X0442        EQU ($-TABLE_VIRT)/4
     160/     891 : 42 04 09 0A                         DW 0X0442,ADR_0X0442.WORK
     161/     895 : (MACRO)                             LABEL_GEN 0X044A
     161/     895 : =25H                _0X044A        EQU ($-TABLE_VIRT)/4
     161/     895 : 4A 04 11 0A                         DW 0X044A,ADR_0X044A.WORK
     162/     899 : (MACRO)                             LABEL_GEN 0X0455
     162/     899 : =26H                _0X0455        EQU ($-TABLE_VIRT)/4
     162/     899 : 55 04 19 0A                         DW 0X0455,ADR_0X0455.WORK
     163/     89D : (MACRO)                             LABEL_GEN 0X045D
     163/     89D : =27H                _0X045D        EQU ($-TABLE_VIRT)/4
     163/     89D : 5D 04 21 0A                         DW 0X045D,ADR_0X045D.WORK
     164/     8A1 : (MACRO)                             LABEL_GEN 0X0467
     164/     8A1 : =28H                _0X0467        EQU ($-TABLE_VIRT)/4
     164/     8A1 : 67 04 29 0A                         DW 0X0467,ADR_0X0467.WORK
     165/     8A5 : (MACRO)                             LABEL_GEN 0X0471
     165/     8A5 : =29H                _0X0471        EQU ($-TABLE_VIRT)/4
     165/     8A5 : 71 04 31 0A                         DW 0X0471,ADR_0X0471.WORK
     166/     8A9 : (MACRO)                             LABEL_GEN 0X047B
     166/     8A9 : =2AH                _0X047B        EQU ($-TABLE_VIRT)/4
     166/     8A9 : 7B 04 39 0A                         DW 0X047B,ADR_0X047B.WORK
     167/     8AD : (MACRO)                             LABEL_GEN 0X0483
     167/     8AD : =2BH                _0X0483        EQU ($-TABLE_VIRT)/4
     167/     8AD : 83 04 41 0A                         DW 0X0483,ADR_0X0483.WORK
     168/     8B1 : (MACRO)                             LABEL_GEN 0X048D
     168/     8B1 : =2CH                _0X048D        EQU ($-TABLE_VIRT)/4
     168/     8B1 : 8D 04 49 0A                         DW 0X048D,ADR_0X048D.WORK
     169/     8B5 : (MACRO)                             LABEL_GEN 0X0495
     169/     8B5 : =2DH                _0X0495        EQU ($-TABLE_VIRT)/4
     169/     8B5 : 95 04 51 0A                         DW 0X0495,ADR_0X0495.WORK
     170/     8B9 : (MACRO)                             LABEL_GEN 0X049F
     170/     8B9 : =2EH                _0X049F        EQU ($-TABLE_VIRT)/4
     170/     8B9 : 9F 04 59 0A                         DW 0X049F,ADR_0X049F.WORK
     171/     8BD : (MACRO)                             LABEL_GEN 0X04A7
     171/     8BD : =2FH                _0X04A7        EQU ($-TABLE_VIRT)/4
     171/     8BD : A7 04 61 0A                         DW 0X04A7,ADR_0X04A7.WORK
     172/     8C1 : (MACRO)                             LABEL_GEN 0X04B1
     172/     8C1 : =30H                _0X04B1        EQU ($-TABLE_VIRT)/4
     172/     8C1 : B1 04 69 0A                         DW 0X04B1,ADR_0X04B1.WORK
     173/     8C5 : (MACRO)                             LABEL_GEN 0X04B9
     173/     8C5 : =31H                _0X04B9        EQU ($-TABLE_VIRT)/4
     173/     8C5 : B9 04 71 0A                         DW 0X04B9,ADR_0X04B9.WORK
     174/     8C9 : (MACRO)                             LABEL_GEN 0X04C3
     174/     8C9 : =32H                _0X04C3        EQU ($-TABLE_VIRT)/4
     174/     8C9 : C3 04 79 0A                         DW 0X04C3,ADR_0X04C3.WORK
     175/     8CD : (MACRO)                             LABEL_GEN 0X04CB
     175/     8CD : =33H                _0X04CB        EQU ($-TABLE_VIRT)/4
     175/     8CD : CB 04 81 0A                         DW 0X04CB,ADR_0X04CB.WORK
     176/     8D1 : (MACRO)                             LABEL_GEN 0X04D5
     176/     8D1 : =34H                _0X04D5        EQU ($-TABLE_VIRT)/4
     176/     8D1 : D5 04 89 0A                         DW 0X04D5,ADR_0X04D5.WORK
     177/     8D5 : (MACRO)                             LABEL_GEN 0X04DD
     177/     8D5 : =35H                _0X04DD        EQU ($-TABLE_VIRT)/4
     177/     8D5 : DD 04 91 0A                         DW 0X04DD,ADR_0X04DD.WORK
     178/     8D9 : (MACRO)                             LABEL_GEN 0X04E7
     178/     8D9 : =36H                _0X04E7        EQU ($-TABLE_VIRT)/4
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 68 - 2/23/2020 18:58:45


     178/     8D9 : E7 04 99 0A                         DW 0X04E7,ADR_0X04E7.WORK
     179/     8DD : (MACRO)                             LABEL_GEN 0X04EF
     179/     8DD : =37H                _0X04EF        EQU ($-TABLE_VIRT)/4
     179/     8DD : EF 04 A1 0A                         DW 0X04EF,ADR_0X04EF.WORK
     180/     8E1 :                     
     181/     8E1 :                     ;[вызываторы перехвата]
     182/     8E1 : (MACRO)                             EMU_JUMP 0X0302
     182/     8E1 : =8E1H               ADR_0X0302     EQU $
     182/     8E1 : 32 FE 0D                            LD (OLD_AF+1),A
     182/     8E4 : 3E 00                               LD A,_0X0302
     182/     8E6 : C3 00 0F                            JP WORKER
     182/     8E9 :                     
     182/     8E9 : =8E9H               .WORK           EQU $
     183/     8E9 : (MACRO)                             EMU_JUMP 0X030A
     183/     8E9 : =8E9H               ADR_0X030A     EQU $
     183/     8E9 : 32 FE 0D                            LD (OLD_AF+1),A
     183/     8EC : 3E 01                               LD A,_0X030A
     183/     8EE : C3 00 0F                            JP WORKER
     183/     8F1 :                     
     183/     8F1 : =8F1H               .WORK           EQU $
     184/     8F1 : (MACRO)                             EMU_JUMP 0X0312
     184/     8F1 : =8F1H               ADR_0X0312     EQU $
     184/     8F1 : 32 FE 0D                            LD (OLD_AF+1),A
     184/     8F4 : 3E 02                               LD A,_0X0312
     184/     8F6 : C3 00 0F                            JP WORKER
     184/     8F9 :                     
     184/     8F9 : =8F9H               .WORK           EQU $
     185/     8F9 : (MACRO)                             EMU_JUMP 0X031A
     185/     8F9 : =8F9H               ADR_0X031A     EQU $
     185/     8F9 : 32 FE 0D                            LD (OLD_AF+1),A
     185/     8FC : 3E 03                               LD A,_0X031A
     185/     8FE : C3 00 0F                            JP WORKER
     185/     901 :                     
     185/     901 : =901H               .WORK           EQU $
     186/     901 : (MACRO)                             EMU_JUMP 0X0322
     186/     901 : =901H               ADR_0X0322     EQU $
     186/     901 : 32 FE 0D                            LD (OLD_AF+1),A
     186/     904 : 3E 04                               LD A,_0X0322
     186/     906 : C3 00 0F                            JP WORKER
     186/     909 :                     
     186/     909 : =909H               .WORK           EQU $
     187/     909 : (MACRO)                             EMU_JUMP 0X032A
     187/     909 : =909H               ADR_0X032A     EQU $
     187/     909 : 32 FE 0D                            LD (OLD_AF+1),A
     187/     90C : 3E 05                               LD A,_0X032A
     187/     90E : C3 00 0F                            JP WORKER
     187/     911 :                     
     187/     911 : =911H               .WORK           EQU $
     188/     911 : (MACRO)                             EMU_JUMP 0X0332
     188/     911 : =911H               ADR_0X0332     EQU $
     188/     911 : 32 FE 0D                            LD (OLD_AF+1),A
     188/     914 : 3E 06                               LD A,_0X0332
     188/     916 : C3 00 0F                            JP WORKER
     188/     919 :                     
     188/     919 : =919H               .WORK           EQU $
     189/     919 : (MACRO)                             EMU_JUMP 0X033A
     189/     919 : =919H               ADR_0X033A     EQU $
     189/     919 : 32 FE 0D                            LD (OLD_AF+1),A
     189/     91C : 3E 07                               LD A,_0X033A
     189/     91E : C3 00 0F                            JP WORKER
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 69 - 2/23/2020 18:58:45


     189/     921 :                     
     189/     921 : =921H               .WORK           EQU $
     190/     921 : (MACRO)                             EMU_JUMP 0X0342
     190/     921 : =921H               ADR_0X0342     EQU $
     190/     921 : 32 FE 0D                            LD (OLD_AF+1),A
     190/     924 : 3E 08                               LD A,_0X0342
     190/     926 : C3 00 0F                            JP WORKER
     190/     929 :                     
     190/     929 : =929H               .WORK           EQU $
     191/     929 : (MACRO)                             EMU_JUMP 0X034A
     191/     929 : =929H               ADR_0X034A     EQU $
     191/     929 : 32 FE 0D                            LD (OLD_AF+1),A
     191/     92C : 3E 09                               LD A,_0X034A
     191/     92E : C3 00 0F                            JP WORKER
     191/     931 :                     
     191/     931 : =931H               .WORK           EQU $
     192/     931 : (MACRO)                             EMU_JUMP 0X0355
     192/     931 : =931H               ADR_0X0355     EQU $
     192/     931 : 32 FE 0D                            LD (OLD_AF+1),A
     192/     934 : 3E 0A                               LD A,_0X0355
     192/     936 : C3 00 0F                            JP WORKER
     192/     939 :                     
     192/     939 : =939H               .WORK           EQU $
     193/     939 : (MACRO)                             EMU_JUMP 0X035D
     193/     939 : =939H               ADR_0X035D     EQU $
     193/     939 : 32 FE 0D                            LD (OLD_AF+1),A
     193/     93C : 3E 0B                               LD A,_0X035D
     193/     93E : C3 00 0F                            JP WORKER
     193/     941 :                     
     193/     941 : =941H               .WORK           EQU $
     194/     941 : (MACRO)                             EMU_JUMP 0X0367
     194/     941 : =941H               ADR_0X0367     EQU $
     194/     941 : 32 FE 0D                            LD (OLD_AF+1),A
     194/     944 : 3E 0C                               LD A,_0X0367
     194/     946 : C3 00 0F                            JP WORKER
     194/     949 :                     
     194/     949 : =949H               .WORK           EQU $
     195/     949 : (MACRO)                             EMU_JUMP 0X0371
     195/     949 : =949H               ADR_0X0371     EQU $
     195/     949 : 32 FE 0D                            LD (OLD_AF+1),A
     195/     94C : 3E 0D                               LD A,_0X0371
     195/     94E : C3 00 0F                            JP WORKER
     195/     951 :                     
     195/     951 : =951H               .WORK           EQU $
     196/     951 : (MACRO)                             EMU_JUMP 0X037B
     196/     951 : =951H               ADR_0X037B     EQU $
     196/     951 : 32 FE 0D                            LD (OLD_AF+1),A
     196/     954 : 3E 0E                               LD A,_0X037B
     196/     956 : C3 00 0F                            JP WORKER
     196/     959 :                     
     196/     959 : =959H               .WORK           EQU $
     197/     959 : (MACRO)                             EMU_JUMP 0X0383
     197/     959 : =959H               ADR_0X0383     EQU $
     197/     959 : 32 FE 0D                            LD (OLD_AF+1),A
     197/     95C : 3E 0F                               LD A,_0X0383
     197/     95E : C3 00 0F                            JP WORKER
     197/     961 :                     
     197/     961 : =961H               .WORK           EQU $
     198/     961 : (MACRO)                             EMU_JUMP 0X038D
     198/     961 : =961H               ADR_0X038D     EQU $
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 70 - 2/23/2020 18:58:45


     198/     961 : 32 FE 0D                            LD (OLD_AF+1),A
     198/     964 : 3E 10                               LD A,_0X038D
     198/     966 : C3 00 0F                            JP WORKER
     198/     969 :                     
     198/     969 : =969H               .WORK           EQU $
     199/     969 : (MACRO)                             EMU_JUMP 0X0395
     199/     969 : =969H               ADR_0X0395     EQU $
     199/     969 : 32 FE 0D                            LD (OLD_AF+1),A
     199/     96C : 3E 11                               LD A,_0X0395
     199/     96E : C3 00 0F                            JP WORKER
     199/     971 :                     
     199/     971 : =971H               .WORK           EQU $
     200/     971 : (MACRO)                             EMU_JUMP 0X039F
     200/     971 : =971H               ADR_0X039F     EQU $
     200/     971 : 32 FE 0D                            LD (OLD_AF+1),A
     200/     974 : 3E 12                               LD A,_0X039F
     200/     976 : C3 00 0F                            JP WORKER
     200/     979 :                     
     200/     979 : =979H               .WORK           EQU $
     201/     979 : (MACRO)                             EMU_JUMP 0X03A7
     201/     979 : =979H               ADR_0X03A7     EQU $
     201/     979 : 32 FE 0D                            LD (OLD_AF+1),A
     201/     97C : 3E 13                               LD A,_0X03A7
     201/     97E : C3 00 0F                            JP WORKER
     201/     981 :                     
     201/     981 : =981H               .WORK           EQU $
     202/     981 : (MACRO)                             EMU_JUMP 0X03B1
     202/     981 : =981H               ADR_0X03B1     EQU $
     202/     981 : 32 FE 0D                            LD (OLD_AF+1),A
     202/     984 : 3E 14                               LD A,_0X03B1
     202/     986 : C3 00 0F                            JP WORKER
     202/     989 :                     
     202/     989 : =989H               .WORK           EQU $
     203/     989 : (MACRO)                             EMU_JUMP 0X03B9
     203/     989 : =989H               ADR_0X03B9     EQU $
     203/     989 : 32 FE 0D                            LD (OLD_AF+1),A
     203/     98C : 3E 15                               LD A,_0X03B9
     203/     98E : C3 00 0F                            JP WORKER
     203/     991 :                     
     203/     991 : =991H               .WORK           EQU $
     204/     991 : (MACRO)                             EMU_JUMP 0X03C3
     204/     991 : =991H               ADR_0X03C3     EQU $
     204/     991 : 32 FE 0D                            LD (OLD_AF+1),A
     204/     994 : 3E 16                               LD A,_0X03C3
     204/     996 : C3 00 0F                            JP WORKER
     204/     999 :                     
     204/     999 : =999H               .WORK           EQU $
     205/     999 : (MACRO)                             EMU_JUMP 0X03CB
     205/     999 : =999H               ADR_0X03CB     EQU $
     205/     999 : 32 FE 0D                            LD (OLD_AF+1),A
     205/     99C : 3E 17                               LD A,_0X03CB
     205/     99E : C3 00 0F                            JP WORKER
     205/     9A1 :                     
     205/     9A1 : =9A1H               .WORK           EQU $
     206/     9A1 : (MACRO)                             EMU_JUMP 0X03D5
     206/     9A1 : =9A1H               ADR_0X03D5     EQU $
     206/     9A1 : 32 FE 0D                            LD (OLD_AF+1),A
     206/     9A4 : 3E 18                               LD A,_0X03D5
     206/     9A6 : C3 00 0F                            JP WORKER
     206/     9A9 :                     
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 71 - 2/23/2020 18:58:45


     206/     9A9 : =9A9H               .WORK           EQU $
     207/     9A9 : (MACRO)                             EMU_JUMP 0X03DD
     207/     9A9 : =9A9H               ADR_0X03DD     EQU $
     207/     9A9 : 32 FE 0D                            LD (OLD_AF+1),A
     207/     9AC : 3E 19                               LD A,_0X03DD
     207/     9AE : C3 00 0F                            JP WORKER
     207/     9B1 :                     
     207/     9B1 : =9B1H               .WORK           EQU $
     208/     9B1 : (MACRO)                             EMU_JUMP 0X03E7
     208/     9B1 : =9B1H               ADR_0X03E7     EQU $
     208/     9B1 : 32 FE 0D                            LD (OLD_AF+1),A
     208/     9B4 : 3E 1A                               LD A,_0X03E7
     208/     9B6 : C3 00 0F                            JP WORKER
     208/     9B9 :                     
     208/     9B9 : =9B9H               .WORK           EQU $
     209/     9B9 : (MACRO)                             EMU_JUMP 0X03EF
     209/     9B9 : =9B9H               ADR_0X03EF     EQU $
     209/     9B9 : 32 FE 0D                            LD (OLD_AF+1),A
     209/     9BC : 3E 1B                               LD A,_0X03EF
     209/     9BE : C3 00 0F                            JP WORKER
     209/     9C1 :                     
     209/     9C1 : =9C1H               .WORK           EQU $
     210/     9C1 :                     
     211/     9C1 : (MACRO)                             EMU_JUMP 0X0402
     211/     9C1 : =9C1H               ADR_0X0402     EQU $
     211/     9C1 : 32 FE 0D                            LD (OLD_AF+1),A
     211/     9C4 : 3E 1C                               LD A,_0X0402
     211/     9C6 : C3 00 0F                            JP WORKER
     211/     9C9 :                     
     211/     9C9 : =9C9H               .WORK           EQU $
     212/     9C9 : (MACRO)                             EMU_JUMP 0X040A
     212/     9C9 : =9C9H               ADR_0X040A     EQU $
     212/     9C9 : 32 FE 0D                            LD (OLD_AF+1),A
     212/     9CC : 3E 1D                               LD A,_0X040A
     212/     9CE : C3 00 0F                            JP WORKER
     212/     9D1 :                     
     212/     9D1 : =9D1H               .WORK           EQU $
     213/     9D1 : (MACRO)                             EMU_JUMP 0X0412
     213/     9D1 : =9D1H               ADR_0X0412     EQU $
     213/     9D1 : 32 FE 0D                            LD (OLD_AF+1),A
     213/     9D4 : 3E 1E                               LD A,_0X0412
     213/     9D6 : C3 00 0F                            JP WORKER
     213/     9D9 :                     
     213/     9D9 : =9D9H               .WORK           EQU $
     214/     9D9 : (MACRO)                             EMU_JUMP 0X041A
     214/     9D9 : =9D9H               ADR_0X041A     EQU $
     214/     9D9 : 32 FE 0D                            LD (OLD_AF+1),A
     214/     9DC : 3E 1F                               LD A,_0X041A
     214/     9DE : C3 00 0F                            JP WORKER
     214/     9E1 :                     
     214/     9E1 : =9E1H               .WORK           EQU $
     215/     9E1 : (MACRO)                             EMU_JUMP 0X0422
     215/     9E1 : =9E1H               ADR_0X0422     EQU $
     215/     9E1 : 32 FE 0D                            LD (OLD_AF+1),A
     215/     9E4 : 3E 20                               LD A,_0X0422
     215/     9E6 : C3 00 0F                            JP WORKER
     215/     9E9 :                     
     215/     9E9 : =9E9H               .WORK           EQU $
     216/     9E9 : (MACRO)                             EMU_JUMP 0X042A
     216/     9E9 : =9E9H               ADR_0X042A     EQU $
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 72 - 2/23/2020 18:58:45


     216/     9E9 : 32 FE 0D                            LD (OLD_AF+1),A
     216/     9EC : 3E 21                               LD A,_0X042A
     216/     9EE : C3 00 0F                            JP WORKER
     216/     9F1 :                     
     216/     9F1 : =9F1H               .WORK           EQU $
     217/     9F1 : (MACRO)                             EMU_JUMP 0X0432
     217/     9F1 : =9F1H               ADR_0X0432     EQU $
     217/     9F1 : 32 FE 0D                            LD (OLD_AF+1),A
     217/     9F4 : 3E 22                               LD A,_0X0432
     217/     9F6 : C3 00 0F                            JP WORKER
     217/     9F9 :                     
     217/     9F9 : =9F9H               .WORK           EQU $
     218/     9F9 : (MACRO)                             EMU_JUMP 0X043A
     218/     9F9 : =9F9H               ADR_0X043A     EQU $
     218/     9F9 : 32 FE 0D                            LD (OLD_AF+1),A
     218/     9FC : 3E 23                               LD A,_0X043A
     218/     9FE : C3 00 0F                            JP WORKER
     218/     A01 :                     
     218/     A01 : =A01H               .WORK           EQU $
     219/     A01 : (MACRO)                             EMU_JUMP 0X0442
     219/     A01 : =A01H               ADR_0X0442     EQU $
     219/     A01 : 32 FE 0D                            LD (OLD_AF+1),A
     219/     A04 : 3E 24                               LD A,_0X0442
     219/     A06 : C3 00 0F                            JP WORKER
     219/     A09 :                     
     219/     A09 : =A09H               .WORK           EQU $
     220/     A09 : (MACRO)                             EMU_JUMP 0X044A
     220/     A09 : =A09H               ADR_0X044A     EQU $
     220/     A09 : 32 FE 0D                            LD (OLD_AF+1),A
     220/     A0C : 3E 25                               LD A,_0X044A
     220/     A0E : C3 00 0F                            JP WORKER
     220/     A11 :                     
     220/     A11 : =A11H               .WORK           EQU $
     221/     A11 : (MACRO)                             EMU_JUMP 0X0455
     221/     A11 : =A11H               ADR_0X0455     EQU $
     221/     A11 : 32 FE 0D                            LD (OLD_AF+1),A
     221/     A14 : 3E 26                               LD A,_0X0455
     221/     A16 : C3 00 0F                            JP WORKER
     221/     A19 :                     
     221/     A19 : =A19H               .WORK           EQU $
     222/     A19 : (MACRO)                             EMU_JUMP 0X045D
     222/     A19 : =A19H               ADR_0X045D     EQU $
     222/     A19 : 32 FE 0D                            LD (OLD_AF+1),A
     222/     A1C : 3E 27                               LD A,_0X045D
     222/     A1E : C3 00 0F                            JP WORKER
     222/     A21 :                     
     222/     A21 : =A21H               .WORK           EQU $
     223/     A21 : (MACRO)                             EMU_JUMP 0X0467
     223/     A21 : =A21H               ADR_0X0467     EQU $
     223/     A21 : 32 FE 0D                            LD (OLD_AF+1),A
     223/     A24 : 3E 28                               LD A,_0X0467
     223/     A26 : C3 00 0F                            JP WORKER
     223/     A29 :                     
     223/     A29 : =A29H               .WORK           EQU $
     224/     A29 : (MACRO)                             EMU_JUMP 0X0471
     224/     A29 : =A29H               ADR_0X0471     EQU $
     224/     A29 : 32 FE 0D                            LD (OLD_AF+1),A
     224/     A2C : 3E 29                               LD A,_0X0471
     224/     A2E : C3 00 0F                            JP WORKER
     224/     A31 :                     
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 73 - 2/23/2020 18:58:45


     224/     A31 : =A31H               .WORK           EQU $
     225/     A31 : (MACRO)                             EMU_JUMP 0X047B
     225/     A31 : =A31H               ADR_0X047B     EQU $
     225/     A31 : 32 FE 0D                            LD (OLD_AF+1),A
     225/     A34 : 3E 2A                               LD A,_0X047B
     225/     A36 : C3 00 0F                            JP WORKER
     225/     A39 :                     
     225/     A39 : =A39H               .WORK           EQU $
     226/     A39 : (MACRO)                             EMU_JUMP 0X0483
     226/     A39 : =A39H               ADR_0X0483     EQU $
     226/     A39 : 32 FE 0D                            LD (OLD_AF+1),A
     226/     A3C : 3E 2B                               LD A,_0X0483
     226/     A3E : C3 00 0F                            JP WORKER
     226/     A41 :                     
     226/     A41 : =A41H               .WORK           EQU $
     227/     A41 : (MACRO)                             EMU_JUMP 0X048D
     227/     A41 : =A41H               ADR_0X048D     EQU $
     227/     A41 : 32 FE 0D                            LD (OLD_AF+1),A
     227/     A44 : 3E 2C                               LD A,_0X048D
     227/     A46 : C3 00 0F                            JP WORKER
     227/     A49 :                     
     227/     A49 : =A49H               .WORK           EQU $
     228/     A49 : (MACRO)                             EMU_JUMP 0X0495
     228/     A49 : =A49H               ADR_0X0495     EQU $
     228/     A49 : 32 FE 0D                            LD (OLD_AF+1),A
     228/     A4C : 3E 2D                               LD A,_0X0495
     228/     A4E : C3 00 0F                            JP WORKER
     228/     A51 :                     
     228/     A51 : =A51H               .WORK           EQU $
     229/     A51 : (MACRO)                             EMU_JUMP 0X049F
     229/     A51 : =A51H               ADR_0X049F     EQU $
     229/     A51 : 32 FE 0D                            LD (OLD_AF+1),A
     229/     A54 : 3E 2E                               LD A,_0X049F
     229/     A56 : C3 00 0F                            JP WORKER
     229/     A59 :                     
     229/     A59 : =A59H               .WORK           EQU $
     230/     A59 : (MACRO)                             EMU_JUMP 0X04A7
     230/     A59 : =A59H               ADR_0X04A7     EQU $
     230/     A59 : 32 FE 0D                            LD (OLD_AF+1),A
     230/     A5C : 3E 2F                               LD A,_0X04A7
     230/     A5E : C3 00 0F                            JP WORKER
     230/     A61 :                     
     230/     A61 : =A61H               .WORK           EQU $
     231/     A61 : (MACRO)                             EMU_JUMP 0X04B1
     231/     A61 : =A61H               ADR_0X04B1     EQU $
     231/     A61 : 32 FE 0D                            LD (OLD_AF+1),A
     231/     A64 : 3E 30                               LD A,_0X04B1
     231/     A66 : C3 00 0F                            JP WORKER
     231/     A69 :                     
     231/     A69 : =A69H               .WORK           EQU $
     232/     A69 : (MACRO)                             EMU_JUMP 0X04B9
     232/     A69 : =A69H               ADR_0X04B9     EQU $
     232/     A69 : 32 FE 0D                            LD (OLD_AF+1),A
     232/     A6C : 3E 31                               LD A,_0X04B9
     232/     A6E : C3 00 0F                            JP WORKER
     232/     A71 :                     
     232/     A71 : =A71H               .WORK           EQU $
     233/     A71 : (MACRO)                             EMU_JUMP 0X04C3
     233/     A71 : =A71H               ADR_0X04C3     EQU $
     233/     A71 : 32 FE 0D                            LD (OLD_AF+1),A
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 74 - 2/23/2020 18:58:45


     233/     A74 : 3E 32                               LD A,_0X04C3
     233/     A76 : C3 00 0F                            JP WORKER
     233/     A79 :                     
     233/     A79 : =A79H               .WORK           EQU $
     234/     A79 : (MACRO)                             EMU_JUMP 0X04CB
     234/     A79 : =A79H               ADR_0X04CB     EQU $
     234/     A79 : 32 FE 0D                            LD (OLD_AF+1),A
     234/     A7C : 3E 33                               LD A,_0X04CB
     234/     A7E : C3 00 0F                            JP WORKER
     234/     A81 :                     
     234/     A81 : =A81H               .WORK           EQU $
     235/     A81 : (MACRO)                             EMU_JUMP 0X04D5
     235/     A81 : =A81H               ADR_0X04D5     EQU $
     235/     A81 : 32 FE 0D                            LD (OLD_AF+1),A
     235/     A84 : 3E 34                               LD A,_0X04D5
     235/     A86 : C3 00 0F                            JP WORKER
     235/     A89 :                     
     235/     A89 : =A89H               .WORK           EQU $
     236/     A89 : (MACRO)                             EMU_JUMP 0X04DD
     236/     A89 : =A89H               ADR_0X04DD     EQU $
     236/     A89 : 32 FE 0D                            LD (OLD_AF+1),A
     236/     A8C : 3E 35                               LD A,_0X04DD
     236/     A8E : C3 00 0F                            JP WORKER
     236/     A91 :                     
     236/     A91 : =A91H               .WORK           EQU $
     237/     A91 : (MACRO)                             EMU_JUMP 0X04E7
     237/     A91 : =A91H               ADR_0X04E7     EQU $
     237/     A91 : 32 FE 0D                            LD (OLD_AF+1),A
     237/     A94 : 3E 36                               LD A,_0X04E7
     237/     A96 : C3 00 0F                            JP WORKER
     237/     A99 :                     
     237/     A99 : =A99H               .WORK           EQU $
     238/     A99 : (MACRO)                             EMU_JUMP 0X04EF
     238/     A99 : =A99H               ADR_0X04EF     EQU $
     238/     A99 : 32 FE 0D                            LD (OLD_AF+1),A
     238/     A9C : 3E 37                               LD A,_0X04EF
     238/     A9E : C3 00 0F                            JP WORKER
     238/     AA1 :                     
     238/     AA1 : =AA1H               .WORK           EQU $
     239/     AA1 :                     
     240/     AA1 : (MACRO)                             DUPL STACK+0X101-$,0;XFF
     240/     AA1 :                     DUPL:
     240/     AA1 : =1H                 $$N             EQU (STACK+0X101-$) / 1024
     240/     AA1 : =5FH                $$M             EQU (STACK+0X101-$) # 1024
     240/     AA1 :                                     REPT $$N
     240/     AA1 :                                     DB 1024 DUP(0)
     240/     AA1 :                                     ENDM
     240/     AA1 : 00 00 00 00 00 00                   DB 1024 DUP(0)
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 75 - 2/23/2020 18:58:45


                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 76 - 2/23/2020 18:58:45


                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 77 - 2/23/2020 18:58:45


                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 
     240/     EA1 : =>TRUE                              IF $$M <> 0
     240/     EA1 : =>NOT BLANK                         IFB 0
     240/     EA1 :                                     DB $$M DUP(0)
     240/     EA1 : =>TRUE                              ELSE
     240/     EA1 : 00 00 00 00 00 00                   DB $$M DUP(0)
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 
     240/     F00 : [240]                               ENDIF
     240/     F00 : [240]                               ENDIF
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 78 - 2/23/2020 18:58:45


     241/     F00 :                     ;вход в обработчик
     242/     F00 : C9                  WORKER          RET
     243/     F01 :                     
     244/     F01 : (MACRO)                             DUPL 0X3D2F-$,0;XFF
     244/     F01 :                     DUPL:
     244/     F01 : =BH                 $$N             EQU (0X3D2F-$) / 1024
     244/     F01 : =22EH               $$M             EQU (0X3D2F-$) # 1024
     244/     F01 :                                     REPT $$N
     244/     F01 :                                     DB 1024 DUP(0)
     244/     F01 :                                     ENDM
     244/     F01 : 00 00 00 00 00 00                   DB 1024 DUP(0)
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 79 - 2/23/2020 18:58:45


                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 80 - 2/23/2020 18:58:45


                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 81 - 2/23/2020 18:58:45


                    00 00 00 00 
     244/    1301 : 00 00 00 00 00 00                   DB 1024 DUP(0)
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 82 - 2/23/2020 18:58:45


                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 83 - 2/23/2020 18:58:45


                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 
     244/    1701 : 00 00 00 00 00 00                   DB 1024 DUP(0)
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 84 - 2/23/2020 18:58:45


                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 85 - 2/23/2020 18:58:45


                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 86 - 2/23/2020 18:58:45


                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 
     244/    1B01 : 00 00 00 00 00 00                   DB 1024 DUP(0)
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 87 - 2/23/2020 18:58:45


                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 88 - 2/23/2020 18:58:45


                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 89 - 2/23/2020 18:58:45


                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 
     244/    1F01 : 00 00 00 00 00 00                   DB 1024 DUP(0)
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 90 - 2/23/2020 18:58:45


                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 91 - 2/23/2020 18:58:45


                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 92 - 2/23/2020 18:58:45


                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 
     244/    2301 : 00 00 00 00 00 00                   DB 1024 DUP(0)
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 93 - 2/23/2020 18:58:45


                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 94 - 2/23/2020 18:58:45


                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 95 - 2/23/2020 18:58:45


                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 
     244/    2701 : 00 00 00 00 00 00                   DB 1024 DUP(0)
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 96 - 2/23/2020 18:58:45


                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 97 - 2/23/2020 18:58:45


                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 98 - 2/23/2020 18:58:45


                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 
     244/    2B01 : 00 00 00 00 00 00                   DB 1024 DUP(0)
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 99 - 2/23/2020 18:58:45


                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 100 - 2/23/2020 18:58:45


                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 
     244/    2F01 : 00 00 00 00 00 00                   DB 1024 DUP(0)
                    00 00 00 00 00 00 
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 101 - 2/23/2020 18:58:45


                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 102 - 2/23/2020 18:58:45


                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 103 - 2/23/2020 18:58:45


                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 
     244/    3301 : 00 00 00 00 00 00                   DB 1024 DUP(0)
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 104 - 2/23/2020 18:58:45


                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 105 - 2/23/2020 18:58:45


                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 106 - 2/23/2020 18:58:45


                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 
     244/    3701 : 00 00 00 00 00 00                   DB 1024 DUP(0)
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 107 - 2/23/2020 18:58:45


                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 108 - 2/23/2020 18:58:45


                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 109 - 2/23/2020 18:58:45


                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 
     244/    3B01 : =>TRUE                              IF $$M <> 0
     244/    3B01 : =>NOT BLANK                         IFB 0
     244/    3B01 :                                     DB $$M DUP(0)
     244/    3B01 : =>TRUE                              ELSE
     244/    3B01 : 00 00 00 00 00 00                   DB $$M DUP(0)
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 110 - 2/23/2020 18:58:45


                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 111 - 2/23/2020 18:58:45


                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
     244/    3D2F : [244]                               ENDIF
     244/    3D2F : [244]                               ENDIF
     245/    3D2F : 00                                  NOP
     246/    3D30 : C9                                  RET
     247/    3D31 :                     
     248/    3D31 : (MACRO)                             DUPL 0X3FF8-$,0
     248/    3D31 :                     DUPL:
     248/    3D31 : =0H                 $$N             EQU (0X3FF8-$) / 1024
     248/    3D31 : =2C7H               $$M             EQU (0X3FF8-$) # 1024
     248/    3D31 :                                     REPT $$N
     248/    3D31 :                                     DB 1024 DUP(0)
     248/    3D31 :                                     ENDM
     248/    3D31 : =>TRUE                              IF $$M <> 0
     248/    3D31 : =>NOT BLANK                         IFB 0
     248/    3D31 :                                     DB $$M DUP(0)
     248/    3D31 : =>TRUE                              ELSE
     248/    3D31 : 00 00 00 00 00 00                   DB $$M DUP(0)
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 112 - 2/23/2020 18:58:45


                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 113 - 2/23/2020 18:58:45


                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 00 00 00 
                    00 00 00 
     248/    3FF8 : [248]                               ENDIF
     248/    3FF8 : [248]                               ENDIF
     249/    3FF8 : 45 56 4F 53 46 45                   DB "EVOSFE"
     250/    3FFE : 57 A8                               DW DATA_VERS
     251/    4000 :                     
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 114 - 2/23/2020 18:58:45


  symbol table (* = unused):
  ------------------------

*ADDR_RET :                    3CA7 - | *ADDR_RET_Size :                  2 - |
*ADRBRK_EMUTAP :                569 - |  ADRTEKV :                     BDF4 - |
*ADR_0X0302 :                   8E1 - |  ADR_0X0302.WORK :              8E9 - |
*ADR_0X030A :                   8E9 - |  ADR_0X030A.WORK :              8F1 - |
*ADR_0X0312 :                   8F1 - |  ADR_0X0312.WORK :              8F9 - |
*ADR_0X031A :                   8F9 - |  ADR_0X031A.WORK :              901 - |
*ADR_0X0322 :                   901 - |  ADR_0X0322.WORK :              909 - |
*ADR_0X032A :                   909 - |  ADR_0X032A.WORK :              911 - |
*ADR_0X0332 :                   911 - |  ADR_0X0332.WORK :              919 - |
*ADR_0X033A :                   919 - |  ADR_0X033A.WORK :              921 - |
*ADR_0X0342 :                   921 - |  ADR_0X0342.WORK :              929 - |
*ADR_0X034A :                   929 - |  ADR_0X034A.WORK :              931 - |
*ADR_0X0355 :                   931 - |  ADR_0X0355.WORK :              939 - |
*ADR_0X035D :                   939 - |  ADR_0X035D.WORK :              941 - |
*ADR_0X0367 :                   941 - |  ADR_0X0367.WORK :              949 - |
*ADR_0X0371 :                   949 - |  ADR_0X0371.WORK :              951 - |
*ADR_0X037B :                   951 - |  ADR_0X037B.WORK :              959 - |
*ADR_0X0383 :                   959 - |  ADR_0X0383.WORK :              961 - |
*ADR_0X038D :                   961 - |  ADR_0X038D.WORK :              969 - |
*ADR_0X0395 :                   969 - |  ADR_0X0395.WORK :              971 - |
*ADR_0X039F :                   971 - |  ADR_0X039F.WORK :              979 - |
*ADR_0X03A7 :                   979 - |  ADR_0X03A7.WORK :              981 - |
*ADR_0X03B1 :                   981 - |  ADR_0X03B1.WORK :              989 - |
*ADR_0X03B9 :                   989 - |  ADR_0X03B9.WORK :              991 - |
*ADR_0X03C3 :                   991 - |  ADR_0X03C3.WORK :              999 - |
*ADR_0X03CB :                   999 - |  ADR_0X03CB.WORK :              9A1 - |
*ADR_0X03D5 :                   9A1 - |  ADR_0X03D5.WORK :              9A9 - |
*ADR_0X03DD :                   9A9 - |  ADR_0X03DD.WORK :              9B1 - |
*ADR_0X03E7 :                   9B1 - |  ADR_0X03E7.WORK :              9B9 - |
*ADR_0X03EF :                   9B9 - |  ADR_0X03EF.WORK :              9C1 - |
*ADR_0X0402 :                   9C1 - |  ADR_0X0402.WORK :              9C9 - |
*ADR_0X040A :                   9C9 - |  ADR_0X040A.WORK :              9D1 - |
*ADR_0X0412 :                   9D1 - |  ADR_0X0412.WORK :              9D9 - |
*ADR_0X041A :                   9D9 - |  ADR_0X041A.WORK :              9E1 - |
*ADR_0X0422 :                   9E1 - |  ADR_0X0422.WORK :              9E9 - |
*ADR_0X042A :                   9E9 - |  ADR_0X042A.WORK :              9F1 - |
*ADR_0X0432 :                   9F1 - |  ADR_0X0432.WORK :              9F9 - |
*ADR_0X043A :                   9F9 - |  ADR_0X043A.WORK :              A01 - |
*ADR_0X0442 :                   A01 - |  ADR_0X0442.WORK :              A09 - |
*ADR_0X044A :                   A09 - |  ADR_0X044A.WORK :              A11 - |
*ADR_0X0455 :                   A11 - |  ADR_0X0455.WORK :              A19 - |
*ADR_0X045D :                   A19 - |  ADR_0X045D.WORK :              A21 - |
*ADR_0X0467 :                   A21 - |  ADR_0X0467.WORK :              A29 - |
*ADR_0X0471 :                   A29 - |  ADR_0X0471.WORK :              A31 - |
*ADR_0X047B :                   A31 - |  ADR_0X047B.WORK :              A39 - |
*ADR_0X0483 :                   A39 - |  ADR_0X0483.WORK :              A41 - |
*ADR_0X048D :                   A41 - |  ADR_0X048D.WORK :              A49 - |
*ADR_0X0495 :                   A49 - |  ADR_0X0495.WORK :              A51 - |
*ADR_0X049F :                   A51 - |  ADR_0X049F.WORK :              A59 - |
*ADR_0X04A7 :                   A59 - |  ADR_0X04A7.WORK :              A61 - |
*ADR_0X04B1 :                   A61 - |  ADR_0X04B1.WORK :              A69 - |
*ADR_0X04B9 :                   A69 - |  ADR_0X04B9.WORK :              A71 - |
*ADR_0X04C3 :                   A71 - |  ADR_0X04C3.WORK :              A79 - |
*ADR_0X04CB :                   A79 - |  ADR_0X04CB.WORK :              A81 - |
*ADR_0X04D5 :                   A81 - |  ADR_0X04D5.WORK :              A89 - |
*ADR_0X04DD :                   A89 - |  ADR_0X04DD.WORK :              A91 - |
*ADR_0X04E7 :                   A91 - |  ADR_0X04E7.WORK :              A99 - |
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 115 - 2/23/2020 18:58:45


*ADR_0X04EF :                   A99 - |  ADR_0X04EF.WORK :              AA1 - |
*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 - |
*BD_FDD_MASK :                 13BD - | *BIGENDIAN :                      0 - |
*BLACK :                          0 - | *BLUE :                           1 - |
*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 - |
*CMOS_BYTE_00 :                  ED - | *CMOS_BYTE_01 :                  EC - |
*CMOS_BYTE_02 :                  E9 - | *CMOS_BYTE_03 :                  E8 - |
*CMOS_RD_WR :                  BFF7 - | *CMOS_SET_ADR :                DFF7 - |
*CONF4CUSTOM :                   9C - | *CONF4GLUK :                     94 - |
*CONF4PROF :                     90 - | *CONF_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 - |
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 116 - 2/23/2020 18:58:45


 DATE :                   2/23/2020 - |  DDATE :                         17 - |
*DEBUG_ONOFF :                   13 - |  DEVICES :                     BDE0 - |
*DOS_STEK :                    3C9C - | *DOS_STEK_Size :                  2 - |
*DWORD :                          4 - | *EI_RET :                        3E - |
*END_VARS :                       0 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 - |  GO_DEV :                      BDF0 - |
*GREEN :                          4 - | *G_H :                           10 - |
*G_L :                           80 - | *HAS64 :                          1 - |
*HASDSP :                         0 - | *HASFPU :                         0 - |
*HASPMMU :                        0 - | *HDD_TIMEOUT :                   EA - |
 HHOUR :                         12 - | *ICALL2PAGE :                  8000 - |
*INEXTMODE :                      0 - |  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 - |
*JUMP :                           3 - |  JUMP_SIZE :                      3 - |
 KOLDVOL :                     BDF2 - | *KOL_MODES :                      4 - |
*LATTR :                       31C0 - | *LISTON :                         1 - |
*LSYM :                         1C0 - |  M1131 :                         5F - |
 M1133 :                        22E - |  M1134 :                        2C7 - |
 M902 :                          35 - |  M903 :                          35 - |
 M904 :                         292 - |  M906 :                           0 - |
 M907 :                           4 - |  M908 :                           4 - |
 M909 :                           4 - |  M910 :                           4 - |
 M911 :                           4 - |  M912 :                           4 - |
 M913 :                           4 - |  M914 :                           4 - |
 M915 :                           4 - |  M916 :                           7 - |
 M917 :                           4 - |  M918 :                           6 - |
 M919 :                           6 - |  M920 :                           6 - |
 M921 :                           4 - |  M922 :                           6 - |
 M923 :                           4 - |  M924 :                           6 - |
 M925 :                           4 - |  M926 :                           6 - |
 M927 :                           4 - |  M928 :                           6 - |
 M929 :                           4 - |  M930 :                           6 - |
 M931 :                           4 - |  M932 :                           6 - |
 M933 :                           4 - |  M934 :                           F - |
 M935 :                           4 - |  M936 :                           4 - |
 M937 :                           4 - |  M938 :                           4 - |
 M939 :                           4 - |  M940 :                           4 - |
 M941 :                           4 - |  M942 :                           4 - |
 M943 :                           4 - |  M944 :                           7 - |
 M945 :                           4 - |  M946 :                           6 - |
 M947 :                           6 - |  M948 :                           6 - |
 M949 :                           4 - |  M950 :                           6 - |
 M951 :                           4 - |  M952 :                           6 - |
 M953 :                           4 - |  M954 :                           6 - |
 M955 :                           4 - |  M956 :                           6 - |
 M957 :                           4 - |  M958 :                           6 - |
 M959 :                           4 - |  M960 :                           6 - |
 M961 :                         316 - | *MACEXP :                         7 - |
*MAGENTA :                        3 - | *MASK_MNT_DRV :                3CC7 - |
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 117 - 2/23/2020 18:58:45


*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 - |  MMINUTE :                       3A - |
 MMOUNTH :                        2 - | *MOMCPU :                      80DC - |
*MOMCPUNAME :              Z80UNDOC - |  MOUNT_CLS :                   1000 - |
 MOUNT_DRIVES :                B100 - | *MOUSE_KEYS :                  FADF - |
*MOUSE_X :                     FBDF - | *MOUSE_Y :                     FFDF - |
*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 - |  N1131 :                          1 - |
 N1133 :                          B - |  N1134 :                          0 - |
 N902 :                           0 - |  N903 :                           0 - |
 N904 :                           0 - |  N906 :                           0 - |
 N907 :                           0 - |  N908 :                           0 - |
 N909 :                           0 - |  N910 :                           0 - |
 N911 :                           0 - |  N912 :                           0 - |
 N913 :                           0 - |  N914 :                           0 - |
 N915 :                           0 - |  N916 :                           0 - |
 N917 :                           0 - |  N918 :                           0 - |
 N919 :                           0 - |  N920 :                           0 - |
 N921 :                           0 - |  N922 :                           0 - |
 N923 :                           0 - |  N924 :                           0 - |
 N925 :                           0 - |  N926 :                           0 - |
 N927 :                           0 - |  N928 :                           0 - |
 N929 :                           0 - |  N930 :                           0 - |
 N931 :                           0 - |  N932 :                           0 - |
 N933 :                           0 - |  N934 :                           0 - |
 N935 :                           0 - |  N936 :                           0 - |
 N937 :                           0 - |  N938 :                           0 - |
 N939 :                           0 - |  N940 :                           0 - |
 N941 :                           0 - |  N942 :                           0 - |
 N943 :                           0 - |  N944 :                           0 - |
 N945 :                           0 - |  N946 :                           0 - |
 N947 :                           0 - |  N948 :                           0 - |
 N949 :                           0 - |  N950 :                           0 - |
 N951 :                           0 - |  N952 :                           0 - |
 N953 :                           0 - |  N954 :                           0 - |
 N955 :                           0 - |  N956 :                           0 - |
 N957 :                           0 - |  N958 :                           0 - |
 N959 :                           0 - |  N960 :                           0 - |
 N961 :                           0 - | *NESTMAX :                      100 - |
 NUM_APPMULTI :                   2 - |  NUM_EGA :                        0 - |
*NUM_LINE :                    13BE - |  NUM_TXTATM :                     6 - |
 NUM_TXTSCR :                     7 - |  NUM_ZXSCR :                      3 - |
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 118 - 2/23/2020 18:58:45


 OFFSET_BUFSYM :                800 - |  OFFSET_FNTSAVE :                 0 - |
 OFFSET_SCRSAVE :              1000 - | *OFFSET_USBDRV :               2B00 - |
 OLD_AF :                       DFD - | *OLD_IF :                       DFB - |
*OLD_PORT_BF :                 3CCB - | *OLD_PORT_BF_Size :               1 - |
*PACKING :                        0 - | *PADDING :                        1 - |
*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_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 - | *RD_FF_Size :                     1 - |
*RD_PALITRA :                   DBE - | *RD_RAMNROM :                   8BE - |
*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 - |
*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 - |
*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_VIDEOMODE :                  8 - |
 SIZEDATE :                       9 - |  SIZETIME :                       8 - |
 SSECUND :                       2C - |  STACK :                        DFF - |
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 119 - 2/23/2020 18:58:45


*START_STS :                   C000 - |  START_TEST :                   302 C |
 TABLE_VIRT :                   801 C |  TEK_BUFPATH :                 2000 - |
*TEK_ROMPAGE :                 3CC5 - | *TEK_ROMPAGE_Size :               1 - |
 TEK_TYPE :                    BDF7 - | *TEMP_SP :                     3CD0 - |
*TEMP_SP_Size :                   2 - |  TIME :                    18:58:44 - |
*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 - | *WIN_R3 :                      FBF7 - |
 WORD :                           2 - |  WORKER :                       F00 C |
*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 - |
*YELLOW :                         6 - |  YYEAR :                         14 - |
*ZXSCR_0 :                       FA - | *ZXSCR_1 :                       F8 - |
*ZXSTD_CPU1 :                    FA - | *ZXSTD_CPU2 :                    FD - |
*ZX_ROM :                        10 - | *ZX_SCREEN :                      8 - |
 _0X0302 :                        0 - |  _0X030A :                        1 - |
 _0X0312 :                        2 - |  _0X031A :                        3 - |
 _0X0322 :                        4 - |  _0X032A :                        5 - |
 _0X0332 :                        6 - |  _0X033A :                        7 - |
 _0X0342 :                        8 - |  _0X034A :                        9 - |
 _0X0355 :                        A - |  _0X035D :                        B - |
 _0X0367 :                        C - |  _0X0371 :                        D - |
 _0X037B :                        E - |  _0X0383 :                        F - |
 _0X038D :                       10 - |  _0X0395 :                       11 - |
 _0X039F :                       12 - |  _0X03A7 :                       13 - |
 _0X03B1 :                       14 - |  _0X03B9 :                       15 - |
 _0X03C3 :                       16 - |  _0X03CB :                       17 - |
 _0X03D5 :                       18 - |  _0X03DD :                       19 - |
 _0X03E7 :                       1A - |  _0X03EF :                       1B - |
 _0X0402 :                       1C - |  _0X040A :                       1D - |
 _0X0412 :                       1E - |  _0X041A :                       1F - |
 _0X0422 :                       20 - |  _0X042A :                       21 - |
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 120 - 2/23/2020 18:58:45


 _0X0432 :                       22 - |  _0X043A :                       23 - |
 _0X0442 :                       24 - |  _0X044A :                       25 - |
 _0X0455 :                       26 - |  _0X045D :                       27 - |
 _0X0467 :                       28 - |  _0X0471 :                       29 - |
 _0X047B :                       2A - |  _0X0483 :                       2B - |
 _0X048D :                       2C - |  _0X0495 :                       2D - |
 _0X049F :                       2E - |  _0X04A7 :                       2F - |
 _0X04B1 :                       30 - |  _0X04B9 :                       31 - |
 _0X04C3 :                       32 - |  _0X04CB :                       33 - |
 _0X04D5 :                       34 - |  _0X04DD :                       35 - |
 _0X04E7 :                       36 - |  _0X04EF :                       37 - |
*_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 - | *_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 - |
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 121 - 2/23/2020 18:58:45


*_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 - | *_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 - |
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 122 - 2/23/2020 18:58:45


*_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 - |

   1023 symbols
    736 unused symbols

 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 123 - 2/23/2020 18:58:45


  defined macros:
  ---------------

ADDVAR                                | ATMPORT                              
BITMASK                               | DALIGN                               
DC                                    | DJP_EMU                              
DUPL                                  | DZ                                   
EMU_JUMP                              | EVOPORT                              
INIT_VAR                              | JP_EMU                               
LABEL_GEN                             | MALIGN                               
PEC_OFF                               | PEC_ON                               
RAMCALL                               | READ_7FFD                            
ROMCALL                               | RST8                                 
SETVAR                                | SUBVAR                               
SUM_HOB                               | TEXTDATE                             
WORD2TXT                              |

     25 macros

 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 124 - 2/23/2020 18:58:45


  defined functions:
  ------------------

LOW                                   | HIGH                                 

 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 125 - 2/23/2020 18:58:45


  codepages:
  ----------

STANDARD (0 changed characters)


0.42 seconds assembly time

   1110 lines source file
   4223 lines incl. macro expansions
      2 passes
      0 errors
      0 warnings