! This Gema script converts text with embedded anchor elements to ScriptingNews format.
! Author: David A. Mundie, 1999-09-07.

! Use SGML-friendly notation
@set-syntax{</>LLL;[|]</>}

! Items get marked up
[item]=\n\t<item>\n\t\t<text>$1</text>$l\n\t\t</item>

! For each item, link-list gets reset
item:\A=@set{l;}

! Anchors become link elements
item:<a [u]href\="[U]"[u]>[U]</a>=@set{u;$2}@append{l;\n\t\t<link>\
\n\t\t\t<url>$2</url>\n\t\t\t<linetext>$4</linetext>\n\t\t\t</link>}$4

! Two newlines end an item
item:\n\n=@terminate

! Emit header and footer
\A=<?xml version="1.0"?>\n\
<scriptingNews>\n\
\t<header>\n\
\t\t<copyright>Copyright 1997-1999 UserLand Software, Inc.</copyright>\n\
\t\t<scriptingNewsVersion>2.0b1</scriptingNewsVersion>\n\
\t\t<pubDate>Thu, 17 Jun 1999 16\:28\:20 GMT</pubDate>\n\
\t\t<lastBuildDate>Thu, 17 Jun 1999 16\:06\:41 GMT</lastBuildDate>\n\
\t\t<docs>http\://my.userland.com/stories/storyReader\$11</docs>\n\
\t\t<channelDescription>Just a demo of what a channel might look like when automatically generated by a script.</channelDescription>\n\
\t\t<channelLink>http\://my.channel.com/editorname/</channelLink>\n\
\t\t<channelTitle>Just a Demo Channel 2.0b1</channelTitle>\n\
\t\t<imageLink>http\://my.channel.com/editorname/</imageLink>\n\
\t\t<imageTitle>Just a Demo Channel</imageTitle>\n\
\t\t<imageUrl>http\://my.channel.com/editorname/gifs/tinyChannelImage.gif</imageUrl>\n\
\t\t<managingEditor>you\@ynh.org</managingEditor>\n\
\t\t<webmaster>webmaster\@ynh.org</webmaster>\n\
\t\t<language>English</language>\n\
\t\t<imageHeight>40</imageHeight>\n\
\t\t<imageWidth>78</imageWidth>\n\
\t\t<imageCaption>Just a Demo Channel</imageCaption>\n\
\t\t<skipHours>\n\
\t\t\t<hour>6</hour>\n\
\t\t\t<hour>7</hour>\n\
\t\t\t<hour>8</hour>\n\
\t\t\t<hour>9</hour>\n\
\t\t\t<hour>10</hour>\n\
\t\t\t<hour>11</hour>\n\
\t\t\t</skipHours>\n\
\t\t<skipDays>\n\
\t\t\t<day>Sunday</day>\n\
\t\t\t</skipDays>\n\
\t\t</header>

\Z=\n\t</scriptingNews>\n