1
Generel Elektronik / Sv: Advarsel hvis spænding falder under 13 volt
« Dato: Oktober 05, 2011, 20:19:46 »
Så er det helt færdigt.
Programmet kan nemt ændres, hvis det skal virke anderledes.
Mit Tlf nr. er 23200861, Hvor de nærmere detaljer kan aftalers, omkring tilretning og afhentning.
Jeg er inde i byen til dv aftaler hele dagen Torsdag, og skal (gab) tideligt op.
Sådan er beskrivelsen:
S0 Lysdiode blinker.
S1 Lysdiode slukket.
S2 Lysdiode tændt.
Opstarter i S0
Hvis mindre end 13V i 10sec, så S2
Hvis S2, og større end 13V så S0
Hvis S0 i mere end 10sec, så S1
Og her er programmet og foto:
//HEL OKT2011
#include "C:\PICC\PIC10F222.C"
#FUSES NOWDT,NOMCLR,NOPROTECT,NOMCPU,IOSC4
byte tik=0,tak=0,tuk=0,sm=0;
void main()
{
ADCON=133;SET_TRIS_B(251);GPIO=0;SETUP_TIMER_0(4);GODONE=1;
do
{
if(T0F)
{
tik++;TMR0=0;
if(tik>111)
{
tik=0;
if(ADRES<140) tuk++; else {tuk=0;if(sm==2) {tak=0;sm=0;}}
if(tuk>20) sm=2;
if(sm==0) {GPIO2=!GPIO2;tak++;if(tak>20) sm++;}
if(sm==1) GPIO2=0;
if(sm==2) GPIO2=1;
}
GODONE=1;
}
}
while(1);
}
Programmet kan nemt ændres, hvis det skal virke anderledes.
Mit Tlf nr. er 23200861, Hvor de nærmere detaljer kan aftalers, omkring tilretning og afhentning.
Jeg er inde i byen til dv aftaler hele dagen Torsdag, og skal (gab) tideligt op.
Sådan er beskrivelsen:
S0 Lysdiode blinker.
S1 Lysdiode slukket.
S2 Lysdiode tændt.
Opstarter i S0
Hvis mindre end 13V i 10sec, så S2
Hvis S2, og større end 13V så S0
Hvis S0 i mere end 10sec, så S1
Og her er programmet og foto:
//HEL OKT2011
#include "C:\PICC\PIC10F222.C"
#FUSES NOWDT,NOMCLR,NOPROTECT,NOMCPU,IOSC4
byte tik=0,tak=0,tuk=0,sm=0;
void main()
{
ADCON=133;SET_TRIS_B(251);GPIO=0;SETUP_TIMER_0(4);GODONE=1;
do
{
if(T0F)
{
tik++;TMR0=0;
if(tik>111)
{
tik=0;
if(ADRES<140) tuk++; else {tuk=0;if(sm==2) {tak=0;sm=0;}}
if(tuk>20) sm=2;
if(sm==0) {GPIO2=!GPIO2;tak++;if(tak>20) sm++;}
if(sm==1) GPIO2=0;
if(sm==2) GPIO2=1;
}
GODONE=1;
}
}
while(1);
}