//******************************************************************************************
//  PIC18F14K50 Sample Program
//   Project      :
//   Program Name :
//   Programer    :
//   Create date  :  Version 1.0    H22.08.05
//   History      :
//   Laungage     :  MPLAB C18 
//******************************************************************************************
//  (1)Description
//      1)OSC ;  Internal OSC (16MHz)
//      2)Define I/O
//          RC4 : CLR(クリアー信号入力端子)
//          RC3 : STB(ストローブ信号入力端子)
//          RC6 : CLK(クロック信号入力端子)
//          RC7 : Data(シリアルデータ入力端子)
//******************************************************************************************
#include	<p18f14k50.h>
#include	<stdio.h>
#include	<string.h>
#include	<stdlib.h>
#include	<math.h>
#include	<ctype.h>
#include	<io.h>
#include	<adc.h>
//
//Define configration
//
#pragma config CPUDIV=NOCLKDIV //CPU System Clock Selection bit(No CPU System Clock divide)
#pragma config USBDIV = OFF //USB Clock Selection bit(USB Clock comes directly from the OSC1/OSC2 oscillator block; no divide)
//#pragma config FOSC = HS //Oscillator Selection bits(HS oscillator)
#pragma config FOSC = IRC //Oscillator Selection bits(Internal RC oscillator)
#pragma config PLLEN = ON //X PLL Enable bit(Oscillator multiplied by 4)
#pragma config PCLKEN = OFF //Primary Clock Enable Bit(Primary clock is under software control)
#pragma config FCMEN = OFF
#pragma config IESO = OFF //Internal/External Oscillator Switchover bit(Oscillator Switchover mode disabled)
#pragma config PWRTEN = OFF,BOREN = OFF,BORV = 19
#pragma config WDTEN = OFF,WDTPS = 1
#pragma config MCLRE = OFF //MCLR Pin Enable bit(RE3 input pin enabled; MCLR disabled)
#pragma config HFOFST = OFF,STVREN = OFF,LVP = OFF,BBSIZ = OFF,XINST = OFF
#pragma config CP0 = OFF,CP1 = OFF,CPB = OFF,CPD = OFF,WRT0 = OFF,WRT1 = OFF,WRTB = OFF,WRTC = OFF,WRTD = OFF,EBTR0 = OFF,EBTR1 = OFF,EBTRB = OFF
//
//Define function
//
void Timer(void);
void Wait(unsigned int);
void InitOSC(void);
void Writ_VPORT(unsigned char);
void mvLED(unsigned char *);

//
//Define parameter
//
#define P_STB    3
#define P_CLR    4
#define P_CLK    6
#define P_Data   7


//******************************************************************************************
//   Program       : 
//   Title         : 
//   Input         :
//   Output        :
//******************************************************************************************
void main(void)
{
    unsigned char LEDlst = 0x01;

// *****************************
//   1.Initialized Segment
// *****************************
// (1)Define OSC
    InitOSC();     //Internal OSC 16MHz

// (2)Define I/O port
    TRISA = 0xFF;
    TRISB = 0xFF;
    TRISC = 0b00100111;

// (3)Initialized Virtual port
    PORTC = (0<<P_CLR);
    PORTC = (1<<P_CLR)|(1<<P_STB);

// *****************************
//   2.Program main
// *****************************
    while(1){
        mvLED(&LEDlst);
        Writ_VPORT(LEDlst);
        Wait(100);
    }
}

//******************************************************************************************
//   Function Name : InitOSC
//   Title         : 
//   Input         : 
//   Output        :
//   Description   : Internal 16MHz
//******************************************************************************************
void InitOSC(void)
{
// *******************************************************
// 1.Define OSCCON(OSCILLATOR CONTROL REGISTER) 
//   OSCCON(7) IDLEN: Idle Enable bit
//      1 = Device enters Idle mode on SLEEP instruction
//      0 = Device enters Sleep mode on SLEEP instruction
//   OSCCON(6-4) IRCF<2:0>: Internal Oscillator Frequency Select bits
//      111 = 16 MHz
//      110 = 8 MHz
//      101 = 4 MHz
//      100 = 2 MHz
//      011 = 1 MHz(3)
//      010 = 500 kHz
//      001 = 250 kHz
//      000 = 31 kHz(2)
//   OSCCON(3) OSTS: Oscillator Start-up Time-out Status bit(1)
//      1 = Device is running from the clock defined by FOSC<2:0> of the CONFIG1 register
//      0 = Device is running from the internal oscillator (HFINTOSC or LFINTOSC)
//   OSCCON(2) HFIOFS: HFINTOSC Frequency Stable bit
//      1 = HFINTOSC frequency is stable
//      0 = HFINTOSC frequency is not stable
//   OSCCON(1-0) SCS<1:0>: System Clock Select bits
//      1x = Internal oscillator block
//      01 = Secondary (Timer1) oscillator
//      00 = Primary clock (determined by CONFIG1H[FOSC<3:0>]).
// *******************************************************

    OSCCON =0b11111111;   //Internal 16MHz

// *******************************************************
// 2.Define OSCCON2(OSCILLATOR CONTROL REGISTER 2) 
//     OSCCON2(7-3) Unimplemented: Read as ‘0’
//     OSCCON2(2)   PRI_SD: Primary Oscillator Drive Circuit shutdown bit
//        1 = Oscillator drive circuit on
//        0 = Oscillator drive circuit off (zero power)
//     OSCCON2(1) HFIOFL: HFINTOSC Frequency Locked bit
//        1 = HFINTOSC is in lock
//        0 = HFINTOSC has not yet locked
//     OSCCON2(0) LFIOFS: LFINTOSC Frequency Stable bit
//        1 = LFINTOSC is stable
//        0 = LFINTOSC is not stable
// *******************************************************

    OSCCON2 =0b00000000;


// *******************************************************
// 3.Define OSCTUNE(OSCILLATOR TUNING REGISTER) 
//      OSCTUNE(7) INTSRC: Internal Oscillator Low-Frequency Source Select bit
//          1 = 31.25 kHz device clock derived from 16 MHz HFINTOSC source (divide-by-512 enabled)
//          0 = 31 kHz device clock derived directly from LFINTOSC internal oscillator
//      OSCTUNE(6) SPLLEN: Software Controlled Frequency Multiplier PLL bit
//          1 = PLL enabled (for HFINTOSC 8 MHz only)
//          0 = PLL disabled
//      OSCTUNE(5-0) TUN<5:0>: Frequency Tuning bits
//          011111 = Maximum frequency
//          011110 =
//               ・・・・
//          000001 =
//          000000 = Oscillator module is running at the factory calibrated frequency.
//          111111 =
//               ・・・・
//          100000 = Minimum frequency
// *******************************************************

    OSCTUNE = 0b00000000;

}

//******************************************************************************************
//   Function Name : Writ_VPORT
//   Title         : Write Virtual port
//   Input         : 
//   Output        :
//   Description   : 
//******************************************************************************************
void Writ_VPORT(unsigned char in_data)
{
    unsigned int lp;

// **********************
//  1.Set data 
// **********************
    for(lp=0;lp<8;lp++){

        if((in_data & 0b00000001)==0){
            PORTC = (1<<P_CLR)|(1<<P_STB)|(0<<P_CLK)|(0<<P_Data);
            PORTC = (1<<P_CLR)|(1<<P_STB)|(1<<P_CLK)|(0<<P_Data);
            PORTC = (1<<P_CLR)|(1<<P_STB)|(0<<P_CLK)|(0<<P_Data);
        }else{
            PORTC = (1<<P_CLR)|(1<<P_STB)|(0<<P_CLK)|(1<<P_Data);
            PORTC = (1<<P_CLR)|(1<<P_STB)|(1<<P_CLK)|(1<<P_Data);
            PORTC = (1<<P_CLR)|(1<<P_STB)|(0<<P_CLK)|(1<<P_Data);
        }

        in_data = in_data >> 1;

    }

// **********************
//  2.Load data
// **********************
//  (1)Load data
    PORTC = (1<<P_CLR)|(0<<P_STB);

//  (2)End function 
    PORTC = (1<<P_CLR)|(1<<P_STB);
}

//******************************************************************************************
//   Function Name : Wait
//   Title         : wait function
//   Input         : timer(10mS * timer)
//   Output        :
//******************************************************************************************
void Wait(unsigned int timer)
{
    unsigned int lp;
    for(lp=0;lp<timer;lp++)
        Timer();
}

//******************************************************************************************
//   Function Name : Timer
//   Title         : wait function (10mS)
//   Input         :
//   Output        :
//******************************************************************************************
void Timer(void)
{
// *******************************************************
// 1.Define T1CON(TIMER1 CONTROL REGISTER) Register
//*   T1CON(7)  RD16: 16-bit Read/Write Mode Enable bit
//                      1 = Enables register read/write of TImer1 in one 16-bit operation
//                      0 = Enables register read/write of Timer1 in two 8-bit operations
//*   T1CON(6)  T1RUN: Timer1 System Clock Status bit
//                      1 = Main system clock is derived from Timer1 oscillator
//                      0 = Main system clock is derived from another source
//*   T1CON(5-4)T1CKPS<1:0>: Timer1 Input Clock Prescale Select bits
//                      11 = 1:8 Prescale value
//                      10 = 1:4 Prescale value
//                      01 = 1:2 Prescale value
//                      00 = 1:1 Prescale value
//*   T1CON(3)  T1OSCEN: Timer1 Oscillator Enable bit
//                      1 = Timer1 oscillator is enabled
//                      0 = Timer1 oscillator is shut off
//                        The oscillator inverter and feedback resistor are turned off to eliminate power drain.
//*   T1CON(2)  T1SYNC: Timer1 External Clock Input Synchronization Select bit
//                      When TMR1CS = 1:
//                         1 = Do not synchronize external clock input
//                         0 = Synchronize external clock input
//                      When TMR1CS = 0:
//                         This bit is ignored. Timer1 uses the internal clock when TMR1CS = 0.
//*   T1CON(1)  TMR1CS: Timer1 Clock Source Select bit
//                      1 = External clock from the T13CKI pin (on the rising edge)
//                      0 = Internal clock (FOSC/4)
//*   T1CON(0)  bit 0 TMR1ON: Timer1 On bit
//                      1 = Enables Timer1
//                      0 = Stops Timer1
// *******************************************************

    T1CON = 0b10110001;  //   16-bit Read/Write Mode, 1:8 Prescale value

// *******************************************************
// 2.Define TMR1 Register
//    Caution(16-bit Read/Write Mode) !!!!:
//    (a)Writing to TMR1H does not directly affect Timer1.
//       Instead, the high byte of Timer1 is updated with the contents of TMR1H when a write occurs to TMR1L.
//       This allows all 16 bits of Timer1 to be updated at once.
//    (b)A read from TMR1L will load the contents of the high byte of Timer1 into the Timer1 high byte buffer. 
//       This provides the user with the ability to accurately read all 16 bits of Timer1 without the need to 
//       determine whether a read of the high byte, followed by a read of the low byte, has become invalid due 
//       to a rollover or carry between reads.
// *******************************************************
//   TMR1 data ( OSC:12MHz, 4X PLLON, 1:8 Prescale value, 0.01[S];100Hz )
//     10mS(100Hz): 12MHz * 4(PLLON) / 4(PIC) / 8(Prescale) / 100(100Hz)==> 0d15,000(Count) ==> 0x3A98(Count)
//     TMR1 = 0xFFFF - 0x3A98 ==> 0xC567
//   TMR1 data ( Internal OSC:16MHz, 1:8 Prescale value, 0.01[S];100Hz )
//     10mS(100Hz): 16MHz / 4(PIC) / 8(Prescale) / 100(100Hz)==> 0d5,000(Count) ==> 0x1388(Count)
//     TMR1 = 0xFFFF - 0x1388 ==> 0xEC77
//     
    TMR1H = 0xEC;
    TMR1L = 0x77;

// *******************************************************
// 3.Timer
// *******************************************************
    PIR1bits.TMR1IF = 0;
    while(1){
        if(PIR1bits.TMR1IF != 0 )break;
    }
}


//******************************************************************************************
//   Function Name : mvLED
//   Title         : Move LED function
//   Input         :
//   Output        :
//******************************************************************************************
void mvLED(unsigned char *LEDlst)
{
    if(*LEDlst == 1){
        *LEDlst = 2;
    }else if(*LEDlst > 127){
        *LEDlst = 1;
    }else{
        *LEDlst = *LEDlst * 2;
    }
    PORTB = *LEDlst;
    return;	
}