IFS=
y=$[17-++z]
x=-15
a=${a//[^*]/((++x));}
eval ${a//\*/'b[~(y<0)*-2000-x++*99/(y?y:1)]="($x, $y)
";'}read a&&. *||echo "${b[*]}"