roboforum.ru

Compare0a = 555 : Compare0b = 555

Compare1a = 555 : Compare1b = 555

'************************
$regfile = "attiny2313.dat"                                 'используем ATtiny2313
$crystal = 16000000                                         'частота кварцевого резонатора 16mHz
'************************

'*******************************************
'Генерация частоты 36kHz
'Настраиваем Timer0 и Timer1
Config Timer0 = Counter , Edge = Rising , Prescale = 8 , Compare A = Toggle , Compare B = Toggle
Config Timer1 = Counter , Edge = Rising , Prescale = 8 , Compare A = Toggle , Compare B = Toggle
'*******************************************

'*******************************************
'Расчитываем Compare
'тактовая частота (kHz) / частота TSOPa (kHz) / 2 = Compare
Compare0a = 555 : Compare0b = 555
Compare1a = 555 : Compare1b = 555
'*******************************************

'**********************
'Настраиваем порты
'выход сигнала (на плате ик -бампера вывод обозначен In):
Config Pind.5 = Output
Config Pinb.2 = Output
Config Pinb.3 = Output
Config Pinb.4 = Output
'**********************

'*******************************************
'Для считывания состояния TSOPa (на плате ик-бампера вывод обозначен Out):
Config Pind.4 = Output : помеха_п Alias Pind.4
Config Pind.6 = Output : помеха_л Alias Pind.6
Config Pinb.0 = Output : помеха_зп Alias Pinb.0
Config Pinb.1 = Output : помеха_зл Alias Pinb.1
'*******************************************

'*******************************************
'Выходной сигнал на основной мк:
Config Pind.0 = Output : Sig0 Alias Pind.0
Config Pind.1 = Output : Sig1 Alias Pind.1
Config Pind.2 = Output : Sig2 Alias Pind.2
Config Pind.3 = Output : Sig3 Alias Pind.3
'*******************************************

'***************************
'Запускаем таймер0 и таймер1
Start Timer0
Start Timer1
'***************************


'*******************************************
'Начало цикла основной программы
Do
If помеха_п = 0 Then : Sig0 = 0 : Else : Sig0 = 1 : End If
If помеха_л = 0 Then : Sig1 = 0 : Else : Sig1 = 1 : End If
If помеха_зп = 0 Then : Sig2 = 0 : Else : Sig2 = 1 : End If
If помеха_зл = 0 Then : Sig3 = 0 : Else : Sig3 = 1 : End If
Loop

End
'*******************************************

$regfile = "m16def.dat" 'используем Mega16
$crystal = 16000000 'частота кварцевого резонатора 16mHz

'Генерация частоты 36kHz
'Настраиваем Timer1

Config Timer1 = Counter , Edge = Rising , Prescale = 8 , Compare A = Toggle

' Расчитываем Compare1a
' тактовая частота (kHz) / частота TSOPa (kHz) / 2 = Compare

Compare1a = 555

'PortB.1 - выход сигнала
'PinC.0 - считываем состояние TSOPa
'Portd.0 - сигнальный светодиод

Config Pinb.1 = Output
Config Portd.0 = Output
Config Pinc.0 = Input

Start Timer1
Do
If Pinc.0 = 0 Then
Portd.0 = 1
Else
Portd.0 = 0
End If
Loop

End

Fuse Bits The ATtiny15L has six Fuse bits (BODLEVEL, BODEN, SPIEN, RSTDSBL, and
CKSEL1..0). All the Fuse bits are programmable in both High-voltage and Low-voltage
Serial Programming modes. Changing the Fuses does not have effect while in programming
mode.
• The BODLEVEL Fuse selects the Brown-out Detection level and changes the startup
times. See “Brown-out Detection” on page 17. See Table 5 on page 15. Default
value is programmed “0”.
• When the BODEN Fuse is programed “0”, the Brown-out Detector is enabled. See
“Brown-out Detection” on page 17. Default value is unprogrammed “1”.
• When the SPIEN Fuse bit is programmed “0”, Low-voltage Serial Program and Data
Downloading is enabled. Default value is programmed “0”. Unprogramming this fuse
while in the Low-voltage Serial Programming mode will disable future In-System
downloading attempts.
• When the RSTDISBL Fuse is programmed “0”, the External Reset function of pin
PB5 is disabled(1). Default value is unprogrammed “1”. Programming this fuse while
in the Low-voltage Serial Programming mode will disable future In-System
downloading attempts.
• CKSEL1..0 Fuses: See Table 5 on page 15 for which combination of CKSEL1..0 to
use. Default value is “00”, 64 ms + 18 CK.
The status of the Fuse bits is not affected by Chip Erase.
Note: 1. If the RSTDISBL Fuse is programmed, then the programming hardware should apply
+12V to PB5 while the ATtiny15L is in Power-on Reset. If not, the part can fail to enter
Programming mode caused by drive contention on PB0 and/or PB5.