forum.boolean.name - Помогите шарик который отскакивает от стенок!!

forum.boolean.name (http://forum.boolean.name/index.php)

- Основной форум (http://forum.boolean.name/forumdisplay.php?f=49)

- - Помогите шарик который отскакивает от стенок!! (http://forum.boolean.name/showthread.php?t=9746)

JACUK

05.11.2009 13:38

Помогите шарик который отскакивает от стенок!!

Подскажите как мне реализовать шарик который бьется об стенки и летит в противоположную сторону???? Пробовал сравнениям х и у с координатами ширины и высоты а далее в зависимости от резеультата х=х-1,у=у-1 или х=х+1,у=у+1!!

odd	05.11.2009 13:57

Ответ: Помогите шарик который отскакивает от стенок!!

Лучше делать примерно так:

PHP код:


		
			
Program ball;

var x, y, d, dx, dy: integer;

begin

x:=0; y:=0; d:=10; dx:=3; dy:=3;

repeat

x:=x+dx; y:=y+dy;

if ((x < 0) OR (x > GetWidth - d)) then dx:=-dx;

if ((y < 0) OR (y > GetHeight - d)) then dy:=-dy;

SetColor(255, 255, 255);

FillRect(0, 0, GetWidth, GetHeight);

SetColor(0, 0, 0);

DrawEllipse(x, y, d, d);

Repaint;

Delay(50);

until false;

end.

Часовой пояс GMT +4, время: 19:10.