Turbo Pascal – обучающая программа в графике
Наткнулся в архивных завалах на несколько любопытных (для студентов) вещей, когда-то написанных на Turbo Pascal’е с целью получения дополнительного заработка…
Первая из этих вещей — “обучалка”, программа для контроля знаний по культуре речи. То есть не совсем полноценная обучалка, а просто проверялка. Но проверялка по меркам Turbo Pascal и студенческого программирования достаточно навороченная:
- ГРАФИЧЕСКИЙ режим работы, анимация элементов интерфейса;
- объектно-ориентированное программирование;
- работа с файлами и принтером;
- подключаемые модули;
- реализация текстового ввода ответов в графическом режиме;
- при работе программы используется типизированный файл данных (в нем просто так никто не подсмотрит правильные ответы), также прилагается конвертер заданий из текстового файла в файл данных программы.
Скриншоты:
Заставка при запуске
Главное меню
Проверка знаний
Результаты контроля
Скачать архив с программой и исходниками.
Будет полезно изучающим Turbo Pascal, а также если просто нужно сдать обучалку для зачета. С минимальными переделками или даже без них программа может быть адаптирована для проверки знаний по любому предмету и любой теме. Требуется лишь исправить содержимое текстовых файлов; при исправлении тестовых заданий еще потребуется отконвертировать текстовый файл заданий в типизированный файл, который использует программа. Заморочка с конвертированием — только в целях хотя бы условной безопасности: чтобы особо умные студенты не подглядывали правильные ответы, просто открыв на просмотр файл данных программы. Кто захочет — пусть сделает еще и шифрование файла данных.
ЗЫ. Напоминаю: для корректного оборажения кириллицы нужно прописать в файле autoexec.nt запуск русификатора (например, keyrus или аналогичного; можно также использовать встроенный в WinXP kb16 с параметром ru). Вообще если вы работаете с графикой в Турбо Паскале, то русификатор скорее всего у вас уже будет прописан, и вы в курсе, как это делается.
ЗЗЫ. В операционных системах Windows x64 (64-битных) программа не запустится (точно так же, как не запустится и сама инструментальная оболочка Turbo Pascal), ибо в этих системах не поддерживаются старые 16-разрядные приложения под DOS. Выход — использовать виртуальную машину (например, VirtualBox) с виртуальной 32-разрядной операционной системой, умеющей работать с 16-разрядными DOS-приложениями (Windows XP x86 или более старая Windows, вплоть до “голого” DOS). Еще можно найти 32-разрядный компилятор Паскаля, который бы умел использовать графику (иначе говоря, имел бы свои подключаемые модули взамен используемых Турбо Паскалем) и перекомпилировать в нем программу и ее модули. Модули Турбо Паскаля от рождения такие же 16-разрядные, как и вся инструментальная оболочка. Поэтому нужно либо их также пересобирать (перекомпилировать) в 32-bit, либо использовать аналогичные модули от другого разработчика (если вдруг они есть). 64-разрядные компиляторы для Паскаля мне лично не попадались, но если вдруг и они в природе существуют, то вполне можно использовать. Ну и если все это кажется слишком сложным, то проще всего на время учебы пользоваться старой доброй Windows XP x86 (32 bit), потому что проблемы с необходимостью запускать старые досовские программы будут возникать регулярно.