let j = 2 for i = 221 to 0 step j * -1 for k = -3.14 to 3.14 step .01 dot 221 + i * sin(k), 222 + 221 * cos(k) dot 221 + 221 * sin(k), 222 + (i - 1) * cos(k) wait next k let j = j + 1 next i