Автомобиль

[gazon]

Автомобиль

Нарисуйте небольшое изображение автомобиля в левой части экрана и передвиньте
его вправо до конца экрана, используя способ наложения NormalPut. А затем сдвиньте
его сверху вниз, используя способ наложения XORPut. Добавьте к рисунку элементы
пейзажа, используя движущиеся объекты по своему усмотрению (например, восходящее
солнце).

 

[Vladimir_S]

Gazon, вчера, помнится, вот в этой теме, сославшись на свою записку, я обратил Ваше внимание на необходимость в обязательном порядке при подобных запросах указывать язык программирования. Вы это дело проигнорировали и снова выкладываете задачки без указания ЯП.
Так вот, предупреждаю - если это будет продолжаться, разговор перейдет в иную плоскость, чего, поверьте, мне бы очень не хотелось.

Ваш Vladimir_S - в данном случае модератор.

 

[Rossomaxa]

А уже было подумал, что это какой-то психологический тест )

 

[gazon]

В ПАСКАЛЕЕЕЕЕЕЕ

 

[AlexZir]

В каком Pascal-е? В разных реализациях используются различные подходы к работе с графикой, поэтому потрудитесь назвать среду, в которой вы работаете, это существенно облегчит наше взаимопонимание.

Пока ответа нет, предлагаю описание необходимых функций для Borland Turbo Pascal.

Естественно, что все операции осуществляются в графическом режиме.
Вначале вам нужно определиться с переменными для работы с рисунками, хранящимися в памяти.
Pointer; определение переменной, используемой в качестве бестипового указателя для работы с участком памяти.
Затем рисуете в обычном режиме автомобиль. После определяете координаты прямоугольного участка экрана, в котором выведен рисунок и распределяете под него место в памяти.
Size:=ImageSize(x1,y1,x2,y2); определяет размер изображения в точках.
GetMem(P,Size); - распределяет память в куче для хранения битового изображения.
Потом в выделенную под рисунок память копируете спрайт и выводите его в указанное место с указанным режимом.
GetImage(x1,y1,x2,y2,P^); копирует в выделенный участок памяти изображение с экрана (спрайт)
PutImage(x3,y3,P^,NormalPut); выводит рисунок в указанное место с указанным режимом (их несколько - наложение, перекрытие, исключение и др.).
Более подробно - в справке, вызывается она нажатием кнопки F1 в окне среды программирования. Особое внимание прошу обратить на изучение справки по функциях и процедурам модуля graph

 

[gazon]

Pascal AAAAABBBBBBCCCCCCCC

 

[AlexZir]

AAAAABBBBBBCCCCCCCC

Мне такая реализация неизвестна, потрудитесь уточнить версию.

 

[AlexZir]

Функции модуля ABCGraph^ Описание языка PascalABC.NET