求一份关于声波测距模块的代码，为了这个我已经忙活一个月了。

我本人不是学电子专业的，这个是业余爱好，我是准备送给别人一个礼物，眼看时间差不多快到了，现在还有一个声波测距模块没有写出代码来，我的基础不是很好，所以在这里求一份代码，希望好心人帮帮忙！
我想要实现的功能：将声波测距模块测得的距离以10进制的数据形式显示到数码管中。
我的设备概况如下：
超声波模块（HC-SR04）：VCC\GND接好后，Tring引脚接P1.0 Echo引脚接P1.1
数码管（CL3641AH）：共2组，8位数。
138译码器：（这是板子上已经自带的定义） sbit LSA=P2^2; sbit LSB=P2^3; sbit LSC=P2^4;
单片机：89C52RC
希望求一套较为完整的代码，真的感激不尽，可以适当酬劳，但是本人学生，做这个纯粹是为了送人，所以还望见谅。谢谢各位！