mirror of
https://github.com/Tolik-Trek/Estex-DSS.git
synced 2026-06-15 09:21:47 +03:00
12c028744a
Убран баг в ATTRIB для GET на разделе FAT с кластером 64 кб. Исправлен улёт стека в ПЗУ в процедуре запуска EXE. Исправлен баг со скроллом в ECHOKEY.
34 lines
1.2 KiB
NASM
34 lines
1.2 KiB
NASM
;///////////////////////////////////////////////////
|
|
;
|
|
; HELP. ‚뢮¤ íªà ¯®¬®é¨
|
|
;
|
|
;///////////////////////////////////////////////////
|
|
cmd_help: LD HL,.help_txt
|
|
JP PRINTZ
|
|
; LD A,(color_screen)
|
|
; AND A ; no attr-mode
|
|
; EX AF,AF'
|
|
; XOR A ; no XY-mode
|
|
; LD BC,BIOS.LP_PR_LINE_DIR
|
|
; LD IY,0 ; YH = YL = B
|
|
; JP ToBIOS
|
|
;JP ECHO_MESSAGE
|
|
|
|
; 1 2\ 3 4 5 6 7 8
|
|
; 01234567890123456789012345678901234567890123456789012345678901234567890123456789;
|
|
.help_txt: DB "COMMANDS:\r\n"
|
|
DB "SET INFO REN = RENAME PATH CLS [ink]\r\n"
|
|
DB "CD = CHDIR DEL = ERASE HELP VER = VERSION\r\n"
|
|
DB "MD = MKDIR TIME ECHO EXIT\r\n"
|
|
DZ "RD = RMDIR DATE REBOOT DIR [path] [/p /f]\r\n\n"
|
|
; ; ; ; ; ; ; ; ; ; ; ; ;
|
|
;
|
|
;LP_PR_LINE_DIR:
|
|
; A - âਡãâë ¢ë¢®¤¨¬®£® ᨬ¢®« ¥á«¨ CF'
|
|
; A' - ¥á«¨ !=0 â® ¡¥§ áªà®««
|
|
; CF - XY-mode
|
|
; DE - ¬¥á⮠ᨬ¢®« ¢ ®ª¥, ¥á«¨ CF=1
|
|
; HL - ¤à¥á á ¢ë¢®¤¨¬®© áâப®©
|
|
; B - 梥⠪®á®«¨ (¨á¯®«ì§ã¥âáï ¯à¨ áªà®««¥ ¨ ®ç¨á⪥ ®ª )
|
|
; IY - ¤¢ ᯥæ.ᨬ¢®« ¤«ï ¢ë室 á CF=1. „®«¦ë ¡ëâì à ¢ë B, ¥á«¨ ¥ ã¦ë
|
|
; CF' - ¢ë¢®¤¨âì ᨬ¢®« á âਡãâ ¬¨ |