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

REGLOOP1	equ	0x20
REGLOOP2	equ	0x21

	movlw	0x4			; 上位バイト
	movwf	REGLOOP2
	movlw	0x57			; 下位バイト
	movwf	REGLOOP1

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

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

	decf	REGLOOP1, f
	btfss	STATUS, Z
	goto	loop1

	movfw	REGLOOP2
	btfss	STATUS, Z
	goto	loop1

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

	goto	$

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

リスト3-6     Copyright 2005 Noriaki Mitsunaga