#!/bin/bash
#####################################################################
#			Version: 1.6.0
#####################################################################
#
# This script takes screenshots of a movie
# Depends on mplayer and imagemagick
#
# Made by	Starlite	<http://starl1te.wordpress.com/>
# Modified by	Kyrill Detinov	<lazy.kent@opensuse.org>
#
# This program is free software: you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation, either version 3 of the License, or
# (at your option) any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License
# along with this program.  If not, see <http://www.gnu.org/licenses/>.
#
#####################################################################

usage="Type moviethumbnailer -h for help"

_help(){
echo -e "\nusage: moviethumbnailer [options] [file] ... [fileN]\n
 Options:
  -t <time> - Set time (in minutes) between screenshots; the number of screenshots is calculated automatically.
  -n <number> - Set a fixed number of screenshots to take.
  -m - Manual mode. Use arrows to FF/rewind. Press [S] to make screenshots. Quit mplayer to continue.
  -r <percent> - Change the size of the output image. Less than 40% is recommended.
  -s - Seed mode. Gives extra video and audio information. Removes spaces from filenames.
  -h - Display this help message\n

If you don't like screenshots run the script again.
This script depends on Mplayer and ImageMagic. Make sure you have them installed.\n
Usage example:
moviethumbnailer -n 25 -r 35% ~/films/film.avi\n"
}

shot(){
# Making screenshots...
for i in `seq 1 $shots_number`
do
	randomiser=$RANDOM; let "randomiser %= 25"
	hop=`echo $[$shot_time*60*$i+$randomiser]`
	mplayer -ss $hop -noautosub -frames 1 -ao null -vo png "$file_path" &> /dev/null
	mv 00000001.png $tmpdir/shots/$i.png &> /dev/null
	echo -ne "Taking screenshot #${i} \r"
done
echo "Taking screenshots...           [OK]"
}

# ====== first step is here! ^_^ ========
# Checking options...
while getopts ":t:n:mr:sh" option
do
	case $option in
	t ) shot_time=$OPTARG; opt=_time;;
	n ) shots_number=$OPTARG; opt=_num;;
	m ) opt=_manual;;
	h ) _help; opt=1; exit 1;;
	s ) seed=1;;
	r ) res=$OPTARG;;
	: ) echo "No argument given"; opt=1; exit 1;;
	* ) echo "Unknown option"; echo $usage; opt=1; exit 1;;
	esac
done

if [ "$opt" == "" ]; then echo "No options given!"; echo $usage; exit 1; fi
shift $(($OPTIND - 1))
if [ "$1" == "" ]; then echo "No file given!"; echo $usage; exit 1; fi
if [ "$res" == "" ]; then res=35; fi

tmpdir=$(mktemp -d)
mkdir $tmpdir/shots

# Parsing files...
while [ "$1" != "" ]
do
file_path=$1
file_name_ext=${file_path##*/}
file_name=`echo "$file_name_ext" | sed '$s/....$//'`
randomiser=0
quality=85
testpath=`dirname "$file_path" | cut -c1`
	if [ "$testpath" == "." ]||[ "$testpath" != "/" ]; then
	file_path=`pwd`/$file_path
	fi
path=`pwd`
cd "$path"
echo -e "==> Processing file $file_name_ext..."

# Getting video info...
tmp="$tmpdir/shots/info"
inf=`mplayer "$file_path" -identify -frames 1 -ao null -vo null 2>/dev/null | \
	tee $tmp`

length=`grep LENGTH $tmp | sed -e 's/^.*=//' -e 's/[.].*//'`
	if [ "$length" == "" ]; then
		echo "Error! Can't get the length of the movie."
		exit 1
	fi

# Calculating timing...
if [ "$opt" == "_time" ]; then
	shots_number=`echo $[$length/60/$shot_time]`
	shot
elif [ "$opt" == "_num" ]; then
	shot_time=`echo $[$length/$shots_number/60]`
	shot
elif [ "$opt" == "_manual" ]; then
	cd $tmpdir/shots
	echo "Press [S] to make screenshots."
	mplayer -ao null -vf screenshot -quiet "$file_path"
	echo "Taking screenshots...           [OK]"
fi

# Merging screenshots...
echo -n "Putting screenshots together..."
cd $tmpdir/shots/
montage -tile 4x -geometry +5+5 `ls *.png | sort -n` "$file_name".png
mogrify -resize $res% "$file_name".png
echo " [OK]"

echo -n "Getting video info..."
size=`stat -c%s  "$file_path"`
size=`echo $[$size/1024/1024]`
videoformat=`grep "ID_VIDEO_FORMAT" $tmp | cut -d "=" -f 2`
video=`grep "VIDEO:" $tmp | cut -d " " -f 5,6,8,9,10,11,12,13`
audiocodec=`grep "ID_AUDIO_CODEC" $tmp | cut -d "=" -f 2`
audio=`grep "AUDIO:" $tmp | cut -d " " -f 2,3,4,5,7,8 | \
	sed -e 's/,/ /g;s/kbit\/.*/\kbps/'`
length_h=`echo $[$length/3600]`
lenght_m=`echo $[($length-3600*$length_h)/60]`
length_s=`echo $[$length-3600*$length_h-60*$lenght_m]`

# It's a tricky code here, it adds some info about the movie to the output image.
echo -e "File name: $file_name_ext
File size: $size Mb
Duration: $length_h:$lenght_m:$length_s
VideoCodec: $videoformat
Video: $video
AudioCodec: $audiocodec
Audio: $audio" | \
	convert -pointsize 16 -trim +repage \
		-font "DejaVu-Sans-Condensed" text:- - | \
	convert "$file_name".png -splice 0x136 \
		-draw 'image over 5,5 0,0 -' "$path/$file_name".png

# Adding MPlayer logo...
echo -e \
"iVBORw0KGgoAAAANSUhEUgAAAIAAAACACAYAAADDPmHLAAAgAElEQVR4nO19eZxdZX3+875nP/fe
ubNlJjNZJpPJRpJJQhICkiAgsmvYVcQWsFUqS9VWbKWLW6uttbVoaUt/Wq0Kiv1gWVWKSEUghJAE
shCyLySZmTvbXc/+vu/vj3PumXsnM8kkRgnmPsn5zL3nvOe955zv8363dzlECIEaTl/Qt/oCanhr
USPAaY4aAU5z1AhwmqNGgNMcNQKc5qgR4DRHjQCnOWoEOM1RI8BpDvmtvoAaQgghiBBCcRzH9Dy/
TgguE0JhGHpAKR2klDqUUkYIOam/WyPAbxlCCMnzPDWfL9QND2fTmUxOyuUd2I5QiyU22fHk+aWS
v7JYcJLD2RIYc7INaf7EiuVTd6w4a0Gprq5uSFGUQUmSvJNxPaTWGXTSIQEwGWOm4zjpXK4g9WWG
MDCQg21zqVQK6gg12wOGVZxjFcASUasmnAs1CJjpuH5doehJQ0MlZPoLQV8mP+S5gd02WS7ccM2c
Z1eeu/TxRCJxWFXVg5IkOQBOWIg1ApwYCOdcLRZLejaba8pm89pwtkRcN6COI9KOJ+b6HlnMhfQO
QkhKCAFCCCSJglLIlFCVUFJHCOoIQAUAIQQ4E/ADDtf1YdsesjkHA0Ml9PXl0D9QhO+7nIggN2+u
MXDT+8/ePm/e7HtTqdRaVVUtQgjHCRChRoDxQQBQx3G1bDbblMkMmINDJWrbAfGZoufz7mTOlVmE
4CoAbYQQIkkElBCZStQgBAlKSIoQSIQAIARhOyeACAUuAHDGwbgAYxxBwOH7DL4fwHED2LaPYtHF
cLaE3r4ChrNFcOaCMQ+aCvf3bpy3/l0XvuNLzc3NLxqGUSCEMBwnCWoEAGgQBLJt2439A0N1PT2D
kmUFKFm+7Dio50Keyhi5UgixkBBolBJIlFJCiEIoMSghTYRCIQQghICAAEQAgkBAQETC5jzcGOPg
XCAIOALG4XsBPD+A73F4fgDPZwgCFh6PynhugELBQV8mB893wYKQBKoK/6O3LF6/atWKL7W2tr6o
qmqeEBLgOEhw2jiBkfOVHB7ONRw61KsNDGSp7XDquNQgRG9hjF7MuDhPCJ6glIBSlVBKJVkimqqg
kVBiEkIIIYiEjPgxCwgILsC4AOcMnIWfA8bAIkF6Uct23QCex+F5ftjKHQ+OE+73fQY/CM8RAEKy
EUiyBAgBWZHhBwEIoSAAbNtTvvvg+jNbWhr+WNf1XENDwyZFUYoAgok+l981AhDOuVEoFOsHBoaM
oeGiksvZtFhikuuKuoCRFULIF3HOpxOiK6GgCSWEKIpC6lWKNCUyBSEoh1skErQAACHAOSA4B+M8
VN9MIGAcAWOR+mbw3LAlu14Ax/HheQy2HQrcdcPvftTKWcDAhQhNwqh2W9Yqoe9AwJkApRIElcGJ
BAKCgSFH+9lTLy1saZl0vqZpvalUyqOUcgB8Ig/sbUWACnOleZ6X7u8fMIeH83o2W6JDWUv4vqx5
PpnPGL1QCMwCQTMlRKZUIpQSSVFoilDUUyKp5dYMhI0ZKAs5bNGMiUjQodou2+jQTgfwfA7PC1uu
G/11HB+O68NxAniRag/88FzGOTgPf2CiVrdsPoRgIIRE55FQA1Ap8icEXtnYO+md5+27NpVKbdI0
Ladpmh85hcfEKUuAKDFiDA8PJ7PZQl1v74BiOxz5vCO7vjzd98m7uCCzKCEdoW3WQSkhkkRNRSb1
hMAglEg0NMwgGEmglFU25+EDDlU3D9V1JOxQZYd22XUrN79C2EHYmv0gPo/zEbt/8p7FqPoIDUlA
KEAI8gUmrd+wdXpLS8s76+vr96uqWpyoL/BWEoAyxpK5XK6ur69fz+WK8tBQngRMIo4bgDHV5EKZ
xTnOFALnUkoaKQWl1IBEqSYbpJ6AGIQSlRDQ0MOOao5UthAjTle5JYehVhB73F5ZbXsMjuPDdnx4
XhAJN9xcL0DgMwRsxJkToVROPAD/NUAqCEBAwTnHho376hd1H7q4paXlOdM0D2qa5mICvsBvmgAE
gF4oFlMD/UPm0HBeG85aNJdzSBDQFOPKmUFAzhNCdFFKUpQmKCE0cnwIVQgMSkgSFHWEEImUqySI
bWa1h12hrhmH7zF4Pofv+fB8FgvTtv1YXXteuL9svwMWaQchcDzq+rcLUkGCULf1Zjza09PT0NnZ
2dLc3JzUNM0CcMyw8NciQIVaknzfr89ms+lcvqDmshYtFH1YtqMwpnRxIb+Dc34GQKZRqqiKokLV
iEQJSVKKNCFUI4RItNyCK53sitZcFjbjYdKEici+slBdx06YFzphjuNHTlfZJjuRHWeRZgAkKqBr
gK4Bp3LfWMAIShZDPu+B0tBJDU1AaAY8T6C/f1DP5XIzXNdNc84HKaUVscrYOG4CCCGobdt1mcHB
Sfv7BhSNEjEpnaqbPHnyJc3NzRe0tLS0IkyHAqEcDQApACYAFagwxjUcF4KAIdNfxAsv7cZPn9qE
7dv3g0T/OAcGB3OJYrG42HXdn3PO36SUUhwjGpgQAYQQ6u59+9u2DWTNPmLUOQ0tqyS54Zr3LGhv
mmZIQCjwBgDpqM6akH8DkGUJ7W1p3HDNUqy+YgGef+F1/Nt//C/27C0BhGBgqKiUSqVW13VTQogJ
yeFYBCC9fRnzlb6hM62Wjj91JzfPlgXUmZpUd9EkvUmj5JSNIn7XQQjBou6p+OJnV+NrX38SL619
HcWiL1uW1ei6rskYUxRFOaZNG1eAQgj1ldff6OhPTz6btEy/w4BYokhUb9IoVjXqoLU2/paCUgpJ
kqAoCm7+0LkYHh7G0OCbsG1bcV1XC4JAQejUHNUPGJMhnHP15xs2rRhu7bxX0YwvGRJdplGipxWK
c2vCPyVAKYWiKFBVFZqm4uYPnQvDTMFxHOI4jhoEgSKEkHAMM3AEAXzfVx97acM5/tQ5fysJXCQT
TGNCKPmAY1mDCrkm/FMCYYpYigigwTQNXHfNucjn83KpVKrzPM+I/ICjYjQBpGc2bl7AO+d/nhKc
QwlUjwvstwM0KBLS8qkbJp2OKGuA8tbcVAdN05LZbHa5ZVnNjDEFIxHZmKiS6L79B5oybbPfLwQW
CUC1mMB+m+GVrIclafU3ejM1HB8IIbEZUBQFsixDlmV0dHQk+vv7l2az2Rbf9zWEBBhXb1cR4OUD
vfUOx0W+EPVWINDjMGzNe7CZQJNaa/2nGspmoCx8SZKg6zrJZDJ1Q0ND023bTgshys7gmIgPeJ6n
7TObZ7kMTQ4TdNhn2Gf72Fb0UH/saKKGtwDlSKC8URr2CwRBkB4cHDzfsqx2zrmOiRBg267dMwfM
5k/YjE8pBBwZj2O/FeCAxZCueX6nLMpagIY9ZeV9Wi6Xm2lZViPnXMVRzAAFwjz7xoOZuqzrTy0w
oQ77HP0uxyGbYdDjoCd5LHoNJw+U0tgfKA9w4JzTUqmkRwkhFUfRADIQEmAHDAx5DAolUAgw6HH0
exwFxmHU5H9Ko9z6y5sQAr7v0ygXIGMiBNjr0xkDPpcUiUElBLlAoBBweFxEw1prOBVRNgGVWyCp
4JwTxpjEOS+r/zEzgjEBCj7HkMeIIREYlMBmAj4/VfvDayijrP4rCWAlGmA6Oer7Po0IcHQnUAgB
7rr1Qz5HzucoMQFXiImNKqzhLcWRoaAMoukYKlnUtm3F931ZCEExDgliAnSJopfzuSgyAZsJBFwg
ms9Qy/2f4qjWAKEz2OcEmmVZHb7v10W5gPGjAEopOhRYDgcvBgIuF+ACkKPhRkmpxoBTFaN9AFmW
QSlFxuVGqVQ6w/O8+qN1CtFyJdNT+j4mAJcJ+NFgR5kAFOQtGfhYw8RR1gDlbCCVJPRzqtm2Pc11
3bogCMbNBcQEmD+tDYRzYTMBj4cEUCiBVEsCnvKoNAGyLINKEvqoSS3LSjmOY0adQuP7AIQQtLVM
QqNXLPpCcBYOiIVMCORaCHjKgxASO4EhAWTk9CQKxSK1bVsOgkDDOEP1YgJomtbb6uWeC7jIBZEJ
kGhIAqPmBZ7SGB0KUkrhSSoGCyVq27bh+746nh8QqwVZlgfbgtI6JkQx4ACHgAQChQI1H/DUxmhH
kEoSQCX0lxzNtu0O3/dTnPMxB4fQikqcmZK/jwnhBNGkC0oAlZaTSDWcqihrgHIeQJIkgFAMecyw
LGuu53n14yWE4h2SJLEpGnGEENzn4WByCkQT33+Ld1PDCWHECQxNACSKLINm23ZnNFFkTEcw3kEp
FVMSqhAAAhHmAQBAqQn/bYFKP4BKEkAkDEGhpVLJdF3XiHoFj/ADKk0AuprqBYgEjwNMhJlAiQJ6
bSzgKY/YCYyiAEgUA0SDbdskigTGnJVV5Rh0tk8Wcl8gAkERRHPyZJDjcgJt248/EwLoujJmOdcN
wPlIiknTZNCKaEMIAccZf3KrqsqQjnJhQoTz+wPGEAQBIATMRGLiN/I2Q5wMqnAC82oSxVKJWpal
lyOBaFWE+MHHBCCEoD5dFzS5+0rDRloEXBCBMAKgE1QAA4MlfOD3v1W174Fv34rWllTVPtvx8YHf
/xZKpXCpO8Y4/vHvrsPSJdPiMgcODuPDt30fY6UhCCFoqDcw/4w2vP+6ZThj3uSq43/7xS9i48aN
sG0btm3DcRysXLUK//DVr07sRt6GGIkE5JgAnqxhuJBTbdue6nleinMuS1L1IOEq0WqaVmh3s68w
jkIQTb2mUTp4Ijjw5hCCgMUzeYUQePqZbUeUe+5XO1EouHEZQsJzR6OynsqNc47BoRJ+9cIu3Pkn
D+GxJzZVnXfHXXfhgzfdhIGBAViWBcYYFi9ePKF7eDsjNAGhMwgqgUky+kuOaVnWgigSkDFqmHgV
ASiluTmwXhBC5IOoO5hg4o7grt39kEbljv/3mW1Vql4I4LEnN1W1bEop9h84kgATxTf+/f/Q25eP
v9fX1+PdF18cf2eMYdmyZSdc/9sBJFrXSKIUlIYEACHo94VuWdZM13Xro0hgbCcwqsSap2O7AOxA
lOcVE5gTdAL2Hxg8Yt+Bg8N4Y3tv/H3Xnn5sq/gOhC39zYPDR61bkiju/NgFuOtjF+IdZ8+sGqjC
ucBLL++tKr9jxw4wxgAAqVQKM7u6JnQPb2dUJYKkkAB9jBLLsnTXdTXGWHl4WCzQ0QTgHQnFESDc
5wJM4Lj6AsdqxRIlePJnW+Lvjz3xWjx4sRI9vbmjrqtDCHDFpQtw9XsX4Yt//R50zWw+4vxKbNyw
AbIcujhz5syBpmkTvo+3K6rCQErDbCCU8nxBuWLCaAx5dAWzJjWAHAYCEYaC4ZJpx/5x32c4eCg7
5rHnnt+Fj99xIQLG8exzO8cs0z9QhOMGMMaJGipBCEHb5DT27B2I9zFWTZ4tmzfHn8ez/7t27cKL
L7yAfD4P0zRxwYUXorOzE/l8Hrt37UJbezva2toAANlsFhvWr0emvx+dM2bgrBUr4mHYAHDo0CHs
2bMHlmXBNAyc9853HvF7lmXhlXXrsPX11xH4PjRVxbLly7F02bK4Ufi+j61btmDHjh1onjQJK1eu
hKZp8DwPjz/2GPr6+nDle96Djo6OMZ9LZSoYkoS8mkAx7BTSyxNGKyMBeXQFM6e0CXV/gftUj0PB
iaB/oIh83gaJQjlVleF5YRhXsjysfWU/MpkCLMuNb1ZTZbhRGdf10dubR+eMpnF/Q3AB1w2wZ+8A
Nm89VHUsmRxp4Z7nYcuWUOswxnDW2WdXlT345pv48pe/jPXr1kFRVVx9zTXQdR23f+xj0FQVAwMD
cBwH33/gAbS1teF73/0ufvzwwzh8+HB4HULglltvxe133BHX+Y2vfx2/eOYZAMDqq66qIgBjDN/5
9rfx4AMPIJ1O42O3347nnnsO//vUU/jmN7+Jyy6/HJ//whfw0po1uPfee3H40CG4bugkd3d3408/
9Sl84fOfx759+wAAjz7yCP7n0UdhmmbVfVURQJIBKqGoJTBc6Fcty5rmum4yIkB8zmgTgHRdnTfN
GexnQgRBZAaMCcSBu/f2x2QRQuD6a86MHUJCgF88+wZ+/OjGWPiyRHHtVUvi8yVJwu69/ePWHwQC
N936bVzzgftxxycfQj7vxMeEEFg4vy3+vn37dhSLRQCAaZqYP39+fKxULOLOO+/E+ldegQDwpb/7
O/zppz6FP/zIR3DZZZehr68PjDG0tLRg1uzZAIAbbrgBP37kEXzgxhvjjNtLa9bEdTLG8PrWrfHY
/OXLl1dd+9988Yv4j/vvR6lUwle++lVcfMkluPPOOxEEASil+NlPf4pisYjFS5bgwR/8AP/vW2Eo
TSnF1q1b8YXPfx4333prbCKHh4cxOHikv1UZCiLyAwKqoLfkJEql0gLP8+or/IDwN0ZXIstybkZQ
WFsOBbmY2JjAXbv640SOEMDi7qlYsXxGfPz5NXuqPPVzVnRi4fx2MBa5mgTHcAQFsjkbrhscYZJm
zWzBmYtHcgivbhwhWldXFxIVCaD77rsPvT09AIDly5fjvPPOi48ND434MAsWLICihOZINwwQQuD7
I0muZGokt5HJZNDX1xfdu8CCBQviYz9/+mn85MknQQjB0qVLMWvWLACA7YwQePLkyTAMA6ZphtO7
IucVAFRVxdf/5V/g2Ha8r7m5GS0tLWM+JUopCKUAicwAgIzHNcuyOj3PS0eh4PgEIIRkZ0vu/wmI
rH8cI4P37q9m5NT2erznioUxazkfqYlzgatXL0ZbW13VOeP5EGOhvGLY8qUd+MrfXlMVfm567bX4
86IK+z88PIzHHn00Pv+yyy+vqm/nzp3x52WjWjGA2KwAIbHKeH3r1vj+0uk0JreNaKMHvv/9mIxn
nXUWAMB1Xfzbv/5rPKv3z++5J3ZYAWDzli0os3zWrFloaWnBJZdeiksuvRRnn3MOvvLVr47r1FJK
R6IASgFKkQkjAcNxHKNiphABxlgihlLqzk2pPUJwz+cCbAJegBACByoiAENXUF9vYHlzB1pb6pDp
L1SVnz6tEYu7p6JUcqHIUrQmH3DoKASglODGG5aDUgJdV9DQkMCC+W2Y2lZfFdkyxvD6668DCEm3
5Mwz42Mvr10Lz/NAKQVjDGdWHLNKJbz55pvx/VSeB4TaYeeOHfHxRYsWxcc2bdqEcoZtekdHrDmG
h4exo+Kc/QcO4Auf/zzWrFkD13Fw/gUX4NYPfxjz5s2r+q2tmzfHt1TWJolEAl/8m78Z9/mMPKdy
HoBGJJAwRMM+AcdxtNGRwFgEEJ3pBENeQsABNgEVYFkeejMj6j1db8R9AJdfMh//9cDa+JgQwNXv
XQRKCQxThZlQUSy6AIDevhx8n0FRjlzTgFKCm25cAU09+qIXhw4eRH9/f9g/Lkk444wz4mP7DxyI
PXdJktDYNOJwbt++HY7jQJKkMG/Q2VlV78vr1oFzHq3ZK9BdQYCtW7fGnys1Q6lUinMRQEjIpcuW
4X3vex9mdnVBVY9cc0Fwjs2VEcySJUeUORoIIYCihOo/IsKwWgfLskg0T0CpdATHMgHobG2GLMLR
wb4Q0I7hBPRlCrCskVfYTGpKxp8vv3RhlXo2DQWXXBQ6ZbJE0VA/4snmiy6yuRFbdyLYvGkkLTyp
paXKVlba1tFYt25d3IrnzpsHTderj7/8cqzKJ02aFNdr2zZ279oVl6skgKZpVTmPJUuWYPXq1Zh3
xhmx8AcHB7Fj+/a4zMDAQBxtEEKwYOHCCd55BEIgVK2KACXNwHCxRG3b1kYPDxuTAFMmt7JGr1hi
AiKYQBz4xo6+KiG3t9XHnyc1J3H+ebPj76uvXIREYoT5rS0jfoDgAnv3jcT2J4Jdu3fHrbyhsTFu
sZxzzJ8/P7bVQgisefHFcF7k3r342U9/GtdRl0pBCAHbtuPyByPzAIQteWBgAGvWrMEnPv5xWJYV
768UWHNzM85cuhRA+FwffvhhDA0NRWsYh6bqE3/8x9iwYUN8zoYNG+LfbK/IQ0wUBAhXEo8SQaAy
OJXRW3KkUqnU4HmeWTlhdEwCGIaRneUN/opxkfP5sRdE3r6jr6prdvLkaufuhmuXggsBWaa47ppq
29rcPOKhU0qwZ9+R4c3xoFLI2994A7fcfDPed/312LF9O1auWhU7hZRS/OVf/AWuXr0af3nPPbjo
4ovj85599lm854orcPPv/V6swru7u6vCsMsvvRT3feMb6K4QuK7rVRqAEILPfu5zaGtrgxACu3ft
wtWrV+OmG2/Ee6+8ErfefDOuve46fODGG+NzNqxfHxN46Qn0XxBCwiggdgTDxt7rCqNUKs1xHKcc
Co7tBEaVDM2E9ewaIa4OhKg/Vjqoe0E7mhpGVPmKs6rt5+yuFtz24VVIp000NVb3yb/r/LlobR4J
qWZGiaD6OgM333R27AwRiUCewCSFd198MYrFIn7yk5/A8zx0d3fjyiuvxNx580AIwT/fey/u//d/
x6sbN8IwDFz4rnfh2uuug6qqaGtrw7qXX4ZpGDh35UqsOu+82KH7yG23gVCKTa+9BtM0sXLVKqy+
6ip85s/+rMrLNwyj6npaW1vxvQcewAPf/z5eXrs2zBSaJt6xciWuvfZaTJkypar8gu5uNEfm5Zxz
zjnm/Y4JQkdMgBSuJTwgZMOyrHkVw8MkAMGY7wxyXVf60qPPLPuCMu/7dao8e+35bZiXPHaK9ncV
tm3jv3/0IzQ2NuLyK66IfYXh4WG898orEQQBOOe4/z/+I1b5byX+c08Wf7BmP5AbBHIDQCGLadmD
+JM5jQdWrlz5uTPOOOOXyWSyF4A9pgaQJInPrtM9uBIPIMKBoacxfvjgg7j//vvDdfnXr8dff+5z
AIDvfPvbCIIAQghcffXVp4TwAYysIh77ARRDShKWbUu2bZdDQQnA2Gv9UkpF16QGTg4RBBPwAX7X
4UUZQEopnnjiCVx62WVwXRcP/fCH4ELgiiuuwKf//M/f4qusQHkwJ5VjU+DIGobyfdSyLMP3fT0K
Bel4PgCmTW7hyf0FryTpON0p8MEPfhCObePVV1/F4OAgvvL3f49EIoFrrr0Wl1x6KZYsWTJmF/db
BxJqAGnEF2CSjN6iI1uW1ex5XkIIoRBCxtYA4Zi7+lK7fWDH9sTkWULAGKvc6YJUXR0+/slPxt/L
bwI9pVGOAsodQwAyPoxSqTTLdd06zrlMKR2/m49Smp0d5J4jQuT02tywKpzywg+TAWGHUIUWyHDJ
tCxrkeu6jeVI4GgEKM5Rg1chUDzFb7eG0RAk7EyqED4oRYbq1LbtZDRRREHoJYwNSmkwQ5fyAmCn
twfwNgUhoQYoRwOEIicbKJZKJIoEVBxDA4j5rY2cnMIvUqphPAgAJO4OLpPAVg0MFYrUsizN931N
CDH+nC9KKWZPa+cm9/zaOoFvQ8QrfEUEAIEAQU/BlkulUmPUJ3D0VaDr02m73cvv0wico5Wr4VTE
6Gn9AuAcg4yYtm0v8H0/LYSQx/UBolVDClPc4fUCOAeAPl7ZGo4fQghYlodDh3PoHyggCBhkRcak
piQmt6aQTOpVcyVP/IcACB4OxOActu+rruu2+b6f5Jwrx3qlSHG+4r0GiBKA5mOUreEYyOVtPP/i
bryy4QC2b+9Fpr+AgPEqQXMuQClBa2sdFi2cgrOXz8A5Kzphmsf7wg4RCZ0BjAEsAJgPHjDqum4y
CAKdcy4dlQCEEGdhSjkgQNwTueEaQngew3cffAk/enhDPAi2jNFT6crd6plMAT//xRt4+pk3YBgK
rl29BB/8wFkTmjdRfqs4mA8EPhC4gOcAvg9VcC6E8KJOwKP3r0qSxGfUJ3zKJjIspIaxsHNXBrfd
9SAefGjdEcIvv9yaEAJFkUAIiV92XQYhgOP4eOChdbjrTx6a2MDZcssPfMBzAdcN/zIfDTQIZFnO
UkoDQsjRXxxJCEFHSzMICwTwuz+16mTjJ09txdfvexZ+wOLsoRBAIqHi3LNnYtnS6Thj7mQ01Jug
EgFjArmcjd17+vHi2j147vld8eQaQoC9+wZx210P4p5PX4qV5xxlrqPgQBCEgncswCkBrg3FLaE5
qTiapu1UFMWilI69clQZhBBMbW8LHLuUQyrBcIw3UNUwgof+ez3u/8/n4zkMQgAN9SY++P7luPzS
hTCNsVV5Kqlh6pR6nH/ebNz+0fPxP4+9iv9+eAMcN+yRdBwfn/3ik/jkXe/ClZcdOV6Qcw7BglDl
20XAKoR/XQftzjCSLQ1+KpUa0DTNIoQERzUBhBCoqjpcKhaf55znj1a2hhBCAN/8zgtVwgeAq967
CN/95s247uozxxX+aKTrdNzyoXPw/f+8BauvXFShRQT+6evP4OFHXq0qzzmH7/sYKBSBQhbIDwKF
YcAqgPoOFkoeb2hosBoaGmzDMBxKqX/MNB+l1MrmctuCILCO4zmctnhhzW488MN1VcL/xJ3vwsdv
vxCJhIqenh584957USwUxq9kFBoaTHz8jgtx18cuqJpBfd/9/4cX1+6BEAJBEMBxHBSLRWw7nAGG
M8Bwf0gEx8ZMqx/Tm9JWe3v7pubm5j5d14uEEPeYBBBCWIODg/sYY27l7J4ajgRjHN/8zgsVU+QE
7vyjC/DeK7rjMkEQ4Hvf+x6uv+46/PAHP6iabnYsXPWeRfjg+1fEJCAE+Md7f458voRSqYRsNov+
TAYv7joADGWA/BBgFZHwiliiM9ba2trf3t7+ekNDwyFVVbMA7GMSQJKkQJblYSFEUCPA0fGTp7bG
S90IAVxx6UJcs/rIqemEEGSzWXztn/4Jt95yCzZt2nREmfHw4d9/B86OBt0KITA0mMcjj69HNptF
JpPB+j0HsOvAQSDbD5QKUAIX72BDmNo2OdfZ2fnLqVOn7kwmk/2U0iIAbyImQMyePds/fLjHEUdb
weE0h+8zPPjQuthOt7SkcMdt5x/1HEIIdu3ciY/+wR/g7k99Kp7+fTRQSnD3J94N01QgBAcXDD/5
2asYHh5GJpPBDzbtBR8eBIp5yL6NVWwAszgcpnIAABA8SURBVNpa/K6urt6urq5dra2tbxqGMQjA
BnB0JzD8QYpUKpV/6umXN3heUJrIwzgd8Ytfbo9nPwsh8Mk7L4QxQWcPhOBXzz2HG9//fvzZ3Xdj
48aNR10tpbExgY/cuhKcMXDmY9/+Hry4Zgte2L4PT+18E7ByaLCGcJEYEotmTLW6u7v3dHd3P9PZ
2bk9nU4fppRmAbgAxIT6ejVN6zMN7cF/+NrTmSComYGx8NOntsa2f+6c1qqp8ROFEAK//OUv8Ucf
/Sg+fffd8ZTzsXDpu89AyyQTjHkIfBtP/HwD7n1tPxL5AZxtHxbvaSD+0nmzM0uXLn1l6dKlT8yZ
M+flxsbG3aqq9hNCLAABJkoAWZbdGR2tmeee3+l/6R9+Bs8ff47d7xrK08oYY/B9H57nwXXdqjUI
s9kitm3viZexu+iCeb/WsDESaYT3XX89/vW+++LFLqqvi+Pcd8wAYx4Yc7F//0EszmzjV+ol6+wZ
7QMLFyzYvGzZskcXL1782MyZM3/V2Ni4RdO0Q4SQPAAPYy0RMx4opaK1tYlTifL/e247BgdK+JOP
X4SO6Y0nfJOnGkavQ1gWOotWGg2CIP5edobDxZkV7DswDMtyoCgKhACWL51+Uq7JdV1897/+C48+
8ghuvuUWXH/DDfGkUs45lnRPwYM/YBCCQ3gCU1OmO6Oj49XZs2dv6ezsPDBlypS9kyZNOmSaZp8s
y4OjhQ9MkAAA0NbWynSdlkqlgG/b0UvvvufHeO8V3Xjvld2oT5vHruAUQNmuVrbqSmEHQQDf96sE
7/t+TIAyCYQQkCQJmqbBMAzs3NUDQjiE4DB0DW2T0yf1unO5HO7953/GE48/jj/7zGewaNEiCCHQ
3lYHSkRIAEGgaUbQ0dHRN2/evC0zZszYkU6nezVNG6SUFhA6fT5GzfObEAGijGB+Wrv86rbt7twg
8FPZnMDDj2zEQw9vwPRpDeiaOQmTW+qQTuvjqj9VCZczP5kQ4IAYbZJGWjMQrU4iOBjn4JyBsQCc
MQSMgUfCZpxFAg7AAi/8y8KyQTByDuNh960kKdB1HYaZwLbtufAahIx02oB6jDUMTgSEEOzZswcf
/cM/xN2f/jQuu/xyaBqFpkuwbQ7BBQiVlbq6usbm5uaBhoaGA5G9LyEUPMN4bw6dCCRJGly6pOXx
rdt2vFtApIQQKHIBSil27Mxg+46+sd9NWoFQHicnkqxszSMCDwUtBIdA9JdHKrJqYxA8+jvmfgEu
2Ehd5WPRbxBCQakCRTGgqDpUNQFJNkAlGbquTGhZvRO537lz5+KvPvtZzJo1C4VCAZxzyBINnygB
OBc0WgPIJoTkI+G7iIaFjFXvhAkgy7K36tzuQz96eKfnuH7Y4wQBzqVwLtp4v1CB8MEc79MR0X9+
pJDHFWz1Pn4EESrKIaqPhzH1SP1ipDwECAQkiUPXAE2XkEowkUrxwDQ82/EskRmanoSA5Dg+ouUV
TxoMw8DNt9yCmz70ocjPKJswDj/wyy2rbMoID0ksELb6o4ZtEyYApZS3tEwqnbW07s1fPt8/Q4hA
FYKDSgookaMFJU90BHFZyOXWPFrIolpwYJHAeFyWxwJmFfs4gNDOi8qyYwk6+l2ZCsiygKoCpklh
6DJLJlUvmdD9RMLwVVXlmqYJXdcD0zT7dF3f2dObJ5lhejGA+nzBge8zqOqvb+oIIbj8iitw+x13
oLl5ZEAW5xxBECBfsGBZDoRggBCQJVI2vxN+z8/xEACGYRx83/Xn/curm/6nYyjrzqI0AOUBqKSC
UhmE0Ggb7/fLL6PmiNV2WRUjtGPVKreCBKMEXN44Z5FQxxDuEdqgvCRd2JolicMwCQxNgmFIPF2X
cJJJwzEMnauqyiNh5xOJxCHTNPtM08wYhlEyDMMzTdMzTbOoqmpucDDb+PLGV84RQL1leejL5DFt
asNEH+2RT0kIdHZ24i//+q+xcIwlYsoh6YEDAwgCH5wHICSAaWpckqQipZRRSidka4/HWxGaptlT
prRv+70buzf82zdfbncc3yTEB5W8kABUBiVSuEJFRIDQL4gcskphoEJAYwo3VN3glWVHjpdtdOjg
iZgAZXNHiYAscyiqgK5R6LoEXVVEImzNTiJhBLquc1VVha7rQSTYvYlEYr9hGDnTNB1d131d123D
MIq6rhd1XS8qimKpquqqquoqiuJLkuQUi8XJLZM27e3LBK1CcPXFl/bg/dcf/+oenHO0t7fjgzfd
hKuuvnrMpeA453EuYu26neDMB2MekgaDrmu2ruu7FUUpEUJOOgEgSRJPpVKHzz13+X8WisVp3/ne
q8tdz1MIi1p+RAAQChIRoFKtV6vxUQQof8d4jlu1Gi/Xq8gCqipgGASGIYmkqXqJpOqahu4bhsF1
XRORyhaGYfiGYRw2TXNnIpEYNgyjaBiGr+u6ZxiGret6LhJySVVVW1EUV1EUT5ZlT5IkT5Ikj1Lq
UUoZAJ8QEgAIZFnOLl7Y9NhTz/TMJWCtT/5sM66/ZulR32gyGolEAh+97TZce9118aoko1HZ7ZvL
5fH8C9vAmAvOfKTrJSQSCT+VSg3oum5H13hMEhxvvCJUVbUaGxtfPm/Viq8MDWbveeTJnUscxwtf
KUBo3PpJtM44qRR+3IrFEa09Pg4RkyRuzVRAUQQUBTANCtOQWCplOKapeQlTZ1ErFpEwD5umudcw
jIxpmnYikfAMw/B0XXd0XXd1XS/oup7TNM1WVdWqELIry7Ivy3JACPElSfIIIQEhhCF0pspb2ani
5c+SJNnnnzf/paef7S0IHrTuP9CPNWt3Y9W5s475QAkhWL16NT52xx2or68/atly6y+VSnj6mU3I
5XJgzAUhDO2TG0V9fb1TV1dX0nXdJoT4OIYDCBw/AUAp5aZpFtva2tZccsl5/5RIqH/6+JObuvv6
PY0LHlv+KEgbpfpZaOdRKfjQD6A0ErTMQyGbskgltCCR0LxkUnc1TSsLmhuGUTAMY6dhGL2GYeRN
03TLm67rBcMwcpqmlXRddzRNc1VVdWRZdhRF8SRJ8mRZ9iVJ8imlAaXUB1AWdOg1jgiXY6QVjRtK
SZIk5syZmZ3d9WLftu2FGZIE+b5//wWWL50OXR97OLcQAh0dHfjMPfdMaGWR8mifUqmEnt5+/PiR
tWDMAQs8JBMBGhvr7ebm5u3pdHpQVVUrIsBJ1wAAICRJCpLJZG7GjBnPybJMpk1r+8MNG7fM3bT5
wKTevpJaKLJwBGzc0gVAOCTKIUscqgLoBoWmSTB0RSSTupdMGLZp6kFlazZNc0DX9UOmae6PhO6a
pulH6jqraVpR07SyTXZUVXVlWXbL6lqSpIBS6lNK/TFa82ghVwr4uJIVlFKYptlz3VWLv/Plr/5q
BmPelIOHMvjyV5/EPXdfAUVR4jd6AEDnzJm4+ZZbcPHFF1ctETseKoWf6R/A1+59ArncEHw/TO5N
aTNFa2trYfLkyVvS6XSfoig2KhI/5fPH8ilONGUlZFl20+n0sKIoz6fT6f62traFixcdvLqnp6fz
4MHDZm/vYNJxXTkIAgIIJEyNG4bqqKoaaJoWlO2yaZpeIpE4ZBjGdtM0Bw3DcCOnzIucr7yqqvmy
uo6E7Mmy7EiS5EqSFBBCygIOIuafcGs+ERBChK7r+cWL5284c/Gr+19aN9hKKZN//swmJAwZd91+
ERRFBaUUbW1tePAHP8BRlmYYechRvO95HizLQn9/P75272PYvGUnAr8EFrioTwt0dEz2pk+fvq+9
vf1wKpUaliSpKu1LKYWqqhgZSTTim/w6OUshSZKbTCYHFEWxU6nUwebm5h3Tpk1r7+zs7xoeHj7L
sqwmz/MkIQSRJMnRNG2/YRiDhmEMRQ5ZoOu6axhGXtO0rKqqJVVVnbJdjlS2K0mSG7XkoKIl+4i6
NDEiaIHqFg2cREEfDZGDfOCa1Su+uXnrzxqLJW8OpYw+8vg6ABx/9JELoWlavMLYsVCO9T3PQ7FY
RD6Xw7e+/TTWvrwVgV9CELhQVY5ZMxvZlClTeqdPn/5yU1PTAU3ThgghNsax/6PT9GMuE3ecIABk
zrnmeZ7pOE7SsqyGUqk02XXdVBAEshBCopRyRVEcVVVtVVWtyC77ZUFTSv3Iyw4opQFG7PJYrXi0
kIHfkqCPhiAIlEwm0/H4E0//wXcf3PJhz+ctlFAQIuOd552BP779YqRSZrxKeLiwM42FUtlJ5Xke
bNtGsVhET08/vvWdZ/DS2rLwHUgSw5yuBJ87d2bfihUrnlq+fPkL7e3tWwzD2EcIGULY63dMnAwC
lEEBSEIIhTGmMsZ0xpgqhKBCCFJ+0QKllEW2OSCEsHG87NHquvLvKQshBLEsyzx48OCSn/z02c/8
6MdvvMv3hVEOkZua0rjxfWfjnavmwND1+B0/lcvZloXvui6GhrJ46n9fxRM/XY9iIQcvUvsSZZjZ
qfOumdOGFi5c+OJZZ5313OzZszelUqldkiT1A7AwgQgAOLkEiOtESAaKkXfVVgYHlS34N2aX3ypw
zuVCoZA6ePDgyuefX/tX//P4a0v6Mp5KQMI1fCEhmTSwcMEUzOpqxfRpTWhsMEEpgev6GBoq4OCh
QWzd9iY2b94H2w5bPAtcMOYiaQp0zawTHR1Tc3Pnzn2pu7v7xTlz5mxqamraKctyD4AiRkzjMfGb
IEBV/ePsf9sL+iggjDG5WCw29PT0XLBjx847H3vi+e6Nm4brfJ9TEi3hVo4KOAd43MklQBD2dXDm
gTEPnPngzAMIw+RJErpmtfAp7e25OXPmbJ83b97TM2bMeK2pqWmXqqqHARwx4ONYOPkd19X4XRb0
eIjD5Pb29udlWXYMQ79m+rRXVv7qhT1tmQHfZAGLQgASPqF4UIeA4AyMBxDcB+c+KBFI1wlMnZJk
7e0t1owZM4a6urrWdnV1vd7e3r65oaFhj6IovQhb/nEJH/jNa4DTGYQxpjmOUzc0NDR9//79C/bu
3Xvpjh27V7zxxqGmnt5SKldgkh9UZEmjrmlKGHRdoKFeEq0tdUF9farU3Nycmz59+oaurq6d06ZN
2zVp0qT9yWRyv6qqAwAq+/2P7yJrBPiNgnDOFd/39Xw+35jJZDp7enpm9fX1Lc9kMucNDQ2nB4ey
NDtckDzPkwAQ01SEqirMMHQkk0lWV1eXaW5u3tDa2tozZcqUg21tbQfT6XSfrusZSZKGMM5Qrwlf
YI0Av3EQABJjTHNd1yyVSo2FQqFteHh4Wj6fr8/lcslSqVTnum6aMSZTSpmiKCXTNL1UKhWk0+l8
Op3O1NXVDdTV1Q0ZhjEkSVKOEFJE2Oon1Okz7sXVCPBbg4QwTNaDINB930+4rpt0HCfhum4iCAKD
c64QQoQsy4GiKIGu656qqramacWoi7cUjel3EXr6v/YkjRoBfvuQok0WQqicc1UIoXDOZSEEBUAo
pYJSyqNciY/QufMQCr2cLzkpqBHgrQOp2EbnS4CRvAir+HzykzY1ApzeqK0De5qjRoDTHDUCnOao
EeA0R40ApzlqBDjNUSPAaY4aAU5z1AhwmuP/AzNlmJtXxOKbAAAAAElFTkSuQmCC" | \
base64 -d | \
convert "$path/$file_name".png -quality $quality \
	-set comment "`echo -e "$inf" | head -n 1`" \
	-draw 'gravity NorthEast image over 10,8 0,0 -' "$path/$file_name".jpg
echo "           [OK]"
rm "$path/$file_name".png
cd "$path"

# Extra info
if [ "$seed" == "1" ]; then
	#====Video====
	width=`grep VIDEO_WIDTH $tmp | sed -e 's/^.*=//'`
	height=`grep VIDEO_HEIGHT $tmp | sed -e 's/^.*=//'`
	format=`grep VIDEO_FORMAT $tmp | sed -e 's/^.*=//'`
	vcodec=`grep VIDEO_CODEC $tmp | sed -e 's/^.*=//'`
	video="Format:  $format\nCodec:  $vcodec"
	size="Size:  $width*$height"
	#====Audio====
	rate=`grep AUDIO_RATE $tmp | sed -e 's/^.*=//' | tail -n 1`
	acodec=`grep afm: $tmp | sed -e 's/^.*: //'`
	lang1=`grep ID_AID_0_LANG $tmp | sed -e 's/^.*=//'`
	lang2=`grep ID_AID_1_LANG $tmp | sed -e 's/^.*=//'`
	audio="Audio:  $rate $acodec"
	lang="Dub:  1: $lang1  2: $lang2"
	echo -e "\n$video\n$size\n$audio\n$lang"
	#filenames trimming
	file_name_sp=`echo "$file_name" | sed 's/ /_/g'`
	mv "$file_name".jpg "$file_name_sp".jpg &> /dev/null
fi
rm $tmpdir/shots/*
echo
shift
done

rm -rf $tmpdir
echo "Done"
