Subversion Repositories pentevo

Rev

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

Rev Author Line No. Line
801 savelij 1
 
1186 savelij 2
; LAST UPDATE: 14.02.2025 savelij
801 savelij 3
 
1186 savelij 4
; ⥫  (  IX)
5
; +00 X न
6
; +01 Y न
7
; +02 V 
8
; +03 H ਭ
9
; +04 C 梥
10
; +05 C 梥 
11
; +06 F 䫠
12
; +07 N  㭪  
13
;   7-0= 8-9 ⥪騩 㭪 ,
14
;        1= 8-9  ࠭
15
; +08 | ⥪騩
16
; +09 | 㭪 
17
; +0A : ⢮
18
; +0B : 㭪⮢ 
19
; +0C | 
20
; +0D | ⥪
21
; +0E : ᯨ᮪ ᮢ
22
; +0F : ணࠬ
23
; +10 |  ᯨ᪠ ⨢
24
; +11 |   
25
; +12 :  ᯨ᪠
26
; +13 :  
801 savelij 27
 
1186 savelij 28
; ଠ 䫠  
29
; IX+6
30
; 7-0-, 1-  
31
; 6-0- ࠬ,1- ࠬ
32
; 5-0-, 1- 孨 
33
; 4-0-, 1- ⥪
34
; 3
35
; 2-
36
; 1-
37
; 0-
801 savelij 38
 
1186 savelij 39
; ᪫  뤥
40
; +0 䫠
41
;     7  ⨢ ⠭
42
;     6 ⠭,  뤥
43
;     5 ⠭, 맮 
44
;     4
45
;     3 \
46
;     2  } ଠ 
47
;     1  }  
48
;     0 /
49
; +1 X न
50
; +2 Y न
51
; +3 V 
52
; +4 H ਭ
53
; +5 K  
801 savelij 54
 
1026 savelij 55
;===============設    ================
56
SPRAR           DB 0x3F,0x00,0x1F,0x40,0x0F,0x60,0x07,0x50,0x03,0x48,0x01,0x4C,0x01,0x70,0x07,0x00
57
SPRAR2          DB 0x3F,0x00,0x1F,0x40,0x0F,0x60,0x07,0x70,0x03,0x78,0x01,0x7C,0x01,0x70,0x07,0x00
58
;===============設    ================
59
 
60
;   ᮧ 9 ᥪ  ᪠
1186 savelij 61
DSKINFO         DB 0                    ; + 0xE1 -  ࢮ ᢮ ᥪ
62
                DB 1                    ; + 0xE2 -  ࢮ ᢮ ४
63
                DB 0x16                 ; + 0xE3 - ⨯ ᪥
64
                DB 0                    ; + 0xE4 - ⢮ 䠩  ᪥
65
SECFREE         DW 2544                 ; + 0xE5 - ⢮ ᢮ ᥪ஢
66
                DB 0x10                 ; + 0xE7 - 䨪樮  TRDOS
67
                DW 0                    ; + 0xE8 - 2  0
68
                DB 9 DUP 0x20           ; + 0xEA - 9  0x20
69
                DB 0                    ; + 0xF3 - 1  0
70
                DB 0                    ; + 0xF4 - ⢮ 㤠 䠩
71
                DB "RAMDISKO"           ; + 0xF5 -  ᪥
1026 savelij 72
DSK_END
73
 
74
;=============== ᪮ 訡=======================
75
DSK_ERR
76
 WINHDR 0x08,0x08,LOW ((D_ERR2-D_ERR1)/2)+2,0x11,0x17,0x3A,%00100000,0, \
77
        0,((D_ERR2-D_ERR1)/2),DSKERRTXT,D_ERR1,0,DSK_ERR_KEY
78
DSKERRTXT       DB "\x17\xFFDOS MEDITATE!"
79
                DB "\r R.Retry:  "
801 savelij 80
NUM_TRK_TXT     DB "  /"
81
NUM_SEC_TXT     DB "  /"
82
SIDE_DISK       DB " "                          ;r
1026 savelij 83
                DB "\r I.Ignore sector"         ;i
84
                DB "\r B.Break",0               ;b
801 savelij 85
DSK_ERR_KEY     DB LOW (D_ERR1-$-1),"rib"
86
 
87
D_ERR1          DW _RETRY
88
                DW _IGNORE
89
                DW _STUPID
90
D_ERR2
1026 savelij 91
;=============== ᪮ 訡=======================
801 savelij 92
 
1026 savelij 93
;===============ࢨ᭮ =============================
94
MKILLS
95
 WINHDR 0x0A,0x07,LOW ((KILL2-KILL1)/2)+2,0x12,0x0F,0x1F,%00100000,0, \
96
        0,((KILL2-KILL1)/2),MKILLSTXT,KILL1,0,MKILLS_KEY
97
MKILLSTXT       DB "\x17\xFFServices"
98
                DB "\r R.Reset NeoGS"                   ;r
99
                DB "\r E.Reset CMOS"                    ;e
100
                DB "\r K.Format ramdisk 640k"           ;k
101
                DB "\r V.Basic 48 standart"             ;v
102
                DB "\r B.Basic 128 standart"            ;b
103
                DB "\r M.Edit CMOS"                     ;m
104
                DB "\r S.Test PC keyboard"              ;s
1186 savelij 105
                DB "\r D.Device detector"               ;d
1026 savelij 106
                DB "\r C.ATM CP/M"                      ;c
107
                DB "\r T.IS-DOS boot"                   ;t
108
                DB "\r F.Fast update ROM"               ;f
109
                DB "\r U.Update custom ROM"             ;u
110
                DB "\r N.Dismount image"                ;n
111
                DB "\r X.Exit",0                        ;x
801 savelij 112
MKILLS_KEY      DB LOW (KILL1-$-1),"rekvbmsdctfunx"
113
 
114
KILL1           DW RESETNGS                     ;r
115
                DW RESET_CMOS                   ;e
116
                DW RAM_640                      ;k
117
                DW BAS48STD                     ;v
118
                DW BAS128STD                    ;b
119
                DW EDIT_CMOS                    ;m
120
                DW PC_KEYS_TEST                 ;s
121
                DW HDD_DETECTOR                 ;d
122
                DW ATM_CPM                      ;c
123
                DW ISDOS_BOOT                   ;t
124
                DW LOAD4FLASH_FULL              ;f
125
                DW LOAD4FLASH_CUST              ;u
126
                DW UMOUNTIMAGE                  ;n
127
                DW RESTART                      ;x
128
KILL2
1026 savelij 129
;===============ࢨ᭮ =============================
801 savelij 130
 
1026 savelij 131
;===============஢ ࠧ=====================
132
WDISMOUNT
1067 savelij 133
 WINHDR 0x0E,0x08,LOW ((WDISM2-WDISM1)/2)+2,0x0D,0x07,0x1F,%00100000,0, \
1026 savelij 134
        0,((WDISM2-WDISM1)/2),WDISMTXT,WDISM1,0,WDISMKEY
135
WDISMTXT        DB "\x17\xFFDismount"
136
                DB "\r 1.Dismount A:"           ;1
137
                DB "\r 2.Dismount B:"           ;2
138
                DB "\r 3.Dismount C:"           ;3
139
                DB "\r 4.Dismount D:"           ;4
1067 savelij 140
                DB "\r 5.Dismount all"          ;5
1026 savelij 141
                DB "\r X.Exit",0                ;x
801 savelij 142
 
1067 savelij 143
WDISMKEY        DB LOW (WDISM1-$-1),"12345x"
801 savelij 144
 
145
WDISM1          DW DISMOUNT_A                   ;1
146
                DW DISMOUNT_B                   ;2
147
                DW DISMOUNT_C                   ;3
148
                DW DISMOUNT_D                   ;4
1067 savelij 149
                DW DISMOUNT_ALL                 ;5
801 savelij 150
                DW RESTART                      ;x
151
WDISM2
1026 savelij 152
;===============஢ ࠧ=====================
801 savelij 153
 
1026 savelij 154
;=============== ⠭=============================
155
SETUPER
156
 WINHDR 0x07,0x07,LOW ((SETUPER2-SETUPER1)/2)+2,0x15,0x0F,0x1F,%00100000,0, \
157
        0,((SETUPER2-SETUPER1)/2),SETUPERTXT,SETUPER1,0,SETUPERKEY
158
SETUPERTXT      DB "\x01\x17\xFFSetup"
801 savelij 159
                DB "\r S.Sound on keys:      off"
160
SNDKEYS_STAT    EQU $-2
161
                DB "\r G.Access SD NeoGS:    ofN"
162
ACCSSDG_STAT    EQU $-2
163
                DB "\r K.DRV AY printer:     off"
164
ETXT_AYPRINTER  EQU $-2
1186 savelij 165
;  १ HONEY COMANDER 
801 savelij 166
                DB "\r R.Resident Honey Cmd: off"
167
TXT_REZIDENT    EQU $-2
838 savelij 168
                DB "\r E.Kill rezident:      off"
169
TXT_KILLREZID   EQU $-2
801 savelij 170
                DB "\r T.Autostart tape:     off"
171
TXT_AUTOTAPE    EQU $-2
172
                DB "\r H.Delay for HDD, secs  5"
173
TXT_HDDTIMEOUT  EQU $-1
1026 savelij 174
                DB "\r L.Screensaver, minute: 5"
175
TXT_SCRSAVDELAY EQU $-1
176
                DZ "\r X.Exit"
1186 savelij 177
;  १ HONEY COMANDER
1026 savelij 178
SETUPERKEY      DB LOW (SETUPER1-$-1),"sgkrethlx"
801 savelij 179
 
180
SETUPER1        DW SOUND_KEYS                   ;s
181
                DW ACS_SDNGS                    ;g
182
                DW AYPRN_SETUP                  ;k
1186 savelij 183
;  १ HONEY COMANDER
801 savelij 184
                DW REZID_SETUP                  ;r
838 savelij 185
                DW KILL_REZID                   ;e
801 savelij 186
                DW AUTO_TAPE                    ;t
187
                DW HDDTIMEOUT                   ;h
1026 savelij 188
                DW SCRSAVTIMEOUT                ;l
801 savelij 189
                DW RESTART                      ;x
190
SETUPER2
1026 savelij 191
;=============== ⠭=============================
801 savelij 192
 
1026 savelij 193
;===============롮 FAT ன⢠=======================
194
SEL_FAT_DEV
195
 WINHDR 0x03,0x04,0x00,0x16,0x07,0x1F,%00100000,0, \
196
        0,0,SEL_FAT_DRV,0,0,0
801 savelij 197
SELFATDEVEXE    EQU $-6
1026 savelij 198
TXT_FAT_SEL     DB "\x17\xFFDrive select"
801 savelij 199
ETXT_FAT_SEL
1026 savelij 200
;===============롮 FAT ன⢠=======================
801 savelij 201
 
1026 savelij 202
;=============== ===============================
203
MAINMENU
204
 WINHDR 0x11,0x06,LOW ((MAIN2-MAIN1)/2)+2,0x0C,0x0F,0x1F,%00100000,0, \
205
        0,((MAIN2-MAIN1)/2),MAINTXT,MAIN1,MAIN_ZONE,MAINMENU_KEY
206
MAINTXT         DB "\x17\xFFMain menu"
207
                DB "\r Z.TR-DOS boot"           ;z
208
                DB "\r F.File browse"           ;f
209
                DB "\r T.Tape load"             ;t
210
                DB "\r B.HDD boot"              ;b
211
                DB "\r D.CD boot"               ;d
212
                DB "\r 5.SDcard boot"           ;5
213
                DB "\r X.Perfect Cmd"           ;x
214
                DB "\r S.TR-DOS"                ;s
215
                DB "\r I.48k basic"             ;i
216
                DB "\r U.128k basic"            ;u
217
                DB "\r C.Setup"                 ;c
218
                DB "\r R.Service"               ;r
801 savelij 219
                DB 0
1026 savelij 220
MAINMENU_KEY    DB LOW (MAIN1-$-1),"zftbd5xsiucrwmlg123489vyhejn"
801 savelij 221
 
1186 savelij 222
MAIN1           DW GLUBOOT                      ;z ᪥⮧稪
223
                DW FILE_BROWSER                 ;f 稪  FAT
224
                DW TAPELOAD                     ;t 㧪  
225
                DW HDD_BOOT                     ;b  稪  
226
                DW CDBOOT                       ;d  稪  ᨤ
227
                DW SDCARDBOOT                   ;5 稪  SD 
801 savelij 228
                DW PERFECT                      ;x PERFECT COMANDER
1186 savelij 229
                DW DOS128                       ;s 室  TR-DOS
230
                DW BAS48                        ;i 室  ᨪ 48
231
                DW BAS128                       ;u 室  ᨪ 128
232
                DW SETUPM                       ;c ⠭
233
                DW _KILLS                       ;r ࢨ 
234
MAIN2           DW CHNGTURBO                    ;w  ࡮
235
                DW CHNGMODE                     ;m  ० 
236
                DW CHNGTAPMODE                  ;l ४祭 樨 
237
                DW CHNGGLUKMOD                  ;g ࠧ襭   
238
                DW SELDRV                       ;1 롮 ᪮ A
239
                DW SELDRV                       ;2 롮 ᪮ B
240
                DW SELDRV                       ;3 롮 ᪮ C
241
                DW SELDRV                       ;4 롮 ᪮ D
242
                DW MOUSE_ONOFF                  ;8 /몫  
243
                DW CMOS_ONOFF                   ;9 /몫 ⮡ࠦ ᮢ
244
                DW NEXTDRIVE                    ;v ॡ ॠ ᪮
245
                DW NEXTVIRT                     ;y ॡ 㠫 ᪮
246
                DW VIEW_HELP                    ;h 뢮 奫
247
                DW EN_LOADFONT                  ;e ࠧ襭 १㧪   
248
                DW SET_TYPEFONT                 ;j 롮 ⨯ 
249
                DW EN_AUTOMNT                   ;n /몫 ⮬஢  䠩
1026 savelij 250
;=============== ===============================
801 savelij 251
 
1026 savelij 252
;=============== 㧪  =======================
964 savelij 253
BAS4TAPE        binclude "bas4tape.bin"
801 savelij 254
EBAS4TAPE
255
 
1026 savelij 256
;=============== 㧪  =======================
257
TAPE_LDT
258
 WINHDR 0x06,0x08,0x04,0x14,0x0E,0x0F,%00000000,0, \
259
        0,0,TAPELDTTXT,0,0,0
260
TAPELDTTXT      DB "\x17\xFF\r\x03Tape loading..."
261
                DZ "\r\x03Press PLAY on tape"
262
;=============== 㧪  =======================
801 savelij 263
 
1026 savelij 264
;=============== TR-DOS =============================
265
NONETRDOS
266
 WINHDR 0x06,0x08,0x03,0x16,0x16,0x0F,%00000000,0, \
267
        0,0,TXT_NONETRDOS,0,0,0
268
TXT_NONETRDOS   DB "\x17\xFF\r\x03Not TR-DOS disk",0
269
;=============== TR-DOS =============================
801 savelij 270
 
999 savelij 271
;===============㧪 SCL ࠧ========================
1026 savelij 272
LOAD_SCL
273
 WINHDR 0x07,0x07,LOW ((.SELMOUNT2-.SELMOUNT1)/2)+2,0x0C,0x07,0x1F,%00100000,0, \
274
        0,((.SELMOUNT2-.SELMOUNT1)/2),.SELMOUNTTXT,.SELMOUNT1,0,.SELMOUNTKEYS
999 savelij 275
.SELMOUNTTXT    DB "\x17\xFFSCL to:\r"
276
                DB " 0.Only load\r"
277
                DB " 1.Ramdisk A:\r"
278
                DB " 2.Ramdisk B:\r"
279
                DB " 3.Ramdisk C:\r"
280
                DB " 4.Ramdisk D:\r"
281
                DZ " X.Exit"
801 savelij 282
 
999 savelij 283
.SELMOUNTKEYS   DB LOW (.SELMOUNT1-$-1),"01234x"
801 savelij 284
 
999 savelij 285
.SELMOUNT1      DW LOADIMAGE
286
                DW SCL_A
287
                DW SCL_B
288
                DW SCL_C
289
                DW SCL_D
290
                DW RESTART
291
.SELMOUNT2
292
;===============㧪 SCL ࠧ========================
293
 
294
;===============  TRD ࠧ=======================
1026 savelij 295
RUN_IMAGE
296
 WINHDR 0x07,0x03,LOW ((.SELMOUNT2-.SELMOUNT1)/2)+2,0x0C,0x07,0x1F,%00100000,0, \
297
        0,((.SELMOUNT2-.SELMOUNT1)/2),.SELMOUNTTXT,.SELMOUNT1,0,.SELMOUNTKEYS
999 savelij 298
.SELMOUNTTXT    DB "\x17\xFFTRD to:\r"
299
                DB " 0.Only load\r"
300
                DB " 1.Ramdisk A:\r"
301
                DB " 2.Ramdisk B:\r"
302
                DB " 3.Ramdisk C:\r"
303
                DB " 4.Ramdisk D:\r"
304
                DB " 5.Mount A:\r"
305
                DB " 6.Mount B:\r"
306
                DB " 7.Mount C:\r"
307
                DB " 8.Mount D:\r"
1026 savelij 308
                DB " W.Copy to A:\r"
309
                DB " E.Copy to B:\r"
310
                DB " R.Copy to C:\r"
311
                DB " T.Copy to D:\r"
999 savelij 312
                DZ " X.Exit"
313
 
1026 savelij 314
.SELMOUNTKEYS   DB LOW (.SELMOUNT1-$-1),"012345678wertx"
999 savelij 315
 
316
.SELMOUNT1      DW LOADIMAGE
317
                DW RUNIMG_A
318
                DW RUNIMG_B
319
                DW RUNIMG_C
320
                DW RUNIMG_D
801 savelij 321
                DW MOUNT_A
322
                DW MOUNT_B
323
                DW MOUNT_C
324
                DW MOUNT_D
1026 savelij 325
                DW SEL4COPY_A
326
                DW SEL4COPY_B
327
                DW SEL4COPY_C
328
                DW SEL4COPY_D
801 savelij 329
                DW RESTART
999 savelij 330
.SELMOUNT2
331
;===============  ࠧ===========================
801 savelij 332
 
1026 savelij 333
;=============== 뢮  䠩 TR-DOS========
334
WIN_FILES
335
 WINHDR 0x00,0x00,0x00,0x0C,0x0F,0x1F,%00010010,0, \
336
        0,0,SEL_FAT_DRV,WFILES1,0,WFILESKEYS
801 savelij 337
 
338
WFILESKEYS      DB LOW (WFILES1-$-1)
339
                REPT FH_FILE-2
340
                DB 0
341
                ENDM
342
                DB "x"
343
 
344
WFILES1         REPT FH_FILE-2
345
                DW RUNFILE
346
                ENDM
347
                DW SEL_FILES_WIN
1026 savelij 348
;=============== 뢮  䠩 TR-DOS========
801 savelij 349
 
1026 savelij 350
;=============== 뢮  䠩 FAT===========
351
FAT_FILES
352
 WINHDR 0x00,0x00,0x00,0x0C,0x0F,0x1F,%10100010,0, \
353
        0,0,FATFILESTXT,FATFILES1,FB_ZONE,FATFILESKEYS
354
FATFILESTXT     DB "\x17\xFFFile browser"
355
                DZ "\x16\x17\x08D.Drive ENTER.Run/Load V.View"
801 savelij 356
 
357
FATFILESKEYS    DB LOW (FATFILES1-$-1)
358
                REPT FH_FILE
1026 savelij 359
                DB 0x0D
801 savelij 360
                ENDM
361
                DB "dvx"
362
 
363
FATFILES1       REPT FH_FILE
364
                DW RUN_HOB
365
                ENDM
366
                DW SELECT_DEVICE
367
                DW VIEW_IMAGE
368
                DW RESTART
369
 
1026 savelij 370
FB_ZONE         DB 0,0x00,FH_FILE-1,0x01,0x07,"d"
371
                DB 0,0x07,FH_FILE-1,0x01,0x0C,0x0D
372
                DB 0,0x13,FH_FILE-1,0x01,0x07,"v"
373
                DB 0xFF
374
;=============== 뢮  䠩 FAT===========
801 savelij 375
 
1026 savelij 376
;=============== ᨪ 䠩==========================
377
NOBASIC
378
 WINHDR 0x00,0x00,0x03,0x0C,0x0F,0x27,%00000000,0, \
379
        0,0,TXTNOBASIC,ADRNOBAS,0,0
380
TXTNOBASIC      DZ "\x17\xFF\r\x03No Progs"
801 savelij 381
ADRNOBAS        DW RESTART
1026 savelij 382
;=============== ᨪ 䠩==========================
801 savelij 383
 
1026 savelij 384
;===============HDD  ==============================
385
HDDBOOT_ERROR
386
 WINHDR 0x08,0x08,0x04,0x10,0x17,0x00,%00000000,0, \
387
        0,0,TXT_HDDBOOTERR,0,0,0
388
TXT_HDDBOOTERR  DZ "\x17\xFF\r\x03HDD not found\r\x03Press any key"
389
;===============HDD  ==============================
801 savelij 390
 
1026 savelij 391
;===============image FDI error============================
392
LDFDIERROR
393
 WINHDR 0x08,0x08,0x04,0x10,0x17,0x00,%00000000,0, \
394
        0,0,TXT_LDFDIERR,0,0,0
395
TXT_LDFDIERR    DZ "\x17\xFF\r\x03FDI image error\r\x03Press any key"
396
;===============image FDI error============================
801 savelij 397
 
1026 savelij 398
;===============file not found=============================
399
FILENONE
400
 WINHDR 0x08,0x08,0x04,0x10,0x17,0x00,%00000000,0, \
401
        0,0,TXT_FILENONE,0,0,0
402
TXT_FILENONE    DZ "\x17\xFF\r\x03File not found\r\x03Press any key"
403
;===============file not found=============================
801 savelij 404
 
1026 savelij 405
;===============virtual error==============================
406
ERR_VIRTUAL
407
 WINHDR 0x05,0x08,0x04,0x18,0x17,0x00,%00000000,0, \
408
        0,0,TXT_ERRVIRTUAL,0,0,0
409
TXT_ERRVIRTUAL  DB "\x17\xFF\r\x03Virtual drive not formatted"
410
                DZ "\r\x03or image not loaded"
411
;===============virtual error==============================
801 savelij 412
 
1026 savelij 413
;===============update ROM=================================
414
UPDATE_WIN
415
 WINHDR 0x09,0x08,0x0B,0x12,0x17,0x00,%00100000,0, \
416
        0,0,TXT_UPDATEWIN,0,0,0
417
TXT_UPDATEWIN   DB "\x17\xFFUpdate FLASH ROM\r"
418
                DB "\r\x03Page 0"
419
                DB "\r\x03Page 1"
420
                DB "\r\x03Page 2"
421
                DB "\r\x03Page 3"
422
                DB "\r\x03Page 4"
423
                DB "\r\x03Page 5"
424
                DB "\r\x03Page 6"
425
                DZ "\r\x03Page 7"
426
;===============update ROM=================================
801 savelij 427
 
1026 savelij 428
;===============update custom ROM==========================
429
UPDATE_CUSTOM
430
 WINHDR 0x09,0x08,0x04,0x12,0x17,0x00,%00100000,0, \
431
        0,0,TXT_UPDATECUST,0,0,0
432
TXT_UPDATECUST  DZ "\x17\xFFUpdate custom ROM"
433
;===============update custom ROM==========================
801 savelij 434
 
1026 savelij 435
;===============erase ROM==================================
436
ERASE_ROM
437
 WINHDR 0x0D,0x03,0x05,0x0A,%00010111,%00000000,%00000000,0, \
438
        0,0,TXT_ERASEROM,0,0,0
439
TXT_ERASEROM    DZ "\x17\xFF\r\x03Erase FLASH"
440
;===============erase ROM==================================
801 savelij 441
 
1026 savelij 442
;===============஢ ࠧ  TR-DOS ==========
443
WINCOPY_IMAGE
444
 WINHDR 0x04,0x05,0x05,0x12,%00010111,%00000000,%00000000,0, \
445
        0,0,.TXT,0,0,0
446
.TXT            DZ "\x17\xFF\r\x03Copy image"
447
;===============஢ ࠧ  TR-DOS ==========
801 savelij 448
 
1026 savelij 449
;===============࠭ ============================
450
WIN_HELP
451
 WINHDR 0x01,0x03,0x14,0x1A,0x0F,0x00,%00100000,0, \
452
        0,0,TXT_WINHELP,0,0,0
453
TXT_WINHELP     DB "\x17\xFFHelp"
454
                DB "\r Key+RESET:"
455
                DB "\r Space=TRDOS"
456
                DB "\r CS=Basic128"
457
                DB "\r SS=Basic48"
458
                DB "\r D=Grass!512b(PSB^Halloween CC04)"
459
                DB "\r C=ColorTable+border keys+COVOX"
460
                DB "\r S=old CMOS SetUp"
461
                DB "\r 0=return to EVO Reset Service"
462
                DB "\r----------------------------------"
463
                DB "\r In main menu:"
464
                DB "\r 1-4=TR-DOS drive"
465
                DB "\r V=TR-DOS drive"
466
                DB "\r Y=Virtual drive"
467
                DB "\r M=memory mode"
468
                DB "\r W=turbo 3,5-7-14 MHz"
469
                DB "\r 8=on/off mouse"
470
                DB "\r 9=on/off time"
471
                DZ "\r & uppercased option keys."
472
;===============࠭ ============================
801 savelij 473
 
1026 savelij 474
;===============SD  㤠===========================
475
SDCARD_LOST
476
 WINHDR 0x08,0x08,0x04,0x10,0x17,0,%00000000,0, \
477
        0,0,TXT_SDLOST,0,0,0
478
TXT_SDLOST      DZ "\x17\xFF\r\x03SD card lost\r\x03Press RESET"
479
;===============SD  㤠===========================
480
 
481
;===============⥪   䨣======================
482
TXTFULLSCR      DB "\x16\x00\x00\x17",GREEN,"EVO Reset Service v",VERSBIOS
483
                DB "\x16\x01\x00\x17",YELLOW,"ZX-Evolution 4096 Kb "
484
                DB "\x16\x02\x00\x17",CYAN+BR_INK,"www.nedopc.com "
485
                DB "\x16\x03\x00\x17",CYAN,"Baseconf: \x17\xFF"
801 savelij 486
VERS_CONF       DB "NONE                            "
1026 savelij 487
                DB "\x16\x04\x00\x17",CYAN,"AVR Boot: \x17\xFF"
801 savelij 488
                ;   12345678901234567890123456789012
489
VERS_BOOT       DB "NONE                            "
1026 savelij 490
; ᯥ⪠ ६   ᡮન ERS
831 savelij 491
        IF BUILD_DEBUG=1
1026 savelij 492
                DB "\x16\x05\x00\x17",BLUE,"Build ERS:  "
964 savelij 493
                TEXTTIME
494
                DB "  "
801 savelij 495
                TEXTDATE
496
                DB "  "
831 savelij 497
        ENDIF
1026 savelij 498
                DB "\x16\x17\x00\x17",MAGENTA+BR_INK,"H.Help \x17\xFF",0
801 savelij 499
 
1026 savelij 500
;===============⥪ ᬮ஢ ᪮=============
501
MOUNTED_DRV     DB 0x16,0x12,0x00,0x17,GREEN,"Mount A: ",0x17,YELLOW
801 savelij 502
MNT_DRV_A       DB "NONE        "
1026 savelij 503
                DB 0x16,0x13,0x00,0x17,GREEN,"Mount B: ",0x17,YELLOW
801 savelij 504
MNT_DRV_B       DB "NONE        "
1026 savelij 505
                DB 0x16,0x14,0x00,0x17,GREEN,"Mount C: ",0x17,YELLOW
801 savelij 506
MNT_DRV_C       DB "NONE        "
1026 savelij 507
                DB 0x16,0x15,0x00,0x17,GREEN,"Mount D: ",0x17,YELLOW
801 savelij 508
MNT_DRV_D       DB "NONE        "
1026 savelij 509
                DB 0x16,0x11,0x00,0x17,GREEN,"Ramdisk: ",0x17,YELLOW
801 savelij 510
IN_RAMDISK      DB "NONE        "
1186 savelij 511
;               DB 0x16,0x10,0x00,0x17,GREEN,"Tape: ",0x17,YELLOW
512
;TAPOK          DB "NONE        "
1026 savelij 513
                DB 0x17,0xFF,0
514
;===============⥪ ᬮ஢ ᪮=============
801 savelij 515
 
1026 savelij 516
;===============⥪ ஥  ============
517
TRDDRV_MODE     DB "\x16\x06\x00\x17",MAGENTA,"1-4.TR-DOS Drive:  \x17\xFFA",0
801 savelij 518
TXT_DRIVE       EQU $-2
1026 savelij 519
SPEED_MODE      DB "\x16\x09\x00\x17",MAGENTA,"W.CPU frequency: \x17\xFF14.0",0
801 savelij 520
TXT_SPEED       EQU $-5
1026 savelij 521
MEM_MODE        DB "\x16\x08\x00\x17",MAGENTA,"M.Memory Lock:    \x17\xFF"
801 savelij 522
TXT_MEM         DB "128",0
1026 savelij 523
VIRTUAL_DRV     DB "\x16\x07\x00\x17",MAGENTA,"Y.Virtual Drive:  \x17\xFF A ",0
801 savelij 524
VIRT_DRIVE      EQU $-4
1026 savelij 525
EMUTAPLOAD      DB "\x16\x0A\x00\x17",MAGENTA,"L.Emu tape load:  \x17\xFFoff",0
801 savelij 526
EMTAPLOAD       EQU $-3
1026 savelij 527
SET_RESET       DB "\x16\x0B\x00\x17",MAGENTA,"G.RESET=>\x17",YELLOW+BR_INK,"            \x17\xFF",0
528
TXT_RESET       EQU $-0x0F
529
ROMLOADFONT     DB "\x16\x0C\x00\x17",MAGENTA,"E.Reload FONT:    \x17\xFFoff",0
801 savelij 530
EROMLOADFONT    EQU $-3
1026 savelij 531
TYPESFONT       DB "\x16\x0D\x00\x17",MAGENTA,"J.Type FONT:    \x17\xFF  ATM",0
801 savelij 532
ETYPESFONT      EQU $-6
1026 savelij 533
TXT_AUTOMOUNT   DB "\x16\x0E\x00\x17",MAGENTA,"N.Automount TRD:  \x17\xFFoff",0
801 savelij 534
ETXT_AUTOMOUNT  EQU $-3
1026 savelij 535
;===============⥪ ஥  ============
801 savelij 536
 
1026 savelij 537
;===============⥪  ᮮ⢥⢨ 訪 FPGA======
977 savelij 538
INCORRECTFPGA   DB 0x16,0x16,0x00,0x17,RED << 3 + WHITE," Incorrect FPGA zxevo_fw.bin ",0
1026 savelij 539
;===============⥪  ᮮ⢥⢨ 訪 FPGA======
977 savelij 540
 
1186 savelij 541
;===============ᯨ᮪  ஢塞 ᥣ========
1026 savelij 542
MAIN_KEYS       DB LOW (EMAIN_KEYS-$-1),"qaop ",0x07,0x08,0x09,0x0A,0x0B,0x0D
801 savelij 543
EMAIN_KEYS
544
 
1026 savelij 545
ADREXEKEYS      DW UP                                   ; q
546
                DW DOWN                                 ; a
547
                DW LEFT                                 ; o
548
                DW RIGHT                                ; p
549
                DW ENTER                                ; SPACE
550
                DW RESTART                              ; EDIT
551
                DW LEFT                                 ; 0x08
552
                DW RIGHT                                ; 0x09
553
                DW DOWN                                 ; 0x0A
554
                DW UP                                   ; 0x0B
555
                DW ENTER                                ; 0x0D
801 savelij 556
EADREXEKEYS
557
 
1026 savelij 558
;===============  ===================
559
; F,X,Y,V,H,SYM
560
MAIN_ZONE       DB 0,0x00,0x06,0x01,0x10,"v"            ; ॡ ᪮
561
                DB 0,0x00,0x07,0x01,0x10,"y"            ; ॡ 㠫 ᪮
562
                DB 0,0x00,0x08,0x01,0x10,"m"            ; ॡ ० 
563
                DB 0,0x00,0x09,0x01,0x10,"w"            ; ॡ ࡮
564
                DB 0,0x00,0x0A,0x01,0x10,"l"            ; ॡ 樨 
565
                DB 0,0x00,0x0B,0x01,0x10,"g"            ; ॡ ࠧ襭 
566
                DB 0,0x00,0x0C,0x01,0x10,"e"            ; ॡ ࠧ襭 १㧪 䮭
567
                DB 0,0x00,0x0D,0x01,0x10,"j"            ; ॡ ⨯ 
568
;               DB 0,0X00,0X0E,0X01,0X10,"k"            ; ॡ ࠩ ਭ
569
;               DB 0,0x00,0x17,0x01,0x05,"h"            ; 맮 
570
                DB 0,0x00,0x0E,0x01,0x10,"n"            ; /몫 ⮬஢  䠩
571
;               DB 0,0x1D,0x15,0x03,0x03,0xAC
572
                DB 0xFF
801 savelij 573
 
1026 savelij 574
BUFF_TIME       DB 0x16,0x00,0xD0,0x17,BLUE << 3 + YELLOW + BR_INK
575
TXT_TIME        DB "00:00:00",0x16,0x01,0xD0
576
TXT_DATA        DB "00.00.00",0x17,0xFF
801 savelij 577
 
1026 savelij 578
; 000   PENT    TV      71680
579
; 001   PENT    VGA     71680
580
; 010   60Hz    TV      58688
581
; 011   60Hz    VGA     58688
582
; 100   48K     TV      69888
583
; 101   48K     VGA     69888
584
; 110   128K    TV      70908
585
; 111   128K    VGA     70908
586
TXT_VMODE       DB 0x16,2,0xD0,0x17,GREEN+BR_INK
801 savelij 587
                DB "        ",0
588
TV_VGA          EQU $-9
589
 
590
TXT_TVVGA       DB "TV VGA"
591
TXT_HZ          DB "PENT60Hz 48K128K"
592
 
1026 savelij 593
TIME_OFF        DB "\x16\x00\xD0\x17",WHITE,"        \x16\x01\xD0        \x17\xFF",0
801 savelij 594
 
595
TXT_RESETTO     DB " EVO Service"
596
                DB "GLUK Service"
597
                DB " EVO ProfROM"
598
                DB "  Custom ROM"
599
 
600
TXT_SELDOS      DB "EVO-DOS"
601
                DB " TR-DOS"
602
 
603
TXTMODTYPE      DB "  ATMCP866"
604
TXTTURBOMODE    DB " 3,5 7,014,0"
605
 
1186 savelij 606
;===============ন ७==================
1026 savelij 607
SUPPORT_EXT     DB "TRD"        ; 1
608
                DB "SCL"        ; 2
609
                DB "FDI"        ; 3
610
                DB "TAP"        ; 4
611
                DB "SPG"        ; 5
612
                DB "$C "        ; 6
613
                DB "BMP"        ; 7
614
                DB "SNA"        ; 8
615
                DB 0
801 savelij 616
 
1186 savelij 617
;=============== ন ७===========
801 savelij 618
NUM_SUP_EXT     DUPL 17,0
619
 
620
TYPE_FILE       DB 0
621
 
622
SIGN_SCL        DB "SINCLAIR"
623
IMAGES          DB "FDIBMP"
624
VIEW_IMAGES     DB "TRDSCL",0
625
TAPES           DB "TAP",0
626
HOBETA          DB "$C SPGSNA",0
627
ROMS            DB "ROM",0
628
FONTS           DB "FNT",0
629
 
1026 savelij 630
; ⥪  ⮡ࠦ  ࠧ,  16  ப
831 savelij 631
TXT4MENU_DEVICE    ;12345678901234567890
632
                DB ".HDDNemo     MASTER:"
633
                DB ".HDDNemo      SLAVE:"
634
                DB ".HDDSmuc     MASTER:"
635
                DB ".HDDSmuc      SLAVE:"
636
                DB ".HDDDIVIDE   MASTER:"
637
                DB ".HDDDIVIDE    SLAVE:"
638
                DB ".HDDProfi    MASTER:"
639
                DB ".HDDProfi     SLAVE:"
640
                DB ".HDDTURBO2   MASTER:"
641
                DB ".HDDTURBO2    SLAVE:"
642
                DB ".NeoGS       SDCard:"
643
                DB ".ZContr      SDCard:"
801 savelij 644
 
1186 savelij 645
; ⨯ ࠧ
801 savelij 646
TXT4MENU_TYPE   DB "FAT12"
647
                DB "FAT16"
648
                DB "FAT32"
649
 
650
TXT_EDITCMOS1   DB "Press cursor keys, 0..9, A..F for edit,  X.Exit",0
651
TXT_EDITCMOS2   DB "CMOS Editor",0
652
 
653
;                   0    1    2    3    4    5    6    7    8    9    A    B    C    D    E    F
654
;80                                                                             
1026 savelij 655
CONV_CP866_ATM  DB 0xC1,0xC2,0xD7,0xC7,0xC4,0xC5,0xD6,0xDA,0xC9,0xCA,0xCB,0xCC,0xCD,0xCE,0xCF,0xD0
801 savelij 656
;90                                                                             
1026 savelij 657
                DB 0xD2,0xD3,0xD4,0xD5,0xC6,0xC8,0xC3,0xDE,0xDB,0xDD,0xDF,0xD9,0xD8,0xDC,0xC0,0xD1
801 savelij 658
;A0                                                                             
1026 savelij 659
                DB 0xE1,0xE2,0xF7,0xE7,0xE4,0xE5,0xF6,0xFA,0xE9,0xEA,0xEB,0xEC,0xED,0xEE,0xEF,0xF0
801 savelij 660
;B0                                                                             
1026 savelij 661
                DB 0x80,0x81,0x82,0x83,0x84,0x85,0x86,0x87,0x88,0x89,0x8A,0x8B,0x8C,0x8D,0x8E,0x8F
801 savelij 662
;C0                                                                             
1026 savelij 663
                DB 0x90,0x91,0x92,0x93,0x94,0x95,0x96,0x97,0x98,0x99,0x9A,0x9B,0x9C,0x9D,0x9E,0x9F
801 savelij 664
;D0                                                                             
1026 savelij 665
                DB 0xA0,0xA1,0xA2,0xA3,0xA4,0xA5,0xA6,0xA7,0xA8,0xA9,0xAA,0xAB,0xAC,0xAD,0xAE,0xAF
801 savelij 666
;E0                                                                             
1026 savelij 667
                DB 0xF2,0xF3,0xF4,0xF5,0xE6,0xE8,0xE3,0xFE,0xFB,0xFD,0xFF,0xF9,0xF8,0xFC,0xE0,0xF1
801 savelij 668
;F0                                                                         
1026 savelij 669
                DB 0xB0,0xB1,0xB2,0xB3,0xB4,0xB5,0xB6,0xB7,0xB8,0xB9,0xBA,0xBB,0xBC,0xBD,0xBE,0xBF
801 savelij 670
 
671
        if 0
672
;                   0    1    2    3    4    5    6    7    8    9    A    B    C    D    E    F
673
;80                                                                             
1026 savelij 674
CONV_ATM_CP866  DB 0xB0,0xB1,0xB2,0xB3,0xB4,0xB5,0xB6,0xB7,0xB8,0xB9,0xBA,0xBB,0xBC,0xBD,0xBE,0xBF
801 savelij 675
;90                                                                             
1026 savelij 676
                DB 0xC0,0xC1,0xC2,0xC3,0xC4,0xC5,0xC6,0xC7,0xC8,0xC9,0xCA,0xCB,0xCC,0xCD,0xCE,0xCF
801 savelij 677
;A0                                                                             
1026 savelij 678
                DB 0xD0,0xD1,0xD2,0xD3,0xD4,0xD5,0xD6,0xD7,0xD8,0xD9,0xDA,0xDB,0xDC,0xDD,0xDE,0xDF
801 savelij 679
;B0                                                                             
1026 savelij 680
                DB 0xF0,0xF1,0xF2,0xF3,0xF4,0xF5,0xF6,0xF7,0xF8,0xF9,0xFA,0xFB,0xFC,0xFD,0xFE,0xFF
801 savelij 681
;C0                                                                             
1026 savelij 682
                DB 0x9E,0x80,0x81,0x96,0x84,0x85,0x94,0x83,0x95,0x88,0x89,0x8A,0x8B,0x8C,0x8D,0x8E
801 savelij 683
;D0                                                                             
1026 savelij 684
                DB 0x8F,0x9F,0x90,0x91,0x92,0x93,0x86,0x82,0x9C,0x9B,0x87,0x98,0x9D,0x99,0x97,0x9A
801 savelij 685
;E0                                                                             
1026 savelij 686
                DB 0xEE,0xA0,0xA1,0xE6,0xA4,0xA5,0xE4,0xA3,0xE5,0xA8,0xA9,0xAA,0xAB,0xAC,0xAD,0xAE
801 savelij 687
;F0                                                                             
1026 savelij 688
                DB 0xAF,0xEF,0xE0,0xE1,0xE2,0xE3,0xA6,0xA2,0xEC,0xEB,0xA7,0xE8,0xED,0xE9,0xE7,0xEC
801 savelij 689
        endif
690
 
1186 savelij 691
;===============txt_help========================================
801 savelij 692
;                   0123456789ABCDEF0123456789ABCDEF
1026 savelij 693
TXT_HELPREG     DB "SECOND                         ",0          ; 00
694
                DB "SECOND ALARM                   ",0          ; 01
695
                DB "MINUTE                         ",0          ; 02
696
                DB "MINUTE ALARM                   ",0          ; 03
697
                DB "HOUR                           ",0          ; 04
698
                DB "HOUR ALARM                     ",0          ; 05
699
                DB "DAY OF WEEK                    ",0          ; 06
700
                DB "DAY                            ",0          ; 07
701
                DB "MONTH                          ",0          ; 08
702
                DB "YEAR                           ",0          ; 09
703
                DB "#20                            ",0          ; 0A
704
                DB "#02                            ",0          ; 0B
705
                DB "#00                            ",0          ; 0C
706
                DB "#80                            ",0          ; 0D
707
                DB "BIT 7=TURBO,BIT 2-0=MEMORY MODE",0          ; 0E
708
                DB "                               ",0          ; 0F
709
                DB "NUMBER TR-DOS DRIVE            ",0          ; 10
710
                DB "#AA OR #55                     ",0          ; 11
801 savelij 711
EMPTY_STROKA    DB "                               ",0
712
 
1026 savelij 713
                DUPL 0x10,0
801 savelij 714
DSTUPID         DW _STUPID
715
 
1026 savelij 716
MSTUPID         DB 3,8,3,26,0xEA
801 savelij 717
                DC "GO SLEEP,STUPID USER!!!"
1026 savelij 718
                DB 0xFF
801 savelij 719
 
720
TXT_BETA        DB " beta"
721
TXT_NONE        DB "NONE        "
722
ETXT_NONE
723
 
1026 savelij 724
T_ALL           DB "off"        ; 0
725
T_128           DB "128"        ; 2
726
T_48            DB " 48"        ; 1
801 savelij 727
 
1026 savelij 728
SCRSAV
729
.START          DD 0
730
.CURR           DD 0
731
.TIMEOUT        DB 0
875 savelij 732
 
1026 savelij 733
; ६  饭  TR-DOS
734
DOSVARS
735
.CURR_IX        DW 0
736
.COPY_1F        DB 0
737
.DSKERR         DB 0
738
.TMP_ERR_SP     DW 0
739
.CNT_COPY       DB 0
740
 
801 savelij 741
TXT_DOSTYPES0   DB "EVO-DOS"
742
TXT_DOSTYPES1   DB " TR-DOS"
743
ETXT_DOSTYPES
744
 
1026 savelij 745
NUMFAT_SELECT   DW 0    ;  ࠭ 䠩
746
FILESIZE_BLOCKS DW 0    ; ࠧ 䠩    16
747
DRV_SYM         DB 0    ;  ࠭ ᪮
748
MEMMODE         DB 0    ; ० 
749
SYSREG1         DB 0    ;   뢮   EFF7
750
TURBO_NUM       DB 0    ;  ࡮०
801 savelij 751
ERS_FLAGS       DB 0
752
 
1026 savelij 753
 BITMASK LOAD_IMG,      6       ; =1-㧪 ࠧ  ࠬ
754
 BITMASK VIEW_IMG,      5       ; =1- ᮤন ࠧ (SCL TRD ONLY),=0-筠 ࠡ
755
 BITMASK EMU_TAPE,      4       ; =1- 㧪  , =0-㧪 १ 䮭 室
756
 BITMASK RUN_FAT,       3       ; =1-  , =0-  ᪥
757
 BITMASK CLOCK_ON,      2       ; =1- , =0-
758
 BITMASK MOUSE_ON,      1       ; =1- , =0-
759
 BITMASK NUM_CURSOR,    0       ; =  ᮢ,  
760
 
761
;===============RUN_BASIC==================================
762
RUN_BASIC       DW 0x100                                ;  ப ᨪ ண
763
                DW ERUN_BASIC-RUN_BASIC-5               ;  ᨪ ப
801 savelij 764
                DB __CLEAR,__VAL,"\"65368\":"
952 savelij 765
                DB __RANDOMIZE,__USR,__VAL,"\"15619\":",__REM,":",__RUN,"\""
1026 savelij 766
RUNNAM          DUPL 8,0                                ;   8 ᨬ   ᪠ 䠩
767
                DB 0x22,0x0D,0x80
801 savelij 768
ERUN_BASIC
769
 
1026 savelij 770
; RUN_CODE
771
RUN_CODE        DW 0x100
801 savelij 772
                DW ERUN_CODE-RUN_CODE-5
1026 savelij 773
                DB __RANDOMIZE,__USR,"0",0x0E,0,0,0,0,0,0x0D,0x80
801 savelij 774
ERUN_CODE
775
 
1026 savelij 776
OUT_NAME_FILE   DB 0x16,0,0,0x17,0xFF
777
OUT_NAME_FILET  DUPL 0x100,0
801 savelij 778
 
1026 savelij 779
TRSTPAL         DB 0x00,0x21,0x42,0x63,0x90,0xB1,0xD2,0xF3
780
                DB 0xE0,0xE1,0xE2,0xE3,0xF0,0xF1,0xF2,0xF3
801 savelij 781
 
1026 savelij 782
;===============㬪  AY==============================
783
DIN             DW 0x10
801 savelij 784
                DUPL 4,0
1026 savelij 785
                DB 0x0F,0x36,0xF0,0,0
786
                dw 0x100
801 savelij 787
gFenv           EQU $-1
788
                DB 9
1026 savelij 789
;===============㬪  AY==============================
801 savelij 790
 
1026 savelij 791
;===============६  蠪======================
792
WAITINGH        DW 0            ; 稪      
793
WAITINGL        DB 0            ; 稪  ᮢ 䠧 蠪
794
NUMKOSHAK       DB 0            ;  뢮 ࠩ 蠪
795
ZEVOK           DB 0            ; ⢮  蠪
796
;===============६  蠪======================