Кривая Безье (2д - квадратичная)

  1. REM Основные данные функции БЕЗЬЕ
  2. 10 X1=23:Y1=200
  3. 20 X2=150:Y2=137
  4. 30 XP=99:YP=32
  5. REM Стартовые даннные для рисования
  6. 40 POSX=X1:POSY=Y1
  7. 50 N=10
  8. REM Цикл рисования линии БЕЗЬЕ
  9. 60 FOR T%=1 TO N
  10. 70 TT=T%/N
  11. 80 X=X1*((1-TT)^2)+XP*2*TT*(1-TT)+X2*(TT^2)
  12. 90 Y=Y1*((1-TT)^2)+YP*2*TT*(1-TT)+Y2*(TT^2)
  13. 100 DRAWLINE POSX,POSY,X,Y
  14. 110 POSX=X:POSY=Y
  15. 120 NEXT T%
  16. REM Вывод на экран результата
  17. 130 REPAINT:SLEEP 5000
  18. 140 END
Этот код рисует кривую Безье квадратичным методом. Может пригодиться для описания криволинейного движения спрайта и для прочих ваших фантазий.
Координаты Х1,У1 и Х2,У2 позиционируют обычную вначале и конце соответственно.
Координата ХР, УР - указывает направление и степени искривления линии.

Реклама

Мы в соцсетях

tw tg yt gt