From 47652e688347f7c0deb114ef816cf9557c630c9c Mon Sep 17 00:00:00 2001
From: Tolik <85737314+Tolik-Trek@users.noreply.github.com>
Date: Thu, 18 Jul 2024 21:25:41 +1000
Subject: [PATCH] ...

---
 constants/SP2000.inc | 14 +++++++++++++-
 1 file changed, 13 insertions(+), 1 deletion(-)

diff --git a/constants/SP2000.inc b/constants/SP2000.inc
index 086494b..c388fe7 100644
--- a/constants/SP2000.inc
+++ b/constants/SP2000.inc
@@ -515,6 +515,18 @@ RESET_PAGE		EQU #A0
         ;	LD (#C000),A                                            ; в этот момент подается RESET
 ;
 
+ MODULE	DRIVE_CODES
+SPRINTER:
+.FDD			EQU #00
+.RAM			EQU #60
+.HDD			EQU #80
+.CDROM			EQU #C0
+TRDOS:
+.FDD			EQU #00
+.RAM			EQU #04
+.HDD			EQU #40
+ ENDMODULE
+
 ;---------------------------------------------------------------------[]
 ;		Cтраница с системными переменными BIOS
 ;---------------------------------------------------------------------[]
@@ -647,7 +659,7 @@ SYS_PAGE		EQU #FE
 ;[ ] current dir для TR-DOS HDD
 .CURRENT_DIR_SEC_L	EQU #C196 ; word
 .CURRENT_DIR_SEC_H	EQU #C198 ; word
-.CURRENT_DIR_HDD	EQU #C19A
+.CURRENT_DIR_DRIVE	EQU #C19A
 ;
 ;!TODO			EQU #C19B..#C19F
 ;.LIB_TABLE		EQU #C1A0..#C1BF				; таблицы Library 32 байта