你需要的函数是什么语言的函数?下面给你 C 和 VB 的函数 rotation() 供参考。
C 函数和例子:
#include
#include
void rotation(float xo,float yo, float x0,float y0,float angle,float *x1, float *y1)
{
angle=angle/180*3。
1416;
*x1=xo+x0*cos(angle)-y0*sin(angle);
*y1=yo+y0*cos(angle)+x0*sin(angle);
return;
}
void main()
{
float xo,yo,x0,y0,angle,x1,y1;
xo=1; yo=1; x0=2; y0=2; angle=45;
rotation(xo,yo,x0,y0,angle,&x1,&y1);
printf("%f, %f",x1,y1);
return;
}
VB 函数和例子:
Private Sub rotation(xo As Single, yo As Single, x0 As Single, y0 As Single, angle As Single, x1 As Single, y1 As Single)
angle = angle / 180 * 3。
1416
x1 = xo + x0 * Cos(angle) - y0 * Sin(angle)
y1 = yo + y0 * Cos(angle) + x0 * Sin(angle)
End Sub
Private Sub Command1_Click()
Dim xo As Single, yo As Single, x0 As Single, y0 As Single, angle As Single, x1 As Single, y1 As Single
xo = 1
yo = 1
x0 = 2
y0 = 2
angle = 45
rotation xo, yo, x0, y0, angle, x1, y1
Print x1, y1
End Sub。
。