Follow along with the video below to see how to install our site as a web app on your home screen.
Nota: This feature currently requires accessing the site using the built-in Safari browser.
vos decis ahi poner uno de 10000 uf
#include <12F675.h>
#device adc=10
#FUSES NOWDT, INTRC_IO, NOCPD, NOPROTECT, NOMCLR, NOPUT, NOBROWNOUT, BANDGAP_HIGH, RESERVED
#use delay(clock=4000000)
#bit t1_overflow=0x0C.0
int32 Freqcount(void){
int cycles8, cycles;
long freqc_high;
long freqc_low;
int32 freq;
cycles8=0;
cycles=0;
freqc_high=0;
t1_overflow=0;
set_timer1(0);
setup_timer_1(T1_External|T1_Div_By_1);
while (cycles!=0xFF) {
cycles8=0;
while (cycles8!=0xFF) {
if (t1_overflow)
{t1_overflow=0;freqc_high++;}
else
{delay_cycles(5);}
delay_cycles(1);
cycles8++;
}
delay_cycles(85);
cycles++;
}
delay_cycles(141);
setup_timer_1(T1_Disabled);
if (t1_overflow) freqc_high++;
freqc_low=get_timer1();
freq=make32(freqc_high,freqc_low);
return(freq);
}
void Turn_on(void){
output_high(pin_a2);
output_high(pin_a4);
delay_ms(500);
output_low(pin_a4);
}
void Turn_off(void){
output_low(pin_a2);
output_high(pin_a1);
}
void main()
{
int32 Frec;
int rpm=false;
long msec,sec;
setup_adc_ports(sAN0|VSS_VDD);
setup_adc(ADC_CLOCK_DIV_2);
setup_timer_0(RTCC_INTERNAL|RTCC_DIV_1);
setup_comparator(NC_NC);
setup_vref(FALSE);
set_tris_a(0b101001);
set_adc_channel(0);
output_low(PIN_A4);
output_high(pin_a2);
while (TRUE) {
if (input_state(pin_a2))
{frec=read_Adc();
if (frec>=489&&frec<=535) output_low(pin_a1);
else output_high(pin_a1);
frec=freqcount();
if (frec>=50) RPM=true;
if (frec<=46||RPM==false) {turn_off();sec=0; RPM=false;}
}
else
{delay_ms(1);
msec++;
if (msec>=1000) {msec=0;sec++;}
if (sec>=30) {turn_on();sec=0;}
}
if (!input(pin_a3))
{while(!input(pin_a3)) true;
if (!input_state(pin_a2)) {turn_on();sec=0;}
else {turn_off();sec=0;}
}
}
}