#!/usr/local/bin/jconsole
require'html-tools.ijs'
NB. Build a page using various features of the html-tools.ijs code
NB. some links
links =: ('www.ibm.com';'IBM');<('www.apple.com';'Apple Computer')
links =:links , ('www.cs.trinity.edu';'Trinity Computer Science');< ('www.trinity.edu';'Trinity Universtiy')
ordered_list =: 'ol' ht ('center' ht 'Useful links'), , > (li & hl) &. > links
NB. an image
image =: img 'src="/Pictures/TU_L_K.gif" align=bottom alt="Trinity University" border=none'
NB. a paragraph
par =: par 0 : 0
This is some text
to illustrate a paragraph.
)
NB. an image-link
img_link =: hl 'www.cs.trinity.edu' ; img 'src="/Pictures/cs.gif" align=bottom alt="Trinity CS" border=none'
NB. some preformatted content
ruptime =: pre system'rwho'
NB. a list of links (one per line without the numbers)
ls =: hr , > br & hl &. > links
NB. more stuff
extra =: , > ('br'&ht) & hl &. > links
NB. Output the page
('Test Page';'background=/IMAGES/pattern1.jpg') page1 par,image,ordered_list,img_link,ruptime, ls, extra