![]() |
|
||||||||
경고! 게시물 작성자의 사전 허락없는 메일주소 추출행위 절대 금지 |
|
심성현 [sim51177]
2011-06-11 17:16 X
수치해석 관련 자료를 찾아보세요.
내친김에... 제가 쓰는 코드도 뒤져 올립니다.
// 두 값 사이의 선형보간값 계산. t = 0 ~ 1 function Lerp(const start, stop, t : Single) : Single; begin Result:= start + (stop - start)*t; end; // 두 각 사이의 선형보간값을 계산. 단위는 라디안. const C_2PI = PI * 2; function NormalizeAngle(angle : Single) : Single; begin Result:=angle-Int(angle / C_2PI) * C_2PI; if Result>PI then Result:=Result - C_2PI else if Result<-PI then Result:=Result + C_2PI; end; function AngleLerp(start, stop, t : Single) : Single; var d : Single; begin start:= NormalizeAngle(start); stop := NormalizeAngle(stop); d:= stop-start; if d > PI then d:= -d - C_2PI else if d < -PI then d:= d + C_2PI; Result:= start + d*t; end; 관련 글 리스트
|
Copyright © 1999-2015, borlandforum.com. All right reserved. |