伞齿轮切齿计算的BASIC程序设计