//Below are Variables that will be used in each paste function
var top="<HTML>" + "\r" + "<TITLE>My Frame Page</TITLE>" + "\r" +"<HEAD></HEAD>"
var nf="<noframes>" + "\r" + "You need a frames capable browser to view this page." + "\r" + "</noframes>" + "\r" + "</HTML>"
var f="</frameset>"
var bc="bordercolor=blue>"
var MW="marginwidth=0"
var MH="marginheight=0"
//Below are the six functions that produce the frame code in the TEXTAREA box
function framesa()
{
document.Framer.Fillit.value=top
+ "\r" + "<frameset cols=50%,* "
+ " " + bc + "\r" + "<frame src=w.htm" +" " + "name=One"
+ "\r" + "scrolling=auto" + " " + MW + " " + MH + " " + "noresize=yes>"
+ "\r" + "<frame src=x.htm" +" " + "name=Two"
+ "\r" + "scrolling=auto" + " " + MW + " " + MH + " " + "noresize=yes>"
+ "\r" + f
+ "\r" + nf
}
function framesb()
{
document.Framer.Fillit.value=top
+ "\r" + "<frameset rows=50%,* "
+ " " + bc + "\r" + "<frame src=w.htm" +" " + "name=One"
+ "\r" + "scrolling=auto" + " " + MW + " " + MH + " " + "noresize=yes>"
+ "\r" + "<frame src=x.htm" +" " + "name=Two"
+ "\r" + "scrolling=auto" + " " + MW + " " + MH + " " + "noresize=yes>"
+ "\r" + f
+ "\r" + nf
}
function framemixa()
{
document.Framer.Fillit.value=top
+ "\r" + "<frameset cols=30%,* " + bc + " " + "noresize=yes>"
+ "\r" + "<frame src=w.htm" + " " + "name=One" + " " + "scrolling=yes"
+ "\r" + MW + " " + MH + " " + "noresize=yes>"
+ "\r" + "<frameset rows=50%,*>"
+ "\r" + "<frame src=x.htm" + " " + "name=Two" + " " + MW
+ "\r" + MH + " " + "scrolling=yes>"
+ "\r" + "<frame src=y.htm" + " " + "name=Three" + " " + "scrolling=no"
+ "\r" + MW + " " + MH + " " + "noresize=no>"
+ "\r" + f
+ "\r" + f
+ "\r" + nf
}
function frames3v()
{
document.Framer.Fillit.value=top
+ "\r" + "<frameset cols=33%,33%,*" + " " + bc
+ "\r" + "<frame src=w.htm name=One" + " " + "scrolling=auto"
+ "\r" + MW + " " + MH + " " + "noresize=yes>"
+ "\r" + "<frame src=x.htm" + " " + "name=Two" + " " + "scrolling=auto"
+ "\r" + MW + " " + MH + " " + "noresize=yes>"
+ "\r" + "<frame src=y.htm" + " " + "name=Three" + " " +
"scrolling=auto"
+ "\r" + MW + " " + MH + " " + "noresize=yes>"
+ "\r" + f
+ "\r" + nf
}
function frames3h()
{
document.Framer.Fillit.value=top
+ "\r" + "<frameset rows=33%,33%,*" + " " + bc
+ "\r" + "<frame src=w.htm name=One" + " " + "scrolling=auto"
+ "\r" + MW + " " + MH + " " + "noresize=yes>"
+ "\r" + "<frame src=x.htm" + " " + "name=Two" + " " + "scrolling=auto"
+ "\r" + MW + " " + MH + " " + "noresize=yes>"
+ "\r" + "<frame src=y.htm" + " " + "name=Three" + " " +
"scrolling=auto"
+ "\r" + MW + " " + MH + " " + "noresize=yes>"
+ "\r" + f
+ "\r" + nf
}
function framemixb()
{
document.Framer.Fillit.value=top
+ "\r" + "<frameset cols=30%,* " + bc + " " + "noresize=yes>"
+ "\r" + "<frameset rows=50%,*>" + "\r" + "<frame src=w.htm" + " " +
"name=One"
+ " " + "scrolling=no" + " " + MW + "\r" + MH + " " + "noresize=yes>"
+ "\r" + "<frame src=x.htm" + " " + "name=Two" + " " + MW
+ "\r" + MH + " " + "scrolling=yes>"
+ "\r" + f
+ "\r" + "<frameset rows=50%,*>" + "\r" + "<frame src=y.htm" + " " +
"name=Three"
+ "\r" + "scrolling=no" +" " + MW + " " + MH + " " + "noresize=no>"
+ "\r" + "<frame src=z.htm" +" " + "name=Four" + " " + "scrolling=yes"
+ "\r" + MW + " " + MH + " " + "noresize=yes>"
+ "\r" + f
+ "\r" + f
+ "\r" + nf
}
//Below is the function that copies over the text from one box to the other
function Copy()
{
if (document.Framer.Fillit.value=="")
{
alert ('The top box is empty. Please enter a script by clicking one of the frames buttons.')
}
else
{
document.Framer.Pastebox.value=document.Framer.Fillit.value
}
}
//Below is the function that displays the code in a new window
function view()
{
if (document.Framer.Pastebox.value=="")
{
alert ('The paste box is empty. Please enter a script by clicking the Copy/Edit button.')
return false;
}
else
{
alert('If you like the results, remember to paste it to a text editor!')
boat = open ("","DisplayWindow")
see = parent.document.Framer.Pastebox.value
boat.document.write (see)
return true;
}
}
</SCRIPT>
</HEAD>
<BODY aLink=#ff0000 bgColor=#c0c0c0 link=#0000ee text=#000000 vLink=#551a8b>
//Below is the FORM and TABLE code that creates the look on the page
<FORM name=Framer>
<TABLE border=1>
<TBODY>
<TR>
<TD WIDTH="150">
<b>1.</b> Choose One:<P>
<INPUT onClick=framesa() type=button value="2 Vertical"><BR>
<INPUT onClick=frames3v() type=button value="3 Vertical"><BR>
<INPUT onClick=framesb() type=button value="2 Horizontal"><BR>
<INPUT onClick=frames3h() type=button value="3 Horizontal"><BR>
<INPUT onClick=framemixa() type=button value="3 Mixed"><BR>
<INPUT onClick=framemixb() type=button value="4 Mixed"><BR> </TD>
<TD vAlign=top>
<TEXTAREA cols=56 name=Fillit rows=15></TEXTAREA>
<CENTER>
</TD></TR>
<TR>
<TD>
<b>2.</b> Paste it in:<P>
<INPUT onClick=Copy() type=button value=Copy/Edit><p>
<INPUT onClick="alert('Misfire? No problem, a new copy will be pasted to the bottom box. Good Luck!');Copy()" type=button value="Start Over"><BR>
<INPUT onClick=reset() type=button value="Clear All"><BR> </TD>
<TD vAlign=top>
<TEXTAREA cols=56 name=Pastebox rows=15></TEXTAREA>
<CENTER>
<b>3.</b> Then: <INPUT onClick=view() type=button value=" View It! ">
</CENTER>
</TD>
</TR>
</TBODY>
</TABLE>
<P>
</FORM>
</P>
</BODY>
</HTML>