根据该插补软件框图(参见http://www.busnc.com/ly/zhudian/yuanhchabu.htm)，编制出逐点比较法第一象限逆圆插补汇编语言源程序（本程序指令系统采用MCS8031，仅供参考）：

ＲＰ：ＭＯＶ　ＳＰ，＃６０Ｈ          

　　ＭＯＶ　４ＡＨ，＃００Ｈ  Ｆ单元清零

　　ＭＯＶ　４９Ｈ，＃００Ｈ

　　ＭＯＶ　４８Ｈ，＃０１Ｈ　Ｘ电动机初始化

　　ＭＯＶ　４７Ｈ，＃０２Ｈ　Ｙ电动机初始化

　　ＭＯＶ　ＤＰＴＲ，＃００３０Ｈ

　　ＭＯＶ　Ａ，＃０３Ｈ　　　ＸＹ电动机上电

　　ＭＯＶＸ　@ＤＰＴＲ，Ａ

　　ＣＬＲ　Ｃ　　　　　　　　计算终判值

　　ＭＯＶ　Ａ，５２Ｈ　　　　低位Ｘ、Ｘe相减，得a

　　ＳＵＢＢ　Ａ，４ＥＨ

　　ＭＯＶ　５４Ｈ，Ａ　　　　保存结果于终判值单元低位字节

　　ＭＯＶ　Ａ，５１Ｈ　　　　高位Ｘ、Ｘe相减，得b

　　ＳＵＢＢ　Ａ，４ＤＨ 

　　ＭＯＶ　５３Ｈ，Ａ   　　 保存结果于终判值单元高位字节

　　ＣＬＲ　Ｃ            　　低位Ye、Y相减，得c

　　ＭＯＶ　Ａ，４ＣＨ　　

　　ＳＵＢＢ　Ａ，５０Ｈ　

　　ＭＯＶ　２０Ｈ，Ｃ　　　　暂存Ye、Y低位相减产生的借位位

　　ＡＤＤ　Ａ，５４Ｈ　　　　计算d=a+c，d为低位终判值

　　ＭＯＶ　５４Ｈ，Ａ　　　　保存d于终判值单元低位字节

ＭＯＶ　２１Ｈ，Ｃ　　　　暂存d=a+c产生的进位位

ＭＯＶ　Ａ，４ＢＨ　　

ＭＯＶ　Ｃ，２０Ｈ　　　　恢复Ye、Y低位相减产生的借位位

ＳＵＢＢ　Ａ，４ＦＨ　　　高位Ye、Y相减，得e

ＭＯＶ　Ｃ，２１Ｈ    　　恢复d=a+c产生的进位位

ＡＤＤＣ　Ａ，５３Ｈ　　　计算f=b+e，f为高位终判值

ＭＯＶ　５３Ｈ，Ａ　　　　保存f于终判值单元高位字节

　　　　ＲＰ２：ＡＣＡＬＬ　ＤＬ０　　延时子程序

ＭＯＶ　Ａ，４９Ｈ　　　　取Ｆ高位字节　　　　　　　

ＪＢ　ＡＣＣ．７，ＲＰ６　高位＝1，Ｆ＜0，去ＲＰ６

ＡＣＡＬＬ　ＸＭＭ　　　　高位＝０，Ｆ＞0，Ｘ反转一步

ＣＬＲ　Ｃ　　　　　　　　计算新偏差Ｆ＝Ｆ－２Ｘ＋１

ＭＯＶ　Ａ，４ＡＨ　　　　计算g＝Ｆ－Ｘ低位

ＳＵＢＢ　Ａ，５２Ｈ

ＸＣＨ　Ａ，Ｂ　　　　　　g存入Ｂ寄存器

ＭＯＶ　Ａ，４９Ｈ　　　　计算h＝Ｆ－Ｘ高位

ＳＵＢＢ　Ａ，５１Ｈ

ＸＣＨ　Ａ，Ｂ            低位存Ａ，高位存Ｂ。ＢＡ内容为Ｆ－Ｘ

ＣＬＲ　Ｃ　　　　　　　　计算i＝g－Ｘ＝Ｆ－２Ｘ低位

ＳＵＢＢ　Ａ，５２Ｈ　　　　　　

ＸＣＨ　Ａ，Ｂ　　　　　　Ｂ内容为Ｆ－２Ｘ低位，Ａ内容为Ｆ－Ｘ高位

ＳＵＢＢ　Ａ，５１Ｈ　　　Ａ内容为Ｆ－２Ｘ高位

ＸＣＨ　Ａ，Ｂ　　　　　　ＢＡ内容为Ｆ－２Ｘ

ＡＤＤ　Ａ，＃０１Ｈ　　　计算Ｆ－２Ｘ＋１

ＭＯＶ　４ＡＨ，Ａ　　　　４Ａ内容为Ｆ－２Ｘ＋１低位

ＸＣＨ　Ａ，Ｂ　　　　　　Ｂ内容为Ｆ－２Ｘ＋１低位，Ａ内容为Ｆ－２Ｘ高位

ＡＤＤＣ　Ａ，＃００Ｈ　　考虑Ｆ－２Ｘ＋１的进位

ＭＯＶ　４９Ｈ，Ａ　　　　４９Ｈ的内容为Ｆ－２Ｘ＋１高位

ＣＬＲ　Ｃ　　　　　　　　计算Ｘ＝Ｘ－１

ＭＯＶ　Ａ，５２Ｈ        低位

ＳＵＢＢ　Ａ，＃０１Ｈ

ＭＯＶ　５２Ｈ，Ａ

ＭＯＶ　Ａ，５１Ｈ        高位

ＳＵＢＢ　Ａ，＃００Ｈ

ＭＯＶ　５１Ｈ，Ａ

ＲＰ４：ＣＬＲ　Ｃ　　　　　　　终判值减１

　　　ＭＯＶ　Ａ，５４Ｈ

　　　ＳＵＢＢ　Ａ，＃０１Ｈ

　　　ＭＯＶ　５４Ｈ，Ａ

　　　ＭＯＶ　Ａ，５３Ｈ

　　　ＳＵＢＢ　Ａ，＃００Ｈ

　　　ＭＯＶ　５３Ｈ，Ａ

　　　ＯＲＬ　Ａ，５４Ｈ

　　　ＪＮＺ　ＲＰ２　　　　　　插补没结束，转至ＲＰ２

　　　ＬＪＭＰ　００００Ｈ　　

ＲＰ６：ＡＣＡＬＬ　ＹＭＰ　　　Ｙ电动机正转

　　　ＭＯＶ　Ｒ６，＃０２Ｈ  　此处“２”，为“Ｆ＋２Ｙ＋１”的“２”

ＲＰ７：ＭＯＶ　Ａ，４ＡＨ　　　　　　Ｆ＋２Ｙ＋１

　　　ＡＤＤ　Ａ，５０Ｈ

　　　ＭＯＶ　４ＡＨ，Ａ

　　　ＭＯＶ　Ａ，４９Ｈ　　　　　　　

　　　ＡＤＤＣ　Ａ，４ＦＨ

　　　ＭＯＶ　４９Ｈ，Ａ

　　　ＤＪＮＺ　Ｒ６，ＲＰ７　　　　　

　　　ＭＯＶ　Ａ，４ＡＨ　　　　　　　

　　　ＡＤＤ　Ａ，＃０１Ｈ　　　　　　

　　　ＭＯＶ　４ＡＨ，Ａ

　　　ＭＯＶ　Ａ，４９Ｈ

　　　ＡＤＤＣ　Ａ，＃００Ｈ

　　　ＭＯＶ　Ａ，５０Ｈ

　　　ＡＤＤ　Ａ，＃０１Ｈ

　　　ＭＯＶ　５０Ｈ，Ａ

　　　ＭＯＶ　Ａ，４ＦＨ

　　　ＡＤＤＣ　Ａ，＃００Ｈ

　　　ＭＯＶ　４ＦＨ，Ａ

　　　ＡＪＭＰ　ＲＰ４

说明：１）数据存放格式同前；

　　２）各变量地址分配如下：４７Ｈ－４ＥＨ，存放数据方式同直线，４ＦＨ５０Ｈ－Ｙ，５１Ｈ５２Ｈ－Ｘ，５３Ｈ５４Ｈ－终判值