function C=Zlevelset_color(k)

if (k==1000)
    C(1)=255;
    C(2)=0;
    C(3)=0;
end

if (k==2000)
    C(1)=0;
    C(2)=255;
    C(3)=0;
end

if (k==3000)
    C(1)=0;
    C(2)=0;
    C(3)=255;
end

if (k==4000)
    C(1)=255;
    C(2)=255;
    C(3)=0;
end

if (k==5000)
    C(1)=255;
    C(2)=0;
    C(3)=255;
end

if (k==6000)
    C(1)=0;
    C(2)=255;
    C(3)=255;
end

if (k==7000)
    C(1)=128;
    C(2)=0;
    C(3)=0;
end

if (k==8000)
    C(1)=0;
    C(2)=128;
    C(3)=0;
end

if (k==9000)
    C(1)=0;
    C(2)=0;
    C(3)=128;
end

if (k==10000)
    C(1)=128;
    C(2)=128;
    C(3)=0;
end

if (k==11000)
    C(1)=128;
    C(2)=0;
    C(3)=128;
end

if (k==12000)
    C(1)=0;
    C(2)=128;
    C(3)=128;
end

if (k==13000)
    C(1)=255;
    C(2)=128;
    C(3)=128;
end

if (k==14000)
    C(1)=255;
    C(2)=128;
    C(3)=0;
end

if (k==15000)
    C(1)=255;
    C(2)=0;
    C(3)=128;
end

if (k==16000)
    C(1)=128;
    C(2)=255;
    C(3)=128;
end

if (k==17000)
    C(1)=128;
    C(2)=255;
    C(3)=0;
end

if (k==18000)
    C(1)=0;
    C(2)=255;
    C(3)=128;
end

if (k==19000)
    C(1)=128;
    C(2)=128;
    C(3)=255;
end

if (k==20000)
    C(1)=128;
    C(2)=0;
    C(3)=255;
end

if (k==21000)
    C(1)=0;
    C(2)=128;
    C(3)=255;
end         