END{while(n<512){m="-";for(i=9;i;m=m substr("xwr-",and(n,2^--i)?i%3+1:4,1));printf"%04o is %s\n",n++,m}}