ＪＨ７ＵＢＣブログ

ブログを引っ越します

Thu, 04 Apr 2019 15:08:47 +0900

　このブログは、2006年5月に開設しました。長い間お世話になり、ありがとうございました。

　Yahoo!ブログサービスが12月15日に終了するというアナウンスがあり、引っ越すことにしました。

　私のもう一つのブログであるgooブログの「ゆめの森」を新たに「JH7UBCブログ」として、そちらに引っ越すことにしました。

　PIC16F1705の勉強の記事から既にそちらに書き始めました。どうぞよろしくお願いします。

　こちらの記事は、12月15日までは、そのままにします。それ以降は消滅するようです。

　新　JH7UBCブログ

PIC16F1827 周波数カウンタ

Tue, 02 Apr 2019 18:00:36 +0900

　PIC16F1827を使って、周波数カウンタを作ってみました。

　これまで、PIC16F88,PIC16F628Aなどで製作した「電子工作etc」というサイトで紹介された「周波数カウンタV7」と基本的には同じアルゴリズムです。

　残念ながら「電子工作etc」というサイトは既に見えなくなっているようです。

　PIC 1個で、どのようにして周波数カウンタを作るかを簡単に説明します。

　周波数カウンタを作るには、周波数を測定するカウンタとカウント時間（普通は１秒）を発生するタイムベースが必要です。

　PICは、内部に複数のタイマー（カウンタ）を持っています。そのうち16bitタイマーであるTimer1(TMR1)を周波数を測定するカウンタに使い、8bitタイマーTimer2(TMR2)を使って1秒を発生させます。

　TMR2を利用したタイムベースからの1秒の合図で、TMR1へのゲートを開けたり閉めたりして、周波数をカウントします。

　詳細は、JH7UBCホームページのここを見てください。

回路図です。

　入力信号は、2SC1815GRの簡単なアンプを通して、T1CKI(RB6)に加えます。

　クロックは、正確に測定するために20MHzのクリスタルオシレータを使い、外部クロック入力CLKIN(RA7)に入れます。

　周波数表示は、I2Cアダプタ付きのLCD1602を使いました。

　動作確認のために、TMR1のゲートが開いている間点灯するLEDをつけました。

　ブレッドボードです。自作SGからの1MHz(1000000Hz)の信号を測定しています。

プログラムです。

------------------------------------------

#include <stdio.h>

#include <stdlib.h>
#include <xc.h>

// CONFIG1
#pragma config FOSC = ECH //外部クロック CLKIN (4-32MHz)
#pragma config WDTE = OFF
#pragma config PWRTE = ON
#pragma config MCLRE = OFF
#pragma config CP = OFF
#pragma config CPD = OFF
#pragma config BOREN = ON
#pragma config CLKOUTEN = OFF
#pragma config IESO = OFF
#pragma config FCMEN = OFF

// CONFIG2
#pragma config WRT = OFF
#pragma config PLLEN = OFF
#pragma config STVREN = ON
#pragma config BORV = HI
#pragma config LVP = OFF

#define _XTAL_FREQ 20000000 //クロック20MHz
#define LED RA4

//LCD関係定義
#define LCD_EN 0b00000100   //Enable
#define LCD_BL 0b00001000   //Back Light
#define LCD_CMD 0x00
#define LCD_CHR 0x01
#define LCD_LINE1 0x80
#define LCD_LINE2 0xC0
#define LCD_addr 0x4E   //0x27<<1

/* I2C 初期化*/
void I2C_init(){
    SSP1CON1 = 0x28;        //SSPEN = 1,I2C Master Mode
    SSP1STATbits.SMP = 1;   //標準速度モード(100KHz)
    SSP1ADD = 0x31;         //Fosc/(4*Clock)-1 Clock=100kHz,Fosc=20MHz
}

/* スタートコンディション */
void I2C_start(){
SSP1CON2bits.SEN = 1;
while(SSP1CON2bits.SEN);
}

/* ストップコンディション */
void I2C_stop(){
    SSP1IF = 0;
    SSP1CON2bits.PEN = 1;
    while(SSP1CON2bits.PEN);
    SSP1IF = 0;
}

/* I2Cに1byte送信 */
void I2C_write(unsigned char dat){
    SSP1IF = 0;
    SSP1BUF = dat;
    while(!SSP1IF);
}

void Write_data(unsigned char data){
    I2C_start();
    I2C_write(LCD_addr);
    I2C_write(data | LCD_EN | LCD_BL);
    I2C_write(data | LCD_BL);
    I2C_stop();
    __delay_us(100);
}

void LCD_write(unsigned char bits,unsigned char mode){
    //send High 4bits
    Write_data((bits & 0xF0) | mode);
    //send Low 4bits
    Write_data(((bits << 4) & 0xF0) | mode);
}

void LCD_init(){
    LCD_write(0x33,LCD_CMD);
    LCD_write(0x32,LCD_CMD);
    LCD_write(0x06,LCD_CMD);
    LCD_write(0x0C,LCD_CMD);
    LCD_write(0x28,LCD_CMD);
    LCD_write(0x01,LCD_CMD);
    __delay_ms(1);
}

void LCD_clear(){
LCD_write(0x01,LCD_CMD);
__delay_ms(1);
}

void LCD_home(){
LCD_write(0x02,LCD_CMD);
__delay_ms(1);
}

void LCD_cursor(unsigned char x,unsigned char y){
    if (y == 0){
        LCD_write(LCD_LINE1+x,LCD_CMD);
    }
    if (y == 1){
        LCD_write(LCD_LINE2+x,LCD_CMD);
    }
}

void putch(unsigned char ch){
LCD_write(ch,LCD_CHR);
}

static unsigned int MeassuremmentCnt;

/*TMR2のオーバーフロー割り込み*/
void interrupt isr(){
    TMR2IF = 0;//TMR2割り込みフラッグクリア
    MeassuremmentCnt --;
    if (MeassuremmentCnt == 0){
        TMR1ON = 0;//ゲートを閉める。
        TMR2ON = 0;//TMR2を停止する。
    }
}

/*周波数測定*/
unsigned long FreqMeassurement(){
    static unsigned long freq;
    /*TIMERの初期化*/
    TMR1IF = 0; //TMR1割り込みフラッグクリア
    TMR1L = 0; //TMR1クリア
    TMR1H = 0;
    /*TMR2の初期化*/
    TMR2IF = 0; //TMR2割り込みフラッグクリア
    MeassuremmentCnt = 1221;
    TMR2 = 0x4C;
    /*counter 初期化*/
    freq = 0;
    /*割り込み許可*/
    PEIE = 1;
    GIE = 1;
    //count start
    TMR2ON = 1;
    /*gate time調整 NOP 25*/
    NOP();
    NOP();
    NOP();
    NOP();
    NOP();
    NOP();
    NOP();
    NOP();
    NOP();
    NOP();
    NOP();
    NOP();
    NOP();
    NOP();
    NOP();
    NOP();
    NOP();
    NOP();
    NOP();
    NOP();
    NOP();
    NOP();
    NOP();
    NOP();
    NOP();
    /*ゲートを開ける*/
    TMR1ON = 1;
    while(TMR2ON){
        if(TMR1IF == 1){
            TMR1IF = 0;
            freq ++;
        }
    }
    if(TMR1IF == 1){
        TMR1IF = 0;
        freq ++;
    }
    /*換算*/
    freq = freq * 65536;
    freq = freq + ((unsigned)TMR1H * 256) + (unsigned)TMR1L;

    return(freq);
}

void main() {
    ANSELA = 0b00000000 ;     // AN0-AN4は使用しない
    ANSELB = 0b00000000 ;     // AN5-AN11は使用しない
    TRISA = 0b10000000 ;     // RA7は入力他は出力（RA5は入力）
    TRISB = 0b01010010 ;     // RB1(SDA),RB4(SDA),RB6は入力他は出力
    PORTA = 0b00000000 ;     // PORTA初期化
    PORTB = 0b00000000 ;     // PORTB初期化

    I2C_init();
    LCD_init();
    LCD_cursor(12,0);
    printf("Hz");

     /*TMR2の設定*/
    TMR2IE = 1;     //TMR2割り込み許可
    TMR2IF = 0;     //TMR2割り込みフラッグクリア
    T2OUTPS0 = 0;   //TMR2 output poststscaler 1:1
    T2OUTPS1 = 0;
    T2OUTPS2 = 0;
    T2OUTPS3 = 0;
    TMR2ON = 0;     //TMR2 off
    T2CKPS0 = 0;    //TMR2 prescaler 1:16
    T2CKPS1 = 1;
    TMR2 = 0;       //TMR2 clear

    /*TMR1の設定*/
    TMR1IE = 0;     //TMR1割り込み禁止
    TMR1IF = 0;     //TMR1割り込みフラッグクリア
    T1CKPS0 = 0;    //TMR1 prescaler 1:1
    T1CKPS1 = 0;
    T1OSCEN = 0;    //TMR1 Clock source = T1CKI
    TMR1CS1 = 1;
    TMR1CS0 = 0;
    nT1SYNC = 1;
    TMR1ON = 0;     //TMR1 stop
    TMR1L = 0;      //TMR1 clear
    TMR1H = 0;

    while(1){
    /*周波数の測定*/
    LED = 1;//RA4 LED ON
    unsigned long frequency = FreqMeassurement();
    LED = 0;//RA4 LED OFF
    LCD_cursor(2,0);
    printf("%9ld",frequency);
    __delay_ms(500);
    }

}

KCJ トップバンドコンテスト結果

Mon, 01 Apr 2019 09:06:34 +0900

　2月9日～10日に開催されたKCJトップバンドコンテストの結果が、今朝メールで届きました。

　届いたのは、当局の照合結果ですが、KCJのホームページに全体の結果が発表されていました。

　https://www.kcj-cw.com/contest/19_toptest_result_j.pdf

　当局JH7UBCの結果は、全国23位（171局中）、福島県1位（5局中）でした。

　初めての参加でしたので、まずまずの結果だと思います。

　しかし、当局が相手局コールサインをミスコピーしたのが3局ありました。

　まだまだですね。

　来年も頑張ろうと思います。

PIC16F1827 PWM テスト

Sat, 30 Mar 2019 13:51:18 +0900

　PIC16F1827は、CCP1からCCP4の4つのMWP出力を持っています。

　PWMの動作原理は、JH7UBCホームページのPIC16F628A PWM テストの記事をご覧ください。

　PWMのPeriod(周期)とDuty Cycle、Duty比は、次の式で設定します。

　テストとして、CCP3に1000Hz(周期1ms=1×10^-3s)　デューティ比50%のPWM信号を出力してみます。

　PICのクロックは、内臓クロック8MHz(Tosc=1/8×10^6)とし、Timerは、Timer2を使います

　上記の式からPWM周期を決定するTimer2のPR2の値は

PR2 = Period / (4×Tosc × TMR2Prescale Value) - 1= 1×10^-3/(4×(1/8×10^6)×TMR2 Prescale Value) -1

= 2×10^3/TMR2 Prescale Value　　となります。

TMR2のプリスケーラの値によってPR2の値は次のようになります。

　Prescale Value PR2

1 1999

4 499

16 124

　PR2レジスタは8bitですから0～255の値でなければなりませんので

Prescale Value = 16 PR2 = 124 となります。

　デューティ比を50%としますので、CCPR3L = (PR2 + 1)/2 = 125/2 = 62 となります。

　プログラムです。

　CCP3CONレジスタのbit3:2=11でPWM modeに設定し、bit1:0=00で出力をactive highに設定します。

　CCPTMRSレジスタのbit5:4=00でCCP3にTMR2を割り当てます。

　T2CONレジスタのbit1:0=10でプリスケーラ値を1:16に設定します。同じT2CONレジスタのbit2=1とするとTMR2が有効になり、PWM信号が出力されます。

　実際に出力されたPWM信号の周波数を測定してみました。

　998Hzでした。誤差２％というところです。

　#include <stdio.h>
#include <stdlib.h>
#include <xc.h>

// CONFIG1
#pragma config FOSC = INTOSC
#pragma config WDTE = OFF
#pragma config PWRTE = ON
#pragma config MCLRE = OFF
#pragma config CP = OFF
#pragma config CPD = OFF
#pragma config BOREN = ON
#pragma config CLKOUTEN = OFF
#pragma config IESO = OFF
#pragma config FCMEN = OFF

// CONFIG2
#pragma config WRT = OFF
#pragma config PLLEN = OFF
#pragma config STVREN = ON
#pragma config BORV = HI
#pragma config LVP = OFF

#define _XTAL_FREQ 8000000 //クロック8MHz

void main() {
    OSCCON = 0b01110010 ;     // 内蔵クロック8MHz
    ANSELA = 0b00000000 ;     // AN0-AN4は使用しない。全てデジタルポート
    ANSELB = 0b00000000 ;     // AN5-AN11は使用しない。全てデジタルポート
    TRISA = 0b00000000 ;     // PORTAは全て出力（ RA5は入力のみ）
    TRISB = 0b00000000 ;     // RORTBは全て出力
    PORTA = 0b00000000 ;     // PORTA初期化
    PORTB = 0b00000000 ;     // PORTB初期化

    /* PWMに関する設定
     * CCP3(RA3,2番ピン)を使う
     * PWMの周波数は、1000Hz(周期は1ms)
     * デューティ比は、50%とする
     */

    CCP3CON = 0b00001100;   //PWM mode P3A,P3C active high,P3B,P3D active high
    CCPTMRS = 0b00000000;   //bit5-bit4=00,CCP3にTimer2を割り当てる
    PR2 = 124;              //Timer2の周期を設定
    CCPR3L = 62;            //デューティ比 50%
    T2CON = 0b00000110;     //prescale 1:16 Timer2 start

    while(1){

    }

}

PIC16F1827 AD9834DDS VFO

Wed, 27 Mar 2019 15:13:19 +0900

　先日製作した3.5/7MHz SDRフロントエンドと組み合わせて実際の交信をしてみようと思い、7MHzのCW送信機を作ろうと思います。

　まず、AD9834DDSをPIC16F1827でコントロールして7MHz VFOを作ります。

　PIC16F883+AD9834 VFOのプログラムをPIC16F1827用に若干変更し、ロータリーエンコーダは、IOC割り込みを利用した方法にしました。

　回路図です。

ブレッドボードです。

AD9834DDSの出力の波形です。

参考までに、プログラムです。

-----------------------------------------

/*
* File: main.c
* Author: JH7UBC Keiji Hata
* PIC16F1827_AD9834_VFO
* Created on 2019/03/27
*/

#include <stdio.h>
#include <stdlib.h>
#include <xc.h>

// CONFIG2
#pragma config WRT = OFF
#pragma config PLLEN = ON
#pragma config STVREN = ON
#pragma config BORV = HI
#pragma config LVP = OFF

#define _XTAL_FREQ 32000000 //クロック32MHz

/* ロータリーエンコーダ関係定義*/
#define ECA RB6 //エンコーダA
#define ECB RB7 //エンコーダB
unsigned char EA;
unsigned char EB;
volatile unsigned char curDat;
volatile unsigned char befDat;
volatile signed char count= 0;

/* STEP関係設定 */
unsigned int Step = 1000; //STEP初期値
#define STEP_SW RB5

/* AD9834DDS関係定義 */
#define FSYNC RA0
#define SCLK RA1
#define SDATA RA2
unsigned long Freq = 7000000; //周波数初期値
unsigned long Freq_old; //周波数の前の値
const unsigned long Fre_Hi = 7200000; //周波数上限
const unsigned long Fre_Lo = 7000000; //周波数下限

/* I2C 初期化*/
void I2C_init(){
    SSP1CON1 = 0x28;        //SSPEN = 1,I2C Master Mode
    SSP1STATbits.SMP = 1;   //標準速度モード(100KHz)
    SSP1ADD = 0x4F;         //Fosc/(4*Clock)-1 Clock=100kHz,Fosc=32MHz
}

/* スタートコンディション */
void I2C_start(){
SSP1CON2bits.SEN = 1;
while(SSP1CON2bits.SEN);
}

/* ストップコンディション */
void I2C_stop(){
    SSP1IF = 0;
    SSP1CON2bits.PEN = 1;
    while(SSP1CON2bits.PEN);
    SSP1IF = 0;
}

/* I2Cに1byte送信 */
void I2C_write(unsigned char dat){
    SSP1IF = 0;
    SSP1BUF = dat;
    while(!SSP1IF);
}

void Write_data(unsigned char data){
    I2C_start();
    I2C_write(LCD_addr);
    I2C_write(data | LCD_EN | LCD_BL);
    I2C_write(data | LCD_BL);
    I2C_stop();
    __delay_us(100);
}

void LCD_write(unsigned char bits,unsigned char mode){
    //send High 4bits
    Write_data((bits & 0xF0) | mode);
    //send Low 4bits
    Write_data(((bits << 4) & 0xF0) | mode);
}

void LCD_clear(){
LCD_write(0x01,LCD_CMD);
__delay_ms(1);
}

void LCD_home(){
LCD_write(0x02,LCD_CMD);
__delay_ms(1);
}

void LCD_cursor(unsigned char x,unsigned char y){
    if (y == 0){
        LCD_write(LCD_LINE1+x,LCD_CMD);
    }
    if (y == 1){
        LCD_write(LCD_LINE2+x,LCD_CMD);
    }
}

void putch(unsigned char ch){
LCD_write(ch,LCD_CHR);
}

void Freq_disp(unsigned long frequency){
LCD_home();
printf("%8ld",frequency);
}

void Step_disp(unsigned int stp){
LCD_cursor(4,1);
printf("%4d",stp);
}

void Step_change(){
    __delay_ms(5);
    if(Step == 10){
        Step = 1000;
    }else{
    Step = Step/10;
    }
    Step_disp(Step);
    while(!STEP_SW){
    __delay_ms(5);
    }
}

/* AD9834DDSに16ビット送信 */
void Data_send(unsigned long data){
    for(unsigned char i = 0;i<16;i++){
        if(data & 0x8000){
            SDATA = 1;
        }else{
            SDATA = 0;
        }
        __delay_us(1);
        SCLK = 0;
        __delay_us(1);
        SCLK = 1;
        data <<= 1;
    }
}

/* AD9834DDSに周波数データを送る */
void Fnc_DDS(unsigned long frequency){
    unsigned long wrk = frequency << 2;
    unsigned int wrk1,wrk2,wrk3;

    wrk1 = 0x2000;          //コントロールワード
    wrk2 = wrk & 0x3fff;    //周波数データ下位
    wrk2 = wrk2 | 0x4000;
    wrk3 = wrk >> 14;
    wrk3 = wrk3 & 0x3fff;   //周波数データ上位
    wrk3 = wrk3 | 0x4000;
    SCLK = 1;
    FSYNC = 0;
    Data_send(wrk1);
    Data_send(wrk2);
    Data_send(wrk3);
    FSYNC = 1;
}

void interrupt isr(){
    IOCIF = 0;   //割り込みフラッグクリア
    IOCBF6 = 0;
    IOCBF7 = 0;
    __delay_ms(2);
    curDat = ECA + (ECB<<1);
    if (befDat != curDat){
        unsigned char d = ((befDat<<1)^curDat) & 3; //回転方向判定
        if(d < 2){
            count++;
        }else{
            count--;
        }
        befDat = curDat;
    }
    if(count >= 4){
        Freq += Step;
        count = 0;
    }else if(count <= -4){
        Freq -= Step;
        count = 0;
    }
}

void main(){
    OSCCON = 0b01110000 ;     // 内部クロック８ＭＨｚ
    ANSELA = 0b00000000 ;     // AN0-AN4は使用しない
    ANSELB = 0b00000000 ;     // AN5-AN11は使用しない
    TRISA = 0b00000000 ;     // PORTAは全て出力（RA5は入力）
    TRISB = 0b11110010 ;     // RB1(SDA),RB4(SDA),RB5,RB6(REA),RB7(REB)は入力他は出力
    PORTA = 0b00000000 ;     // PORTA初期化
    PORTB = 0b00000000 ;     // PORTB初期化
    OPTION_REGbits.nWPUEN=0; // ウィークプルアップ許可
    WPUB = 0b11100000;        // RB5,RB6,RB7をプルアップ

    /* IOC割り込み設定 */
    IOCBN = 0b11000000;     //RB6,RB7立下り割り込み設定
    IOCBP = 0b11000000;     //RB6,RB7立ち上がり割り込み設定
    IOCIE = 1;              //IOC割り込み許可
    GIE = 1;                //全割り込み許可

    I2C_init();             //I2C初期化
    LCD_init();             //LCD初期化

    /* Roatry Encoder 初期値 */
    EA = ECA;
    EB = ECB;
    befDat = EA + (EB<<1);

    /* 初期表示と初期周波数設定 */
    LCD_cursor(9,0);
    printf("Hz");
    Freq_disp(Freq);
    Fnc_DDS(Freq);
    LCD_cursor(0,1);
    printf("STEP");
    Step_disp(Step);


    while(1){
        if(STEP_SW == 0){
            Step_change();
        }
        if(Freq != Freq_old){
            if(Freq < Fre_Lo)Freq = Fre_Lo;
            if(Freq > Fre_Hi)Freq = Fre_Hi;
            Fnc_DDS(Freq);
            Freq_disp(Freq);
            Freq_old = Freq;
        }
    }
}

SDRフロントエンドの簡易ケーシング

Sun, 24 Mar 2019 19:14:04 +0900

　先日、実験をした7MHz/3,5MHzのSDRフロントエンドをユニバーサル基板に組み、アルミ板を折り曲げた簡易ケースに納めました。

　シンプルな構成のフロントエンドですが、何とか実用になると思います。

　このフロントエンド＋パソコン（SDRソフトはRocky）で受信機とし、簡単な送信機と組み合わせて、QRP運用をしてみたいと考えています。

Python 2 から Python3へ

Thu, 21 Mar 2019 23:07:49 +0900

　Raspberry Pi3 MODELBに3.5インチLCDを取り付けたのをきっかけに、再びPython（パイソン）の勉強を始めました。

　今までは、Python2を使っていたのですが、最新のRspbianを導入してみるとPython3になっていました。

　この1年半のうちにラズパイもPythonも進化しているようです。Python3ライブラリも充実し、Python 3 の方が標準になってきたようです。こちらもPython3に移行することにしました。

　以前に作ったPython2用のスクリプトが、Python3では、そのままでは動かなくなりました。

　まず、頻繁に使用するprint文がPython3では、関数化され、いろいろなことができるようになっています。

　変わらない部分も多くありますが、２から３で変わった部分もあり、勉強をしながらプログラミングの練習で

　「数あてゲーム」を作ってみました。

　なお、Pythonの勉強には、次のサイトが役に立ちます。サイトの解説者に感謝します。

　Python-izm

　 Qiita

　数あてゲームのスクリプト（4桁の異なる数字の未知数をあてるゲームです）

　main program中で""" """でコメントアウトしてある部分を解除すると未知数を表示させることができます。

プログラムのチェックに使えます。

-----------------------------------------------

"""
数あてゲーム
2019.3.17
JH7UBC Keiji Hata
"""
import random

r=[0,0,0,0]
a=""

#乱数を発生させる
def ransu():
for i in range(4):
r[i] = random.randint(0,9)

#全て違う数字4桁の乱数を発生させる
def michisu():
    flag=1
    while flag:
        flag=0
        ransu()
        for i in range(4):
            for j in range(i+1,4):
                if r[i] == r[j]:
                    flag = 1
    print('X = ????')

#4桁の数字を入力（全て違う数値）
def nyuryoku():
    global a
    flag = 1
    global count
    while flag:
        flag = 0
        print('{}回目' .format(count))
        a=input('X = ')
        for i in range(4):
            for j in range(i+1,4):
                if a[i] == a[j]:
                    flag =1
        if flag == 1:
            print('もう一度')

#合っている数字を数える
def num_check():
#数字が合っている数
    global xcount
    xcount = 0
    for i in range(4):
        for j in range(4):
            if a[i]==str(r[j]):
                xcount += 1

#位置が合っている数
    global ycount
    ycount = 0
    for i in range(4):
        if a[i] == str(r[i]):
            ycount += 1


#main program
try:
    print('*** 数あてゲーム ***')
    print(' 強制終了は ctrl+C')
    print()

    gflag = 1
    while gflag:
        sflag = 1
        count = 1
        michisu()
        """
        for i in range(4):
            print(r[i],end='')
        print()
        print()
        """
        while sflag:
            nyuryoku()
            num_check()
            print('('+str(xcount)+','+str(ycount)+')')
            print()
            if (xcount==4)and(ycount==4):
                print('正解です！')
                sflag = 0
                replay = input('ゲームを続けますか(y/n)')
                if (replay == 'y') or (replay == 'Y') :
                    pass
                else:
                    gflag = 0
                    print('また遊んでね！')
            else:
                count += 1

except KeyboardInterrupt:
pass

クロッカスが咲いた

Wed, 20 Mar 2019 22:14:10 +0900

　畑の雪がほとんど解けました。畑の隅でクロッカスが咲き始めました。

　昨年より、2週間早い開花です。

　この分で行くと桜も早く咲きそうです。

ラズパイ用3.5インチLCD

Sun, 10 Mar 2019 19:54:02 +0900

　1年半ぶりにRaspberry Pi3 ModelBを引っ張り出してきました。

　ネット上で評判が良いQuimatの3.5インチLCDディスプレイを購入しました。Amazonでケース付きで3,320円でした。

　品物が到着して、さっそくラズパイにせつぞくしてみました。ネット上の情報では、そのままラズパイのディスクトップ画面が表示されるとのこと。

　ところが

　虹色の画面になって、立ち上がりません。

　しばらくラズパイを使ってやらなかったので、ラズパイがへそを曲げたのかもしれませんね。Hi

　ネットで調べると電源電圧が低いか、Kernel.imgのブートに失敗した場合にこの虹色画面になるようです。

　電源は、5V　2.5Aで、電圧を測定しても問題ありません。

　次にmicroSDカードを調べると読み込みはできますが、書き込み禁止状態になっていて、書き込みもフォーマットもできません。どうやらmicroSDカードの異常のようです。

　そこで、新品のmicroSDカードを購入して、Raspberry の再セットアップを行いました。

　2年前にこの作業を行っているのですが、Raspbianのバージョンも上がっていますので、こちらのサイトを参考にセットアップを行いました。たいへん参考になりました。ありがとうございました。

　RaspbianをmicroSDにコピーしてセットすると無事立ち上がりました。（ホッ）

　先ほどのサイトを参考に初期設定とupdateをしました。

　が・・・・、このアップデートがものすごーーーく時間がかかりました。なんと3時間くらいかかりました。

　ラズパイ・オリジナルのサーバーでは、このように時間がかかるので、皆さんミラーサーバーを使っているようです。

　update WiFi設定が終わり、QuimatのLCDを接続すると無事ディスクトップ画面が表示されました。

　解像度の調整とタッチパネルの設定をして一応完了です。

　解像度は最初、800× 600に設定したのですが、「字が小さくて読めない！」ので

　640×400に設定ました。

　これで、重いディスプレイを持ってこなくともラズパイで遊べるようになりました。

　思い出すために少しこのまま遊んで、その後SDRソフトを動かして先日実験したSDRフロントエンドと組み合わせて、SDR受信機にする実験をしたいと思っています。

PIC16F1827 シリアル通信テスト

Wed, 06 Mar 2019 13:51:38 +0900

　PIC16F1827のシリアル通信のテストをします。

　PIC16F1827では、シリアル通信に使うピンを選ぶことができます。

　TXピンの選択は、APFCON1レジスタのTXCKSELで行い、TXCKSEL=0でRB2が、TXCKSEL=1でRB5が選択されます。

　RXピンの選択は、APFCON0レジスタのRXDTSELで行い、RXDTSEL=0でRB1が、RXDTSEL=1でRB2が選択されます。

　今回は、TXCKSEL=0,RXFTSEL=0として、TX=RB2,RX=RB1とします。

　回路です。

　USBシリアル変換モジュールFT234Xを接続して、パソコンの通信ソフトTeraTermとの間での通信をテストします。

　ブレッドボードです。

　クロックは最高速度32MHzで動作させ、Baud Rate Generatorの設定は、BRGH=1,BRG16=1としました。

　TeraTermとの通信テストでは、300bps～230400bpsで通信可能でした。

　プログラムです。

TeraTermから送られた文字を受信し、同じ文字を送り返す、いわゆるエコーバックのプログラムです。

-------------------------------------

#include <stdio.h>
#include <stdlib.h>
#include <xc.h>

// CONFIG2
#pragma config WRT = OFF
#pragma config PLLEN = ON
#pragma config STVREN = ON
#pragma config BORV = HI
#pragma config LVP = OFF

#define _XTAL_FREQ 32000000 //クロック32MHz

/* TX=RB2,RX=RB1に設定
*
*/

void serial_init(unsigned long BR){
    TXSTA = 0x24;   //SYNC=0 TXEN = 1 BRGH = 1
    BRG16 = 1;      //BRG 16bit mode
    RCSTA = 0x90;   //非同期、継続受信可
    unsigned int X= _XTAL_FREQ/BR/4 - 1;
    SPBRGH = X / 256;
    SPBRGL = X % 256;
}

void putch(unsigned char byte){
while(!TXIF);
TXREG = byte;
}

unsigned char getch(){
while(!RCIF);
return RCREG;
}

unsigned char getche(){
    unsigned char c;
    c = getch();
    putch(c);
    return c;
}

void main() {
    OSCCON = 0b01110000 ;     // 内部クロック８ＭＨｚ PLL ONで8×4=32MHz
    ANSELA = 0b00000000 ;     // AN0-AN4は使用しない
    ANSELB = 0b00000000 ;     // AN5-AN11は使用しない
    TRISA = 0b00000000 ;     // PORTAは全て出力（RA5は入力）
    TRISB = 0b00000010 ;     // RB1(RX) 入力　他は出力
    PORTA = 0b00000000 ;     // PORTA初期化
    PORTB = 0b00000000 ;     // PORTB初期化
    /* USARTの設定 */
    TXCKSEL = 0;            // TX=RB2
    RXDTSEL = 0;            // RX=RB1

    serial_init(9600);      // Serial通信初期化とBaud Rateの設定

    while(1){
        getche();
    }

}