При нажатии кнопки горит светодиод и издается звук.

[Гость Vlad5]

Как увеличить задержку, чтобы с порта А (ddra) выходил звук с частотой 500...700 Гц.

Частота микроконтролера АТamega8515 : 8 МГц

 

.include "8515def.inc"

.def temp=r16;

.def temp2=r17;

.def temp3=r18;

.def Delay=r19;

.def Delay2=r20;

 

ser temp;

out ddrb,temp;

Start:

ldi Delay, 0b11111111;

ldi Delay2,0b11111111;

ldi temp2,0b11111111;

ldi temp3,0b00000000;

ldi temp, 0b11111110;

sbis pind,pd0;

out portb,temp;

sbis pind,pd0;

rjmp ZVYK;

rol temp;

sbis pind,pd1;

out portb,temp;

sbis pind,pd1;

rjmp ZVYK;

rol temp;

sbis pind,pd2;

out portb,temp;

sbis pind,pd2;

rjmp ZVYK;

rol temp;

sbis pind,pd3;

out portb,temp;

sbis pind,pd3;

rjmp ZVYK;

rol temp;

sbis pind,pd4;

out portb,temp;

sbis pind,pd4;

rjmp ZVYK;

rol temp;

sbis pind,pd5;

out portb,temp;

sbis pind,pd5;

rjmp ZVYK;

rol temp;

sbis pind,pd6;

out portb,temp;

sbis pind,pd6;

rjmp ZVYK;

rol temp;

sbis pind,pd7;

out portb,temp;

sbis pind,pd7;

rjmp ZVYK;

rjmp Start;

 

программа задержки

ZVYK:

dly:

dec Delay;

out ddra,temp2;

brne dly;

dly1:

dec Delay2;

out ddra,temp3;

brne dly1;

rjmp Start;