///LCD module connections
#define LCD_RS_PIN PIN_D0
#define LCD_RW_PIN PIN_D1
#define LCD_ENABLE_PIN PIN_D2
#define LCD_DATA4 PIN_D3
#define LCD_DATA5 PIN_D4
#define LCD_DATA6 PIN_D5
#define LCD_DATA7 PIN_D6
//End LCD module connections
#include <16F887.h>
#fuses NOMCLR, INTRC_IO, NOBROWNOUT, NOLVP
#use delay(clock = 8MHz)
#use fast_io(B)
#use fast_io(D)
#include <lcd.c>
#use I2C(master, I2C1, FAST = 100000)
int1 alarm1_status, alarm2_status;
char time[] = " : : ",
calendar[] = " / /20 ",
alarm1[] = "A1: : :00", alarm2[] = "A2: : :00",
temperature[] = "T: . C";
int8 i, second, minute, hour, day, date, month, year,
alarm1_minute, alarm1_hour, alarm2_minute, alarm2_hour,
status_reg;
#INT_EXT // External interrupt routine
void ext_isr(void){
output_high(PIN_B4);
clear_interrupt(INT_EXT);
}
void DS3231_read(){ // Read time & calendar data function
i2c_start(); // Start I2C protocol
i2c_write(0xD0); // DS3231 address
i2c_write(0); // Send register address (seconds register)
i2c_start(); // Restart I2C
i2c_write(0xD1); // Initialize data read
second = i2c_read(1); // Read seconds from register 0
minute = i2c_read(1); // Read minutes from register 1
hour = i2c_read(1); // Read hour from register 2
day = i2c_read(1); // Read day from register 3
date = i2c_read(1); // Read date from register 4
month = i2c_read(1); // Read month from register 5
year = i2c_read(0); // Read year from register 6
i2c_stop(); // Stop I2C protocol
}
void alarms_read_display(){ // Read and display alarm1 and alarm2 data function
int8 control_reg, temperature_lsb;
signed int8 temperature_msb;
i2c_start(); // Start I2C protocol
i2c_write(0xD0); // DS3231 address
i2c_write(0x08); // Send register address (alarm1 minutes register)
i2c_start(); // Restart I2C
i2c_write(0xD1); // Initialize data read
alarm1_minute = i2c_read(1); // Read alarm1 minutes
alarm1_hour = i2c_read(1); // Read alarm1 hours
i2c_read(1); // Skip alarm1 day/date register
alarm2_minute = i2c_read(1); // Read alarm2 minutes
alarm2_hour = i2c_read(1); // Read alarm2 hours
i2c_read(1); // Skip alarm2 day/date register
control_reg = i2c_read(1); // Read the DS3231 control register
status_reg = i2c_read(1); // Read the DS3231 status register
i2c_read(1); // Skip aging offset register
temperature_msb = i2c_read(1); // Read temperature MSB
temperature_lsb = i2c_read(0); // Read temperature LSB
i2c_stop(); // Stop I2C protocol
// Convert BCD to decimal
alarm1_minute = (alarm1_minute >> 4) * 10 + (alarm1_minute & 0x0F);
alarm1_hour = (alarm1_hour >> 4) * 10 + (alarm1_hour & 0x0F);
alarm2_minute = (alarm2_minute >> 4) * 10 + (alarm2_minute & 0x0F);
alarm2_hour = (alarm2_hour >> 4) * 10 + (alarm2_hour & 0x0F);
// End conversion
alarm1[8] = alarm1_minute % 10 + 48;
alarm1[7] = alarm1_minute / 10 + 48;
alarm1[5] = alarm1_hour % 10 + 48;
alarm1[4] = alarm1_hour / 10 + 48;
alarm2[8] = alarm2_minute % 10 + 48;
alarm2[7] = alarm2_minute / 10 + 48;
alarm2[5] = alarm2_hour % 10 + 48;
alarm2[4] = alarm2_hour / 10 + 48;
alarm1_status = bit_test(control_reg, 0); // Read alarm1 interrupt enable bit (A1IE) from DS3231 control register
alarm2_status = bit_test(control_reg, 1); // Read alarm2 interrupt enable bit (A2IE) from DS3231 control register
if(temperature_msb < 0){
temperature_msb = abs(temperature_msb);
temperature[2] = '-';
}
else
temperature[2] = ' ';
temperature_lsb >>= 6;
temperature[4] = temperature_msb % 10 + 48;
temperature[3] = temperature_msb / 10 + 48;
if(temperature_lsb == 0 || temperature_lsb == 2){
temperature[7] = '0';
if(temperature_lsb == 0) temperature[6] = '0';
else temperature[6] = '5';
}
if(temperature_lsb == 1 || temperature_lsb == 3){
temperature[7] = '5';
if(temperature_lsb == 1) temperature[6] = '2';
else temperature[6] = '7';
}
temperature[8] = 223; // Degree symbol
lcd_gotoxy(11, 1); // Go to column 10 row 1
printf(lcd_putc, temperature); // Display temperature
lcd_gotoxy(21, 1); // Go to column 1 row 3
printf(lcd_putc, alarm1); // Display alarm1
lcd_gotoxy(38, 1); // Go to column 18 row 3
if(alarm1_status) lcd_putc("ON "); // If A1IE = 1 print 'ON'
else lcd_putc("OFF"); // If A1IE = 0 print 'OFF'
lcd_gotoxy(21, 2); // Go to column 1 row 4
printf(lcd_putc, alarm2); // Display alarm2
lcd_gotoxy(38, 2); // Go to column 18 row 4
if(alarm2_status) lcd_putc("ON "); // If A2IE = 1 print 'ON'
else lcd_putc("OFF"); // If A2IE = 0 print 'OFF'
}
void calendar_display(){ // Display calendar function
switch(day){
case 1: strcpy(calendar, "Sun / /20 "); break;
case 2: strcpy(calendar, "Mon / /20 "); break;
case 3: strcpy(calendar, "Tue / /20 "); break;
case 4: strcpy(calendar, "Wed / /20 "); break;
case 5: strcpy(calendar, "Thu / /20 "); break;
case 6: strcpy(calendar, "Fri / /20 "); break;
case 7: strcpy(calendar, "Sat / /20 "); break;
default: strcpy(calendar, "Sat / /20 "); break;
}
calendar[13] = year % 10 + 48;
calendar[12] = year / 10 + 48;
calendar[8] = month % 10 + 48;
calendar[7] = month / 10 + 48;
calendar[5] = date % 10 + 48;
calendar[4] = date / 10 + 48;
lcd_gotoxy(5, 2); // Go to column 1 row 2
printf(lcd_putc, calendar); // Display calendar
}
void DS3231_display(){
// Convert BCD to decimal
second = (second >> 4) * 10 + (second & 0x0F);
minute = (minute >> 4) * 10 + (minute & 0x0F);
hour = (hour >> 4) * 10 + (hour & 0x0F);
date = (date >> 4) * 10 + (date & 0x0F);
month = (month >> 4) * 10 + (month & 0x0F);
year = (year >> 4) * 10 + (year & 0x0F);
// End conversion
time[7] = second % 10 + 48;
time[6] = second / 10 + 48;
time[4] = minute % 10 + 48;
time[3] = minute / 10 + 48;
time[1] = hour % 10 + 48;
time[0] = hour / 10 + 48;
calendar_display(); // Call calendar display function
lcd_gotoxy(5, 1); // Go to column 1 row 1
printf(lcd_putc, time); // Display time
}
void blink(){
int8 j = 0;
while(j < 10 && (input(PIN_B1) || i >= 5) && input(PIN_B2) && (input(PIN_B3) || i < 5)){
j++;
delay_ms(25);
}
}
int8 edit(parameter, x, y){
while(!input(PIN_B1) || !i
