1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
|
#include <Wire.h>
// minutes of "dawn" before alarm
#define TIN 30
// "dawn" + "daylight"
#define TDAY 45
// "dawn" + "daylight" + blue blinding light
#define TOUT 75
// number of available alarms; max 10 for storage in the DS1307 ram
#define NALARMS 4
// pins and addressed
#define RPIN 3
#define YPIN 5
#define BPIN 6
#define DS1307_ADDRESS 0x68
int st = 0; // alarm status (minutes from alarm - TIN)
char alarms[NALARMS][5];
char cmin; // current minute
int a = -1; // current alarm
void setup () {
Serial.begin(9600);
Wire.begin();
pinMode(RPIN,OUTPUT);
pinMode(YPIN,OUTPUT);
pinMode(BPIN,OUTPUT);
digitalWrite(RPIN,255);
digitalWrite(YPIN,0);
digitalWrite(BPIN,0);
// if the RTC is already running read alarms and status
Wire.beginTransmission(DS1307_ADDRESS);
Wire.send(0);
Wire.endTransmission();
Wire.requestFrom(DS1307_ADDRESS, 1);
char running = Wire.receive();
running = !(running>>7);
if ( running ) {
Wire.requestFrom(DS1307_ADDRESS, 12 + NALARMS * 5);
for (int i = 0; i < 8 ; i ++ ) {
Wire.receive();
}
st = Wire.receive();
a = Wire.receive();
cmin = Wire.receive();
for ( int i = 0; i < NALARMS ; i ++ ) {
for ( int j = 0; j < 5 ; j ++ ) {
alarms[i][j] = Wire.receive();
}
}
} else {
for ( int i = 0 ; i < NALARMS ; i ++ ) {
for ( int j = 0; j < 5 ; j ++ ) {
alarms[i][j] = 0;
}
}
st = 0;
a = -1;
// DEBUG: we don't want to set the time until we receive
// it from serial, but serial is not implemented yet
set_time(11,9,2,5,0,0,0);
}
}
void loop () {
// read commands from serial
// read time, check alarms
check_time();
Serial.println(st);
// act on status: LEDs and buzzer
if ( st > 0 ) {
set_leds();
}
// wait about till the next second
delay(1000);
}
// Set the current time
void set_time(int y,int m,int d, int w, int hh, int mm, int ss) {
Wire.beginTransmission(DS1307_ADDRESS);
Wire.send(0);
Wire.send(bin2bcd(ss));
Wire.send(bin2bcd(mm));
Wire.send(bin2bcd(hh));
Wire.send(w);
Wire.send(bin2bcd(d));
Wire.send(bin2bcd(m));
Wire.send(bin2bcd(y));
Wire.send(0);
Wire.endTransmission();
}
void check_time() {
Wire.beginTransmission(DS1307_ADDRESS);
Wire.send(0);
Wire.endTransmission();
Wire.requestFrom(DS1307_ADDRESS, 6);
Wire.receive();
int mm = bcd2bin(Wire.receive());
int hour = bcd2bin(Wire.receive());
int wday = Wire.receive();
int day = bcd2bin(Wire.receive());
int month = bcd2bin(Wire.receive());
if ( a < 0 ) {
for ( int i = 0; i < NALARMS ; i ++ ) {
// check alarm i
if ( ( alarms[i][0] & ( 1 << (wday - 1) ) ) ||
(month == alarms[i][1] && day == alarms[i][2]) ) {
// this is alarm day!
if ( hour == alarms[i][3] && mm == alarms[i][4]) {
// this is alarm hour!
a = i;
st = 0;
cmin = mm;
if ( ( alarms[i][0] & 128 ) == 0 ) {
// this alarm won't be repeated
alarms[i] = { 0,0,0,0,0 };
}
break;
}
}
}
} else {
if ( cmin < mm ) {
cmin = mm;
st++;
}
}
}
void set_leds() {
if ( st > 0 && st <= TIN) {
int y = int(float(st*255)/TIN);
int r = 255 - y;
analogWrite(RPIN,r);
analogWrite(YPIN,y);
} else if ( st > TIN && st < TDAY ) {
analogWrite(RPIN,0);
analogWrite(YPIN,255);
analogWrite(BPIN,0);
}else if (st >= TDAY) {
analogWrite(RPIN,0);
analogWrite(YPIN,0);
analogWrite(BPIN,255);
} else if (st == TOUT) {
// reset stuff
st = 0;
a = -1;
analogWrite(RPIN,255);
analogWrite(YPIN,0);
analogWrite(BPIN,0);
}
}
// BCD helper functions from adafruit-RTClib
static uint8_t bcd2bin (uint8_t val) { return val - 6 * (val >> 4); }
static uint8_t bin2bcd (uint8_t val) { return val + 6 * (val / 10); }
// vim: set filetype=c:
|
