Kód: Vybrat vše
$regfile = "m8def.dat"
$crystal = 16000000
portb.1= output
Tccr1a = Bits(com1a1 , Com1b1 , Wgm11)
Tccr1b = Bits(wgm13 , Wgm12 , Cs11)
icr1 = 20000
Ocr1a = 500
Do
Loop
End
Důležitý je pro mě výstup 100Hz.
Děkuji za rady.
Moderátor: Moderátoři
Kód: Vybrat vše
$regfile = "m8def.dat"
$crystal = 16000000
portb.1= output
Tccr1a = Bits(com1a1 , Com1b1 , Wgm11)
Tccr1b = Bits(wgm13 , Wgm12 , Cs11)
icr1 = 20000
Ocr1a = 500
Do
Loop
End
Kód: Vybrat vše
Tccr1a = Bits(com1a1 , Com1a0 , Com1b1 , Com1b0 , Wgm11)
Tccr1b = Bits(wgm13 , Wgm12 , Cs11)