Графический режим в pascal

[Fisgard]

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

Подскажите знающие, что тут не работает? Сразу говорю, код не мой, но в теории, насколько я просмотрел должен работать, однако ничего не происходит при нажатии клавиш...
Извините за наглеж, спасибо!

uses crt,graphABC;
var c:char;
    s:string;
    h:integer;
begin
clrscr;
s:='12345678900987654321';
textout(80,20,'Стрелка вверх-крупнее, стрелка вниз-мельче, Esc-выход');
h:=20;
SetFontSize(h);
textout(20,windowheight div 2,s);
repeat
if keypressed then
 begin
  c:=readkey;
  case c of
  #72:begin
      clrscr;
      h:=h+random(8)+1;
      SetFontSize(h);
      textout(20,windowheight div 2,s);
      end;
  #80:begin
      clrscr;
      h:=h-(random(8)+1);
      SetFontSize(h);
      textout(20,windowheight div 2,s);
      end;
  #27:exit;
  end;
 end;
until c=#27;
end.

[ZX Spectrum-128]

Изначально стрелка рисуется и все?
Размер не меняется?

[Fisgard]

При нажатии клавиш (стрелок, esc) просто совсем ничего не происходит. Программа не реагирует на твои действия, хотя код это вроде как предполагает.

[Serge_Bliznykov]

проверил ваш код в Pascal ABC (версия 3.0.1.35)
всё работает нормально.

а Вы в каком Паскале код проверяли?!

[Fisgard]

Pascal ABC, версия 2.1 (сборка 635). В этом может быть дело? Значит надо обновлять. Еще раз спасибо Вам!

[Serge_Bliznykov]

ну, попробуйте обновиться, не исключено, что дело может быть и в этом.

p.s. а расскажите, у Вас программа запускается?
Появляется приглашающая надпись (Стрелка вверх-крупнее, стрелка вниз-мельче, Esc-выход)?
После нажатия на любую клавишу экран очищается и появляется сктрока '12345678900987654321' ?
и только потом на нажатия не реагирует?
или как-то по другому всё проявляется?

и ещё. попробуйте в отладчике по F8 пройтись, что отладка показывает?

[Fisgard]

Serge_Bliznykov Дело в том, что глянув откуда я качал (http://pascalabc.net/ssyilki-dlya-skachivaniya) это почти последняя версия. Сейчас попробую, но думаю, что толку мало будет, наверное имеется у Вас ввиду английйская версия?

[Serge_Bliznykov]

ещё раз повторю - расскажите, как именно у Вас работает программа.
Пошагово. Детально.
Без этого оценить, что у Вас поломалось - сложно!

Код программы нормальный, рабочий, следовательно, проблема у Вас на компе!

[Poma][a]

Паскаль у Вас, по Вашим словам, АБЦ..
А даете Вы ссыль на АБЦ.НЕТ..
Это два совершенно разных компилятора..
Пора определиться..

[Serge_Bliznykov]

Сообщение от Poma][a

Паскаль у Вас, по Вашим словам, АБЦ..
А даете Вы ссыль на АБЦ.НЕТ..
Это два совершенно разных компилятора..
Пора определиться..

Точно!! Вы правы! Спасибо за уточнение!

У меня закрались смутные подозрения, когда я программу из другой темы TC в PascalABC засунул, а он её компилировать отказался.

PascalABC уродец, но хоть какое-то отношение к стандартному Паскалю имеет, а PascalABC.NET уже к .NET языкам ближе, помесь какая-то...