从位置获取螺旋索引

帕斯卡代码：

if y * y >= x * x then begin  p := 4 * y * y - y - x;  if y < x then    p := p - 2 * (y - x)endelse begin  p := 4 * x * x - y - x;  if y < x then    p := p + 2 *(y - x)end;

说明：左上半对角线（0-4-16-36-64）包含平方的层号（4*layer^2）。外部if语句定义层并在左上半平面的相应行或列中找到位置的（预）结果，而内部if语句则为镜像位置校正结果。