L #LagIn //将输入送入寄存器1 ITD //整数转换为双整数 L #LagOut //将输出送入寄存器1,原来寄存器1中的输入值存入寄存器2 ITD //整数转换为双整数 -D //寄存器1-寄存器2,求差 L #Rem //将#Rem的值取到寄存器1,原寄存器中的差值转入寄存器2 ITD //#Rem整数转换为双整数 +D //#LagIn-#LagOut +#Rem T #TmpLongInt0 //#LagIn-#LagOut +#Rem存入#TmpLongInt0 L #Count //#Count 进入寄存器1;#LagIn-#LagOut +#Rem进入寄存器2 MOD //取模 T #Rem //取到的模值进入#Rem L #TmpLongInt0 //#LagIn-#LagOut +#Rem的值进入寄存器1;模值进入寄存器2 L #Count ////#Count 进入寄存器1;#LagIn-#LagOut +#Rem进入寄存器2 /D //寄存器2、寄存器1进行双整数除法计算 L #LagOut //-#LagOut 进入寄存器1,上面的商进入寄存器2 +I //寄存器1+寄存器2 T #LagOut //寄存器1+寄存器2输出到变量#LagOut