#!/bin/bash

mkdir ~/kadai1_data_new
mkdir ~/kadai1_data_new/01
#蜷榊燕繧貞、画峩縺励◆繝��繧ソ繧貞�繧後k繝�ぅ繝ャ繧ッ繝医Μ繧剃ス懈�縺吶k縲�

i=1
while [ "$i" -le 7 ]
#i=1~7縺セ縺ァ縺ョ髢薙〒do縺ィdone縺ョ髢薙�繧ウ繝槭Φ繝峨′郢ー繧願ソ斐@螳溯。後&繧後k縲�
do
  cd ~/kadai1_data/01/0$i
  #~/kadai1_data/01/0$i縺ョ荳ュ縺ォ遘サ蜍輔☆繧九€�
  for loop in '*.jpg'
  #莉翫>繧九ョ繧」繝ャ繧ッ繝医Μ縺ォ縺ゅk.jpg繝輔ぃ繧、繝ォ繧値oop縺ォ莉」蜈・縺励€‥o縺ィdone縺ョ髢薙�繧ウ繝槭Φ繝峨r郢ー繧願ソ斐@螳溯。後☆繧九€�
  do
    cp -r $loop ~/kadai1_data_new/01
    #.jpg繝輔ぃ繧、繝ォ繧蓄/kadai1_data_new/01縺ォ繧ウ繝斐�縺吶k縲�
  done
i=`expr  "$i" + 1 `
done

b=1
while [ "$b" -le 7 ]
#b=1~7縺セ縺ァ縺ョ髢薙〒do縺ィdone縺ョ髢薙�繧ウ繝槭Φ繝峨′郢ー繧願ソ斐@螳溯。後&繧後k縲�
do

  a=0
  #a=0縺ィ縺吶k縲�
  j=0
  while [ "$j" -le 9 ]
  #j=1~9縺セ縺ァ縺ョ髢薙〒do縺ィdone縺ョ髢薙�繧ウ繝槭Φ繝峨′郢ー繧願ソ斐@螳溯。後&繧後k縲�
  do
    cd ~/kadai1_data_new/01
    #~/kadai1_data_new/01縺ォ遘サ蜍輔☆繧九€� 
    for loop in "./ql.11010$b$a$j.jpg"
    #莉翫>繧九ョ繧」繝ャ繧ッ繝医Μ縺ォ縺ゅkql.11010$b$a$j.jpg繝輔ぃ繧、繝ォ繧値oop縺ォ莉」蜈・縺励€‥o縺ィdone縺ョ髢薙�繧ウ繝槭Φ繝峨r郢ー繧願ソ斐@螳溯。後☆繧九€�
    do
      k=`expr "  ( $b - 1 ) * 24 + $j +  1 " | bc `
      mv $loop "00000$k.jpg"
      #k繧定ィ育ョ怜シ上�荳ュ霄ォ縺ィ縺励€∝錐蜑阪r螟画峩縺吶k縲�
    done
  j=`expr "$j" + 1 `
  done

  a=1
  #a=1縺ィ縺吶k縲�
  l=0
  while [ "$l" -le 9 ]
  #l=1~9縺セ縺ァ縺ョ髢薙〒do縺ィdone縺ョ髢薙�繧ウ繝槭Φ繝峨′郢ー繧願ソ斐@螳溯。後&繧後k縲�
  do
    cd ~/kadai1_data_new/01
    #~/kadai1_data_new/01縺ォ遘サ蜍輔☆繧九€�
    for loop in "./ql.11010$b$a$l.jpg"
    #莉翫>繧九ョ繧」繝ャ繧ッ繝医Μ縺ォ縺ゅkql.11010$b$a$l.jpg繝輔ぃ繧、繝ォ繧値oop縺ォ莉」蜈・縺励€‥o縺ィdone縺ョ髢薙�繧ウ繝槭Φ繝峨r郢ー繧願ソ斐@螳溯。後☆繧九€�
    do
      m=`expr " 10 + ( $b - 1 ) * 24 + $l +  1 " | bc `
      mv $loop "00000$m.jpg"
      #m繧定ィ育ョ怜シ上�荳ュ霄ォ縺ィ縺励€∝錐蜑阪r螟画峩縺吶k縲� 
    done
  l=`expr "$l" + 1 `
  done

  a=2
  #a=2縺ィ縺吶k縲�
  n=0
  while [ "$n" -le 3 ]
  #n=1~3縺セ縺ァ縺ョ髢薙〒do縺ィdone縺ョ髢薙�繧ウ繝槭Φ繝峨′郢ー繧願ソ斐@螳溯。後&繧後k縲�
  do
    cd ~/kadai1_data_new/01
    #~/kadai1_data_new/01縺ォ遘サ蜍輔☆繧九€�
    for loop in "./ql.11010$b$a$n.jpg"
    #莉翫>繧九ョ繧」繝ャ繧ッ繝医Μ縺ォ縺ゅkql.11010$b$a$n.jpg繝輔ぃ繧、繝ォ繧値oop縺ォ莉」蜈・縺励€‥o縺ィdone縺ョ髢薙�繧ウ繝槭Φ繝峨r郢ー繧願ソ斐@螳溯。後☆繧九€�
    do
      o=`expr  " 20 + ( $b - 1 ) * 24 + $n + 1 " | bc `
      mv $loop "00000$o.jpg"
      #o繧定ィ育ョ怜シ上�荳ュ霄ォ縺ィ縺励€∝錐蜑阪r螟画峩縺吶k縲�
    done
  n=`expr "$n" + 1 `
  done

b=`expr "$b" + 1 `
done

p=10
while [ "$p" -le 99 ]
#p=10~99縺セ縺ァ縺ョ髢薙〒do縺ィdone縺ョ髢薙�繧ウ繝槭Φ繝峨′郢ー繧願ソ斐@螳溯。後&繧後k縲�
  do
  cd ~/kadai1_data_new/01
  #~/kadai1_data_new/01縺ォ遘サ蜍輔☆繧九€�
  for loop in "./00000$p.jpg"
  #莉翫>繧九ョ繧」繝ャ繧ッ繝医Μ縺ォ縺ゅk00000$p.jpg繝輔ぃ繧、繝ォ繧値oop縺ォ莉」蜈・縺励€‥o縺ィdone縺ョ髢薙�繧ウ繝槭Φ繝峨r郢ー繧願ソ斐@螳溯。後☆繧九€�
  do
    mv $loop "0000$p.jpg"
    #0繧剃ク€縺、豸医@縺ヲ隱イ鬘後〒謖�ョ壹&繧後◆蜷榊燕縺ォ螟画峩縺吶k縲�
  done
p=`expr "$p" + 1 `
done

q=100
while [ "$q" -le 168 ]
#q=100~168縺セ縺ァ縺ョ髢薙〒do縺ィdone縺ョ髢薙�繧ウ繝槭Φ繝峨′郢ー繧願ソ斐@螳溯。後&繧後k縲�
  do
  cd ~/kadai1_data_new/01
  #~/kadai1_data_new/01縺ォ遘サ蜍輔☆繧九€�
  for loop in "./00000$q.jpg"
  #莉翫>繧九ョ繧」繝ャ繧ッ繝医Μ縺ォ縺ゅk00000$q.jpg繝輔ぃ繧、繝ォ繧値oop縺ォ莉」蜈・縺励€‥o縺ィdone縺ョ髢薙�繧ウ繝槭Φ繝峨r郢ー繧願ソ斐@螳溯。後☆繧九€�
  do
    mv $loop "000$q.jpg"
    #0繧剃コ後▽豸医@縺ヲ隱イ鬘後〒謖�ョ壹&繧後◆蜷榊燕縺ォ螟画峩縺吶k縲�
  done
q=`expr "$q" + 1 `
done

convert -delay 10 -loop 0 ~/kadai1_data_new/01/*.jpg result_1.gif
#~/kadai1_data_new/01蜀��.jpg繝輔ぃ繧、繝ォ繧偵€�0.1遘帝俣髫斐〒逕サ蜒上′繧ウ繝樣€√j縺輔l縲∫┌髯舌↓繝ォ繝シ繝励&繧後k.gif繝輔ぃ繧、繝ォ縺ォ螟画鋤縺吶k縲�