Subversion Repositories pentevo

Rev

Rev 896 | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
871 lvd 1
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 1 - 2/23/2020 18:58:45
865 lvd 2
 
3
 
4
       1/       0 :                     
5
       2/       0 :                     ;LAST UPDATE: 13.02.2020 savelij
6
       3/       0 :                     
7
       4/       0 :                     ; DOS_FE
8
       5/       0 :                     
9
       6/       0 :                     		include ../../svn/pentevo/rom/macros.a80
10
(1)    1/       0 :                     
11
(1)    2/       0 :                     ;LAST UPDATE: 12.09.2019 savelij
12
(1)    3/       0 :                     
13
(1)    4/       0 :                     ;автоопределение кодировки работает неправильно
14
(1)    5/       0 :                     
15
(1)    6/       0 :                     		RELAXED ON
16
(1)    7/       0 :                     		CPU Z80UNDOC
17
(1)    8/       0 :                     
18
(1)    9/       0 : =0H                 BUILD_DEBUG	EQU 0
19
(1)   10/       0 :                     REZIDENT	;включение резидента в сборку
20
(1)   11/       0 :                     
21
(1)   12/       0 :                     DZ		MACRO DEFZ
22
(1)   13/       0 :                     		DB DEFZ,0
23
(1)   14/       0 :                     		ENDM 
24
(1)   15/       0 :                     
25
(1)   16/       0 :                     DC		MACRO DEFC
26
(1)   17/       0 :                     		IF STRLEN(DEFC)>1
27
(1)   18/       0 :                     		DB SUBSTR(DEFC,0,STRLEN(DEFC)-1)
28
(1)   19/       0 :                     		ENDIF
29
(1)   20/       0 :                     		IF STRLEN(DEFC)>0
30
(1)   21/       0 :                     		DB CHARFROMSTR(DEFC,STRLEN(DEFC)-1)|80H
31
(1)   22/       0 :                     		ENDIF
32
(1)   23/       0 :                     		ENDM
33
(1)   24/       0 :                     
34
(1)   25/       0 :                     SUM_HOB		MACRO STR,AA,BB,CC
35
(1)   26/       0 :                     		DB STR
36
(1)   27/       0 :                     		DW AA
37
(1)   28/       0 :                     		DW BB
38
(1)   29/       0 :                     		DB 0
39
(1)   30/       0 :                     		DB CC
40
(1)   31/       0 :                     $$I := 0
41
(1)   32/       0 :                     $$S := 0
42
(1)   33/       0 :                     		REPT 9
43
(1)   34/       0 :                     $$N := CHARFROMSTR (STR,STRLEN(STR)+$$S-9)
44
(1)   35/       0 :                     $$I := ($$I+$$S+$$N+($$N*256))&0XFFFF
45
(1)   36/       0 :                     $$S := $$S+1
46
(1)   37/       0 :                     		ENDM
47
(1)   38/       0 :                     $$I := ($$I+$$S+LOW (AA)+(LOW (AA)*0X100))&0XFFFF
48
(1)   39/       0 :                     $$S := $$S+1
49
(1)   40/       0 :                     $$I := ($$I+$$S+HIGH (AA)+(HIGH (AA)*0X100))&0XFFFF
50
(1)   41/       0 :                     $$S := $$S+1
51
(1)   42/       0 :                     $$I := ($$I+$$S+LOW (BB)+(LOW (BB)*0X100))&0XFFFF
52
(1)   43/       0 :                     $$S := $$S+1
53
(1)   44/       0 :                     $$I := ($$I+$$S+HIGH (BB)+(HIGH (BB)*0X100))&0XFFFF
54
(1)   45/       0 :                     $$S := $$S+1
55
(1)   46/       0 :                     $$I := ($$I+$$S+LOW (CC)+(LOW (CC)*0X100))&0XFFFF
56
(1)   47/       0 :                     $$S := $$S+1
57
(1)   48/       0 :                     $$I := ($$I+$$S+HIGH (CC)+(HIGH (CC)*0X100))&0XFFFF
58
(1)   49/       0 :                     $$S := $$S+1
59
(1)   50/       0 :                     		DW $$I
60
(1)   51/       0 :                     		ENDM
61
(1)   52/       0 :                     
62
(1)   53/       0 :                     DUPL		MACRO LEN,FILL
63
(1)   54/       0 :                     DUPL:
871 lvd 64
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80(../../svn/pentevo/rom/macros.a80) - page 2 - 2/23/2020 18:58:45
865 lvd 65
 
66
 
67
(1)   55/       0 :                     $$N		EQU (LEN) / 1024
68
(1)   56/       0 :                     $$M		EQU (LEN) # 1024
69
(1)   57/       0 :                     		REPT $$N
70
(1)   58/       0 :                     		DB 1024 DUP(FILL)
71
(1)   59/       0 :                     		ENDM
72
(1)   60/       0 :                     		IF $$M <> 0
73
(1)   61/       0 :                     		IFB FILL
74
(1)   62/       0 :                     		DB $$M DUP(0)
75
(1)   63/       0 :                     		ELSE
76
(1)   64/       0 :                     		DB $$M DUP(FILL)
77
(1)   65/       0 :                     		ENDIF
78
(1)   66/       0 :                     		ENDIF
79
(1)   67/       0 :                     		ENDM
80
(1)   68/       0 :                     
81
(1)   69/       0 :                     HIGH		FUNCTION X,((X >> 8) & 0XFF)
82
(1)   70/       0 :                     LOW		FUNCTION X,(X & 0XFF)
83
(1)   71/       0 :                     
84
(1)   72/       0 :                     ROMCALL		MACRO ADR,PAGE
85
(1)   73/       0 :                     		RST 0X30
86
(1)   74/       0 :                     		DW ADR
87
(1)   75/       0 :                     		DB PAGE
88
(1)   76/       0 :                     		ENDM
89
(1)   77/       0 :                     
90
(1)   78/       0 :                     RAMCALL		MACRO ADR,PAGE
91
(1)   79/       0 :                     		RST 0X20
92
(1)   80/       0 :                     		DW ADR
93
(1)   81/       0 :                     		DB PAGE
94
(1)   82/       0 :                     		ENDM
95
(1)   83/       0 :                     
96
(1)   84/       0 :                     ATMPORT		MACRO PORT,BYTE
97
(1)   85/       0 :                     		LD BC,PORT
98
(1)   86/       0 :                     	IF BYTE = 0
99
(1)   87/       0 :                     		XOR A
100
(1)   88/       0 :                     	ELSE
101
(1)   89/       0 :                     		LD A,BYTE
102
(1)   90/       0 :                     	ENDIF
103
(1)   91/       0 :                     		OUT (C),A
104
(1)   92/       0 :                     		ENDM
105
(1)   93/       0 :                     
106
(1)   94/       0 :                     EVOPORT		MACRO PORT,BYTE
107
(1)   95/       0 :                     		LD BC,PORT
108
(1)   96/       0 :                     	IF BYTE = 0
109
(1)   97/       0 :                     		XOR A
110
(1)   98/       0 :                     	ELSE
111
(1)   99/       0 :                     		LD A,BYTE
112
(1)  100/       0 :                     	ENDIF
113
(1)  101/       0 :                     		OUT (C),A
114
(1)  102/       0 :                     		ENDM
115
(1)  103/       0 :                     
116
(1)  104/       0 :                     PEC_ON		MACRO BYTE
117
(1)  105/       0 :                     		IN A,(PEVO_CONF)
118
(1)  106/       0 :                     		OR BYTE
119
(1)  107/       0 :                     		OUT (PEVO_CONF),A
120
(1)  108/       0 :                     		ENDM
121
(1)  109/       0 :                     
122
(1)  110/       0 :                     PEC_OFF		MACRO BYTE
123
(1)  111/       0 :                     		IN A,(PEVO_CONF)
124
(1)  112/       0 :                     		AND BYTE!0XFF
125
(1)  113/       0 :                     		OUT (PEVO_CONF),A
126
(1)  114/       0 :                     		ENDM
871 lvd 127
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80(../../svn/pentevo/rom/macros.a80) - page 3 - 2/23/2020 18:58:45
865 lvd 128
 
129
 
130
(1)  115/       0 :                     
131
(1)  116/       0 :                     READ_7FFD	MACRO
132
(1)  117/       0 :                     		LD A,HIGH (RD_7FFD)
133
(1)  118/       0 :                     		IN A,(LOW (RD_7FFD))
134
(1)  119/       0 :                     		ENDM
135
(1)  120/       0 :                     
136
(1)  121/       0 : =9H                 SIZEDATE	EQU STRLEN (DATE)
869 lvd 137
(1)  122/       0 : =8H                 SIZETIME	EQU STRLEN (TIME)
865 lvd 138
(1)  123/       0 :                     
139
(1)  124/       0 : =>FALSE             		IF SIZEDATE=10
140
(1)  125/       0 :                     MMOUNTH		EQU (CHARFROMSTR (DATE,0)-'0')*10+(CHARFROMSTR (DATE,1)-'0')
141
(1)  126/       0 :                     DDATE		EQU (CHARFROMSTR (DATE,3)-'0')*10+(CHARFROMSTR (DATE,4)-'0')
142
(1)  127/       0 :                     YYEAR		EQU (CHARFROMSTR (DATE,8)-'0')*10+(CHARFROMSTR (DATE,9)-'0')
143
(1)  128/       0 : =>FALSE             		ELSEIF SIZEDATE=8
144
(1)  129/       0 :                     MMOUNTH		EQU (CHARFROMSTR (DATE,0)-'0')
145
(1)  130/       0 :                     DDATE		EQU (CHARFROMSTR (DATE,2)-'0')
146
(1)  131/       0 :                     YYEAR		EQU (CHARFROMSTR (DATE,6)-'0')*10+(CHARFROMSTR (DATE,7)-'0')
147
(1)  132/       0 : =>TRUE              		ELSEIF (CHARFROMSTR (DATE,1))=0X2F
148
(1)  133/       0 : =2H                 MMOUNTH		EQU (CHARFROMSTR (DATE,0)-'0')
869 lvd 149
(1)  134/       0 : =17H                DDATE		EQU (CHARFROMSTR (DATE,2)-'0')*10+(CHARFROMSTR (DATE,3)-'0')
865 lvd 150
(1)  135/       0 : =14H                YYEAR		EQU (CHARFROMSTR (DATE,7)-'0')*10+(CHARFROMSTR (DATE,8)-'0')
151
(1)  136/       0 : =>FALSE             		ELSE
152
(1)  137/       0 :                     MMOUNTH		EQU (CHARFROMSTR (DATE,0)-'0')*10+(CHARFROMSTR (DATE,1)-'0')
153
(1)  138/       0 :                     DDATE		EQU (CHARFROMSTR (DATE,3)-'0')
154
(1)  139/       0 :                     YYEAR		EQU (CHARFROMSTR (DATE,7)-'0')*10+(CHARFROMSTR (DATE,8)-'0')
155
(1)  140/       0 : [124]               		ENDIF
156
(1)  141/       0 :                     
869 lvd 157
(1)  142/       0 : =>FALSE             		IF SIZETIME=7
158
(1)  143/       0 :                     HHOUR		EQU (CHARFROMSTR (TIME,0)-'0')
159
(1)  144/       0 :                     MMINUTE		EQU (CHARFROMSTR (TIME,2)-'0')*10+(CHARFROMSTR (TIME,3)-'0')
160
(1)  145/       0 :                     SSECUND		EQU (CHARFROMSTR (TIME,5)-'0')*10+(CHARFROMSTR (TIME,6)-'0')
161
(1)  146/       0 : =>TRUE              		ELSE
162
(1)  147/       0 : =12H                HHOUR		EQU (CHARFROMSTR (TIME,0)-'0')*10+(CHARFROMSTR (TIME,1)-'0')
871 lvd 163
(1)  148/       0 : =3AH                MMINUTE		EQU (CHARFROMSTR (TIME,3)-'0')*10+(CHARFROMSTR (TIME,4)-'0')
164
(1)  149/       0 : =2CH                SSECUND		EQU (CHARFROMSTR (TIME,6)-'0')*10+(CHARFROMSTR (TIME,7)-'0')
865 lvd 165
(1)  150/       0 : [142]               		ENDIF
166
(1)  151/       0 :                     
869 lvd 167
(1)  152/       0 : =A857H              DATA_VERS	EQU DDATE+(MMOUNTH<<5)+(YYEAR<<9)+0X8000			;уже упаковано
865 lvd 168
(1)  153/       0 :                     
869 lvd 169
(1)  154/       0 : =5057H              FAT_DATE	EQU DDATE+(MMOUNTH<<5)+((2000+YYEAR-1980)&0x7F)<<9
871 lvd 170
(1)  155/       0 : =9756H              FAT_TIME	EQU SSECUND/2+(MMINUTE<<5)+(HHOUR<<11)
865 lvd 171
(1)  156/       0 :                     
172
(1)  157/       0 :                     TEXTDATE	MACRO
173
(1)  158/       0 :                     TDATE		DB ((DDATE/10)+'0'),(DDATE#10)+'0'
174
(1)  159/       0 :                     		DB "."
175
(1)  160/       0 :                     TMOUNTH		DB MMOUNTH/10+'0',MMOUNTH#10+'0'
176
(1)  161/       0 :                     		DB ".",CHARFROMSTR (DATE,SIZEDATE-4),CHARFROMSTR (DATE,SIZEDATE-3)
177
(1)  162/       0 :                     		DB CHARFROMSTR (DATE,SIZEDATE-2),CHARFROMSTR (DATE,SIZEDATE-1)
178
(1)  163/       0 :                     		ENDM
179
(1)  164/       0 :                     
180
(1)  165/       0 :                     RST8		MACRO N1,N2,N3
181
(1)  166/       0 :                     		RST 8
182
(1)  167/       0 :                     		DB N1
183
(1)  168/       0 :                     		IFNB N2
184
(1)  169/       0 :                     		DB N2
185
(1)  170/       0 :                     		ENDIF
186
(1)  171/       0 :                     		IFNB N3
187
(1)  172/       0 :                     		DB N3
188
(1)  173/       0 :                     		ENDIF
189
(1)  174/       0 :                     		ENDM
871 lvd 190
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80(../../svn/pentevo/rom/macros.a80) - page 4 - 2/23/2020 18:58:45
865 lvd 191
 
192
 
193
(1)  175/       0 :                     
194
(1)  176/       0 : =1H                 BYTE		EQU 1
195
(1)  177/       0 : =2H                 WORD		EQU 2
196
(1)  178/       0 : =3H                 JUMP		EQU 3
197
(1)  179/       0 : =4H                 DWORD		EQU 4
198
(1)  180/       0 : =8H                 QWORD		EQU 8
199
(1)  181/       0 :                     
200
(1)  182/       0 :                     BITMASK		MACRO NAME,NUM
201
(1)  183/       0 :                     B_NAME		EQU NUM
202
(1)  184/       0 :                     M_NAME		EQU 1<<NUM
203
(1)  185/       0 :                     		ENDM
204
(1)  186/       0 :                     
205
(1)  187/       0 :                     SETVAR		MACRO NAME,SIZE
206
(1)  188/       0 :                     NAME		EQU INITVAR
207
(1)  189/       0 :                     		IFNB SIZE
208
(1)  190/       0 :                     INITVAR := INITVAR+SIZE
209
(1)  191/       0 :                     NAME_Size	EQU SIZE
210
(1)  192/       0 :                     		ELSE
211
(1)  193/       0 :                     INITVAR := INITVAR+BYTE
212
(1)  194/       0 :                     NAME_Size	EQU BYTE
213
(1)  195/       0 :                     		ENDIF
214
(1)  196/       0 :                     		ENDM
215
(1)  197/       0 :                     
216
(1)  198/       0 :                     SUBVAR		MACRO SIZE
217
(1)  199/       0 :                     INITVAR := INITVAR-SIZE
218
(1)  200/       0 :                     		ENDM
219
(1)  201/       0 :                     
220
(1)  202/       0 :                     ADDVAR		MACRO SIZE
221
(1)  203/       0 :                     INITVAR := INITVAR+SIZE
222
(1)  204/       0 :                     		ENDM
223
(1)  205/       0 :                     
224
(1)  206/       0 :                     INIT_VAR	MACRO START
225
(1)  207/       0 :                     		IFNB START
226
(1)  208/       0 :                     INITVAR := START
227
(1)  209/       0 :                     		ELSE
228
(1)  210/       0 :                     INITVAR := 0
229
(1)  211/       0 :                     		ENDIF
230
(1)  212/       0 :                     		ENDM
231
(1)  213/       0 :                     
232
(1)  214/       0 :                     
233
(1)  215/       0 :                     MALIGN		MACRO
234
(1)  216/       0 :                     	IF LOW($) = 0
235
(1)  217/       0 :                     		DUPL (HIGH($) << 8) - $,0
236
(1)  218/       0 :                     	ELSE
237
(1)  219/       0 :                     		DUPL ((HIGH($) + 1) << 8) - $,0
238
(1)  220/       0 :                     	ENDIF
239
(1)  221/       0 :                     		ENDM
240
(1)  222/       0 :                     
241
(1)  223/       0 :                     ; выравнивание до сектора с учетом адреса компиляции
242
(1)  224/       0 :                     DALIGN		MACRO ADDRESS
243
(1)  225/       0 :                     	IF LOW(ADDRESS)
244
(1)  226/       0 :                     		DB LOW (-$)+LOW(ADDRESS) DUP(0)
245
(1)  227/       0 :                     	ELSE
246
(1)  228/       0 :                     		DB LOW (-$) DUP (0)
247
(1)  229/       0 :                     	ENDIF
248
(1)  230/       0 :                     		ENDM
249
(1)  231/       0 :                     
250
(1)  232/       0 :                     ; преобразование 16 битного числа в текст
251
(1)  233/       0 :                     WORD2TXT	MACRO WORD
252
(1)  234/       0 :                     $$DEC1 := (WORD)/10000
871 lvd 253
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80(../../svn/pentevo/rom/macros.a80) - page 5 - 2/23/2020 18:58:45
865 lvd 254
 
255
 
256
(1)  235/       0 :                     $$TMP := WORD-$$DEC1*10000
257
(1)  236/       0 :                     $$DEC2 := $$TMP/1000
258
(1)  237/       0 :                     $$TMP := $$TMP-$$DEC2*1000
259
(1)  238/       0 :                     $$DEC3 := $$TMP/100
260
(1)  239/       0 :                     $$TMP := $$TMP-$$DEC3*100
261
(1)  240/       0 :                     $$DEC4 := $$TMP/10
262
(1)  241/       0 :                     $$TMP := $$TMP-$$DEC4*10
263
(1)  242/       0 :                     $$DEC5 := $$TMP
264
(1)  243/       0 :                     	DB $$DEC1+'0',$$DEC2+'0',$$DEC3+'0',$$DEC4+'0',$$DEC5+'0'
265
(1)  244/       0 :                     		ENDM
266
(1)  245/       0 :                     
267
       7/       0 :                     		include ../../svn/pentevo/rom/global_vars.a80
268
(1)    1/       0 :                     
269
(1)    2/       0 :                     ;LAST UPDATE: 20.08.2019 savelij
270
(1)    3/       0 :                     
271
(1)    4/       0 :                     ;[СТРАНИЦЫ VIDEO RAM]
272
(1)    5/       0 : =F7H                VMODE7_0	EQU LOW (-0X08)-1;0XF7		;СТРАНИЦА ОДНОСТРАНИЧНОГО ТЕКСТМОДА 0 ЭКРАН
273
(1)    6/       0 : =F5H                VMODE7_1	EQU LOW (-0X0A)-1;0XF5		;СТРАНИЦА ОДНОСТРАНИЧНОГО ТЕКСТМОДА 1 ЭКРАН
274
(1)    7/       0 : =FAH                VMODE6_0M	EQU LOW (-0X05)-1;0XFA		;СТРАНИЦА ATM ТЕКСТМОДА МОНОХРОМ 0 ЭКРАН
275
(1)    8/       0 : =FEH                VMODE6_0C	EQU LOW (-0X01)-1;0XFE		;СТРАНИЦА ATM ТЕКСТМОДА ЦВЕТ 0 ЭКРАН
276
(1)    9/       0 : =F8H                VMODE6_1M	EQU LOW (-0X07)-1;0XF8		;СТРАНИЦА ATM ТЕКСТМОДА МОНОХРОМ 1 ЭКРАН
277
(1)   10/       0 : =FCH                VMODE6_1C	EQU LOW (-0X03)-1;0XFC		;СТРАНИЦА ATM ТЕКСТМОДА ЦВЕТ 1 ЭКРАН
278
(1)   11/       0 : =FAH                ZXSCR_0		EQU LOW (-0X05)-1;0XFA		;СТРАНИЦА ZX ЭКРАНА 0
279
(1)   12/       0 : =F8H                ZXSCR_1		EQU LOW (-0X07)-1;0XF8		;СТРАНИЦА ZX ЭКРАНА 1
280
(1)   13/       0 :                     
281
(1)   14/       0 :                     ;[СТРАНИЦЫ ПАМЯТИ ZX СТАНДАРТА]
282
(1)   15/       0 : =FAH                ZXSTD_CPU1	EQU LOW (-0X05)-1;0XFA		;СТРАНИЦА 1 ОКНА ПРОЕЦИРОВАНИЯ
283
(1)   16/       0 : =FDH                ZXSTD_CPU2	EQU LOW (-0X02)-1;0XFD		;СТРАНИЦА 2 ОКНА ПРОЕЦИРОВАНИЯ
284
(1)   17/       0 :                     
285
(1)   18/       0 :                     ;[СТРАНИЦЫ RAM]
286
(1)   19/       0 : =1H                 RAM_EVODOS	EQU 1				;СТРАНИЦА КОПИИ EVO-DOS ДЛЯ ПЕРЕХВАТА
287
(1)   20/       0 : =2H                 RAM_FATVARS	EQU 2				;СТРАНИЦА ДЛЯ ПЕРЕМЕНЫХ FAT
288
(1)   21/       0 : =3H                 RAM_BASIC	EQU 3				;СТРАНИЦА BASIC СТАНДАРТНАЯ ВЕРСИЯ
289
(1)   22/       0 : =4H                 RAM_PROFROM	EQU 4				;СТРАНИЦА ПЕРЕМЕННЫХ PROFROM
290
(1)   23/       0 : =5H                 RAM_MOUNTER	EQU 5				;СТРАНИЦА ДЛЯ МОНТИРОВАНИЯ ОБРАЗОВ
291
(1)   24/       0 : =6H                 RAM_STS		EQU 6				;СТРАНИЦА ДЛЯ ОТЛАДЧИКА STS
292
(1)   25/       0 : =7H                 RAM_ADDSTS	EQU 7				;СТРАНИЦА ДЛЯ ОТЛАДКИ ROM
293
(1)   26/       0 : =8H                 RAM_SCR_FONT	EQU 8				;СТРАНИЦА СОХРАНЕННЫХ ЭКРАНОВ И ФОНТОВ
294
(1)   27/       0 : =9H                 RAM_TEMP	EQU 9				;СТРАНИЦА ВСЯКИХ ВРЕМЕННЫХ ПЕРЕМЕННЫХ
295
(1)   28/       0 : =AH                 RAM_RAMDISK	EQU 0X0A			;СТРАНИЦА НАЧАЛА РАМДИСКА
296
(1)   29/       0 : =BH                 RAM_DATARAMD	EQU 0X0B			;СТРАНИЦА НАЧАЛА ДАННЫХ РАМДИСКА
297
(1)   30/       0 : =3FH                RAM_TEMP2	EQU 0X3F			;СТРАНИЦА СОРТИРОВКИ ФАЙЛОВ И ПРОСМОТРА СОДЕРЖИМОГО ОБРАЗОВ
298
(1)   31/       0 : =40H                RAM_FLASHER	EQU 0X40			;СТРАНИЦА НАЧАЛА ЗАГРУЗКИ ПРОШИВКИ
299
(1)   32/       0 : =60H                RAM_TAPE	EQU 0X60			;СТРАНИЦА ДЛЯ ЗАГРУЗКИ TAP ФАЙЛА
300
(1)   33/       0 :                     
301
(1)   34/       0 :                     ;[СТРАНИЦЫ ROM]
302
(1)   35/       0 : =0H                 ROM_ERS		EQU 0				;НОМЕР СТРАНИЦЫ ROM EVO RESET SERVICE
303
(1)   36/       0 : =1H                 ROM_BAS128	EQU 1				;НОМЕР СТРАНИЦЫ ROM BASIC 128
304
(1)   37/       0 : =2H                 ROM_DOS		EQU 2				;НОМЕР СТРАНИЦЫ ROM EVO-DOS ДЛЯ РЕАЛЬНОЙ ДИСКЕТЫ
305
(1)   38/       0 : =3H                 ROM_BAS48	EQU 3				;НОМЕР СТРАНИЦЫ ROM BASIC 48
306
(1)   39/       0 :                     
307
(1)   40/       0 : =5H                 ROM_MAINMENU	EQU 5				;НОМЕР СТРАНИЦЫ УПАКОВАННОГО ГЛАВНОЕ МЕНЮ
308
(1)   41/       0 : =6H                 ROM_RST80	EQU 6				;НОМЕР СТРАНИЦЫ ROM RST 8
309
(1)   42/       0 : =7H                 ROM_RST81	EQU 7				;НОМЕР СТРАНИЦЫ ROM RST 8
310
(1)   43/       0 : =8H                 ROM_RST82	EQU 8				;НОМЕР СТРАНИЦЫ ROM RST 8
311
(1)   44/       0 : =9H                 ROM_RST83	EQU 9				;НОМЕР СТРАНИЦЫ ROM RST 8
312
(1)   45/       0 : =AH                 ROM_ADD_DOS	EQU 0X0A			;НОМЕР СТРАНИЦЫ ROM EVO-DOS ДЛЯ ЭМУЛЯЦИИ
313
(1)   46/       0 : =BH                 ROM_ADD_BAS48	EQU 0X0B			;НОМЕР СТРАНИЦЫ ROM BASIC 48
314
(1)   47/       0 : =18H                ROM_BAS48_STD	EQU 0X18			;НОМЕР СТРАНИЦЫ ROM BASIC 48 (СТАНДАРТНАЯ ВЕРСИЯ)
315
(1)   48/       0 : =19H                ROM_BAS128_STD	EQU 0X19			;НОМЕР СТРАНИЦЫ ROM BASIC 128 (СТАНДАРТНАЯ ВЕРСИЯ)
871 lvd 316
 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
865 lvd 317
 
318
 
319
(1)   49/       0 : =1AH                ROM_BAS48_128	EQU 0X1A			;НОМЕР СТРАНИЦЫ ROM BASIC 48 (СТАНДАРТНАЯ ВЕРСИЯ ДЛЯ BASIC128)
320
(1)   50/       0 : =1BH                ROM_ATMCPM	EQU 0X1B			;НОМЕР СТРАНИЦЫ ROM АТМ CP/M
321
(1)   51/       0 :                     
322
(1)   52/       0 : =90H                CONF4PROF	EQU 0X90			;СТАРТОВАЯ СТРАНИЦА ДЛЯ EVO PROFROM 128K
323
(1)   53/       0 : =94H                CONF4GLUK	EQU 0X94			;СТАРТОВАЯ СТРАНИЦА ДЛЯ GLUK 64K
324
(1)   54/       0 : =9CH                CONF4CUSTOM	EQU 0X9C			;СТАРТОВАЯ СТРАНИЦА ДЛЯ ПОЛЬЗОВАТЕЛЬСКОЙ ПРОШИВКИ 64К
325
(1)   55/       0 :                     
326
(1)   56/       0 : =0H                 CPU0		EQU 0X0000			;НАЧАЛО ОКНА ПРОЕЦИРОВАНИЯ 0
327
(1)   57/       0 : =4000H              CPU1		EQU 0X4000			;НАЧАЛО ОКНА ПРОЕЦИРОВАНИЯ 1
328
(1)   58/       0 : =8000H              CPU2		EQU 0X8000			;НАЧАЛО ОКНА ПРОЕЦИРОВАНИЯ 2
329
(1)   59/       0 : =C000H              CPU3		EQU 0XC000			;НАЧАЛО ОКНА ПРОЕЦИРОВАНИЯ 3
330
(1)   60/       0 :                     
331
(1)   61/       0 :                     ;[ПОРТЫ]
332
(1)   62/       0 : =37F7H              WIN_P0		EQU 0X37F7			;АДРЕС 0 СТРАНИЦЫ ПРОЕЦИРОВАНИЯ PENTEVO
333
(1)   63/       0 : =77F7H              WIN_P1		EQU 0X77F7			;АДРЕС 1 СТРАНИЦЫ ПРОЕЦИРОВАНИЯ PENTEVO
334
(1)   64/       0 : =B7F7H              WIN_P2		EQU 0XB7F7			;АДРЕС 2 СТРАНИЦЫ ПРОЕЦИРОВАНИЯ PENTEVO
335
(1)   65/       0 : =F7F7H              WIN_P3		EQU 0XF7F7			;АДРЕС 3 СТРАНИЦЫ ПРОЕЦИРОВАНИЯ PENTEVO
336
(1)   66/       0 : =3BF7H              WIN_R0		EQU 0X3BF7			;АДРЕС ЗАЩИТЫ ОТ ЗАПИСИ В ОКНЕ 0
337
(1)   67/       0 : =7BF7H              WIN_R1		EQU 0X7BF7			;АДРЕС ЗАЩИТЫ ОТ ЗАПИСИ В ОКНЕ 1
338
(1)   68/       0 : =BBF7H              WIN_R2		EQU 0XBBF7			;АДРЕС ЗАЩИТЫ ОТ ЗАПИСИ В ОКНЕ 2
339
(1)   69/       0 : =FBF7H              WIN_R3		EQU 0XFBF7			;АДРЕС ЗАЩИТЫ ОТ ЗАПИСИ В ОКНЕ 3
340
(1)   70/       0 : =3FF7H              WIN_A0		EQU 0X3FF7			;АДРЕС 0 СТРАНИЦЫ ПРОЕЦИРОВАНИЯ ATM
341
(1)   71/       0 : =7FF7H              WIN_A1		EQU 0X7FF7			;АДРЕС 1 СТРАНИЦЫ ПРОЕЦИРОВАНИЯ ATM
342
(1)   72/       0 : =BFF7H              WIN_A2		EQU 0XBFF7			;АДРЕС 2 СТРАНИЦЫ ПРОЕЦИРОВАНИЯ ATM
343
(1)   73/       0 : =FFF7H              WIN_A3		EQU 0XFFF7			;АДРЕС 3 СТРАНИЦЫ ПРОЕЦИРОВАНИЯ ATM
344
(1)   74/       0 : =BFH                PEVO_CONF	EQU 0XBF			;АДРЕС ПОРТА КОНФИГА PENTEVO
345
(1)   75/       0 : =DEF7H              CMOSD_SET_ADR	EQU 0XDEF7			;АДРЕС ПОРТА УСТАНОВКИ АДРЕСА CMOS ЯЧЕЙКИ ИЗ DOS
346
(1)   76/       0 : =BEF7H              CMOSD_RD_WR	EQU 0XBEF7			;АДРЕС ПОРТА ЧТЕНИЯ/ЗАПИСИ БАЙТ CMOS ИЗ ДОСА
347
(1)   77/       0 : =DFF7H              CMOS_SET_ADR	EQU 0XDFF7			;АДРЕС ПОРТА УСТАНОВКИ АДРЕСА CMOS ЯЧЕЙКИ
348
(1)   78/       0 : =BFF7H              CMOS_RD_WR	EQU 0XBFF7			;АДРЕС ПОРТА ЧТЕНИЯ/ЗАПИСИ БАЙТ CMOS
349
(1)   79/       0 : =EFF7H              PENT_CONF	EQU 0XEFF7			;АДРЕС ПОРТА КОНФИГА РЕЖИМА ПЕНТАГОНА
350
(1)   80/       0 : =7FFDH              CONF_128	EQU 0X7FFD			;АДРЕС ПОРТА КОНФИГА 128 ПАМЯТИ
351
(1)   81/       0 : =FBDFH              MOUSE_X		EQU 0XFBDF			;АДРЕС ПОРТА X КООРДИНАТЫ МЫШИ
352
(1)   82/       0 : =FFDFH              MOUSE_Y		EQU 0XFFDF			;АДРЕС ПОРТА Y КООРДИНАТЫ МЫШИ
353
(1)   83/       0 : =FADFH              MOUSE_KEYS	EQU 0XFADF			;АДРЕС ПОРТА КНОПОК МЫШИ
354
(1)   84/       0 :                     
355
(1)   85/       0 :                     ;[МАСКА КНОПОК МЫШИ]
356
(1)   86/       0 : (MACRO)              BITMASK MOUSE_M_KEY,	2
357
(1)   86/       0 : =2H                 B_MOUSE_M_KEY          EQU 2
358
(1)   86/       0 : =4H                 M_MOUSE_M_KEY          EQU 1<<2
359
(1)   87/       0 : (MACRO)              BITMASK MOUSE_R_KEY,	1
360
(1)   87/       0 : =1H                 B_MOUSE_R_KEY          EQU 1
361
(1)   87/       0 : =2H                 M_MOUSE_R_KEY          EQU 1<<1
362
(1)   88/       0 : (MACRO)              BITMASK MOUSE_L_KEY,	0
363
(1)   88/       0 : =0H                 B_MOUSE_L_KEY          EQU 0
364
(1)   88/       0 : =1H                 M_MOUSE_L_KEY          EQU 1<<0
365
(1)   89/       0 : =F0H                _MOUSE_WHEEL	EQU %11110000
366
(1)   90/       0 :                     
367
(1)   91/       0 :                     ;[ПОРТЫ RS232]
368
(1)   92/       0 : =F8EFH              RS232_IO	EQU 0XF8EF
369
(1)   93/       0 : =F8EFH              RS232_DIV_L	EQU 0XF8EF
370
(1)   94/       0 : =F9EFH              RS232_IRQ_ENA	EQU 0XF9EF
371
(1)   95/       0 : =F9EFH              RS232_DIV_H	EQU 0XF9EF
372
(1)   96/       0 : =FAEFH              RS232_IRQ_ID	EQU 0XFAEF
373
(1)   97/       0 : =FBEFH              RS232_LINE_CTRL	EQU 0XFBEF
374
(1)   98/       0 : =FCEFH              RS232_MDM_CTRL	EQU 0XFCEF
375
(1)   99/       0 : =FDEFH              RS232_LINE_STAT	EQU 0XFDEF
376
(1)  100/       0 : =FEEFH              RS232_MDM_STAT	EQU 0XFEEF
377
(1)  101/       0 : =FFEFH              RS232_WORK_REG	EQU 0XFFEF
378
(1)  102/       0 :                     
871 lvd 379
 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
865 lvd 380
 
381
 
382
(1)  103/       0 :                     ;[СКОРОСТИ RS232]
383
(1)  104/       0 : =417H               BAUD110		EQU 115200/110
384
(1)  105/       0 : =300H               BAUD150		EQU 115200/150
385
(1)  106/       0 : =180H               BAUD300		EQU 115200/300
386
(1)  107/       0 : =C0H                BAUD600		EQU 115200/600
387
(1)  108/       0 : =60H                BAUD1200	EQU 115200/1200
388
(1)  109/       0 : =30H                BAUD2400	EQU 115200/2400
389
(1)  110/       0 : =18H                BAUD4800	EQU 115200/4800
390
(1)  111/       0 : =CH                 BAUD9600	EQU 115200/9600
391
(1)  112/       0 : =6H                 BAUD19200	EQU 115200/19200
392
(1)  113/       0 : =3H                 BAUD38400	EQU 115200/38400
393
(1)  114/       0 : =2H                 BAUD57600	EQU 115200/57600
394
(1)  115/       0 : =1H                 BAUD115200	EQU 115200/115200
395
(1)  116/       0 :                     
396
(1)  117/       0 :                     ;[ПОРТЫ ДЛЯ ЧТЕНИЯ ПОРТОВ КОНФИГУРАЦИИ]
397
(1)  118/       0 : =BEH                EXIT_PORT	EQU 0XBE
398
(1)  119/       0 : =BEH                RD_0WINA0	EQU 0X00BE			;АДРЕС ПОРТА 0 ОКНА ПРОЕЦИРОВАНИЯ 0 МАПЕРА
399
(1)  120/       0 : =1BEH               RD_0WINA1	EQU 0X01BE			;АДРЕС ПОРТА 1 ОКНА ПРОЕЦИРОВАНИЯ 0 МАПЕРА
400
(1)  121/       0 : =2BEH               RD_0WINA2	EQU 0X02BE			;АДРЕС ПОРТА 2 ОКНА ПРОЕЦИРОВАНИЯ 0 МАПЕРА
401
(1)  122/       0 : =3BEH               RD_0WINA3	EQU 0X03BE			;АДРЕС ПОРТА 3 ОКНА ПРОЕЦИРОВАНИЯ 0 МАПЕРА
402
(1)  123/       0 : =4BEH               RD_1WINA0	EQU 0X04BE			;АДРЕС ПОРТА 0 ОКНА ПРОЕЦИРОВАНИЯ 1 МАПЕРА
403
(1)  124/       0 : =5BEH               RD_1WINA1	EQU 0X05BE			;АДРЕС ПОРТА 1 ОКНА ПРОЕЦИРОВАНИЯ 1 МАПЕРА
404
(1)  125/       0 : =6BEH               RD_1WINA2	EQU 0X06BE			;АДРЕС ПОРТА 2 ОКНА ПРОЕЦИРОВАНИЯ 1 МАПЕРА
405
(1)  126/       0 : =7BEH               RD_1WINA3	EQU 0X07BE			;АДРЕС ПОРТА 3 ОКНА ПРОЕЦИРОВАНИЯ 1 МАПЕРА
406
(1)  127/       0 : =8BEH               RD_RAMNROM	EQU 0X08BE			;АДРЕС ПОРТА БИТОВ RAM & ROM
407
(1)  128/       0 : =9BEH               RD_DOS7FFD	EQU 0X09BE			;АДРЕС ПОРТА БИТОВ DOS & 7FFD
408
(1)  129/       0 : =ABEH               RD_7FFD		EQU 0X0ABE			;АДРЕС ПОРТА 7FFD
409
(1)  130/       0 : =BBEH               RD_EFF7		EQU 0X0BBE			;АДРЕС ПОРТА EFF7
410
(1)  131/       0 : =CBEH               RD_77		EQU 0X0CBE			;АДРЕС ПОРТА xx77
411
(1)  132/       0 : =DBEH               RD_PALITRA	EQU 0X0DBE			;АДРЕС ПОРТА ПАЛИТРЫ
412
(1)  133/       0 : =10BEH              BREAK_LOW_RD	EQU 0X10BE			;МЛАДШИЙ БАЙТ АДРЕСА ПОРТА НА ЧТЕНИЕ АДРЕСА BREAK
413
(1)  134/       0 : =11BEH              BREAK_HIGH_RD	EQU 0X11BE			;СТАРШИЙ БАЙТ АДРЕСА ПОРТА НА ЧТЕНИЕ АДРЕСА BREAK
414
(1)  135/       0 : =13BEH              NUM_LINE	EQU 0X13BE			;НОМЕР СТРОКИ РАСТРА (0-159)
415
(1)  136/       0 :                     
867 lvd 416
(1)  137/       0 : =13BDH              FDD_EMU_PORT	EQU 0X13BD
417
(1)  138/       0 :                     
418
(1)  139/       0 : =BDH                BREAK_LOW_WR	EQU 0X00BD			;МЛАДШИЙ БАЙТ АДРЕСА ПОРТА НА ЗАПИСЬ АДРЕСА BREAK
419
(1)  140/       0 : =1BDH               BREAK_HIGH_WR	EQU 0X01BD			;СТАРШИЙ БАЙТ АДРЕСА ПОРТА НА ЗАПИСЬ АДРЕСА BREAK
420
(1)  141/       0 :                     
421
(1)  142/       0 :                     ;[ОДНОСТРАНИЧНЫЙ ТЕКСТМОД]
422
(1)  143/       0 : =1C0H               LSYM		EQU 0X01C0			;СМЕЩЕНИЕ В СТРАНИЦЕ НАЧАЛА ЛЕВЫХ СИМВОЛОВ ТЕКСТМОДА
423
(1)  144/       0 : =31C0H              LATTR		EQU 0X31C0			;СМЕЩЕНИЕ В СТРАНИЦЕ НАЧАЛА ЛЕВЫХ АТРИБУТОВ СИМВОЛОВ
424
(1)  145/       0 : =11C0H              RSYM		EQU 0X11C0			;СМЕЩЕНИЕ В СТРАНИЦЕ НАЧАЛА ПРАВЫХ СИМВОЛОВ ТЕКСТМОДА
425
(1)  146/       0 : =21C1H              RATTR		EQU 0X21C1			;СМЕЩЕНИЕ В СТРАНИЦЕ НАЧАЛА ПРАВЫХ АТРИБУТОВ СИМВОЛОВ 
426
(1)  147/       0 :                     
427
(1)  148/       0 :                     ;[ATM ТЕСТМОД]
428
(1)  149/       0 : =1C0H               ALSYM		EQU 0X01C0			;СМЕЩЕНИЕ В СТРАНИЦЕ НАЧАЛА ЛЕВЫХ СИМВОЛОВ ТЕКСТМОДА
429
(1)  150/       0 : =21C0H              ALATTR		EQU 0X21C0			;СМЕЩЕНИЕ В СТРАНИЦЕ НАЧАЛА ЛЕВЫХ АТРИБУТОВ СИМВОЛОВ
430
(1)  151/       0 : =21C0H              ARSYM		EQU 0X21C0			;СМЕЩЕНИЕ В СТРАНИЦЕ НАЧАЛА ПРАВЫХ СИМВОЛОВ ТЕКСТМОДА
431
(1)  152/       0 : =1C1H               ARATTR		EQU 0X01C1			;СМЕЩЕНИЕ В СТРАНИЦЕ НАЧАЛА ПРАВЫХ АТРИБУТОВ СИМВОЛОВ
432
(1)  153/       0 :                     
433
(1)  154/       0 :                     ;[ЦВЕТА И ЯРКОСТИ]
434
(1)  155/       0 : =0H                 BLACK		EQU 0
435
(1)  156/       0 : =1H                 BLUE		EQU 1
436
(1)  157/       0 : =2H                 RED		EQU 2
437
(1)  158/       0 : =3H                 MAGENTA		EQU 3
438
(1)  159/       0 : =4H                 GREEN		EQU 4
439
(1)  160/       0 : =5H                 CYAN		EQU 5
440
(1)  161/       0 : =6H                 YELLOW		EQU 6
441
(1)  162/       0 : =7H                 WHITE		EQU 7
871 lvd 442
 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
865 lvd 443
 
444
 
867 lvd 445
(1)  163/       0 : =40H                BR_INK		EQU 0X40
446
(1)  164/       0 : =80H                BR_PAPER	EQU 0X80
447
(1)  165/       0 :                     
448
(1)  166/       0 :                     ;[ЦВЕТА ДЛЯ ATM ВИДЕОРЕЖИМОВ]
449
(1)  167/       0 : =80H                G_L		EQU %10000000
450
(1)  168/       0 : =10H                G_H		EQU %00010000
451
(1)  169/       0 : =40H                R_L		EQU %01000000
452
(1)  170/       0 : =2H                 R_H		EQU %00000010
453
(1)  171/       0 : =20H                B_L		EQU %00100000
454
(1)  172/       0 : =1H                 B_H		EQU %00000001
455
(1)  173/       0 :                     
456
(1)  174/       0 :                     ;[МАСКА ПОРТА 7FFD]
457
(1)  175/       0 : =8H                 ZX_SCREEN	EQU %00001000
458
(1)  176/       0 : =10H                ZX_ROM		EQU %00010000
459
(1)  177/       0 :                     
460
(1)  178/       0 :                     ;[МАСКА ПОРТА 0XBF]
461
(1)  179/       0 : (MACRO)              BITMASK RST8_BF,	6
462
(1)  179/       0 : =6H                 B_RST8_BF          EQU 6
463
(1)  179/       0 : =40H                M_RST8_BF          EQU 1<<6
464
(1)  180/       0 : (MACRO)              BITMASK EMUVG_BF,	5	
465
(1)  180/       0 : =5H                 B_EMUVG_BF          EQU 5
466
(1)  180/       0 : =20H                M_EMUVG_BF          EQU 1<<5
467
(1)  181/       0 : (MACRO)              BITMASK BREAK_BF,	4			;БИТ РАЗРЕШЕНИЯ СРАБАТЫВАНИЯ BREAK НА АДРЕСЕ
468
(1)  181/       0 : =4H                 B_BREAK_BF          EQU 4
469
(1)  181/       0 : =10H                M_BREAK_BF          EQU 1<<4
470
(1)  182/       0 : (MACRO)              BITMASK NMI_BF,	3			;БИТ ГЕНЕРАЦИИ NMI
471
(1)  182/       0 : =3H                 B_NMI_BF          EQU 3
472
(1)  182/       0 : =8H                 M_NMI_BF          EQU 1<<3
473
(1)  183/       0 : (MACRO)              BITMASK FONT_BF,	2			;БИТ РАЗРЕШЕНИЯ ИЗМЕНЕНИЯ ШРИФТА
474
(1)  183/       0 : =2H                 B_FONT_BF          EQU 2
475
(1)  183/       0 : =4H                 M_FONT_BF          EQU 1<<2
476
(1)  184/       0 : (MACRO)              BITMASK FLASH_BF,	1			;БИТ РАЗРЕШЕНИЯ ПРОГРАММИРОВАНИЯ FLASH
477
(1)  184/       0 : =1H                 B_FLASH_BF          EQU 1
478
(1)  184/       0 : =2H                 M_FLASH_BF          EQU 1<<1
479
(1)  185/       0 : (MACRO)              BITMASK SHADOW_BF,	0			;БИТ РАЗРЕШЕНИЯ ДОСТУПА К ТЕНЕВЫМ ПОРТАМ
480
(1)  185/       0 : =0H                 B_SHADOW_BF          EQU 0
481
(1)  185/       0 : =1H                 M_SHADOW_BF          EQU 1<<0
482
(1)  186/       0 :                     
483
(1)  187/       0 :                     ;[МАСКА ПОРТА 0XEFF7]
484
(1)  188/       0 : (MACRO)              BITMASK PENT_CMOS,	7			;БИТ РАЗРЕШЕНИЯ ДОСТУПА К КМОСУ
485
(1)  188/       0 : =7H                 B_PENT_CMOS          EQU 7
486
(1)  188/       0 : =80H                M_PENT_CMOS          EQU 1<<7
487
(1)  189/       0 : (MACRO)              BITMASK PENT_TURBO,	4			;ТУРБОРЕЖИМ ПЕНТАГОНА
488
(1)  189/       0 : =4H                 B_PENT_TURBO          EQU 4
489
(1)  189/       0 : =10H                M_PENT_TURBO          EQU 1<<4
490
(1)  190/       0 :                     
491
(1)  191/       0 :                     ;[МАСКИ РЕЖИМОВ]
492
(1)  192/       0 : =10H                MEMORY_ALL	EQU %00010000			;ДОСТУП К ПЕРВОМУ МЕГАБАЙТУ ЧЕРЕЗ ПОРТ EFF7
493
(1)  193/       0 : =20H                MEMORY_48	EQU %00100000			;ДОСТУПЕН ТОЛЬКО 48Kb ПАМЯТИ
494
(1)  194/       0 : =30H                MEMORY_128	EQU %00110000			;ДОСТУПНО ТОЛЬКО 128Kb ПАМЯТИ
495
(1)  195/       0 : =40H                TURBO_3		EQU %01000000			;ЧАСТОТА ПРОЦЕССОРА 3,5 МГц 
496
(1)  196/       0 : =80H                TURBO_7		EQU %10000000			;ЧАСТОТА ПРОЦЕССОРА 7 МГц
497
(1)  197/       0 : =C0H                TURBO_14	EQU %11000000			;ЧАСТОТА ПРОЦЕССОРА 14 МГц
498
(1)  198/       0 : =0H                 NUM_EGA		EQU %00000000			;НОМЕР ВИДЕОРЕЖИМА ДЛЯ ATM ПОРТА (EGA МОД 320*200)
499
(1)  199/       0 : =2H                 NUM_APPMULTI	EQU %00000010			;НОМЕР ВИДЕОРЕЖИМА ДЛЯ ATM ПОРТА (АППАРАТНЫЙ МУЛЬТИКОЛОР 640*200)
500
(1)  200/       0 : =3H                 NUM_ZXSCR	EQU %00000011			;НОМЕР ВИДЕОРЕЖИМА ДЛЯ ATM ПОРТА (ZX SCREEN 6912)
501
(1)  201/       0 : =6H                 NUM_TXTATM	EQU %00000110			;НОМЕР ВИДЕОРЕЖИМА ДЛЯ ATM ПОРТА (ATM ТЕКСТМОД 80*25)
502
(1)  202/       0 : =7H                 NUM_TXTSCR	EQU %00000111			;НОМЕР ВИДЕОРЕЖИМА ДЛЯ ATM ПОРТА (ОДНОСТРАНИЧНЫЙ ТЕКСТМОД 80*25)
865 lvd 503
(1)  203/       0 :                     
867 lvd 504
(1)  204/       0 : =8H                 SET_VIDEOMODE	EQU %00001000
871 lvd 505
 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
865 lvd 506
 
507
 
867 lvd 508
(1)  205/       0 :                     
509
(1)  206/       0 :                     ;[НОМЕРА ВИДЕОРЕЖИМОВ С МАСКОЙ ДЛЯ ЗАПИСИ В ПОРТ]
510
(1)  207/       0 : =A0H                V_EGA		EQU NUM_EGA	 | 0XA0
511
(1)  208/       0 : =A2H                V_APPMULTI	EQU NUM_APPMULTI | 0XA0
512
(1)  209/       0 : =A3H                V_ZXSCR		EQU NUM_ZXSCR	 | 0XA0
513
(1)  210/       0 : =A6H                V_TXTATM	EQU NUM_TXTATM	 | 0XA0
514
(1)  211/       0 : =A7H                V_TXT1PAGE	EQU NUM_TXTSCR	 | 0XA0
515
(1)  212/       0 :                     
516
(1)  213/       0 :                     ;[МАСКИ ОТЛАДЧИКА]
517
(1)  214/       0 : (MACRO)              BITMASK DBG_ACTIV,	7			;АКТИВЕН ОТЛАДЧИК
518
(1)  214/       0 : =7H                 B_DBG_ACTIV          EQU 7
519
(1)  214/       0 : =80H                M_DBG_ACTIV          EQU 1<<7
520
(1)  215/       0 : (MACRO)              BITMASK TRACE_DBG,	6			;ТРАССИРОВКА
521
(1)  215/       0 : =6H                 B_TRACE_DBG          EQU 6
522
(1)  215/       0 : =40H                M_TRACE_DBG          EQU 1<<6
523
(1)  216/       0 : (MACRO)              BITMASK STEP_DBG,	5			;ПОШАГОВАЯ ОТЛАДКА
524
(1)  216/       0 : =5H                 B_STEP_DBG          EQU 5
525
(1)  216/       0 : =20H                M_STEP_DBG          EQU 1<<5
526
(1)  217/       0 :                     ; BITMASK CASH_INST,	4			;УСТАНОВЛЕН CASH REMEMBER
527
(1)  218/       0 :                     ; BITMASK CASH_ACTIV,	3			;АКТИВЕН CASH REMEMBER
528
(1)  219/       0 :                     
529
(1)  220/       0 :                     ;[СМЕЩЕНИЯ FDI ОБРАЗА]
530
(1)  221/       0 : =4000H              FDI_TABLE_CYL	EQU 0X4000			;АДРЕС ТАБЛИЦЫ НАЧАЛ ДОРОЖЕК В ОБРАЗЕ
531
(1)  222/       0 : =40FFH              FDI_PAGE_START	EQU 0X40FF			;СМЕЩЕНИЕ В СТРАНИЦАХ НАЧАЛА СЕКТОРОВ ОБРАЗА
532
(1)  223/       0 : =41FEH              FDI_BYTE_SMESH	EQU 0X41FE			;СМЕЩЕНИЕ В БАЙТАХ НАЧАЛА ОБРАЗА ЗАГРУЖЕННОГО В РАМДИСК
533
(1)  224/       0 : =41FFH              FDI_BLOCK_SMESH	EQU 0X41FF			;СМЕЩЕНИЕ В БЛОКАХ (ПО 256 БАЙТ) НАЧАЛА СЕКТОРОВ ОБРАЗА
534
(1)  225/       0 : =4400H              FDI_IMAGE1SECT	EQU 0X4400			;АДРЕС ЗАГРУЗКИ ПЕРВОГО СЕКТОРА ДЛЯ ОПРЕДЕЛЕНИЯ СМЕЩЕНИЯ
535
(1)  226/       0 :                     
536
(1)  227/       0 :                     ;ЯЧЕЙКИ В CMOS
537
(1)  228/       0 : =0H                 _CMOS_SECOND	EQU 0				;СЕКУНДЫ
538
(1)  229/       0 : =1H                 _CMOS_SECOND_AL	EQU 1				;СЕКУНДЫ БУДИЛЬНИКА
539
(1)  230/       0 : =2H                 _CMOS_MINUTE	EQU 2				;МИНУТЫ
540
(1)  231/       0 : =3H                 _CMOS_MINUTE_AL	EQU 3				;МИНУТЫ БУДИЛЬНИКА
541
(1)  232/       0 : =4H                 _CMOS_HOUR	EQU 4				;ЧАСЫ
542
(1)  233/       0 : =5H                 _CMOS_HOUR_AL	EQU 5				;ЧАСЫ БУДИЛЬНИКА
543
(1)  234/       0 : =6H                 _CMOS_DAY	EQU 6				;ДЕНЬ НЕДЕЛИ
544
(1)  235/       0 : =7H                 _CMOS_DAY_MONTH	EQU 7				;ДЕНЬ МЕСЯЦА
545
(1)  236/       0 : =8H                 _CMOS_MONTH	EQU 8				;МЕСЯЦ
546
(1)  237/       0 : =9H                 _CMOS_YEAR	EQU 9				;ГОД
547
(1)  238/       0 :                     
548
(1)  239/       0 :                     ;[НОМЕРА ЯЧЕЕК CMOS И ИХ СОДЕРЖИМОЕ]
549
(1)  240/       0 : =EFH                CRCCMOSHIGH	EQU 0XEF			;СТАРШИЙ БАЙТ CRC CMOS
550
(1)  241/       0 : =EEH                CRCCMOSLOW	EQU 0XEE			;МЛАДШИЙ БАЙТ CRC CMOS
551
(1)  242/       0 : =EDH                CMOS_BYTE_00	EQU 0XED			;АДРЕС ХРАНЕНИЯ В CMOS
552
(1)  243/       0 : =ECH                CMOS_BYTE_01	EQU 0XEC			;АДРЕС ХРАНЕНИЯ В CMOS
553
(1)  244/       0 : =EBH                VIRT_REAL_DRIVE	EQU 0XEB			;ХРАНЕНИЕ НОМЕРА РЕАЛЬНОГО И ВИРТУАЛЬНОГО ДИСКОВОДА, ТИП DOS
554
(1)  245/       0 : =EAH                HDD_TIMEOUT	EQU 0XEA			;ЗАДЕРЖКА ОПРЕДЕНИЯ НАЛИЧИЯ ВИНТА ПОСЛЕ ВКЛЮЧЕНИЯ ПИТАНИЯ
555
(1)  246/       0 : =E9H                CMOS_BYTE_02	EQU 0XE9			;АДРЕС ХРАНЕНИЯ В CMOS
556
(1)  247/       0 : =E8H                CMOS_BYTE_03	EQU 0XE8			;АДРЕС ХРАНЕНИЯ В CMOS
557
(1)  248/       0 :                     
558
(1)  249/       0 :                     ;[ЯЧЕЙКА CMOS 0XED CMOS_BYTE_00]
559
(1)  250/       0 : (MACRO)              BITMASK TURBO14,	7			;РАЗРЕШЕНИЕ ВКЛЮЧЕНИЯ TURBO 14MHZ
560
(1)  250/       0 : =7H                 B_TURBO14          EQU 7
561
(1)  250/       0 : =80H                M_TURBO14          EQU 1<<7
562
(1)  251/       0 : (MACRO)              BITMASK EMUL_TAPE,	6			;РАЗРЕШЕНИЕ ЭМУЛЯЦИИ ЗАГРУЗКИ С ЛЕНТЫ
563
(1)  251/       0 : =6H                 B_EMUL_TAPE          EQU 6
564
(1)  251/       0 : =40H                M_EMUL_TAPE          EQU 1<<6
565
(1)  252/       0 : (MACRO)              BITMASK PRINTER_AY,	5			;РАЗРЕШЕНИЕ ПОДМЕНЫ ДРАЙВЕРА ПЕЧАТИ В BASIC48
566
(1)  252/       0 : =5H                 B_PRINTER_AY          EQU 5
567
(1)  252/       0 : =20H                M_PRINTER_AY          EQU 1<<5
871 lvd 568
 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
865 lvd 569
 
570
 
867 lvd 571
(1)  253/       0 : (MACRO)              BITMASK RELOAD_FONT,	4			;РАЗРЕШЕНИЕ ПЕРЕЗАГРУЗКИ ШРИФТА ПРИ СБРОСЕ
572
(1)  253/       0 : =4H                 B_RELOAD_FONT          EQU 4
573
(1)  253/       0 : =10H                M_RELOAD_FONT          EQU 1<<4
574
(1)  254/       0 : (MACRO)              BITMASK TYPE_FONT,	3			;ВЫБОР КОДИРОВКИ ШРИФТА
575
(1)  254/       0 : =3H                 B_TYPE_FONT          EQU 3
576
(1)  254/       0 : =8H                 M_TYPE_FONT          EQU 1<<3
577
(1)  255/       0 : (MACRO)              BITMASK AUTO_TAPE,	2			;АВТОЗАПУСК TAP ФАЙЛОВ
578
(1)  255/       0 : =2H                 B_AUTO_TAPE          EQU 2
579
(1)  255/       0 : =4H                 M_AUTO_TAPE          EQU 1<<2
580
(1)  256/       0 :                     
581
(1)  257/       0 :                     ;[НОМЕРА СБРОСОВ, БИТЫ 1-0 ЯЧЕЙКИ 0XED (CMOS_BYTE_00)]
582
(1)  258/       0 : =3H                 RESET2CUSTOM	EQU 3				;СБРОС В CUSTOM ROM
583
(1)  259/       0 : =2H                 RESET2PROFROM	EQU 2				;СБРОС В PROFROM
584
(1)  260/       0 : =1H                 RESET2GLUK	EQU 1				;СБРОС В GLUK SERVICE
585
(1)  261/       0 : =0H                 RESET2EVOSERV	EQU 0				;СБРОС В EVO SERVICE
586
(1)  262/       0 :                     
587
(1)  263/       0 :                     ;[ЯЧЕЙКА CMOS 0XEC CMOS_BYTE_01]
588
(1)  264/       0 : (MACRO)              BITMASK TURBO357,	7			;ТУРБО РЕЖИМ 3,5 ИЛИ 7 МГЦ
589
(1)  264/       0 : =7H                 B_TURBO357          EQU 7
590
(1)  264/       0 : =80H                M_TURBO357          EQU 1<<7
591
(1)  265/       0 : (MACRO)              BITMASK SD_NGS_ONOFF,	6			;ВКЛЮЧЕНИЕ/ВЫКЛЮЧЕНИЕ ДОСТУПА К SD КАРТЕ NEOGS
592
(1)  265/       0 : =6H                 B_SD_NGS_ONOFF          EQU 6
593
(1)  265/       0 : =40H                M_SD_NGS_ONOFF          EQU 1<<6
594
(1)  266/       0 : (MACRO)              BITMASK AUTOMOUNT,	5			;ВКЛ/ВЫКЛ АВТОМОНТИРОВАНИЯ ИЗ ФАЙЛА
595
(1)  266/       0 : =5H                 B_AUTOMOUNT          EQU 5
596
(1)  266/       0 : =20H                M_AUTOMOUNT          EQU 1<<5
597
(1)  267/       0 : (MACRO)              BITMASK CLOCK_VIEW,	4			;ХРАНЕНИЕ ОТОБРАЖЕНИЕ ЧАСОВ
598
(1)  267/       0 : =4H                 B_CLOCK_VIEW          EQU 4
599
(1)  267/       0 : =10H                M_CLOCK_VIEW          EQU 1<<4
600
(1)  268/       0 : (MACRO)              BITMASK SOUNDKEYS,	3			;РАЗРЕШЕНИЕ ОЗВУЧИВАНИЯ НАЖАТЫХ КЛАВИШ
601
(1)  268/       0 : =3H                 B_SOUNDKEYS          EQU 3
602
(1)  268/       0 : =8H                 M_SOUNDKEYS          EQU 1<<3
603
(1)  269/       0 : (MACRO)              BITMASK REZIDENT,	2			;РАЗРЕШЕНИЕ ПРОВЕРКИ НАЛИЧИЯ РЕЗИДЕНТА
604
(1)  269/       0 : =2H                 B_REZIDENT          EQU 2
605
(1)  269/       0 : =4H                 M_REZIDENT          EQU 1<<2
606
(1)  270/       0 :                     
607
(1)  271/       0 :                     ;[НОМЕРА МОДЕЛЕЙ ПАМЯТИ, БИТЫ 1-0 ЯЧЕЙКИ 0XEC (CMOS_BYTE_01)]
608
(1)  272/       0 : =2H                 _128K		EQU 2				;ПАМЯТЬ 128 Кб
609
(1)  273/       0 : =1H                 _48K		EQU 1				;ПАМЯТЬ 48 Кб
610
(1)  274/       0 : =0H                 _1MB		EQU 0				;ПАМЯТЬ 1 Мб
611
(1)  275/       0 :                     
612
(1)  276/       0 : =4H                 KOL_MODES	EQU 4				;КОЛИЧЕСТВО РЕЖИМОВ СБРОСА
613
(1)  277/       0 : =3H                 MKOL_MODES	EQU 3				;МАСКА ДЛЯ КОЛИЧЕСТВА РЕЖИМОВ СБРОСА
614
(1)  278/       0 :                     
615
(1)  279/       0 :                     ;[ЯЧЕЙКА CMOS 0XEB]
616
(1)  280/       0 : (MACRO)              BITMASK ACCESSZCSD,	7			;РАЗРЕШЕНИЕ ДОСТУПА К ZC SD CARD
617
(1)  280/       0 : =7H                 B_ACCESSZCSD          EQU 7
618
(1)  280/       0 : =80H                M_ACCESSZCSD          EQU 1<<7
619
(1)  281/       0 : (MACRO)              BITMASK ACCESSSDG,	6			;РАЗРЕШЕНИЯ ДОСТУПА К SD КАРТЕ NEOGS
620
(1)  281/       0 : =6H                 B_ACCESSSDG          EQU 6
621
(1)  281/       0 : =40H                M_ACCESSSDG          EQU 1<<6
622
(1)  282/       0 : (MACRO)              BITMASK ACCESSHDDM,	5			;РАЗРЕШЕНИЕ ДОСТУПА К HDD MASTER
623
(1)  282/       0 : =5H                 B_ACCESSHDDM          EQU 5
624
(1)  282/       0 : =20H                M_ACCESSHDDM          EQU 1<<5
625
(1)  283/       0 : (MACRO)              BITMASK ACCESSHDDS,	4			;РАЗРЕШЕНИЕ ДОСТУПА К HDD SLAVE
626
(1)  283/       0 : =4H                 B_ACCESSHDDS          EQU 4
627
(1)  283/       0 : =10H                M_ACCESSHDDS          EQU 1<<4
628
(1)  284/       0 : =CH                 _REAL_DRIVE	EQU %00001100			;МАСКА НОМЕРА РЕАЛЬНОГО ДИСКОВОДА
629
(1)  285/       0 : =3H                 _VIRT_DRIVE	EQU %00000011			;МАСКА НОМЕРА ВИРТУАЛЬНОГО ДИСКОВОДА
630
(1)  286/       0 :                     
871 lvd 631
 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
865 lvd 632
 
633
 
867 lvd 634
(1)  287/       0 :                     ;[ЯЧЕЙКА CMOS 0XE9]
635
(1)  288/       0 : (MACRO)              BITMASK AUTOBOOT,	7			;АВТОСТАРТ ЗАГРУЖАЕМОГО УСТРОЙСТВА
636
(1)  288/       0 : =7H                 B_AUTOBOOT          EQU 7
637
(1)  288/       0 : =80H                M_AUTOBOOT          EQU 1<<7
638
(1)  289/       0 : =3H                 BOOTDEVICE	EQU %00000011			;НОМЕР ЗАГРУЖАЕМОГО УСТРОЙСТВА
639
(1)  290/       0 :                     
640
(1)  291/       0 :                     ;[ЯЧЕЙКА CMOS 0XE8]
641
(1)  292/       0 : (MACRO)              BITMASK KILL_REZIDENT,	7			;ИЗМЕНЕНИЕ РЕЗИДЕНТА ПЕРЕД ЗАПУСКОМ
642
(1)  292/       0 : =7H                 B_KILL_REZIDENT          EQU 7
643
(1)  292/       0 : =80H                M_KILL_REZIDENT          EQU 1<<7
644
(1)  293/       0 :                     
645
(1)  294/       0 :                     ;[НОМЕРА ЗАГРУЖАЕМЫХ УСТРОЙСТВ]
646
(1)  295/       0 : =2H                 _SD		EQU 2				;SD КАРТА
647
(1)  296/       0 : =1H                 _HDD		EQU 1				;ВИНЧЕСТЕР
648
(1)  297/       0 : =0H                 _FDD		EQU 0				;ДИСКОВОД
865 lvd 649
(1)  298/       0 :                     
867 lvd 650
(1)  299/       0 : =80H                _SD_NONE	EQU 0X80			;ПРИЗНАК НЕ ВСТАВЛЕННОЙ КАРТЫ
651
(1)  300/       0 :                     
652
(1)  301/       0 :                     ;[ПЕРЕМЕННЫЕ ДЛЯ 0 ОКНА ПРОЕЦИРОВАНИЯ]
653
(1)  302/       0 : =13H                DEBUG_ONOFF	EQU 0X0013			;ВКЛ/ВЫКЛ ОТЛАДЧИКА
654
(1)  303/       0 : =14H                ADR_SEL_ROM	EQU 0X0014			;АДРЕС ПЕРЕКЛЮЧЕНИЯ СТРАНИЦ ROM
655
(1)  304/       0 : =2CH                CONT_RST8	EQU 0X002C			;АДРЕС ПРОДОЛЖЕНИЯ ОБРАБОТКИ RST 8
656
(1)  305/       0 : =34H                CONTINUE_MAGIC	EQU 0X0034			;АДРЕС ПЕРЕХОДА ПРОДОЛЖЕНИЯ ОБРАБОТЧИКА MAGIC
657
(1)  306/       0 : =36H                ADR_PERFECT	EQU 0X0036			;АДРЕС РАСПОЛОЖЕНИЯ PERFECT COMANDER
658
(1)  307/       0 : =3EH                EI_RET		EQU 0X003E			;АДРЕС РАСПОЛОЖЕНИЯ EI:RET
659
(1)  308/       0 : =40H                UNP_DOS_FE	EQU 0X0040			;АДРЕС РАСПАКОВЩИКА DOS FE
660
(1)  309/       0 : =80H                UNPACK		EQU 0X0080			;АДРЕС РАСПАКОВЩИКА
661
(1)  310/       0 : =100H               _BIOS_JUMPS	EQU 0X0100			;АДРЕС НАЧАЛА ТАБЛИЦЫ ПЕРЕХОДОВ В ДРАЙВЕРЫ ДЕВАЙСОВ
662
(1)  311/       0 : =569H               ADRBRK_EMUTAP	EQU 0X0569			;АДРЕС УСТАНОВКИ БРЯКА ДЛЯ ЭМУЛЯЦИИ ЗАГРУЗКИ TAP
663
(1)  312/       0 : =C000H              START_STS	EQU 0XC000			;АДРЕС ВХОДА В ОТЛАДЧИК
664
(1)  313/       0 : =3CE8H              ADR_RST8END	EQU 0X3CE8			;АДРЕС ВОЗВРАТА ИЗ RST 8
665
(1)  314/       0 : =8000H              ICALL2PAGE	EQU 0X8000			;АДРЕС ВЫЗЫВОВ КОДА ИЗ ДРУГОЙ СТРАНИЦЫ
666
(1)  315/       0 :                     
667
(1)  316/       0 : =0H                 OFFSET_FNTSAVE	EQU 0				;800 СМЕЩЕНИЕ В СТРАНИЦЕ ДЛЯ СОХРАНЕНИЯ СЧИТАННОГО ШРИФТА
668
(1)  317/       0 : =800H               OFFSET_BUFSYM	EQU OFFSET_FNTSAVE+0X800	;800 СМЕЩЕНИЕ В СТРАНИЦЕ ТЕКУЩЕГО ШРИФТА
669
(1)  318/       0 : =1000H              OFFSET_SCRSAVE	EQU OFFSET_BUFSYM+0X800		;1B00 СМЕЩЕНИЕ В СТРАНИЦЕ ДЛЯ СОХРАНЕНИЯ ЭКРАНА
670
(1)  319/       0 : =2B00H              OFFSET_USBDRV	EQU OFFSET_SCRSAVE+0X1B00	;??? СМЕЩЕНИЕ ДО НАЧАЛА USB ДРАЙВЕРА
671
(1)  320/       0 :                     
672
(1)  321/       0 : =BE00H              BUF_512		EQU CPU3-0X200			;200 БУФЕР СЕКТОРА
673
(1)  322/       0 : =BD00H              BUF_TABLVOL	EQU BUF_512-0X100		;100 БУФЕР ТАБЛИЦЫ НАЙДЕННЫХ РАЗДЕЛОВ
674
(1)  323/       0 : =BC00H              BUF_TEKVOL	EQU BUF_TABLVOL-0X100		;100 БУФЕР ВЫБРАННОГО РАЗДЕЛА
675
(1)  324/       0 : =B400H              BUF_TDIRCLS	EQU BUF_TEKVOL-0X800		;800 БУФЕР КЛАСТЕРОВ ТЕКУЩЕЙ ДИРЕКТОРИИ
676
(1)  325/       0 : =B300H              BUF_256		EQU BUF_TDIRCLS-0X100		;100 БУФЕР 256 БАЙТ ДЛЯ ПЕРЕНОСОВ
677
(1)  326/       0 : =B200H              BUF_PATH	EQU BUF_256-0X100		;100 БУФЕР ТЕКУЩЕГО ПУТИ
678
(1)  327/       0 : =B100H              MOUNT_DRIVES	EQU BUF_PATH-0X100		;100 БУФЕР ОПИСАТЕЛЕЙ ПРИМОНТИРОВАННЫХ ФАЙЛОВ
679
(1)  328/       0 : =B000H              BUF_LEVELDIR	EQU MOUNT_DRIVES-0X100		;200 БУФЕР СОХРАНЕНИЯ ПОЗИЦИЙ ОКОН ПРИ ПЕРЕХОДАХ ПО ДИРЕКТОРИЯМ
680
(1)  329/       0 : =AC00H              BUF_WINPATH	EQU BUF_LEVELDIR-0X400		;400 БУФЕР СОХРАНЕНИЯ ПОЗИЦИЙ В ОКНЕ ПРИ ХОЖДЕНИИ ПО ДИРЕКТОРИЯМ
681
(1)  330/       0 :                     
682
(1)  331/       0 :                     ;[ПЕРЕМЕННЫЕ ДЛЯ МЕНЕДЖЕРА УСТРОЙСТВ]
683
(1)  332/       0 : =BDE0H              DEVICES		EQU BUF_TABLVOL+0XE0		;10 СПИСОК ОБНАРУЖЕННЫХ ДЕВАЙСОВ
684
(1)  333/       0 : =BDF0H              GO_DEV		EQU DEVICES+0X10		;2 АДРЕС ВЫЗОВА ДРАЙВЕРА УСТРОЙСТВА
685
(1)  334/       0 : =BDF2H              KOLDVOL		EQU GO_DEV+2			;1 КОЛИЧЕСТВО НАЙДЕННЫХ РАЗДЕЛОВ
686
(1)  335/       0 : =BDF3H              SETDVOL		EQU KOLDVOL+1			;1 НОМЕР ВЫБРАННОГО РАЗДЕЛА
687
(1)  336/       0 : =BDF4H              ADRTEKV		EQU SETDVOL+1			;2 АДРЕС ОПИСАТЕЛЯ ТЕКУЩЕГО РАЗДЕЛА
688
(1)  337/       0 : =BDF6H              SAVE_TEK_VOL	EQU ADRTEKV+2			;1 ВРЕМЕННОЕ СОХРАНЕНИЕ ТЕКУЩЕГО РАЗДЕЛА
689
(1)  338/       0 : =BDF7H              TEK_TYPE	EQU SAVE_TEK_VOL+1		;1 ВРЕМЕННОЕ ХРАНЕНИЕ ТИПА ТЕКУЩЕГО УСТРОЙСТВА
690
(1)  339/       0 : =BDF8H              FLAGS_DRV	EQU TEK_TYPE+1			;1 ФЛАГОВЫЙ БАЙТ ДРАЙВЕРОВ
691
(1)  340/       0 :                     ;7 =0-ДРАЙВЕР SD КАРТЫ NEOGS НЕ УСТАНОВЛЕН, =1-УСТАНОВЛЕН
692
(1)  341/       0 :                     ;6
693
(1)  342/       0 :                     ;5
871 lvd 694
 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
865 lvd 695
 
696
 
867 lvd 697
(1)  343/       0 :                     ;4
698
(1)  344/       0 :                     ;3
699
(1)  345/       0 :                     ;2
700
(1)  346/       0 :                     ;1 =0-SD ZC КАРТА НЕ ОБНАРУЖЕНА, 1-ОБНАРУЖЕНА
701
(1)  347/       0 :                     ;0 =0-SD NeoGS НЕ ОБНАРУЖЕНА, 1-ОБНАРУЖЕНА
702
(1)  348/       0 : =BDFEH              CRC_DRVS	EQU BUF_TABLVOL+0XFE		;2 КОНТРОЛЬНАЯ СУММА ТАБЛИЦЫ НАЙДЕННЫХ РАЗДЕЛОВ
703
(1)  349/       0 :                     
704
(1)  350/       0 :                     ;[ПЕРЕМЕННЫЕ ДЛЯ 1 ОКНА ПРОЕЦИРОВАНИЯ]
705
(1)  351/       0 : =0H                 BUF_ALLVOL	EQU 0				;1000 БУФЕР ПЕРЕМЕННЫХ ДЛЯ ВСЕХ РАЗДЕЛОВ (16 MAX)
706
(1)  352/       0 : =1000H              MOUNT_CLS	EQU BUF_ALLVOL+0X1000		;1000 БУФЕР КЛАСТЕРОВ ПРИМОНТИРОВАННЫХ ФАЙЛОВ
707
(1)  353/       0 : =2000H              TEK_BUFPATH	EQU MOUNT_CLS+0X1000		;1000 БУФЕР ТЕКУЩИХ ПУТЕЙ НА РАЗДЕЛАХ
708
(1)  354/       0 : =3000H              BUF_PATHMOUNT	EQU TEK_BUFPATH+0X1000		;400 БУФЕР ПУТЕЙ ДЛЯ ПОИСКА ПРИМОНТИРОВАННЫХ ФАЙЛОВ
709
(1)  355/       0 : =3400H              BUF_DIRCEP	EQU BUF_PATHMOUNT+0X400		;100 БУФЕР ЦЕПОЧКИ ТЕКУЩЕЙ ДИРЕКТОРИИ
710
(1)  356/       0 : =3500H              BUF_TEMPSEC	EQU BUF_DIRCEP+0X100		;200 БУФЕР СЕКТОРА ДЛЯ ЗАГРУЗКИ ОБРАЗОВ
711
(1)  357/       0 :                     
865 lvd 712
       8/       0 :                     		include ../../svn/pentevo/rom/define.a80
713
(1)    1/       0 :                     
714
(1)    2/       0 :                     ;LAST UPDATE: 05.08.2019 savelij
715
(1)    3/       0 :                     
716
(1)    4/       0 :                     ;номера функций RST 8
717
(1)    5/       0 : (MACRO)              INIT_VAR 0X40
718
(1)    5/       0 : =>NOT BLANK                         IFNB 0X40
719
(1)    5/       0 : =40H                INITVAR := 0X40
720
(1)    5/       0 : =>FALSE                             ELSE
721
(1)    5/       0 :                     INITVAR := 0
722
(1)    5/       0 : [5]                                 ENDIF
723
(1)    6/       0 : (MACRO)              SETVAR _AY_PRN_INIT
724
(1)    6/       0 : =40H                _AY_PRN_INIT            EQU INITVAR
725
(1)    6/       0 : =>BLANK                             IFNB 
726
(1)    6/       0 :                     INITVAR := INITVAR+
727
(1)    6/       0 :                     _AY_PRN_INIT_Size       EQU 
728
(1)    6/       0 : =>TRUE                              ELSE
729
(1)    6/       0 : =41H                INITVAR := INITVAR+BYTE
730
(1)    6/       0 : =1H                 _AY_PRN_INIT_Size       EQU BYTE
731
(1)    6/       0 : [6]                                 ENDIF
732
(1)    7/       0 : (MACRO)              SETVAR _AY_PRN_A_
733
(1)    7/       0 : =41H                _AY_PRN_A_            EQU INITVAR
734
(1)    7/       0 : =>BLANK                             IFNB 
735
(1)    7/       0 :                     INITVAR := INITVAR+
736
(1)    7/       0 :                     _AY_PRN_A__Size       EQU 
737
(1)    7/       0 : =>TRUE                              ELSE
738
(1)    7/       0 : =42H                INITVAR := INITVAR+BYTE
739
(1)    7/       0 : =1H                 _AY_PRN_A__Size       EQU BYTE
740
(1)    7/       0 : [7]                                 ENDIF
741
(1)    8/       0 : (MACRO)              SETVAR _AY_PRN_TOKEN
742
(1)    8/       0 : =42H                _AY_PRN_TOKEN            EQU INITVAR
743
(1)    8/       0 : =>BLANK                             IFNB 
744
(1)    8/       0 :                     INITVAR := INITVAR+
745
(1)    8/       0 :                     _AY_PRN_TOKEN_Size       EQU 
746
(1)    8/       0 : =>TRUE                              ELSE
747
(1)    8/       0 : =43H                INITVAR := INITVAR+BYTE
748
(1)    8/       0 : =1H                 _AY_PRN_TOKEN_Size       EQU BYTE
749
(1)    8/       0 : [8]                                 ENDIF
750
(1)    9/       0 : (MACRO)              SETVAR _AY_PRN_SCR
751
(1)    9/       0 : =43H                _AY_PRN_SCR            EQU INITVAR
752
(1)    9/       0 : =>BLANK                             IFNB 
753
(1)    9/       0 :                     INITVAR := INITVAR+
754
(1)    9/       0 :                     _AY_PRN_SCR_Size       EQU 
755
(1)    9/       0 : =>TRUE                              ELSE
756
(1)    9/       0 : =44H                INITVAR := INITVAR+BYTE
871 lvd 757
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80(../../svn/pentevo/rom/define.a80) - page 13 - 2/23/2020 18:58:45
867 lvd 758
 
759
 
865 lvd 760
(1)    9/       0 : =1H                 _AY_PRN_SCR_Size       EQU BYTE
761
(1)    9/       0 : [9]                                 ENDIF
762
(1)   10/       0 : (MACRO)              SETVAR _TAPE_INIT
763
(1)   10/       0 : =44H                _TAPE_INIT            EQU INITVAR
764
(1)   10/       0 : =>BLANK                             IFNB 
765
(1)   10/       0 :                     INITVAR := INITVAR+
766
(1)   10/       0 :                     _TAPE_INIT_Size       EQU 
767
(1)   10/       0 : =>TRUE                              ELSE
768
(1)   10/       0 : =45H                INITVAR := INITVAR+BYTE
769
(1)   10/       0 : =1H                 _TAPE_INIT_Size       EQU BYTE
770
(1)   10/       0 : [10]                                ENDIF
771
(1)   11/       0 : (MACRO)              SETVAR _TAPE_EMUL
772
(1)   11/       0 : =45H                _TAPE_EMUL            EQU INITVAR
773
(1)   11/       0 : =>BLANK                             IFNB 
774
(1)   11/       0 :                     INITVAR := INITVAR+
775
(1)   11/       0 :                     _TAPE_EMUL_Size       EQU 
776
(1)   11/       0 : =>TRUE                              ELSE
777
(1)   11/       0 : =46H                INITVAR := INITVAR+BYTE
778
(1)   11/       0 : =1H                 _TAPE_EMUL_Size       EQU BYTE
779
(1)   11/       0 : [11]                                ENDIF
780
(1)   12/       0 : (MACRO)              SETVAR _WINW
781
(1)   12/       0 : =46H                _WINW            EQU INITVAR
782
(1)   12/       0 : =>BLANK                             IFNB 
783
(1)   12/       0 :                     INITVAR := INITVAR+
784
(1)   12/       0 :                     _WINW_Size       EQU 
785
(1)   12/       0 : =>TRUE                              ELSE
786
(1)   12/       0 : =47H                INITVAR := INITVAR+BYTE
787
(1)   12/       0 : =1H                 _WINW_Size       EQU BYTE
788
(1)   12/       0 : [12]                                ENDIF
789
(1)   13/       0 : (MACRO)              SETVAR _PRINT_MESSAGE
790
(1)   13/       0 : =47H                _PRINT_MESSAGE            EQU INITVAR
791
(1)   13/       0 : =>BLANK                             IFNB 
792
(1)   13/       0 :                     INITVAR := INITVAR+
793
(1)   13/       0 :                     _PRINT_MESSAGE_Size       EQU 
794
(1)   13/       0 : =>TRUE                              ELSE
795
(1)   13/       0 : =48H                INITVAR := INITVAR+BYTE
796
(1)   13/       0 : =1H                 _PRINT_MESSAGE_Size       EQU BYTE
797
(1)   13/       0 : [13]                                ENDIF
798
(1)   14/       0 : (MACRO)              SETVAR _PRINT_A
799
(1)   14/       0 : =48H                _PRINT_A            EQU INITVAR
800
(1)   14/       0 : =>BLANK                             IFNB 
801
(1)   14/       0 :                     INITVAR := INITVAR+
802
(1)   14/       0 :                     _PRINT_A_Size       EQU 
803
(1)   14/       0 : =>TRUE                              ELSE
804
(1)   14/       0 : =49H                INITVAR := INITVAR+BYTE
805
(1)   14/       0 : =1H                 _PRINT_A_Size       EQU BYTE
806
(1)   14/       0 : [14]                                ENDIF
807
(1)   15/       0 : (MACRO)              SETVAR _SCROLL_UP
808
(1)   15/       0 : =49H                _SCROLL_UP            EQU INITVAR
809
(1)   15/       0 : =>BLANK                             IFNB 
810
(1)   15/       0 :                     INITVAR := INITVAR+
811
(1)   15/       0 :                     _SCROLL_UP_Size       EQU 
812
(1)   15/       0 : =>TRUE                              ELSE
813
(1)   15/       0 : =4AH                INITVAR := INITVAR+BYTE
814
(1)   15/       0 : =1H                 _SCROLL_UP_Size       EQU BYTE
815
(1)   15/       0 : [15]                                ENDIF
816
(1)   16/       0 : (MACRO)              SETVAR _SCROLL_DOWN
817
(1)   16/       0 : =4AH                _SCROLL_DOWN            EQU INITVAR
818
(1)   16/       0 : =>BLANK                             IFNB 
819
(1)   16/       0 :                     INITVAR := INITVAR+
871 lvd 820
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80(../../svn/pentevo/rom/define.a80) - page 14 - 2/23/2020 18:58:45
867 lvd 821
 
822
 
865 lvd 823
(1)   16/       0 :                     _SCROLL_DOWN_Size       EQU 
824
(1)   16/       0 : =>TRUE                              ELSE
825
(1)   16/       0 : =4BH                INITVAR := INITVAR+BYTE
826
(1)   16/       0 : =1H                 _SCROLL_DOWN_Size       EQU BYTE
827
(1)   16/       0 : [16]                                ENDIF
828
(1)   17/       0 : (MACRO)              SETVAR _SET_MODE
829
(1)   17/       0 : =4BH                _SET_MODE            EQU INITVAR
830
(1)   17/       0 : =>BLANK                             IFNB 
831
(1)   17/       0 :                     INITVAR := INITVAR+
832
(1)   17/       0 :                     _SET_MODE_Size       EQU 
833
(1)   17/       0 : =>TRUE                              ELSE
834
(1)   17/       0 : =4CH                INITVAR := INITVAR+BYTE
835
(1)   17/       0 : =1H                 _SET_MODE_Size       EQU BYTE
836
(1)   17/       0 : [17]                                ENDIF
837
(1)   18/       0 : (MACRO)              SETVAR _MATH
838
(1)   18/       0 : =4CH                _MATH            EQU INITVAR
839
(1)   18/       0 : =>BLANK                             IFNB 
840
(1)   18/       0 :                     INITVAR := INITVAR+
841
(1)   18/       0 :                     _MATH_Size       EQU 
842
(1)   18/       0 : =>TRUE                              ELSE
843
(1)   18/       0 : =4DH                INITVAR := INITVAR+BYTE
844
(1)   18/       0 : =1H                 _MATH_Size       EQU BYTE
845
(1)   18/       0 : [18]                                ENDIF
846
(1)   19/       0 : (MACRO)              SETVAR _VERSION
847
(1)   19/       0 : =4DH                _VERSION            EQU INITVAR
848
(1)   19/       0 : =>BLANK                             IFNB 
849
(1)   19/       0 :                     INITVAR := INITVAR+
850
(1)   19/       0 :                     _VERSION_Size       EQU 
851
(1)   19/       0 : =>TRUE                              ELSE
852
(1)   19/       0 : =4EH                INITVAR := INITVAR+BYTE
853
(1)   19/       0 : =1H                 _VERSION_Size       EQU BYTE
854
(1)   19/       0 : [19]                                ENDIF
855
(1)   20/       0 :                     
856
(1)   21/       0 : (MACRO)              INIT_VAR 0X4F
857
(1)   21/       0 : =>NOT BLANK                         IFNB 0X4F
858
(1)   21/       0 : =4FH                INITVAR := 0X4F
859
(1)   21/       0 : =>FALSE                             ELSE
860
(1)   21/       0 :                     INITVAR := 0
861
(1)   21/       0 : [21]                                ENDIF
862
(1)   22/       0 : (MACRO)              SETVAR _BIOS
863
(1)   22/       0 : =4FH                _BIOS            EQU INITVAR
864
(1)   22/       0 : =>BLANK                             IFNB 
865
(1)   22/       0 :                     INITVAR := INITVAR+
866
(1)   22/       0 :                     _BIOS_Size       EQU 
867
(1)   22/       0 : =>TRUE                              ELSE
868
(1)   22/       0 : =50H                INITVAR := INITVAR+BYTE
869
(1)   22/       0 : =1H                 _BIOS_Size       EQU BYTE
870
(1)   22/       0 : [22]                                ENDIF
871
(1)   23/       0 : (MACRO)              SETVAR _COM_DEV
872
(1)   23/       0 : =50H                _COM_DEV            EQU INITVAR
873
(1)   23/       0 : =>BLANK                             IFNB 
874
(1)   23/       0 :                     INITVAR := INITVAR+
875
(1)   23/       0 :                     _COM_DEV_Size       EQU 
876
(1)   23/       0 : =>TRUE                              ELSE
877
(1)   23/       0 : =51H                INITVAR := INITVAR+BYTE
878
(1)   23/       0 : =1H                 _COM_DEV_Size       EQU BYTE
879
(1)   23/       0 : [23]                                ENDIF
880
(1)   24/       0 : (MACRO)              SETVAR _COM_FAT
881
(1)   24/       0 : =51H                _COM_FAT            EQU INITVAR
882
(1)   24/       0 : =>BLANK                             IFNB 
871 lvd 883
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80(../../svn/pentevo/rom/define.a80) - page 15 - 2/23/2020 18:58:45
867 lvd 884
 
885
 
865 lvd 886
(1)   24/       0 :                     INITVAR := INITVAR+
887
(1)   24/       0 :                     _COM_FAT_Size       EQU 
888
(1)   24/       0 : =>TRUE                              ELSE
889
(1)   24/       0 : =52H                INITVAR := INITVAR+BYTE
890
(1)   24/       0 : =1H                 _COM_FAT_Size       EQU BYTE
891
(1)   24/       0 : [24]                                ENDIF
892
(1)   25/       0 : (MACRO)              SETVAR _SORT_FINDFILES
893
(1)   25/       0 : =52H                _SORT_FINDFILES            EQU INITVAR
894
(1)   25/       0 : =>BLANK                             IFNB 
895
(1)   25/       0 :                     INITVAR := INITVAR+
896
(1)   25/       0 :                     _SORT_FINDFILES_Size       EQU 
897
(1)   25/       0 : =>TRUE                              ELSE
898
(1)   25/       0 : =53H                INITVAR := INITVAR+BYTE
899
(1)   25/       0 : =1H                 _SORT_FINDFILES_Size       EQU BYTE
900
(1)   25/       0 : [25]                                ENDIF
901
(1)   26/       0 : (MACRO)              SETVAR _MOUNTER
902
(1)   26/       0 : =53H                _MOUNTER            EQU INITVAR
903
(1)   26/       0 : =>BLANK                             IFNB 
904
(1)   26/       0 :                     INITVAR := INITVAR+
905
(1)   26/       0 :                     _MOUNTER_Size       EQU 
906
(1)   26/       0 : =>TRUE                              ELSE
907
(1)   26/       0 : =54H                INITVAR := INITVAR+BYTE
908
(1)   26/       0 : =1H                 _MOUNTER_Size       EQU BYTE
909
(1)   26/       0 : [26]                                ENDIF
910
(1)   27/       0 : (MACRO)              SETVAR _INST_FATBOOT
911
(1)   27/       0 : =54H                _INST_FATBOOT            EQU INITVAR
912
(1)   27/       0 : =>BLANK                             IFNB 
913
(1)   27/       0 :                     INITVAR := INITVAR+
914
(1)   27/       0 :                     _INST_FATBOOT_Size       EQU 
915
(1)   27/       0 : =>TRUE                              ELSE
916
(1)   27/       0 : =55H                INITVAR := INITVAR+BYTE
917
(1)   27/       0 : =1H                 _INST_FATBOOT_Size       EQU BYTE
918
(1)   27/       0 : [27]                                ENDIF
919
(1)   28/       0 : (MACRO)              SETVAR _CMOS_RW
920
(1)   28/       0 : =55H                _CMOS_RW            EQU INITVAR
921
(1)   28/       0 : =>BLANK                             IFNB 
922
(1)   28/       0 :                     INITVAR := INITVAR+
923
(1)   28/       0 :                     _CMOS_RW_Size       EQU 
924
(1)   28/       0 : =>TRUE                              ELSE
925
(1)   28/       0 : =56H                INITVAR := INITVAR+BYTE
926
(1)   28/       0 : =1H                 _CMOS_RW_Size       EQU BYTE
927
(1)   28/       0 : [28]                                ENDIF
928
(1)   29/       0 : (MACRO)              SETVAR _SETUP_PAL
929
(1)   29/       0 : =56H                _SETUP_PAL            EQU INITVAR
930
(1)   29/       0 : =>BLANK                             IFNB 
931
(1)   29/       0 :                     INITVAR := INITVAR+
932
(1)   29/       0 :                     _SETUP_PAL_Size       EQU 
933
(1)   29/       0 : =>TRUE                              ELSE
934
(1)   29/       0 : =57H                INITVAR := INITVAR+BYTE
935
(1)   29/       0 : =1H                 _SETUP_PAL_Size       EQU BYTE
936
(1)   29/       0 : [29]                                ENDIF
937
(1)   30/       0 : (MACRO)              SETVAR _SETUP_FONT
938
(1)   30/       0 : =57H                _SETUP_FONT            EQU INITVAR
939
(1)   30/       0 : =>BLANK                             IFNB 
940
(1)   30/       0 :                     INITVAR := INITVAR+
941
(1)   30/       0 :                     _SETUP_FONT_Size       EQU 
942
(1)   30/       0 : =>TRUE                              ELSE
943
(1)   30/       0 : =58H                INITVAR := INITVAR+BYTE
944
(1)   30/       0 : =1H                 _SETUP_FONT_Size       EQU BYTE
945
(1)   30/       0 : [30]                                ENDIF
871 lvd 946
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80(../../svn/pentevo/rom/define.a80) - page 16 - 2/23/2020 18:58:45
867 lvd 947
 
948
 
865 lvd 949
(1)   31/       0 :                     
950
(1)   32/       0 :                     ;функции изменения режимов работы
951
(1)   33/       0 : =1H                 _ZXSCR_MODE	EQU %00000001			;ZX SCREEN
952
(1)   34/       0 : =2H                 _TXTSCR_MODE	EQU %00000010			;TXT SCREEN
953
(1)   35/       0 : =10H                _TURBO_LOW	EQU %00010000			;TURBO 3,5 MHZ
954
(1)   36/       0 : =20H                _TURBO_HIGH	EQU %00100000			;TURBO 7,0 MHZ
955
(1)   37/       0 : =30H                _TURBO_MAX	EQU %00110000			;TURBO 14,0 MHZ
956
(1)   38/       0 : =40H                _MEM_MODE_48	EQU %01000000			;MEMORY MODE 48 KB
957
(1)   39/       0 : =80H                _MEM_MODE_128	EQU %10000000			;MEMORY MODE 128 KB
958
(1)   40/       0 : =C0H                _MEM_MODE_PENT	EQU %11000000			;MEMORY MODE PENT 1024 KB
959
(1)   41/       0 :                     
960
(1)   42/       0 :                     ;функции деления, умножения, преобразования числа в текст
961
(1)   43/       0 : (MACRO)              INIT_VAR
962
(1)   43/       0 : =>BLANK                             IFNB 
963
(1)   43/       0 :                     INITVAR := 
964
(1)   43/       0 : =>TRUE                              ELSE
965
(1)   43/       0 : =0H                 INITVAR := 0
966
(1)   43/       0 : [43]                                ENDIF
967
(1)   44/       0 : (MACRO)              SETVAR _DIVIDE16
968
(1)   44/       0 : =0H                 _DIVIDE16            EQU INITVAR
969
(1)   44/       0 : =>BLANK                             IFNB 
970
(1)   44/       0 :                     INITVAR := INITVAR+
971
(1)   44/       0 :                     _DIVIDE16_Size       EQU 
972
(1)   44/       0 : =>TRUE                              ELSE
973
(1)   44/       0 : =1H                 INITVAR := INITVAR+BYTE
974
(1)   44/       0 : =1H                 _DIVIDE16_Size       EQU BYTE
975
(1)   44/       0 : [44]                                ENDIF
976
(1)   45/       0 : (MACRO)              SETVAR _MULTIPLY16
977
(1)   45/       0 : =1H                 _MULTIPLY16            EQU INITVAR
978
(1)   45/       0 : =>BLANK                             IFNB 
979
(1)   45/       0 :                     INITVAR := INITVAR+
980
(1)   45/       0 :                     _MULTIPLY16_Size       EQU 
981
(1)   45/       0 : =>TRUE                              ELSE
982
(1)   45/       0 : =2H                 INITVAR := INITVAR+BYTE
983
(1)   45/       0 : =1H                 _MULTIPLY16_Size       EQU BYTE
984
(1)   45/       0 : [45]                                ENDIF
985
(1)   46/       0 : (MACRO)              SETVAR _DIVIDE32
986
(1)   46/       0 : =2H                 _DIVIDE32            EQU INITVAR
987
(1)   46/       0 : =>BLANK                             IFNB 
988
(1)   46/       0 :                     INITVAR := INITVAR+
989
(1)   46/       0 :                     _DIVIDE32_Size       EQU 
990
(1)   46/       0 : =>TRUE                              ELSE
991
(1)   46/       0 : =3H                 INITVAR := INITVAR+BYTE
992
(1)   46/       0 : =1H                 _DIVIDE32_Size       EQU BYTE
993
(1)   46/       0 : [46]                                ENDIF
994
(1)   47/       0 : (MACRO)              SETVAR _MULTIPLY32
995
(1)   47/       0 : =3H                 _MULTIPLY32            EQU INITVAR
996
(1)   47/       0 : =>BLANK                             IFNB 
997
(1)   47/       0 :                     INITVAR := INITVAR+
998
(1)   47/       0 :                     _MULTIPLY32_Size       EQU 
999
(1)   47/       0 : =>TRUE                              ELSE
1000
(1)   47/       0 : =4H                 INITVAR := INITVAR+BYTE
1001
(1)   47/       0 : =1H                 _MULTIPLY32_Size       EQU BYTE
1002
(1)   47/       0 : [47]                                ENDIF
1003
(1)   48/       0 : (MACRO)              SETVAR _HEX4DECTXT
1004
(1)   48/       0 : =4H                 _HEX4DECTXT            EQU INITVAR
1005
(1)   48/       0 : =>BLANK                             IFNB 
1006
(1)   48/       0 :                     INITVAR := INITVAR+
1007
(1)   48/       0 :                     _HEX4DECTXT_Size       EQU 
1008
(1)   48/       0 : =>TRUE                              ELSE
871 lvd 1009
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80(../../svn/pentevo/rom/define.a80) - page 17 - 2/23/2020 18:58:45
867 lvd 1010
 
1011
 
865 lvd 1012
(1)   48/       0 : =5H                 INITVAR := INITVAR+BYTE
1013
(1)   48/       0 : =1H                 _HEX4DECTXT_Size       EQU BYTE
1014
(1)   48/       0 : [48]                                ENDIF
1015
(1)   49/       0 : (MACRO)              SETVAR _HEX2DECTXT
1016
(1)   49/       0 : =5H                 _HEX2DECTXT            EQU INITVAR
1017
(1)   49/       0 : =>BLANK                             IFNB 
1018
(1)   49/       0 :                     INITVAR := INITVAR+
1019
(1)   49/       0 :                     _HEX2DECTXT_Size       EQU 
1020
(1)   49/       0 : =>TRUE                              ELSE
1021
(1)   49/       0 : =6H                 INITVAR := INITVAR+BYTE
1022
(1)   49/       0 : =1H                 _HEX2DECTXT_Size       EQU BYTE
1023
(1)   49/       0 : [49]                                ENDIF
1024
(1)   50/       0 : (MACRO)              SETVAR _HEX1DECTXT
1025
(1)   50/       0 : =6H                 _HEX1DECTXT            EQU INITVAR
1026
(1)   50/       0 : =>BLANK                             IFNB 
1027
(1)   50/       0 :                     INITVAR := INITVAR+
1028
(1)   50/       0 :                     _HEX1DECTXT_Size       EQU 
1029
(1)   50/       0 : =>TRUE                              ELSE
1030
(1)   50/       0 : =7H                 INITVAR := INITVAR+BYTE
1031
(1)   50/       0 : =1H                 _HEX1DECTXT_Size       EQU BYTE
1032
(1)   50/       0 : [50]                                ENDIF
1033
(1)   51/       0 :                     
1034
(1)   52/       0 :                     ;функции работы с CMOS
1035
(1)   53/       0 : (MACRO)              INIT_VAR
1036
(1)   53/       0 : =>BLANK                             IFNB 
1037
(1)   53/       0 :                     INITVAR := 
1038
(1)   53/       0 : =>TRUE                              ELSE
1039
(1)   53/       0 : =0H                 INITVAR := 0
1040
(1)   53/       0 : [53]                                ENDIF
1041
(1)   54/       0 : (MACRO)              SETVAR _INIT_CMOS
1042
(1)   54/       0 : =0H                 _INIT_CMOS            EQU INITVAR
1043
(1)   54/       0 : =>BLANK                             IFNB 
1044
(1)   54/       0 :                     INITVAR := INITVAR+
1045
(1)   54/       0 :                     _INIT_CMOS_Size       EQU 
1046
(1)   54/       0 : =>TRUE                              ELSE
1047
(1)   54/       0 : =1H                 INITVAR := INITVAR+BYTE
1048
(1)   54/       0 : =1H                 _INIT_CMOS_Size       EQU BYTE
1049
(1)   54/       0 : [54]                                ENDIF
1050
(1)   55/       0 : (MACRO)              SETVAR _READ_CMOS
1051
(1)   55/       0 : =1H                 _READ_CMOS            EQU INITVAR
1052
(1)   55/       0 : =>BLANK                             IFNB 
1053
(1)   55/       0 :                     INITVAR := INITVAR+
1054
(1)   55/       0 :                     _READ_CMOS_Size       EQU 
1055
(1)   55/       0 : =>TRUE                              ELSE
1056
(1)   55/       0 : =2H                 INITVAR := INITVAR+BYTE
1057
(1)   55/       0 : =1H                 _READ_CMOS_Size       EQU BYTE
1058
(1)   55/       0 : [55]                                ENDIF
1059
(1)   56/       0 : (MACRO)              SETVAR _WRITE_CMOS
1060
(1)   56/       0 : =2H                 _WRITE_CMOS            EQU INITVAR
1061
(1)   56/       0 : =>BLANK                             IFNB 
1062
(1)   56/       0 :                     INITVAR := INITVAR+
1063
(1)   56/       0 :                     _WRITE_CMOS_Size       EQU 
1064
(1)   56/       0 : =>TRUE                              ELSE
1065
(1)   56/       0 : =3H                 INITVAR := INITVAR+BYTE
1066
(1)   56/       0 : =1H                 _WRITE_CMOS_Size       EQU BYTE
1067
(1)   56/       0 : [56]                                ENDIF
1068
(1)   57/       0 : (MACRO)              SETVAR _CLEAR_CMOS
1069
(1)   57/       0 : =3H                 _CLEAR_CMOS            EQU INITVAR
1070
(1)   57/       0 : =>BLANK                             IFNB 
1071
(1)   57/       0 :                     INITVAR := INITVAR+
871 lvd 1072
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80(../../svn/pentevo/rom/define.a80) - page 18 - 2/23/2020 18:58:45
867 lvd 1073
 
1074
 
865 lvd 1075
(1)   57/       0 :                     _CLEAR_CMOS_Size       EQU 
1076
(1)   57/       0 : =>TRUE                              ELSE
1077
(1)   57/       0 : =4H                 INITVAR := INITVAR+BYTE
1078
(1)   57/       0 : =1H                 _CLEAR_CMOS_Size       EQU BYTE
1079
(1)   57/       0 : [57]                                ENDIF
1080
(1)   58/       0 :                     
1081
(1)   59/       0 :                     ;функции монтировщика образов
1082
(1)   60/       0 : (MACRO)              INIT_VAR
1083
(1)   60/       0 : =>BLANK                             IFNB 
1084
(1)   60/       0 :                     INITVAR := 
1085
(1)   60/       0 : =>TRUE                              ELSE
1086
(1)   60/       0 : =0H                 INITVAR := 0
1087
(1)   60/       0 : [60]                                ENDIF
1088
(1)   61/       0 : (MACRO)              SETVAR _OPEN_MOUNT				; монтирование образа
1089
(1)   61/       0 : =0H                 _OPEN_MOUNT            EQU INITVAR
1090
(1)   61/       0 : =>BLANK                             IFNB 
1091
(1)   61/       0 :                     INITVAR := INITVAR+
1092
(1)   61/       0 :                     _OPEN_MOUNT_Size       EQU 
1093
(1)   61/       0 : =>TRUE                              ELSE
1094
(1)   61/       0 : =1H                 INITVAR := INITVAR+BYTE
1095
(1)   61/       0 : =1H                 _OPEN_MOUNT_Size       EQU BYTE
1096
(1)   61/       0 : [61]                                ENDIF
1097
(1)   62/       0 : (MACRO)              SETVAR _RDWR_MOUNT				; чтение/запись примонтированных образов
1098
(1)   62/       0 : =1H                 _RDWR_MOUNT            EQU INITVAR
1099
(1)   62/       0 : =>BLANK                             IFNB 
1100
(1)   62/       0 :                     INITVAR := INITVAR+
1101
(1)   62/       0 :                     _RDWR_MOUNT_Size       EQU 
1102
(1)   62/       0 : =>TRUE                              ELSE
1103
(1)   62/       0 : =2H                 INITVAR := INITVAR+BYTE
1104
(1)   62/       0 : =1H                 _RDWR_MOUNT_Size       EQU BYTE
1105
(1)   62/       0 : [62]                                ENDIF
1106
(1)   63/       0 : (MACRO)              SETVAR _FIND_MOUNTED				; поиск монтируемых образов прописанных в IMAGE.FNT
1107
(1)   63/       0 : =2H                 _FIND_MOUNTED            EQU INITVAR
1108
(1)   63/       0 : =>BLANK                             IFNB 
1109
(1)   63/       0 :                     INITVAR := INITVAR+
1110
(1)   63/       0 :                     _FIND_MOUNTED_Size       EQU 
1111
(1)   63/       0 : =>TRUE                              ELSE
1112
(1)   63/       0 : =3H                 INITVAR := INITVAR+BYTE
1113
(1)   63/       0 : =1H                 _FIND_MOUNTED_Size       EQU BYTE
1114
(1)   63/       0 : [63]                                ENDIF
1115
(1)   64/       0 : (MACRO)              SETVAR _GET_MOUNTED				; получение буфера описателей примонтированных образов
1116
(1)   64/       0 : =3H                 _GET_MOUNTED            EQU INITVAR
1117
(1)   64/       0 : =>BLANK                             IFNB 
1118
(1)   64/       0 :                     INITVAR := INITVAR+
1119
(1)   64/       0 :                     _GET_MOUNTED_Size       EQU 
1120
(1)   64/       0 : =>TRUE                              ELSE
1121
(1)   64/       0 : =4H                 INITVAR := INITVAR+BYTE
1122
(1)   64/       0 : =1H                 _GET_MOUNTED_Size       EQU BYTE
1123
(1)   64/       0 : [64]                                ENDIF
1124
(1)   65/       0 : (MACRO)              SETVAR _CLOSEMOUNT				; демонтирование образа
1125
(1)   65/       0 : =4H                 _CLOSEMOUNT            EQU INITVAR
1126
(1)   65/       0 : =>BLANK                             IFNB 
1127
(1)   65/       0 :                     INITVAR := INITVAR+
1128
(1)   65/       0 :                     _CLOSEMOUNT_Size       EQU 
1129
(1)   65/       0 : =>TRUE                              ELSE
1130
(1)   65/       0 : =5H                 INITVAR := INITVAR+BYTE
1131
(1)   65/       0 : =1H                 _CLOSEMOUNT_Size       EQU BYTE
1132
(1)   65/       0 : [65]                                ENDIF
1133
(1)   66/       0 : (MACRO)              SETVAR _LOADIMAGE				; загрузка образа в рамдиск
1134
(1)   66/       0 : =5H                 _LOADIMAGE            EQU INITVAR
871 lvd 1135
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80(../../svn/pentevo/rom/define.a80) - page 19 - 2/23/2020 18:58:45
867 lvd 1136
 
1137
 
865 lvd 1138
(1)   66/       0 : =>BLANK                             IFNB 
1139
(1)   66/       0 :                     INITVAR := INITVAR+
1140
(1)   66/       0 :                     _LOADIMAGE_Size       EQU 
1141
(1)   66/       0 : =>TRUE                              ELSE
1142
(1)   66/       0 : =6H                 INITVAR := INITVAR+BYTE
1143
(1)   66/       0 : =1H                 _LOADIMAGE_Size       EQU BYTE
1144
(1)   66/       0 : [66]                                ENDIF
1145
(1)   67/       0 : (MACRO)              SETVAR _REST_NAMELOAD				; получение описателя файла загруженного в рамдиск
1146
(1)   67/       0 : =6H                 _REST_NAMELOAD            EQU INITVAR
1147
(1)   67/       0 : =>BLANK                             IFNB 
1148
(1)   67/       0 :                     INITVAR := INITVAR+
1149
(1)   67/       0 :                     _REST_NAMELOAD_Size       EQU 
1150
(1)   67/       0 : =>TRUE                              ELSE
1151
(1)   67/       0 : =7H                 INITVAR := INITVAR+BYTE
1152
(1)   67/       0 : =1H                 _REST_NAMELOAD_Size       EQU BYTE
1153
(1)   67/       0 : [67]                                ENDIF
1154
(1)   68/       0 : (MACRO)              SETVAR _CMP_DRIVE				; проверка примонтированного образа на указанной букве
1155
(1)   68/       0 : =7H                 _CMP_DRIVE            EQU INITVAR
1156
(1)   68/       0 : =>BLANK                             IFNB 
1157
(1)   68/       0 :                     INITVAR := INITVAR+
1158
(1)   68/       0 :                     _CMP_DRIVE_Size       EQU 
1159
(1)   68/       0 : =>TRUE                              ELSE
1160
(1)   68/       0 : =8H                 INITVAR := INITVAR+BYTE
1161
(1)   68/       0 : =1H                 _CMP_DRIVE_Size       EQU BYTE
1162
(1)   68/       0 : [68]                                ENDIF
1163
(1)   69/       0 : (MACRO)              SETVAR _GET_VIRT_BITS				; получение битов смонтированных дисков
1164
(1)   69/       0 : =8H                 _GET_VIRT_BITS            EQU INITVAR
1165
(1)   69/       0 : =>BLANK                             IFNB 
1166
(1)   69/       0 :                     INITVAR := INITVAR+
1167
(1)   69/       0 :                     _GET_VIRT_BITS_Size       EQU 
1168
(1)   69/       0 : =>TRUE                              ELSE
1169
(1)   69/       0 : =9H                 INITVAR := INITVAR+BYTE
1170
(1)   69/       0 : =1H                 _GET_VIRT_BITS_Size       EQU BYTE
1171
(1)   69/       0 : [69]                                ENDIF
1172
(1)   70/       0 : (MACRO)              SETVAR _MOUNT_RAMDISK				; монтирование рамдиска
1173
(1)   70/       0 : =9H                 _MOUNT_RAMDISK            EQU INITVAR
1174
(1)   70/       0 : =>BLANK                             IFNB 
1175
(1)   70/       0 :                     INITVAR := INITVAR+
1176
(1)   70/       0 :                     _MOUNT_RAMDISK_Size       EQU 
1177
(1)   70/       0 : =>TRUE                              ELSE
1178
(1)   70/       0 : =AH                 INITVAR := INITVAR+BYTE
1179
(1)   70/       0 : =1H                 _MOUNT_RAMDISK_Size       EQU BYTE
1180
(1)   70/       0 : [70]                                ENDIF
1181
(1)   71/       0 :                     
1182
(1)   72/       0 :                     ;номера функций менеджера устройств
1183
(1)   73/       0 : (MACRO)              INIT_VAR
1184
(1)   73/       0 : =>BLANK                             IFNB 
1185
(1)   73/       0 :                     INITVAR := 
1186
(1)   73/       0 : =>TRUE                              ELSE
1187
(1)   73/       0 : =0H                 INITVAR := 0
1188
(1)   73/       0 : [73]                                ENDIF
1189
(1)   74/       0 : (MACRO)              SETVAR _DEVFIND				;00 ПОИСК УСТРОЙСТВ                        
1190
(1)   74/       0 : =0H                 _DEVFIND            EQU INITVAR
1191
(1)   74/       0 : =>BLANK                             IFNB 
1192
(1)   74/       0 :                     INITVAR := INITVAR+
1193
(1)   74/       0 :                     _DEVFIND_Size       EQU 
1194
(1)   74/       0 : =>TRUE                              ELSE
1195
(1)   74/       0 : =1H                 INITVAR := INITVAR+BYTE
1196
(1)   74/       0 : =1H                 _DEVFIND_Size       EQU BYTE
1197
(1)   74/       0 : [74]                                ENDIF
871 lvd 1198
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80(../../svn/pentevo/rom/define.a80) - page 20 - 2/23/2020 18:58:45
867 lvd 1199
 
1200
 
865 lvd 1201
(1)   75/       0 : (MACRO)              SETVAR _SET_VOL				;01 ВЫБОР РАЗДЕЛА                          
1202
(1)   75/       0 : =1H                 _SET_VOL            EQU INITVAR
1203
(1)   75/       0 : =>BLANK                             IFNB 
1204
(1)   75/       0 :                     INITVAR := INITVAR+
1205
(1)   75/       0 :                     _SET_VOL_Size       EQU 
1206
(1)   75/       0 : =>TRUE                              ELSE
1207
(1)   75/       0 : =2H                 INITVAR := INITVAR+BYTE
1208
(1)   75/       0 : =1H                 _SET_VOL_Size       EQU BYTE
1209
(1)   75/       0 : [75]                                ENDIF
1210
(1)   76/       0 : (MACRO)              SETVAR _KOL_VOL				;02 ЗАПРОС НАЙДЕНОГО                       
1211
(1)   76/       0 : =2H                 _KOL_VOL            EQU INITVAR
1212
(1)   76/       0 : =>BLANK                             IFNB 
1213
(1)   76/       0 :                     INITVAR := INITVAR+
1214
(1)   76/       0 :                     _KOL_VOL_Size       EQU 
1215
(1)   76/       0 : =>TRUE                              ELSE
1216
(1)   76/       0 : =3H                 INITVAR := INITVAR+BYTE
1217
(1)   76/       0 : =1H                 _KOL_VOL_Size       EQU BYTE
1218
(1)   76/       0 : [76]                                ENDIF
1219
(1)   77/       0 : (MACRO)              SETVAR _GET_FNDVOLUME				;03 ПОЛУЧИТЬ ТАБЛИЦУ НАЙДЕННЫХ РАЗДЕЛОВ
1220
(1)   77/       0 : =3H                 _GET_FNDVOLUME            EQU INITVAR
1221
(1)   77/       0 : =>BLANK                             IFNB 
1222
(1)   77/       0 :                     INITVAR := INITVAR+
1223
(1)   77/       0 :                     _GET_FNDVOLUME_Size       EQU 
1224
(1)   77/       0 : =>TRUE                              ELSE
1225
(1)   77/       0 : =4H                 INITVAR := INITVAR+BYTE
1226
(1)   77/       0 : =1H                 _GET_FNDVOLUME_Size       EQU BYTE
1227
(1)   77/       0 : [77]                                ENDIF
1228
(1)   78/       0 : (MACRO)              SETVAR _TO_DRV					;04 ВЫЗОВ ДРАЙВЕРА ВЫБРАННОГО УСТРОЙСТВА   
1229
(1)   78/       0 : =4H                 _TO_DRV            EQU INITVAR
1230
(1)   78/       0 : =>BLANK                             IFNB 
1231
(1)   78/       0 :                     INITVAR := INITVAR+
1232
(1)   78/       0 :                     _TO_DRV_Size       EQU 
1233
(1)   78/       0 : =>TRUE                              ELSE
1234
(1)   78/       0 : =5H                 INITVAR := INITVAR+BYTE
1235
(1)   78/       0 : =1H                 _TO_DRV_Size       EQU BYTE
1236
(1)   78/       0 : [78]                                ENDIF
1237
(1)   79/       0 : (MACRO)              SETVAR _SET_DEVICE				;05 УСТАНОВКА БИТОВ УСТРОЙСТВА И LBA РЕЖИМА
1238
(1)   79/       0 : =5H                 _SET_DEVICE            EQU INITVAR
1239
(1)   79/       0 : =>BLANK                             IFNB 
1240
(1)   79/       0 :                     INITVAR := INITVAR+
1241
(1)   79/       0 :                     _SET_DEVICE_Size       EQU 
1242
(1)   79/       0 : =>TRUE                              ELSE
1243
(1)   79/       0 : =6H                 INITVAR := INITVAR+BYTE
1244
(1)   79/       0 : =1H                 _SET_DEVICE_Size       EQU BYTE
1245
(1)   79/       0 : [79]                                ENDIF
1246
(1)   80/       0 : (MACRO)              SETVAR _CONTROL_SD				;06 КОНТРОЛЬ НАЛИЧИЯ SD КАРТ
1247
(1)   80/       0 : =6H                 _CONTROL_SD            EQU INITVAR
1248
(1)   80/       0 : =>BLANK                             IFNB 
1249
(1)   80/       0 :                     INITVAR := INITVAR+
1250
(1)   80/       0 :                     _CONTROL_SD_Size       EQU 
1251
(1)   80/       0 : =>TRUE                              ELSE
1252
(1)   80/       0 : =7H                 INITVAR := INITVAR+BYTE
1253
(1)   80/       0 : =1H                 _CONTROL_SD_Size       EQU BYTE
1254
(1)   80/       0 : [80]                                ENDIF
1255
(1)   81/       0 : (MACRO)              SETVAR _COMHDDN				;07 ПРЯМОЙ ВЫЗОВ ДРАЙВЕРА HDD NEMO (ВРЕМЕННАЯ ФУНКЦИЯ)
1256
(1)   81/       0 : =7H                 _COMHDDN            EQU INITVAR
1257
(1)   81/       0 : =>BLANK                             IFNB 
1258
(1)   81/       0 :                     INITVAR := INITVAR+
1259
(1)   81/       0 :                     _COMHDDN_Size       EQU 
1260
(1)   81/       0 : =>TRUE                              ELSE
871 lvd 1261
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80(../../svn/pentevo/rom/define.a80) - page 21 - 2/23/2020 18:58:45
867 lvd 1262
 
1263
 
865 lvd 1264
(1)   81/       0 : =8H                 INITVAR := INITVAR+BYTE
1265
(1)   81/       0 : =1H                 _COMHDDN_Size       EQU BYTE
1266
(1)   81/       0 : [81]                                ENDIF
1267
(1)   82/       0 : (MACRO)              SETVAR _FREINIT_VOL				;08 ПОЛНАЯ ПЕРЕИНИЦИАЛИЗАЦИЯ РАЗДЕЛА
1268
(1)   82/       0 : =8H                 _FREINIT_VOL            EQU INITVAR
1269
(1)   82/       0 : =>BLANK                             IFNB 
1270
(1)   82/       0 :                     INITVAR := INITVAR+
1271
(1)   82/       0 :                     _FREINIT_VOL_Size       EQU 
1272
(1)   82/       0 : =>TRUE                              ELSE
1273
(1)   82/       0 : =9H                 INITVAR := INITVAR+BYTE
1274
(1)   82/       0 : =1H                 _FREINIT_VOL_Size       EQU BYTE
1275
(1)   82/       0 : [82]                                ENDIF
1276
(1)   83/       0 :                     
1277
(1)   84/       0 :                     ;номера функций вызова драйвера устройства
1278
(1)   85/       0 : (MACRO)              INIT_VAR
1279
(1)   85/       0 : =>BLANK                             IFNB 
1280
(1)   85/       0 :                     INITVAR := 
1281
(1)   85/       0 : =>TRUE                              ELSE
1282
(1)   85/       0 : =0H                 INITVAR := 0
1283
(1)   85/       0 : [85]                                ENDIF
1284
(1)   86/       0 : (MACRO)              SETVAR _DEV_INIT				;00 ПОИСК И ИНИЦИАЛИЗАЦИЯ УСТРОЙСТВА
1285
(1)   86/       0 : =0H                 _DEV_INIT            EQU INITVAR
1286
(1)   86/       0 : =>BLANK                             IFNB 
1287
(1)   86/       0 :                     INITVAR := INITVAR+
1288
(1)   86/       0 :                     _DEV_INIT_Size       EQU 
1289
(1)   86/       0 : =>TRUE                              ELSE
1290
(1)   86/       0 : =1H                 INITVAR := INITVAR+BYTE
1291
(1)   86/       0 : =1H                 _DEV_INIT_Size       EQU BYTE
1292
(1)   86/       0 : [86]                                ENDIF
1293
(1)   87/       0 : (MACRO)              SETVAR _DEV_STATUS				;01 ЗАПРОС СТАТУСА УСТРОЙСТВА. ПОКА ЗАГЛУШЕНА
1294
(1)   87/       0 : =1H                 _DEV_STATUS            EQU INITVAR
1295
(1)   87/       0 : =>BLANK                             IFNB 
1296
(1)   87/       0 :                     INITVAR := INITVAR+
1297
(1)   87/       0 :                     _DEV_STATUS_Size       EQU 
1298
(1)   87/       0 : =>TRUE                              ELSE
1299
(1)   87/       0 : =2H                 INITVAR := INITVAR+BYTE
1300
(1)   87/       0 : =1H                 _DEV_STATUS_Size       EQU BYTE
1301
(1)   87/       0 : [87]                                ENDIF
1302
(1)   88/       0 : (MACRO)              SETVAR _DEV_READ				;02 ЧТЕНИЕ СЕКТОРОВ
1303
(1)   88/       0 : =2H                 _DEV_READ            EQU INITVAR
1304
(1)   88/       0 : =>BLANK                             IFNB 
1305
(1)   88/       0 :                     INITVAR := INITVAR+
1306
(1)   88/       0 :                     _DEV_READ_Size       EQU 
1307
(1)   88/       0 : =>TRUE                              ELSE
1308
(1)   88/       0 : =3H                 INITVAR := INITVAR+BYTE
1309
(1)   88/       0 : =1H                 _DEV_READ_Size       EQU BYTE
1310
(1)   88/       0 : [88]                                ENDIF
1311
(1)   89/       0 : (MACRO)              SETVAR _DEV_WRITE				;03 ЗАПИСЬ СЕКТОРОВ
1312
(1)   89/       0 : =3H                 _DEV_WRITE            EQU INITVAR
1313
(1)   89/       0 : =>BLANK                             IFNB 
1314
(1)   89/       0 :                     INITVAR := INITVAR+
1315
(1)   89/       0 :                     _DEV_WRITE_Size       EQU 
1316
(1)   89/       0 : =>TRUE                              ELSE
1317
(1)   89/       0 : =4H                 INITVAR := INITVAR+BYTE
1318
(1)   89/       0 : =1H                 _DEV_WRITE_Size       EQU BYTE
1319
(1)   89/       0 : [89]                                ENDIF
1320
(1)   90/       0 : (MACRO)              SETVAR _DEV_READID				;04 ЧТЕНИЕ ID СЕКТОРА
1321
(1)   90/       0 : =4H                 _DEV_READID            EQU INITVAR
1322
(1)   90/       0 : =>BLANK                             IFNB 
1323
(1)   90/       0 :                     INITVAR := INITVAR+
871 lvd 1324
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80(../../svn/pentevo/rom/define.a80) - page 22 - 2/23/2020 18:58:45
867 lvd 1325
 
1326
 
865 lvd 1327
(1)   90/       0 :                     _DEV_READID_Size       EQU 
1328
(1)   90/       0 : =>TRUE                              ELSE
1329
(1)   90/       0 : =5H                 INITVAR := INITVAR+BYTE
1330
(1)   90/       0 : =1H                 _DEV_READID_Size       EQU BYTE
1331
(1)   90/       0 : [90]                                ENDIF
1332
(1)   91/       0 :                     
1333
(1)   92/       0 :                     ;номера вызываемых функций FAT драйвера
1334
(1)   93/       0 : (MACRO)              INIT_VAR
1335
(1)   93/       0 : =>BLANK                             IFNB 
1336
(1)   93/       0 :                     INITVAR := 
1337
(1)   93/       0 : =>TRUE                              ELSE
1338
(1)   93/       0 : =0H                 INITVAR := 0
1339
(1)   93/       0 : [93]                                ENDIF
1340
(1)   94/       0 : (MACRO)              SETVAR _INIT_FATVARS				;ИНИЦИАЛИЗАЦИЯ ПЕРЕМЕННЫХ FAT
1341
(1)   94/       0 : =0H                 _INIT_FATVARS            EQU INITVAR
1342
(1)   94/       0 : =>BLANK                             IFNB 
1343
(1)   94/       0 :                     INITVAR := INITVAR+
1344
(1)   94/       0 :                     _INIT_FATVARS_Size       EQU 
1345
(1)   94/       0 : =>TRUE                              ELSE
1346
(1)   94/       0 : =1H                 INITVAR := INITVAR+BYTE
1347
(1)   94/       0 : =1H                 _INIT_FATVARS_Size       EQU BYTE
1348
(1)   94/       0 : [94]                                ENDIF
1349
(1)   95/       0 : (MACRO)              SETVAR _READ_DIR				;ПОЛУЧЕНИЕ ОПИСАТЕЛЯ ФАЙЛА
1350
(1)   95/       0 : =1H                 _READ_DIR            EQU INITVAR
1351
(1)   95/       0 : =>BLANK                             IFNB 
1352
(1)   95/       0 :                     INITVAR := INITVAR+
1353
(1)   95/       0 :                     _READ_DIR_Size       EQU 
1354
(1)   95/       0 : =>TRUE                              ELSE
1355
(1)   95/       0 : =2H                 INITVAR := INITVAR+BYTE
1356
(1)   95/       0 : =1H                 _READ_DIR_Size       EQU BYTE
1357
(1)   95/       0 : [95]                                ENDIF
1358
(1)   96/       0 : (MACRO)              SETVAR _ENTER_DIR				;ВХОД/ВЫХОД В ДИР
1359
(1)   96/       0 : =2H                 _ENTER_DIR            EQU INITVAR
1360
(1)   96/       0 : =>BLANK                             IFNB 
1361
(1)   96/       0 :                     INITVAR := INITVAR+
1362
(1)   96/       0 :                     _ENTER_DIR_Size       EQU 
1363
(1)   96/       0 : =>TRUE                              ELSE
1364
(1)   96/       0 : =3H                 INITVAR := INITVAR+BYTE
1365
(1)   96/       0 : =1H                 _ENTER_DIR_Size       EQU BYTE
1366
(1)   96/       0 : [96]                                ENDIF
1367
(1)   97/       0 : (MACRO)              SETVAR _GET_PATH				;ПОЛУЧЕНИЕ ТЕКУЩЕГО ПУТИ
1368
(1)   97/       0 : =3H                 _GET_PATH            EQU INITVAR
1369
(1)   97/       0 : =>BLANK                             IFNB 
1370
(1)   97/       0 :                     INITVAR := INITVAR+
1371
(1)   97/       0 :                     _GET_PATH_Size       EQU 
1372
(1)   97/       0 : =>TRUE                              ELSE
1373
(1)   97/       0 : =4H                 INITVAR := INITVAR+BYTE
1374
(1)   97/       0 : =1H                 _GET_PATH_Size       EQU BYTE
1375
(1)   97/       0 : [97]                                ENDIF
1376
(1)   98/       0 : (MACRO)              SETVAR _GET_LONGNAME				;ПОЛУЧЕНИЕ ДЛИННОГО ИМЕНИ ФАЙЛА
1377
(1)   98/       0 : =4H                 _GET_LONGNAME            EQU INITVAR
1378
(1)   98/       0 : =>BLANK                             IFNB 
1379
(1)   98/       0 :                     INITVAR := INITVAR+
1380
(1)   98/       0 :                     _GET_LONGNAME_Size       EQU 
1381
(1)   98/       0 : =>TRUE                              ELSE
1382
(1)   98/       0 : =5H                 INITVAR := INITVAR+BYTE
1383
(1)   98/       0 : =1H                 _GET_LONGNAME_Size       EQU BYTE
1384
(1)   98/       0 : [98]                                ENDIF
1385
(1)   99/       0 : (MACRO)              SETVAR _FIND_NAME				;ПОИСК ПО ИМЕНИ
1386
(1)   99/       0 : =5H                 _FIND_NAME            EQU INITVAR
871 lvd 1387
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80(../../svn/pentevo/rom/define.a80) - page 23 - 2/23/2020 18:58:45
867 lvd 1388
 
1389
 
865 lvd 1390
(1)   99/       0 : =>BLANK                             IFNB 
1391
(1)   99/       0 :                     INITVAR := INITVAR+
1392
(1)   99/       0 :                     _FIND_NAME_Size       EQU 
1393
(1)   99/       0 : =>TRUE                              ELSE
1394
(1)   99/       0 : =6H                 INITVAR := INITVAR+BYTE
1395
(1)   99/       0 : =1H                 _FIND_NAME_Size       EQU BYTE
1396
(1)   99/       0 : [99]                                ENDIF
1397
(1)  100/       0 : (MACRO)              SETVAR _FIND_FILEITEM				;ПОИСК ВСЕХ ОПИСАТЕЛЕЙ С ВЫДАЧЕЙ НОМЕРОВ НАЙДЕННОГО
1398
(1)  100/       0 : =6H                 _FIND_FILEITEM            EQU INITVAR
1399
(1)  100/       0 : =>BLANK                             IFNB 
1400
(1)  100/       0 :                     INITVAR := INITVAR+
1401
(1)  100/       0 :                     _FIND_FILEITEM_Size       EQU 
1402
(1)  100/       0 : =>TRUE                              ELSE
1403
(1)  100/       0 : =7H                 INITVAR := INITVAR+BYTE
1404
(1)  100/       0 : =1H                 _FIND_FILEITEM_Size       EQU BYTE
1405
(1)  100/       0 : [100]                               ENDIF
1406
(1)  101/       0 : (MACRO)              SETVAR _SET_MASK_EXT				;УСТАНОВКА МАСКИ РАСШИРЕНИЙ ДЛЯ ПОИСКА
1407
(1)  101/       0 : =7H                 _SET_MASK_EXT            EQU INITVAR
1408
(1)  101/       0 : =>BLANK                             IFNB 
1409
(1)  101/       0 :                     INITVAR := INITVAR+
1410
(1)  101/       0 :                     _SET_MASK_EXT_Size       EQU 
1411
(1)  101/       0 : =>TRUE                              ELSE
1412
(1)  101/       0 : =8H                 INITVAR := INITVAR+BYTE
1413
(1)  101/       0 : =1H                 _SET_MASK_EXT_Size       EQU BYTE
1414
(1)  101/       0 : [101]                               ENDIF
1415
(1)  102/       0 : (MACRO)              SETVAR _OPEN_FILE				;ОТКРЫТИЕ ФАЙЛА
1416
(1)  102/       0 : =8H                 _OPEN_FILE            EQU INITVAR
1417
(1)  102/       0 : =>BLANK                             IFNB 
1418
(1)  102/       0 :                     INITVAR := INITVAR+
1419
(1)  102/       0 :                     _OPEN_FILE_Size       EQU 
1420
(1)  102/       0 : =>TRUE                              ELSE
1421
(1)  102/       0 : =9H                 INITVAR := INITVAR+BYTE
1422
(1)  102/       0 : =1H                 _OPEN_FILE_Size       EQU BYTE
1423
(1)  102/       0 : [102]                               ENDIF
1424
(1)  103/       0 : (MACRO)              SETVAR _READ_FILE				;ПОСЛЕДОВАТЕЛЬНОЕ ЧТЕНИЕ ОТКРЫТОГО ФАЙЛА
1425
(1)  103/       0 : =9H                 _READ_FILE            EQU INITVAR
1426
(1)  103/       0 : =>BLANK                             IFNB 
1427
(1)  103/       0 :                     INITVAR := INITVAR+
1428
(1)  103/       0 :                     _READ_FILE_Size       EQU 
1429
(1)  103/       0 : =>TRUE                              ELSE
1430
(1)  103/       0 : =AH                 INITVAR := INITVAR+BYTE
1431
(1)  103/       0 : =1H                 _READ_FILE_Size       EQU BYTE
1432
(1)  103/       0 : [103]                               ENDIF
1433
(1)  104/       0 : (MACRO)              SETVAR _INIT_TEKDIR				;СОЗДАНИЕ ТАБЛИЦЫ КЛАСТЕРОВ ТЕКУЩЕЙ ДИРЕКТОРИИ
1434
(1)  104/       0 : =AH                 _INIT_TEKDIR            EQU INITVAR
1435
(1)  104/       0 : =>BLANK                             IFNB 
1436
(1)  104/       0 :                     INITVAR := INITVAR+
1437
(1)  104/       0 :                     _INIT_TEKDIR_Size       EQU 
1438
(1)  104/       0 : =>TRUE                              ELSE
1439
(1)  104/       0 : =BH                 INITVAR := INITVAR+BYTE
1440
(1)  104/       0 : =1H                 _INIT_TEKDIR_Size       EQU BYTE
1441
(1)  104/       0 : [104]                               ENDIF
1442
(1)  105/       0 : (MACRO)              SETVAR _POS_FILES				;РАБОТА С ТЕКУЩЕЙ ПОЗИЦИЕЙ
1443
(1)  105/       0 : =BH                 _POS_FILES            EQU INITVAR
1444
(1)  105/       0 : =>BLANK                             IFNB 
1445
(1)  105/       0 :                     INITVAR := INITVAR+
1446
(1)  105/       0 :                     _POS_FILES_Size       EQU 
1447
(1)  105/       0 : =>TRUE                              ELSE
1448
(1)  105/       0 : =CH                 INITVAR := INITVAR+BYTE
1449
(1)  105/       0 : =1H                 _POS_FILES_Size       EQU BYTE
871 lvd 1450
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80(../../svn/pentevo/rom/define.a80) - page 24 - 2/23/2020 18:58:45
867 lvd 1451
 
1452
 
865 lvd 1453
(1)  105/       0 : [105]                               ENDIF
1454
(1)  106/       0 :                     
1455
(1)  107/       0 :                     ;подфункции функции _POS_FILES
1456
(1)  108/       0 : (MACRO)              INIT_VAR
1457
(1)  108/       0 : =>BLANK                             IFNB 
1458
(1)  108/       0 :                     INITVAR := 
1459
(1)  108/       0 : =>TRUE                              ELSE
1460
(1)  108/       0 : =0H                 INITVAR := 0
1461
(1)  108/       0 : [108]                               ENDIF
1462
(1)  109/       0 : (MACRO)              SETVAR _POSTF00				;СОХРАНЕНИЕ ТЕКУЩЕЙ ПОЗИЦИИ ФАЙЛА
1463
(1)  109/       0 : =0H                 _POSTF00            EQU INITVAR
1464
(1)  109/       0 : =>BLANK                             IFNB 
1465
(1)  109/       0 :                     INITVAR := INITVAR+
1466
(1)  109/       0 :                     _POSTF00_Size       EQU 
1467
(1)  109/       0 : =>TRUE                              ELSE
1468
(1)  109/       0 : =1H                 INITVAR := INITVAR+BYTE
1469
(1)  109/       0 : =1H                 _POSTF00_Size       EQU BYTE
1470
(1)  109/       0 : [109]                               ENDIF
1471
(1)  110/       0 : (MACRO)              SETVAR _POSTF01				;ВОССТАНОВЛЕНИЕ ТЕКУЩЕЙ ПОЗИЦИИ ФАЙЛА
1472
(1)  110/       0 : =1H                 _POSTF01            EQU INITVAR
1473
(1)  110/       0 : =>BLANK                             IFNB 
1474
(1)  110/       0 :                     INITVAR := INITVAR+
1475
(1)  110/       0 :                     _POSTF01_Size       EQU 
1476
(1)  110/       0 : =>TRUE                              ELSE
1477
(1)  110/       0 : =2H                 INITVAR := INITVAR+BYTE
1478
(1)  110/       0 : =1H                 _POSTF01_Size       EQU BYTE
1479
(1)  110/       0 : [110]                               ENDIF
1480
(1)  111/       0 : (MACRO)              SETVAR _POSTF02				;СБРОС ТЕКУЩЕЙ ПОЗИЦИИ В 0 И ПОИСК ПЕРВОЙ "ЛЕГАЛЬНОЙ" ЗАПИСИ
1481
(1)  111/       0 : =2H                 _POSTF02            EQU INITVAR
1482
(1)  111/       0 : =>BLANK                             IFNB 
1483
(1)  111/       0 :                     INITVAR := INITVAR+
1484
(1)  111/       0 :                     _POSTF02_Size       EQU 
1485
(1)  111/       0 : =>TRUE                              ELSE
1486
(1)  111/       0 : =3H                 INITVAR := INITVAR+BYTE
1487
(1)  111/       0 : =1H                 _POSTF02_Size       EQU BYTE
1488
(1)  111/       0 : [111]                               ENDIF
1489
(1)  112/       0 : (MACRO)              SETVAR _POSTF03				;ПЕРЕМОТАТЬ НА "B" ФАЙЛОВ НАЗАД
1490
(1)  112/       0 : =3H                 _POSTF03            EQU INITVAR
1491
(1)  112/       0 : =>BLANK                             IFNB 
1492
(1)  112/       0 :                     INITVAR := INITVAR+
1493
(1)  112/       0 :                     _POSTF03_Size       EQU 
1494
(1)  112/       0 : =>TRUE                              ELSE
1495
(1)  112/       0 : =4H                 INITVAR := INITVAR+BYTE
1496
(1)  112/       0 : =1H                 _POSTF03_Size       EQU BYTE
1497
(1)  112/       0 : [112]                               ENDIF
1498
(1)  113/       0 : (MACRO)              SETVAR _POSTF04				;ПЕРЕМОТАТЬ НА "B" ФАЙЛОВ ВПЕРЕД
1499
(1)  113/       0 : =4H                 _POSTF04            EQU INITVAR
1500
(1)  113/       0 : =>BLANK                             IFNB 
1501
(1)  113/       0 :                     INITVAR := INITVAR+
1502
(1)  113/       0 :                     _POSTF04_Size       EQU 
1503
(1)  113/       0 : =>TRUE                              ELSE
1504
(1)  113/       0 : =5H                 INITVAR := INITVAR+BYTE
1505
(1)  113/       0 : =1H                 _POSTF04_Size       EQU BYTE
1506
(1)  113/       0 : [113]                               ENDIF
1507
(1)  114/       0 : (MACRO)              SETVAR _POSTF05				;ПОДСЧЕТ КОЛИЧЕСТВА "ЛЕГАЛЬНЫХ" ЗАПИСЕЙ
1508
(1)  114/       0 : =5H                 _POSTF05            EQU INITVAR
1509
(1)  114/       0 : =>BLANK                             IFNB 
1510
(1)  114/       0 :                     INITVAR := INITVAR+
1511
(1)  114/       0 :                     _POSTF05_Size       EQU 
1512
(1)  114/       0 : =>TRUE                              ELSE
871 lvd 1513
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80(../../svn/pentevo/rom/define.a80) - page 25 - 2/23/2020 18:58:45
867 lvd 1514
 
1515
 
865 lvd 1516
(1)  114/       0 : =6H                 INITVAR := INITVAR+BYTE
1517
(1)  114/       0 : =1H                 _POSTF05_Size       EQU BYTE
1518
(1)  114/       0 : [114]                               ENDIF
1519
(1)  115/       0 : (MACRO)              SETVAR _POSTF06				;УСТАНОВИТЬ НОМЕР "ЛЕГАЛЬНОЙ" ЗАПИСИ ИЗ "BC"
1520
(1)  115/       0 : =6H                 _POSTF06            EQU INITVAR
1521
(1)  115/       0 : =>BLANK                             IFNB 
1522
(1)  115/       0 :                     INITVAR := INITVAR+
1523
(1)  115/       0 :                     _POSTF06_Size       EQU 
1524
(1)  115/       0 : =>TRUE                              ELSE
1525
(1)  115/       0 : =7H                 INITVAR := INITVAR+BYTE
1526
(1)  115/       0 : =1H                 _POSTF06_Size       EQU BYTE
1527
(1)  115/       0 : [115]                               ENDIF
1528
(1)  116/       0 : (MACRO)              SETVAR _POSTF07				;ВЕРНУТЬ В "BC" ТЕКУЩИЙ НОМЕР "ЛЕГАЛЬНОЙ" ЗАПИСИ
1529
(1)  116/       0 : =7H                 _POSTF07            EQU INITVAR
1530
(1)  116/       0 : =>BLANK                             IFNB 
1531
(1)  116/       0 :                     INITVAR := INITVAR+
1532
(1)  116/       0 :                     _POSTF07_Size       EQU 
1533
(1)  116/       0 : =>TRUE                              ELSE
1534
(1)  116/       0 : =8H                 INITVAR := INITVAR+BYTE
1535
(1)  116/       0 : =1H                 _POSTF07_Size       EQU BYTE
1536
(1)  116/       0 : [116]                               ENDIF
1537
(1)  117/       0 :                     
1538
(1)  118/       0 :                     ;номера поддерживаемых расширений для RST 8
1539
(1)  119/       0 :                     ;"TRDSCLFDITAPSPG$C FNTBMPROM"		;RST 8
1540
(1)  120/       0 :                     ;"TRDSCLFDITAPSPG$C BMPSNA"		;MAINMENU
1541
(1)  121/       0 : (MACRO)              INIT_VAR 1
1542
(1)  121/       0 : =>NOT BLANK                         IFNB 1
1543
(1)  121/       0 : =1H                 INITVAR := 1
1544
(1)  121/       0 : =>FALSE                             ELSE
1545
(1)  121/       0 :                     INITVAR := 0
1546
(1)  121/       0 : [121]                               ENDIF
1547
(1)  122/       0 : (MACRO)              SETVAR _TRD		;TRD
1548
(1)  122/       0 : =1H                 _TRD            EQU INITVAR
1549
(1)  122/       0 : =>BLANK                             IFNB 
1550
(1)  122/       0 :                     INITVAR := INITVAR+
1551
(1)  122/       0 :                     _TRD_Size       EQU 
1552
(1)  122/       0 : =>TRUE                              ELSE
1553
(1)  122/       0 : =2H                 INITVAR := INITVAR+BYTE
1554
(1)  122/       0 : =1H                 _TRD_Size       EQU BYTE
1555
(1)  122/       0 : [122]                               ENDIF
1556
(1)  123/       0 : (MACRO)              SETVAR _SCL		;SCL
1557
(1)  123/       0 : =2H                 _SCL            EQU INITVAR
1558
(1)  123/       0 : =>BLANK                             IFNB 
1559
(1)  123/       0 :                     INITVAR := INITVAR+
1560
(1)  123/       0 :                     _SCL_Size       EQU 
1561
(1)  123/       0 : =>TRUE                              ELSE
1562
(1)  123/       0 : =3H                 INITVAR := INITVAR+BYTE
1563
(1)  123/       0 : =1H                 _SCL_Size       EQU BYTE
1564
(1)  123/       0 : [123]                               ENDIF
1565
(1)  124/       0 : (MACRO)              SETVAR _FDI		;FDI
1566
(1)  124/       0 : =3H                 _FDI            EQU INITVAR
1567
(1)  124/       0 : =>BLANK                             IFNB 
1568
(1)  124/       0 :                     INITVAR := INITVAR+
1569
(1)  124/       0 :                     _FDI_Size       EQU 
1570
(1)  124/       0 : =>TRUE                              ELSE
1571
(1)  124/       0 : =4H                 INITVAR := INITVAR+BYTE
1572
(1)  124/       0 : =1H                 _FDI_Size       EQU BYTE
1573
(1)  124/       0 : [124]                               ENDIF
1574
(1)  125/       0 : (MACRO)              SETVAR _TAP		;TAP
1575
(1)  125/       0 : =4H                 _TAP            EQU INITVAR
871 lvd 1576
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80(../../svn/pentevo/rom/define.a80) - page 26 - 2/23/2020 18:58:45
867 lvd 1577
 
1578
 
865 lvd 1579
(1)  125/       0 : =>BLANK                             IFNB 
1580
(1)  125/       0 :                     INITVAR := INITVAR+
1581
(1)  125/       0 :                     _TAP_Size       EQU 
1582
(1)  125/       0 : =>TRUE                              ELSE
1583
(1)  125/       0 : =5H                 INITVAR := INITVAR+BYTE
1584
(1)  125/       0 : =1H                 _TAP_Size       EQU BYTE
1585
(1)  125/       0 : [125]                               ENDIF
1586
(1)  126/       0 : (MACRO)              SETVAR _SPG		;SPG
1587
(1)  126/       0 : =5H                 _SPG            EQU INITVAR
1588
(1)  126/       0 : =>BLANK                             IFNB 
1589
(1)  126/       0 :                     INITVAR := INITVAR+
1590
(1)  126/       0 :                     _SPG_Size       EQU 
1591
(1)  126/       0 : =>TRUE                              ELSE
1592
(1)  126/       0 : =6H                 INITVAR := INITVAR+BYTE
1593
(1)  126/       0 : =1H                 _SPG_Size       EQU BYTE
1594
(1)  126/       0 : [126]                               ENDIF
1595
(1)  127/       0 : (MACRO)              SETVAR _HOB		;$C
1596
(1)  127/       0 : =6H                 _HOB            EQU INITVAR
1597
(1)  127/       0 : =>BLANK                             IFNB 
1598
(1)  127/       0 :                     INITVAR := INITVAR+
1599
(1)  127/       0 :                     _HOB_Size       EQU 
1600
(1)  127/       0 : =>TRUE                              ELSE
1601
(1)  127/       0 : =7H                 INITVAR := INITVAR+BYTE
1602
(1)  127/       0 : =1H                 _HOB_Size       EQU BYTE
1603
(1)  127/       0 : [127]                               ENDIF
1604
(1)  128/       0 : (MACRO)              SETVAR _FNT		;FNT
1605
(1)  128/       0 : =7H                 _FNT            EQU INITVAR
1606
(1)  128/       0 : =>BLANK                             IFNB 
1607
(1)  128/       0 :                     INITVAR := INITVAR+
1608
(1)  128/       0 :                     _FNT_Size       EQU 
1609
(1)  128/       0 : =>TRUE                              ELSE
1610
(1)  128/       0 : =8H                 INITVAR := INITVAR+BYTE
1611
(1)  128/       0 : =1H                 _FNT_Size       EQU BYTE
1612
(1)  128/       0 : [128]                               ENDIF
1613
(1)  129/       0 : (MACRO)              SETVAR _BMP		;BMP
1614
(1)  129/       0 : =8H                 _BMP            EQU INITVAR
1615
(1)  129/       0 : =>BLANK                             IFNB 
1616
(1)  129/       0 :                     INITVAR := INITVAR+
1617
(1)  129/       0 :                     _BMP_Size       EQU 
1618
(1)  129/       0 : =>TRUE                              ELSE
1619
(1)  129/       0 : =9H                 INITVAR := INITVAR+BYTE
1620
(1)  129/       0 : =1H                 _BMP_Size       EQU BYTE
1621
(1)  129/       0 : [129]                               ENDIF
1622
(1)  130/       0 : (MACRO)              SETVAR _ROM		;ROM
1623
(1)  130/       0 : =9H                 _ROM            EQU INITVAR
1624
(1)  130/       0 : =>BLANK                             IFNB 
1625
(1)  130/       0 :                     INITVAR := INITVAR+
1626
(1)  130/       0 :                     _ROM_Size       EQU 
1627
(1)  130/       0 : =>TRUE                              ELSE
1628
(1)  130/       0 : =AH                 INITVAR := INITVAR+BYTE
1629
(1)  130/       0 : =1H                 _ROM_Size       EQU BYTE
1630
(1)  130/       0 : [130]                               ENDIF
1631
(1)  131/       0 :                     ; SETVAR _HOB1		;$??
1632
(1)  132/       0 :                     ; SETVAR _HOB2		;!??
1633
(1)  133/       0 :                     
1634
(1)  134/       0 :                     ;[внутренние номера типов разделов]
1635
(1)  135/       0 : (MACRO)              INIT_VAR
1636
(1)  135/       0 : =>BLANK                             IFNB 
1637
(1)  135/       0 :                     INITVAR := 
1638
(1)  135/       0 : =>TRUE                              ELSE
871 lvd 1639
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80(../../svn/pentevo/rom/define.a80) - page 27 - 2/23/2020 18:58:45
867 lvd 1640
 
1641
 
865 lvd 1642
(1)  135/       0 : =0H                 INITVAR := 0
1643
(1)  135/       0 : [135]                               ENDIF
1644
(1)  136/       0 : (MACRO)              SETVAR _NO_INIT
1645
(1)  136/       0 : =0H                 _NO_INIT            EQU INITVAR
1646
(1)  136/       0 : =>BLANK                             IFNB 
1647
(1)  136/       0 :                     INITVAR := INITVAR+
1648
(1)  136/       0 :                     _NO_INIT_Size       EQU 
1649
(1)  136/       0 : =>TRUE                              ELSE
1650
(1)  136/       0 : =1H                 INITVAR := INITVAR+BYTE
1651
(1)  136/       0 : =1H                 _NO_INIT_Size       EQU BYTE
1652
(1)  136/       0 : [136]                               ENDIF
1653
(1)  137/       0 : (MACRO)              SETVAR _FAT12					;00 = 01	FAT12
1654
(1)  137/       0 : =1H                 _FAT12            EQU INITVAR
1655
(1)  137/       0 : =>BLANK                             IFNB 
1656
(1)  137/       0 :                     INITVAR := INITVAR+
1657
(1)  137/       0 :                     _FAT12_Size       EQU 
1658
(1)  137/       0 : =>TRUE                              ELSE
1659
(1)  137/       0 : =2H                 INITVAR := INITVAR+BYTE
1660
(1)  137/       0 : =1H                 _FAT12_Size       EQU BYTE
1661
(1)  137/       0 : [137]                               ENDIF
1662
(1)  138/       0 : (MACRO)              SETVAR _FAT16					;01 = 04,06,0E	FAT16
1663
(1)  138/       0 : =2H                 _FAT16            EQU INITVAR
1664
(1)  138/       0 : =>BLANK                             IFNB 
1665
(1)  138/       0 :                     INITVAR := INITVAR+
1666
(1)  138/       0 :                     _FAT16_Size       EQU 
1667
(1)  138/       0 : =>TRUE                              ELSE
1668
(1)  138/       0 : =3H                 INITVAR := INITVAR+BYTE
1669
(1)  138/       0 : =1H                 _FAT16_Size       EQU BYTE
1670
(1)  138/       0 : [138]                               ENDIF
1671
(1)  139/       0 : (MACRO)              SETVAR _FAT32					;02 = 0B,0C	FAT32
1672
(1)  139/       0 : =3H                 _FAT32            EQU INITVAR
1673
(1)  139/       0 : =>BLANK                             IFNB 
1674
(1)  139/       0 :                     INITVAR := INITVAR+
1675
(1)  139/       0 :                     _FAT32_Size       EQU 
1676
(1)  139/       0 : =>TRUE                              ELSE
1677
(1)  139/       0 : =4H                 INITVAR := INITVAR+BYTE
1678
(1)  139/       0 : =1H                 _FAT32_Size       EQU BYTE
1679
(1)  139/       0 : [139]                               ENDIF
1680
(1)  140/       0 : (MACRO)              SETVAR _TRDOS					;03 		TR-DOS диск
1681
(1)  140/       0 : =4H                 _TRDOS            EQU INITVAR
1682
(1)  140/       0 : =>BLANK                             IFNB 
1683
(1)  140/       0 :                     INITVAR := INITVAR+
1684
(1)  140/       0 :                     _TRDOS_Size       EQU 
1685
(1)  140/       0 : =>TRUE                              ELSE
1686
(1)  140/       0 : =5H                 INITVAR := INITVAR+BYTE
1687
(1)  140/       0 : =1H                 _TRDOS_Size       EQU BYTE
1688
(1)  140/       0 : [140]                               ENDIF
1689
(1)  141/       0 : (MACRO)              SETVAR _UNKNOWN				;		файловая система еще не определена или неизвестна
1690
(1)  141/       0 : =5H                 _UNKNOWN            EQU INITVAR
1691
(1)  141/       0 : =>BLANK                             IFNB 
1692
(1)  141/       0 :                     INITVAR := INITVAR+
1693
(1)  141/       0 :                     _UNKNOWN_Size       EQU 
1694
(1)  141/       0 : =>TRUE                              ELSE
1695
(1)  141/       0 : =6H                 INITVAR := INITVAR+BYTE
1696
(1)  141/       0 : =1H                 _UNKNOWN_Size       EQU BYTE
1697
(1)  141/       0 : [141]                               ENDIF
1698
(1)  142/       0 :                     
1699
(1)  143/       0 :                     ;описатели для рисования окна
1700
(1)  144/       0 : (MACRO)              INIT_VAR
1701
(1)  144/       0 : =>BLANK                             IFNB 
871 lvd 1702
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80(../../svn/pentevo/rom/define.a80) - page 28 - 2/23/2020 18:58:45
867 lvd 1703
 
1704
 
865 lvd 1705
(1)  144/       0 :                     INITVAR := 
1706
(1)  144/       0 : =>TRUE                              ELSE
1707
(1)  144/       0 : =0H                 INITVAR := 0
1708
(1)  144/       0 : [144]                               ENDIF
1709
(1)  145/       0 : (MACRO)              SETVAR _X_COORD
1710
(1)  145/       0 : =0H                 _X_COORD            EQU INITVAR
1711
(1)  145/       0 : =>BLANK                             IFNB 
1712
(1)  145/       0 :                     INITVAR := INITVAR+
1713
(1)  145/       0 :                     _X_COORD_Size       EQU 
1714
(1)  145/       0 : =>TRUE                              ELSE
1715
(1)  145/       0 : =1H                 INITVAR := INITVAR+BYTE
1716
(1)  145/       0 : =1H                 _X_COORD_Size       EQU BYTE
1717
(1)  145/       0 : [145]                               ENDIF
1718
(1)  146/       0 : (MACRO)              SETVAR _Y_COORD
1719
(1)  146/       0 : =1H                 _Y_COORD            EQU INITVAR
1720
(1)  146/       0 : =>BLANK                             IFNB 
1721
(1)  146/       0 :                     INITVAR := INITVAR+
1722
(1)  146/       0 :                     _Y_COORD_Size       EQU 
1723
(1)  146/       0 : =>TRUE                              ELSE
1724
(1)  146/       0 : =2H                 INITVAR := INITVAR+BYTE
1725
(1)  146/       0 : =1H                 _Y_COORD_Size       EQU BYTE
1726
(1)  146/       0 : [146]                               ENDIF
1727
(1)  147/       0 : (MACRO)              SETVAR _V_SIZE
1728
(1)  147/       0 : =2H                 _V_SIZE            EQU INITVAR
1729
(1)  147/       0 : =>BLANK                             IFNB 
1730
(1)  147/       0 :                     INITVAR := INITVAR+
1731
(1)  147/       0 :                     _V_SIZE_Size       EQU 
1732
(1)  147/       0 : =>TRUE                              ELSE
1733
(1)  147/       0 : =3H                 INITVAR := INITVAR+BYTE
1734
(1)  147/       0 : =1H                 _V_SIZE_Size       EQU BYTE
1735
(1)  147/       0 : [147]                               ENDIF
1736
(1)  148/       0 : (MACRO)              SETVAR _H_SIZE
1737
(1)  148/       0 : =3H                 _H_SIZE            EQU INITVAR
1738
(1)  148/       0 : =>BLANK                             IFNB 
1739
(1)  148/       0 :                     INITVAR := INITVAR+
1740
(1)  148/       0 :                     _H_SIZE_Size       EQU 
1741
(1)  148/       0 : =>TRUE                              ELSE
1742
(1)  148/       0 : =4H                 INITVAR := INITVAR+BYTE
1743
(1)  148/       0 : =1H                 _H_SIZE_Size       EQU BYTE
1744
(1)  148/       0 : [148]                               ENDIF
1745
(1)  149/       0 : (MACRO)              SETVAR _COLOR_WIN
1746
(1)  149/       0 : =4H                 _COLOR_WIN            EQU INITVAR
1747
(1)  149/       0 : =>BLANK                             IFNB 
1748
(1)  149/       0 :                     INITVAR := INITVAR+
1749
(1)  149/       0 :                     _COLOR_WIN_Size       EQU 
1750
(1)  149/       0 : =>TRUE                              ELSE
1751
(1)  149/       0 : =5H                 INITVAR := INITVAR+BYTE
1752
(1)  149/       0 : =1H                 _COLOR_WIN_Size       EQU BYTE
1753
(1)  149/       0 : [149]                               ENDIF
1754
(1)  150/       0 : (MACRO)              SETVAR _COLOR_CUR
1755
(1)  150/       0 : =5H                 _COLOR_CUR            EQU INITVAR
1756
(1)  150/       0 : =>BLANK                             IFNB 
1757
(1)  150/       0 :                     INITVAR := INITVAR+
1758
(1)  150/       0 :                     _COLOR_CUR_Size       EQU 
1759
(1)  150/       0 : =>TRUE                              ELSE
1760
(1)  150/       0 : =6H                 INITVAR := INITVAR+BYTE
1761
(1)  150/       0 : =1H                 _COLOR_CUR_Size       EQU BYTE
1762
(1)  150/       0 : [150]                               ENDIF
1763
(1)  151/       0 : (MACRO)              SETVAR _FLAGS
1764
(1)  151/       0 : =6H                 _FLAGS            EQU INITVAR
871 lvd 1765
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80(../../svn/pentevo/rom/define.a80) - page 29 - 2/23/2020 18:58:45
867 lvd 1766
 
1767
 
865 lvd 1768
(1)  151/       0 : =>BLANK                             IFNB 
1769
(1)  151/       0 :                     INITVAR := INITVAR+
1770
(1)  151/       0 :                     _FLAGS_Size       EQU 
1771
(1)  151/       0 : =>TRUE                              ELSE
1772
(1)  151/       0 : =7H                 INITVAR := INITVAR+BYTE
1773
(1)  151/       0 : =1H                 _FLAGS_Size       EQU BYTE
1774
(1)  151/       0 : [151]                               ENDIF
1775
(1)  152/       0 : (MACRO)              SETVAR _NUM_PKT
1776
(1)  152/       0 : =7H                 _NUM_PKT            EQU INITVAR
1777
(1)  152/       0 : =>BLANK                             IFNB 
1778
(1)  152/       0 :                     INITVAR := INITVAR+
1779
(1)  152/       0 :                     _NUM_PKT_Size       EQU 
1780
(1)  152/       0 : =>TRUE                              ELSE
1781
(1)  152/       0 : =8H                 INITVAR := INITVAR+BYTE
1782
(1)  152/       0 : =1H                 _NUM_PKT_Size       EQU BYTE
1783
(1)  152/       0 : [152]                               ENDIF
1784
(1)  153/       0 : (MACRO)              SETVAR _TEK_PKT_L
1785
(1)  153/       0 : =8H                 _TEK_PKT_L            EQU INITVAR
1786
(1)  153/       0 : =>BLANK                             IFNB 
1787
(1)  153/       0 :                     INITVAR := INITVAR+
1788
(1)  153/       0 :                     _TEK_PKT_L_Size       EQU 
1789
(1)  153/       0 : =>TRUE                              ELSE
1790
(1)  153/       0 : =9H                 INITVAR := INITVAR+BYTE
1791
(1)  153/       0 : =1H                 _TEK_PKT_L_Size       EQU BYTE
1792
(1)  153/       0 : [153]                               ENDIF
1793
(1)  154/       0 : (MACRO)              SETVAR _TEK_PKT_H
1794
(1)  154/       0 : =9H                 _TEK_PKT_H            EQU INITVAR
1795
(1)  154/       0 : =>BLANK                             IFNB 
1796
(1)  154/       0 :                     INITVAR := INITVAR+
1797
(1)  154/       0 :                     _TEK_PKT_H_Size       EQU 
1798
(1)  154/       0 : =>TRUE                              ELSE
1799
(1)  154/       0 : =AH                 INITVAR := INITVAR+BYTE
1800
(1)  154/       0 : =1H                 _TEK_PKT_H_Size       EQU BYTE
1801
(1)  154/       0 : [154]                               ENDIF
1802
(1)  155/       0 : (MACRO)              SETVAR _NUM_KOL_L
1803
(1)  155/       0 : =AH                 _NUM_KOL_L            EQU INITVAR
1804
(1)  155/       0 : =>BLANK                             IFNB 
1805
(1)  155/       0 :                     INITVAR := INITVAR+
1806
(1)  155/       0 :                     _NUM_KOL_L_Size       EQU 
1807
(1)  155/       0 : =>TRUE                              ELSE
1808
(1)  155/       0 : =BH                 INITVAR := INITVAR+BYTE
1809
(1)  155/       0 : =1H                 _NUM_KOL_L_Size       EQU BYTE
1810
(1)  155/       0 : [155]                               ENDIF
1811
(1)  156/       0 : (MACRO)              SETVAR _NUM_KOL_H
1812
(1)  156/       0 : =BH                 _NUM_KOL_H            EQU INITVAR
1813
(1)  156/       0 : =>BLANK                             IFNB 
1814
(1)  156/       0 :                     INITVAR := INITVAR+
1815
(1)  156/       0 :                     _NUM_KOL_H_Size       EQU 
1816
(1)  156/       0 : =>TRUE                              ELSE
1817
(1)  156/       0 : =CH                 INITVAR := INITVAR+BYTE
1818
(1)  156/       0 : =1H                 _NUM_KOL_H_Size       EQU BYTE
1819
(1)  156/       0 : [156]                               ENDIF
1820
(1)  157/       0 : (MACRO)              SETVAR _ADR_TXT_L
1821
(1)  157/       0 : =CH                 _ADR_TXT_L            EQU INITVAR
1822
(1)  157/       0 : =>BLANK                             IFNB 
1823
(1)  157/       0 :                     INITVAR := INITVAR+
1824
(1)  157/       0 :                     _ADR_TXT_L_Size       EQU 
1825
(1)  157/       0 : =>TRUE                              ELSE
1826
(1)  157/       0 : =DH                 INITVAR := INITVAR+BYTE
1827
(1)  157/       0 : =1H                 _ADR_TXT_L_Size       EQU BYTE
871 lvd 1828
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80(../../svn/pentevo/rom/define.a80) - page 30 - 2/23/2020 18:58:45
867 lvd 1829
 
1830
 
865 lvd 1831
(1)  157/       0 : [157]                               ENDIF
1832
(1)  158/       0 : (MACRO)              SETVAR _ADR_TXT_H
1833
(1)  158/       0 : =DH                 _ADR_TXT_H            EQU INITVAR
1834
(1)  158/       0 : =>BLANK                             IFNB 
1835
(1)  158/       0 :                     INITVAR := INITVAR+
1836
(1)  158/       0 :                     _ADR_TXT_H_Size       EQU 
1837
(1)  158/       0 : =>TRUE                              ELSE
1838
(1)  158/       0 : =EH                 INITVAR := INITVAR+BYTE
1839
(1)  158/       0 : =1H                 _ADR_TXT_H_Size       EQU BYTE
1840
(1)  158/       0 : [158]                               ENDIF
1841
(1)  159/       0 : (MACRO)              SETVAR _ADR_PRG_L
1842
(1)  159/       0 : =EH                 _ADR_PRG_L            EQU INITVAR
1843
(1)  159/       0 : =>BLANK                             IFNB 
1844
(1)  159/       0 :                     INITVAR := INITVAR+
1845
(1)  159/       0 :                     _ADR_PRG_L_Size       EQU 
1846
(1)  159/       0 : =>TRUE                              ELSE
1847
(1)  159/       0 : =FH                 INITVAR := INITVAR+BYTE
1848
(1)  159/       0 : =1H                 _ADR_PRG_L_Size       EQU BYTE
1849
(1)  159/       0 : [159]                               ENDIF
1850
(1)  160/       0 : (MACRO)              SETVAR _ADR_PRG_H
1851
(1)  160/       0 : =FH                 _ADR_PRG_H            EQU INITVAR
1852
(1)  160/       0 : =>BLANK                             IFNB 
1853
(1)  160/       0 :                     INITVAR := INITVAR+
1854
(1)  160/       0 :                     _ADR_PRG_H_Size       EQU 
1855
(1)  160/       0 : =>TRUE                              ELSE
1856
(1)  160/       0 : =10H                INITVAR := INITVAR+BYTE
1857
(1)  160/       0 : =1H                 _ADR_PRG_H_Size       EQU BYTE
1858
(1)  160/       0 : [160]                               ENDIF
1859
(1)  161/       0 : (MACRO)              SETVAR _ADR_MOUSE_L
1860
(1)  161/       0 : =10H                _ADR_MOUSE_L            EQU INITVAR
1861
(1)  161/       0 : =>BLANK                             IFNB 
1862
(1)  161/       0 :                     INITVAR := INITVAR+
1863
(1)  161/       0 :                     _ADR_MOUSE_L_Size       EQU 
1864
(1)  161/       0 : =>TRUE                              ELSE
1865
(1)  161/       0 : =11H                INITVAR := INITVAR+BYTE
1866
(1)  161/       0 : =1H                 _ADR_MOUSE_L_Size       EQU BYTE
1867
(1)  161/       0 : [161]                               ENDIF
1868
(1)  162/       0 : (MACRO)              SETVAR _ADR_MOUSE_H
1869
(1)  162/       0 : =11H                _ADR_MOUSE_H            EQU INITVAR
1870
(1)  162/       0 : =>BLANK                             IFNB 
1871
(1)  162/       0 :                     INITVAR := INITVAR+
1872
(1)  162/       0 :                     _ADR_MOUSE_H_Size       EQU 
1873
(1)  162/       0 : =>TRUE                              ELSE
1874
(1)  162/       0 : =12H                INITVAR := INITVAR+BYTE
1875
(1)  162/       0 : =1H                 _ADR_MOUSE_H_Size       EQU BYTE
1876
(1)  162/       0 : [162]                               ENDIF
1877
(1)  163/       0 : (MACRO)              SETVAR _ADR_HOTKEY_L
1878
(1)  163/       0 : =12H                _ADR_HOTKEY_L            EQU INITVAR
1879
(1)  163/       0 : =>BLANK                             IFNB 
1880
(1)  163/       0 :                     INITVAR := INITVAR+
1881
(1)  163/       0 :                     _ADR_HOTKEY_L_Size       EQU 
1882
(1)  163/       0 : =>TRUE                              ELSE
1883
(1)  163/       0 : =13H                INITVAR := INITVAR+BYTE
1884
(1)  163/       0 : =1H                 _ADR_HOTKEY_L_Size       EQU BYTE
1885
(1)  163/       0 : [163]                               ENDIF
1886
(1)  164/       0 : (MACRO)              SETVAR _ADR_HOTKEY_H
1887
(1)  164/       0 : =13H                _ADR_HOTKEY_H            EQU INITVAR
1888
(1)  164/       0 : =>BLANK                             IFNB 
1889
(1)  164/       0 :                     INITVAR := INITVAR+
1890
(1)  164/       0 :                     _ADR_HOTKEY_H_Size       EQU 
871 lvd 1891
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80(../../svn/pentevo/rom/define.a80) - page 31 - 2/23/2020 18:58:45
867 lvd 1892
 
1893
 
865 lvd 1894
(1)  164/       0 : =>TRUE                              ELSE
1895
(1)  164/       0 : =14H                INITVAR := INITVAR+BYTE
1896
(1)  164/       0 : =1H                 _ADR_HOTKEY_H_Size       EQU BYTE
1897
(1)  164/       0 : [164]                               ENDIF
1898
(1)  165/       0 :                     
1899
(1)  166/       0 : =3H                 JUMP_SIZE	EQU 3
1900
(1)  167/       0 :                     
1901
(1)  168/       0 : (MACRO)              INIT_VAR 0X100
1902
(1)  168/       0 : =>NOT BLANK                         IFNB 0X100
1903
(1)  168/       0 : =100H               INITVAR := 0X100
1904
(1)  168/       0 : =>FALSE                             ELSE
1905
(1)  168/       0 :                     INITVAR := 0
1906
(1)  168/       0 : [168]                               ENDIF
1907
(1)  169/       0 : (MACRO)              SETVAR _NEMO_RD_ID,JUMP_SIZE			;чтение сектора идентификации HDD с определением его наличия
1908
(1)  169/       0 : =100H               _NEMO_RD_ID            EQU INITVAR
1909
(1)  169/       0 : =>NOT BLANK                         IFNB JUMP_SIZE
1910
(1)  169/       0 : =103H               INITVAR := INITVAR+JUMP_SIZE
1911
(1)  169/       0 : =3H                 _NEMO_RD_ID_Size       EQU JUMP_SIZE
1912
(1)  169/       0 : =>FALSE                             ELSE
1913
(1)  169/       0 :                     INITVAR := INITVAR+BYTE
1914
(1)  169/       0 :                     _NEMO_RD_ID_Size       EQU BYTE
1915
(1)  169/       0 : [169]                               ENDIF
1916
(1)  170/       0 : (MACRO)              SETVAR _NEMO_RD_SEC,JUMP_SIZE			;чтение секторов HDD
1917
(1)  170/       0 : =103H               _NEMO_RD_SEC            EQU INITVAR
1918
(1)  170/       0 : =>NOT BLANK                         IFNB JUMP_SIZE
1919
(1)  170/       0 : =106H               INITVAR := INITVAR+JUMP_SIZE
1920
(1)  170/       0 : =3H                 _NEMO_RD_SEC_Size       EQU JUMP_SIZE
1921
(1)  170/       0 : =>FALSE                             ELSE
1922
(1)  170/       0 :                     INITVAR := INITVAR+BYTE
1923
(1)  170/       0 :                     _NEMO_RD_SEC_Size       EQU BYTE
1924
(1)  170/       0 : [170]                               ENDIF
1925
(1)  171/       0 : (MACRO)              SETVAR _NEMO_WR_SEC,JUMP_SIZE			;запись секторов HDD
1926
(1)  171/       0 : =106H               _NEMO_WR_SEC            EQU INITVAR
1927
(1)  171/       0 : =>NOT BLANK                         IFNB JUMP_SIZE
1928
(1)  171/       0 : =109H               INITVAR := INITVAR+JUMP_SIZE
1929
(1)  171/       0 : =3H                 _NEMO_WR_SEC_Size       EQU JUMP_SIZE
1930
(1)  171/       0 : =>FALSE                             ELSE
1931
(1)  171/       0 :                     INITVAR := INITVAR+BYTE
1932
(1)  171/       0 :                     _NEMO_WR_SEC_Size       EQU BYTE
1933
(1)  171/       0 : [171]                               ENDIF
1934
(1)  172/       0 :                     
1935
(1)  173/       0 : (MACRO)              SETVAR _ZCSD_RD_ID,JUMP_SIZE			;чтение сектора идентификации набортной SD карты
1936
(1)  173/       0 : =109H               _ZCSD_RD_ID            EQU INITVAR
1937
(1)  173/       0 : =>NOT BLANK                         IFNB JUMP_SIZE
1938
(1)  173/       0 : =10CH               INITVAR := INITVAR+JUMP_SIZE
1939
(1)  173/       0 : =3H                 _ZCSD_RD_ID_Size       EQU JUMP_SIZE
1940
(1)  173/       0 : =>FALSE                             ELSE
1941
(1)  173/       0 :                     INITVAR := INITVAR+BYTE
1942
(1)  173/       0 :                     _ZCSD_RD_ID_Size       EQU BYTE
1943
(1)  173/       0 : [173]                               ENDIF
1944
(1)  174/       0 : (MACRO)              SETVAR _ZCSD_RD_SEC,JUMP_SIZE			;чтение секторов набортной SD карты
1945
(1)  174/       0 : =10CH               _ZCSD_RD_SEC            EQU INITVAR
1946
(1)  174/       0 : =>NOT BLANK                         IFNB JUMP_SIZE
1947
(1)  174/       0 : =10FH               INITVAR := INITVAR+JUMP_SIZE
1948
(1)  174/       0 : =3H                 _ZCSD_RD_SEC_Size       EQU JUMP_SIZE
1949
(1)  174/       0 : =>FALSE                             ELSE
1950
(1)  174/       0 :                     INITVAR := INITVAR+BYTE
1951
(1)  174/       0 :                     _ZCSD_RD_SEC_Size       EQU BYTE
1952
(1)  174/       0 : [174]                               ENDIF
1953
(1)  175/       0 : (MACRO)              SETVAR _ZCSD_WR_SEC,JUMP_SIZE			;запись секторов набортной SD карты
871 lvd 1954
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80(../../svn/pentevo/rom/define.a80) - page 32 - 2/23/2020 18:58:45
867 lvd 1955
 
1956
 
865 lvd 1957
(1)  175/       0 : =10FH               _ZCSD_WR_SEC            EQU INITVAR
1958
(1)  175/       0 : =>NOT BLANK                         IFNB JUMP_SIZE
1959
(1)  175/       0 : =112H               INITVAR := INITVAR+JUMP_SIZE
1960
(1)  175/       0 : =3H                 _ZCSD_WR_SEC_Size       EQU JUMP_SIZE
1961
(1)  175/       0 : =>FALSE                             ELSE
1962
(1)  175/       0 :                     INITVAR := INITVAR+BYTE
1963
(1)  175/       0 :                     _ZCSD_WR_SEC_Size       EQU BYTE
1964
(1)  175/       0 : [175]                               ENDIF
1965
(1)  176/       0 :                     
1966
(1)  177/       0 : (MACRO)              SETVAR _NGSSD_RD_ID,JUMP_SIZE			;чтение сектора идентификации SD карты NeoGS
1967
(1)  177/       0 : =112H               _NGSSD_RD_ID            EQU INITVAR
1968
(1)  177/       0 : =>NOT BLANK                         IFNB JUMP_SIZE
1969
(1)  177/       0 : =115H               INITVAR := INITVAR+JUMP_SIZE
1970
(1)  177/       0 : =3H                 _NGSSD_RD_ID_Size       EQU JUMP_SIZE
1971
(1)  177/       0 : =>FALSE                             ELSE
1972
(1)  177/       0 :                     INITVAR := INITVAR+BYTE
1973
(1)  177/       0 :                     _NGSSD_RD_ID_Size       EQU BYTE
1974
(1)  177/       0 : [177]                               ENDIF
1975
(1)  178/       0 : (MACRO)              SETVAR _NGSSD_RD_SEC,JUMP_SIZE			;чтение секторов SD карты NeoGS
1976
(1)  178/       0 : =115H               _NGSSD_RD_SEC            EQU INITVAR
1977
(1)  178/       0 : =>NOT BLANK                         IFNB JUMP_SIZE
1978
(1)  178/       0 : =118H               INITVAR := INITVAR+JUMP_SIZE
1979
(1)  178/       0 : =3H                 _NGSSD_RD_SEC_Size       EQU JUMP_SIZE
1980
(1)  178/       0 : =>FALSE                             ELSE
1981
(1)  178/       0 :                     INITVAR := INITVAR+BYTE
1982
(1)  178/       0 :                     _NGSSD_RD_SEC_Size       EQU BYTE
1983
(1)  178/       0 : [178]                               ENDIF
1984
(1)  179/       0 : (MACRO)              SETVAR _NGSSD_WR_SEC,JUMP_SIZE			;запись секторов SD карты NeoGS
1985
(1)  179/       0 : =118H               _NGSSD_WR_SEC            EQU INITVAR
1986
(1)  179/       0 : =>NOT BLANK                         IFNB JUMP_SIZE
1987
(1)  179/       0 : =11BH               INITVAR := INITVAR+JUMP_SIZE
1988
(1)  179/       0 : =3H                 _NGSSD_WR_SEC_Size       EQU JUMP_SIZE
1989
(1)  179/       0 : =>FALSE                             ELSE
1990
(1)  179/       0 :                     INITVAR := INITVAR+BYTE
1991
(1)  179/       0 :                     _NGSSD_WR_SEC_Size       EQU BYTE
1992
(1)  179/       0 : [179]                               ENDIF
1993
(1)  180/       0 :                     
1994
(1)  181/       0 : (MACRO)              SETVAR _INIT_KEYB_PS2,JUMP_SIZE		;включение доступа к PS/2 клавиатуре
1995
(1)  181/       0 : =11BH               _INIT_KEYB_PS2            EQU INITVAR
1996
(1)  181/       0 : =>NOT BLANK                         IFNB JUMP_SIZE
1997
(1)  181/       0 : =11EH               INITVAR := INITVAR+JUMP_SIZE
1998
(1)  181/       0 : =3H                 _INIT_KEYB_PS2_Size       EQU JUMP_SIZE
1999
(1)  181/       0 : =>FALSE                             ELSE
2000
(1)  181/       0 :                     INITVAR := INITVAR+BYTE
2001
(1)  181/       0 :                     _INIT_KEYB_PS2_Size       EQU BYTE
2002
(1)  181/       0 : [181]                               ENDIF
2003
(1)  182/       0 : (MACRO)              SETVAR _READ_KEYB_PS2,JUMP_SIZE		;считывание и декодирование сканкодов PS/2
2004
(1)  182/       0 : =11EH               _READ_KEYB_PS2            EQU INITVAR
2005
(1)  182/       0 : =>NOT BLANK                         IFNB JUMP_SIZE
2006
(1)  182/       0 : =121H               INITVAR := INITVAR+JUMP_SIZE
2007
(1)  182/       0 : =3H                 _READ_KEYB_PS2_Size       EQU JUMP_SIZE
2008
(1)  182/       0 : =>FALSE                             ELSE
2009
(1)  182/       0 :                     INITVAR := INITVAR+BYTE
2010
(1)  182/       0 :                     _READ_KEYB_PS2_Size       EQU BYTE
2011
(1)  182/       0 : [182]                               ENDIF
2012
(1)  183/       0 : (MACRO)              SETVAR _READ_STAT_PS2,JUMP_SIZE		;чтение статуса и декодированных клавиш PS/2
2013
(1)  183/       0 : =121H               _READ_STAT_PS2            EQU INITVAR
2014
(1)  183/       0 : =>NOT BLANK                         IFNB JUMP_SIZE
2015
(1)  183/       0 : =124H               INITVAR := INITVAR+JUMP_SIZE
2016
(1)  183/       0 : =3H                 _READ_STAT_PS2_Size       EQU JUMP_SIZE
871 lvd 2017
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80(../../svn/pentevo/rom/define.a80) - page 33 - 2/23/2020 18:58:45
867 lvd 2018
 
2019
 
865 lvd 2020
(1)  183/       0 : =>FALSE                             ELSE
2021
(1)  183/       0 :                     INITVAR := INITVAR+BYTE
2022
(1)  183/       0 :                     _READ_STAT_PS2_Size       EQU BYTE
2023
(1)  183/       0 : [183]                               ENDIF
2024
(1)  184/       0 :                     
2025
(1)  185/       0 : (MACRO)              SETVAR _INIT_TABLE_MEM,JUMP_SIZE		;получение таблицы занятых/свободных страниц памяти
2026
(1)  185/       0 : =124H               _INIT_TABLE_MEM            EQU INITVAR
2027
(1)  185/       0 : =>NOT BLANK                         IFNB JUMP_SIZE
2028
(1)  185/       0 : =127H               INITVAR := INITVAR+JUMP_SIZE
2029
(1)  185/       0 : =3H                 _INIT_TABLE_MEM_Size       EQU JUMP_SIZE
2030
(1)  185/       0 : =>FALSE                             ELSE
2031
(1)  185/       0 :                     INITVAR := INITVAR+BYTE
2032
(1)  185/       0 :                     _INIT_TABLE_MEM_Size       EQU BYTE
2033
(1)  185/       0 : [185]                               ENDIF
2034
(1)  186/       0 : (MACRO)              SETVAR _GET_TABLE_MEM,JUMP_SIZE		;сброс всех занятых страницы памяти
2035
(1)  186/       0 : =127H               _GET_TABLE_MEM            EQU INITVAR
2036
(1)  186/       0 : =>NOT BLANK                         IFNB JUMP_SIZE
2037
(1)  186/       0 : =12AH               INITVAR := INITVAR+JUMP_SIZE
2038
(1)  186/       0 : =3H                 _GET_TABLE_MEM_Size       EQU JUMP_SIZE
2039
(1)  186/       0 : =>FALSE                             ELSE
2040
(1)  186/       0 :                     INITVAR := INITVAR+BYTE
2041
(1)  186/       0 :                     _GET_TABLE_MEM_Size       EQU BYTE
2042
(1)  186/       0 : [186]                               ENDIF
2043
(1)  187/       0 : (MACRO)              SETVAR _ALLOC_PAGE,JUMP_SIZE			;получение номера свободной страницы памяти
2044
(1)  187/       0 : =12AH               _ALLOC_PAGE            EQU INITVAR
2045
(1)  187/       0 : =>NOT BLANK                         IFNB JUMP_SIZE
2046
(1)  187/       0 : =12DH               INITVAR := INITVAR+JUMP_SIZE
2047
(1)  187/       0 : =3H                 _ALLOC_PAGE_Size       EQU JUMP_SIZE
2048
(1)  187/       0 : =>FALSE                             ELSE
2049
(1)  187/       0 :                     INITVAR := INITVAR+BYTE
2050
(1)  187/       0 :                     _ALLOC_PAGE_Size       EQU BYTE
2051
(1)  187/       0 : [187]                               ENDIF
2052
(1)  188/       0 : (MACRO)              SETVAR _FREE_PAGE,JUMP_SIZE			;освобождение по номеру страницы памяти
2053
(1)  188/       0 : =12DH               _FREE_PAGE            EQU INITVAR
2054
(1)  188/       0 : =>NOT BLANK                         IFNB JUMP_SIZE
2055
(1)  188/       0 : =130H               INITVAR := INITVAR+JUMP_SIZE
2056
(1)  188/       0 : =3H                 _FREE_PAGE_Size       EQU JUMP_SIZE
2057
(1)  188/       0 : =>FALSE                             ELSE
2058
(1)  188/       0 :                     INITVAR := INITVAR+BYTE
2059
(1)  188/       0 :                     _FREE_PAGE_Size       EQU BYTE
2060
(1)  188/       0 : [188]                               ENDIF
2061
(1)  189/       0 :                     
2062
       9/       0 :                     		include ../../svn/pentevo/rom/evodos_vars.a80
2063
(1)    1/       0 :                     
2064
(1)    2/       0 :                     ;LAST UPDATE: 04.08.2019 savelij
2065
(1)    3/       0 :                     
2066
(1)    4/       0 : (MACRO)              INIT_VAR ADR_RST8END-0X50
2067
(1)    4/       0 : =>NOT BLANK                         IFNB ADR_RST8END-0X50
2068
(1)    4/       0 : =3C98H              INITVAR := ADR_RST8END-0X50
2069
(1)    4/       0 : =>FALSE                             ELSE
2070
(1)    4/       0 :                     INITVAR := 0
2071
(1)    4/       0 : [4]                                 ENDIF
2072
(1)    5/       0 :                     
2073
(1)    6/       0 : (MACRO)              SETVAR IREG_E,		BYTE		;1
2074
(1)    6/       0 : =3C98H              IREG_E            EQU INITVAR
2075
(1)    6/       0 : =>NOT BLANK                         IFNB BYTE
2076
(1)    6/       0 : =3C99H              INITVAR := INITVAR+BYTE
2077
(1)    6/       0 : =1H                 IREG_E_Size       EQU BYTE
2078
(1)    6/       0 : =>FALSE                             ELSE
2079
(1)    6/       0 :                     INITVAR := INITVAR+BYTE
871 lvd 2080
 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
867 lvd 2081
 
2082
 
865 lvd 2083
(1)    6/       0 :                     IREG_E_Size       EQU BYTE
2084
(1)    6/       0 : [6]                                 ENDIF
2085
(1)    7/       0 : (MACRO)              SETVAR IREG_D,		BYTE		;1
2086
(1)    7/       0 : =3C99H              IREG_D            EQU INITVAR
2087
(1)    7/       0 : =>NOT BLANK                         IFNB BYTE
2088
(1)    7/       0 : =3C9AH              INITVAR := INITVAR+BYTE
2089
(1)    7/       0 : =1H                 IREG_D_Size       EQU BYTE
2090
(1)    7/       0 : =>FALSE                             ELSE
2091
(1)    7/       0 :                     INITVAR := INITVAR+BYTE
2092
(1)    7/       0 :                     IREG_D_Size       EQU BYTE
2093
(1)    7/       0 : [7]                                 ENDIF
2094
(1)    8/       0 : (MACRO)              SETVAR IREG_L,		BYTE		;1
2095
(1)    8/       0 : =3C9AH              IREG_L            EQU INITVAR
2096
(1)    8/       0 : =>NOT BLANK                         IFNB BYTE
2097
(1)    8/       0 : =3C9BH              INITVAR := INITVAR+BYTE
2098
(1)    8/       0 : =1H                 IREG_L_Size       EQU BYTE
2099
(1)    8/       0 : =>FALSE                             ELSE
2100
(1)    8/       0 :                     INITVAR := INITVAR+BYTE
2101
(1)    8/       0 :                     IREG_L_Size       EQU BYTE
2102
(1)    8/       0 : [8]                                 ENDIF
2103
(1)    9/       0 : (MACRO)              SETVAR IREG_H,		BYTE		;1
2104
(1)    9/       0 : =3C9BH              IREG_H            EQU INITVAR
2105
(1)    9/       0 : =>NOT BLANK                         IFNB BYTE
2106
(1)    9/       0 : =3C9CH              INITVAR := INITVAR+BYTE
2107
(1)    9/       0 : =1H                 IREG_H_Size       EQU BYTE
2108
(1)    9/       0 : =>FALSE                             ELSE
2109
(1)    9/       0 :                     INITVAR := INITVAR+BYTE
2110
(1)    9/       0 :                     IREG_H_Size       EQU BYTE
2111
(1)    9/       0 : [9]                                 ENDIF
2112
(1)   10/       0 : (MACRO)              SETVAR DOS_STEK,	WORD		;2 СОХРАНЕНИЕ ОСНОВНОГО СТЕКА И ДНО ВНУТРЕННЕГО СТЕКА
2113
(1)   10/       0 : =3C9CH              DOS_STEK            EQU INITVAR
2114
(1)   10/       0 : =>NOT BLANK                         IFNB WORD
2115
(1)   10/       0 : =3C9EH              INITVAR := INITVAR+WORD
2116
(1)   10/       0 : =2H                 DOS_STEK_Size       EQU WORD
2117
(1)   10/       0 : =>FALSE                             ELSE
2118
(1)   10/       0 :                     INITVAR := INITVAR+BYTE
2119
(1)   10/       0 :                     DOS_STEK_Size       EQU BYTE
2120
(1)   10/       0 : [10]                                ENDIF
2121
(1)   11/       0 :                     ; SETVAR BYTE_DRIVE,	BYTE		;1 ТЕКУЩЕЕ СОСТОЯНИЕ ВИРТУЛЬНОГО/ТЕКУЩЕГО/ПРИМОНТИРОВАННОГО ДИСКА
2122
(1)   12/       0 : (MACRO)              SETVAR WR_1F,		BYTE		;1 КОПИЯ ЗАПИСАННОГО В ПОРТ 1F (РЕГИСТР КОМАНД)
2123
(1)   12/       0 : =3C9EH              WR_1F            EQU INITVAR
2124
(1)   12/       0 : =>NOT BLANK                         IFNB BYTE
2125
(1)   12/       0 : =3C9FH              INITVAR := INITVAR+BYTE
2126
(1)   12/       0 : =1H                 WR_1F_Size       EQU BYTE
2127
(1)   12/       0 : =>FALSE                             ELSE
2128
(1)   12/       0 :                     INITVAR := INITVAR+BYTE
2129
(1)   12/       0 :                     WR_1F_Size       EQU BYTE
2130
(1)   12/       0 : [12]                                ENDIF
2131
(1)   13/       0 : (MACRO)              SETVAR RD_1F,		BYTE		;1 ОТВЕТ ДЛЯ ЧТЕНИЯ ИЗ ПОРТА 1F
2132
(1)   13/       0 : =3C9FH              RD_1F            EQU INITVAR
2133
(1)   13/       0 : =>NOT BLANK                         IFNB BYTE
2134
(1)   13/       0 : =3CA0H              INITVAR := INITVAR+BYTE
2135
(1)   13/       0 : =1H                 RD_1F_Size       EQU BYTE
2136
(1)   13/       0 : =>FALSE                             ELSE
2137
(1)   13/       0 :                     INITVAR := INITVAR+BYTE
2138
(1)   13/       0 :                     RD_1F_Size       EQU BYTE
2139
(1)   13/       0 : [13]                                ENDIF
2140
(1)   14/       0 : (MACRO)              SETVAR PORT_3F,	BYTE		;1 ЗНАЧЕНИЕ ПОРТА 3F
2141
(1)   14/       0 : =3CA0H              PORT_3F            EQU INITVAR
2142
(1)   14/       0 : =>NOT BLANK                         IFNB BYTE
871 lvd 2143
 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
867 lvd 2144
 
2145
 
865 lvd 2146
(1)   14/       0 : =3CA1H              INITVAR := INITVAR+BYTE
2147
(1)   14/       0 : =1H                 PORT_3F_Size       EQU BYTE
2148
(1)   14/       0 : =>FALSE                             ELSE
2149
(1)   14/       0 :                     INITVAR := INITVAR+BYTE
2150
(1)   14/       0 :                     PORT_3F_Size       EQU BYTE
2151
(1)   14/       0 : [14]                                ENDIF
2152
(1)   15/       0 : (MACRO)              SETVAR PORT_5F,	BYTE		;1 ЗНАЧЕНИЕ ПОРТА 5F
2153
(1)   15/       0 : =3CA1H              PORT_5F            EQU INITVAR
2154
(1)   15/       0 : =>NOT BLANK                         IFNB BYTE
2155
(1)   15/       0 : =3CA2H              INITVAR := INITVAR+BYTE
2156
(1)   15/       0 : =1H                 PORT_5F_Size       EQU BYTE
2157
(1)   15/       0 : =>FALSE                             ELSE
2158
(1)   15/       0 :                     INITVAR := INITVAR+BYTE
2159
(1)   15/       0 :                     PORT_5F_Size       EQU BYTE
2160
(1)   15/       0 : [15]                                ENDIF
2161
(1)   16/       0 : (MACRO)              SETVAR PORT_7F,	BYTE		;1 ЗНАЧЕНИЕ ПОРТА 7F
2162
(1)   16/       0 : =3CA2H              PORT_7F            EQU INITVAR
2163
(1)   16/       0 : =>NOT BLANK                         IFNB BYTE
2164
(1)   16/       0 : =3CA3H              INITVAR := INITVAR+BYTE
2165
(1)   16/       0 : =1H                 PORT_7F_Size       EQU BYTE
2166
(1)   16/       0 : =>FALSE                             ELSE
2167
(1)   16/       0 :                     INITVAR := INITVAR+BYTE
2168
(1)   16/       0 :                     PORT_7F_Size       EQU BYTE
2169
(1)   16/       0 : [16]                                ENDIF
2170
(1)   17/       0 : (MACRO)              SETVAR WR_FF,		BYTE		;1 КОПИЯ ЗАПИСАННОГО В ПОРТ FF
2171
(1)   17/       0 : =3CA3H              WR_FF            EQU INITVAR
2172
(1)   17/       0 : =>NOT BLANK                         IFNB BYTE
2173
(1)   17/       0 : =3CA4H              INITVAR := INITVAR+BYTE
2174
(1)   17/       0 : =1H                 WR_FF_Size       EQU BYTE
2175
(1)   17/       0 : =>FALSE                             ELSE
2176
(1)   17/       0 :                     INITVAR := INITVAR+BYTE
2177
(1)   17/       0 :                     WR_FF_Size       EQU BYTE
2178
(1)   17/       0 : [17]                                ENDIF
2179
(1)   18/       0 : (MACRO)              SETVAR RD_FF,		BYTE		;1 ОТВЕТ ДЛЯ ЧТЕНИЯ ИЗ ПОРТА FF
2180
(1)   18/       0 : =3CA4H              RD_FF            EQU INITVAR
2181
(1)   18/       0 : =>NOT BLANK                         IFNB BYTE
2182
(1)   18/       0 : =3CA5H              INITVAR := INITVAR+BYTE
2183
(1)   18/       0 : =1H                 RD_FF_Size       EQU BYTE
2184
(1)   18/       0 : =>FALSE                             ELSE
2185
(1)   18/       0 :                     INITVAR := INITVAR+BYTE
2186
(1)   18/       0 :                     RD_FF_Size       EQU BYTE
2187
(1)   18/       0 : [18]                                ENDIF
2188
(1)   19/       0 : (MACRO)              SETVAR BUFF_SECT,	WORD		;2 АДРЕС ЧТЕНИЯ/ЗАПИСИ СЕКТОРА
2189
(1)   19/       0 : =3CA5H              BUFF_SECT            EQU INITVAR
2190
(1)   19/       0 : =>NOT BLANK                         IFNB WORD
2191
(1)   19/       0 : =3CA7H              INITVAR := INITVAR+WORD
2192
(1)   19/       0 : =2H                 BUFF_SECT_Size       EQU WORD
2193
(1)   19/       0 : =>FALSE                             ELSE
2194
(1)   19/       0 :                     INITVAR := INITVAR+BYTE
2195
(1)   19/       0 :                     BUFF_SECT_Size       EQU BYTE
2196
(1)   19/       0 : [19]                                ENDIF
2197
(1)   20/       0 : (MACRO)              SETVAR ADDR_RET,	WORD		;2 АДРЕС ВОЗВРАТА
2198
(1)   20/       0 : =3CA7H              ADDR_RET            EQU INITVAR
2199
(1)   20/       0 : =>NOT BLANK                         IFNB WORD
2200
(1)   20/       0 : =3CA9H              INITVAR := INITVAR+WORD
2201
(1)   20/       0 : =2H                 ADDR_RET_Size       EQU WORD
2202
(1)   20/       0 : =>FALSE                             ELSE
2203
(1)   20/       0 :                     INITVAR := INITVAR+BYTE
2204
(1)   20/       0 :                     ADDR_RET_Size       EQU BYTE
2205
(1)   20/       0 : [20]                                ENDIF
871 lvd 2206
 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
867 lvd 2207
 
2208
 
865 lvd 2209
(1)   21/       0 : (MACRO)              SETVAR REG_IF,		BYTE		;1
2210
(1)   21/       0 : =3CA9H              REG_IF            EQU INITVAR
2211
(1)   21/       0 : =>NOT BLANK                         IFNB BYTE
2212
(1)   21/       0 : =3CAAH              INITVAR := INITVAR+BYTE
2213
(1)   21/       0 : =1H                 REG_IF_Size       EQU BYTE
2214
(1)   21/       0 : =>FALSE                             ELSE
2215
(1)   21/       0 :                     INITVAR := INITVAR+BYTE
2216
(1)   21/       0 :                     REG_IF_Size       EQU BYTE
2217
(1)   21/       0 : [21]                                ENDIF
2218
(1)   22/       0 : (MACRO)              SETVAR REG_I,		BYTE		;1
2219
(1)   22/       0 : =3CAAH              REG_I            EQU INITVAR
2220
(1)   22/       0 : =>NOT BLANK                         IFNB BYTE
2221
(1)   22/       0 : =3CABH              INITVAR := INITVAR+BYTE
2222
(1)   22/       0 : =1H                 REG_I_Size       EQU BYTE
2223
(1)   22/       0 : =>FALSE                             ELSE
2224
(1)   22/       0 :                     INITVAR := INITVAR+BYTE
2225
(1)   22/       0 :                     REG_I_Size       EQU BYTE
2226
(1)   22/       0 : [22]                                ENDIF
2227
(1)   23/       0 : (MACRO)              SETVAR REG_C,		BYTE		;1 
2228
(1)   23/       0 : =3CABH              REG_C            EQU INITVAR
2229
(1)   23/       0 : =>NOT BLANK                         IFNB BYTE
2230
(1)   23/       0 : =3CACH              INITVAR := INITVAR+BYTE
2231
(1)   23/       0 : =1H                 REG_C_Size       EQU BYTE
2232
(1)   23/       0 : =>FALSE                             ELSE
2233
(1)   23/       0 :                     INITVAR := INITVAR+BYTE
2234
(1)   23/       0 :                     REG_C_Size       EQU BYTE
2235
(1)   23/       0 : [23]                                ENDIF
2236
(1)   24/       0 : (MACRO)              SETVAR REG_B,		BYTE		;1
2237
(1)   24/       0 : =3CACH              REG_B            EQU INITVAR
2238
(1)   24/       0 : =>NOT BLANK                         IFNB BYTE
2239
(1)   24/       0 : =3CADH              INITVAR := INITVAR+BYTE
2240
(1)   24/       0 : =1H                 REG_B_Size       EQU BYTE
2241
(1)   24/       0 : =>FALSE                             ELSE
2242
(1)   24/       0 :                     INITVAR := INITVAR+BYTE
2243
(1)   24/       0 :                     REG_B_Size       EQU BYTE
2244
(1)   24/       0 : [24]                                ENDIF
2245
(1)   25/       0 : (MACRO)              SETVAR REG_F,		BYTE		;1
2246
(1)   25/       0 : =3CADH              REG_F            EQU INITVAR
2247
(1)   25/       0 : =>NOT BLANK                         IFNB BYTE
2248
(1)   25/       0 : =3CAEH              INITVAR := INITVAR+BYTE
2249
(1)   25/       0 : =1H                 REG_F_Size       EQU BYTE
2250
(1)   25/       0 : =>FALSE                             ELSE
2251
(1)   25/       0 :                     INITVAR := INITVAR+BYTE
2252
(1)   25/       0 :                     REG_F_Size       EQU BYTE
2253
(1)   25/       0 : [25]                                ENDIF
2254
(1)   26/       0 : (MACRO)              SETVAR REG_A,		BYTE		;1
2255
(1)   26/       0 : =3CAEH              REG_A            EQU INITVAR
2256
(1)   26/       0 : =>NOT BLANK                         IFNB BYTE
2257
(1)   26/       0 : =3CAFH              INITVAR := INITVAR+BYTE
2258
(1)   26/       0 : =1H                 REG_A_Size       EQU BYTE
2259
(1)   26/       0 : =>FALSE                             ELSE
2260
(1)   26/       0 :                     INITVAR := INITVAR+BYTE
2261
(1)   26/       0 :                     REG_A_Size       EQU BYTE
2262
(1)   26/       0 : [26]                                ENDIF
2263
(1)   27/       0 : (MACRO)              SETVAR REG_L,		BYTE		;1 АДРЕС ЗАГРУЗКИ/ЗАПИСИ
2264
(1)   27/       0 : =3CAFH              REG_L            EQU INITVAR
2265
(1)   27/       0 : =>NOT BLANK                         IFNB BYTE
2266
(1)   27/       0 : =3CB0H              INITVAR := INITVAR+BYTE
2267
(1)   27/       0 : =1H                 REG_L_Size       EQU BYTE
2268
(1)   27/       0 : =>FALSE                             ELSE
871 lvd 2269
 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
867 lvd 2270
 
2271
 
865 lvd 2272
(1)   27/       0 :                     INITVAR := INITVAR+BYTE
2273
(1)   27/       0 :                     REG_L_Size       EQU BYTE
2274
(1)   27/       0 : [27]                                ENDIF
2275
(1)   28/       0 : (MACRO)              SETVAR REG_H,		BYTE		;1
2276
(1)   28/       0 : =3CB0H              REG_H            EQU INITVAR
2277
(1)   28/       0 : =>NOT BLANK                         IFNB BYTE
2278
(1)   28/       0 : =3CB1H              INITVAR := INITVAR+BYTE
2279
(1)   28/       0 : =1H                 REG_H_Size       EQU BYTE
2280
(1)   28/       0 : =>FALSE                             ELSE
2281
(1)   28/       0 :                     INITVAR := INITVAR+BYTE
2282
(1)   28/       0 :                     REG_H_Size       EQU BYTE
2283
(1)   28/       0 : [28]                                ENDIF
2284
(1)   29/       0 : (MACRO)              SETVAR WR_BF,		BYTE		;1
2285
(1)   29/       0 : =3CB1H              WR_BF            EQU INITVAR
2286
(1)   29/       0 : =>NOT BLANK                         IFNB BYTE
2287
(1)   29/       0 : =3CB2H              INITVAR := INITVAR+BYTE
2288
(1)   29/       0 : =1H                 WR_BF_Size       EQU BYTE
2289
(1)   29/       0 : =>FALSE                             ELSE
2290
(1)   29/       0 :                     INITVAR := INITVAR+BYTE
2291
(1)   29/       0 :                     WR_BF_Size       EQU BYTE
2292
(1)   29/       0 : [29]                                ENDIF
2293
(1)   30/       0 : (MACRO)              SETVAR WR_77,		BYTE		;1
2294
(1)   30/       0 : =3CB2H              WR_77            EQU INITVAR
2295
(1)   30/       0 : =>NOT BLANK                         IFNB BYTE
2296
(1)   30/       0 : =3CB3H              INITVAR := INITVAR+BYTE
2297
(1)   30/       0 : =1H                 WR_77_Size       EQU BYTE
2298
(1)   30/       0 : =>FALSE                             ELSE
2299
(1)   30/       0 :                     INITVAR := INITVAR+BYTE
2300
(1)   30/       0 :                     WR_77_Size       EQU BYTE
2301
(1)   30/       0 : [30]                                ENDIF
2302
(1)   31/       0 : (MACRO)              SETVAR WR_EFF7,	BYTE		;1
2303
(1)   31/       0 : =3CB3H              WR_EFF7            EQU INITVAR
2304
(1)   31/       0 : =>NOT BLANK                         IFNB BYTE
2305
(1)   31/       0 : =3CB4H              INITVAR := INITVAR+BYTE
2306
(1)   31/       0 : =1H                 WR_EFF7_Size       EQU BYTE
2307
(1)   31/       0 : =>FALSE                             ELSE
2308
(1)   31/       0 :                     INITVAR := INITVAR+BYTE
2309
(1)   31/       0 :                     WR_EFF7_Size       EQU BYTE
2310
(1)   31/       0 : [31]                                ENDIF
2311
(1)   32/       0 : (MACRO)              SETVAR WR_7FFD,	BYTE		;1
2312
(1)   32/       0 : =3CB4H              WR_7FFD            EQU INITVAR
2313
(1)   32/       0 : =>NOT BLANK                         IFNB BYTE
2314
(1)   32/       0 : =3CB5H              INITVAR := INITVAR+BYTE
2315
(1)   32/       0 : =1H                 WR_7FFD_Size       EQU BYTE
2316
(1)   32/       0 : =>FALSE                             ELSE
2317
(1)   32/       0 :                     INITVAR := INITVAR+BYTE
2318
(1)   32/       0 :                     WR_7FFD_Size       EQU BYTE
2319
(1)   32/       0 : [32]                                ENDIF
2320
(1)   33/       0 : (MACRO)              SETVAR WR_DOS7FFD,	BYTE		;1
2321
(1)   33/       0 : =3CB5H              WR_DOS7FFD            EQU INITVAR
2322
(1)   33/       0 : =>NOT BLANK                         IFNB BYTE
2323
(1)   33/       0 : =3CB6H              INITVAR := INITVAR+BYTE
2324
(1)   33/       0 : =1H                 WR_DOS7FFD_Size       EQU BYTE
2325
(1)   33/       0 : =>FALSE                             ELSE
2326
(1)   33/       0 :                     INITVAR := INITVAR+BYTE
2327
(1)   33/       0 :                     WR_DOS7FFD_Size       EQU BYTE
2328
(1)   33/       0 : [33]                                ENDIF
2329
(1)   34/       0 : (MACRO)              SETVAR WR_RAMNROM,	BYTE		;1
2330
(1)   34/       0 : =3CB6H              WR_RAMNROM            EQU INITVAR
2331
(1)   34/       0 : =>NOT BLANK                         IFNB BYTE
871 lvd 2332
 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
867 lvd 2333
 
2334
 
865 lvd 2335
(1)   34/       0 : =3CB7H              INITVAR := INITVAR+BYTE
2336
(1)   34/       0 : =1H                 WR_RAMNROM_Size       EQU BYTE
2337
(1)   34/       0 : =>FALSE                             ELSE
2338
(1)   34/       0 :                     INITVAR := INITVAR+BYTE
2339
(1)   34/       0 :                     WR_RAMNROM_Size       EQU BYTE
2340
(1)   34/       0 : [34]                                ENDIF
2341
(1)   35/       0 : (MACRO)              SETVAR WR_1WINA3,	BYTE		;1
2342
(1)   35/       0 : =3CB7H              WR_1WINA3            EQU INITVAR
2343
(1)   35/       0 : =>NOT BLANK                         IFNB BYTE
2344
(1)   35/       0 : =3CB8H              INITVAR := INITVAR+BYTE
2345
(1)   35/       0 : =1H                 WR_1WINA3_Size       EQU BYTE
2346
(1)   35/       0 : =>FALSE                             ELSE
2347
(1)   35/       0 :                     INITVAR := INITVAR+BYTE
2348
(1)   35/       0 :                     WR_1WINA3_Size       EQU BYTE
2349
(1)   35/       0 : [35]                                ENDIF
2350
(1)   36/       0 : (MACRO)              SETVAR WR_1WINA2,	BYTE		;1
2351
(1)   36/       0 : =3CB8H              WR_1WINA2            EQU INITVAR
2352
(1)   36/       0 : =>NOT BLANK                         IFNB BYTE
2353
(1)   36/       0 : =3CB9H              INITVAR := INITVAR+BYTE
2354
(1)   36/       0 : =1H                 WR_1WINA2_Size       EQU BYTE
2355
(1)   36/       0 : =>FALSE                             ELSE
2356
(1)   36/       0 :                     INITVAR := INITVAR+BYTE
2357
(1)   36/       0 :                     WR_1WINA2_Size       EQU BYTE
2358
(1)   36/       0 : [36]                                ENDIF
2359
(1)   37/       0 : (MACRO)              SETVAR WR_1WINA1,	BYTE		;1
2360
(1)   37/       0 : =3CB9H              WR_1WINA1            EQU INITVAR
2361
(1)   37/       0 : =>NOT BLANK                         IFNB BYTE
2362
(1)   37/       0 : =3CBAH              INITVAR := INITVAR+BYTE
2363
(1)   37/       0 : =1H                 WR_1WINA1_Size       EQU BYTE
2364
(1)   37/       0 : =>FALSE                             ELSE
2365
(1)   37/       0 :                     INITVAR := INITVAR+BYTE
2366
(1)   37/       0 :                     WR_1WINA1_Size       EQU BYTE
2367
(1)   37/       0 : [37]                                ENDIF
2368
(1)   38/       0 : (MACRO)              SETVAR WR_1WINA0,	BYTE		;1
2369
(1)   38/       0 : =3CBAH              WR_1WINA0            EQU INITVAR
2370
(1)   38/       0 : =>NOT BLANK                         IFNB BYTE
2371
(1)   38/       0 : =3CBBH              INITVAR := INITVAR+BYTE
2372
(1)   38/       0 : =1H                 WR_1WINA0_Size       EQU BYTE
2373
(1)   38/       0 : =>FALSE                             ELSE
2374
(1)   38/       0 :                     INITVAR := INITVAR+BYTE
2375
(1)   38/       0 :                     WR_1WINA0_Size       EQU BYTE
2376
(1)   38/       0 : [38]                                ENDIF
2377
(1)   39/       0 : (MACRO)              SETVAR WR_0WINA3,	BYTE		;1
2378
(1)   39/       0 : =3CBBH              WR_0WINA3            EQU INITVAR
2379
(1)   39/       0 : =>NOT BLANK                         IFNB BYTE
2380
(1)   39/       0 : =3CBCH              INITVAR := INITVAR+BYTE
2381
(1)   39/       0 : =1H                 WR_0WINA3_Size       EQU BYTE
2382
(1)   39/       0 : =>FALSE                             ELSE
2383
(1)   39/       0 :                     INITVAR := INITVAR+BYTE
2384
(1)   39/       0 :                     WR_0WINA3_Size       EQU BYTE
2385
(1)   39/       0 : [39]                                ENDIF
2386
(1)   40/       0 : (MACRO)              SETVAR WR_0WINA2,	BYTE		;1
2387
(1)   40/       0 : =3CBCH              WR_0WINA2            EQU INITVAR
2388
(1)   40/       0 : =>NOT BLANK                         IFNB BYTE
2389
(1)   40/       0 : =3CBDH              INITVAR := INITVAR+BYTE
2390
(1)   40/       0 : =1H                 WR_0WINA2_Size       EQU BYTE
2391
(1)   40/       0 : =>FALSE                             ELSE
2392
(1)   40/       0 :                     INITVAR := INITVAR+BYTE
2393
(1)   40/       0 :                     WR_0WINA2_Size       EQU BYTE
2394
(1)   40/       0 : [40]                                ENDIF
871 lvd 2395
 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
867 lvd 2396
 
2397
 
865 lvd 2398
(1)   41/       0 : (MACRO)              SETVAR WR_0WINA1,	BYTE		;1
2399
(1)   41/       0 : =3CBDH              WR_0WINA1            EQU INITVAR
2400
(1)   41/       0 : =>NOT BLANK                         IFNB BYTE
2401
(1)   41/       0 : =3CBEH              INITVAR := INITVAR+BYTE
2402
(1)   41/       0 : =1H                 WR_0WINA1_Size       EQU BYTE
2403
(1)   41/       0 : =>FALSE                             ELSE
2404
(1)   41/       0 :                     INITVAR := INITVAR+BYTE
2405
(1)   41/       0 :                     WR_0WINA1_Size       EQU BYTE
2406
(1)   41/       0 : [41]                                ENDIF
2407
(1)   42/       0 : (MACRO)              SETVAR WR_0WINA0,	BYTE		;1
2408
(1)   42/       0 : =3CBEH              WR_0WINA0            EQU INITVAR
2409
(1)   42/       0 : =>NOT BLANK                         IFNB BYTE
2410
(1)   42/       0 : =3CBFH              INITVAR := INITVAR+BYTE
2411
(1)   42/       0 : =1H                 WR_0WINA0_Size       EQU BYTE
2412
(1)   42/       0 : =>FALSE                             ELSE
2413
(1)   42/       0 :                     INITVAR := INITVAR+BYTE
2414
(1)   42/       0 :                     WR_0WINA0_Size       EQU BYTE
2415
(1)   42/       0 : [42]                                ENDIF
2416
(1)   43/       0 : (MACRO)              SETVAR BB_CPU1,	BYTE		;1 БАЙТ ДЛЯ ЗАПИСИ В ОКНО CPU1
2417
(1)   43/       0 : =3CBFH              BB_CPU1            EQU INITVAR
2418
(1)   43/       0 : =>NOT BLANK                         IFNB BYTE
2419
(1)   43/       0 : =3CC0H              INITVAR := INITVAR+BYTE
2420
(1)   43/       0 : =1H                 BB_CPU1_Size       EQU BYTE
2421
(1)   43/       0 : =>FALSE                             ELSE
2422
(1)   43/       0 :                     INITVAR := INITVAR+BYTE
2423
(1)   43/       0 :                     BB_CPU1_Size       EQU BYTE
2424
(1)   43/       0 : [43]                                ENDIF
2425
(1)   44/       0 : (MACRO)              SETVAR BP_CPU1,	BYTE		;1 СТАРШИЙ БАЙТ АДРЕСА ПОРТА CPU1
2426
(1)   44/       0 : =3CC0H              BP_CPU1            EQU INITVAR
2427
(1)   44/       0 : =>NOT BLANK                         IFNB BYTE
2428
(1)   44/       0 : =3CC1H              INITVAR := INITVAR+BYTE
2429
(1)   44/       0 : =1H                 BP_CPU1_Size       EQU BYTE
2430
(1)   44/       0 : =>FALSE                             ELSE
2431
(1)   44/       0 :                     INITVAR := INITVAR+BYTE
2432
(1)   44/       0 :                     BP_CPU1_Size       EQU BYTE
2433
(1)   44/       0 : [44]                                ENDIF
2434
(1)   45/       0 : (MACRO)              SETVAR BB_CPU2,	BYTE		;1 БАЙТ ДЛЯ ЗАПИСИ В ОКНО CPU2
2435
(1)   45/       0 : =3CC1H              BB_CPU2            EQU INITVAR
2436
(1)   45/       0 : =>NOT BLANK                         IFNB BYTE
2437
(1)   45/       0 : =3CC2H              INITVAR := INITVAR+BYTE
2438
(1)   45/       0 : =1H                 BB_CPU2_Size       EQU BYTE
2439
(1)   45/       0 : =>FALSE                             ELSE
2440
(1)   45/       0 :                     INITVAR := INITVAR+BYTE
2441
(1)   45/       0 :                     BB_CPU2_Size       EQU BYTE
2442
(1)   45/       0 : [45]                                ENDIF
2443
(1)   46/       0 : (MACRO)              SETVAR BP_CPU2,	BYTE		;1 СТАРШИЙ БАЙТ АДРЕСА ПОРТА CPU2
2444
(1)   46/       0 : =3CC2H              BP_CPU2            EQU INITVAR
2445
(1)   46/       0 : =>NOT BLANK                         IFNB BYTE
2446
(1)   46/       0 : =3CC3H              INITVAR := INITVAR+BYTE
2447
(1)   46/       0 : =1H                 BP_CPU2_Size       EQU BYTE
2448
(1)   46/       0 : =>FALSE                             ELSE
2449
(1)   46/       0 :                     INITVAR := INITVAR+BYTE
2450
(1)   46/       0 :                     BP_CPU2_Size       EQU BYTE
2451
(1)   46/       0 : [46]                                ENDIF
2452
(1)   47/       0 : (MACRO)              SETVAR MINT_STACK,	WORD		;2
2453
(1)   47/       0 : =3CC3H              MINT_STACK            EQU INITVAR
2454
(1)   47/       0 : =>NOT BLANK                         IFNB WORD
2455
(1)   47/       0 : =3CC5H              INITVAR := INITVAR+WORD
2456
(1)   47/       0 : =2H                 MINT_STACK_Size       EQU WORD
2457
(1)   47/       0 : =>FALSE                             ELSE
871 lvd 2458
 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
867 lvd 2459
 
2460
 
865 lvd 2461
(1)   47/       0 :                     INITVAR := INITVAR+BYTE
2462
(1)   47/       0 :                     MINT_STACK_Size       EQU BYTE
2463
(1)   47/       0 : [47]                                ENDIF
2464
(1)   48/       0 : (MACRO)              SETVAR TEK_ROMPAGE,	BYTE		;1
2465
(1)   48/       0 : =3CC5H              TEK_ROMPAGE            EQU INITVAR
2466
(1)   48/       0 : =>NOT BLANK                         IFNB BYTE
2467
(1)   48/       0 : =3CC6H              INITVAR := INITVAR+BYTE
2468
(1)   48/       0 : =1H                 TEK_ROMPAGE_Size       EQU BYTE
2469
(1)   48/       0 : =>FALSE                             ELSE
2470
(1)   48/       0 :                     INITVAR := INITVAR+BYTE
2471
(1)   48/       0 :                     TEK_ROMPAGE_Size       EQU BYTE
2472
(1)   48/       0 : [48]                                ENDIF
2473
(1)   49/       0 : (MACRO)              SETVAR MASK_WRK_DRV,	BYTE		;1 номер дисковода в порту FF
2474
(1)   49/       0 : =3CC6H              MASK_WRK_DRV            EQU INITVAR
2475
(1)   49/       0 : =>NOT BLANK                         IFNB BYTE
2476
(1)   49/       0 : =3CC7H              INITVAR := INITVAR+BYTE
2477
(1)   49/       0 : =1H                 MASK_WRK_DRV_Size       EQU BYTE
2478
(1)   49/       0 : =>FALSE                             ELSE
2479
(1)   49/       0 :                     INITVAR := INITVAR+BYTE
2480
(1)   49/       0 :                     MASK_WRK_DRV_Size       EQU BYTE
2481
(1)   49/       0 : [49]                                ENDIF
2482
(1)   50/       0 : (MACRO)              SETVAR MASK_MNT_DRV,	BYTE		;1 битовая маска примонтированного диска
2483
(1)   50/       0 : =3CC7H              MASK_MNT_DRV            EQU INITVAR
2484
(1)   50/       0 : =>NOT BLANK                         IFNB BYTE
2485
(1)   50/       0 : =3CC8H              INITVAR := INITVAR+BYTE
2486
(1)   50/       0 : =1H                 MASK_MNT_DRV_Size       EQU BYTE
2487
(1)   50/       0 : =>FALSE                             ELSE
2488
(1)   50/       0 :                     INITVAR := INITVAR+BYTE
2489
(1)   50/       0 :                     MASK_MNT_DRV_Size       EQU BYTE
2490
(1)   50/       0 : [50]                                ENDIF
2491
(1)   51/       0 : (MACRO)              SETVAR VIRT_DRIVE,	BYTE		;1 номер виртуального диска из CMOS
2492
(1)   51/       0 : =3CC8H              VIRT_DRIVE            EQU INITVAR
2493
(1)   51/       0 : =>NOT BLANK                         IFNB BYTE
2494
(1)   51/       0 : =3CC9H              INITVAR := INITVAR+BYTE
2495
(1)   51/       0 : =1H                 VIRT_DRIVE_Size       EQU BYTE
2496
(1)   51/       0 : =>FALSE                             ELSE
2497
(1)   51/       0 :                     INITVAR := INITVAR+BYTE
2498
(1)   51/       0 :                     VIRT_DRIVE_Size       EQU BYTE
2499
(1)   51/       0 : [51]                                ENDIF
2500
(1)   52/       0 : (MACRO)              SETVAR REAL_DRIVE,	BYTE		;1 номер реального диска из CMOS
2501
(1)   52/       0 : =3CC9H              REAL_DRIVE            EQU INITVAR
2502
(1)   52/       0 : =>NOT BLANK                         IFNB BYTE
2503
(1)   52/       0 : =3CCAH              INITVAR := INITVAR+BYTE
2504
(1)   52/       0 : =1H                 REAL_DRIVE_Size       EQU BYTE
2505
(1)   52/       0 : =>FALSE                             ELSE
2506
(1)   52/       0 :                     INITVAR := INITVAR+BYTE
2507
(1)   52/       0 :                     REAL_DRIVE_Size       EQU BYTE
2508
(1)   52/       0 : [52]                                ENDIF
2509
(1)   53/       0 : (MACRO)              SETVAR COPY_VIRT_BITS,	BYTE		;1
2510
(1)   53/       0 : =3CCAH              COPY_VIRT_BITS            EQU INITVAR
2511
(1)   53/       0 : =>NOT BLANK                         IFNB BYTE
2512
(1)   53/       0 : =3CCBH              INITVAR := INITVAR+BYTE
2513
(1)   53/       0 : =1H                 COPY_VIRT_BITS_Size       EQU BYTE
2514
(1)   53/       0 : =>FALSE                             ELSE
2515
(1)   53/       0 :                     INITVAR := INITVAR+BYTE
2516
(1)   53/       0 :                     COPY_VIRT_BITS_Size       EQU BYTE
2517
(1)   53/       0 : [53]                                ENDIF
2518
(1)   54/       0 :                     ; SETVAR VIRT_REAL_DRV,	BYTE		;1
2519
(1)   55/       0 : (MACRO)              SETVAR OLD_PORT_BF,	BYTE		;1
2520
(1)   55/       0 : =3CCBH              OLD_PORT_BF            EQU INITVAR
871 lvd 2521
 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
867 lvd 2522
 
2523
 
865 lvd 2524
(1)   55/       0 : =>NOT BLANK                         IFNB BYTE
2525
(1)   55/       0 : =3CCCH              INITVAR := INITVAR+BYTE
2526
(1)   55/       0 : =1H                 OLD_PORT_BF_Size       EQU BYTE
2527
(1)   55/       0 : =>FALSE                             ELSE
2528
(1)   55/       0 :                     INITVAR := INITVAR+BYTE
2529
(1)   55/       0 :                     OLD_PORT_BF_Size       EQU BYTE
2530
(1)   55/       0 : [55]                                ENDIF
2531
(1)   56/       0 : (MACRO)              SETVAR SECTOR_SIZE,	BYTE		;1
2532
(1)   56/       0 : =3CCCH              SECTOR_SIZE            EQU INITVAR
2533
(1)   56/       0 : =>NOT BLANK                         IFNB BYTE
2534
(1)   56/       0 : =3CCDH              INITVAR := INITVAR+BYTE
2535
(1)   56/       0 : =1H                 SECTOR_SIZE_Size       EQU BYTE
2536
(1)   56/       0 : =>FALSE                             ELSE
2537
(1)   56/       0 :                     INITVAR := INITVAR+BYTE
2538
(1)   56/       0 :                     SECTOR_SIZE_Size       EQU BYTE
2539
(1)   56/       0 : [56]                                ENDIF
2540
(1)   57/       0 : (MACRO)              SETVAR RDWR_MODE,	BYTE		;1
2541
(1)   57/       0 : =3CCDH              RDWR_MODE            EQU INITVAR
2542
(1)   57/       0 : =>NOT BLANK                         IFNB BYTE
2543
(1)   57/       0 : =3CCEH              INITVAR := INITVAR+BYTE
2544
(1)   57/       0 : =1H                 RDWR_MODE_Size       EQU BYTE
2545
(1)   57/       0 : =>FALSE                             ELSE
2546
(1)   57/       0 :                     INITVAR := INITVAR+BYTE
2547
(1)   57/       0 :                     RDWR_MODE_Size       EQU BYTE
2548
(1)   57/       0 : [57]                                ENDIF
2549
(1)   58/       0 : (MACRO)              SETVAR RDWR_PAGE,	BYTE		;1
2550
(1)   58/       0 : =3CCEH              RDWR_PAGE            EQU INITVAR
2551
(1)   58/       0 : =>NOT BLANK                         IFNB BYTE
2552
(1)   58/       0 : =3CCFH              INITVAR := INITVAR+BYTE
2553
(1)   58/       0 : =1H                 RDWR_PAGE_Size       EQU BYTE
2554
(1)   58/       0 : =>FALSE                             ELSE
2555
(1)   58/       0 :                     INITVAR := INITVAR+BYTE
2556
(1)   58/       0 :                     RDWR_PAGE_Size       EQU BYTE
2557
(1)   58/       0 : [58]                                ENDIF
2558
(1)   59/       0 : (MACRO)              SETVAR FLAG_RW_BREAK,	BYTE		;1
2559
(1)   59/       0 : =3CCFH              FLAG_RW_BREAK            EQU INITVAR
2560
(1)   59/       0 : =>NOT BLANK                         IFNB BYTE
2561
(1)   59/       0 : =3CD0H              INITVAR := INITVAR+BYTE
2562
(1)   59/       0 : =1H                 FLAG_RW_BREAK_Size       EQU BYTE
2563
(1)   59/       0 : =>FALSE                             ELSE
2564
(1)   59/       0 :                     INITVAR := INITVAR+BYTE
2565
(1)   59/       0 :                     FLAG_RW_BREAK_Size       EQU BYTE
2566
(1)   59/       0 : [59]                                ENDIF
2567
(1)   60/       0 : (MACRO)              SETVAR TEMP_SP,	WORD		;2
2568
(1)   60/       0 : =3CD0H              TEMP_SP            EQU INITVAR
2569
(1)   60/       0 : =>NOT BLANK                         IFNB WORD
2570
(1)   60/       0 : =3CD2H              INITVAR := INITVAR+WORD
2571
(1)   60/       0 : =2H                 TEMP_SP_Size       EQU WORD
2572
(1)   60/       0 : =>FALSE                             ELSE
2573
(1)   60/       0 :                     INITVAR := INITVAR+BYTE
2574
(1)   60/       0 :                     TEMP_SP_Size       EQU BYTE
2575
(1)   60/       0 : [60]                                ENDIF
2576
(1)   61/       0 : (MACRO)              SETVAR SAVED_RAM,	0X10		;10
2577
(1)   61/       0 : =3CD2H              SAVED_RAM            EQU INITVAR
2578
(1)   61/       0 : =>NOT BLANK                         IFNB 0X10
2579
(1)   61/       0 : =3CE2H              INITVAR := INITVAR+0X10
2580
(1)   61/       0 : =10H                SAVED_RAM_Size       EQU 0X10
2581
(1)   61/       0 : =>FALSE                             ELSE
2582
(1)   61/       0 :                     INITVAR := INITVAR+BYTE
2583
(1)   61/       0 :                     SAVED_RAM_Size       EQU BYTE
871 lvd 2584
 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
867 lvd 2585
 
2586
 
865 lvd 2587
(1)   61/       0 : [61]                                ENDIF
2588
(1)   62/       0 :                     END_VARS
2589
(1)   63/       0 :                     
2590
      10/       0 :                     		include define.a80
2591
(1)    1/       0 :                     
2592
(1)    2/       0 :                     ;LAST UPDATE: 13.02.2020 savelij
2593
(1)    3/       0 :                     
2594
(1)    4/       0 : =13BDH              BD_FDD_MASK	EQU 0X13BD
2595
(1)    5/       0 :                     
2596
      11/       0 :                     
2597
      12/       0 : =DFFH               STACK		EQU 0X0DFF
2598
      13/       0 :                     
2599
      14/       0 : =DFBH               OLD_IF		EQU STACK-WORD*2
2600
      15/       0 : =DFDH               OLD_AF		EQU STACK-WORD
2601
      16/       0 :                     
2602
      17/       0 :                     ;команда выхода и переход на обработчик
2603
      18/       0 :                     JP_EMU		MACRO ADDRESS
2604
      19/       0 :                     		DUPL ADDRESS-$,0;XFF
2605
      20/       0 :                     		NOP
2606
      21/       0 :                     		NOP
2607
      22/       0 :                     		OUT (EXIT_PORT),A
871 lvd 2608
      23/       0 :                     		ENDM
2609
      24/       0 :                     
2610
      25/       0 :                     DJP_EMU		MACRO ADDRESS
2611
      26/       0 :                     		DUPL ADDRESS-$,0;XFF
2612
      27/       0 :                     		NOP
2613
      28/       0 :                     		NOP
2614
      29/       0 :                     		DI
2615
      30/       0 :                     		HALT
2616
      31/       0 :                     		ENDM
2617
      32/       0 :                     
2618
      33/       0 :                     ;генерация адресов для таблицы
2619
      34/       0 :                     LABEL_GEN	MACRO ADDRESS
2620
      35/       0 :                     _ADDRESS	EQU ($-TABLE_VIRT)/4
2621
      36/       0 :                     		DW ADDRESS,ADR_ADDRESS.WORK
2622
      37/       0 :                     		ENDM
865 lvd 2623
      38/       0 :                     
871 lvd 2624
      39/       0 :                     ;переход на обработчик с кодом адреса
2625
      40/       0 :                     EMU_JUMP	MACRO ADDRESS
2626
      41/       0 :                     ADR_ADDRESS	EQU $
2627
      42/       0 :                     		LD (OLD_AF+1),A
2628
      43/       0 :                     		LD A,_ADDRESS
2629
      44/       0 :                     		JP WORKER
2630
      45/       0 :                     
2631
      46/       0 :                     .WORK		EQU $
2632
      47/       0 :                     		ENDM
2633
      48/       0 :                     
2634
      49/       0 :                     		ORG 0
2635
      50/       0 : C3 02 03            		JP START_TEST
2636
      51/       3 :                     
2637
      52/       3 : (MACRO)             		DUPL 0X0038-$,0;XFF
2638
      52/       3 :                     DUPL:
2639
      52/       3 : =0H                 $$N             EQU (0X0038-$) / 1024
2640
      52/       3 : =35H                $$M             EQU (0X0038-$) # 1024
2641
      52/       3 :                                     REPT $$N
2642
      52/       3 :                                     DB 1024 DUP(0)
2643
      52/       3 :                                     ENDM
2644
      52/       3 : =>TRUE                              IF $$M <> 0
2645
      52/       3 : =>NOT BLANK                         IFB 0
2646
      52/       3 :                                     DB $$M DUP(0)
2647
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 43 - 2/23/2020 18:58:45
2648
 
2649
 
2650
      52/       3 : =>TRUE                              ELSE
2651
      52/       3 : 00 00 00 00 00 00                   DB $$M DUP(0)
865 lvd 2652
                    00 00 00 00 00 00 
2653
                    00 00 00 00 00 00 
2654
                    00 00 00 00 00 00 
2655
                    00 00 00 00 00 00 
2656
                    00 00 00 00 00 00 
2657
                    00 00 00 00 00 00 
2658
                    00 00 00 00 00 00 
2659
                    00 00 00 00 00 
871 lvd 2660
      52/      38 : [52]                                ENDIF
2661
      52/      38 : [52]                                ENDIF
2662
      53/      38 : FB                  		EI
2663
      54/      39 : C9                  		RET
2664
      55/      3A :                     
2665
      56/      3A : (MACRO)             		DUPL 0X006F-$,0;XFF
2666
      56/      3A :                     DUPL:
2667
      56/      3A : =0H                 $$N             EQU (0X006F-$) / 1024
2668
      56/      3A : =35H                $$M             EQU (0X006F-$) # 1024
2669
      56/      3A :                                     REPT $$N
2670
      56/      3A :                                     DB 1024 DUP(0)
2671
      56/      3A :                                     ENDM
2672
      56/      3A : =>TRUE                              IF $$M <> 0
2673
      56/      3A : =>NOT BLANK                         IFB 0
2674
      56/      3A :                                     DB $$M DUP(0)
2675
      56/      3A : =>TRUE                              ELSE
2676
      56/      3A : 00 00 00 00 00 00                   DB $$M DUP(0)
865 lvd 2677
                    00 00 00 00 00 00 
2678
                    00 00 00 00 00 00 
2679
                    00 00 00 00 00 00 
2680
                    00 00 00 00 00 00 
2681
                    00 00 00 00 00 00 
2682
                    00 00 00 00 00 00 
2683
                    00 00 00 00 00 00 
2684
                    00 00 00 00 00 
871 lvd 2685
      56/      6F : [56]                                ENDIF
2686
      56/      6F : [56]                                ENDIF
2687
      57/      6F : E9                  		JP (HL)
2688
      58/      70 :                     
2689
      59/      70 :                     ;		JP_EMU 0X02BE			; OUT	   (0XFF), A
2690
      60/      70 :                     
2691
      61/      70 : (MACRO)             		DUPL 0X302-$
2692
      61/      70 :                     DUPL:
2693
      61/      70 : =0H                 $$N             EQU (0X302-$) / 1024
2694
      61/      70 : =292H               $$M             EQU (0X302-$) # 1024
2695
      61/      70 :                                     REPT $$N
2696
      61/      70 :                                     DB 1024 DUP()
2697
      61/      70 :                                     ENDM
2698
      61/      70 : =>TRUE                              IF $$M <> 0
2699
      61/      70 : =>BLANK                             IFB 
2700
      61/      70 : 00 00 00 00 00 00                   DB $$M DUP(0)
865 lvd 2701
                    00 00 00 00 00 00 
2702
                    00 00 00 00 00 00 
2703
                    00 00 00 00 00 00 
2704
                    00 00 00 00 00 00 
2705
                    00 00 00 00 00 00 
2706
                    00 00 00 00 00 00 
2707
                    00 00 00 00 00 00 
2708
                    00 00 00 00 00 00 
2709
                    00 00 00 00 00 00 
871 lvd 2710
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 44 - 2/23/2020 18:58:45
2711
 
2712
 
865 lvd 2713
                    00 00 00 00 00 00 
2714
                    00 00 00 00 00 00 
2715
                    00 00 00 00 00 00 
2716
                    00 00 00 00 00 00 
2717
                    00 00 00 00 00 00 
2718
                    00 00 00 00 00 00 
2719
                    00 00 00 00 00 00 
2720
                    00 00 00 00 00 00 
2721
                    00 00 00 00 00 00 
2722
                    00 00 00 00 00 00 
2723
                    00 00 00 00 00 00 
2724
                    00 00 00 00 00 00 
2725
                    00 00 00 00 00 00 
2726
                    00 00 00 00 00 00 
2727
                    00 00 00 00 00 00 
2728
                    00 00 00 00 00 00 
2729
                    00 00 00 00 00 00 
2730
                    00 00 00 00 00 00 
2731
                    00 00 00 00 00 00 
2732
                    00 00 00 00 00 00 
2733
                    00 00 00 00 00 00 
2734
                    00 00 00 00 00 00 
2735
                    00 00 00 00 00 00 
2736
                    00 00 00 00 00 00 
2737
                    00 00 00 00 00 00 
2738
                    00 00 00 00 00 00 
2739
                    00 00 00 00 00 00 
2740
                    00 00 00 00 00 00 
2741
                    00 00 00 00 00 00 
2742
                    00 00 00 00 00 00 
2743
                    00 00 00 00 00 00 
2744
                    00 00 00 00 00 00 
2745
                    00 00 00 00 00 00 
2746
                    00 00 00 00 00 00 
2747
                    00 00 00 00 00 00 
2748
                    00 00 00 00 00 00 
2749
                    00 00 00 00 00 00 
2750
                    00 00 00 00 00 00 
2751
                    00 00 00 00 00 00 
2752
                    00 00 00 00 00 00 
2753
                    00 00 00 00 00 00 
2754
                    00 00 00 00 00 00 
2755
                    00 00 00 00 00 00 
2756
                    00 00 00 00 00 00 
2757
                    00 00 00 00 00 00 
2758
                    00 00 00 00 00 00 
2759
                    00 00 00 00 00 00 
2760
                    00 00 00 00 00 00 
2761
                    00 00 00 00 00 00 
2762
                    00 00 00 00 00 00 
2763
                    00 00 00 00 00 00 
2764
                    00 00 00 00 00 00 
2765
                    00 00 00 00 00 00 
2766
                    00 00 00 00 00 00 
2767
                    00 00 00 00 00 00 
2768
                    00 00 00 00 00 00 
2769
                    00 00 00 00 00 00 
2770
                    00 00 00 00 00 00 
2771
                    00 00 00 00 00 00 
2772
                    00 00 00 00 00 00 
871 lvd 2773
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 45 - 2/23/2020 18:58:45
2774
 
2775
 
865 lvd 2776
                    00 00 00 00 00 00 
2777
                    00 00 00 00 00 00 
2778
                    00 00 00 00 00 00 
2779
                    00 00 00 00 00 00 
2780
                    00 00 00 00 00 00 
2781
                    00 00 00 00 00 00 
2782
                    00 00 00 00 00 00 
2783
                    00 00 00 00 00 00 
2784
                    00 00 00 00 00 00 
2785
                    00 00 00 00 00 00 
2786
                    00 00 00 00 00 00 
2787
                    00 00 00 00 00 00 
2788
                    00 00 00 00 00 00 
2789
                    00 00 00 00 00 00 
2790
                    00 00 00 00 00 00 
2791
                    00 00 00 00 00 00 
2792
                    00 00 00 00 00 00 
2793
                    00 00 00 00 00 00 
2794
                    00 00 00 00 00 00 
2795
                    00 00 00 00 00 00 
2796
                    00 00 00 00 00 00 
2797
                    00 00 00 00 00 00 
2798
                    00 00 00 00 00 00 
2799
                    00 00 00 00 00 00 
2800
                    00 00 00 00 00 00 
2801
                    00 00 00 00 00 00 
2802
                    00 00 00 00 00 00 
2803
                    00 00 00 00 00 00 
2804
                    00 00 00 00 00 00 
2805
                    00 00 00 00 00 00 
2806
                    00 00 00 00 00 00 
2807
                    00 00 00 00 00 00 
2808
                    00 00 00 00 00 00 
2809
                    00 00 00 00 00 00 
2810
                    00 00 00 00 00 00 
2811
                    00 00 00 00 00 00 
2812
                    00 00 00 00 00 00 
867 lvd 2813
                    00 00 00 00 00 00 
2814
                    00 00 00 00 00 00 
865 lvd 2815
                    00 00 00 00 
871 lvd 2816
      61/     302 : =>FALSE                             ELSE
2817
      61/     302 :                                     DB $$M DUP()
2818
      61/     302 : [61]                                ENDIF
2819
      61/     302 : [61]                                ENDIF
2820
      62/     302 : (MACRO)             START_TEST	JP_EMU 0X0302
2821
      62/     302 :  (MACRO-2)                          DUPL 0X0302-$,0;XFF
2822
      62/     302 :                     DUPL:
2823
      62/     302 : =0H                 $$N             EQU (0X0302-$) / 1024
2824
      62/     302 : =0H                 $$M             EQU (0X0302-$) # 1024
2825
      62/     302 :                                     REPT $$N
2826
      62/     302 :                                     DB 1024 DUP(0)
2827
      62/     302 :                                     ENDM
2828
      62/     302 : =>FALSE                             IF $$M <> 0
2829
      62/     302 :                                     IFB 0
2830
      62/     302 :                                     DB $$M DUP(0)
2831
      62/     302 :                                     ELSE
2832
      62/     302 :                                     DB $$M DUP(0)
2833
      62/     302 : [62]                                ENDIF
2834
      62/     302 : [62]                                ENDIF
2835
      62/     302 : 00                                  NOP
2836
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 46 - 2/23/2020 18:58:45
867 lvd 2837
 
2838
 
871 lvd 2839
      62/     303 : 00                                  NOP
2840
      62/     304 : D3 BE                               OUT (EXIT_PORT),A
2841
      63/     306 : (MACRO)             		JP_EMU 0X030A
2842
      63/     306 :  (MACRO-2)                          DUPL 0X030A-$,0;XFF
2843
      63/     306 :                     DUPL:
2844
      63/     306 : =0H                 $$N             EQU (0X030A-$) / 1024
2845
      63/     306 : =4H                 $$M             EQU (0X030A-$) # 1024
2846
      63/     306 :                                     REPT $$N
2847
      63/     306 :                                     DB 1024 DUP(0)
2848
      63/     306 :                                     ENDM
2849
      63/     306 : =>TRUE                              IF $$M <> 0
2850
      63/     306 : =>NOT BLANK                         IFB 0
2851
      63/     306 :                                     DB $$M DUP(0)
2852
      63/     306 : =>TRUE                              ELSE
2853
      63/     306 : 00 00 00 00                         DB $$M DUP(0)
2854
      63/     30A : [63]                                ENDIF
2855
      63/     30A : [63]                                ENDIF
2856
      63/     30A : 00                                  NOP
2857
      63/     30B : 00                                  NOP
2858
      63/     30C : D3 BE                               OUT (EXIT_PORT),A
2859
      64/     30E : (MACRO)             		JP_EMU 0X0312
2860
      64/     30E :  (MACRO-2)                          DUPL 0X0312-$,0;XFF
2861
      64/     30E :                     DUPL:
2862
      64/     30E : =0H                 $$N             EQU (0X0312-$) / 1024
2863
      64/     30E : =4H                 $$M             EQU (0X0312-$) # 1024
2864
      64/     30E :                                     REPT $$N
2865
      64/     30E :                                     DB 1024 DUP(0)
2866
      64/     30E :                                     ENDM
2867
      64/     30E : =>TRUE                              IF $$M <> 0
2868
      64/     30E : =>NOT BLANK                         IFB 0
2869
      64/     30E :                                     DB $$M DUP(0)
2870
      64/     30E : =>TRUE                              ELSE
2871
      64/     30E : 00 00 00 00                         DB $$M DUP(0)
2872
      64/     312 : [64]                                ENDIF
2873
      64/     312 : [64]                                ENDIF
2874
      64/     312 : 00                                  NOP
2875
      64/     313 : 00                                  NOP
2876
      64/     314 : D3 BE                               OUT (EXIT_PORT),A
2877
      65/     316 : (MACRO)             		JP_EMU 0X031A
2878
      65/     316 :  (MACRO-2)                          DUPL 0X031A-$,0;XFF
2879
      65/     316 :                     DUPL:
2880
      65/     316 : =0H                 $$N             EQU (0X031A-$) / 1024
2881
      65/     316 : =4H                 $$M             EQU (0X031A-$) # 1024
2882
      65/     316 :                                     REPT $$N
2883
      65/     316 :                                     DB 1024 DUP(0)
2884
      65/     316 :                                     ENDM
2885
      65/     316 : =>TRUE                              IF $$M <> 0
2886
      65/     316 : =>NOT BLANK                         IFB 0
2887
      65/     316 :                                     DB $$M DUP(0)
2888
      65/     316 : =>TRUE                              ELSE
2889
      65/     316 : 00 00 00 00                         DB $$M DUP(0)
2890
      65/     31A : [65]                                ENDIF
2891
      65/     31A : [65]                                ENDIF
2892
      65/     31A : 00                                  NOP
2893
      65/     31B : 00                                  NOP
2894
      65/     31C : D3 BE                               OUT (EXIT_PORT),A
2895
      66/     31E : (MACRO)             		JP_EMU 0X0322
2896
      66/     31E :  (MACRO-2)                          DUPL 0X0322-$,0;XFF
2897
      66/     31E :                     DUPL:
2898
      66/     31E : =0H                 $$N             EQU (0X0322-$) / 1024
2899
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 47 - 2/23/2020 18:58:45
867 lvd 2900
 
2901
 
871 lvd 2902
      66/     31E : =4H                 $$M             EQU (0X0322-$) # 1024
2903
      66/     31E :                                     REPT $$N
2904
      66/     31E :                                     DB 1024 DUP(0)
2905
      66/     31E :                                     ENDM
2906
      66/     31E : =>TRUE                              IF $$M <> 0
2907
      66/     31E : =>NOT BLANK                         IFB 0
2908
      66/     31E :                                     DB $$M DUP(0)
2909
      66/     31E : =>TRUE                              ELSE
2910
      66/     31E : 00 00 00 00                         DB $$M DUP(0)
2911
      66/     322 : [66]                                ENDIF
2912
      66/     322 : [66]                                ENDIF
2913
      66/     322 : 00                                  NOP
2914
      66/     323 : 00                                  NOP
2915
      66/     324 : D3 BE                               OUT (EXIT_PORT),A
2916
      67/     326 : (MACRO)             		JP_EMU 0X032A
2917
      67/     326 :  (MACRO-2)                          DUPL 0X032A-$,0;XFF
2918
      67/     326 :                     DUPL:
2919
      67/     326 : =0H                 $$N             EQU (0X032A-$) / 1024
2920
      67/     326 : =4H                 $$M             EQU (0X032A-$) # 1024
2921
      67/     326 :                                     REPT $$N
2922
      67/     326 :                                     DB 1024 DUP(0)
2923
      67/     326 :                                     ENDM
2924
      67/     326 : =>TRUE                              IF $$M <> 0
2925
      67/     326 : =>NOT BLANK                         IFB 0
2926
      67/     326 :                                     DB $$M DUP(0)
2927
      67/     326 : =>TRUE                              ELSE
2928
      67/     326 : 00 00 00 00                         DB $$M DUP(0)
2929
      67/     32A : [67]                                ENDIF
2930
      67/     32A : [67]                                ENDIF
2931
      67/     32A : 00                                  NOP
2932
      67/     32B : 00                                  NOP
2933
      67/     32C : D3 BE                               OUT (EXIT_PORT),A
2934
      68/     32E : (MACRO)             		JP_EMU 0X0332
2935
      68/     32E :  (MACRO-2)                          DUPL 0X0332-$,0;XFF
2936
      68/     32E :                     DUPL:
2937
      68/     32E : =0H                 $$N             EQU (0X0332-$) / 1024
2938
      68/     32E : =4H                 $$M             EQU (0X0332-$) # 1024
2939
      68/     32E :                                     REPT $$N
2940
      68/     32E :                                     DB 1024 DUP(0)
2941
      68/     32E :                                     ENDM
2942
      68/     32E : =>TRUE                              IF $$M <> 0
2943
      68/     32E : =>NOT BLANK                         IFB 0
2944
      68/     32E :                                     DB $$M DUP(0)
2945
      68/     32E : =>TRUE                              ELSE
2946
      68/     32E : 00 00 00 00                         DB $$M DUP(0)
2947
      68/     332 : [68]                                ENDIF
2948
      68/     332 : [68]                                ENDIF
2949
      68/     332 : 00                                  NOP
2950
      68/     333 : 00                                  NOP
2951
      68/     334 : D3 BE                               OUT (EXIT_PORT),A
2952
      69/     336 : (MACRO)             		JP_EMU 0X033A
2953
      69/     336 :  (MACRO-2)                          DUPL 0X033A-$,0;XFF
2954
      69/     336 :                     DUPL:
2955
      69/     336 : =0H                 $$N             EQU (0X033A-$) / 1024
2956
      69/     336 : =4H                 $$M             EQU (0X033A-$) # 1024
2957
      69/     336 :                                     REPT $$N
2958
      69/     336 :                                     DB 1024 DUP(0)
2959
      69/     336 :                                     ENDM
2960
      69/     336 : =>TRUE                              IF $$M <> 0
2961
      69/     336 : =>NOT BLANK                         IFB 0
2962
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 48 - 2/23/2020 18:58:45
867 lvd 2963
 
2964
 
871 lvd 2965
      69/     336 :                                     DB $$M DUP(0)
2966
      69/     336 : =>TRUE                              ELSE
2967
      69/     336 : 00 00 00 00                         DB $$M DUP(0)
2968
      69/     33A : [69]                                ENDIF
2969
      69/     33A : [69]                                ENDIF
2970
      69/     33A : 00                                  NOP
2971
      69/     33B : 00                                  NOP
2972
      69/     33C : D3 BE                               OUT (EXIT_PORT),A
2973
      70/     33E : (MACRO)             		JP_EMU 0X0342
2974
      70/     33E :  (MACRO-2)                          DUPL 0X0342-$,0;XFF
2975
      70/     33E :                     DUPL:
2976
      70/     33E : =0H                 $$N             EQU (0X0342-$) / 1024
2977
      70/     33E : =4H                 $$M             EQU (0X0342-$) # 1024
2978
      70/     33E :                                     REPT $$N
2979
      70/     33E :                                     DB 1024 DUP(0)
2980
      70/     33E :                                     ENDM
2981
      70/     33E : =>TRUE                              IF $$M <> 0
2982
      70/     33E : =>NOT BLANK                         IFB 0
2983
      70/     33E :                                     DB $$M DUP(0)
2984
      70/     33E : =>TRUE                              ELSE
2985
      70/     33E : 00 00 00 00                         DB $$M DUP(0)
2986
      70/     342 : [70]                                ENDIF
2987
      70/     342 : [70]                                ENDIF
2988
      70/     342 : 00                                  NOP
2989
      70/     343 : 00                                  NOP
2990
      70/     344 : D3 BE                               OUT (EXIT_PORT),A
2991
      71/     346 : (MACRO)             		JP_EMU 0X034A
2992
      71/     346 :  (MACRO-2)                          DUPL 0X034A-$,0;XFF
2993
      71/     346 :                     DUPL:
2994
      71/     346 : =0H                 $$N             EQU (0X034A-$) / 1024
2995
      71/     346 : =4H                 $$M             EQU (0X034A-$) # 1024
2996
      71/     346 :                                     REPT $$N
2997
      71/     346 :                                     DB 1024 DUP(0)
2998
      71/     346 :                                     ENDM
2999
      71/     346 : =>TRUE                              IF $$M <> 0
3000
      71/     346 : =>NOT BLANK                         IFB 0
3001
      71/     346 :                                     DB $$M DUP(0)
3002
      71/     346 : =>TRUE                              ELSE
3003
      71/     346 : 00 00 00 00                         DB $$M DUP(0)
3004
      71/     34A : [71]                                ENDIF
3005
      71/     34A : [71]                                ENDIF
3006
      71/     34A : 00                                  NOP
3007
      71/     34B : 00                                  NOP
3008
      71/     34C : D3 BE                               OUT (EXIT_PORT),A
3009
      72/     34E : (MACRO)             		JP_EMU 0X0355
3010
      72/     34E :  (MACRO-2)                          DUPL 0X0355-$,0;XFF
3011
      72/     34E :                     DUPL:
3012
      72/     34E : =0H                 $$N             EQU (0X0355-$) / 1024
3013
      72/     34E : =7H                 $$M             EQU (0X0355-$) # 1024
3014
      72/     34E :                                     REPT $$N
3015
      72/     34E :                                     DB 1024 DUP(0)
3016
      72/     34E :                                     ENDM
3017
      72/     34E : =>TRUE                              IF $$M <> 0
3018
      72/     34E : =>NOT BLANK                         IFB 0
3019
      72/     34E :                                     DB $$M DUP(0)
3020
      72/     34E : =>TRUE                              ELSE
3021
      72/     34E : 00 00 00 00 00 00                   DB $$M DUP(0)
3022
                    00 
3023
      72/     355 : [72]                                ENDIF
3024
      72/     355 : [72]                                ENDIF
3025
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 49 - 2/23/2020 18:58:45
865 lvd 3026
 
3027
 
871 lvd 3028
      72/     355 : 00                                  NOP
3029
      72/     356 : 00                                  NOP
3030
      72/     357 : D3 BE                               OUT (EXIT_PORT),A
3031
      73/     359 : (MACRO)             		JP_EMU 0X035D
3032
      73/     359 :  (MACRO-2)                          DUPL 0X035D-$,0;XFF
3033
      73/     359 :                     DUPL:
3034
      73/     359 : =0H                 $$N             EQU (0X035D-$) / 1024
3035
      73/     359 : =4H                 $$M             EQU (0X035D-$) # 1024
3036
      73/     359 :                                     REPT $$N
3037
      73/     359 :                                     DB 1024 DUP(0)
3038
      73/     359 :                                     ENDM
3039
      73/     359 : =>TRUE                              IF $$M <> 0
3040
      73/     359 : =>NOT BLANK                         IFB 0
3041
      73/     359 :                                     DB $$M DUP(0)
3042
      73/     359 : =>TRUE                              ELSE
3043
      73/     359 : 00 00 00 00                         DB $$M DUP(0)
3044
      73/     35D : [73]                                ENDIF
3045
      73/     35D : [73]                                ENDIF
3046
      73/     35D : 00                                  NOP
3047
      73/     35E : 00                                  NOP
3048
      73/     35F : D3 BE                               OUT (EXIT_PORT),A
3049
      74/     361 : (MACRO)             		JP_EMU 0X0367
3050
      74/     361 :  (MACRO-2)                          DUPL 0X0367-$,0;XFF
3051
      74/     361 :                     DUPL:
3052
      74/     361 : =0H                 $$N             EQU (0X0367-$) / 1024
3053
      74/     361 : =6H                 $$M             EQU (0X0367-$) # 1024
3054
      74/     361 :                                     REPT $$N
3055
      74/     361 :                                     DB 1024 DUP(0)
3056
      74/     361 :                                     ENDM
3057
      74/     361 : =>TRUE                              IF $$M <> 0
3058
      74/     361 : =>NOT BLANK                         IFB 0
3059
      74/     361 :                                     DB $$M DUP(0)
3060
      74/     361 : =>TRUE                              ELSE
3061
      74/     361 : 00 00 00 00 00 00                   DB $$M DUP(0)
3062
      74/     367 : [74]                                ENDIF
3063
      74/     367 : [74]                                ENDIF
3064
      74/     367 : 00                                  NOP
3065
      74/     368 : 00                                  NOP
3066
      74/     369 : D3 BE                               OUT (EXIT_PORT),A
3067
      75/     36B : (MACRO)             		JP_EMU 0X0371
3068
      75/     36B :  (MACRO-2)                          DUPL 0X0371-$,0;XFF
3069
      75/     36B :                     DUPL:
3070
      75/     36B : =0H                 $$N             EQU (0X0371-$) / 1024
3071
      75/     36B : =6H                 $$M             EQU (0X0371-$) # 1024
3072
      75/     36B :                                     REPT $$N
3073
      75/     36B :                                     DB 1024 DUP(0)
3074
      75/     36B :                                     ENDM
3075
      75/     36B : =>TRUE                              IF $$M <> 0
3076
      75/     36B : =>NOT BLANK                         IFB 0
3077
      75/     36B :                                     DB $$M DUP(0)
3078
      75/     36B : =>TRUE                              ELSE
3079
      75/     36B : 00 00 00 00 00 00                   DB $$M DUP(0)
3080
      75/     371 : [75]                                ENDIF
3081
      75/     371 : [75]                                ENDIF
3082
      75/     371 : 00                                  NOP
3083
      75/     372 : 00                                  NOP
3084
      75/     373 : D3 BE                               OUT (EXIT_PORT),A
3085
      76/     375 : (MACRO)             		JP_EMU 0X037B
3086
      76/     375 :  (MACRO-2)                          DUPL 0X037B-$,0;XFF
3087
      76/     375 :                     DUPL:
3088
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 50 - 2/23/2020 18:58:45
867 lvd 3089
 
3090
 
871 lvd 3091
      76/     375 : =0H                 $$N             EQU (0X037B-$) / 1024
3092
      76/     375 : =6H                 $$M             EQU (0X037B-$) # 1024
3093
      76/     375 :                                     REPT $$N
3094
      76/     375 :                                     DB 1024 DUP(0)
3095
      76/     375 :                                     ENDM
3096
      76/     375 : =>TRUE                              IF $$M <> 0
3097
      76/     375 : =>NOT BLANK                         IFB 0
3098
      76/     375 :                                     DB $$M DUP(0)
3099
      76/     375 : =>TRUE                              ELSE
3100
      76/     375 : 00 00 00 00 00 00                   DB $$M DUP(0)
3101
      76/     37B : [76]                                ENDIF
3102
      76/     37B : [76]                                ENDIF
3103
      76/     37B : 00                                  NOP
3104
      76/     37C : 00                                  NOP
3105
      76/     37D : D3 BE                               OUT (EXIT_PORT),A
3106
      77/     37F : (MACRO)             		JP_EMU 0X0383
3107
      77/     37F :  (MACRO-2)                          DUPL 0X0383-$,0;XFF
3108
      77/     37F :                     DUPL:
3109
      77/     37F : =0H                 $$N             EQU (0X0383-$) / 1024
3110
      77/     37F : =4H                 $$M             EQU (0X0383-$) # 1024
3111
      77/     37F :                                     REPT $$N
3112
      77/     37F :                                     DB 1024 DUP(0)
3113
      77/     37F :                                     ENDM
3114
      77/     37F : =>TRUE                              IF $$M <> 0
3115
      77/     37F : =>NOT BLANK                         IFB 0
3116
      77/     37F :                                     DB $$M DUP(0)
3117
      77/     37F : =>TRUE                              ELSE
3118
      77/     37F : 00 00 00 00                         DB $$M DUP(0)
3119
      77/     383 : [77]                                ENDIF
3120
      77/     383 : [77]                                ENDIF
3121
      77/     383 : 00                                  NOP
3122
      77/     384 : 00                                  NOP
3123
      77/     385 : D3 BE                               OUT (EXIT_PORT),A
3124
      78/     387 : (MACRO)             		JP_EMU 0X038D
3125
      78/     387 :  (MACRO-2)                          DUPL 0X038D-$,0;XFF
3126
      78/     387 :                     DUPL:
3127
      78/     387 : =0H                 $$N             EQU (0X038D-$) / 1024
3128
      78/     387 : =6H                 $$M             EQU (0X038D-$) # 1024
3129
      78/     387 :                                     REPT $$N
3130
      78/     387 :                                     DB 1024 DUP(0)
3131
      78/     387 :                                     ENDM
3132
      78/     387 : =>TRUE                              IF $$M <> 0
3133
      78/     387 : =>NOT BLANK                         IFB 0
3134
      78/     387 :                                     DB $$M DUP(0)
3135
      78/     387 : =>TRUE                              ELSE
3136
      78/     387 : 00 00 00 00 00 00                   DB $$M DUP(0)
3137
      78/     38D : [78]                                ENDIF
3138
      78/     38D : [78]                                ENDIF
3139
      78/     38D : 00                                  NOP
3140
      78/     38E : 00                                  NOP
3141
      78/     38F : D3 BE                               OUT (EXIT_PORT),A
3142
      79/     391 : (MACRO)             		JP_EMU 0X0395
3143
      79/     391 :  (MACRO-2)                          DUPL 0X0395-$,0;XFF
3144
      79/     391 :                     DUPL:
3145
      79/     391 : =0H                 $$N             EQU (0X0395-$) / 1024
3146
      79/     391 : =4H                 $$M             EQU (0X0395-$) # 1024
3147
      79/     391 :                                     REPT $$N
3148
      79/     391 :                                     DB 1024 DUP(0)
3149
      79/     391 :                                     ENDM
3150
      79/     391 : =>TRUE                              IF $$M <> 0
3151
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 51 - 2/23/2020 18:58:45
867 lvd 3152
 
3153
 
871 lvd 3154
      79/     391 : =>NOT BLANK                         IFB 0
3155
      79/     391 :                                     DB $$M DUP(0)
3156
      79/     391 : =>TRUE                              ELSE
3157
      79/     391 : 00 00 00 00                         DB $$M DUP(0)
3158
      79/     395 : [79]                                ENDIF
3159
      79/     395 : [79]                                ENDIF
3160
      79/     395 : 00                                  NOP
3161
      79/     396 : 00                                  NOP
3162
      79/     397 : D3 BE                               OUT (EXIT_PORT),A
3163
      80/     399 : (MACRO)             		JP_EMU 0X039F
3164
      80/     399 :  (MACRO-2)                          DUPL 0X039F-$,0;XFF
3165
      80/     399 :                     DUPL:
3166
      80/     399 : =0H                 $$N             EQU (0X039F-$) / 1024
3167
      80/     399 : =6H                 $$M             EQU (0X039F-$) # 1024
3168
      80/     399 :                                     REPT $$N
3169
      80/     399 :                                     DB 1024 DUP(0)
3170
      80/     399 :                                     ENDM
3171
      80/     399 : =>TRUE                              IF $$M <> 0
3172
      80/     399 : =>NOT BLANK                         IFB 0
3173
      80/     399 :                                     DB $$M DUP(0)
3174
      80/     399 : =>TRUE                              ELSE
3175
      80/     399 : 00 00 00 00 00 00                   DB $$M DUP(0)
3176
      80/     39F : [80]                                ENDIF
3177
      80/     39F : [80]                                ENDIF
3178
      80/     39F : 00                                  NOP
3179
      80/     3A0 : 00                                  NOP
3180
      80/     3A1 : D3 BE                               OUT (EXIT_PORT),A
3181
      81/     3A3 : (MACRO)             		JP_EMU 0X03A7
3182
      81/     3A3 :  (MACRO-2)                          DUPL 0X03A7-$,0;XFF
3183
      81/     3A3 :                     DUPL:
3184
      81/     3A3 : =0H                 $$N             EQU (0X03A7-$) / 1024
3185
      81/     3A3 : =4H                 $$M             EQU (0X03A7-$) # 1024
3186
      81/     3A3 :                                     REPT $$N
3187
      81/     3A3 :                                     DB 1024 DUP(0)
3188
      81/     3A3 :                                     ENDM
3189
      81/     3A3 : =>TRUE                              IF $$M <> 0
3190
      81/     3A3 : =>NOT BLANK                         IFB 0
3191
      81/     3A3 :                                     DB $$M DUP(0)
3192
      81/     3A3 : =>TRUE                              ELSE
3193
      81/     3A3 : 00 00 00 00                         DB $$M DUP(0)
3194
      81/     3A7 : [81]                                ENDIF
3195
      81/     3A7 : [81]                                ENDIF
3196
      81/     3A7 : 00                                  NOP
3197
      81/     3A8 : 00                                  NOP
3198
      81/     3A9 : D3 BE                               OUT (EXIT_PORT),A
3199
      82/     3AB : (MACRO)             		JP_EMU 0X03B1
3200
      82/     3AB :  (MACRO-2)                          DUPL 0X03B1-$,0;XFF
3201
      82/     3AB :                     DUPL:
3202
      82/     3AB : =0H                 $$N             EQU (0X03B1-$) / 1024
3203
      82/     3AB : =6H                 $$M             EQU (0X03B1-$) # 1024
3204
      82/     3AB :                                     REPT $$N
3205
      82/     3AB :                                     DB 1024 DUP(0)
3206
      82/     3AB :                                     ENDM
3207
      82/     3AB : =>TRUE                              IF $$M <> 0
3208
      82/     3AB : =>NOT BLANK                         IFB 0
3209
      82/     3AB :                                     DB $$M DUP(0)
3210
      82/     3AB : =>TRUE                              ELSE
3211
      82/     3AB : 00 00 00 00 00 00                   DB $$M DUP(0)
3212
      82/     3B1 : [82]                                ENDIF
3213
      82/     3B1 : [82]                                ENDIF
3214
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 52 - 2/23/2020 18:58:45
867 lvd 3215
 
3216
 
871 lvd 3217
      82/     3B1 : 00                                  NOP
3218
      82/     3B2 : 00                                  NOP
3219
      82/     3B3 : D3 BE                               OUT (EXIT_PORT),A
3220
      83/     3B5 : (MACRO)             		JP_EMU 0X03B9
3221
      83/     3B5 :  (MACRO-2)                          DUPL 0X03B9-$,0;XFF
3222
      83/     3B5 :                     DUPL:
3223
      83/     3B5 : =0H                 $$N             EQU (0X03B9-$) / 1024
3224
      83/     3B5 : =4H                 $$M             EQU (0X03B9-$) # 1024
3225
      83/     3B5 :                                     REPT $$N
3226
      83/     3B5 :                                     DB 1024 DUP(0)
3227
      83/     3B5 :                                     ENDM
3228
      83/     3B5 : =>TRUE                              IF $$M <> 0
3229
      83/     3B5 : =>NOT BLANK                         IFB 0
3230
      83/     3B5 :                                     DB $$M DUP(0)
3231
      83/     3B5 : =>TRUE                              ELSE
3232
      83/     3B5 : 00 00 00 00                         DB $$M DUP(0)
3233
      83/     3B9 : [83]                                ENDIF
3234
      83/     3B9 : [83]                                ENDIF
3235
      83/     3B9 : 00                                  NOP
3236
      83/     3BA : 00                                  NOP
3237
      83/     3BB : D3 BE                               OUT (EXIT_PORT),A
3238
      84/     3BD : (MACRO)             		JP_EMU 0X03C3
3239
      84/     3BD :  (MACRO-2)                          DUPL 0X03C3-$,0;XFF
3240
      84/     3BD :                     DUPL:
3241
      84/     3BD : =0H                 $$N             EQU (0X03C3-$) / 1024
3242
      84/     3BD : =6H                 $$M             EQU (0X03C3-$) # 1024
3243
      84/     3BD :                                     REPT $$N
3244
      84/     3BD :                                     DB 1024 DUP(0)
3245
      84/     3BD :                                     ENDM
3246
      84/     3BD : =>TRUE                              IF $$M <> 0
3247
      84/     3BD : =>NOT BLANK                         IFB 0
3248
      84/     3BD :                                     DB $$M DUP(0)
3249
      84/     3BD : =>TRUE                              ELSE
3250
      84/     3BD : 00 00 00 00 00 00                   DB $$M DUP(0)
3251
      84/     3C3 : [84]                                ENDIF
3252
      84/     3C3 : [84]                                ENDIF
3253
      84/     3C3 : 00                                  NOP
3254
      84/     3C4 : 00                                  NOP
3255
      84/     3C5 : D3 BE                               OUT (EXIT_PORT),A
3256
      85/     3C7 : (MACRO)             		JP_EMU 0X03CB
3257
      85/     3C7 :  (MACRO-2)                          DUPL 0X03CB-$,0;XFF
3258
      85/     3C7 :                     DUPL:
3259
      85/     3C7 : =0H                 $$N             EQU (0X03CB-$) / 1024
3260
      85/     3C7 : =4H                 $$M             EQU (0X03CB-$) # 1024
3261
      85/     3C7 :                                     REPT $$N
3262
      85/     3C7 :                                     DB 1024 DUP(0)
3263
      85/     3C7 :                                     ENDM
3264
      85/     3C7 : =>TRUE                              IF $$M <> 0
3265
      85/     3C7 : =>NOT BLANK                         IFB 0
3266
      85/     3C7 :                                     DB $$M DUP(0)
3267
      85/     3C7 : =>TRUE                              ELSE
3268
      85/     3C7 : 00 00 00 00                         DB $$M DUP(0)
3269
      85/     3CB : [85]                                ENDIF
3270
      85/     3CB : [85]                                ENDIF
3271
      85/     3CB : 00                                  NOP
3272
      85/     3CC : 00                                  NOP
3273
      85/     3CD : D3 BE                               OUT (EXIT_PORT),A
3274
      86/     3CF : (MACRO)             		JP_EMU 0X03D5
3275
      86/     3CF :  (MACRO-2)                          DUPL 0X03D5-$,0;XFF
3276
      86/     3CF :                     DUPL:
3277
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 53 - 2/23/2020 18:58:45
867 lvd 3278
 
3279
 
871 lvd 3280
      86/     3CF : =0H                 $$N             EQU (0X03D5-$) / 1024
3281
      86/     3CF : =6H                 $$M             EQU (0X03D5-$) # 1024
3282
      86/     3CF :                                     REPT $$N
3283
      86/     3CF :                                     DB 1024 DUP(0)
3284
      86/     3CF :                                     ENDM
3285
      86/     3CF : =>TRUE                              IF $$M <> 0
3286
      86/     3CF : =>NOT BLANK                         IFB 0
3287
      86/     3CF :                                     DB $$M DUP(0)
3288
      86/     3CF : =>TRUE                              ELSE
3289
      86/     3CF : 00 00 00 00 00 00                   DB $$M DUP(0)
3290
      86/     3D5 : [86]                                ENDIF
3291
      86/     3D5 : [86]                                ENDIF
3292
      86/     3D5 : 00                                  NOP
3293
      86/     3D6 : 00                                  NOP
3294
      86/     3D7 : D3 BE                               OUT (EXIT_PORT),A
3295
      87/     3D9 : (MACRO)             		JP_EMU 0X03DD
3296
      87/     3D9 :  (MACRO-2)                          DUPL 0X03DD-$,0;XFF
3297
      87/     3D9 :                     DUPL:
3298
      87/     3D9 : =0H                 $$N             EQU (0X03DD-$) / 1024
3299
      87/     3D9 : =4H                 $$M             EQU (0X03DD-$) # 1024
3300
      87/     3D9 :                                     REPT $$N
3301
      87/     3D9 :                                     DB 1024 DUP(0)
3302
      87/     3D9 :                                     ENDM
3303
      87/     3D9 : =>TRUE                              IF $$M <> 0
3304
      87/     3D9 : =>NOT BLANK                         IFB 0
3305
      87/     3D9 :                                     DB $$M DUP(0)
3306
      87/     3D9 : =>TRUE                              ELSE
3307
      87/     3D9 : 00 00 00 00                         DB $$M DUP(0)
3308
      87/     3DD : [87]                                ENDIF
3309
      87/     3DD : [87]                                ENDIF
3310
      87/     3DD : 00                                  NOP
3311
      87/     3DE : 00                                  NOP
3312
      87/     3DF : D3 BE                               OUT (EXIT_PORT),A
3313
      88/     3E1 : (MACRO)             		JP_EMU 0X03E7
3314
      88/     3E1 :  (MACRO-2)                          DUPL 0X03E7-$,0;XFF
3315
      88/     3E1 :                     DUPL:
3316
      88/     3E1 : =0H                 $$N             EQU (0X03E7-$) / 1024
3317
      88/     3E1 : =6H                 $$M             EQU (0X03E7-$) # 1024
3318
      88/     3E1 :                                     REPT $$N
3319
      88/     3E1 :                                     DB 1024 DUP(0)
3320
      88/     3E1 :                                     ENDM
3321
      88/     3E1 : =>TRUE                              IF $$M <> 0
3322
      88/     3E1 : =>NOT BLANK                         IFB 0
3323
      88/     3E1 :                                     DB $$M DUP(0)
3324
      88/     3E1 : =>TRUE                              ELSE
3325
      88/     3E1 : 00 00 00 00 00 00                   DB $$M DUP(0)
3326
      88/     3E7 : [88]                                ENDIF
3327
      88/     3E7 : [88]                                ENDIF
3328
      88/     3E7 : 00                                  NOP
3329
      88/     3E8 : 00                                  NOP
3330
      88/     3E9 : D3 BE                               OUT (EXIT_PORT),A
3331
      89/     3EB : (MACRO)             		JP_EMU 0X03EF
3332
      89/     3EB :  (MACRO-2)                          DUPL 0X03EF-$,0;XFF
3333
      89/     3EB :                     DUPL:
3334
      89/     3EB : =0H                 $$N             EQU (0X03EF-$) / 1024
3335
      89/     3EB : =4H                 $$M             EQU (0X03EF-$) # 1024
3336
      89/     3EB :                                     REPT $$N
3337
      89/     3EB :                                     DB 1024 DUP(0)
3338
      89/     3EB :                                     ENDM
3339
      89/     3EB : =>TRUE                              IF $$M <> 0
3340
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 54 - 2/23/2020 18:58:45
867 lvd 3341
 
3342
 
871 lvd 3343
      89/     3EB : =>NOT BLANK                         IFB 0
3344
      89/     3EB :                                     DB $$M DUP(0)
3345
      89/     3EB : =>TRUE                              ELSE
3346
      89/     3EB : 00 00 00 00                         DB $$M DUP(0)
3347
      89/     3EF : [89]                                ENDIF
3348
      89/     3EF : [89]                                ENDIF
3349
      89/     3EF : 00                                  NOP
3350
      89/     3F0 : 00                                  NOP
3351
      89/     3F1 : D3 BE                               OUT (EXIT_PORT),A
3352
      90/     3F3 :                     
3353
      91/     3F3 : (MACRO)             		DJP_EMU 0X0402
3354
      91/     3F3 :  (MACRO-2)                          DUPL 0X0402-$,0;XFF
3355
      91/     3F3 :                     DUPL:
3356
      91/     3F3 : =0H                 $$N             EQU (0X0402-$) / 1024
3357
      91/     3F3 : =FH                 $$M             EQU (0X0402-$) # 1024
3358
      91/     3F3 :                                     REPT $$N
3359
      91/     3F3 :                                     DB 1024 DUP(0)
3360
      91/     3F3 :                                     ENDM
3361
      91/     3F3 : =>TRUE                              IF $$M <> 0
3362
      91/     3F3 : =>NOT BLANK                         IFB 0
3363
      91/     3F3 :                                     DB $$M DUP(0)
3364
      91/     3F3 : =>TRUE                              ELSE
3365
      91/     3F3 : 00 00 00 00 00 00                   DB $$M DUP(0)
865 lvd 3366
                    00 00 00 00 00 00 
871 lvd 3367
                    00 00 00 
3368
      91/     402 : [91]                                ENDIF
3369
      91/     402 : [91]                                ENDIF
3370
      91/     402 : 00                                  NOP
3371
      91/     403 : 00                                  NOP
3372
      91/     404 : F3                                  DI
3373
      91/     405 : 76                                  HALT
3374
      92/     406 : (MACRO)             		DJP_EMU 0X040A
3375
      92/     406 :  (MACRO-2)                          DUPL 0X040A-$,0;XFF
3376
      92/     406 :                     DUPL:
3377
      92/     406 : =0H                 $$N             EQU (0X040A-$) / 1024
3378
      92/     406 : =4H                 $$M             EQU (0X040A-$) # 1024
3379
      92/     406 :                                     REPT $$N
3380
      92/     406 :                                     DB 1024 DUP(0)
3381
      92/     406 :                                     ENDM
3382
      92/     406 : =>TRUE                              IF $$M <> 0
3383
      92/     406 : =>NOT BLANK                         IFB 0
3384
      92/     406 :                                     DB $$M DUP(0)
3385
      92/     406 : =>TRUE                              ELSE
3386
      92/     406 : 00 00 00 00                         DB $$M DUP(0)
3387
      92/     40A : [92]                                ENDIF
3388
      92/     40A : [92]                                ENDIF
3389
      92/     40A : 00                                  NOP
3390
      92/     40B : 00                                  NOP
3391
      92/     40C : F3                                  DI
3392
      92/     40D : 76                                  HALT
3393
      93/     40E : (MACRO)             		DJP_EMU 0X0412
3394
      93/     40E :  (MACRO-2)                          DUPL 0X0412-$,0;XFF
3395
      93/     40E :                     DUPL:
3396
      93/     40E : =0H                 $$N             EQU (0X0412-$) / 1024
3397
      93/     40E : =4H                 $$M             EQU (0X0412-$) # 1024
3398
      93/     40E :                                     REPT $$N
3399
      93/     40E :                                     DB 1024 DUP(0)
3400
      93/     40E :                                     ENDM
3401
      93/     40E : =>TRUE                              IF $$M <> 0
3402
      93/     40E : =>NOT BLANK                         IFB 0
3403
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 55 - 2/23/2020 18:58:45
865 lvd 3404
 
3405
 
871 lvd 3406
      93/     40E :                                     DB $$M DUP(0)
3407
      93/     40E : =>TRUE                              ELSE
3408
      93/     40E : 00 00 00 00                         DB $$M DUP(0)
3409
      93/     412 : [93]                                ENDIF
3410
      93/     412 : [93]                                ENDIF
3411
      93/     412 : 00                                  NOP
3412
      93/     413 : 00                                  NOP
3413
      93/     414 : F3                                  DI
3414
      93/     415 : 76                                  HALT
3415
      94/     416 : (MACRO)             		DJP_EMU 0X041A
3416
      94/     416 :  (MACRO-2)                          DUPL 0X041A-$,0;XFF
3417
      94/     416 :                     DUPL:
3418
      94/     416 : =0H                 $$N             EQU (0X041A-$) / 1024
3419
      94/     416 : =4H                 $$M             EQU (0X041A-$) # 1024
3420
      94/     416 :                                     REPT $$N
3421
      94/     416 :                                     DB 1024 DUP(0)
3422
      94/     416 :                                     ENDM
3423
      94/     416 : =>TRUE                              IF $$M <> 0
3424
      94/     416 : =>NOT BLANK                         IFB 0
3425
      94/     416 :                                     DB $$M DUP(0)
3426
      94/     416 : =>TRUE                              ELSE
3427
      94/     416 : 00 00 00 00                         DB $$M DUP(0)
3428
      94/     41A : [94]                                ENDIF
3429
      94/     41A : [94]                                ENDIF
3430
      94/     41A : 00                                  NOP
3431
      94/     41B : 00                                  NOP
3432
      94/     41C : F3                                  DI
3433
      94/     41D : 76                                  HALT
3434
      95/     41E : (MACRO)             		DJP_EMU 0X0422
3435
      95/     41E :  (MACRO-2)                          DUPL 0X0422-$,0;XFF
3436
      95/     41E :                     DUPL:
3437
      95/     41E : =0H                 $$N             EQU (0X0422-$) / 1024
3438
      95/     41E : =4H                 $$M             EQU (0X0422-$) # 1024
3439
      95/     41E :                                     REPT $$N
3440
      95/     41E :                                     DB 1024 DUP(0)
3441
      95/     41E :                                     ENDM
3442
      95/     41E : =>TRUE                              IF $$M <> 0
3443
      95/     41E : =>NOT BLANK                         IFB 0
3444
      95/     41E :                                     DB $$M DUP(0)
3445
      95/     41E : =>TRUE                              ELSE
3446
      95/     41E : 00 00 00 00                         DB $$M DUP(0)
3447
      95/     422 : [95]                                ENDIF
3448
      95/     422 : [95]                                ENDIF
3449
      95/     422 : 00                                  NOP
3450
      95/     423 : 00                                  NOP
3451
      95/     424 : F3                                  DI
3452
      95/     425 : 76                                  HALT
3453
      96/     426 : (MACRO)             		DJP_EMU 0X042A
3454
      96/     426 :  (MACRO-2)                          DUPL 0X042A-$,0;XFF
3455
      96/     426 :                     DUPL:
3456
      96/     426 : =0H                 $$N             EQU (0X042A-$) / 1024
3457
      96/     426 : =4H                 $$M             EQU (0X042A-$) # 1024
3458
      96/     426 :                                     REPT $$N
3459
      96/     426 :                                     DB 1024 DUP(0)
3460
      96/     426 :                                     ENDM
3461
      96/     426 : =>TRUE                              IF $$M <> 0
3462
      96/     426 : =>NOT BLANK                         IFB 0
3463
      96/     426 :                                     DB $$M DUP(0)
3464
      96/     426 : =>TRUE                              ELSE
3465
      96/     426 : 00 00 00 00                         DB $$M DUP(0)
3466
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 56 - 2/23/2020 18:58:45
3467
 
3468
 
3469
      96/     42A : [96]                                ENDIF
3470
      96/     42A : [96]                                ENDIF
3471
      96/     42A : 00                                  NOP
3472
      96/     42B : 00                                  NOP
3473
      96/     42C : F3                                  DI
3474
      96/     42D : 76                                  HALT
3475
      97/     42E : (MACRO)             		DJP_EMU 0X0432
3476
      97/     42E :  (MACRO-2)                          DUPL 0X0432-$,0;XFF
3477
      97/     42E :                     DUPL:
3478
      97/     42E : =0H                 $$N             EQU (0X0432-$) / 1024
3479
      97/     42E : =4H                 $$M             EQU (0X0432-$) # 1024
3480
      97/     42E :                                     REPT $$N
3481
      97/     42E :                                     DB 1024 DUP(0)
3482
      97/     42E :                                     ENDM
3483
      97/     42E : =>TRUE                              IF $$M <> 0
3484
      97/     42E : =>NOT BLANK                         IFB 0
3485
      97/     42E :                                     DB $$M DUP(0)
3486
      97/     42E : =>TRUE                              ELSE
3487
      97/     42E : 00 00 00 00                         DB $$M DUP(0)
3488
      97/     432 : [97]                                ENDIF
3489
      97/     432 : [97]                                ENDIF
3490
      97/     432 : 00                                  NOP
3491
      97/     433 : 00                                  NOP
3492
      97/     434 : F3                                  DI
3493
      97/     435 : 76                                  HALT
3494
      98/     436 : (MACRO)             		DJP_EMU 0X043A
3495
      98/     436 :  (MACRO-2)                          DUPL 0X043A-$,0;XFF
3496
      98/     436 :                     DUPL:
3497
      98/     436 : =0H                 $$N             EQU (0X043A-$) / 1024
3498
      98/     436 : =4H                 $$M             EQU (0X043A-$) # 1024
3499
      98/     436 :                                     REPT $$N
3500
      98/     436 :                                     DB 1024 DUP(0)
3501
      98/     436 :                                     ENDM
3502
      98/     436 : =>TRUE                              IF $$M <> 0
3503
      98/     436 : =>NOT BLANK                         IFB 0
3504
      98/     436 :                                     DB $$M DUP(0)
3505
      98/     436 : =>TRUE                              ELSE
3506
      98/     436 : 00 00 00 00                         DB $$M DUP(0)
3507
      98/     43A : [98]                                ENDIF
3508
      98/     43A : [98]                                ENDIF
3509
      98/     43A : 00                                  NOP
3510
      98/     43B : 00                                  NOP
3511
      98/     43C : F3                                  DI
3512
      98/     43D : 76                                  HALT
3513
      99/     43E : (MACRO)             		DJP_EMU 0X0442
3514
      99/     43E :  (MACRO-2)                          DUPL 0X0442-$,0;XFF
3515
      99/     43E :                     DUPL:
3516
      99/     43E : =0H                 $$N             EQU (0X0442-$) / 1024
3517
      99/     43E : =4H                 $$M             EQU (0X0442-$) # 1024
3518
      99/     43E :                                     REPT $$N
3519
      99/     43E :                                     DB 1024 DUP(0)
3520
      99/     43E :                                     ENDM
3521
      99/     43E : =>TRUE                              IF $$M <> 0
3522
      99/     43E : =>NOT BLANK                         IFB 0
3523
      99/     43E :                                     DB $$M DUP(0)
3524
      99/     43E : =>TRUE                              ELSE
3525
      99/     43E : 00 00 00 00                         DB $$M DUP(0)
3526
      99/     442 : [99]                                ENDIF
3527
      99/     442 : [99]                                ENDIF
3528
      99/     442 : 00                                  NOP
3529
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 57 - 2/23/2020 18:58:45
3530
 
3531
 
3532
      99/     443 : 00                                  NOP
3533
      99/     444 : F3                                  DI
3534
      99/     445 : 76                                  HALT
3535
     100/     446 : (MACRO)             		DJP_EMU 0X044A
3536
     100/     446 :  (MACRO-2)                          DUPL 0X044A-$,0;XFF
3537
     100/     446 :                     DUPL:
3538
     100/     446 : =0H                 $$N             EQU (0X044A-$) / 1024
3539
     100/     446 : =4H                 $$M             EQU (0X044A-$) # 1024
3540
     100/     446 :                                     REPT $$N
3541
     100/     446 :                                     DB 1024 DUP(0)
3542
     100/     446 :                                     ENDM
3543
     100/     446 : =>TRUE                              IF $$M <> 0
3544
     100/     446 : =>NOT BLANK                         IFB 0
3545
     100/     446 :                                     DB $$M DUP(0)
3546
     100/     446 : =>TRUE                              ELSE
3547
     100/     446 : 00 00 00 00                         DB $$M DUP(0)
3548
     100/     44A : [100]                               ENDIF
3549
     100/     44A : [100]                               ENDIF
3550
     100/     44A : 00                                  NOP
3551
     100/     44B : 00                                  NOP
3552
     100/     44C : F3                                  DI
3553
     100/     44D : 76                                  HALT
3554
     101/     44E : (MACRO)             		DJP_EMU 0X0455
3555
     101/     44E :  (MACRO-2)                          DUPL 0X0455-$,0;XFF
3556
     101/     44E :                     DUPL:
3557
     101/     44E : =0H                 $$N             EQU (0X0455-$) / 1024
3558
     101/     44E : =7H                 $$M             EQU (0X0455-$) # 1024
3559
     101/     44E :                                     REPT $$N
3560
     101/     44E :                                     DB 1024 DUP(0)
3561
     101/     44E :                                     ENDM
3562
     101/     44E : =>TRUE                              IF $$M <> 0
3563
     101/     44E : =>NOT BLANK                         IFB 0
3564
     101/     44E :                                     DB $$M DUP(0)
3565
     101/     44E : =>TRUE                              ELSE
3566
     101/     44E : 00 00 00 00 00 00                   DB $$M DUP(0)
3567
                    00 
3568
     101/     455 : [101]                               ENDIF
3569
     101/     455 : [101]                               ENDIF
3570
     101/     455 : 00                                  NOP
3571
     101/     456 : 00                                  NOP
3572
     101/     457 : F3                                  DI
3573
     101/     458 : 76                                  HALT
3574
     102/     459 : (MACRO)             		DJP_EMU 0X045D
3575
     102/     459 :  (MACRO-2)                          DUPL 0X045D-$,0;XFF
3576
     102/     459 :                     DUPL:
3577
     102/     459 : =0H                 $$N             EQU (0X045D-$) / 1024
3578
     102/     459 : =4H                 $$M             EQU (0X045D-$) # 1024
3579
     102/     459 :                                     REPT $$N
3580
     102/     459 :                                     DB 1024 DUP(0)
3581
     102/     459 :                                     ENDM
3582
     102/     459 : =>TRUE                              IF $$M <> 0
3583
     102/     459 : =>NOT BLANK                         IFB 0
3584
     102/     459 :                                     DB $$M DUP(0)
3585
     102/     459 : =>TRUE                              ELSE
3586
     102/     459 : 00 00 00 00                         DB $$M DUP(0)
3587
     102/     45D : [102]                               ENDIF
3588
     102/     45D : [102]                               ENDIF
3589
     102/     45D : 00                                  NOP
3590
     102/     45E : 00                                  NOP
3591
     102/     45F : F3                                  DI
3592
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 58 - 2/23/2020 18:58:45
3593
 
3594
 
3595
     102/     460 : 76                                  HALT
3596
     103/     461 : (MACRO)             		DJP_EMU 0X0467
3597
     103/     461 :  (MACRO-2)                          DUPL 0X0467-$,0;XFF
3598
     103/     461 :                     DUPL:
3599
     103/     461 : =0H                 $$N             EQU (0X0467-$) / 1024
3600
     103/     461 : =6H                 $$M             EQU (0X0467-$) # 1024
3601
     103/     461 :                                     REPT $$N
3602
     103/     461 :                                     DB 1024 DUP(0)
3603
     103/     461 :                                     ENDM
3604
     103/     461 : =>TRUE                              IF $$M <> 0
3605
     103/     461 : =>NOT BLANK                         IFB 0
3606
     103/     461 :                                     DB $$M DUP(0)
3607
     103/     461 : =>TRUE                              ELSE
3608
     103/     461 : 00 00 00 00 00 00                   DB $$M DUP(0)
3609
     103/     467 : [103]                               ENDIF
3610
     103/     467 : [103]                               ENDIF
3611
     103/     467 : 00                                  NOP
3612
     103/     468 : 00                                  NOP
3613
     103/     469 : F3                                  DI
3614
     103/     46A : 76                                  HALT
3615
     104/     46B : (MACRO)             		DJP_EMU 0X0471
3616
     104/     46B :  (MACRO-2)                          DUPL 0X0471-$,0;XFF
3617
     104/     46B :                     DUPL:
3618
     104/     46B : =0H                 $$N             EQU (0X0471-$) / 1024
3619
     104/     46B : =6H                 $$M             EQU (0X0471-$) # 1024
3620
     104/     46B :                                     REPT $$N
3621
     104/     46B :                                     DB 1024 DUP(0)
3622
     104/     46B :                                     ENDM
3623
     104/     46B : =>TRUE                              IF $$M <> 0
3624
     104/     46B : =>NOT BLANK                         IFB 0
3625
     104/     46B :                                     DB $$M DUP(0)
3626
     104/     46B : =>TRUE                              ELSE
3627
     104/     46B : 00 00 00 00 00 00                   DB $$M DUP(0)
3628
     104/     471 : [104]                               ENDIF
3629
     104/     471 : [104]                               ENDIF
3630
     104/     471 : 00                                  NOP
3631
     104/     472 : 00                                  NOP
3632
     104/     473 : F3                                  DI
3633
     104/     474 : 76                                  HALT
3634
     105/     475 : (MACRO)             		DJP_EMU 0X047B
3635
     105/     475 :  (MACRO-2)                          DUPL 0X047B-$,0;XFF
3636
     105/     475 :                     DUPL:
3637
     105/     475 : =0H                 $$N             EQU (0X047B-$) / 1024
3638
     105/     475 : =6H                 $$M             EQU (0X047B-$) # 1024
3639
     105/     475 :                                     REPT $$N
3640
     105/     475 :                                     DB 1024 DUP(0)
3641
     105/     475 :                                     ENDM
3642
     105/     475 : =>TRUE                              IF $$M <> 0
3643
     105/     475 : =>NOT BLANK                         IFB 0
3644
     105/     475 :                                     DB $$M DUP(0)
3645
     105/     475 : =>TRUE                              ELSE
3646
     105/     475 : 00 00 00 00 00 00                   DB $$M DUP(0)
3647
     105/     47B : [105]                               ENDIF
3648
     105/     47B : [105]                               ENDIF
3649
     105/     47B : 00                                  NOP
3650
     105/     47C : 00                                  NOP
3651
     105/     47D : F3                                  DI
3652
     105/     47E : 76                                  HALT
3653
     106/     47F : (MACRO)             		DJP_EMU 0X0483
3654
     106/     47F :  (MACRO-2)                          DUPL 0X0483-$,0;XFF
3655
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 59 - 2/23/2020 18:58:45
3656
 
3657
 
3658
     106/     47F :                     DUPL:
3659
     106/     47F : =0H                 $$N             EQU (0X0483-$) / 1024
3660
     106/     47F : =4H                 $$M             EQU (0X0483-$) # 1024
3661
     106/     47F :                                     REPT $$N
3662
     106/     47F :                                     DB 1024 DUP(0)
3663
     106/     47F :                                     ENDM
3664
     106/     47F : =>TRUE                              IF $$M <> 0
3665
     106/     47F : =>NOT BLANK                         IFB 0
3666
     106/     47F :                                     DB $$M DUP(0)
3667
     106/     47F : =>TRUE                              ELSE
3668
     106/     47F : 00 00 00 00                         DB $$M DUP(0)
3669
     106/     483 : [106]                               ENDIF
3670
     106/     483 : [106]                               ENDIF
3671
     106/     483 : 00                                  NOP
3672
     106/     484 : 00                                  NOP
3673
     106/     485 : F3                                  DI
3674
     106/     486 : 76                                  HALT
3675
     107/     487 : (MACRO)             		DJP_EMU 0X048D
3676
     107/     487 :  (MACRO-2)                          DUPL 0X048D-$,0;XFF
3677
     107/     487 :                     DUPL:
3678
     107/     487 : =0H                 $$N             EQU (0X048D-$) / 1024
3679
     107/     487 : =6H                 $$M             EQU (0X048D-$) # 1024
3680
     107/     487 :                                     REPT $$N
3681
     107/     487 :                                     DB 1024 DUP(0)
3682
     107/     487 :                                     ENDM
3683
     107/     487 : =>TRUE                              IF $$M <> 0
3684
     107/     487 : =>NOT BLANK                         IFB 0
3685
     107/     487 :                                     DB $$M DUP(0)
3686
     107/     487 : =>TRUE                              ELSE
3687
     107/     487 : 00 00 00 00 00 00                   DB $$M DUP(0)
3688
     107/     48D : [107]                               ENDIF
3689
     107/     48D : [107]                               ENDIF
3690
     107/     48D : 00                                  NOP
3691
     107/     48E : 00                                  NOP
3692
     107/     48F : F3                                  DI
3693
     107/     490 : 76                                  HALT
3694
     108/     491 : (MACRO)             		DJP_EMU 0X0495
3695
     108/     491 :  (MACRO-2)                          DUPL 0X0495-$,0;XFF
3696
     108/     491 :                     DUPL:
3697
     108/     491 : =0H                 $$N             EQU (0X0495-$) / 1024
3698
     108/     491 : =4H                 $$M             EQU (0X0495-$) # 1024
3699
     108/     491 :                                     REPT $$N
3700
     108/     491 :                                     DB 1024 DUP(0)
3701
     108/     491 :                                     ENDM
3702
     108/     491 : =>TRUE                              IF $$M <> 0
3703
     108/     491 : =>NOT BLANK                         IFB 0
3704
     108/     491 :                                     DB $$M DUP(0)
3705
     108/     491 : =>TRUE                              ELSE
3706
     108/     491 : 00 00 00 00                         DB $$M DUP(0)
3707
     108/     495 : [108]                               ENDIF
3708
     108/     495 : [108]                               ENDIF
3709
     108/     495 : 00                                  NOP
3710
     108/     496 : 00                                  NOP
3711
     108/     497 : F3                                  DI
3712
     108/     498 : 76                                  HALT
3713
     109/     499 : (MACRO)             		DJP_EMU 0X049F
3714
     109/     499 :  (MACRO-2)                          DUPL 0X049F-$,0;XFF
3715
     109/     499 :                     DUPL:
3716
     109/     499 : =0H                 $$N             EQU (0X049F-$) / 1024
3717
     109/     499 : =6H                 $$M             EQU (0X049F-$) # 1024
3718
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 60 - 2/23/2020 18:58:45
3719
 
3720
 
3721
     109/     499 :                                     REPT $$N
3722
     109/     499 :                                     DB 1024 DUP(0)
3723
     109/     499 :                                     ENDM
3724
     109/     499 : =>TRUE                              IF $$M <> 0
3725
     109/     499 : =>NOT BLANK                         IFB 0
3726
     109/     499 :                                     DB $$M DUP(0)
3727
     109/     499 : =>TRUE                              ELSE
3728
     109/     499 : 00 00 00 00 00 00                   DB $$M DUP(0)
3729
     109/     49F : [109]                               ENDIF
3730
     109/     49F : [109]                               ENDIF
3731
     109/     49F : 00                                  NOP
3732
     109/     4A0 : 00                                  NOP
3733
     109/     4A1 : F3                                  DI
3734
     109/     4A2 : 76                                  HALT
3735
     110/     4A3 : (MACRO)             		DJP_EMU 0X04A7
3736
     110/     4A3 :  (MACRO-2)                          DUPL 0X04A7-$,0;XFF
3737
     110/     4A3 :                     DUPL:
3738
     110/     4A3 : =0H                 $$N             EQU (0X04A7-$) / 1024
3739
     110/     4A3 : =4H                 $$M             EQU (0X04A7-$) # 1024
3740
     110/     4A3 :                                     REPT $$N
3741
     110/     4A3 :                                     DB 1024 DUP(0)
3742
     110/     4A3 :                                     ENDM
3743
     110/     4A3 : =>TRUE                              IF $$M <> 0
3744
     110/     4A3 : =>NOT BLANK                         IFB 0
3745
     110/     4A3 :                                     DB $$M DUP(0)
3746
     110/     4A3 : =>TRUE                              ELSE
3747
     110/     4A3 : 00 00 00 00                         DB $$M DUP(0)
3748
     110/     4A7 : [110]                               ENDIF
3749
     110/     4A7 : [110]                               ENDIF
3750
     110/     4A7 : 00                                  NOP
3751
     110/     4A8 : 00                                  NOP
3752
     110/     4A9 : F3                                  DI
3753
     110/     4AA : 76                                  HALT
3754
     111/     4AB : (MACRO)             		DJP_EMU 0X04B1
3755
     111/     4AB :  (MACRO-2)                          DUPL 0X04B1-$,0;XFF
3756
     111/     4AB :                     DUPL:
3757
     111/     4AB : =0H                 $$N             EQU (0X04B1-$) / 1024
3758
     111/     4AB : =6H                 $$M             EQU (0X04B1-$) # 1024
3759
     111/     4AB :                                     REPT $$N
3760
     111/     4AB :                                     DB 1024 DUP(0)
3761
     111/     4AB :                                     ENDM
3762
     111/     4AB : =>TRUE                              IF $$M <> 0
3763
     111/     4AB : =>NOT BLANK                         IFB 0
3764
     111/     4AB :                                     DB $$M DUP(0)
3765
     111/     4AB : =>TRUE                              ELSE
3766
     111/     4AB : 00 00 00 00 00 00                   DB $$M DUP(0)
3767
     111/     4B1 : [111]                               ENDIF
3768
     111/     4B1 : [111]                               ENDIF
3769
     111/     4B1 : 00                                  NOP
3770
     111/     4B2 : 00                                  NOP
3771
     111/     4B3 : F3                                  DI
3772
     111/     4B4 : 76                                  HALT
3773
     112/     4B5 : (MACRO)             		DJP_EMU 0X04B9
3774
     112/     4B5 :  (MACRO-2)                          DUPL 0X04B9-$,0;XFF
3775
     112/     4B5 :                     DUPL:
3776
     112/     4B5 : =0H                 $$N             EQU (0X04B9-$) / 1024
3777
     112/     4B5 : =4H                 $$M             EQU (0X04B9-$) # 1024
3778
     112/     4B5 :                                     REPT $$N
3779
     112/     4B5 :                                     DB 1024 DUP(0)
3780
     112/     4B5 :                                     ENDM
3781
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 61 - 2/23/2020 18:58:45
3782
 
3783
 
3784
     112/     4B5 : =>TRUE                              IF $$M <> 0
3785
     112/     4B5 : =>NOT BLANK                         IFB 0
3786
     112/     4B5 :                                     DB $$M DUP(0)
3787
     112/     4B5 : =>TRUE                              ELSE
3788
     112/     4B5 : 00 00 00 00                         DB $$M DUP(0)
3789
     112/     4B9 : [112]                               ENDIF
3790
     112/     4B9 : [112]                               ENDIF
3791
     112/     4B9 : 00                                  NOP
3792
     112/     4BA : 00                                  NOP
3793
     112/     4BB : F3                                  DI
3794
     112/     4BC : 76                                  HALT
3795
     113/     4BD : (MACRO)             		DJP_EMU 0X04C3
3796
     113/     4BD :  (MACRO-2)                          DUPL 0X04C3-$,0;XFF
3797
     113/     4BD :                     DUPL:
3798
     113/     4BD : =0H                 $$N             EQU (0X04C3-$) / 1024
3799
     113/     4BD : =6H                 $$M             EQU (0X04C3-$) # 1024
3800
     113/     4BD :                                     REPT $$N
3801
     113/     4BD :                                     DB 1024 DUP(0)
3802
     113/     4BD :                                     ENDM
3803
     113/     4BD : =>TRUE                              IF $$M <> 0
3804
     113/     4BD : =>NOT BLANK                         IFB 0
3805
     113/     4BD :                                     DB $$M DUP(0)
3806
     113/     4BD : =>TRUE                              ELSE
3807
     113/     4BD : 00 00 00 00 00 00                   DB $$M DUP(0)
3808
     113/     4C3 : [113]                               ENDIF
3809
     113/     4C3 : [113]                               ENDIF
3810
     113/     4C3 : 00                                  NOP
3811
     113/     4C4 : 00                                  NOP
3812
     113/     4C5 : F3                                  DI
3813
     113/     4C6 : 76                                  HALT
3814
     114/     4C7 : (MACRO)             		DJP_EMU 0X04CB
3815
     114/     4C7 :  (MACRO-2)                          DUPL 0X04CB-$,0;XFF
3816
     114/     4C7 :                     DUPL:
3817
     114/     4C7 : =0H                 $$N             EQU (0X04CB-$) / 1024
3818
     114/     4C7 : =4H                 $$M             EQU (0X04CB-$) # 1024
3819
     114/     4C7 :                                     REPT $$N
3820
     114/     4C7 :                                     DB 1024 DUP(0)
3821
     114/     4C7 :                                     ENDM
3822
     114/     4C7 : =>TRUE                              IF $$M <> 0
3823
     114/     4C7 : =>NOT BLANK                         IFB 0
3824
     114/     4C7 :                                     DB $$M DUP(0)
3825
     114/     4C7 : =>TRUE                              ELSE
3826
     114/     4C7 : 00 00 00 00                         DB $$M DUP(0)
3827
     114/     4CB : [114]                               ENDIF
3828
     114/     4CB : [114]                               ENDIF
3829
     114/     4CB : 00                                  NOP
3830
     114/     4CC : 00                                  NOP
3831
     114/     4CD : F3                                  DI
3832
     114/     4CE : 76                                  HALT
3833
     115/     4CF : (MACRO)             		DJP_EMU 0X04D5
3834
     115/     4CF :  (MACRO-2)                          DUPL 0X04D5-$,0;XFF
3835
     115/     4CF :                     DUPL:
3836
     115/     4CF : =0H                 $$N             EQU (0X04D5-$) / 1024
3837
     115/     4CF : =6H                 $$M             EQU (0X04D5-$) # 1024
3838
     115/     4CF :                                     REPT $$N
3839
     115/     4CF :                                     DB 1024 DUP(0)
3840
     115/     4CF :                                     ENDM
3841
     115/     4CF : =>TRUE                              IF $$M <> 0
3842
     115/     4CF : =>NOT BLANK                         IFB 0
3843
     115/     4CF :                                     DB $$M DUP(0)
3844
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 62 - 2/23/2020 18:58:45
3845
 
3846
 
3847
     115/     4CF : =>TRUE                              ELSE
3848
     115/     4CF : 00 00 00 00 00 00                   DB $$M DUP(0)
3849
     115/     4D5 : [115]                               ENDIF
3850
     115/     4D5 : [115]                               ENDIF
3851
     115/     4D5 : 00                                  NOP
3852
     115/     4D6 : 00                                  NOP
3853
     115/     4D7 : F3                                  DI
3854
     115/     4D8 : 76                                  HALT
3855
     116/     4D9 : (MACRO)             		DJP_EMU 0X04DD
3856
     116/     4D9 :  (MACRO-2)                          DUPL 0X04DD-$,0;XFF
3857
     116/     4D9 :                     DUPL:
3858
     116/     4D9 : =0H                 $$N             EQU (0X04DD-$) / 1024
3859
     116/     4D9 : =4H                 $$M             EQU (0X04DD-$) # 1024
3860
     116/     4D9 :                                     REPT $$N
3861
     116/     4D9 :                                     DB 1024 DUP(0)
3862
     116/     4D9 :                                     ENDM
3863
     116/     4D9 : =>TRUE                              IF $$M <> 0
3864
     116/     4D9 : =>NOT BLANK                         IFB 0
3865
     116/     4D9 :                                     DB $$M DUP(0)
3866
     116/     4D9 : =>TRUE                              ELSE
3867
     116/     4D9 : 00 00 00 00                         DB $$M DUP(0)
3868
     116/     4DD : [116]                               ENDIF
3869
     116/     4DD : [116]                               ENDIF
3870
     116/     4DD : 00                                  NOP
3871
     116/     4DE : 00                                  NOP
3872
     116/     4DF : F3                                  DI
3873
     116/     4E0 : 76                                  HALT
3874
     117/     4E1 : (MACRO)             		DJP_EMU 0X04E7
3875
     117/     4E1 :  (MACRO-2)                          DUPL 0X04E7-$,0;XFF
3876
     117/     4E1 :                     DUPL:
3877
     117/     4E1 : =0H                 $$N             EQU (0X04E7-$) / 1024
3878
     117/     4E1 : =6H                 $$M             EQU (0X04E7-$) # 1024
3879
     117/     4E1 :                                     REPT $$N
3880
     117/     4E1 :                                     DB 1024 DUP(0)
3881
     117/     4E1 :                                     ENDM
3882
     117/     4E1 : =>TRUE                              IF $$M <> 0
3883
     117/     4E1 : =>NOT BLANK                         IFB 0
3884
     117/     4E1 :                                     DB $$M DUP(0)
3885
     117/     4E1 : =>TRUE                              ELSE
3886
     117/     4E1 : 00 00 00 00 00 00                   DB $$M DUP(0)
3887
     117/     4E7 : [117]                               ENDIF
3888
     117/     4E7 : [117]                               ENDIF
3889
     117/     4E7 : 00                                  NOP
3890
     117/     4E8 : 00                                  NOP
3891
     117/     4E9 : F3                                  DI
3892
     117/     4EA : 76                                  HALT
3893
     118/     4EB :                     		
3894
     119/     4EB :                     
3895
     120/     4EB : (MACRO)             		DUPL 0X801-$,0;XFF
3896
     120/     4EB :                     DUPL:
3897
     120/     4EB : =0H                 $$N             EQU (0X801-$) / 1024
3898
     120/     4EB : =316H               $$M             EQU (0X801-$) # 1024
3899
     120/     4EB :                                     REPT $$N
3900
     120/     4EB :                                     DB 1024 DUP(0)
3901
     120/     4EB :                                     ENDM
3902
     120/     4EB : =>TRUE                              IF $$M <> 0
3903
     120/     4EB : =>NOT BLANK                         IFB 0
3904
     120/     4EB :                                     DB $$M DUP(0)
3905
     120/     4EB : =>TRUE                              ELSE
3906
     120/     4EB : 00 00 00 00 00 00                   DB $$M DUP(0)
3907
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 63 - 2/23/2020 18:58:45
3908
 
3909
 
865 lvd 3910
                    00 00 00 00 00 00 
3911
                    00 00 00 00 00 00 
3912
                    00 00 00 00 00 00 
3913
                    00 00 00 00 00 00 
3914
                    00 00 00 00 00 00 
3915
                    00 00 00 00 00 00 
3916
                    00 00 00 00 00 00 
3917
                    00 00 00 00 00 00 
3918
                    00 00 00 00 00 00 
3919
                    00 00 00 00 00 00 
3920
                    00 00 00 00 00 00 
3921
                    00 00 00 00 00 00 
3922
                    00 00 00 00 00 00 
3923
                    00 00 00 00 00 00 
3924
                    00 00 00 00 00 00 
3925
                    00 00 00 00 00 00 
3926
                    00 00 00 00 00 00 
3927
                    00 00 00 00 00 00 
3928
                    00 00 00 00 00 00 
3929
                    00 00 00 00 00 00 
3930
                    00 00 00 00 00 00 
3931
                    00 00 00 00 00 00 
3932
                    00 00 00 00 00 00 
3933
                    00 00 00 00 00 00 
3934
                    00 00 00 00 00 00 
3935
                    00 00 00 00 00 00 
3936
                    00 00 00 00 00 00 
3937
                    00 00 00 00 00 00 
3938
                    00 00 00 00 00 00 
3939
                    00 00 00 00 00 00 
3940
                    00 00 00 00 00 00 
3941
                    00 00 00 00 00 00 
3942
                    00 00 00 00 00 00 
3943
                    00 00 00 00 00 00 
3944
                    00 00 00 00 00 00 
3945
                    00 00 00 00 00 00 
3946
                    00 00 00 00 00 00 
3947
                    00 00 00 00 00 00 
3948
                    00 00 00 00 00 00 
3949
                    00 00 00 00 00 00 
3950
                    00 00 00 00 00 00 
3951
                    00 00 00 00 00 00 
3952
                    00 00 00 00 00 00 
3953
                    00 00 00 00 00 00 
3954
                    00 00 00 00 00 00 
3955
                    00 00 00 00 00 00 
3956
                    00 00 00 00 00 00 
3957
                    00 00 00 00 00 00 
3958
                    00 00 00 00 00 00 
3959
                    00 00 00 00 00 00 
3960
                    00 00 00 00 00 00 
3961
                    00 00 00 00 00 00 
3962
                    00 00 00 00 00 00 
3963
                    00 00 00 00 00 00 
3964
                    00 00 00 00 00 00 
3965
                    00 00 00 00 00 00 
3966
                    00 00 00 00 00 00 
3967
                    00 00 00 00 00 00 
3968
                    00 00 00 00 00 00 
3969
                    00 00 00 00 00 00 
871 lvd 3970
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 64 - 2/23/2020 18:58:45
865 lvd 3971
 
3972
 
3973
                    00 00 00 00 00 00 
3974
                    00 00 00 00 00 00 
3975
                    00 00 00 00 00 00 
3976
                    00 00 00 00 00 00 
3977
                    00 00 00 00 00 00 
3978
                    00 00 00 00 00 00 
3979
                    00 00 00 00 00 00 
3980
                    00 00 00 00 00 00 
3981
                    00 00 00 00 00 00 
3982
                    00 00 00 00 00 00 
3983
                    00 00 00 00 00 00 
3984
                    00 00 00 00 00 00 
3985
                    00 00 00 00 00 00 
3986
                    00 00 00 00 00 00 
3987
                    00 00 00 00 00 00 
3988
                    00 00 00 00 00 00 
3989
                    00 00 00 00 00 00 
3990
                    00 00 00 00 00 00 
3991
                    00 00 00 00 00 00 
3992
                    00 00 00 00 00 00 
3993
                    00 00 00 00 00 00 
3994
                    00 00 00 00 00 00 
3995
                    00 00 00 00 00 00 
3996
                    00 00 00 00 00 00 
3997
                    00 00 00 00 00 00 
3998
                    00 00 00 00 00 00 
3999
                    00 00 00 00 00 00 
4000
                    00 00 00 00 00 00 
4001
                    00 00 00 00 00 00 
4002
                    00 00 00 00 00 00 
4003
                    00 00 00 00 00 00 
4004
                    00 00 00 00 00 00 
4005
                    00 00 00 00 00 00 
4006
                    00 00 00 00 00 00 
4007
                    00 00 00 00 00 00 
4008
                    00 00 00 00 00 00 
4009
                    00 00 00 00 00 00 
4010
                    00 00 00 00 00 00 
4011
                    00 00 00 00 00 00 
4012
                    00 00 00 00 00 00 
4013
                    00 00 00 00 00 00 
4014
                    00 00 00 00 00 00 
4015
                    00 00 00 00 00 00 
4016
                    00 00 00 00 00 00 
4017
                    00 00 00 00 00 00 
4018
                    00 00 00 00 00 00 
4019
                    00 00 00 00 00 00 
4020
                    00 00 00 00 00 00 
4021
                    00 00 00 00 00 00 
4022
                    00 00 00 00 00 00 
4023
                    00 00 00 00 00 00 
4024
                    00 00 00 00 00 00 
4025
                    00 00 00 00 00 00 
4026
                    00 00 00 00 00 00 
4027
                    00 00 00 00 00 00 
4028
                    00 00 00 00 00 00 
4029
                    00 00 00 00 00 00 
4030
                    00 00 00 00 00 00 
4031
                    00 00 00 00 00 00 
4032
                    00 00 00 00 00 00 
871 lvd 4033
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 65 - 2/23/2020 18:58:45
865 lvd 4034
 
4035
 
4036
                    00 00 00 00 00 00 
4037
                    00 00 00 00 00 00 
4038
                    00 00 00 00 00 00 
4039
                    00 00 00 00 00 00 
4040
                    00 00 00 00 00 00 
4041
                    00 00 00 00 00 00 
4042
                    00 00 00 00 00 00 
4043
                    00 00 00 00 00 00 
4044
                    00 00 00 00 00 00 
4045
                    00 00 00 00 00 00 
4046
                    00 00 00 00 
871 lvd 4047
     120/     801 : [120]                               ENDIF
4048
     120/     801 : [120]                               ENDIF
4049
     121/     801 :                     ;[таблица адресов перехвата и вызыватора обработчиков]
4050
     122/     801 :                     TABLE_VIRT
4051
     123/     801 : (MACRO)             		LABEL_GEN 0X0302
4052
     123/     801 : =0H                 _0X0302        EQU ($-TABLE_VIRT)/4
4053
     123/     801 : 02 03 E9 08                         DW 0X0302,ADR_0X0302.WORK
4054
     124/     805 : (MACRO)             		LABEL_GEN 0X030A
4055
     124/     805 : =1H                 _0X030A        EQU ($-TABLE_VIRT)/4
4056
     124/     805 : 0A 03 F1 08                         DW 0X030A,ADR_0X030A.WORK
4057
     125/     809 : (MACRO)             		LABEL_GEN 0X0312
4058
     125/     809 : =2H                 _0X0312        EQU ($-TABLE_VIRT)/4
4059
     125/     809 : 12 03 F9 08                         DW 0X0312,ADR_0X0312.WORK
4060
     126/     80D : (MACRO)             		LABEL_GEN 0X031A
4061
     126/     80D : =3H                 _0X031A        EQU ($-TABLE_VIRT)/4
4062
     126/     80D : 1A 03 01 09                         DW 0X031A,ADR_0X031A.WORK
4063
     127/     811 : (MACRO)             		LABEL_GEN 0X0322
4064
     127/     811 : =4H                 _0X0322        EQU ($-TABLE_VIRT)/4
4065
     127/     811 : 22 03 09 09                         DW 0X0322,ADR_0X0322.WORK
4066
     128/     815 : (MACRO)             		LABEL_GEN 0X032A
4067
     128/     815 : =5H                 _0X032A        EQU ($-TABLE_VIRT)/4
4068
     128/     815 : 2A 03 11 09                         DW 0X032A,ADR_0X032A.WORK
4069
     129/     819 : (MACRO)             		LABEL_GEN 0X0332
4070
     129/     819 : =6H                 _0X0332        EQU ($-TABLE_VIRT)/4
4071
     129/     819 : 32 03 19 09                         DW 0X0332,ADR_0X0332.WORK
4072
     130/     81D : (MACRO)             		LABEL_GEN 0X033A
4073
     130/     81D : =7H                 _0X033A        EQU ($-TABLE_VIRT)/4
4074
     130/     81D : 3A 03 21 09                         DW 0X033A,ADR_0X033A.WORK
4075
     131/     821 : (MACRO)             		LABEL_GEN 0X0342
4076
     131/     821 : =8H                 _0X0342        EQU ($-TABLE_VIRT)/4
4077
     131/     821 : 42 03 29 09                         DW 0X0342,ADR_0X0342.WORK
4078
     132/     825 : (MACRO)             		LABEL_GEN 0X034A
4079
     132/     825 : =9H                 _0X034A        EQU ($-TABLE_VIRT)/4
4080
     132/     825 : 4A 03 31 09                         DW 0X034A,ADR_0X034A.WORK
4081
     133/     829 : (MACRO)             		LABEL_GEN 0X0355
4082
     133/     829 : =AH                 _0X0355        EQU ($-TABLE_VIRT)/4
4083
     133/     829 : 55 03 39 09                         DW 0X0355,ADR_0X0355.WORK
4084
     134/     82D : (MACRO)             		LABEL_GEN 0X035D
4085
     134/     82D : =BH                 _0X035D        EQU ($-TABLE_VIRT)/4
4086
     134/     82D : 5D 03 41 09                         DW 0X035D,ADR_0X035D.WORK
4087
     135/     831 : (MACRO)             		LABEL_GEN 0X0367
4088
     135/     831 : =CH                 _0X0367        EQU ($-TABLE_VIRT)/4
4089
     135/     831 : 67 03 49 09                         DW 0X0367,ADR_0X0367.WORK
4090
     136/     835 : (MACRO)             		LABEL_GEN 0X0371
4091
     136/     835 : =DH                 _0X0371        EQU ($-TABLE_VIRT)/4
4092
     136/     835 : 71 03 51 09                         DW 0X0371,ADR_0X0371.WORK
4093
     137/     839 : (MACRO)             		LABEL_GEN 0X037B
4094
     137/     839 : =EH                 _0X037B        EQU ($-TABLE_VIRT)/4
4095
     137/     839 : 7B 03 59 09                         DW 0X037B,ADR_0X037B.WORK
4096
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 66 - 2/23/2020 18:58:45
867 lvd 4097
 
4098
 
871 lvd 4099
     138/     83D : (MACRO)             		LABEL_GEN 0X0383
4100
     138/     83D : =FH                 _0X0383        EQU ($-TABLE_VIRT)/4
4101
     138/     83D : 83 03 61 09                         DW 0X0383,ADR_0X0383.WORK
4102
     139/     841 : (MACRO)             		LABEL_GEN 0X038D
4103
     139/     841 : =10H                _0X038D        EQU ($-TABLE_VIRT)/4
4104
     139/     841 : 8D 03 69 09                         DW 0X038D,ADR_0X038D.WORK
4105
     140/     845 : (MACRO)             		LABEL_GEN 0X0395
4106
     140/     845 : =11H                _0X0395        EQU ($-TABLE_VIRT)/4
4107
     140/     845 : 95 03 71 09                         DW 0X0395,ADR_0X0395.WORK
4108
     141/     849 : (MACRO)             		LABEL_GEN 0X039F
4109
     141/     849 : =12H                _0X039F        EQU ($-TABLE_VIRT)/4
4110
     141/     849 : 9F 03 79 09                         DW 0X039F,ADR_0X039F.WORK
4111
     142/     84D : (MACRO)             		LABEL_GEN 0X03A7
4112
     142/     84D : =13H                _0X03A7        EQU ($-TABLE_VIRT)/4
4113
     142/     84D : A7 03 81 09                         DW 0X03A7,ADR_0X03A7.WORK
4114
     143/     851 : (MACRO)             		LABEL_GEN 0X03B1
4115
     143/     851 : =14H                _0X03B1        EQU ($-TABLE_VIRT)/4
4116
     143/     851 : B1 03 89 09                         DW 0X03B1,ADR_0X03B1.WORK
4117
     144/     855 : (MACRO)             		LABEL_GEN 0X03B9
4118
     144/     855 : =15H                _0X03B9        EQU ($-TABLE_VIRT)/4
4119
     144/     855 : B9 03 91 09                         DW 0X03B9,ADR_0X03B9.WORK
4120
     145/     859 : (MACRO)             		LABEL_GEN 0X03C3
4121
     145/     859 : =16H                _0X03C3        EQU ($-TABLE_VIRT)/4
4122
     145/     859 : C3 03 99 09                         DW 0X03C3,ADR_0X03C3.WORK
4123
     146/     85D : (MACRO)             		LABEL_GEN 0X03CB
4124
     146/     85D : =17H                _0X03CB        EQU ($-TABLE_VIRT)/4
4125
     146/     85D : CB 03 A1 09                         DW 0X03CB,ADR_0X03CB.WORK
4126
     147/     861 : (MACRO)             		LABEL_GEN 0X03D5
4127
     147/     861 : =18H                _0X03D5        EQU ($-TABLE_VIRT)/4
4128
     147/     861 : D5 03 A9 09                         DW 0X03D5,ADR_0X03D5.WORK
4129
     148/     865 : (MACRO)             		LABEL_GEN 0X03DD
4130
     148/     865 : =19H                _0X03DD        EQU ($-TABLE_VIRT)/4
4131
     148/     865 : DD 03 B1 09                         DW 0X03DD,ADR_0X03DD.WORK
4132
     149/     869 : (MACRO)             		LABEL_GEN 0X03E7
4133
     149/     869 : =1AH                _0X03E7        EQU ($-TABLE_VIRT)/4
4134
     149/     869 : E7 03 B9 09                         DW 0X03E7,ADR_0X03E7.WORK
4135
     150/     86D : (MACRO)             		LABEL_GEN 0X03EF
4136
     150/     86D : =1BH                _0X03EF        EQU ($-TABLE_VIRT)/4
4137
     150/     86D : EF 03 C1 09                         DW 0X03EF,ADR_0X03EF.WORK
4138
     151/     871 :                     
4139
     152/     871 : (MACRO)             		LABEL_GEN 0X0402
4140
     152/     871 : =1CH                _0X0402        EQU ($-TABLE_VIRT)/4
4141
     152/     871 : 02 04 C9 09                         DW 0X0402,ADR_0X0402.WORK
4142
     153/     875 : (MACRO)             		LABEL_GEN 0X040A
4143
     153/     875 : =1DH                _0X040A        EQU ($-TABLE_VIRT)/4
4144
     153/     875 : 0A 04 D1 09                         DW 0X040A,ADR_0X040A.WORK
4145
     154/     879 : (MACRO)             		LABEL_GEN 0X0412
4146
     154/     879 : =1EH                _0X0412        EQU ($-TABLE_VIRT)/4
4147
     154/     879 : 12 04 D9 09                         DW 0X0412,ADR_0X0412.WORK
4148
     155/     87D : (MACRO)             		LABEL_GEN 0X041A
4149
     155/     87D : =1FH                _0X041A        EQU ($-TABLE_VIRT)/4
4150
     155/     87D : 1A 04 E1 09                         DW 0X041A,ADR_0X041A.WORK
4151
     156/     881 : (MACRO)             		LABEL_GEN 0X0422
4152
     156/     881 : =20H                _0X0422        EQU ($-TABLE_VIRT)/4
4153
     156/     881 : 22 04 E9 09                         DW 0X0422,ADR_0X0422.WORK
4154
     157/     885 : (MACRO)             		LABEL_GEN 0X042A
4155
     157/     885 : =21H                _0X042A        EQU ($-TABLE_VIRT)/4
4156
     157/     885 : 2A 04 F1 09                         DW 0X042A,ADR_0X042A.WORK
4157
     158/     889 : (MACRO)             		LABEL_GEN 0X0432
4158
     158/     889 : =22H                _0X0432        EQU ($-TABLE_VIRT)/4
4159
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 67 - 2/23/2020 18:58:45
867 lvd 4160
 
4161
 
871 lvd 4162
     158/     889 : 32 04 F9 09                         DW 0X0432,ADR_0X0432.WORK
4163
     159/     88D : (MACRO)             		LABEL_GEN 0X043A
4164
     159/     88D : =23H                _0X043A        EQU ($-TABLE_VIRT)/4
4165
     159/     88D : 3A 04 01 0A                         DW 0X043A,ADR_0X043A.WORK
4166
     160/     891 : (MACRO)             		LABEL_GEN 0X0442
4167
     160/     891 : =24H                _0X0442        EQU ($-TABLE_VIRT)/4
4168
     160/     891 : 42 04 09 0A                         DW 0X0442,ADR_0X0442.WORK
4169
     161/     895 : (MACRO)             		LABEL_GEN 0X044A
4170
     161/     895 : =25H                _0X044A        EQU ($-TABLE_VIRT)/4
4171
     161/     895 : 4A 04 11 0A                         DW 0X044A,ADR_0X044A.WORK
4172
     162/     899 : (MACRO)             		LABEL_GEN 0X0455
4173
     162/     899 : =26H                _0X0455        EQU ($-TABLE_VIRT)/4
4174
     162/     899 : 55 04 19 0A                         DW 0X0455,ADR_0X0455.WORK
4175
     163/     89D : (MACRO)             		LABEL_GEN 0X045D
4176
     163/     89D : =27H                _0X045D        EQU ($-TABLE_VIRT)/4
4177
     163/     89D : 5D 04 21 0A                         DW 0X045D,ADR_0X045D.WORK
4178
     164/     8A1 : (MACRO)             		LABEL_GEN 0X0467
4179
     164/     8A1 : =28H                _0X0467        EQU ($-TABLE_VIRT)/4
4180
     164/     8A1 : 67 04 29 0A                         DW 0X0467,ADR_0X0467.WORK
4181
     165/     8A5 : (MACRO)             		LABEL_GEN 0X0471
4182
     165/     8A5 : =29H                _0X0471        EQU ($-TABLE_VIRT)/4
4183
     165/     8A5 : 71 04 31 0A                         DW 0X0471,ADR_0X0471.WORK
4184
     166/     8A9 : (MACRO)             		LABEL_GEN 0X047B
4185
     166/     8A9 : =2AH                _0X047B        EQU ($-TABLE_VIRT)/4
4186
     166/     8A9 : 7B 04 39 0A                         DW 0X047B,ADR_0X047B.WORK
4187
     167/     8AD : (MACRO)             		LABEL_GEN 0X0483
4188
     167/     8AD : =2BH                _0X0483        EQU ($-TABLE_VIRT)/4
4189
     167/     8AD : 83 04 41 0A                         DW 0X0483,ADR_0X0483.WORK
4190
     168/     8B1 : (MACRO)             		LABEL_GEN 0X048D
4191
     168/     8B1 : =2CH                _0X048D        EQU ($-TABLE_VIRT)/4
4192
     168/     8B1 : 8D 04 49 0A                         DW 0X048D,ADR_0X048D.WORK
4193
     169/     8B5 : (MACRO)             		LABEL_GEN 0X0495
4194
     169/     8B5 : =2DH                _0X0495        EQU ($-TABLE_VIRT)/4
4195
     169/     8B5 : 95 04 51 0A                         DW 0X0495,ADR_0X0495.WORK
4196
     170/     8B9 : (MACRO)             		LABEL_GEN 0X049F
4197
     170/     8B9 : =2EH                _0X049F        EQU ($-TABLE_VIRT)/4
4198
     170/     8B9 : 9F 04 59 0A                         DW 0X049F,ADR_0X049F.WORK
4199
     171/     8BD : (MACRO)             		LABEL_GEN 0X04A7
4200
     171/     8BD : =2FH                _0X04A7        EQU ($-TABLE_VIRT)/4
4201
     171/     8BD : A7 04 61 0A                         DW 0X04A7,ADR_0X04A7.WORK
4202
     172/     8C1 : (MACRO)             		LABEL_GEN 0X04B1
4203
     172/     8C1 : =30H                _0X04B1        EQU ($-TABLE_VIRT)/4
4204
     172/     8C1 : B1 04 69 0A                         DW 0X04B1,ADR_0X04B1.WORK
4205
     173/     8C5 : (MACRO)             		LABEL_GEN 0X04B9
4206
     173/     8C5 : =31H                _0X04B9        EQU ($-TABLE_VIRT)/4
4207
     173/     8C5 : B9 04 71 0A                         DW 0X04B9,ADR_0X04B9.WORK
4208
     174/     8C9 : (MACRO)             		LABEL_GEN 0X04C3
4209
     174/     8C9 : =32H                _0X04C3        EQU ($-TABLE_VIRT)/4
4210
     174/     8C9 : C3 04 79 0A                         DW 0X04C3,ADR_0X04C3.WORK
4211
     175/     8CD : (MACRO)             		LABEL_GEN 0X04CB
4212
     175/     8CD : =33H                _0X04CB        EQU ($-TABLE_VIRT)/4
4213
     175/     8CD : CB 04 81 0A                         DW 0X04CB,ADR_0X04CB.WORK
4214
     176/     8D1 : (MACRO)             		LABEL_GEN 0X04D5
4215
     176/     8D1 : =34H                _0X04D5        EQU ($-TABLE_VIRT)/4
4216
     176/     8D1 : D5 04 89 0A                         DW 0X04D5,ADR_0X04D5.WORK
4217
     177/     8D5 : (MACRO)             		LABEL_GEN 0X04DD
4218
     177/     8D5 : =35H                _0X04DD        EQU ($-TABLE_VIRT)/4
4219
     177/     8D5 : DD 04 91 0A                         DW 0X04DD,ADR_0X04DD.WORK
4220
     178/     8D9 : (MACRO)             		LABEL_GEN 0X04E7
4221
     178/     8D9 : =36H                _0X04E7        EQU ($-TABLE_VIRT)/4
4222
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 68 - 2/23/2020 18:58:45
867 lvd 4223
 
4224
 
871 lvd 4225
     178/     8D9 : E7 04 99 0A                         DW 0X04E7,ADR_0X04E7.WORK
4226
     179/     8DD : (MACRO)             		LABEL_GEN 0X04EF
4227
     179/     8DD : =37H                _0X04EF        EQU ($-TABLE_VIRT)/4
4228
     179/     8DD : EF 04 A1 0A                         DW 0X04EF,ADR_0X04EF.WORK
4229
     180/     8E1 :                     
4230
     181/     8E1 :                     ;[вызываторы перехвата]
4231
     182/     8E1 : (MACRO)             		EMU_JUMP 0X0302
4232
     182/     8E1 : =8E1H               ADR_0X0302     EQU $
4233
     182/     8E1 : 32 FE 0D                            LD (OLD_AF+1),A
4234
     182/     8E4 : 3E 00                               LD A,_0X0302
4235
     182/     8E6 : C3 00 0F                            JP WORKER
4236
     182/     8E9 :                     
4237
     182/     8E9 : =8E9H               .WORK           EQU $
4238
     183/     8E9 : (MACRO)             		EMU_JUMP 0X030A
4239
     183/     8E9 : =8E9H               ADR_0X030A     EQU $
4240
     183/     8E9 : 32 FE 0D                            LD (OLD_AF+1),A
4241
     183/     8EC : 3E 01                               LD A,_0X030A
4242
     183/     8EE : C3 00 0F                            JP WORKER
4243
     183/     8F1 :                     
4244
     183/     8F1 : =8F1H               .WORK           EQU $
4245
     184/     8F1 : (MACRO)             		EMU_JUMP 0X0312
4246
     184/     8F1 : =8F1H               ADR_0X0312     EQU $
4247
     184/     8F1 : 32 FE 0D                            LD (OLD_AF+1),A
4248
     184/     8F4 : 3E 02                               LD A,_0X0312
4249
     184/     8F6 : C3 00 0F                            JP WORKER
4250
     184/     8F9 :                     
4251
     184/     8F9 : =8F9H               .WORK           EQU $
4252
     185/     8F9 : (MACRO)             		EMU_JUMP 0X031A
4253
     185/     8F9 : =8F9H               ADR_0X031A     EQU $
4254
     185/     8F9 : 32 FE 0D                            LD (OLD_AF+1),A
4255
     185/     8FC : 3E 03                               LD A,_0X031A
4256
     185/     8FE : C3 00 0F                            JP WORKER
4257
     185/     901 :                     
4258
     185/     901 : =901H               .WORK           EQU $
4259
     186/     901 : (MACRO)             		EMU_JUMP 0X0322
4260
     186/     901 : =901H               ADR_0X0322     EQU $
4261
     186/     901 : 32 FE 0D                            LD (OLD_AF+1),A
4262
     186/     904 : 3E 04                               LD A,_0X0322
4263
     186/     906 : C3 00 0F                            JP WORKER
4264
     186/     909 :                     
4265
     186/     909 : =909H               .WORK           EQU $
4266
     187/     909 : (MACRO)             		EMU_JUMP 0X032A
4267
     187/     909 : =909H               ADR_0X032A     EQU $
4268
     187/     909 : 32 FE 0D                            LD (OLD_AF+1),A
4269
     187/     90C : 3E 05                               LD A,_0X032A
4270
     187/     90E : C3 00 0F                            JP WORKER
4271
     187/     911 :                     
4272
     187/     911 : =911H               .WORK           EQU $
4273
     188/     911 : (MACRO)             		EMU_JUMP 0X0332
4274
     188/     911 : =911H               ADR_0X0332     EQU $
4275
     188/     911 : 32 FE 0D                            LD (OLD_AF+1),A
4276
     188/     914 : 3E 06                               LD A,_0X0332
4277
     188/     916 : C3 00 0F                            JP WORKER
4278
     188/     919 :                     
4279
     188/     919 : =919H               .WORK           EQU $
4280
     189/     919 : (MACRO)             		EMU_JUMP 0X033A
4281
     189/     919 : =919H               ADR_0X033A     EQU $
4282
     189/     919 : 32 FE 0D                            LD (OLD_AF+1),A
4283
     189/     91C : 3E 07                               LD A,_0X033A
4284
     189/     91E : C3 00 0F                            JP WORKER
4285
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 69 - 2/23/2020 18:58:45
867 lvd 4286
 
4287
 
871 lvd 4288
     189/     921 :                     
4289
     189/     921 : =921H               .WORK           EQU $
4290
     190/     921 : (MACRO)             		EMU_JUMP 0X0342
4291
     190/     921 : =921H               ADR_0X0342     EQU $
4292
     190/     921 : 32 FE 0D                            LD (OLD_AF+1),A
4293
     190/     924 : 3E 08                               LD A,_0X0342
4294
     190/     926 : C3 00 0F                            JP WORKER
4295
     190/     929 :                     
4296
     190/     929 : =929H               .WORK           EQU $
4297
     191/     929 : (MACRO)             		EMU_JUMP 0X034A
4298
     191/     929 : =929H               ADR_0X034A     EQU $
4299
     191/     929 : 32 FE 0D                            LD (OLD_AF+1),A
4300
     191/     92C : 3E 09                               LD A,_0X034A
4301
     191/     92E : C3 00 0F                            JP WORKER
4302
     191/     931 :                     
4303
     191/     931 : =931H               .WORK           EQU $
4304
     192/     931 : (MACRO)             		EMU_JUMP 0X0355
4305
     192/     931 : =931H               ADR_0X0355     EQU $
4306
     192/     931 : 32 FE 0D                            LD (OLD_AF+1),A
4307
     192/     934 : 3E 0A                               LD A,_0X0355
4308
     192/     936 : C3 00 0F                            JP WORKER
4309
     192/     939 :                     
4310
     192/     939 : =939H               .WORK           EQU $
4311
     193/     939 : (MACRO)             		EMU_JUMP 0X035D
4312
     193/     939 : =939H               ADR_0X035D     EQU $
4313
     193/     939 : 32 FE 0D                            LD (OLD_AF+1),A
4314
     193/     93C : 3E 0B                               LD A,_0X035D
4315
     193/     93E : C3 00 0F                            JP WORKER
4316
     193/     941 :                     
4317
     193/     941 : =941H               .WORK           EQU $
4318
     194/     941 : (MACRO)             		EMU_JUMP 0X0367
4319
     194/     941 : =941H               ADR_0X0367     EQU $
4320
     194/     941 : 32 FE 0D                            LD (OLD_AF+1),A
4321
     194/     944 : 3E 0C                               LD A,_0X0367
4322
     194/     946 : C3 00 0F                            JP WORKER
4323
     194/     949 :                     
4324
     194/     949 : =949H               .WORK           EQU $
4325
     195/     949 : (MACRO)             		EMU_JUMP 0X0371
4326
     195/     949 : =949H               ADR_0X0371     EQU $
4327
     195/     949 : 32 FE 0D                            LD (OLD_AF+1),A
4328
     195/     94C : 3E 0D                               LD A,_0X0371
4329
     195/     94E : C3 00 0F                            JP WORKER
4330
     195/     951 :                     
4331
     195/     951 : =951H               .WORK           EQU $
4332
     196/     951 : (MACRO)             		EMU_JUMP 0X037B
4333
     196/     951 : =951H               ADR_0X037B     EQU $
4334
     196/     951 : 32 FE 0D                            LD (OLD_AF+1),A
4335
     196/     954 : 3E 0E                               LD A,_0X037B
4336
     196/     956 : C3 00 0F                            JP WORKER
4337
     196/     959 :                     
4338
     196/     959 : =959H               .WORK           EQU $
4339
     197/     959 : (MACRO)             		EMU_JUMP 0X0383
4340
     197/     959 : =959H               ADR_0X0383     EQU $
4341
     197/     959 : 32 FE 0D                            LD (OLD_AF+1),A
4342
     197/     95C : 3E 0F                               LD A,_0X0383
4343
     197/     95E : C3 00 0F                            JP WORKER
4344
     197/     961 :                     
4345
     197/     961 : =961H               .WORK           EQU $
4346
     198/     961 : (MACRO)             		EMU_JUMP 0X038D
4347
     198/     961 : =961H               ADR_0X038D     EQU $
4348
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 70 - 2/23/2020 18:58:45
867 lvd 4349
 
4350
 
871 lvd 4351
     198/     961 : 32 FE 0D                            LD (OLD_AF+1),A
4352
     198/     964 : 3E 10                               LD A,_0X038D
4353
     198/     966 : C3 00 0F                            JP WORKER
4354
     198/     969 :                     
4355
     198/     969 : =969H               .WORK           EQU $
4356
     199/     969 : (MACRO)             		EMU_JUMP 0X0395
4357
     199/     969 : =969H               ADR_0X0395     EQU $
4358
     199/     969 : 32 FE 0D                            LD (OLD_AF+1),A
4359
     199/     96C : 3E 11                               LD A,_0X0395
4360
     199/     96E : C3 00 0F                            JP WORKER
4361
     199/     971 :                     
4362
     199/     971 : =971H               .WORK           EQU $
4363
     200/     971 : (MACRO)             		EMU_JUMP 0X039F
4364
     200/     971 : =971H               ADR_0X039F     EQU $
4365
     200/     971 : 32 FE 0D                            LD (OLD_AF+1),A
4366
     200/     974 : 3E 12                               LD A,_0X039F
4367
     200/     976 : C3 00 0F                            JP WORKER
4368
     200/     979 :                     
4369
     200/     979 : =979H               .WORK           EQU $
4370
     201/     979 : (MACRO)             		EMU_JUMP 0X03A7
4371
     201/     979 : =979H               ADR_0X03A7     EQU $
4372
     201/     979 : 32 FE 0D                            LD (OLD_AF+1),A
4373
     201/     97C : 3E 13                               LD A,_0X03A7
4374
     201/     97E : C3 00 0F                            JP WORKER
4375
     201/     981 :                     
4376
     201/     981 : =981H               .WORK           EQU $
4377
     202/     981 : (MACRO)             		EMU_JUMP 0X03B1
4378
     202/     981 : =981H               ADR_0X03B1     EQU $
4379
     202/     981 : 32 FE 0D                            LD (OLD_AF+1),A
4380
     202/     984 : 3E 14                               LD A,_0X03B1
4381
     202/     986 : C3 00 0F                            JP WORKER
4382
     202/     989 :                     
4383
     202/     989 : =989H               .WORK           EQU $
4384
     203/     989 : (MACRO)             		EMU_JUMP 0X03B9
4385
     203/     989 : =989H               ADR_0X03B9     EQU $
4386
     203/     989 : 32 FE 0D                            LD (OLD_AF+1),A
4387
     203/     98C : 3E 15                               LD A,_0X03B9
4388
     203/     98E : C3 00 0F                            JP WORKER
4389
     203/     991 :                     
4390
     203/     991 : =991H               .WORK           EQU $
4391
     204/     991 : (MACRO)             		EMU_JUMP 0X03C3
4392
     204/     991 : =991H               ADR_0X03C3     EQU $
4393
     204/     991 : 32 FE 0D                            LD (OLD_AF+1),A
4394
     204/     994 : 3E 16                               LD A,_0X03C3
4395
     204/     996 : C3 00 0F                            JP WORKER
4396
     204/     999 :                     
4397
     204/     999 : =999H               .WORK           EQU $
4398
     205/     999 : (MACRO)             		EMU_JUMP 0X03CB
4399
     205/     999 : =999H               ADR_0X03CB     EQU $
4400
     205/     999 : 32 FE 0D                            LD (OLD_AF+1),A
4401
     205/     99C : 3E 17                               LD A,_0X03CB
4402
     205/     99E : C3 00 0F                            JP WORKER
4403
     205/     9A1 :                     
4404
     205/     9A1 : =9A1H               .WORK           EQU $
4405
     206/     9A1 : (MACRO)             		EMU_JUMP 0X03D5
4406
     206/     9A1 : =9A1H               ADR_0X03D5     EQU $
4407
     206/     9A1 : 32 FE 0D                            LD (OLD_AF+1),A
4408
     206/     9A4 : 3E 18                               LD A,_0X03D5
4409
     206/     9A6 : C3 00 0F                            JP WORKER
4410
     206/     9A9 :                     
4411
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 71 - 2/23/2020 18:58:45
4412
 
4413
 
4414
     206/     9A9 : =9A9H               .WORK           EQU $
4415
     207/     9A9 : (MACRO)             		EMU_JUMP 0X03DD
4416
     207/     9A9 : =9A9H               ADR_0X03DD     EQU $
4417
     207/     9A9 : 32 FE 0D                            LD (OLD_AF+1),A
4418
     207/     9AC : 3E 19                               LD A,_0X03DD
4419
     207/     9AE : C3 00 0F                            JP WORKER
4420
     207/     9B1 :                     
4421
     207/     9B1 : =9B1H               .WORK           EQU $
4422
     208/     9B1 : (MACRO)             		EMU_JUMP 0X03E7
4423
     208/     9B1 : =9B1H               ADR_0X03E7     EQU $
4424
     208/     9B1 : 32 FE 0D                            LD (OLD_AF+1),A
4425
     208/     9B4 : 3E 1A                               LD A,_0X03E7
4426
     208/     9B6 : C3 00 0F                            JP WORKER
4427
     208/     9B9 :                     
4428
     208/     9B9 : =9B9H               .WORK           EQU $
4429
     209/     9B9 : (MACRO)             		EMU_JUMP 0X03EF
4430
     209/     9B9 : =9B9H               ADR_0X03EF     EQU $
4431
     209/     9B9 : 32 FE 0D                            LD (OLD_AF+1),A
4432
     209/     9BC : 3E 1B                               LD A,_0X03EF
4433
     209/     9BE : C3 00 0F                            JP WORKER
4434
     209/     9C1 :                     
4435
     209/     9C1 : =9C1H               .WORK           EQU $
4436
     210/     9C1 :                     
4437
     211/     9C1 : (MACRO)             		EMU_JUMP 0X0402
4438
     211/     9C1 : =9C1H               ADR_0X0402     EQU $
4439
     211/     9C1 : 32 FE 0D                            LD (OLD_AF+1),A
4440
     211/     9C4 : 3E 1C                               LD A,_0X0402
4441
     211/     9C6 : C3 00 0F                            JP WORKER
4442
     211/     9C9 :                     
4443
     211/     9C9 : =9C9H               .WORK           EQU $
4444
     212/     9C9 : (MACRO)             		EMU_JUMP 0X040A
4445
     212/     9C9 : =9C9H               ADR_0X040A     EQU $
4446
     212/     9C9 : 32 FE 0D                            LD (OLD_AF+1),A
4447
     212/     9CC : 3E 1D                               LD A,_0X040A
4448
     212/     9CE : C3 00 0F                            JP WORKER
4449
     212/     9D1 :                     
4450
     212/     9D1 : =9D1H               .WORK           EQU $
4451
     213/     9D1 : (MACRO)             		EMU_JUMP 0X0412
4452
     213/     9D1 : =9D1H               ADR_0X0412     EQU $
4453
     213/     9D1 : 32 FE 0D                            LD (OLD_AF+1),A
4454
     213/     9D4 : 3E 1E                               LD A,_0X0412
4455
     213/     9D6 : C3 00 0F                            JP WORKER
4456
     213/     9D9 :                     
4457
     213/     9D9 : =9D9H               .WORK           EQU $
4458
     214/     9D9 : (MACRO)             		EMU_JUMP 0X041A
4459
     214/     9D9 : =9D9H               ADR_0X041A     EQU $
4460
     214/     9D9 : 32 FE 0D                            LD (OLD_AF+1),A
4461
     214/     9DC : 3E 1F                               LD A,_0X041A
4462
     214/     9DE : C3 00 0F                            JP WORKER
4463
     214/     9E1 :                     
4464
     214/     9E1 : =9E1H               .WORK           EQU $
4465
     215/     9E1 : (MACRO)             		EMU_JUMP 0X0422
4466
     215/     9E1 : =9E1H               ADR_0X0422     EQU $
4467
     215/     9E1 : 32 FE 0D                            LD (OLD_AF+1),A
4468
     215/     9E4 : 3E 20                               LD A,_0X0422
4469
     215/     9E6 : C3 00 0F                            JP WORKER
4470
     215/     9E9 :                     
4471
     215/     9E9 : =9E9H               .WORK           EQU $
4472
     216/     9E9 : (MACRO)             		EMU_JUMP 0X042A
4473
     216/     9E9 : =9E9H               ADR_0X042A     EQU $
4474
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 72 - 2/23/2020 18:58:45
4475
 
4476
 
4477
     216/     9E9 : 32 FE 0D                            LD (OLD_AF+1),A
4478
     216/     9EC : 3E 21                               LD A,_0X042A
4479
     216/     9EE : C3 00 0F                            JP WORKER
4480
     216/     9F1 :                     
4481
     216/     9F1 : =9F1H               .WORK           EQU $
4482
     217/     9F1 : (MACRO)             		EMU_JUMP 0X0432
4483
     217/     9F1 : =9F1H               ADR_0X0432     EQU $
4484
     217/     9F1 : 32 FE 0D                            LD (OLD_AF+1),A
4485
     217/     9F4 : 3E 22                               LD A,_0X0432
4486
     217/     9F6 : C3 00 0F                            JP WORKER
4487
     217/     9F9 :                     
4488
     217/     9F9 : =9F9H               .WORK           EQU $
4489
     218/     9F9 : (MACRO)             		EMU_JUMP 0X043A
4490
     218/     9F9 : =9F9H               ADR_0X043A     EQU $
4491
     218/     9F9 : 32 FE 0D                            LD (OLD_AF+1),A
4492
     218/     9FC : 3E 23                               LD A,_0X043A
4493
     218/     9FE : C3 00 0F                            JP WORKER
4494
     218/     A01 :                     
4495
     218/     A01 : =A01H               .WORK           EQU $
4496
     219/     A01 : (MACRO)             		EMU_JUMP 0X0442
4497
     219/     A01 : =A01H               ADR_0X0442     EQU $
4498
     219/     A01 : 32 FE 0D                            LD (OLD_AF+1),A
4499
     219/     A04 : 3E 24                               LD A,_0X0442
4500
     219/     A06 : C3 00 0F                            JP WORKER
4501
     219/     A09 :                     
4502
     219/     A09 : =A09H               .WORK           EQU $
4503
     220/     A09 : (MACRO)             		EMU_JUMP 0X044A
4504
     220/     A09 : =A09H               ADR_0X044A     EQU $
4505
     220/     A09 : 32 FE 0D                            LD (OLD_AF+1),A
4506
     220/     A0C : 3E 25                               LD A,_0X044A
4507
     220/     A0E : C3 00 0F                            JP WORKER
4508
     220/     A11 :                     
4509
     220/     A11 : =A11H               .WORK           EQU $
4510
     221/     A11 : (MACRO)             		EMU_JUMP 0X0455
4511
     221/     A11 : =A11H               ADR_0X0455     EQU $
4512
     221/     A11 : 32 FE 0D                            LD (OLD_AF+1),A
4513
     221/     A14 : 3E 26                               LD A,_0X0455
4514
     221/     A16 : C3 00 0F                            JP WORKER
4515
     221/     A19 :                     
4516
     221/     A19 : =A19H               .WORK           EQU $
4517
     222/     A19 : (MACRO)             		EMU_JUMP 0X045D
4518
     222/     A19 : =A19H               ADR_0X045D     EQU $
4519
     222/     A19 : 32 FE 0D                            LD (OLD_AF+1),A
4520
     222/     A1C : 3E 27                               LD A,_0X045D
4521
     222/     A1E : C3 00 0F                            JP WORKER
4522
     222/     A21 :                     
4523
     222/     A21 : =A21H               .WORK           EQU $
4524
     223/     A21 : (MACRO)             		EMU_JUMP 0X0467
4525
     223/     A21 : =A21H               ADR_0X0467     EQU $
4526
     223/     A21 : 32 FE 0D                            LD (OLD_AF+1),A
4527
     223/     A24 : 3E 28                               LD A,_0X0467
4528
     223/     A26 : C3 00 0F                            JP WORKER
4529
     223/     A29 :                     
4530
     223/     A29 : =A29H               .WORK           EQU $
4531
     224/     A29 : (MACRO)             		EMU_JUMP 0X0471
4532
     224/     A29 : =A29H               ADR_0X0471     EQU $
4533
     224/     A29 : 32 FE 0D                            LD (OLD_AF+1),A
4534
     224/     A2C : 3E 29                               LD A,_0X0471
4535
     224/     A2E : C3 00 0F                            JP WORKER
4536
     224/     A31 :                     
4537
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 73 - 2/23/2020 18:58:45
4538
 
4539
 
4540
     224/     A31 : =A31H               .WORK           EQU $
4541
     225/     A31 : (MACRO)             		EMU_JUMP 0X047B
4542
     225/     A31 : =A31H               ADR_0X047B     EQU $
4543
     225/     A31 : 32 FE 0D                            LD (OLD_AF+1),A
4544
     225/     A34 : 3E 2A                               LD A,_0X047B
4545
     225/     A36 : C3 00 0F                            JP WORKER
4546
     225/     A39 :                     
4547
     225/     A39 : =A39H               .WORK           EQU $
4548
     226/     A39 : (MACRO)             		EMU_JUMP 0X0483
4549
     226/     A39 : =A39H               ADR_0X0483     EQU $
4550
     226/     A39 : 32 FE 0D                            LD (OLD_AF+1),A
4551
     226/     A3C : 3E 2B                               LD A,_0X0483
4552
     226/     A3E : C3 00 0F                            JP WORKER
4553
     226/     A41 :                     
4554
     226/     A41 : =A41H               .WORK           EQU $
4555
     227/     A41 : (MACRO)             		EMU_JUMP 0X048D
4556
     227/     A41 : =A41H               ADR_0X048D     EQU $
4557
     227/     A41 : 32 FE 0D                            LD (OLD_AF+1),A
4558
     227/     A44 : 3E 2C                               LD A,_0X048D
4559
     227/     A46 : C3 00 0F                            JP WORKER
4560
     227/     A49 :                     
4561
     227/     A49 : =A49H               .WORK           EQU $
4562
     228/     A49 : (MACRO)             		EMU_JUMP 0X0495
4563
     228/     A49 : =A49H               ADR_0X0495     EQU $
4564
     228/     A49 : 32 FE 0D                            LD (OLD_AF+1),A
4565
     228/     A4C : 3E 2D                               LD A,_0X0495
4566
     228/     A4E : C3 00 0F                            JP WORKER
4567
     228/     A51 :                     
4568
     228/     A51 : =A51H               .WORK           EQU $
4569
     229/     A51 : (MACRO)             		EMU_JUMP 0X049F
4570
     229/     A51 : =A51H               ADR_0X049F     EQU $
4571
     229/     A51 : 32 FE 0D                            LD (OLD_AF+1),A
4572
     229/     A54 : 3E 2E                               LD A,_0X049F
4573
     229/     A56 : C3 00 0F                            JP WORKER
4574
     229/     A59 :                     
4575
     229/     A59 : =A59H               .WORK           EQU $
4576
     230/     A59 : (MACRO)             		EMU_JUMP 0X04A7
4577
     230/     A59 : =A59H               ADR_0X04A7     EQU $
4578
     230/     A59 : 32 FE 0D                            LD (OLD_AF+1),A
4579
     230/     A5C : 3E 2F                               LD A,_0X04A7
4580
     230/     A5E : C3 00 0F                            JP WORKER
4581
     230/     A61 :                     
4582
     230/     A61 : =A61H               .WORK           EQU $
4583
     231/     A61 : (MACRO)             		EMU_JUMP 0X04B1
4584
     231/     A61 : =A61H               ADR_0X04B1     EQU $
4585
     231/     A61 : 32 FE 0D                            LD (OLD_AF+1),A
4586
     231/     A64 : 3E 30                               LD A,_0X04B1
4587
     231/     A66 : C3 00 0F                            JP WORKER
4588
     231/     A69 :                     
4589
     231/     A69 : =A69H               .WORK           EQU $
4590
     232/     A69 : (MACRO)             		EMU_JUMP 0X04B9
4591
     232/     A69 : =A69H               ADR_0X04B9     EQU $
4592
     232/     A69 : 32 FE 0D                            LD (OLD_AF+1),A
4593
     232/     A6C : 3E 31                               LD A,_0X04B9
4594
     232/     A6E : C3 00 0F                            JP WORKER
4595
     232/     A71 :                     
4596
     232/     A71 : =A71H               .WORK           EQU $
4597
     233/     A71 : (MACRO)             		EMU_JUMP 0X04C3
4598
     233/     A71 : =A71H               ADR_0X04C3     EQU $
4599
     233/     A71 : 32 FE 0D                            LD (OLD_AF+1),A
4600
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 74 - 2/23/2020 18:58:45
4601
 
4602
 
4603
     233/     A74 : 3E 32                               LD A,_0X04C3
4604
     233/     A76 : C3 00 0F                            JP WORKER
4605
     233/     A79 :                     
4606
     233/     A79 : =A79H               .WORK           EQU $
4607
     234/     A79 : (MACRO)             		EMU_JUMP 0X04CB
4608
     234/     A79 : =A79H               ADR_0X04CB     EQU $
4609
     234/     A79 : 32 FE 0D                            LD (OLD_AF+1),A
4610
     234/     A7C : 3E 33                               LD A,_0X04CB
4611
     234/     A7E : C3 00 0F                            JP WORKER
4612
     234/     A81 :                     
4613
     234/     A81 : =A81H               .WORK           EQU $
4614
     235/     A81 : (MACRO)             		EMU_JUMP 0X04D5
4615
     235/     A81 : =A81H               ADR_0X04D5     EQU $
4616
     235/     A81 : 32 FE 0D                            LD (OLD_AF+1),A
4617
     235/     A84 : 3E 34                               LD A,_0X04D5
4618
     235/     A86 : C3 00 0F                            JP WORKER
4619
     235/     A89 :                     
4620
     235/     A89 : =A89H               .WORK           EQU $
4621
     236/     A89 : (MACRO)             		EMU_JUMP 0X04DD
4622
     236/     A89 : =A89H               ADR_0X04DD     EQU $
4623
     236/     A89 : 32 FE 0D                            LD (OLD_AF+1),A
4624
     236/     A8C : 3E 35                               LD A,_0X04DD
4625
     236/     A8E : C3 00 0F                            JP WORKER
4626
     236/     A91 :                     
4627
     236/     A91 : =A91H               .WORK           EQU $
4628
     237/     A91 : (MACRO)             		EMU_JUMP 0X04E7
4629
     237/     A91 : =A91H               ADR_0X04E7     EQU $
4630
     237/     A91 : 32 FE 0D                            LD (OLD_AF+1),A
4631
     237/     A94 : 3E 36                               LD A,_0X04E7
4632
     237/     A96 : C3 00 0F                            JP WORKER
4633
     237/     A99 :                     
4634
     237/     A99 : =A99H               .WORK           EQU $
4635
     238/     A99 : (MACRO)             		EMU_JUMP 0X04EF
4636
     238/     A99 : =A99H               ADR_0X04EF     EQU $
4637
     238/     A99 : 32 FE 0D                            LD (OLD_AF+1),A
4638
     238/     A9C : 3E 37                               LD A,_0X04EF
4639
     238/     A9E : C3 00 0F                            JP WORKER
4640
     238/     AA1 :                     
4641
     238/     AA1 : =AA1H               .WORK           EQU $
4642
     239/     AA1 :                     
4643
     240/     AA1 : (MACRO)             		DUPL STACK+0X101-$,0;XFF
4644
     240/     AA1 :                     DUPL:
4645
     240/     AA1 : =1H                 $$N             EQU (STACK+0X101-$) / 1024
4646
     240/     AA1 : =5FH                $$M             EQU (STACK+0X101-$) # 1024
4647
     240/     AA1 :                                     REPT $$N
4648
     240/     AA1 :                                     DB 1024 DUP(0)
4649
     240/     AA1 :                                     ENDM
4650
     240/     AA1 : 00 00 00 00 00 00                   DB 1024 DUP(0)
865 lvd 4651
                    00 00 00 00 00 00 
4652
                    00 00 00 00 00 00 
4653
                    00 00 00 00 00 00 
4654
                    00 00 00 00 00 00 
4655
                    00 00 00 00 00 00 
4656
                    00 00 00 00 00 00 
4657
                    00 00 00 00 00 00 
4658
                    00 00 00 00 00 00 
4659
                    00 00 00 00 00 00 
4660
                    00 00 00 00 00 00 
4661
                    00 00 00 00 00 00 
4662
                    00 00 00 00 00 00 
871 lvd 4663
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 75 - 2/23/2020 18:58:45
865 lvd 4664
 
4665
 
4666
                    00 00 00 00 00 00 
4667
                    00 00 00 00 00 00 
4668
                    00 00 00 00 00 00 
4669
                    00 00 00 00 00 00 
4670
                    00 00 00 00 00 00 
4671
                    00 00 00 00 00 00 
4672
                    00 00 00 00 00 00 
4673
                    00 00 00 00 00 00 
4674
                    00 00 00 00 00 00 
4675
                    00 00 00 00 00 00 
4676
                    00 00 00 00 00 00 
4677
                    00 00 00 00 00 00 
4678
                    00 00 00 00 00 00 
4679
                    00 00 00 00 00 00 
4680
                    00 00 00 00 00 00 
4681
                    00 00 00 00 00 00 
4682
                    00 00 00 00 00 00 
4683
                    00 00 00 00 00 00 
4684
                    00 00 00 00 00 00 
4685
                    00 00 00 00 00 00 
4686
                    00 00 00 00 00 00 
4687
                    00 00 00 00 00 00 
4688
                    00 00 00 00 00 00 
4689
                    00 00 00 00 00 00 
4690
                    00 00 00 00 00 00 
4691
                    00 00 00 00 00 00 
4692
                    00 00 00 00 00 00 
4693
                    00 00 00 00 00 00 
4694
                    00 00 00 00 00 00 
4695
                    00 00 00 00 00 00 
4696
                    00 00 00 00 00 00 
4697
                    00 00 00 00 00 00 
4698
                    00 00 00 00 00 00 
4699
                    00 00 00 00 00 00 
4700
                    00 00 00 00 00 00 
4701
                    00 00 00 00 00 00 
4702
                    00 00 00 00 00 00 
4703
                    00 00 00 00 00 00 
4704
                    00 00 00 00 00 00 
4705
                    00 00 00 00 00 00 
4706
                    00 00 00 00 00 00 
4707
                    00 00 00 00 00 00 
4708
                    00 00 00 00 00 00 
4709
                    00 00 00 00 00 00 
4710
                    00 00 00 00 00 00 
4711
                    00 00 00 00 00 00 
4712
                    00 00 00 00 00 00 
4713
                    00 00 00 00 00 00 
4714
                    00 00 00 00 00 00 
4715
                    00 00 00 00 00 00 
4716
                    00 00 00 00 00 00 
4717
                    00 00 00 00 00 00 
4718
                    00 00 00 00 00 00 
4719
                    00 00 00 00 00 00 
4720
                    00 00 00 00 00 00 
4721
                    00 00 00 00 00 00 
4722
                    00 00 00 00 00 00 
4723
                    00 00 00 00 00 00 
4724
                    00 00 00 00 00 00 
4725
                    00 00 00 00 00 00 
871 lvd 4726
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 76 - 2/23/2020 18:58:45
865 lvd 4727
 
4728
 
4729
                    00 00 00 00 00 00 
4730
                    00 00 00 00 00 00 
4731
                    00 00 00 00 00 00 
4732
                    00 00 00 00 00 00 
4733
                    00 00 00 00 00 00 
4734
                    00 00 00 00 00 00 
4735
                    00 00 00 00 00 00 
4736
                    00 00 00 00 00 00 
4737
                    00 00 00 00 00 00 
4738
                    00 00 00 00 00 00 
4739
                    00 00 00 00 00 00 
4740
                    00 00 00 00 00 00 
4741
                    00 00 00 00 00 00 
4742
                    00 00 00 00 00 00 
4743
                    00 00 00 00 00 00 
4744
                    00 00 00 00 00 00 
4745
                    00 00 00 00 00 00 
4746
                    00 00 00 00 00 00 
4747
                    00 00 00 00 00 00 
4748
                    00 00 00 00 00 00 
4749
                    00 00 00 00 00 00 
4750
                    00 00 00 00 00 00 
4751
                    00 00 00 00 00 00 
4752
                    00 00 00 00 00 00 
4753
                    00 00 00 00 00 00 
4754
                    00 00 00 00 00 00 
4755
                    00 00 00 00 00 00 
4756
                    00 00 00 00 00 00 
4757
                    00 00 00 00 00 00 
4758
                    00 00 00 00 00 00 
4759
                    00 00 00 00 00 00 
4760
                    00 00 00 00 00 00 
4761
                    00 00 00 00 00 00 
4762
                    00 00 00 00 00 00 
4763
                    00 00 00 00 00 00 
4764
                    00 00 00 00 00 00 
4765
                    00 00 00 00 00 00 
4766
                    00 00 00 00 00 00 
4767
                    00 00 00 00 00 00 
4768
                    00 00 00 00 00 00 
4769
                    00 00 00 00 00 00 
4770
                    00 00 00 00 00 00 
4771
                    00 00 00 00 00 00 
4772
                    00 00 00 00 00 00 
4773
                    00 00 00 00 00 00 
4774
                    00 00 00 00 00 00 
4775
                    00 00 00 00 00 00 
4776
                    00 00 00 00 00 00 
4777
                    00 00 00 00 00 00 
4778
                    00 00 00 00 00 00 
4779
                    00 00 00 00 00 00 
4780
                    00 00 00 00 00 00 
4781
                    00 00 00 00 00 00 
4782
                    00 00 00 00 00 00 
4783
                    00 00 00 00 00 00 
4784
                    00 00 00 00 00 00 
4785
                    00 00 00 00 00 00 
4786
                    00 00 00 00 00 00 
4787
                    00 00 00 00 00 00 
4788
                    00 00 00 00 00 00 
871 lvd 4789
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 77 - 2/23/2020 18:58:45
865 lvd 4790
 
4791
 
4792
                    00 00 00 00 00 00 
4793
                    00 00 00 00 00 00 
4794
                    00 00 00 00 00 00 
4795
                    00 00 00 00 00 00 
4796
                    00 00 00 00 00 00 
4797
                    00 00 00 00 00 00 
4798
                    00 00 00 00 00 00 
4799
                    00 00 00 00 00 00 
4800
                    00 00 00 00 00 00 
4801
                    00 00 00 00 00 00 
4802
                    00 00 00 00 00 00 
4803
                    00 00 00 00 00 00 
4804
                    00 00 00 00 00 00 
4805
                    00 00 00 00 00 00 
4806
                    00 00 00 00 00 00 
4807
                    00 00 00 00 00 00 
4808
                    00 00 00 00 00 00 
4809
                    00 00 00 00 00 00 
867 lvd 4810
                    00 00 00 00 00 00 
4811
                    00 00 00 00 00 00 
865 lvd 4812
                    00 00 00 00 00 00 
4813
                    00 00 00 00 00 00 
4814
                    00 00 00 00 00 00 
4815
                    00 00 00 00 00 00 
4816
                    00 00 00 00 00 00 
4817
                    00 00 00 00 00 00 
4818
                    00 00 00 00 00 00 
4819
                    00 00 00 00 00 00 
4820
                    00 00 00 00 00 00 
4821
                    00 00 00 00 00 00 
4822
                    00 00 00 00 00 00 
4823
                    00 00 00 00 00 00 
4824
                    00 00 00 00 00 00 
4825
                    00 00 00 00 00 00 
4826
                    00 00 00 00 00 00 
4827
                    00 00 00 00 00 00 
4828
                    00 00 00 00 00 00 
871 lvd 4829
                    00 00 00 00 
4830
     240/     EA1 : =>TRUE                              IF $$M <> 0
4831
     240/     EA1 : =>NOT BLANK                         IFB 0
4832
     240/     EA1 :                                     DB $$M DUP(0)
4833
     240/     EA1 : =>TRUE                              ELSE
4834
     240/     EA1 : 00 00 00 00 00 00                   DB $$M DUP(0)
865 lvd 4835
                    00 00 00 00 00 00 
4836
                    00 00 00 00 00 00 
4837
                    00 00 00 00 00 00 
4838
                    00 00 00 00 00 00 
4839
                    00 00 00 00 00 00 
4840
                    00 00 00 00 00 00 
4841
                    00 00 00 00 00 00 
4842
                    00 00 00 00 00 00 
4843
                    00 00 00 00 00 00 
4844
                    00 00 00 00 00 00 
4845
                    00 00 00 00 00 00 
4846
                    00 00 00 00 00 00 
4847
                    00 00 00 00 00 00 
4848
                    00 00 00 00 00 00 
871 lvd 4849
                    00 00 00 00 00 
4850
     240/     F00 : [240]                               ENDIF
4851
     240/     F00 : [240]                               ENDIF
4852
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 78 - 2/23/2020 18:58:45
4853
 
4854
 
4855
     241/     F00 :                     ;вход в обработчик
4856
     242/     F00 : C9                  WORKER		RET
4857
     243/     F01 :                     
4858
     244/     F01 : (MACRO)             		DUPL 0X3D2F-$,0;XFF
4859
     244/     F01 :                     DUPL:
4860
     244/     F01 : =BH                 $$N             EQU (0X3D2F-$) / 1024
4861
     244/     F01 : =22EH               $$M             EQU (0X3D2F-$) # 1024
4862
     244/     F01 :                                     REPT $$N
4863
     244/     F01 :                                     DB 1024 DUP(0)
4864
     244/     F01 :                                     ENDM
4865
     244/     F01 : 00 00 00 00 00 00                   DB 1024 DUP(0)
865 lvd 4866
                    00 00 00 00 00 00 
4867
                    00 00 00 00 00 00 
4868
                    00 00 00 00 00 00 
4869
                    00 00 00 00 00 00 
4870
                    00 00 00 00 00 00 
4871
                    00 00 00 00 00 00 
4872
                    00 00 00 00 00 00 
4873
                    00 00 00 00 00 00 
4874
                    00 00 00 00 00 00 
4875
                    00 00 00 00 00 00 
4876
                    00 00 00 00 00 00 
4877
                    00 00 00 00 00 00 
4878
                    00 00 00 00 00 00 
4879
                    00 00 00 00 00 00 
4880
                    00 00 00 00 00 00 
4881
                    00 00 00 00 00 00 
4882
                    00 00 00 00 00 00 
4883
                    00 00 00 00 00 00 
4884
                    00 00 00 00 00 00 
4885
                    00 00 00 00 00 00 
4886
                    00 00 00 00 00 00 
4887
                    00 00 00 00 00 00 
4888
                    00 00 00 00 00 00 
4889
                    00 00 00 00 00 00 
4890
                    00 00 00 00 00 00 
4891
                    00 00 00 00 00 00 
4892
                    00 00 00 00 00 00 
4893
                    00 00 00 00 00 00 
4894
                    00 00 00 00 00 00 
4895
                    00 00 00 00 00 00 
4896
                    00 00 00 00 00 00 
4897
                    00 00 00 00 00 00 
4898
                    00 00 00 00 00 00 
4899
                    00 00 00 00 00 00 
4900
                    00 00 00 00 00 00 
4901
                    00 00 00 00 00 00 
4902
                    00 00 00 00 00 00 
867 lvd 4903
                    00 00 00 00 00 00 
4904
                    00 00 00 00 00 00 
865 lvd 4905
                    00 00 00 00 00 00 
4906
                    00 00 00 00 00 00 
4907
                    00 00 00 00 00 00 
4908
                    00 00 00 00 00 00 
4909
                    00 00 00 00 00 00 
4910
                    00 00 00 00 00 00 
4911
                    00 00 00 00 00 00 
4912
                    00 00 00 00 00 00 
4913
                    00 00 00 00 00 00 
4914
                    00 00 00 00 00 00 
871 lvd 4915
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 79 - 2/23/2020 18:58:45
865 lvd 4916
 
4917
 
4918
                    00 00 00 00 00 00 
4919
                    00 00 00 00 00 00 
4920
                    00 00 00 00 00 00 
4921
                    00 00 00 00 00 00 
4922
                    00 00 00 00 00 00 
4923
                    00 00 00 00 00 00 
4924
                    00 00 00 00 00 00 
4925
                    00 00 00 00 00 00 
4926
                    00 00 00 00 00 00 
4927
                    00 00 00 00 00 00 
4928
                    00 00 00 00 00 00 
4929
                    00 00 00 00 00 00 
4930
                    00 00 00 00 00 00 
4931
                    00 00 00 00 00 00 
4932
                    00 00 00 00 00 00 
4933
                    00 00 00 00 00 00 
4934
                    00 00 00 00 00 00 
4935
                    00 00 00 00 00 00 
4936
                    00 00 00 00 00 00 
4937
                    00 00 00 00 00 00 
4938
                    00 00 00 00 00 00 
4939
                    00 00 00 00 00 00 
4940
                    00 00 00 00 00 00 
4941
                    00 00 00 00 00 00 
4942
                    00 00 00 00 00 00 
4943
                    00 00 00 00 00 00 
4944
                    00 00 00 00 00 00 
4945
                    00 00 00 00 00 00 
4946
                    00 00 00 00 00 00 
4947
                    00 00 00 00 00 00 
4948
                    00 00 00 00 00 00 
4949
                    00 00 00 00 00 00 
4950
                    00 00 00 00 00 00 
4951
                    00 00 00 00 00 00 
4952
                    00 00 00 00 00 00 
4953
                    00 00 00 00 00 00 
4954
                    00 00 00 00 00 00 
4955
                    00 00 00 00 00 00 
4956
                    00 00 00 00 00 00 
4957
                    00 00 00 00 00 00 
4958
                    00 00 00 00 00 00 
4959
                    00 00 00 00 00 00 
4960
                    00 00 00 00 00 00 
4961
                    00 00 00 00 00 00 
4962
                    00 00 00 00 00 00 
4963
                    00 00 00 00 00 00 
4964
                    00 00 00 00 00 00 
4965
                    00 00 00 00 00 00 
4966
                    00 00 00 00 00 00 
4967
                    00 00 00 00 00 00 
4968
                    00 00 00 00 00 00 
4969
                    00 00 00 00 00 00 
4970
                    00 00 00 00 00 00 
4971
                    00 00 00 00 00 00 
4972
                    00 00 00 00 00 00 
4973
                    00 00 00 00 00 00 
4974
                    00 00 00 00 00 00 
4975
                    00 00 00 00 00 00 
4976
                    00 00 00 00 00 00 
4977
                    00 00 00 00 00 00 
871 lvd 4978
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 80 - 2/23/2020 18:58:45
865 lvd 4979
 
4980
 
4981
                    00 00 00 00 00 00 
4982
                    00 00 00 00 00 00 
4983
                    00 00 00 00 00 00 
4984
                    00 00 00 00 00 00 
4985
                    00 00 00 00 00 00 
4986
                    00 00 00 00 00 00 
4987
                    00 00 00 00 00 00 
4988
                    00 00 00 00 00 00 
4989
                    00 00 00 00 00 00 
4990
                    00 00 00 00 00 00 
4991
                    00 00 00 00 00 00 
4992
                    00 00 00 00 00 00 
4993
                    00 00 00 00 00 00 
4994
                    00 00 00 00 00 00 
4995
                    00 00 00 00 00 00 
4996
                    00 00 00 00 00 00 
4997
                    00 00 00 00 00 00 
4998
                    00 00 00 00 00 00 
4999
                    00 00 00 00 00 00 
5000
                    00 00 00 00 00 00 
5001
                    00 00 00 00 00 00 
5002
                    00 00 00 00 00 00 
5003
                    00 00 00 00 00 00 
5004
                    00 00 00 00 00 00 
5005
                    00 00 00 00 00 00 
5006
                    00 00 00 00 00 00 
5007
                    00 00 00 00 00 00 
5008
                    00 00 00 00 00 00 
5009
                    00 00 00 00 00 00 
5010
                    00 00 00 00 00 00 
5011
                    00 00 00 00 00 00 
5012
                    00 00 00 00 00 00 
5013
                    00 00 00 00 00 00 
5014
                    00 00 00 00 00 00 
5015
                    00 00 00 00 00 00 
5016
                    00 00 00 00 00 00 
5017
                    00 00 00 00 00 00 
5018
                    00 00 00 00 00 00 
5019
                    00 00 00 00 00 00 
5020
                    00 00 00 00 00 00 
5021
                    00 00 00 00 00 00 
5022
                    00 00 00 00 00 00 
5023
                    00 00 00 00 00 00 
5024
                    00 00 00 00 00 00 
5025
                    00 00 00 00 00 00 
5026
                    00 00 00 00 00 00 
5027
                    00 00 00 00 00 00 
5028
                    00 00 00 00 00 00 
5029
                    00 00 00 00 00 00 
5030
                    00 00 00 00 00 00 
5031
                    00 00 00 00 00 00 
5032
                    00 00 00 00 00 00 
5033
                    00 00 00 00 00 00 
5034
                    00 00 00 00 00 00 
5035
                    00 00 00 00 00 00 
5036
                    00 00 00 00 00 00 
5037
                    00 00 00 00 00 00 
5038
                    00 00 00 00 00 00 
5039
                    00 00 00 00 00 00 
5040
                    00 00 00 00 00 00 
871 lvd 5041
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 81 - 2/23/2020 18:58:45
865 lvd 5042
 
5043
 
871 lvd 5044
                    00 00 00 00 
5045
     244/    1301 : 00 00 00 00 00 00                   DB 1024 DUP(0)
865 lvd 5046
                    00 00 00 00 00 00 
5047
                    00 00 00 00 00 00 
5048
                    00 00 00 00 00 00 
5049
                    00 00 00 00 00 00 
5050
                    00 00 00 00 00 00 
5051
                    00 00 00 00 00 00 
5052
                    00 00 00 00 00 00 
5053
                    00 00 00 00 00 00 
5054
                    00 00 00 00 00 00 
5055
                    00 00 00 00 00 00 
5056
                    00 00 00 00 00 00 
5057
                    00 00 00 00 00 00 
5058
                    00 00 00 00 00 00 
5059
                    00 00 00 00 00 00 
5060
                    00 00 00 00 00 00 
5061
                    00 00 00 00 00 00 
5062
                    00 00 00 00 00 00 
5063
                    00 00 00 00 00 00 
5064
                    00 00 00 00 00 00 
5065
                    00 00 00 00 00 00 
5066
                    00 00 00 00 00 00 
5067
                    00 00 00 00 00 00 
5068
                    00 00 00 00 00 00 
5069
                    00 00 00 00 00 00 
5070
                    00 00 00 00 00 00 
5071
                    00 00 00 00 00 00 
5072
                    00 00 00 00 00 00 
5073
                    00 00 00 00 00 00 
5074
                    00 00 00 00 00 00 
5075
                    00 00 00 00 00 00 
5076
                    00 00 00 00 00 00 
5077
                    00 00 00 00 00 00 
5078
                    00 00 00 00 00 00 
5079
                    00 00 00 00 00 00 
5080
                    00 00 00 00 00 00 
5081
                    00 00 00 00 00 00 
5082
                    00 00 00 00 00 00 
867 lvd 5083
                    00 00 00 00 00 00 
5084
                    00 00 00 00 00 00 
865 lvd 5085
                    00 00 00 00 00 00 
5086
                    00 00 00 00 00 00 
5087
                    00 00 00 00 00 00 
5088
                    00 00 00 00 00 00 
5089
                    00 00 00 00 00 00 
5090
                    00 00 00 00 00 00 
5091
                    00 00 00 00 00 00 
5092
                    00 00 00 00 00 00 
5093
                    00 00 00 00 00 00 
5094
                    00 00 00 00 00 00 
5095
                    00 00 00 00 00 00 
5096
                    00 00 00 00 00 00 
5097
                    00 00 00 00 00 00 
5098
                    00 00 00 00 00 00 
5099
                    00 00 00 00 00 00 
5100
                    00 00 00 00 00 00 
5101
                    00 00 00 00 00 00 
5102
                    00 00 00 00 00 00 
5103
                    00 00 00 00 00 00 
871 lvd 5104
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 82 - 2/23/2020 18:58:45
865 lvd 5105
 
5106
 
5107
                    00 00 00 00 00 00 
5108
                    00 00 00 00 00 00 
5109
                    00 00 00 00 00 00 
5110
                    00 00 00 00 00 00 
5111
                    00 00 00 00 00 00 
5112
                    00 00 00 00 00 00 
5113
                    00 00 00 00 00 00 
5114
                    00 00 00 00 00 00 
5115
                    00 00 00 00 00 00 
5116
                    00 00 00 00 00 00 
5117
                    00 00 00 00 00 00 
5118
                    00 00 00 00 00 00 
5119
                    00 00 00 00 00 00 
5120
                    00 00 00 00 00 00 
5121
                    00 00 00 00 00 00 
5122
                    00 00 00 00 00 00 
5123
                    00 00 00 00 00 00 
5124
                    00 00 00 00 00 00 
5125
                    00 00 00 00 00 00 
5126
                    00 00 00 00 00 00 
5127
                    00 00 00 00 00 00 
5128
                    00 00 00 00 00 00 
5129
                    00 00 00 00 00 00 
5130
                    00 00 00 00 00 00 
5131
                    00 00 00 00 00 00 
5132
                    00 00 00 00 00 00 
5133
                    00 00 00 00 00 00 
5134
                    00 00 00 00 00 00 
5135
                    00 00 00 00 00 00 
5136
                    00 00 00 00 00 00 
5137
                    00 00 00 00 00 00 
5138
                    00 00 00 00 00 00 
5139
                    00 00 00 00 00 00 
5140
                    00 00 00 00 00 00 
5141
                    00 00 00 00 00 00 
5142
                    00 00 00 00 00 00 
5143
                    00 00 00 00 00 00 
5144
                    00 00 00 00 00 00 
5145
                    00 00 00 00 00 00 
5146
                    00 00 00 00 00 00 
5147
                    00 00 00 00 00 00 
5148
                    00 00 00 00 00 00 
5149
                    00 00 00 00 00 00 
5150
                    00 00 00 00 00 00 
5151
                    00 00 00 00 00 00 
5152
                    00 00 00 00 00 00 
5153
                    00 00 00 00 00 00 
5154
                    00 00 00 00 00 00 
5155
                    00 00 00 00 00 00 
5156
                    00 00 00 00 00 00 
5157
                    00 00 00 00 00 00 
5158
                    00 00 00 00 00 00 
5159
                    00 00 00 00 00 00 
5160
                    00 00 00 00 00 00 
5161
                    00 00 00 00 00 00 
5162
                    00 00 00 00 00 00 
5163
                    00 00 00 00 00 00 
5164
                    00 00 00 00 00 00 
5165
                    00 00 00 00 00 00 
5166
                    00 00 00 00 00 00 
871 lvd 5167
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 83 - 2/23/2020 18:58:45
865 lvd 5168
 
5169
 
5170
                    00 00 00 00 00 00 
5171
                    00 00 00 00 00 00 
5172
                    00 00 00 00 00 00 
5173
                    00 00 00 00 00 00 
5174
                    00 00 00 00 00 00 
5175
                    00 00 00 00 00 00 
5176
                    00 00 00 00 00 00 
5177
                    00 00 00 00 00 00 
5178
                    00 00 00 00 00 00 
5179
                    00 00 00 00 00 00 
5180
                    00 00 00 00 00 00 
5181
                    00 00 00 00 00 00 
5182
                    00 00 00 00 00 00 
5183
                    00 00 00 00 00 00 
5184
                    00 00 00 00 00 00 
5185
                    00 00 00 00 00 00 
5186
                    00 00 00 00 00 00 
5187
                    00 00 00 00 00 00 
5188
                    00 00 00 00 00 00 
5189
                    00 00 00 00 00 00 
5190
                    00 00 00 00 00 00 
5191
                    00 00 00 00 00 00 
5192
                    00 00 00 00 00 00 
5193
                    00 00 00 00 00 00 
5194
                    00 00 00 00 00 00 
5195
                    00 00 00 00 00 00 
5196
                    00 00 00 00 00 00 
5197
                    00 00 00 00 00 00 
5198
                    00 00 00 00 00 00 
5199
                    00 00 00 00 00 00 
5200
                    00 00 00 00 00 00 
5201
                    00 00 00 00 00 00 
5202
                    00 00 00 00 00 00 
5203
                    00 00 00 00 00 00 
5204
                    00 00 00 00 00 00 
5205
                    00 00 00 00 00 00 
5206
                    00 00 00 00 00 00 
5207
                    00 00 00 00 00 00 
5208
                    00 00 00 00 00 00 
5209
                    00 00 00 00 00 00 
5210
                    00 00 00 00 00 00 
5211
                    00 00 00 00 00 00 
5212
                    00 00 00 00 00 00 
5213
                    00 00 00 00 00 00 
5214
                    00 00 00 00 00 00 
5215
                    00 00 00 00 00 00 
5216
                    00 00 00 00 00 00 
5217
                    00 00 00 00 00 00 
5218
                    00 00 00 00 00 00 
5219
                    00 00 00 00 00 00 
5220
                    00 00 00 00 00 00 
871 lvd 5221
                    00 00 00 00 
5222
     244/    1701 : 00 00 00 00 00 00                   DB 1024 DUP(0)
865 lvd 5223
                    00 00 00 00 00 00 
5224
                    00 00 00 00 00 00 
5225
                    00 00 00 00 00 00 
5226
                    00 00 00 00 00 00 
5227
                    00 00 00 00 00 00 
5228
                    00 00 00 00 00 00 
5229
                    00 00 00 00 00 00 
871 lvd 5230
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 84 - 2/23/2020 18:58:45
865 lvd 5231
 
5232
 
5233
                    00 00 00 00 00 00 
5234
                    00 00 00 00 00 00 
5235
                    00 00 00 00 00 00 
5236
                    00 00 00 00 00 00 
5237
                    00 00 00 00 00 00 
5238
                    00 00 00 00 00 00 
5239
                    00 00 00 00 00 00 
5240
                    00 00 00 00 00 00 
5241
                    00 00 00 00 00 00 
5242
                    00 00 00 00 00 00 
5243
                    00 00 00 00 00 00 
5244
                    00 00 00 00 00 00 
5245
                    00 00 00 00 00 00 
5246
                    00 00 00 00 00 00 
5247
                    00 00 00 00 00 00 
5248
                    00 00 00 00 00 00 
5249
                    00 00 00 00 00 00 
5250
                    00 00 00 00 00 00 
5251
                    00 00 00 00 00 00 
5252
                    00 00 00 00 00 00 
5253
                    00 00 00 00 00 00 
5254
                    00 00 00 00 00 00 
5255
                    00 00 00 00 00 00 
5256
                    00 00 00 00 00 00 
5257
                    00 00 00 00 00 00 
5258
                    00 00 00 00 00 00 
5259
                    00 00 00 00 00 00 
5260
                    00 00 00 00 00 00 
867 lvd 5261
                    00 00 00 00 00 00 
5262
                    00 00 00 00 00 00 
865 lvd 5263
                    00 00 00 00 00 00 
5264
                    00 00 00 00 00 00 
5265
                    00 00 00 00 00 00 
5266
                    00 00 00 00 00 00 
5267
                    00 00 00 00 00 00 
5268
                    00 00 00 00 00 00 
5269
                    00 00 00 00 00 00 
5270
                    00 00 00 00 00 00 
5271
                    00 00 00 00 00 00 
5272
                    00 00 00 00 00 00 
5273
                    00 00 00 00 00 00 
5274
                    00 00 00 00 00 00 
5275
                    00 00 00 00 00 00 
5276
                    00 00 00 00 00 00 
5277
                    00 00 00 00 00 00 
5278
                    00 00 00 00 00 00 
5279
                    00 00 00 00 00 00 
5280
                    00 00 00 00 00 00 
5281
                    00 00 00 00 00 00 
5282
                    00 00 00 00 00 00 
5283
                    00 00 00 00 00 00 
5284
                    00 00 00 00 00 00 
5285
                    00 00 00 00 00 00 
5286
                    00 00 00 00 00 00 
5287
                    00 00 00 00 00 00 
5288
                    00 00 00 00 00 00 
5289
                    00 00 00 00 00 00 
5290
                    00 00 00 00 00 00 
871 lvd 5291
                    00 00 00 00 00 00 
5292
                    00 00 00 00 00 00 
5293
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 85 - 2/23/2020 18:58:45
865 lvd 5294
 
5295
 
5296
                    00 00 00 00 00 00 
5297
                    00 00 00 00 00 00 
5298
                    00 00 00 00 00 00 
5299
                    00 00 00 00 00 00 
5300
                    00 00 00 00 00 00 
5301
                    00 00 00 00 00 00 
5302
                    00 00 00 00 00 00 
5303
                    00 00 00 00 00 00 
5304
                    00 00 00 00 00 00 
5305
                    00 00 00 00 00 00 
5306
                    00 00 00 00 00 00 
5307
                    00 00 00 00 00 00 
5308
                    00 00 00 00 00 00 
5309
                    00 00 00 00 00 00 
5310
                    00 00 00 00 00 00 
5311
                    00 00 00 00 00 00 
5312
                    00 00 00 00 00 00 
5313
                    00 00 00 00 00 00 
5314
                    00 00 00 00 00 00 
5315
                    00 00 00 00 00 00 
5316
                    00 00 00 00 00 00 
5317
                    00 00 00 00 00 00 
5318
                    00 00 00 00 00 00 
5319
                    00 00 00 00 00 00 
5320
                    00 00 00 00 00 00 
5321
                    00 00 00 00 00 00 
5322
                    00 00 00 00 00 00 
5323
                    00 00 00 00 00 00 
5324
                    00 00 00 00 00 00 
5325
                    00 00 00 00 00 00 
5326
                    00 00 00 00 00 00 
5327
                    00 00 00 00 00 00 
5328
                    00 00 00 00 00 00 
5329
                    00 00 00 00 00 00 
5330
                    00 00 00 00 00 00 
5331
                    00 00 00 00 00 00 
5332
                    00 00 00 00 00 00 
5333
                    00 00 00 00 00 00 
5334
                    00 00 00 00 00 00 
5335
                    00 00 00 00 00 00 
5336
                    00 00 00 00 00 00 
5337
                    00 00 00 00 00 00 
5338
                    00 00 00 00 00 00 
5339
                    00 00 00 00 00 00 
5340
                    00 00 00 00 00 00 
5341
                    00 00 00 00 00 00 
5342
                    00 00 00 00 00 00 
5343
                    00 00 00 00 00 00 
5344
                    00 00 00 00 00 00 
5345
                    00 00 00 00 00 00 
5346
                    00 00 00 00 00 00 
5347
                    00 00 00 00 00 00 
5348
                    00 00 00 00 00 00 
5349
                    00 00 00 00 00 00 
5350
                    00 00 00 00 00 00 
5351
                    00 00 00 00 00 00 
5352
                    00 00 00 00 00 00 
5353
                    00 00 00 00 00 00 
5354
                    00 00 00 00 00 00 
5355
                    00 00 00 00 00 00 
871 lvd 5356
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 86 - 2/23/2020 18:58:45
865 lvd 5357
 
5358
 
5359
                    00 00 00 00 00 00 
5360
                    00 00 00 00 00 00 
5361
                    00 00 00 00 00 00 
5362
                    00 00 00 00 00 00 
5363
                    00 00 00 00 00 00 
5364
                    00 00 00 00 00 00 
5365
                    00 00 00 00 00 00 
5366
                    00 00 00 00 00 00 
5367
                    00 00 00 00 00 00 
5368
                    00 00 00 00 00 00 
5369
                    00 00 00 00 00 00 
5370
                    00 00 00 00 00 00 
5371
                    00 00 00 00 00 00 
5372
                    00 00 00 00 00 00 
5373
                    00 00 00 00 00 00 
5374
                    00 00 00 00 00 00 
5375
                    00 00 00 00 00 00 
5376
                    00 00 00 00 00 00 
5377
                    00 00 00 00 00 00 
5378
                    00 00 00 00 00 00 
5379
                    00 00 00 00 00 00 
5380
                    00 00 00 00 00 00 
5381
                    00 00 00 00 00 00 
5382
                    00 00 00 00 00 00 
5383
                    00 00 00 00 00 00 
5384
                    00 00 00 00 00 00 
5385
                    00 00 00 00 00 00 
5386
                    00 00 00 00 00 00 
5387
                    00 00 00 00 00 00 
5388
                    00 00 00 00 00 00 
5389
                    00 00 00 00 00 00 
5390
                    00 00 00 00 00 00 
5391
                    00 00 00 00 00 00 
5392
                    00 00 00 00 00 00 
5393
                    00 00 00 00 00 00 
5394
                    00 00 00 00 00 00 
5395
                    00 00 00 00 00 00 
5396
                    00 00 00 00 00 00 
5397
                    00 00 00 00 00 00 
5398
                    00 00 00 00 00 00 
5399
                    00 00 00 00 00 00 
5400
                    00 00 00 00 00 00 
871 lvd 5401
                    00 00 00 00 
5402
     244/    1B01 : 00 00 00 00 00 00                   DB 1024 DUP(0)
865 lvd 5403
                    00 00 00 00 00 00 
5404
                    00 00 00 00 00 00 
5405
                    00 00 00 00 00 00 
5406
                    00 00 00 00 00 00 
5407
                    00 00 00 00 00 00 
5408
                    00 00 00 00 00 00 
5409
                    00 00 00 00 00 00 
5410
                    00 00 00 00 00 00 
5411
                    00 00 00 00 00 00 
5412
                    00 00 00 00 00 00 
5413
                    00 00 00 00 00 00 
5414
                    00 00 00 00 00 00 
5415
                    00 00 00 00 00 00 
5416
                    00 00 00 00 00 00 
5417
                    00 00 00 00 00 00 
5418
                    00 00 00 00 00 00 
871 lvd 5419
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 87 - 2/23/2020 18:58:45
865 lvd 5420
 
5421
 
5422
                    00 00 00 00 00 00 
5423
                    00 00 00 00 00 00 
5424
                    00 00 00 00 00 00 
5425
                    00 00 00 00 00 00 
5426
                    00 00 00 00 00 00 
5427
                    00 00 00 00 00 00 
5428
                    00 00 00 00 00 00 
5429
                    00 00 00 00 00 00 
5430
                    00 00 00 00 00 00 
5431
                    00 00 00 00 00 00 
5432
                    00 00 00 00 00 00 
5433
                    00 00 00 00 00 00 
5434
                    00 00 00 00 00 00 
5435
                    00 00 00 00 00 00 
5436
                    00 00 00 00 00 00 
5437
                    00 00 00 00 00 00 
5438
                    00 00 00 00 00 00 
5439
                    00 00 00 00 00 00 
5440
                    00 00 00 00 00 00 
867 lvd 5441
                    00 00 00 00 00 00 
5442
                    00 00 00 00 00 00 
865 lvd 5443
                    00 00 00 00 00 00 
5444
                    00 00 00 00 00 00 
5445
                    00 00 00 00 00 00 
5446
                    00 00 00 00 00 00 
5447
                    00 00 00 00 00 00 
5448
                    00 00 00 00 00 00 
5449
                    00 00 00 00 00 00 
5450
                    00 00 00 00 00 00 
5451
                    00 00 00 00 00 00 
5452
                    00 00 00 00 00 00 
5453
                    00 00 00 00 00 00 
5454
                    00 00 00 00 00 00 
5455
                    00 00 00 00 00 00 
5456
                    00 00 00 00 00 00 
5457
                    00 00 00 00 00 00 
5458
                    00 00 00 00 00 00 
5459
                    00 00 00 00 00 00 
5460
                    00 00 00 00 00 00 
5461
                    00 00 00 00 00 00 
5462
                    00 00 00 00 00 00 
5463
                    00 00 00 00 00 00 
5464
                    00 00 00 00 00 00 
5465
                    00 00 00 00 00 00 
5466
                    00 00 00 00 00 00 
5467
                    00 00 00 00 00 00 
5468
                    00 00 00 00 00 00 
5469
                    00 00 00 00 00 00 
5470
                    00 00 00 00 00 00 
5471
                    00 00 00 00 00 00 
5472
                    00 00 00 00 00 00 
5473
                    00 00 00 00 00 00 
5474
                    00 00 00 00 00 00 
5475
                    00 00 00 00 00 00 
5476
                    00 00 00 00 00 00 
5477
                    00 00 00 00 00 00 
5478
                    00 00 00 00 00 00 
5479
                    00 00 00 00 00 00 
871 lvd 5480
                    00 00 00 00 00 00 
5481
                    00 00 00 00 00 00 
5482
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 88 - 2/23/2020 18:58:45
865 lvd 5483
 
5484
 
5485
                    00 00 00 00 00 00 
5486
                    00 00 00 00 00 00 
5487
                    00 00 00 00 00 00 
5488
                    00 00 00 00 00 00 
5489
                    00 00 00 00 00 00 
5490
                    00 00 00 00 00 00 
5491
                    00 00 00 00 00 00 
5492
                    00 00 00 00 00 00 
5493
                    00 00 00 00 00 00 
5494
                    00 00 00 00 00 00 
5495
                    00 00 00 00 00 00 
5496
                    00 00 00 00 00 00 
5497
                    00 00 00 00 00 00 
5498
                    00 00 00 00 00 00 
5499
                    00 00 00 00 00 00 
5500
                    00 00 00 00 00 00 
5501
                    00 00 00 00 00 00 
5502
                    00 00 00 00 00 00 
5503
                    00 00 00 00 00 00 
5504
                    00 00 00 00 00 00 
5505
                    00 00 00 00 00 00 
5506
                    00 00 00 00 00 00 
5507
                    00 00 00 00 00 00 
5508
                    00 00 00 00 00 00 
5509
                    00 00 00 00 00 00 
5510
                    00 00 00 00 00 00 
5511
                    00 00 00 00 00 00 
5512
                    00 00 00 00 00 00 
5513
                    00 00 00 00 00 00 
5514
                    00 00 00 00 00 00 
5515
                    00 00 00 00 00 00 
5516
                    00 00 00 00 00 00 
5517
                    00 00 00 00 00 00 
5518
                    00 00 00 00 00 00 
5519
                    00 00 00 00 00 00 
5520
                    00 00 00 00 00 00 
5521
                    00 00 00 00 00 00 
5522
                    00 00 00 00 00 00 
5523
                    00 00 00 00 00 00 
5524
                    00 00 00 00 00 00 
5525
                    00 00 00 00 00 00 
5526
                    00 00 00 00 00 00 
5527
                    00 00 00 00 00 00 
5528
                    00 00 00 00 00 00 
5529
                    00 00 00 00 00 00 
5530
                    00 00 00 00 00 00 
5531
                    00 00 00 00 00 00 
5532
                    00 00 00 00 00 00 
5533
                    00 00 00 00 00 00 
5534
                    00 00 00 00 00 00 
5535
                    00 00 00 00 00 00 
5536
                    00 00 00 00 00 00 
5537
                    00 00 00 00 00 00 
5538
                    00 00 00 00 00 00 
5539
                    00 00 00 00 00 00 
5540
                    00 00 00 00 00 00 
5541
                    00 00 00 00 00 00 
5542
                    00 00 00 00 00 00 
5543
                    00 00 00 00 00 00 
5544
                    00 00 00 00 00 00 
871 lvd 5545
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 89 - 2/23/2020 18:58:45
865 lvd 5546
 
5547
 
5548
                    00 00 00 00 00 00 
5549
                    00 00 00 00 00 00 
5550
                    00 00 00 00 00 00 
5551
                    00 00 00 00 00 00 
5552
                    00 00 00 00 00 00 
5553
                    00 00 00 00 00 00 
5554
                    00 00 00 00 00 00 
5555
                    00 00 00 00 00 00 
5556
                    00 00 00 00 00 00 
5557
                    00 00 00 00 00 00 
5558
                    00 00 00 00 00 00 
5559
                    00 00 00 00 00 00 
5560
                    00 00 00 00 00 00 
5561
                    00 00 00 00 00 00 
5562
                    00 00 00 00 00 00 
5563
                    00 00 00 00 00 00 
5564
                    00 00 00 00 00 00 
5565
                    00 00 00 00 00 00 
5566
                    00 00 00 00 00 00 
5567
                    00 00 00 00 00 00 
5568
                    00 00 00 00 00 00 
5569
                    00 00 00 00 00 00 
5570
                    00 00 00 00 00 00 
5571
                    00 00 00 00 00 00 
5572
                    00 00 00 00 00 00 
5573
                    00 00 00 00 00 00 
5574
                    00 00 00 00 00 00 
5575
                    00 00 00 00 00 00 
5576
                    00 00 00 00 00 00 
5577
                    00 00 00 00 00 00 
5578
                    00 00 00 00 00 00 
5579
                    00 00 00 00 00 00 
5580
                    00 00 00 00 00 00 
871 lvd 5581
                    00 00 00 00 
5582
     244/    1F01 : 00 00 00 00 00 00                   DB 1024 DUP(0)
865 lvd 5583
                    00 00 00 00 00 00 
5584
                    00 00 00 00 00 00 
5585
                    00 00 00 00 00 00 
5586
                    00 00 00 00 00 00 
5587
                    00 00 00 00 00 00 
5588
                    00 00 00 00 00 00 
5589
                    00 00 00 00 00 00 
5590
                    00 00 00 00 00 00 
5591
                    00 00 00 00 00 00 
5592
                    00 00 00 00 00 00 
5593
                    00 00 00 00 00 00 
5594
                    00 00 00 00 00 00 
5595
                    00 00 00 00 00 00 
5596
                    00 00 00 00 00 00 
5597
                    00 00 00 00 00 00 
5598
                    00 00 00 00 00 00 
5599
                    00 00 00 00 00 00 
5600
                    00 00 00 00 00 00 
5601
                    00 00 00 00 00 00 
5602
                    00 00 00 00 00 00 
5603
                    00 00 00 00 00 00 
5604
                    00 00 00 00 00 00 
5605
                    00 00 00 00 00 00 
5606
                    00 00 00 00 00 00 
5607
                    00 00 00 00 00 00 
871 lvd 5608
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 90 - 2/23/2020 18:58:45
865 lvd 5609
 
5610
 
5611
                    00 00 00 00 00 00 
5612
                    00 00 00 00 00 00 
5613
                    00 00 00 00 00 00 
5614
                    00 00 00 00 00 00 
5615
                    00 00 00 00 00 00 
5616
                    00 00 00 00 00 00 
5617
                    00 00 00 00 00 00 
5618
                    00 00 00 00 00 00 
5619
                    00 00 00 00 00 00 
5620
                    00 00 00 00 00 00 
867 lvd 5621
                    00 00 00 00 00 00 
5622
                    00 00 00 00 00 00 
865 lvd 5623
                    00 00 00 00 00 00 
5624
                    00 00 00 00 00 00 
5625
                    00 00 00 00 00 00 
5626
                    00 00 00 00 00 00 
5627
                    00 00 00 00 00 00 
5628
                    00 00 00 00 00 00 
5629
                    00 00 00 00 00 00 
5630
                    00 00 00 00 00 00 
5631
                    00 00 00 00 00 00 
5632
                    00 00 00 00 00 00 
5633
                    00 00 00 00 00 00 
5634
                    00 00 00 00 00 00 
5635
                    00 00 00 00 00 00 
5636
                    00 00 00 00 00 00 
5637
                    00 00 00 00 00 00 
5638
                    00 00 00 00 00 00 
5639
                    00 00 00 00 00 00 
5640
                    00 00 00 00 00 00 
5641
                    00 00 00 00 00 00 
5642
                    00 00 00 00 00 00 
5643
                    00 00 00 00 00 00 
5644
                    00 00 00 00 00 00 
5645
                    00 00 00 00 00 00 
5646
                    00 00 00 00 00 00 
5647
                    00 00 00 00 00 00 
5648
                    00 00 00 00 00 00 
5649
                    00 00 00 00 00 00 
5650
                    00 00 00 00 00 00 
5651
                    00 00 00 00 00 00 
5652
                    00 00 00 00 00 00 
5653
                    00 00 00 00 00 00 
5654
                    00 00 00 00 00 00 
5655
                    00 00 00 00 00 00 
5656
                    00 00 00 00 00 00 
5657
                    00 00 00 00 00 00 
5658
                    00 00 00 00 00 00 
5659
                    00 00 00 00 00 00 
5660
                    00 00 00 00 00 00 
5661
                    00 00 00 00 00 00 
5662
                    00 00 00 00 00 00 
5663
                    00 00 00 00 00 00 
5664
                    00 00 00 00 00 00 
5665
                    00 00 00 00 00 00 
5666
                    00 00 00 00 00 00 
5667
                    00 00 00 00 00 00 
5668
                    00 00 00 00 00 00 
871 lvd 5669
                    00 00 00 00 00 00 
5670
                    00 00 00 00 00 00 
5671
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 91 - 2/23/2020 18:58:45
865 lvd 5672
 
5673
 
5674
                    00 00 00 00 00 00 
5675
                    00 00 00 00 00 00 
5676
                    00 00 00 00 00 00 
5677
                    00 00 00 00 00 00 
5678
                    00 00 00 00 00 00 
5679
                    00 00 00 00 00 00 
5680
                    00 00 00 00 00 00 
5681
                    00 00 00 00 00 00 
5682
                    00 00 00 00 00 00 
5683
                    00 00 00 00 00 00 
5684
                    00 00 00 00 00 00 
5685
                    00 00 00 00 00 00 
5686
                    00 00 00 00 00 00 
5687
                    00 00 00 00 00 00 
5688
                    00 00 00 00 00 00 
5689
                    00 00 00 00 00 00 
5690
                    00 00 00 00 00 00 
5691
                    00 00 00 00 00 00 
5692
                    00 00 00 00 00 00 
5693
                    00 00 00 00 00 00 
5694
                    00 00 00 00 00 00 
5695
                    00 00 00 00 00 00 
5696
                    00 00 00 00 00 00 
5697
                    00 00 00 00 00 00 
5698
                    00 00 00 00 00 00 
5699
                    00 00 00 00 00 00 
5700
                    00 00 00 00 00 00 
5701
                    00 00 00 00 00 00 
5702
                    00 00 00 00 00 00 
5703
                    00 00 00 00 00 00 
5704
                    00 00 00 00 00 00 
5705
                    00 00 00 00 00 00 
5706
                    00 00 00 00 00 00 
5707
                    00 00 00 00 00 00 
5708
                    00 00 00 00 00 00 
5709
                    00 00 00 00 00 00 
5710
                    00 00 00 00 00 00 
5711
                    00 00 00 00 00 00 
5712
                    00 00 00 00 00 00 
5713
                    00 00 00 00 00 00 
5714
                    00 00 00 00 00 00 
5715
                    00 00 00 00 00 00 
5716
                    00 00 00 00 00 00 
5717
                    00 00 00 00 00 00 
5718
                    00 00 00 00 00 00 
5719
                    00 00 00 00 00 00 
5720
                    00 00 00 00 00 00 
5721
                    00 00 00 00 00 00 
5722
                    00 00 00 00 00 00 
5723
                    00 00 00 00 00 00 
5724
                    00 00 00 00 00 00 
5725
                    00 00 00 00 00 00 
5726
                    00 00 00 00 00 00 
5727
                    00 00 00 00 00 00 
5728
                    00 00 00 00 00 00 
5729
                    00 00 00 00 00 00 
5730
                    00 00 00 00 00 00 
5731
                    00 00 00 00 00 00 
5732
                    00 00 00 00 00 00 
5733
                    00 00 00 00 00 00 
871 lvd 5734
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 92 - 2/23/2020 18:58:45
865 lvd 5735
 
5736
 
5737
                    00 00 00 00 00 00 
5738
                    00 00 00 00 00 00 
5739
                    00 00 00 00 00 00 
5740
                    00 00 00 00 00 00 
5741
                    00 00 00 00 00 00 
5742
                    00 00 00 00 00 00 
5743
                    00 00 00 00 00 00 
5744
                    00 00 00 00 00 00 
5745
                    00 00 00 00 00 00 
5746
                    00 00 00 00 00 00 
5747
                    00 00 00 00 00 00 
5748
                    00 00 00 00 00 00 
5749
                    00 00 00 00 00 00 
5750
                    00 00 00 00 00 00 
5751
                    00 00 00 00 00 00 
5752
                    00 00 00 00 00 00 
5753
                    00 00 00 00 00 00 
5754
                    00 00 00 00 00 00 
5755
                    00 00 00 00 00 00 
5756
                    00 00 00 00 00 00 
5757
                    00 00 00 00 00 00 
5758
                    00 00 00 00 00 00 
5759
                    00 00 00 00 00 00 
5760
                    00 00 00 00 00 00 
871 lvd 5761
                    00 00 00 00 
5762
     244/    2301 : 00 00 00 00 00 00                   DB 1024 DUP(0)
865 lvd 5763
                    00 00 00 00 00 00 
5764
                    00 00 00 00 00 00 
5765
                    00 00 00 00 00 00 
5766
                    00 00 00 00 00 00 
5767
                    00 00 00 00 00 00 
5768
                    00 00 00 00 00 00 
5769
                    00 00 00 00 00 00 
5770
                    00 00 00 00 00 00 
5771
                    00 00 00 00 00 00 
5772
                    00 00 00 00 00 00 
5773
                    00 00 00 00 00 00 
5774
                    00 00 00 00 00 00 
5775
                    00 00 00 00 00 00 
5776
                    00 00 00 00 00 00 
5777
                    00 00 00 00 00 00 
5778
                    00 00 00 00 00 00 
5779
                    00 00 00 00 00 00 
5780
                    00 00 00 00 00 00 
5781
                    00 00 00 00 00 00 
5782
                    00 00 00 00 00 00 
5783
                    00 00 00 00 00 00 
5784
                    00 00 00 00 00 00 
5785
                    00 00 00 00 00 00 
5786
                    00 00 00 00 00 00 
5787
                    00 00 00 00 00 00 
5788
                    00 00 00 00 00 00 
5789
                    00 00 00 00 00 00 
5790
                    00 00 00 00 00 00 
5791
                    00 00 00 00 00 00 
5792
                    00 00 00 00 00 00 
5793
                    00 00 00 00 00 00 
5794
                    00 00 00 00 00 00 
5795
                    00 00 00 00 00 00 
5796
                    00 00 00 00 00 00 
871 lvd 5797
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 93 - 2/23/2020 18:58:45
865 lvd 5798
 
5799
 
5800
                    00 00 00 00 00 00 
867 lvd 5801
                    00 00 00 00 00 00 
5802
                    00 00 00 00 00 00 
865 lvd 5803
                    00 00 00 00 00 00 
5804
                    00 00 00 00 00 00 
5805
                    00 00 00 00 00 00 
5806
                    00 00 00 00 00 00 
5807
                    00 00 00 00 00 00 
5808
                    00 00 00 00 00 00 
5809
                    00 00 00 00 00 00 
5810
                    00 00 00 00 00 00 
5811
                    00 00 00 00 00 00 
5812
                    00 00 00 00 00 00 
5813
                    00 00 00 00 00 00 
5814
                    00 00 00 00 00 00 
5815
                    00 00 00 00 00 00 
5816
                    00 00 00 00 00 00 
5817
                    00 00 00 00 00 00 
5818
                    00 00 00 00 00 00 
5819
                    00 00 00 00 00 00 
5820
                    00 00 00 00 00 00 
5821
                    00 00 00 00 00 00 
5822
                    00 00 00 00 00 00 
5823
                    00 00 00 00 00 00 
5824
                    00 00 00 00 00 00 
5825
                    00 00 00 00 00 00 
5826
                    00 00 00 00 00 00 
5827
                    00 00 00 00 00 00 
5828
                    00 00 00 00 00 00 
5829
                    00 00 00 00 00 00 
5830
                    00 00 00 00 00 00 
5831
                    00 00 00 00 00 00 
5832
                    00 00 00 00 00 00 
5833
                    00 00 00 00 00 00 
5834
                    00 00 00 00 00 00 
5835
                    00 00 00 00 00 00 
5836
                    00 00 00 00 00 00 
5837
                    00 00 00 00 00 00 
5838
                    00 00 00 00 00 00 
5839
                    00 00 00 00 00 00 
5840
                    00 00 00 00 00 00 
5841
                    00 00 00 00 00 00 
5842
                    00 00 00 00 00 00 
5843
                    00 00 00 00 00 00 
5844
                    00 00 00 00 00 00 
5845
                    00 00 00 00 00 00 
5846
                    00 00 00 00 00 00 
5847
                    00 00 00 00 00 00 
5848
                    00 00 00 00 00 00 
5849
                    00 00 00 00 00 00 
5850
                    00 00 00 00 00 00 
5851
                    00 00 00 00 00 00 
5852
                    00 00 00 00 00 00 
5853
                    00 00 00 00 00 00 
5854
                    00 00 00 00 00 00 
5855
                    00 00 00 00 00 00 
5856
                    00 00 00 00 00 00 
5857
                    00 00 00 00 00 00 
871 lvd 5858
                    00 00 00 00 00 00 
5859
                    00 00 00 00 00 00 
5860
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 94 - 2/23/2020 18:58:45
865 lvd 5861
 
5862
 
5863
                    00 00 00 00 00 00 
5864
                    00 00 00 00 00 00 
5865
                    00 00 00 00 00 00 
5866
                    00 00 00 00 00 00 
5867
                    00 00 00 00 00 00 
5868
                    00 00 00 00 00 00 
5869
                    00 00 00 00 00 00 
5870
                    00 00 00 00 00 00 
5871
                    00 00 00 00 00 00 
5872
                    00 00 00 00 00 00 
5873
                    00 00 00 00 00 00 
5874
                    00 00 00 00 00 00 
5875
                    00 00 00 00 00 00 
5876
                    00 00 00 00 00 00 
5877
                    00 00 00 00 00 00 
5878
                    00 00 00 00 00 00 
5879
                    00 00 00 00 00 00 
5880
                    00 00 00 00 00 00 
5881
                    00 00 00 00 00 00 
5882
                    00 00 00 00 00 00 
5883
                    00 00 00 00 00 00 
5884
                    00 00 00 00 00 00 
5885
                    00 00 00 00 00 00 
5886
                    00 00 00 00 00 00 
5887
                    00 00 00 00 00 00 
5888
                    00 00 00 00 00 00 
5889
                    00 00 00 00 00 00 
5890
                    00 00 00 00 00 00 
5891
                    00 00 00 00 00 00 
5892
                    00 00 00 00 00 00 
5893
                    00 00 00 00 00 00 
5894
                    00 00 00 00 00 00 
5895
                    00 00 00 00 00 00 
5896
                    00 00 00 00 00 00 
5897
                    00 00 00 00 00 00 
5898
                    00 00 00 00 00 00 
5899
                    00 00 00 00 00 00 
5900
                    00 00 00 00 00 00 
5901
                    00 00 00 00 00 00 
5902
                    00 00 00 00 00 00 
5903
                    00 00 00 00 00 00 
5904
                    00 00 00 00 00 00 
5905
                    00 00 00 00 00 00 
5906
                    00 00 00 00 00 00 
5907
                    00 00 00 00 00 00 
5908
                    00 00 00 00 00 00 
5909
                    00 00 00 00 00 00 
5910
                    00 00 00 00 00 00 
5911
                    00 00 00 00 00 00 
5912
                    00 00 00 00 00 00 
5913
                    00 00 00 00 00 00 
5914
                    00 00 00 00 00 00 
5915
                    00 00 00 00 00 00 
5916
                    00 00 00 00 00 00 
5917
                    00 00 00 00 00 00 
5918
                    00 00 00 00 00 00 
5919
                    00 00 00 00 00 00 
5920
                    00 00 00 00 00 00 
5921
                    00 00 00 00 00 00 
5922
                    00 00 00 00 00 00 
871 lvd 5923
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 95 - 2/23/2020 18:58:45
865 lvd 5924
 
5925
 
5926
                    00 00 00 00 00 00 
5927
                    00 00 00 00 00 00 
5928
                    00 00 00 00 00 00 
5929
                    00 00 00 00 00 00 
5930
                    00 00 00 00 00 00 
5931
                    00 00 00 00 00 00 
5932
                    00 00 00 00 00 00 
5933
                    00 00 00 00 00 00 
5934
                    00 00 00 00 00 00 
5935
                    00 00 00 00 00 00 
5936
                    00 00 00 00 00 00 
5937
                    00 00 00 00 00 00 
5938
                    00 00 00 00 00 00 
5939
                    00 00 00 00 00 00 
5940
                    00 00 00 00 00 00 
871 lvd 5941
                    00 00 00 00 
5942
     244/    2701 : 00 00 00 00 00 00                   DB 1024 DUP(0)
865 lvd 5943
                    00 00 00 00 00 00 
5944
                    00 00 00 00 00 00 
5945
                    00 00 00 00 00 00 
5946
                    00 00 00 00 00 00 
5947
                    00 00 00 00 00 00 
5948
                    00 00 00 00 00 00 
5949
                    00 00 00 00 00 00 
5950
                    00 00 00 00 00 00 
5951
                    00 00 00 00 00 00 
5952
                    00 00 00 00 00 00 
5953
                    00 00 00 00 00 00 
5954
                    00 00 00 00 00 00 
5955
                    00 00 00 00 00 00 
5956
                    00 00 00 00 00 00 
5957
                    00 00 00 00 00 00 
5958
                    00 00 00 00 00 00 
5959
                    00 00 00 00 00 00 
5960
                    00 00 00 00 00 00 
5961
                    00 00 00 00 00 00 
5962
                    00 00 00 00 00 00 
5963
                    00 00 00 00 00 00 
5964
                    00 00 00 00 00 00 
5965
                    00 00 00 00 00 00 
5966
                    00 00 00 00 00 00 
5967
                    00 00 00 00 00 00 
5968
                    00 00 00 00 00 00 
5969
                    00 00 00 00 00 00 
5970
                    00 00 00 00 00 00 
5971
                    00 00 00 00 00 00 
5972
                    00 00 00 00 00 00 
5973
                    00 00 00 00 00 00 
5974
                    00 00 00 00 00 00 
5975
                    00 00 00 00 00 00 
5976
                    00 00 00 00 00 00 
5977
                    00 00 00 00 00 00 
5978
                    00 00 00 00 00 00 
5979
                    00 00 00 00 00 00 
867 lvd 5980
                    00 00 00 00 00 00 
5981
                    00 00 00 00 00 00 
865 lvd 5982
                    00 00 00 00 00 00 
5983
                    00 00 00 00 00 00 
5984
                    00 00 00 00 00 00 
5985
                    00 00 00 00 00 00 
871 lvd 5986
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 96 - 2/23/2020 18:58:45
865 lvd 5987
 
5988
 
5989
                    00 00 00 00 00 00 
5990
                    00 00 00 00 00 00 
5991
                    00 00 00 00 00 00 
5992
                    00 00 00 00 00 00 
5993
                    00 00 00 00 00 00 
5994
                    00 00 00 00 00 00 
5995
                    00 00 00 00 00 00 
5996
                    00 00 00 00 00 00 
5997
                    00 00 00 00 00 00 
5998
                    00 00 00 00 00 00 
5999
                    00 00 00 00 00 00 
6000
                    00 00 00 00 00 00 
6001
                    00 00 00 00 00 00 
6002
                    00 00 00 00 00 00 
6003
                    00 00 00 00 00 00 
6004
                    00 00 00 00 00 00 
6005
                    00 00 00 00 00 00 
6006
                    00 00 00 00 00 00 
6007
                    00 00 00 00 00 00 
6008
                    00 00 00 00 00 00 
6009
                    00 00 00 00 00 00 
6010
                    00 00 00 00 00 00 
6011
                    00 00 00 00 00 00 
6012
                    00 00 00 00 00 00 
6013
                    00 00 00 00 00 00 
6014
                    00 00 00 00 00 00 
6015
                    00 00 00 00 00 00 
6016
                    00 00 00 00 00 00 
6017
                    00 00 00 00 00 00 
6018
                    00 00 00 00 00 00 
6019
                    00 00 00 00 00 00 
6020
                    00 00 00 00 00 00 
6021
                    00 00 00 00 00 00 
6022
                    00 00 00 00 00 00 
6023
                    00 00 00 00 00 00 
6024
                    00 00 00 00 00 00 
6025
                    00 00 00 00 00 00 
6026
                    00 00 00 00 00 00 
6027
                    00 00 00 00 00 00 
6028
                    00 00 00 00 00 00 
6029
                    00 00 00 00 00 00 
6030
                    00 00 00 00 00 00 
6031
                    00 00 00 00 00 00 
6032
                    00 00 00 00 00 00 
6033
                    00 00 00 00 00 00 
6034
                    00 00 00 00 00 00 
6035
                    00 00 00 00 00 00 
6036
                    00 00 00 00 00 00 
6037
                    00 00 00 00 00 00 
6038
                    00 00 00 00 00 00 
6039
                    00 00 00 00 00 00 
6040
                    00 00 00 00 00 00 
6041
                    00 00 00 00 00 00 
6042
                    00 00 00 00 00 00 
6043
                    00 00 00 00 00 00 
6044
                    00 00 00 00 00 00 
6045
                    00 00 00 00 00 00 
6046
                    00 00 00 00 00 00 
6047
                    00 00 00 00 00 00 
6048
                    00 00 00 00 00 00 
871 lvd 6049
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 97 - 2/23/2020 18:58:45
865 lvd 6050
 
6051
 
6052
                    00 00 00 00 00 00 
6053
                    00 00 00 00 00 00 
6054
                    00 00 00 00 00 00 
6055
                    00 00 00 00 00 00 
6056
                    00 00 00 00 00 00 
6057
                    00 00 00 00 00 00 
6058
                    00 00 00 00 00 00 
6059
                    00 00 00 00 00 00 
6060
                    00 00 00 00 00 00 
6061
                    00 00 00 00 00 00 
6062
                    00 00 00 00 00 00 
6063
                    00 00 00 00 00 00 
6064
                    00 00 00 00 00 00 
6065
                    00 00 00 00 00 00 
6066
                    00 00 00 00 00 00 
6067
                    00 00 00 00 00 00 
6068
                    00 00 00 00 00 00 
6069
                    00 00 00 00 00 00 
6070
                    00 00 00 00 00 00 
6071
                    00 00 00 00 00 00 
6072
                    00 00 00 00 00 00 
6073
                    00 00 00 00 00 00 
6074
                    00 00 00 00 00 00 
6075
                    00 00 00 00 00 00 
6076
                    00 00 00 00 00 00 
6077
                    00 00 00 00 00 00 
6078
                    00 00 00 00 00 00 
6079
                    00 00 00 00 00 00 
6080
                    00 00 00 00 00 00 
6081
                    00 00 00 00 00 00 
6082
                    00 00 00 00 00 00 
6083
                    00 00 00 00 00 00 
6084
                    00 00 00 00 00 00 
6085
                    00 00 00 00 00 00 
6086
                    00 00 00 00 00 00 
6087
                    00 00 00 00 00 00 
6088
                    00 00 00 00 00 00 
6089
                    00 00 00 00 00 00 
6090
                    00 00 00 00 00 00 
6091
                    00 00 00 00 00 00 
6092
                    00 00 00 00 00 00 
6093
                    00 00 00 00 00 00 
6094
                    00 00 00 00 00 00 
6095
                    00 00 00 00 00 00 
6096
                    00 00 00 00 00 00 
6097
                    00 00 00 00 00 00 
6098
                    00 00 00 00 00 00 
6099
                    00 00 00 00 00 00 
6100
                    00 00 00 00 00 00 
6101
                    00 00 00 00 00 00 
6102
                    00 00 00 00 00 00 
6103
                    00 00 00 00 00 00 
6104
                    00 00 00 00 00 00 
6105
                    00 00 00 00 00 00 
6106
                    00 00 00 00 00 00 
6107
                    00 00 00 00 00 00 
6108
                    00 00 00 00 00 00 
6109
                    00 00 00 00 00 00 
6110
                    00 00 00 00 00 00 
6111
                    00 00 00 00 00 00 
871 lvd 6112
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 98 - 2/23/2020 18:58:45
865 lvd 6113
 
6114
 
6115
                    00 00 00 00 00 00 
6116
                    00 00 00 00 00 00 
6117
                    00 00 00 00 00 00 
6118
                    00 00 00 00 00 00 
6119
                    00 00 00 00 00 00 
6120
                    00 00 00 00 00 00 
871 lvd 6121
                    00 00 00 00 
6122
     244/    2B01 : 00 00 00 00 00 00                   DB 1024 DUP(0)
865 lvd 6123
                    00 00 00 00 00 00 
6124
                    00 00 00 00 00 00 
6125
                    00 00 00 00 00 00 
6126
                    00 00 00 00 00 00 
6127
                    00 00 00 00 00 00 
6128
                    00 00 00 00 00 00 
6129
                    00 00 00 00 00 00 
6130
                    00 00 00 00 00 00 
6131
                    00 00 00 00 00 00 
6132
                    00 00 00 00 00 00 
6133
                    00 00 00 00 00 00 
6134
                    00 00 00 00 00 00 
6135
                    00 00 00 00 00 00 
6136
                    00 00 00 00 00 00 
6137
                    00 00 00 00 00 00 
6138
                    00 00 00 00 00 00 
6139
                    00 00 00 00 00 00 
6140
                    00 00 00 00 00 00 
6141
                    00 00 00 00 00 00 
6142
                    00 00 00 00 00 00 
6143
                    00 00 00 00 00 00 
6144
                    00 00 00 00 00 00 
6145
                    00 00 00 00 00 00 
6146
                    00 00 00 00 00 00 
6147
                    00 00 00 00 00 00 
6148
                    00 00 00 00 00 00 
6149
                    00 00 00 00 00 00 
6150
                    00 00 00 00 00 00 
6151
                    00 00 00 00 00 00 
6152
                    00 00 00 00 00 00 
6153
                    00 00 00 00 00 00 
6154
                    00 00 00 00 00 00 
6155
                    00 00 00 00 00 00 
6156
                    00 00 00 00 00 00 
6157
                    00 00 00 00 00 00 
6158
                    00 00 00 00 00 00 
6159
                    00 00 00 00 00 00 
867 lvd 6160
                    00 00 00 00 00 00 
6161
                    00 00 00 00 00 00 
865 lvd 6162
                    00 00 00 00 00 00 
6163
                    00 00 00 00 00 00 
6164
                    00 00 00 00 00 00 
6165
                    00 00 00 00 00 00 
6166
                    00 00 00 00 00 00 
6167
                    00 00 00 00 00 00 
6168
                    00 00 00 00 00 00 
6169
                    00 00 00 00 00 00 
6170
                    00 00 00 00 00 00 
6171
                    00 00 00 00 00 00 
6172
                    00 00 00 00 00 00 
6173
                    00 00 00 00 00 00 
6174
                    00 00 00 00 00 00 
871 lvd 6175
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 99 - 2/23/2020 18:58:45
865 lvd 6176
 
6177
 
6178
                    00 00 00 00 00 00 
6179
                    00 00 00 00 00 00 
6180
                    00 00 00 00 00 00 
6181
                    00 00 00 00 00 00 
6182
                    00 00 00 00 00 00 
6183
                    00 00 00 00 00 00 
6184
                    00 00 00 00 00 00 
6185
                    00 00 00 00 00 00 
6186
                    00 00 00 00 00 00 
6187
                    00 00 00 00 00 00 
6188
                    00 00 00 00 00 00 
6189
                    00 00 00 00 00 00 
6190
                    00 00 00 00 00 00 
6191
                    00 00 00 00 00 00 
6192
                    00 00 00 00 00 00 
6193
                    00 00 00 00 00 00 
6194
                    00 00 00 00 00 00 
6195
                    00 00 00 00 00 00 
6196
                    00 00 00 00 00 00 
6197
                    00 00 00 00 00 00 
6198
                    00 00 00 00 00 00 
6199
                    00 00 00 00 00 00 
6200
                    00 00 00 00 00 00 
6201
                    00 00 00 00 00 00 
6202
                    00 00 00 00 00 00 
6203
                    00 00 00 00 00 00 
6204
                    00 00 00 00 00 00 
6205
                    00 00 00 00 00 00 
6206
                    00 00 00 00 00 00 
6207
                    00 00 00 00 00 00 
6208
                    00 00 00 00 00 00 
6209
                    00 00 00 00 00 00 
6210
                    00 00 00 00 00 00 
6211
                    00 00 00 00 00 00 
6212
                    00 00 00 00 00 00 
6213
                    00 00 00 00 00 00 
6214
                    00 00 00 00 00 00 
6215
                    00 00 00 00 00 00 
6216
                    00 00 00 00 00 00 
6217
                    00 00 00 00 00 00 
6218
                    00 00 00 00 00 00 
6219
                    00 00 00 00 00 00 
6220
                    00 00 00 00 00 00 
6221
                    00 00 00 00 00 00 
6222
                    00 00 00 00 00 00 
6223
                    00 00 00 00 00 00 
6224
                    00 00 00 00 00 00 
6225
                    00 00 00 00 00 00 
6226
                    00 00 00 00 00 00 
6227
                    00 00 00 00 00 00 
6228
                    00 00 00 00 00 00 
6229
                    00 00 00 00 00 00 
6230
                    00 00 00 00 00 00 
6231
                    00 00 00 00 00 00 
6232
                    00 00 00 00 00 00 
6233
                    00 00 00 00 00 00 
6234
                    00 00 00 00 00 00 
6235
                    00 00 00 00 00 00 
6236
                    00 00 00 00 00 00 
6237
                    00 00 00 00 00 00 
871 lvd 6238
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 100 - 2/23/2020 18:58:45
865 lvd 6239
 
6240
 
6241
                    00 00 00 00 00 00 
6242
                    00 00 00 00 00 00 
6243
                    00 00 00 00 00 00 
6244
                    00 00 00 00 00 00 
6245
                    00 00 00 00 00 00 
6246
                    00 00 00 00 00 00 
6247
                    00 00 00 00 00 00 
6248
                    00 00 00 00 00 00 
6249
                    00 00 00 00 00 00 
6250
                    00 00 00 00 00 00 
6251
                    00 00 00 00 00 00 
6252
                    00 00 00 00 00 00 
6253
                    00 00 00 00 00 00 
6254
                    00 00 00 00 00 00 
6255
                    00 00 00 00 00 00 
6256
                    00 00 00 00 00 00 
6257
                    00 00 00 00 00 00 
6258
                    00 00 00 00 00 00 
6259
                    00 00 00 00 00 00 
6260
                    00 00 00 00 00 00 
6261
                    00 00 00 00 00 00 
6262
                    00 00 00 00 00 00 
6263
                    00 00 00 00 00 00 
6264
                    00 00 00 00 00 00 
6265
                    00 00 00 00 00 00 
6266
                    00 00 00 00 00 00 
6267
                    00 00 00 00 00 00 
6268
                    00 00 00 00 00 00 
6269
                    00 00 00 00 00 00 
6270
                    00 00 00 00 00 00 
6271
                    00 00 00 00 00 00 
6272
                    00 00 00 00 00 00 
6273
                    00 00 00 00 00 00 
6274
                    00 00 00 00 00 00 
6275
                    00 00 00 00 00 00 
6276
                    00 00 00 00 00 00 
6277
                    00 00 00 00 00 00 
6278
                    00 00 00 00 00 00 
6279
                    00 00 00 00 00 00 
6280
                    00 00 00 00 00 00 
6281
                    00 00 00 00 00 00 
6282
                    00 00 00 00 00 00 
6283
                    00 00 00 00 00 00 
6284
                    00 00 00 00 00 00 
6285
                    00 00 00 00 00 00 
6286
                    00 00 00 00 00 00 
6287
                    00 00 00 00 00 00 
6288
                    00 00 00 00 00 00 
6289
                    00 00 00 00 00 00 
6290
                    00 00 00 00 00 00 
6291
                    00 00 00 00 00 00 
6292
                    00 00 00 00 00 00 
6293
                    00 00 00 00 00 00 
6294
                    00 00 00 00 00 00 
6295
                    00 00 00 00 00 00 
6296
                    00 00 00 00 00 00 
6297
                    00 00 00 00 00 00 
871 lvd 6298
                    00 00 00 00 
6299
     244/    2F01 : 00 00 00 00 00 00                   DB 1024 DUP(0)
865 lvd 6300
                    00 00 00 00 00 00 
871 lvd 6301
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 101 - 2/23/2020 18:58:45
865 lvd 6302
 
6303
 
6304
                    00 00 00 00 00 00 
6305
                    00 00 00 00 00 00 
6306
                    00 00 00 00 00 00 
6307
                    00 00 00 00 00 00 
6308
                    00 00 00 00 00 00 
6309
                    00 00 00 00 00 00 
6310
                    00 00 00 00 00 00 
6311
                    00 00 00 00 00 00 
6312
                    00 00 00 00 00 00 
6313
                    00 00 00 00 00 00 
6314
                    00 00 00 00 00 00 
6315
                    00 00 00 00 00 00 
6316
                    00 00 00 00 00 00 
6317
                    00 00 00 00 00 00 
6318
                    00 00 00 00 00 00 
6319
                    00 00 00 00 00 00 
6320
                    00 00 00 00 00 00 
6321
                    00 00 00 00 00 00 
6322
                    00 00 00 00 00 00 
6323
                    00 00 00 00 00 00 
6324
                    00 00 00 00 00 00 
6325
                    00 00 00 00 00 00 
6326
                    00 00 00 00 00 00 
6327
                    00 00 00 00 00 00 
6328
                    00 00 00 00 00 00 
6329
                    00 00 00 00 00 00 
6330
                    00 00 00 00 00 00 
6331
                    00 00 00 00 00 00 
6332
                    00 00 00 00 00 00 
6333
                    00 00 00 00 00 00 
6334
                    00 00 00 00 00 00 
6335
                    00 00 00 00 00 00 
6336
                    00 00 00 00 00 00 
6337
                    00 00 00 00 00 00 
867 lvd 6338
                    00 00 00 00 00 00 
6339
                    00 00 00 00 00 00 
865 lvd 6340
                    00 00 00 00 00 00 
6341
                    00 00 00 00 00 00 
6342
                    00 00 00 00 00 00 
6343
                    00 00 00 00 00 00 
6344
                    00 00 00 00 00 00 
6345
                    00 00 00 00 00 00 
6346
                    00 00 00 00 00 00 
6347
                    00 00 00 00 00 00 
6348
                    00 00 00 00 00 00 
6349
                    00 00 00 00 00 00 
6350
                    00 00 00 00 00 00 
6351
                    00 00 00 00 00 00 
6352
                    00 00 00 00 00 00 
6353
                    00 00 00 00 00 00 
6354
                    00 00 00 00 00 00 
6355
                    00 00 00 00 00 00 
6356
                    00 00 00 00 00 00 
6357
                    00 00 00 00 00 00 
6358
                    00 00 00 00 00 00 
6359
                    00 00 00 00 00 00 
6360
                    00 00 00 00 00 00 
6361
                    00 00 00 00 00 00 
871 lvd 6362
                    00 00 00 00 00 00 
6363
                    00 00 00 00 00 00 
6364
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 102 - 2/23/2020 18:58:45
865 lvd 6365
 
6366
 
6367
                    00 00 00 00 00 00 
6368
                    00 00 00 00 00 00 
6369
                    00 00 00 00 00 00 
6370
                    00 00 00 00 00 00 
6371
                    00 00 00 00 00 00 
6372
                    00 00 00 00 00 00 
6373
                    00 00 00 00 00 00 
6374
                    00 00 00 00 00 00 
6375
                    00 00 00 00 00 00 
6376
                    00 00 00 00 00 00 
6377
                    00 00 00 00 00 00 
6378
                    00 00 00 00 00 00 
6379
                    00 00 00 00 00 00 
6380
                    00 00 00 00 00 00 
6381
                    00 00 00 00 00 00 
6382
                    00 00 00 00 00 00 
6383
                    00 00 00 00 00 00 
6384
                    00 00 00 00 00 00 
6385
                    00 00 00 00 00 00 
6386
                    00 00 00 00 00 00 
6387
                    00 00 00 00 00 00 
6388
                    00 00 00 00 00 00 
6389
                    00 00 00 00 00 00 
6390
                    00 00 00 00 00 00 
6391
                    00 00 00 00 00 00 
6392
                    00 00 00 00 00 00 
6393
                    00 00 00 00 00 00 
6394
                    00 00 00 00 00 00 
6395
                    00 00 00 00 00 00 
6396
                    00 00 00 00 00 00 
6397
                    00 00 00 00 00 00 
6398
                    00 00 00 00 00 00 
6399
                    00 00 00 00 00 00 
6400
                    00 00 00 00 00 00 
6401
                    00 00 00 00 00 00 
6402
                    00 00 00 00 00 00 
6403
                    00 00 00 00 00 00 
6404
                    00 00 00 00 00 00 
6405
                    00 00 00 00 00 00 
6406
                    00 00 00 00 00 00 
6407
                    00 00 00 00 00 00 
6408
                    00 00 00 00 00 00 
6409
                    00 00 00 00 00 00 
6410
                    00 00 00 00 00 00 
6411
                    00 00 00 00 00 00 
6412
                    00 00 00 00 00 00 
6413
                    00 00 00 00 00 00 
6414
                    00 00 00 00 00 00 
6415
                    00 00 00 00 00 00 
6416
                    00 00 00 00 00 00 
6417
                    00 00 00 00 00 00 
6418
                    00 00 00 00 00 00 
6419
                    00 00 00 00 00 00 
6420
                    00 00 00 00 00 00 
6421
                    00 00 00 00 00 00 
6422
                    00 00 00 00 00 00 
6423
                    00 00 00 00 00 00 
6424
                    00 00 00 00 00 00 
6425
                    00 00 00 00 00 00 
6426
                    00 00 00 00 00 00 
871 lvd 6427
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 103 - 2/23/2020 18:58:45
865 lvd 6428
 
6429
 
6430
                    00 00 00 00 00 00 
6431
                    00 00 00 00 00 00 
6432
                    00 00 00 00 00 00 
6433
                    00 00 00 00 00 00 
6434
                    00 00 00 00 00 00 
6435
                    00 00 00 00 00 00 
6436
                    00 00 00 00 00 00 
6437
                    00 00 00 00 00 00 
6438
                    00 00 00 00 00 00 
6439
                    00 00 00 00 00 00 
6440
                    00 00 00 00 00 00 
6441
                    00 00 00 00 00 00 
6442
                    00 00 00 00 00 00 
6443
                    00 00 00 00 00 00 
6444
                    00 00 00 00 00 00 
6445
                    00 00 00 00 00 00 
6446
                    00 00 00 00 00 00 
6447
                    00 00 00 00 00 00 
6448
                    00 00 00 00 00 00 
6449
                    00 00 00 00 00 00 
6450
                    00 00 00 00 00 00 
6451
                    00 00 00 00 00 00 
6452
                    00 00 00 00 00 00 
6453
                    00 00 00 00 00 00 
6454
                    00 00 00 00 00 00 
6455
                    00 00 00 00 00 00 
6456
                    00 00 00 00 00 00 
6457
                    00 00 00 00 00 00 
6458
                    00 00 00 00 00 00 
6459
                    00 00 00 00 00 00 
6460
                    00 00 00 00 00 00 
6461
                    00 00 00 00 00 00 
6462
                    00 00 00 00 00 00 
6463
                    00 00 00 00 00 00 
6464
                    00 00 00 00 00 00 
6465
                    00 00 00 00 00 00 
6466
                    00 00 00 00 00 00 
6467
                    00 00 00 00 00 00 
6468
                    00 00 00 00 00 00 
6469
                    00 00 00 00 00 00 
6470
                    00 00 00 00 00 00 
6471
                    00 00 00 00 00 00 
6472
                    00 00 00 00 00 00 
6473
                    00 00 00 00 00 00 
6474
                    00 00 00 00 00 00 
6475
                    00 00 00 00 00 00 
6476
                    00 00 00 00 00 00 
6477
                    00 00 00 00 00 00 
871 lvd 6478
                    00 00 00 00 
6479
     244/    3301 : 00 00 00 00 00 00                   DB 1024 DUP(0)
865 lvd 6480
                    00 00 00 00 00 00 
6481
                    00 00 00 00 00 00 
6482
                    00 00 00 00 00 00 
6483
                    00 00 00 00 00 00 
6484
                    00 00 00 00 00 00 
6485
                    00 00 00 00 00 00 
6486
                    00 00 00 00 00 00 
6487
                    00 00 00 00 00 00 
6488
                    00 00 00 00 00 00 
6489
                    00 00 00 00 00 00 
871 lvd 6490
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 104 - 2/23/2020 18:58:45
865 lvd 6491
 
6492
 
6493
                    00 00 00 00 00 00 
6494
                    00 00 00 00 00 00 
6495
                    00 00 00 00 00 00 
6496
                    00 00 00 00 00 00 
6497
                    00 00 00 00 00 00 
6498
                    00 00 00 00 00 00 
6499
                    00 00 00 00 00 00 
6500
                    00 00 00 00 00 00 
6501
                    00 00 00 00 00 00 
6502
                    00 00 00 00 00 00 
6503
                    00 00 00 00 00 00 
6504
                    00 00 00 00 00 00 
6505
                    00 00 00 00 00 00 
6506
                    00 00 00 00 00 00 
6507
                    00 00 00 00 00 00 
6508
                    00 00 00 00 00 00 
6509
                    00 00 00 00 00 00 
6510
                    00 00 00 00 00 00 
6511
                    00 00 00 00 00 00 
6512
                    00 00 00 00 00 00 
6513
                    00 00 00 00 00 00 
6514
                    00 00 00 00 00 00 
6515
                    00 00 00 00 00 00 
6516
                    00 00 00 00 00 00 
6517
                    00 00 00 00 00 00 
867 lvd 6518
                    00 00 00 00 00 00 
6519
                    00 00 00 00 00 00 
865 lvd 6520
                    00 00 00 00 00 00 
6521
                    00 00 00 00 00 00 
6522
                    00 00 00 00 00 00 
6523
                    00 00 00 00 00 00 
6524
                    00 00 00 00 00 00 
6525
                    00 00 00 00 00 00 
6526
                    00 00 00 00 00 00 
6527
                    00 00 00 00 00 00 
6528
                    00 00 00 00 00 00 
6529
                    00 00 00 00 00 00 
6530
                    00 00 00 00 00 00 
6531
                    00 00 00 00 00 00 
6532
                    00 00 00 00 00 00 
6533
                    00 00 00 00 00 00 
6534
                    00 00 00 00 00 00 
6535
                    00 00 00 00 00 00 
6536
                    00 00 00 00 00 00 
6537
                    00 00 00 00 00 00 
6538
                    00 00 00 00 00 00 
6539
                    00 00 00 00 00 00 
6540
                    00 00 00 00 00 00 
6541
                    00 00 00 00 00 00 
6542
                    00 00 00 00 00 00 
6543
                    00 00 00 00 00 00 
6544
                    00 00 00 00 00 00 
6545
                    00 00 00 00 00 00 
6546
                    00 00 00 00 00 00 
6547
                    00 00 00 00 00 00 
6548
                    00 00 00 00 00 00 
6549
                    00 00 00 00 00 00 
6550
                    00 00 00 00 00 00 
871 lvd 6551
                    00 00 00 00 00 00 
6552
                    00 00 00 00 00 00 
6553
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 105 - 2/23/2020 18:58:45
865 lvd 6554
 
6555
 
6556
                    00 00 00 00 00 00 
6557
                    00 00 00 00 00 00 
6558
                    00 00 00 00 00 00 
6559
                    00 00 00 00 00 00 
6560
                    00 00 00 00 00 00 
6561
                    00 00 00 00 00 00 
6562
                    00 00 00 00 00 00 
6563
                    00 00 00 00 00 00 
6564
                    00 00 00 00 00 00 
6565
                    00 00 00 00 00 00 
6566
                    00 00 00 00 00 00 
6567
                    00 00 00 00 00 00 
6568
                    00 00 00 00 00 00 
6569
                    00 00 00 00 00 00 
6570
                    00 00 00 00 00 00 
6571
                    00 00 00 00 00 00 
6572
                    00 00 00 00 00 00 
6573
                    00 00 00 00 00 00 
6574
                    00 00 00 00 00 00 
6575
                    00 00 00 00 00 00 
6576
                    00 00 00 00 00 00 
6577
                    00 00 00 00 00 00 
6578
                    00 00 00 00 00 00 
6579
                    00 00 00 00 00 00 
6580
                    00 00 00 00 00 00 
6581
                    00 00 00 00 00 00 
6582
                    00 00 00 00 00 00 
6583
                    00 00 00 00 00 00 
6584
                    00 00 00 00 00 00 
6585
                    00 00 00 00 00 00 
6586
                    00 00 00 00 00 00 
6587
                    00 00 00 00 00 00 
6588
                    00 00 00 00 00 00 
6589
                    00 00 00 00 00 00 
6590
                    00 00 00 00 00 00 
6591
                    00 00 00 00 00 00 
6592
                    00 00 00 00 00 00 
6593
                    00 00 00 00 00 00 
6594
                    00 00 00 00 00 00 
6595
                    00 00 00 00 00 00 
6596
                    00 00 00 00 00 00 
6597
                    00 00 00 00 00 00 
6598
                    00 00 00 00 00 00 
6599
                    00 00 00 00 00 00 
6600
                    00 00 00 00 00 00 
6601
                    00 00 00 00 00 00 
6602
                    00 00 00 00 00 00 
6603
                    00 00 00 00 00 00 
6604
                    00 00 00 00 00 00 
6605
                    00 00 00 00 00 00 
6606
                    00 00 00 00 00 00 
6607
                    00 00 00 00 00 00 
6608
                    00 00 00 00 00 00 
6609
                    00 00 00 00 00 00 
6610
                    00 00 00 00 00 00 
6611
                    00 00 00 00 00 00 
6612
                    00 00 00 00 00 00 
6613
                    00 00 00 00 00 00 
6614
                    00 00 00 00 00 00 
6615
                    00 00 00 00 00 00 
871 lvd 6616
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 106 - 2/23/2020 18:58:45
865 lvd 6617
 
6618
 
6619
                    00 00 00 00 00 00 
6620
                    00 00 00 00 00 00 
6621
                    00 00 00 00 00 00 
6622
                    00 00 00 00 00 00 
6623
                    00 00 00 00 00 00 
6624
                    00 00 00 00 00 00 
6625
                    00 00 00 00 00 00 
6626
                    00 00 00 00 00 00 
6627
                    00 00 00 00 00 00 
6628
                    00 00 00 00 00 00 
6629
                    00 00 00 00 00 00 
6630
                    00 00 00 00 00 00 
6631
                    00 00 00 00 00 00 
6632
                    00 00 00 00 00 00 
6633
                    00 00 00 00 00 00 
6634
                    00 00 00 00 00 00 
6635
                    00 00 00 00 00 00 
6636
                    00 00 00 00 00 00 
6637
                    00 00 00 00 00 00 
6638
                    00 00 00 00 00 00 
6639
                    00 00 00 00 00 00 
6640
                    00 00 00 00 00 00 
6641
                    00 00 00 00 00 00 
6642
                    00 00 00 00 00 00 
6643
                    00 00 00 00 00 00 
6644
                    00 00 00 00 00 00 
6645
                    00 00 00 00 00 00 
6646
                    00 00 00 00 00 00 
6647
                    00 00 00 00 00 00 
6648
                    00 00 00 00 00 00 
6649
                    00 00 00 00 00 00 
6650
                    00 00 00 00 00 00 
6651
                    00 00 00 00 00 00 
6652
                    00 00 00 00 00 00 
6653
                    00 00 00 00 00 00 
6654
                    00 00 00 00 00 00 
6655
                    00 00 00 00 00 00 
6656
                    00 00 00 00 00 00 
6657
                    00 00 00 00 00 00 
871 lvd 6658
                    00 00 00 00 
6659
     244/    3701 : 00 00 00 00 00 00                   DB 1024 DUP(0)
865 lvd 6660
                    00 00 00 00 00 00 
6661
                    00 00 00 00 00 00 
6662
                    00 00 00 00 00 00 
6663
                    00 00 00 00 00 00 
6664
                    00 00 00 00 00 00 
6665
                    00 00 00 00 00 00 
6666
                    00 00 00 00 00 00 
6667
                    00 00 00 00 00 00 
6668
                    00 00 00 00 00 00 
6669
                    00 00 00 00 00 00 
6670
                    00 00 00 00 00 00 
6671
                    00 00 00 00 00 00 
6672
                    00 00 00 00 00 00 
6673
                    00 00 00 00 00 00 
6674
                    00 00 00 00 00 00 
6675
                    00 00 00 00 00 00 
6676
                    00 00 00 00 00 00 
6677
                    00 00 00 00 00 00 
6678
                    00 00 00 00 00 00 
871 lvd 6679
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 107 - 2/23/2020 18:58:45
865 lvd 6680
 
6681
 
6682
                    00 00 00 00 00 00 
6683
                    00 00 00 00 00 00 
6684
                    00 00 00 00 00 00 
6685
                    00 00 00 00 00 00 
6686
                    00 00 00 00 00 00 
6687
                    00 00 00 00 00 00 
6688
                    00 00 00 00 00 00 
6689
                    00 00 00 00 00 00 
6690
                    00 00 00 00 00 00 
6691
                    00 00 00 00 00 00 
6692
                    00 00 00 00 00 00 
6693
                    00 00 00 00 00 00 
6694
                    00 00 00 00 00 00 
6695
                    00 00 00 00 00 00 
6696
                    00 00 00 00 00 00 
6697
                    00 00 00 00 00 00 
867 lvd 6698
                    00 00 00 00 00 00 
6699
                    00 00 00 00 00 00 
865 lvd 6700
                    00 00 00 00 00 00 
6701
                    00 00 00 00 00 00 
6702
                    00 00 00 00 00 00 
6703
                    00 00 00 00 00 00 
6704
                    00 00 00 00 00 00 
6705
                    00 00 00 00 00 00 
6706
                    00 00 00 00 00 00 
6707
                    00 00 00 00 00 00 
6708
                    00 00 00 00 00 00 
6709
                    00 00 00 00 00 00 
6710
                    00 00 00 00 00 00 
6711
                    00 00 00 00 00 00 
6712
                    00 00 00 00 00 00 
6713
                    00 00 00 00 00 00 
6714
                    00 00 00 00 00 00 
6715
                    00 00 00 00 00 00 
6716
                    00 00 00 00 00 00 
6717
                    00 00 00 00 00 00 
6718
                    00 00 00 00 00 00 
6719
                    00 00 00 00 00 00 
6720
                    00 00 00 00 00 00 
6721
                    00 00 00 00 00 00 
6722
                    00 00 00 00 00 00 
6723
                    00 00 00 00 00 00 
6724
                    00 00 00 00 00 00 
6725
                    00 00 00 00 00 00 
6726
                    00 00 00 00 00 00 
6727
                    00 00 00 00 00 00 
6728
                    00 00 00 00 00 00 
6729
                    00 00 00 00 00 00 
6730
                    00 00 00 00 00 00 
6731
                    00 00 00 00 00 00 
6732
                    00 00 00 00 00 00 
6733
                    00 00 00 00 00 00 
6734
                    00 00 00 00 00 00 
6735
                    00 00 00 00 00 00 
6736
                    00 00 00 00 00 00 
6737
                    00 00 00 00 00 00 
6738
                    00 00 00 00 00 00 
6739
                    00 00 00 00 00 00 
871 lvd 6740
                    00 00 00 00 00 00 
6741
                    00 00 00 00 00 00 
6742
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 108 - 2/23/2020 18:58:45
865 lvd 6743
 
6744
 
6745
                    00 00 00 00 00 00 
6746
                    00 00 00 00 00 00 
6747
                    00 00 00 00 00 00 
6748
                    00 00 00 00 00 00 
6749
                    00 00 00 00 00 00 
6750
                    00 00 00 00 00 00 
6751
                    00 00 00 00 00 00 
6752
                    00 00 00 00 00 00 
6753
                    00 00 00 00 00 00 
6754
                    00 00 00 00 00 00 
6755
                    00 00 00 00 00 00 
6756
                    00 00 00 00 00 00 
6757
                    00 00 00 00 00 00 
6758
                    00 00 00 00 00 00 
6759
                    00 00 00 00 00 00 
6760
                    00 00 00 00 00 00 
6761
                    00 00 00 00 00 00 
6762
                    00 00 00 00 00 00 
6763
                    00 00 00 00 00 00 
6764
                    00 00 00 00 00 00 
6765
                    00 00 00 00 00 00 
6766
                    00 00 00 00 00 00 
6767
                    00 00 00 00 00 00 
6768
                    00 00 00 00 00 00 
6769
                    00 00 00 00 00 00 
6770
                    00 00 00 00 00 00 
6771
                    00 00 00 00 00 00 
6772
                    00 00 00 00 00 00 
6773
                    00 00 00 00 00 00 
6774
                    00 00 00 00 00 00 
6775
                    00 00 00 00 00 00 
6776
                    00 00 00 00 00 00 
6777
                    00 00 00 00 00 00 
6778
                    00 00 00 00 00 00 
6779
                    00 00 00 00 00 00 
6780
                    00 00 00 00 00 00 
6781
                    00 00 00 00 00 00 
6782
                    00 00 00 00 00 00 
6783
                    00 00 00 00 00 00 
6784
                    00 00 00 00 00 00 
6785
                    00 00 00 00 00 00 
6786
                    00 00 00 00 00 00 
6787
                    00 00 00 00 00 00 
6788
                    00 00 00 00 00 00 
6789
                    00 00 00 00 00 00 
6790
                    00 00 00 00 00 00 
6791
                    00 00 00 00 00 00 
6792
                    00 00 00 00 00 00 
6793
                    00 00 00 00 00 00 
6794
                    00 00 00 00 00 00 
6795
                    00 00 00 00 00 00 
6796
                    00 00 00 00 00 00 
6797
                    00 00 00 00 00 00 
6798
                    00 00 00 00 00 00 
6799
                    00 00 00 00 00 00 
6800
                    00 00 00 00 00 00 
6801
                    00 00 00 00 00 00 
6802
                    00 00 00 00 00 00 
6803
                    00 00 00 00 00 00 
6804
                    00 00 00 00 00 00 
871 lvd 6805
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 109 - 2/23/2020 18:58:45
865 lvd 6806
 
6807
 
6808
                    00 00 00 00 00 00 
6809
                    00 00 00 00 00 00 
6810
                    00 00 00 00 00 00 
6811
                    00 00 00 00 00 00 
6812
                    00 00 00 00 00 00 
6813
                    00 00 00 00 00 00 
6814
                    00 00 00 00 00 00 
6815
                    00 00 00 00 00 00 
6816
                    00 00 00 00 00 00 
6817
                    00 00 00 00 00 00 
6818
                    00 00 00 00 00 00 
6819
                    00 00 00 00 00 00 
6820
                    00 00 00 00 00 00 
6821
                    00 00 00 00 00 00 
6822
                    00 00 00 00 00 00 
6823
                    00 00 00 00 00 00 
6824
                    00 00 00 00 00 00 
6825
                    00 00 00 00 00 00 
6826
                    00 00 00 00 00 00 
6827
                    00 00 00 00 00 00 
6828
                    00 00 00 00 00 00 
6829
                    00 00 00 00 00 00 
6830
                    00 00 00 00 00 00 
6831
                    00 00 00 00 00 00 
6832
                    00 00 00 00 00 00 
6833
                    00 00 00 00 00 00 
6834
                    00 00 00 00 00 00 
6835
                    00 00 00 00 00 00 
6836
                    00 00 00 00 00 00 
6837
                    00 00 00 00 00 00 
871 lvd 6838
                    00 00 00 00 
6839
     244/    3B01 : =>TRUE                              IF $$M <> 0
6840
     244/    3B01 : =>NOT BLANK                         IFB 0
6841
     244/    3B01 :                                     DB $$M DUP(0)
6842
     244/    3B01 : =>TRUE                              ELSE
6843
     244/    3B01 : 00 00 00 00 00 00                   DB $$M DUP(0)
865 lvd 6844
                    00 00 00 00 00 00 
6845
                    00 00 00 00 00 00 
6846
                    00 00 00 00 00 00 
6847
                    00 00 00 00 00 00 
6848
                    00 00 00 00 00 00 
6849
                    00 00 00 00 00 00 
6850
                    00 00 00 00 00 00 
6851
                    00 00 00 00 00 00 
6852
                    00 00 00 00 00 00 
6853
                    00 00 00 00 00 00 
6854
                    00 00 00 00 00 00 
6855
                    00 00 00 00 00 00 
6856
                    00 00 00 00 00 00 
6857
                    00 00 00 00 00 00 
6858
                    00 00 00 00 00 00 
6859
                    00 00 00 00 00 00 
6860
                    00 00 00 00 00 00 
6861
                    00 00 00 00 00 00 
6862
                    00 00 00 00 00 00 
6863
                    00 00 00 00 00 00 
6864
                    00 00 00 00 00 00 
6865
                    00 00 00 00 00 00 
6866
                    00 00 00 00 00 00 
6867
                    00 00 00 00 00 00 
871 lvd 6868
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 110 - 2/23/2020 18:58:45
6869
 
6870
 
865 lvd 6871
                    00 00 00 00 00 00 
6872
                    00 00 00 00 00 00 
6873
                    00 00 00 00 00 00 
6874
                    00 00 00 00 00 00 
6875
                    00 00 00 00 00 00 
6876
                    00 00 00 00 00 00 
6877
                    00 00 00 00 00 00 
6878
                    00 00 00 00 00 00 
6879
                    00 00 00 00 00 00 
6880
                    00 00 00 00 00 00 
6881
                    00 00 00 00 00 00 
6882
                    00 00 00 00 00 00 
6883
                    00 00 00 00 00 00 
867 lvd 6884
                    00 00 00 00 00 00 
6885
                    00 00 00 00 00 00 
865 lvd 6886
                    00 00 00 00 00 00 
6887
                    00 00 00 00 00 00 
6888
                    00 00 00 00 00 00 
6889
                    00 00 00 00 00 00 
6890
                    00 00 00 00 00 00 
6891
                    00 00 00 00 00 00 
6892
                    00 00 00 00 00 00 
6893
                    00 00 00 00 00 00 
6894
                    00 00 00 00 00 00 
6895
                    00 00 00 00 00 00 
6896
                    00 00 00 00 00 00 
6897
                    00 00 00 00 00 00 
6898
                    00 00 00 00 00 00 
6899
                    00 00 00 00 00 00 
6900
                    00 00 00 00 00 00 
6901
                    00 00 00 00 00 00 
6902
                    00 00 00 00 00 00 
6903
                    00 00 00 00 00 00 
6904
                    00 00 00 00 00 00 
6905
                    00 00 00 00 00 00 
6906
                    00 00 00 00 00 00 
6907
                    00 00 00 00 00 00 
6908
                    00 00 00 00 00 00 
6909
                    00 00 00 00 00 00 
6910
                    00 00 00 00 00 00 
6911
                    00 00 00 00 00 00 
6912
                    00 00 00 00 00 00 
6913
                    00 00 00 00 00 00 
6914
                    00 00 00 00 00 00 
6915
                    00 00 00 00 00 00 
6916
                    00 00 00 00 00 00 
6917
                    00 00 00 00 00 00 
6918
                    00 00 00 00 00 00 
6919
                    00 00 00 00 00 00 
6920
                    00 00 00 00 00 00 
6921
                    00 00 00 00 00 00 
6922
                    00 00 00 00 00 00 
6923
                    00 00 00 00 00 00 
6924
                    00 00 00 00 00 00 
6925
                    00 00 00 00 00 00 
6926
                    00 00 00 00 00 00 
6927
                    00 00 00 00 00 00 
6928
                    00 00 00 00 00 00 
6929
                    00 00 00 00 00 00 
6930
                    00 00 00 00 00 00 
871 lvd 6931
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 111 - 2/23/2020 18:58:45
865 lvd 6932
 
6933
 
6934
                    00 00 00 00 00 00 
6935
                    00 00 00 00 00 00 
6936
                    00 00 00 00 00 00 
6937
                    00 00 00 00 00 00 
6938
                    00 00 00 00 00 00 
6939
                    00 00 00 00 00 00 
6940
                    00 00 00 00 00 00 
6941
                    00 00 00 00 00 00 
871 lvd 6942
     244/    3D2F : [244]                               ENDIF
6943
     244/    3D2F : [244]                               ENDIF
6944
     245/    3D2F : 00                  		NOP
6945
     246/    3D30 : C9                  		RET
6946
     247/    3D31 :                     
6947
     248/    3D31 : (MACRO)             		DUPL 0X3FF8-$,0
6948
     248/    3D31 :                     DUPL:
6949
     248/    3D31 : =0H                 $$N             EQU (0X3FF8-$) / 1024
6950
     248/    3D31 : =2C7H               $$M             EQU (0X3FF8-$) # 1024
6951
     248/    3D31 :                                     REPT $$N
6952
     248/    3D31 :                                     DB 1024 DUP(0)
6953
     248/    3D31 :                                     ENDM
6954
     248/    3D31 : =>TRUE                              IF $$M <> 0
6955
     248/    3D31 : =>NOT BLANK                         IFB 0
6956
     248/    3D31 :                                     DB $$M DUP(0)
6957
     248/    3D31 : =>TRUE                              ELSE
6958
     248/    3D31 : 00 00 00 00 00 00                   DB $$M DUP(0)
865 lvd 6959
                    00 00 00 00 00 00 
6960
                    00 00 00 00 00 00 
6961
                    00 00 00 00 00 00 
6962
                    00 00 00 00 00 00 
6963
                    00 00 00 00 00 00 
6964
                    00 00 00 00 00 00 
6965
                    00 00 00 00 00 00 
6966
                    00 00 00 00 00 00 
6967
                    00 00 00 00 00 00 
6968
                    00 00 00 00 00 00 
6969
                    00 00 00 00 00 00 
6970
                    00 00 00 00 00 00 
6971
                    00 00 00 00 00 00 
6972
                    00 00 00 00 00 00 
6973
                    00 00 00 00 00 00 
6974
                    00 00 00 00 00 00 
6975
                    00 00 00 00 00 00 
6976
                    00 00 00 00 00 00 
6977
                    00 00 00 00 00 00 
6978
                    00 00 00 00 00 00 
6979
                    00 00 00 00 00 00 
6980
                    00 00 00 00 00 00 
6981
                    00 00 00 00 00 00 
6982
                    00 00 00 00 00 00 
6983
                    00 00 00 00 00 00 
6984
                    00 00 00 00 00 00 
6985
                    00 00 00 00 00 00 
6986
                    00 00 00 00 00 00 
6987
                    00 00 00 00 00 00 
6988
                    00 00 00 00 00 00 
6989
                    00 00 00 00 00 00 
6990
                    00 00 00 00 00 00 
6991
                    00 00 00 00 00 00 
6992
                    00 00 00 00 00 00 
6993
                    00 00 00 00 00 00 
871 lvd 6994
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 112 - 2/23/2020 18:58:45
6995
 
6996
 
865 lvd 6997
                    00 00 00 00 00 00 
6998
                    00 00 00 00 00 00 
867 lvd 6999
                    00 00 00 00 00 00 
7000
                    00 00 00 00 00 00 
865 lvd 7001
                    00 00 00 00 00 00 
7002
                    00 00 00 00 00 00 
7003
                    00 00 00 00 00 00 
7004
                    00 00 00 00 00 00 
7005
                    00 00 00 00 00 00 
7006
                    00 00 00 00 00 00 
7007
                    00 00 00 00 00 00 
7008
                    00 00 00 00 00 00 
7009
                    00 00 00 00 00 00 
7010
                    00 00 00 00 00 00 
7011
                    00 00 00 00 00 00 
7012
                    00 00 00 00 00 00 
7013
                    00 00 00 00 00 00 
7014
                    00 00 00 00 00 00 
7015
                    00 00 00 00 00 00 
7016
                    00 00 00 00 00 00 
7017
                    00 00 00 00 00 00 
7018
                    00 00 00 00 00 00 
7019
                    00 00 00 00 00 00 
7020
                    00 00 00 00 00 00 
7021
                    00 00 00 00 00 00 
7022
                    00 00 00 00 00 00 
7023
                    00 00 00 00 00 00 
7024
                    00 00 00 00 00 00 
7025
                    00 00 00 00 00 00 
7026
                    00 00 00 00 00 00 
7027
                    00 00 00 00 00 00 
7028
                    00 00 00 00 00 00 
7029
                    00 00 00 00 00 00 
7030
                    00 00 00 00 00 00 
7031
                    00 00 00 00 00 00 
7032
                    00 00 00 00 00 00 
7033
                    00 00 00 00 00 00 
7034
                    00 00 00 00 00 00 
7035
                    00 00 00 00 00 00 
7036
                    00 00 00 00 00 00 
7037
                    00 00 00 00 00 00 
7038
                    00 00 00 00 00 00 
7039
                    00 00 00 00 00 00 
7040
                    00 00 00 00 00 00 
7041
                    00 00 00 00 00 00 
7042
                    00 00 00 00 00 00 
7043
                    00 00 00 00 00 00 
7044
                    00 00 00 00 00 00 
7045
                    00 00 00 00 00 00 
7046
                    00 00 00 00 00 00 
7047
                    00 00 00 00 00 00 
7048
                    00 00 00 00 00 00 
7049
                    00 00 00 00 00 00 
7050
                    00 00 00 00 00 00 
7051
                    00 00 00 00 00 00 
7052
                    00 00 00 00 00 00 
7053
                    00 00 00 00 00 00 
7054
                    00 00 00 00 00 00 
7055
                    00 00 00 00 00 00 
7056
                    00 00 00 00 00 00 
871 lvd 7057
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 113 - 2/23/2020 18:58:45
865 lvd 7058
 
7059
 
7060
                    00 00 00 00 00 00 
7061
                    00 00 00 00 00 00 
7062
                    00 00 00 00 00 00 
7063
                    00 00 00 00 00 00 
7064
                    00 00 00 00 00 00 
7065
                    00 00 00 00 00 00 
7066
                    00 00 00 00 00 00 
7067
                    00 00 00 00 00 00 
7068
                    00 00 00 00 00 00 
7069
                    00 00 00 00 00 00 
7070
                    00 00 00 00 00 00 
7071
                    00 00 00 00 00 00 
7072
                    00 00 00 00 00 00 
7073
                    00 00 00 00 00 00 
7074
                    00 00 00 00 00 00 
7075
                    00 00 00 00 00 00 
7076
                    00 00 00 00 00 00 
7077
                    00 00 00 00 00 00 
7078
                    00 00 00 00 00 00 
7079
                    00 00 00 00 00 00 
7080
                    00 00 00 00 00 00 
7081
                    00 00 00 00 00 00 
867 lvd 7082
                    00 00 00 
871 lvd 7083
     248/    3FF8 : [248]                               ENDIF
7084
     248/    3FF8 : [248]                               ENDIF
7085
     249/    3FF8 : 45 56 4F 53 46 45   		DB "EVOSFE"
7086
     250/    3FFE : 57 A8               		DW DATA_VERS
7087
     251/    4000 :                     
7088
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 114 - 2/23/2020 18:58:45
865 lvd 7089
 
7090
 
7091
  symbol table (* = unused):
7092
  ------------------------
7093
 
7094
*ADDR_RET :                    3CA7 - | *ADDR_RET_Size :                  2 - |
7095
*ADRBRK_EMUTAP :                569 - |  ADRTEKV :                     BDF4 - |
871 lvd 7096
*ADR_0X0302 :                   8E1 - |  ADR_0X0302.WORK :              8E9 - |
7097
*ADR_0X030A :                   8E9 - |  ADR_0X030A.WORK :              8F1 - |
7098
*ADR_0X0312 :                   8F1 - |  ADR_0X0312.WORK :              8F9 - |
7099
*ADR_0X031A :                   8F9 - |  ADR_0X031A.WORK :              901 - |
7100
*ADR_0X0322 :                   901 - |  ADR_0X0322.WORK :              909 - |
7101
*ADR_0X032A :                   909 - |  ADR_0X032A.WORK :              911 - |
7102
*ADR_0X0332 :                   911 - |  ADR_0X0332.WORK :              919 - |
7103
*ADR_0X033A :                   919 - |  ADR_0X033A.WORK :              921 - |
7104
*ADR_0X0342 :                   921 - |  ADR_0X0342.WORK :              929 - |
7105
*ADR_0X034A :                   929 - |  ADR_0X034A.WORK :              931 - |
7106
*ADR_0X0355 :                   931 - |  ADR_0X0355.WORK :              939 - |
7107
*ADR_0X035D :                   939 - |  ADR_0X035D.WORK :              941 - |
7108
*ADR_0X0367 :                   941 - |  ADR_0X0367.WORK :              949 - |
7109
*ADR_0X0371 :                   949 - |  ADR_0X0371.WORK :              951 - |
7110
*ADR_0X037B :                   951 - |  ADR_0X037B.WORK :              959 - |
7111
*ADR_0X0383 :                   959 - |  ADR_0X0383.WORK :              961 - |
7112
*ADR_0X038D :                   961 - |  ADR_0X038D.WORK :              969 - |
7113
*ADR_0X0395 :                   969 - |  ADR_0X0395.WORK :              971 - |
7114
*ADR_0X039F :                   971 - |  ADR_0X039F.WORK :              979 - |
7115
*ADR_0X03A7 :                   979 - |  ADR_0X03A7.WORK :              981 - |
7116
*ADR_0X03B1 :                   981 - |  ADR_0X03B1.WORK :              989 - |
7117
*ADR_0X03B9 :                   989 - |  ADR_0X03B9.WORK :              991 - |
7118
*ADR_0X03C3 :                   991 - |  ADR_0X03C3.WORK :              999 - |
7119
*ADR_0X03CB :                   999 - |  ADR_0X03CB.WORK :              9A1 - |
7120
*ADR_0X03D5 :                   9A1 - |  ADR_0X03D5.WORK :              9A9 - |
7121
*ADR_0X03DD :                   9A9 - |  ADR_0X03DD.WORK :              9B1 - |
7122
*ADR_0X03E7 :                   9B1 - |  ADR_0X03E7.WORK :              9B9 - |
7123
*ADR_0X03EF :                   9B9 - |  ADR_0X03EF.WORK :              9C1 - |
7124
*ADR_0X0402 :                   9C1 - |  ADR_0X0402.WORK :              9C9 - |
7125
*ADR_0X040A :                   9C9 - |  ADR_0X040A.WORK :              9D1 - |
7126
*ADR_0X0412 :                   9D1 - |  ADR_0X0412.WORK :              9D9 - |
7127
*ADR_0X041A :                   9D9 - |  ADR_0X041A.WORK :              9E1 - |
7128
*ADR_0X0422 :                   9E1 - |  ADR_0X0422.WORK :              9E9 - |
7129
*ADR_0X042A :                   9E9 - |  ADR_0X042A.WORK :              9F1 - |
7130
*ADR_0X0432 :                   9F1 - |  ADR_0X0432.WORK :              9F9 - |
7131
*ADR_0X043A :                   9F9 - |  ADR_0X043A.WORK :              A01 - |
7132
*ADR_0X0442 :                   A01 - |  ADR_0X0442.WORK :              A09 - |
7133
*ADR_0X044A :                   A09 - |  ADR_0X044A.WORK :              A11 - |
7134
*ADR_0X0455 :                   A11 - |  ADR_0X0455.WORK :              A19 - |
7135
*ADR_0X045D :                   A19 - |  ADR_0X045D.WORK :              A21 - |
7136
*ADR_0X0467 :                   A21 - |  ADR_0X0467.WORK :              A29 - |
7137
*ADR_0X0471 :                   A29 - |  ADR_0X0471.WORK :              A31 - |
7138
*ADR_0X047B :                   A31 - |  ADR_0X047B.WORK :              A39 - |
7139
*ADR_0X0483 :                   A39 - |  ADR_0X0483.WORK :              A41 - |
7140
*ADR_0X048D :                   A41 - |  ADR_0X048D.WORK :              A49 - |
7141
*ADR_0X0495 :                   A49 - |  ADR_0X0495.WORK :              A51 - |
7142
*ADR_0X049F :                   A51 - |  ADR_0X049F.WORK :              A59 - |
7143
*ADR_0X04A7 :                   A59 - |  ADR_0X04A7.WORK :              A61 - |
7144
*ADR_0X04B1 :                   A61 - |  ADR_0X04B1.WORK :              A69 - |
7145
*ADR_0X04B9 :                   A69 - |  ADR_0X04B9.WORK :              A71 - |
7146
*ADR_0X04C3 :                   A71 - |  ADR_0X04C3.WORK :              A79 - |
7147
*ADR_0X04CB :                   A79 - |  ADR_0X04CB.WORK :              A81 - |
7148
*ADR_0X04D5 :                   A81 - |  ADR_0X04D5.WORK :              A89 - |
7149
*ADR_0X04DD :                   A89 - |  ADR_0X04DD.WORK :              A91 - |
7150
*ADR_0X04E7 :                   A91 - |  ADR_0X04E7.WORK :              A99 - |
7151
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 115 - 2/23/2020 18:58:45
7152
 
7153
 
7154
*ADR_0X04EF :                   A99 - |  ADR_0X04EF.WORK :              AA1 - |
865 lvd 7155
*ADR_PERFECT :                   36 - |  ADR_RST8END :                 3CE8 - |
7156
*ADR_SEL_ROM :                   14 - | *ALATTR :                      21C0 - |
7157
*ALSYM :                        1C0 - | *ARATTR :                       1C1 - |
7158
*ARCHITECTURE :  i386-unknown-win32 - | *ARSYM :                       21C0 - |
7159
*BAUD110 :                      417 - | *BAUD115200 :                     1 - |
7160
*BAUD1200 :                      60 - | *BAUD150 :                      300 - |
7161
*BAUD19200 :                      6 - | *BAUD2400 :                      30 - |
7162
*BAUD300 :                      180 - | *BAUD38400 :                      3 - |
7163
*BAUD4800 :                      18 - | *BAUD57600 :                      2 - |
7164
*BAUD600 :                       C0 - | *BAUD9600 :                       C - |
7165
*BB_CPU1 :                     3CBF - | *BB_CPU1_Size :                   1 - |
7166
*BB_CPU2 :                     3CC1 - | *BB_CPU2_Size :                   1 - |
7167
*BD_FDD_MASK :                 13BD - | *BIGENDIAN :                      0 - |
7168
*BLACK :                          0 - | *BLUE :                           1 - |
7169
*BOOTDEVICE :                     3 - | *BP_CPU1 :                     3CC0 - |
7170
*BP_CPU1_Size :                   1 - | *BP_CPU2 :                     3CC2 - |
7171
*BP_CPU2_Size :                   1 - | *BRANCHEXT :                      0 - |
7172
*BREAK_HIGH_RD :               11BE - | *BREAK_HIGH_WR :                1BD - |
7173
*BREAK_LOW_RD :                10BE - | *BREAK_LOW_WR :                  BD - |
7174
*BR_INK :                        40 - | *BR_PAPER :                      80 - |
7175
*BUFF_SECT :                   3CA5 - | *BUFF_SECT_Size :                 2 - |
7176
 BUF_256 :                     B300 - |  BUF_512 :                     BE00 - |
7177
 BUF_ALLVOL :                     0 - |  BUF_DIRCEP :                  3400 - |
7178
 BUF_LEVELDIR :                B000 - |  BUF_PATH :                    B200 - |
7179
 BUF_PATHMOUNT :               3000 - |  BUF_TABLVOL :                 BD00 - |
7180
 BUF_TDIRCLS :                 B400 - |  BUF_TEKVOL :                  BC00 - |
7181
*BUF_TEMPSEC :                 3500 - | *BUF_WINPATH :                 AC00 - |
7182
*BUILD_DEBUG :                    0 - |  BYTE :                           1 - |
7183
*B_ACCESSHDDM :                   5 - | *B_ACCESSHDDS :                   4 - |
7184
*B_ACCESSSDG :                    6 - | *B_ACCESSZCSD :                   7 - |
7185
*B_AUTOBOOT :                     7 - | *B_AUTOMOUNT :                    5 - |
7186
*B_AUTO_TAPE :                    2 - | *B_BREAK_BF :                     4 - |
7187
*B_CLOCK_VIEW :                   4 - | *B_DBG_ACTIV :                    7 - |
7188
*B_EMUL_TAPE :                    6 - | *B_EMUVG_BF :                     5 - |
7189
*B_FLASH_BF :                     1 - | *B_FONT_BF :                      2 - |
7190
*B_H :                            1 - | *B_KILL_REZIDENT :                7 - |
7191
*B_L :                           20 - | *B_MOUSE_L_KEY :                  0 - |
7192
*B_MOUSE_M_KEY :                  2 - | *B_MOUSE_R_KEY :                  1 - |
7193
*B_NMI_BF :                       3 - | *B_PENT_CMOS :                    7 - |
7194
*B_PENT_TURBO :                   4 - | *B_PRINTER_AY :                   5 - |
7195
*B_RELOAD_FONT :                  4 - | *B_REZIDENT :                     2 - |
7196
*B_RST8_BF :                      6 - | *B_SD_NGS_ONOFF :                 6 - |
7197
*B_SHADOW_BF :                    0 - | *B_SOUNDKEYS :                    3 - |
7198
*B_STEP_DBG :                     5 - | *B_TRACE_DBG :                    6 - |
7199
*B_TURBO14 :                      7 - | *B_TURBO357 :                     7 - |
7200
*B_TYPE_FONT :                    3 - | *CASESENSITIVE :                  1 - |
7201
*CMOSD_RD_WR :                 BEF7 - | *CMOSD_SET_ADR :               DEF7 - |
7202
*CMOS_BYTE_00 :                  ED - | *CMOS_BYTE_01 :                  EC - |
7203
*CMOS_BYTE_02 :                  E9 - | *CMOS_BYTE_03 :                  E8 - |
7204
*CMOS_RD_WR :                  BFF7 - | *CMOS_SET_ADR :                DFF7 - |
7205
*CONF4CUSTOM :                   9C - | *CONF4GLUK :                     94 - |
7206
*CONF4PROF :                     90 - | *CONF_128 :                    7FFD - |
7207
*CONSTPI :        3.141592653589793 - | *CONTINUE_MAGIC :                34 - |
7208
*CONT_RST8 :                     2C - | *COPY_VIRT_BITS :              3CCA - |
7209
*COPY_VIRT_BITS_Size :            1 - | *CPU0 :                           0 - |
7210
*CPU1 :                        4000 - | *CPU2 :                        8000 - |
7211
 CPU3 :                        C000 - | *CRCCMOSHIGH :                   EF - |
7212
*CRCCMOSLOW :                    EE - | *CRC_DRVS :                    BDFE - |
869 lvd 7213
*CYAN :                           5 - |  DATA_VERS :                   A857 - |
871 lvd 7214
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 116 - 2/23/2020 18:58:45
7215
 
7216
 
869 lvd 7217
 DATE :                   2/23/2020 - |  DDATE :                         17 - |
865 lvd 7218
*DEBUG_ONOFF :                   13 - |  DEVICES :                     BDE0 - |
7219
*DOS_STEK :                    3C9C - | *DOS_STEK_Size :                  2 - |
7220
*DWORD :                          4 - | *EI_RET :                        3E - |
7221
*END_VARS :                       0 C |  EXIT_PORT :                     BE - |
869 lvd 7222
*FALSE :                          0 - | *FAT_DATE :                    5057 - |
871 lvd 7223
*FAT_TIME :                    9756 - | *FDD_EMU_PORT :                13BD - |
867 lvd 7224
*FDI_BLOCK_SMESH :             41FF - | *FDI_BYTE_SMESH :              41FE - |
7225
*FDI_IMAGE1SECT :              4400 - | *FDI_PAGE_START :              40FF - |
7226
*FDI_TABLE_CYL :               4000 - | *FLAGS_DRV :                   BDF8 - |
7227
*FLAG_RW_BREAK :               3CCF - | *FLAG_RW_BREAK_Size :             1 - |
7228
*FULLPMMU :                       1 - |  GO_DEV :                      BDF0 - |
7229
*GREEN :                          4 - | *G_H :                           10 - |
7230
*G_L :                           80 - | *HAS64 :                          1 - |
7231
*HASDSP :                         0 - | *HASFPU :                         0 - |
7232
*HASPMMU :                        0 - | *HDD_TIMEOUT :                   EA - |
869 lvd 7233
 HHOUR :                         12 - | *ICALL2PAGE :                  8000 - |
867 lvd 7234
*INEXTMODE :                      0 - |  INITVAR :                     3CE2 - |
7235
*INLWORDMODE :                    0 - | *INMAXMODE :                      0 - |
7236
*INSRCMODE :                      0 - | *INSUPMODE :                      0 - |
7237
*IREG_D :                      3C99 - | *IREG_D_Size :                    1 - |
7238
*IREG_E :                      3C98 - | *IREG_E_Size :                    1 - |
7239
*IREG_H :                      3C9B - | *IREG_H_Size :                    1 - |
7240
*IREG_L :                      3C9A - | *IREG_L_Size :                    1 - |
7241
*JUMP :                           3 - |  JUMP_SIZE :                      3 - |
7242
 KOLDVOL :                     BDF2 - | *KOL_MODES :                      4 - |
7243
*LATTR :                       31C0 - | *LISTON :                         1 - |
871 lvd 7244
*LSYM :                         1C0 - |  M1131 :                         5F - |
7245
 M1133 :                        22E - |  M1134 :                        2C7 - |
867 lvd 7246
 M902 :                          35 - |  M903 :                          35 - |
7247
 M904 :                         292 - |  M906 :                           0 - |
865 lvd 7248
 M907 :                           4 - |  M908 :                           4 - |
7249
 M909 :                           4 - |  M910 :                           4 - |
7250
 M911 :                           4 - |  M912 :                           4 - |
7251
 M913 :                           4 - |  M914 :                           4 - |
867 lvd 7252
 M915 :                           4 - |  M916 :                           7 - |
7253
 M917 :                           4 - |  M918 :                           6 - |
7254
 M919 :                           6 - |  M920 :                           6 - |
7255
 M921 :                           4 - |  M922 :                           6 - |
7256
 M923 :                           4 - |  M924 :                           6 - |
7257
 M925 :                           4 - |  M926 :                           6 - |
7258
 M927 :                           4 - |  M928 :                           6 - |
7259
 M929 :                           4 - |  M930 :                           6 - |
7260
 M931 :                           4 - |  M932 :                           6 - |
871 lvd 7261
 M933 :                           4 - |  M934 :                           F - |
7262
 M935 :                           4 - |  M936 :                           4 - |
7263
 M937 :                           4 - |  M938 :                           4 - |
7264
 M939 :                           4 - |  M940 :                           4 - |
7265
 M941 :                           4 - |  M942 :                           4 - |
7266
 M943 :                           4 - |  M944 :                           7 - |
7267
 M945 :                           4 - |  M946 :                           6 - |
7268
 M947 :                           6 - |  M948 :                           6 - |
7269
 M949 :                           4 - |  M950 :                           6 - |
7270
 M951 :                           4 - |  M952 :                           6 - |
7271
 M953 :                           4 - |  M954 :                           6 - |
7272
 M955 :                           4 - |  M956 :                           6 - |
7273
 M957 :                           4 - |  M958 :                           6 - |
7274
 M959 :                           4 - |  M960 :                           6 - |
7275
 M961 :                         316 - | *MACEXP :                         7 - |
7276
*MAGENTA :                        3 - | *MASK_MNT_DRV :                3CC7 - |
7277
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 117 - 2/23/2020 18:58:45
865 lvd 7278
 
7279
 
871 lvd 7280
*MASK_MNT_DRV_Size :              1 - | *MASK_WRK_DRV :                3CC6 - |
7281
*MASK_WRK_DRV_Size :              1 - | *MEMORY_128 :                    30 - |
7282
*MEMORY_48 :                     20 - | *MEMORY_ALL :                    10 - |
7283
*MINT_STACK :                  3CC3 - | *MINT_STACK_Size :                2 - |
7284
*MKOL_MODES :                     3 - |  MMINUTE :                       3A - |
7285
 MMOUNTH :                        2 - | *MOMCPU :                      80DC - |
7286
*MOMCPUNAME :              Z80UNDOC - |  MOUNT_CLS :                   1000 - |
7287
 MOUNT_DRIVES :                B100 - | *MOUSE_KEYS :                  FADF - |
7288
*MOUSE_X :                     FBDF - | *MOUSE_Y :                     FFDF - |
7289
*M_ACCESSHDDM :                  20 - | *M_ACCESSHDDS :                  10 - |
7290
*M_ACCESSSDG :                   40 - | *M_ACCESSZCSD :                  80 - |
7291
*M_AUTOBOOT :                    80 - | *M_AUTOMOUNT :                   20 - |
7292
*M_AUTO_TAPE :                    4 - | *M_BREAK_BF :                    10 - |
7293
*M_CLOCK_VIEW :                  10 - | *M_DBG_ACTIV :                   80 - |
7294
*M_EMUL_TAPE :                   40 - | *M_EMUVG_BF :                    20 - |
7295
*M_FLASH_BF :                     2 - | *M_FONT_BF :                      4 - |
7296
*M_KILL_REZIDENT :               80 - | *M_MOUSE_L_KEY :                  1 - |
7297
*M_MOUSE_M_KEY :                  4 - | *M_MOUSE_R_KEY :                  2 - |
7298
*M_NMI_BF :                       8 - | *M_PENT_CMOS :                   80 - |
7299
*M_PENT_TURBO :                  10 - | *M_PRINTER_AY :                  20 - |
7300
*M_RELOAD_FONT :                 10 - | *M_REZIDENT :                     4 - |
7301
*M_RST8_BF :                     40 - | *M_SD_NGS_ONOFF :                40 - |
7302
*M_SHADOW_BF :                    1 - | *M_SOUNDKEYS :                    8 - |
7303
*M_STEP_DBG :                    20 - | *M_TRACE_DBG :                   40 - |
7304
*M_TURBO14 :                     80 - | *M_TURBO357 :                    80 - |
7305
*M_TYPE_FONT :                    8 - |  N1131 :                          1 - |
7306
 N1133 :                          B - |  N1134 :                          0 - |
7307
 N902 :                           0 - |  N903 :                           0 - |
7308
 N904 :                           0 - |  N906 :                           0 - |
7309
 N907 :                           0 - |  N908 :                           0 - |
7310
 N909 :                           0 - |  N910 :                           0 - |
7311
 N911 :                           0 - |  N912 :                           0 - |
7312
 N913 :                           0 - |  N914 :                           0 - |
7313
 N915 :                           0 - |  N916 :                           0 - |
7314
 N917 :                           0 - |  N918 :                           0 - |
7315
 N919 :                           0 - |  N920 :                           0 - |
7316
 N921 :                           0 - |  N922 :                           0 - |
7317
 N923 :                           0 - |  N924 :                           0 - |
7318
 N925 :                           0 - |  N926 :                           0 - |
7319
 N927 :                           0 - |  N928 :                           0 - |
7320
 N929 :                           0 - |  N930 :                           0 - |
7321
 N931 :                           0 - |  N932 :                           0 - |
7322
 N933 :                           0 - |  N934 :                           0 - |
7323
 N935 :                           0 - |  N936 :                           0 - |
7324
 N937 :                           0 - |  N938 :                           0 - |
7325
 N939 :                           0 - |  N940 :                           0 - |
7326
 N941 :                           0 - |  N942 :                           0 - |
7327
 N943 :                           0 - |  N944 :                           0 - |
7328
 N945 :                           0 - |  N946 :                           0 - |
7329
 N947 :                           0 - |  N948 :                           0 - |
7330
 N949 :                           0 - |  N950 :                           0 - |
7331
 N951 :                           0 - |  N952 :                           0 - |
7332
 N953 :                           0 - |  N954 :                           0 - |
7333
 N955 :                           0 - |  N956 :                           0 - |
7334
 N957 :                           0 - |  N958 :                           0 - |
7335
 N959 :                           0 - |  N960 :                           0 - |
7336
 N961 :                           0 - | *NESTMAX :                      100 - |
867 lvd 7337
 NUM_APPMULTI :                   2 - |  NUM_EGA :                        0 - |
7338
*NUM_LINE :                    13BE - |  NUM_TXTATM :                     6 - |
7339
 NUM_TXTSCR :                     7 - |  NUM_ZXSCR :                      3 - |
871 lvd 7340
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 118 - 2/23/2020 18:58:45
7341
 
7342
 
867 lvd 7343
 OFFSET_BUFSYM :                800 - |  OFFSET_FNTSAVE :                 0 - |
7344
 OFFSET_SCRSAVE :              1000 - | *OFFSET_USBDRV :               2B00 - |
7345
 OLD_AF :                       DFD - | *OLD_IF :                       DFB - |
7346
*OLD_PORT_BF :                 3CCB - | *OLD_PORT_BF_Size :               1 - |
7347
*PACKING :                        0 - | *PADDING :                        1 - |
7348
*PENT_CONF :                   EFF7 - | *PEVO_CONF :                     BF - |
7349
*PORT_3F :                     3CA0 - | *PORT_3F_Size :                   1 - |
7350
*PORT_5F :                     3CA1 - | *PORT_5F_Size :                   1 - |
7351
*PORT_7F :                     3CA2 - | *PORT_7F_Size :                   1 - |
7352
*QWORD :                          8 - | *RAM_ADDSTS :                     7 - |
7353
*RAM_BASIC :                      3 - | *RAM_DATARAMD :                   B - |
7354
*RAM_EVODOS :                     1 - | *RAM_FATVARS :                    2 - |
7355
*RAM_FLASHER :                   40 - | *RAM_MOUNTER :                    5 - |
7356
*RAM_PROFROM :                    4 - | *RAM_RAMDISK :                    A - |
7357
*RAM_SCR_FONT :                   8 - | *RAM_STS :                        6 - |
7358
*RAM_TAPE :                      60 - | *RAM_TEMP :                       9 - |
7359
*RAM_TEMP2 :                     3F - | *RATTR :                       21C1 - |
7360
*RDWR_MODE :                   3CCD - | *RDWR_MODE_Size :                 1 - |
7361
*RDWR_PAGE :                   3CCE - | *RDWR_PAGE_Size :                 1 - |
7362
*RD_0WINA0 :                     BE - | *RD_0WINA1 :                    1BE - |
7363
*RD_0WINA2 :                    2BE - | *RD_0WINA3 :                    3BE - |
7364
*RD_1F :                       3C9F - | *RD_1F_Size :                     1 - |
7365
*RD_1WINA0 :                    4BE - | *RD_1WINA1 :                    5BE - |
7366
*RD_1WINA2 :                    6BE - | *RD_1WINA3 :                    7BE - |
7367
*RD_77 :                        CBE - | *RD_7FFD :                      ABE - |
7368
*RD_DOS7FFD :                   9BE - | *RD_EFF7 :                      BBE - |
7369
*RD_FF :                       3CA4 - | *RD_FF_Size :                     1 - |
7370
*RD_PALITRA :                   DBE - | *RD_RAMNROM :                   8BE - |
7371
*REAL_DRIVE :                  3CC9 - | *REAL_DRIVE_Size :                1 - |
7372
*RED :                            2 - | *REG_A :                       3CAE - |
7373
*REG_A_Size :                     1 - | *REG_B :                       3CAC - |
7374
*REG_B_Size :                     1 - | *REG_C :                       3CAB - |
7375
*REG_C_Size :                     1 - | *REG_F :                       3CAD - |
7376
*REG_F_Size :                     1 - | *REG_H :                       3CB0 - |
7377
*REG_H_Size :                     1 - | *REG_I :                       3CAA - |
7378
*REG_IF :                      3CA9 - | *REG_IF_Size :                    1 - |
7379
*REG_I_Size :                     1 - | *REG_L :                       3CAF - |
7380
*REG_L_Size :                     1 - | *RELAXED :                        1 - |
7381
*RESET2CUSTOM :                   3 - | *RESET2EVOSERV :                  0 - |
7382
*RESET2GLUK :                     1 - | *RESET2PROFROM :                  2 - |
7383
*REZIDENT :                       0 C | *ROM_ADD_BAS48 :                  B - |
7384
*ROM_ADD_DOS :                    A - | *ROM_ATMCPM :                    1B - |
7385
*ROM_BAS128 :                     1 - | *ROM_BAS128_STD :                19 - |
7386
*ROM_BAS48 :                      3 - | *ROM_BAS48_128 :                 1A - |
7387
*ROM_BAS48_STD :                 18 - | *ROM_DOS :                        2 - |
7388
*ROM_ERS :                        0 - | *ROM_MAINMENU :                   5 - |
7389
*ROM_RST80 :                      6 - | *ROM_RST81 :                      7 - |
7390
*ROM_RST82 :                      8 - | *ROM_RST83 :                      9 - |
7391
*RS232_DIV_H :                 F9EF - | *RS232_DIV_L :                 F8EF - |
7392
*RS232_IO :                    F8EF - | *RS232_IRQ_ENA :               F9EF - |
7393
*RS232_IRQ_ID :                FAEF - | *RS232_LINE_CTRL :             FBEF - |
7394
*RS232_LINE_STAT :             FDEF - | *RS232_MDM_CTRL :              FCEF - |
7395
*RS232_MDM_STAT :              FEEF - | *RS232_WORK_REG :              FFEF - |
7396
*RSYM :                        11C0 - | *R_H :                            2 - |
7397
*R_L :                           40 - | *SAVED_RAM :                   3CD2 - |
7398
*SAVED_RAM_Size :                10 - |  SAVE_TEK_VOL :                BDF6 - |
7399
*SECTOR_SIZE :                 3CCC - | *SECTOR_SIZE_Size :               1 - |
7400
 SETDVOL :                     BDF3 - | *SET_VIDEOMODE :                  8 - |
869 lvd 7401
 SIZEDATE :                       9 - |  SIZETIME :                       8 - |
871 lvd 7402
 SSECUND :                       2C - |  STACK :                        DFF - |
7403
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 119 - 2/23/2020 18:58:45
7404
 
7405
 
867 lvd 7406
*START_STS :                   C000 - |  START_TEST :                   302 C |
7407
 TABLE_VIRT :                   801 C |  TEK_BUFPATH :                 2000 - |
7408
*TEK_ROMPAGE :                 3CC5 - | *TEK_ROMPAGE_Size :               1 - |
7409
 TEK_TYPE :                    BDF7 - | *TEMP_SP :                     3CD0 - |
871 lvd 7410
*TEMP_SP_Size :                   2 - |  TIME :                    18:58:44 - |
867 lvd 7411
*TRUE :                           1 - | *TURBO_14 :                      C0 - |
7412
*TURBO_3 :                       40 - | *TURBO_7 :                       80 - |
7413
*UNPACK :                        80 - | *UNP_DOS_FE :                    40 - |
7414
*VERSION :                     142F - | *VIRT_DRIVE :                  3CC8 - |
7415
*VIRT_DRIVE_Size :                1 - | *VIRT_REAL_DRIVE :               EB - |
7416
*VMODE6_0C :                     FE - | *VMODE6_0M :                     FA - |
7417
*VMODE6_1C :                     FC - | *VMODE6_1M :                     F8 - |
7418
*VMODE7_0 :                      F7 - | *VMODE7_1 :                      F5 - |
7419
*V_APPMULTI :                    A2 - | *V_EGA :                         A0 - |
7420
*V_TXT1PAGE :                    A7 - | *V_TXTATM :                      A6 - |
7421
*V_ZXSCR :                       A3 - | *WHITE :                          7 - |
7422
*WIN_A0 :                      3FF7 - | *WIN_A1 :                      7FF7 - |
7423
*WIN_A2 :                      BFF7 - | *WIN_A3 :                      FFF7 - |
7424
*WIN_P0 :                      37F7 - | *WIN_P1 :                      77F7 - |
7425
*WIN_P2 :                      B7F7 - | *WIN_P3 :                      F7F7 - |
7426
*WIN_R0 :                      3BF7 - | *WIN_R1 :                      7BF7 - |
7427
*WIN_R2 :                      BBF7 - | *WIN_R3 :                      FBF7 - |
7428
 WORD :                           2 - |  WORKER :                       F00 C |
7429
*WR_0WINA0 :                   3CBE - | *WR_0WINA0_Size :                 1 - |
7430
*WR_0WINA1 :                   3CBD - | *WR_0WINA1_Size :                 1 - |
7431
*WR_0WINA2 :                   3CBC - | *WR_0WINA2_Size :                 1 - |
7432
*WR_0WINA3 :                   3CBB - | *WR_0WINA3_Size :                 1 - |
7433
*WR_1F :                       3C9E - | *WR_1F_Size :                     1 - |
7434
*WR_1WINA0 :                   3CBA - | *WR_1WINA0_Size :                 1 - |
7435
*WR_1WINA1 :                   3CB9 - | *WR_1WINA1_Size :                 1 - |
7436
*WR_1WINA2 :                   3CB8 - | *WR_1WINA2_Size :                 1 - |
7437
*WR_1WINA3 :                   3CB7 - | *WR_1WINA3_Size :                 1 - |
7438
*WR_77 :                       3CB2 - | *WR_77_Size :                     1 - |
7439
*WR_7FFD :                     3CB4 - | *WR_7FFD_Size :                   1 - |
7440
*WR_BF :                       3CB1 - | *WR_BF_Size :                     1 - |
7441
*WR_DOS7FFD :                  3CB5 - | *WR_DOS7FFD_Size :                1 - |
7442
*WR_EFF7 :                     3CB3 - | *WR_EFF7_Size :                   1 - |
7443
*WR_FF :                       3CA3 - | *WR_FF_Size :                     1 - |
7444
*WR_RAMNROM :                  3CB6 - | *WR_RAMNROM_Size :                1 - |
7445
*YELLOW :                         6 - |  YYEAR :                         14 - |
7446
*ZXSCR_0 :                       FA - | *ZXSCR_1 :                       F8 - |
7447
*ZXSTD_CPU1 :                    FA - | *ZXSTD_CPU2 :                    FD - |
7448
*ZX_ROM :                        10 - | *ZX_SCREEN :                      8 - |
7449
 _0X0302 :                        0 - |  _0X030A :                        1 - |
7450
 _0X0312 :                        2 - |  _0X031A :                        3 - |
7451
 _0X0322 :                        4 - |  _0X032A :                        5 - |
7452
 _0X0332 :                        6 - |  _0X033A :                        7 - |
7453
 _0X0342 :                        8 - |  _0X034A :                        9 - |
7454
 _0X0355 :                        A - |  _0X035D :                        B - |
7455
 _0X0367 :                        C - |  _0X0371 :                        D - |
7456
 _0X037B :                        E - |  _0X0383 :                        F - |
7457
 _0X038D :                       10 - |  _0X0395 :                       11 - |
7458
 _0X039F :                       12 - |  _0X03A7 :                       13 - |
7459
 _0X03B1 :                       14 - |  _0X03B9 :                       15 - |
7460
 _0X03C3 :                       16 - |  _0X03CB :                       17 - |
871 lvd 7461
 _0X03D5 :                       18 - |  _0X03DD :                       19 - |
7462
 _0X03E7 :                       1A - |  _0X03EF :                       1B - |
7463
 _0X0402 :                       1C - |  _0X040A :                       1D - |
7464
 _0X0412 :                       1E - |  _0X041A :                       1F - |
7465
 _0X0422 :                       20 - |  _0X042A :                       21 - |
7466
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 120 - 2/23/2020 18:58:45
865 lvd 7467
 
7468
 
871 lvd 7469
 _0X0432 :                       22 - |  _0X043A :                       23 - |
7470
 _0X0442 :                       24 - |  _0X044A :                       25 - |
7471
 _0X0455 :                       26 - |  _0X045D :                       27 - |
7472
 _0X0467 :                       28 - |  _0X0471 :                       29 - |
7473
 _0X047B :                       2A - |  _0X0483 :                       2B - |
7474
 _0X048D :                       2C - |  _0X0495 :                       2D - |
7475
 _0X049F :                       2E - |  _0X04A7 :                       2F - |
7476
 _0X04B1 :                       30 - |  _0X04B9 :                       31 - |
7477
 _0X04C3 :                       32 - |  _0X04CB :                       33 - |
7478
 _0X04D5 :                       34 - |  _0X04DD :                       35 - |
7479
 _0X04E7 :                       36 - |  _0X04EF :                       37 - |
867 lvd 7480
*_128K :                          2 - | *_1MB :                           0 - |
7481
*_48K :                           1 - | *_ADR_HOTKEY_H :                 13 - |
7482
*_ADR_HOTKEY_H_Size :             1 - | *_ADR_HOTKEY_L :                 12 - |
7483
*_ADR_HOTKEY_L_Size :             1 - | *_ADR_MOUSE_H :                  11 - |
7484
*_ADR_MOUSE_H_Size :              1 - | *_ADR_MOUSE_L :                  10 - |
7485
*_ADR_MOUSE_L_Size :              1 - | *_ADR_PRG_H :                     F - |
7486
*_ADR_PRG_H_Size :                1 - | *_ADR_PRG_L :                     E - |
7487
*_ADR_PRG_L_Size :                1 - | *_ADR_TXT_H :                     D - |
7488
*_ADR_TXT_H_Size :                1 - | *_ADR_TXT_L :                     C - |
7489
*_ADR_TXT_L_Size :                1 - | *_ALLOC_PAGE :                  12A - |
7490
*_ALLOC_PAGE_Size :               3 - | *_AY_PRN_A_ :                    41 - |
7491
*_AY_PRN_A__Size :                1 - | *_AY_PRN_INIT :                  40 - |
7492
*_AY_PRN_INIT_Size :              1 - | *_AY_PRN_SCR :                   43 - |
7493
*_AY_PRN_SCR_Size :               1 - | *_AY_PRN_TOKEN :                 42 - |
7494
*_AY_PRN_TOKEN_Size :             1 - | *_BIOS :                         4F - |
7495
*_BIOS_JUMPS :                  100 - | *_BIOS_Size :                     1 - |
7496
*_BMP :                           8 - | *_BMP_Size :                      1 - |
7497
*_CLEAR_CMOS :                    3 - | *_CLEAR_CMOS_Size :               1 - |
7498
*_CLOSEMOUNT :                    4 - | *_CLOSEMOUNT_Size :               1 - |
7499
*_CMOS_DAY :                      6 - | *_CMOS_DAY_MONTH :                7 - |
7500
*_CMOS_HOUR :                     4 - | *_CMOS_HOUR_AL :                  5 - |
7501
*_CMOS_MINUTE :                   2 - | *_CMOS_MINUTE_AL :                3 - |
7502
*_CMOS_MONTH :                    8 - | *_CMOS_RW :                      55 - |
7503
*_CMOS_RW_Size :                  1 - | *_CMOS_SECOND :                   0 - |
7504
*_CMOS_SECOND_AL :                1 - | *_CMOS_YEAR :                     9 - |
7505
*_CMP_DRIVE :                     7 - | *_CMP_DRIVE_Size :                1 - |
7506
*_COLOR_CUR :                     5 - | *_COLOR_CUR_Size :                1 - |
7507
*_COLOR_WIN :                     4 - | *_COLOR_WIN_Size :                1 - |
7508
*_COMHDDN :                       7 - | *_COMHDDN_Size :                  1 - |
7509
*_COM_DEV :                      50 - | *_COM_DEV_Size :                  1 - |
7510
*_COM_FAT :                      51 - | *_COM_FAT_Size :                  1 - |
7511
*_CONTROL_SD :                    6 - | *_CONTROL_SD_Size :               1 - |
7512
*_DEVFIND :                       0 - | *_DEVFIND_Size :                  1 - |
7513
*_DEV_INIT :                      0 - | *_DEV_INIT_Size :                 1 - |
7514
*_DEV_READ :                      2 - | *_DEV_READID :                    4 - |
7515
*_DEV_READID_Size :               1 - | *_DEV_READ_Size :                 1 - |
7516
*_DEV_STATUS :                    1 - | *_DEV_STATUS_Size :               1 - |
7517
*_DEV_WRITE :                     3 - | *_DEV_WRITE_Size :                1 - |
7518
*_DIVIDE16 :                      0 - | *_DIVIDE16_Size :                 1 - |
7519
*_DIVIDE32 :                      2 - | *_DIVIDE32_Size :                 1 - |
7520
*_ENTER_DIR :                     2 - | *_ENTER_DIR_Size :                1 - |
7521
*_FAT12 :                         1 - | *_FAT12_Size :                    1 - |
7522
*_FAT16 :                         2 - | *_FAT16_Size :                    1 - |
7523
*_FAT32 :                         3 - | *_FAT32_Size :                    1 - |
7524
*_FDD :                           0 - | *_FDI :                           3 - |
7525
*_FDI_Size :                      1 - | *_FIND_FILEITEM :                 6 - |
7526
*_FIND_FILEITEM_Size :            1 - | *_FIND_MOUNTED :                  2 - |
7527
*_FIND_MOUNTED_Size :             1 - | *_FIND_NAME :                     5 - |
7528
*_FIND_NAME_Size :                1 - | *_FLAGS :                         6 - |
871 lvd 7529
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 121 - 2/23/2020 18:58:45
7530
 
7531
 
867 lvd 7532
*_FLAGS_Size :                    1 - | *_FNT :                           7 - |
7533
*_FNT_Size :                      1 - | *_FREE_PAGE :                   12D - |
7534
*_FREE_PAGE_Size :                3 - | *_FREINIT_VOL :                   8 - |
7535
*_FREINIT_VOL_Size :              1 - | *_GET_FNDVOLUME :                 3 - |
7536
*_GET_FNDVOLUME_Size :            1 - | *_GET_LONGNAME :                  4 - |
7537
*_GET_LONGNAME_Size :             1 - | *_GET_MOUNTED :                   3 - |
7538
*_GET_MOUNTED_Size :              1 - | *_GET_PATH :                      3 - |
7539
*_GET_PATH_Size :                 1 - | *_GET_TABLE_MEM :               127 - |
7540
*_GET_TABLE_MEM_Size :            3 - | *_GET_VIRT_BITS :                 8 - |
7541
*_GET_VIRT_BITS_Size :            1 - | *_HDD :                           1 - |
7542
*_HEX1DECTXT :                    6 - | *_HEX1DECTXT_Size :               1 - |
7543
*_HEX2DECTXT :                    5 - | *_HEX2DECTXT_Size :               1 - |
7544
*_HEX4DECTXT :                    4 - | *_HEX4DECTXT_Size :               1 - |
7545
*_HOB :                           6 - | *_HOB_Size :                      1 - |
7546
*_H_SIZE :                        3 - | *_H_SIZE_Size :                   1 - |
7547
*_INIT_CMOS :                     0 - | *_INIT_CMOS_Size :                1 - |
7548
*_INIT_FATVARS :                  0 - | *_INIT_FATVARS_Size :             1 - |
7549
*_INIT_KEYB_PS2 :               11B - | *_INIT_KEYB_PS2_Size :            3 - |
7550
*_INIT_TABLE_MEM :              124 - | *_INIT_TABLE_MEM_Size :           3 - |
7551
*_INIT_TEKDIR :                   A - | *_INIT_TEKDIR_Size :              1 - |
7552
*_INST_FATBOOT :                 54 - | *_INST_FATBOOT_Size :             1 - |
7553
*_KOL_VOL :                       2 - | *_KOL_VOL_Size :                  1 - |
7554
*_LOADIMAGE :                     5 - | *_LOADIMAGE_Size :                1 - |
7555
*_MATH :                         4C - | *_MATH_Size :                     1 - |
7556
*_MEM_MODE_128 :                 80 - | *_MEM_MODE_48 :                  40 - |
7557
*_MEM_MODE_PENT :                C0 - | *_MOUNTER :                      53 - |
7558
*_MOUNTER_Size :                  1 - | *_MOUNT_RAMDISK :                 9 - |
7559
*_MOUNT_RAMDISK_Size :            1 - | *_MOUSE_WHEEL :                  F0 - |
7560
*_MULTIPLY16 :                    1 - | *_MULTIPLY16_Size :               1 - |
7561
*_MULTIPLY32 :                    3 - | *_MULTIPLY32_Size :               1 - |
7562
*_NEMO_RD_ID :                  100 - | *_NEMO_RD_ID_Size :               3 - |
7563
*_NEMO_RD_SEC :                 103 - | *_NEMO_RD_SEC_Size :              3 - |
7564
*_NEMO_WR_SEC :                 106 - | *_NEMO_WR_SEC_Size :              3 - |
7565
*_NGSSD_RD_ID :                 112 - | *_NGSSD_RD_ID_Size :              3 - |
7566
*_NGSSD_RD_SEC :                115 - | *_NGSSD_RD_SEC_Size :             3 - |
7567
*_NGSSD_WR_SEC :                118 - | *_NGSSD_WR_SEC_Size :             3 - |
7568
*_NO_INIT :                       0 - | *_NO_INIT_Size :                  1 - |
7569
*_NUM_KOL_H :                     B - | *_NUM_KOL_H_Size :                1 - |
7570
*_NUM_KOL_L :                     A - | *_NUM_KOL_L_Size :                1 - |
7571
*_NUM_PKT :                       7 - | *_NUM_PKT_Size :                  1 - |
7572
*_OPEN_FILE :                     8 - | *_OPEN_FILE_Size :                1 - |
7573
*_OPEN_MOUNT :                    0 - | *_OPEN_MOUNT_Size :               1 - |
7574
*_POSTF00 :                       0 - | *_POSTF00_Size :                  1 - |
7575
*_POSTF01 :                       1 - | *_POSTF01_Size :                  1 - |
7576
*_POSTF02 :                       2 - | *_POSTF02_Size :                  1 - |
7577
*_POSTF03 :                       3 - | *_POSTF03_Size :                  1 - |
7578
*_POSTF04 :                       4 - | *_POSTF04_Size :                  1 - |
7579
*_POSTF05 :                       5 - | *_POSTF05_Size :                  1 - |
7580
*_POSTF06 :                       6 - | *_POSTF06_Size :                  1 - |
7581
*_POSTF07 :                       7 - | *_POSTF07_Size :                  1 - |
7582
*_POS_FILES :                     B - | *_POS_FILES_Size :                1 - |
7583
*_PRINT_A :                      48 - | *_PRINT_A_Size :                  1 - |
7584
*_PRINT_MESSAGE :                47 - | *_PRINT_MESSAGE_Size :            1 - |
7585
*_RDWR_MOUNT :                    1 - | *_RDWR_MOUNT_Size :               1 - |
7586
*_READ_CMOS :                     1 - | *_READ_CMOS_Size :                1 - |
7587
*_READ_DIR :                      1 - | *_READ_DIR_Size :                 1 - |
7588
*_READ_FILE :                     9 - | *_READ_FILE_Size :                1 - |
7589
*_READ_KEYB_PS2 :               11E - | *_READ_KEYB_PS2_Size :            3 - |
7590
*_READ_STAT_PS2 :               121 - | *_READ_STAT_PS2_Size :            3 - |
7591
*_REAL_DRIVE :                    C - | *_REST_NAMELOAD :                 6 - |
871 lvd 7592
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 122 - 2/23/2020 18:58:45
7593
 
7594
 
867 lvd 7595
*_REST_NAMELOAD_Size :            1 - | *_ROM :                           9 - |
7596
*_ROM_Size :                      1 - | *_SCL :                           2 - |
7597
*_SCL_Size :                      1 - | *_SCROLL_DOWN :                  4A - |
7598
*_SCROLL_DOWN_Size :              1 - | *_SCROLL_UP :                    49 - |
7599
*_SCROLL_UP_Size :                1 - | *_SD :                            2 - |
7600
*_SD_NONE :                      80 - | *_SETUP_FONT :                   57 - |
7601
*_SETUP_FONT_Size :               1 - | *_SETUP_PAL :                    56 - |
7602
*_SETUP_PAL_Size :                1 - | *_SET_DEVICE :                    5 - |
7603
*_SET_DEVICE_Size :               1 - | *_SET_MASK_EXT :                  7 - |
7604
*_SET_MASK_EXT_Size :             1 - | *_SET_MODE :                     4B - |
7605
*_SET_MODE_Size :                 1 - | *_SET_VOL :                       1 - |
7606
*_SET_VOL_Size :                  1 - | *_SORT_FINDFILES :               52 - |
7607
*_SORT_FINDFILES_Size :           1 - | *_SPG :                           5 - |
7608
*_SPG_Size :                      1 - | *_TAP :                           4 - |
7609
*_TAPE_EMUL :                    45 - | *_TAPE_EMUL_Size :                1 - |
7610
*_TAPE_INIT :                    44 - | *_TAPE_INIT_Size :                1 - |
7611
*_TAP_Size :                      1 - | *_TEK_PKT_H :                     9 - |
7612
*_TEK_PKT_H_Size :                1 - | *_TEK_PKT_L :                     8 - |
7613
*_TEK_PKT_L_Size :                1 - | *_TO_DRV :                        4 - |
7614
*_TO_DRV_Size :                   1 - | *_TRD :                           1 - |
7615
*_TRDOS :                         4 - | *_TRDOS_Size :                    1 - |
7616
*_TRD_Size :                      1 - | *_TURBO_HIGH :                   20 - |
7617
*_TURBO_LOW :                    10 - | *_TURBO_MAX :                    30 - |
7618
*_TXTSCR_MODE :                   2 - | *_UNKNOWN :                       5 - |
7619
*_UNKNOWN_Size :                  1 - | *_VERSION :                      4D - |
7620
*_VERSION_Size :                  1 - | *_VIRT_DRIVE :                    3 - |
7621
*_V_SIZE :                        2 - | *_V_SIZE_Size :                   1 - |
7622
*_WINW :                         46 - | *_WINW_Size :                     1 - |
7623
*_WRITE_CMOS :                    2 - | *_WRITE_CMOS_Size :               1 - |
7624
*_X_COORD :                       0 - | *_X_COORD_Size :                  1 - |
7625
*_Y_COORD :                       1 - | *_Y_COORD_Size :                  1 - |
7626
*_ZCSD_RD_ID :                  109 - | *_ZCSD_RD_ID_Size :               3 - |
7627
*_ZCSD_RD_SEC :                 10C - | *_ZCSD_RD_SEC_Size :              3 - |
7628
*_ZCSD_WR_SEC :                 10F - | *_ZCSD_WR_SEC_Size :              3 - |
7629
*_ZXSCR_MODE :                    1 - |
865 lvd 7630
 
871 lvd 7631
   1023 symbols
7632
    736 unused symbols
865 lvd 7633
 
871 lvd 7634
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 123 - 2/23/2020 18:58:45
865 lvd 7635
 
7636
 
7637
  defined macros:
7638
  ---------------
7639
 
7640
ADDVAR                                | ATMPORT                              
7641
BITMASK                               | DALIGN                               
871 lvd 7642
DC                                    | DJP_EMU                              
7643
DUPL                                  | DZ                                   
7644
EMU_JUMP                              | EVOPORT                              
7645
INIT_VAR                              | JP_EMU                               
7646
LABEL_GEN                             | MALIGN                               
7647
PEC_OFF                               | PEC_ON                               
7648
RAMCALL                               | READ_7FFD                            
7649
ROMCALL                               | RST8                                 
7650
SETVAR                                | SUBVAR                               
7651
SUM_HOB                               | TEXTDATE                             
7652
WORD2TXT                              |
865 lvd 7653
 
871 lvd 7654
     25 macros
865 lvd 7655
 
871 lvd 7656
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 124 - 2/23/2020 18:58:45
865 lvd 7657
 
7658
 
7659
  defined functions:
7660
  ------------------
7661
 
7662
LOW                                   | HIGH                                 
7663
 
871 lvd 7664
 AS V1.42 Beta [Bld 146] - source file dos_fe.a80 - page 125 - 2/23/2020 18:58:45
865 lvd 7665
 
7666
 
7667
  codepages:
7668
  ----------
7669
 
7670
STANDARD (0 changed characters)
7671
 
7672
 
871 lvd 7673
0.42 seconds assembly time
865 lvd 7674
 
871 lvd 7675
   1110 lines source file
7676
   4223 lines incl. macro expansions
865 lvd 7677
      2 passes
7678
 
7679