tilt = 20
start = quaternion()
delta = 15
speed = 1.0 / delta
for (rot = 0; rot <1440; rot += delta){
  x = sin(rot)
  y = cos(rot)
  q = quaternion({@x @y 0},@tilt)
  orientation = q * start
  moveto @speed quaternion @orientation
  }
moveto @speed quaternion @start