はじめに

PicoMiteでも試したRaspberry Pi Picoへの入力として焦電型赤外線(人感)センサーモジュール SB412Aを使い、センサーで人を検出した時に出力の赤色LEDを転送させる仕組みをMachiKaniaで試しました。

検証環境

下記の環境で動作を検証しました。

MachiKania : phyllosoma 1.6.0.0 https://github.com/machikania/phyllosoma/tree/production からダウンロードしたソースを自分でビルド
MachiKania簡易キットを使用
焦電型赤外線センサー : 焦電型赤外線(人感)センサーモジュール SB412A

接続

Raspberry Pi Picoと焦電型赤外線センサー､赤色LEDは下記のように接続しました。
SB412AのVoutの接続ポートとして最初にGP0を試しましたがなぜかハイレベルの入力値しか得られなかったのでGP1に接続しました。他のGP2〜GP9でもうまく動作しました。

Pico(GP)	Pico(物理)	SB412A	LED
GP1	2	Vout	Vout
GP22	29	--	アノード
3V3	36	+	--
GND	38	-	カソードー抵抗器

焦電型赤外線センサーは基板上の半固定抵抗器の値で出力の保持時間が決まります。何とか調整して2秒ほどに設定されています。

プログラム

SB412Aの出力を取得し､H（1）のときにLEDを点灯するようにしました。SB412Aの状態の確認とLEDへの出力はタイマー割り込みを使用して定期的に実行するようにしました。
また､LCDへの表示はGEN3Oクラスを使って大きな文字で表示するようにしました。

SB412A.BAS

USECLASS GEN3O
USEGRAPHIC
K=NEW(GEN3O,88,"UTF-8")
CLS
C=0
REM タイマ割り込みを1000マイクロ秒（1ミリ秒）ごとに発生
USETIMER 1000
REM タイマー割り込みルーチンを指定
INTERRUPT TIMER,SB412A

WHILE INKEY()=0:WEND

END

REM 割り込みルーチン
LABEL SB412A
  REM SB412A出力の取得
  A=IN(1)
  REM SB412Aの出力が直前と異なり､Hレベルtのときカウンターを増加
  IF B!=A AND A=1 THEN C=C+1
  REM メッセージ表示
  POINT 0,30
  K.GPRT("検出回数:"+DEC$(C)+"回",7,8)
  REM LEDをオンあるいはオフ
  OUT 12,A
  REM 現在の状態を記憶
  B=A
RETURN

実行結果

以下が実行です。

さいごに

タイマー割り込みを使うことで無限ループ内で実行するよりもスムーズに動作しているように感じられました。

最初にSB412Aを接続したGP0はなぜだかSB412Aの出力を常にH（ハイレベル）としても読み取る現象が起きていました。GP1〜GP9では正しくSB412Aの出力をちゃんと読み取れました。