SPACER Example

SUBROUTINE SPACER * Demonstrate the use of horizontal, vertical and block spacers * and horizontal rules. * Include the RealWeb definitions. INCLUDE #RW.INCLUDE.DEFS FROM /SYSFILES/REALWEB,BP * Get the URL of the Reality item server. STYLESHEET = "" CALL RW_GET_PARAM("__isurl", STYLESHEET) * Specify the location of the stylesheet. STYLESHEET = STYLESHEET : "/REALWEB-ITEMS/styles.css" * Start the HTML page. CALL RW_START_HTML_PAGE("Spacers Demonstration", "", STYLESHEET, "", "") * Insert a heading. CALL RW_CENTER_ON TEXT = "Abbey Choir" CALL RWS_HEADING(TEXT, 2, "") CALL RW_PUT(TEXT) CALL RW_CENTER_OFF * Separate off the next section with a horizontal rule. CALL RW_RULE * Space the following text off from the heading. CALL RW_VSPACE(30) * Insert a paragraph. CALL RW_START_PARA("", "") CALL RW_PUT("If you enjoy singing, then you may wish to consider " :... "joining us. On average, the choir sings for 5 out of 8 " :... "services per month. Rehearsals take place on Fridays from " :... "7.30pm, and just prior to Sunday Services.") CALL RW_END_PARA * Insert a paragraph, with the first line indented using a spacer. CALL RW_START_PARA("", "") CALL RW_HSPACE(20) CALL RW_PUT("The choir has an extensive repertoire, encompassing " :... "the wealth of Choral Music available, from Tallis (once " :... "organist of the Abbey) and Byrd through to Britten and Tippett. ": ... "As well of leading the worship, the choir has a busy concert " :... "schedule, and has undertaken various broadcasts for radio & " :... "television, Cathedral visits and to date, three CD recordings, " :... "all of which are available from the Abbey gift shop.") CALL RW_END_PARA * Separate off the next section with a horizontal rule. CALL RW_RULE * Use a block space to lay out some text. CALL RW_CENTER_ON CALL RW_START_PARA("", "") CALL RW_PUT("Worship<br>Concerts") CALL RW_BSPACE(50, 50) CALL RW_PUT("Broadcasts<br>Recordings") CALL RW_END_PARA CALL RW_CENTER_OFF * Terminate the section with a horizontal rule. CALL RW_RULE * Complete the page. CALL RW_END_PAGE RETURN

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<HTML>
<HEAD>
<META NAME="Generator" CONTENT="Reality">
<TITLE>Spacers Demonstration</TITLE>

<STYLE type="text/css">
 <!-- @import url(/servlet/realityis/test/REALWEB-ITEMS/styles.css); -->
</STYLE>

</HEAD>
<BODY>
<CENTER>
<H2>
Abbey Choir
</H2>

</CENTER>
<HR>
<BR><img src="/servlet/realityis/test/IMAGES/small.gif" width=1 height="30" alt="Vertical Spacer">
<P>
If you enjoy singing, then you may wish to consider joining us. On average, the
choir sings for 5 out of 8 services per month. Rehearsals take place on Fridays
from 7.30pm, and just prior to Sunday Services.
</P>
<P>
<img src="/servlet/realityis/test/IMAGES/small.gif" width="20" height=1 alt="Horizontal Spacer">
The choir has an extensive repertoire, encompassing the wealth of Choral Music
available, right from Tallis (once organist of the Abbey) and Byrd through to
Britten and Tippett. As well of leading the worship, the choir has a busy concert
schedule, and has undertaken various broadcasts for radio & television, Cathedral
visits and to date, three CD recordings, all of which are available from the
Abbey gift shop.
</P>
<HR>
<CENTER>
<P>
Worship<br>Concerts
<img src="/servlet/realityis/test/IMAGES/small.gif" width="50" height="50" alt="Block Spacer">
Broadcasts<br>Recordings
</P>
</CENTER>
<HR>
</BODY>
</HTML>