// /*
//   Empowerment Technology
//   iParol v2 (PHS - STEM)
//   s.2023
// */

// //******************************************
// // USE write() in replace to digitalWrite()
// // The diagram uses 16x16 matrix. Note that the 16th adress will not work
// // This will work with 15x15 boards
// //******************************************

#include "MUX_iParol.h"

byte seq3outroA[] = {106, 107, 108, 109, 110, 111, 112, 113, 114, 115, 116, 117, 118, 119, 120};
byte seq3outroB1[] = {91, 92, 93, 94, 95, 96, 97, 98, 99, 100, 101, 102, 103, 104, 105};
byte seq3outroB2[] = {121, 122, 123, 124, 125, 126, 127, 128, 129, 130, 131, 132, 133, 134, 135};
byte seq3outroC1[] = {76, 77, 78, 79, 80, 81, 82, 83, 84, 85, 86, 87, 88, 89, 90};
byte seq3outroC2[] = {136, 137, 138, 139, 140, 141, 142, 143, 144, 145, 146, 147, 148, 149, 150};
byte seq3outroD1[] = {61, 62, 63, 64, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75};
byte seq3outroD2[] = {151, 152, 153, 154, 155, 156, 157, 158, 159, 160, 161, 162, 163, 164, 165};
byte seq3outroE1[] = {46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60};
byte seq3outroE2[] = {166, 167, 168, 169, 170, 171, 172, 173, 174, 175, 176, 177, 178, 179, 180};
byte seq3outroF1[] = {31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45};
byte seq3outroF2[] = {181, 182, 183, 184, 185, 186, 187, 188, 189, 190, 191, 192, 193, 194, 195};
byte seq3outroG1[] = {16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30};
byte seq3outroG2[] = {196, 197, 198, 199, 200, 201, 202, 203, 204, 205, 206, 207, 208, 209, 210};
byte seq3outroH1[] = {1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15};
byte seq3outroH2[] = {211, 212, 213, 214, 215, 216, 217, 218, 219, 220, 221, 222, 223, 224, 225};

byte seq3outroI1[] = {1, 16, 31, 46, 61, 76, 91, 106, 121, 136, 151, 166, 181, 196, 211};
byte seq3outroI2[] = {15, 30, 45, 60, 75, 90, 105, 120, 135, 150, 165, 180, 195, 210, 225};
byte seq3outroJ1[] = {2, 17, 32, 47, 62, 77, 92, 107, 122, 137, 152, 167, 182, 197, 212};
byte seq3outroJ2[] = {14, 29, 44, 59, 74, 89, 104, 119, 134, 149, 164, 179, 194, 209, 224};
byte seq3outroK1[] = {3, 18, 33, 48, 63, 78, 93, 108, 123, 138, 153, 168, 183, 198, 213};
  byte seq3outroK2[] = {13, 28, 43, 58, 73, 88, 103, 118, 133, 148, 163, 178, 193, 208, 223};
  byte seq3outroL1[] = {4, 19, 34, 49, 64, 79, 94, 109, 124, 139, 154, 169, 184, 199, 214};
    byte seq3outroL2[] = {12, 27, 42, 57, 72, 87, 102, 117, 132, 147, 162, 177, 192, 207, 222};
byte seq3outroM1[] = {5, 20, 35, 50, 65, 80, 95, 110, 125, 140, 155, 170, 185, 200, 215};
  byte seq3outroM2[] = {11, 26, 41, 56, 71, 86, 101, 116, 131, 146, 161, 176, 191, 206, 221};
byte seq3outroN1[] = {6, 21, 36, 51, 66, 81, 96, 111, 126, 141, 156, 171, 186, 201, 216};
  byte seq3outroN2[] = {10, 25, 40, 55, 70, 85, 100, 115, 130, 145, 160, 175, 190, 205, 220};
byte seq3outroO1[] = {7, 22, 37, 52, 67, 82, 97, 112, 127, 142, 157, 172, 187, 202, 217};
  byte seq3outroO2[] = {9, 24, 39, 54, 69, 84, 99, 114, 129, 144, 159, 174, 189, 204, 219};
byte seq3outroP[] = {8, 23, 38, 53, 68, 83, 98, 113, 128, 143, 158, 173, 188, 203, 218};

byte seq3F1[] = {1, 15, 211, 225};
byte seq3F2[] = {2, 16, 14, 30, 196, 212, 210, 224};
byte seq3F3[] = {31, 17, 3, 13, 29, 45, 181, 197, 213, 195, 209, 223};
byte seq3F4A[] = {180, 194, 208, 222, 166, 182, 198, 214};
byte seq3F4B[] = {46, 32, 18, 4, 12, 28, 44, 60};
byte seq3F5A[] = {165, 179, 193, 207, 221, 151, 167, 183, 199, 215};
byte seq3F5B[] = {61, 47, 33, 19, 5, 11, 27, 43, 59, 75};
byte seq3F6A[] = {76, 62, 48, 34, 20, 6, 10, 26, 42, 58, 74, 90};
byte seq3F6B[] = {150, 164, 178, 192, 206, 220, 136, 152, 168, 184, 200, 216};
byte seq3F7A[] = {91, 77, 63, 49, 35, 21, 7, 9, 25, 41, 57, 73, 89, 105};
byte seq3F7B[] = {121, 137, 153, 169, 185, 201, 217, 135, 149, 163, 177, 191, 205, 219};
byte seq3F8A[] = {106, 92, 78, 64, 50, 36, 22, 8, 24, 40, 56, 72, 88, 104};
byte seq3F8B[] = {120, 134, 148, 162, 176, 190, 204, 218, 202, 186, 170, 154, 138, 122};
byte seq3F9A[] = {107, 93, 79, 65, 51, 37, 23, 39, 55, 71, 87, 103};
byte seq3F9B[] = {119, 133, 147, 161, 175, 189, 203, 187, 171, 155, 139, 123};
byte seq3F10A[] = {108, 94, 80, 66, 52, 38, 54, 70, 86, 102};
byte seq3F10B[] = {118, 132, 146, 160, 174, 188, 172, 156, 140, 124};
byte seq3F11A[] = {109, 95, 81, 67, 53, 69, 85, 101};
byte seq3F11B[] = {117, 131, 145, 159, 173, 157, 141, 125};

void setup() {
  //you dont need to write anything here
  iParol_Init();
}

void loop() {
  for (byte i = 1; i <= 225; i++) {
    write(i, HIGH);
  }
  SEQUENCE3s4();

}


void SEQUENCE3s4() {
  for (byte i = 0; i <= 14; i++) {
    write(seq3outroA[i], LOW);
  }
  delay(100);
  for (byte i = 0; i <= 14; i++) {
    write(seq3outroB1[i], LOW);
    write(seq3outroB2[i], LOW);
  }
  delay(100);
  for (byte i = 0; i <= 14; i++) {
    write(seq3outroC1[i], LOW);
    write(seq3outroC2[i], LOW);
  }
  delay(100);
  for (byte i = 0; i <= 14; i++) {
    write(seq3outroD1[i], LOW);
    write(seq3outroD2[i], LOW);
  }
  delay(100);
  for (byte i = 0; i <= 14; i++) {
    write(seq3outroE1[i], LOW);
    write(seq3outroE2[i], LOW);
  }
  delay(100);
  for (byte i = 0; i <= 14; i++) {
    write(seq3outroF1[i], LOW);
    write(seq3outroF2[i], LOW);
  }
  delay(100);
  for (byte i = 0; i <= 14; i++) {
    write(seq3outroG1[i], LOW);
    write(seq3outroG2[i], LOW);
  }
  delay(100);
  for (byte i = 0; i <= 14; i++) {
    write(seq3outroH1[i], LOW);
    write(seq3outroH2[i], LOW);
  }
  delay(100);
   for (byte i = 0; i <= 14; i++) {
    write(seq3outroI1[i], HIGH);
    write(seq3outroI2[i], HIGH);
  }
  delay(100);
  for (byte i = 0; i <= 14; i++) {
    write(seq3outroJ1[i], HIGH);
    write(seq3outroJ2[i], HIGH);
  }
  delay(100);
  for (byte i = 0; i <= 14; i++) {
    write(seq3outroK1[i], HIGH);
    write(seq3outroK2[i], HIGH);
  }
  delay(100);
  for (byte i = 0; i <= 14; i++) {
    write(seq3outroL1[i], HIGH);
    write(seq3outroL2[i], HIGH);
  }
  delay(100);
  for (byte i = 0; i <= 14; i++) {
    write(seq3outroM1[i], HIGH);
    write(seq3outroM2[i], HIGH);
  }
  delay(100);
  for (byte i = 0; i <= 14; i++) {
    write(seq3outroN1[i], HIGH);
    write(seq3outroN2[i], HIGH);
  }
  delay(100);
  for (byte i = 0; i <= 14; i++) {
    write(seq3outroO1[i], HIGH);
    write(seq3outroO2[i], HIGH);
  }
  delay(100);
  for (byte i = 0; i <= 14; i++) {
    write(seq3outroP[i], HIGH);
  }
  delay(100);
  for (byte i = 0; i <= 3; i++) {
    write(seq3F1[i], LOW);
  }
  delay(100);
  for (byte i = 0; i <= 7; i++) {
    write(seq3F2[i], LOW);
  }
  delay(100);
 for (byte i = 0; i <= 11; i++) {
    write(seq3F3[i], LOW);
  }
  delay(100);
  for (byte i = 0; i <= 7; i++) {
    write(seq3F4A[i], LOW);
    write(seq3F4B[i], LOW);
  }
  delay(100);
  for (byte i = 0; i <= 9; i++) {
    write(seq3F5A[i], LOW);
    write(seq3F5B[i], LOW);
  }
  delay(100);
  for (byte i = 0; i <= 11; i++) {
    write(seq3F6A[i], LOW);
    write(seq3F6B[i], LOW);
  }
  delay(100);
  for (byte i = 0; i <= 13; i++) {
    write(seq3F7A[i], LOW);
    write(seq3F7B[i], LOW);
  }
  delay(100);
  for (byte i = 0; i <= 13; i++) {
    write(seq3F8A[i], LOW);
    write(seq3F8B[i], LOW);
  }
  delay(100);
  for (byte i = 0; i <= 11; i++) {
    write(seq3F9A[i], LOW);
    write(seq3F9B[i], LOW);
  }
  delay(100);
  for (byte i = 0; i <= 11; i++) {
  }
  for (byte i = 0; i <= 9; i++) {
    write(seq3F10A[i], LOW);
    write(seq3F10B[i], LOW);
  }
  delay(100);
  for (byte i = 0; i <= 7; i++) {
    write(seq3F11A[i], LOW);
    write(seq3F11B[i], LOW);
  }
  delay(100);
  for (byte i = 0; i <= 7; i++) {
    write(seq3F11A[i], HIGH);
    write(seq3F11B[i], HIGH);
  }
  delay(100);
  for (byte i = 0; i <= 9; i++) {
    write(seq3F10A[i], HIGH);
    write(seq3F10B[i], HIGH);
  }
  delay(100);
    for (byte i = 0; i <= 11; i++) {
    write(seq3F9A[i], HIGH);
    write(seq3F9B[i], HIGH);
  }
  delay(100);
  for (byte i = 0; i <= 13; i++) {
    write(seq3F8A[i], HIGH);
    write(seq3F8B[i], HIGH);
  }
  delay(100);
  for (byte i = 0; i <= 13; i++) {
    write(seq3F7A[i], HIGH);
    write(seq3F7B[i], HIGH);
  }
  delay(100);
  for (byte i = 0; i <= 11; i++) {
    write(seq3F6A[i], HIGH);
    write(seq3F6B[i], HIGH);
  }
  delay(100);
  for (byte i = 0; i <= 9; i++) {
    write(seq3F5A[i], HIGH);
    write(seq3F5B[i], HIGH);
  }
  delay(100);
  for (byte i = 0; i <= 7; i++) {
    write(seq3F4A[i], HIGH);
    write(seq3F4B[i], HIGH);
  }
  delay(100);
  for (byte i = 0; i <= 11; i++) {
    write(seq3F3[i], HIGH);
  }
  delay(100);
  for (byte i = 0; i <= 7; i++) {
    write(seq3F2[i], HIGH);
  }
  delay(100);
   for (byte i = 0; i <= 3; i++) {
    write(seq3F1[i], HIGH);
  }
  delay(100);
}