○回路・配線図
○プログラム
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
10 M=IN(2) | |
20 IFMTHEN?"Video mode"ELSE?"Still mode" | |
30 S=0 | |
40 OUT1,1 | |
50 WAIT 50 | |
60 @LOOP | |
70 IFIN(1)GOSUB@DETECT | |
80 IF!IN(1)GOSUB@TIMER | |
90 GOTO@LOOP | |
100 END | |
110 @DETECT | |
120 ?"Motion Detected!" | |
130 IFS>0THENGOTO170 | |
140 OUT0,0 | |
150 IFM=0THENWAIT10ELSEWAIT50 | |
160 OUT0,1 | |
170 IFIN(1)THENGOTO170 | |
180 IFM=1THENS=TICK() | |
190 ?"Motion Ended!" | |
200 RTN | |
210 @TIMER | |
220 IFS=0THENRTN | |
230 T=TICK()-S | |
240 '?T | |
250 IFT>1000GOSUB@VSTOP | |
260 RTN | |
270 @VSTOP | |
280 OUT0,0 | |
290 WAIT10 | |
300 OUT1,1 | |
310 S=0 | |
320 RTN |
スライドスイッチで静止画/動画モードを切り替えます(要再実行) 。
0 件のコメント:
コメントを投稿