DASAR4, MENGENAL REGISTER TIMER

/* ===================================================
Nama : Praktek4
Fungsi :-Mengenal manipulasi outport, shif register pass parameter.
        -Memanfaatkan sistem Timer untuk time delay
        -Memanfaat sistem interupt timer untuk time delay
        - IE, TCON, TMOD
====================================================*/

#include <at89x52.h>
#include <STRING.H>

int dly_stone;

//-----------------------------------------------

void InitTimer0(void)
{
TL0  = 0xFF;        // 10 ms
TH0  = 0xDB;
TMOD = 0x00;        // mode 1
TR0=1;                // timer-0 On
}
//------------------------------------------------

void delay2(int mul)
{dly_stone=0;
while(dly_stone< (500 * mul));
}

//------------------------------------------------

void delay1(int mul)
{int i,j;
for(i=0; i< mul*1000;i++)
    for(j=0;j < mul*1000;j++);
}
//-----------------------------------------------------------------------------

void timer0 (void) interrupt 1 using 2  // sub-routine ini akan di jalankan
{                                // setiap bit TF0 pada register TCON diset 1
TL0=0xFF;
TH0=0xDB;
++dly_stone;
}
//-----------------------------------------------

void main(void)
{unsigned char data1;
InitTimer0();
IE = 0x82;    // IE adalah register untuk me-enable fungsi interupt
data1 = 0x03;
for(;;)
    {
    P2 = data1 ^ 0xFF;
//    delay1(1);
    data1= data1 << 1;
    if (CY == 1) data1 |= 0x01;
    delay2(1);
    }
}