帝 ver.4(α) for PIC16F877 テストコード No.4
目的
・テーブル処理(ADDWF PCL,F)のテスト
検証コード
list p=16f877
#include
cnt1 equ 10h
cnt2 equ 11h
org 0h
goto init
org 4h
init
clrf cnt1
bsf STATUS,RP0
clrf TRISB
bcf STATUS,RP0
loop
movf cnt1,w
addwf PCL,f
goto phase_0
goto phase_1
goto phase_2
goto phase_3
goto init
;==================================================================
phase_0
movlw 0x8
movwf cnt2
movlw 0x01
movwf PORTB
phase_0_loop
rrf PORTB,f
decfsz cnt2,f
goto phase_0_loop
goto loop
;==================================================================
phase_1
movlw 0x8
movwf cnt2
movlw 0x80
movwf PORTB
phase_1_loop
rlf PORTB,f
decfsz cnt2,f
goto phase_1_loop
goto loop
;==================================================================
phase_2
movlw 0x8
movwf cnt2
movlw 0xF0
movwf PORTB
phase_2_loop
swapf PORTB,f
decfsz cnt2,f
goto phase_2_loop
goto loop
;==================================================================
phase_3
movlw 0x8
movwf cnt2
movlw 0xFF
movwf PORTB
phase_3_loop
comf PORTB,f
decfsz cnt2,f
goto phase_3_loop
goto loop
end