#include <FlexiTimer2.h>

//縲€LED繝槭ヨ繝ｪ繧ｯ繧ｹ縺ｮ繝斐Φ蜑ｲ蠖薙※�啌OW蛛ｴ縺後き繧ｽ繝ｼ繝峨€，OLOMN蛛ｴ縺後い繝弱�繝峨�8x8繝槭ヨ繝ｪ繝�け繧ｹLED
int ANODEPIN[]   = {
  10, 11, 12, 14, 15, 16, 17, 18 };
int CATHODEPIN[] ={
  2,  3,  4,  5,  6,  7,  8,  9    };

int testPatternF[8][8] = {
  0,1,1,1, 1,1,1,0,
  0,1,1,1, 1,1,1,0,
  0,1,1,0, 0,0,0,0,
  0,1,1,0, 0,0,0,0,
  0,1,1,1, 1,1,0,0,
  0,1,1,1, 1,1,0,0,
  0,1,1,0, 0,0,0,0,
  0,1,1,0, 0,0,0,0};

int testPatternM[8][8] = {
  1,1,0,0, 0,0,1,1,
  1,1,1,0, 0,1,1,1,
  1,1,1,1, 1,1,1,1,
  1,1,1,1, 1,1,1,1,
  1,1,0,1, 1,0,1,1,
  1,1,0,0, 0,0,1,1,
  1,1,0,0, 0,0,1,1,
  1,1,0,0, 0,0,1,1,};

int testPatternS[8][8] = {
  0,1,1,1, 1,1,1,0,
  1,1,1,1, 1,1,1,1,
  0,1,1,0, 0,0,1,1,
  0,0,1,1, 1,0,0,0,
  0,0,0,1, 1,1,0,0,
  1,1,0,0, 0,1,1,0,
  1,1,1,1, 1,1,1,1,
  0,1,1,1, 1,1,1,0};

int matrix[8][8];   // LED繝槭ヨ繝ｪ繧ｯ繧ｹ縺ｮ蜷�せ縺ｮ迥ｶ諷九ｒ菫晄戟縺吶ｋ驟榊��1:ON縲0:OFF�
int displayRow;    // 迴ｾ蝨ｨ陦ｨ遉ｺ荳ｭ縺ｮrow
int pat = 0;       // 繝｡繧､繝ｳ繝励Ο繧ｰ繝ｩ繝縺ｧ謖�ｮ壹☆繧九ヱ繧ｿ繝ｼ繝ｳ逡ｪ蜿ｷ

void setup() {
  initMatrix();
}

void loop() {
  if(pat == 0) {
    setPattern(testPatternF);
  }
  else if(pat == 1) {
    setPattern(testPatternM);
  }
  else {
    setPattern(testPatternS);
  }

  pat++;
  pat = pat%3;
  delay(1000);
}

//---------------------------------------------------------
// LED繝槭ヨ繝ｪ繧ｯ繧ｹ繧貞宛蠕｡縺吶ｋ髢｢謨ｰ
//---------------------------------------------------------

//
// LED繝槭ヨ繝ｪ繧ｯ繧ｹ繧貞�譛溷喧縺吶ｋ
// (1) Arduino 縺ｮ蜃ｺ蜉帙ヴ繝ｳ縺ｮ蛻晄悄蛹
// (2) 蜷ЛED縺ｮ迥ｶ諷九ｒ菫晄戟縺吶ｋ驟榊�縺ｮ蛻晄悄蛹
// (3) LED繧定｡ｨ遉ｺ縺吶ｋ繧ｿ繧､繝槫牡霎ｼ縺ｿ縺ｮ險ｭ螳
//
void initMatrix() {
  //縲€蜃ｺ蜉帙ｒ蛻晄悄蛹悶€√い繝弱�繝羽IGH縲√き繧ｽ繝ｼ繝鵜OW縺ｧ轤ｹ轣ｯ縲√◎縺ｮ騾�↓險ｭ螳壹☆繧
  // 繧｢繝弱�繝峨ｒ縲´OW縺ｧ蛻晄悄蛹(coulmn譁ｹ蜷托ｼ
  for( int ano = 0; ano < 8; ano++ )
  {
    pinMode( ANODEPIN[ano], OUTPUT );
    digitalWrite( ANODEPIN[ano], LOW );
  }
  // 繧ｫ繧ｽ繝ｼ繝峨ｒ縲？IGH縺ｧ蛻晄悄蛹厄ｼ�ow縺ｫ蟇ｾ蠢懶ｼ
  for( int cat = 0; cat < 8; cat++ )
  {
    pinMode( CATHODEPIN[cat], OUTPUT );
    digitalWrite( CATHODEPIN[cat], HIGH );
  }

  clearMatrix();  // 迥ｶ諷九ｒ菫晄戟縺吶ｋ驟榊�繧丹FF縺ｧ蛻晄悄蛹
  startMatrix();  // LED繝槭ヨ繝ｪ繧ｯ繧ｹ縺ｮ陦ｨ遉ｺ繧帝幕蟋具ｼ郁｡ｨ遉ｺ陦後ｒ0縺ｫ險ｭ螳壹＠縺ｦ縲√ち繧､繝槫牡霎ｼ縺ｿ繧帝幕蟋具ｼ
}

//
// LED繝槭ヨ繝ｪ繧ｯ繧ｹ縺ｮ陦ｨ遉ｺ繧呈峩譁ｰ�郁｡ｨ遉ｺ陦 �
//   displayRow 縺ｧ遉ｺ縺輔ｌ繧1陦悟�繧定｡ｨ遉ｺ
//   startMatrix()縺悟他縺ｰ繧後◆蠕後€√ち繧､繝槫牡霎ｼ縺ｿ縺ｫ繧医ｊ1ms豈弱↓蜻ｼ縺ｰ繧後ｋ
//   縺､縺ｾ繧翫€8ms縺ｧ蜈ｨ縺ｦ縺ｮ陦後ｒ陦ｨ遉ｺ縺吶ｋ
//
void updateMatrix() {
  if(displayRow >= 0) {
    digitalWrite( CATHODEPIN[displayRow], HIGH );  // �代▽蜑阪�ROW繧辿IGH縺ｫ螟画峩(豸医☆�
  }
  displayRow++;
  displayRow = displayRow%8;

  //縲€繧ｳ繝ｩ繝譁ｹ蜷托ｼ医い繝弱�繝画婿蜷托ｼ峨�蜃ｺ蜉帙ｒ鬆�↓繧ｻ繝�ヨ
  for(int column = 0; column<8; column++) {
    if(matrix[displayRow][column] == 1) {
      digitalWrite( ANODEPIN[column], HIGH );	// HIGH縺ｫ螟画峩
    }
    else {
      digitalWrite( ANODEPIN[column], LOW );	// LOW縺ｫ謌ｻ縺
    }
  }
  // LOW縺ｫ謌ｻ縺呻ｼ育せ轣ｯ�帶ｬ｡縺ｮ繧ｿ繧､繝槭�蜑ｲ霎ｼ縺ｿ縺ｾ縺ｧ縲√◎縺ｮ迥ｶ諷九〒陦ｨ遉ｺ�
  digitalWrite( CATHODEPIN[displayRow], LOW );
}

//
// LED繝槭ヨ繝ｪ繧ｯ繧ｹ縺ｮ陦ｨ遉ｺ繧帝幕蟋具ｼ郁｡ｨ遉ｺ陦慧isplayRow繧0縺ｫ險ｭ螳壹＠縺ｦ縲√ち繧､繝槫牡霎ｼ縺ｿ繧帝幕蟋具ｼ
//
void startMatrix(){
  displayRow = -1;
  FlexiTimer2::set(1, updateMatrix);// 1ms豈弱↓蜑ｲ霎ｼ縺ｿ繧堤匱逕溘＆縺 updateMatrix 繧貞他縺ｳ蜃ｺ縺
  FlexiTimer2::start();
}

//
// LED繝槭ヨ繝ｪ繧ｯ繧ｹ縺ｮ迥ｶ諷九ｒ菫晄戟縺吶ｋ驟榊�繧貞､画峩縺吶ｋ
//    void clearMatrix(): 蜈ｨ縺ｦ0縺ｫ險ｭ螳
//    void setPoint(int x, int y): (x,y)繧1(ON)縺ｫ險ｭ螳
//    void resetPoint(int x, int y): (x,y)繧0��FF)縺ｫ險ｭ螳
//    void setPattern(int _pattern[8][8]): _pattern縺ｫ險ｭ螳壹＆繧後◆繝代ち繝ｼ繝ｳ繧定ｨｭ螳

void clearMatrix() {
  for(int row = 0; row<8; row++) {
    for(int column = 0; column<8; column++) {
      matrix[row][column] = 0;
    }
  }
}

void setPoint(int _row, int _column) {
  matrix[_row][_column] = 1;
}

void resetPoint(int _row, int _column) {
  matrix[_row][_column] = 0;
}

void setPattern(int _pattern[8][8]) {
  for(int row = 0; row<8; row++) {
    for(int column = 0; column<8; column++) {
      matrix[row][column] = _pattern[row][column];
    }
  }
}