Summer code
This is the code I will be running now for a while, perhaps I will find some bugs or see parts of the functionality I would like to change.
#include <msp430x20x3.h>
#include "bat.h"
void ad_3(void);
void send_char(unsigned char p_i);
void send_string_lcd(unsigned char row,unsigned char column, unsigned char *p_i);
void read_port(void);
void display_image(void);
void send_rectangle_lcd(unsigned char column, unsigned char row, unsigned char column_b, unsigned char row_b);
void show_voltage_2(void);
void show_item(unsigned char *p_k);
void show_2(unsigned char *p_2);
void show_amps(void);
void show_generator_2(void);
int seconds=0;
unsigned char buffer[6][9];
unsigned char size[]={7,7,7,7,8,2};
unsigned char colour_h,colour_l;
int vdo_counter=0;
int blink = 0;
int main( void )
{
asm(" mov.w #27Eh,SP");
P1OUT = 0x02; // Oled output high
P1DIR = 0xCF; // P1.1 Oled output P1.4 transistor base cutoff floating P.5 Zigbee input
BCSCTL3 |= LFXT1S_2; // VLO
P2SEL = 0; // do not use crystal oscillator
WDTCTL = WDT_ADLY_16; // WDT 16ms, ACLK, interval timer
// WDTCTL = WDT_ADLY_1000; // WDT 1000ms, ACLK, interval timer
IE1 |= WDTIE; // Enable WDT interrupt
for(;;){
_BIS_SR(GIE + CPUOFF + SCG1 + SCG0); // Enter LPM3 w/interrupt
}
}
// Watchdog Timer interrupt service routine
#pragma vector=WDT_VECTOR
__interrupt void watchdog_timer(void)
{
vdo_counter++;
if(vdo_counter == 1){
ad_3();
}
if(vdo_counter >= 18)
vdo_counter = 0;
}
void ad_3(void){
unsigned char k[4];
k[3] = 0;
seconds++;
if(seconds == 3 ){
send_char(0x55); // sync
}
if(seconds == 4 ){
display_image();
read_port();
show_amps();
k[0] = 'v';
k[1] = 'o';
k[2] = 'l';
show_item(&k[0]);
}
if(seconds == 5){
show_voltage_2();
}
if(seconds == 8){
k[0] = 's';
k[1] = 'o';
k[2] = 'l';
show_item(&k[0]);
}
if(seconds == 9){
show_2(&buffer[0][0]);
}
if(seconds == 11){
k[0] = 'g';
k[1] = 'e';
k[2] = 'n';
show_item(&k[0]);
}
if(seconds == 12){
show_generator_2();
}
if(seconds == 14){
k[0] = 'k';
k[1] = 'y';
k[2] = 'l';
show_item(&k[0]);
}
if(seconds == 15){
show_2(&buffer[2][0]);
}
if(seconds == 17){
k[0] = 'v';
k[1] = 'a';
k[2] = 'r';
show_item(&k[0]);
}
if(seconds == 18){
show_2(&buffer[3][0]);
}
if(seconds ==20){
send_char(0x59); // display off
send_char(0x01);
send_char(0x00);
}
if(seconds == 21 ){
P1OUT = 0x02; // P1.4 transistor cutoff Oled output high
P1DIR = 0xDF; // P1.1 Oled output P1.4 transistor base cutoff floating P.5 Zigbee inpu
}
if(seconds > 21){
if(blink == 0){
blink = 1;
P1OUT = 0x03;
}
else{
blink = 0;
P1OUT = 0x2;
}
}
}
void show_amps(void){
int i,t;
unsigned char k[5];
unsigned char v;
for( i = 0 ; i < 5 ; i++)
k[i] = 0;
// convert ascii to hex for generator,solarpanel,fridge and heater
for( i = 0; i < 4 ; i++){
t = 10;
v = buffer[i][6];
while ( v > 0x30 && t > 0){
k[i] = k[i] + 10;
v = v - 1;
t--;
}
t = 10;
v = buffer[i][7];
while ( v > 0x30 && t > 0){
k[i] = k[i] + 1;
v = v - 1;
t--;
}
}
// convert ascii to hex for water
if(buffer[5][0] == 0x31)
k[4] = k[4] + 100;
t = 10;
while ( buffer[5][1] > 0x30 && t > 0){
k[4] = k[4] + 10;
buffer[5][1] = buffer[5][1] - 1;
t--;
}
t = 10;
while ( buffer[5][2] > 0x30 && t > 0){
k[4] = k[4] + 1;
buffer[5][2] = buffer[5][2] - 1;
t--;
}
k[4] = k[4] >> 1;
colour_h = BLUE_HIGH;
colour_l = BLUE_LOW;
send_rectangle_lcd(0,0,k[4],4); // water
colour_h = BLACK_HIGH;
colour_l = BLACK_LOW;
send_rectangle_lcd(0,6,k[0],10); // generator
send_rectangle_lcd(k[0]+3,6,k[0] + k[1] + 3,10); // solar
colour_h = RED_HIGH;
colour_l = RED_LOW;
send_rectangle_lcd(0,12,k[2],16); // fridge
send_rectangle_lcd(k[2]+3,12,k[2] + 3 + k[3],16); // heater
}
void show_voltage_2(void){
unsigned char k[5];
unsigned char *p_buff;
k[3] = 0;
p_buff = &k[0];
send_rectangle_lcd(0,54,95,64); // black background
colour_h = WHITE_HIGH;
colour_l = WHITE_LOW;
k[4] = 0;
p_buff = &k[0];
k[0] = buffer[4][0];
k[1]=buffer[4][1];
k[2]='.';
k[3]=buffer[4][2];
send_string_lcd(7,0,p_buff);
k[0] = buffer[4][3];
k[1]=buffer[4][4];
k[2]='.';
k[3]=buffer[4][5];
send_string_lcd(7,5,p_buff);
k[0] = buffer[4][6];
k[1]=buffer[4][7];
k[2]='.';
k[3]=buffer[4][8];
send_string_lcd(7,10,p_buff);
}
void show_item(unsigned char *p_st){
colour_h = BLACK_HIGH;
colour_l = BLACK_LOW;
send_rectangle_lcd(0,54,95,64); // black background
colour_h = WHITE_HIGH;
colour_l = WHITE_LOW;
send_string_lcd(7,0,p_st);
colour_h = BLACK_HIGH; // prepere for next black background
colour_l = BLACK_LOW;
}
void show_generator_2(void){
unsigned char k[12];
unsigned char *p_buff;
p_buff = &k[0];
send_rectangle_lcd(0,54,95,64); // black background
k[0] = buffer[1][0];
k[1] = buffer[1][1];
k[2] = ' ';
k[3] = buffer[1][2];
k[4] = buffer[1][3];
k[5] = ' ';
k[6] = buffer[1][4];
k[7] = buffer[1][5];
k[8] = ' ';
k[9] = buffer[1][6];
k[10] = buffer[1][7];
k[11] = 0;
colour_h = WHITE_HIGH;
colour_l = WHITE_LOW;
send_string_lcd(7,0,p_buff);
}
void show_2(unsigned char *p_2){
unsigned char k[15];
unsigned char *p_buff;
p_buff = &k[0];
send_rectangle_lcd(0,54,95,64); // black background
k[0] = *p_2++;
k[1] = '.';
k[2] = *p_2++;
k[3] = ' ';
k[4] = *p_2++;
k[5] = '.';
k[6] = *p_2++;
k[7] = ' ';
k[8] = *p_2++;
k[9] = '.';
k[10] = *p_2++;
k[11] = ' ';
k[12] = *p_2++;
k[13] = *p_2++;
k[14] = 0;
colour_h = WHITE_HIGH;
colour_l = WHITE_LOW;
send_string_lcd(7,0,p_buff);
}
void display_image(void){
char low_b,mid_b,high_b;
low_b = 0;
mid_b = 0;
high_b = 0;
send_char(0x66);
send_char(high_b);
send_char(mid_b);
send_char(low_b);
}
void read_port(void){
int item;
unsigned char p = 0xFF;
long delay;
unsigned char a;
char b=0;
unsigned char d;
unsigned char search = 0x17;
int hit = 0;
BCSCTL1 |= RSEL3 | RSEL2 | RSEL1 | RSEL0; // increase speed
while(hit < 7 ){
d = 0;
p = 17; // not to trigger the while loop
while(p != 0){ // wait for startbit
p = P1IN;
p &= 0x20;
}
delay = 15;
while(delay > 1) // half bit extra delay at start
delay--;
for(a = 8; a > 0 ; a--){
delay = 33;
while(delay > 1)
delay--;
d = d >> 1;
P1OUT = 0x18; // set sample pin
p = P1IN;
p &= 0x20;
p = p << 2; // LSB first
d |= p;
} // one byte ready
if(search == 0x17 && d > 0x40 && d < 0x47){
search = 0x16;
item = d - 0x41;
}
else if(search == 0x16){
buffer[item][b++] = d;
if( b > size[item]){
search = 0x17;
b = 0;
hit++;
}
} // end of char
delay = 15;
while(delay > 1) // half bit extra delay at end
delay--;
} // end of timeout
BCSCTL1 = RSEL2 | RSEL1 | RSEL0; // reduce speed
}
void send_rectangle_lcd(unsigned char column, unsigned char row, unsigned char column_b, unsigned char row_b){
// 0x72,column,row,font_size,colour_high,colour_low,string,NULL
int d; // make sure previous command is ready
for( d = 0; d < 1000 ; d++);
send_char(0x72);
send_char(column);
send_char(row);
send_char(column_b);
send_char(row_b);
send_char(colour_h);
send_char(colour_l);
send_char(1);
}
void send_string_lcd(unsigned char row,unsigned char column,unsigned char *p_i){
// 0x73,column,row,font_size,colour_high,colour_low,string,NULL
int d; // make sure previous command is ready
for( d = 0; d < 1000 ; d++);
send_char(0x73);
send_char(column);
send_char(row);
send_char(0);
send_char(0xFF);
send_char(0xFF);
while(*p_i != 0)
send_char(*p_i++);
send_char(0);
}
void send_char(unsigned char p_i){
int p,i,j;
P1OUT = 0x1A;
BCSCTL1 |= RSEL3 | RSEL2 | RSEL1 | RSEL0; // increase speed
p = (int) p_i;
p = p << 1;
p |= 0x200; // add start and stop bit
for(i = 0; i < 10 ;i++){
for(j = 0; j < SERIAL_DELAY_384; j++);
if((p & 0x01) != 0)
P1OUT = 0x1A; // set bit high
else
P1OUT = 0x18; // set bit low
p = p >> 1;
}
P1OUT |= 0x02;
for(j = 0; j < SERIAL_DELAY_384; j++);
BCSCTL1 = RSEL2 | RSEL1 | RSEL0; // reduce speed
}
