// 14セグメントLEDコントローラ
// by 武蔵野電波

#include <MsTimer2.h>  // ライブラリのインストールが必要

#define NUMDIGIT 8
#define SPACE 10
#define CLK 14
#define SD 15

// 14セグ・フォントデータ
unsigned int font[37] = {
  0b1111110000100100,  // 0
  0b0000000001001000,  // 1
  0b1101000100000100,  // 2
  0b1111000100000000,
  0b0000011101001000,
  0b1011011100000000,
  0b1011111100000000,
  0b1000000000100100,
  0b1111111100000000,
  0b1111011100000000,  // 9

  0b0000000000000000,  // space
  0b1110111100000000,  // A
  0b1111000101001000,  // B
  0b1001110000000000,
  0b1111000001001000,
  0b1001111000000000,
  0b1000111000000000,
  0b1011110100000000,  // G
  0b0110111100000000,
  0b1001000001001000,

  0b0111100000000000,
  0b0000111000110000,  // K
  0b0001110000000000,
  0b0110110010100000,
  0b0110110010010000,
  0b1111110000000000,  // O
  0b1100111100000000,
  0b1111110000010000,
  0b1100111100010000,
  0b1011000110000000,  // S

  0b1000000001001000,
  0b0111110000000000,
  0b0000110000100100,
  0b0110110000010100,  // W
  0b0000000010110100,
  0b0000000010101000,
  0b1001000000100100  // Z
};

char driverPin[NUMDIGIT] = {2,3,4,5,6,7,8,9}; // カソードにつながるピン
char t[NUMDIGIT] = {11,12,13,14,0,1,2,3};  // 最初にABCD0123と表示
char currentDigit = 0;
byte buf = 0;

void setup() {
  for(char i=0; i<NUMDIGIT; i++) pinMode(driverPin[i], OUTPUT);
  pinMode(CLK, OUTPUT);
  pinMode(SD, OUTPUT);
  pinMode(13, OUTPUT);

  MsTimer2::set(3, refresh);   // リフレッシュレート
  MsTimer2::start();

  Serial.begin(9600);

  digitalWrite(13, HIGH);
}

void refresh() {
  digitalWrite(driverPin[currentDigit], LOW);
  if(++currentDigit == NUMDIGIT) currentDigit = 0;
  shiftOut(SD, CLK, LSBFIRST, lowByte(font[t[currentDigit]]));
  shiftOut(SD, CLK, LSBFIRST, highByte(font[t[currentDigit]]));
  digitalWrite(driverPin[currentDigit], HIGH);
}

void loop() {
  static char c = 0;

  if(Serial.available() > 0) {
    buf = Serial.read();

    if(c == 0) {
      for(char i=0; i<NUMDIGIT; i++) {
        t[i] = SPACE;
      }
    }

	// 受け取った文字の処理
    if(buf == ';') {  // ;を受け取ったら行末と判断
      c = 0;
    } else if(buf == ' ') {
      t[c++] = SPACE;
    } else if(buf < '0' || buf > 'Z') {
      // nop
    } else if(buf <= '9') {
      t[c++] = buf - '0';
    } else {
      t[c++] = buf - 'A' + 11;
    }
    if(c >= NUMDIGIT) c = NUMDIGIT - 1;
  }
}