rgchris

Red [
    Title: "Similarity Of"
    Author: "Christopher Ross-Gill"
    Date: 25-Aug-2017
    File: %similarity-of.red
    Purpose: "Calculate the similarity (%) of two strings."
    Rights: http://opensource.org/licenses/Apache-2.0
]

do %simplediff.red

rgchris

#!/usr/local/bin/red

Red [
    Title: "Red Logos Example"
    Date:  7-Sep-2017
    Author: "Christopher Ross-Gill"
    File: %logos.red
]

view [

rgchris

#!/usr/local/bin/ren-c

Rebol []

do %html-entities.reb

test-strings: [
    {FOO>BAR} ["gt;" "62"]
    {FOO&gtBAR} ["gt" "62"]
    {FOO&gt BAR} ["gt" "62"]

rgchris

Red [
    Title: "Embed Image"
    Date: 12-Sep-2017
    Author: "Christopher Ross-Gill"
]

help-image: load/as 64#{
iVBORw0KGgoAAAANSUhEUgAAADAAAAAwCAMAAABg3Am1AAAAYFBMVEVHcExzqnN6
xHptvm1fwl9FoUVJk0kgLiCKtIophSkmYyYIVggRMREBRAECFQIxPTEPag9wkXC9
1L3Y7tjf8t+jx6PM4cxJdknn9efu+O5caVxETkT2/PYZHBlTYFP+//5Z4eYoAAAA

rgchris

Red [
    Notes: {
        Is a reimagining of the Eve-style Clock demo without
        using words to access UI elements. Adaptation of:
        http://www.red-lang.org/2016/07/eve-style-clock-demo-in-red-livecoded.html
    }
]

clock-demo: {
    base 200x200 transparent rate 1 now draw [

rgchris

#!/usr/local/bin/rebview -iqvs

Rebol [
    Title: "Parrot Field"
    Date: 2-Jan-2017
    Author: "Christopher Ross-Gill"
    Link: http://rebolforum.com/index.cgi?f=printtopic&permalink=OneArb2-Jan-2017/11:14:53-8:00&archiveflag=archive
    Notes: http://www.rebol.com/docs/view-face-events.html
]

rgchris

#!/usr/local/bin/ren-c

Rebol [Type: module]

tokenizer: make object! [
    use: func ['state [word!]][probe to tag! state]
]

tokenizer/use foo

rgchris

<states>
data: rcdata: rawtext: script-data: script-data: plaintext:
tag-open: end-tag-open: tag-name: rcdata-less-than-sign: rcdata-end-tag-name: rawtext-less-than-sign:
rawtext-end-tag-open: rawtext-end-tag-name: script-data-less-than-sign: script-data-end-tag-open: script-data-end-tag-name: script-data-escape-start:
script-data-escape-start-dash: script-data-escaped: script-data-double-escaped: script-data-escaped: script-data-escaped-dash: script-data-escaped-dash-dash:
script-data-escaped-less-than-sign: script-data-escaped-end-tag-open: script-data-escaped-end-tag-name: script-data-double-escape-start: script-data-double-escaped: script-data-double-escaped-dash:
script-data-double-escaped-dash-dash: script-data-double-escaped-less-than-sign: script-data-double-escape-end: before-attribute-name: attribute-name: after-attribute-name:
before-attribute-value: attribute-value-double-quoted: attribute-value-single-quoted: attribute-value-unquoted: character-reference-in-attribute-value: after-attribute-value-

rgchris

#!/usr/local/bin/ren-c

Rebol [
    Title: "HTTPd Example"
    Date: 7-Feb-2018
    Author: "Christopher Ross-Gill"
    File: %httpd-example.reb
    Rights: http://opensource.org/licenses/Apache-2.0
    Needs: [<httpd>]
]

rgchris

Rebol [
    Title: "Simple IMF Parser"
    Author: "Christopher Ross-Gill"
    Date: 11-Feb-2018
    Home: https://github.com/rgchris/Scripts
    File: %simf.reb
    Rights: http://opensource.org/licenses/Apache-2.0
    Type: module
    Name: rgchris.simf
    Exports: [load-message]