-\fi
-\newenvironment{fadein}%
-{\begin{list}{}{%
-\leftmargin \rightmargin}
-\item[]FADE IN:\ignorespaces}
-{\unskip \end{list}}
-
-\newenvironment{interior}%
-{\begin{list}{}{%
-\leftmargin \rightmargin}
-\item[]INT. \ignorespaces}
-{\unskip \end{list}}
-
-\newenvironment{exterior}%
-{\begin{list}{}{%
-\leftmargin \rightmargin}
-\item[]EXT. \ignorespaces}
-{\unskip \end{list}}
-
-\newenvironment{dialogue}%
-{\raggedright
-\begin{list}{}{%
- \setlength{\leftmargin}{1.2in}
- \setlength{\rightmargin}{1.2in}
-\setlength{\parsep}{0mm}
-\setlength{\topsep}{0mm}}
-\item[] \ignorespaces}
-{\unskip \end{list}}
-
-\newenvironment{narrative}%
+%%\rfoot{\pageref{LastPage}[]{}}
+
+% This is what we want for a spec script
+%% set l & rt margin
+ \setlength{\rightmargin}{.75in}
+ \setlength{\leftmargin}{1.5in}%
+ \setlength{\textwidth}%
+ {\paperwidth -\leftmargin -\rightmargin}%
+%% Set vertical spacing
+ \setlength\topmargin {48bp}%
+ \setlength\headheight {12bp}%
+ \setlength\headsep {24bp}%
+ \setlength\footskip {0bp}% there are no footnotes
+%% set page length
+\newlength{\bmargin}%
+\setlength{\bmargin}{.75in}%
+\setlength{\textheight}%
+{\paperheight -\bmargin -\topmargin -\headheight -\headsep }%
+
+
+%%\pagestyle{fancy}
+\rhead{\thepage.}
+\cfoot{}
+\rfoot{}
+\lhead{}
+\lfoot{}
+
+ % This one is needed to get real adobe courier, but you can use
+ % cmtt which is also correct
+ \renewcommand{\familydefault}{pcr}
+ % This is to negate the effect of the ~ that LyX adds everywhere
+ \let~=\space
+ % this protects you against the fact that TeX does not want to
+ % hyphenate in typewriter font. It is possible to enable
+ % hyphenation, but I do not remember how.
+ % That's good because we -do not- want any hyphenation.
+ \sloppy
+\newlength{\lnspace}
+\setlength{\lnspace}{6bp plus 3bp minus 3bp}
+
+\newcommand{\fadein}[1]{\filbreak\raggedright\par FADE IN:
+\uppercase{#1}\par\vspace{2bp}}%
+\newcommand{\fadeout}{\filbreak\raggedright\par FADE OUT }%
+\newcommand{\intercut}{\filbreak\par INTERCUT WITH: }%
+\newcommand{\interiorshot}[1]%
+{\filbreak
+\vspace{\lnspace}
+\raggedright
+\par INT.
+\uppercase{#1}
+}%
+
+\newcommand{\exteriorshot}[1]%
+{\filbreak
+\vspace{\lnspace}
+\raggedright
+\par EXT.
+\uppercase{#1}
+\vspace{\lnspace}
+}%
+%% Generalized Scene command in case INT. EXT. etc is not sufficient.
+\newcommand{\scene}[1]%
+{\filbreak
+\vspace{4bp}
+\raggedright
+\par
+\uppercase{#1}
+}%
+\newlength{\dialogLength}
+\setlength{\dialogLength}{4in minus 1in}
+\newlength{\parenLength}
+\setlength{\parenLength}{2.2in plus .5in minus .7in}
+\newlength{\dialogindent}
+\setlength{\dialogindent}{1in plus .5in}
+
+\newcommand{\dialogue}[1]%