/*
 * File:        newmain.c
 * Автор:       ViktoR
 * Программа:   Передача параметров с клавиатуры
 * Создана:     15 декабря 2017 г., 15:44
 */

// Подключаем библиотеки
#include <stdio.h>      // Стандартная библиотека Си для ввода-вывода
#include <stdlib.h>     // Стандартная библиотека Си для контроля
#include <xc.h>         // Библиотека компилятора XC8 для работы с PIC

// Определение параметров микроконтроллера
#define _XTAL_FREQ 16000000     // Тактовая частота 16 МГц (см. OSCCON)
#define DELAY_ADC 10            // Задержка АЦП, в мс

// Определение параметров для подключение периферии
// Светодиоды
#define LED_ERROR RB6   // Светодиод, индицирующие статус набора (ошибка)
#define LED_OK RB7      // Светодиод, индицирующие статус набора (норм)
#define KEYBOARD AN0    // Определяем порт для подключения клавиатуры через АЦП
// ВАЖНО: ПОРТ ДОЛЖЕН ПОДДЕРЖИВАТЬ АНАЛОГОВЫЕ СИГНАЛЫ (НАЗЫВАТЬСЯ AN)
//  LCD биты и переменные
#define LCD_width  15   //  Ширина дисплея
#define LCD_height 1    //  Высота дисплея
#define RS_1 RB6 = 1    //  RC0
#define RS_0 RB6 = 0    //  RC0
#define E_1  RB5 = 1    //  RA0
#define E_0  RB5 = 0    //  RA0

// LCD биты и переменные:
const unsigned char addLUT[4] = {0x80, 0xC0, 0x94, 0xD4};
unsigned char LCD_Address, LCD_Line;
char buffer[15];

void delay(unsigned int p)
{
    unsigned int i;
    for(i=0;i<p ;i++){asm("NOP");}
}

//  LCD
void WriteNibble(unsigned char data)
{
    E_1;
    PORTC = (data & 0x0F)*16;
    E_0;
    delay(300);
}

void WriteByte(unsigned char data)
{
    E_1;
    PORTC = (data >> 4)*16;
    E_0;
    E_1;
    PORTC = (data & 0xF)*16;
    E_0;
    delay(300);
}

void SetLCDPosition(char row, char col)
{
    RS_0;
    WriteByte(addLUT[row] + col);
    RS_1;
    LCD_Address=col;
    LCD_Line = row;
}

void ClearLCD(void)
{
    RS_0;
    WriteByte(0x01);
    delay(1000);
    RS_1;
    SetLCDPosition(0,0);
}

void ShowChar(unsigned char c)
{
    RS_1;
    WriteByte(c);
    LCD_Address++;
    if(LCD_Address>LCD_width)
        if(LCD_Line<LCD_height)
            SetLCDPosition(LCD_Line+1,0);
        else
            SetLCDPosition(0,0);
}

void ShowStr(unsigned char *s)
{
    while (*s != 0) ShowChar(*s++);
}

void InitLCD(void)
{
    int i;
    E_0;
    RS_0;
    delay(5000);
    WriteNibble(0x33);
    WriteNibble(0x33);
    WriteNibble(0x33);
    WriteNibble(0x22);
    WriteByte(0x28);
    WriteByte(0x01);
    WriteByte(0x10);
    WriteByte(0x06);
    WriteByte(0x0C);
    for(i=0x40; i < 0x5F; i++)
    {
        delay(1000);
        RS_0;
        WriteByte(i);
        delay(1000);
        ShowChar(0);
    }
    RS_1;
    SetLCDPosition(0, 0);
    buffer[0] = 'O';
    buffer[1] = 'k';
    buffer[2] = '\0';
    ShowStr(buffer);
}
//  -LCD биты

/*// Объявляем глобальные переменные:
int gNumber[5] = {0}; // Массив с разрядами набранного числа*/

// Объявляем используемые функции
void Prepare();             // Функция подготовки МК (настройка портов и т.п.)
int get_Number();           // Функция получения набранного номера
void DelLastNumb(int i);    // Функция удаления последней цифры
void StartADC();            // Функция запуска АЦП

int main()  // Главная функция
{
    // Определяем локальные переменные:
    /*int key, i = 0;    // Переменные для определения нажатой кнопки и разрядности соотвественно
    float Middle;      // Костыльная переменная*/
   
    // Вызываем нужные функции:
    Prepare();  // Вызов функции подготовки 
    delay(100);
    InitLCD();  //  инициализация дисплея
    delay(10000);
    ClearLCD(); //  очистка дисплея
    ShowStr("Test1");   //  вывод строки*/
   
   
    /*while(1)    // Бесконечный цикл работы МК
    {
        PORTC = ADRESH;
        // Проверка на окончание преобразование АЦП и фильтрация шумов)
        if((ADCON0bits.GO == 0))   
        {   
            if(ADRESH > 15)
            {
                LED_OK = 1;
                LED_ERROR = 0;
                StartADC();
            }
            else
            {
                LED_OK = 0;
                LED_ERROR = 1;
                StartADC();
            }
        }
    }*/
    return 0;
}

// Описание функции подготовки (настройки) параметров МК
void Prepare()
{
    // Настройки МК:
    OSCCON = (1<<4)|(1<<5)|(1<<6);  // Установка IRCF = '111' для частоты в 16 MHz
    ADCON1bits.VCFG0 = 0;           // Установка опорного напряжения
    ADCON1bits.VCFG1 = 0;           // Установка опорного напряжения
    TRISA = 0b1111111;              // Ножки RA0 - R7 - вход
    TRISB = 0b0000000;              // Ножки RB0-RB7 - выход
    TRISC = 0b0000000;              // Ножки RC0-RC7 - выход
    ANCON0 = 1;                     // AN как аналоговый входы
    // Настройки АЦП:
    ADCON2bits.ACQT = 1;            // 2 = 4TAD
    ADCON2bits.ADCS = 0b010;        // 16 TOSC
    ADCON0bits.CHS4 = 0;            // Настройка входа АЦП (AN0)
    ADCON0bits.CHS3 = 0;            // Настройка входа АЦП (AN0)
    ADCON0bits.CHS2 = 0;            // Настройка входа АЦП (AN0)
    ADCON0bits.CHS1 = 0;            // Настройка входа АЦП (AN0)
    ADCON0bits.CHS0 = 0;            // Настройка входа АЦП (AN0)
    ADCON2bits.ADFM = 0;            // Левое выравынивание
    ADCON0bits.ADON = 1;            // Включили модуль АЦП
    PIR1bits.ADIF = 0;              // Сброс прерываний АЦП
    PIE1bits.ADIE = 0;              // Разрешили прерывание АЦП
    INTCONbits.PEIE = 0;            // Периферийные прерывания разрешены
    INTCONbits.GIE = 0;             // Глобальные прерывания разрешены
    ADCON0bits.GO = 1 ;             // Метка начала преобразования
}

/*// Описание фунцкии удаления последнего номера:
void DelLastNumb(int i)
{
   if(i == 0)
   {
      gNumber[0] = 0;
   }
   for(int j = 0; j <= i; j++)
   {
      if (j == i)
      {
         gNumber[j] = 0;
      }
      else
      {
         gNumber[j] = gNumber[j+1];
      }
   }
}*/

// Описание функции получения числа
/*int get_Number()
{
   return (gNumber[4]*10000 + gNumber[3]*1000 + gNumber[2]*100 + gNumber[1]*10 + gNumber[0]);
}*/

// Описание функции запуска АЦП
void StartADC()
{
    __delay_ms(DELAY_ADC);  // Задержка перед началом АЦП
    ADCON0bits.GO = 1 ;     // Метка начала преобразования
}

    if (RCIE && RC1IF) {
        RC1IF = 0;
        if (FERR == 1) {
            FERR = 0; // framing error clear, but skip data
            =RC1REG;
        } else {
            if (uart_count < UART_BUFFER_SIZE) {
                *wr_ptr = RC1REG;
                uart_count++;
                if (++wr_ptr > &uart_buf[UART_BUFFER_SIZE]) wr_ptr = uart_buf;
            }
        }
    }