3　段構成　プログラム	（50ｍＳ以上に適します）

W		EQU	0
F		EQU	1
COUNT1		EQU	H'**'
COUNT2		EQU	H'**'
COUNT3		EQU	H'**'

	CALL	DAN3		;2

DAN3	MOVLW	D'**'		;1
	MOVWF	COUNT1		;1
	MOVLW	D'**'		;1
	MOVWF	COUNT2		;1
	MOVLW	D'**'		;1
	MOVWF	COUNT3		;1
LOOP3	DECFSZ	COUNT1,F	;1(2)
	GOTO	LOOP3		;2
	DECFSZ	COUNT2,F	;1(2)
	GOTO	LOOP3		;2
	DECFSZ	COUNT3,F	;1(2)
	GOTO	LOOP3		;2
	NOP			;注
	NOP			;注
	RETURN			;2
;---------------------------------------------------
				;16



 注）ＮＯＰ　は精密調整用です、最終的に精度を要する場合挿入します

 必要サイクル数（ＳＵＭ）＝ＴＩＭＥ（μＳ）＊発振周波数（ＭＨｚ）/　4

 ＳＵＭ＝固定分　10
　　　　　1段分　（3＊ＣＯＵＮＴ1）-1
　　　　　2段分　（770*ＣＯＵＮＴ2）-768
　　　　　3段分　（196352+3）*（ＣＯＵＮＴ3-1）+2
	　　　　　　（196355*ＣＯＵＮＴ3）-196353

 ＳＵＭ＝（3＊ＣＯＵＮＴ1）-1　+　（770＊ＣＯＵＮＴ2）-768
        　＋（196355＊ＣＯＵＮＴ3）-196353
	＝（3＊ＣＯＵＮＴ1）+（770＊ＣＯＵＮＴ2）
           +（196355＊ＣＯＵＮＴ3）-197122

 ＣＯＵＮＴ3＝（ＳＵＭ+197122）　/　196355
 小数点以下切捨て

 ＣＯＵＮＴ2＝（（ＳＵＭ+197122）-（196355＊ＦＩＸ（ＣＯＵＮＴ3）））/770
 小数点以下切捨て

 計算した　ＣＯＵＮＴ2　が　256　になった時は　0　を設定します
 計算した　ＣＯＵＮＴ2　が　0　の時
 ＣＯＵＮＴ2を　256　と見做して　ＣＯＵＮＴ3　を　-1　し設定します
　
 ＣＯＵＮＴ1＝（（ＳＵＭ+197122）-（770＊ＦＩＸ（256）
	　　　-（196355＊ＦＩＸ（ＣＯＵＮＴ3-1）））　/　3

 計算した　ＣＯＵＮＴ2が　0　以外の時　
 ＣＯＵＮＴ1＝（（ＳＵＭ+197122）-（770＊ＦＩＸ（ＣＯＵＮＴ2））
	　　　-（196355＊ＦＩＸ（ＣＯＵＮＴ3）））　/　3

 計算した　ＣＯＵＮＴ1　が　256　になった時は　0　を設定します
 計算した　ＣＯＵＮＴ1　が　0　の時は　ＣＯＵＮＴ2　を　-1　します

 小数点のある時は四捨五入　（ＮＯＰ未使用時）
 少数点部分切捨て　　　　　（ＮＯＰ使用時）

 ＭＩＮ　ＣＯＵＮＴ1＝ＣＯＵＮＴ2＝ＣＯＵＮＴ3＝1　ＳＵＭ＝16
 ＭＡＸ　ＣＯＵＮＴ1＝ＣＯＵＮＴ2＝ＣＯＵＮＴ3＝0　ＳＵＭ＝50，267，646

 実測を行いましたところ、この段に限りほんの少しの誤差を表示する
 組み合わせがあります
 測定器の分解能の限界なのか「アルゴリズム」の錯誤なのかは不明です
 どなた様か確認、検証を行っていただけませんでしょうか