list	p=16f877a		; PIC16F877A用のプログラムであることを宣言
	#include p16f877a.inc		; PIC16F877A用のヘッダ・ファイルを読み込む

REGLOOP1	equ	0x20
REGLOOP2	equ	0x21
REGLOOP3	equ	0x22

	movlw	0x01
	movwf	REGLOOP3	; 最上位バイト
	movlw	0x86		; 中位バイト
	movwf	REGLOOP2
	movlw	0xa0		; 最下位バイト
	movwf	REGLOOP1

loop1:
	; 繰り返したいことをここに書く

	movf	REGLOOP1, f
	btfss	STATUS, Z
	goto	loop1_1

	movf	REGLOOP2, f
	btfsc	STATUS, Z
	decf	REGLOOP3, f

	decf	REGLOOP2, f

loop1_1
	decf	REGLOOP1, f
	btfss	STATUS, Z
	goto	loop1

	movfw	REGLOOP2
	btfss	STATUS, Z
	goto	loop1

	movfw	REGLOOP3
	btfss	STATUS, Z
	goto	loop1

	; 以下に繰り返しの後のプログラムを書く

	goto	$

	end				; プログラムの最後には必ず書く

リスト3-7     Copyright 2005 Noriaki Mitsunaga