savelij13/flex_nav
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity
96a2777fa4
flex_nav/fn_const.a80

389 lines
12 KiB
Plaintext
Raw Normal View History

Добавлены файлы.
2025-05-30 08:35:57 +03:00
- год копирайта во встроенном help вставляется при сборке.
2025-06-25 11:33:11 +03:00
; LAST UPDATE: 25.06.2025 savelij
Добавлены файлы.
2025-05-30 08:35:57 +03:00
DOShistory_Size EQU 0x200 ; ࠧ<><E0A0A7><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> DOS <20><><EFBFBD><EFBFBD>ਨ
INIT_VAR 0x8000
SETVAR WorkBuffer, 0x400 ; ࠡ<>稩 <20><><EFBFBD><EFBFBD><EFBFBD>
SETVAR StackTree, 0x100 ; <20><>砫<EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20>⥪<EFBFBD> <20><><EFBFBD> ࠡ<><E0A0A1><EFBFBD> <20> <20><>ॢ<EFBFBD><E0A5A2> <20><>४<EFBFBD><E0A5AA>਩
SETVAR STACKTREE, 0 ; 㪠<><E3AAA0>⥫<EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> (<28>⥪ <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>)
SETVAR PagesList, 0x100 ; ᯨ᮪ <20><>࠭<EFBFBD><E0A0AD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
SETVAR Stack, 0x100 ; <20><>砫<EFBFBD> ࠡ<>祣<EFBFBD> <20>⥪<EFBFBD>
SETVAR STACK, 0 ; 㪠<><E3AAA0>⥫<EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> (<28>⥪ <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>)
SETVAR BASE_ADDR, 0x100 ; <20><>砫<EFBFBD> <20><><EFBFBD><EFBFBD> (<28><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>室<EFBFBD><E5AEA4> <20> <20><><EFBFBD><EFBFBD><EFBFBD> <20><>६<EFBFBD><E0A5AC><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD> <20><><EFBFBD><EFBFBD>㯠 <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>)
SETVAR PALETTE, 0 ; <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20>ࠧ<EFBFBD> <20><> ⠡<><E2A0A1>楩 <20><><EFBFBD><EFBFBD>室<EFBFBD><E5AEA4> <20> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><>६<EFBFBD><E0A5AC><EFBFBD><EFBFBD><EFBFBD>
ADDR
_INIT_VAR 0x4000
_SETVAR .FlexDIRECTORY
PluginOrg EQU 0xC000 - 0x10 ; <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20> <20><><EFBFBD>⮬ ࠧ<><E0A0A7><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
LenInpData EQU 12 ; <20><><EFBFBD><EFBFBD><EFBFBD>-<2D><> ᬥ饭<E1ACA5><E9A5AD> <20><><EFBFBD> <20><>⪨ SearchStr
CursTimer EQU 6 ; "<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>" <20><>࣠<EFBFBD><E0A3A0><EFBFBD> ⥪<>⮢<EFBFBD><E2AEA2><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
Step EQU 8 ; <20><>ਭ<EFBFBD> ᨬ<><E1A8AC><EFBFBD><EFBFBD> <20><><EFBFBD> <20><>६<EFBFBD>饭<EFBFBD><E9A5AD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> ⥪<><E2A5AA><EFBFBD>
MainPullMenu EQU 6 ; <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>⢮ <20>㭪⮢ <20> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>
MASK_SIZE EQU 13
PANFILES ; <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>⢮ 䠩<><E4A0A9><EFBFBD>/<2F><>४<EFBFBD><E0A5AA>਩ <20> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
.BRIEF EQU 17 ; <20><><EFBFBD> Brief ०<><E0A5A6><EFBFBD>
.FULL EQU 18 ; <20><><EFBFBD> Full ०<><E0A5A6><EFBFBD>
.TREE EQU 18 ; <20><><EFBFBD> Tree ०<><E0A5A6><EFBFBD>
SUPPFILES
_INIT_VAR 1
_SETVAR .EXE
_SETVAR .BAT
_SETVAR .FLX
; 梥<><E6A2A5> INK
COLORI
_INIT_VAR
_SETVAR .BLACK ; 0
_SETVAR .RED ; 1
_SETVAR .GREEN ; 2
_SETVAR .YELLOW ; 3
_SETVAR .BLUE ; 4
_SETVAR .INVERTPAPER ; 5
_SETVAR .INVERTINK ; 6
_SETVAR .BLACKGRAY ; 7
_SETVAR .HIGHGRAY ; 8
_SETVAR .PANEL ; 9
_SETVAR .FILES ; A
_SETVAR .SELECTFILES ; B
_SETVAR .INVSELFILES ; C
_SETVAR .RESERVED ; D
_SETVAR .WHITE0E ; E
_SETVAR .WHITE ; F
; 梥<><E6A2A5> PAPER
COLORP
_INIT_VAR
_SETVAR .BLACK, 0x10
_SETVAR .RED, 0x10
_SETVAR .GREEN, 0x10
_SETVAR .YELLOW, 0x10
_SETVAR .BLUE, 0x10
_SETVAR .INVERTPAPER, 0x10
_SETVAR .INVERTINK, 0x10
_SETVAR .BLACKGRAY, 0x10
_SETVAR .HIGHGRAY, 0x10
_SETVAR .PANEL, 0x10
_SETVAR .FILES, 0x10
_SETVAR .SELECTFILES, 0x10
_SETVAR .INVSELFILES, 0x10
_SETVAR .RESERVED, 0x10
_SETVAR .WHITE0E, 0x10
_SETVAR .WHITE, 0x10
WINOBJECT
_INIT_VAR
_SETVAR .TYPE, BYTE
; <20>㬥<EFBFBD><E3ACA5><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>ꥪ⮢ <20><><EFBFBD><EFBFBD>
WINSUBOBJ
_INIT_VAR
_SETVAR .END ; <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>⥫<EFBFBD> <20><><EFBFBD><EFBFBD>
_SETVAR .TEXT ; <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> ⥪<>⮢<EFBFBD><E2AEA2> <20><>ப<EFBFBD>
_SETVAR .FILL ; <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> 梥⮬ 㪠<><E3AAA0><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
_SETVAR .BORDER ; 㣫㡫<E3A3AB><E3A1AB><EFBFBD><EFBFBD>
_SETVAR .BUTTON ; <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
_SETVAR .BUTTONTEXT ; <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20> ⥪<>⮬
_SETVAR .HORIZLINE ; <20><>ਧ<EFBFBD><E0A8A7>⠫쭠<E2A0AB> <20><><EFBFBD><EFBFBD><EFBFBD>
_SETVAR .VERTICLINE ; <20><><EFBFBD>⨪<EFBFBD><E2A8AA>쭠<EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>
_SETVAR .ICONLEFTARROW ; <20><>ࠩ⨪ <20><><EFBFBD> <20><>஫<EFBFBD><E0AEAB><EFBFBD><EFBFBD><EFBFBD> "<22><>५<EFBFBD><E0A5AB> <20><><EFBFBD><EFBFBD><EFBFBD>"
_SETVAR .ICONRIGHTARROW ; <20><>ࠩ⨪ <20><><EFBFBD> <20><>஫<EFBFBD><E0AEAB><EFBFBD><EFBFBD><EFBFBD> "<22><>५<EFBFBD><E0A5AB> <20><>ࠢ<EFBFBD>"
_SETVAR .ICONUPARROW ; <20><>ࠩ⨪ <20><><EFBFBD> <20><>஫<EFBFBD><E0AEAB><EFBFBD><EFBFBD><EFBFBD> "<22><>५<EFBFBD><E0A5AB> <20><><EFBFBD><EFBFBD><EFBFBD>"
_SETVAR .ICONDOWNARROW ; <20><>ࠩ⨪ <20><><EFBFBD> <20><>஫<EFBFBD><E0AEAB><EFBFBD><EFBFBD><EFBFBD> "<22><>५<EFBFBD><E0A5AB> <20><><EFBFBD><EFBFBD>"
_SETVAR .ADRTEXT ; <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> ⥪<>⮢<EFBFBD><E2AEA2> <20><>ப<EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
_INIT_VAR 0x7F
_SETVAR .RESTOREWIN ; <20><><EFBFBD><EFBFBD>⠭<EFBFBD><E2A0AD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><>࠭<EFBFBD> <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>
_SETVAR .WOBIND ; <20><><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>᫥<EFBFBD><E1ABA5><EFBFBD><EFBFBD> <20><><EFBFBD> <20>ਢ離<E0A8A2> <20> <20><><EFBFBD><EFBFBD><EFBFBD>⥫<EFBFBD>
_INIT_VAR
_SETVAR .NOSTORE ; <20><><EFBFBD> <20><><EFBFBD>࠭<EFBFBD><E0A0AD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>
_SETVAR .STORE ; <20> <20><><EFBFBD>࠭<EFBFBD><E0A0AD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>
;[]----------------------------------------------------------[]
PANEL
_INIT_VAR
_SETVAR .PANELFLAG ; <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD> 7 - <20><><EFBFBD> <20>뤥<EFBFBD><EBA4A5><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
; <20><><EFBFBD> 0 - <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
_SETVAR .VIEWFLAG ; <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> 0 - <20><><EFBFBD>⪠<EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
; <20><><EFBFBD> 0 - <20><><EFBFBD>஡<EFBFBD><E0AEA1><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
; <20><><EFBFBD> 1 - <20><>ॢ<EFBFBD>
; <20><><EFBFBD> 2 - 㦠⮥ <20><>ॢ<EFBFBD>
_SETVAR .SORTFLAG ; <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>஢<EFBFBD><E0AEA2>
; <20><><EFBFBD> 0 - <20><> <20><><EFBFBD><EFBFBD><EFBFBD>
; <20><><EFBFBD> 1 - <20><> <20><><EFBFBD><EFBFBD><EFBFBD>७<EFBFBD><E0A5AD>
; <20><><EFBFBD> 2 - <20><> ࠧ<><E0A0A7><EFBFBD><EFBFBD>
; <20><><EFBFBD> 3 - <20><> <20><><EFBFBD><EFBFBD>
; <20><><EFBFBD> 4 - execute file
; <20><><EFBFBD> 5 - file mask
_SETVAR .XL ; X <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> LOW
_SETVAR .XH ; X <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> HIGH
_SETVAR .BARXL ; X <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><>஫<EFBFBD><E0AEAB><EFBFBD><EFBFBD> LOW
_SETVAR .BARXH ; X <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><>஫<EFBFBD><E0AEAB><EFBFBD><EFBFBD> HIGH
_SETVAR .BARYL ; Y <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><>஫<EFBFBD><E0AEAB><EFBFBD><EFBFBD> LOW
_SETVAR .BARYH ; Y <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><>஫<EFBFBD><E0AEAB><EFBFBD><EFBFBD> HIGH
_SETVAR .BARMLL ; Max <20><><EFBFBD><EFBFBD><EFBFBD> <20><>஫<EFBFBD><E0AEAB><EFBFBD><EFBFBD> LOW
_SETVAR .BARMLH ; Max <20><><EFBFBD><EFBFBD><EFBFBD> <20><>஫<EFBFBD><E0AEAB><EFBFBD><EFBFBD> HIGH
_SETVAR .BARCLL ; ⥪.<2E><><EFBFBD><EFBFBD><EFBFBD> <20><>஫<EFBFBD><E0AEAB><EFBFBD><EFBFBD> LOW
_SETVAR .BARCLH ; ⥪.<2E><><EFBFBD><EFBFBD><EFBFBD> <20><>஫<EFBFBD><E0AEAB><EFBFBD><EFBFBD> HIGH
_SETVAR .BARLFL ; <20><><EFBFBD><EFBFBD><EFBFBD> <20>祩<EFBFBD><E7A5A9> BarLeft LOW
_SETVAR .BARLFH ; <20><><EFBFBD><EFBFBD><EFBFBD> <20>祩<EFBFBD><E7A5A9> BarLeft HIGH
_SETVAR .BARRTL ; <20><><EFBFBD><EFBFBD><EFBFBD> <20>祩<EFBFBD><E7A5A9> BarRight LOW
_SETVAR .BARRTH ; <20><><EFBFBD><EFBFBD><EFBFBD> <20>祩<EFBFBD><E7A5A9> BarRight HIGH
_SETVAR .FPL ; <20><><EFBFBD>-<2D><> 䠩<><E4A0A9><EFBFBD> <20><> <20><>࠭<EFBFBD><E0A0AD><EFBFBD> LOW
_SETVAR .FPH ; <20><><EFBFBD>-<2D><> 䠩<><E4A0A9><EFBFBD> <20><> <20><>࠭<EFBFBD><E0A0AD><EFBFBD> HIGH
_SETVAR .EFL ; <20><>饥 <20><><EFBFBD>-<2D><> 䠩<><E4A0A9><EFBFBD> LOW
_SETVAR .EFH ; <20><>饥 <20><><EFBFBD>-<2D><> 䠩<><E4A0A9><EFBFBD> HIGH
_SETVAR .FFL ; <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> 䠩<> <20><> <20><>࠭<EFBFBD><E0A0AD><EFBFBD> LOW
_SETVAR .FFH ; <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> 䠩<> <20><> <20><>࠭<EFBFBD><E0A0AD><EFBFBD> HIGH
_SETVAR .CFL ; T<><54><EFBFBD>騩 䠩<> <20><> <20><>࠭<EFBFBD><E0A0AD><EFBFBD> LOW
_SETVAR .CFH ; T<><54><EFBFBD>騩 䠩<> <20><> <20><>࠭<EFBFBD><E0A0AD><EFBFBD> HIGH
_SETVAR .MFL ; <20><><EFBFBD>-<2D><> <20><>ન஢<E0AAA8><E0AEA2><EFBFBD><EFBFBD><EFBFBD> 䠩<><E4A0A9><EFBFBD> LOW
_SETVAR .MFH ; <20><><EFBFBD>-<2D><> <20><>ન஢<E0AAA8><E0AEA2><EFBFBD><EFBFBD><EFBFBD> 䠩<><E4A0A9><EFBFBD> HIGH
_SETVAR .MBL1 ; <20><><EFBFBD>-<2D><> <20><>ન஢<E0AAA8><E0AEA2><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD>⮢ [
_SETVAR .MBH1 ; <20><><EFBFBD>-<2D><> <20><>ન஢<E0AAA8><E0AEA2><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD>⮢
_SETVAR .MBL2 ; <20><><EFBFBD>-<2D><> <20><>ન஢<E0AAA8><E0AEA2><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD>⮢
_SETVAR .MBH2 ; <20><><EFBFBD>-<2D><> <20><>ન஢<E0AAA8><E0AEA2><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD>⮢ ]
_SETVAR .MBL3 ; <20><><EFBFBD>-<2D><> <20><>ન஢<E0AAA8><E0AEA2><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD>⮢ FAT32
_SETVAR .FILEMASK, MASK_SIZE ; <20><>᪠ <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> 䠩<><E4A0A9><EFBFBD>
_SETVAR .CURRPATH, 0x100 ; <20><><EFBFBD><EFBFBD>騩 <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
PANELFLAG
_BITMASK PRNDOSPATH, 7 ; =1-<2D><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> DOS
_BITMASK SIDE, 0 ; =1-<2D>ࠢ<EFBFBD><E0A0A2> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>, =0-<2D><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
VIEWFLAG
_BITMASK SHORTTREE, 2 ; =1-㦠⮥ <20><>ॢ<EFBFBD>
_BITMASK TREE, 1 ; =1-<2D><><EFBFBD><EFBFBD><EFBFBD> <20><>ॢ<EFBFBD> <20><>⠫<EFBFBD><E2A0AB><EFBFBD><EFBFBD>
_BITMASK FULL, 0 ; =1-<2D><><EFBFBD>஡<EFBFBD><E0AEA1><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> <20><>⠫<EFBFBD><E2A0AB><EFBFBD><EFBFBD>, 0-<2D><><EFBFBD>⪨<EFBFBD>
.MASK EQU .M_TREE | .M_FULL
SORTFLAG
_BITMASK BIT7, 7 ; not used
_BITMASK BIT6, 6 ; not used
_BITMASK FILTER, 5 ; =1-<2D><><EFBFBD><EFBFBD><EFBFBD> 䠩<><E4A0A9><EFBFBD> <20><> 䨫<><E4A8AB><EFBFBD><EFBFBD>
_BITMASK EXEC, 4 ; =1-<2D><><EFBFBD><EFBFBD><EFBFBD>뢠<EFBFBD><EBA2A0> ⮫쪮 <20>ᯮ<EFBFBD><E1AFAE>塞<EFBFBD><EFA5AC> 䠩<><E4A0A9>
_BITMASK SIZE, 3 ; =1-<2D><><EFBFBD><EFBFBD><EFBFBD>஢<EFBFBD><E0AEA2> <20><> ࠧ<><E0A0A7><EFBFBD><EFBFBD>
_BITMASK DATE, 2 ; =1-<2D><><EFBFBD><EFBFBD><EFBFBD>஢<EFBFBD><E0AEA2> <20><> <20><><EFBFBD><EFBFBD>
_BITMASK EXT, 1 ; =1-<2D><><EFBFBD><EFBFBD><EFBFBD>஢<EFBFBD><E0AEA2> <20><> <20><><EFBFBD><EFBFBD><EFBFBD>७<EFBFBD><E0A5AD>
_BITMASK NAME, 0 ; =1-<2D><><EFBFBD><EFBFBD><EFBFBD>஢<EFBFBD><E0AEA2> <20><> <20><><EFBFBD><EFBFBD><EFBFBD>
.MASK EQU .M_SIZE | .M_DATE | .M_EXT | .M_NAME
.MASKH EQU .M_BIT7 | .M_BIT6 | .M_FILTER | .M_EXEC
.MASKEXECFILTER EQU .M_FILTER | .M_EXEC
;[]----------------------------------------------------------[]
BAR
_INIT_VAR
_SETVAR .XL
_SETVAR .XH
_SETVAR .YL
_SETVAR .YH
_SETVAR .MAXLL
_SETVAR .MAXLH
_SETVAR .LENL
_SETVAR .LENH
_SETVAR .LEFTL
_SETVAR .LEFTH
_SETVAR .RIGHTL
_SETVAR .RIGHTH
_SETVAR .PAGEL
_SETVAR .PAGEH
_SETVAR .MAXL
_SETVAR .MAXH
_SETVAR .FIRSTL
_SETVAR .FIRSTH
;[]----------------------------------------------------------[]
PROC
_INIT_VAR
_SETVAR .XL
_SETVAR .XH
_SETVAR .YL
_SETVAR .YH
_SETVAR .MAXLL
_SETVAR .MAXLH
_SETVAR .COEFL
_SETVAR .COEFH
_SETVAR .CORRL
_SETVAR .CORRH
_SETVAR .MAXL1
_SETVAR .MAXH1
_SETVAR .MAXL2
_SETVAR .MAXH2
_SETVAR .CURL1
_SETVAR .CURH1
_SETVAR .CURL2
_SETVAR .CURH2
_SETVAR .COLOR
; <20><>ଠ<EFBFBD> ⠡<><E2A0A1><EFBFBD><EFBFBD>
; +00 2 Xmin
; +02 2 Xmax
; +04 2 Ymin
; +06 2 Ymax
; +08 2 0 - <20><><EFBFBD><EFBFBD>⮩ <20><>'<27><><EFBFBD>
; <09><><EFBFBD> 0 - <09><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
; <09><><EFBFBD> 1 - ࠡ<><E0A0A1><EFBFBD><EFBFBD> <09><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
; <09><><EFBFBD> 2 - <09><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> 1
; <09><><EFBFBD> 3 - <09><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
; <09><><EFBFBD> 4 - <09>ணࠬ<E0AEA3><E0A0AC> <20><><EFBFBD><EFBFBD>᪠<EFBFBD><E1AAA0><EFBFBD><EFBFBD> <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>.
; <09> <20><><EFBFBD> <20><><EFBFBD><EFBFBD>
; <09><><EFBFBD> 5 - <09>ணࠬ<E0AEA3><E0A0AC> <20><><EFBFBD><EFBFBD>᪠<EFBFBD><E1AAA0><EFBFBD><EFBFBD> <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>.
; <09><> <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <09><><EFBFBD><EFBFBD>
; <09><><EFBFBD> 6 - <09>ணࠬ<E0AEA3><E0A0AC> <20><><EFBFBD><EFBFBD>᪠<EFBFBD><E1AAA0><EFBFBD><EFBFBD> <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>.
; <09><> <20>ࠢ<EFBFBD><E0A0A2> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>
; <09><><EFBFBD> 7 - <09>맢<EFBFBD><EBA7A2><EFBFBD> <09>㭪<EFBFBD><E3ADAA><EFBFBD> <09><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><>।
; <09><><EFBFBD><EFBFBD>᪮<EFBFBD> <20>ணࠬ<E0AEA3><E0A0AC> <20><><EFBFBD> <20><><EFBFBD><EFBFBD>
; <09><><EFBFBD> 8 - <09>맢<EFBFBD><EBA7A2><EFBFBD> <09>㭪<EFBFBD><E3ADAA><EFBFBD> <09><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><>।
; <09><><EFBFBD><EFBFBD>᪮<EFBFBD> <20>ணࠬ<E0AEA3><E0A0AC> <20><> <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
; <09><><EFBFBD> 9 - <09>맢<EFBFBD><EBA7A2><EFBFBD> <09>㭪<EFBFBD><E3ADAA><EFBFBD> <09><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><>।
; <09><><EFBFBD><EFBFBD>᪮<EFBFBD> <20>ணࠬ<E0AEA3><E0A0AC> <20><> <20>ࠢ<EFBFBD><E0A0A2> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
; <09><><EFBFBD>15 - <09><><EFBFBD> <20><>४<EFBFBD><E0A5AA><EFBFBD><EFBFBD>⥫<EFBFBD> (<28><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD> <20><><EFBFBD><EFBFBD> <20><>
; 㡨<><E3A1A8><EFBFBD><EFBFBD>)
; +0A 2 <09><><EFBFBD><EFBFBD><EFBFBD> <20><>ࠡ<EFBFBD><E0A0A1>稪<EFBFBD> <20><><EFBFBD> <20><> <20><><EFBFBD><EFBFBD>⮬ <20><><EFBFBD><EFBFBD>
; +0C 2 <09><><EFBFBD><EFBFBD><EFBFBD> <20><>ࠡ<EFBFBD><E0A0A1>稪<EFBFBD> <20><><EFBFBD> <20><><EFBFBD><EFBFBD>⮬ <20><><EFBFBD><EFBFBD> (<28><><EFBFBD>)
; +0E 2 <09><><EFBFBD><EFBFBD><EFBFBD> <20><>ࠡ<EFBFBD><E0A0A1>稪<EFBFBD> <20><><EFBFBD> <20><><EFBFBD><EFBFBD>⮬ <20><><EFBFBD><EFBFBD> (<28>ࠢ)
FORMTABL
_INIT_VAR
_SETVAR .XMINL
_SETVAR .XMINH
_SETVAR .XMAXL
_SETVAR .XMAXH
_SETVAR .YMINL
_SETVAR .YMINH
_SETVAR .YMAXL
_SETVAR .YMAXH
_SETVAR .FLAGL
_SETVAR .FLAGH
_SETVAR .FIRENOL
_SETVAR .FIRENOH
_SETVAR .FIRELEFTL
_SETVAR .FIRELEFTH
_SETVAR .FIRERIGHTL
_SETVAR .FIRERIGHTH
_SETVAR .SIZE, 0
;FLAGS ; <20><><EFBFBD><EFBFBD> 7-0
_BITMASK EXECNOPRESS, 7 ; <20>맢<EFBFBD><EBA7A2><EFBFBD> <20>㭪<EFBFBD><E3ADAA><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><>। <20><><EFBFBD><EFBFBD>᪮<EFBFBD> <20>ணࠬ<E0AEA3><E0A0AC> <20><><EFBFBD> <20><><EFBFBD><EFBFBD>
_BITMASK EXECNORETRMB, 6 ; <20>ணࠬ<E0AEA3><E0A0AC> <20><><EFBFBD><EFBFBD>᪠<EFBFBD><E1AAA0><EFBFBD><EFBFBD> <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>. <20><> <20>ࠢ<EFBFBD><E0A0A2> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>
_BITMASK EXECNORETLMB, 5 ; <20>ணࠬ<E0AEA3><E0A0AC> <20><><EFBFBD><EFBFBD>᪠<EFBFBD><E1AAA0><EFBFBD><EFBFBD> <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>. <20><> <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>
_BITMASK EXECONLY, 4 ; <20>ணࠬ<E0AEA3><E0A0AC> <20><><EFBFBD><EFBFBD>᪠<EFBFBD><E1AAA0><EFBFBD><EFBFBD> <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>. <20> <20><><EFBFBD> <20><><EFBFBD><EFBFBD>
_BITMASK STATICINV, 3 ; <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
_BITMASK INV1, 2 ; <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> 1
_BITMASK WORKBUTTON, 1 ; ࠡ<><E0A0A1><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
_BITMASK BUTTON, 0 ; <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
; ; <20><><EFBFBD><EFBFBD> 15-8
_BITMASK FIRENOINV, 7 ; <20><><EFBFBD> <20><>४<EFBFBD><E0A5AA><EFBFBD><EFBFBD>⥫<EFBFBD> (<28><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD> <20><><EFBFBD><EFBFBD> <20><> 㡨<><E3A1A8><EFBFBD><EFBFBD>)
_BITMASK CLOSEANDRUN, 1 ; <20>맢<EFBFBD><EBA7A2><EFBFBD> <20>㭪<EFBFBD><E3ADAA><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><>। <20><><EFBFBD><EFBFBD>᪮<EFBFBD> <20>ணࠬ<E0AEA3><E0A0AC> <20><> <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
_BITMASK CLOSEWIN, 0 ; <20>맢<EFBFBD><EBA7A2><EFBFBD> <20>㭪<EFBFBD><E3ADAA><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><>। <20><><EFBFBD><EFBFBD>᪮<EFBFBD> <20>ணࠬ<E0AEA3><E0A0AC> <20><> <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
_BITMASK ENDTABL, 7 ; <20><><EFBFBD> <20> .XMINH 㪠<><E3AAA0>⥫<EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD> ᯨ᪠
; <20><><EFBFBD><EFBFBD> ⠡<><E2A0A1><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>室<EFBFBD><E5AEA4> <20><><EFBFBD> <20>맮<EFBFBD><EBA7AE> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
JUMPS
.JUMPSIZE EQU 3
; ⠡<><E2A0A1><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>室<EFBFBD><E5AEA4> <20><> <20>㭪樨 <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
_INIT_VAR BASE_ADDR + .JUMPSIZE ; <20>ய<EFBFBD><E0AEAF><EFBFBD> <20><><EFBFBD><EFBFBD>室<EFBFBD> <20><> <20>᭮<EFBFBD><E1ADAE><EFBFBD><EFBFBD> <20>室
_SETVAR .ClearScreen, .JUMPSIZE
_SETVAR .MakeWindow, .JUMPSIZE
_SETVAR .InvertRectan, .JUMPSIZE
_SETVAR .PrnTxtLnIFF, .JUMPSIZE
_SETVAR .PrnTxtLnNorm, .JUMPSIZE
_SETVAR .PrnTxtLnNormC, .JUMPSIZE
_SETVAR .PrnRangPathL, .JUMPSIZE
_SETVAR .PrnRangPathR, .JUMPSIZE
_SETVAR .PrnRangPathC, .JUMPSIZE
_SETVAR .InputLine, .JUMPSIZE
_SETVAR .InpLnExtN, .JUMPSIZE
_SETVAR .InpLnExtC, .JUMPSIZE
_SETVAR .DOSError, .JUMPSIZE
_SETVAR .InitScrBar, .JUMPSIZE
_SETVAR .PrnHScrBar, .JUMPSIZE
_SETVAR .PrnVScrBar, .JUMPSIZE
_SETVAR .InitProcess, .JUMPSIZE
_SETVAR .PrnProcess, .JUMPSIZE
_SETVAR .InitScrollBar, .JUMPSIZE
_ADDVAR .JUMPSIZE * 4 ; DUPL 15,0xC9
_SETVAR .ResFire, .JUMPSIZE
_SETVAR .TestCoords, .JUMPSIZE
_SETVAR .SetCMOSPrint, .JUMPSIZE
_SETVAR .ResCMOSPrint, .JUMPSIZE
_SETVAR .SetClock, .JUMPSIZE
_SETVAR .SetMouse, .JUMPSIZE
_ADDVAR .JUMPSIZE * 4 ; DUPL 12,0xC9
_SETVAR .ConvNumTxt40, .JUMPSIZE
_SETVAR .MoveBytes, .JUMPSIZE
_SETVAR .MoveBytesUp, .JUMPSIZE
_SETVAR .Mult8, .JUMPSIZE
_SETVAR .Mult16X8, .JUMPSIZE
_SETVAR .Mult16, .JUMPSIZE
_SETVAR .Mult16X16, .JUMPSIZE
_SETVAR .Mult32, .JUMPSIZE
_SETVAR .Divis16X16, .JUMPSIZE
_SETVAR .Divis24X16, .JUMPSIZE
_SETVAR .Divis32X16, .JUMPSIZE
_SETVAR .Divis32, .JUMPSIZE
_SETVAR .ConvNumTxt32, .JUMPSIZE
_SETVAR .ConvNumTxt16, .JUMPSIZE
_SETVAR .ConvNumTxt8, .JUMPSIZE
_SETVAR .ConvTxtNum32, .JUMPSIZE
_SETVAR .ConvTxtNum16, .JUMPSIZE
_SETVAR .Resident, .JUMPSIZE
_ADDVAR (BASE_ADDR + 0xC0) - .CURRVAR; - .JUMPSIZE; * 4 ; DUPL 12,0xC9
; <20><>६<EFBFBD><E0A5AC><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD> <20><><EFBFBD><EFBFBD>㯠 <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
_SETVAR .NUM_DEVICES, BYTE ; <20><><EFBFBD>-<2D><> <20><><EFBFBD>ன<EFBFBD><E0AEA9><EFBFBD>
_SETVAR .TreeFlag, BYTE ; <20><><EFBFBD><EFBFBD> <20><>ॢ<EFBFBD>
_SETVAR .CMOSFlag, BYTE ; <20><><EFBFBD><EFBFBD> CMOS 0 - <20><><EFBFBD>
; 1 - <20><><EFBFBD><EFBFBD>
_SETVAR .MouseFlag, BYTE ; <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> 0 - <20><><EFBFBD>
; 1 - <20><><EFBFBD><EFBFBD>
_SETVAR .CMOSPrint, BYTE
_SETVAR .FNPAGESID, BYTE ; <20><><EFBFBD><EFBFBD><EFBFBD>.<2E><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD> FN
_SETVAR .FNFUNCT, BYTE ; <20><>࠭<EFBFBD><E0A0AD><EFBFBD> <20> <20>㭪<EFBFBD><E3ADAA>ﬨ FN
_SETVAR .FNVIEW, BYTE ; <20><>࠭<EFBFBD><E0A0AD><EFBFBD> <20> FileViewer
_SETVAR .FNEDIT, BYTE ; <20><>࠭<EFBFBD><E0A0AD><EFBFBD> <20> FileEditor
_SETVAR .FNHELP, BYTE ; <20><>࠭<EFBFBD><E0A0AD><EFBFBD> FN HELP
_SETVAR .FNFONT, BYTE ; <20><>࠭<EFBFBD><E0A0AD><EFBFBD> <20><><EFBFBD><EFBFBD>⮢
_SETVAR .BufferID, BYTE ; <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>䨪<EFBFBD><E4A8AA><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
_SETVAR .FLX, BYTE ; <20><>࠭<EFBFBD><E0A0AD><EFBFBD> <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>㧪<EFBFBD> FLX <20><><EFBFBD>ᬮ<EFBFBD><E1ACAE>. FLX <20>⨫<EFBFBD><E2A8AB>
_SETVAR .LEFTPANEL, BYTE ; <20><>࠭<EFBFBD><E0A0AD><EFBFBD> <20><>⠫<EFBFBD><E2A0AB><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
_SETVAR .RIGHTPANEL, BYTE ; <20><>࠭<EFBFBD><E0A0AD><EFBFBD> <20><>⠫<EFBFBD><E2A0AB><EFBFBD> <20>ࠢ<EFBFBD><E0A0A2> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
; <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><>࠭<EFBFBD><E0A0AD><EFBFBD> <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>䥩<EFBFBD>
_SETVAR .BuffPg1, WORD
_SETVAR .BuffPg3, 3
FileHDR
_INIT_VAR
_SETVAR .Flag, BYTE ; +#00
_SETVAR .Name, 8 ; +#01
_SETVAR .Dot, BYTE ; +#09 ???
_SETVAR .Ext, 3 ; +#0A
_SETVAR .Zero, BYTE ; +#0D ???
_SETVAR .Attr, BYTE ; +#0E <20>ᯮ<EFBFBD><E1AFAE><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD>7 <20><><EFBFBD> 祣<>-<2D><>
_SETVAR .SizeBytes, DWORD ; +#0F
_SETVAR .Date, BYTE ; +#13
_SETVAR .Month, BYTE ; +#14
_SETVAR .Year, BYTE ; +#15
_SETVAR .Hours, BYTE ; +#16
_SETVAR .Minutes, BYTE ; +#17
_SETVAR .SIZE, 0
_BITMASK MARK, 0 ; 1-䠩<> <20><><EFBFBD><EFBFBD>祭
; <20><><EFBFBD><EFBFBD><EFBFBD> 䠩<><E4A0A9><EFBFBD>
FILENAME
.FN_INI EQU "fn.ini"
.FN_EXT EQU "fn.ext"
.FNVIEW_EXT EQU "fnview.ext"
.FNEDIT_EXT EQU "fnedit.ext"
.FNTREE_FLN EQU "treeinfo.fln"
.FNEDIT_INI EQU "FNEDIT.INI"
; <20>⫠<EFBFBD><E2ABA0>筮<EFBFBD>, <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD>
PLUGS_ENABLE EQU 0
TREE_REZID EQU 0
MARK_DIR EQU 0 ; <20>롮<EFBFBD> <20><>४<EFBFBD><E0A5AA>ਨ <20> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>⮬ ࠧ<><E0A0A7><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> 䠩<><E4A0A9><EFBFBD>
TREE_DIR_ENTER EQU 0 ; <20><><EFBFBD><EFBFBD><EFBFBD> ᮤ<>ন<EFBFBD><E0A6A8><EFBFBD><EFBFBD> <20><>४<EFBFBD><E0A5AA>ਨ <20> <20><>ॢ<EFBFBD> <20><> ENTER
- исправлена проверка запускаемого файла по расширению. - доки переведены на UTF8 кодировку. - поправлена CorrBigChar.
2025-06-24 21:36:47 +03:00
CORR_FILENAME EQU 1 ; <20>८<EFBFBD>ࠧ<EFBFBD><E0A0A7><EFBFBD><EFBFBD><EFBFBD><EFBFBD> ᨬ<><E1A8AC><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> 䠩<><E4A0A9>
Reference in New Issue Copy Permalink