Object pascal, Какую тему выбрать? Опции

[cooler]

Не подскажете какую тему выбрать для разработки объектно- ориентированной программы?
Нужно в общем создать какую-нибудь программу с перспективой перенесения её в Delphi.
Стандартные темы нам предложили не так уж что бы интересные: шашки, дурак, типа озера с щуками чё то.
Может кто подскажет что-нибудь поинтереснее. Нужно в общем, что бы наследование было, описать свойства и т.п
Я вообще то футболом увлекаюсь, но сомневаюсь, что здесь можно что- то придумать связанное с этим.....

[volvo]

Добавляешь параметр в метод print_info...

procedure TFootballer.print_info(i: integer);
var
  a,b:string;
  key:char; { <--- Вот это тебе зачем? }
begin
  str(coeff,a);
  str(age,b);
  xx:=0; yy := pred(i) * textheight('W') + 5;
  outtextxy(xx,yy,s_position[code_position]);
  outtextxy(xx+25,yy,name);
  outtextxy(xx+135,yy,a);
  outtextxy(xx+180,yy,'(age ');outtextxy(xx+215,yy,b);
  outtextxy(xx+230,yy,')');
end;

procedure TTeam.test_print;
var i: integer;
begin
    for i := 1 to players do
      squad[i]^.print_info(i);
end;

... и все в порядке...

А вообще - ты лучше сразу приведи код в порядок, иначе потом не разберешься в том, что делаешь... Не надо заранее описывать переменные, и пользоваться переменными, которые описаны выше по тексту программы. Вообще, в идеале, переменная должна иметь как можно меньшее "время жизни", для чего описываться она должна локально, как можно ближе к тому месту, где используется. Например:

var
  i: integer;

type
  T = object
    j: integer;

    procedure P;
  end;

...
procedure T.P;
var k: integer;
begin
  {
    здесь использовать для локальных расчетов переменную i или j - это очень
    плохой тон... Если результаты вычисления не должны использоваться в
    других методах (это КРАЙНЕ нежелательно, потому что программа получается
    запутанной и при изменении одного метода могут быть многочисленные
    побочные эффекты), то пользуйся ЛОКАЛЬНОЙ переменной k
  }
end;

(небольшое отклонение от темы, но я думаю оно будет полезно)

У тебя же вычисления "местного значения" (я про текущую позицию по X) почему-то производятся с использованием переменной, описания которой я не вижу. Посему можно предположить, что и в каком-нибудь другом месте у тебя будет соблазн использовать эту же переменную, а вдруг ты забудешь ее обнулить или еще как-то инициализировать? Результат - потратишь очень много времени на отладку, потому что в зависимости от порядка вызова методов будешь получать разные результаты...