SHIROのIchigoJam日記

マイコン「IchigoJam」(イチゴジャム)の電子工作とプログラミングをメインに

簡易入館者カウンター

新しいセンターの玄関に、IchigoJam+赤外線人感センサーを使った簡易入館者カウンターを付けました。

LCDシールドに付けた液晶画面で、時刻や人数カウントを表示します。
時刻は、以前に作った時計モジュールと同じく、RTCモジュールから読み出します。

LCDシールド

LCDシールドはかなり昔に作ったのですが、これまでブログで書いていなかったので改めて掲載します。
IchigoJamのSWITCHコマンドで切り替えて、小さな液晶に画面を表示できます。

回路図

基板データ

*この基板データは、CC BYライセンスとします。どうぞご利用ください。

(C) 2025 Shiro Saito (https://www.ichigoaman.jp)

材料

だいたい以下の順番ではんだ付けすると作りやすいです。

※以下はEEPROMを使わない場合は不要です。

※以下は赤外線人感センサーです。使わない場合は不要です。

入館者カウンタープログラム

10 @ARUN:'*Counter*
20 CLV:SWITCH 1:CLS:OUT 5,-1
30 GSB @TIMEREAD
40 ?"*START ";DEC$(H+100,2);":";DEC$(M+100,2)
50 @LOOP
60 I=IN(10):LED I
70 IF I=1 AND J=0 GSB @COUNT
80 J=I
90 GOTO @LOOP
100 @COUNT
110 C=C+1
120 GSB @TIMEREAD
130 LC 0,2
140 ?DEC$(H+100,2);":";DEC$(M+100,2);" ";C
150 WAIT 180
160 RTN
170 @TIMEREAD
180 POKE #700,0
190 IF I2CR(#68,#700,1,#701,7) ERR
200 X=PEEK(#703)
210 H=X>>4*10+X&15
220 X=PEEK(#702)
230 M=X>>4*10+X&15
240 X=PEEK(#701)
250 S=X>>4*10+X&15
260 RTN