World: r3wp

View1.3.61 is out. http://www.rebol.net/builds/

Anton, thanks for announcing, as I forgot to mention above that was 
the version I was testing with :)

Just uploaded rebcode for tracing 2 colored bitmaps (it's not perfect, 
I think it can be optimised) but at this moment I have what I needed....

do http://box.lebeda.ws/~hmm/rebol/projects/vectorize/latest/vectorize.r

probe vectorize http://box.lebeda.ws/~hmm/rebol/projects/vectorize/latest/img41.gif

It's possible that some situation will not be handled, but I was 
already able to convert two alphabets from bitmap to vectors using 
it.

what is the result of vectorize function? draw dialect surely not

probe ctx-vectorize/to-pairs vectorize http://box.lebeda.ws/~hmm/rebol/projects/vectorize/latest/img41.gif

I'm not using pair as there is no support for them in rebcode

to-pairs function returns some a lot of negative pair! , why is the 
image shifted?

because i use it to make font from the bitmap and there is the y 
axis counted from below, you may also aske why there is the innerLine 
(it's because to render the hole correctly there must be correct 
direction - it could be done in the rebcode, but I found it when 
I had the inner tracing done and don't want to do it again - so I 
just changed the "line" to "innerLine" and must fix it in the to-pairs 
function -> for outer shape I use append and for holes insert :)

I should probably remove to to-pairs function from the vectorizer's 
context, and use it alone

here is example how to use it in real life: do http://box.lebeda.ws/~hmm/rebol/projects/font-tools/latest/test.r

It would be nice to have possibility to use embedded fonts in Rebol 
as it's possible with Flash.

http://www.complang.tuwien.ac.at/papers/ertl%26gregg04pact.ps.gz

I probably missed something, how can I read *.ps files?

Click on them in linxu? Hmm, there is ghostscript for windows too 
somewhere.

Mybe google has html in its cache, but i lost the search-page.

What is the advantage of using *.ps files? Is it at least interesting 
reading?

It was the interesting reading why i choosed it. did not realize 
the *.ps

about building a native compiler from an interpeter.

ech 10MB of download just to read a simple text file, I'm not going 
to read it today.

abstract: http://csdl2.computer.org/persagen/DLAbsToc.jsp?resourcePath=/dl/proceedings/&toc=comp/proceedings/pact/2004/2229/00/2229toc.xml&DOI=10.1109/PACT.2004.10021

you can convert ps to pdf on http://www.ps2pdf.comfor free

...and it works well!

here is example of simple cells animation with custom rebcode's preprocessor 
--> do http://box.lebeda.ws/~hmm/rebol/projects/boids/latest/rc-cells-1.r

hehe funny! :-)

hm, but now I want to work with decimals as well and wonder if will 
be faster to use block to store the cell variables, or if I will 
use my own decimal format and binary structer as I'm using now

how to write: [ 2 ** exponent ] in rebcode?

stupid question:) mul.d i i

mul.d i i is i ** 2 and not 2 ** i

2 ** exponent:

set a 2.0
log-e a
mul.d a exponent
exp a

or you can use set a 0.693147180559945 to save one instruction

thanks, but kru, I will save instruction but will deal with rounding 
error:

>> x: rebcode [exponent][set a 2.0 log-e a mul.d a exponent exp a 
return a] x 3.0
== 8.0

>> x: rebcode [exponent][mul.d exponent 0.693147180559945 exp exponent 
return exponent] x 3.0
== 7.99999999999999

interesting, it looks it will be faster to use rebol blocks to store 
Rebol values instead of binary format I used in the cell example 
before (which was faster in the early rebcode versions)

do http://box.lebeda.ws/~hmm/rebol/projects/boids/latest/rc-cells-2.r
  <--- same like the version 1 but without the rebcode preprocessor 
using Rebol block to store cell variables instead of the binary format.

how do you tell the speed difference? I can't see it....

It's not in the script, I did local tests.

how great is the speed difference?

using rebol block is 3x faster

that's quite a lot...

how to get random number between 0 and 1?

I generate random number from 0 to milion and divede it by milion

:) i fought there will be better method

so it's: rnd: rebcode[][set d 1000000000 randz d to-dec d div.d d 
1000000000.0 return d]

how to write atan2(sin,cos) in rebcode?

Oldes, can we include rc-cells on the rebcode demo page?

yes, why not

Thanks! I just want to make sure we get permission from authors.

can I return error! from rebcode?