Могу вам облегчить задачу
В PASCAL есть целый тип, позволяющий обрабатывать битовые маски (спрайты). Можно сохранять два спрайта в памяти и последовательно их выводить, вычисляя координаты по нажатию управляющей клавиши. Прыжок можно реализовать выводом инверсного спрайта на старом месте и прорисовкой его на новом, отслеживая координаты спрайта.
При этом вам не нужно будет писать сложные многострочные внешние модули