macro for shell shape with fill mesh.

I wonder If somebody help me with this issue:

make a shell form using corel x5 and macro .

The steps will be : 

- make one rectangle ;

- resize the base and align handlers ;

- add mesh fill and make all setups;

- add colors to mesh;

Something like this image.