SUBROUTINE CENTER
* Demonstrate the use of the RW_CENTER_ON and RW_CENTER_OFF
* subroutines.

* Include the RealWeb definitions

     INCLUDE #RW.INCLUDE.DEFS FROM /SYSFILES/REALWEB,BP

* Start the HTML page.
CALL RW_START_HTML_PAGE("Centred Text Example 1", "", "", "", "")

* Insert a centred heading.
CALL RW_CENTER_ON

     TEXT = "London's Water"
CALL RWS_HEADING(TEXT, 1, "")
CALL RW_PUT(TEXT)
CALL RW_CENTER_OFF

* Insert a paragraph containing some text.
CALL RW_START_PARA("", "")

     CALL RW_PUT("In 1439, the Mayor of London looked to the Abbot of " : ...

        "Westminster to supplement the fresh water he was able to provide " : ...

        "for his 50,000 citizens. In that year the Abbot gave the City of London " : ...

        "'one head of water together with springs to the north and west of the " : ...

        "head in Paddington for a payment of two peppercorns', a grant that was " : ...

        "confirmed by King Henry VI in 1442.")
CALL RW_END_PARA

* Complete the page.
CALL RW_END_PAGE

RETURN

Subroutine result in browser 

<!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>Centred Text Example 1</TITLE>


</HEAD>
<BODY>
<CENTER>
<H1>

London's Water
</H1>

</CENTER>
<P>

In 1439, the Mayor of London looked to the Abbot of Westminster to supplement 

the fresh water he was able to provide for his 50,000 citizens. In that year 

the Abbot gave the City of London 'one head of water together with springs 

to the north and west of the head in Paddington for a payment of two 

peppercorns', a grant that was confirmed by King Henry VI in 1442.
</P>
</BODY>
</HTML>