ECHO Esc[0;60;"DIR";13p

Рассмотрим далее пример использования команд драйвера ANSI.SYS в командном файле. С помощью команды CHOICE и драйвера ANSI.SYS можно организовать циклический ввод символов и последующее объединение введенных символов в единую строку. Далее приводится фрагмент командного файла, в котором осуществляется ввод числовой строки. При этом используется пара команд драйвера ANSI.SYS, делающая работу команды CHOICE более удобной для пользователя, но и без этих команд работа командного файла принципиально не изменится. Для завершения ввода пользователь должен ввести символ звездочки (*).

REM Программа ввода с клавиатуры числовой строки REM Используется драйвер ANSY.SYS

REM Запомнить координаты курсора

ECHO Esc[s :LOOP

REM Восстановить координаты курсора

ECHO Esc[u

CHOICE /C:0123456789* /N Введите число или * для завершения ввода: %one% REM Переменная TWO содержит последнюю введенную цифру

IF ERRORLEVEL	11 GOTO END
IF ERRORLEVEL	10 SET		TWO=9
IF ERRORLEVEL	10 GOTO CONT
IF ERRORLEVEL	9	SET TWO=8
IF ERRORLEVEL	9	GOTO	CONT
IF ERRORLEVEL	8	SET TWO=7
IF ERRORLEVEL	8	GOTO	CONT
IF ERRORLEVEL	7	SET TWO=6
IF ERRORLEVEL	7	GOTO	CONT
IF ERRORLEVEL	6	SET TWO=5
IF ERRORLEVEL	6	GOTO	CONT
IF ERRORLEVEL	5	SET TWO=4
IF ERRORLEVEL	5	GOTO	CONT
IF ERRORLEVEL	4	SET TWO=3
IF ERRORLEVEL	4	GOTO	CONT
IF ERRORLEVEL	3	SET TWO=2
IF ERRORLEVEL	3	GOTO	CONT
IF ERRORLEVEL	2	SET TWO=1
IF ERRORLEVEL	2	GOTO	CONT
IF ERRORLEVEL	1	SET TWO=0
:CONT	двух строк
REM Сцепление	двух строк
SET ONE=%ONE%%TWO%			символа
REM Повторение ввода			символа
GOTO LOOP
:END			содержится введенное число в виде строки символов
REM В переменной ONE			содержится введенное число в виде строки символов
ECHO Введено число –			%ONE%

Содержание