我也贴一个
这是我刚做过的项目的一个子程序
用的全部是内部点，不占I、Q、M、V区的点
LD0 要校验数据的地址 IN
LB4 要校验数据的个数 IN
LB5 校验结果的高位 OUT
LB6 校验结果的低位 OUT
LB7-LB12 中间变量 TEMP


TITLE=子程序注释
Network 1 // 网络标题
// 网络注释
LD SM0.0
MOVB 16#FF, LB5
MOVB 16#FF, LB6
MOVB 16#0, LB10

MOVB 16#A0, LB11
MOVB 16#1, LB12
Network 2
LBL 0
Network 3
LD SM0.0
XORB *LD0, LB6
INCD LD0
INCB LB10
MOVB 16#0, LB9
Network 4
LBL 1
Network 5
LD SM0.0
MOVB LB5, LB7
MOVB LB6, LB8
SRB LB5, 1
SRB LB6, 1
INCB LB9
Network 6
LD L7.0
ORB 16#80, LB6
Network 7
LD L8.0
XORB LB11, LB5
XORB LB12, LB6
Network 8
LDB< LB9, 8
JMP 1
Network 9
LDB< LB10, LB4
JMP 0