#!/bin/bash

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

#cp configs/help3demo.gier default.gier

do_jop()
{
  drum=$1
  echo drum: $drum
  cp configs/drum3bufga4.gier default_${drum}.gier
  printf "drum_address\t%16.16X\n" 0 >>default_${drum}.gier
  export DRUM_SPEED=$drum
  cat >jop_${drum}.demo <<EOF
SOUND 0
LOADCONFIG default_${drum}.gier
LOADREADER tapes/mk/000.asc
LOADPUNCH 0_${drum}.flx
WAITINPUT
$(./maketext.sh 'r<')
WAITINPUT
$(./maketext.sh 'run<')
SELECT 3 48
WAITINPUT
LOADREADER /home/mk/gier/otzentapes/jop02x.asc
# t1 ilt
$(./maketext.sh "3.0,30,")
WAITINPUT
LOADREADER /home/mk/gier/otzentapes/jop13x.flx
$(./maketext.sh ' ')
WAITINPUT
# 1/Hp
$(./maketext.sh '1.5,')
# M, X, Y, Z, qfit
$(./maketext.sh '6, .7, .28, .02, .2,')
# Log Te, Log L/Ls, Log Tc, Log rhoc
$(./maketext.sh '4.29, 3.06, 7.43, 1.14,')
# choose
$(./maketext.sh '1')
# a: automatic
$(./maketext.sh 'a')
# autm:=2
$(./maketext.sh '2,')
# stop
WAITINPUT
$(./maketext.sh 's')
WAITINPUT
FINISHPUNCH
QUIT
EOF
./GIER ./jop_${drum}.demo

./flx2a <0_${drum}.flx >0_$drum.asc
}

export -f do_jop
seq 50 50 950 |parallel --ungroup do_jop

./jopfit.sh

kill $xpid