#!/bin/bash

deltav=1

Xvfb :3 &
xpid=$!
export DISPLAY=:3

do_plot()
{
  v=$1
  printf -v v0 "%03d" $v
  demofile=auplot2_$v0.demo
  echo "LOADCONFIG configs/aarhusorig.gier" > $demofile
  echo "HIDE KB1" >>$demofile
  echo "HIDE KB2" >>$demofile
  echo "LOADREADER tapes/mk/auplot2.asc" >>$demofile
  echo "LOADPUNCH auplot2out/auplot2type_$v0.flx" >>$demofile
  ./maketext.sh "r<" >>$demofile
  echo "WAITINPUT" >>$demofile
  echo "SELECT 3 48" >>$demofile
  echo "SELECT 4 64" >>$demofile
  ./maketext.sh "y<" >>$demofile
  echo "WAITINPUT" >>$demofile
  ./maketext.sh "$v," >>$demofile
  echo "WAITINPUT" >>$demofile
  echo "PLOTTERSIZE A4" >>$demofile
  echo "PLOTTERCENTER YES" >>$demofile
  echo "PLOTTERSCALEUP YES" >>$demofile
  echo "PLOTTERSCALEDOWN YES" >>$demofile
  echo "PLOTTERROTATE AUTO" >>$demofile
  echo "FINISHPUNCH" >>$demofile
  echo "FINISHPLOTTER auplot2out/auplot2_$v0.ps" >>$demofile
  echo "QUIT" >>$demofile
  ./GIER $demofile
  echo output $v0
  flx2a <auplot2out/auplot2type_$v0.flx
  rm -f $demofile
  convert -alpha off -density 164.2 -depth 8 -rotate 270 -crop 1920x1080+0+277 auplot2out/auplot2_$v0.ps auplot2out/auplot2_$v0.tiff
}

export -f do_plot


rm -rf auplot2out
mkdir auplot2out

seq 0 $deltav 359 |parallel do_plot

rm -f auplot2.mp4
#ffmpeg -framerate 30 -pattern_type glob -i 'auplot2out/*.tiff' -c:v libx264 -vf format=yuv420p -movflags +faststart -r 30 auplot2.mp4
#scp auplot2.mp4 lemo.dk:/var/video/Videos/GIER

#ffmpeg -f lavfi -i anullsrc=channel_layout=stereo:sample_rate=44100 -framerate 30 -pattern_type glob -stream_loop 10 -i 'auplot2out/*.tiff' -c:v libx264 -c:a aac -r 30 -vf format=yuv420p -shortest -movflags +faststart auplot2b.mp4

echo kill $xpid
kill $xpid