rotate,scale a line

Blitz3D Forums/Blitz3D Programming/rotate,scale a line

Fuller

(Posted 2006) [#1]

I want to rotate a line around a point and be able to increase or decrease the size of the line. I've tried this and can't get it working very well... preferably 3d but 2d is good

Help!

kevin8084

(Posted 2006) [#2]

Is this what you're asking for?

Graphics 800,600

x=400
y=300
linelength=50
While Not KeyHit(1)

Line x,y,x+Cos(time)*linelength,y+Sin(time)*linelength
time=time+1
If time>360 Then time=0

Cls
Wend
End

or, perhaps,

Graphics 800,600

x=400
y=300
linelength=50
While Not KeyHit(1)
Line x-Cos(time)*linelength,y-Sin(time)*linelength,x+Cos(time)*linelength,y+Sin(time)*linelength

time=time+1
If time>360 Then time=0

Cls
Wend
End