Turn points arround the center by x degrees?

Blitz3D Forums/Blitz3D Programming/Turn points arround the center by x degrees?

Like this ?

Graphics 640, 480, 32, 2
SetBuffer BackBuffer()

Global Cx# = 300
Global Cy# = 200

While Not KeyHit(1)

	Angle = Angle + 1

	;the center of the coordinate system
	Plot Cx, Cy
	
	;these variables are the coordinates of the line,
	;hich needs to be turned arround the center of
	;the coordinate system
	x1 = -50
	y1 = 80
	x2 = 50
	y1 = 80
	;(they can be ANYTHING besides this)

	p1x = Cx + x1 * Cos( Angle ) + y1 * Sin( Angle )
	p1y = Cy + y1 * Cos( Angle ) - x1 * Sin( Angle )
	p2x = Cx + x2 * Cos( Angle ) + y2 * Sin( Angle )
	p2y = Cy + y2 * Cos( Angle ) - x2 * Sin( Angle )
			
	;just draw it
	Line p1x, p1y, p2x, p2y
	Flip
	Cls
Wend
End