t wrote:
> in the following,
> 
> set '++ func ['word] [set word (get word) + 1]
> yabba: 2
> 
> dabba: rejoin [{<LI><A HREF="#A}++ yabba{">}now/date{</A>}]
> 
> how would I get ++ yabba to continually increase, from 3 to 4, etc?

You could use 'BlockLoop, like this:

>> print BlockLoop 5 [rejoin [{<LI><A HREF="#A}++
yabba{">}now/date{</A>} newline]]
<LI><A HREF="#A3">19-Dec-1999</A>
<LI><A HREF="#A4">19-Dec-1999</A>
<LI><A HREF="#A5">19-Dec-1999</A>
<LI><A HREF="#A6">19-Dec-1999</A>
<LI><A HREF="#A7">19-Dec-1999</A>

Or, you could use 'BlockRepeat, like this:

>> print BlockRepeat Index 5 [rejoin [{<LI><A HREF="#A} index
{">}now/date{</A>} newline]]
<LI><A HREF="#A1">19-Dec-1999</A>
<LI><A HREF="#A2">19-Dec-1999</A>
<LI><A HREF="#A3">19-Dec-1999</A>
<LI><A HREF="#A4">19-Dec-1999</A>
<LI><A HREF="#A5">19-Dec-1999</A>

Or, you could use my HTML dialect, like this:

>> print HTML/Body/Dialect [
[    repeat n 5 [
[        rejoin [LI Link to-file join "#A" n to-string now/date
newline]
[        ]
[    ]
<LI><A HREF="#A1">19-Dec-1999</A>
<LI><A HREF="#A2">19-Dec-1999</A>
<LI><A HREF="#A3">19-Dec-1999</A>
<LI><A HREF="#A4">19-Dec-1999</A>
<LI><A HREF="#A5">19-Dec-1999</A>

Caution: Above words are _not_ available in REBOL/Core. :-)

Andrew Martin
More new stuff in HTML 3.1 ! :-)
[EMAIL PROTECTED]
http://members.xoom.com/AndrewMartin/
Online @ 33,600 Baud!
-><-

Reply via email to