/******************************(abc945-13145.c)*********************
 *  Lチカ・シリアル通信プログラム（割り込み付き）
 *-----------------------------------------------------------------*/

#include "mcc_generated_files/system/system.h"

//=====  シリアル関係 =========
#define  EU_BFSIZE   80

char     RBuf[EU_BFSIZE];                  // 受信データバッファ
uint8_t  EU_Flg = 0;                       // 受信フラグ

//-----  シリアル受信割り込み関数
void myEusart(void) {
  static uint8_t sIdx = 0;                  // 受信データポインタ
    char     ch;                            // 受信文字

    if(EUSART1_IsRxReady()){                // 受信データ有り？
        ch = EUSART1_Read();                // データ受信
        EUSART1_Write(ch);                  // エコーバック
        if((ch == 0x0a)||(ch == 0x0d)){     // 改行処理
            RBuf[sIdx] = 0;                 // 文字列終端文字
            sIdx = 0;                       // ポインタを初期化
            EU_Flg = 1;                     // 受信フラグON
        }else if((ch == 0x08)&&(sIdx > 0)){ // BS処理
            sIdx--;
        }else{                              // 上記以外の文字
            if(sIdx < EU_BFSIZE){           // バッファサイズ以内？
                RBuf[sIdx++] = ch;          // バッファにデータ格納
            }
        }
    }
}

//----- 文字列シリアル出力（改行なし）
void EU_print(char * msg) {
    while(*msg != 0)  {
        while(!EUSART1_IsTxReady());        //データ送信確認
        EUSART1_Write(*msg++);              //1文字送信
    }
}

//----- 文字列シリアル出力（改行付き）
void EU_puts(char *msg) {
    EU_print( msg );
    EU_print("\n");
}

//=========  main  ===================
int main(void) {
    uint8_t  tm = 50;                       // 10msインターバル回数
    uint8_t  tc = 0;                        // インターバルカウンタ
    uint8_t  led =  1 ;                     // LED On/Off  フラグ
    uint8_t  sw0;                           // SW0データ
    uint8_t  lst_sw0 = 1;                   // 一つ前のSW0データ
    uint8_t  rch;                           // 受信文字
  
    SYSTEM_Initialize();                    //初期化
    
    EUSART1_RxCompleteCallbackRegister(myEusart); 
                                            // 割り込みハンドラー設定
    INTERRUPT_GlobalInterruptEnable();      // 割り込み許可
    INTERRUPT_PeripheralInterruptEnable();

    EU_puts("Test PIC16F13145");

    while(1)  { 
        if(EU_Flg){                         // 受信データ有
            EU_Flg = 0;                     // 受信フラグクリア
            rch = RBuf[0];                  // 受信データ取得
            if((rch > 0x30)&&(rch < 0x36)){ // '0' < rch < '6' ? 
                tm = (rch - 0x30) * 10;
                tc = tm;
            }
        }

        sw0 = SW0_GetValue();               // SW0状態をゲット
        if((sw0 == 0) && (lst_sw0 != 0)){   // 立ち下がり検出
            tm += 10;                       // インターバルを増やす
            if (tm > 50) tm = 10;
            tc = tm;                        // カウンタ値を再セット
        }  
        lst_sw0 = sw0;                      // 一つ前のデータを記憶

        if(tc == 0){                        // カウンタが0？
            if(led)   LED0_SetLow();        // LED点灯
             else     LED0_SetHigh();       // LED消灯
            led ^= 1;                       // LEDフラグ反転
            tc = tm;                        // カウンタ再セット
        }else{
            tc--;                           // カウントダウン
        }
        __delay_ms(10);                     // ループは10mS毎
    }  
}