SPACER Example (RealWeb)

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

HTML

<!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>