#! /bin/sh

rm -f ginput sfxInput soundInput
mkfifo ginput
mkfifo sfxInput
mkfifo soundInput 

(       
        mplayer -slave -idle -input file=./sfxInput &
        
) 2>&1 >/dev/null

(
  cat engine.eps
  (
    while [ true ]; do
      echo frame
      sleep 0.1
    done
  ) &
  cat ginput &
  gforth pacman.fs
) | tee demo.in | gs 2>&1 >/dev/null