#!/bin/bash

cat >slip5.asc <<EOF
_hstart
_e
_b a50,b50
EOF

for((i=0;i<=50;i++))
do
  printf "a%d: qq\n" $i >>slip5.asc
  for((j=0;j<=2;j++))
  do
    printf "qq a%d\n" $i >>slip5.asc
    printf "qq 0 t a%d\n" $i >>slip5.asc
  done
  for((j=0;j<=2;j++))
  do
    printf "qq b%d\n" $i >>slip5.asc
    printf "qq 0 t b%d\n" $i >>slip5.asc
  done
  printf "b%d: qq\n" $i >>slip5.asc
done
cat >>slip5.asc <<EOF
_x 200
_e
_x 208
_htryk
bt 32.9+1.39
ga 0.9+279.19+200.39
_e
_htryk
bt 32.9+1.39
ga 0.9+279.19+208.39
_e
_s
EOF