;universal color print to console procedure like printf()
; in: IY
;
; Пример данных:
; DskInfo_Msg:	DB	"Formatted disk parameters:",cr,lf
; 		DB	"Total sectors: ",tab,col_cmd,col_magenta,	"%lu",		col_cmd,col_white,cr,lf
; 		DB	"Total size: ",tab,col_cmd,col_magenta,		"%uMb",		col_cmd,col_white,cr,lf
; 		DB	"Units: ",tab,tab,col_cmd,col_magenta,		"%u",		col_cmd,col_white,cr,lf
; 		DB	"Unit size: ",tab,col_cmd,col_magenta,		"%u%c",		col_cmd,col_white,cr,lf
; .FS:		DB	"File system: ",tab,col_cmd,col_magenta,"FAT16",col_cmd,col_white,cr,lf
; 		DB	"Serial: ",tab,col_cmd,col_magenta,		"%02x-%02x",	col_cmd,col_white,cr,lf
; 		DB	"Label: ",tab,tab,col_cmd,col_magenta, "NO LABEL",col_cmd,col_white,cr,lf,cr,lf,0
; .ptr:		DW	DskInfo_Msg
; .sectors:	DS	4
; .mb:		DW	0
; .units:	DW	0
; .u_size:	DW	0
; .u_sym:	DB	"K",0
; .serial:	DS	4
;
; в IY помещается DskInfo_Msg.ptr
;
;  x, X		hexadecimal
;  D		signed decimal
;  U		unsigned decimal
;  L		long
;  C		single character
;  O		octal
;  S		string

;-----------------------------------------------------------------------
Version_Msg:	DB	"DSS Drive Formatter v"
		DB	VERS_TXT,	"."
		DB	MODF_TXT,	"."
		DB	BUILD_TXT,	", "
		DB	"Copyright "
		DB	YEAR_TXT,	" "
		DZ	"by Tolik_Trek@SprinterTeam\r\n\r\n"
.Size		EQU	$-Version_Msg
 ASSERT	Version_Msg.Size < 80+4, "ERROR: Version_Msg to long!"
 ;-----------------------------------------------------------------------