JE3JLB_SD330 コントローラ製作

//// Port E 定義 DDS Controle sbit DDS_CLOCK at RE1_bit; // DDS-60 CLOCK sbit DDS_LOAD at RE0_bit; // DDS-60 LOAD sbit DDS_DATA at RE2_bit; // DDS-60 DATA sbit DDS_CLOCK_Direction at TRISE1_bit; sbit DDS_LOAD_Direction at TRISE0_bit; sbit DDS_DATA_Direction at TRISE2_bit; // 省略 main() { TRISE = 0x00; // set direction to be output // 省略 } // DDSの設定制御 //// 電源ON時に実行する /////////////////////////// ///// 初期のパラレルモードからシリアルモードに設定 void DDS_on(void) { int di; delay_ms(1); DDS_CLOCK = 1; //W0ロード delay_us(1); DDS_CLOCK = 0; delay_us(1); DDS_LOAD = 1; //シリアルモード設定 delay_us(1); DDS_LOAD = 0; delay_ms(1); /// 日本語データシート（P11）で推奨しているため、 /// シリアルモード設定後、直ちに最初のダミーデータを送り込む。 /// 周波数は0Hz、x6 モードのみ設定。2010/11/21:JLB for(di=0; di<40; di++) { if(di == 32) DDS_DATA = 1; else DDS_DATA = 0; delay_us(1); DDS_CLOCK = 1; delay_us(1); DDS_CLOCK = 0; delay_us(1); } DDS_LOAD = 1; //周波数値ロード指示 delay_us(1); DDS_LOAD = 0; }

/// 周波数設定値
static union {                           // 後閑氏のサンプルに有った共用体の
            unsigned long    Phase;      // 記述。型はMikroCに変更。
            unsigned char    iPhase[4];  // 
    } DDSdata;                           // 2011.01.15 JLB
                                         //

//////  周波数（１０進）をDDSに送出　関数　　///////
void DECtoDds(long dds_f )
{
        int i, j, mask;
        float Para;

        Para = 23.86093 * dds_f;            //2の32乗÷180MHz=23.86092942
        DDSdata.Phase = (unsigned long)Para;

        //IDirect = 1;               // IRP bit must be set manually for
                                   // indirect access to 'sub' variable
                                   // コンパイラーからsub[4] を使うときは 
                                   // マニュアルでIRPをセットするよう指示
                                   // が有ったため。2010.12.25 JLB
                                   // （これが無いとDDSがうまく発振しない）
                                   // しかし、18F452 では不要でした。
                                    

        ////　周波数値32ビット出力する
        for(i=0; i<4; i++)
        {
                mask = 0x01;                 //ビットマスクの初期設定
                for(j=0; j<8; j++)
                {
                    if(DDSdata.iPhase[i] & mask)
                        DDS_DATA = 1;
                    else
                        DDS_DATA = 0;
                    delay_us(1);
                    DDS_CLOCK = 1;                  //ビット送信クロック
                    delay_us(1);
                    DDS_CLOCK = 0;
                    mask = mask << 1;                //ビットマスクのビットシフト
                }
        }
        ///　設定制御8ビット出力
        mask = 0x01;                                      //ビットマスクの初期設定
        for(j=0; j<8; j++)
        {
                if(0x01 & mask)                           //６倍モードのみ１
                    DDS_DATA = 1;
                else
                    DDS_DATA = 0;
                delay_us(1);
                DDS_CLOCK = 1;                    //ビット送信クロック
                delay_us(1);
                DDS_CLOCK = 0;
                mask = mask << 1;                 //ビットマスクの１ビットシフト
        }
        DDS_LOAD = 1;                                //周波数値ロード指示
        delay_us(1);
        DDS_LOAD = 0;

        //IDirect = 0;

}

// 省略 / UART LCD ... char civ_address = 0x7A; // iCOM IC-7600 CI-V Address char pc_address = 0xE1; // PC address default 0xE0 int civ_count = 0; // CI-V割り込みで11桁読込みカウンタ char civ_get_str[6] = { 0xFE,0xFE,0x7A,0xE1,0x03,0xFD }; // 省略 //////////////////////////////////////////////////////////////////////////////// // 割込み処理をここへ記述する。 // CI-Vは、9600bpsで11Byte受取るのに約11.5mSかかるため、割込みを使用。 //////////////////////////////////////////////////////////////////////////////// void interrupt() { if(PIR1.RCIF){ if (UART1_Data_Ready() == 1) { // If data is received, uart_rd = UART1_Read(); // read the received data, switch (civ_count) { case 10: if (uart_rd == 0xFD) civ_count++;　　　// 周波数データ取り込み完了 else civ_count = 0; break; case 9: if (uart_rd == 0x00){ civ_bcd[3] = 0x00; civ_count++;} else civ_count = 0; break; case 8: civ_bcd[0] = uart_rd; civ_count++; break; case 7: civ_bcd[1] = uart_rd; civ_count++; break; case 6: civ_bcd[2] = uart_rd; civ_count++; break; case 5: if(uart_rd == 0xfd) civ_count = 0; else civ_count++; break; case 4: if(uart_rd == 0xfd) civ_count = 0; else civ_count++; break; case 3: if(uart_rd == 0xfd) civ_count = 0; else civ_count++; break; case 2: if(uart_rd == 0xfd) civ_count = 0; else civ_count++; break; case 1: if (uart_rd == 0xFE) civ_count++; else civ_count = 0; break; case 0: if (uart_rd == 0xFE) civ_count++; else civ_count = 0; break; default: break; } } PIR1.RCIF = 0; } } void main(){ // 省略 // 以下はwhile(1) ループの中の処理 // 周波数データをCI-Vから取込み、DDSの発振周波数へセット（実発振はせず） if(civ_count == 11) // CI-V to civ_bcd[] { BCD_move(dds_bcd, civ_bcd); BCDtoLcd(2, 8, dds_bcd); civ_count = 0; } // 省略 // 処理シーケンスの関係で、先にSTART SWが離されたかを確認する。 if((START_b4 != 0) && (SW_start == 1)) { // START SWがＯＦＦされた？ if(AM_sw != 0) PIE1.RCIE = 0; // USART 割込み禁止 Freq = BCDtoDec(ant_bcd); Freq2 = BCDtoDec(dds_bcd); Freq_tmp = MOTER_search(Freq, Freq2); if(Freq_tmp == 0) { Lcd_Out(1, 5, "Err"); // 念のためErr表示 }else { DECtoBcd(Freq_tmp); BCDtoBcd(acc_bcd, ant_bcd); BCDtoLcd(1, 8, ant_bcd); } START_b4 =0; if(AM_sw != 0) PIE1.RCIE = 1; // USART 割込み許可 } if(SW_start == 0){ // START SWがＯＮされた？ if((AM_sw != 0) && (START_b4 == 0)){ UART1_Write_Text(civ_get_str); // CI-V読込みコマンドを送出しておく。 Delay_ms(20); // 受信割込み待ちの時間。 } START_b4 = 1; }

// INFRA_red 関連の定義//////////////////////////////////////////// // 松下電工製の古い（10年前）空気清浄機のリモコン（EH3550/EH3560） int IN_red; // INFRA_red 赤外線ポート割込みフラグ char RC_poff[8] = { 0x2c,0x52,0x19,0xf4,0x7b,0x37,0x0f,0x90 }; char RC_start[8] = { 0x2c,0x52,0x19,0xf4,0x7b,0x37,0x0f,0x91 }; int t0_count; // 0.1mS Count Max 25.5mS int IR_flag; char IR_buff[8]; int irx; //省略 //////////////////////////////////////////////////////////////////////////////// // 割込み処理をここへ記述する。 // CI-Vは、9600bpsで11Byte受取るのに約11.5mSかかるため、割込みを使用。 //////////////////////////////////////////////////////////////////////////////// void interrupt() { if (INTCON.TMR0IF) { t0_count++; TMR0L = 131; // 131 to 256 = 125count(≒0.1mS) INTCON.TMR0IF = 0; } if(PIR1.RCIF){ if (UART1_Data_Ready() == 1) { // If data is received, uart_rd = UART1_Read(); // read the received data, switch (civ_count) { case 10: if (uart_rd == 0xFD) civ_count++; else civ_count = 0; break; case 9: if (uart_rd == 0x00){ civ_bcd[3] = 0x00; civ_count++;} else civ_count = 0; break; case 8: civ_bcd[0] = uart_rd; civ_count++; break; case 7: civ_bcd[1] = uart_rd; civ_count++; break; case 6: civ_bcd[2] = uart_rd; civ_count++; break; case 5: if(uart_rd == 0xfd) civ_count = 0; else civ_count++; break; case 4: if(uart_rd == 0xfd) civ_count = 0; else civ_count++; break; case 3: if(uart_rd == 0xfd) civ_count = 0; else civ_count++; break; case 2: if(uart_rd == 0xfd) civ_count = 0; else civ_count++; break; case 1: if (uart_rd == 0xFE) civ_count++; else civ_count = 0; break; case 0: if (uart_rd == 0xFE) civ_count++; else civ_count = 0; break; default: break; } } PIR1.RCIF = 0; } if(INTCON.INT0IF == 1) { //RB0/INT割込み　赤外線リモコン INTCON.INT0IE = 0; //RB0/INT割込みの禁止 switch(IN_red) { case 0: t0_count = 0; IN_red++; TMR0L = 131; // 131 to 256 = 125count(≒0.1mS) INTCON.TMR0IE = 1; //Timer0/INT割込みの許可 break; case 1: if(xxx == 0) xxx = t0_count; if((t0_count >= 40) && (t0_count <= 62)){ //実測4.9mS t0_count = 0; IN_red++; }else{ //範囲を外れた IN_red = 0; INTCON.TMR0IE = 0; //Timer0/INT割込みの禁止 } break; case 66: IR_flag = 1; IN_red = 0; SENS_1 = 0; // Debug用LED点灯● break; default: if((IN_red >= 2) && (IN_red <= 65)) { // 8Byte = 64bit if(t0_count >= 21){ // 2.1mS以上なら無効 IN_red = 0; INTCON.TMR0IE = 0; //Timer0/INT割込みの禁止 }else{ irx = (IN_red - 2) / 8; IR_buff[irx] = IR_buff[irx] >> 1; if(t0_count <= 12){ // 1.2mSが敷居値 IR_buff[irx].B7 = 0; }else{ IR_buff[irx].B7 = 1; } t0_count = 0; IN_red++; } } break; } INTCON.INT0IF = 0; //RB0/INT割込みフラグクリアー INTCON.INT0IE = 1; //RB0/INT割込みの許可 } } void main(){ INTCON2 = 0b00111111; // bit 7: 0 = Port B use pullup. // bit 6:RB0/INT0 = Interrupt on falling edge // 0 = RB0/INT0 ピンの立ち下がりエッジにより割り込み T0CON = 0b01010001; // Timer Controle ÷4 // bit 5:T0CS: TMR0 クロックソース選択ビット // 0 = 内部命令サイクルクロック（CLKOUT) // bit 3: PSAプリスケーラ割り当て 0=TMR0 // bit 2-0:プリスケーラレート 001=4 // 省略 // 以下はwhile(1) ループの中の処理 // 省略 if(IR_flag == 2){ // 赤外線割込みが有った？ if(AM_sw != 0) PIE1.RCIE = 0; // USART 割込み禁止 Freq = BCDtoDec(ant_bcd); Freq2 = BCDtoDec(dds_bcd); Freq_tmp = MOTER_search(Freq, Freq2); if(Freq_tmp == 0) { Lcd_Out(1, 5, "Err"); // 念のためErr表示 }else { DECtoBcd(Freq_tmp); BCDtoBcd(acc_bcd, ant_bcd); BCDtoLcd(1, 8, ant_bcd); } if(AM_sw != 0) PIE1.RCIE = 1; // USART 割込み許可 IN_red = 0; IR_flag = 0; INTCON.INT0IE = 1; //RB0/INT割込みの許可 } if(IR_flag == 1){ // 赤外線割込みが有った？ if(IR_buff[7] >= RC_start[7]){ if((AM_sw != 0) && (START_b4 == 0)){ UART1_Write_Text(civ_get_str); // CI-V読込みコマンドを送出しておく。 Delay_ms(20); // 受信割込み待ちの時間。 } IR_flag = 2; } if(IR_buff[7] == RC_poff[7]){ IR_flag = 9; } if(IR_flag == 1) { IN_red = 0; IR_flag = 0; INTCON.INT0IE = 1; //RB0/INT割込みの許可 } SENS_1 = 1; } if((OFFSW == 0) || (IR_flag == 9)){ EEPROM_Write(0x00, ant_bcd[0]); EEPROM_Write(0x01, ant_bcd[1]); EEPROM_Write(0x02, ant_bcd[2]); POWER_on = 0; // ここで電源OFF break; // 電源を落とすため関係ないが明示的に記述。 }