#!/bin/sh
# dec2oct --  decimal to octal conversion.
#

(D=$1;o=400;d=256;until [ $d = 0 ]; do { d=$[$d/2];o=$[$o/2];[ $o = 5 ]&&o=4;[ $o = 50 ]&&o=40;[ $[$D-$d] -ge 0 ]&&{ D=$[$D-$d];O=$[$O+$o]; }; };done;echo $O)
