С какой игры начать? Опции

[Гелла]

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

[Lapp]

Гелла, постарайся быть все же поактивнее! Тебе накидали столько проектов - хоть бы в один ткнула пальцем наугад.. Мне придется сделать выбор за тебя

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

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

Код реализует движение символа по экрану. Символом можно управлять, нажимая клавиши i,j,k,m. Выбор клавиш почти случаен - просто я не хотел сразу делать стрелки, чтобы не запутывать ученицу (стрелки производят двойные коды). Скорость движения символа постоянная, меняется только направление. При натыкании на стенку игра заканчивается.

Где же тут змейка? Очень просто: это только ее голова пока . Чуть позже мы добавим звенья, из которых состоит тело. Змейка будет расти при поедании пищи, будет выводиться ее длина, время игры, результаты будем записывать в файл, так что можно будет соревноваться.

Я не стал помещать много комментариев в код, поскольку наверняка будут сложности с русскими буквами (не у всех, так у многих). Вот подробные пояснения.

Декларируем использование модуля CRT для работы с текстовым экраном.
Далее определяем некоторые числовые значения.
Но сначала условимся о названиях: x - горизонтальная координата, y - вертикальная (отсчет начинается из левого верхнего угла, точка (1,1) )
Введем еще и следующее соглашение: буква n в имени переменной означает Min (например, xn), а буква x - Max (например, yx). Таким образом, в строчках с 6 по 9 мы определяем границы экрана.
Далее определяем символ для вывода головы змейки.
Теперь задержка. Ее величиной можно регулировать скорость движения змейки по экрану.
А потом задаем начальное положение змейки и ее направление движения.

Наконец, сама программа.
Сначала чистим экран и инициализируем координаты змейки.
Потом начинаем основной цикл, который продолжаем, пока координаты змейки не выходят за пределы нашей области.
Стираем старое положение символа.
Рисуем символ в новом положении.
Перекладываем новые координаты в старые.
Ждем некоторое время, иначе символ будет бегать слишком быстро.
Если нажата клавиша, читаем ее.
Если это был управляющий символ - производим изменение направления движения.
Вычисляем новое положение змейки.
Идем в начало цикла...

{snake-01}
uses
  CRT;

const
  xn=1;      {Left screen limit}
  xx=80;     {Right screen limit}
  yn=1;      {Top screen limit}
  yx=25;     {Bottom screen limit}
  H='8';     {Snake head}
  dt=500;    {Delay}

var
  x0:integer=xn;          {Snake location}
  y0:integer=yx div 2;
  vx:integer=1;           {Snake direction}
  vy:integer=0;

var
  x,y:integer;            {New snake location}
  c:char;

begin
  ClrScr;
  x:=x0;y:=y0;
  while (x>=xn)and(x<=xx)and(y>=yn)and(y<=yx) do begin
    GoToXY(x0,y0);Write(' ');
    GoToXY(x,y);Write(H);
    x0:=x;y0:=y;
    Delay(dt);
    if KeyPressed then begin
      c:=ReadKey;
      case c of
        'i':begin vx:=0;vy:=-1 end;
        'm':begin vx:=0;vy:=1 end;
        'j':begin vx:=-1;vy:=0 end;
        'k':begin vx:=1;vy:=0 end;
      end;
    end;
    Inc(x,vx);Inc(y,vy);
  end
end.

Программу я проверял в FPC, все работало.
Рекомендую сохранять каждую версию в своем файле с соответствующем номере. Например, эту программу сохрани в файле snake-01.pas . Потом в процессе доработки номер версии будет увеличиваться. exe-файлы (а также обжекты) лучше уничтожать, чтоб не загаживать диск, а вот паскалевский текст лучше сохранять.
Можешь поэкспериментировать, сама попробовать развить идею дальше, для этого лучше сделай отдельный файл.

Давай сюда все свои вопросы - как по технике программирования, так и по идеологии. Или просто типа "а это че??"
Ну а потом, живы будем - продолжим..

[XRumerTest]

Hello. And Bye.