echo ""
echo "             D-Tausch Script Vers. 1.0 fr die D-Box"
echo "                   (C) by Carsten Meyer @HH2"
echo ""

maxtry=50
sleeptime=10s
box='D-Box'
username='RainerJuhser'
sendfile=\''d:\_dfue\d_tausch\export\to_dbox.lzh'\'
recepath=\''d:\_dfue\d_tausch\import\'\'

if ! [ -f $sendfile ]; then
   echo "Bitte erst D_Tausch starten und Tauschfile erstellen !"
   quit 0
else
   echo "los geht's...."
fi


dial -v -s $sleeptime -r $maxtry "$box"
err=$?

if [ $err -ne 0 ]; then
   echo "Das mit der Anwahl war wohl nix ! ;-(("
   if [ $err -eq 9 ]; then
      echo "Ey,da hat es tatschlich einer geschafft,zwischen den Anwahl-"
      echo "versuchen durchzukommen.Bitte Hrer abheben...."
   else
      if [ $err -eq 3 ]; then
         echo "Es war leider die $maxtry mal besetzt."
      else
         echo "Fehler bei der Anwahl."
      fi
   fi
   hangup
   exit 1
fi

echo "Puuh...geschafft,nun aber los...."

if ! waitfor -t 30 'online >>'; then
   echo "Da ist was abgekachelt,bitte den SysOp verstdigen !"
   hangup
   exit 1
fi

sleep 500m
send  '@CN"$username"'
sleep 1s
upload $sendfile

waitfor -i -t 480 'Fcher)'
download -p $recepath
echo " Hbsch,hat alles geklappt... ich hau dann mal ab..."
sleep 1s
hangup
quit 0
