setrotate with drawtext

BlitzMax Forums/BlitzMax Beginners Area/setrotate with drawtext

Graphics 640,480,0
repeat
	Cls
	ang:+1
	SetRotation ang
	text$ = "A Spinning String of TEXT"
	SetHandle(TextWidth(text$)/2,TextHeight(text$)/2)
	DrawText text$,MouseX(),MouseY()
	Flip
Until KeyHit(KEY_ESCAPE)