Положим, есть символьная строка myvar длиной 30 символов.
myvar=space(30)
Пользователь может/должен ввести в эту myvar строго ограниченный набор символов. Разрешается ввод:
- цифр от 0 до 9
- буквы Я - не более одного раза
- символов chr(45) (дефис) и chr(46) (точка)
Порядок следования допустимых символов произвольный.
В реальности это не совсем так, но для "упрощения" пусть будут вот такие ограничения.
Допустим, ввод будет выполняться так (таки FPD) :
@ 10, 10 GET myvar
read
Вопрос. Каким образом можно сделать так, чтобы переменная myvar (может быть, после выполнения ввода и обработки) содержала только допустимые символы?
Ну, понятное дело, что можно посимвольно проверить, является ли символ допустимым для myvar. Или использовать функции CHRTRAN() или STRTRAN(). Но, может быть, есть способ получше?