wrapping parameters around a reparameterised circle

I have a set of points inferred from intersecting polar arrayed surfaces with a circle...

If I want to move points around the circle ... can I wrap their parameter values around the 1 - 0 range?

or

Am I going to have to rotate the polar array around to get new points reliably?

I keep trying to move points around reparameterised circles .. but every time it's unreliable I get odd results in my data (see the odd lofted surface in the picture)

As soon as the parameter goes out of the 0 - 1 range thing go wrong... Is there a way to wrap the parameter data?

e.g.

with VB.NET... thius didn't work.. is it because A is an object not an integer?... how do you change that if so?

Private Sub RunScript(ByVal x As Integer, ByVal y As Object, ByRef A As Object)
    'declare res as variable
    Dim res As Integer

    If      x >= 1 Then
      res = (x - 1)
    Else
      res = X
    End If
    A = res

I tried using seam... but I can't really see how that would do it.

This does my nut in every time