SUBROUTINE IMAGE1
INCLUDE #RW.INCLUDE.DEFS FROM /SYSFILES/REALWEB,BP
IMAGE = ""
CALL RW_GET_PARAM("__isurl", IMAGE)
IMAGE = IMAGE : "/REALWEB-ITEMS/arrow.gif"
CHECK1="check for any <B>D</B>anger"
CHECK2="try for a <B>R</B>esponse"
CHECK3="check <B>A</B>irway"
CHECK4="check <B>B</B>reathing"
CHECK5="check <B>C</B>irculation"
CALL RW_START_HTML_PAGE("First Aid", "", "", "", "")
CALL RW_PUT("Don't forget the framework <I>DR ABC</I> in all emergencies")
CALL RW_NEWLINES(3)
CALL RW_START_DLIST("")
CALL RW_DLIST_ITEM("DR ABC","","")
CALL RW_IMAGE(IMAGE,"blue arrow")
CALL RW_PUT(CHECK1)
CALL RW_DLIST_ITEM("","","")
CALL RW_IMAGE(IMAGE,"blue arrow")
CALL RW_PUT(CHECK2)
CALL RW_DLIST_ITEM("","","")
CALL RW_IMAGE(IMAGE,"blue arrow")
CALL RW_PUT(CHECK3)
CALL RW_DLIST_ITEM("","","")
CALL RW_IMAGE(IMAGE,"blue arrow")
CALL RW_PUT(CHECK4)
CALL RW_DLIST_ITEM("","","")
CALL RW_IMAGE(IMAGE,"blue arrow")
CALL RW_PUT(CHECK5)
CALL RW_END_DLIST
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>First Aid</TITLE>
</HEAD>
<BODY>
Don't forget the framework <I>DR ABC</I> in all emergencies
<BR>
<BR>
<BR>
<DL>
<DT>DR ABC<DD>
<IMG ALT="blue arrow" SRC="/servlet/realityis/test/REALWEB-ITEMS/arrow.gif">
check for any <B>D</B>anger
<DT><DD>
<IMG ALT="blue arrow" SRC="/servlet/realityis/test/REALWEB-ITEMS/arrow.gif">
try for a <B>R</B>esponse
<DT><DD>
<IMG ALT="blue arrow" SRC="/servlet/realityis/test/REALWEB-ITEMS/arrow.gif">
check <B>A</B>irway
<DT><DD>
<IMG ALT="blue arrow" SRC="/servlet/realityis/test/REALWEB-ITEMS/arrow.gif">
check <B>B</B>reathing
<DT><DD>
<IMG ALT="blue arrow" SRC="/servlet/realityis/test/REALWEB-ITEMS/arrow.gif">
check <B>C</B>irculation
</DL>
</BODY>
</HTML>