[REBOL] Re: parser for rebel player
From: anton:lexicon at: 10-Jul-2002 17:25
Hi, try this program:
//////////////////////////////////
text: copy "" ; a new string
; when you insert into a string (which is what append does),
; the value gets converted to a string, or whatever datatype
; the first argument is. So this reduced block becomes a string.
append text reduce [
<REBEL_EMBEDLET VERSION=0.1> newline
<PROPERTIES>
]
getsize1: 200
getsize2: 100
append text rejoin [newline "SIZE=" getsize1 {,} getsize2]
append text {
BACKCOLOR=142,128,110
NOICONS=TRUE
</PROPERTIES>
}
file: %afile.txt
write file text
print read file ; read it back in to test it
delete file ; clean up
/////////////////////////
By the way, I think it's "reblet".
And it should be "REBOL_EMBEDLET".
Sounds like good stuff.
Anton.
