Myu: 2024

2024年12月10日火曜日

暖房費も高め

このところ、灯油や電気も高くなってきて、暖房が欲しい時期になってくると暖房費も気になってくる。ファンヒーターやエアコンで、１時間当たり、数十円は使っているだろうか。冷房より暖房のほうがお金はかかるようだ。

　ということで、寒い時期はなるべく弁当持参で図書館を活用することにした。往復徒歩で、健康にもよく、節約なり、勉強にも集中できて一石三鳥。近くの大学の図書館だけれど、休憩室で軽食もとれるのでとても助かっている。

2024年12月9日月曜日

logicool unifying 不具合

　めずらしく、ワイヤレスキーボードが不具合。OSの更新が、半端だったためか、突然キーボードが反応しなくなる。Windows　Updateしてもだめで、Unifyingのツールで接続確認しても接続はしていると表示されているが、反応しない。

　が、数分したら、なぜか接続できた。デバイスソフトの更新に時間がかかっていたのか、それともハードが不安定になってきたのか。ひょっとしてキーロガーかと、気になり検索したけれど、今のところそういう情報はないようです。原因はわからないけれど、しばらく様子を見るしかないようだ。

2024年12月4日水曜日

ベータ関数もとにグラフ表示

ルベーグ積分　理論と計算手法　を少しずつ読んでいるが、途中P132問題6.16の証明で、気になる積分があったので、表示してみた。ネットで探したが見つからないので、C＃で任意の関数を積分するコードを、chatGPTの助けを借りて作ってみた。

Ψ(x)=∫(0,x) y^r*(1-y)^r λ(dy)/B(r+1,r+1)　　Cr級関数の例

　　　　上記の関数は0<=x<=1の場合で、それ以外はx<0で0、x>1で1の値

c#でoxyPlotを使ってみた。確かめる方法がないので、どの程度正しいかどうかわからないですが。今後、いろいろな関数のグラフや、積分のグラフを表示するときに役立つこともあるかと思い、作ってみた。https://github.com/gh6141/WindowsFormsApp1_betaFunc.git

r=2

r=6

続いて　Φn(x)=Ψ(n(x-0))Ψ(n(1-x))がどうなるか見てみた。(a=0,ｂ＝１の場合)

n=10

n=1000

室内アンテナで韓国局とコンタクト

18MHzが、久しぶりに室内アンテナ（ワイヤーMLA）でも FT8が聞こえていたので、5wで呼んでみたら、つながった。お隣の韓国の局長さんでした。コンディションがいいと、簡易アンテナのQRPでもつながる。

　ハンガーに取り付けたワイヤーMLA　下方にあるのが、アルミ線ラジアルをつけた144/430モービルホイップ。

2024年11月30日土曜日

やはり、win11の条件が緩和されるよう

３年前ぐら前から、このままWin11に移行はきついのでないかと予想していたが、その予想通りになった。

https://tech-gadget.reinforz.co.jp/10605(昨日の情報）

　https://myutaro.blogspot.com/search?q=win11

　MS社のWin11にTPM2.0が必須というのは、要求水準が高すぎると思っていましたが、やはり、これを諦めて、以前のPCでも使えるように条件を緩和したようです。

※追記：その後、古いPCでも完全にWin11でサポートしてくれるのかと思ったのですが、その点については、そうでもないようなので、アップデートなどで不具合が出る可能性もありそうです。マザボ交換も敷居が高いので、少し様子見になりそう。

2024年11月20日水曜日

Androidでネットアクセス

久しぶりのjavaでAndroid用アプリをつくってみたが、アクセス拒否される。しらべたら、AndroidManifest.xmlに一行追加するといいようだった。

<uses-permission android:name="android.permission.INTERNET" />

<application ~~~

なかなか、androidの設定チェック事項も多くて大変。

目的は、自作の家計簿ソフトに、スマホで入力したものも、クラウド経由で簡単に転記できるようにするため。Androidは、javaを使ったが、バージョンにより、非同期の扱いが頻繁に変わり、情報も入手しにくいようだ。POSTは非同期が必要そうで手間がかかりそうなので使わず、GETで実装してみた。短いデータをメモ程度で利用するので、GETでも十分使えた。

　ただ、結局、GASにデータをおいても、androidではいろいろ認証でひっかかり難しいようだったので、raspiのbottle（自宅版クラウド）をバックエンドにしてみた。したがって、家計簿ソフト（C#)とraspi(python)とandroid(java)と３つの言語を駆使する必要があり、IDEをいったりきたりで、けっこう手間はかかったが、とりあえず完成した。

　スマホは、ちょっとしたことを、ささっと済ませたいときに、便利。できるだけ、専用アプリで、設定も少なくし、操作も少なめで使えるといいようだ。

2024年11月19日火曜日

漢字のフリガナ取得

IFELanguageという便利な機能があった。漢字をふりがなに直してくれるものです。

https://qiita.com/nabemax/items/347ff41123add344823f

　PCの機能も、グローバル化だけを目指すのでなく、それぞれ国の文化に技術をあわせていくことは大切だとあらためて思う。

GAS版のHamlog作ってみた

GoogleAppScriptでクラウド版のハムログを作ってみた。raspiサーバに構築も考えたが、ハードがいつまで持つか心配もあったので、とりあえずクラウドで試してみた。最近は、ChatGPTにも助けてもらっているので、比較的短時間でコーディングができるようになった。

　スプレッドシートやGASは無料で使える。その分、スピードが遅いが、個人で使う分には、問題ないと思う。

　移動運用の時などもその場で記録できて便利かもしれない。過去に交信しているかコールサインで検索できるようにした。jcc検索機能も追加した、ただし、シートに自分で作ったjcc番号と市郡名の対応表を用意する必要があった。ネットからの情報を加工した。

GAS と　index.htmlは以下の通りです。

Gasのほうのコードは以下のようなもの。シートIDを入れると使えると思います。*********************************************
function doGet(e) {
  return HtmlService.createTemplateFromFile("index").evaluate();
}

function JccCheck(jcc) {

function CallCheck(call) {

const url = `https://www.tele.soumu.go.jp/musen/list?ST=1&OF=2&DA=1&OW=AT&SK=2&DC=1&SC=1&MA=${encodeURIComponent(call)}`;
  let licQth="";
  try {
    const response = UrlFetchApp.fetch(url);
    const data = JSON.parse(response.getContentText());
    
    if (data && data.musen && data.musen.length > 0) {
      const musenInfo = data.musen[0].detailInfo;
      const radioSpec1 = musenInfo.radioSpec1;
      const radioEquipmentLocation = musenInfo.radioEuipmentLocation;

// 必要なデータを返す
      licQth=`${radioSpec1} ${radioEquipmentLocation}`;
    } else {
      liqQth= "No data";
    }
  } catch (error) {
    licQth="Error!";
  }

function Set(hiduke,jikoku,jikokuE,call,callRes,hisRST,myRST,waveType,freq,power,biko,qslS,qslR,qra,page, itemsPerPage) {

let spreadSheet = SpreadsheetApp.openById('1jdqJ9Eq4KrBpYczGE-MdabngvJ1wDl9mdm8rS0UtL5o');
   let sheet = spreadSheet.getSheetByName('シート1');

let lastrow = sheet.getLastRow();

sheet.getRange(lastrow+1, 1).setValue(hiduke);
   sheet.getRange(lastrow+1, 2).setValue(jikoku);
   sheet.getRange(lastrow+1, 3).setValue(jikokuE);
   sheet.getRange(lastrow+1, 4).setValue(call);
   sheet.getRange(lastrow+1, 5).setValue(callRes);
   sheet.getRange(lastrow+1, 6).setValue(hisRST);
   sheet.getRange(lastrow+1, 7).setValue(myRST);
   sheet.getRange(lastrow+1, 8).setValue(waveType);
   sheet.getRange(lastrow+1, 9).setValue(freq);
   sheet.getRange(lastrow+1, 10).setValue(power);
   sheet.getRange(lastrow+1, 11).setValue(biko);
   sheet.getRange(lastrow+1, 12).setValue(qslS);
   sheet.getRange(lastrow+1, 13).setValue(qslR);
   sheet.getRange(lastrow+1, 14).setValue(qra);

//return "送信済み"

return LoadPage(page, itemsPerPage);
  }

function LoadPage(page, itemsPerPage) {
  let spreadSheet = SpreadsheetApp.openById('1jdqJ9Eq4KrBpYczGE-MdabngvJ1wDl9mdm8rS0UtL5o');
  let sheet = spreadSheet.getSheetByName('シート1');
  let lastrow = sheet.getLastRow();
  let startRow = Math.max(lastrow - page * itemsPerPage, 1);
  let endRow = Math.max(startRow - itemsPerPage + 1, 1);
　let totalPages = Math.ceil(lastrow / itemsPerPage);

let data = [];
  
  for (let i = startRow; i >= endRow; i--) {
    data.push({
      hiduke: Utilities.formatDate(new Date(sheet.getRange(i, 1).getValue()), "Asia/Tokyo", "yyyy/MM/dd"),
      jikoku: Utilities.formatDate(new Date(sheet.getRange(i, 2).getValue()), "Asia/Tokyo", "HH:mm"),
      jikokuE: Utilities.formatDate(new Date(sheet.getRange(i, 3).getValue()), "Asia/Tokyo", "HH:mm"),
      call: sheet.getRange(i, 4).getValue(),
      callRes: sheet.getRange(i, 5).getValue(),
      hisRST: sheet.getRange(i, 6).getValue(),
      myRST: sheet.getRange(i, 7).getValue(),
      waveType: sheet.getRange(i, 8).getValue(),
      freq: sheet.getRange(i, 9).getValue(),
      power: sheet.getRange(i, 10).getValue(),
      biko: sheet.getRange(i, 11).getValue(),
      qslS: sheet.getRange(i, 12).getValue(),
      qslR: sheet.getRange(i, 13).getValue(),
      qra: sheet.getRange(i, 14).getValue()
    });
  }

return { data: data ,totalPages:totalPages};
}

function uploadAdifData(adifData, page, itemsPerPage) {
  const spreadSheetId = '1jdqJ9Eq4KrBpYczGE-MdabngvJ1wDl9mdm8rS0UtL5o';
  const sheetName = 'シート1';

let spreadSheet = SpreadsheetApp.openById(spreadSheetId);
  let sheet = spreadSheet.getSheetByName(sheetName);

// ADIFデータを行ごとに分割
  const lines = adifData.trim().split('\n');

lines.forEach(line => {
    const data = parseAdifLine(line);
    if (data) {
      const lastRow = sheet.getLastRow() + 1;

const utcDate = new Date(data.qso_date.substring(0, 4), data.qso_date.substring(4, 6) - 1, data.qso_date.substring(6, 8));
      const utcTime = data.time_on.match(/.{1,2}/g);
      utcDate.setHours(utcTime[0]);
      utcDate.setMinutes(utcTime[1]);
      utcDate.setSeconds(0);

const jstDate = new Date(utcDate);
      jstDate.setHours(jstDate.getHours() + 9);

// JSTの日付と時刻を計算
      const hiduke = `${jstDate.getFullYear()}/${('0' + (jstDate.getMonth() + 1)).slice(-2)}/${('0' + jstDate.getDate()).slice(-2)}`;
      const jikoku = `${('0' + jstDate.getHours()).slice(-2)}:${('0' + jstDate.getMinutes()).slice(-2)}`;

// スプレッドシートにデータを挿入
      sheet.getRange(lastRow, 1).setValue(hiduke);
      sheet.getRange(lastRow, 2).setValue(jikoku);
      sheet.getRange(lastRow, 3).setValue(''); // jikokuE
      sheet.getRange(lastRow, 4).setValue(data.call);
      sheet.getRange(lastRow, 5).setValue(''); // callRes
      sheet.getRange(lastRow, 6).setValue(data.rst_rcvd);
      sheet.getRange(lastRow, 7).setValue(data.rst_sent);
      sheet.getRange(lastRow, 8).setValue(data.mode);
      sheet.getRange(lastRow, 9).setValue(data.freq);
      sheet.getRange(lastRow, 10).setValue(''); // power
      sheet.getRange(lastRow, 11).setValue(''); // biko
      sheet.getRange(lastRow, 12).setValue(''); // qslS
      sheet.getRange(lastRow, 13).setValue(''); // qslR
      sheet.getRange(lastRow, 14).setValue(''); // qra
    }
  });

return LoadPage(page, itemsPerPage);
}

index.htmlは以下のようなものです。*******************************************************

<html>
  <meta name="viewport" content="width=device-width, initial-scale=1.0">
  <head>
    <base target="_top">
      <script src="https://code.jquery.com/jquery-3.6.1.slim.min.js"  integrity="sha256-w8CvhFs7iHNVUtnSP0YKEg00p9Ih13rlL9zGqvLdePA="  crossorigin="anonymous">
      </script>
       <style>
    table {
      border-collapse: collapse; /* 枠線を1本にする */
      margin: auto;
      border: 1px solid black; /* テーブル全体の枠線 */
    }
    th, td {
      border: 1px solid black; /* 各セルの枠線 */
      padding: 2px;
      text-align: center;
    }
    #callChekResp {
      color:red;
    }
    fieldset {
  border: none; /* 枠線を消す */
}

/* PC向けのデザイン */
body {
  font-size: 24px;
  margin: 2px;

}

input,select,button {
     font-size:20px;
      margin: 1px;
     
  }

table,#pagination {
       font-size:18px;
  }

.for-pc {
    display: block;
  }
  .for-mobile {
    display: none;
  }

/* スマートフォン向けのデザイン */
@media (max-width: 1100px) {
  body {
    font-size: 40px;
    margin: 2px;

}

input,select,button {
     font-size:40px;
      margin: 1px;
      
  }
      table,#pagination,#prevPage,#nextPage {
       font-size:11px;
  }
  .special-item {
  display: block; /* 改行が適用される */
 }
  
    .for-pc {
    display: none;
  }
  .for-mobile {
    display: block;
  }
}
 </style>
</head>
  <body>
    <center>
   <div >   
    <fieldset>
     <input type="text" id="hiduke" value="" style="width: 250px;">
     <input type="text" id="jikoku" value="" style="width: 180px;">
      <button id='Start' onclick="StartSave()" >始</button>
           <input type="text" id="jikokuE" value="" style="width: 180px;">
     <button id='End' onclick="EndSave()" >終</button>  
    </fieldset>

<fieldset>    
  
     CALL<input type="text" id="call" value="" style=" text-transform: uppercase;width: 250px;">
     <span id="licQth"></span>
     <button id='callCheck' onclick="CallCheck()" >検索</button>
      <span id='callChekResp'></span><br>
     
      JCC<input type="text" id="jcc" value="" style=" text-transform: uppercase;width: 250px;">
     <span id="jccR"></span>
     <button id='jccCheck' onclick="JccCheck()" >JCC</button>
        <table id="myTable">
      <thead>
       <tr>
         <th>Date</th>
         <th>Call</th>
         <th>Type</th>
          <th>Freq</th>
         <th>Remarks</th>
         <th>Qra</th>
      </tr>
      </thead>
       <tbody>
         
       </tbody>
      </table>
     </fieldset>

<div id="pagination">
        <button id="prevPage" onclick="loadPage(currentPage - 1)">前へ</button>
        <span id="pageNumber">ページ 1</span>
        <button id="nextPage" onclick="loadPage(currentPage + 1)">次へ</button>
      </div><br>

<div class="for-pc">
      <table id="dataTable" class="logTable">
        <thead>
          <tr>
            <th>Date</th>
            <th>Time(始)</th>
            <th>TIme(終)</th>
            <th>Call</th>
            <th>呼/応</th>
            <th>HisRST</th>
            <th>MyRST</th>
            <th>Type</th>
            <th>Freq.</th>
            <th>Power</th>
            <th>備考</th>
            <th>QSL(S)</th>
            <th>QSL(R)</th>
            <th>QRA</th>
          </tr>
        </thead>
        <tbody id="dataBody">
          
        </tbody>
      </table>
      <button id="sheetLink" onclick="sheetLink()">シートへ</button>
      <br>ADIFファイルのアップロード:
  <input type="file" id="adifFile" accept=".adi" />
      </div>

</div>

</center>
  </body>
</html>

document.getElementById('call').addEventListener('input', function() {
      this.value = this.value.toUpperCase();
  });

document.getElementById('call').addEventListener('focus', function() {
document.getElementById('myTable').style.display = 'none';
$('#callChekResp').text("");
  });

document.getElementById('adifFile').addEventListener('change', handleFileUpload);

window.onload =   function(){  
document.getElementById('myTable').style.display = 'none';
loadPage(currentPage);
let today=new Date();

$('#hiduke').val(formatDate_dateOnly(today));
$('#jikoku').val(formatDate_jikoku(today));
$('#hisRST').val('59');
$('#myRST').val('59');

const waveTypes = ['SSB', 'FT8', 'FM', 'CW', 'AM'];
waveTypes.forEach(type => {
    $('#waveType').append($('<option>').html(type).val(type));
});

//  $('#callRes').append($('<option>').html('呼').val('Call'));
 // $('#callRes').append($('<option>').html('応').val('Res'));

const callResOptions = [
  { label: 'CQ(R)', value: 'CQ(R)' },
  { label: 'Call(R)', value: 'Call(R)' },
  { label: 'Test', value: 'Test' },
  { label: 'CQ(No)', value: 'CQ(No)' },
  { label: 'Call(No)', value: 'Call(No)' }
];

callResOptions.forEach(option => {
  $('#callRes').append(
    $('<option>').html(option.label).val(option.value)
  );
});

$('#qslS').append($('<option>').html('No').val('NoQSL'));
  $('#qslS').append($('<option>').html('送').val('Send'));   
  
  $('#qslR').append($('<option>').html('__').val('__'));
  $('#qslR').append($('<option>').html('受').val('Rcvd'));

}

function formatDate_jikoku(dt) {
  var y = dt.getFullYear();

var h=('00' + dt.getHours()).slice(-2);
  var mi=('00' + dt.getMinutes()).slice(-2);
  return (h+':'+mi);
}

function formatDate_dateOnly(dt) {
  var y = dt.getFullYear();
  var m = ('00' + (dt.getMonth()+1)).slice(-2);
  var d = ('00' + dt.getDate()).slice(-2);  
  return (y + '/' + m + '/' + d);
}

function StartSave() {
  var now = new Date();
  $('#jikoku').val(formatDate_jikoku(now));
}

function EndSave() {
  var now = new Date();
  $('#jikokuE').val(formatDate_jikoku(now));
}

function JccCheck() {

let jcc=$('#jcc').val();          
      google.script.run.withSuccessHandler(onSuccessJ).withFailureHandler(onFailure).JccCheck(jcc); 
  }

function onSuccessJ(res){
   
   if(res.data.length>0){
   $('#jccR').text(res.data);
  }else{
   $('#jccR').text("該当jcc/gはありません");
  }
  
  }

function CallCheck() {

let call=$('#call').val();          
      google.script.run.withSuccessHandler(onSuccessC).withFailureHandler(onFailure).CallCheck(call); 
  }

function onSuccessC(res){
   // res は JSON 形式の文字列と仮定
   let rdata= JSON.parse(res);  // もし res が文字列ならパースする
  let data =rdata.data;
  
  $('#licQth').text(rdata.licQth);

// テーブルの tbody を取得
  let tbody = $('#myTable tbody');
  
  // tbody の内容をクリア（新しいデータを追加する前に）
  tbody.empty();

if(data.length>0){
   document.getElementById('myTable').style.display = 'table';
  // data は複数の行データの配列と仮定
  data.forEach(item => {
    // 新しい行を作成
    let row = $('<tr>');

// 各列のデータを追加
    row.append('<td>' + item.col1 + '</td>');
    row.append('<td>' + item.col4 + '</td>');
     row.append('<td>' + item.col8 + '</td>');
    row.append('<td>' + item.col9 + '</td>');
    row.append('<td>' + item.col11 + '</td>');
    row.append('<td>' + item.col14 + '</td>');
    // 行を tbody に追加
    tbody.append(row);
  });
 }else{
   $('#callChekResp').text("該当局はありません");
 }
  
  }

function Enter() {
        let hiduke =$('#hiduke').val();
         let jikoku =$('#jikoku').val();
         let jikokuE =$('#jikokuE').val();
         let call=$('#call').val();
            let callRes =$('#callRes').val();
            let hisRST =$('#hisRST').val();
            let myRST=$('#myRST').val();
             let waveType =$('#waveType').val();
           let freq =$('#freq').val();
            let power =$('#power').val();
            let biko =$('#biko').val();
            let qslS=$('#qslS').val();
            let qslR=$('#qslR').val();
            let qra=$('#qra').val();

if(call==""){
               $('#callChekResp').text("コールサインを入力してください");
            }else{
                 
                    google.script.run.withSuccessHandler(onSuccessL).withFailureHandler(onFailure).Set(hiduke,jikoku,jikokuE,call,callRes,hisRST,myRST,waveType,freq,power,biko,qslS,qslR,qra,currentPage,itemsPerPage); 
            }   
}
  function onSuccess(res){
    $('#msg').text(res);
  }
      // ページのデータをロードする関数
      function loadPage(page) {
        currentPage = page;  
        google.script.run.withSuccessHandler(onSuccessL).withFailureHandler(onFailure).LoadPage(page, itemsPerPage);
        $('#pageNumber').text('ページ ' + (currentPage+1));
      }

function updatePaginationButtons(totalPages) {
    // 最初のページなら "prevButton" を無効化
    if (currentPage === 0) {
        $('#prevPage').prop('disabled', true);
    } else {
        $('#prevPage').prop('disabled', false);
    }

// 最後のページなら "nextButton" を無効化
    if (currentPage === totalPages - 1) {
        $('#nextPage').prop('disabled', true);
    } else {
        $('#nextPage').prop('disabled', false);
    }
　　}

// レスポンスデータを処理
      function onSuccessL(res) {
         totalPages=res.totalPages;
         updatePaginationButtons(totalPages);
        let data = res.data;
        let tableBody = $('#dataBody');
        tableBody.empty(); // テーブルをリセット
                let tableBody2 = $('#dataBody2');
        tableBody2.empty(); // テーブルをリセット

data.forEach(row => {
          tableBody.append(`
            <tr>
              <td>${row.hiduke}</td>
              <td>${row.jikoku}</td>
              <td>${row.jikokuE}</td>
              <td>${row.call}</td>
              <td>${row.callRes}</td>
              <td>${row.hisRST}</td>
              <td>${row.myRST}</td>
              <td>${row.waveType}</td>
              <td>${row.freq}</td>
              <td>${row.power}</td>
              <td>${row.biko}</td>
              <td>${row.qslS}</td>
              <td>${row.qslR}</td>
              <td>${row.qra}</td>
            </tr>
          `);
          tableBody2.append(`
            <tr>
              <td>${row.hiduke}</td>
              <td>${row.call}</td>
              <td>${row.waveType}</td>
              <td>${row.freq}</td>
              <td>${row.biko}</td>
              <td>${row.qra}</td>
            </tr>
          `);
        });
        const lastRowL = data[0];
        $('#callRes').val(lastRowL.callRes);
        $('#waveType').val(lastRowL.waveType);
        $('#freq').val(lastRowL.freq);
        $('#power').val(lastRowL.power);
      }
      // エラーハンドリング
      function onFailure(res) {
        $('#msg').text('データの取得に失敗しました: ' + res);
      }
    
function sheetLink(){
  window.open('https://docs.google.com/spreadsheets/d/1jdqJ9Eq4KrBpYczGE-MdabngvJ1wDl9mdm8rS0UtL5o/edit?gid=0#gid=0', '_blank');
}
        
function handleFileUpload(event) {
      const file = event.target.files[0]; // 選択されたファイル
      if (!file) {
        alert("ファイルが選択されていません！");
        return;
      }

const reader = new FileReader();
      reader.onload = function(e) {
        const adifData = e.target.result;
        sendDataToServer(adifData);
      };
      reader.readAsText(file, "UTF-8");
    }

// Google Apps Script にデータを送信
    function sendDataToServer(adifData) {
      google.script.run
        .withSuccessHandler(() => alert("アップロード成功！"))
        .withFailureHandler(err => alert("エラーが発生しました: " + err.message))
        .uploadAdifData(adifData, 1, 10); // ページ番号と表示件数は適宜変更
    }

</script>

※追加情報：wsjt-xのログをADIFデータに変換するツールをc#でつくり（https://github.com/gh6141/adifCreate.git)、そのADIFをアップロードできるようにしてみた。FT8のログ記録がだいぶスムーズになった。QRZ.comやeQSLへのアップロードにも使えそうだ。

　wsjt-xにADIFで保存する機能もあったが、うっかり保存を忘れてしまうことが多かったので、ログからも日付・時刻を指定してそれ以降のデータを抽出できるようにツールを作ってみた。

2024年11月7日木曜日

ホッファー　大衆運動　を読む

ホッファーについては、以前から興味を持っていたので、図書館で借りられたので読んでみた。

個人と大衆運動: 個人が自己中心的な生活から無私の生活へと移行することは、自尊心を高める手段となり得る。大衆運動は個人の希望に代わる大きな希望を提供し、自己の生活を守るために他者に依存することもある。

大衆運動の特性: 一つの大衆運動はしばしば異なる性質を持ち合わせており、日本の民族主義は宗教的な性質を持つと指摘される。

移住と大衆運動: 歴史上の移住、特にローマ帝国時代のゲルマン民族の移動は、単なる民族移動ではなく、抑圧された人々が参加し、新たな社会運動の基盤を形成した。すべての大衆運動は約束の地を目指す移住のようなものと捉えられる。

不満と大衆運動: 自由が認められながらも欲求不満を緩和する手段が存在しない社会は、大衆運動が広がる肥沃な土壌となる。創造的な活動の欠如は、欲求不満を引き起こし、大衆運動の影響を受けやすくする。

労働と生産性: 個々の労働者への奨励給よりも、集団的な奨励給が生産性と満足度を高めることが示されている。

虚構の役割: 大衆運動においては、行列や儀式といった虚構が人々の心に訴える重要な役割を果たす。

言論人の役割: 大衆運動の興隆には言論人が重要な役割を担い、社会が活力を持ち続けるためには、独立した少数派の存在が必要である。東洋社会の停滞の一因は、教育を受けた人々が政府の一部であり、独立性が欠けていたことにある。→※これを読んで、現代の日本の社会動向（例えば学術会議と政府の対立や官僚の東大出身者の減少等）は、新たな大衆運動の下地ができつつあるのでないかと思った。

2024年11月2日土曜日

バリコン自作　二個目

前回、バリコンを作ったときの材料が余っていたので、もう一個作ってみた。MLAか、釣り竿アンテナの調整に使う予定。雑なつくりではあるけど、３０～８０ｐFの範囲でちゃんと容量可変にできた。

近くの河川公園で移動運用

昨日、近くの河川公園で7MHzで移動運用。銅箔テープを貼った釣り竿アンテナ（つなぎ目の導通は、養生テープの裏にも銅箔テープつけたもの使用）を使っている。ラジアルは、アルミホイルを二枚重ねて、縁を少し巻き込んで、裂けにくいように工夫してみた。５０Wで５９のレポートもらうことができた。

2024年10月29日火曜日

迷惑メール（ヤマト便を装った）

「荷物が配達できなかったお知らせ」というメールが来ていた。最近、荷物を送っていないし、おかしいなと思い、サイトで調べたら、この内容の詐欺が流行っていることが判明。

　おかしいと思ったら、すぐ検索したほうがいいようだ。それで、出てこなかったら、直接会社に問い合わせるぐらいしないとだめかもしれない。

2024年10月21日月曜日

apacheのアクセスログから見えること

ChatGPTに、外部からの不審なアクセスログを見てもらい、何を狙っているか解析してもらったら、以下のような回答が返ってきた。いろいろセキュリティの勉強になる。

1. 目的：環境設定ファイルの漏洩を狙う
攻撃者は「.env」や「.config.yaml」などのファイルを探しています。データベースの接続情報（ユーザー名、パスワード）、APIキーやトークンなどが目的か。
2. バージョン管理ミスを狙った攻撃
「.env.bak」や「.env.example」のようなファイル名も含まれています。
.bak：バックアップファイルが誤って残っているケース
.example：設定ファイルのテンプレートが公開されたケース
3. 管理パネルへの不正アクセス
次のリクエストは、システムの管理用ファイルや設定ファイルを狙っています：
GET /admin/.env HTTP/1.1
管理画面の初期設定が変更されていないシステムを狙い、攻撃者はそのまま管理者権限を取得しようとする可能性があります。
4. PHP情報の漏洩を試行
GET /?phpinfo=-1 HTTP/1.1

　さすがに、１，３や４は気を付けると思います。２なども、うっかりもれないよう気を付ける必要はありそうです。
　言語としてはPHPを狙っているパターンが多い傾向があるようです。
　セキュリティを考えれば、できるだけマイナーな言語を使うのがいいのかもしれません。また、Fail2Banなど、不正アクセスのあるIpアドレスを自動的にブロックするツールもあるようだ。

2024年10月19日土曜日

raspiへのアクセスログのチェックできるようにしてみた。(python,bottle)

珍しく、raspiのapacheが止まってしまったので、復旧ついでにapacheのアクセスログのチェックをできるようにしてみた。ただ、最初なぜか、checkipの部分がうまく働かない。ブラウザのキャッシュを削除したら動作したので、そのへんが原因かと思われる。

import ipaddress
def check_ip(): #ローカルipアドレス以外からはアクセスできないようにした
    client_ip = request.remote_addr
    ip = ipaddress.ip_address(client_ip)
    if not (ip in ipaddress.ip_network('192.168.1.0/24')):
        response.status = 403 
        return "403 Forbidden: Access is restricted to local network."

@app.route('/py/apache2_log')
def apache2_log():
        check_ip()
        return template('''<!doctype html>
        <html>
            <head><title>Log Viewer access by {{ipaddr}}</title></head>
            <body>
                <h1>Log Viewer access by {{ipaddr}}</h1>
                <form action="/py/view_log" method="post">
                    <label for="line">How many lines from the first line?:</label>
                    <input type="number" id="line" name="line" required>
                    <button type="submit">View Log</button>
                </form>
            </body>
        </html>''', ipaddr=request.remote_addr)

@app.route('/py/view_log', method='POST')
def view_log():
    check_ip()
    line_number = int(request.forms.get('line'))
    log_file_path = '/etc/apache2/logs/ログファイル名を指定'
    if not os.path.exists(log_file_path):
        return "Log file does not exist."
    try:
        with open(log_file_path, 'r') as file:
            lines = file.readlines()
            specified_lines = lines[-line_number:]

return template('''<!doctype html>
            <html>
                <head><title>Log Output</title></head>
                <body>
                    <h1>Log Output</h1>
                    <pre>{{logs}}</pre>
                    <a href="/py/apache2_log">Back</a>
                </body>
            </html>''', logs=''.join(specified_lines))

except IndexError:
        return "Invalid line number. Not enough lines in the log."
    except Exception as e:
        return f"An error occurred: {e}"

※早速チェックしたら、けっこう外部からのアクセス（Https以外にもVPNのチェックなど）が記録されていた。よくあるシステムが動いてないかチェックしているのだろうか？ときどき、確認したほうがいいようだ。

2024年10月16日水曜日

窓枠にRHM12アンテナ

以前、使っていたRHM8Bを売って、RHM12にバージョンアップした。

また、窓枠にイレクタを使ってアンテナを固定していたが、１００Wにするため、少し離れた窓枠にも使えるように工夫してみた。（１００Wを身体の近くで出すのはさすがにちょっと心配なので）方法としては、今まで使っていたイレクターの上部にジョイントをつけて、長さを延長することでうまく長さを合わせることができた。

左の写真が延長部分、右側の写真が、RHM12を取り付けた部分。四角いアルミテープで覆われたBoxは、リモート用にDIYしたATU-100です。OLEDディスプレイのデータ（I2C）を変換したデータとリモート操作用スイッチの接続をLanケーブルで、無線機のある部屋まで延長しています。コモンモードフィルタをAnt側と無線機側に入れることで、ATU-100も安定して動作するようになりました。（フィルタを付ける前は、高周波がLANケーブルにのってしまいだめだったのですが）

早速、14MHzSSBで、うまく８エリアの局長さんと交信することができました。

2024年10月14日月曜日

FT8でRotuma Islandとつながる

見慣れないプリフィックスのコールサインがあったので、コールしたらとってもらえた。Rotuma Islandということで、フィジー諸島から５００ｋｍぐらい、日本から６０００ｋｍという距離。５０ｗ短縮ホイップ（RHM12に変更したが、なかなか使いやすい）でつながって、びっくり。コンディションがいい。このところ太陽活動が活発なせいかと思う。
　しばらくぶりで、ＦＴ８の設定がうまくいかず、苦労する。Splitが関係ない周波数にいってしまう。とりあえずWSJT-xの設定は疑似splitに。また、PRESETが、FT８の状態にしておくのを忘れていたりすることもあり、注意が必要

2024年10月11日金曜日

お金の流れでわかる世界の歴史　を読んだ

平易な言葉で書かれており、読みやすい本だった。

p57　マホメットはイスラム教に改宗すれば人頭税を免除すると呼びかけた。

※ローマは重税、イスラム教は、減税　今の西側諸国が、イスラム教派と対立するのもなぜなのか、　わかるような気がする。

p90　スペイン：高い消費税で物価は上がり、景気は低迷　衰退の原因

p130　イスラム教徒とヒンズー教徒の対立　を利用することでイギリスの支配は成り立っていた。

p173　当時の日本の指導者は泥沼の内戦を好まなかった。アジア諸国が内戦につけこまれて欧米から侵略されてきことを知っていたから。

p196　金本位制のもとでは、金が少なくなると、その国は通貨を減らさなければならなくなる。金の減少＞通貨の流通に支障＞デフレ＞産業が沈滞

　※日本は、管理通貨制度にもかかわらず、緊縮財政で通貨流通減少で、同様のことが起きたのだろう。

ｐ197　世界大恐慌時のドイツ　ブリューニング政権は、財政赤字の深刻化していたので、財政支出削減、増税を行おうとした。6月に失業保険支払い打ち切り、公務員給料の引き下げ、増税を検討した。　不況のときに、財政を緊縮させれば、もっと不況になる。経済悪化で、失業者が６５０万人。国民の猛反発。代わって登場したのが、ヒトラー。財界や保守派も共産党の台頭を防ぐためヒトラーを支持。労働者保護、アウトバーン建設等で、３年で失業者を１００万人まで減らす。

p230　ソ連は平等だったから崩壊したのでなく、むしろ自由主義国より不平等だったから崩壊した。

2024年9月30日月曜日

ルベーグ積分　理論と計算手法　P93

系5.2(ii)の証明の一部分で、少してこずったので、備忘録としてメモ

∫R　 f〇v-1　 λ＝∫I　 f ρ　 λ　で　①　f をfg〇v に　　②ｆをf/ρに　置き換えると

①を適用　左辺の被積分部分＝ (f×g〇v)〇v-1 =(f〇v-1 )× (g〇v)〇v-1 =(f〇v-1 )×g ③

　　　　　右辺の被積分部分=(f×g〇v)×ρ　④

④に②適用＝f×g〇v

③に②適用＝(f/ρ)〇v-1×g 　＝(f〇v-1)/(ρ〇v-1) ×ｇ　

　「関数の積×」と「関数の合成〇」の意味を、ごちゃまぜにしないようにすればいいだけの話なのだけれど、最初は混乱してしまい、しばらく解決まで時間がかかってしまった。

　数学では、定義の意味をよく確認し、正確に使うことが大事だと、あらためて思った。

2024年9月27日金曜日

2.5w 　簡易MLA　FT8でつながる

今日は、夕方コンディションがいいようで、7MHzだが室内の簡易MLA（窓枠にハンガーでつるしただけのもの）で、しかも2.5Wで、２エリアの局長さんとFT8でつながった。

　自分は無理だと思い試していないが、この時間帯は、JA局で中米の局ともつながっている局長さんもいたようだ。

　FT8でJTalertというアプリを併用すると、ちょっとしたchatもできるらしい。早速インストールしたので、そのうち試してみたいと思っている。ただ、まだ使っている局長さんは少ないようだ。

2024年9月17日火曜日

ChatGPTでコーディングするときのコツ　～ステップに分けることがポイント～

ChatGPTを使って、モザイク画作成ツールを作ってみた。

一気に、多くのステップを考えて、コーディングの指示をすると、うまくいかなかった。ある程度複雑になってくると、限界があるようだ。なぜか、ライブラリに定義されていないメソッドやプロパティがコードのなかに現れたりして、エラーを起こすというパターンが多くなってしまうようだった。

　そこで、少し方針を変えて、コーディングのステップを細かく分けてみた。段階をおって、少しずつコードを追加していった。そのほうが、うまく進めることができた。

2024年9月11日水曜日

細菌・ウイルスが空から来る可能性？

Gigazineで「日本の上空3000mで病原菌を含む数百種類の微生物が発見される」という記事が出ていた。

　以前から、気にはなっていたが、ChatGPTに、「ウイルス等も、細かい粒子に付着して、浮遊して、遠く離れた場所まで飛んでいき、感染を広げる可能性もあるということでしょうか？」と質問したら、

　「はい、その通りです。病原菌を含む微生物が日本の上空3000メートルで発見されたという報告は、微生物が風や気流に乗って広範囲に移動できる可能性を示唆しています。ウイルスや細菌は、小さな粒子（例えば、塵やエアロゾルなど）に付着して空中を浮遊し、遠くまで運ばれることがあります。このような微生物が風に乗って遠距離に移動することで、環境中の他の場所で感染を広げる可能性が考えられます。」とのこと。黄砂に付着してくる可能性も否定できないとのことだった。確かにネットで検索すると、「砂塵によるバクテリア、カビ、ウイルス、花粉などの長距離輸送が可能である」と指摘されているようだ。黄砂は、今まで無機質だろうとあまり気にかけてなかったが、思った以上に危険なようなので、今後、気を付けたい。以前、知り合いの方が、あるときとても体調が悪いと言っていたことがあった。たまたまかもしれないが、それがちょうど黄砂がひどい時期だったときだった。黄砂と何か関係あるのだろうかと考えたりしたことを思い出した。

　それにしても、日本でも、武漢のように、危険ウイルス（日本の場合はエボラウイルス）の研究施設ができたようなので、こんな話を聞くと、心配になってくる。

2024年9月9日月曜日

久々に移動運用

　７MHｚは、夕方近くになるとコンディションがいいようだったので、近くの公園で電波を出してみた。５９で、わりと安定したＱＳＯができた。３エリア、１エリアの局長さんとコンタクト。とくに１エリアの局長さんは、いろいろ自作されている方だったので、リニアアンプ、リグ、ＰＩＣといろいろとお話を聞かせていただきました。ふだん、シグナルレポート交換だけで終わることが多いけれど、今回は、興味深い話ができてよかった。

　下の写真は、移動で利用している　自作の釣り竿ＡＮＴ＋マッチング回路　かなり適当なマッチング回路だが、なんとかSWRは下がっている。釣り竿には、銅箔テープを貼って、導通するようにしている。アースはマグネットシート（A4サイズ）でもだいじょうぶだった。

2024年9月4日水曜日

C#で、テキストボックスの最初に、指定した文字が来るようにスクロールするメソッド

ChatGPTで、コードをつくってもらったけれど、なかなかうまくいかなかった。Windowsメッセージ等のOSに近い部分は、ChatGPTに助けてもらったけど、コードの論理に関してはまだ、自分のような凡人プログラマにも及ばない感じがした。

　結局、自分でしばらく試行錯誤しながら、解決することになった。ChatGPTは、現実世界で試行錯誤は、できないわけなので、そこは、人間よりハンディがあるんだろうと思った。今日、NVIDIA株も急落した。AIに期待が大きすぎたか。。

private const int WM_VSCROLL = 0x0115;
private const int SB_LINEDOWN = 1;
private const int SB_LINEUP = 0;
[DllImport("user32.dll")]
private static extern int SendMessage(IntPtr hWnd, int msg, int wParam, int lParam);
public static void ScrollLines(System.Windows.Forms.TextBox textBox, int numberOfLines)
{
for (int i = 0; i < Math.Abs(numberOfLines); i++)
{
SendMessage(textBox.Handle, WM_VSCROLL, numberOfLines > 0 ? SB_LINEDOWN : SB_LINEUP, 0);
}
}
public static void MoveCursorToText(string searchText,System.Windows.Forms.TextBox textBox)
{
// テキストボックス内の最初の位置にカーソルを移動
textBox.SelectionStart = 0;
textBox.SelectionLength = 0;
textBox.ScrollToCaret(); // カーソルの位置にスクロール
int index = textBox.Text.IndexOf(searchText, StringComparison.OrdinalIgnoreCase);
if (index != -1)
{
textBox.Focus();
textBox.SelectionStart = index;
textBox.SelectionLength = searchText.Length;
textBox.ScrollToCaret();
int lineIndex = textBox.GetLineFromCharIndex(index);
int visibleLines = textBox.Height / textBox.Font.Height;

if (lineIndex > visibleLines)
{
ScrollLines(textBox, visibleLines-1);
}
else
{
ScrollLines(textBox, lineIndex);
}
}
else
{
MessageBox.Show("Text not found.");
}
}

2024年8月29日木曜日

総務省を名乗る変な電話

今日、総務省を名乗って「２時間以内に通信を止める」旨の電話が来ました。オペレータにつなぐように電話するようなメッセージでした。

　これは、「そんな馬鹿な、詐欺だろう」と思ったので、電話は切って、ググったところ、やはりそうでした。いろいろな詐欺があるもんだと。どうやら、狙いは個人情報のようで、何らかを企んでいるのかと思われます。おかしな電話は、必ず発信元チェックが必要なようです。

2024年8月23日金曜日

CWデコーダ製作

arduino Unoが一つ余っていたので、LCDを339円でアマゾンから購入して、作ってみた。

CWデコーダと言えば、デンマークの方が作成されたものが有名。

http://oz1jhm.dk/content/very-simpel-cw-decoder-easy-build

上記リンクを参考にして、コードや配線図も公開されていたので、それをもとに試してみた。配線図では、LCDの配線とLEDの極性が違っていたので修正必要だったが、なんとかうまく動作させることができた。以前作ったアプリで生成させたCW音であれば、ほぼ正しくデコードできている。

配線には、以前、壊れた炊飯ジャーから取り出したエナメル線が役立った。細くて目立たないので、電子工作にはいいようだ。スズメッキ線だとショートの恐れがあるし、ビニル線だとかさばってしまう。

和文モードを追加して、タッチセンサスイッチTPP223を12番Pinにつなぎ、Bのみショートして、オルタネートにして、切り替えるようにしてみた。プルダウン抵抗2k入れています。
（写真の左側で赤く光っているところがTPP223）

　原作者の許可を得てないので、コードは公開できませんが、変更点は以下のとおりです。

これで、いちおう、和文モードにも切り替えられるようになりました。

LiquidCrystal lcd(8, 9, 4, 5, 6, 7); //ここは、元のサイトの配線図に合わせました
const int colums = 16; /// have to be 16 or 20　16列×２行タイプなので
const int rows = 2; /// have to be 2 or 4
bool JEflg=true; //flag for Japanese　追加
setup()に　 pinMode(12, INPUT); // japanese/english mode change　追加
loop()に　 int sensorValue = digitalRead(12);
if (sensorValue == HIGH ) {
JEflg=true;
} else {
JEflg=false;
}　追加
decode()を以下のように変更
void docode(){
if(JEflg){
decodeJ();
}else{
decodeE(); //これまでの decode()です
}

void decodeJ(){

if (strcmp(code,".--.-") == 0) printascii(176); // -

if (strcmp(code,"--.--") == 0) printascii(177);

if (strcmp(code,".-") == 0) printascii(178);

if (strcmp(code,"..-") == 0) printascii(179);

if (strcmp(code,"-.---") == 0) printascii(180);

if (strcmp(code,".-...") == 0) printascii(181);

if (strcmp(code,".-..") == 0) printascii(182);

if (strcmp(code,"-.-..") == 0) printascii(183);

if (strcmp(code,"...-") == 0) printascii(184);

if (strcmp(code,"-.--") == 0) printascii(185);

if (strcmp(code,"----") == 0) printascii(186);

if (strcmp(code,"-.-.-") == 0) printascii(187);

if (strcmp(code,"--.-.") == 0) printascii(188);

if (strcmp(code,"---.-") == 0) printascii(189);

if (strcmp(code,".---.") == 0) printascii(190);

if (strcmp(code,"---.") == 0) printascii(191);

if (strcmp(code,"-.") == 0) printascii(192);

if (strcmp(code,"..-.") == 0) printascii(193);

if (strcmp(code,".--.") == 0) printascii(194);

if (strcmp(code,".-.--") == 0) printascii(195);

if (strcmp(code,"..-..") == 0) printascii(196);

if (strcmp(code,".-.") == 0) printascii(197);

if (strcmp(code,"-.-.") == 0) printascii(198);

if (strcmp(code,"....") == 0) printascii(199);

if (strcmp(code,"--.-") == 0) printascii(200);

if (strcmp(code,"..--") == 0) printascii(201);

if (strcmp(code,"-...") == 0) printascii(202);

if (strcmp(code,"--..-") == 0) printascii(203);

if (strcmp(code,"--..") == 0) printascii(204);

if (strcmp(code,".") == 0) printascii(205);

if (strcmp(code,"-..") == 0) printascii(206);

if (strcmp(code,"-..-") == 0) printascii(207);

if (strcmp(code,"..-.-") == 0) printascii(208);

if (strcmp(code,"-") == 0) printascii(209);

if (strcmp(code,"-...-") == 0) printascii(210);

if (strcmp(code,"-..-.") == 0) printascii(211);

if (strcmp(code,".--") == 0) printascii(212);

if (strcmp(code,"-..--") == 0) printascii(213);

if (strcmp(code,"--") == 0) printascii(214);

if (strcmp(code,"...") == 0) printascii(215);

if (strcmp(code,"--.") == 0) printascii(216);

if (strcmp(code,"-.--.") == 0) printascii(217);

if (strcmp(code,"---") == 0) printascii(218);

if (strcmp(code,".-.-") == 0) printascii(219);

if (strcmp(code,"-.-") == 0) printascii(220);

if (strcmp(code,".-.-.") == 0) printascii(221);

if (strcmp(code,"..") == 0) printascii(222);

if (strcmp(code,"..--.") == 0) printascii(223);

if (strcmp(code,".---") == 0) printascii(166);

if (strcmp(code,".----") == 0) printascii(49);

if (strcmp(code,"..---") == 0) printascii(50);

if (strcmp(code,"...--") == 0) printascii(51);

if (strcmp(code,"....-") == 0) printascii(52);

if (strcmp(code,".....") == 0) printascii(53);

if (strcmp(code,"-....") == 0) printascii(54);

if (strcmp(code,"--...") == 0) printascii(55);

if (strcmp(code,"---..") == 0) printascii(56);

if (strcmp(code,"----.") == 0) printascii(57);

if (strcmp(code,"-----") == 0) printascii(48);

if (strcmp(code,"..--..") == 0) printascii(63); // ?

if (strcmp(code,".-.-.-") == 0) printascii(161); // full stop

if (strcmp(code,"--..--") == 0) printascii(164); // comma

if (strcmp(code,".--.-.") == 0) printascii(64);//@

if (strcmp(code,"---...") == 0) printascii(58);//:

if (strcmp(code,"-.--.-") == 0) printascii(40);// (

if (strcmp(code,".-..-.") == 0) printascii(41);// )

if (strcmp(code,"...-.") == 0) printascii(126);//correction

if (strcmp(code,".-.-..") == 0) printascii(163); //square braｃkets

if (strcmp(code,".-..-") == 0) printascii(168); // old katakana i

if (strcmp(code,".--..") == 0) printascii(170); // old katakana e

}

※その後、マイクのMAX9814をアマゾンで買って、スピーカ音を拾うこともできるようにしてみた。

※また、感知する音の周波数も変えられるようだったので、２種類の周波数を切り替えられるようにしてみた。そのために、タッチセンサーを追加するのも面倒だったので、Off＞On＞Offの切り替えを素早く行うと、切り替えるようなものにしてみた。（家の玄関のセンサーライトの切り替え設定がこの方式を使っているので、参考にした。）

2024年8月22日木曜日

関節を傷めないようにするには

年齢とともに、股関節やひざ関節が痛くなる危険性が増えますが、理学療法士のYoutuberの情報によると意外といいとやって思ってやってることが影響しているらしいです。

①湿布の使い過ぎ：短期で炎症抑えるのに使うにはいいが、長期使用すると体内の粘膜を傷め害が大きくなるらしい。

②間違った筋トレ：上半身は問題ないが、下半身は、しっかり足がついていない状態でのオープンな動きは関節を傷めるらしい。足を上げたり、後ろに蹴り上げたりとうかはご法度らしい。

③ストレッチ：もんだり、延ばすのはよくない。ただ延ばすだけのストレッチはよくないらしい。たたくのはOk。マッサージも同様に筋肉を固くするのでよくないらしい。

要するに、あまり変わったことはせず、自然な動きが一番ということらしい。

アレルギーについて

このところ、喉に痰がかるむ頻度が多くなっている気がする。ひょっとしてアレルギーの可能性はないのかと思ったりもする。

以前、ピーナッツクリームを皮膚に塗っていると、ピーナッツアレルギーになる（皮膚感作性というらしい）というのも聞いたことがある。

ボディーソープを使っているが、様々な成分が入っているので、関連がないかどうか、少し量を減らしたり、場合によって石鹸にもどしてみて、どうなるか試してみたいと思っている。牛乳石鹸なども、いいように思う。とくに、牛乳アレルギーが出たことはないので。

2024年8月14日水曜日

「資本主義の次に来る世界」ジェイソン・ヒッケル著を読んでみた

ヨーロッパの資本主義の流れがよく理解できた。

①資本主義のロジックは、人間は「自然」と切り離された存在で精神と心と主体性をもっているが、自然は不活発で機械的な存在である（二元論）。人類学者は、歴史の大半を通じて人間は、アニミズムに依拠してきた。P39　じつは、最近の科学によればアニミズムのほうが、真実に近いのでないか。P275、P278

　※鳥の言葉、魚の感情、等研究している人がいる。

②1300年年代初め、ヨーロッパ各地で平民が封建制への反旗を翻すが、うまくいかない。が、1347年黒死病により人口が激減すると、労働力が不足し、小作農と労働者が交渉力を持つようになった。農奴制が廃止。自分の土地で、コモンズ（共有地）を自由に活用できるようになる。～１５００年まで「ヨーロッパ労働者階級の黄金時代」

　※人口減少をマスコミでは、問題視しているけれど。。かといって、移民では解決できないような。

③上流階級による富の蓄積を阻んだので、小作農を土地から追い出した。いわゆる囲い込み（エンクロージャー）によって、多くの農村コミュニティが破壊された。Ｐ５３

　※能登地震で、官僚が「過疎地復興はむだ」「移住を考えよ」と言ったとか話題になっている。まさに「囲い込み」。そして、行き場所なく都市に集めて、安価に雇えれば、さらに儲かるし。安い土地を外国資本が活用して儲けることが可能。ということになりそう。

④資本主義が台頭するには、資本の蓄積が必要。アダムスミスは、少数の人が懸命に働いて稼ぎを蓄えたために生じたと主張したが、歴史家は、略奪のプロセスだったとみている。Ｐ５４　　植民地化も同様

⑤農地は一時的にしか借りられなくなった。かつての協力的なシステムは、絶望的な敵対を中心とするシステムへと変わっていった。利益を中心に計画され、資本家の利益を増やすためのものになった。生産性は高まったので、強奪の言い訳になった。

⑥ヒュームの「希少性」理論　欠乏が続くほうが、勤勉になるという考え、資本主義の支持者は、富を生み出すには人々を貧しくする必要があると考えていた。P63　資本主義の特徴であるきわめて高い生産能力は、人為的希少性の創出と維持に依存していた。植民地政府が私富を増やすには、豊富にあるものを希少にしなければならなかった。天然の果樹園を焼き払う、海岸で自由に手に入れられた塩は、これを行う権利を人々に買わせた。

　※昔は、タダだったものが有料になっている。

⑦技術革新がエネルギーや資源の消費をふやしてしまう。Ｐ１５９

　※ＥＶ、洋上風力、ソーラー等、逆に資源の枯渇や環境を破壊する例も。

⑧成長し続けなければならないという　絶対的な思い込みがある。　Ｐ１７０

⑨成長は進歩をもたらすと限らない。長命な国は、必ずしもＧＤＰによるものでない。ＧＤＰは低くても、公衆衛生や公的医療保険等が整っている国は平均寿命が高い。Ｐ１８０

　※日本は国民皆保険を今後も維持することが重要。

⑩社会がより平等なデンマークの国民は、購入する衣服が少なく、長く使う。広告も少ない。不要なぜいたく品を買うことに人々が興味を示さないため。富裕層が使いきれないほどお金を持ている場合、その余剰分を生態系を破壊する発展作業に投資する。公的サービスに投資することが、エコロジカルなメリットがある。公共財の存在は、所得を増やさなければというプレッシャーから人々を開放する。

　※古い車の税金を高くするというのも、本来あってはならないこと。

⑪人間の幸福は、収入そのものでなく、その収入で何が買えるか、より良く生きるために必要なものにアクセスできるかどうかが重要。公共サ－ビスやその他のコモンズへのアクセスを拡大すれば、人々の「福利購買力」を向上させっれる。そうなれば、さらなる成長を遂げなくても、すべての人の豊かな生活を実現できる。

　※なんでも民営化の思想が危険ということ。

⑫より高い賃金と短い労働時間という形で、生産性の向上がもたらした利益を労働者に還元できるはず。それができないのは、仕事が人為的に希少になっているから。労働者は、より勤勉かつ生産的に働かなければならず、さもなければ、より生産的な誰か（通常は、より貧しく、より危機的状況にある人）に仕事を奪われる。Ｐ２３４

　※移民により、賃金がおさえられる。

⑬資本主義は、豊かな状況では作動しない。Ｐ２３８

　　※戦争が起こると景気がよくなるとは、よく言われる。

⑭植民地化は、人間や自然を「モノ化」するプロセスだった。　Ｐ２７３

ポスト資本主義のためには　ｐ２０９

・計画的陳腐化をやめる。　物を長く使えるように設計　　・広告をへらす

・所有権から使用権へ移行する　　

・食品廃棄を終わらせる　　　・生態系を破壊する産業を縮小する

P174　重要なのは、成長そのものでなく、わたしたちが何を生産しているか、人々が必要なものやサービスにアクセスできているか、所得がどのように分配されているかということ。ある段階をすぎると、人間の福利を向上させるためにGDPを増やす必要はまったくなくなる。

2024年8月3日土曜日

鳥海山登山

　頂上まではかなり大変なので、今回は鉾立から賽の河原までということにした。眺めは良好。ニッコウキスゲがあちこち見られた。

　以前、湯の代口からアザミ坂経由で頂上まで登ったこともあるが、最高にきつかった覚えがある。また、昔はGPSが使えなかったので、迷いそうになった。たまたま通りかかった登山者の方といっしょさせてもらったこともあり、なんとかなったが。

2024年7月26日金曜日

冷蔵庫　故障かと思ったがそうではなかった

昨日、落雷による停電で、冷蔵庫が電源入らなくなってしまった。てっきり、落雷による故障かと思い、とりあえず、修理か買い替えまでの間に、つなぎの中古冷蔵庫を購入。が、故障ではないことに、今日になって気づく。

　ネットでたまたま見つけた情報によると、停電復旧後、冷蔵庫の電源がすぐに入らないのは、圧縮機（コンプレッサー）に負荷がかかっていたり、電力超過で冷蔵庫の保護装置が作動している可能性もあるのだそう。1時間程度経過してから、コンセントをつなぐようにということらしい。試しに、１日たった、今日になってつないだら、電源が入った。

　事前のこの知識がなかったことが悔やまれる。けれど、最近の冷蔵庫の消費電力を今の冷蔵庫と比較すると、半分ぐらいになっているので、これを機会にそろそろ（２０年も使っているので）買い替えどきかもしれない。いざとなったら、すぐには手に入らないことが、今回よくわかったので。

2024年7月25日木曜日

差込口がわかりづらいテーブルタップ

　黒いテーブルタップを使ってきましたが、暗いところだと抜き差しするときに、差込口がわかりづらく、苦労していた。買い替えるほどのことはないが、なんとかしたいと思っていたが、写真のように表面を白く塗装すればいいことに気づき、ペンキで塗ってみた。だいぶ使いやすくなる。

2024年7月24日水曜日

掃除機の修理　～パワーヘッドがトラブル原因に～

最近、掃除機の電源コードがやたら熱くなって途中で停止してしまう現象が起きるようになった。いよいよ故障で、買い替えかとも思ったが、なんとか修理できないかと、分解点検をする。原因は２つあったようだ。

・ひとつは、フィルターにほこりがたまって、空気の流れが邪魔されていたこと。ほこりを取り除いた。

・パワーヘッドというのだろうか、カーペット等でブラシを回転させてゴミをかきとる機能があるのだけど、これが全く回転しなくなっている。よくみたら、糸が絡まっていた。糸の絡まりをとったが、今後、同じ状況になることを考え、パワーヘッドのモーターへつながる電源ケーブルははずし、パワーヘッドの機能は使わないことにした。モーターが回らないとかなりの電流が流れるので、電源コードが熱くなった原因になっていたと思われる。

この２つの対処したことで、問題なく動作するようになった。

2024年7月22日月曜日

コロナ対策について

コロナ感染で免疫性肺炎多発とか、ワクチンの後遺症等、いろいろ心配なことが多い。まだ、よくわかってないことも多いようで、いろんな治療法も試みられているようだ。

　https://kamatayoshino-cl.jp/blog/2277

イベルメクチンも効果なしというWHOの報告もあったものの、コロナ後遺症では有効という情報もあるようだ。

※最近は、米国でもワクチンの効果の程度について、正確さに疑問の声も出始めているようだ。

ChatGPTで天気情報のスクレイピング　～人間が簡潔な方法を指示しないとうまくいかない～

気象庁のサイトから　気圧をAPI取得でもと思ったけれど、意外と情報がなかった。結局、スクレイピングしたほうが早かったようで、ChatGPTの助けを借りながら試してみた。

　さすがに、スクレイピングは個別の事情が違うので、ChatGPTは基本的コードや文法確認以外はあまりあてにならなかった。また、気圧、気温、湿度そして、単位、観測時刻など、汎用的に取得できる関数をスマートな形式で作ろうとすると意外に苦労した。DictionaryやPairなど使ってうまく、改善していく方法を探ってみたが、かえってややこしくしてしまう。それを、ChatGPTに聞いても、元のコードがややこしいため、だんだんこちらも理解が追い付かなくなり、ChatGPTの応答もけっこう的外れになってきた。結局、単純に配列などで処理することにしたら、あっさり解決。

　ChatGPTはこちらがいった通りの方針でコードを書くため、指示する方がややこしい指示をしてしまうと墓穴を掘ってしまう。簡単な方法をこちらで、提示してやらないとだめだということが、今回、よくわかった。

2024年7月17日水曜日

ツール作成もあっという間に完成

　ChatGPTは、定型的なツールを作るには、最適である。たとえば、CSVの形式を与えて、これをどのように加工して、スプレッドシートに完成データを貼り付けたいというような説明をするだけ、すぐにコードを作成してくれた。若干の手直しは必要だったが、これまで、数１０分はかかっていたようなものも、数分でできてしまう。コーディングの時間が非常に短縮されたと感じる。

2024年7月16日火曜日

朝のウオーキングもそろそろ暑さを感じる今日この頃

朝の日課、ウオーキングは、６０００歩程度を目安にしている。梅雨明けはまだだが、けっこう朝から暑さを感じる。２４℃ということだが、家の室外温度計は２９℃。

2024年7月9日火曜日

ミッション・エコノミーについて

マリアナ・マッカート氏のミッション・エコノミーという本を読んでみた。いくつか抜粋してみた。

①なぜ、ケネディはメリットの怪しいアポロ計画に賭けた？
　人々を救う発明は無駄から生まれる。２１世紀のすべては、アポロ計画の波及効果。
②新自由主義の間違い：「政府は企業のように運営されるべき」「民営化は税金の節約」は、思い込み
③政府こそ「学習する組織」に：　イギリスはコロナ対策を外注（接触者追跡システムをコンサルティング会社に）→公務員は知識を積み上げる機会・組織が学習するチャンスも損なわれた。
④戦争やアポロ計画のように予算を：　財源確保・資金繰りが問題なのでなく、「そのミッションを実現するために必要なリソースをどう捻出するか」　重要なのは、お金を有効に活用する生産能力が経済にあるかどうかということ。
⑤政府の借金をめぐるウソ　：　政府には主権通貨がある。人々がその国の通貨を持ちたがり、お金が生産的に投資されている限り、債務不履行におちいることなく、いくらでも借金を抱えることができる。　　政府の赤字は国民の黒字ーMMT

⑥パイを拡大：　アメリカの社会保障制度　退職者ひとりあたりの労働者数が１９５０年の１６：１→現在では、約２：１　しかし、１９５０年の祖父母時代の労働者よりはるかに生産性が高ければ、問題ない。

　経済に成長の余地があり、（人的・物的）能力をフル活用していない限りは、投資や支出で不景気にはならない。固定的な経済に資金を投入するだけの投資ではなく、戦略的な投資（忍耐強く、長期的で、ミッションに基づく投資）によって経済を拡大すれば、長期的なインフレを引き起こさない。既存のパイの中で分配を増やすのではなく、パイを拡大すればよい。
　１９７０年代のインフレ　能力不足が原因ではない。石油ショック、金融引き締め、賃金スライドといった供給サイドの現象。
　１９２１～３年のワイマール共和国のインフレ　供給サイドの問題。（軍隊が占領＞ドイツの生産が止まった）
　これらは、普通の状況でない。普通なら、政府が非政府部門の雇用と生産水準を高く維持するために資金を提供。
　戦略的公共投資＞長期的な成長分野にお金＞生産性向上＞生産能力が拡大＞インフレ起きない。　　市民の健康の維持＞生産能力向上

　※例えば、以前は今より学校で理科振興法（国の産業・技術振興のための法律だと思われる）で国庫による購入できたように思う。このところ、節約志向が広まり、なかなか予算がつきにくくなっているということはないだろうか。
⑦事前分配：ミッションには莫大な投資必要・リスク＞政府が多くの人々と投資の利益を共有しようとするのは合理的　イノベーションは不確実　投資のリターンは保証されない　→リターンの分配を政府が決めることは、市場を創造し形成する役割を負う者の正当な権利。納税者が分配を享受するのは当然のこと。
　やり方はさまざま、政府が公的ファンドをつくり、配当を市民に分配。政府も株をもつ。収益を将来の技術革新に使う。

2024年7月5日金曜日

seleniumは試行錯誤が必要

スクレイピング処理は、泥臭い作業といえる。調べてもなかなかわからないことが多い。
public string ielFind(IWebElement iel, string xpath)
{
try
{
IWebElement reviewerElement = iel.FindElement(By.XPath(xpath));
return reviewerElement.Text;
}
catch (NoSuchElementException)
{
return string.Empty;
}
}
という関数を作って　classが’a1 a2'または'a1'のどちらかを取得したいときは、Or処理をいろいろ考えるより、単純に、
ielFind(iel, ".//p[@class='a1 a2']")+ ielFind(iel, ".//p[@class='a1']");
としたほうがよかった。（該当するものないときは空文字になるので）

また、非表示になっていると、取得できない。そういうときには、クリックが必要なら事前に
IWebElement element2 = iel.FindElement(By.XPath(xpath));
element2.Click(); などの処理を入れて表示してからだと取得できた。

ChatGPTも、基本的なところや細かいところで参考にはなったが、イレギュラー的なことになってくると、やはり人の力（試行錯誤）によらないと、解決は難しいかもしれない。（現段階では）

2024年7月2日火曜日

lim x→0 ((cos x) -1)/x^ｐ =0　の証明　1＜ｐ＜2

　chatGPTに聞いてみた。

　テイラー展開で-(x^(2-ｐ))/2 + x^(4-p)/24 + ....　　とここまではいいが、「2-p はｐ＜1の場合、負の数になります。したがって、x^(2-p)　→ 0です。」という間違いがあった。　正しくは「ｐ＜2なので、2-pは正の数になります。したがって～」が正しいので、指摘したところ認めてくれた。

　ChatGPTも、不等式関係は苦手なようだけど、証明の方向性は間違ってないので、かなり忘れかけている自分にとって、数学の理解にはとても助かっている。

2024年6月30日日曜日

カーリルが書店在庫情報プロジェクトの実証実験を開始

　最近は、本を購入する前に、カーリルで図書館検索を行い、次に、ヤフオクを検索し、次にアマゾンの中古本や新規購入という順で探している。これに、近所の本屋さんも入ると非常にありがたい（実物を手に取って確認もできるので）。アマゾンの影響で、地元の本屋さんも大変だろうから、助かるのでないだろうか。　

　書籍に限らず、地元のお店屋さんの在庫をネット上で見られれば、客にとっても店にとっても、いいのでないかと、以前から考えていましたが。この件について、ChatGPTに実現性を質問してみました。AI技術も使って、登録を簡便化することが鍵になるとは思いますが。回答の抜粋は、以下の通りでした。

「地元商店街の在庫情報をネット上で検索できるシステムは技術的に可能で、地域活性化に貢献します。Deep Learningを使って商品情報を自動登録し、手動で修正できるインターフェースも提供します。リアルタイムで在庫を管理しやすいツールや、ユーザーが簡単に検索できるインターフェースを設計します。商品カテゴリや価格帯などで絞り込める詳細な検索フィルターを用意し、地元商店と連携してシステムを導入します。プロモーション活動やクラウドサービス、モバイルアプリの開発も重要です。コスト面では初期投資や運用コストを考慮し、収益モデルを多角化してカバーします。」

　このようなシステムを導入することで、地元の商店街がより多くの顧客にリーチできるようになり、地域経済の活性化につながる可能性があります。具体的な計画と実行が必要ですが、技術的には十分に実現可能なプロジェクトです。

＊＊＊＊＊＊＊＊＊＊＊

　ただ、クラウドサービス利用料が気になります。今、クラウドの利用料金が高くて、日本経済に影響与えてるぐらいなので。国営のクラウドサービスのようなものでもあれば、規模の大小にかかわらず気軽に利用できるようになるのでしょうが。

2024年6月29日土曜日

PIC12F675でタイマー製作

電子ブザーとタッチセンサースイッチで、PICのタイマーを作ってみた。

スイッチを長押しする間に、ブザーの回数をカウント、１カウント当たり１０分（誤差あり）

確認のため、すぐにブザーが同じ回数だけ鳴る。そして、指定した時間後にブザーがなるという仕組みにした。

GPIO4を入力にしたが、うまくいかず、GPIO3にした。ただし、MCLREの設定はOFFにする必要があった。TPP223から2SC1815をスイッチング動作(こちらを参照）させた。GPIO3入力ピンをアースにしてスイッチ動作させることにした。内部のプルアップ抵抗がうまく設定できなかったので、10KΩの抵抗を外部にプルアップ用につないだらうまくいった。(*2SC1815を使わず、直接TPP223をPICにつないで、GP3==1を検知するほうが回路が簡潔になるかもしれないと、あとで気づいたが、TRや抵抗も余っているので、この方法で試してみた。）

#include <xc.h>

#pragma config FOSC = INTRCIO   // Oscillator Selection bits (INTOSC oscillator: I/O function on GP4/OSC2/CLKOUT pin, I/O function on GP5/OSC1/CLKIN)
#pragma config WDTE = OFF       // Watchdog Timer Enable bit (WDT disabled)
#pragma config PWRTE = ON       // Power-Up Timer Enable bit (PWRT enabled)
#pragma config MCLRE = OFF       // GP3/MCLR pin function select (GP3/MCLR pin function is MCLR)
#pragma config BOREN = OFF      // Brown-out Detect Enable bit (BOD disabled)
#pragma config CP = OFF         // Code Protection bit (Program Memory code protection is disabled)
#pragma config CPD = OFF        // Data Code Protection bit (Data memory code protection is disabled)
#define _XTAL_FREQ 4000000

void beepShort(unsigned int c){
    GPIO2 = 0 ;  
    unsigned int k, j;
     for (k = 0; k < c; k++) {
        GPIO2 = 1 ;          
        __delay_ms(150) ;        
        GPIO2 = 0 ;  
        __delay_ms(300) ;
    }
}

void main(void)
{  
    nGPPU = 1;   // 内部プルアップ抵抗を無効にする
    ANSEL = 0b0000000;          // アナログ入力を無効にする
    TRISIO = 0b00001000;        // GPIO3を入力、他のピンを出力に設定
  //  WPU = 0b00001000;           // GPIO3のプルアップ抵抗を有効にする    
    unsigned int minutes=0; 
    unsigned int counts=0;      
    __delay_ms(200);  
    while (1)
    {                                     
       if (GP3 == 0)
       {   
           __delay_ms(250);
           GPIO2 = 1;
           __delay_ms(250);
           GPIO2 = 0;
           __delay_ms(250);
           minutes++;
       } 
       else
       {          
           __delay_ms(1000); 
           if (counts == 0 && minutes > 0 ) {
               beepShort(minutes); 
               counts=1;               
           }else{
               if(counts > 60*10*minutes && counts % 2 == 0){
                    GPIO2 = 1;
               }else{
                    GPIO2 = 0 ;
               }
              if(counts>0){
                  counts++;
              } 
           }                
       } 
 
    }  
}

今回は、小型化するため、ボタン電池を自作の電池フォルダ（鈴メッキ線を2穴を通して電極としたアクリル板２枚ではさんだ）におさめてみた。

2024年6月28日金曜日

chatGPTも計算ミスする？

　数学の書籍の問題（ルベーグ積分）で、「s>0ならば∫(0,1) (1-x^2)^(s-1) λ(dx)　＜+∞　が成り立つことを、0<x<1なら、(1-x^2)^(s-1)≦max{1,2^(s-1)}(1-x)^(s-1)ということを使って証明できますか」という質問をchatGPTに聞いてみた。
　すぐに、完全な回答は得られず、少しやりとりが必要だった。というのも、0<s<1のときに　1−x^2≤1−x 　としてしまうミスがあったため。(0<x<1の条件なので）

結果的に (1-x^2)^(s-1)

≤ (1-x)^(s-1)となるので、一見、見逃してしまいそうだけれど。

　正しくは、1−𝑥^2≥1−x　から、s-1<0なので、(1-x^2)^(s-1)≤ (1-x)^(s-1)　となるということを、ChatGPTに確認したところ、間違いを認めてくれた。
　あらためてChatGPTというのは、どうやって数式能力を獲得しているんだろうと考えてしまった。LLMというのは、こういった間違いを起こしやすいんだろうかと。
　wolfRamという数式処理サイトでも試してみたが、こちらは日本語をちゃんと理解してくれなかった。各種AIツールは、数学に関しては、まだ発展途上かもしれない。

　間違ってくれたほうが、人間の思考力を訓練してくれるという点ではいいのかもしれないけれど。(^^)

歴史から見える今の日本経済って？

　歴史は繰り返すとはよく言われるが、今の日本経済がなぜこうなってきたか考える際に、近代の歴史を見ると、参考になることも多いようだ。

　最近は、Youtubeでわかりやすく解説してくれる動画も多くなって、学生時代には知らなかった事実が分かってきて、興味深い。（世界はどうなっている　Youtube　林千勝・水島総　第２８回から抜粋させていただいた。）

・リンカーン：　南北戦争時、ウオール街からの借金をリンカーンが断り　政府紙幣発行　政府は、金利付きお金を借りるべきでない。　　それが原因かどうか不明だが。　暗殺

※関連して：フランスの植民地が多いアフリカも、自国通貨発行の制限を受け、貧しい暮らし＝PBバランスにより、自国建て国債発行（通貨発行）が制限されてきた日本の状況になんか似ている？

・マネーの民主主義の戦い　：　政府紙幣は　かなりの発行量だった。回収しようとした。ロスチャイルド傘下の大統領が金本位制にしようとした。　国を分断する激闘　ウイリアムブライアン（現代のトランプ？）は反ロスチャイルド　　１０倍の選挙資金で、マッキンリー大統領　→金本位制

・グラント将軍：　リンカーンの右腕　大統領　　日本にも来ている。　列強のアジアへの野心に忠告。　明治天皇に忠言　　凡そ一国に於いて避けるべきものは、外債に過ぐるもの無し。　戦争させて、金を貸し、内政干渉。→　明治政府は外債を忌避　明治３０年頃まで

・トーマス・ラモント：　井上準之助は、関東大震災、日本の恐慌で助けを求めた

　ラモントは　高橋是清蔵相　の　積極的経済回復策を　不健全と位置づけ
　　　緊縮財政・通貨収縮（デフレ）・保護関税撤廃・国内産業への政府支援の縮小
　　　を求めた。　金本位制への復帰前提とした。

・井上：国際協調のため、金本位制に復帰と述べている。イギリスがすでに、金本位制復帰で　デフレなっているにもかかわらず。

　濱口と井上は「金解禁は経済正常化への端緒であり、その後長い苦節を耐えた後に、日本の経済構造が改革される」として断行。　→　現代の状況によく似ている。（そういえば、ん十年前、痛みに耐えて構造改革　のようなフレーズってどっかで聞いたことがあるような）　金流出につなる。　大不況と社会不安を生み出す。

・高橋是清：国際金融資本勢力に対抗する必要を考えていた。日本が将来に亘って　英米に伍する経済力を維持するには、中国との経済提携による東亜経済力の創出のほかに道はない。　高梁是清は正反対の政策をとり　デフレ収束（世界にさきがけ不況脱出）。

※　こうしてみると、緊縮財政（新自由主義）か積極財政（通貨発行）かという２択のせめぎあいが、昔からあったということがよくわかる。

2024年6月22日土曜日

raspi Mp3プレーヤに機能追加

Mp3プレーヤにネットラジオの機能等を追加してみた。

使い方
①Sw1（GPIO2）Sw2（GPIO3）Sw3（GPIO4）に以下の機能を持たせた。
Sw1:次のファイルへ　Sw2:前のファイルへ Sw3:ポーズ、再開
Sw3+Sw1:次のフォルダへ Sw3+Sw2:前のフォルダへ
②指定フォルダ内に任意にフォルダを追加して、中にはmp3ファイル以外に拡張子.urlのファイルを入れられるようにした。urlファイルにはネットラジオのURLと曲名（音声合成で読み上げるためのもの）を入れておくと、ネットラジオにもアクセスできるようにしてみた。

（例としてNHK第二の場合.

https://radio-stream.nhk.jp/hls/live/2023501/nhkradiruakr2/master48k.m3u8

nhkだいにほうそう

)

なお、mp3は、フォルダ内での番号を音声合成するようにした。
③最後にアクセスしたファイルとフォルダから、次回、電源入れたときに再開できるようにした。

Mp3Player.py

#!/usr/bin/python3
# -*- coding: utf-8 -*-

from __future__ import print_function
import RPi.GPIO as GPIO
import os
import time
import subprocess
import signal
import json

# ピンの設定
PINS = [2, 3, 4]

GPIO.setmode(GPIO.BCM)
for pin in PINS:
    GPIO.setup(pin, GPIO.IN, pull_up_down=GPIO.PUD_UP)

last_pin_status = [0] * len(PINS)

# フォルダリストの設定
SONG_DIR = '/home/pi/'
FOLDER_LIST = ['radio', 'music', 'english', 'cw','radioE','radiko']
current_folder_index = 0

# フォルダごとの現在の曲のインデックスを保持する辞書
current_song_indices = {folder: 0 for folder in FOLDER_LIST}

# 再生状態の管理
is_playing = False
player_process = None
radiko_flg =0
repeat_flg =0
mp3flg= False

# 状態保存ファイルのパス
STATE_FILE_PATH = '/home/pi/player_state.json'

def play(spath):
    song_path = os.path.join(SONG_DIR, spath)
    command = 'mpg123 %s' % (song_path)
    print(command)
    subprocess.run(["mpg123", song_path])

def get_files_in_current_folder():
    folder_path = os.path.join(SONG_DIR, FOLDER_LIST[current_folder_index])
    files = sorted([f for f in os.listdir(folder_path) if f.endswith('.mp3') or f.endswith('.url') or f.endswith('.rdk')])
    return files

def play_current_song():
    global player_process, is_playing, current_song_indices,radiko_flg,mp3flg
    radiko_flg=0
    mp3flg=False
    SONGS = get_files_in_current_folder()
    if current_song_indices[FOLDER_LIST[current_folder_index]] >= len(SONGS):
        current_song_indices[FOLDER_LIST[current_folder_index]] = len(SONGS) - 1
    if current_song_indices[FOLDER_LIST[current_folder_index]] < 0:
        current_song_indices[FOLDER_LIST[current_folder_index]] = 0
    if SONGS:
        song_path = os.path.join(SONG_DIR, FOLDER_LIST[current_folder_index], SONGS[current_song_indices[FOLDER_LIST[current_folder_index]]])
        stop_song()
        if song_path.endswith('.mp3'):
            player_process=subprocess.Popen(['/home/pi/jvoice-m.sh',str(current_song_indices[ FOLDER_LIST[current_folder_index] ]+1) ])
            player_process.wait()
            command = ['mpg123', song_path]
            mp3flg=True
        elif song_path.endswith('.url'):
            with open(song_path, 'r') as f:
                url = f.readline().strip()
                station = f.readline().strip()
            player_process=subprocess.Popen(['/home/pi/jvoice-m.sh',station])
            player_process.wait()
            command = ['cvlc', url]
        elif song_path.endswith('.rdk'):
            with open(song_path, 'r') as f2:
                rdk = f2.read().strip()
            subprocess.Popen(['/home/pi/jvoice-m.sh',rdk])
            command = ['/home/pi/lis_radiko.sh', rdk]
            radiko_flg=1
        print(f"再生中: {song_path}")
        player_process = subprocess.Popen(command)
        is_playing = True
    else:
        print("No songs available in the folder.")

def stop_song():
    global player_process, is_playing
    if player_process is not None:
        player_process.terminate()
        player_process.wait()  # プロセスが完全に終了するまで待つ
        player_process = None
    is_playing = False

def pause_resume_song():
    global is_playing,player_process
    if player_process is not None:
        if is_playing:
            player_process.send_signal(signal.SIGSTOP)
            is_playing = False
        else:
            player_process.send_signal(signal.SIGCONT)
            is_playing = True

def set_volume(volume):
    if 0 <= volume <= 100:
        subprocess.run(['amixer', 'sset', 'Master', f'{volume}%'])
    else:
        raise ValueError("Volume must be between 0 and 100")

def get_volume():
    result = subprocess.run(['amixer', 'get', 'Master'], capture_output=True, text=True)
    for line in result.stdout.splitlines():
        if 'Front Left:' in line:
            volume_str = line.strip().split(' ')[-2]  # 最後から2番目の要素に音量があることを仮定して取得
            volume = int(volume_str.replace('[', '').replace('%]', ''))
            return volume
    return None

def change_folder(direction):
    global current_folder_index, SONGS, current_song_indices,radiko_flg
    current_folder_index = (current_folder_index + direction + len(FOLDER_LIST)) % len(FOLDER_LIST)
    SONGS = get_files_in_current_folder()
    current_song_index = current_song_indices[FOLDER_LIST[current_folder_index]]
    save_state()
    time.sleep(0.5)
    print(f"フォルダ切り替え: {FOLDER_LIST[current_folder_index]}")
    player_process=subprocess.Popen(['/home/pi/jvoice-m.sh',"フォルダ "+FOLDER_LIST[current_folder_index]+"　にかえました"])
    player_process.wait()
    pause_resume_song()
    if radiko_flg==1:
        radiko_flg=0
        player_process = subprocess.Popen( ['/home/pi/lis_radiko.sh', 'Dummy'])

def save_state():
    state = {
        'current_folder_index': current_folder_index,
        'current_song_indices': current_song_indices,
    }
    with open(STATE_FILE_PATH, 'w') as f:
        json.dump(state, f)
    print(f"State saved: {state}")

def load_state():
    global current_folder_index, current_song_indices
    if os.path.exists(STATE_FILE_PATH):
        with open(STATE_FILE_PATH, 'r') as f:
            state = json.load(f)
            current_folder_index = state.get('current_folder_index', 0)
            current_song_indices = state.get('current_song_indices', {folder: 0 for folder in FOLDER_LIST})
            print(f"State loaded: {state}")
    set_volume(80)
    current_volume = get_volume()
    print(f"現在の音量は {current_volume}% です。")
    play('jingle_14.mp3')

def signal_handler(sig, frame):
    global mp3flg,player_process,is_playing,last_pin_status
    if player_process:
        player_process.terminate()
    save_state()
    GPIO.cleanup()
    print("Exiting gracefully")
    exit(0)

signal.signal(signal.SIGINT, signal_handler)

# プログラム開始時に状態を読み込む
load_state()

# 初期曲再生
SONGS = get_files_in_current_folder()
if SONGS:
    play_current_song()
    print(f"再生中: {SONGS[current_song_indices[FOLDER_LIST[current_folder_index]]]}")

try:
    while True:
        pin_status = [GPIO.input(pin) for pin in PINS]

if last_pin_status[0] == 1 and pin_status[0] == 0:  # 次の曲を再生
            if pin_status[2] == 0:  # PIN3がONでない場合
                current_song_indices[FOLDER_LIST[current_folder_index]] = (current_song_indices[FOLDER_LIST[current_folder_index]] + 1) % len(SONGS)
                play_current_song()
                save_state()

elif last_pin_status[1] == 1 and pin_status[1] == 0:  # 前の曲を再生
            if pin_status[2] == 0:  # PIN3がONでない場合
                current_song_indices[FOLDER_LIST[current_folder_index]] = (current_song_indices[FOLDER_LIST[current_folder_index]] - 1) % len(SONGS)
                play_current_song()
                save_state()

elif pin_status[2] == 1:  # 一時停止/再開
            if last_pin_status[2] == 0:
                pause_resume_song()
            else:
                if last_pin_status[0] == 0 and pin_status[0] == 1 and pin_status[1] == 0:  # PIN3がONのときにPIN1をON
                    change_folder(1)
                elif last_pin_status[1] == 0 and pin_status[1] == 1 and pin_status[0] == 0:  # PIN3がONのときにPIN2をON
                    change_folder(-1)

elif last_pin_status[1] == 1 and pin_status[1] == 0 or last_pin_status[0] == 1 and pin_status[0] == 0: # PIN1,2 off
                    print(f"resume_song {pin_status[2]}")

if pin_status[0] == 1 and pin_status[1] == 1 :
                    subprocess.Popen(['rm',STATE_FILE_PATH])
                    player_process=subprocess.Popen(['/home/pi/jvoice-m.sh','しょきかします　さいきどうしてください'])
                    player_process.wait()
                    break
        elif pin_status[2] == 0 and pin_status[0] == 1 and pin_status[1] ==1 : # repeat
               if mp3flg and repeat_flg == 0 :
                player_process=subprocess.Popen(['/home/pi/jvoice-m.sh','れんぞくさいせいします'])
                player_process.wait()
                repeat_flg=1

while repeat_flg == 1 :
                current_song_indices[FOLDER_LIST[current_folder_index]] = (current_song_indices[FOLDER_LIST[current_folder_index]] + 1) % len(SONGS)
                play_current_song()
                player_process.wait()  # プロセスが完全に終了するまで待つ
                player_process = None
                is_playing = False
                save_state()
                pin_statusx = [GPIO.input(pin2) for pin2 in PINS]
                if (pin_statusx[0] == 1 and pin_statusx[1] ==0) or ( pin_statusx[0]==0 and pin_statusx[1]==1):
                  player_process=subprocess.Popen(['/home/pi/jvoice-m.sh','れんぞくさいせいをやめます'])
                  player_process.wait()
                  repeat_flg = 0

last_pin_status = pin_status

time.sleep(0.1)
finally:
    print(f"GPIO CleanUp")
    GPIO.cleanup()

・ChatGPTも使いながら、半日ほどで完成。ChatGPTを使わなかったら、おそらくもっと時間がかかったかもしれない。一気に、コードを作ると、どこにバグがあるかチェックが大変になるので、もとになるコードに少しずつ機能を追加する方法をとった。

・ChatGPTも、けっこう間違ったコードを出してくるし、音声再生やGPIO等のハード面の癖で理屈通り動かないこともあるので、その都度、修正したり、試行錯誤する必要があった。とはいえ、知識が豊富なので、いろいろな解決方法を提示してくれて非常に助かる。ChatGPTが出てきたことにより、プログラマーの仕事は、コーディング作業というより、アイデアづくりとBugFixがメインになりそうだ。

・SDカードをいちいち入れ替えたりせず、sambaを使って、ファイルを追加したり、機能の変更ができるので、便利に使えそうだ。WIFIドングルが使えるとさらに便利だろうけど、残念ながら古いraspi用のドライバが入手できなくなっていて（サイトが閉鎖？）諦めた。ドライバのソースコードがあればコンパイルという手もありそうだが、ハードルが高い？

※その後、動作しないことがあったので、確認してみると、player_state.jsonファイルが、うまく保存されていないことが原因のようだった。まだ、コードに若干バグがあるかもしれない。このファイルを削除すると、起動できた。

※radikoも再生できるように修正してみた。

sudo apt install jq が必要です。

http://mycc.s33.xrea.com/data/rpi/lis_radiko.tar.gzからスクリプト入手しました。

tar zxvf で解凍し、chmod +xで実行権限与えます。

http://radiko.jp/index/ のURL内のアドレス参照して./lis_radiko.sh YBCなどのようにして再生するようにしてみた。

radikoの再生は、.rdkというファイルをradikoというフォルダの中に用意して、局名を指定するようにしてみた。

※さらに、radikoの場合、曲名を音声合成で話すようにしてみた。（LCD表示も考えたが、節約のため、音声合成としてみた。）

　https://raspida.com/speech-synthesis/を参考に、セットアップ

※jsonファイルが壊れることがあったので、初期化コマンドを追加した。３つのスイッチを同時押しで、呼び出すようにした。

※radikoの再生が、フォルダ変更の際に止まらないので、dummyの局を再生しようとすることで、止めるようにした。力技的だが。

※SW1＋SW2で連続再生（MP3のみ）できるようにした。連続再生をやめたいときは、SW1かSW２をOn。

2024年6月21日金曜日

raspi（初代）でMp3再生　備忘録

　raspiでタッチセンサーにより、Mp3を再生することを試してみた。ディスプレイはつないでいない。OS起動時には、Pythonスクリプトが立ち上がっている必要があるが、これがなかなか一筋縄ではいかなかった。OS起動後に、pythonスクリプトを手動で実行はとくに問題なくできて、Mp3の再生もできたが、自動起動は配慮が必要だった。raspiでのMp3再生は自由度は高いと思うが、Dfplayerに比べると、どうしてもCPUに対する負荷が高くsambaやSSHの反応も遅くなりがち。手軽さはDfplayerに軍配があがると思う。

・事前準備として　osのupdate upgradeはすましておく。また、pipが使えず、代わりに apt-get install python3-＊＊＊　の＊＊＊の部分に必要なモジュール名をしてやるといいようだった。他に、mpg123のインストール、raspi-configによるaudioの設定をはじめとしていろいろ設定が必要だった。

・sudo nano /etc/systemd/system/mp3player.serviceでサービスを作成
[Unit]
Description=Python Script for MP3Player
After=multi-user.target sound.target
[Service]
Type=simple
User=pi
Group=pi
WorkingDirectory=/home/pi/
ExecStartPre=/bin/sleep 20

#２０秒後にスタートするようにした。が、Afterで、sound.targetを指定したので、あまり意味ないかもしれない。

ExecStart=/usr/bin/python3 /home/pi/Mp3Player5.py
StandardOutput=inherit
StandardError=inherit
Restart=on-failure
RestartSec=10
[Install]
WantedBy=multi-user.target

作成後は、反映させるために

sudo systemctl daemon-reload
sudo systemctl enable mp3player.service
sudo systemctl start(2回目からrestart) mp3player.service
sudo systemctl status mp3player.serviceで確認

sudo journalctl -u mp3player.service　でも確認する

Mp3Player.pyのコードは、次回のブログ投稿で公開。

・pulseが、ログイン前に動作するようにいろいろ設定が必要

/etc/pulse/client.conf
autospawn = yes
daemon-binary = /usr/bin/pulseaudio
extra-arguments = --start

sudo nano /etc/pulse/system.pa
load-module module-native-protocol-unix
load-module module-dbus-protocol

sudo nano /etc/pulse/daemon.conf
daemonize = yes

sudo nano /etc/default/pulseaudio
PULSEAUDIO_SYSTEM_START=1

sudo systemctl enable pulseaudio
sudo systemctl start pulseaudio

sudo nano /etc/asound.conf
pcm.!default {
type hw
card 0
}
ctl.!default {
type hw
card 0
}

pulseaudio.serviceも作成します
[Unit]
Description=PulseAudio System Server
After=sound.target
[Service]
Type=simple
ExecStart=/usr/bin/pulseaudio --system --disallow-exit --disable-shm --exit-idle-time=-1
Restart=always
[Install]
WantedBy=multi-user.target

sudo systemctl daemon-reload
sudo systemctl enable pulseaudio.service
sudo systemctl start pulseaudio.service

2024年6月19日水曜日

風呂の天井の塗装

　風呂の天井が、カビがとりずらくなり、かなり塗装もとれてきたので、業者に頼んでみたが、断られてしまった。かといって、ユニットバス丸ごと交換も予算的にきつい。アルミ複合合板や専用のパネルも考えたが、コストも手間もかかりそうだし、パネルだとカビを隠すだけで施工が悪いと、見えないところでカビが増えそうで、却下。

　安価な方法として、塗装に挑戦してみた。色を合わせるのに不安があったが、アトムハウスペイント水性かべ・浴室用塗料(無臭かべ) 200ml をアマゾンに注文して、使ってみたら思ったより、きれいに仕上げることができた。(間違って２個注文してしまった。我が家の風呂は狭いので、１個でも十分余裕だった。）スプレーだと、コスパ・飛び散りの問題もあるかと思い、刷毛塗りにしたがそれほど塗り斑も目立たず問題なかった。ただ、どのぐらい維持できるかは、何とも言えない。カビ防止剤も入っているようなので、しばらくは大丈夫かと思う。様子を見たいと思う。

使用電力取得

　電気料金も値上がりしているので、節約のため使用電力を常に表示できるといいのでないかと思う。電力計もスマートメータに置き換わったため、申請すれば、リアルタイムの使用電力を取得する仕組みも個人で作れるようだ。すでにそういう部品 BP35A1があるが、まだ7000円以上はする。

　あるいは、自分でクランプ（電流センサ）をPICやESP32等につないで自作もできそうだ。センサ等で作るほうが、現段階では安価。BP35A1がもう少し安価になるかどうかしばらく様子見かと思う。

2024年6月18日火曜日

raspi Bでタッチセンサーを使ったプレーヤー

古いraspi（初代）にタッチセンサーをつないで、プレーヤー製作に挑戦してみた。タッチセンサーは以前格安で購入したものがたくさん余っていたので、今回は３個にしてみた。スピーカーも、２個使いステレオにしてみる。アクリル板にタッチセンサとスピーカを接着剤でつけたものを、スペーサーで基板と合体させています。アンプの部分のみ垂直にアクリル板をつけています。それ以外の側面には、放熱や接続を考え、アクリル板はつけていません。

　アンプはアマゾンで169円で購入したものです。届くまで１か月近くかかったものの、音量は十分です。粗大ごみとして出すとお金がかかるので、分解した炊飯ジャーから取り出したエナメル線（両端の被覆はカッターをたてて削りました）を使って配線しました。（小型部品ばかりなので、細い線のほうがいいようです。）電源はモバイルバッテリーをつなぎ、設定やプログラミングはLAN経由のSSHで行う予定です。FMワイヤレスなどをつなげば、車載用のプレーヤーとしても使えそうです。

PICを使ったエレキー

PIC12F675を使って、エレキーを作ってみた。

アクト電子（有）さんが、回路図とPIC用のHEXファイルを公開していたので、そのまま使わせていただいた。メモリのほうはなぜか機能しなかったが、エレキーのほうは問題なく動作させることができた。

2024年6月6日木曜日

Googleで、DRY原則を早まらないこと　という呼びかけがあったとのこと

　2重のコードを避けるというDRY原則が、これまでコーディングの世界ではいいとされてきましたが、あまり早くこれを適用すると、後々メンテが大変になるので、気を付けるように呼びかけがあったとのこと。（Gigazineの記事より）

　DRY原則はよさそうに見えて、やりすぎるとわかりにくくなるというのは以前から感じてたので、とても納得できます。適度に、重複を残しておくと、それぞれ２か所のコードのいずれかを少し変えたいときなど、とても重宝します。また、間違って修正したときも、片方にバックアップが残っているようなものなので、復旧が楽です。何事も、中庸が大事ということでしょうか。

2024年6月5日水曜日

室内アンテナの改良実験

実験なので、ありあわせの材料で室内アンテナを３種類ほど作ってみた。固定方法は、レースカーテンの網目に引っ掛ける方式をとった。（窓を開けるには、アンテナを撤去する必要がある。）これまでの室内アンテナは専ら受信専用だったが、なんとか微弱電波でも送信できないかと工夫してみた。

①Eスポのシーズンなので５０MHzのダイポール製作：アルミ線の余りがあったので、半波長のベントダイポールにしてみた。バランをつけている。

②144MHzと430MHzのモービルホイップにアルミ線ラジアル追加：あまり出番はないが、短縮型のホイップとM型凹コネクタ２個をねじで組み合わせてモービル用を室内用に変えた。

③７、１４、２１MHｚ用のＭＬＡ：フェライトコアに銅線を巻き、その中をメインループとなるビニル線２ｍ程度を通しハンガーに沿わせてみた。エアバリコンの容量は、7,14と21MHzで、ギボシで切り替えるようにした。

いずれも、SWRは1.5~2程度に収まっている。室内用なので、FT8等のQRPで使用となるけれど、コンディション見ながらしばらく使ってみる予定（見た目あまりよくないので、継続して使うには美観をどうするかが検討課題）。７MHzのFT8だとPSKモニターによれば、数Wでも国内は届いているよう。まだ、交信はできてないが。

PIC12F675を動かしてみた　備忘録

PICを使うのはしばらくぶりで、コンパイラやライターの使い方でだいぶ手間取ってしまったが、なんとかLEDの点滅ぐらいはできた。

・IDEはMPLAB X IDE　pic12だとコンパイラはXC8　Ver1.45　（最新版だとうまくいかなかった）

・Kit3.5というライターを使った。ディフォルトでは、電圧が供給されないらしく、設定できちんと5V供給する設定が必要だった。

設定は、ほとんど、プロジェクト名を右クリック＞プロパティから行うことができた。

Conf[default]のところで、デバイス選択(PIC12F675)、ハードウエア選択(kit3.5)、コンパイラ選択(ver1.45)を行う必要がある。コンパイラは途中から選択できず、プロジェクトの新規作成の段階で選択しないとだめだった。

2024年5月30日木曜日

LGT8F328Pのシリアル通信でDfPlayerを操作

　以前、うまくいってなかった、arduino互換 LGT8F328Pのシリアル通信によるDfplayer操作に再度挑戦してみたら、今回はうまくいきました。音量をあまり大きくすると、電圧降下が起きるためか、不安定になるようなので、初期化で音量を下げるようにしています。DfplayerとつなぐPinは5,6にしたらうまくいくようです。スイッチはタッチセンサttp223を使用。LGT8F328Pはサイズが小さいのでコンパクトにまとめることができました。

　使い方は、一方のスイッチをOnにするたびに、フォルダを変更します。もう片方のスイッチをOnにするたびに、そのフォルダ内のファイルを順に再生します。なお、今回は01~05までのフォルダにしてみました。必要に応じて、スケッチの定数maxfを変更すれば、98までフォルダを増やせます。99のフォルダには001.mp3に「フォルダ１です」のように音声ファイルを入れておきます。フォルダ内のファイル名は先頭が0の３桁数字が必要です。多くの音声ファイルを手軽に再生するのに便利に使えそうです。　

ただ、先頭に数字をつける作業があるので、ここは、.netでツールを作成してなるべく効率よくできるようにしているところです。

Pin接続とスケッチは以下のようにしてみました。

delay時間を調整したりしないと、各フォルダ内のファイル数の取得がうまくいかず、試行錯誤必要だった。まだ、完全でないところもあるかもしれません。

#include "SoftwareSerial.h"
#include "DFRobotDFPlayerMini.h"

static const uint8_t PIN_SP = 9; // Connects to Piezoelectric Speaker 
static const uint8_t PIN_MP3_TX = 6; // Connects to module's RX 
static const uint8_t PIN_MP3_RX = 5; // Connects to module's TX 
SoftwareSerial softwareSerial(PIN_MP3_RX, PIN_MP3_TX);

const int TOUCH1 = 2; 
const int TOUCH2 = 3;

const int RATE=5; // Morse Code Speed

// Create the Player object
DFRobotDFPlayerMini player;
static bool flg=false;
static bool flg2=false;
static bool flg3=false;
static int touchcount=0;
static int touchcount2=0;
static int threshold = 3; //連続タッチの間隔の閾値

static int cnum=0;  //current file number
static int cfnum=1; //current folder number 0:mp3
const int maxf=5;  //Maximum number of folders
static int maxi[maxf+2]; //Maximum number of files in each folder

const int LED_PIN = 13;  // 接続するLEDのピン
String convertToMorse(int num) {
    String morseNumbers[] = {
        "-----",  // 0
        ".----",  // 1
        "..---",  // 2
        "...--",  // 3
        "....-",  // 4
        ".....",  // 5
        "-....",  // 6
        "--...",  // 7
        "---..",  // 8
        "----."   // 9
    };
    String morseCode = "";
    while (num > 0) {
        int digit = num % 10;
        morseCode = morseNumbers[digit] + " " + morseCode;
        num /= 10;
    }
    return morseCode;
}

void dot() {
    digitalWrite(LED_PIN, HIGH);
        digitalWrite(PIN_SP, HIGH);
    delay(20*RATE);  // 200ミリ秒間LEDを点灯
    digitalWrite(LED_PIN, LOW);
        digitalWrite(PIN_SP, LOW);
    delay(20*RATE);  // 200ミリ秒間LEDを消灯
}

void dash() {
    digitalWrite(LED_PIN, HIGH);
            digitalWrite(PIN_SP, HIGH);
    delay(60*RATE);  // 600ミリ秒間LEDを点灯
    digitalWrite(LED_PIN, LOW);
            digitalWrite(PIN_SP, LOW);
    delay(20*RATE);  // 200ミリ秒間LEDを消灯
}

void playMorse(String morseCode) {
    for (int i = 0; i < morseCode.length(); i++) {
        if (morseCode[i] == '.') {
            dot();
        } else if (morseCode[i] == '-') {
            dash();
        } else if (morseCode[i] == ' ') {
            delay(60*RATE);  // 600ミリ秒間のスペース（文字間の間隔）
        }
    }
}

void setup() {
pinMode(TOUCH1, INPUT); //スイッチ1の入力を設定
pinMode(TOUCH2, INPUT); //スイッチ2の入力を設定
  pinMode(LED_PIN, OUTPUT);  // LEDピンの出力を設定
  pinMode(PIN_SP, OUTPUT);  // SPピンの出力を設定

delay(1000);
  Serial.begin(19200);
  Serial.println("start usb_serial");
  Serial.println("start dfplayer_serial... wait a moment");
  softwareSerial.begin(9600);
  delay(2000);
  if (player.begin(softwareSerial)) {
   Serial.println("dfplayer setting OK");
   player.volume(10);  //Set volume value (0~30).
  } else {
   Serial.println("Connecting to DFPlayer Mini failed!");
   flg=false;
  }
 delay(1000);
 for(int i=1;i<maxf+2;i++){
   delay(1000);
   maxi[i-1]=player.readFileCountsInFolder(i);
    Serial.println("folder"+String(i-1)+" counts="+String(maxi[i-1]));
  
 }  
  delay(2000);
   player.playFolder(99, 99); //start sound
}

void loop() {

while (digitalRead(TOUCH1) == HIGH && digitalRead(TOUCH2) == LOW ){
         touchcount++;
         if(touchcount>2){
                   flg=false;
                   flg3=true;
         }else{
                   flg=true;
                   flg3=false;
         }
         dot();
         delay(20*RATE);
         }

while (digitalRead(TOUCH2) == HIGH && digitalRead(TOUCH1) == LOW){
      if(cnum<=maxi[cfnum]-1){
          cnum++;
         }else{
          cnum=1;
         } 
         dot();
         touchcount2++;
         flg2=true;
      
         delay(20*RATE);
 }

if(flg){  
  if(cfnum<=maxf-1){
    cfnum++;
  }else{
    cfnum=0;
  }

if(cfnum>0){
      player.playFolder(99, cfnum); //Prepare a voice file that says "This is Folder ##" :file name is 0##.mp3
  }else{
       player.playFolder(99, 98); //Prepare a voice file that says "This is Folder mp3" :file name is 098.mp3
  }
     cnum=1;

flg=false; 
  touchcount=0;
  delay(500);
}

if(flg2)  {  
  if(maxi[cfnum]==0 && cfnum>0){
    return;
  }   
   delay(200);
   String morseCode = convertToMorse(cnum);
   playMorse(morseCode);

if(cfnum==0){
    player.play(1);  //Play the first mp3
   }else{
    player.playFolder(cfnum, cnum);
   } 
   flg2=false;
   touchcount2=0;
  }

if(flg3)  {
   delay(100);    
   player.playFolder(99, 97); //Prepare a voice file that says "repeat mode" :file name is 097.mp3
   delay(5000);
   player.loopFolder(cfnum);
   flg3=false;
   touchcount=0;
  }

delay(300);
 }

※追加機能として、内蔵LEDでカレントFile番号を光モールス信号で、電子ブザーでも出力する形式にしてみた。ChatGPTに必要な関数を聞いて、それを使ったところ、速攻で完成。

電子ブザーは、音量調整できるように可変抵抗とともに9番ピンに接続した。ディスプレイなしで手軽に扱えるようにしてみた。

※さらに、追加機能として、ファイルのタッチスイッチは長押しすると、ピッという音が何回か鳴るようにし、鳴った回数だけファイル番号を先に進めるようにした。これで、スムーズにファイル番号を先に進められるようになった。使っているうちに、いろいろアイデアが出てくるが、それを簡単にコードに反映できるのが、arduinoの利点。

※フォルダ切り替えスイッチを長押し（ピッピッが３回以上）すると、連続再生できるようにした。必要なmp3音声ファイルは、コード内にコメントを入れました。

登録: 投稿 (Atom)