Maskinnära programmering 6B2266

Antag att vi har 4 MHz kristall och att vi behöver en 750 Hz samplingsklocka (tex för
att uppdatera PWM-signalen). TIMER2:s prescaler är 1/1 och periodregistret
PR2=255. ( Jämför med exemplet Varvtalsratt till LEGO-motorn ). PWMfrekvensen
blir:
10 6 /256 = 3906 Hz. För att få en 750 Hz samplingsklocka måste vi dela
pwmfrekvensen med 5 med postscalern. 3906/5 = 750 Hz.
Programmet kan provas genom att man kontrollerar att har en ton med frekvensen
750/2 Hz på pinne RB0 och att man har en ton med frekvensen 3906 Hz från CCP1
pinnen RB3.
/* pwmclk.c sampleclock 750 Hz with TIMER2 and pwm 3000 Hz */
#include "16F628.h"
#include "int16Cxx.h"
#pragma config |= 0x3ff0
#pragma origin 4
interrupt int_server( void )
{
int_save_registers
if( TMR2IF == 1 ) /* test if it is the TMR2I-interrupt? */
{ /* this time it's obvius that it is! */
PORTB.0 = !PORTB.0; /* togle earphone, 750/2 Hz tone at RB0 */
TMR2IF = 0; /* Reset TMR2IF-flag before leaving */
}
int_restore_registers
}
void main( void )
{
/* the main program */
TRISB.0 = 0; /* RB0 output to earphone */
PORTB.0 = 0;
/* Settings CCP1 PWM-mode */
PR2 = 255;
/* 10 bit startup Duty 0b01111101.0.0 */
CCPR1L = 127; /* startup value */
/* CCP1X = 0 and CCP1Y = 0 later on in CCP1CON */
TRISB.3 = 0; /* CCP1 is output (RB3-pin) 3000 Hz tone */
T2CON = 0b0.0100.1.00;
/* 0, 0100 (1:5 postscale), 1 (TMR2 on), 00 (1:1 prescale) */
CCP1CON = 0b00.0.0.1111;
/* --, 0 (CCP1X), 0 (CCP1Y), 1111 (PWMmode 11xx) */
TMR2IE = 1; /* local enable */
PEIE = 1; /* regional enable */
GIE = 1; /* global enable */
while( 1 ) nop(); /* main program has nothing to do ! */
}
45