PIC12F1822 あるポートが0.5秒間以上High --> 別のポートを３秒間High

某質問サイトを眺めていたら「あるポートで0.5秒以上High状態が続いたら別のポートを３秒間Highにする。」には、というような質問があったので、出来るかなと思ってやってみた。

PIC12F1822にしたのは、たまたま机の上に、電源部分だけ配線済みのPIC12F1822がささったブレッド・ボードが転がっていたから。
どういう机だよ。

ついてる回答は、「Lチカ探せば出来る。」ってのと「そんな簡単なのきいてるようじゃ上達しない。」という、ありがたいものが２件。
世の中は意外と厳しい。
厳しいカテゴリ・マスターさんのアドバイスでは、ヒントとして「タイマー、カウンターを使う」となっていたが、とりあえず__delayだけでやってみた。

#define _XTAL_FREQ 8000000

#include <xc.h>

// CONFIG1
#pragma config FOSC = INTOSC    // Oscillator Selection (INTOSC oscillator: I/O function on CLKIN pin)
#pragma config WDTE = OFF       // Watchdog Timer Enable (WDT disabled)
#pragma config PWRTE = ON       // Power-up Timer Enable (PWRT enabled)
#pragma config MCLRE = OFF      // MCLR Pin Function Select (MCLR/VPP pin function is digital input)
#pragma config CP = OFF         // Flash Program Memory Code Protection (Program memory code protection is disabled)
#pragma config CPD = OFF        // Data Memory Code Protection (Data memory code protection is disabled)
#pragma config BOREN = ON       // Brown-out Reset Enable (Brown-out Reset enabled)
#pragma config CLKOUTEN = OFF   // Clock Out Enable (CLKOUT function is disabled. I/O or oscillator function on the CLKOUT pin)
#pragma config IESO = OFF       // Internal/External Switchover (Internal/External Switchover mode is disabled)
#pragma config FCMEN = OFF      // Fail-Safe Clock Monitor Enable (Fail-Safe Clock Monitor is disabled)

// CONFIG2
#pragma config WRT = OFF        // Flash Memory Self-Write Protection (Write protection off)
#pragma config PLLEN = OFF      // PLL Enable (4x PLL disabled)
#pragma config STVREN = ON      // Stack Overflow/Underflow Reset Enable (Stack Overflow or Underflow will cause a Reset)
#pragma config BORV = LO        // Brown-out Reset Voltage Selection (Brown-out Reset Voltage (Vbor), low trip point selected.)
#pragma config LVP = OFF        // Low-Voltage Programming Enable (High-voltage on MCLR/VPP must be used for programming)

void msec(){
    __delay_ms(50);
}

void main(){
    OSCCONbits.IRCF = 0b1110;//8MHz
    TRISAbits.TRISA0 = 1;//RA0 is Input
    TRISAbits.TRISA5 = 0;//RA5 is Output
    ANSELAbits.ANSA0 = 0;//RA0 is Digital I/O

    unsigned char cnt;

    while(1){
        cnt = 0;
        while(RA0 == 1){
            msec();
            cnt++;
        }
        if(cnt > 10){
            RA5 = 1;
            __delay_ms(3000);
            RA5 = 0;
        }
    }
}

#define _XTAL_FREQ 8000000

#include <xc.h>

// CONFIG1

#pragma config FOSC = INTOSC // Oscillator Selection (INTOSC oscillator: I/O function on CLKIN pin)

#pragma config WDTE = OFF // Watchdog Timer Enable (WDT disabled)

#pragma config PWRTE = ON // Power-up Timer Enable (PWRT enabled)

#pragma config MCLRE = OFF // MCLR Pin Function Select (MCLR/VPP pin function is digital input)

#pragma config CP = OFF // Flash Program Memory Code Protection (Program memory code protection is disabled)

#pragma config CPD = OFF // Data Memory Code Protection (Data memory code protection is disabled)

#pragma config BOREN = ON // Brown-out Reset Enable (Brown-out Reset enabled)

#pragma config CLKOUTEN = OFF // Clock Out Enable (CLKOUT function is disabled. I/O or oscillator function on the CLKOUT pin)

#pragma config IESO = OFF // Internal/External Switchover (Internal/External Switchover mode is disabled)

#pragma config FCMEN = OFF // Fail-Safe Clock Monitor Enable (Fail-Safe Clock Monitor is disabled)

// CONFIG2

#pragma config WRT = OFF // Flash Memory Self-Write Protection (Write protection off)

#pragma config PLLEN = OFF // PLL Enable (4x PLL disabled)

#pragma config STVREN = ON // Stack Overflow/Underflow Reset Enable (Stack Overflow or Underflow will cause a Reset)

#pragma config BORV = LO // Brown-out Reset Voltage Selection (Brown-out Reset Voltage (Vbor), low trip point selected.)

#pragma config LVP = OFF // Low-Voltage Programming Enable (High-voltage on MCLR/VPP must be used for programming)

void msec(){

__delay_ms(50);

}

void main(){

OSCCONbits.IRCF = 0b1110;//8MHz

TRISAbits.TRISA0 = 1;//RA0 is Input

TRISAbits.TRISA5 = 0;//RA5 is Output

ANSELAbits.ANSA0 = 0;//RA0 is Digital I/O

unsigned char cnt;

while(1){

cnt = 0;

while(RA0 == 1){

msec();

cnt++;

}

if(cnt > 10){

RA5 = 1;

__delay_ms(3000);

RA5 = 0;

}

時間稼ぎをどうやるかの違いと、時間稼ぎ中にも他の処理をする必要があるのかというところだが、質問ではその辺の細かなことは何も決められていない。

下(茶)がタクト・スイッチにつながったピン(RA0)、上(黒)がLEDにつながったピン(RA5)の信号の変化だ。
あとは、Interrupt使うとかTimer使うとかでいろいろメインの自由度が稼げる、それが必要なら。