volatile unsigned int i, j, kn=200;
const unsigned char mojisu= 30;

//-------------------------------
void time1(unsigned int tx1){
  int dm1=0;
  for(j=0; j<tx1; j++){
    dm1=1;
    for(i=0; i<0xff; i++){
      dm1=1;}}} 
//---------------------------------
unsigned char md[3][mojisu][5]={
  {
    {1,4,0,0,0}, //md[0][0][x] a
    {4,1,1,1,0}, //md[0][1][x] b
    {0,1,0,0,0}, //md[0][2][x} space
    {4,1,4,1,0}, //md[0][3][x] c
    {4,1,1,0,0}, //md[0][4][x] d
    {0,0,0,0,0}  //md[0][5][x] gun end
  },
  {
    {1,0,0,0,0}, //md[1][0][x] e
    {1,1,4,1,0}, //md[1][1][x] f
    {4,4,1,0,0}, //md[1][2][x] g
    {1,1,1,1,0}, //md[1][3][x] h
    {0,0,0,0,0}  //md[1][4][x] gun end
  },
  {
    {1,1,0,0,0}, //md[2][0][x] i
    {1,4,4,4,0}, //md[2][1][x] j
    {1,1,1,4,4}, //md[2][2][x] 3
    {4,4,4,4,1}, //md[2][3][x] 9
    {1,1,4,4,4}, //md[2][4][x] 2
    {0,0,0,0,0}
  }};
//------------------------------
void mout(unsigned char c1){
  for(unsigned char j=0; j<mojisu; j++){
  if(md[c1][j][0]==0 && md[c1][j][1]==0){
  return;}            //md{0,0,x,x}=owari
  if(md[c1][j][0]!=0){     
  digitalWrite(12,HIGH);   
  time1(md[c1][j][0]*kn);  
  digitalWrite(12,LOW);  
  time1(kn);

  if(md[c1][j][1]!=0){
  digitalWrite(12,HIGH);
  time1(md[c1][j][1]*kn);
  digitalWrite(12,LOW);
  time1(kn);}

  if(md[c1][j][2]!=0){
  digitalWrite(12,HIGH);
  time1(md[c1][j][2]*kn);
  digitalWrite(12,LOW);
  time1(kn);}

  if(md[c1][j][3]!=0){
  digitalWrite(12,HIGH);
  time1(md[c1][j][3]*kn);
  digitalWrite(12,LOW);
  time1(kn);}

  if(md[c1][j][4]!=0){
  digitalWrite(12,HIGH);
  time1(md[c1][j][4]*kn);
  digitalWrite(12,LOW);
  time1(kn);}
    
  time1(3*kn);} //moji kan muon
  else{
    digitalWrite(12,LOW);
    time1(5*kn);}}}  //md{0,1,x,x}=space
//-------------------------------
void setup(){
  pinMode(12, OUTPUT);}
//-------------------------------
void loop(){
for(int k=0;k<3;k++){
  mout(k);}}