Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:

Методичка (МПС)

.pdf
Скачиваний:
15
Добавлен:
04.06.2015
Размер:
1.2 Mб
Скачать

if((PINA&0x04)==0x00)

{

delta_i=0; Urs=Up; Urs_=0;

}

else

{

Urs=Up+delta_i+Urs_; Urs_=Urs-Up;

}

 

if(Urs>=255)

Urs=255;

else if(Urs<=0)

Urs=0;

alpha=255-Urs; alpha*=38;

}

OCR1A=alpha;

TCNT1=0; if((PINA&0x04)==0x04)

{

TCCR1B=0x02;

}

else

{

TCCR1B=0x00;

PORTB=0x00;

}

SEI();

+ $ " , & $

Uos. ) $ !

$ (delta=Uvh-Uos). : % ''

&$ $ $& "

$ . & ' $ $ Urs, "

$" $ " 01,

$ ' $ .

6. , $ " 01 $ , '

" 01. )

" ' $ $

VS1…VS4, $

#.

CLI();

 

if((PIND&0x04)==0x04)

 

{

 

if((PINA&0x02)==0x02)

{PORTB=0x01;}

else

{PORTB=0x04;}

}

 

else

 

{

 

if((PINA&0x02)==0x02)

{PORTB=0x02;}

else

{PORTB=0x08;}

91

}

SEI();

7. ) ! INT1 & "

:

CLI();

pulse+=1;

SEI();

" " & &

$ ,

" $ , & $ "

!-&$

.

92