• Home
  • Script library
  • AltME Archive
  • Mailing list
  • Articles Index
  • Site search
 

World: r4wp

[Announce] Announcements only - use Ann-reply to chat

Kaj
27-Sep-2012
[114]
I'm also adapting my other Red bindings to use this common base, 
which was previously included in the C library binding
AdrianS
27-Sep-2012
[115]
this is so cool
AdrianS
28-Sep-2012
[116]
I wonder Carl would entertain the idea of reworking the extension 
mechanism in R3 to allow even lower overhead access to Red/System. 
Or is the overhead about as low as you can expect it given that R3 
is interpreted?
NickA
28-Sep-2012
[117]
When the source is open, it's possible to do it without Carl ;)
NickA
6-Oct-2012
[118x2]
RED FUNDING DRIVE, MATCHING FUNDS CHALLENGE:  to help ensure that 
Doc can continue to work on Red without disruption, I'll match funds 
donated to him by November 1, 2012, up to a total of $1000.
I wrote a tutorial that makes use of Chris Ross-Gill's Etsy.r module: 
 http://re-bol.com/etsy_api_tutorial.htmlThe focus of this one 
is all about helping the Etsy API developer team, but by necessity, 
it teaches all the REBOL basics, along with all the absolute beginner 
concepts.  I'm hoping the Etsy guys will write a blog post about 
it and help drive some more traffic toward REBOL :)
Endo
7-Oct-2012
[120]
Very nice tutorial Nick.
Robert
7-Oct-2012
[121]
We just finished to setup a public Cofluence wiki test server, where 
TreeMapper models are rendered in HTML-5. Take a look here:


http://s1.saphirion.com:8001/display/TREEM/Treemapper+Demonstration+on+Conluence


That's a model that's done with the R3 based editor and published 
out of the editor directly into a wiki page. The next demo version 
will include the server information so you can test it on your own.
Andreas
7-Oct-2012
[122]
Correct URL for the TreeMapper demo:


http://s1.saphirion.com:8001/display/TREEM/Treemapper+Demonstration+on+Confluence
Kaj
10-Oct-2012
[123x7]
I've moved the locations of the Red bindings, dropping the "Red-" 
prefix from #include paths, and normalising the older bindings with 
the latest few that I introduced
The locations of the repositories on the web are unchanged. I need 
the Red- prefixes there to make the repository names unique in the 
Fossil server
So the following Fossil repository:
http://red.esperconsultancy.nl/Red-common
needs to be checked out in the subdirectory "common" for other bindings 
to find it. I use a parent directory Red:
Red/common/
The Red directory may be named differently, but the other bindings 
should also be checked out in it, in subdirectories corresponding 
to their names
NickA
11-Oct-2012
[130x2]
The guys at Etsy added Chris's library and my tutorial to their developer 
pages.  https://www.etsy.com/developers/documentation/resources/developer_resources
 I really think there's a marketing opportunity for REBOL, doing 
these sorts of tutorials for other web APIs
REBOL publishing libraries and tutorials like this for other popular 
web APIs.  Get a bunch of big web sites linking to REBOL sites, and 
their developer communities all taking a look at REBOL, and there 
will be curiosity and added traffic.
MaxV
11-Oct-2012
[132]
Published the new R3D library with guide and demo video: http://rebol2.blogspot.it/2012/10/r3d.html
, you'll find the same guide on www.rebol.org
Kaj
11-Oct-2012
[133x7]
I fixed support for push/pull connections in the ZeroMQ bindings 
for R2, R3 and Red/System:
http://rebol.esperconsultancy.nl/extensions/0MQ/
http://syllable.cvs.sourceforge.net/viewvc/syllable/syllable/system/apps/utils/Builder/packages/ZeroMQ-Binding--current/
http://rebol.esperconsultancy.nl/REBOL-2-ZeroMQ-binding
http://red.esperconsultancy.nl/Red-ZeroMQ-binding
Also did some maintenance on the R2 binding. Simplified the send/receive 
interface and added the ventilator source/workers/sync example for 
parallel computing from the 0MQ guide
That's source/workers/sink
Kaj
15-Oct-2012
[140x4]
I've started using a Fossil repository to sync and archive test binaries. 
In case anyone wants to run them:
http://red.esperconsultancy.nl/Red-test
This is Red development stuff, so at any moment in time they may 
be broken
Currently most of them work
MaxV
17-Oct-2012
[144x2]
I just update the http://www.rebol.org/view-script.r?script=advanced-r3d.r
   R3D demo, may you test the models on your PCs and give me a feedback 
if it's all good? With off models I turned off backface culling and 
it can be hard for some pc... maybe...
just push "load OFF file" and test the models
Kaj
18-Oct-2012
[146x3]
I've added a build script to the above testing repository, to build 
all my Red examples in one go
I've added executables for all six current Red target platforms: 
Syllable, Linux, Linux-ARM, Android, Darwin (OS X) and MSDOS (Windows)
I need volunteers to test these examples on their platforms
Kaj
19-Oct-2012
[149x6]
For testing some of the bindings, here is information where to get 
the C, cURL and 0MQ libraries:
http://rebol.esperconsultancy.nl
For checking out the complete repository and simply keeping them 
up to date for new test versions:
http://rebol.esperconsultancy.nl/documentation/how-to-use-Fossil.html
I've updated the binaries for the latest Red fixes
To get a clue which binding/library an example program uses, look 
in build.r
MaxV
25-Oct-2012
[155x5]
http://en.wikibooks.org/wiki/REBOL_Programmingnow it's a good guide 
on Rebol: what do you think?
I have to finish to add all "reserved" words description. You may 
help me if you want... ;-)
You can use the following code to make word description entry in 
the wikibook:
Rebol [Purpose: {make wikibook entry}
Author: "Max Vessi"
version: 1.0.0
]
my?: func [
    "Prints information about words and values."
    'word [any-type!]

    /local value args item type-name refmode types attrs rtype temp
][       
    temp:  copy ""
    if all [word? :word not value? :word] [word: mold :word]

    if any [string? :word all [word? :word datatype? get :word]] [
        types: dump-obj/match system/words :word
        sort types
        if not empty? types [
            print ["Found these words:" newline types]
            exit
        ]
        print ["No information on" word "(word has no value)"]
        exit
    ]
    type-name: func [value] [
        value: mold type? :value
        clear back tail value
        join either find "aeiou" first value ["an "] ["a "] value
    ]
    if not any [word? :word path? :word] [
        append temp reduce [mold :word "is" type-name :word]
        exit
    ]

    value: either path? :word [first reduce reduce [word]] [get :word]
    if not any-function? :value [

        append temp reduce [uppercase mold word "is" type-name :value "of 
        value: "]

        append temp either object? value [ reduce ["^/" dump-obj value] ] 
        [mold :value]
        exit
    ]
    args: third :value
    append temp  "= USAGE: = ^/ "

    if not op? :value [append temp reduce [ uppercase mold word " "] 
    ]
    while [not tail? args] [
        item: first args
        if :item = /local [break]

        if any [all [any-word? :item not set-word? :item] refinement? :item] 
        [
            append temp reduce [append mold :item " "]

            if op? :value [append temp reduce [append uppercase mold word " "]
	    value: none]
        ]
        args: next args
    ]
    append temp  "^/" 
    args: head args
    value: get word
    append temp "^/= DESCRIPTION: = ^/"
    either string? pick args 1 [
        append temp reduce [first args]
        args: next args
    ] [
        append temp "^/''(undocumented)''^/"
    ]

    append temp reduce [ "^/^/"uppercase mold word " is " type-name :value 
    " value."]
    if block? pick args 1 [
        attrs: first args
        args: next args
    ]
    if tail? args [exit]
    while [not tail? args] [
        item: first args
        args: next args
        if :item = /local [break]
        either not refinement? :item [

            all [set-word? :item :item = to-set-word 'return block? first args 
            rtype: first args]
            if none? refmode [
		append temp "^/= ARGUMENTS: =^/"
                refmode: 'args
            ]
        ] [
            if refmode <> 'refs [
                append temp "^/= REFINEMENTS: =^/"
                refmode: 'refs
            ]
        ]
        either refinement? :item [	   	  
            append temp reduce ["*'''" mold item "'''"]

            if string? pick args 1 [append temp reduce [" -- " first args] 
	    args: next args]
            append temp "^/"
        ] [
            if all [any-word? :item not set-word? :item] [
                if refmode = 'refs [append temp "*"]
                append temp reduce ["*'''" :item "''' -- "]

                types: if block? pick args 1 [args: next args first back args]

                if string? pick args 1 [append temp reduce [first args ""] 
		args: next args]
                if not types [types: 'any]
                append temp rejoin [" (Type: " types ")"]
                append temp "^/"
            ]
        ]
    ]
    if rtype [append temp reduce ["^/RETURNS:^/^-" rtype]]
    if attrs [
        append temp "^/= (SPECIAL ATTRIBUTES) =^/"
        while [not tail? attrs] [
            value: first attrs
            attrs: next attrs
            if any-word? value [
                append temp reduce  ["*'''" value "'''"]
                if string? pick attrs 1 [
                    append temp reduce [" -- " first attrs]
                    attrs: next attrs
                ]
                append temp "^/"
            ]
        ]
    ]
    editor temp
    exit
]
Usage, for example:
my?  view
Arnold
25-Oct-2012
[160]
I have put a script similar to the chess script on rebol org. It 
is a script to determine all possible moves in the international 
10x10 checkers game (dammen). It needs some improvement in how to 
represent the moves themselves, but the basics work. I'll post a 
board and simple board evaluating script soon. 
http://www.rebol.org/view-script.r?script=dam1.r

(I need also to find out how exactly to make a package from all needed 
files)
Kaj
29-Oct-2012
[161]
I've updated the above test binaries for the Red 0.3.0 alpha 1 release. 
Please test
Ladislav
30-Oct-2012
[162]
MaxV: I see you wrote: "ALIVE? is a logic of value: true" - I think 
that this needs a more thorough explanation, though.
MaxV
31-Oct-2012
[163]
>> source alive?
alive?: true