수치지형도에서 z값(높이)에 따른 칼라변화

수치지형도에서 z값(등고높이)에 따른 layer변환을 하고싶은데 lisp이 있는지요 있음 공유부탁드립니다.

예) X=225000 Y=225000 Z=1700 이면 layer=1700
X=225000 Y=225000 Z=1750 이면 layer=1750
이런식으로 Z값과 layer값이 변화하면 좋겠네요.