/*********************************************************************
*   Filename:       fla.c                                            *
*   Date:           10/19/2002                                       *
*   Edit by Yamato View ,Goldenchip Electronic Co. ,Ltd.             *
*                                                                    *
*   TEL: 86-0591-3375855-721                                         *
*                                                                    *
*********************************************************************/ 
   #include <pic1687x.h>				
   #include <stdio.h>
extern char MOD;
void Delay1s(void)
{
  unsigned char outer, inner,count;
   for (count = 255; count > 0; count--);
      for(outer = 255; outer > 0; outer--);
	for (inner = 255; inner > 0; inner--);
} 
void Init_System(void)
{  
   MOD = 1 ;
   INTEDG = 0;
   INTF = 0;
   INTE = 1;
   GIE =  1;			
}
void Init_PortD(void)
{  
   PORTD = 0;
   TRISD = 0;			
}

void Pkii(void)
{
    const char PParray[7] = {0x1,0x3,0x7,0xf,0x1f,0x3f,0x7f};
    unsigned char i;
    
    if(i<6) i++;
	else i=0;
	MOD=PParray[i];
}