Files
DR-DOS-OpenDOS/COMMAND/TXHELP.ASM
2020-11-04 23:59:28 +01:00

312 lines
22 KiB
NASM
Raw Blame History

This file contains invisible Unicode characters

This file contains invisible Unicode characters that are indistinguishable to humans but may be processed differently by a computer. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

NUL equ 0
BS equ 8
TAB equ 9
LF equ 10
CR equ 13
PRI equ 0
ALT equ 1
DGROUP group _DATA
CHELP group _HELP
_DATA segment word public 'DATA'
assume ds:DGROUP, cs:DGROUP
public _single_table
public _dls_table
public _dls_init
public _dls_get_table
public _dls_language
_dls_table dw 0
__dls_init__ db 0
_single_table label word
; Source .TFT file: 'TMP1.$$$'
public help_aaa
help_aaa equ $ - _single_table
dw CHELP:_help_aaa
public help_and
help_and equ $ - _single_table
dw CHELP:_help_and
public help_break
help_break equ $ - _single_table
dw CHELP:_help_break
public help_call
help_call equ $ - _single_table
dw CHELP:_help_call
public help_chcp
help_chcp equ $ - _single_table
dw CHELP:_help_chcp
public help_chdir
help_chdir equ $ - _single_table
dw CHELP:_help_chdir
public help_cls
help_cls equ $ - _single_table
dw CHELP:_help_cls
public help_copy
help_copy equ $ - _single_table
dw CHELP:_help_copy
public help_ctty
help_ctty equ $ - _single_table
dw CHELP:_help_ctty
public help_date
help_date equ $ - _single_table
dw CHELP:_help_date
public help_del
help_del equ $ - _single_table
dw CHELP:_help_del
public help_delq
help_delq equ $ - _single_table
dw CHELP:_help_delq
public help_dir
help_dir equ $ - _single_table
dw CHELP:_help_dir
public help_echo
help_echo equ $ - _single_table
dw CHELP:_help_echo
public help_eraq
help_eraq equ $ - _single_table
dw CHELP:_help_eraq
public help_erase
help_erase equ $ - _single_table
dw CHELP:_help_erase
public help_exit
help_exit equ $ - _single_table
dw CHELP:_help_exit
public help_for
help_for equ $ - _single_table
dw CHELP:_help_for
public help_gosubreturn
help_gosubreturn equ $ - _single_table
dw CHELP:_help_gosubreturn
public help_goto
help_goto equ $ - _single_table
dw CHELP:_help_goto
public help_hiload
help_hiload equ $ - _single_table
dw CHELP:_help_hiload
public help_idle
help_idle equ $ - _single_table
dw CHELP:_help_idle
public help_if
help_if equ $ - _single_table
dw CHELP:_help_if
public help_mkdir
help_mkdir equ $ - _single_table
dw CHELP:_help_mkdir
public help_or
help_or equ $ - _single_table
dw CHELP:_help_or
public help_path
help_path equ $ - _single_table
dw CHELP:_help_path
public help_pause
help_pause equ $ - _single_table
dw CHELP:_help_pause
public help_prompt
help_prompt equ $ - _single_table
dw CHELP:_help_prompt
public help_rem
help_rem equ $ - _single_table
dw CHELP:_help_rem
public help_rename
help_rename equ $ - _single_table
dw CHELP:_help_rename
public help_rmdir
help_rmdir equ $ - _single_table
dw CHELP:_help_rmdir
public help_set
help_set equ $ - _single_table
dw CHELP:_help_set
public help_shift
help_shift equ $ - _single_table
dw CHELP:_help_shift
public help_switch
help_switch equ $ - _single_table
dw CHELP:_help_switch
public help_time
help_time equ $ - _single_table
dw CHELP:_help_time
public help_truename
help_truename equ $ - _single_table
dw CHELP:_help_truename
public help_type
help_type equ $ - _single_table
dw CHELP:_help_type
public help_ver
help_ver equ $ - _single_table
dw CHELP:_help_ver
public help_verify
help_verify equ $ - _single_table
dw CHELP:_help_verify
public help_vol
help_vol equ $ - _single_table
dw CHELP:_help_vol
_DATA ends
_HELP segment word public 'HELP'
assume ds:CHELP, cs:CHELP
; Source .TFT file: 'TMP1.$$$'
_help_aaa db "Available internal commands are:", LF, LF, NUL
_help_truename db "Reserved command.", NUL
_help_break db "BREAK", TAB, "Controls how you break out of programs using Ctrl+Break or Ctrl+C.", LF, LF, "Syntax:", LF, TAB, "BREAK /H", LF, TAB, "BREAK [ON|OFF]", LF, LF, TAB, "/H", TAB, "gives this scre"
db "en", LF, TAB, "ON", TAB, "turns break checking on (default)", LF, TAB, "OFF", TAB, "turns break checking off", LF, TAB, "none", TAB, "no parameters displays the state of break ON or OFF", LF
db LF, "Examples:", LF, TAB, "BREAK OFF", LF, TAB, "BREAK", NUL
_help_call db "CALL", TAB, "Used in batch files, this command will call another batch file and", LF, TAB, "return when it has finished executing it.", LF, LF, "Syntax:", LF, TAB, "CALL /H", LF, TAB, "CALL [d"
db ":][path]file[.BAT][ params[...]]", LF, LF, TAB, "/H", TAB, "gives this screen", LF, TAB, "d:", TAB, "drive where batch file resides", LF, TAB, "path", TAB, "path where batch file resides", LF
db TAB, "file", TAB, "name of batch file to call", LF, TAB, ".BAT", TAB, "optional filename extension", LF, TAB, "params", TAB, "parameter list read by called batch file as %%1 %%2 ... etc", LF, LF
db "Examples:", LF, TAB, "CALL doit.bat", LF, TAB, "CALL setdate 5 Nov 90", NUL
_help_chdir db "CHDIR", TAB, "Shows the path, or changes the current directory. Can be", LF, TAB, "abbreviated to CD.", LF, LF, "Syntax:", LF, TAB, "CHDIR /H", LF, TAB, "CHDIR [[d:]dirpath]", LF, LF, TAB, "/"
db "H", TAB, "gives this screen", LF, TAB, "d:", TAB, "drive on which dirpath resides", LF, TAB, "dirpath", TAB, "directory to change to", LF, TAB, "none", TAB, "no parameters displays the curre"
db "nt drive and directory", LF, LF, "Examples:", LF, TAB, "CHDIR c:\homedir", LF, TAB, "CD ..", LF, TAB, "CD", NUL
_help_cls db "CLS", TAB, "Clears the display screen.", LF, LF, "Syntax:", LF, TAB, "CLS /H", LF, LF, TAB, TAB, "/H", TAB, "gives this screen", LF, LF, "Example:", LF, TAB, "CLS", NUL
_help_copy db "COPY", TAB, "Copies or combines files", LF, LF, "Syntax:", LF, " COPY /H", LF, " COPY device|wildspec[+wildspec...][switches] [device|filespec[switches]]", LF, LF, " device", TAB, "is CON"
db ",LPTn,PRN,NUL,COMn or AUX", LF, " wildspec", TAB, "source device, file or list of files to be included", LF, " filespec", TAB, "destination file or device", LF, " switches", TAB, "/A treat"
db " file as ASCII", LF, TAB, TAB, "/B treat source file as binary (ignore Ctrl+Z in file)", LF, TAB, TAB, "/V verify source and destination match", LF, TAB, TAB, "/S include system or hidden fil"
db "es in copy", LF, TAB, TAB, "/C prompt for confirmation by user before copying", LF, TAB, TAB, "/Z zeros top bit of every byte in destination", LF, "Examples:", LF, TAB, "COPY file1+file2 file"
db "3", LF, TAB, "COPY *.txt c:dir1", NUL
_help_date db "DATE", TAB, "Displays and changes the date.", LF, LF, "Syntax:", LF, TAB, "DATE /H", LF, TAB, "DATE [mm-dd-yy] (US format)", LF, TAB, "DATE [dd-mm-yy] (European format)", LF, TAB, "DATE [yy-"
db "mm-dd] (Japanese format)", LF, LF, TAB, "/H", TAB, "gives this screen", LF, TAB, "mm", TAB, "month 1 to 12", LF, TAB, "dd", TAB, "day 1 to 31", LF, TAB, "yy", TAB, "2 or 4 digit year", LF
db TAB, "none", TAB, "no parameters displays date then prompts for new date", LF, LF, "Examples:", LF, TAB, "DATE 16-11-90", LF, TAB, "DATE", NUL
_help_del db "DEL", TAB, "Erases files.", LF, LF, "Syntax:", LF, TAB, "DEL /H", LF, TAB, "DEL wildspec [/C|/P][/S]", LF, LF, TAB, "/H", TAB, " gives this screen", LF, TAB, "/C|/P", TAB, " prompt befo"
db "re deletion", LF, TAB, "/S", TAB, " include system files", LF, TAB, "wildspec file to be deleted (wildcards allowed)", LF, LF, "Examples:", LF, TAB, "DEL *.EXE /CS", LF, TAB, "DEL MYFILE."
db "TXT", NUL
_help_delq db "DELQ", TAB, "Erases files but queries you before doing so.", LF, LF, "Syntax:", LF, TAB, "DELQ /H", LF, TAB, "DELQ wildspec [/S]", LF, LF, TAB, "/H", TAB, " gives this screen", LF, TAB, "/"
db "S", TAB, " include system files", LF, TAB, "wildspec file to be deleted (wildcards allowed)", LF, LF, "Examples:", LF, TAB, "DELQ *.EXE /S", LF, TAB, "DELQ MYFILE.TXT", NUL
_help_dir db "DIR", TAB, "Displays the files in a directory.", LF, LF, "Syntax:", TAB, "DIR /H", LF, TAB, "DIR [wildspec] [/L|/2|/W] [/P|/N] [/A|/D|/S] [/C|/R]", LF, LF, TAB, "/H", TAB, " gives this scree"
db "n", LF, TAB, "wildspec files to be displayed (wildcards allowed)", LF, TAB, "/A", TAB, " displays all files", LF, TAB, "/C or /R make other switches default for next time", LF, TAB, "/D", TAB
db " displays files without system attribute set (default)", LF, TAB, "/L", TAB, " long format. Include size, date and time (default)", LF, TAB, "/2", TAB, " as above except files are displayed i"
db "n two columns", LF, TAB, "/N", TAB, " return to default paging switch", LF, TAB, "/P", TAB, " pause at end of full page. Default is no paging", LF, TAB, "/S", TAB, " displays files with sy"
db "stem attribute set", LF, TAB, "/W", TAB, " wide format. Displays file and directory names only", LF, TAB, "none", TAB, " no parameters displays all files using current default", LF, TAB, TAB
db " switches", LF, "Example:", LF, TAB, "DIR /C /W", NUL
_help_echo db "ECHO", TAB, "Used in batch files, this command is used to display a message", LF, TAB, "to the screen.", LF, LF, "Syntax:", LF, TAB, "ECHO /H", LF, TAB, "ECHO [ON|OFF|string]", LF, LF, TAB, "/"
db "H", TAB, "gives this screen", LF, TAB, "ON", TAB, "turn echoing on (default)", LF, TAB, "OFF", TAB, "turn echoing off", LF, TAB, "string", TAB, "display ""string""", LF, LF, "Examples:", LF
db TAB, "ECHO OFF", LF, TAB, "ECHO You are running the %%OS%% operating system.", NUL
_help_eraq db "ERAQ", TAB, "Erases files but queries you before doing so.", LF, TAB, "ERAQ wildspec [/S]", LF, LF, TAB, "/H", TAB, " gives this screen", LF, TAB, "/S", TAB, " include system files", LF, TAB
db "wildspec file to be deleted (wildcards allowed)", LF, LF, "Examples:", LF, TAB, "ERAQ *.EXE /S", LF, TAB, "ERAQ MYFILE.TXT", NUL
_help_erase db "ERASE", TAB, "Erases files. Can be abbreviated to ERA.", LF, LF, "Syntax:", LF, TAB, "ERASE /H", LF, TAB, "ERASE wildspec [/C|/P][/S]", LF, LF, TAB, "/H", TAB, " gives this screen", LF, TAB
db "/C|/P", TAB, " prompt before deletion", LF, TAB, "/S", TAB, " include system files", LF, TAB, "wildspec file to be deleted (wildcards allowed)", LF, LF, "Examples:", LF, TAB, "ERASE *.EXE"
db " /CS", LF, TAB, "ERA MYFILE.TXT", NUL
_help_exit db "EXIT", TAB, "Terminates a batch file or secondary command processor.", LF, LF, "Syntax:", LF, TAB, "EXIT [/H]", LF, LF, TAB, "/H", TAB, "gives this screen", LF, LF, "Example:", LF, TAB, "E"
db "XIT", NUL
_help_for db "FOR", TAB, "Most commonly used in batch files, this command is used to repeat", LF, TAB, "a sequence of commands substituting a filename from a list with each", LF, TAB, "iteration of the loop.", LF
db LF, "Syntax:", LF, TAB, "FOR /H", LF, TAB, "FOR %%[%%]var IN (fileset) DO command", LF, LF, TAB, "%%%%var", TAB, " variable used to reference a filename in a batch file", LF, TAB, "%%var", TAB
db " variable used to reference a filename at the command line", LF, TAB, "fileset", TAB, " list of files to perform operation upon", LF, TAB, "command", TAB, " operation to be performed", LF, LF
db "Example:", LF, TAB, "FOR %%%%f IN (myprog.asm acct.bas acct2.bas)DO TYPE %%%%f", LF, TAB, "FOR %%f IN (myprog.asm acct.bas acct2.bas)DO TYPE %%f", NUL
_help_goto db "GOTO", TAB, "Used in batch files, this command causes execution of commands", LF, TAB, "to alter to a specified point in the batch file.", LF, LF, "Syntax:", LF, TAB, "GOTO /H", LF, TAB, "GOTO"
db " label", LF, LF, TAB, "/H", TAB, "gives this screen", LF, TAB, "label", TAB, "label to jump to", LF, LF, "Example:", LF, TAB, ":start", LF, TAB, "type myfile.txt", LF, TAB, "goto start", NUL
_help_gosubreturn db "GOSUB/RETURN", LF, TAB, "The GOSUB command causes execution to jump to a specified point ", LF, TAB, "in a batch file. When a RETURN command is encountered, execution ", LF, TAB, "will continue f"
db "rom the line after the GOSUB.", LF, LF, "Syntax:", LF, TAB, "GOSUB label", LF, LF, "Example:", LF, TAB, "GOSUB myfunc", LF, TAB, "GOTO finished", LF, TAB, ":myfunc", LF, TAB, "ECHO Hello"
db LF, TAB, "RETURN", LF, TAB, ":finished", NUL
_help_switch db "SWITCH", TAB, "This command allows the user to select an entry from a menu ", LF, TAB, "in a batch file. The keys 1 - 9 will select the appropriate label ", LF, TAB, "from the command line. A RETU"
db "RN command returns execution to the ", LF, TAB, "line after the SWITCH command.", LF, LF, "Syntax:", LF, TAB, "SWITCH label [,label..]", LF, LF, "Example:", LF, TAB, "SWITCH label1,label2,la"
db "bel3,label4", LF, TAB, "GOTO finished", LF, TAB, ":label1", LF, TAB, "ECHO Hello", LF, TAB, "RETURN", LF, TAB, ":label2", LF, TAB, "ECHO World", LF, TAB, "RETURN", LF, TAB, "...", NUL
_help_idle db "IDLE", TAB, "Turns dynamic idle detection on or off.", LF, LF, "Syntax:", LF, TAB, "IDLE /H", LF, TAB, "IDLE [= ][ON|OFF]", LF, LF, TAB, "/H", TAB, "gives this screen", LF, TAB, "ON", TAB
db "enables idle detection", LF, TAB, "OFF", TAB, "disables idle detection", LF, TAB, "none", TAB, "no parameters displays the state ON or OFF", LF, LF, "Example:", LF, TAB, "IDLE = ON", LF, TAB
db "IDLE OFF", NUL
_help_if db "IF", TAB, "Used in batch files, this command allows conditional execution", LF, TAB, "of commands based upon specified conditions.", LF, LF, "Syntax:", TAB, "IF /H", LF, TAB, "IF [NOT] conditio"
db "n [AND [NOT] condition] [OR [NOT] condition] command", LF, LF, TAB, "/H", TAB, " gives this screen", LF, LF, TAB, "condition ERRORLEVEL [==] number", LF, TAB, TAB, " EXIST [==] filespec"
db LF, TAB, TAB, " string1 ==|!=|>|>=|<|<=|<> string2", LF, TAB, TAB, " #value1 ==|!=|>|>=|<|<=|<> #value2", LF, LF, "Examples: IF EXIST c:\bin\editor.exe c:\bin\editor %%1", LF, TAB, " IF "
db "NOT ""%%1"" == ""english"" ECHO Invalid Language Specified", LF, TAB, " IF #%%mem%% < #540 ECHO Not Enough Memory", NUL
_help_and db "AND", TAB, "Used with the IF command.", LF, TAB, "Enter IF /? for more information.", LF, NUL
_help_or db "OR", TAB, "Used with the IF command.", LF, TAB, "Enter IF /? for more information.", LF, NUL
_help_mkdir db "MKDIR", TAB, "Creates a subdirectory. Can be abbreviated to MD.", LF, LF, "Syntax:", LF, TAB, "MKDIR /H", LF, TAB, "MKDIR [d:]dirpath", LF, LF, TAB, "/H", TAB, " gives this screen", LF, TAB
db "d:", TAB, " drive", LF, TAB, "dirpath", TAB, " subdirectory to create", LF, LF, "Examples:", LF, TAB, "MKDIR \USERS\ROGER", LF, TAB, "MD ..\USERS\LESLEY", NUL
_help_path db "PATH", TAB, "Sets or displays a search path for commands or batch files.", LF, LF, "Syntax:", LF, TAB, "PATH /H", LF, TAB, "PATH [[d:]dirpath[;[d:]dirpath...]]", LF, LF, TAB, "d:", TAB, "dri"
db "ve on which dirpath resides", LF, TAB, "dirpath", TAB, "subdirectory path", LF, TAB, ";", TAB, "path separator, or on its own, sets PATH to nothing", LF, TAB, "none", TAB, "no parameters disp"
db "lays current path", LF, LF, "Examples:", LF, TAB, "PATH", LF, TAB, "PATH c:\osutils;c:\bin;d:\users\roger", LF, TAB, "PATH;", NUL
_help_pause db "PAUSE", TAB, "Used in batch files, this command halts execution of the batch", LF, TAB, "file until a key is pressed.", LF, LF, "Syntax:", LF, TAB, "PAUSE /H", LF, TAB, "PAUSE [comment]", LF, LF
db TAB, "/H", TAB, "gives this screen", LF, TAB, "comment", TAB, "displays ""comment"" if echo is on", LF, TAB, "none", TAB, "no parameters displays default pause message", LF, LF, "Examples:", LF
db TAB, "PAUSE", LF, TAB, "Strike a key when ready . . .", LF, LF, TAB, "PAUSE Put disk number 2 in drive A:", LF, TAB, "Strike a key when ready . . .", NUL
_help_prompt db "PROMPT", TAB, "Modifies the command prompt.", LF, LF, "Syntax:", TAB, "PROMPT /H or PROMPT [$list]", LF, LF, "Where list can be:", LF, " $ $ character", TAB, TAB, "t time", LF, " d date", TAB
db TAB, TAB, "p current directory", LF, " v OS version number", TAB, TAB, "n drive letter", LF, " g the "">"" character", TAB, TAB, "l the ""<"" character", LF, " b the ""|"" character", TAB
db TAB, "q the ""="" character", LF, " h backspace", TAB, TAB, TAB, "e the escape character (ASCII 27)", LF, " x run the program defined in the PEXEC environment variable", LF, " - turns th"
db "e prompt off", LF, LF, "Example:", LF, " PROMPT $p$g ==> C:\DIR>", NUL
_help_rem db "REM", TAB, "Used in batch files, this command causes the remainder of the", LF, TAB, "line to be ignored.", LF, LF, "Syntax:", LF, TAB, "REM /H", LF, TAB, "REM [comment]", LF, LF, TAB, "/H", TAB
db TAB, "gives this screen", LF, TAB, "comment", TAB, TAB, "comment text", LF, LF, "Examples:", LF, TAB, "REM Ignore the rest of this line", LF, TAB, "REM XDEL \*.* /sdrn THIS IS SAFE SINCE IT "
db "WONT GET EXECUTED", NUL
_help_rename db "RENAME", TAB, "Renames files, or moves files between subdirectories on the same", LF, TAB, "disk. Can be abbreviated to REN.", LF, LF, "Syntax:", LF, TAB, "RENAME /H", LF, TAB, "RENAME oldwild"
db "spec newwildspec", LF, LF, TAB, "/H", TAB, TAB, "gives this screen", LF, TAB, "oldwildspec", TAB, "full path and filename of source file(s)", LF, TAB, "newwildspec", TAB, "full path and fil"
db "ename of destination file(s)", LF, LF, "Examples:", LF, TAB, "RENAME *.TXT *.DOC", LF, TAB, "REN AUTOEXEC.BAT *.SAV", LF, TAB, "REN \MYFILE.BAT \ARCHIVE\MYFILE.BAT", NUL
_help_rmdir db "RMDIR", TAB, "Removes specified subdirectory. Can be abbreviated to RD.", LF, LF, "Syntax:", LF, TAB, "RMDIR /H", LF, TAB, "RMDIR [d:]dirpath", LF, LF, TAB, "/H", TAB, TAB, "gives this scre"
db "en", LF, TAB, "d:", TAB, TAB, "drive upon which dirpath resides", LF, TAB, "dirpath", TAB, TAB, "subdirectory to remove", LF, LF, "Examples:", LF, TAB, "RMDIR \users\ian", LF, TAB, "RD \"
db "work\test", NUL
_help_set db "SET", TAB, "Inserts strings into the command processors environment.", LF, LF, "Syntax:", LF, TAB, "SET /H", LF, TAB, "SET [name=[string]]", LF, LF, TAB, "/H", TAB, "gives this screen", LF, TAB
db "name=", TAB, "environment variable name to be assigned", LF, TAB, "string", TAB, "string to assign to name", LF, TAB, "none", TAB, "no parameters displays all environment strings", LF, LF, "E"
db "xamples:", LF, TAB, "SET archive=c:\archive\", LF, TAB, "SET flags=-b-t$r", LF, TAB, "SET backup=", NUL
_help_shift db "SHIFT", TAB, "Used in batch files, this command allows you to change the", LF, TAB, "position of command line parameters to access more than 10", LF, TAB, "(%%0 through %%9) replacement variables."
db LF, LF, "Syntax:", LF, TAB, "SHIFT [/H]", LF, LF, TAB, "/H", TAB, "gives this screen", LF, LF, "Example:", LF, TAB, ":loop", LF, TAB, "if ""%%1"" == """" goto done", LF, TAB, "copy %%1 "
db "c:\archive", LF, TAB, "shift", LF, TAB, "goto loop", LF, TAB, ":done", NUL
_help_time db "TIME", TAB, "Displays and changes the time of day.", LF, LF, "Syntax:", LF, TAB, "TIME /H", LF, TAB, "TIME [hh[:mm[:ss]][a|p] [/C]", LF, LF, TAB, "/H", TAB, "gives this screen", LF, TAB, "h"
db "h", TAB, "hours 0 to 23 (24 hour clock) or 1 to 12 if a or p specified", LF, TAB, "mm", TAB, "minutes 0 to 59", LF, TAB, "ss", TAB, "seconds 0 to 59", LF, TAB, "a|p", TAB, "am|pm", LF, TAB
db "/C", TAB, "displays time continuously", LF, TAB, "none", TAB, "no parameters displays the current time, then prompts for a", LF, TAB, TAB, "new time. Press Return to leave the time unchanged", LF
db LF, "Examples:", LF, TAB, "TIME 5:23:8", LF, TAB, "TIME 7:32", LF, TAB, "TIME", NUL
_help_type db "TYPE", TAB, "Displays the contents of a text file on screen.", LF, LF, "Syntax:", LF, TAB, "TYPE /H", LF, TAB, "TYPE wildspec [/P]", LF, LF, TAB, "/H", TAB, " gives this screen", LF, TAB, "w"
db "ildspec file to be displayed (wildcards allowed)", LF, TAB, "/P", TAB, " pause when screen full", LF, LF, "Examples:", LF, TAB, "TYPE *.TXT /P", LF, TAB, "TYPE C:\AUTOEXEC.BAT", NUL
_help_ver db "VER", TAB, "Displays the version number of the operating system in use.", LF, LF, "Syntax:", LF, TAB, "VER [/H]", LF, LF, TAB, "/H", TAB, "gives this screen", LF, LF, "Example:", LF, TAB, "V"
db "ER", NUL
_help_verify db "VERIFY", TAB, "Switches the Verify option on or off, which causes the operating", LF, TAB, "system to check that data is correctly written to disk after each", LF, TAB, "disk write operation.", LF
db LF, "Syntax:", LF, TAB, "VERIFY /H", LF, TAB, "VERIFY [ON|OFF]", LF, LF, TAB, "/H", TAB, "gives this screen", LF, TAB, "ON", TAB, "turns VERIFY on", LF, TAB, "OFF", TAB, "turns VERIFY of"
db "f (default)", LF, TAB, "none", TAB, "no parameters displays the current VERIFY state, on or off", LF, LF, "Examples:", LF, TAB, "VERIFY ON", LF, TAB, "VERIFY", NUL
_help_vol db "VOL", TAB, "Displays the disk volume label.", LF, LF, "Syntax:", LF, TAB, "VOL /H", LF, TAB, "VOL [d:]", LF, LF, TAB, "/H", TAB, "gives this screen", LF, TAB, "d:", TAB, "drive to display"
db " volume label", LF, TAB, "none", TAB, "no parameters displays the volume label of the default drive", LF, LF, "Example:", LF, TAB, "VOL", NUL
_help_chcp db "CHCP", TAB, "Change the active Code Page.", LF, LF, "Syntax:", LF, TAB, "CHCP /H", LF, TAB, "CHCP [cp]", LF, LF, TAB, "/H", TAB, "gives this screen", LF, TAB, "cp", TAB, "new active Code "
db "Page", LF, TAB, "none", TAB, "no parameters displays the current active Code Page", LF, LF, "Example:", LF, TAB, "CHCP 850", NUL
_help_ctty db "CTTY", TAB, "Redirect console input and output to a port.", LF, LF, "Syntax:", LF, TAB, "CTTY /H", LF, TAB, "CTTY port", LF, LF, TAB, "/H", TAB, "gives this screen", LF, TAB, "port", TAB, "p"
db "ort to redirect to", LF, LF, "Example:", LF, TAB, "CTTY COM1:", NUL
_help_hiload db "HILOAD", TAB, "Load and execute a program in upper memory.", LF, LF, "Syntax:", LF, TAB, "HILOAD /H", LF, TAB, "HILOAD fname", LF, LF, TAB, "/H", TAB, "gives this screen", LF, TAB, "fname", TAB
db "filename of program to load", LF, LF, TAB, "(LOADHIGH and LH can be used instead of HILOAD)", LF, LF, "HILOAD only has an effect if MemoryMAX software is present and there is", LF, "upper memory"
db " available. If this is not so then the program will load and", LF, "execute in conventional memory.", LF, LF, "Example:", LF, TAB, "HILOAD CURSOR", NUL
_HELP ends
_TEXT segment word public 'CODE'
assume cs:_TEXT, ds:DGROUP
; unsigned dls_language(void)
_dls_language proc near
xor ax, ax
ret
_dls_language endp
; void dls_init(void)
_dls_init proc near
inc __dls_init__
ret
_dls_init endp
; void * dls_get_table(unsigned param)
_dls_get_table proc near
mov al, __dls_init__
cbw
test al, al
je dls_gt_end
mov ax, offset DGROUP:_single_table
mov word ptr _dls_table, ax
dls_gt_end:
ret
_dls_get_table endp
_TEXT ends
end