PIC12F1822で間欠ブザー

３０秒ごとにブザーならすタイマーをPICで作ってみた。TTP223と2sc1815で電源オンオフ、電子ブザーはPICのRA2で出力してみた。電源はボタン電池で常時TTP223を待機状態にしておくけれど、ほとんど消費しないらしいので、これで試してみたい。なお省エネのため、TTP223のLEDは取り外した。かわりにブザーを１secごとに1msならして、電源状態確認できるようにした。

  #include <xc.h> #define _XTAL_FREQ 4000000 // delay用に必要(クロック4MHzを指定) // コンフィギュレーション１の設定 #pragma config FOSC = INTOSC // 内部ｸﾛｯｸ使用する(INTOSC) #pragma config WDTE = OFF // ｳｵｯﾁﾄﾞｯｸﾞﾀｲﾏｰ無し(OFF) #pragma config PWRTE = ON // 電源ONから64ms後にﾌﾟﾛｸﾞﾗﾑを開始する(ON) #pragma config MCLRE = OFF // 外部ﾘｾｯﾄ信号は使用せずにﾃﾞｼﾞﾀﾙ入力(RA3)ﾋﾟﾝとする(OFF) #pragma config CP = OFF // ﾌﾟﾛｸﾞﾗﾑﾒﾓﾘｰを保護しない(OFF) #pragma config CPD = OFF // ﾃﾞｰﾀﾒﾓﾘｰを保護しない(OFF) #pragma config BOREN = ON // 電源電圧降下常時監視機能ON(ON) #pragma config CLKOUTEN = OFF // CLKOUTﾋﾟﾝをRA4ﾋﾟﾝで使用する(OFF) #pragma config IESO = OFF // 外部・内部ｸﾛｯｸの切替えでの起動はなし(OFF) #pragma config FCMEN = OFF // 外部ｸﾛｯｸ監視しない(OFF) // コンフィギュレーション２の設定 #pragma config WRT = OFF // Flashﾒﾓﾘｰを保護しない(OFF) #pragma config PLLEN = OFF // 動作クロックを32MHzでは動作させない(OFF) #pragma config STVREN = ON // スタックがオーバフローやアンダーフローしたらリセットをする(ON) #pragma config BORV = HI // 電源電圧降下常時監視電圧(2.5V)設定(HI) #pragma config LVP = OFF // 低電圧プログラミング機能使用しない(OFF) // メインの処理関数 void main() { OSCCON = 0b01101010 ; // 内部クロックは４ＭＨｚとする ANSELA = 0b00000000 ; // アナログは使用しない（すべてデジタルI/Oに割当てる） TRISA = 0b00001000 ; // ピンは全て出力に割当てる(RA3は入力のみとなる) PORTA = 0b00000000 ; // 出力ピンの初期化(全てLOWにする) unsigned int count=0 ; //represents seconds unsigned int i; // 約1s毎にLEDの点滅を繰り返す while(1) { if(count>=30*2000){ count=0; } if(count%30 == 0){ //per 30sec for(i=0;i<4;i++){ RA2 = 1 ; __delay_ms(50); RA2 = 0 ; __delay_ms(950); count++; } for(i=0;i<3;i++){ RA2 = 1 ; __delay_ms(50); RA2 = 0 ; __delay_ms(50); } __delay_ms(700); count++; }else{ //usually count++; RA2 = 1 ; __delay_ms(1) ; RA2 = 0 ; __delay_ms(1000) ; } } }

　最初、TTP223がオフの状態でもブザーがかすかに音するので、なぜかと思ったら、PICのアースはコレクタに、ブザーのアースは電源のアースにつないでいたためだった。内部抵抗による微妙な電位差が原因かと思われます。

　PICとブザーのアースをどちらもトランジスタのコレクタにつなぐことで解決した。

PIC12F675のタイマー修正

 以前つくったタイマーのコード修正してみた。すでにＰＩＣを基板に半田づけしてしまったが、PicKITに合わせてコネクタをつけてPICにエナメル線で配線しなんとか、書き込みできるようにしてみた。コードを少し変更して、時間ずれも調整してみた。１割ほど時間が短いので、11/10をかけてみた。だいぶ正確になる。

#include <xc.h> // PIC12F675 コンフィグビット #pragma config FOSC = INTRCIO // 内部クロック #pragma config WDTE = OFF // ウォッチドッグ無効 #pragma config PWRTE = ON // パワーアップタイマ有効 #pragma config MCLRE = OFF // MCLRピン無効 #pragma config CP = OFF // プログラム保護無効 #pragma config CPD = OFF // データEEPROM保護無効 #pragma config BOREN = OFF // ブラウンアウト無効 #define _XTAL_FREQ 4000000UL // 内部クロック 4MHz unsigned int minutes = 0; unsigned int counts = 0; unsigned int t0_sec = 0; // Timer0 割り込み回数カウンタ unsigned int setflg=0; // Timer0 初期化 void timer0_init(void) { OPTION_REG = 0b10000111; // プリスケーラー 1:256 TMR0 = 6; // オーバーフローまで 250 カウント INTCON = 0b10100000; // GIE=1, T0IE=1, T0IF=0 } // Timer0 割り込み void __interrupt() isr(void) { if (T0IF) { TMR0 = 6; // 再セット T0IF = 0; // 割り込みフラグクリア t0_sec++; if(t0_sec >= 16) { // 16回の割り込みで約1秒 counts++; t0_sec = 0; } } } void main(void) { ANSEL = 0; // アナログ入力無効 TRISIO = 0b00001000; // GP3入力、他出力 GPIO = 0; timer0_init(); // Timer0 初期化 minutes = 0; counts = 1; setflg=0; while(1) { if (GP3 == 0 && setflg ==0) { // while button_pushed __delay_ms(500); GPIO2 = 1; __delay_ms(250); GPIO2 = 0; __delay_ms(250); minutes++; } if(GP3 == 1 && setflg == 0 && minutes > 0) {//at set_complete __delay_ms(500); for(unsigned int i = 0; i < minutes; i++) { GPIO2 = 1; __delay_ms(250); GPIO2 = 0; __delay_ms(250); } setflg = 1; counts = 0; // カウントリセット } if(counts >= (10*60*minutes*11)/10 && setflg ==1) { //10% adjustment if(counts % 2 == 0) GPIO2 = 1; // 偶数秒だけON else GPIO2 = 0; // 奇数秒OFF } } }

PIC12F1822のCPS 再挑戦

 静電気測定ということで、PICのCPSを内臓クロックで使ってみたが、温度の影響のためか、変動が大きい気がしたので、12MHzのXtalを使ってみた。ヤフオクで、10pfコンデンサと一緒に購入。

// CONFIG1 #pragma config FOSC = HS // Oscillator Selection　※ #pragma config WDTE = ON // Watchdog Timer Enable (WDT enabled) #pragma config PWRTE = OFF // Power-up Timer Enable (PWRT disabled) #pragma config MCLRE = OFF // MCLR Pin Function Select (MCLR/VPP pin function is digital input) #pragma config CP = OFF // Flash Program Memory Code Protection (Program memory code protection is disabled) #pragma config CPD = OFF // Data Memory Code Protection (Data memory code protection is disabled) #pragma config BOREN = ON // Brown-out Reset Enable (Brown-out Reset enabled) #pragma config CLKOUTEN = OFF // Clock Out Enable (CLKOUT function is disabled. I/O or oscillator function on the CLKOUT pin) #pragma config IESO = ON // Internal/External Switchover (Internal/External Switchover mode is enabled) #pragma config FCMEN = ON // Fail-Safe Clock Monitor Enable (Fail-Safe Clock Monitor is enabled) // CONFIG2 #pragma config WRT = OFF // Flash Memory Self-Write Protection (Write protection off) #pragma config PLLEN = ON // PLL Enable (4x PLL enabled) #pragma config STVREN = ON // Stack Overflow/Underflow Reset Enable (Stack Overflow or Underflow will cause a Reset) #pragma config BORV = LO // Brown-out Reset Voltage Selection (Brown-out Reset Voltage (Vbor), low trip point selected.) #pragma config LVP = OFF // Low-Voltage Programming Enable (Low-voltage programming enabled) ****off for use RA3 #include <xc.h> #include <stdio.h> #include <stdlib.h> #include <string.h> // クロック周波数指定 //-------------------------------------------------------------- #define _XTAL_FREQ 12000000 //※ #define LCD_addr 0x7C // プロトタイプ宣言 //-------------------------------------------------------------- void I2C_init(void); void I2C_start(void); void I2C_stop(void); void I2C_write(unsigned char dat); void LCD_cmd(unsigned char cmd); void LCD_char(unsigned char dat); void LCD_init(void); void LCD_clear(void); void LCD_home(void); void LCD_cursor(unsigned x,unsigned y); int calc_pF(int cap); /*　　 　　　　　 　 12F1822 * ?????? * VDD ?| 1 8 |? VSS * Xtal RA5 ?| 2 7 |? AN0/RA0 CPS * Xtal AN3/RA4 ?| 3 6 |? AN1/RA1/SCL → LCD(SCL) * reserve RA3 ?| 4 5 |? AN2/RA2/SDA → LCD(SDA) * ?????? */ int calc_pF( int cx) { if (cx == 0) return 0; // 60000/cx を四捨五入で計算（端数処理） unsigned long t1 = (60000UL + (cx / 2)) / cx; // 0.02 * cx = cx / 50 unsigned int t2 = cx / 50u; int v = (int)t1 - (int)t2; if (v < 0) v = 0; // 0未満は0にクリップ return v; } void main(void) { char s[8] ; unsigned cap ; // OSCCON = 0b01110010 ; // 内部クロックは8ＭＨｚとする ※ ANSELA = 0b00000001 ; // ※ TRISA = 0b00111111; // 1:input 0:output ※ PORTA = 0b00000000 ; // 出力ピンの初期化(全てLOWにする) // 容量検知モジュール(ＣＰＳＭ)の設定 CPSCON0 = 0b00001000 ; // オシレータは中範囲(中速の発信周波数)で利用する CPSCON1 = 0b00000000 ;// CPS0 in　※ // タイマー１の設定 T1CON = 0b11000001 ; // 容量検知オシレータでTIMER1をｶｳﾝﾄする、ﾌﾟﾘｽｹｰﾗｶｳﾝﾄ値 1:1 TMR1H = 0 ; // タイマー1の初期化 TMR1L = 0 ; PEIE = 1 ; // 周辺装置割り込みを許可する GIE = 1 ; // 全割り込み処理を許可する CPSON = 1 ; // 容量検知モジュール開始 //---------------------------------------------------------- // シリアル通信（I2C）初期設定 //---------------------------------------------------------- SSP1STAT = 0b10000000; // 標準モード(100kHz) SSP1CON1 = 0b00101000; // マスター（制御する側）に設定 SSP1ADD = 0b00011101; //※ // ディスプレイの初期化 LCD_init(); // RA5=1; //LED On ※ LCD_cmd(0x80); // １列目に表示 printf("cap count:"); // ２列目に表示 LCD_cmd(0xC0); printf("Initializing.."); while (1) { LCD_cmd(0xC0); printf("%5d pf(%5d)",calc_pF(cap),cap); CPSON = 0 ; // 容量検知モジュール停止 cap =(unsigned) (TMR1H*256) + TMR1L ; // カウント値を読み込む TMR1H = 0 ; // タイマー1の初期化 TMR1L = 0 ; CPSON = 1 ; __delay_ms(100) ;　//※ } return; } void I2C_start() { SEN = 1; while(SEN); } void I2C_stop() { SSP1IF = 0; PEN = 1; while(PEN); SSP1IF = 0; } void I2C_write(unsigned char dat) { SSP1IF = 0; SSP1BUF = dat; while(!SSP1IF); } void LCD_init() { __delay_ms(40); //40ms wait LCD_cmd(0x38); //8bit,2line LCD_cmd(0x39); //IS=1 : extention mode set LCD_cmd(0x14); //Internal OSC Frequency LCD_cmd(0x73); //Contrast set Lower4bits...(1)　※ LCD_cmd(0x55); //Power/ICON/Contrast Control Lower2bits...(2) (2)(1)=64bit step　※ LCD_cmd(0x6C); //Follower control __delay_ms(200);//200ms wait LCD_cmd(0x38); //IS=0 : extention mode cancel LCD_cmd(0x0C); //Display ON LCD_cmd(0x01); //Clear Display __delay_ms(2); //wait more than 1.08ms } void LCD_cmd(unsigned char cmd) { I2C_start(); I2C_write(LCD_addr); I2C_write(0x00); // 0x00（コマンドの送信を示すbit） I2C_write(cmd); I2C_stop(); } void putch(unsigned char text) { I2C_start(); I2C_write(LCD_addr); I2C_write(0x40); // 0x40（データの送信を示すbit） I2C_write(text); I2C_stop(); } //※が変更部分

・配線は混乱してきたので、基板を新しくして配線しなおす。

・RA4とRA5をXtalにつなぐため、CPSはRA0に変更したり、周波数も変わるため、ANSELA、TRISA,CPSCON1,SSP1ADDなどの設定を慎重に変更する必要があった。

・XtalをRA4とRA5に接続したら、この２か所に２個10pFをつないでアース。

・TTP223は消費電力が少ないようなので、電池に常時つないで、トランジスタスイッチを動作させることにした。2sc1815使用。電源はエネループ３本。

　タッチしたときだけ、LCDが表示されるようになった。以前は、ボタンスイッチの接触不良があって使いにくかったが、これだとストレスなく使える。

・当初、灯油残量センサに使う予定だったが、ESP32だけで間に合いそうだったので、最終的には容量測定器にしてみた。pF=60000/cps-0.02*cpsという近似式を使ってみた。30pF~20000pFぐらいの範囲で、ある程度の目安としては使えることを確認した。本来反比例になるはずだけれど、容量が小さくなると誤差が出やすくなるようで、-0.02*cpsで補正。

Qtで、UIデザイナでMainWIndowにWidgetを配置する

 C#とは、コントロール（Widget）の配置の仕方が違うので少しとまどいました。

別ウインドウに表示はしやすいのですが、メインウインドウ内に配置するには、レイアウトの指定が必要なようです。

MainWindow::MainWindow(QWidget *parent)
    : QMainWindow(parent)
    , ui(new Ui::MainWindow)
{
    ui->setupUi(this);
    table = new KakeiboTable(); // 親は addWidget() で設定されるので不要
    ui->centralwidget->layout()->addWidget(table);
}

上記コードだけでは、エラーになります。centralwidgetにテーブルビューを配置したい場合は、cetnralwidgetをオブジェクトインスペクタで選択したら、メニュー＞フォームエディタから、レイアウトの方法を指定する必要がありました。ここらへんは、Qt独特のところで慣れが必要なところかもしれません。

あとはmain.cppで
    MainWindow *w = new MainWindow();
    w->show(); 

とするだけで、Widgetが配置されたメインウインドウを表示できます。

Git復習

cloneせずに、zipから展開してwinPCでQtをビルドしたりしたので、gitの整合性がとれずとまどう。（こういうときはcloneするのが基本かも）

今回のようにしてしまったら、修正には、ちょっと手間がかかる。

stash → 作業中の変更を一時退避して安全にする
fetch → リモートの最新履歴を取得
reset --hard → ローカルの土台をリモートに合わせる
stash pop → 退避していた変更を土台の上に戻す
commit → 作業を正式にコミット
push → 安全にリモートに反映

まだ、gitよくわかってないところも多いけれど、失敗しながら慣れていくしかないようだ。

Qtのクロスプラットフォームでの開発 覚書

 github経由で、winでもlinuxでもコードを開発できるようにするには

安全なクロスOS運用の基本手順
git fetch                # 最新のリモート状態を確認
git pull                 # ローカルブランチに統合（最新化）
# ↓ コード修正（Linux/Windowsどちらでも同じ）
できたらpush

🔹 注意点
改行コードや文字コードの吸収
Git: .gitattributes に * text=auto
Qt: Qt::endl / QTextStream を使う
pull前にfetchで確認

QtCreatorをLinux Mintにいれてみた ~Flatpakについての覚書~

Flatpakでインストールした場合、サンドボックス化されているため、ショートカットを自分で作成することになるようです。 

Flatpak ショートカット作成の基本フロー：

①flatpak listでApplication ID を確認　　例: io.qt.QtCreator

②#!/bin/bash

flatpak run io.qt.QtCreator　を作成し、実行権限不可

③デスクトップショートカット作成ならば　.desktop ファイルの Exec= にスクリプトや flatpak run <アプリID> を指定

Exec=flatpak run io.qt.QtCreator

IC-705のAMラジオ用アンテナ

 手軽にAMラジオをIC-705で聞けないか、フェライトバーアンテナを試してみた。今、入手が難しくなっているらしいけれど、ヤフオクでラジオから取り外したと思われるものをたまたま見つけて290円で落札させていただいた。１次側が670uHほどだったので、共振周波数から容量を計算すると中波なら40pF前後を並列につなぐ必要がある。たまたま半固定の小型バリコンがあったので、２個並列でつないで、２次側を無線機のアンテナ側につなぐ。窓のそばで位置やバリコンを調整すると、５９+20dBと、十分な感度。意外とフェライトバーアンテナのゲインは高いようだ。　

アクリル板のケースに収めて小型アンテナにすることができた

　MLAと理屈は同じようで、調べてみると、高Qで帯域外ノイズを除去、電界ノイズに鈍感（磁界のみ検出）　といった効果があるとか。

VY24G/D i5-520MにLinux Mint

 i5-520Mは第一世代で、Win11も23H2までは、SSD化や４GBメモリで騙しだましつかってきましたが、さすがに25H2は、かなり無理がありそうだったので、諦めてLinuxを試すことに。ところが、標準インストールだとなかなかうまくいきません。しばらくして、原因がつかめました。

・BIOSでUSBメモリ選択では、読み取れずUSB HDD選択で読み取れました。(DVDでは遅すぎて無理があります。ＵＳＢメモリを使いましたが、なぜかＵＳＢ　ＨＤＤを選択しないとだめでした。）

・標準インストールだと最近のLinuxはほとんどGPTのため、うまくいきません。事前にMBR(msdos)に変更が必要です。ここが一番のネックのようです。

　Linux Mint ,MX Linuxあたりに候補をしぼりましたが、最終的にMint xfceにしてみました。Windowsと配置が似ていて使いやすい感じがします。注意点としてはGPartedであらかじめ、MBRのパーティション（/,swap./home等）を作っておき、Mintのインストーラでは、新規インストールせずに、カスタマイズのほうを選択して、マウント処理とブート領域設定していきます。途中、警告らしきメッセージも出ますが、無視して進めたところ、うまくいきました。第一世代のＣＰＵは想定していないようですが、しばらくは、ＰＣを無駄にせず、動画視聴等に活用できそうです。

Win11の25H2を古いPC（第３～４世代）に入れる場合の覚書

ノートA573などの第３世代でも、工夫次第でぎりぎり25H2が入るようです。一回目起動しなくなったので、なんとかならないかとChatGPTの助けを借りて、うまくいきました。

　H97M-PLUS　i5-4460 も使っていますが、こちらも同様な方法でうまくいきました。

　Bios（F2キー断続押しで起動するとOk）セキュアブートをoffとするといいようです。そのためには、A573のBIOSでは一時的に管理者パスワード入れないと編集できないようでした。

〇 BIOS　設定のポイント
CSM（互換モード） Enabled 古いOS/MBRディスクとの互換性を確保
Secure Boot / OS Type Disabled または Other OS Windows 11の署名チェックを回避
Fast Boot（高速モード） Disabled 起動チェックを省略せず、SSD/USBを確実に認識
Boot Priority / Legacy First Legacy First ON 古い形式（MBR/USB/SSD）を優先して起動
⚡ Fast Bootは速度優先、Legacy Firstは互換性優先の意味

〇インストールUSB作成　　Rufusなどで作成
パーティション形式：MBR（UEFI + CSM対応）
ファイルシステム：NTFS（容量大きめの場合）
「TPM・Secure Boot回避オプション」を有効にするとより安全

〇インストール後の調整（任意）
GPT形式に変換してUEFI純正起動
CSMを無効、OS Typeを「Windows UEFI mode」に戻すと、Secure Boot利用可能
古いPCでも安定してWindows 11を使える

〇注意点
第３～４世代でギリギリライン
安定して使うなら、Windows 10延命 or  Linuxを検討

※Win11が最近のPCしか対応しなくなったことが、余力ある古いPC(SSD化やメモリ増設は必要ですが）にとっては、Linux流行のきっかけになる？

※2025/10/19　実際、今回のタイミングで世界の状況はLinuxへの移行が、これまでにないほど活発になっているようです。欧州では一部組織でLinux移行を成功させているところもあるらしいです。

Haskell入門 型以外の安全性の確保 P286

 actionIO :: IO a -> IO a
actionIO action = do
  mv <- newEmptyMVar    --スレッド間通信用の空のMVarの箱をつくる
  _tid <- forkIO $ do           --スレッドをたてて
    result <- try action         --actionを実行　成功ならRight 値  例外なら Left eを返す

    putMVar mv result         --結果(Either SomeException a)をMVarに入れる
  result <- takeMVar mv    --メインスレッドでMVarから結果を受ける。入るまで待つ動作。
  case result of                       つまり、actionが終わるまで待って結果を受け取る
    Left e  -> throwIO e
    Right r -> return r

　forkIOでスレッドをわけると、普通はその中で起きた例外が親スレッドに伝わらない。

でも、この関数では、例外をつかまえ　MVarを通して親スレッドに返している。

久しぶりに室内MLAアンテナでDX

 18MHzバンドで久しぶりDXが開けていた。ゼヤ（Asiatic Russia)の局長さんとFT8で交信できた。5Wの室内アンテナで届いたので、コンディションがよかったようだ。

 FT8でオンエアしている局の密度をみると、やはり、欧州、日本、北米が目立っているのがわかる。