#!/bin/sh

#
#	.mkrevu.sh -	Build the Review file for a story
#		Author:	Jack C Lipton,  liptonsoup1951@yahoo.com
#


TMP=/tmp/mkrevuT.$$
INFO=.sort


[ -z "$1" ]	&&	exit	1


CORENAME=$1
shift


F=$CORENAME.x                                   # text version of file
WF=$CORENAME.html                               # HTML version of file

HIDDEN=`grep "^$CORENAME$" .hide | wc -l`

echo    -e      "$F ... \c"                                     >/dev/tty

# echo  "$CORENAME|$UNIVERSE|$TITLE|$PART|$CODES|$SUMMARY|$WORDS"       >>$INFO

TITLE="`grep "^$CORENAME|" $INFO | awk '-F|' '{print $3}'`"
PART="`grep "^$CORENAME|" $INFO | awk '-F|' '{print $4}'`"
CODES="`grep "^$CORENAME|" $INFO | awk '-F|' '{print $5}'`"
UNIVERSE="`grep "^$CORENAME|" $INFO | awk '-F|' '{print $2}'`"
SUMMARY="`grep "^$CORENAME|" $INFO | awk '-F|' '{print $6}'`"
WORDS="`grep "^$CORENAME|" $INFO | awk '-F|' '{print $7}'`"
INCOMPLETE="`grep "^$CORENAME|" $INFO | awk '-F|' '{print $8}'`"



HTML=revu-${CORENAME}.html



cat					>${HTML}+			<<REVUHTML
<HTML>
<HEAD>
<TITLE>Review of $TITLE `[ ! -z "$PART" ] && echo "[$PART]"`</TITLE>
</HEAD>
<BODY>
<H1 ALIGN=CENTER>Review/Vote for<BR>"$TITLE" `[ ! -z "$PART" ] && echo "<BR>Part [$PART]"`</H1>
<CENTER>
Author:  <A HREF="mailto:liptonsoup1951@yahoo.com">Jack C Lipton</A>	<BR>


<BR><BR>
<FONT SIZE=+2><B>Please Note:</B> This page will not post information at this time, it is a testing tool</FONT>
<BR><BR>


</CENTER>


<FORM>

<BR>

<H2>Reviewing a Story</H2>
<P>
Please consider filling out the survey below so that the author can learn from your reaction to his work.	<BR>

<H2>Title: $TITLE `[ ! -z "$PART" ] && echo "[$PART]"`</H2>

<B>Summary:</B> $SUMMARY							<BR>

<BR>
<BR>

<B>Note:</B>
The ratings codes mean:
<TABLE BORDER>
  <TR>	<TD><B>-2</B></TD><TD>Life Threatening, Azgoth's of Kria level.</TD>
  <TR>	<TD><B>-1</B></TD><TD>Painful, we're talking Vogon Poetry.</TD>
  <TR>	<TD><B>0</B></TD><TD>I don't give a damn about apathy.</TD>
  <TR>	<TD><B>+1</B></TD><TD>Just a gentle buzz as muscle relaxant.</TD>
  <TR>	<TD><B>+2</B></TD><TD>Orgasmic Response, if you get my drift.</TD>
</TABLE>

<BR>
<BR>

<HR SIZE=5>

<BR>
<BR>


<TABLE BORDER>

  <TR>	<TD>	<INPUT TYPE="radio" NAME="title" VALUE="-2">-2		</TD>
	<TD>	<INPUT TYPE="radio" NAME="title" VALUE="-1">-1		</TD>
	<TD>	<INPUT TYPE="radio" NAME="title" VALUE="0" CHECKED>0		</TD>
	<TD>	<INPUT TYPE="radio" NAME="title" VALUE="+1">+1		</TD>
	<TD>	<INPUT TYPE="radio" NAME="title" VALUE="+2">+2		</TD>
	<TD>	Did you like the title?					</TD>

  <TR>	<TD>	<INPUT TYPE="radio" NAME="codes" VALUE="-2">-2		</TD>
	<TD>	<INPUT TYPE="radio" NAME="codes" VALUE="-1">-1		</TD>
	<TD>	<INPUT TYPE="radio" NAME="codes" VALUE="0" CHECKED>0		</TD>
	<TD>	<INPUT TYPE="radio" NAME="codes" VALUE="+1">+1		</TD>
	<TD>	<INPUT TYPE="radio" NAME="codes" VALUE="+2">+2		</TD>
	<TD>	Did the codes reflect the content of the story?		</TD>

  <TR>	<TD>	<INPUT TYPE="radio" NAME="codex" VALUE="-2">-2		</TD>
	<TD>	<INPUT TYPE="radio" NAME="codex" VALUE="-1">-1		</TD>
	<TD>	<INPUT TYPE="radio" NAME="codex" VALUE="0" CHECKED>0		</TD>
	<TD>	<INPUT TYPE="radio" NAME="codex" VALUE="+1">+1		</TD>
	<TD>	<INPUT TYPE="radio" NAME="codex" VALUE="+2">+2		</TD>
	<TD>	Did the codes provide reasonable warning? 		</TD>

  <TR>	<TD>	<INPUT TYPE="radio" NAME="codey" VALUE="-2">-2		</TD>
	<TD>	<INPUT TYPE="radio" NAME="codey" VALUE="-1">-1		</TD>
	<TD>	<INPUT TYPE="radio" NAME="codey" VALUE="0" CHECKED>0		</TD>
	<TD>	<INPUT TYPE="radio" NAME="codey" VALUE="+1">+1		</TD>
	<TD>	<INPUT TYPE="radio" NAME="codey" VALUE="+2">+2		</TD>
	<TD>	Squickage: What was your reaction to the story?		</TD>

  <TR>
  <TR>

  <TR>	<TD>	<INPUT TYPE="radio" NAME="summary" VALUE="-2">-2	</TD>
	<TD>	<INPUT TYPE="radio" NAME="summary" VALUE="-1">-1	</TD>
	<TD>	<INPUT TYPE="radio" NAME="summary" VALUE="0" CHECKED>0		</TD>
	<TD>	<INPUT TYPE="radio" NAME="summary" VALUE="+1">+1	</TD>
	<TD>	<INPUT TYPE="radio" NAME="summary" VALUE="+2">+2	</TD>
	<TD>	Reaction to the Summary?  (-2 -> *ick*)			</TD>

  <TR>	<TD>	<INPUT TYPE="radio" NAME="summdet" VALUE="-2">-2	</TD>
	<TD>	<INPUT TYPE="radio" NAME="summdet" VALUE="-1">-1	</TD>
	<TD>	<INPUT TYPE="radio" NAME="summdet" VALUE="0" CHECKED>0		</TD>
	<TD>	<INPUT TYPE="radio" NAME="summdet" VALUE="+1">+1	</TD>
	<TD>	<INPUT TYPE="radio" NAME="summdet" VALUE="+2">+2	</TD>
	<TD>	Level of detail in the Summary?  (-2 -> Useless)	</TD>

  <TR>
  <TR>

  <TR>	<TD>	<INPUT TYPE="radio" NAME="smackem" VALUE="-2">-2	</TD>
	<TD>	<INPUT TYPE="radio" NAME="smackem" VALUE="-1">-1	</TD>
	<TD>	<INPUT TYPE="radio" NAME="smackem" VALUE="0" CHECKED>0		</TD>
	<TD>	<INPUT TYPE="radio" NAME="smackem" VALUE="+1">+1	</TD>
	<TD>	<INPUT TYPE="radio" NAME="smackem" VALUE="+2">+2	</TD>
	<TD>	How much did you want to smack the author and ask:<BR>
		"What the fuck were you <B><I>thinking</I></B>?		</TD>

</TABLE>

<H2>Coding</H2>
<TABLE BORDER> 
REVUHTML

for	C	in	$CODES
    do
	cat				>>${HTML}+			<<REVUHTML

  <TR>	<TD>	<INPUT TYPE="radio" NAME="x$C" VALUE="-2">-2		</TD>
	<TD>	<INPUT TYPE="radio" NAME="x$C" VALUE="-1">-1		</TD>
	<TD>	<INPUT TYPE="radio" NAME="x$C" VALUE="0" CHECKED>0		</TD>
	<TD>	<INPUT TYPE="radio" NAME="x$C" VALUE="+1">+1		</TD>
	<TD>	<INPUT TYPE="radio" NAME="x$C" VALUE="+2">+2		</TD>
	<TD>	Did code <B>$C</B> properly apply to this story?	</TD>


REVUHTML
	    done


#
#	Continue file generation
#

cat					>>${HTML}+			<<REVUHTML
</TABLE>

<H2>Technical Issues</H2>

<TABLE BORDER>

  <TR>	<TD>	<INPUT TYPE="radio" NAME="techES" VALUE="-2">-2		</TD>
	<TD>	<INPUT TYPE="radio" NAME="techES" VALUE="-1">-1		</TD>
	<TD>	<INPUT TYPE="radio" NAME="techES" VALUE="0" CHECKED>0		</TD>
	<TD>	<INPUT TYPE="radio" NAME="techES" VALUE="+1">+1		</TD>
	<TD>	<INPUT TYPE="radio" NAME="techES" VALUE="+2">+2		</TD>
	<TD>	Author's Spelling (-2 -> Bloody Awful, even for a Yank)	</TD>

  <TR>	<TD>	<INPUT TYPE="radio" NAME="techEG" VALUE="-2">-2		</TD>
	<TD>	<INPUT TYPE="radio" NAME="techEG" VALUE="-1">-1		</TD>
	<TD>	<INPUT TYPE="radio" NAME="techEG" VALUE="0" CHECKED>0		</TD>
	<TD>	<INPUT TYPE="radio" NAME="techEG" VALUE="+1">+1		</TD>
	<TD>	<INPUT TYPE="radio" NAME="techEG" VALUE="+2">+2		</TD>
	<TD>	Author's Grammar (-2 -> Send back to Grammar School)	</TD>

  <TR>	<TD>	<INPUT TYPE="radio" NAME="techSex" VALUE="-2">-2	</TD>
	<TD>	<INPUT TYPE="radio" NAME="techSex" VALUE="-1">-1	</TD>
	<TD>	<INPUT TYPE="radio" NAME="techSex" VALUE="0" CHECKED>0		</TD>
	<TD>	<INPUT TYPE="radio" NAME="techSex" VALUE="+1">+1	</TD>
	<TD>	<INPUT TYPE="radio" NAME="techSex" VALUE="+2">+2	</TD>
	<TD>	Quality of Sexual Interaction in story (if any)		</TD>

  <TR>	<TD>	<INPUT TYPE="radio" NAME="techFuk" VALUE="-2">-2	</TD>
	<TD>	<INPUT TYPE="radio" NAME="techFuk" VALUE="-1">-1	</TD>
	<TD>	<INPUT TYPE="radio" NAME="techFuk" VALUE="0" CHECKED>0		</TD>
	<TD>	<INPUT TYPE="radio" NAME="techFuk" VALUE="+1">+1	</TD>
	<TD>	<INPUT TYPE="radio" NAME="techFuk" VALUE="+2">+2	</TD>
	<TD>	Quantity of Sexual Assignations in story (if any)	</TD>

</TABLE>


</FORM>




</BODY>
</HTML>
REVUHTML

[ ! -f ${HTML} ]  &&	touch	${HTML}

diff	${HTML}	${HTML}+			>$TMP

if	[ -s $TMP ]
    then
	cutover		${HTML}
    else
	rm -f		${HTML}+
	touch		$HTML
    fi


rm -f		$TMP

exit	0		# all done!