Hi All, my first post (question) I hope I followed the guide properly.
I want to simulate a geometric lathe. I want the curve to show the plotting of DrawPoint (x, y, color) on the canvas as it is being calculated like in the old IBM-PC PSET (X, Y), also need to control the speed it plots, this way children can follow how the geometric function is being generated. The code below plots the final curve after the loop ends. Appreciate any suggestion on how to simulate this plotting with a controlled speed.
I want to simulate a geometric lathe. I want the curve to show the plotting of DrawPoint (x, y, color) on the canvas as it is being calculated like in the old IBM-PC PSET (X, Y), also need to control the speed it plots, this way children can follow how the geometric function is being generated. The code below plots the final curve after the loop ends. Appreciate any suggestion on how to simulate this plotting with a controlled speed.
B4X:
Sub Button1_Click
Private a As Double
Private x, y,r,s,n As Int
r = 275
s = 125
n = 10
For a = 0.1 To 20 * 3.141596 Step 0.001
x = Round2((r) * Cos(a) + (s) * Cos(n * a) + 610, 0)
y = Round2((r) * Sin(a) + (s) * Sin(n * a) + 710, 0)
cvsActivity.DrawPoint(x, y, Colors.Yellow)
Next
End Sub