#include <Timer.h>
#include <Wire.h>
#include <LiquidCrystal_I2C.h>
#define Addr 0x27
#define N 16
#define ARROW_L 8

LiquidCrystal_I2C LCD(Addr,16,2);

const byte arrow[ARROW_L]={
  B00000,
  B00100,
  B01110,
  B11111,
  B00100,
  B00100,
  B00100,
  B00000
};
Timer t1,t2,t3,t4;
byte Dt[N][ARROW_L];
int iL,iR,iC,iTs,iTm,iTk,dx;
char sysTime[]="00:00";
String byCCF="by Chi Ching Fure , http://teacher.hcvs.kh.edu.tw/teacher/benme/    ";

void setup() {
  int i,j,k;
  LCD.begin();
  for(i=0;i<ARROW_L;i++)
    for(j=0,k=i;j<ARROW_L;j++,k=(k+1)%ARROW_L){
      Dt[i][j]=arrow[k];
      Dt[i+ARROW_L][j]=arrow[ARROW_L-k-1];
    }
  iL=iR=iC=iTs=iTm=iTk=0;
  dx=1;
  t1.every(400,tL);
  t2.every(800,tR);
  t3.every(1000,tT);
  t4.every(2000,tC);
  LCD.setCursor(1,1);LCD.print(sysTime);
}

void loop() {
  t1.update();
  t2.update();
  t3.update();
  t4.update();
}
void tL(){
  LCD.createChar(0,Dt[iL]);
  LCD.setCursor(0,0);
  LCD.write(0);
  LCD.setCursor(0,1);
  LCD.write(0);
  iL = (iL+1) % ARROW_L;
}
void tR(){
  LCD.createChar(1,Dt[ARROW_L+iR]);
  LCD.setCursor(15,0);
  LCD.write(1);
  LCD.setCursor(15,1);
  LCD.write(1);
  iR = (iR+ARROW_L-1) % ARROW_L;
}
void tC(){
  int i;
  if((iTk==0)&&(dx==-1)) dx=1;
  if((iTk==9)&&(dx==1)) dx=-1;
  iTk = (iTk+10+dx)%10;
  LCD.setCursor(1,1);
  for(i=0;i<iTk;i++) LCD.print(' ');
  LCD.print(sysTime);
  for(i=iTk+6;i<15;i++) LCD.print(' ');
}
void tT(){
  LCD.setCursor(1,0);LCD.print(byCCF.substring(0,14));
  byCCF = byCCF.substring(1)+byCCF.substring(0,1);
  iTs++;
  if(iTs==60){
    iTs=0;
    iTm++;
    if(iTm==60) iTm=0;
  }
  sysTime[0]=iTm/10+'0';sysTime[1]=iTm%10+'0';
  sysTime[3]=iTs/10+'0';sysTime[4]=iTs%10+'0';
  LCD.setCursor(iTk+1,1);LCD.print(sysTime[0]);
  LCD.setCursor(iTk+2,1);LCD.print(sysTime[1]);
  LCD.setCursor(iTk+4,1);LCD.print(sysTime[3]);
  LCD.setCursor(iTk+5,1);LCD.print(sysTime[4]);
}