Бильярд в Visual Basic

[Айвика]

Привет!


Совершенно я не программист, но тут задали написать программку на поведение бильярдного шара (одного).

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

Теперь как-то нужно довести эту прямую до любой границы отскочить от нее и пойти в другую сторону по закону полного отражения...

Как найти точку пересечения с границей, если граница не задается уравнением с коэффициентом наклона?

[FullVenic]

Могу помочь но я думаю ето ничего не стоит. Не знаю как на VisB но на блитз бейсик ето будет типо такого : шірина длина стола напр 800 на 400 рамка комнаты - хоть не знаю как ето сделать. создать кий, изображения, и тд. выбрать силу кия если кий ударил в мяч то он отлетает если мяч врезался в стенку то изменить скорочть мячя и перенаправить его... если мяч попал в лунку то удалиьт мяч и Количевство забитых шаров = количевство забитых шаров + 1.
енд

[KobolD]

Сообщение от Айвика

Привет!
Как найти точку пересечения с границей, если граница не задается уравнением с коэффициентом наклона?

Шар движется по прямой y=kx+с пересекает вертикальные борты при х=0 либо х=1000, горизонтальные соответственно при y=0 и y=500 (для стола 1000 на 500).
То есть если ты знаешь коэф К и С плюс направление в каком катится шар, например 1-если слева на право и -1 если справа налево, то проверяешь условия до какой границе катиться ближе.
Если (К >0 и Направление =1)
то шар ударится либо об верхний либо об правый борт
Чтобы определить борт об который он ударится надо подставить в уравнение прямой по которой катится шар у = 500 и посчитать икс.
если икс получится больше 1000 то он ударится об правый борт.

У тебя должны получится четыре проверки на направление, каждая из которых содержит проверку до какого борта катиться ближе.

[Айвика]

Спасибо Большое!