●ＬＥＤプログラム １６Ｆ８８ＬＥＤ０２
;****************************************************************************************** ;* ●ＬＥＤプログラム １６Ｆ８８ＬＥＤ０２ ●言語：ＭＰＡＳＭアセンブラ * ;****************************************************************************************** ; ;・参考のＬＥＤプログラム（１６Ｆ８１９ＬＥＤ０２）を流用して作成 ; ; ＬＥＤ点灯の順番は ; ; ＰＯＲＴＡ（ RA0→ RA1→ RA2→ RA3→ RA4→ RA6→ RA7 ） ; ↓ ; ＰＯＲＴＢ（ RB0→ RB1→ RB2→ RB3→ RB4→ RB5→ RB6→ RB7 ）、これを繰り返す。 ; ;------------------------------------------------------------------------------------------ ; ; 【 PIC16F88 】 ; ___________________ ____________________ ; | V | ; | | ; LEDA2(03) <--+ 1 RA2 PORTA(BIT2) | PORTA(BIT1) RA1 18 +--> LEDA1(02) ; LEDA3(04) <--+ 2 RA3 PORTA(BIT3) | PORTA(BIT0) RA0 17 +--> LEDA0(01) ; LEDA4(05) <--+ 3 RA4 PORTA(BIT4) | PORTA(BIT7) RA7 16 +--> LEDA7(07) ; 未使用 >--+ 4 RA5 PORTA(BIT5) | PORTA(BIT6) RA6 15 +--> LEDA6(06) ; 0V --+ 5 Vss (-) | (+) Vdd 14 +-- 3〜5V+ ; LEDB0(08) <--+ 6 RB0 PORTB(BIT0) | PORTB(BIT7) RB7 13 +--> LEDB7(15) ; LEDB1(09) <--+ 7 RB1 PORTB(BIT1) | PORTB(BIT6) RB6 12 +--> LEDB6(14) ; LEDB2(10) <--+ 8 RB2 PORTB(BIT2) | PORTB(BIT5) RB5 11 +--> LEDB5(13) ; LEDB3(11) <--+ 9 RB3 PORTB(BIT3) | PORTB(BIT4) RB4 10 +--> LEDB4(12) ; | | ; +----------------------------------------+ ; Copyright (c) 2013.03.17 by T.EJIRI ;------------------------------------------------------------------------------------------ ERRORLEVEL -302 ;バンク指定の確認 Warning Message［302］非表示にする ;------------------------------------------------------------------------------------------ LIST P=PIC16F88 ;標準ヘッダー INCLUDE "P16F88.INC" ;定義ファイルを取り込む ;------------------------------------------------------------------------------------------ ;****************************************************************************************** ;* コンフィグレーションビット（CONFIG1）の設定 * ;****************************************************************************************** ; ; ●クロック発振モード(OSC)の指定 ：_INTRC_IO ：内部クロックモード(INTOSC)を使用する ; (ＲＡ６,ＲＡ７は汎用入出力ピンとなる) ; ●ウォッチドックタイマの動作指定：_WDT_OFF ：ウォッチドックタイマ(WDT)の動作を禁止する ; ●パワーアップタイマの許可指定 ：_PWRTE_ON ：パワーアップタイマ(PWRTE)の動作を許可する ; ●ＭＣＬＲピンの機能選択指定 ：_MCLR_OFF ：ＲＡ５はデジタル入力ピンとする ; (ＭＣＬＲは内部でVddに接続) ; ●低電圧書き込み許可の指定 ：_LVP_OFF ：低電圧書き込みを禁止する ; (ＲＢ３は汎用入出力ピンとなる) ; ●コードプロテクトの指定 ：_CP_OFF ：コードプロテクト(CP)しない ; __CONFIG _CONFIG1, _INTRC_IO & _WDT_OFF & _PWRTE_ON & _MCLR_OFF & _LVP_OFF & _CP_OFF ;****************************************************************************************** ;* コンフィグレーションビット（CONFIG2）の設定 * ;****************************************************************************************** ; ; ●内部外部クロック切替モード(IESO)の指定 ：_IESO_OFF ：（無効）にする ; ●フェールセーフクロックモニタ(FCMEN)の指定 ：_FCMEN_OFF ：（無効）にする __CONFIG _CONFIG2, _IESO_OFF & _FCMEN_OFF ;****************************************************************************************** ;* ＩＤワードの設定 * ;****************************************************************************************** __IDLOCS H'0002' ;ＩＤワード ← プログラムのバージョン ;****************************************************************************************** ;* 変数項目 汎用レジスタ ■バンク０（９６バイト：２０Ｃｈ〜７Ｆｈ番地） * ;****************************************************************************************** TIMCNT1 EQU H'20' ;タイマーカウンター１ TIMCNT2 EQU H'21' ;タイマーカウンター２ ;****************************************************************************************** ;* ＬＥＤ出力パターンデータ （ ０：消灯 １：点灯 ） * ;****************************************************************************************** LEDOFF EQU B'00000000' ;ＰＯＲＴＢ(全て)消灯 LEDA0 EQU B'00000001' ;ＰＯＲＴＡ(ＲＡ０)のみ点灯、以外は消灯 LEDA1 EQU B'00000010' ;ＰＯＲＴＡ(ＲＡ１)のみ点灯、以外は消灯 LEDA2 EQU B'00000100' ;ＰＯＲＴＡ(ＲＡ２)のみ点灯、以外は消灯 LEDA3 EQU B'00001000' ;ＰＯＲＴＡ(ＲＡ３)のみ点灯、以外は消灯 LEDA4 EQU B'00010000' ;ＰＯＲＴＡ(ＲＡ４)のみ点灯、以外は消灯 LEDA6 EQU B'01000000' ;ＰＯＲＴＡ(ＲＡ６)のみ点灯、以外は消灯 LEDA7 EQU B'10000000' ;ＰＯＲＴＡ(ＲＡ７)のみ点灯、以外は消灯 LEDB0 EQU B'00000001' ;ＰＯＲＴＢ(ＲＢ０)のみ点灯、以外は消灯 LEDB1 EQU B'00000010' ;ＰＯＲＴＢ(ＲＢ１)のみ点灯、以外は消灯 LEDB2 EQU B'00000100' ;ＰＯＲＴＢ(ＲＢ２)のみ点灯、以外は消灯 LEDB3 EQU B'00001000' ;ＰＯＲＴＢ(ＲＢ３)のみ点灯、以外は消灯 LEDB4 EQU B'00010000' ;ＰＯＲＴＢ(ＲＢ４)のみ点灯、以外は消灯 LEDB5 EQU B'00100000' ;ＰＯＲＴＢ(ＲＢ５)のみ点灯、以外は消灯 LEDB6 EQU B'01000000' ;ＰＯＲＴＢ(ＲＢ６)のみ点灯、以外は消灯 LEDB7 EQU B'10000000' ;ＰＯＲＴＢ(ＲＢ７)のみ点灯、以外は消灯 ;****************************************************************************************** ;* プログラムの開始 （リセット・ベクタ） * ;****************************************************************************************** ORG 0 ;リセット・ベクタ（０ｈ番地） GOTO START ;STARTへ ジャンプする ;****************************************************************************************** ;* 割り込み （割り込みベクタ） * ;****************************************************************************************** ORG 4 ;割り込みベクタ（４ｈ番地） GOTO START ;STARTへ ジャンプする ;****************************************************************************************** ;* プログラム・メイン処理の開始 * ;****************************************************************************************** ORG 5 ;プログラムの開始アドレス（５ｈ番地） START CALL INT_RTN ;初期処理 CALL MAIN_RTN ;主処理 ;****************************************************************************************** ;* 初期処理 * ;****************************************************************************************** INT_RTN BSF STATUS,RP0 ;■バンク１にする （ ステータスレジスタのRP0 ← 1 ） ;---内部クロック周波数（４ＭＨｚ）を設定する MOVLW B'01100000' ;Ｗレジスタ ← ４ＭＨｚ(IRCF2:1,IRCF1:1,IRCF0:0)を選択する MOVWF OSCCON ;OSCCONレジスタ ← Ｗレジスタ ;---ポートの初期化--- CLRF TRISA ;PORTAは全て出力モードに設定する CLRF TRISB ;PORTBは全て出力モードに設定する BCF STATUS,RP0 ;■バンク０にする （ ステータスレジスタのRP0 ← 0 ） ;---ＬＥＤ（ＰＯＲＴＡ、ＰＯＲＴＢ）消灯処理 CALL LED_A_OFF_RTN ;ＬＥＤ（ＰＯＲＴＡ）消灯処理 CALL LED_B_OFF_RTN ;ＬＥＤ（ＰＯＲＴＢ）消灯処理 RETURN ;****************************************************************************************** ;* ＬＥＤ（ＰＯＲＴＡ）消灯処理 * ;****************************************************************************************** LED_A_OFF_RTN MOVLW LEDOFF ;Ｗレジスタ ← ＰＯＲＴの消灯設定 MOVWF PORTA ;ＰＯＲＴＡポート ← Ｗレジスタ RETURN ;****************************************************************************************** ;* ＬＥＤ（ＰＯＲＴＢ）消灯処理 * ;****************************************************************************************** LED_B_OFF_RTN MOVLW LEDOFF ;Ｗレジスタ ← ＰＯＲＴの消灯設定 MOVWF PORTB ;ＰＯＲＴＢポート ← Ｗレジスタ RETURN ;****************************************************************************************** ;* 主処理 * ;****************************************************************************************** MAIN_RTN CALL LED_OUT_RTN ;ＬＥＤ（ＰＯＲＴＡ、ＰＯＲＴＢ）出力処理 GOTO MAIN_RTN ;MAIN_RTNへ ジャンプする（永久ループ） ;****************************************************************************************** ;* ＬＥＤ（ＰＯＲＴＡ、ＰＯＲＴＢ）出力処理 * ;****************************************************************************************** LED_OUT_RTN ;---ＰＯＲＴＡの出力--- MOVLW LEDA0 ;Ｗレジスタ ← ＰＯＲＴＡ(ＲＡ０)を点灯する MOVWF PORTA ;ＰＯＲＴＡポート ← Ｗレジスタ CALL TIM_RTN ;サブルーチンを呼ぶ（タイマー処理） MOVLW LEDA1 ;Ｗレジスタ ← ＰＯＲＴＡ(ＲＡ１)を点灯する MOVWF PORTA ;ＰＯＲＴＡポート ← Ｗレジスタ CALL TIM_RTN ;サブルーチンを呼ぶ（タイマー処理） MOVLW LEDA2 ;Ｗレジスタ ← ＰＯＲＴＡ(ＲＡ２)を点灯する MOVWF PORTA ;ＰＯＲＴＡポート ← Ｗレジスタ CALL TIM_RTN ;サブルーチンを呼ぶ（タイマー処理） MOVLW LEDA3 ;Ｗレジスタ ← ＰＯＲＴＡ(ＲＡ３)を点灯する MOVWF PORTA ;ＰＯＲＴＡポート ← Ｗレジスタ CALL TIM_RTN ;サブルーチンを呼ぶ（タイマー処理） MOVLW LEDA4 ;Ｗレジスタ ← ＰＯＲＴＡ(ＲＡ４)を点灯する MOVWF PORTA ;ＰＯＲＴＡポート ← Ｗレジスタ CALL TIM_RTN ;サブルーチンを呼ぶ（タイマー処理） MOVLW LEDA6 ;Ｗレジスタ ← ＰＯＲＴＡ(ＲＡ６)を点灯する MOVWF PORTA ;ＰＯＲＴＡポート ← Ｗレジスタ CALL TIM_RTN ;サブルーチンを呼ぶ（タイマー処理） MOVLW LEDA7 ;Ｗレジスタ ← ＰＯＲＴＡ(ＲＡ７)を点灯する MOVWF PORTA ;ＰＯＲＴＡポート ← Ｗレジスタ CALL TIM_RTN ;サブルーチンを呼ぶ（タイマー処理） CALL LED_A_OFF_RTN ;ＬＥＤ（ＰＯＲＴＡ）消灯処理 ;---ＰＯＲＴＢの出力--- MOVLW LEDB0 ;Ｗレジスタ ← ＰＯＲＴＢ(ＲＢ０)を点灯する MOVWF PORTB ;ＰＯＲＴＢポート ← Ｗレジスタ CALL TIM_RTN ;サブルーチンを呼ぶ（タイマー処理） MOVLW LEDB1 ;Ｗレジスタ ← ＰＯＲＴＢ(ＲＢ１)を点灯する MOVWF PORTB ;ＰＯＲＴＢポート ← Ｗレジスタ CALL TIM_RTN ;サブルーチンを呼ぶ（タイマー処理） MOVLW LEDB2 ;Ｗレジスタ ← ＰＯＲＴＢ(ＲＢ２)を点灯する MOVWF PORTB ;ＰＯＲＴＢポート ← Ｗレジスタ CALL TIM_RTN ;サブルーチンを呼ぶ（タイマー処理） MOVLW LEDB3 ;Ｗレジスタ ← ＰＯＲＴＢ(ＲＢ３)を点灯する MOVWF PORTB ;ＰＯＲＴＢポート ← Ｗレジスタ CALL TIM_RTN ;サブルーチンを呼ぶ（タイマー処理） MOVLW LEDB4 ;Ｗレジスタ ← ＰＯＲＴＢ(ＲＢ４)を点灯する MOVWF PORTB ;ＰＯＲＴＢポート ← Ｗレジスタ CALL TIM_RTN ;サブルーチンを呼ぶ（タイマー処理） MOVLW LEDB5 ;Ｗレジスタ ← ＰＯＲＴＢ(ＲＢ５)を点灯する MOVWF PORTB ;ＰＯＲＴＢポート ← Ｗレジスタ CALL TIM_RTN ;サブルーチンを呼ぶ（タイマー処理） MOVLW LEDB6 ;Ｗレジスタ ← ＰＯＲＴＢ(ＲＢ６)を点灯する MOVWF PORTB ;ＰＯＲＴＢポート ← Ｗレジスタ CALL TIM_RTN ;サブルーチンを呼ぶ（タイマー処理） MOVLW LEDB7 ;Ｗレジスタ ← ＰＯＲＴＢ(ＲＢ７)を点灯する MOVWF PORTB ;ＰＯＲＴＢポート ← Ｗレジスタ CALL TIM_RTN ;サブルーチンを呼ぶ（タイマー処理） CALL LED_B_OFF_RTN ;ＬＥＤ（ＰＯＲＴＢ）消灯処理 RETURN ;****************************************************************************************** ;* タイマー処理 * ;****************************************************************************************** TIM_RTN MOVLW D'255' ;Ｗレジスタ ← ２５５ MOVWF TIMCNT1 ;TIMCNT1（タイマーカウンター１） ← Ｗレジスタ TIM_LOOP1 MOVLW D'255' ;Ｗレジスタ ← ２５５ MOVWF TIMCNT2 ;TIMCNT2（タイマーカウンター２） ← Ｗレジスタ TIM_LOOP2 NOP ;空ステップ NOP ;空ステップ NOP ;空ステップ NOP ;空ステップ NOP ;空ステップ NOP ;空ステップ NOP ;空ステップ NOP ;空ステップ NOP ;空ステップ NOP ;空ステップ DECFSZ TIMCNT2,F ;（TIMCNT2＝TIMCNT2−１）＝０の時 次の命令をスキップする GOTO TIM_LOOP2 ;TIM_LOOP2へ ジャンプする（タイマーカウンタ２、ループ） DECFSZ TIMCNT1,F ;（TIMCNT1＝TIMCNT1−１）＝０の時 次の命令をスキップする GOTO TIM_LOOP1 ;TIM_LOOP1へ ジャンプする（タイマーカウンタ１、ループ） RETURN ;****************************************************************************************** END ;プログラムの終了