int LED_PIN_R = 22;
int LED_PIN_G = 23;
int LED_PIN_B = 24;
int WAIT = 15;

uint8_t R, G, B;

void color(int velocity) {

	velocity = velocity % 255;

	if (velocity < 85) {
		R = 255 - velocity * 3;
		G = 0;
		B = velocity * 3;
	} else if (velocity < 170 ) {
		velocity -= 85;
		R = 0;
		G = velocity * 3;
		B = 255 - velocity * 3;
	} else {
		velocity -= 170;
		R = velocity * 3;
		G = 255 - velocity * 3;
		B = 0;
	}

	analogWrite(LED_PIN_R, R);
	analogWrite(LED_PIN_G, G);
	analogWrite(LED_PIN_B, B);
	delay(WAIT);
}

void setup(){ }

void loop(){

	int i = 0;
	while(1) {
		color(i);
		if ((++i) == 255) i = 0;
	}
}

#include <Arduino.h>
#include <RLduino78_RTC.h>

#define null '\0'

RTC_TIMETYPE t;
char date[32], buf[32], *p;
char *token[10];
int  pos;

void setup()
{
	Serial.begin(9600);
	rtc_init();
	p = date;
}

void loop() {

	while (Serial.available())  {
		char c = Serial.read();
		if (c == '\n') {
			Serial.println(date);
			*p = null;
			p = date;
			pos = 0;
			token[pos] = p;
			while (*p!=null) {
				switch (*p ) {
					case ' ':
					case '/':
					case ':':
					case '-':
						*p = null;
						token[++pos] = ++p;
						break;
					default:
						++p;
						break;
				}
			}
			if ( strcmp(token[0],"date")==0 ) {
				t.year    = atoi(token[1]);
				t.mon     = atoi(token[2]);
				t.day     = atoi(token[3]);
				t.hour    = atoi(token[4]);
				t.min     = atoi(token[5]);
				t.second  = atoi(token[6]);
				if (strcmp(token[7],"sun")) {
					t.weekday = RTC_WEEK_SUNDAY;
				} else if (strcmp(token[7],"mon")) {
					t.weekday = RTC_WEEK_MONDAY;
				} else if (strcmp(token[7],"tue")) {
					t.weekday = RTC_WEEK_TUESDAY;
				} else if (strcmp(token[7],"wed")) {
					t.weekday = RTC_WEEK_WEDNESDAY;
				} else if (strcmp(token[7],"thr")) {
					t.weekday = RTC_WEEK_THURSDAY;
				} else if (strcmp(token[7],"fri")) {
					t.weekday = RTC_WEEK_FRIDAY;
				} else if (strcmp(token[7],"sat")) {
					t.weekday = RTC_WEEK_SATURDAY;
				}
				rtc_set_time(&t);

			} else if ( strcmp(token[0],"help")==0 ) {
				Serial.println("date yy/mm/dd hh:ii:ss week");
			}
			p = date;
		} else {
			*p = c;
			++p;
		}
	}

	if ( rtc_get_time(&t) > 0 ) {
		sprintf(buf,"%04d/%02d/%02d %02d:%02d:%02d",
			2000 + t.year, t.mon, t.day, t.hour, t.min, t.second);
		Serial.println(buf);
	}
	delay(1000);
}