#! /bin/sh ROADS=../roads/new NAME=`./propername $1` ATTRNAME=`./linkname "$NAME"` FILENAME=${ROADS}/${ATTRNAME}.attr AREA=`./propername $2` AREAATTR=`./linkname "$AREA"` shift 2 echo "Result of adding " $NAME "" echo "

Result of adding " $NAME "

" # exit echo "

"

echo Road name is $NAME, in area $AREA
echo Road link name is $ATTRNAME, in area $AREAATTR

HASTOP=false
HASTOPLEFT=false
HASTOPRIGHT=false
HASBOT=false
HASBOTLEFT=false
HASBOTRIGHT=false
# exit
while true
do
  case $1 in
  -t)  HASTOP=true
       TOP=`./propername $2`
       shift 2 ;;
  -tl) HASTOPLEFT=true
       TOPLEFT=`./propername $2`
       shift 2 ;;
  -tr) HASTOPRIGHT=true
       TOPRIGHT=`./propername $2`
       shift 2 ;;
  -b)  HASBOT=true
       BOT=`./propername $2`
       shift 2 ;;
  -bl) HASBOTLEFT=true
       BOTLEFT=`./propername $2`
       shift 2 ;;
  -br) HASBOTRIGHT=true
       BOTRIGHT=`./propername $2`
       shift 2 ;;
  *)  break ;;
  esac
done

echo TOP=$TOP TOPLEFT=$TOPLEFT TOPRIGHT=$TOPRIGHT
# exit

cat < $FILENAME
settlement="cambridge"
settlement-name="Cambridge"
status="new"
name="$NAME"
type="road"
area="$AREAATTR"
area-name="$AREA"

EndHeader

if $HASTOP
then
TOPLINK=`./linkname "$TOP"`
echo Straight ahead at the top is $TOP, linked as $TOPLINK
cat <> $FILENAME
type="road"
link="$TOPLINK"
name="$TOP"
direction="ahead"

EndTop
fi

#if expr $HASTOPLEFT \| $HASTOPRIGHT > /dev/null
if $HASTOP
then
cat <> $FILENAME
type="junction"
direction="ahead"
row="next"
name=""

EndTopJunction
fi


if $HASTOPLEFT
then
TOPLEFTLINK=`./linkname "$TOPLEFT"`
echo To the left at the top is $TOPLEFT, linked as $TOPLEFTLINK
cat <> $FILENAME
type="road"
link="$TOPLEFTLINK"
name="$TOPLEFT"
direction="left"

EndTopleft
fi

if $HASTOPRIGHT
then
TOPRIGHTLINK=`./linkname "$TOPRIGHT"`
echo To the right at the top is $TOPRIGHT, linked as $TOPRIGHTLINK
cat <> $FILENAME
type="road"
link="$TOPRIGHTLINK"
name="$TOPRIGHT"
direction="right"

EndTopright
fi

DIRECTION="left"
for DUMMY in "Sailboat Yard" "Elmira House" "Tachistoscope Factory" "Cicada Cottage" "Moravia Manor" "Spandex Apartments" "Marvin Mansions" "Poltroon Place" "Toad Turning" "Halyard Hall" "Dunroamin" 
do
cat <> $FILENAME
type="dummy"
name="${DUMMY}"
direction="$DIRECTION"

EndDummies
if expr $DIRECTION = left > /dev/null
then
  DIRECTION=right
else
  DIRECTION=left
fi
done

#if expr $HASBOTLEFT \| $HASBOTRIGHT > /dev/null
if $HASBOT
then
cat <> $FILENAME
type="junction"
row="next"
direction="ahead"
name=""

EndBotJunction
fi


if $HASBOTLEFT
then
BOTLEFTLINK=`./linkname "$BOTLEFT"`
echo To the left at the bottom is $BOTLEFT, linked as $BOTLEFTLINK
cat <> $FILENAME
type="road"
link="$BOTLEFTLINK"
name="$BOTLEFT"
direction="left"

EndBotleft
fi

if $HASBOTRIGHT
then
BOTRIGHTLINK=`./linkname "$BOTRIGHT"`
echo To the right at the bottom is $BOTRIGHT, linked as $BOTRIGHTLINK
cat <> $FILENAME
type="road"
link="$BOTRIGHTLINK"
name="$BOTRIGHT"
direction="right"

EndBotright
fi

if $HASBOT
then
BOTLINK=`./linkname "$BOT"`
echo Straight ahead at the bottom is $BOT, linked as $BOTLINK
cat <> $FILENAME
type="road"
link="$BOTLINK"
name="$BOT"
direction="ahead"

EndBot
fi

echo "Road built"

echo "

" echo "[View $NAME]" echo "[Edit $NAME]" echo "[Add another road]" echo "[Back to roadworks depot]" echo ""