【RL78】UART通信のステータスをポーリングしてデータの送受信をする

uint16_t uart0_poll_Rx(void)
{
    uint16_t work;                              // ステータスレジスタ、受信データを保管する変数

    work = SSR01;                               // フラグをチェック  

    if ( work & 0x20 )                          // 受信完了しているかチェック
    {
        SIR01 = ( work & 0x07 );                // エラー・フラグをクリア
        work = ( work & 0x07 ) << 8;            // ステータスを上位にシフト
        work |= RXD0;                           // 受信データを読み出し
    }
    else
    {
        work = 0x8000;                          // 受信が完了していない
    }

    return(work);
}

uint16_t uart0_poll_Tx( uint8_t tx_data )
{

    uint16_t work;                              // ステータスレジスタ、送信データを保管する変数

    work = ( SSR00 & 0x20 );                    // フラグをチェック  
    if ( 0 == work )
    {
        TXD0 = tx_data;                         // データ送信
        work = 0x0000;                          // 戻り値をクリア
    }
    else
    {         
        work = ( 0x8000 | tx_data );            // データ送信不可能
    }

    return(work); 

}

uint16_t status = 0x8000;                   // UART0ステータス確認用
uint8_t flag = 0x00;                        // 改行コード受信フラグ
uint8_t index = 0x00;                       // 配列の要素インデックス
uint8_t buffer[100];                        // 受信データ保管用（配列）
    
uint8_t cmd_idn[] = "*IDN?\r\n";            // 識別コマンド
uint8_t cmd_rst[] = "*RST\r\n";             // リセットコマンド 
uint8_t cmd_trg[] = "*TRG\r\n";             // トリガーコマンド

void main(void)
{
    R_MAIN_UserInit();
    /* Start user code. Do not edit comment generated here */    
    while (1U)
    {
        if ( 0 == flag )
        {
            status = uart0_poll_Rx();               // ポーリングでデータの受信
            if(0x0000 == (status & 0xFF00))         // 受信データがある場合
            {
                buffer[index] = (status & 0x00FF);  // 下位8ビットにある受信データを配列に保管
                index++;
		   
                if(buffer[index - 1] == '\n')       // 受信データに改行コードがある場合
                {
                    flag = 0x01;
                }
            }
            else if(0x0001 == (status & 0xFF00))    // オーバーラン・エラーがある場合
            {
                ;
            }
            else if(0x0002 == (status & 0xFF00))    // パリティ・エラーがある場合
            {
                ;
            }
            else if(0x0004 == (status & 0xFF00))    // フレミング・エラーがある場合
            {
                ;
            }
            else if(0x8000 == (status & 0xFF00))    // 受信データがない場合
            {
                ;
            }
        }
        else if ( 1 == flag)
        {
            int i;
 	
            if(strncmp((uint8_t*)cmd_idn, (uint8_t*)buffer, 7) == 0)  // 受信データが識別コマンド	
            {
                uint8_t response[] = {"SAMPLE ver.1\r\n"};            // 送信データをセット
		         
                for(i=0; i<14; i++)
                {
                    status = uart0_poll_Tx(response[i]);      
                    if(0x0000 != status)
                    {
                        ;  // エラー処理  
                    }          
                }
            }
            else if(strncmp((uint8_t*)cmd_rst, (uint8_t*)buffer, 6) == 0)  // 受信データがリセットコマンド	
            {
                uint8_t response[] = {"RESET\r\n"};                        // 送信データをセット
		         
                for(i=0; i<7; i++)
                {
                    status = uart0_poll_Tx(response[i]);      
                    if(0x0000 != status)
                    {
                        ;  // エラー処理
                    }          
                }
            }
            else if(strncmp((uint8_t*)cmd_trg, (uint8_t*)buffer, 6) == 0)  // 受信データがトリガーコマンド	
            {
                uint8_t response[] = {"TRIGGER\r\n"};                        // 送信データをセット
		         
                for(i=0; i<9; i++)
                {
                    status = uart0_poll_Tx(response[i]);      
                    if(0x0000 != status)
                    {
                        ;  // エラー処理
                    }          
                }
            }
	    
            flag = 0x00;
            index = 0x00;
            memset(buffer, 0, 100);
        }
    }
    /* End user code. Do not edit comment generated here */
}