何でも質問掲示板の
「MCの主回路用サージ吸収ユニット 投稿者:TR 投稿日:2016/02/27(Sat) 16:41 No.504」
へのレスで ディレイタイマー用の「5V 4ch Relay module」を購入してしまったと書きましたが、やっとディレイタイマー部分が完成しました。
5V電源on-(100mS)-リレー0_ON-(500mS)-リレー1_ON-(500mS)-リレー2_ON-(800mS)-リレー3_ON
のシーケンスを以下のプログラムで動かせました。
(左側の黄色いショートピンは RA2ピンで電源シーケンスを再開させる為のものです)
MainLoop:
LATC = 0x0F;
TIME_LINE = - CHATTER ;
TIMER_E = 0;
TimerLoop:
if (TIMER_E > 0)【
TIMER_E-- ;
if (TIME_LINE <= 30000) 【 TIME_LINE++; 】
if (RA2=1)【 goto MainLoop; 】
if (TIME_LINE > RL3ON) 【 LATC = 0x00; goto TimerLoop; 】
if (TIME_LINE > RL2ON) 【 LATC = 0x08; goto TimerLoop; 】
if (TIME_LINE > RL1ON) 【 LATC = 0x0C; goto TimerLoop; 】
if (TIME_LINE > RL0ON) 【 LATC = 0x0E; goto TimerLoop; 】
】
goto TimerLoop;
何故 Relay module入手から2カ月も掛かったというと、
Windows10にアップグレードする前に自作パソコン(5年前に組立)をリニューアルすべく、CPU,MoBo,Memを購入してDVDからクリーンインストールしようとしたら最新のMoBoにはIDEが無く、泣く泣くsata接続DVDを追加購入し、やっとWindows10環境を構築できました。
ついでに、PICも最新の物(PIC 16F1823,1825)を購入し、最新の開発環境(MPLAB X IDE v3.30)にするも、所有しているPICkit2が使えない事が判明し、価格が安いAliExpressに(互換)PICkit3を発注して二週間のロスが発生し、やっと動作確認まで辿り着きました^^;
まあ、ワンコイン以下でユニバーサルシーケンサーが作れたので良しとします。
※中括弧がNGみたいなので、'【'と'】'で代用しました...。greater等も全角にしました。
- Joyful Note -