Разделить треугольник на 2

[d3drm]

Кто-нибудь подскажет алгоритм деления треугольника так, чтобы в рузельтате получить 2 треугольника с плоским дном и верхом?

[d3drm]

вот небольшая иллюстрация к тому, что мне нужно...

[Морфий]

задай функцией прямую (p0;p1) и прямую (p2;x) — горизонтальная и ищи точку пересечения, чтобы определить координаты точки x.

[d3drm]

ты хоть сам понял что сказал?

[Bonesnapper]

из этого найдешь прямую (р0,р1)
р0.y=k*р0.X+b
р1.y=k*р1.X+b

прямая (р2,х)
далжна быть такой наверно
y=p2.y
следовательно надо прямую (ее уравнение) (р0,р1) приравнять к р2.у

[SHURUP]

Код: Выделить всё

(X  - X0)   (Y  - X0) 
--------- = ---------
(X1 - X0)   (Y1 - Y0)

         _П_
         \ /
          V

     (X1 - X0)*(Y  - Y0)
X =  -------------------
          (Y1 - Y0)

Y = Y2
Демонстрация: размести на форме НЕГОРИЗОНТАЛЬНЫЙ Line1, и копипасть код:

Код: Выделить всё

Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Cls
With Line1
    MyX = (.X1 - .X2) * (Y - .Y2) / (.Y1 - .Y2) + .X2
Line (X, Y)-(.X1, .Y1)
Line (X, Y)-(.X2, .Y2)
If (Y >= .Y1 And Y <= .Y2) Or (Y <= .Y1 And Y >= .Y2) Then
    Line (X, Y)-(MyX, Y)
End If
End With
Circle (MyX, Y), 20, vbRed
End Sub


[d3drm]

[quote="SHURUP"][code](X - X0) (Y - X0)
--------- = ---------
(X1 - X0) (Y1 - Y0)

_П_
\ /
V

(X1 - X0)*(Y - Y0)
X = -------------------
(Y1 - Y0)[/code]
Y = Y2
Демонстрация: размести на форме [color=red]НЕГОРИЗОНТАЛЬНЫЙ[/color] Line1, и копипасть код:

Код: Выделить всё

Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Cls
With Line1
    MyX = (.X1 - .X2) * (Y - .Y2) / (.Y1 - .Y2) + .X2
Line (X, Y)-(.X1, .Y1)
Line (X, Y)-(.X2, .Y2)
If (Y >= .Y1 And Y <= .Y2) Or (Y <= .Y1 And Y >= .Y2) Then
    Line (X, Y)-(MyX, Y)
End If
End With
Circle (MyX, Y), 20, vbRed
End Sub


[/quote]


Спасибо =)

[d3drm]

[off]Почему компиляция bbcode не работает?[/off]

[GSerg]

Видать ты галку поставил - отключить в этом сообщении bbcode?

[Faust]

Насколько я понял, эта тема является продолжением http://bbs.vbstreets.ru/viewtopic.php?t=14497. Я вот потупил над поставленным вопросом, и вот что придумал:

[Faust]

Это, правда, для целочисленных координат - речь ведь шла о массиве.

[d3drm]

GSerg, все верно, только галку я не ставил, поетому и конфуз такой вышел.

Faust, код скачал из лички, как уже говорил, чуть позже подробнее напишу, что об этому думаю. А может и не напишу, все мои старания выходят на смарку - делал динамические тени в DX, но DX подыхает на редактировании текстур, причем бузбожно - умирает уже при зоздании 10 текстур 64х64, так что никакая оптимизация тут уже не поможет