寻找大富翁“kypansky”，寻找“生份证号码生成算法”(100分)

急需该算法，经搜索，发现kypansky大侠曾发布该算法，不过是七月份的事情了，
如果kypansky大侠看见，能否把算法发到邮箱：bjapkcyf@126.com
或者其他高手看见，也请赐教。谢谢。。。。。。。。。。。。。。。
（注：要的是号码生成算法，不是15位号码升级18位的算法）

15位身份证号码= AA + BB + CC + YYmmdd + NNN
AA： 省份编码
BB： 省地区编码
CC：地级县（市）编码
YYMMDD：6位出生年月日
NNN：序号（同一地区出生年月日相同的人),以户主为准，奇数 = 男，偶数=女且女=男+1
18位编号=升15位号码的年2位到4位，最后在末位加校验码（数字1-10，1至9直接用，10用X代）。校验算法你应该已经有了。你所需要的是找个以上编码的数据字典了。

地区编码这里有，但是没有办法传上来
这里下
http://www.delphibbs.com/keylife/iblog_show.asp?xid=26174