Урок по Blitz 3D .
Ввод текста с клавиатуры в графическом режиме.

Этот урок научит работать со строками и кодами клавиш в среде Blitz.

На сколько я знаю, в Blitz 3D нет функции ввода текста с клавиатуры. Конечно, есть команда Input, но она некрасивая и очень тугая. Я предлагаю сделать свою функцию ввода с клавиатуры: красивую и с рамочкой. :)

Поставим задачу:
* В точке, где кликнули мышью, появляется окошечко для ввода текста. После ввода текст отображается на экране.
Вот такая простая задача! Начнем с простого – с мыши и окошка:
Назовем функцию ввода : My_Input()
 

Можно запустить и увидеть на экране две строчки текста. В первой написано «Жми мышью на экран» (вольный перевод), а во второй «Hello World» - это значение переменной Label.
 

При клике мышью пропадает значение переменной (становится равной 0). Это потому, что функция My_Input() пуста, а ее значение, соответственно, равно нулю.
Исправим это:
Как Вы уже заметили, у функции есть 5 входных параметров:

x#, y# - координаты верхнего левого угла окошка;
dx#, dy# - ширина и высота окошка;
s$ - это значение по умолчанию, т.е. какой текст уже будет введен при создании окошка.

Чтобы присвоить функции какое-либо значение, используется команда Return. Впишем в тело функции строку:
 

Теперь при клике на экран, значение переменной не обнуляется.
Пора рисовать само окошко. Для этого впишем в тело функции после строки Function my_input$(s$,x#,y#,dx#,dy#) следующее:
 

Запускаем и кликаем в любое место экрана. Там где мы был произведен клик, появляется окошко с текстом, равным значению переменной Label. Окно не исчезает до тех пор, пока не будет нажата клавиша Enter (код 28).
 

Окошко работает нормально. Переходим к этапу ввода текста с клавиатуры.
Для того, чтобы узнать какая клавиша была нажата, в Blitz используются несколько функций. Нам подойдет функция WaitKey(). Эта функция останавливает работу программы до тех пор, пока не будет нажата клавиша, и возвращает код этой клавиши.


ВНИМАНИЕ !!! Существует стандартная таблица символов, в которой перечислены все символы и клавиши и их коды (называется ASCII). В Blitz есть своя такая таблица, но с другими кодами (Scancodes). Важно не перепутать к какой таблице обращается функция. Например: В таблице Blitz клавиша Esc имеет код 1, а в стандартной таблице (ASCII) клавиша Esc под кодом 27. Обе таблицы можно найти нажав на иконку «Домик» на панели управления среды Blitz. Затем нажимаем на ссылку «Command Reference». Слева в списке категорий найдете таблицs ASCII и Scancodes. Функция WaitKey работает с таблицей ASCII.
В нашу функцию после строки Flip добавляем код:
 

Теперь программа будет останавливаться на этой строке и ждать нажатия на клавишу. Код нажатой клавиши сохранится в переменной k.

Чтобы добавить нажатую клавишу к выводимой строке, допишем:

Текст функции на данный момент:

Запускаем и проверяем. Любая нажатая клавиша добавляется к нашей строке. Сразу заметьте, что при нажатии на клавиши, не содержащие букв или цифр, к строке добавляется какой-то квадратик. Дело в том, что, если к коду не прикреплен символ, то программа рисует квадратик. Это надо исправлять:

Посмотрев внимательно в таблицу кодов ASCII, заметим, что коды букв, цифр и спецзнаков лежат в диапазоне от 32 до 126. Воспользуемся этим и поставим условие на добавление символа к строке: Если код нажатой клавиши в диапазоне от 32 до 126, то …
Наша функция примет вид:
 

Вот теперь лишних квадратиков не появляется.
Теперь добавим возможность удалять символы из строки. Используем тот же способ проверки кода клавиши. Клавиша BackSpace имеет код 8. Для работы над строками нам понадобятся три функции Left(), Right(), Mid().

Left() – Возвращает указанное количество символов, начиная с начала строки.
Right() – Возвращает указанное количество символов, начиная с конца строки.
Mid() - Возвращает указанное количество символов, начиная с указанного символа.
Примеры по использованию этих функций смотри в справке Blitz.

Перед строкой Wend добавляем код:
 

Запускаем, проверяем. При нажатии на клавишу BackSpace, символы стираются с конца строки. Нам не хватает курсора!!! Сейчас будет. Только функция немного изменится. В качестве курсора будем использовать знак « | ». Чтобы курсор не становился частью строки, а только выводился на экран, я заранее ввел переменную View_Text$.
Еще нам понадобится переменная Cur_Pos – значение этой переменной будет содержать позицию курсора в строке. Управление курсором осуществляется клавишами влево и вправо, коды 31 и 30 соответственно.

СОВЕТ: Чтобы не искать код той или иной клавиши в таблице ASCII, создайте новый лист и наберите маленькую программку:

Эта программа выводит на экран код нажатой клавиши.

После доработки наша функция выглядит так:
 

Теперь Мы можем перемещать курсор по строке и удалять символы перед и после курсора, как во всех редакторах.
Перед дальнейшим улучшением нашей функции, оптимизируем уже имеющийся код.
Заменим наши условия оператором Case:
 

Так намного красивее, а главное - быстрее. В нашей программе разницу в скорости Вы не заметите, а в огромных проектах или играх разница существенна.

Для удобства добавим обработку клавиш Home и End, в начало или конец строки:

Надеюсь, что понятно, куда дописать эти строки.

Остался только один Bug. И этот недостаток заключается в том, что Строка в окошке может выходить за его пределы – это не хорошо, но исправимо.
Воспользуемся командой ViewPort(), которая ограничивает зону вывода на экран.
Добавив ограничение вывода на экран, получим окончательный вариант функции.
Вот текст всей программы вместе с последними добавлениями:
 

<К оглавлению>